/ Hex Artifact Content
Login

Artifact d108b0028050ecd0fd9508268995892937d577ae:


0000: 2f 2a 0a 2a 2a 20 32 30 30 32 20 46 65 62 72 75  /*.** 2002 Febru
0010: 61 72 79 20 32 33 0a 2a 2a 0a 2a 2a 20 54 68 65  ary 23.**.** The
0020: 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 6d   author disclaim
0030: 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 74  s copyright to t
0040: 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 2e  his source code.
0050: 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a 2a    In place of.**
0060: 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 2c   a legal notice,
0070: 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 73   here is a bless
0080: 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d 61  ing:.**.**    Ma
0090: 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 6e  y you do good an
00a0: 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 20  d not evil..**  
00b0: 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 66    May you find f
00c0: 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 79  orgiveness for y
00d0: 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 67  ourself and forg
00e0: 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 20  ive others..**  
00f0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20    May you share 
0100: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61  freely, never ta
0110: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79  king more than y
0120: 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a  ou give..**.****
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0170: 2a 2a 2a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 69  *****.** This fi
0180: 6c 65 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20  le contains the 
0190: 43 20 66 75 6e 63 74 69 6f 6e 73 20 74 68 61 74  C functions that
01a0: 20 69 6d 70 6c 65 6d 65 6e 74 20 76 61 72 69 6f   implement vario
01b0: 75 73 20 53 51 4c 0a 2a 2a 20 66 75 6e 63 74 69  us SQL.** functi
01c0: 6f 6e 73 20 6f 66 20 53 51 4c 69 74 65 2e 20 20  ons of SQLite.  
01d0: 0a 2a 2a 0a 2a 2a 20 54 68 65 72 65 20 69 73 20  .**.** There is 
01e0: 6f 6e 6c 79 20 6f 6e 65 20 65 78 70 6f 72 74 65  only one exporte
01f0: 64 20 73 79 6d 62 6f 6c 20 69 6e 20 74 68 69 73  d symbol in this
0200: 20 66 69 6c 65 20 2d 20 74 68 65 20 66 75 6e 63   file - the func
0210: 74 69 6f 6e 0a 2a 2a 20 73 71 6c 69 74 65 52 65  tion.** sqliteRe
0220: 67 69 73 74 65 72 42 75 69 6c 64 69 6e 46 75 6e  gisterBuildinFun
0230: 63 74 69 6f 6e 73 28 29 20 66 6f 75 6e 64 20 61  ctions() found a
0240: 74 20 74 68 65 20 62 6f 74 74 6f 6d 20 6f 66 20  t the bottom of 
0250: 74 68 65 20 66 69 6c 65 2e 0a 2a 2a 20 41 6c 6c  the file..** All
0260: 20 6f 74 68 65 72 20 63 6f 64 65 20 68 61 73 20   other code has 
0270: 66 69 6c 65 20 73 63 6f 70 65 2e 0a 2a 2a 0a 2a  file scope..**.*
0280: 2a 20 24 49 64 3a 20 66 75 6e 63 2e 63 2c 76 20  * $Id: func.c,v 
0290: 31 2e 32 33 38 20 32 30 30 39 2f 30 36 2f 31 39  1.238 2009/06/19
02a0: 20 31 34 3a 30 36 3a 30 33 20 64 72 68 20 45 78   14:06:03 drh Ex
02b0: 70 20 24 0a 2a 2f 0a 23 69 6e 63 6c 75 64 65 20  p $.*/.#include 
02c0: 22 73 71 6c 69 74 65 49 6e 74 2e 68 22 0a 23 69  "sqliteInt.h".#i
02d0: 6e 63 6c 75 64 65 20 3c 73 74 64 6c 69 62 2e 68  nclude <stdlib.h
02e0: 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 61 73 73 65  >.#include <asse
02f0: 72 74 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 22  rt.h>.#include "
0300: 76 64 62 65 49 6e 74 2e 68 22 0a 0a 2f 2a 0a 2a  vdbeInt.h"../*.*
0310: 2a 20 52 65 74 75 72 6e 20 74 68 65 20 63 6f 6c  * Return the col
0320: 6c 61 74 69 6e 67 20 66 75 6e 63 74 69 6f 6e 20  lating function 
0330: 61 73 73 6f 63 69 61 74 65 64 20 77 69 74 68 20  associated with 
0340: 61 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73  a function..*/.s
0350: 74 61 74 69 63 20 43 6f 6c 6c 53 65 71 20 2a 73  tatic CollSeq *s
0360: 71 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c  qlite3GetFuncCol
0370: 6c 53 65 71 28 73 71 6c 69 74 65 33 5f 63 6f 6e  lSeq(sqlite3_con
0380: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a  text *context){.
0390: 20 20 72 65 74 75 72 6e 20 63 6f 6e 74 65 78 74    return context
03a0: 2d 3e 70 43 6f 6c 6c 3b 0a 7d 0a 0a 2f 2a 0a 2a  ->pColl;.}../*.*
03b0: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
03c0: 20 6f 66 20 74 68 65 20 6e 6f 6e 2d 61 67 67 72   of the non-aggr
03d0: 65 67 61 74 65 20 6d 69 6e 28 29 20 61 6e 64 20  egate min() and 
03e0: 6d 61 78 28 29 20 66 75 6e 63 74 69 6f 6e 73 0a  max() functions.
03f0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6d  */.static void m
0400: 69 6e 6d 61 78 46 75 6e 63 28 0a 20 20 73 71 6c  inmaxFunc(.  sql
0410: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
0420: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
0430: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
0440: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69  ue **argv.){.  i
0450: 6e 74 20 69 3b 0a 20 20 69 6e 74 20 6d 61 73 6b  nt i;.  int mask
0460: 3b 20 20 20 20 2f 2a 20 30 20 66 6f 72 20 6d 69  ;    /* 0 for mi
0470: 6e 28 29 20 6f 72 20 30 78 66 66 66 66 66 66 66  n() or 0xfffffff
0480: 66 20 66 6f 72 20 6d 61 78 28 29 20 2a 2f 0a 20  f for max() */. 
0490: 20 69 6e 74 20 69 42 65 73 74 3b 0a 20 20 43 6f   int iBest;.  Co
04a0: 6c 6c 53 65 71 20 2a 70 43 6f 6c 6c 3b 0a 0a 20  llSeq *pColl;.. 
04b0: 20 61 73 73 65 72 74 28 20 61 72 67 63 3e 31 20   assert( argc>1 
04c0: 29 3b 0a 20 20 6d 61 73 6b 20 3d 20 73 71 6c 69  );.  mask = sqli
04d0: 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f  te3_user_data(co
04e0: 6e 74 65 78 74 29 3d 3d 30 20 3f 20 30 20 3a 20  ntext)==0 ? 0 : 
04f0: 2d 31 3b 0a 20 20 70 43 6f 6c 6c 20 3d 20 73 71  -1;.  pColl = sq
0500: 6c 69 74 65 33 47 65 74 46 75 6e 63 43 6f 6c 6c  lite3GetFuncColl
0510: 53 65 71 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  Seq(context);.  
0520: 61 73 73 65 72 74 28 20 70 43 6f 6c 6c 20 29 3b  assert( pColl );
0530: 0a 20 20 61 73 73 65 72 74 28 20 6d 61 73 6b 3d  .  assert( mask=
0540: 3d 2d 31 20 7c 7c 20 6d 61 73 6b 3d 3d 30 20 29  =-1 || mask==0 )
0550: 3b 0a 20 20 69 42 65 73 74 20 3d 20 30 3b 0a 20  ;.  iBest = 0;. 
0560: 20 69 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c   if( sqlite3_val
0570: 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29  ue_type(argv[0])
0580: 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20  ==SQLITE_NULL ) 
0590: 72 65 74 75 72 6e 3b 0a 20 20 66 6f 72 28 69 3d  return;.  for(i=
05a0: 31 3b 20 69 3c 61 72 67 63 3b 20 69 2b 2b 29 7b  1; i<argc; i++){
05b0: 0a 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 33  .    if( sqlite3
05c0: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
05d0: 5b 69 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55 4c  [i])==SQLITE_NUL
05e0: 4c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20  L ) return;.    
05f0: 69 66 28 20 28 73 71 6c 69 74 65 33 4d 65 6d 43  if( (sqlite3MemC
0600: 6f 6d 70 61 72 65 28 61 72 67 76 5b 69 42 65 73  ompare(argv[iBes
0610: 74 5d 2c 20 61 72 67 76 5b 69 5d 2c 20 70 43 6f  t], argv[i], pCo
0620: 6c 6c 29 5e 6d 61 73 6b 29 3e 3d 30 20 29 7b 0a  ll)^mask)>=0 ){.
0630: 20 20 20 20 20 20 74 65 73 74 63 61 73 65 28 20        testcase( 
0640: 6d 61 73 6b 3d 3d 30 20 29 3b 0a 20 20 20 20 20  mask==0 );.     
0650: 20 69 42 65 73 74 20 3d 20 69 3b 0a 20 20 20 20   iBest = i;.    
0660: 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f  }.  }.  sqlite3_
0670: 72 65 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e  result_value(con
0680: 74 65 78 74 2c 20 61 72 67 76 5b 69 42 65 73 74  text, argv[iBest
0690: 5d 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74  ]);.}../*.** Ret
06a0: 75 72 6e 20 74 68 65 20 74 79 70 65 20 6f 66 20  urn the type of 
06b0: 74 68 65 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2f  the argument..*/
06c0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74 79 70  .static void typ
06d0: 65 6f 66 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  eofFunc(.  sqlit
06e0: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
06f0: 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73  ext,.  int NotUs
0700: 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  ed,.  sqlite3_va
0710: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
0720: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 20 3d 20  const char *z = 
0730: 30 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  0;.  UNUSED_PARA
0740: 4d 45 54 45 52 28 4e 6f 74 55 73 65 64 29 3b 0a  METER(NotUsed);.
0750: 20 20 73 77 69 74 63 68 28 20 73 71 6c 69 74 65    switch( sqlite
0760: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
0770: 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20 63 61 73  v[0]) ){.    cas
0780: 65 20 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52  e SQLITE_INTEGER
0790: 3a 20 7a 20 3d 20 22 69 6e 74 65 67 65 72 22 3b  : z = "integer";
07a0: 20 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65   break;.    case
07b0: 20 53 51 4c 49 54 45 5f 54 45 58 54 3a 20 20 20   SQLITE_TEXT:   
07c0: 20 7a 20 3d 20 22 74 65 78 74 22 3b 20 20 20 20   z = "text";    
07d0: 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65 20  break;.    case 
07e0: 53 51 4c 49 54 45 5f 46 4c 4f 41 54 3a 20 20 20  SQLITE_FLOAT:   
07f0: 7a 20 3d 20 22 72 65 61 6c 22 3b 20 20 20 20 62  z = "real";    b
0800: 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65 20 53  reak;.    case S
0810: 51 4c 49 54 45 5f 42 4c 4f 42 3a 20 20 20 20 7a  QLITE_BLOB:    z
0820: 20 3d 20 22 62 6c 6f 62 22 3b 20 20 20 20 62 72   = "blob";    br
0830: 65 61 6b 3b 0a 20 20 20 20 64 65 66 61 75 6c 74  eak;.    default
0840: 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 7a 20  :             z 
0850: 3d 20 22 6e 75 6c 6c 22 3b 20 20 20 20 62 72 65  = "null";    bre
0860: 61 6b 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65  ak;.  }.  sqlite
0870: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
0880: 6e 74 65 78 74 2c 20 7a 2c 20 2d 31 2c 20 53 51  ntext, z, -1, SQ
0890: 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a  LITE_STATIC);.}.
08a0: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
08b0: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 65  tation of the le
08c0: 6e 67 74 68 28 29 20 66 75 6e 63 74 69 6f 6e 0a  ngth() function.
08d0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  */.static void l
08e0: 65 6e 67 74 68 46 75 6e 63 28 0a 20 20 73 71 6c  engthFunc(.  sql
08f0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
0900: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
0910: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
0920: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69  ue **argv.){.  i
0930: 6e 74 20 6c 65 6e 3b 0a 0a 20 20 61 73 73 65 72  nt len;..  asser
0940: 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20  t( argc==1 );.  
0950: 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52  UNUSED_PARAMETER
0960: 28 61 72 67 63 29 3b 0a 20 20 73 77 69 74 63 68  (argc);.  switch
0970: 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ( sqlite3_value_
0980: 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b  type(argv[0]) ){
0990: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
09a0: 5f 42 4c 4f 42 3a 0a 20 20 20 20 63 61 73 65 20  _BLOB:.    case 
09b0: 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52 3a 0a  SQLITE_INTEGER:.
09c0: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
09d0: 46 4c 4f 41 54 3a 20 7b 0a 20 20 20 20 20 20 73  FLOAT: {.      s
09e0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
09f0: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
0a00: 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61  e3_value_bytes(a
0a10: 72 67 76 5b 30 5d 29 29 3b 0a 20 20 20 20 20 20  rgv[0]));.      
0a20: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
0a30: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 54 45 58   case SQLITE_TEX
0a40: 54 3a 20 7b 0a 20 20 20 20 20 20 63 6f 6e 73 74  T: {.      const
0a50: 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a   unsigned char *
0a60: 7a 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  z = sqlite3_valu
0a70: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
0a80: 0a 20 20 20 20 20 20 69 66 28 20 7a 3d 3d 30 20  .      if( z==0 
0a90: 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20  ) return;.      
0aa0: 6c 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 77  len = 0;.      w
0ab0: 68 69 6c 65 28 20 2a 7a 20 29 7b 0a 20 20 20 20  hile( *z ){.    
0ac0: 20 20 20 20 6c 65 6e 2b 2b 3b 0a 20 20 20 20 20      len++;.     
0ad0: 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55     SQLITE_SKIP_U
0ae0: 54 46 38 28 7a 29 3b 0a 20 20 20 20 20 20 7d 0a  TF8(z);.      }.
0af0: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
0b00: 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74  sult_int(context
0b10: 2c 20 6c 65 6e 29 3b 0a 20 20 20 20 20 20 62 72  , len);.      br
0b20: 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64  eak;.    }.    d
0b30: 65 66 61 75 6c 74 3a 20 7b 0a 20 20 20 20 20 20  efault: {.      
0b40: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 6e  sqlite3_result_n
0b50: 75 6c 6c 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  ull(context);.  
0b60: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
0b70: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  .  }.}../*.** Im
0b80: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
0b90: 74 68 65 20 61 62 73 28 29 20 66 75 6e 63 74 69  the abs() functi
0ba0: 6f 6e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  on.*/.static voi
0bb0: 64 20 61 62 73 46 75 6e 63 28 73 71 6c 69 74 65  d absFunc(sqlite
0bc0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
0bd0: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
0be0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
0bf0: 67 76 29 7b 0a 20 20 61 73 73 65 72 74 28 20 61  gv){.  assert( a
0c00: 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53  rgc==1 );.  UNUS
0c10: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
0c20: 63 29 3b 0a 20 20 73 77 69 74 63 68 28 20 73 71  c);.  switch( sq
0c30: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
0c40: 28 61 72 67 76 5b 30 5d 29 20 29 7b 0a 20 20 20  (argv[0]) ){.   
0c50: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 49 4e 54   case SQLITE_INT
0c60: 45 47 45 52 3a 20 7b 0a 20 20 20 20 20 20 69 36  EGER: {.      i6
0c70: 34 20 69 56 61 6c 20 3d 20 73 71 6c 69 74 65 33  4 iVal = sqlite3
0c80: 5f 76 61 6c 75 65 5f 69 6e 74 36 34 28 61 72 67  _value_int64(arg
0c90: 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 69 66 28  v[0]);.      if(
0ca0: 20 69 56 61 6c 3c 30 20 29 7b 0a 20 20 20 20 20   iVal<0 ){.     
0cb0: 20 20 20 69 66 28 20 28 69 56 61 6c 3c 3c 31 29     if( (iVal<<1)
0cc0: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20  ==0 ){.         
0cd0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
0ce0: 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22  error(context, "
0cf0: 69 6e 74 65 67 65 72 20 6f 76 65 72 66 6c 6f 77  integer overflow
0d00: 22 2c 20 2d 31 29 3b 0a 20 20 20 20 20 20 20 20  ", -1);.        
0d10: 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20    return;.      
0d20: 20 20 7d 0a 20 20 20 20 20 20 20 20 69 56 61 6c    }.        iVal
0d30: 20 3d 20 2d 69 56 61 6c 3b 0a 20 20 20 20 20 20   = -iVal;.      
0d40: 7d 20 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  } .      sqlite3
0d50: 5f 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f  _result_int64(co
0d60: 6e 74 65 78 74 2c 20 69 56 61 6c 29 3b 0a 20 20  ntext, iVal);.  
0d70: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
0d80: 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45  .    case SQLITE
0d90: 5f 4e 55 4c 4c 3a 20 7b 0a 20 20 20 20 20 20 73  _NULL: {.      s
0da0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 6e 75  qlite3_result_nu
0db0: 6c 6c 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20  ll(context);.   
0dc0: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a     break;.    }.
0dd0: 20 20 20 20 64 65 66 61 75 6c 74 3a 20 7b 0a 20      default: {. 
0de0: 20 20 20 20 20 64 6f 75 62 6c 65 20 72 56 61 6c       double rVal
0df0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
0e00: 5f 64 6f 75 62 6c 65 28 61 72 67 76 5b 30 5d 29  _double(argv[0])
0e10: 3b 0a 20 20 20 20 20 20 69 66 28 20 72 56 61 6c  ;.      if( rVal
0e20: 3c 30 20 29 20 72 56 61 6c 20 3d 20 2d 72 56 61  <0 ) rVal = -rVa
0e30: 6c 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33  l;.      sqlite3
0e40: 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28 63  _result_double(c
0e50: 6f 6e 74 65 78 74 2c 20 72 56 61 6c 29 3b 0a 20  ontext, rVal);. 
0e60: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20       break;.    
0e70: 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  }.  }.}../*.** I
0e80: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
0e90: 20 74 68 65 20 73 75 62 73 74 72 28 29 20 66 75   the substr() fu
0ea0: 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 73 75  nction..**.** su
0eb0: 62 73 74 72 28 78 2c 70 31 2c 70 32 29 20 20 72  bstr(x,p1,p2)  r
0ec0: 65 74 75 72 6e 73 20 70 32 20 63 68 61 72 61 63  eturns p2 charac
0ed0: 74 65 72 73 20 6f 66 20 78 5b 5d 20 62 65 67 69  ters of x[] begi
0ee0: 6e 6e 69 6e 67 20 77 69 74 68 20 70 31 2e 0a 2a  nning with p1..*
0ef0: 2a 20 70 31 20 69 73 20 31 2d 69 6e 64 65 78 65  * p1 is 1-indexe
0f00: 64 2e 20 20 53 6f 20 73 75 62 73 74 72 28 78 2c  d.  So substr(x,
0f10: 31 2c 31 29 20 72 65 74 75 72 6e 73 20 74 68 65  1,1) returns the
0f20: 20 66 69 72 73 74 20 63 68 61 72 61 63 74 65 72   first character
0f30: 0a 2a 2a 20 6f 66 20 78 2e 20 20 49 66 20 78 20  .** of x.  If x 
0f40: 69 73 20 74 65 78 74 2c 20 74 68 65 6e 20 77 65  is text, then we
0f50: 20 61 63 74 75 61 6c 6c 79 20 63 6f 75 6e 74 20   actually count 
0f60: 55 54 46 2d 38 20 63 68 61 72 61 63 74 65 72 73  UTF-8 characters
0f70: 2e 0a 2a 2a 20 49 66 20 78 20 69 73 20 61 20 62  ..** If x is a b
0f80: 6c 6f 62 2c 20 74 68 65 6e 20 77 65 20 63 6f 75  lob, then we cou
0f90: 6e 74 20 62 79 74 65 73 2e 0a 2a 2a 0a 2a 2a 20  nt bytes..**.** 
0fa0: 49 66 20 70 31 20 69 73 20 6e 65 67 61 74 69 76  If p1 is negativ
0fb0: 65 2c 20 74 68 65 6e 20 77 65 20 62 65 67 69 6e  e, then we begin
0fc0: 20 61 62 73 28 70 31 29 20 66 72 6f 6d 20 74 68   abs(p1) from th
0fd0: 65 20 65 6e 64 20 6f 66 20 78 5b 5d 2e 0a 2a 2f  e end of x[]..*/
0fe0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73 75 62  .static void sub
0ff0: 73 74 72 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  strFunc(.  sqlit
1000: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
1010: 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c  ext,.  int argc,
1020: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  .  sqlite3_value
1030: 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e   **argv.){.  con
1040: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
1050: 20 2a 7a 3b 0a 20 20 63 6f 6e 73 74 20 75 6e 73   *z;.  const uns
1060: 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 32 3b 0a  igned char *z2;.
1070: 20 20 69 6e 74 20 6c 65 6e 3b 0a 20 20 69 6e 74    int len;.  int
1080: 20 70 30 74 79 70 65 3b 0a 20 20 69 36 34 20 70   p0type;.  i64 p
1090: 31 2c 20 70 32 3b 0a 20 20 69 6e 74 20 6e 65 67  1, p2;.  int neg
10a0: 50 32 20 3d 20 30 3b 0a 0a 20 20 61 73 73 65 72  P2 = 0;..  asser
10b0: 74 28 20 61 72 67 63 3d 3d 33 20 7c 7c 20 61 72  t( argc==3 || ar
10c0: 67 63 3d 3d 32 20 29 3b 0a 20 20 69 66 28 20 73  gc==2 );.  if( s
10d0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
10e0: 65 28 61 72 67 76 5b 31 5d 29 3d 3d 53 51 4c 49  e(argv[1])==SQLI
10f0: 54 45 5f 4e 55 4c 4c 0a 20 20 20 7c 7c 20 28 61  TE_NULL.   || (a
1100: 72 67 63 3d 3d 33 20 26 26 20 73 71 6c 69 74 65  rgc==3 && sqlite
1110: 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67  3_value_type(arg
1120: 76 5b 32 5d 29 3d 3d 53 51 4c 49 54 45 5f 4e 55  v[2])==SQLITE_NU
1130: 4c 4c 29 0a 20 20 29 7b 0a 20 20 20 20 72 65 74  LL).  ){.    ret
1140: 75 72 6e 3b 0a 20 20 7d 0a 20 20 70 30 74 79 70  urn;.  }.  p0typ
1150: 65 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  e = sqlite3_valu
1160: 65 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3b  e_type(argv[0]);
1170: 0a 20 20 69 66 28 20 70 30 74 79 70 65 3d 3d 53  .  if( p0type==S
1180: 51 4c 49 54 45 5f 42 4c 4f 42 20 29 7b 0a 20 20  QLITE_BLOB ){.  
1190: 20 20 6c 65 6e 20 3d 20 73 71 6c 69 74 65 33 5f    len = sqlite3_
11a0: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
11b0: 5b 30 5d 29 3b 0a 20 20 20 20 7a 20 3d 20 73 71  [0]);.    z = sq
11c0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62  lite3_value_blob
11d0: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 69  (argv[0]);.    i
11e0: 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75 72 6e  f( z==0 ) return
11f0: 3b 0a 20 20 20 20 61 73 73 65 72 74 28 20 6c 65  ;.    assert( le
1200: 6e 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  n==sqlite3_value
1210: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 20  _bytes(argv[0]) 
1220: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  );.  }else{.    
1230: 7a 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  z = sqlite3_valu
1240: 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b  e_text(argv[0]);
1250: 0a 20 20 20 20 69 66 28 20 7a 3d 3d 30 20 29 20  .    if( z==0 ) 
1260: 72 65 74 75 72 6e 3b 0a 20 20 20 20 6c 65 6e 20  return;.    len 
1270: 3d 20 30 3b 0a 20 20 20 20 66 6f 72 28 7a 32 3d  = 0;.    for(z2=
1280: 7a 3b 20 2a 7a 32 3b 20 6c 65 6e 2b 2b 29 7b 0a  z; *z2; len++){.
1290: 20 20 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49        SQLITE_SKI
12a0: 50 5f 55 54 46 38 28 7a 32 29 3b 0a 20 20 20 20  P_UTF8(z2);.    
12b0: 7d 0a 20 20 7d 0a 20 20 70 31 20 3d 20 73 71 6c  }.  }.  p1 = sql
12c0: 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61  ite3_value_int(a
12d0: 72 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28 20 61  rgv[1]);.  if( a
12e0: 72 67 63 3d 3d 33 20 29 7b 0a 20 20 20 20 70 32  rgc==3 ){.    p2
12f0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
1300: 5f 69 6e 74 28 61 72 67 76 5b 32 5d 29 3b 0a 20  _int(argv[2]);. 
1310: 20 20 20 69 66 28 20 70 32 3c 30 20 29 7b 0a 20     if( p2<0 ){. 
1320: 20 20 20 20 20 70 32 20 3d 20 2d 70 32 3b 0a 20       p2 = -p2;. 
1330: 20 20 20 20 20 6e 65 67 50 32 20 3d 20 31 3b 0a       negP2 = 1;.
1340: 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20      }.  }else{. 
1350: 20 20 20 70 32 20 3d 20 73 71 6c 69 74 65 33 5f     p2 = sqlite3_
1360: 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c  context_db_handl
1370: 65 28 63 6f 6e 74 65 78 74 29 2d 3e 61 4c 69 6d  e(context)->aLim
1380: 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f  it[SQLITE_LIMIT_
1390: 4c 45 4e 47 54 48 5d 3b 0a 20 20 7d 0a 20 20 69  LENGTH];.  }.  i
13a0: 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20 70  f( p1<0 ){.    p
13b0: 31 20 2b 3d 20 6c 65 6e 3b 0a 20 20 20 20 69 66  1 += len;.    if
13c0: 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20 20 20  ( p1<0 ){.      
13d0: 70 32 20 2b 3d 20 70 31 3b 0a 20 20 20 20 20 20  p2 += p1;.      
13e0: 69 66 28 20 70 32 3c 30 20 29 20 70 32 20 3d 20  if( p2<0 ) p2 = 
13f0: 30 3b 0a 20 20 20 20 20 20 70 31 20 3d 20 30 3b  0;.      p1 = 0;
1400: 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 20 69  .    }.  }else i
1410: 66 28 20 70 31 3e 30 20 29 7b 0a 20 20 20 20 70  f( p1>0 ){.    p
1420: 31 2d 2d 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28  1--;.  }else if(
1430: 20 70 32 3e 30 20 29 7b 0a 20 20 20 20 70 32 2d   p2>0 ){.    p2-
1440: 2d 3b 0a 20 20 7d 0a 20 20 69 66 28 20 6e 65 67  -;.  }.  if( neg
1450: 50 32 20 29 7b 0a 20 20 20 20 70 31 20 2d 3d 20  P2 ){.    p1 -= 
1460: 70 32 3b 0a 20 20 20 20 69 66 28 20 70 31 3c 30  p2;.    if( p1<0
1470: 20 29 7b 0a 20 20 20 20 20 20 70 32 20 2b 3d 20   ){.      p2 += 
1480: 70 31 3b 0a 20 20 20 20 20 20 70 31 20 3d 20 30  p1;.      p1 = 0
1490: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 61 73  ;.    }.  }.  as
14a0: 73 65 72 74 28 20 70 31 3e 3d 30 20 26 26 20 70  sert( p1>=0 && p
14b0: 32 3e 3d 30 20 29 3b 0a 20 20 69 66 28 20 70 31  2>=0 );.  if( p1
14c0: 2b 70 32 3e 6c 65 6e 20 29 7b 0a 20 20 20 20 70  +p2>len ){.    p
14d0: 32 20 3d 20 6c 65 6e 2d 70 31 3b 0a 20 20 20 20  2 = len-p1;.    
14e0: 69 66 28 20 70 32 3c 30 20 29 20 70 32 20 3d 20  if( p2<0 ) p2 = 
14f0: 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70 30 74  0;.  }.  if( p0t
1500: 79 70 65 21 3d 53 51 4c 49 54 45 5f 42 4c 4f 42  ype!=SQLITE_BLOB
1510: 20 29 7b 0a 20 20 20 20 77 68 69 6c 65 28 20 2a   ){.    while( *
1520: 7a 20 26 26 20 70 31 20 29 7b 0a 20 20 20 20 20  z && p1 ){.     
1530: 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46   SQLITE_SKIP_UTF
1540: 38 28 7a 29 3b 0a 20 20 20 20 20 20 70 31 2d 2d  8(z);.      p1--
1550: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 66 6f 72 28  ;.    }.    for(
1560: 7a 32 3d 7a 3b 20 2a 7a 32 20 26 26 20 70 32 3b  z2=z; *z2 && p2;
1570: 20 70 32 2d 2d 29 7b 0a 20 20 20 20 20 20 53 51   p2--){.      SQ
1580: 4c 49 54 45 5f 53 4b 49 50 5f 55 54 46 38 28 7a  LITE_SKIP_UTF8(z
1590: 32 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73 71  2);.    }.    sq
15a0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
15b0: 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61 72  t(context, (char
15c0: 2a 29 7a 2c 20 28 69 6e 74 29 28 7a 32 2d 7a 29  *)z, (int)(z2-z)
15d0: 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45  , SQLITE_TRANSIE
15e0: 4e 54 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  NT);.  }else{.  
15f0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
1600: 5f 62 6c 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28  _blob(context, (
1610: 63 68 61 72 2a 29 26 7a 5b 70 31 5d 2c 20 28 69  char*)&z[p1], (i
1620: 6e 74 29 70 32 2c 20 53 51 4c 49 54 45 5f 54 52  nt)p2, SQLITE_TR
1630: 41 4e 53 49 45 4e 54 29 3b 0a 20 20 7d 0a 7d 0a  ANSIENT);.  }.}.
1640: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
1650: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 72 6f 75  ation of the rou
1660: 6e 64 28 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f  nd() function.*/
1670: 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f  .#ifndef SQLITE_
1680: 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f  OMIT_FLOATING_PO
1690: 49 4e 54 0a 73 74 61 74 69 63 20 76 6f 69 64 20  INT.static void 
16a0: 72 6f 75 6e 64 46 75 6e 63 28 73 71 6c 69 74 65  roundFunc(sqlite
16b0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
16c0: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
16d0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
16e0: 67 76 29 7b 0a 20 20 69 6e 74 20 6e 20 3d 20 30  gv){.  int n = 0
16f0: 3b 0a 20 20 64 6f 75 62 6c 65 20 72 3b 0a 20 20  ;.  double r;.  
1700: 63 68 61 72 20 2a 7a 42 75 66 3b 0a 20 20 61 73  char *zBuf;.  as
1710: 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 7c 7c  sert( argc==1 ||
1720: 20 61 72 67 63 3d 3d 32 20 29 3b 0a 20 20 69 66   argc==2 );.  if
1730: 28 20 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20  ( argc==2 ){.   
1740: 20 69 66 28 20 53 51 4c 49 54 45 5f 4e 55 4c 4c   if( SQLITE_NULL
1750: 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ==sqlite3_value_
1760: 74 79 70 65 28 61 72 67 76 5b 31 5d 29 20 29 20  type(argv[1]) ) 
1770: 72 65 74 75 72 6e 3b 0a 20 20 20 20 6e 20 3d 20  return;.    n = 
1780: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e  sqlite3_value_in
1790: 74 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20  t(argv[1]);.    
17a0: 69 66 28 20 6e 3e 33 30 20 29 20 6e 20 3d 20 33  if( n>30 ) n = 3
17b0: 30 3b 0a 20 20 20 20 69 66 28 20 6e 3c 30 20 29  0;.    if( n<0 )
17c0: 20 6e 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66   n = 0;.  }.  if
17d0: 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ( sqlite3_value_
17e0: 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53  type(argv[0])==S
17f0: 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65 74  QLITE_NULL ) ret
1800: 75 72 6e 3b 0a 20 20 72 20 3d 20 73 71 6c 69 74  urn;.  r = sqlit
1810: 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65 28  e3_value_double(
1820: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 7a 42 75 66  argv[0]);.  zBuf
1830: 20 3d 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e   = sqlite3_mprin
1840: 74 66 28 22 25 2e 2a 66 22 2c 6e 2c 72 29 3b 0a  tf("%.*f",n,r);.
1850: 20 20 69 66 28 20 7a 42 75 66 3d 3d 30 20 29 7b    if( zBuf==0 ){
1860: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
1870: 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28  ult_error_nomem(
1880: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 7d 65 6c 73  context);.  }els
1890: 65 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 41 74  e{.    sqlite3At
18a0: 6f 46 28 7a 42 75 66 2c 20 26 72 29 3b 0a 20 20  oF(zBuf, &r);.  
18b0: 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a    sqlite3_free(z
18c0: 42 75 66 29 3b 0a 20 20 20 20 73 71 6c 69 74 65  Buf);.    sqlite
18d0: 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28  3_result_double(
18e0: 63 6f 6e 74 65 78 74 2c 20 72 29 3b 0a 20 20 7d  context, r);.  }
18f0: 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a  .}.#endif../*.**
1900: 20 41 6c 6c 6f 63 61 74 65 20 6e 42 79 74 65 20   Allocate nByte 
1910: 62 79 74 65 73 20 6f 66 20 73 70 61 63 65 20 75  bytes of space u
1920: 73 69 6e 67 20 73 71 6c 69 74 65 33 5f 6d 61 6c  sing sqlite3_mal
1930: 6c 6f 63 28 29 2e 20 49 66 20 74 68 65 0a 2a 2a  loc(). If the.**
1940: 20 61 6c 6c 6f 63 61 74 69 6f 6e 20 66 61 69 6c   allocation fail
1950: 73 2c 20 63 61 6c 6c 20 73 71 6c 69 74 65 33 5f  s, call sqlite3_
1960: 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d  result_error_nom
1970: 65 6d 28 29 20 74 6f 20 6e 6f 74 69 66 79 0a 2a  em() to notify.*
1980: 2a 20 74 68 65 20 64 61 74 61 62 61 73 65 20 68  * the database h
1990: 61 6e 64 6c 65 20 74 68 61 74 20 6d 61 6c 6c 6f  andle that mallo
19a0: 63 28 29 20 68 61 73 20 66 61 69 6c 65 64 20 61  c() has failed a
19b0: 6e 64 20 72 65 74 75 72 6e 20 4e 55 4c 4c 2e 0a  nd return NULL..
19c0: 2a 2a 20 49 66 20 6e 42 79 74 65 20 69 73 20 6c  ** If nByte is l
19d0: 61 72 67 65 72 20 74 68 61 6e 20 74 68 65 20 6d  arger than the m
19e0: 61 78 69 6d 75 6d 20 73 74 72 69 6e 67 20 6f 72  aximum string or
19f0: 20 62 6c 6f 62 20 6c 65 6e 67 74 68 2c 20 74 68   blob length, th
1a00: 65 6e 0a 2a 2a 20 72 61 69 73 65 20 61 6e 20 53  en.** raise an S
1a10: 51 4c 49 54 45 5f 54 4f 4f 42 49 47 20 65 78 63  QLITE_TOOBIG exc
1a20: 65 70 74 69 6f 6e 20 61 6e 64 20 72 65 74 75 72  eption and retur
1a30: 6e 20 4e 55 4c 4c 2e 0a 2a 2f 0a 73 74 61 74 69  n NULL..*/.stati
1a40: 63 20 76 6f 69 64 20 2a 63 6f 6e 74 65 78 74 4d  c void *contextM
1a50: 61 6c 6c 6f 63 28 73 71 6c 69 74 65 33 5f 63 6f  alloc(sqlite3_co
1a60: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
1a70: 69 36 34 20 6e 42 79 74 65 29 7b 0a 20 20 63 68  i64 nByte){.  ch
1a80: 61 72 20 2a 7a 3b 0a 20 20 73 71 6c 69 74 65 33  ar *z;.  sqlite3
1a90: 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63   *db = sqlite3_c
1aa0: 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65  ontext_db_handle
1ab0: 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 61 73 73  (context);.  ass
1ac0: 65 72 74 28 20 6e 42 79 74 65 3e 30 20 29 3b 0a  ert( nByte>0 );.
1ad0: 20 20 74 65 73 74 63 61 73 65 28 20 6e 42 79 74    testcase( nByt
1ae0: 65 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51  e==db->aLimit[SQ
1af0: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54  LITE_LIMIT_LENGT
1b00: 48 5d 20 29 3b 0a 20 20 74 65 73 74 63 61 73 65  H] );.  testcase
1b10: 28 20 6e 42 79 74 65 3d 3d 64 62 2d 3e 61 4c 69  ( nByte==db->aLi
1b20: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
1b30: 5f 4c 45 4e 47 54 48 5d 2b 31 20 29 3b 0a 20 20  _LENGTH]+1 );.  
1b40: 69 66 28 20 6e 42 79 74 65 3e 64 62 2d 3e 61 4c  if( nByte>db->aL
1b50: 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49  imit[SQLITE_LIMI
1b60: 54 5f 4c 45 4e 47 54 48 5d 20 29 7b 0a 20 20 20  T_LENGTH] ){.   
1b70: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
1b80: 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63 6f 6e  error_toobig(con
1b90: 74 65 78 74 29 3b 0a 20 20 20 20 7a 20 3d 20 30  text);.    z = 0
1ba0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a  ;.  }else{.    z
1bb0: 20 3d 20 73 71 6c 69 74 65 33 4d 61 6c 6c 6f 63   = sqlite3Malloc
1bc0: 28 28 69 6e 74 29 6e 42 79 74 65 29 3b 0a 20 20  ((int)nByte);.  
1bd0: 20 20 69 66 28 20 21 7a 20 29 7b 0a 20 20 20 20    if( !z ){.    
1be0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
1bf0: 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e  _error_nomem(con
1c00: 74 65 78 74 29 3b 0a 20 20 20 20 7d 0a 20 20 7d  text);.    }.  }
1c10: 0a 20 20 72 65 74 75 72 6e 20 7a 3b 0a 7d 0a 0a  .  return z;.}..
1c20: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
1c30: 74 69 6f 6e 20 6f 66 20 74 68 65 20 75 70 70 65  tion of the uppe
1c40: 72 28 29 20 61 6e 64 20 6c 6f 77 65 72 28 29 20  r() and lower() 
1c50: 53 51 4c 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a  SQL functions..*
1c60: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 75 70  /.static void up
1c70: 70 65 72 46 75 6e 63 28 73 71 6c 69 74 65 33 5f  perFunc(sqlite3_
1c80: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
1c90: 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69  , int argc, sqli
1ca0: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
1cb0: 29 7b 0a 20 20 63 68 61 72 20 2a 7a 31 3b 0a 20  ){.  char *z1;. 
1cc0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 32 3b   const char *z2;
1cd0: 0a 20 20 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 55  .  int i, n;.  U
1ce0: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
1cf0: 61 72 67 63 29 3b 0a 20 20 7a 32 20 3d 20 28 63  argc);.  z2 = (c
1d00: 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  har*)sqlite3_val
1d10: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
1d20: 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  n = sqlite3_
1d30: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
1d40: 5b 30 5d 29 3b 0a 20 20 2f 2a 20 56 65 72 69 66  [0]);.  /* Verif
1d50: 79 20 74 68 61 74 20 74 68 65 20 63 61 6c 6c 20  y that the call 
1d60: 74 6f 20 5f 62 79 74 65 73 28 29 20 64 6f 65 73  to _bytes() does
1d70: 20 6e 6f 74 20 69 6e 76 61 6c 69 64 61 74 65 20   not invalidate 
1d80: 74 68 65 20 5f 74 65 78 74 28 29 20 70 6f 69 6e  the _text() poin
1d90: 74 65 72 20 2a 2f 0a 20 20 61 73 73 65 72 74 28  ter */.  assert(
1da0: 20 7a 32 3d 3d 28 63 68 61 72 2a 29 73 71 6c 69   z2==(char*)sqli
1db0: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
1dc0: 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28  rgv[0]) );.  if(
1dd0: 20 7a 32 20 29 7b 0a 20 20 20 20 7a 31 20 3d 20   z2 ){.    z1 = 
1de0: 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f  contextMalloc(co
1df0: 6e 74 65 78 74 2c 20 28 28 69 36 34 29 6e 29 2b  ntext, ((i64)n)+
1e00: 31 29 3b 0a 20 20 20 20 69 66 28 20 7a 31 20 29  1);.    if( z1 )
1e10: 7b 0a 20 20 20 20 20 20 6d 65 6d 63 70 79 28 7a  {.      memcpy(z
1e20: 31 2c 20 7a 32 2c 20 6e 2b 31 29 3b 0a 20 20 20  1, z2, n+1);.   
1e30: 20 20 20 66 6f 72 28 69 3d 30 3b 20 7a 31 5b 69     for(i=0; z1[i
1e40: 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20  ]; i++){.       
1e50: 20 7a 31 5b 69 5d 20 3d 20 28 63 68 61 72 29 73   z1[i] = (char)s
1e60: 71 6c 69 74 65 33 54 6f 75 70 70 65 72 28 7a 31  qlite3Toupper(z1
1e70: 5b 69 5d 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20  [i]);.      }.  
1e80: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
1e90: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
1ea0: 20 7a 31 2c 20 2d 31 2c 20 73 71 6c 69 74 65 33   z1, -1, sqlite3
1eb0: 5f 66 72 65 65 29 3b 0a 20 20 20 20 7d 0a 20 20  _free);.    }.  
1ec0: 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20  }.}.static void 
1ed0: 6c 6f 77 65 72 46 75 6e 63 28 73 71 6c 69 74 65  lowerFunc(sqlite
1ee0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
1ef0: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
1f00: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
1f10: 67 76 29 7b 0a 20 20 75 38 20 2a 7a 31 3b 0a 20  gv){.  u8 *z1;. 
1f20: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 32 3b   const char *z2;
1f30: 0a 20 20 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 55  .  int i, n;.  U
1f40: 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28  NUSED_PARAMETER(
1f50: 61 72 67 63 29 3b 0a 20 20 7a 32 20 3d 20 28 63  argc);.  z2 = (c
1f60: 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  har*)sqlite3_val
1f70: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
1f80: 3b 0a 20 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  n = sqlite3_
1f90: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
1fa0: 5b 30 5d 29 3b 0a 20 20 2f 2a 20 56 65 72 69 66  [0]);.  /* Verif
1fb0: 79 20 74 68 61 74 20 74 68 65 20 63 61 6c 6c 20  y that the call 
1fc0: 74 6f 20 5f 62 79 74 65 73 28 29 20 64 6f 65 73  to _bytes() does
1fd0: 20 6e 6f 74 20 69 6e 76 61 6c 69 64 61 74 65 20   not invalidate 
1fe0: 74 68 65 20 5f 74 65 78 74 28 29 20 70 6f 69 6e  the _text() poin
1ff0: 74 65 72 20 2a 2f 0a 20 20 61 73 73 65 72 74 28  ter */.  assert(
2000: 20 7a 32 3d 3d 28 63 68 61 72 2a 29 73 71 6c 69   z2==(char*)sqli
2010: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
2020: 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28  rgv[0]) );.  if(
2030: 20 7a 32 20 29 7b 0a 20 20 20 20 7a 31 20 3d 20   z2 ){.    z1 = 
2040: 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f  contextMalloc(co
2050: 6e 74 65 78 74 2c 20 28 28 69 36 34 29 6e 29 2b  ntext, ((i64)n)+
2060: 31 29 3b 0a 20 20 20 20 69 66 28 20 7a 31 20 29  1);.    if( z1 )
2070: 7b 0a 20 20 20 20 20 20 6d 65 6d 63 70 79 28 7a  {.      memcpy(z
2080: 31 2c 20 7a 32 2c 20 6e 2b 31 29 3b 0a 20 20 20  1, z2, n+1);.   
2090: 20 20 20 66 6f 72 28 69 3d 30 3b 20 7a 31 5b 69     for(i=0; z1[i
20a0: 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20  ]; i++){.       
20b0: 20 7a 31 5b 69 5d 20 3d 20 73 71 6c 69 74 65 33   z1[i] = sqlite3
20c0: 54 6f 6c 6f 77 65 72 28 7a 31 5b 69 5d 29 3b 0a  Tolower(z1[i]);.
20d0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 73 71        }.      sq
20e0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
20f0: 74 28 63 6f 6e 74 65 78 74 2c 20 28 63 68 61 72  t(context, (char
2100: 20 2a 29 7a 31 2c 20 2d 31 2c 20 73 71 6c 69 74   *)z1, -1, sqlit
2110: 65 33 5f 66 72 65 65 29 3b 0a 20 20 20 20 7d 0a  e3_free);.    }.
2120: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70    }.}../*.** Imp
2130: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
2140: 68 65 20 49 46 4e 55 4c 4c 28 29 2c 20 4e 56 4c  he IFNULL(), NVL
2150: 28 29 2c 20 61 6e 64 20 43 4f 41 4c 45 53 43 45  (), and COALESCE
2160: 28 29 20 66 75 6e 63 74 69 6f 6e 73 2e 20 20 0a  () functions.  .
2170: 2a 2a 20 41 6c 6c 20 74 68 72 65 65 20 64 6f 20  ** All three do 
2180: 74 68 65 20 73 61 6d 65 20 74 68 69 6e 67 2e 20  the same thing. 
2190: 20 54 68 65 79 20 72 65 74 75 72 6e 20 74 68 65   They return the
21a0: 20 66 69 72 73 74 20 6e 6f 6e 2d 4e 55 4c 4c 0a   first non-NULL.
21b0: 2a 2a 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2f 0a  ** argument..*/.
21c0: 73 74 61 74 69 63 20 76 6f 69 64 20 69 66 6e 75  static void ifnu
21d0: 6c 6c 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65  llFunc(.  sqlite
21e0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
21f0: 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a  xt,.  int argc,.
2200: 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20    sqlite3_value 
2210: 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20  **argv.){.  int 
2220: 69 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c  i;.  for(i=0; i<
2230: 61 72 67 63 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  argc; i++){.    
2240: 69 66 28 20 53 51 4c 49 54 45 5f 4e 55 4c 4c 21  if( SQLITE_NULL!
2250: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  =sqlite3_value_t
2260: 79 70 65 28 61 72 67 76 5b 69 5d 29 20 29 7b 0a  ype(argv[i]) ){.
2270: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65        sqlite3_re
2280: 73 75 6c 74 5f 76 61 6c 75 65 28 63 6f 6e 74 65  sult_value(conte
2290: 78 74 2c 20 61 72 67 76 5b 69 5d 29 3b 0a 20 20  xt, argv[i]);.  
22a0: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
22b0: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  .  }.}../*.** Im
22c0: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
22d0: 72 61 6e 64 6f 6d 28 29 2e 20 20 52 65 74 75 72  random().  Retur
22e0: 6e 20 61 20 72 61 6e 64 6f 6d 20 69 6e 74 65 67  n a random integ
22f0: 65 72 2e 20 20 0a 2a 2f 0a 73 74 61 74 69 63 20  er.  .*/.static 
2300: 76 6f 69 64 20 72 61 6e 64 6f 6d 46 75 6e 63 28  void randomFunc(
2310: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
2320: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
2330: 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73 71  nt NotUsed,.  sq
2340: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 4e 6f  lite3_value **No
2350: 74 55 73 65 64 32 0a 29 7b 0a 20 20 73 71 6c 69  tUsed2.){.  sqli
2360: 74 65 5f 69 6e 74 36 34 20 72 3b 0a 20 20 55 4e  te_int64 r;.  UN
2370: 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 32 28  USED_PARAMETER2(
2380: 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73 65 64  NotUsed, NotUsed
2390: 32 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 61  2);.  sqlite3_ra
23a0: 6e 64 6f 6d 6e 65 73 73 28 73 69 7a 65 6f 66 28  ndomness(sizeof(
23b0: 72 29 2c 20 26 72 29 3b 0a 20 20 69 66 28 20 72  r), &r);.  if( r
23c0: 3c 30 20 29 7b 0a 20 20 20 20 2f 2a 20 57 65 20  <0 ){.    /* We 
23d0: 6e 65 65 64 20 74 6f 20 70 72 65 76 65 6e 74 20  need to prevent 
23e0: 61 20 72 61 6e 64 6f 6d 20 6e 75 6d 62 65 72 20  a random number 
23f0: 6f 66 20 30 78 38 30 30 30 30 30 30 30 30 30 30  of 0x80000000000
2400: 30 30 30 30 30 20 0a 20 20 20 20 2a 2a 20 28 6f  00000 .    ** (o
2410: 72 20 2d 39 32 32 33 33 37 32 30 33 36 38 35 34  r -9223372036854
2420: 37 37 35 38 30 38 29 20 73 69 6e 63 65 20 77 68  775808) since wh
2430: 65 6e 20 79 6f 75 20 64 6f 20 61 62 73 28 29 20  en you do abs() 
2440: 6f 66 20 74 68 61 74 0a 20 20 20 20 2a 2a 20 6e  of that.    ** n
2450: 75 6d 62 65 72 20 6f 66 20 79 6f 75 20 67 65 74  umber of you get
2460: 20 74 68 65 20 73 61 6d 65 20 76 61 6c 75 65 20   the same value 
2470: 62 61 63 6b 20 61 67 61 69 6e 2e 20 20 54 6f 20  back again.  To 
2480: 64 6f 20 74 68 69 73 0a 20 20 20 20 2a 2a 20 69  do this.    ** i
2490: 6e 20 61 20 77 61 79 20 74 68 61 74 20 69 73 20  n a way that is 
24a0: 74 65 73 74 61 62 6c 65 2c 20 6d 61 73 6b 20 74  testable, mask t
24b0: 68 65 20 73 69 67 6e 20 62 69 74 20 6f 66 66 20  he sign bit off 
24c0: 6f 66 20 6e 65 67 61 74 69 76 65 0a 20 20 20 20  of negative.    
24d0: 2a 2a 20 76 61 6c 75 65 73 2c 20 72 65 73 75 6c  ** values, resul
24e0: 74 69 6e 67 20 69 6e 20 61 20 70 6f 73 69 74 69  ting in a positi
24f0: 76 65 20 76 61 6c 75 65 2e 20 20 54 68 65 6e 20  ve value.  Then 
2500: 74 61 6b 65 20 74 68 65 20 0a 20 20 20 20 2a 2a  take the .    **
2510: 20 32 73 20 63 6f 6d 70 6c 65 6d 65 6e 74 20 6f   2s complement o
2520: 66 20 74 68 61 74 20 70 6f 73 69 74 69 76 65 20  f that positive 
2530: 76 61 6c 75 65 2e 20 20 54 68 65 20 65 6e 64 20  value.  The end 
2540: 72 65 73 75 6c 74 20 63 61 6e 0a 20 20 20 20 2a  result can.    *
2550: 2a 20 74 68 65 72 65 66 6f 72 65 20 62 65 20 6e  * therefore be n
2560: 6f 20 6c 65 73 73 20 74 68 61 6e 20 2d 39 32 32  o less than -922
2570: 33 33 37 32 30 33 36 38 35 34 37 37 35 38 30 37  3372036854775807
2580: 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 72 20 3d  ..    */.    r =
2590: 20 2d 28 72 20 5e 20 28 28 28 73 71 6c 69 74 65   -(r ^ (((sqlite
25a0: 33 5f 69 6e 74 36 34 29 31 29 3c 3c 36 33 29 29  3_int64)1)<<63))
25b0: 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f  ;.  }.  sqlite3_
25c0: 72 65 73 75 6c 74 5f 69 6e 74 36 34 28 63 6f 6e  result_int64(con
25d0: 74 65 78 74 2c 20 72 29 3b 0a 7d 0a 0a 2f 2a 0a  text, r);.}../*.
25e0: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
25f0: 6e 20 6f 66 20 72 61 6e 64 6f 6d 62 6c 6f 62 28  n of randomblob(
2600: 4e 29 2e 20 20 52 65 74 75 72 6e 20 61 20 72 61  N).  Return a ra
2610: 6e 64 6f 6d 20 62 6c 6f 62 0a 2a 2a 20 74 68 61  ndom blob.** tha
2620: 74 20 69 73 20 4e 20 62 79 74 65 73 20 6c 6f 6e  t is N bytes lon
2630: 67 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  g..*/.static voi
2640: 64 20 72 61 6e 64 6f 6d 42 6c 6f 62 28 0a 20 20  d randomBlob(.  
2650: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
2660: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
2670: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
2680: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
2690: 20 20 69 6e 74 20 6e 3b 0a 20 20 75 6e 73 69 67    int n;.  unsig
26a0: 6e 65 64 20 63 68 61 72 20 2a 70 3b 0a 20 20 61  ned char *p;.  a
26b0: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
26c0: 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d  ;.  UNUSED_PARAM
26d0: 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 6e 20  ETER(argc);.  n 
26e0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
26f0: 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  int(argv[0]);.  
2700: 69 66 28 20 6e 3c 31 20 29 7b 0a 20 20 20 20 6e  if( n<1 ){.    n
2710: 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 70 20 3d 20   = 1;.  }.  p = 
2720: 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f  contextMalloc(co
2730: 6e 74 65 78 74 2c 20 6e 29 3b 0a 20 20 69 66 28  ntext, n);.  if(
2740: 20 70 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65   p ){.    sqlite
2750: 33 5f 72 61 6e 64 6f 6d 6e 65 73 73 28 6e 2c 20  3_randomness(n, 
2760: 70 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f  p);.    sqlite3_
2770: 72 65 73 75 6c 74 5f 62 6c 6f 62 28 63 6f 6e 74  result_blob(cont
2780: 65 78 74 2c 20 28 63 68 61 72 2a 29 70 2c 20 6e  ext, (char*)p, n
2790: 2c 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b  , sqlite3_free);
27a0: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d  .  }.}../*.** Im
27b0: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
27c0: 74 68 65 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f  the last_insert_
27d0: 72 6f 77 69 64 28 29 20 53 51 4c 20 66 75 6e 63  rowid() SQL func
27e0: 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 74 75 72  tion.  The retur
27f0: 6e 0a 2a 2a 20 76 61 6c 75 65 20 69 73 20 74 68  n.** value is th
2800: 65 20 73 61 6d 65 20 61 73 20 74 68 65 20 73 71  e same as the sq
2810: 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e 73 65 72  lite3_last_inser
2820: 74 5f 72 6f 77 69 64 28 29 20 41 50 49 20 66 75  t_rowid() API fu
2830: 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69  nction..*/.stati
2840: 63 20 76 6f 69 64 20 6c 61 73 74 5f 69 6e 73 65  c void last_inse
2850: 72 74 5f 72 6f 77 69 64 28 0a 20 20 73 71 6c 69  rt_rowid(.  sqli
2860: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
2870: 74 65 78 74 2c 20 0a 20 20 69 6e 74 20 4e 6f 74  text, .  int Not
2880: 55 73 65 64 2c 20 0a 20 20 73 71 6c 69 74 65 33  Used, .  sqlite3
2890: 5f 76 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64  _value **NotUsed
28a0: 32 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a  2.){.  sqlite3 *
28b0: 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e  db = sqlite3_con
28c0: 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63  text_db_handle(c
28d0: 6f 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55 53 45  ontext);.  UNUSE
28e0: 44 5f 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74  D_PARAMETER2(Not
28f0: 55 73 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b  Used, NotUsed2);
2900: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
2910: 74 5f 69 6e 74 36 34 28 63 6f 6e 74 65 78 74 2c  t_int64(context,
2920: 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e   sqlite3_last_in
2930: 73 65 72 74 5f 72 6f 77 69 64 28 64 62 29 29 3b  sert_rowid(db));
2940: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
2950: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
2960: 63 68 61 6e 67 65 73 28 29 20 53 51 4c 20 66 75  changes() SQL fu
2970: 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 74  nction.  The ret
2980: 75 72 6e 20 76 61 6c 75 65 20 69 73 20 74 68 65  urn value is the
2990: 0a 2a 2a 20 73 61 6d 65 20 61 73 20 74 68 65 20  .** same as the 
29a0: 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 73 28  sqlite3_changes(
29b0: 29 20 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a  ) API function..
29c0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63  */.static void c
29d0: 68 61 6e 67 65 73 28 0a 20 20 73 71 6c 69 74 65  hanges(.  sqlite
29e0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
29f0: 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55 73 65  xt,.  int NotUse
2a00: 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  d,.  sqlite3_val
2a10: 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a 29 7b  ue **NotUsed2.){
2a20: 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d  .  sqlite3 *db =
2a30: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
2a40: 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65  _db_handle(conte
2a50: 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41  xt);.  UNUSED_PA
2a60: 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73 65 64  RAMETER2(NotUsed
2a70: 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20 20 73  , NotUsed2);.  s
2a80: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
2a90: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
2aa0: 65 33 5f 63 68 61 6e 67 65 73 28 64 62 29 29 3b  e3_changes(db));
2ab0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
2ac0: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
2ad0: 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 28 29 20  total_changes() 
2ae0: 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54  SQL function.  T
2af0: 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20  he return value 
2b00: 69 73 0a 2a 2a 20 74 68 65 20 73 61 6d 65 20 61  is.** the same a
2b10: 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f 74 6f  s the sqlite3_to
2b20: 74 61 6c 5f 63 68 61 6e 67 65 73 28 29 20 41 50  tal_changes() AP
2b30: 49 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73  I function..*/.s
2b40: 74 61 74 69 63 20 76 6f 69 64 20 74 6f 74 61 6c  tatic void total
2b50: 5f 63 68 61 6e 67 65 73 28 0a 20 20 73 71 6c 69  _changes(.  sqli
2b60: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
2b70: 74 65 78 74 2c 0a 20 20 69 6e 74 20 4e 6f 74 55  text,.  int NotU
2b80: 73 65 64 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  sed,.  sqlite3_v
2b90: 61 6c 75 65 20 2a 2a 4e 6f 74 55 73 65 64 32 0a  alue **NotUsed2.
2ba0: 29 7b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62  ){.  sqlite3 *db
2bb0: 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65   = sqlite3_conte
2bc0: 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e  xt_db_handle(con
2bd0: 74 65 78 74 29 3b 0a 20 20 55 4e 55 53 45 44 5f  text);.  UNUSED_
2be0: 50 41 52 41 4d 45 54 45 52 32 28 4e 6f 74 55 73  PARAMETER2(NotUs
2bf0: 65 64 2c 20 4e 6f 74 55 73 65 64 32 29 3b 0a 20  ed, NotUsed2);. 
2c00: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
2c10: 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c  int(context, sql
2c20: 69 74 65 33 5f 74 6f 74 61 6c 5f 63 68 61 6e 67  ite3_total_chang
2c30: 65 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  es(db));.}../*.*
2c40: 2a 20 41 20 73 74 72 75 63 74 75 72 65 20 64 65  * A structure de
2c50: 66 69 6e 69 6e 67 20 68 6f 77 20 74 6f 20 64 6f  fining how to do
2c60: 20 47 4c 4f 42 2d 73 74 79 6c 65 20 63 6f 6d 70   GLOB-style comp
2c70: 61 72 69 73 6f 6e 73 2e 0a 2a 2f 0a 73 74 72 75  arisons..*/.stru
2c80: 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 7b  ct compareInfo {
2c90: 0a 20 20 75 38 20 6d 61 74 63 68 41 6c 6c 3b 0a  .  u8 matchAll;.
2ca0: 20 20 75 38 20 6d 61 74 63 68 4f 6e 65 3b 0a 20    u8 matchOne;. 
2cb0: 20 75 38 20 6d 61 74 63 68 53 65 74 3b 0a 20 20   u8 matchSet;.  
2cc0: 75 38 20 6e 6f 43 61 73 65 3b 0a 7d 3b 0a 0a 2f  u8 noCase;.};../
2cd0: 2a 0a 2a 2a 20 46 6f 72 20 4c 49 4b 45 20 61 6e  *.** For LIKE an
2ce0: 64 20 47 4c 4f 42 20 6d 61 74 63 68 69 6e 67 20  d GLOB matching 
2cf0: 6f 6e 20 45 42 43 44 49 43 20 6d 61 63 68 69 6e  on EBCDIC machin
2d00: 65 73 2c 20 61 73 73 75 6d 65 20 74 68 61 74 20  es, assume that 
2d10: 65 76 65 72 79 0a 2a 2a 20 63 68 61 72 61 63 74  every.** charact
2d20: 65 72 20 69 73 20 65 78 61 63 74 6c 79 20 6f 6e  er is exactly on
2d30: 65 20 62 79 74 65 20 69 6e 20 73 69 7a 65 2e 20  e byte in size. 
2d40: 20 41 6c 73 6f 2c 20 61 6c 6c 20 63 68 61 72 61   Also, all chara
2d50: 63 74 65 72 73 20 61 72 65 0a 2a 2a 20 61 62 6c  cters are.** abl
2d60: 65 20 74 6f 20 70 61 72 74 69 63 69 70 61 74 65  e to participate
2d70: 20 69 6e 20 75 70 70 65 72 2d 63 61 73 65 2d 74   in upper-case-t
2d80: 6f 2d 6c 6f 77 65 72 2d 63 61 73 65 20 6d 61 70  o-lower-case map
2d90: 70 69 6e 67 73 20 69 6e 20 45 42 43 44 49 43 0a  pings in EBCDIC.
2da0: 2a 2a 20 77 68 65 72 65 61 73 20 6f 6e 6c 79 20  ** whereas only 
2db0: 63 68 61 72 61 63 74 65 72 73 20 6c 65 73 73 20  characters less 
2dc0: 74 68 61 6e 20 30 78 38 30 20 64 6f 20 69 6e 20  than 0x80 do in 
2dd0: 41 53 43 49 49 2e 0a 2a 2f 0a 23 69 66 20 64 65  ASCII..*/.#if de
2de0: 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 45 42 43  fined(SQLITE_EBC
2df0: 44 49 43 29 0a 23 20 64 65 66 69 6e 65 20 73 71  DIC).# define sq
2e00: 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 41 2c  lite3Utf8Read(A,
2e10: 43 29 20 20 20 20 28 2a 28 41 2b 2b 29 29 0a 23  C)    (*(A++)).#
2e20: 20 64 65 66 69 6e 65 20 47 6c 6f 67 55 70 70 65   define GlogUppe
2e30: 72 54 6f 4c 6f 77 65 72 28 41 29 20 20 20 20 20  rToLower(A)     
2e40: 41 20 3d 20 73 71 6c 69 74 65 33 55 70 70 65 72  A = sqlite3Upper
2e50: 54 6f 4c 6f 77 65 72 5b 41 5d 0a 23 65 6c 73 65  ToLower[A].#else
2e60: 0a 23 20 64 65 66 69 6e 65 20 47 6c 6f 67 55 70  .# define GlogUp
2e70: 70 65 72 54 6f 4c 6f 77 65 72 28 41 29 20 20 20  perToLower(A)   
2e80: 20 20 69 66 28 20 41 3c 30 78 38 30 20 29 7b 20    if( A<0x80 ){ 
2e90: 41 20 3d 20 73 71 6c 69 74 65 33 55 70 70 65 72  A = sqlite3Upper
2ea0: 54 6f 4c 6f 77 65 72 5b 41 5d 3b 20 7d 0a 23 65  ToLower[A]; }.#e
2eb0: 6e 64 69 66 0a 0a 73 74 61 74 69 63 20 63 6f 6e  ndif..static con
2ec0: 73 74 20 73 74 72 75 63 74 20 63 6f 6d 70 61 72  st struct compar
2ed0: 65 49 6e 66 6f 20 67 6c 6f 62 49 6e 66 6f 20 3d  eInfo globInfo =
2ee0: 20 7b 20 27 2a 27 2c 20 27 3f 27 2c 20 27 5b 27   { '*', '?', '['
2ef0: 2c 20 30 20 7d 3b 0a 2f 2a 20 54 68 65 20 63 6f  , 0 };./* The co
2f00: 72 72 65 63 74 20 53 51 4c 2d 39 32 20 62 65 68  rrect SQL-92 beh
2f10: 61 76 69 6f 72 20 69 73 20 66 6f 72 20 74 68 65  avior is for the
2f20: 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 20 74   LIKE operator t
2f30: 6f 20 69 67 6e 6f 72 65 0a 2a 2a 20 63 61 73 65  o ignore.** case
2f40: 2e 20 20 54 68 75 73 20 20 27 61 27 20 4c 49 4b  .  Thus  'a' LIK
2f50: 45 20 27 41 27 20 77 6f 75 6c 64 20 62 65 20 74  E 'A' would be t
2f60: 72 75 65 2e 20 2a 2f 0a 73 74 61 74 69 63 20 63  rue. */.static c
2f70: 6f 6e 73 74 20 73 74 72 75 63 74 20 63 6f 6d 70  onst struct comp
2f80: 61 72 65 49 6e 66 6f 20 6c 69 6b 65 49 6e 66 6f  areInfo likeInfo
2f90: 4e 6f 72 6d 20 3d 20 7b 20 27 25 27 2c 20 27 5f  Norm = { '%', '_
2fa0: 27 2c 20 20 20 30 2c 20 31 20 7d 3b 0a 2f 2a 20  ',   0, 1 };./* 
2fb0: 49 66 20 53 51 4c 49 54 45 5f 43 41 53 45 5f 53  If SQLITE_CASE_S
2fc0: 45 4e 53 49 54 49 56 45 5f 4c 49 4b 45 20 69 73  ENSITIVE_LIKE is
2fd0: 20 64 65 66 69 6e 65 64 2c 20 74 68 65 6e 20 74   defined, then t
2fe0: 68 65 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72  he LIKE operator
2ff0: 0a 2a 2a 20 69 73 20 63 61 73 65 20 73 65 6e 73  .** is case sens
3000: 69 74 69 76 65 20 63 61 75 73 69 6e 67 20 27 61  itive causing 'a
3010: 27 20 4c 49 4b 45 20 27 41 27 20 74 6f 20 62 65  ' LIKE 'A' to be
3020: 20 66 61 6c 73 65 20 2a 2f 0a 73 74 61 74 69 63   false */.static
3030: 20 63 6f 6e 73 74 20 73 74 72 75 63 74 20 63 6f   const struct co
3040: 6d 70 61 72 65 49 6e 66 6f 20 6c 69 6b 65 49 6e  mpareInfo likeIn
3050: 66 6f 41 6c 74 20 3d 20 7b 20 27 25 27 2c 20 27  foAlt = { '%', '
3060: 5f 27 2c 20 20 20 30 2c 20 30 20 7d 3b 0a 0a 2f  _',   0, 0 };../
3070: 2a 0a 2a 2a 20 43 6f 6d 70 61 72 65 20 74 77 6f  *.** Compare two
3080: 20 55 54 46 2d 38 20 73 74 72 69 6e 67 73 20 66   UTF-8 strings f
3090: 6f 72 20 65 71 75 61 6c 69 74 79 20 77 68 65 72  or equality wher
30a0: 65 20 74 68 65 20 66 69 72 73 74 20 73 74 72 69  e the first stri
30b0: 6e 67 20 63 61 6e 0a 2a 2a 20 70 6f 74 65 6e 74  ng can.** potent
30c0: 69 61 6c 6c 79 20 62 65 20 61 20 22 67 6c 6f 62  ially be a "glob
30d0: 22 20 65 78 70 72 65 73 73 69 6f 6e 2e 20 20 52  " expression.  R
30e0: 65 74 75 72 6e 20 74 72 75 65 20 28 31 29 20 69  eturn true (1) i
30f0: 66 20 74 68 65 79 0a 2a 2a 20 61 72 65 20 74 68  f they.** are th
3100: 65 20 73 61 6d 65 20 61 6e 64 20 66 61 6c 73 65  e same and false
3110: 20 28 30 29 20 69 66 20 74 68 65 79 20 61 72 65   (0) if they are
3120: 20 64 69 66 66 65 72 65 6e 74 2e 0a 2a 2a 0a 2a   different..**.*
3130: 2a 20 47 6c 6f 62 62 69 6e 67 20 72 75 6c 65 73  * Globbing rules
3140: 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 27 2a 27  :.**.**      '*'
3150: 20 20 20 20 20 20 20 4d 61 74 63 68 65 73 20 61         Matches a
3160: 6e 79 20 73 65 71 75 65 6e 63 65 20 6f 66 20 7a  ny sequence of z
3170: 65 72 6f 20 6f 72 20 6d 6f 72 65 20 63 68 61 72  ero or more char
3180: 61 63 74 65 72 73 2e 0a 2a 2a 0a 2a 2a 20 20 20  acters..**.**   
3190: 20 20 20 27 3f 27 20 20 20 20 20 20 20 4d 61 74     '?'       Mat
31a0: 63 68 65 73 20 65 78 61 63 74 6c 79 20 6f 6e 65  ches exactly one
31b0: 20 63 68 61 72 61 63 74 65 72 2e 0a 2a 2a 0a 2a   character..**.*
31c0: 2a 20 20 20 20 20 5b 2e 2e 2e 5d 20 20 20 20 20  *     [...]     
31d0: 20 4d 61 74 63 68 65 73 20 6f 6e 65 20 63 68 61   Matches one cha
31e0: 72 61 63 74 65 72 20 66 72 6f 6d 20 74 68 65 20  racter from the 
31f0: 65 6e 63 6c 6f 73 65 64 20 6c 69 73 74 20 6f 66  enclosed list of
3200: 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20  .**             
3210: 20 20 20 63 68 61 72 61 63 74 65 72 73 2e 0a 2a     characters..*
3220: 2a 0a 2a 2a 20 20 20 20 20 5b 5e 2e 2e 2e 5d 20  *.**     [^...] 
3230: 20 20 20 20 4d 61 74 63 68 65 73 20 6f 6e 65 20      Matches one 
3240: 63 68 61 72 61 63 74 65 72 20 6e 6f 74 20 69 6e  character not in
3250: 20 74 68 65 20 65 6e 63 6c 6f 73 65 64 20 6c 69   the enclosed li
3260: 73 74 2e 0a 2a 2a 0a 2a 2a 20 57 69 74 68 20 74  st..**.** With t
3270: 68 65 20 5b 2e 2e 2e 5d 20 61 6e 64 20 5b 5e 2e  he [...] and [^.
3280: 2e 2e 5d 20 6d 61 74 63 68 69 6e 67 2c 20 61 20  ..] matching, a 
3290: 27 5d 27 20 63 68 61 72 61 63 74 65 72 20 63 61  ']' character ca
32a0: 6e 20 62 65 20 69 6e 63 6c 75 64 65 64 0a 2a 2a  n be included.**
32b0: 20 69 6e 20 74 68 65 20 6c 69 73 74 20 62 79 20   in the list by 
32c0: 6d 61 6b 69 6e 67 20 69 74 20 74 68 65 20 66 69  making it the fi
32d0: 72 73 74 20 63 68 61 72 61 63 74 65 72 20 61 66  rst character af
32e0: 74 65 72 20 27 5b 27 20 6f 72 20 27 5e 27 2e 20  ter '[' or '^'. 
32f0: 20 41 0a 2a 2a 20 72 61 6e 67 65 20 6f 66 20 63   A.** range of c
3300: 68 61 72 61 63 74 65 72 73 20 63 61 6e 20 62 65  haracters can be
3310: 20 73 70 65 63 69 66 69 65 64 20 75 73 69 6e 67   specified using
3320: 20 27 2d 27 2e 20 20 45 78 61 6d 70 6c 65 3a 0a   '-'.  Example:.
3330: 2a 2a 20 22 5b 61 2d 7a 5d 22 20 6d 61 74 63 68  ** "[a-z]" match
3340: 65 73 20 61 6e 79 20 73 69 6e 67 6c 65 20 6c 6f  es any single lo
3350: 77 65 72 2d 63 61 73 65 20 6c 65 74 74 65 72 2e  wer-case letter.
3360: 20 20 54 6f 20 6d 61 74 63 68 20 61 20 27 2d 27    To match a '-'
3370: 2c 20 6d 61 6b 65 0a 2a 2a 20 69 74 20 74 68 65  , make.** it the
3380: 20 6c 61 73 74 20 63 68 61 72 61 63 74 65 72 20   last character 
3390: 69 6e 20 74 68 65 20 6c 69 73 74 2e 0a 2a 2a 0a  in the list..**.
33a0: 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20  ** This routine 
33b0: 69 73 20 75 73 75 61 6c 6c 79 20 71 75 69 63 6b  is usually quick
33c0: 2c 20 62 75 74 20 63 61 6e 20 62 65 20 4e 2a 2a  , but can be N**
33d0: 32 20 69 6e 20 74 68 65 20 77 6f 72 73 74 20 63  2 in the worst c
33e0: 61 73 65 2e 0a 2a 2a 0a 2a 2a 20 48 69 6e 74 73  ase..**.** Hints
33f0: 3a 20 74 6f 20 6d 61 74 63 68 20 27 2a 27 20 6f  : to match '*' o
3400: 72 20 27 3f 27 2c 20 70 75 74 20 74 68 65 6d 20  r '?', put them 
3410: 69 6e 20 22 5b 5d 22 2e 20 20 4c 69 6b 65 20 74  in "[]".  Like t
3420: 68 69 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20  his:.**.**      
3430: 20 20 20 61 62 63 5b 2a 5d 78 79 7a 20 20 20 20     abc[*]xyz    
3440: 20 20 20 20 4d 61 74 63 68 65 73 20 22 61 62 63      Matches "abc
3450: 2a 78 79 7a 22 20 6f 6e 6c 79 0a 2a 2f 0a 73 74  *xyz" only.*/.st
3460: 61 74 69 63 20 69 6e 74 20 70 61 74 74 65 72 6e  atic int pattern
3470: 43 6f 6d 70 61 72 65 28 0a 20 20 63 6f 6e 73 74  Compare(.  const
3480: 20 75 38 20 2a 7a 50 61 74 74 65 72 6e 2c 20 20   u8 *zPattern,  
3490: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54              /* T
34a0: 68 65 20 67 6c 6f 62 20 70 61 74 74 65 72 6e 20  he glob pattern 
34b0: 2a 2f 0a 20 20 63 6f 6e 73 74 20 75 38 20 2a 7a  */.  const u8 *z
34c0: 53 74 72 69 6e 67 2c 20 20 20 20 20 20 20 20 20  String,         
34d0: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 73 74 72        /* The str
34e0: 69 6e 67 20 74 6f 20 63 6f 6d 70 61 72 65 20 61  ing to compare a
34f0: 67 61 69 6e 73 74 20 74 68 65 20 67 6c 6f 62 20  gainst the glob 
3500: 2a 2f 0a 20 20 63 6f 6e 73 74 20 73 74 72 75 63  */.  const struc
3510: 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f 20 2a 70  t compareInfo *p
3520: 49 6e 66 6f 2c 20 2f 2a 20 49 6e 66 6f 72 6d 61  Info, /* Informa
3530: 74 69 6f 6e 20 61 62 6f 75 74 20 68 6f 77 20 74  tion about how t
3540: 6f 20 64 6f 20 74 68 65 20 63 6f 6d 70 61 72 65  o do the compare
3550: 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 69 6e 74 20   */.  const int 
3560: 65 73 63 20 20 20 20 20 20 20 20 20 20 20 20 20  esc             
3570: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 65 73         /* The es
3580: 63 61 70 65 20 63 68 61 72 61 63 74 65 72 20 2a  cape character *
3590: 2f 0a 29 7b 0a 20 20 69 6e 74 20 63 2c 20 63 32  /.){.  int c, c2
35a0: 3b 0a 20 20 69 6e 74 20 69 6e 76 65 72 74 3b 0a  ;.  int invert;.
35b0: 20 20 69 6e 74 20 73 65 65 6e 3b 0a 20 20 75 38    int seen;.  u8
35c0: 20 6d 61 74 63 68 4f 6e 65 20 3d 20 70 49 6e 66   matchOne = pInf
35d0: 6f 2d 3e 6d 61 74 63 68 4f 6e 65 3b 0a 20 20 75  o->matchOne;.  u
35e0: 38 20 6d 61 74 63 68 41 6c 6c 20 3d 20 70 49 6e  8 matchAll = pIn
35f0: 66 6f 2d 3e 6d 61 74 63 68 41 6c 6c 3b 0a 20 20  fo->matchAll;.  
3600: 75 38 20 6d 61 74 63 68 53 65 74 20 3d 20 70 49  u8 matchSet = pI
3610: 6e 66 6f 2d 3e 6d 61 74 63 68 53 65 74 3b 0a 20  nfo->matchSet;. 
3620: 20 75 38 20 6e 6f 43 61 73 65 20 3d 20 70 49 6e   u8 noCase = pIn
3630: 66 6f 2d 3e 6e 6f 43 61 73 65 3b 20 0a 20 20 69  fo->noCase; .  i
3640: 6e 74 20 70 72 65 76 45 73 63 61 70 65 20 3d 20  nt prevEscape = 
3650: 30 3b 20 20 20 20 20 2f 2a 20 54 72 75 65 20 69  0;     /* True i
3660: 66 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 63  f the previous c
3670: 68 61 72 61 63 74 65 72 20 77 61 73 20 27 65 73  haracter was 'es
3680: 63 61 70 65 27 20 2a 2f 0a 0a 20 20 77 68 69 6c  cape' */..  whil
3690: 65 28 20 28 63 20 3d 20 73 71 6c 69 74 65 33 55  e( (c = sqlite3U
36a0: 74 66 38 52 65 61 64 28 7a 50 61 74 74 65 72 6e  tf8Read(zPattern
36b0: 2c 26 7a 50 61 74 74 65 72 6e 29 29 21 3d 30 20  ,&zPattern))!=0 
36c0: 29 7b 0a 20 20 20 20 69 66 28 20 21 70 72 65 76  ){.    if( !prev
36d0: 45 73 63 61 70 65 20 26 26 20 63 3d 3d 6d 61 74  Escape && c==mat
36e0: 63 68 41 6c 6c 20 29 7b 0a 20 20 20 20 20 20 77  chAll ){.      w
36f0: 68 69 6c 65 28 20 28 63 3d 73 71 6c 69 74 65 33  hile( (c=sqlite3
3700: 55 74 66 38 52 65 61 64 28 7a 50 61 74 74 65 72  Utf8Read(zPatter
3710: 6e 2c 26 7a 50 61 74 74 65 72 6e 29 29 20 3d 3d  n,&zPattern)) ==
3720: 20 6d 61 74 63 68 41 6c 6c 0a 20 20 20 20 20 20   matchAll.      
3730: 20 20 20 20 20 20 20 20 20 7c 7c 20 63 20 3d 3d           || c ==
3740: 20 6d 61 74 63 68 4f 6e 65 20 29 7b 0a 20 20 20   matchOne ){.   
3750: 20 20 20 20 20 69 66 28 20 63 3d 3d 6d 61 74 63       if( c==matc
3760: 68 4f 6e 65 20 26 26 20 73 71 6c 69 74 65 33 55  hOne && sqlite3U
3770: 74 66 38 52 65 61 64 28 7a 53 74 72 69 6e 67 2c  tf8Read(zString,
3780: 20 26 7a 53 74 72 69 6e 67 29 3d 3d 30 20 29 7b   &zString)==0 ){
3790: 0a 20 20 20 20 20 20 20 20 20 20 72 65 74 75 72  .          retur
37a0: 6e 20 30 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20  n 0;.        }. 
37b0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28       }.      if(
37c0: 20 63 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20   c==0 ){.       
37d0: 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 20   return 1;.     
37e0: 20 7d 65 6c 73 65 20 69 66 28 20 63 3d 3d 65 73   }else if( c==es
37f0: 63 20 29 7b 0a 20 20 20 20 20 20 20 20 63 20 3d  c ){.        c =
3800: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
3810: 28 7a 50 61 74 74 65 72 6e 2c 20 26 7a 50 61 74  (zPattern, &zPat
3820: 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 69  tern);.        i
3830: 66 28 20 63 3d 3d 30 20 29 7b 0a 20 20 20 20 20  f( c==0 ){.     
3840: 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20       return 0;. 
3850: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d         }.      }
3860: 65 6c 73 65 20 69 66 28 20 63 3d 3d 6d 61 74 63  else if( c==matc
3870: 68 53 65 74 20 29 7b 0a 20 20 20 20 20 20 20 20  hSet ){.        
3880: 61 73 73 65 72 74 28 20 65 73 63 3d 3d 30 20 29  assert( esc==0 )
3890: 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 69  ;         /* Thi
38a0: 73 20 69 73 20 47 4c 4f 42 2c 20 6e 6f 74 20 4c  s is GLOB, not L
38b0: 49 4b 45 20 2a 2f 0a 20 20 20 20 20 20 20 20 61  IKE */.        a
38c0: 73 73 65 72 74 28 20 6d 61 74 63 68 53 65 74 3c  ssert( matchSet<
38d0: 30 78 38 30 20 29 3b 20 20 2f 2a 20 27 5b 27 20  0x80 );  /* '[' 
38e0: 69 73 20 61 20 73 69 6e 67 6c 65 2d 62 79 74 65  is a single-byte
38f0: 20 63 68 61 72 61 63 74 65 72 20 2a 2f 0a 20 20   character */.  
3900: 20 20 20 20 20 20 77 68 69 6c 65 28 20 2a 7a 53        while( *zS
3910: 74 72 69 6e 67 20 26 26 20 70 61 74 74 65 72 6e  tring && pattern
3920: 43 6f 6d 70 61 72 65 28 26 7a 50 61 74 74 65 72  Compare(&zPatter
3930: 6e 5b 2d 31 5d 2c 7a 53 74 72 69 6e 67 2c 70 49  n[-1],zString,pI
3940: 6e 66 6f 2c 65 73 63 29 3d 3d 30 20 29 7b 0a 20  nfo,esc)==0 ){. 
3950: 20 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f           SQLITE_
3960: 53 4b 49 50 5f 55 54 46 38 28 7a 53 74 72 69 6e  SKIP_UTF8(zStrin
3970: 67 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20  g);.        }.  
3980: 20 20 20 20 20 20 72 65 74 75 72 6e 20 2a 7a 53        return *zS
3990: 74 72 69 6e 67 21 3d 30 3b 0a 20 20 20 20 20 20  tring!=0;.      
39a0: 7d 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 28  }.      while( (
39b0: 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38  c2 = sqlite3Utf8
39c0: 52 65 61 64 28 7a 53 74 72 69 6e 67 2c 26 7a 53  Read(zString,&zS
39d0: 74 72 69 6e 67 29 29 21 3d 30 20 29 7b 0a 20 20  tring))!=0 ){.  
39e0: 20 20 20 20 20 20 69 66 28 20 6e 6f 43 61 73 65        if( noCase
39f0: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 47 6c   ){.          Gl
3a00: 6f 67 55 70 70 65 72 54 6f 4c 6f 77 65 72 28 63  ogUpperToLower(c
3a10: 32 29 3b 0a 20 20 20 20 20 20 20 20 20 20 47 6c  2);.          Gl
3a20: 6f 67 55 70 70 65 72 54 6f 4c 6f 77 65 72 28 63  ogUpperToLower(c
3a30: 29 3b 0a 20 20 20 20 20 20 20 20 20 20 77 68 69  );.          whi
3a40: 6c 65 28 20 63 32 20 21 3d 20 30 20 26 26 20 63  le( c2 != 0 && c
3a50: 32 20 21 3d 20 63 20 29 7b 0a 20 20 20 20 20 20  2 != c ){.      
3a60: 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74        c2 = sqlit
3a70: 65 33 55 74 66 38 52 65 61 64 28 7a 53 74 72 69  e3Utf8Read(zStri
3a80: 6e 67 2c 20 26 7a 53 74 72 69 6e 67 29 3b 0a 20  ng, &zString);. 
3a90: 20 20 20 20 20 20 20 20 20 20 20 47 6c 6f 67 55             GlogU
3aa0: 70 70 65 72 54 6f 4c 6f 77 65 72 28 63 32 29 3b  pperToLower(c2);
3ab0: 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20  .          }.   
3ac0: 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20       }else{.    
3ad0: 20 20 20 20 20 20 77 68 69 6c 65 28 20 63 32 20        while( c2 
3ae0: 21 3d 20 30 20 26 26 20 63 32 20 21 3d 20 63 20  != 0 && c2 != c 
3af0: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 63  ){.            c
3b00: 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38 52  2 = sqlite3Utf8R
3b10: 65 61 64 28 7a 53 74 72 69 6e 67 2c 20 26 7a 53  ead(zString, &zS
3b20: 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20 20 20  tring);.        
3b30: 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20 20    }.        }.  
3b40: 20 20 20 20 20 20 69 66 28 20 63 32 3d 3d 30 20        if( c2==0 
3b50: 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20  ) return 0;.    
3b60: 20 20 20 20 69 66 28 20 70 61 74 74 65 72 6e 43      if( patternC
3b70: 6f 6d 70 61 72 65 28 7a 50 61 74 74 65 72 6e 2c  ompare(zPattern,
3b80: 7a 53 74 72 69 6e 67 2c 70 49 6e 66 6f 2c 65 73  zString,pInfo,es
3b90: 63 29 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20  c) ) return 1;. 
3ba0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 72 65 74       }.      ret
3bb0: 75 72 6e 20 30 3b 0a 20 20 20 20 7d 65 6c 73 65  urn 0;.    }else
3bc0: 20 69 66 28 20 21 70 72 65 76 45 73 63 61 70 65   if( !prevEscape
3bd0: 20 26 26 20 63 3d 3d 6d 61 74 63 68 4f 6e 65 20   && c==matchOne 
3be0: 29 7b 0a 20 20 20 20 20 20 69 66 28 20 73 71 6c  ){.      if( sql
3bf0: 69 74 65 33 55 74 66 38 52 65 61 64 28 7a 53 74  ite3Utf8Read(zSt
3c00: 72 69 6e 67 2c 20 26 7a 53 74 72 69 6e 67 29 3d  ring, &zString)=
3c10: 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 72 65  =0 ){.        re
3c20: 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d 0a  turn 0;.      }.
3c30: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63 3d      }else if( c=
3c40: 3d 6d 61 74 63 68 53 65 74 20 29 7b 0a 20 20 20  =matchSet ){.   
3c50: 20 20 20 69 6e 74 20 70 72 69 6f 72 5f 63 20 3d     int prior_c =
3c60: 20 30 3b 0a 20 20 20 20 20 20 61 73 73 65 72 74   0;.      assert
3c70: 28 20 65 73 63 3d 3d 30 20 29 3b 20 20 20 20 2f  ( esc==0 );    /
3c80: 2a 20 54 68 69 73 20 6f 6e 6c 79 20 6f 63 63 75  * This only occu
3c90: 72 73 20 66 6f 72 20 47 4c 4f 42 2c 20 6e 6f 74  rs for GLOB, not
3ca0: 20 4c 49 4b 45 20 2a 2f 0a 20 20 20 20 20 20 73   LIKE */.      s
3cb0: 65 65 6e 20 3d 20 30 3b 0a 20 20 20 20 20 20 69  een = 0;.      i
3cc0: 6e 76 65 72 74 20 3d 20 30 3b 0a 20 20 20 20 20  nvert = 0;.     
3cd0: 20 63 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38   c = sqlite3Utf8
3ce0: 52 65 61 64 28 7a 53 74 72 69 6e 67 2c 20 26 7a  Read(zString, &z
3cf0: 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20 69  String);.      i
3d00: 66 28 20 63 3d 3d 30 20 29 20 72 65 74 75 72 6e  f( c==0 ) return
3d10: 20 30 3b 0a 20 20 20 20 20 20 63 32 20 3d 20 73   0;.      c2 = s
3d20: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 7a  qlite3Utf8Read(z
3d30: 50 61 74 74 65 72 6e 2c 20 26 7a 50 61 74 74 65  Pattern, &zPatte
3d40: 72 6e 29 3b 0a 20 20 20 20 20 20 69 66 28 20 63  rn);.      if( c
3d50: 32 3d 3d 27 5e 27 20 29 7b 0a 20 20 20 20 20 20  2=='^' ){.      
3d60: 20 20 69 6e 76 65 72 74 20 3d 20 31 3b 0a 20 20    invert = 1;.  
3d70: 20 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74        c2 = sqlit
3d80: 65 33 55 74 66 38 52 65 61 64 28 7a 50 61 74 74  e3Utf8Read(zPatt
3d90: 65 72 6e 2c 20 26 7a 50 61 74 74 65 72 6e 29 3b  ern, &zPattern);
3da0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69  .      }.      i
3db0: 66 28 20 63 32 3d 3d 27 5d 27 20 29 7b 0a 20 20  f( c2==']' ){.  
3dc0: 20 20 20 20 20 20 69 66 28 20 63 3d 3d 27 5d 27        if( c==']'
3dd0: 20 29 20 73 65 65 6e 20 3d 20 31 3b 0a 20 20 20   ) seen = 1;.   
3de0: 20 20 20 20 20 63 32 20 3d 20 73 71 6c 69 74 65       c2 = sqlite
3df0: 33 55 74 66 38 52 65 61 64 28 7a 50 61 74 74 65  3Utf8Read(zPatte
3e00: 72 6e 2c 20 26 7a 50 61 74 74 65 72 6e 29 3b 0a  rn, &zPattern);.
3e10: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 77 68        }.      wh
3e20: 69 6c 65 28 20 63 32 20 26 26 20 63 32 21 3d 27  ile( c2 && c2!='
3e30: 5d 27 20 29 7b 0a 20 20 20 20 20 20 20 20 69 66  ]' ){.        if
3e40: 28 20 63 32 3d 3d 27 2d 27 20 26 26 20 7a 50 61  ( c2=='-' && zPa
3e50: 74 74 65 72 6e 5b 30 5d 21 3d 27 5d 27 20 26 26  ttern[0]!=']' &&
3e60: 20 7a 50 61 74 74 65 72 6e 5b 30 5d 21 3d 30 20   zPattern[0]!=0 
3e70: 26 26 20 70 72 69 6f 72 5f 63 3e 30 20 29 7b 0a  && prior_c>0 ){.
3e80: 20 20 20 20 20 20 20 20 20 20 63 32 20 3d 20 73            c2 = s
3e90: 71 6c 69 74 65 33 55 74 66 38 52 65 61 64 28 7a  qlite3Utf8Read(z
3ea0: 50 61 74 74 65 72 6e 2c 20 26 7a 50 61 74 74 65  Pattern, &zPatte
3eb0: 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 20 20 69  rn);.          i
3ec0: 66 28 20 63 3e 3d 70 72 69 6f 72 5f 63 20 26 26  f( c>=prior_c &&
3ed0: 20 63 3c 3d 63 32 20 29 20 73 65 65 6e 20 3d 20   c<=c2 ) seen = 
3ee0: 31 3b 0a 20 20 20 20 20 20 20 20 20 20 70 72 69  1;.          pri
3ef0: 6f 72 5f 63 20 3d 20 30 3b 0a 20 20 20 20 20 20  or_c = 0;.      
3f00: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20    }else{.       
3f10: 20 20 20 69 66 28 20 63 3d 3d 63 32 20 29 7b 0a     if( c==c2 ){.
3f20: 20 20 20 20 20 20 20 20 20 20 20 20 73 65 65 6e              seen
3f30: 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 20 20   = 1;.          
3f40: 7d 0a 20 20 20 20 20 20 20 20 20 20 70 72 69 6f  }.          prio
3f50: 72 5f 63 20 3d 20 63 32 3b 0a 20 20 20 20 20 20  r_c = c2;.      
3f60: 20 20 7d 0a 20 20 20 20 20 20 20 20 63 32 20 3d    }.        c2 =
3f70: 20 73 71 6c 69 74 65 33 55 74 66 38 52 65 61 64   sqlite3Utf8Read
3f80: 28 7a 50 61 74 74 65 72 6e 2c 20 26 7a 50 61 74  (zPattern, &zPat
3f90: 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 7d 0a 20  tern);.      }. 
3fa0: 20 20 20 20 20 69 66 28 20 63 32 3d 3d 30 20 7c       if( c2==0 |
3fb0: 7c 20 28 73 65 65 6e 20 5e 20 69 6e 76 65 72 74  | (seen ^ invert
3fc0: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20  )==0 ){.        
3fd0: 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20  return 0;.      
3fe0: 7d 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20  }.    }else if( 
3ff0: 65 73 63 3d 3d 63 20 26 26 20 21 70 72 65 76 45  esc==c && !prevE
4000: 73 63 61 70 65 20 29 7b 0a 20 20 20 20 20 20 70  scape ){.      p
4010: 72 65 76 45 73 63 61 70 65 20 3d 20 31 3b 0a 20  revEscape = 1;. 
4020: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
4030: 63 32 20 3d 20 73 71 6c 69 74 65 33 55 74 66 38  c2 = sqlite3Utf8
4040: 52 65 61 64 28 7a 53 74 72 69 6e 67 2c 20 26 7a  Read(zString, &z
4050: 53 74 72 69 6e 67 29 3b 0a 20 20 20 20 20 20 69  String);.      i
4060: 66 28 20 6e 6f 43 61 73 65 20 29 7b 0a 20 20 20  f( noCase ){.   
4070: 20 20 20 20 20 47 6c 6f 67 55 70 70 65 72 54 6f       GlogUpperTo
4080: 4c 6f 77 65 72 28 63 29 3b 0a 20 20 20 20 20 20  Lower(c);.      
4090: 20 20 47 6c 6f 67 55 70 70 65 72 54 6f 4c 6f 77    GlogUpperToLow
40a0: 65 72 28 63 32 29 3b 0a 20 20 20 20 20 20 7d 0a  er(c2);.      }.
40b0: 20 20 20 20 20 20 69 66 28 20 63 21 3d 63 32 20        if( c!=c2 
40c0: 29 7b 0a 20 20 20 20 20 20 20 20 72 65 74 75 72  ){.        retur
40d0: 6e 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  n 0;.      }.   
40e0: 20 20 20 70 72 65 76 45 73 63 61 70 65 20 3d 20     prevEscape = 
40f0: 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72  0;.    }.  }.  r
4100: 65 74 75 72 6e 20 2a 7a 53 74 72 69 6e 67 3d 3d  eturn *zString==
4110: 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 75 6e  0;.}../*.** Coun
4120: 74 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20  t the number of 
4130: 74 69 6d 65 73 20 74 68 61 74 20 74 68 65 20 4c  times that the L
4140: 49 4b 45 20 6f 70 65 72 61 74 6f 72 20 28 6f 72  IKE operator (or
4150: 20 47 4c 4f 42 20 77 68 69 63 68 20 69 73 0a 2a   GLOB which is.*
4160: 2a 20 6a 75 73 74 20 61 20 76 61 72 69 61 74 69  * just a variati
4170: 6f 6e 20 6f 66 20 4c 49 4b 45 29 20 67 65 74 73  on of LIKE) gets
4180: 20 63 61 6c 6c 65 64 2e 20 20 54 68 69 73 20 69   called.  This i
4190: 73 20 75 73 65 64 20 66 6f 72 20 74 65 73 74 69  s used for testi
41a0: 6e 67 0a 2a 2a 20 6f 6e 6c 79 2e 0a 2a 2f 0a 23  ng.** only..*/.#
41b0: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53  ifdef SQLITE_TES
41c0: 54 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 6c 69  T.int sqlite3_li
41d0: 6b 65 5f 63 6f 75 6e 74 20 3d 20 30 3b 0a 23 65  ke_count = 0;.#e
41e0: 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70  ndif.../*.** Imp
41f0: 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74  lementation of t
4200: 68 65 20 6c 69 6b 65 28 29 20 53 51 4c 20 66 75  he like() SQL fu
4210: 6e 63 74 69 6f 6e 2e 20 20 54 68 69 73 20 66 75  nction.  This fu
4220: 6e 63 74 69 6f 6e 20 69 6d 70 6c 65 6d 65 6e 74  nction implement
4230: 73 0a 2a 2a 20 74 68 65 20 62 75 69 6c 64 2d 69  s.** the build-i
4240: 6e 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72 2e  n LIKE operator.
4250: 20 20 54 68 65 20 66 69 72 73 74 20 61 72 67 75    The first argu
4260: 6d 65 6e 74 20 74 6f 20 74 68 65 20 66 75 6e 63  ment to the func
4270: 74 69 6f 6e 20 69 73 20 74 68 65 0a 2a 2a 20 70  tion is the.** p
4280: 61 74 74 65 72 6e 20 61 6e 64 20 74 68 65 20 73  attern and the s
4290: 65 63 6f 6e 64 20 61 72 67 75 6d 65 6e 74 20 69  econd argument i
42a0: 73 20 74 68 65 20 73 74 72 69 6e 67 2e 20 20 53  s the string.  S
42b0: 6f 2c 20 74 68 65 20 53 51 4c 20 73 74 61 74 65  o, the SQL state
42c0: 6d 65 6e 74 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20  ments:.**.**    
42d0: 20 20 20 41 20 4c 49 4b 45 20 42 0a 2a 2a 0a 2a     A LIKE B.**.*
42e0: 2a 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65 64  * is implemented
42f0: 20 61 73 20 6c 69 6b 65 28 42 2c 41 29 2e 0a 2a   as like(B,A)..*
4300: 2a 0a 2a 2a 20 54 68 69 73 20 73 61 6d 65 20 66  *.** This same f
4310: 75 6e 63 74 69 6f 6e 20 28 77 69 74 68 20 61 20  unction (with a 
4320: 64 69 66 66 65 72 65 6e 74 20 63 6f 6d 70 61 72  different compar
4330: 65 49 6e 66 6f 20 73 74 72 75 63 74 75 72 65 29  eInfo structure)
4340: 20 63 6f 6d 70 75 74 65 73 0a 2a 2a 20 74 68 65   computes.** the
4350: 20 47 4c 4f 42 20 6f 70 65 72 61 74 6f 72 2e 0a   GLOB operator..
4360: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  */.static void l
4370: 69 6b 65 46 75 6e 63 28 0a 20 20 73 71 6c 69 74  ikeFunc(.  sqlit
4380: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
4390: 65 78 74 2c 20 0a 20 20 69 6e 74 20 61 72 67 63  ext, .  int argc
43a0: 2c 20 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  , .  sqlite3_val
43b0: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63  ue **argv.){.  c
43c0: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68  onst unsigned ch
43d0: 61 72 20 2a 7a 41 2c 20 2a 7a 42 3b 0a 20 20 69  ar *zA, *zB;.  i
43e0: 6e 74 20 65 73 63 61 70 65 20 3d 20 30 3b 0a 20  nt escape = 0;. 
43f0: 20 69 6e 74 20 6e 50 61 74 3b 0a 20 20 73 71 6c   int nPat;.  sql
4400: 69 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74  ite3 *db = sqlit
4410: 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61  e3_context_db_ha
4420: 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 0a  ndle(context);..
4430: 20 20 7a 42 20 3d 20 73 71 6c 69 74 65 33 5f 76    zB = sqlite3_v
4440: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30  alue_text(argv[0
4450: 5d 29 3b 0a 20 20 7a 41 20 3d 20 73 71 6c 69 74  ]);.  zA = sqlit
4460: 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72  e3_value_text(ar
4470: 67 76 5b 31 5d 29 3b 0a 0a 20 20 2f 2a 20 4c 69  gv[1]);..  /* Li
4480: 6d 69 74 20 74 68 65 20 6c 65 6e 67 74 68 20 6f  mit the length o
4490: 66 20 74 68 65 20 4c 49 4b 45 20 6f 72 20 47 4c  f the LIKE or GL
44a0: 4f 42 20 70 61 74 74 65 72 6e 20 74 6f 20 61 76  OB pattern to av
44b0: 6f 69 64 20 70 72 6f 62 6c 65 6d 73 0a 20 20 2a  oid problems.  *
44c0: 2a 20 6f 66 20 64 65 65 70 20 72 65 63 75 72 73  * of deep recurs
44d0: 69 6f 6e 20 61 6e 64 20 4e 2a 4e 20 62 65 68 61  ion and N*N beha
44e0: 76 69 6f 72 20 69 6e 20 70 61 74 74 65 72 6e 43  vior in patternC
44f0: 6f 6d 70 61 72 65 28 29 2e 0a 20 20 2a 2f 0a 20  ompare()..  */. 
4500: 20 6e 50 61 74 20 3d 20 73 71 6c 69 74 65 33 5f   nPat = sqlite3_
4510: 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72 67 76  value_bytes(argv
4520: 5b 30 5d 29 3b 0a 20 20 74 65 73 74 63 61 73 65  [0]);.  testcase
4530: 28 20 6e 50 61 74 3d 3d 64 62 2d 3e 61 4c 69 6d  ( nPat==db->aLim
4540: 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f  it[SQLITE_LIMIT_
4550: 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c 45 4e  LIKE_PATTERN_LEN
4560: 47 54 48 5d 20 29 3b 0a 20 20 74 65 73 74 63 61  GTH] );.  testca
4570: 73 65 28 20 6e 50 61 74 3d 3d 64 62 2d 3e 61 4c  se( nPat==db->aL
4580: 69 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49  imit[SQLITE_LIMI
4590: 54 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c  T_LIKE_PATTERN_L
45a0: 45 4e 47 54 48 5d 2b 31 20 29 3b 0a 20 20 69 66  ENGTH]+1 );.  if
45b0: 28 20 6e 50 61 74 20 3e 20 64 62 2d 3e 61 4c 69  ( nPat > db->aLi
45c0: 6d 69 74 5b 53 51 4c 49 54 45 5f 4c 49 4d 49 54  mit[SQLITE_LIMIT
45d0: 5f 4c 49 4b 45 5f 50 41 54 54 45 52 4e 5f 4c 45  _LIKE_PATTERN_LE
45e0: 4e 47 54 48 5d 20 29 7b 0a 20 20 20 20 73 71 6c  NGTH] ){.    sql
45f0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
4600: 72 28 63 6f 6e 74 65 78 74 2c 20 22 4c 49 4b 45  r(context, "LIKE
4610: 20 6f 72 20 47 4c 4f 42 20 70 61 74 74 65 72 6e   or GLOB pattern
4620: 20 74 6f 6f 20 63 6f 6d 70 6c 65 78 22 2c 20 2d   too complex", -
4630: 31 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  1);.    return;.
4640: 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 7a 42    }.  assert( zB
4650: 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  ==sqlite3_value_
4660: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 20 29 3b  text(argv[0]) );
4670: 20 20 2f 2a 20 45 6e 63 6f 64 69 6e 67 20 64 69    /* Encoding di
4680: 64 20 6e 6f 74 20 63 68 61 6e 67 65 20 2a 2f 0a  d not change */.
4690: 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 33 20 29  .  if( argc==3 )
46a0: 7b 0a 20 20 20 20 2f 2a 20 54 68 65 20 65 73 63  {.    /* The esc
46b0: 61 70 65 20 63 68 61 72 61 63 74 65 72 20 73 74  ape character st
46c0: 72 69 6e 67 20 6d 75 73 74 20 63 6f 6e 73 69 73  ring must consis
46d0: 74 20 6f 66 20 61 20 73 69 6e 67 6c 65 20 55 54  t of a single UT
46e0: 46 2d 38 20 63 68 61 72 61 63 74 65 72 2e 0a 20  F-8 character.. 
46f0: 20 20 20 2a 2a 20 4f 74 68 65 72 77 69 73 65 2c     ** Otherwise,
4700: 20 72 65 74 75 72 6e 20 61 6e 20 65 72 72 6f 72   return an error
4710: 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 63 6f 6e  ..    */.    con
4720: 73 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  st unsigned char
4730: 20 2a 7a 45 73 63 20 3d 20 73 71 6c 69 74 65 33   *zEsc = sqlite3
4740: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
4750: 5b 32 5d 29 3b 0a 20 20 20 20 69 66 28 20 7a 45  [2]);.    if( zE
4760: 73 63 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a  sc==0 ) return;.
4770: 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 33 55      if( sqlite3U
4780: 74 66 38 43 68 61 72 4c 65 6e 28 28 63 68 61 72  tf8CharLen((char
4790: 2a 29 7a 45 73 63 2c 20 2d 31 29 21 3d 31 20 29  *)zEsc, -1)!=1 )
47a0: 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f  {.      sqlite3_
47b0: 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e  result_error(con
47c0: 74 65 78 74 2c 20 0a 20 20 20 20 20 20 20 20 20  text, .         
47d0: 20 22 45 53 43 41 50 45 20 65 78 70 72 65 73 73   "ESCAPE express
47e0: 69 6f 6e 20 6d 75 73 74 20 62 65 20 61 20 73 69  ion must be a si
47f0: 6e 67 6c 65 20 63 68 61 72 61 63 74 65 72 22 2c  ngle character",
4800: 20 2d 31 29 3b 0a 20 20 20 20 20 20 72 65 74 75   -1);.      retu
4810: 72 6e 3b 0a 20 20 20 20 7d 0a 20 20 20 20 65 73  rn;.    }.    es
4820: 63 61 70 65 20 3d 20 73 71 6c 69 74 65 33 55 74  cape = sqlite3Ut
4830: 66 38 52 65 61 64 28 7a 45 73 63 2c 20 26 7a 45  f8Read(zEsc, &zE
4840: 73 63 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a  sc);.  }.  if( z
4850: 41 20 26 26 20 7a 42 20 29 7b 0a 20 20 20 20 73  A && zB ){.    s
4860: 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66  truct compareInf
4870: 6f 20 2a 70 49 6e 66 6f 20 3d 20 73 71 6c 69 74  o *pInfo = sqlit
4880: 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e  e3_user_data(con
4890: 74 65 78 74 29 3b 0a 23 69 66 64 65 66 20 53 51  text);.#ifdef SQ
48a0: 4c 49 54 45 5f 54 45 53 54 0a 20 20 20 20 73 71  LITE_TEST.    sq
48b0: 6c 69 74 65 33 5f 6c 69 6b 65 5f 63 6f 75 6e 74  lite3_like_count
48c0: 2b 2b 3b 0a 23 65 6e 64 69 66 0a 20 20 20 20 0a  ++;.#endif.    .
48d0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
48e0: 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c 20  lt_int(context, 
48f0: 70 61 74 74 65 72 6e 43 6f 6d 70 61 72 65 28 7a  patternCompare(z
4900: 42 2c 20 7a 41 2c 20 70 49 6e 66 6f 2c 20 65 73  B, zA, pInfo, es
4910: 63 61 70 65 29 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f  cape));.  }.}../
4920: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
4930: 69 6f 6e 20 6f 66 20 74 68 65 20 4e 55 4c 4c 49  ion of the NULLI
4940: 46 28 78 2c 79 29 20 66 75 6e 63 74 69 6f 6e 2e  F(x,y) function.
4950: 20 20 54 68 65 20 72 65 73 75 6c 74 20 69 73 20    The result is 
4960: 74 68 65 20 66 69 72 73 74 0a 2a 2a 20 61 72 67  the first.** arg
4970: 75 6d 65 6e 74 20 69 66 20 74 68 65 20 61 72 67  ument if the arg
4980: 75 6d 65 6e 74 73 20 61 72 65 20 64 69 66 66 65  uments are diffe
4990: 72 65 6e 74 2e 20 20 54 68 65 20 72 65 73 75 6c  rent.  The resul
49a0: 74 20 69 73 20 4e 55 4c 4c 20 69 66 20 74 68 65  t is NULL if the
49b0: 0a 2a 2a 20 61 72 67 75 6d 65 6e 74 73 20 61 72  .** arguments ar
49c0: 65 20 65 71 75 61 6c 20 74 6f 20 65 61 63 68 20  e equal to each 
49d0: 6f 74 68 65 72 2e 0a 2a 2f 0a 73 74 61 74 69 63  other..*/.static
49e0: 20 76 6f 69 64 20 6e 75 6c 6c 69 66 46 75 6e 63   void nullifFunc
49f0: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
4a00: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
4a10: 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20 73  int NotUsed,.  s
4a20: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
4a30: 72 67 76 0a 29 7b 0a 20 20 43 6f 6c 6c 53 65 71  rgv.){.  CollSeq
4a40: 20 2a 70 43 6f 6c 6c 20 3d 20 73 71 6c 69 74 65   *pColl = sqlite
4a50: 33 47 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28  3GetFuncCollSeq(
4a60: 63 6f 6e 74 65 78 74 29 3b 0a 20 20 55 4e 55 53  context);.  UNUS
4a70: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 4e 6f 74  ED_PARAMETER(Not
4a80: 55 73 65 64 29 3b 0a 20 20 69 66 28 20 73 71 6c  Used);.  if( sql
4a90: 69 74 65 33 4d 65 6d 43 6f 6d 70 61 72 65 28 61  ite3MemCompare(a
4aa0: 72 67 76 5b 30 5d 2c 20 61 72 67 76 5b 31 5d 2c  rgv[0], argv[1],
4ab0: 20 70 43 6f 6c 6c 29 21 3d 30 20 29 7b 0a 20 20   pColl)!=0 ){.  
4ac0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
4ad0: 5f 76 61 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20  _value(context, 
4ae0: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 7d 0a 7d 0a  argv[0]);.  }.}.
4af0: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
4b00: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 56 45 52  ation of the VER
4b10: 53 49 4f 4e 28 2a 29 20 66 75 6e 63 74 69 6f 6e  SION(*) function
4b20: 2e 20 20 54 68 65 20 72 65 73 75 6c 74 20 69 73  .  The result is
4b30: 20 74 68 65 20 76 65 72 73 69 6f 6e 0a 2a 2a 20   the version.** 
4b40: 6f 66 20 74 68 65 20 53 51 4c 69 74 65 20 6c 69  of the SQLite li
4b50: 62 72 61 72 79 20 74 68 61 74 20 69 73 20 72 75  brary that is ru
4b60: 6e 6e 69 6e 67 2e 0a 2a 2f 0a 73 74 61 74 69 63  nning..*/.static
4b70: 20 76 6f 69 64 20 76 65 72 73 69 6f 6e 46 75 6e   void versionFun
4b80: 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e  c(.  sqlite3_con
4b90: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20  text *context,. 
4ba0: 20 69 6e 74 20 4e 6f 74 55 73 65 64 2c 0a 20 20   int NotUsed,.  
4bb0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
4bc0: 4e 6f 74 55 73 65 64 32 0a 29 7b 0a 20 20 55 4e  NotUsed2.){.  UN
4bd0: 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 32 28  USED_PARAMETER2(
4be0: 4e 6f 74 55 73 65 64 2c 20 4e 6f 74 55 73 65 64  NotUsed, NotUsed
4bf0: 32 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65  2);.  sqlite3_re
4c00: 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78  sult_text(contex
4c10: 74 2c 20 73 71 6c 69 74 65 33 5f 76 65 72 73 69  t, sqlite3_versi
4c20: 6f 6e 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53  on, -1, SQLITE_S
4c30: 54 41 54 49 43 29 3b 0a 7d 0a 0a 2f 2a 20 41 72  TATIC);.}../* Ar
4c40: 72 61 79 20 66 6f 72 20 63 6f 6e 76 65 72 74 69  ray for converti
4c50: 6e 67 20 66 72 6f 6d 20 68 61 6c 66 2d 62 79 74  ng from half-byt
4c60: 65 73 20 28 6e 79 62 62 6c 65 73 29 20 69 6e 74  es (nybbles) int
4c70: 6f 20 41 53 43 49 49 20 68 65 78 0a 2a 2a 20 64  o ASCII hex.** d
4c80: 69 67 69 74 73 2e 20 2a 2f 0a 73 74 61 74 69 63  igits. */.static
4c90: 20 63 6f 6e 73 74 20 63 68 61 72 20 68 65 78 64   const char hexd
4ca0: 69 67 69 74 73 5b 5d 20 3d 20 7b 0a 20 20 27 30  igits[] = {.  '0
4cb0: 27 2c 20 27 31 27 2c 20 27 32 27 2c 20 27 33 27  ', '1', '2', '3'
4cc0: 2c 20 27 34 27 2c 20 27 35 27 2c 20 27 36 27 2c  , '4', '5', '6',
4cd0: 20 27 37 27 2c 0a 20 20 27 38 27 2c 20 27 39 27   '7',.  '8', '9'
4ce0: 2c 20 27 41 27 2c 20 27 42 27 2c 20 27 43 27 2c  , 'A', 'B', 'C',
4cf0: 20 27 44 27 2c 20 27 45 27 2c 20 27 46 27 20 0a   'D', 'E', 'F' .
4d00: 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 45 58 50 45 52 49  };../*.** EXPERI
4d10: 4d 45 4e 54 41 4c 20 2d 20 54 68 69 73 20 69 73  MENTAL - This is
4d20: 20 6e 6f 74 20 61 6e 20 6f 66 66 69 63 69 61 6c   not an official
4d30: 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65 20   function.  The 
4d40: 69 6e 74 65 72 66 61 63 65 20 6d 61 79 0a 2a 2a  interface may.**
4d50: 20 63 68 61 6e 67 65 2e 20 20 54 68 69 73 20 66   change.  This f
4d60: 75 6e 63 74 69 6f 6e 20 6d 61 79 20 64 69 73 61  unction may disa
4d70: 70 70 65 61 72 2e 20 20 44 6f 20 6e 6f 74 20 77  ppear.  Do not w
4d80: 72 69 74 65 20 63 6f 64 65 20 74 68 61 74 20 64  rite code that d
4d90: 65 70 65 6e 64 73 0a 2a 2a 20 6f 6e 20 74 68 69  epends.** on thi
4da0: 73 20 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a  s function..**.*
4db0: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
4dc0: 20 6f 66 20 74 68 65 20 51 55 4f 54 45 28 29 20   of the QUOTE() 
4dd0: 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 69 73 20  function.  This 
4de0: 66 75 6e 63 74 69 6f 6e 20 74 61 6b 65 73 20 61  function takes a
4df0: 20 73 69 6e 67 6c 65 0a 2a 2a 20 61 72 67 75 6d   single.** argum
4e00: 65 6e 74 2e 20 20 49 66 20 74 68 65 20 61 72 67  ent.  If the arg
4e10: 75 6d 65 6e 74 20 69 73 20 6e 75 6d 65 72 69 63  ument is numeric
4e20: 2c 20 74 68 65 20 72 65 74 75 72 6e 20 76 61 6c  , the return val
4e30: 75 65 20 69 73 20 74 68 65 20 73 61 6d 65 20 61  ue is the same a
4e40: 73 0a 2a 2a 20 74 68 65 20 61 72 67 75 6d 65 6e  s.** the argumen
4e50: 74 2e 20 20 49 66 20 74 68 65 20 61 72 67 75 6d  t.  If the argum
4e60: 65 6e 74 20 69 73 20 4e 55 4c 4c 2c 20 74 68 65  ent is NULL, the
4e70: 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 73   return value is
4e80: 20 74 68 65 20 73 74 72 69 6e 67 0a 2a 2a 20 22   the string.** "
4e90: 4e 55 4c 4c 22 2e 20 20 4f 74 68 65 72 77 69 73  NULL".  Otherwis
4ea0: 65 2c 20 74 68 65 20 61 72 67 75 6d 65 6e 74 20  e, the argument 
4eb0: 69 73 20 65 6e 63 6c 6f 73 65 64 20 69 6e 20 73  is enclosed in s
4ec0: 69 6e 67 6c 65 20 71 75 6f 74 65 73 20 77 69 74  ingle quotes wit
4ed0: 68 0a 2a 2a 20 73 69 6e 67 6c 65 2d 71 75 6f 74  h.** single-quot
4ee0: 65 20 65 73 63 61 70 65 73 2e 0a 2a 2f 0a 73 74  e escapes..*/.st
4ef0: 61 74 69 63 20 76 6f 69 64 20 71 75 6f 74 65 46  atic void quoteF
4f00: 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  unc(sqlite3_cont
4f10: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e  ext *context, in
4f20: 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f  t argc, sqlite3_
4f30: 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20  value **argv){. 
4f40: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31   assert( argc==1
4f50: 20 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52   );.  UNUSED_PAR
4f60: 41 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20  AMETER(argc);.  
4f70: 73 77 69 74 63 68 28 20 73 71 6c 69 74 65 33 5f  switch( sqlite3_
4f80: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
4f90: 30 5d 29 20 29 7b 0a 20 20 20 20 63 61 73 65 20  0]) ){.    case 
4fa0: 53 51 4c 49 54 45 5f 49 4e 54 45 47 45 52 3a 0a  SQLITE_INTEGER:.
4fb0: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 5f      case SQLITE_
4fc0: 46 4c 4f 41 54 3a 20 7b 0a 20 20 20 20 20 20 73  FLOAT: {.      s
4fd0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 76 61  qlite3_result_va
4fe0: 6c 75 65 28 63 6f 6e 74 65 78 74 2c 20 61 72 67  lue(context, arg
4ff0: 76 5b 30 5d 29 3b 0a 20 20 20 20 20 20 62 72 65  v[0]);.      bre
5000: 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 63 61  ak;.    }.    ca
5010: 73 65 20 53 51 4c 49 54 45 5f 42 4c 4f 42 3a 20  se SQLITE_BLOB: 
5020: 7b 0a 20 20 20 20 20 20 63 68 61 72 20 2a 7a 54  {.      char *zT
5030: 65 78 74 20 3d 20 30 3b 0a 20 20 20 20 20 20 63  ext = 0;.      c
5040: 68 61 72 20 63 6f 6e 73 74 20 2a 7a 42 6c 6f 62  har const *zBlob
5050: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
5060: 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29 3b 0a  _blob(argv[0]);.
5070: 20 20 20 20 20 20 69 6e 74 20 6e 42 6c 6f 62 20        int nBlob 
5080: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
5090: 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a  bytes(argv[0]);.
50a0: 20 20 20 20 20 20 61 73 73 65 72 74 28 20 7a 42        assert( zB
50b0: 6c 6f 62 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c  lob==sqlite3_val
50c0: 75 65 5f 62 6c 6f 62 28 61 72 67 76 5b 30 5d 29  ue_blob(argv[0])
50d0: 20 29 3b 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69   ); /* No encodi
50e0: 6e 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20 20  ng change */.   
50f0: 20 20 20 7a 54 65 78 74 20 3d 20 28 63 68 61 72     zText = (char
5100: 20 2a 29 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63   *)contextMalloc
5110: 28 63 6f 6e 74 65 78 74 2c 20 28 32 2a 28 69 36  (context, (2*(i6
5120: 34 29 6e 42 6c 6f 62 29 2b 34 29 3b 20 0a 20 20  4)nBlob)+4); .  
5130: 20 20 20 20 69 66 28 20 7a 54 65 78 74 20 29 7b      if( zText ){
5140: 0a 20 20 20 20 20 20 20 20 69 6e 74 20 69 3b 0a  .        int i;.
5150: 20 20 20 20 20 20 20 20 66 6f 72 28 69 3d 30 3b          for(i=0;
5160: 20 69 3c 6e 42 6c 6f 62 3b 20 69 2b 2b 29 7b 0a   i<nBlob; i++){.
5170: 20 20 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b            zText[
5180: 28 69 2a 32 29 2b 32 5d 20 3d 20 68 65 78 64 69  (i*2)+2] = hexdi
5190: 67 69 74 73 5b 28 7a 42 6c 6f 62 5b 69 5d 3e 3e  gits[(zBlob[i]>>
51a0: 34 29 26 30 78 30 46 5d 3b 0a 20 20 20 20 20 20  4)&0x0F];.      
51b0: 20 20 20 20 7a 54 65 78 74 5b 28 69 2a 32 29 2b      zText[(i*2)+
51c0: 33 5d 20 3d 20 68 65 78 64 69 67 69 74 73 5b 28  3] = hexdigits[(
51d0: 7a 42 6c 6f 62 5b 69 5d 29 26 30 78 30 46 5d 3b  zBlob[i])&0x0F];
51e0: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
51f0: 20 20 20 7a 54 65 78 74 5b 28 6e 42 6c 6f 62 2a     zText[(nBlob*
5200: 32 29 2b 32 5d 20 3d 20 27 5c 27 27 3b 0a 20 20  2)+2] = '\'';.  
5210: 20 20 20 20 20 20 7a 54 65 78 74 5b 28 6e 42 6c        zText[(nBl
5220: 6f 62 2a 32 29 2b 33 5d 20 3d 20 27 5c 30 27 3b  ob*2)+3] = '\0';
5230: 0a 20 20 20 20 20 20 20 20 7a 54 65 78 74 5b 30  .        zText[0
5240: 5d 20 3d 20 27 58 27 3b 0a 20 20 20 20 20 20 20  ] = 'X';.       
5250: 20 7a 54 65 78 74 5b 31 5d 20 3d 20 27 5c 27 27   zText[1] = '\''
5260: 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65  ;.        sqlite
5270: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
5280: 6e 74 65 78 74 2c 20 7a 54 65 78 74 2c 20 2d 31  ntext, zText, -1
5290: 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 49 45  , SQLITE_TRANSIE
52a0: 4e 54 29 3b 0a 20 20 20 20 20 20 20 20 73 71 6c  NT);.        sql
52b0: 69 74 65 33 5f 66 72 65 65 28 7a 54 65 78 74 29  ite3_free(zText)
52c0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
52d0: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
52e0: 20 63 61 73 65 20 53 51 4c 49 54 45 5f 54 45 58   case SQLITE_TEX
52f0: 54 3a 20 7b 0a 20 20 20 20 20 20 69 6e 74 20 69  T: {.      int i
5300: 2c 6a 3b 0a 20 20 20 20 20 20 75 36 34 20 6e 3b  ,j;.      u64 n;
5310: 0a 20 20 20 20 20 20 63 6f 6e 73 74 20 75 6e 73  .      const uns
5320: 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 41 72 67  igned char *zArg
5330: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
5340: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a  _text(argv[0]);.
5350: 20 20 20 20 20 20 63 68 61 72 20 2a 7a 3b 0a 0a        char *z;..
5360: 20 20 20 20 20 20 69 66 28 20 7a 41 72 67 3d 3d        if( zArg==
5370: 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20  0 ) return;.    
5380: 20 20 66 6f 72 28 69 3d 30 2c 20 6e 3d 30 3b 20    for(i=0, n=0; 
5390: 7a 41 72 67 5b 69 5d 3b 20 69 2b 2b 29 7b 20 69  zArg[i]; i++){ i
53a0: 66 28 20 7a 41 72 67 5b 69 5d 3d 3d 27 5c 27 27  f( zArg[i]=='\''
53b0: 20 29 20 6e 2b 2b 3b 20 7d 0a 20 20 20 20 20 20   ) n++; }.      
53c0: 7a 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f  z = contextMallo
53d0: 63 28 63 6f 6e 74 65 78 74 2c 20 28 28 69 36 34  c(context, ((i64
53e0: 29 69 29 2b 28 28 69 36 34 29 6e 29 2b 33 29 3b  )i)+((i64)n)+3);
53f0: 0a 20 20 20 20 20 20 69 66 28 20 7a 20 29 7b 0a  .      if( z ){.
5400: 20 20 20 20 20 20 20 20 7a 5b 30 5d 20 3d 20 27          z[0] = '
5410: 5c 27 27 3b 0a 20 20 20 20 20 20 20 20 66 6f 72  \'';.        for
5420: 28 69 3d 30 2c 20 6a 3d 31 3b 20 7a 41 72 67 5b  (i=0, j=1; zArg[
5430: 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20  i]; i++){.      
5440: 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 7a 41 72      z[j++] = zAr
5450: 67 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20 20 20  g[i];.          
5460: 69 66 28 20 7a 41 72 67 5b 69 5d 3d 3d 27 5c 27  if( zArg[i]=='\'
5470: 27 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20  ' ){.           
5480: 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27 3b 0a   z[j++] = '\'';.
5490: 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20            }.    
54a0: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7a 5b      }.        z[
54b0: 6a 2b 2b 5d 20 3d 20 27 5c 27 27 3b 0a 20 20 20  j++] = '\'';.   
54c0: 20 20 20 20 20 7a 5b 6a 5d 20 3d 20 30 3b 0a 20       z[j] = 0;. 
54d0: 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72         sqlite3_r
54e0: 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65  esult_text(conte
54f0: 78 74 2c 20 7a 2c 20 6a 2c 20 73 71 6c 69 74 65  xt, z, j, sqlite
5500: 33 5f 66 72 65 65 29 3b 0a 20 20 20 20 20 20 7d  3_free);.      }
5510: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20  .      break;.  
5520: 20 20 7d 0a 20 20 20 20 64 65 66 61 75 6c 74 3a    }.    default:
5530: 20 7b 0a 20 20 20 20 20 20 61 73 73 65 72 74 28   {.      assert(
5540: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
5550: 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51  ype(argv[0])==SQ
5560: 4c 49 54 45 5f 4e 55 4c 4c 20 29 3b 0a 20 20 20  LITE_NULL );.   
5570: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
5580: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
5590: 22 4e 55 4c 4c 22 2c 20 34 2c 20 53 51 4c 49 54  "NULL", 4, SQLIT
55a0: 45 5f 53 54 41 54 49 43 29 3b 0a 20 20 20 20 20  E_STATIC);.     
55b0: 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20   break;.    }.  
55c0: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 68  }.}../*.** The h
55d0: 65 78 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20 20  ex() function.  
55e0: 49 6e 74 65 72 70 72 65 74 20 74 68 65 20 61 72  Interpret the ar
55f0: 67 75 6d 65 6e 74 20 61 73 20 61 20 62 6c 6f 62  gument as a blob
5600: 2e 20 20 52 65 74 75 72 6e 0a 2a 2a 20 61 20 68  .  Return.** a h
5610: 65 78 61 64 65 63 69 6d 61 6c 20 72 65 6e 64 65  exadecimal rende
5620: 72 69 6e 67 20 61 73 20 74 65 78 74 2e 0a 2a 2f  ring as text..*/
5630: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 68 65 78  .static void hex
5640: 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f  Func(.  sqlite3_
5650: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
5660: 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20  ,.  int argc,.  
5670: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a  sqlite3_value **
5680: 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 20 69 2c  argv.){.  int i,
5690: 20 6e 3b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69   n;.  const unsi
56a0: 67 6e 65 64 20 63 68 61 72 20 2a 70 42 6c 6f 62  gned char *pBlob
56b0: 3b 0a 20 20 63 68 61 72 20 2a 7a 48 65 78 2c 20  ;.  char *zHex, 
56c0: 2a 7a 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72  *z;.  assert( ar
56d0: 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e 55 53 45  gc==1 );.  UNUSE
56e0: 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63  D_PARAMETER(argc
56f0: 29 3b 0a 20 20 70 42 6c 6f 62 20 3d 20 73 71 6c  );.  pBlob = sql
5700: 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62 28  ite3_value_blob(
5710: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 6e 20 3d 20  argv[0]);.  n = 
5720: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79  sqlite3_value_by
5730: 74 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20  tes(argv[0]);.  
5740: 61 73 73 65 72 74 28 20 70 42 6c 6f 62 3d 3d 73  assert( pBlob==s
5750: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f  qlite3_value_blo
5760: 62 28 61 72 67 76 5b 30 5d 29 20 29 3b 20 20 2f  b(argv[0]) );  /
5770: 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e 67 20 63 68  * No encoding ch
5780: 61 6e 67 65 20 2a 2f 0a 20 20 7a 20 3d 20 7a 48  ange */.  z = zH
5790: 65 78 20 3d 20 63 6f 6e 74 65 78 74 4d 61 6c 6c  ex = contextMall
57a0: 6f 63 28 63 6f 6e 74 65 78 74 2c 20 28 28 69 36  oc(context, ((i6
57b0: 34 29 6e 29 2a 32 20 2b 20 31 29 3b 0a 20 20 69  4)n)*2 + 1);.  i
57c0: 66 28 20 7a 48 65 78 20 29 7b 0a 20 20 20 20 66  f( zHex ){.    f
57d0: 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b 2b  or(i=0; i<n; i++
57e0: 2c 20 70 42 6c 6f 62 2b 2b 29 7b 0a 20 20 20 20  , pBlob++){.    
57f0: 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20    unsigned char 
5800: 63 20 3d 20 2a 70 42 6c 6f 62 3b 0a 20 20 20 20  c = *pBlob;.    
5810: 20 20 2a 28 7a 2b 2b 29 20 3d 20 68 65 78 64 69    *(z++) = hexdi
5820: 67 69 74 73 5b 28 63 3e 3e 34 29 26 30 78 66 5d  gits[(c>>4)&0xf]
5830: 3b 0a 20 20 20 20 20 20 2a 28 7a 2b 2b 29 20 3d  ;.      *(z++) =
5840: 20 68 65 78 64 69 67 69 74 73 5b 63 26 30 78 66   hexdigits[c&0xf
5850: 5d 3b 0a 20 20 20 20 7d 0a 20 20 20 20 2a 7a 20  ];.    }.    *z 
5860: 3d 20 30 3b 0a 20 20 20 20 73 71 6c 69 74 65 33  = 0;.    sqlite3
5870: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
5880: 74 65 78 74 2c 20 7a 48 65 78 2c 20 6e 2a 32 2c  text, zHex, n*2,
5890: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a   sqlite3_free);.
58a0: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65    }.}../*.** The
58b0: 20 7a 65 72 6f 62 6c 6f 62 28 4e 29 20 66 75 6e   zeroblob(N) fun
58c0: 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 61 20  ction returns a 
58d0: 7a 65 72 6f 2d 66 69 6c 6c 65 64 20 62 6c 6f 62  zero-filled blob
58e0: 20 6f 66 20 73 69 7a 65 20 4e 20 62 79 74 65 73   of size N bytes
58f0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
5900: 20 7a 65 72 6f 62 6c 6f 62 46 75 6e 63 28 0a 20   zeroblobFunc(. 
5910: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
5920: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
5930: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
5940: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
5950: 0a 20 20 69 36 34 20 6e 3b 0a 20 20 73 71 6c 69  .  i64 n;.  sqli
5960: 74 65 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65  te3 *db = sqlite
5970: 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e  3_context_db_han
5980: 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  dle(context);.  
5990: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20  assert( argc==1 
59a0: 29 3b 0a 20 20 55 4e 55 53 45 44 5f 50 41 52 41  );.  UNUSED_PARA
59b0: 4d 45 54 45 52 28 61 72 67 63 29 3b 0a 20 20 6e  METER(argc);.  n
59c0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
59d0: 5f 69 6e 74 36 34 28 61 72 67 76 5b 30 5d 29 3b  _int64(argv[0]);
59e0: 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e 3d 3d  .  testcase( n==
59f0: 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54  db->aLimit[SQLIT
5a00: 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20  E_LIMIT_LENGTH] 
5a10: 29 3b 0a 20 20 74 65 73 74 63 61 73 65 28 20 6e  );.  testcase( n
5a20: 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c  ==db->aLimit[SQL
5a30: 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48  ITE_LIMIT_LENGTH
5a40: 5d 2b 31 20 29 3b 0a 20 20 69 66 28 20 6e 3e 64  ]+1 );.  if( n>d
5a50: 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45  b->aLimit[SQLITE
5a60: 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29  _LIMIT_LENGTH] )
5a70: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  {.    sqlite3_re
5a80: 73 75 6c 74 5f 65 72 72 6f 72 5f 74 6f 6f 62 69  sult_error_toobi
5a90: 67 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 7d 65  g(context);.  }e
5aa0: 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  lse{.    sqlite3
5ab0: 5f 72 65 73 75 6c 74 5f 7a 65 72 6f 62 6c 6f 62  _result_zeroblob
5ac0: 28 63 6f 6e 74 65 78 74 2c 20 28 69 6e 74 29 6e  (context, (int)n
5ad0: 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  );.  }.}../*.** 
5ae0: 54 68 65 20 72 65 70 6c 61 63 65 28 29 20 66 75  The replace() fu
5af0: 6e 63 74 69 6f 6e 2e 20 20 54 68 72 65 65 20 61  nction.  Three a
5b00: 72 67 75 6d 65 6e 74 73 20 61 72 65 20 61 6c 6c  rguments are all
5b10: 20 73 74 72 69 6e 67 73 3a 20 63 61 6c 6c 0a 2a   strings: call.*
5b20: 2a 20 74 68 65 6d 20 41 2c 20 42 2c 20 61 6e 64  * them A, B, and
5b30: 20 43 2e 20 54 68 65 20 72 65 73 75 6c 74 20 69   C. The result i
5b40: 73 20 61 6c 73 6f 20 61 20 73 74 72 69 6e 67 20  s also a string 
5b50: 77 68 69 63 68 20 69 73 20 64 65 72 69 76 65 64  which is derived
5b60: 0a 2a 2a 20 66 72 6f 6d 20 41 20 62 79 20 72 65  .** from A by re
5b70: 70 6c 61 63 69 6e 67 20 65 76 65 72 79 20 6f 63  placing every oc
5b80: 63 75 72 61 6e 63 65 20 6f 66 20 42 20 77 69 74  curance of B wit
5b90: 68 20 43 2e 20 20 54 68 65 20 6d 61 74 63 68 0a  h C.  The match.
5ba0: 2a 2a 20 6d 75 73 74 20 62 65 20 65 78 61 63 74  ** must be exact
5bb0: 2e 20 20 43 6f 6c 6c 61 74 69 6e 67 20 73 65 71  .  Collating seq
5bc0: 75 65 6e 63 65 73 20 61 72 65 20 6e 6f 74 20 75  uences are not u
5bd0: 73 65 64 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  sed..*/.static v
5be0: 6f 69 64 20 72 65 70 6c 61 63 65 46 75 6e 63 28  oid replaceFunc(
5bf0: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  .  sqlite3_conte
5c00: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69  xt *context,.  i
5c10: 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74  nt argc,.  sqlit
5c20: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a  e3_value **argv.
5c30: 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67  ){.  const unsig
5c40: 6e 65 64 20 63 68 61 72 20 2a 7a 53 74 72 3b 20  ned char *zStr; 
5c50: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 69 6e         /* The in
5c60: 70 75 74 20 73 74 72 69 6e 67 20 41 20 2a 2f 0a  put string A */.
5c70: 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64    const unsigned
5c80: 20 63 68 61 72 20 2a 7a 50 61 74 74 65 72 6e 3b   char *zPattern;
5c90: 20 20 20 20 2f 2a 20 54 68 65 20 70 61 74 74 65      /* The patte
5ca0: 72 6e 20 73 74 72 69 6e 67 20 42 20 2a 2f 0a 20  rn string B */. 
5cb0: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
5cc0: 63 68 61 72 20 2a 7a 52 65 70 3b 20 20 20 20 20  char *zRep;     
5cd0: 20 20 20 2f 2a 20 54 68 65 20 72 65 70 6c 61 63     /* The replac
5ce0: 65 6d 65 6e 74 20 73 74 72 69 6e 67 20 43 20 2a  ement string C *
5cf0: 2f 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61  /.  unsigned cha
5d00: 72 20 2a 7a 4f 75 74 3b 20 20 20 20 20 20 20 20  r *zOut;        
5d10: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 6f 75 74        /* The out
5d20: 70 75 74 20 2a 2f 0a 20 20 69 6e 74 20 6e 53 74  put */.  int nSt
5d30: 72 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20  r;              
5d40: 20 20 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 53 74    /* Size of zSt
5d50: 72 20 2a 2f 0a 20 20 69 6e 74 20 6e 50 61 74 74  r */.  int nPatt
5d60: 65 72 6e 3b 20 20 20 20 20 20 20 20 20 20 20 20  ern;            
5d70: 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 50 61 74 74  /* Size of zPatt
5d80: 65 72 6e 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65  ern */.  int nRe
5d90: 70 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20  p;              
5da0: 20 20 2f 2a 20 53 69 7a 65 20 6f 66 20 7a 52 65    /* Size of zRe
5db0: 70 20 2a 2f 0a 20 20 69 36 34 20 6e 4f 75 74 3b  p */.  i64 nOut;
5dc0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5dd0: 2f 2a 20 4d 61 78 69 6d 75 6d 20 73 69 7a 65 20  /* Maximum size 
5de0: 6f 66 20 7a 4f 75 74 20 2a 2f 0a 20 20 69 6e 74  of zOut */.  int
5df0: 20 6c 6f 6f 70 4c 69 6d 69 74 3b 20 20 20 20 20   loopLimit;     
5e00: 20 20 20 20 20 20 2f 2a 20 4c 61 73 74 20 7a 53        /* Last zS
5e10: 74 72 5b 5d 20 74 68 61 74 20 6d 69 67 68 74 20  tr[] that might 
5e20: 6d 61 74 63 68 20 7a 50 61 74 74 65 72 6e 5b 5d  match zPattern[]
5e30: 20 2a 2f 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 20   */.  int i, j; 
5e40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
5e50: 2a 20 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 73 20  * Loop counters 
5e60: 2a 2f 0a 0a 20 20 61 73 73 65 72 74 28 20 61 72  */..  assert( ar
5e70: 67 63 3d 3d 33 20 29 3b 0a 20 20 55 4e 55 53 45  gc==3 );.  UNUSE
5e80: 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67 63  D_PARAMETER(argc
5e90: 29 3b 0a 20 20 7a 53 74 72 20 3d 20 73 71 6c 69  );.  zStr = sqli
5ea0: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
5eb0: 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a  rgv[0]);.  if( z
5ec0: 53 74 72 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b  Str==0 ) return;
5ed0: 0a 20 20 6e 53 74 72 20 3d 20 73 71 6c 69 74 65  .  nStr = sqlite
5ee0: 33 5f 76 61 6c 75 65 5f 62 79 74 65 73 28 61 72  3_value_bytes(ar
5ef0: 67 76 5b 30 5d 29 3b 0a 20 20 61 73 73 65 72 74  gv[0]);.  assert
5f00: 28 20 7a 53 74 72 3d 3d 73 71 6c 69 74 65 33 5f  ( zStr==sqlite3_
5f10: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
5f20: 30 5d 29 20 29 3b 20 20 2f 2a 20 4e 6f 20 65 6e  0]) );  /* No en
5f30: 63 6f 64 69 6e 67 20 63 68 61 6e 67 65 20 2a 2f  coding change */
5f40: 0a 20 20 7a 50 61 74 74 65 72 6e 20 3d 20 73 71  .  zPattern = sq
5f50: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
5f60: 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28  (argv[1]);.  if(
5f70: 20 7a 50 61 74 74 65 72 6e 3d 3d 30 20 29 7b 0a   zPattern==0 ){.
5f80: 20 20 20 20 61 73 73 65 72 74 28 20 73 71 6c 69      assert( sqli
5f90: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
5fa0: 72 67 76 5b 31 5d 29 3d 3d 53 51 4c 49 54 45 5f  rgv[1])==SQLITE_
5fb0: 4e 55 4c 4c 0a 20 20 20 20 20 20 20 20 20 20 20  NULL.           
5fc0: 20 7c 7c 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74   || sqlite3_cont
5fd0: 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f  ext_db_handle(co
5fe0: 6e 74 65 78 74 29 2d 3e 6d 61 6c 6c 6f 63 46 61  ntext)->mallocFa
5ff0: 69 6c 65 64 20 29 3b 0a 20 20 20 20 72 65 74 75  iled );.    retu
6000: 72 6e 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a 50  rn;.  }.  if( zP
6010: 61 74 74 65 72 6e 5b 30 5d 3d 3d 30 20 29 7b 0a  attern[0]==0 ){.
6020: 20 20 20 20 61 73 73 65 72 74 28 20 73 71 6c 69      assert( sqli
6030: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
6040: 72 67 76 5b 31 5d 29 21 3d 53 51 4c 49 54 45 5f  rgv[1])!=SQLITE_
6050: 4e 55 4c 4c 20 29 3b 0a 20 20 20 20 73 71 6c 69  NULL );.    sqli
6060: 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c 75 65  te3_result_value
6070: 28 63 6f 6e 74 65 78 74 2c 20 61 72 67 76 5b 30  (context, argv[0
6080: 5d 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  ]);.    return;.
6090: 20 20 7d 0a 20 20 6e 50 61 74 74 65 72 6e 20 3d    }.  nPattern =
60a0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
60b0: 79 74 65 73 28 61 72 67 76 5b 31 5d 29 3b 0a 20  ytes(argv[1]);. 
60c0: 20 61 73 73 65 72 74 28 20 7a 50 61 74 74 65 72   assert( zPatter
60d0: 6e 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  n==sqlite3_value
60e0: 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29 20 29  _text(argv[1]) )
60f0: 3b 20 20 2f 2a 20 4e 6f 20 65 6e 63 6f 64 69 6e  ;  /* No encodin
6100: 67 20 63 68 61 6e 67 65 20 2a 2f 0a 20 20 7a 52  g change */.  zR
6110: 65 70 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  ep = sqlite3_val
6120: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 32 5d 29  ue_text(argv[2])
6130: 3b 0a 20 20 69 66 28 20 7a 52 65 70 3d 3d 30 20  ;.  if( zRep==0 
6140: 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e 52 65 70  ) return;.  nRep
6150: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
6160: 5f 62 79 74 65 73 28 61 72 67 76 5b 32 5d 29 3b  _bytes(argv[2]);
6170: 0a 20 20 61 73 73 65 72 74 28 20 7a 52 65 70 3d  .  assert( zRep=
6180: 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74  =sqlite3_value_t
6190: 65 78 74 28 61 72 67 76 5b 32 5d 29 20 29 3b 0a  ext(argv[2]) );.
61a0: 20 20 6e 4f 75 74 20 3d 20 6e 53 74 72 20 2b 20    nOut = nStr + 
61b0: 31 3b 0a 20 20 61 73 73 65 72 74 28 20 6e 4f 75  1;.  assert( nOu
61c0: 74 3c 53 51 4c 49 54 45 5f 4d 41 58 5f 4c 45 4e  t<SQLITE_MAX_LEN
61d0: 47 54 48 20 29 3b 0a 20 20 7a 4f 75 74 20 3d 20  GTH );.  zOut = 
61e0: 63 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f  contextMalloc(co
61f0: 6e 74 65 78 74 2c 20 28 69 36 34 29 6e 4f 75 74  ntext, (i64)nOut
6200: 29 3b 0a 20 20 69 66 28 20 7a 4f 75 74 3d 3d 30  );.  if( zOut==0
6210: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a   ){.    return;.
6220: 20 20 7d 0a 20 20 6c 6f 6f 70 4c 69 6d 69 74 20    }.  loopLimit 
6230: 3d 20 6e 53 74 72 20 2d 20 6e 50 61 74 74 65 72  = nStr - nPatter
6240: 6e 3b 20 20 0a 20 20 66 6f 72 28 69 3d 6a 3d 30  n;  .  for(i=j=0
6250: 3b 20 69 3c 3d 6c 6f 6f 70 4c 69 6d 69 74 3b 20  ; i<=loopLimit; 
6260: 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 7a 53  i++){.    if( zS
6270: 74 72 5b 69 5d 21 3d 7a 50 61 74 74 65 72 6e 5b  tr[i]!=zPattern[
6280: 30 5d 20 7c 7c 20 6d 65 6d 63 6d 70 28 26 7a 53  0] || memcmp(&zS
6290: 74 72 5b 69 5d 2c 20 7a 50 61 74 74 65 72 6e 2c  tr[i], zPattern,
62a0: 20 6e 50 61 74 74 65 72 6e 29 20 29 7b 0a 20 20   nPattern) ){.  
62b0: 20 20 20 20 7a 4f 75 74 5b 6a 2b 2b 5d 20 3d 20      zOut[j++] = 
62c0: 7a 53 74 72 5b 69 5d 3b 0a 20 20 20 20 7d 65 6c  zStr[i];.    }el
62d0: 73 65 7b 0a 20 20 20 20 20 20 75 38 20 2a 7a 4f  se{.      u8 *zO
62e0: 6c 64 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65  ld;.      sqlite
62f0: 33 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33 5f  3 *db = sqlite3_
6300: 63 6f 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c  context_db_handl
6310: 65 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20  e(context);.    
6320: 20 20 6e 4f 75 74 20 2b 3d 20 6e 52 65 70 20 2d    nOut += nRep -
6330: 20 6e 50 61 74 74 65 72 6e 3b 0a 20 20 20 20 20   nPattern;.     
6340: 20 74 65 73 74 63 61 73 65 28 20 6e 4f 75 74 2d   testcase( nOut-
6350: 31 3d 3d 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51  1==db->aLimit[SQ
6360: 4c 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54  LITE_LIMIT_LENGT
6370: 48 5d 20 29 3b 0a 20 20 20 20 20 20 74 65 73 74  H] );.      test
6380: 63 61 73 65 28 20 6e 4f 75 74 2d 32 3d 3d 64 62  case( nOut-2==db
6390: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
63a0: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 20 29 3b  LIMIT_LENGTH] );
63b0: 0a 20 20 20 20 20 20 69 66 28 20 6e 4f 75 74 2d  .      if( nOut-
63c0: 31 3e 64 62 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c  1>db->aLimit[SQL
63d0: 49 54 45 5f 4c 49 4d 49 54 5f 4c 45 4e 47 54 48  ITE_LIMIT_LENGTH
63e0: 5d 20 29 7b 0a 20 20 20 20 20 20 20 20 73 71 6c  ] ){.        sql
63f0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
6400: 72 5f 74 6f 6f 62 69 67 28 63 6f 6e 74 65 78 74  r_toobig(context
6410: 29 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  );.        sqlit
6420: 65 33 44 62 46 72 65 65 28 64 62 2c 20 7a 4f 75  e3DbFree(db, zOu
6430: 74 29 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75  t);.        retu
6440: 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  rn;.      }.    
6450: 20 20 7a 4f 6c 64 20 3d 20 7a 4f 75 74 3b 0a 20    zOld = zOut;. 
6460: 20 20 20 20 20 7a 4f 75 74 20 3d 20 73 71 6c 69       zOut = sqli
6470: 74 65 33 5f 72 65 61 6c 6c 6f 63 28 7a 4f 75 74  te3_realloc(zOut
6480: 2c 20 28 69 6e 74 29 6e 4f 75 74 29 3b 0a 20 20  , (int)nOut);.  
6490: 20 20 20 20 69 66 28 20 7a 4f 75 74 3d 3d 30 20      if( zOut==0 
64a0: 29 7b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  ){.        sqlit
64b0: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f  e3_result_error_
64c0: 6e 6f 6d 65 6d 28 63 6f 6e 74 65 78 74 29 3b 0a  nomem(context);.
64d0: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 44          sqlite3D
64e0: 62 46 72 65 65 28 64 62 2c 20 7a 4f 6c 64 29 3b  bFree(db, zOld);
64f0: 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b  .        return;
6500: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 6d  .      }.      m
6510: 65 6d 63 70 79 28 26 7a 4f 75 74 5b 6a 5d 2c 20  emcpy(&zOut[j], 
6520: 7a 52 65 70 2c 20 6e 52 65 70 29 3b 0a 20 20 20  zRep, nRep);.   
6530: 20 20 20 6a 20 2b 3d 20 6e 52 65 70 3b 0a 20 20     j += nRep;.  
6540: 20 20 20 20 69 20 2b 3d 20 6e 50 61 74 74 65 72      i += nPatter
6550: 6e 2d 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20  n-1;.    }.  }. 
6560: 20 61 73 73 65 72 74 28 20 6a 2b 6e 53 74 72 2d   assert( j+nStr-
6570: 69 2b 31 3d 3d 6e 4f 75 74 20 29 3b 0a 20 20 6d  i+1==nOut );.  m
6580: 65 6d 63 70 79 28 26 7a 4f 75 74 5b 6a 5d 2c 20  emcpy(&zOut[j], 
6590: 26 7a 53 74 72 5b 69 5d 2c 20 6e 53 74 72 2d 69  &zStr[i], nStr-i
65a0: 29 3b 0a 20 20 6a 20 2b 3d 20 6e 53 74 72 20 2d  );.  j += nStr -
65b0: 20 69 3b 0a 20 20 61 73 73 65 72 74 28 20 6a 3c   i;.  assert( j<
65c0: 3d 6e 4f 75 74 20 29 3b 0a 20 20 7a 4f 75 74 5b  =nOut );.  zOut[
65d0: 6a 5d 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74 65  j] = 0;.  sqlite
65e0: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
65f0: 6e 74 65 78 74 2c 20 28 63 68 61 72 2a 29 7a 4f  ntext, (char*)zO
6600: 75 74 2c 20 6a 2c 20 73 71 6c 69 74 65 33 5f 66  ut, j, sqlite3_f
6610: 72 65 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  ree);.}../*.** I
6620: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
6630: 20 74 68 65 20 54 52 49 4d 28 29 2c 20 4c 54 52   the TRIM(), LTR
6640: 49 4d 28 29 2c 20 61 6e 64 20 52 54 52 49 4d 28  IM(), and RTRIM(
6650: 29 20 66 75 6e 63 74 69 6f 6e 73 2e 0a 2a 2a 20  ) functions..** 
6660: 54 68 65 20 75 73 65 72 64 61 74 61 20 69 73 20  The userdata is 
6670: 30 78 31 20 66 6f 72 20 6c 65 66 74 20 74 72 69  0x1 for left tri
6680: 6d 2c 20 30 78 32 20 66 6f 72 20 72 69 67 68 74  m, 0x2 for right
6690: 20 74 72 69 6d 2c 20 30 78 33 20 66 6f 72 20 62   trim, 0x3 for b
66a0: 6f 74 68 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  oth..*/.static v
66b0: 6f 69 64 20 74 72 69 6d 46 75 6e 63 28 0a 20 20  oid trimFunc(.  
66c0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
66d0: 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20  *context,.  int 
66e0: 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f  argc,.  sqlite3_
66f0: 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a  value **argv.){.
6700: 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64    const unsigned
6710: 20 63 68 61 72 20 2a 7a 49 6e 3b 20 20 20 20 20   char *zIn;     
6720: 20 20 20 20 2f 2a 20 49 6e 70 75 74 20 73 74 72      /* Input str
6730: 69 6e 67 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 75  ing */.  const u
6740: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 43  nsigned char *zC
6750: 68 61 72 53 65 74 3b 20 20 20 20 2f 2a 20 53 65  harSet;    /* Se
6760: 74 20 6f 66 20 63 68 61 72 61 63 74 65 72 73 20  t of characters 
6770: 74 6f 20 74 72 69 6d 20 2a 2f 0a 20 20 69 6e 74  to trim */.  int
6780: 20 6e 49 6e 3b 20 20 20 20 20 20 20 20 20 20 20   nIn;           
6790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
67a0: 2a 20 4e 75 6d 62 65 72 20 6f 66 20 62 79 74 65  * Number of byte
67b0: 73 20 69 6e 20 69 6e 70 75 74 20 2a 2f 0a 20 20  s in input */.  
67c0: 69 6e 74 20 66 6c 61 67 73 3b 20 20 20 20 20 20  int flags;      
67d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
67e0: 20 20 2f 2a 20 31 3a 20 74 72 69 6d 6c 65 66 74    /* 1: trimleft
67f0: 20 20 32 3a 20 74 72 69 6d 72 69 67 68 74 20 20    2: trimright  
6800: 33 3a 20 74 72 69 6d 20 2a 2f 0a 20 20 69 6e 74  3: trim */.  int
6810: 20 69 3b 20 20 20 20 20 20 20 20 20 20 20 20 20   i;             
6820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
6830: 2a 20 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 20 2a  * Loop counter *
6840: 2f 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61  /.  unsigned cha
6850: 72 20 2a 61 4c 65 6e 20 3d 20 30 3b 20 20 20 20  r *aLen = 0;    
6860: 20 20 20 20 20 20 2f 2a 20 4c 65 6e 67 74 68 20        /* Length 
6870: 6f 66 20 65 61 63 68 20 63 68 61 72 61 63 74 65  of each characte
6880: 72 20 69 6e 20 7a 43 68 61 72 53 65 74 20 2a 2f  r in zCharSet */
6890: 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  .  unsigned char
68a0: 20 2a 2a 61 7a 43 68 61 72 20 3d 20 30 3b 20 20   **azChar = 0;  
68b0: 20 20 20 20 20 2f 2a 20 49 6e 64 69 76 69 64 75       /* Individu
68c0: 61 6c 20 63 68 61 72 61 63 74 65 72 73 20 69 6e  al characters in
68d0: 20 7a 43 68 61 72 53 65 74 20 2a 2f 0a 20 20 69   zCharSet */.  i
68e0: 6e 74 20 6e 43 68 61 72 3b 20 20 20 20 20 20 20  nt nChar;       
68f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6900: 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 63 68   /* Number of ch
6910: 61 72 61 63 74 65 72 73 20 69 6e 20 7a 43 68 61  aracters in zCha
6920: 72 53 65 74 20 2a 2f 0a 0a 20 20 69 66 28 20 73  rSet */..  if( s
6930: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70  qlite3_value_typ
6940: 65 28 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49  e(argv[0])==SQLI
6950: 54 45 5f 4e 55 4c 4c 20 29 7b 0a 20 20 20 20 72  TE_NULL ){.    r
6960: 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 7a 49 6e  eturn;.  }.  zIn
6970: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
6980: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a  _text(argv[0]);.
6990: 20 20 69 66 28 20 7a 49 6e 3d 3d 30 20 29 20 72    if( zIn==0 ) r
69a0: 65 74 75 72 6e 3b 0a 20 20 6e 49 6e 20 3d 20 73  eturn;.  nIn = s
69b0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74  qlite3_value_byt
69c0: 65 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 61  es(argv[0]);.  a
69d0: 73 73 65 72 74 28 20 7a 49 6e 3d 3d 73 71 6c 69  ssert( zIn==sqli
69e0: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
69f0: 72 67 76 5b 30 5d 29 20 29 3b 0a 20 20 69 66 28  rgv[0]) );.  if(
6a00: 20 61 72 67 63 3d 3d 31 20 29 7b 0a 20 20 20 20   argc==1 ){.    
6a10: 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75 6e 73  static const uns
6a20: 69 67 6e 65 64 20 63 68 61 72 20 6c 65 6e 4f 6e  igned char lenOn
6a30: 65 5b 5d 20 3d 20 7b 20 31 20 7d 3b 0a 20 20 20  e[] = { 1 };.   
6a40: 20 73 74 61 74 69 63 20 75 6e 73 69 67 6e 65 64   static unsigned
6a50: 20 63 68 61 72 20 2a 20 63 6f 6e 73 74 20 61 7a   char * const az
6a60: 4f 6e 65 5b 5d 20 3d 20 7b 20 28 75 38 2a 29 22  One[] = { (u8*)"
6a70: 20 22 20 7d 3b 0a 20 20 20 20 6e 43 68 61 72 20   " };.    nChar 
6a80: 3d 20 31 3b 0a 20 20 20 20 61 4c 65 6e 20 3d 20  = 1;.    aLen = 
6a90: 28 75 38 2a 29 6c 65 6e 4f 6e 65 3b 0a 20 20 20  (u8*)lenOne;.   
6aa0: 20 61 7a 43 68 61 72 20 3d 20 28 75 6e 73 69 67   azChar = (unsig
6ab0: 6e 65 64 20 63 68 61 72 20 2a 2a 29 61 7a 4f 6e  ned char **)azOn
6ac0: 65 3b 0a 20 20 20 20 7a 43 68 61 72 53 65 74 20  e;.    zCharSet 
6ad0: 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28  = 0;.  }else if(
6ae0: 20 28 7a 43 68 61 72 53 65 74 20 3d 20 73 71 6c   (zCharSet = sql
6af0: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
6b00: 61 72 67 76 5b 31 5d 29 29 3d 3d 30 20 29 7b 0a  argv[1]))==0 ){.
6b10: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 65      return;.  }e
6b20: 6c 73 65 7b 0a 20 20 20 20 63 6f 6e 73 74 20 75  lse{.    const u
6b30: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 3b  nsigned char *z;
6b40: 0a 20 20 20 20 66 6f 72 28 7a 3d 7a 43 68 61 72  .    for(z=zChar
6b50: 53 65 74 2c 20 6e 43 68 61 72 3d 30 3b 20 2a 7a  Set, nChar=0; *z
6b60: 3b 20 6e 43 68 61 72 2b 2b 29 7b 0a 20 20 20 20  ; nChar++){.    
6b70: 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f 55 54    SQLITE_SKIP_UT
6b80: 46 38 28 7a 29 3b 0a 20 20 20 20 7d 0a 20 20 20  F8(z);.    }.   
6b90: 20 69 66 28 20 6e 43 68 61 72 3e 30 20 29 7b 0a   if( nChar>0 ){.
6ba0: 20 20 20 20 20 20 61 7a 43 68 61 72 20 3d 20 63        azChar = c
6bb0: 6f 6e 74 65 78 74 4d 61 6c 6c 6f 63 28 63 6f 6e  ontextMalloc(con
6bc0: 74 65 78 74 2c 20 28 28 69 36 34 29 6e 43 68 61  text, ((i64)nCha
6bd0: 72 29 2a 28 73 69 7a 65 6f 66 28 63 68 61 72 2a  r)*(sizeof(char*
6be0: 29 2b 31 29 29 3b 0a 20 20 20 20 20 20 69 66 28  )+1));.      if(
6bf0: 20 61 7a 43 68 61 72 3d 3d 30 20 29 7b 0a 20 20   azChar==0 ){.  
6c00: 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20        return;.  
6c10: 20 20 20 20 7d 0a 20 20 20 20 20 20 61 4c 65 6e      }.      aLen
6c20: 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61   = (unsigned cha
6c30: 72 2a 29 26 61 7a 43 68 61 72 5b 6e 43 68 61 72  r*)&azChar[nChar
6c40: 5d 3b 0a 20 20 20 20 20 20 66 6f 72 28 7a 3d 7a  ];.      for(z=z
6c50: 43 68 61 72 53 65 74 2c 20 6e 43 68 61 72 3d 30  CharSet, nChar=0
6c60: 3b 20 2a 7a 3b 20 6e 43 68 61 72 2b 2b 29 7b 0a  ; *z; nChar++){.
6c70: 20 20 20 20 20 20 20 20 61 7a 43 68 61 72 5b 6e          azChar[n
6c80: 43 68 61 72 5d 20 3d 20 28 75 6e 73 69 67 6e 65  Char] = (unsigne
6c90: 64 20 63 68 61 72 20 2a 29 7a 3b 0a 20 20 20 20  d char *)z;.    
6ca0: 20 20 20 20 53 51 4c 49 54 45 5f 53 4b 49 50 5f      SQLITE_SKIP_
6cb0: 55 54 46 38 28 7a 29 3b 0a 20 20 20 20 20 20 20  UTF8(z);.       
6cc0: 20 61 4c 65 6e 5b 6e 43 68 61 72 5d 20 3d 20 28   aLen[nChar] = (
6cd0: 75 38 29 28 7a 20 2d 20 61 7a 43 68 61 72 5b 6e  u8)(z - azChar[n
6ce0: 43 68 61 72 5d 29 3b 0a 20 20 20 20 20 20 7d 0a  Char]);.      }.
6cf0: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20      }.  }.  if( 
6d00: 6e 43 68 61 72 3e 30 20 29 7b 0a 20 20 20 20 66  nChar>0 ){.    f
6d10: 6c 61 67 73 20 3d 20 53 51 4c 49 54 45 5f 50 54  lags = SQLITE_PT
6d20: 52 5f 54 4f 5f 49 4e 54 28 73 71 6c 69 74 65 33  R_TO_INT(sqlite3
6d30: 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e 74 65  _user_data(conte
6d40: 78 74 29 29 3b 0a 20 20 20 20 69 66 28 20 66 6c  xt));.    if( fl
6d50: 61 67 73 20 26 20 31 20 29 7b 0a 20 20 20 20 20  ags & 1 ){.     
6d60: 20 77 68 69 6c 65 28 20 6e 49 6e 3e 30 20 29 7b   while( nIn>0 ){
6d70: 0a 20 20 20 20 20 20 20 20 69 6e 74 20 6c 65 6e  .        int len
6d80: 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20 66 6f   = 0;.        fo
6d90: 72 28 69 3d 30 3b 20 69 3c 6e 43 68 61 72 3b 20  r(i=0; i<nChar; 
6da0: 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20  i++){.          
6db0: 6c 65 6e 20 3d 20 61 4c 65 6e 5b 69 5d 3b 0a 20  len = aLen[i];. 
6dc0: 20 20 20 20 20 20 20 20 20 69 66 28 20 6c 65 6e           if( len
6dd0: 3c 3d 6e 49 6e 20 26 26 20 6d 65 6d 63 6d 70 28  <=nIn && memcmp(
6de0: 7a 49 6e 2c 20 61 7a 43 68 61 72 5b 69 5d 2c 20  zIn, azChar[i], 
6df0: 6c 65 6e 29 3d 3d 30 20 29 20 62 72 65 61 6b 3b  len)==0 ) break;
6e00: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
6e10: 20 20 20 69 66 28 20 69 3e 3d 6e 43 68 61 72 20     if( i>=nChar 
6e20: 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20  ) break;.       
6e30: 20 7a 49 6e 20 2b 3d 20 6c 65 6e 3b 0a 20 20 20   zIn += len;.   
6e40: 20 20 20 20 20 6e 49 6e 20 2d 3d 20 6c 65 6e 3b       nIn -= len;
6e50: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20  .      }.    }. 
6e60: 20 20 20 69 66 28 20 66 6c 61 67 73 20 26 20 32     if( flags & 2
6e70: 20 29 7b 0a 20 20 20 20 20 20 77 68 69 6c 65 28   ){.      while(
6e80: 20 6e 49 6e 3e 30 20 29 7b 0a 20 20 20 20 20 20   nIn>0 ){.      
6e90: 20 20 69 6e 74 20 6c 65 6e 20 3d 20 30 3b 0a 20    int len = 0;. 
6ea0: 20 20 20 20 20 20 20 66 6f 72 28 69 3d 30 3b 20         for(i=0; 
6eb0: 69 3c 6e 43 68 61 72 3b 20 69 2b 2b 29 7b 0a 20  i<nChar; i++){. 
6ec0: 20 20 20 20 20 20 20 20 20 6c 65 6e 20 3d 20 61           len = a
6ed0: 4c 65 6e 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20  Len[i];.        
6ee0: 20 20 69 66 28 20 6c 65 6e 3c 3d 6e 49 6e 20 26    if( len<=nIn &
6ef0: 26 20 6d 65 6d 63 6d 70 28 26 7a 49 6e 5b 6e 49  & memcmp(&zIn[nI
6f00: 6e 2d 6c 65 6e 5d 2c 61 7a 43 68 61 72 5b 69 5d  n-len],azChar[i]
6f10: 2c 6c 65 6e 29 3d 3d 30 20 29 20 62 72 65 61 6b  ,len)==0 ) break
6f20: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20  ;.        }.    
6f30: 20 20 20 20 69 66 28 20 69 3e 3d 6e 43 68 61 72      if( i>=nChar
6f40: 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20   ) break;.      
6f50: 20 20 6e 49 6e 20 2d 3d 20 6c 65 6e 3b 0a 20 20    nIn -= len;.  
6f60: 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20      }.    }.    
6f70: 69 66 28 20 7a 43 68 61 72 53 65 74 20 29 7b 0a  if( zCharSet ){.
6f80: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72        sqlite3_fr
6f90: 65 65 28 61 7a 43 68 61 72 29 3b 0a 20 20 20 20  ee(azChar);.    
6fa0: 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f  }.  }.  sqlite3_
6fb0: 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74  result_text(cont
6fc0: 65 78 74 2c 20 28 63 68 61 72 2a 29 7a 49 6e 2c  ext, (char*)zIn,
6fd0: 20 6e 49 6e 2c 20 53 51 4c 49 54 45 5f 54 52 41   nIn, SQLITE_TRA
6fe0: 4e 53 49 45 4e 54 29 3b 0a 7d 0a 0a 0a 23 69 66  NSIENT);.}...#if
6ff0: 64 65 66 20 53 51 4c 49 54 45 5f 53 4f 55 4e 44  def SQLITE_SOUND
7000: 45 58 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 75 74 65  EX./*.** Compute
7010: 20 74 68 65 20 73 6f 75 6e 64 65 78 20 65 6e 63   the soundex enc
7020: 6f 64 69 6e 67 20 6f 66 20 61 20 77 6f 72 64 2e  oding of a word.
7030: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
7040: 73 6f 75 6e 64 65 78 46 75 6e 63 28 0a 20 20 73  soundexFunc(.  s
7050: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
7060: 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61  context,.  int a
7070: 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76  rgc,.  sqlite3_v
7080: 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20  alue **argv.){. 
7090: 20 63 68 61 72 20 7a 52 65 73 75 6c 74 5b 38 5d   char zResult[8]
70a0: 3b 0a 20 20 63 6f 6e 73 74 20 75 38 20 2a 7a 49  ;.  const u8 *zI
70b0: 6e 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a 20  n;.  int i, j;. 
70c0: 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75 6e   static const un
70d0: 73 69 67 6e 65 64 20 63 68 61 72 20 69 43 6f 64  signed char iCod
70e0: 65 5b 5d 20 3d 20 7b 0a 20 20 20 20 30 2c 20 30  e[] = {.    0, 0
70f0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
7100: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
7110: 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20  0, 0, 0, 0,.    
7120: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
7130: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
7140: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a   0, 0, 0, 0, 0,.
7150: 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20      0, 0, 0, 0, 
7160: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
7170: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
7180: 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c   0,.    0, 0, 0,
7190: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
71a0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
71b0: 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30  , 0, 0,.    0, 0
71c0: 2c 20 31 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c  , 1, 2, 3, 0, 1,
71d0: 20 32 2c 20 30 2c 20 30 2c 20 32 2c 20 32 2c 20   2, 0, 0, 2, 2, 
71e0: 34 2c 20 35 2c 20 35 2c 20 30 2c 0a 20 20 20 20  4, 5, 5, 0,.    
71f0: 31 2c 20 32 2c 20 36 2c 20 32 2c 20 33 2c 20 30  1, 2, 6, 2, 3, 0
7200: 2c 20 31 2c 20 30 2c 20 32 2c 20 30 2c 20 32 2c  , 1, 0, 2, 0, 2,
7210: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a   0, 0, 0, 0, 0,.
7220: 20 20 20 20 30 2c 20 30 2c 20 31 2c 20 32 2c 20      0, 0, 1, 2, 
7230: 33 2c 20 30 2c 20 31 2c 20 32 2c 20 30 2c 20 30  3, 0, 1, 2, 0, 0
7240: 2c 20 32 2c 20 32 2c 20 34 2c 20 35 2c 20 35 2c  , 2, 2, 4, 5, 5,
7250: 20 30 2c 0a 20 20 20 20 31 2c 20 32 2c 20 36 2c   0,.    1, 2, 6,
7260: 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20 30 2c 20   2, 3, 0, 1, 0, 
7270: 32 2c 20 30 2c 20 32 2c 20 30 2c 20 30 2c 20 30  2, 0, 2, 0, 0, 0
7280: 2c 20 30 2c 20 30 2c 0a 20 20 7d 3b 0a 20 20 61  , 0, 0,.  };.  a
7290: 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29  ssert( argc==1 )
72a0: 3b 0a 20 20 7a 49 6e 20 3d 20 28 75 38 2a 29 73  ;.  zIn = (u8*)s
72b0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78  qlite3_value_tex
72c0: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66  t(argv[0]);.  if
72d0: 28 20 7a 49 6e 3d 3d 30 20 29 20 7a 49 6e 20 3d  ( zIn==0 ) zIn =
72e0: 20 28 75 38 2a 29 22 22 3b 0a 20 20 66 6f 72 28   (u8*)"";.  for(
72f0: 69 3d 30 3b 20 7a 49 6e 5b 69 5d 20 26 26 20 21  i=0; zIn[i] && !
7300: 73 71 6c 69 74 65 33 49 73 61 6c 70 68 61 28 7a  sqlite3Isalpha(z
7310: 49 6e 5b 69 5d 29 3b 20 69 2b 2b 29 7b 7d 0a 20  In[i]); i++){}. 
7320: 20 69 66 28 20 7a 49 6e 5b 69 5d 20 29 7b 0a 20   if( zIn[i] ){. 
7330: 20 20 20 75 38 20 70 72 65 76 63 6f 64 65 20 3d     u8 prevcode =
7340: 20 69 43 6f 64 65 5b 7a 49 6e 5b 69 5d 26 30 78   iCode[zIn[i]&0x
7350: 37 66 5d 3b 0a 20 20 20 20 7a 52 65 73 75 6c 74  7f];.    zResult
7360: 5b 30 5d 20 3d 20 73 71 6c 69 74 65 33 54 6f 75  [0] = sqlite3Tou
7370: 70 70 65 72 28 7a 49 6e 5b 69 5d 29 3b 0a 20 20  pper(zIn[i]);.  
7380: 20 20 66 6f 72 28 6a 3d 31 3b 20 6a 3c 34 20 26    for(j=1; j<4 &
7390: 26 20 7a 49 6e 5b 69 5d 3b 20 69 2b 2b 29 7b 0a  & zIn[i]; i++){.
73a0: 20 20 20 20 20 20 69 6e 74 20 63 6f 64 65 20 3d        int code =
73b0: 20 69 43 6f 64 65 5b 7a 49 6e 5b 69 5d 26 30 78   iCode[zIn[i]&0x
73c0: 37 66 5d 3b 0a 20 20 20 20 20 20 69 66 28 20 63  7f];.      if( c
73d0: 6f 64 65 3e 30 20 29 7b 0a 20 20 20 20 20 20 20  ode>0 ){.       
73e0: 20 69 66 28 20 63 6f 64 65 21 3d 70 72 65 76 63   if( code!=prevc
73f0: 6f 64 65 20 29 7b 0a 20 20 20 20 20 20 20 20 20  ode ){.         
7400: 20 70 72 65 76 63 6f 64 65 20 3d 20 63 6f 64 65   prevcode = code
7410: 3b 0a 20 20 20 20 20 20 20 20 20 20 7a 52 65 73  ;.          zRes
7420: 75 6c 74 5b 6a 2b 2b 5d 20 3d 20 63 6f 64 65 20  ult[j++] = code 
7430: 2b 20 27 30 27 3b 0a 20 20 20 20 20 20 20 20 7d  + '0';.        }
7440: 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20  .      }else{.  
7450: 20 20 20 20 20 20 70 72 65 76 63 6f 64 65 20 3d        prevcode =
7460: 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20   0;.      }.    
7470: 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 6a 3c 34  }.    while( j<4
7480: 20 29 7b 0a 20 20 20 20 20 20 7a 52 65 73 75 6c   ){.      zResul
7490: 74 5b 6a 2b 2b 5d 20 3d 20 27 30 27 3b 0a 20 20  t[j++] = '0';.  
74a0: 20 20 7d 0a 20 20 20 20 7a 52 65 73 75 6c 74 5b    }.    zResult[
74b0: 6a 5d 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c 69  j] = 0;.    sqli
74c0: 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28  te3_result_text(
74d0: 63 6f 6e 74 65 78 74 2c 20 7a 52 65 73 75 6c 74  context, zResult
74e0: 2c 20 34 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e  , 4, SQLITE_TRAN
74f0: 53 49 45 4e 54 29 3b 0a 20 20 7d 65 6c 73 65 7b  SIENT);.  }else{
7500: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
7510: 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74  ult_text(context
7520: 2c 20 22 3f 30 30 30 22 2c 20 34 2c 20 53 51 4c  , "?000", 4, SQL
7530: 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 20 20 7d  ITE_STATIC);.  }
7540: 0a 7d 0a 23 65 6e 64 69 66 0a 0a 23 69 66 6e 64  .}.#endif..#ifnd
7550: 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 4c  ef SQLITE_OMIT_L
7560: 4f 41 44 5f 45 58 54 45 4e 53 49 4f 4e 0a 2f 2a  OAD_EXTENSION./*
7570: 0a 2a 2a 20 41 20 66 75 6e 63 74 69 6f 6e 20 74  .** A function t
7580: 68 61 74 20 6c 6f 61 64 73 20 61 20 73 68 61 72  hat loads a shar
7590: 65 64 2d 6c 69 62 72 61 72 79 20 65 78 74 65 6e  ed-library exten
75a0: 73 69 6f 6e 20 74 68 65 6e 20 72 65 74 75 72 6e  sion then return
75b0: 73 20 4e 55 4c 4c 2e 0a 2a 2f 0a 73 74 61 74 69  s NULL..*/.stati
75c0: 63 20 76 6f 69 64 20 6c 6f 61 64 45 78 74 28 73  c void loadExt(s
75d0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a  qlite3_context *
75e0: 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67  context, int arg
75f0: 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  c, sqlite3_value
7600: 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63 6f 6e 73   **argv){.  cons
7610: 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 20 3d 20  t char *zFile = 
7620: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 29 73 71  (const char *)sq
7630: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
7640: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 63 6f 6e  (argv[0]);.  con
7650: 73 74 20 63 68 61 72 20 2a 7a 50 72 6f 63 3b 0a  st char *zProc;.
7660: 20 20 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20    sqlite3 *db = 
7670: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f  sqlite3_context_
7680: 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78  db_handle(contex
7690: 74 29 3b 0a 20 20 63 68 61 72 20 2a 7a 45 72 72  t);.  char *zErr
76a0: 4d 73 67 20 3d 20 30 3b 0a 0a 20 20 69 66 28 20  Msg = 0;..  if( 
76b0: 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20 7a  argc==2 ){.    z
76c0: 50 72 6f 63 20 3d 20 28 63 6f 6e 73 74 20 63 68  Proc = (const ch
76d0: 61 72 20 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  ar *)sqlite3_val
76e0: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 31 5d 29  ue_text(argv[1])
76f0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a  ;.  }else{.    z
7700: 50 72 6f 63 20 3d 20 30 3b 0a 20 20 7d 0a 20 20  Proc = 0;.  }.  
7710: 69 66 28 20 7a 46 69 6c 65 20 26 26 20 73 71 6c  if( zFile && sql
7720: 69 74 65 33 5f 6c 6f 61 64 5f 65 78 74 65 6e 73  ite3_load_extens
7730: 69 6f 6e 28 64 62 2c 20 7a 46 69 6c 65 2c 20 7a  ion(db, zFile, z
7740: 50 72 6f 63 2c 20 26 7a 45 72 72 4d 73 67 29 20  Proc, &zErrMsg) 
7750: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72  ){.    sqlite3_r
7760: 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74  esult_error(cont
7770: 65 78 74 2c 20 7a 45 72 72 4d 73 67 2c 20 2d 31  ext, zErrMsg, -1
7780: 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 66  );.    sqlite3_f
7790: 72 65 65 28 7a 45 72 72 4d 73 67 29 3b 0a 20 20  ree(zErrMsg);.  
77a0: 7d 0a 7d 0a 23 65 6e 64 69 66 0a 0a 0a 2f 2a 0a  }.}.#endif.../*.
77b0: 2a 2a 20 41 6e 20 69 6e 73 74 61 6e 63 65 20 6f  ** An instance o
77c0: 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20  f the following 
77d0: 73 74 72 75 63 74 75 72 65 20 68 6f 6c 64 73 20  structure holds 
77e0: 74 68 65 20 63 6f 6e 74 65 78 74 20 6f 66 20 61  the context of a
77f0: 0a 2a 2a 20 73 75 6d 28 29 20 6f 72 20 61 76 67  .** sum() or avg
7800: 28 29 20 61 67 67 72 65 67 61 74 65 20 63 6f 6d  () aggregate com
7810: 70 75 74 61 74 69 6f 6e 2e 0a 2a 2f 0a 74 79 70  putation..*/.typ
7820: 65 64 65 66 20 73 74 72 75 63 74 20 53 75 6d 43  edef struct SumC
7830: 74 78 20 53 75 6d 43 74 78 3b 0a 73 74 72 75 63  tx SumCtx;.struc
7840: 74 20 53 75 6d 43 74 78 20 7b 0a 20 20 64 6f 75  t SumCtx {.  dou
7850: 62 6c 65 20 72 53 75 6d 3b 20 20 20 20 20 20 2f  ble rSum;      /
7860: 2a 20 46 6c 6f 61 74 69 6e 67 20 70 6f 69 6e 74  * Floating point
7870: 20 73 75 6d 20 2a 2f 0a 20 20 69 36 34 20 69 53   sum */.  i64 iS
7880: 75 6d 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 49  um;         /* I
7890: 6e 74 65 67 65 72 20 73 75 6d 20 2a 2f 20 20 20  nteger sum */   
78a0: 0a 20 20 69 36 34 20 63 6e 74 3b 20 20 20 20 20  .  i64 cnt;     
78b0: 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f       /* Number o
78c0: 66 20 65 6c 65 6d 65 6e 74 73 20 73 75 6d 6d 65  f elements summe
78d0: 64 20 2a 2f 0a 20 20 75 38 20 6f 76 65 72 66 6c  d */.  u8 overfl
78e0: 6f 77 3b 20 20 20 20 20 20 2f 2a 20 54 72 75 65  ow;      /* True
78f0: 20 69 66 20 69 6e 74 65 67 65 72 20 6f 76 65 72   if integer over
7900: 66 6c 6f 77 20 73 65 65 6e 20 2a 2f 0a 20 20 75  flow seen */.  u
7910: 38 20 61 70 70 72 6f 78 3b 20 20 20 20 20 20 20  8 approx;       
7920: 20 2f 2a 20 54 72 75 65 20 69 66 20 6e 6f 6e 2d   /* True if non-
7930: 69 6e 74 65 67 65 72 20 76 61 6c 75 65 20 77 61  integer value wa
7940: 73 20 69 6e 70 75 74 20 74 6f 20 74 68 65 20 73  s input to the s
7950: 75 6d 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20  um */.};../*.** 
7960: 52 6f 75 74 69 6e 65 73 20 75 73 65 64 20 74 6f  Routines used to
7970: 20 63 6f 6d 70 75 74 65 20 74 68 65 20 73 75 6d   compute the sum
7980: 2c 20 61 76 65 72 61 67 65 2c 20 61 6e 64 20 74  , average, and t
7990: 6f 74 61 6c 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20  otal..**.** The 
79a0: 53 55 4d 28 29 20 66 75 6e 63 74 69 6f 6e 20 66  SUM() function f
79b0: 6f 6c 6c 6f 77 73 20 74 68 65 20 28 62 72 6f 6b  ollows the (brok
79c0: 65 6e 29 20 53 51 4c 20 73 74 61 6e 64 61 72 64  en) SQL standard
79d0: 20 77 68 69 63 68 20 6d 65 61 6e 73 0a 2a 2a 20   which means.** 
79e0: 74 68 61 74 20 69 74 20 72 65 74 75 72 6e 73 20  that it returns 
79f0: 4e 55 4c 4c 20 69 66 20 69 74 20 73 75 6d 73 20  NULL if it sums 
7a00: 6f 76 65 72 20 6e 6f 20 69 6e 70 75 74 73 2e 20  over no inputs. 
7a10: 20 54 4f 54 41 4c 20 72 65 74 75 72 6e 73 0a 2a   TOTAL returns.*
7a20: 2a 20 30 2e 30 20 69 6e 20 74 68 61 74 20 63 61  * 0.0 in that ca
7a30: 73 65 2e 20 20 49 6e 20 61 64 64 69 74 69 6f 6e  se.  In addition
7a40: 2c 20 54 4f 54 41 4c 20 61 6c 77 61 79 73 20 72  , TOTAL always r
7a50: 65 74 75 72 6e 73 20 61 20 66 6c 6f 61 74 20 77  eturns a float w
7a60: 68 65 72 65 0a 2a 2a 20 53 55 4d 20 6d 69 67 68  here.** SUM migh
7a70: 74 20 72 65 74 75 72 6e 20 61 6e 20 69 6e 74 65  t return an inte
7a80: 67 65 72 20 69 66 20 69 74 20 6e 65 76 65 72 20  ger if it never 
7a90: 65 6e 63 6f 75 6e 74 65 72 73 20 61 20 66 6c 6f  encounters a flo
7aa0: 61 74 69 6e 67 20 70 6f 69 6e 74 0a 2a 2a 20 76  ating point.** v
7ab0: 61 6c 75 65 2e 20 20 54 4f 54 41 4c 20 6e 65 76  alue.  TOTAL nev
7ac0: 65 72 20 66 61 69 6c 73 2c 20 62 75 74 20 53 55  er fails, but SU
7ad0: 4d 20 6d 69 67 68 74 20 74 68 72 6f 75 67 68 20  M might through 
7ae0: 61 6e 20 65 78 63 65 70 74 69 6f 6e 20 69 66 0a  an exception if.
7af0: 2a 2a 20 69 74 20 6f 76 65 72 66 6c 6f 77 73 20  ** it overflows 
7b00: 61 6e 20 69 6e 74 65 67 65 72 2e 0a 2a 2f 0a 73  an integer..*/.s
7b10: 74 61 74 69 63 20 76 6f 69 64 20 73 75 6d 53 74  tatic void sumSt
7b20: 65 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  ep(sqlite3_conte
7b30: 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74  xt *context, int
7b40: 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76   argc, sqlite3_v
7b50: 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20  alue **argv){.  
7b60: 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 69 6e 74  SumCtx *p;.  int
7b70: 20 74 79 70 65 3b 0a 20 20 61 73 73 65 72 74 28   type;.  assert(
7b80: 20 61 72 67 63 3d 3d 31 20 29 3b 0a 20 20 55 4e   argc==1 );.  UN
7b90: 55 53 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61  USED_PARAMETER(a
7ba0: 72 67 63 29 3b 0a 20 20 70 20 3d 20 73 71 6c 69  rgc);.  p = sqli
7bb0: 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f  te3_aggregate_co
7bc0: 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73  ntext(context, s
7bd0: 69 7a 65 6f 66 28 2a 70 29 29 3b 0a 20 20 74 79  izeof(*p));.  ty
7be0: 70 65 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  pe = sqlite3_val
7bf0: 75 65 5f 6e 75 6d 65 72 69 63 5f 74 79 70 65 28  ue_numeric_type(
7c00: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20  argv[0]);.  if( 
7c10: 70 20 26 26 20 74 79 70 65 21 3d 53 51 4c 49 54  p && type!=SQLIT
7c20: 45 5f 4e 55 4c 4c 20 29 7b 0a 20 20 20 20 70 2d  E_NULL ){.    p-
7c30: 3e 63 6e 74 2b 2b 3b 0a 20 20 20 20 69 66 28 20  >cnt++;.    if( 
7c40: 74 79 70 65 3d 3d 53 51 4c 49 54 45 5f 49 4e 54  type==SQLITE_INT
7c50: 45 47 45 52 20 29 7b 0a 20 20 20 20 20 20 69 36  EGER ){.      i6
7c60: 34 20 76 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  4 v = sqlite3_va
7c70: 6c 75 65 5f 69 6e 74 36 34 28 61 72 67 76 5b 30  lue_int64(argv[0
7c80: 5d 29 3b 0a 20 20 20 20 20 20 70 2d 3e 72 53 75  ]);.      p->rSu
7c90: 6d 20 2b 3d 20 76 3b 0a 20 20 20 20 20 20 69 66  m += v;.      if
7ca0: 28 20 28 70 2d 3e 61 70 70 72 6f 78 7c 70 2d 3e  ( (p->approx|p->
7cb0: 6f 76 65 72 66 6c 6f 77 29 3d 3d 30 20 29 7b 0a  overflow)==0 ){.
7cc0: 20 20 20 20 20 20 20 20 69 36 34 20 69 4e 65 77          i64 iNew
7cd0: 53 75 6d 20 3d 20 70 2d 3e 69 53 75 6d 20 2b 20  Sum = p->iSum + 
7ce0: 76 3b 0a 20 20 20 20 20 20 20 20 69 6e 74 20 73  v;.        int s
7cf0: 31 20 3d 20 28 69 6e 74 29 28 70 2d 3e 69 53 75  1 = (int)(p->iSu
7d00: 6d 20 3e 3e 20 28 73 69 7a 65 6f 66 28 69 36 34  m >> (sizeof(i64
7d10: 29 2a 38 2d 31 29 29 3b 0a 20 20 20 20 20 20 20  )*8-1));.       
7d20: 20 69 6e 74 20 73 32 20 3d 20 28 69 6e 74 29 28   int s2 = (int)(
7d30: 76 20 20 20 20 20 20 20 3e 3e 20 28 73 69 7a 65  v       >> (size
7d40: 6f 66 28 69 36 34 29 2a 38 2d 31 29 29 3b 0a 20  of(i64)*8-1));. 
7d50: 20 20 20 20 20 20 20 69 6e 74 20 73 33 20 3d 20         int s3 = 
7d60: 28 69 6e 74 29 28 69 4e 65 77 53 75 6d 20 3e 3e  (int)(iNewSum >>
7d70: 20 28 73 69 7a 65 6f 66 28 69 36 34 29 2a 38 2d   (sizeof(i64)*8-
7d80: 31 29 29 3b 0a 20 20 20 20 20 20 20 20 70 2d 3e  1));.        p->
7d90: 6f 76 65 72 66 6c 6f 77 20 3d 20 28 28 73 31 26  overflow = ((s1&
7da0: 73 32 26 7e 73 33 29 20 7c 20 28 7e 73 31 26 7e  s2&~s3) | (~s1&~
7db0: 73 32 26 73 33 29 29 3f 31 3a 30 3b 0a 20 20 20  s2&s3))?1:0;.   
7dc0: 20 20 20 20 20 70 2d 3e 69 53 75 6d 20 3d 20 69       p->iSum = i
7dd0: 4e 65 77 53 75 6d 3b 0a 20 20 20 20 20 20 7d 0a  NewSum;.      }.
7de0: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20      }else{.     
7df0: 20 70 2d 3e 72 53 75 6d 20 2b 3d 20 73 71 6c 69   p->rSum += sqli
7e00: 74 65 33 5f 76 61 6c 75 65 5f 64 6f 75 62 6c 65  te3_value_double
7e10: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20 20  (argv[0]);.     
7e20: 20 70 2d 3e 61 70 70 72 6f 78 20 3d 20 31 3b 0a   p->approx = 1;.
7e30: 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61 74      }.  }.}.stat
7e40: 69 63 20 76 6f 69 64 20 73 75 6d 46 69 6e 61 6c  ic void sumFinal
7e50: 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  ize(sqlite3_cont
7e60: 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20  ext *context){. 
7e70: 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 70 20   SumCtx *p;.  p 
7e80: 3d 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67  = sqlite3_aggreg
7e90: 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74  ate_context(cont
7ea0: 65 78 74 2c 20 30 29 3b 0a 20 20 69 66 28 20 70  ext, 0);.  if( p
7eb0: 20 26 26 20 70 2d 3e 63 6e 74 3e 30 20 29 7b 0a   && p->cnt>0 ){.
7ec0: 20 20 20 20 69 66 28 20 70 2d 3e 6f 76 65 72 66      if( p->overf
7ed0: 6c 6f 77 20 29 7b 0a 20 20 20 20 20 20 73 71 6c  low ){.      sql
7ee0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f  ite3_result_erro
7ef0: 72 28 63 6f 6e 74 65 78 74 2c 22 69 6e 74 65 67  r(context,"integ
7f00: 65 72 20 6f 76 65 72 66 6c 6f 77 22 2c 2d 31 29  er overflow",-1)
7f10: 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20  ;.    }else if( 
7f20: 70 2d 3e 61 70 70 72 6f 78 20 29 7b 0a 20 20 20  p->approx ){.   
7f30: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
7f40: 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74  t_double(context
7f50: 2c 20 70 2d 3e 72 53 75 6d 29 3b 0a 20 20 20 20  , p->rSum);.    
7f60: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 73 71 6c  }else{.      sql
7f70: 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36  ite3_result_int6
7f80: 34 28 63 6f 6e 74 65 78 74 2c 20 70 2d 3e 69 53  4(context, p->iS
7f90: 75 6d 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d  um);.    }.  }.}
7fa0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 61 76 67  .static void avg
7fb0: 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33  Finalize(sqlite3
7fc0: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
7fd0: 74 29 7b 0a 20 20 53 75 6d 43 74 78 20 2a 70 3b  t){.  SumCtx *p;
7fe0: 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 61  .  p = sqlite3_a
7ff0: 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74  ggregate_context
8000: 28 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20  (context, 0);.  
8010: 69 66 28 20 70 20 26 26 20 70 2d 3e 63 6e 74 3e  if( p && p->cnt>
8020: 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  0 ){.    sqlite3
8030: 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28 63  _result_double(c
8040: 6f 6e 74 65 78 74 2c 20 70 2d 3e 72 53 75 6d 2f  ontext, p->rSum/
8050: 28 64 6f 75 62 6c 65 29 70 2d 3e 63 6e 74 29 3b  (double)p->cnt);
8060: 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63 20 76 6f  .  }.}.static vo
8070: 69 64 20 74 6f 74 61 6c 46 69 6e 61 6c 69 7a 65  id totalFinalize
8080: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74  (sqlite3_context
8090: 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 75   *context){.  Su
80a0: 6d 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73  mCtx *p;.  p = s
80b0: 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65  qlite3_aggregate
80c0: 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74  _context(context
80d0: 2c 20 30 29 3b 0a 20 20 2f 2a 20 28 64 6f 75 62  , 0);.  /* (doub
80e0: 6c 65 29 30 20 49 6e 20 63 61 73 65 20 6f 66 20  le)0 In case of 
80f0: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c 4f 41  SQLITE_OMIT_FLOA
8100: 54 49 4e 47 5f 50 4f 49 4e 54 2e 2e 2e 20 2a 2f  TING_POINT... */
8110: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
8120: 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74  t_double(context
8130: 2c 20 70 20 3f 20 70 2d 3e 72 53 75 6d 20 3a 20  , p ? p->rSum : 
8140: 28 64 6f 75 62 6c 65 29 30 29 3b 0a 7d 0a 0a 2f  (double)0);.}../
8150: 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69  *.** The followi
8160: 6e 67 20 73 74 72 75 63 74 75 72 65 20 6b 65 65  ng structure kee
8170: 70 73 20 74 72 61 63 6b 20 6f 66 20 73 74 61 74  ps track of stat
8180: 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f  e information fo
8190: 72 20 74 68 65 0a 2a 2a 20 63 6f 75 6e 74 28 29  r the.** count()
81a0: 20 61 67 67 72 65 67 61 74 65 20 66 75 6e 63 74   aggregate funct
81b0: 69 6f 6e 2e 0a 2a 2f 0a 74 79 70 65 64 65 66 20  ion..*/.typedef 
81c0: 73 74 72 75 63 74 20 43 6f 75 6e 74 43 74 78 20  struct CountCtx 
81d0: 43 6f 75 6e 74 43 74 78 3b 0a 73 74 72 75 63 74  CountCtx;.struct
81e0: 20 43 6f 75 6e 74 43 74 78 20 7b 0a 20 20 69 36   CountCtx {.  i6
81f0: 34 20 6e 3b 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52  4 n;.};../*.** R
8200: 6f 75 74 69 6e 65 73 20 74 6f 20 69 6d 70 6c 65  outines to imple
8210: 6d 65 6e 74 20 74 68 65 20 63 6f 75 6e 74 28 29  ment the count()
8220: 20 61 67 67 72 65 67 61 74 65 20 66 75 6e 63 74   aggregate funct
8230: 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ion..*/.static v
8240: 6f 69 64 20 63 6f 75 6e 74 53 74 65 70 28 73 71  oid countStep(sq
8250: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
8260: 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63  ontext, int argc
8270: 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20  , sqlite3_value 
8280: 2a 2a 61 72 67 76 29 7b 0a 20 20 43 6f 75 6e 74  **argv){.  Count
8290: 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71  Ctx *p;.  p = sq
82a0: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
82b0: 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  context(context,
82c0: 20 73 69 7a 65 6f 66 28 2a 70 29 29 3b 0a 20 20   sizeof(*p));.  
82d0: 69 66 28 20 28 61 72 67 63 3d 3d 30 20 7c 7c 20  if( (argc==0 || 
82e0: 53 51 4c 49 54 45 5f 4e 55 4c 4c 21 3d 73 71 6c  SQLITE_NULL!=sql
82f0: 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28  ite3_value_type(
8300: 61 72 67 76 5b 30 5d 29 29 20 26 26 20 70 20 29  argv[0])) && p )
8310: 7b 0a 20 20 20 20 70 2d 3e 6e 2b 2b 3b 0a 20 20  {.    p->n++;.  
8320: 7d 0a 0a 23 69 66 6e 64 65 66 20 53 51 4c 49 54  }..#ifndef SQLIT
8330: 45 5f 4f 4d 49 54 5f 44 45 50 52 45 43 41 54 45  E_OMIT_DEPRECATE
8340: 44 0a 20 20 2f 2a 20 54 68 65 20 73 71 6c 69 74  D.  /* The sqlit
8350: 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 75  e3_aggregate_cou
8360: 6e 74 28 29 20 66 75 6e 63 74 69 6f 6e 20 69 73  nt() function is
8370: 20 64 65 70 72 65 63 61 74 65 64 2e 20 20 42 75   deprecated.  Bu
8380: 74 20 6a 75 73 74 20 74 6f 20 6d 61 6b 65 0a 20  t just to make. 
8390: 20 2a 2a 20 73 75 72 65 20 69 74 20 73 74 69 6c   ** sure it stil
83a0: 6c 20 6f 70 65 72 61 74 65 73 20 63 6f 72 72 65  l operates corre
83b0: 63 74 6c 79 2c 20 76 65 72 69 66 79 20 74 68 61  ctly, verify tha
83c0: 74 20 69 74 73 20 63 6f 75 6e 74 20 61 67 72 65  t its count agre
83d0: 65 73 20 77 69 74 68 20 6f 75 72 20 0a 20 20 2a  es with our .  *
83e0: 2a 20 69 6e 74 65 72 6e 61 6c 20 63 6f 75 6e 74  * internal count
83f0: 20 77 68 65 6e 20 75 73 69 6e 67 20 63 6f 75 6e   when using coun
8400: 74 28 2a 29 20 61 6e 64 20 77 68 65 6e 20 74 68  t(*) and when th
8410: 65 20 74 6f 74 61 6c 20 63 6f 75 6e 74 20 63 61  e total count ca
8420: 6e 20 62 65 0a 20 20 2a 2a 20 65 78 70 72 65 73  n be.  ** expres
8430: 73 65 64 20 61 73 20 61 20 33 32 2d 62 69 74 20  sed as a 32-bit 
8440: 69 6e 74 65 67 65 72 2e 20 2a 2f 0a 20 20 61 73  integer. */.  as
8450: 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 7c 7c  sert( argc==1 ||
8460: 20 70 3d 3d 30 20 7c 7c 20 70 2d 3e 6e 3e 30 78   p==0 || p->n>0x
8470: 37 66 66 66 66 66 66 66 0a 20 20 20 20 20 20 20  7fffffff.       
8480: 20 20 20 7c 7c 20 70 2d 3e 6e 3d 3d 73 71 6c 69     || p->n==sqli
8490: 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f  te3_aggregate_co
84a0: 75 6e 74 28 63 6f 6e 74 65 78 74 29 20 29 3b 0a  unt(context) );.
84b0: 23 65 6e 64 69 66 0a 7d 20 20 20 0a 73 74 61 74  #endif.}   .stat
84c0: 69 63 20 76 6f 69 64 20 63 6f 75 6e 74 46 69 6e  ic void countFin
84d0: 61 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f  alize(sqlite3_co
84e0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b  ntext *context){
84f0: 0a 20 20 43 6f 75 6e 74 43 74 78 20 2a 70 3b 0a  .  CountCtx *p;.
8500: 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 61 67    p = sqlite3_ag
8510: 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28  gregate_context(
8520: 63 6f 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20 73  context, 0);.  s
8530: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
8540: 74 36 34 28 63 6f 6e 74 65 78 74 2c 20 70 20 3f  t64(context, p ?
8550: 20 70 2d 3e 6e 20 3a 20 30 29 3b 0a 7d 0a 0a 2f   p->n : 0);.}../
8560: 2a 0a 2a 2a 20 52 6f 75 74 69 6e 65 73 20 74 6f  *.** Routines to
8570: 20 69 6d 70 6c 65 6d 65 6e 74 20 6d 69 6e 28 29   implement min()
8580: 20 61 6e 64 20 6d 61 78 28 29 20 61 67 67 72 65   and max() aggre
8590: 67 61 74 65 20 66 75 6e 63 74 69 6f 6e 73 2e 0a  gate functions..
85a0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6d  */.static void m
85b0: 69 6e 6d 61 78 53 74 65 70 28 0a 20 20 73 71 6c  inmaxStep(.  sql
85c0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
85d0: 6e 74 65 78 74 2c 20 0a 20 20 69 6e 74 20 4e 6f  ntext, .  int No
85e0: 74 55 73 65 64 2c 20 0a 20 20 73 71 6c 69 74 65  tUsed, .  sqlite
85f0: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29  3_value **argv.)
8600: 7b 0a 20 20 4d 65 6d 20 2a 70 41 72 67 20 20 3d  {.  Mem *pArg  =
8610: 20 28 4d 65 6d 20 2a 29 61 72 67 76 5b 30 5d 3b   (Mem *)argv[0];
8620: 0a 20 20 4d 65 6d 20 2a 70 42 65 73 74 3b 0a 20  .  Mem *pBest;. 
8630: 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54 45   UNUSED_PARAMETE
8640: 52 28 4e 6f 74 55 73 65 64 29 3b 0a 0a 20 20 69  R(NotUsed);..  i
8650: 66 28 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  f( sqlite3_value
8660: 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 3d 3d  _type(argv[0])==
8670: 53 51 4c 49 54 45 5f 4e 55 4c 4c 20 29 20 72 65  SQLITE_NULL ) re
8680: 74 75 72 6e 3b 0a 20 20 70 42 65 73 74 20 3d 20  turn;.  pBest = 
8690: 28 4d 65 6d 20 2a 29 73 71 6c 69 74 65 33 5f 61  (Mem *)sqlite3_a
86a0: 67 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74  ggregate_context
86b0: 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f 66  (context, sizeof
86c0: 28 2a 70 42 65 73 74 29 29 3b 0a 20 20 69 66 28  (*pBest));.  if(
86d0: 20 21 70 42 65 73 74 20 29 20 72 65 74 75 72 6e   !pBest ) return
86e0: 3b 0a 0a 20 20 69 66 28 20 70 42 65 73 74 2d 3e  ;..  if( pBest->
86f0: 66 6c 61 67 73 20 29 7b 0a 20 20 20 20 69 6e 74  flags ){.    int
8700: 20 6d 61 78 3b 0a 20 20 20 20 69 6e 74 20 63 6d   max;.    int cm
8710: 70 3b 0a 20 20 20 20 43 6f 6c 6c 53 65 71 20 2a  p;.    CollSeq *
8720: 70 43 6f 6c 6c 20 3d 20 73 71 6c 69 74 65 33 47  pColl = sqlite3G
8730: 65 74 46 75 6e 63 43 6f 6c 6c 53 65 71 28 63 6f  etFuncCollSeq(co
8740: 6e 74 65 78 74 29 3b 0a 20 20 20 20 2f 2a 20 54  ntext);.    /* T
8750: 68 69 73 20 73 74 65 70 20 66 75 6e 63 74 69 6f  his step functio
8760: 6e 20 69 73 20 75 73 65 64 20 66 6f 72 20 62 6f  n is used for bo
8770: 74 68 20 74 68 65 20 6d 69 6e 28 29 20 61 6e 64  th the min() and
8780: 20 6d 61 78 28 29 20 61 67 67 72 65 67 61 74 65   max() aggregate
8790: 73 2c 0a 20 20 20 20 2a 2a 20 74 68 65 20 6f 6e  s,.    ** the on
87a0: 6c 79 20 64 69 66 66 65 72 65 6e 63 65 20 62 65  ly difference be
87b0: 74 77 65 65 6e 20 74 68 65 20 74 77 6f 20 62 65  tween the two be
87c0: 69 6e 67 20 74 68 61 74 20 74 68 65 20 73 65 6e  ing that the sen
87d0: 73 65 20 6f 66 20 74 68 65 0a 20 20 20 20 2a 2a  se of the.    **
87e0: 20 63 6f 6d 70 61 72 69 73 6f 6e 20 69 73 20 69   comparison is i
87f0: 6e 76 65 72 74 65 64 2e 20 46 6f 72 20 74 68 65  nverted. For the
8800: 20 6d 61 78 28 29 20 61 67 67 72 65 67 61 74 65   max() aggregate
8810: 2c 20 74 68 65 0a 20 20 20 20 2a 2a 20 73 71 6c  , the.    ** sql
8820: 69 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28 29  ite3_user_data()
8830: 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e   function return
8840: 73 20 28 76 6f 69 64 20 2a 29 2d 31 2e 20 46 6f  s (void *)-1. Fo
8850: 72 20 6d 69 6e 28 29 20 69 74 0a 20 20 20 20 2a  r min() it.    *
8860: 2a 20 72 65 74 75 72 6e 73 20 28 76 6f 69 64 20  * returns (void 
8870: 2a 29 64 62 2c 20 77 68 65 72 65 20 64 62 20 69  *)db, where db i
8880: 73 20 74 68 65 20 73 71 6c 69 74 65 33 2a 20 64  s the sqlite3* d
8890: 61 74 61 62 61 73 65 20 70 6f 69 6e 74 65 72 2e  atabase pointer.
88a0: 0a 20 20 20 20 2a 2a 20 54 68 65 72 65 66 6f 72  .    ** Therefor
88b0: 65 20 74 68 65 20 6e 65 78 74 20 73 74 61 74 65  e the next state
88c0: 6d 65 6e 74 20 73 65 74 73 20 76 61 72 69 61 62  ment sets variab
88d0: 6c 65 20 27 6d 61 78 27 20 74 6f 20 31 20 66 6f  le 'max' to 1 fo
88e0: 72 20 74 68 65 20 6d 61 78 28 29 0a 20 20 20 20  r the max().    
88f0: 2a 2a 20 61 67 67 72 65 67 61 74 65 2c 20 6f 72  ** aggregate, or
8900: 20 30 20 66 6f 72 20 6d 69 6e 28 29 2e 0a 20 20   0 for min()..  
8910: 20 20 2a 2f 0a 20 20 20 20 6d 61 78 20 3d 20 73    */.    max = s
8920: 71 6c 69 74 65 33 5f 75 73 65 72 5f 64 61 74 61  qlite3_user_data
8930: 28 63 6f 6e 74 65 78 74 29 21 3d 30 3b 0a 20 20  (context)!=0;.  
8940: 20 20 63 6d 70 20 3d 20 73 71 6c 69 74 65 33 4d    cmp = sqlite3M
8950: 65 6d 43 6f 6d 70 61 72 65 28 70 42 65 73 74 2c  emCompare(pBest,
8960: 20 70 41 72 67 2c 20 70 43 6f 6c 6c 29 3b 0a 20   pArg, pColl);. 
8970: 20 20 20 69 66 28 20 28 6d 61 78 20 26 26 20 63     if( (max && c
8980: 6d 70 3c 30 29 20 7c 7c 20 28 21 6d 61 78 20 26  mp<0) || (!max &
8990: 26 20 63 6d 70 3e 30 29 20 29 7b 0a 20 20 20 20  & cmp>0) ){.    
89a0: 20 20 73 71 6c 69 74 65 33 56 64 62 65 4d 65 6d    sqlite3VdbeMem
89b0: 43 6f 70 79 28 70 42 65 73 74 2c 20 70 41 72 67  Copy(pBest, pArg
89c0: 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65  );.    }.  }else
89d0: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 56 64 62  {.    sqlite3Vdb
89e0: 65 4d 65 6d 43 6f 70 79 28 70 42 65 73 74 2c 20  eMemCopy(pBest, 
89f0: 70 41 72 67 29 3b 0a 20 20 7d 0a 7d 0a 73 74 61  pArg);.  }.}.sta
8a00: 74 69 63 20 76 6f 69 64 20 6d 69 6e 4d 61 78 46  tic void minMaxF
8a10: 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f  inalize(sqlite3_
8a20: 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74  context *context
8a30: 29 7b 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  ){.  sqlite3_val
8a40: 75 65 20 2a 70 52 65 73 3b 0a 20 20 70 52 65 73  ue *pRes;.  pRes
8a50: 20 3d 20 28 73 71 6c 69 74 65 33 5f 76 61 6c 75   = (sqlite3_valu
8a60: 65 20 2a 29 73 71 6c 69 74 65 33 5f 61 67 67 72  e *)sqlite3_aggr
8a70: 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f  egate_context(co
8a80: 6e 74 65 78 74 2c 20 30 29 3b 0a 20 20 69 66 28  ntext, 0);.  if(
8a90: 20 70 52 65 73 20 29 7b 0a 20 20 20 20 69 66 28   pRes ){.    if(
8aa0: 20 41 4c 57 41 59 53 28 70 52 65 73 2d 3e 66 6c   ALWAYS(pRes->fl
8ab0: 61 67 73 29 20 29 7b 0a 20 20 20 20 20 20 73 71  ags) ){.      sq
8ac0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 76 61 6c  lite3_result_val
8ad0: 75 65 28 63 6f 6e 74 65 78 74 2c 20 70 52 65 73  ue(context, pRes
8ae0: 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73 71 6c  );.    }.    sql
8af0: 69 74 65 33 56 64 62 65 4d 65 6d 52 65 6c 65 61  ite3VdbeMemRelea
8b00: 73 65 28 70 52 65 73 29 3b 0a 20 20 7d 0a 7d 0a  se(pRes);.  }.}.
8b10: 0a 2f 2a 0a 2a 2a 20 67 72 6f 75 70 5f 63 6f 6e  ./*.** group_con
8b20: 63 61 74 28 45 58 50 52 2c 20 3f 53 45 50 41 52  cat(EXPR, ?SEPAR
8b30: 41 54 4f 52 3f 29 0a 2a 2f 0a 73 74 61 74 69 63  ATOR?).*/.static
8b40: 20 76 6f 69 64 20 67 72 6f 75 70 43 6f 6e 63 61   void groupConca
8b50: 74 53 74 65 70 28 0a 20 20 73 71 6c 69 74 65 33  tStep(.  sqlite3
8b60: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
8b70: 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20  t,.  int argc,. 
8b80: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
8b90: 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74  *argv.){.  const
8ba0: 20 63 68 61 72 20 2a 7a 56 61 6c 3b 0a 20 20 53   char *zVal;.  S
8bb0: 74 72 41 63 63 75 6d 20 2a 70 41 63 63 75 6d 3b  trAccum *pAccum;
8bc0: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
8bd0: 53 65 70 3b 0a 20 20 69 6e 74 20 6e 56 61 6c 2c  Sep;.  int nVal,
8be0: 20 6e 53 65 70 3b 0a 20 20 61 73 73 65 72 74 28   nSep;.  assert(
8bf0: 20 61 72 67 63 3d 3d 31 20 7c 7c 20 61 72 67 63   argc==1 || argc
8c00: 3d 3d 32 20 29 3b 0a 20 20 69 66 28 20 73 71 6c  ==2 );.  if( sql
8c10: 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28  ite3_value_type(
8c20: 61 72 67 76 5b 30 5d 29 3d 3d 53 51 4c 49 54 45  argv[0])==SQLITE
8c30: 5f 4e 55 4c 4c 20 29 20 72 65 74 75 72 6e 3b 0a  _NULL ) return;.
8c40: 20 20 70 41 63 63 75 6d 20 3d 20 28 53 74 72 41    pAccum = (StrA
8c50: 63 63 75 6d 2a 29 73 71 6c 69 74 65 33 5f 61 67  ccum*)sqlite3_ag
8c60: 67 72 65 67 61 74 65 5f 63 6f 6e 74 65 78 74 28  gregate_context(
8c70: 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f 66 28  context, sizeof(
8c80: 2a 70 41 63 63 75 6d 29 29 3b 0a 0a 20 20 69 66  *pAccum));..  if
8c90: 28 20 70 41 63 63 75 6d 20 29 7b 0a 20 20 20 20  ( pAccum ){.    
8ca0: 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 73 71  sqlite3 *db = sq
8cb0: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62  lite3_context_db
8cc0: 5f 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29  _handle(context)
8cd0: 3b 0a 20 20 20 20 69 6e 74 20 6e 3b 0a 20 20 20  ;.    int n;.   
8ce0: 20 70 41 63 63 75 6d 2d 3e 75 73 65 4d 61 6c 6c   pAccum->useMall
8cf0: 6f 63 20 3d 20 31 3b 0a 20 20 20 20 70 41 63 63  oc = 1;.    pAcc
8d00: 75 6d 2d 3e 6d 78 41 6c 6c 6f 63 20 3d 20 64 62  um->mxAlloc = db
8d10: 2d 3e 61 4c 69 6d 69 74 5b 53 51 4c 49 54 45 5f  ->aLimit[SQLITE_
8d20: 4c 49 4d 49 54 5f 4c 45 4e 47 54 48 5d 3b 0a 23  LIMIT_LENGTH];.#
8d30: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49  ifdef SQLITE_OMI
8d40: 54 5f 44 45 50 52 45 43 41 54 45 44 0a 20 20 20  T_DEPRECATED.   
8d50: 20 6e 20 3d 20 63 6f 6e 74 65 78 74 2d 3e 70 4d   n = context->pM
8d60: 65 6d 2d 3e 6e 3b 0a 23 65 6c 73 65 0a 20 20 20  em->n;.#else.   
8d70: 20 6e 20 3d 20 73 71 6c 69 74 65 33 5f 61 67 67   n = sqlite3_agg
8d80: 72 65 67 61 74 65 5f 63 6f 75 6e 74 28 63 6f 6e  regate_count(con
8d90: 74 65 78 74 29 3b 0a 23 65 6e 64 69 66 0a 20 20  text);.#endif.  
8da0: 20 20 69 66 28 20 6e 3e 31 20 29 7b 0a 20 20 20    if( n>1 ){.   
8db0: 20 20 20 69 66 28 20 61 72 67 63 3d 3d 32 20 29     if( argc==2 )
8dc0: 7b 0a 20 20 20 20 20 20 20 20 7a 53 65 70 20 3d  {.        zSep =
8dd0: 20 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f   (char*)sqlite3_
8de0: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
8df0: 31 5d 29 3b 0a 20 20 20 20 20 20 20 20 6e 53 65  1]);.        nSe
8e00: 70 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  p = sqlite3_valu
8e10: 65 5f 62 79 74 65 73 28 61 72 67 76 5b 31 5d 29  e_bytes(argv[1])
8e20: 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20  ;.      }else{. 
8e30: 20 20 20 20 20 20 20 7a 53 65 70 20 3d 20 22 2c         zSep = ",
8e40: 22 3b 0a 20 20 20 20 20 20 20 20 6e 53 65 70 20  ";.        nSep 
8e50: 3d 20 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  = 1;.      }.   
8e60: 20 20 20 73 71 6c 69 74 65 33 53 74 72 41 63 63     sqlite3StrAcc
8e70: 75 6d 41 70 70 65 6e 64 28 70 41 63 63 75 6d 2c  umAppend(pAccum,
8e80: 20 7a 53 65 70 2c 20 6e 53 65 70 29 3b 0a 20 20   zSep, nSep);.  
8e90: 20 20 7d 0a 20 20 20 20 7a 56 61 6c 20 3d 20 28    }.    zVal = (
8ea0: 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61  char*)sqlite3_va
8eb0: 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d  lue_text(argv[0]
8ec0: 29 3b 0a 20 20 20 20 6e 56 61 6c 20 3d 20 73 71  );.    nVal = sq
8ed0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65  lite3_value_byte
8ee0: 73 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 20 20  s(argv[0]);.    
8ef0: 73 71 6c 69 74 65 33 53 74 72 41 63 63 75 6d 41  sqlite3StrAccumA
8f00: 70 70 65 6e 64 28 70 41 63 63 75 6d 2c 20 7a 56  ppend(pAccum, zV
8f10: 61 6c 2c 20 6e 56 61 6c 29 3b 0a 20 20 7d 0a 7d  al, nVal);.  }.}
8f20: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 67 72 6f  .static void gro
8f30: 75 70 43 6f 6e 63 61 74 46 69 6e 61 6c 69 7a 65  upConcatFinalize
8f40: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74  (sqlite3_context
8f50: 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20 53 74   *context){.  St
8f60: 72 41 63 63 75 6d 20 2a 70 41 63 63 75 6d 3b 0a  rAccum *pAccum;.
8f70: 20 20 70 41 63 63 75 6d 20 3d 20 73 71 6c 69 74    pAccum = sqlit
8f80: 65 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e  e3_aggregate_con
8f90: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 30 29  text(context, 0)
8fa0: 3b 0a 20 20 69 66 28 20 70 41 63 63 75 6d 20 29  ;.  if( pAccum )
8fb0: 7b 0a 20 20 20 20 69 66 28 20 70 41 63 63 75 6d  {.    if( pAccum
8fc0: 2d 3e 74 6f 6f 42 69 67 20 29 7b 0a 20 20 20 20  ->tooBig ){.    
8fd0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
8fe0: 5f 65 72 72 6f 72 5f 74 6f 6f 62 69 67 28 63 6f  _error_toobig(co
8ff0: 6e 74 65 78 74 29 3b 0a 20 20 20 20 7d 65 6c 73  ntext);.    }els
9000: 65 20 69 66 28 20 70 41 63 63 75 6d 2d 3e 6d 61  e if( pAccum->ma
9010: 6c 6c 6f 63 46 61 69 6c 65 64 20 29 7b 0a 20 20  llocFailed ){.  
9020: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
9030: 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63  lt_error_nomem(c
9040: 6f 6e 74 65 78 74 29 3b 0a 20 20 20 20 7d 65 6c  ontext);.    }el
9050: 73 65 7b 20 20 20 20 0a 20 20 20 20 20 20 73 71  se{    .      sq
9060: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
9070: 74 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74  t(context, sqlit
9080: 65 33 53 74 72 41 63 63 75 6d 46 69 6e 69 73 68  e3StrAccumFinish
9090: 28 70 41 63 63 75 6d 29 2c 20 2d 31 2c 20 0a 20  (pAccum), -1, . 
90a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
90b0: 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33           sqlite3
90c0: 5f 66 72 65 65 29 3b 0a 20 20 20 20 7d 0a 20 20  _free);.    }.  
90d0: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20  }.}../*.** This 
90e0: 66 75 6e 63 74 69 6f 6e 20 72 65 67 69 73 74 65  function registe
90f0: 72 65 64 20 61 6c 6c 20 6f 66 20 74 68 65 20 61  red all of the a
9100: 62 6f 76 65 20 43 20 66 75 6e 63 74 69 6f 6e 73  bove C functions
9110: 20 61 73 20 53 51 4c 0a 2a 2a 20 66 75 6e 63 74   as SQL.** funct
9120: 69 6f 6e 73 2e 20 20 54 68 69 73 20 73 68 6f 75  ions.  This shou
9130: 6c 64 20 62 65 20 74 68 65 20 6f 6e 6c 79 20 72  ld be the only r
9140: 6f 75 74 69 6e 65 20 69 6e 20 74 68 69 73 20 66  outine in this f
9150: 69 6c 65 20 77 69 74 68 0a 2a 2a 20 65 78 74 65  ile with.** exte
9160: 72 6e 61 6c 20 6c 69 6e 6b 61 67 65 2e 0a 2a 2f  rnal linkage..*/
9170: 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 52 65 67  .void sqlite3Reg
9180: 69 73 74 65 72 42 75 69 6c 74 69 6e 46 75 6e 63  isterBuiltinFunc
9190: 74 69 6f 6e 73 28 73 71 6c 69 74 65 33 20 2a 64  tions(sqlite3 *d
91a0: 62 29 7b 0a 23 69 66 6e 64 65 66 20 53 51 4c 49  b){.#ifndef SQLI
91b0: 54 45 5f 4f 4d 49 54 5f 41 4c 54 45 52 54 41 42  TE_OMIT_ALTERTAB
91c0: 4c 45 0a 20 20 73 71 6c 69 74 65 33 41 6c 74 65  LE.  sqlite3Alte
91d0: 72 46 75 6e 63 74 69 6f 6e 73 28 64 62 29 3b 0a  rFunctions(db);.
91e0: 23 65 6e 64 69 66 0a 20 20 69 66 28 20 21 64 62  #endif.  if( !db
91f0: 2d 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20 29  ->mallocFailed )
9200: 7b 0a 20 20 20 20 69 6e 74 20 72 63 20 3d 20 73  {.    int rc = s
9210: 71 6c 69 74 65 33 5f 6f 76 65 72 6c 6f 61 64 5f  qlite3_overload_
9220: 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20 22 4d 41  function(db, "MA
9230: 54 43 48 22 2c 20 32 29 3b 0a 20 20 20 20 61 73  TCH", 2);.    as
9240: 73 65 72 74 28 20 72 63 3d 3d 53 51 4c 49 54 45  sert( rc==SQLITE
9250: 5f 4e 4f 4d 45 4d 20 7c 7c 20 72 63 3d 3d 53 51  _NOMEM || rc==SQ
9260: 4c 49 54 45 5f 4f 4b 20 29 3b 0a 20 20 20 20 69  LITE_OK );.    i
9270: 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4e 4f  f( rc==SQLITE_NO
9280: 4d 45 4d 20 29 7b 0a 20 20 20 20 20 20 64 62 2d  MEM ){.      db-
9290: 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20 3d 20  >mallocFailed = 
92a0: 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a  1;.    }.  }.}..
92b0: 2f 2a 0a 2a 2a 20 53 65 74 20 74 68 65 20 4c 49  /*.** Set the LI
92c0: 4b 45 4f 50 54 20 66 6c 61 67 20 6f 6e 20 74 68  KEOPT flag on th
92d0: 65 20 32 2d 61 72 67 75 6d 65 6e 74 20 66 75 6e  e 2-argument fun
92e0: 63 74 69 6f 6e 20 77 69 74 68 20 74 68 65 20 67  ction with the g
92f0: 69 76 65 6e 20 6e 61 6d 65 2e 0a 2a 2f 0a 73 74  iven name..*/.st
9300: 61 74 69 63 20 76 6f 69 64 20 73 65 74 4c 69 6b  atic void setLik
9310: 65 4f 70 74 46 6c 61 67 28 73 71 6c 69 74 65 33  eOptFlag(sqlite3
9320: 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61 72   *db, const char
9330: 20 2a 7a 4e 61 6d 65 2c 20 75 38 20 66 6c 61 67   *zName, u8 flag
9340: 56 61 6c 29 7b 0a 20 20 46 75 6e 63 44 65 66 20  Val){.  FuncDef 
9350: 2a 70 44 65 66 3b 0a 20 20 70 44 65 66 20 3d 20  *pDef;.  pDef = 
9360: 73 71 6c 69 74 65 33 46 69 6e 64 46 75 6e 63 74  sqlite3FindFunct
9370: 69 6f 6e 28 64 62 2c 20 7a 4e 61 6d 65 2c 20 73  ion(db, zName, s
9380: 71 6c 69 74 65 33 53 74 72 6c 65 6e 33 30 28 7a  qlite3Strlen30(z
9390: 4e 61 6d 65 29 2c 0a 20 20 20 20 20 20 20 20 20  Name),.         
93a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
93b0: 20 20 20 20 32 2c 20 53 51 4c 49 54 45 5f 55 54      2, SQLITE_UT
93c0: 46 38 2c 20 30 29 3b 0a 20 20 69 66 28 20 41 4c  F8, 0);.  if( AL
93d0: 57 41 59 53 28 70 44 65 66 29 20 29 7b 0a 20 20  WAYS(pDef) ){.  
93e0: 20 20 70 44 65 66 2d 3e 66 6c 61 67 73 20 3d 20    pDef->flags = 
93f0: 66 6c 61 67 56 61 6c 3b 0a 20 20 7d 0a 7d 0a 0a  flagVal;.  }.}..
9400: 2f 2a 0a 2a 2a 20 52 65 67 69 73 74 65 72 20 74  /*.** Register t
9410: 68 65 20 62 75 69 6c 74 2d 69 6e 20 4c 49 4b 45  he built-in LIKE
9420: 20 61 6e 64 20 47 4c 4f 42 20 66 75 6e 63 74 69   and GLOB functi
9430: 6f 6e 73 2e 20 20 54 68 65 20 63 61 73 65 53 65  ons.  The caseSe
9440: 6e 73 69 74 69 76 65 0a 2a 2a 20 70 61 72 61 6d  nsitive.** param
9450: 65 74 65 72 20 64 65 74 65 72 6d 69 6e 65 73 20  eter determines 
9460: 77 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74  whether or not t
9470: 68 65 20 4c 49 4b 45 20 6f 70 65 72 61 74 6f 72  he LIKE operator
9480: 20 69 73 20 63 61 73 65 0a 2a 2a 20 73 65 6e 73   is case.** sens
9490: 69 74 69 76 65 2e 20 20 47 4c 4f 42 20 69 73 20  itive.  GLOB is 
94a0: 61 6c 77 61 79 73 20 63 61 73 65 20 73 65 6e 73  always case sens
94b0: 69 74 69 76 65 2e 0a 2a 2f 0a 76 6f 69 64 20 73  itive..*/.void s
94c0: 71 6c 69 74 65 33 52 65 67 69 73 74 65 72 4c 69  qlite3RegisterLi
94d0: 6b 65 46 75 6e 63 74 69 6f 6e 73 28 73 71 6c 69  keFunctions(sqli
94e0: 74 65 33 20 2a 64 62 2c 20 69 6e 74 20 63 61 73  te3 *db, int cas
94f0: 65 53 65 6e 73 69 74 69 76 65 29 7b 0a 20 20 73  eSensitive){.  s
9500: 74 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66  truct compareInf
9510: 6f 20 2a 70 49 6e 66 6f 3b 0a 20 20 69 66 28 20  o *pInfo;.  if( 
9520: 63 61 73 65 53 65 6e 73 69 74 69 76 65 20 29 7b  caseSensitive ){
9530: 0a 20 20 20 20 70 49 6e 66 6f 20 3d 20 28 73 74  .    pInfo = (st
9540: 72 75 63 74 20 63 6f 6d 70 61 72 65 49 6e 66 6f  ruct compareInfo
9550: 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 3b 0a  *)&likeInfoAlt;.
9560: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 70 49 6e    }else{.    pIn
9570: 66 6f 20 3d 20 28 73 74 72 75 63 74 20 63 6f 6d  fo = (struct com
9580: 70 61 72 65 49 6e 66 6f 2a 29 26 6c 69 6b 65 49  pareInfo*)&likeI
9590: 6e 66 6f 4e 6f 72 6d 3b 0a 20 20 7d 0a 20 20 73  nfoNorm;.  }.  s
95a0: 71 6c 69 74 65 33 43 72 65 61 74 65 46 75 6e 63  qlite3CreateFunc
95b0: 28 64 62 2c 20 22 6c 69 6b 65 22 2c 20 32 2c 20  (db, "like", 2, 
95c0: 53 51 4c 49 54 45 5f 41 4e 59 2c 20 70 49 6e 66  SQLITE_ANY, pInf
95d0: 6f 2c 20 6c 69 6b 65 46 75 6e 63 2c 20 30 2c 20  o, likeFunc, 0, 
95e0: 30 29 3b 0a 20 20 73 71 6c 69 74 65 33 43 72 65  0);.  sqlite3Cre
95f0: 61 74 65 46 75 6e 63 28 64 62 2c 20 22 6c 69 6b  ateFunc(db, "lik
9600: 65 22 2c 20 33 2c 20 53 51 4c 49 54 45 5f 41 4e  e", 3, SQLITE_AN
9610: 59 2c 20 70 49 6e 66 6f 2c 20 6c 69 6b 65 46 75  Y, pInfo, likeFu
9620: 6e 63 2c 20 30 2c 20 30 29 3b 0a 20 20 73 71 6c  nc, 0, 0);.  sql
9630: 69 74 65 33 43 72 65 61 74 65 46 75 6e 63 28 64  ite3CreateFunc(d
9640: 62 2c 20 22 67 6c 6f 62 22 2c 20 32 2c 20 53 51  b, "glob", 2, SQ
9650: 4c 49 54 45 5f 41 4e 59 2c 20 0a 20 20 20 20 20  LITE_ANY, .     
9660: 20 28 73 74 72 75 63 74 20 63 6f 6d 70 61 72 65   (struct compare
9670: 49 6e 66 6f 2a 29 26 67 6c 6f 62 49 6e 66 6f 2c  Info*)&globInfo,
9680: 20 6c 69 6b 65 46 75 6e 63 2c 20 30 2c 30 29 3b   likeFunc, 0,0);
9690: 0a 20 20 73 65 74 4c 69 6b 65 4f 70 74 46 6c 61  .  setLikeOptFla
96a0: 67 28 64 62 2c 20 22 67 6c 6f 62 22 2c 20 53 51  g(db, "glob", SQ
96b0: 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 20 7c  LITE_FUNC_LIKE |
96c0: 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53   SQLITE_FUNC_CAS
96d0: 45 29 3b 0a 20 20 73 65 74 4c 69 6b 65 4f 70 74  E);.  setLikeOpt
96e0: 46 6c 61 67 28 64 62 2c 20 22 6c 69 6b 65 22 2c  Flag(db, "like",
96f0: 20 0a 20 20 20 20 20 20 63 61 73 65 53 65 6e 73   .      caseSens
9700: 69 74 69 76 65 20 3f 20 28 53 51 4c 49 54 45 5f  itive ? (SQLITE_
9710: 46 55 4e 43 5f 4c 49 4b 45 20 7c 20 53 51 4c 49  FUNC_LIKE | SQLI
9720: 54 45 5f 46 55 4e 43 5f 43 41 53 45 29 20 3a 20  TE_FUNC_CASE) : 
9730: 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45  SQLITE_FUNC_LIKE
9740: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 70 45 78 70  );.}../*.** pExp
9750: 72 20 70 6f 69 6e 74 73 20 74 6f 20 61 6e 20 65  r points to an e
9760: 78 70 72 65 73 73 69 6f 6e 20 77 68 69 63 68 20  xpression which 
9770: 69 6d 70 6c 65 6d 65 6e 74 73 20 61 20 66 75 6e  implements a fun
9780: 63 74 69 6f 6e 2e 20 20 49 66 0a 2a 2a 20 69 74  ction.  If.** it
9790: 20 69 73 20 61 70 70 72 6f 70 72 69 61 74 65 20   is appropriate 
97a0: 74 6f 20 61 70 70 6c 79 20 74 68 65 20 4c 49 4b  to apply the LIK
97b0: 45 20 6f 70 74 69 6d 69 7a 61 74 69 6f 6e 20 74  E optimization t
97c0: 6f 20 74 68 61 74 20 66 75 6e 63 74 69 6f 6e 0a  o that function.
97d0: 2a 2a 20 74 68 65 6e 20 73 65 74 20 61 57 63 5b  ** then set aWc[
97e0: 30 5d 20 74 68 72 6f 75 67 68 20 61 57 63 5b 32  0] through aWc[2
97f0: 5d 20 74 6f 20 74 68 65 20 77 69 6c 64 63 61 72  ] to the wildcar
9800: 64 20 63 68 61 72 61 63 74 65 72 73 20 61 6e 64  d characters and
9810: 0a 2a 2a 20 72 65 74 75 72 6e 20 54 52 55 45 2e  .** return TRUE.
9820: 20 20 49 66 20 74 68 65 20 66 75 6e 63 74 69 6f    If the functio
9830: 6e 20 69 73 20 6e 6f 74 20 61 20 4c 49 4b 45 2d  n is not a LIKE-
9840: 73 74 79 6c 65 20 66 75 6e 63 74 69 6f 6e 20 74  style function t
9850: 68 65 6e 0a 2a 2a 20 72 65 74 75 72 6e 20 46 41  hen.** return FA
9860: 4c 53 45 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  LSE..*/.int sqli
9870: 74 65 33 49 73 4c 69 6b 65 46 75 6e 63 74 69 6f  te3IsLikeFunctio
9880: 6e 28 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 45  n(sqlite3 *db, E
9890: 78 70 72 20 2a 70 45 78 70 72 2c 20 69 6e 74 20  xpr *pExpr, int 
98a0: 2a 70 49 73 4e 6f 63 61 73 65 2c 20 63 68 61 72  *pIsNocase, char
98b0: 20 2a 61 57 63 29 7b 0a 20 20 46 75 6e 63 44 65   *aWc){.  FuncDe
98c0: 66 20 2a 70 44 65 66 3b 0a 20 20 69 66 28 20 70  f *pDef;.  if( p
98d0: 45 78 70 72 2d 3e 6f 70 21 3d 54 4b 5f 46 55 4e  Expr->op!=TK_FUN
98e0: 43 54 49 4f 4e 20 0a 20 20 20 7c 7c 20 21 70 45  CTION .   || !pE
98f0: 78 70 72 2d 3e 78 2e 70 4c 69 73 74 20 0a 20 20  xpr->x.pList .  
9900: 20 7c 7c 20 70 45 78 70 72 2d 3e 78 2e 70 4c 69   || pExpr->x.pLi
9910: 73 74 2d 3e 6e 45 78 70 72 21 3d 32 0a 20 20 29  st->nExpr!=2.  )
9920: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a  {.    return 0;.
9930: 20 20 7d 0a 20 20 61 73 73 65 72 74 28 20 21 45    }.  assert( !E
9940: 78 70 72 48 61 73 50 72 6f 70 65 72 74 79 28 70  xprHasProperty(p
9950: 45 78 70 72 2c 20 45 50 5f 78 49 73 53 65 6c 65  Expr, EP_xIsSele
9960: 63 74 29 20 29 3b 0a 20 20 70 44 65 66 20 3d 20  ct) );.  pDef = 
9970: 73 71 6c 69 74 65 33 46 69 6e 64 46 75 6e 63 74  sqlite3FindFunct
9980: 69 6f 6e 28 64 62 2c 20 70 45 78 70 72 2d 3e 75  ion(db, pExpr->u
9990: 2e 7a 54 6f 6b 65 6e 2c 20 0a 20 20 20 20 20 20  .zToken, .      
99a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
99b0: 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 53 74         sqlite3St
99c0: 72 6c 65 6e 33 30 28 70 45 78 70 72 2d 3e 75 2e  rlen30(pExpr->u.
99d0: 7a 54 6f 6b 65 6e 29 2c 0a 20 20 20 20 20 20 20  zToken),.       
99e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
99f0: 20 20 20 20 20 20 32 2c 20 53 51 4c 49 54 45 5f        2, SQLITE_
9a00: 55 54 46 38 2c 20 30 29 3b 0a 20 20 69 66 28 20  UTF8, 0);.  if( 
9a10: 4e 45 56 45 52 28 70 44 65 66 3d 3d 30 29 20 7c  NEVER(pDef==0) |
9a20: 7c 20 28 70 44 65 66 2d 3e 66 6c 61 67 73 20 26  | (pDef->flags &
9a30: 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b   SQLITE_FUNC_LIK
9a40: 45 29 3d 3d 30 20 29 7b 0a 20 20 20 20 72 65 74  E)==0 ){.    ret
9a50: 75 72 6e 20 30 3b 0a 20 20 7d 0a 0a 20 20 2f 2a  urn 0;.  }..  /*
9a60: 20 54 68 65 20 6d 65 6d 63 70 79 28 29 20 73 74   The memcpy() st
9a70: 61 74 65 6d 65 6e 74 20 61 73 73 75 6d 65 73 20  atement assumes 
9a80: 74 68 61 74 20 74 68 65 20 77 69 6c 64 63 61 72  that the wildcar
9a90: 64 20 63 68 61 72 61 63 74 65 72 73 20 61 72 65  d characters are
9aa0: 0a 20 20 2a 2a 20 74 68 65 20 66 69 72 73 74 20  .  ** the first 
9ab0: 74 68 72 65 65 20 73 74 61 74 65 6d 65 6e 74 73  three statements
9ac0: 20 69 6e 20 74 68 65 20 63 6f 6d 70 61 72 65 49   in the compareI
9ad0: 6e 66 6f 20 73 74 72 75 63 74 75 72 65 2e 20 20  nfo structure.  
9ae0: 54 68 65 0a 20 20 2a 2a 20 61 73 73 65 72 74 73  The.  ** asserts
9af0: 28 29 20 74 68 61 74 20 66 6f 6c 6c 6f 77 20 76  () that follow v
9b00: 65 72 69 66 79 20 74 68 61 74 20 61 73 73 75 6d  erify that assum
9b10: 70 74 69 6f 6e 0a 20 20 2a 2f 0a 20 20 6d 65 6d  ption.  */.  mem
9b20: 63 70 79 28 61 57 63 2c 20 70 44 65 66 2d 3e 70  cpy(aWc, pDef->p
9b30: 55 73 65 72 44 61 74 61 2c 20 33 29 3b 0a 20 20  UserData, 3);.  
9b40: 61 73 73 65 72 74 28 20 28 63 68 61 72 2a 29 26  assert( (char*)&
9b50: 6c 69 6b 65 49 6e 66 6f 41 6c 74 20 3d 3d 20 28  likeInfoAlt == (
9b60: 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41  char*)&likeInfoA
9b70: 6c 74 2e 6d 61 74 63 68 41 6c 6c 20 29 3b 0a 20  lt.matchAll );. 
9b80: 20 61 73 73 65 72 74 28 20 26 28 28 63 68 61 72   assert( &((char
9b90: 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 29 5b  *)&likeInfoAlt)[
9ba0: 31 5d 20 3d 3d 20 28 63 68 61 72 2a 29 26 6c 69  1] == (char*)&li
9bb0: 6b 65 49 6e 66 6f 41 6c 74 2e 6d 61 74 63 68 4f  keInfoAlt.matchO
9bc0: 6e 65 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20  ne );.  assert( 
9bd0: 26 28 28 63 68 61 72 2a 29 26 6c 69 6b 65 49 6e  &((char*)&likeIn
9be0: 66 6f 41 6c 74 29 5b 32 5d 20 3d 3d 20 28 63 68  foAlt)[2] == (ch
9bf0: 61 72 2a 29 26 6c 69 6b 65 49 6e 66 6f 41 6c 74  ar*)&likeInfoAlt
9c00: 2e 6d 61 74 63 68 53 65 74 20 29 3b 0a 20 20 2a  .matchSet );.  *
9c10: 70 49 73 4e 6f 63 61 73 65 20 3d 20 28 70 44 65  pIsNocase = (pDe
9c20: 66 2d 3e 66 6c 61 67 73 20 26 20 53 51 4c 49 54  f->flags & SQLIT
9c30: 45 5f 46 55 4e 43 5f 43 41 53 45 29 3d 3d 30 3b  E_FUNC_CASE)==0;
9c40: 0a 20 20 72 65 74 75 72 6e 20 31 3b 0a 7d 0a 0a  .  return 1;.}..
9c50: 2f 2a 0a 2a 2a 20 41 6c 6c 20 61 6c 6c 20 6f 66  /*.** All all of
9c60: 20 74 68 65 20 46 75 6e 63 44 65 66 20 73 74 72   the FuncDef str
9c70: 75 63 74 75 72 65 73 20 69 6e 20 74 68 65 20 61  uctures in the a
9c80: 42 75 69 6c 74 69 6e 46 75 6e 63 5b 5d 20 61 72  BuiltinFunc[] ar
9c90: 72 61 79 20 61 62 6f 76 65 0a 2a 2a 20 74 6f 20  ray above.** to 
9ca0: 74 68 65 20 67 6c 6f 62 61 6c 20 66 75 6e 63 74  the global funct
9cb0: 69 6f 6e 20 68 61 73 68 20 74 61 62 6c 65 2e 20  ion hash table. 
9cc0: 20 54 68 69 73 20 6f 63 63 75 72 73 20 61 74 20   This occurs at 
9cd0: 73 74 61 72 74 2d 74 69 6d 65 20 28 61 73 0a 2a  start-time (as.*
9ce0: 2a 20 61 20 63 6f 6e 73 65 71 75 65 6e 63 65 20  * a consequence 
9cf0: 6f 66 20 63 61 6c 6c 69 6e 67 20 73 71 6c 69 74  of calling sqlit
9d00: 65 33 5f 69 6e 69 74 69 61 6c 69 7a 65 28 29 29  e3_initialize())
9d10: 2e 0a 2a 2a 0a 2a 2a 20 41 66 74 65 72 20 74 68  ..**.** After th
9d20: 69 73 20 72 6f 75 74 69 6e 65 20 72 75 6e 73 0a  is routine runs.
9d30: 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 52  */.void sqlite3R
9d40: 65 67 69 73 74 65 72 47 6c 6f 62 61 6c 46 75 6e  egisterGlobalFun
9d50: 63 74 69 6f 6e 73 28 76 6f 69 64 29 7b 0a 20 20  ctions(void){.  
9d60: 2f 2a 0a 20 20 2a 2a 20 54 68 65 20 66 6f 6c 6c  /*.  ** The foll
9d70: 6f 77 69 6e 67 20 61 72 72 61 79 20 68 6f 6c 64  owing array hold
9d80: 73 20 46 75 6e 63 44 65 66 20 73 74 72 75 63 74  s FuncDef struct
9d90: 75 72 65 73 20 66 6f 72 20 61 6c 6c 20 6f 66 20  ures for all of 
9da0: 74 68 65 20 66 75 6e 63 74 69 6f 6e 73 0a 20 20  the functions.  
9db0: 2a 2a 20 64 65 66 69 6e 65 64 20 69 6e 20 74 68  ** defined in th
9dc0: 69 73 20 66 69 6c 65 2e 0a 20 20 2a 2a 0a 20 20  is file..  **.  
9dd0: 2a 2a 20 54 68 65 20 61 72 72 61 79 20 63 61 6e  ** The array can
9de0: 6e 6f 74 20 62 65 20 63 6f 6e 73 74 61 6e 74 20  not be constant 
9df0: 73 69 6e 63 65 20 63 68 61 6e 67 65 73 20 61 72  since changes ar
9e00: 65 20 6d 61 64 65 20 74 6f 20 74 68 65 0a 20 20  e made to the.  
9e10: 2a 2a 20 46 75 6e 63 44 65 66 2e 70 48 61 73 68  ** FuncDef.pHash
9e20: 20 65 6c 65 6d 65 6e 74 73 20 61 74 20 73 74 61   elements at sta
9e30: 72 74 2d 74 69 6d 65 2e 20 20 54 68 65 20 65 6c  rt-time.  The el
9e40: 65 6d 65 6e 74 73 20 6f 66 20 74 68 69 73 20 61  ements of this a
9e50: 72 72 61 79 0a 20 20 2a 2a 20 61 72 65 20 72 65  rray.  ** are re
9e60: 61 64 2d 6f 6e 6c 79 20 61 66 74 65 72 20 69 6e  ad-only after in
9e70: 69 74 69 61 6c 69 7a 61 74 69 6f 6e 20 69 73 20  itialization is 
9e80: 63 6f 6d 70 6c 65 74 65 2e 0a 20 20 2a 2f 0a 20  complete..  */. 
9e90: 20 73 74 61 74 69 63 20 53 51 4c 49 54 45 5f 57   static SQLITE_W
9ea0: 53 44 20 46 75 6e 63 44 65 66 20 61 42 75 69 6c  SD FuncDef aBuil
9eb0: 74 69 6e 46 75 6e 63 5b 5d 20 3d 20 7b 0a 20 20  tinFunc[] = {.  
9ec0: 20 20 46 55 4e 43 54 49 4f 4e 28 6c 74 72 69 6d    FUNCTION(ltrim
9ed0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31  ,              1
9ee0: 2c 20 31 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63  , 1, 0, trimFunc
9ef0: 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20           ),.    
9f00: 46 55 4e 43 54 49 4f 4e 28 6c 74 72 69 6d 2c 20  FUNCTION(ltrim, 
9f10: 20 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20               2, 
9f20: 31 2c 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20  1, 0, trimFunc  
9f30: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
9f40: 4e 43 54 49 4f 4e 28 72 74 72 69 6d 2c 20 20 20  NCTION(rtrim,   
9f50: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 32 2c             1, 2,
9f60: 20 30 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20   0, trimFunc    
9f70: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
9f80: 54 49 4f 4e 28 72 74 72 69 6d 2c 20 20 20 20 20  TION(rtrim,     
9f90: 20 20 20 20 20 20 20 20 20 32 2c 20 32 2c 20 30           2, 2, 0
9fa0: 2c 20 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20  , trimFunc      
9fb0: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
9fc0: 4f 4e 28 74 72 69 6d 2c 20 20 20 20 20 20 20 20  ON(trim,        
9fd0: 20 20 20 20 20 20 20 31 2c 20 33 2c 20 30 2c 20         1, 3, 0, 
9fe0: 74 72 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20  trimFunc        
9ff0: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
a000: 28 74 72 69 6d 2c 20 20 20 20 20 20 20 20 20 20  (trim,          
a010: 20 20 20 20 20 32 2c 20 33 2c 20 30 2c 20 74 72       2, 3, 0, tr
a020: 69 6d 46 75 6e 63 20 20 20 20 20 20 20 20 20 29  imFunc         )
a030: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6d  ,.    FUNCTION(m
a040: 69 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  in,             
a050: 20 20 2d 31 2c 20 30 2c 20 31 2c 20 6d 69 6e 6d    -1, 0, 1, minm
a060: 61 78 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a  axFunc       ),.
a070: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6d 69 6e      FUNCTION(min
a080: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
a090: 20 30 2c 20 30 2c 20 31 2c 20 30 20 20 20 20 20   0, 0, 1, 0     
a0a0: 20 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20             ),.  
a0b0: 20 20 41 47 47 52 45 47 41 54 45 28 6d 69 6e 2c    AGGREGATE(min,
a0c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31                 1
a0d0: 2c 20 30 2c 20 31 2c 20 6d 69 6e 6d 61 78 53 74  , 0, 1, minmaxSt
a0e0: 65 70 2c 20 20 20 20 20 20 6d 69 6e 4d 61 78 46  ep,      minMaxF
a0f0: 69 6e 61 6c 69 7a 65 20 29 2c 0a 20 20 20 20 46  inalize ),.    F
a100: 55 4e 43 54 49 4f 4e 28 6d 61 78 2c 20 20 20 20  UNCTION(max,    
a110: 20 20 20 20 20 20 20 20 20 20 20 2d 31 2c 20 31             -1, 1
a120: 2c 20 31 2c 20 6d 69 6e 6d 61 78 46 75 6e 63 20  , 1, minmaxFunc 
a130: 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e        ),.    FUN
a140: 43 54 49 4f 4e 28 6d 61 78 2c 20 20 20 20 20 20  CTION(max,      
a150: 20 20 20 20 20 20 20 20 20 20 30 2c 20 31 2c 20            0, 1, 
a160: 31 2c 20 30 20 20 20 20 20 20 20 20 20 20 20 20  1, 0            
a170: 20 20 20 20 29 2c 0a 20 20 20 20 41 47 47 52 45      ),.    AGGRE
a180: 47 41 54 45 28 6d 61 78 2c 20 20 20 20 20 20 20  GATE(max,       
a190: 20 20 20 20 20 20 20 20 31 2c 20 31 2c 20 31 2c          1, 1, 1,
a1a0: 20 6d 69 6e 6d 61 78 53 74 65 70 2c 20 20 20 20   minmaxStep,    
a1b0: 20 20 6d 69 6e 4d 61 78 46 69 6e 61 6c 69 7a 65    minMaxFinalize
a1c0: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
a1d0: 28 74 79 70 65 6f 66 2c 20 20 20 20 20 20 20 20  (typeof,        
a1e0: 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 74 79       1, 0, 0, ty
a1f0: 70 65 6f 66 46 75 6e 63 20 20 20 20 20 20 20 29  peofFunc       )
a200: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c  ,.    FUNCTION(l
a210: 65 6e 67 74 68 2c 20 20 20 20 20 20 20 20 20 20  ength,          
a220: 20 20 20 31 2c 20 30 2c 20 30 2c 20 6c 65 6e 67     1, 0, 0, leng
a230: 74 68 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a  thFunc       ),.
a240: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 73 75 62      FUNCTION(sub
a250: 73 74 72 2c 20 20 20 20 20 20 20 20 20 20 20 20  str,            
a260: 20 32 2c 20 30 2c 20 30 2c 20 73 75 62 73 74 72   2, 0, 0, substr
a270: 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20  Func       ),.  
a280: 20 20 46 55 4e 43 54 49 4f 4e 28 73 75 62 73 74    FUNCTION(subst
a290: 72 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 33  r,             3
a2a0: 2c 20 30 2c 20 30 2c 20 73 75 62 73 74 72 46 75  , 0, 0, substrFu
a2b0: 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  nc       ),.    
a2c0: 46 55 4e 43 54 49 4f 4e 28 61 62 73 2c 20 20 20  FUNCTION(abs,   
a2d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c 20               1, 
a2e0: 30 2c 20 30 2c 20 61 62 73 46 75 6e 63 20 20 20  0, 0, absFunc   
a2f0: 20 20 20 20 20 20 20 29 2c 0a 23 69 66 6e 64 65         ),.#ifnde
a300: 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c  f SQLITE_OMIT_FL
a310: 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 0a 20 20 20  OATING_POINT.   
a320: 20 46 55 4e 43 54 49 4f 4e 28 72 6f 75 6e 64 2c   FUNCTION(round,
a330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2c                1,
a340: 20 30 2c 20 30 2c 20 72 6f 75 6e 64 46 75 6e 63   0, 0, roundFunc
a350: 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46          ),.    F
a360: 55 4e 43 54 49 4f 4e 28 72 6f 75 6e 64 2c 20 20  UNCTION(round,  
a370: 20 20 20 20 20 20 20 20 20 20 20 20 32 2c 20 30              2, 0
a380: 2c 20 30 2c 20 72 6f 75 6e 64 46 75 6e 63 20 20  , 0, roundFunc  
a390: 20 20 20 20 20 20 29 2c 0a 23 65 6e 64 69 66 0a        ),.#endif.
a3a0: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 75 70 70      FUNCTION(upp
a3b0: 65 72 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  er,             
a3c0: 20 31 2c 20 30 2c 20 30 2c 20 75 70 70 65 72 46   1, 0, 0, upperF
a3d0: 75 6e 63 20 20 20 20 20 20 20 20 29 2c 0a 20 20  unc        ),.  
a3e0: 20 20 46 55 4e 43 54 49 4f 4e 28 6c 6f 77 65 72    FUNCTION(lower
a3f0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31  ,              1
a400: 2c 20 30 2c 20 30 2c 20 6c 6f 77 65 72 46 75 6e  , 0, 0, lowerFun
a410: 63 20 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  c        ),.    
a420: 46 55 4e 43 54 49 4f 4e 28 63 6f 61 6c 65 73 63  FUNCTION(coalesc
a430: 65 2c 20 20 20 20 20 20 20 20 20 20 20 31 2c 20  e,           1, 
a440: 30 2c 20 30 2c 20 30 20 20 20 20 20 20 20 20 20  0, 0, 0         
a450: 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55         ),.    FU
a460: 4e 43 54 49 4f 4e 28 63 6f 61 6c 65 73 63 65 2c  NCTION(coalesce,
a470: 20 20 20 20 20 20 20 20 20 20 2d 31 2c 20 30 2c            -1, 0,
a480: 20 30 2c 20 69 66 6e 75 6c 6c 46 75 6e 63 20 20   0, ifnullFunc  
a490: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
a4a0: 54 49 4f 4e 28 63 6f 61 6c 65 73 63 65 2c 20 20  TION(coalesce,  
a4b0: 20 20 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30           0, 0, 0
a4c0: 2c 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20  , 0             
a4d0: 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49     ),.    FUNCTI
a4e0: 4f 4e 28 68 65 78 2c 20 20 20 20 20 20 20 20 20  ON(hex,         
a4f0: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
a500: 68 65 78 46 75 6e 63 20 20 20 20 20 20 20 20 20  hexFunc         
a510: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
a520: 28 69 66 6e 75 6c 6c 2c 20 20 20 20 20 20 20 20  (ifnull,        
a530: 20 20 20 20 20 32 2c 20 30 2c 20 31 2c 20 69 66       2, 0, 1, if
a540: 6e 75 6c 6c 46 75 6e 63 20 20 20 20 20 20 20 29  nullFunc       )
a550: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72  ,.    FUNCTION(r
a560: 61 6e 64 6f 6d 2c 20 20 20 20 20 20 20 20 20 20  andom,          
a570: 20 20 20 30 2c 20 30 2c 20 30 2c 20 72 61 6e 64     0, 0, 0, rand
a580: 6f 6d 46 75 6e 63 20 20 20 20 20 20 20 29 2c 0a  omFunc       ),.
a590: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72 61 6e      FUNCTION(ran
a5a0: 64 6f 6d 62 6c 6f 62 2c 20 20 20 20 20 20 20 20  domblob,        
a5b0: 20 31 2c 20 30 2c 20 30 2c 20 72 61 6e 64 6f 6d   1, 0, 0, random
a5c0: 42 6c 6f 62 20 20 20 20 20 20 20 29 2c 0a 20 20  Blob       ),.  
a5d0: 20 20 46 55 4e 43 54 49 4f 4e 28 6e 75 6c 6c 69    FUNCTION(nulli
a5e0: 66 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 32  f,             2
a5f0: 2c 20 30 2c 20 31 2c 20 6e 75 6c 6c 69 66 46 75  , 0, 1, nullifFu
a600: 6e 63 20 20 20 20 20 20 20 29 2c 0a 20 20 20 20  nc       ),.    
a610: 46 55 4e 43 54 49 4f 4e 28 73 71 6c 69 74 65 5f  FUNCTION(sqlite_
a620: 76 65 72 73 69 6f 6e 2c 20 20 20 20 20 30 2c 20  version,     0, 
a630: 30 2c 20 30 2c 20 76 65 72 73 69 6f 6e 46 75 6e  0, 0, versionFun
a640: 63 20 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55  c      ),.    FU
a650: 4e 43 54 49 4f 4e 28 71 75 6f 74 65 2c 20 20 20  NCTION(quote,   
a660: 20 20 20 20 20 20 20 20 20 20 20 31 2c 20 30 2c             1, 0,
a670: 20 30 2c 20 71 75 6f 74 65 46 75 6e 63 20 20 20   0, quoteFunc   
a680: 20 20 20 20 20 29 2c 0a 20 20 20 20 46 55 4e 43       ),.    FUNC
a690: 54 49 4f 4e 28 6c 61 73 74 5f 69 6e 73 65 72 74  TION(last_insert
a6a0: 5f 72 6f 77 69 64 2c 20 20 30 2c 20 30 2c 20 30  _rowid,  0, 0, 0
a6b0: 2c 20 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f  , last_insert_ro
a6c0: 77 69 64 29 2c 0a 20 20 20 20 46 55 4e 43 54 49  wid),.    FUNCTI
a6d0: 4f 4e 28 63 68 61 6e 67 65 73 2c 20 20 20 20 20  ON(changes,     
a6e0: 20 20 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20         0, 0, 0, 
a6f0: 63 68 61 6e 67 65 73 20 20 20 20 20 20 20 20 20  changes         
a700: 20 29 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e   ),.    FUNCTION
a710: 28 74 6f 74 61 6c 5f 63 68 61 6e 67 65 73 2c 20  (total_changes, 
a720: 20 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 74 6f       0, 0, 0, to
a730: 74 61 6c 5f 63 68 61 6e 67 65 73 20 20 20 20 29  tal_changes    )
a740: 2c 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 72  ,.    FUNCTION(r
a750: 65 70 6c 61 63 65 2c 20 20 20 20 20 20 20 20 20  eplace,         
a760: 20 20 20 33 2c 20 30 2c 20 30 2c 20 72 65 70 6c     3, 0, 0, repl
a770: 61 63 65 46 75 6e 63 20 20 20 20 20 20 29 2c 0a  aceFunc      ),.
a780: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 7a 65 72      FUNCTION(zer
a790: 6f 62 6c 6f 62 2c 20 20 20 20 20 20 20 20 20 20  oblob,          
a7a0: 20 31 2c 20 30 2c 20 30 2c 20 7a 65 72 6f 62 6c   1, 0, 0, zerobl
a7b0: 6f 62 46 75 6e 63 20 20 20 20 20 29 2c 0a 20 20  obFunc     ),.  
a7c0: 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 53 4f  #ifdef SQLITE_SO
a7d0: 55 4e 44 45 58 0a 20 20 20 20 46 55 4e 43 54 49  UNDEX.    FUNCTI
a7e0: 4f 4e 28 73 6f 75 6e 64 65 78 2c 20 20 20 20 20  ON(soundex,     
a7f0: 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20         1, 0, 0, 
a800: 73 6f 75 6e 64 65 78 46 75 6e 63 20 20 20 20 20  soundexFunc     
a810: 20 29 2c 0a 20 20 23 65 6e 64 69 66 0a 20 20 23   ),.  #endif.  #
a820: 69 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d  ifndef SQLITE_OM
a830: 49 54 5f 4c 4f 41 44 5f 45 58 54 45 4e 53 49 4f  IT_LOAD_EXTENSIO
a840: 4e 0a 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c  N.    FUNCTION(l
a850: 6f 61 64 5f 65 78 74 65 6e 73 69 6f 6e 2c 20 20  oad_extension,  
a860: 20 20 20 31 2c 20 30 2c 20 30 2c 20 6c 6f 61 64     1, 0, 0, load
a870: 45 78 74 20 20 20 20 20 20 20 20 20 20 29 2c 0a  Ext          ),.
a880: 20 20 20 20 46 55 4e 43 54 49 4f 4e 28 6c 6f 61      FUNCTION(loa
a890: 64 5f 65 78 74 65 6e 73 69 6f 6e 2c 20 20 20 20  d_extension,    
a8a0: 20 32 2c 20 30 2c 20 30 2c 20 6c 6f 61 64 45 78   2, 0, 0, loadEx
a8b0: 74 20 20 20 20 20 20 20 20 20 20 29 2c 0a 20 20  t          ),.  
a8c0: 23 65 6e 64 69 66 0a 20 20 20 20 41 47 47 52 45  #endif.    AGGRE
a8d0: 47 41 54 45 28 73 75 6d 2c 20 20 20 20 20 20 20  GATE(sum,       
a8e0: 20 20 20 20 20 20 20 20 31 2c 20 30 2c 20 30 2c          1, 0, 0,
a8f0: 20 73 75 6d 53 74 65 70 2c 20 20 20 20 20 20 20   sumStep,       
a900: 20 20 73 75 6d 46 69 6e 61 6c 69 7a 65 20 20 20    sumFinalize   
a910: 20 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54   ),.    AGGREGAT
a920: 45 28 74 6f 74 61 6c 2c 20 20 20 20 20 20 20 20  E(total,        
a930: 20 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 75       1, 0, 0, su
a940: 6d 53 74 65 70 2c 20 20 20 20 20 20 20 20 20 74  mStep,         t
a950: 6f 74 61 6c 46 69 6e 61 6c 69 7a 65 20 20 20 20  otalFinalize    
a960: 29 2c 0a 20 20 20 20 41 47 47 52 45 47 41 54 45  ),.    AGGREGATE
a970: 28 61 76 67 2c 20 20 20 20 20 20 20 20 20 20 20  (avg,           
a980: 20 20 20 20 31 2c 20 30 2c 20 30 2c 20 73 75 6d      1, 0, 0, sum
a990: 53 74 65 70 2c 20 20 20 20 20 20 20 20 20 61 76  Step,         av
a9a0: 67 46 69 6e 61 6c 69 7a 65 20 20 20 20 29 2c 0a  gFinalize    ),.
a9b0: 20 2f 2a 20 41 47 47 52 45 47 41 54 45 28 63 6f   /* AGGREGATE(co
a9c0: 75 6e 74 2c 20 20 20 20 20 20 20 20 20 20 20 20  unt,            
a9d0: 20 30 2c 20 30 2c 20 30 2c 20 63 6f 75 6e 74 53   0, 0, 0, countS
a9e0: 74 65 70 2c 20 20 20 20 20 20 20 63 6f 75 6e 74  tep,       count
a9f0: 46 69 6e 61 6c 69 7a 65 20 20 29 2c 20 2a 2f 0a  Finalize  ), */.
aa00: 20 20 20 20 7b 30 2c 53 51 4c 49 54 45 5f 55 54      {0,SQLITE_UT
aa10: 46 38 2c 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43  F8,SQLITE_FUNC_C
aa20: 4f 55 4e 54 2c 30 2c 30 2c 30 2c 63 6f 75 6e 74  OUNT,0,0,0,count
aa30: 53 74 65 70 2c 63 6f 75 6e 74 46 69 6e 61 6c 69  Step,countFinali
aa40: 7a 65 2c 22 63 6f 75 6e 74 22 2c 30 7d 2c 0a 20  ze,"count",0},. 
aa50: 20 20 20 41 47 47 52 45 47 41 54 45 28 63 6f 75     AGGREGATE(cou
aa60: 6e 74 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  nt,             
aa70: 31 2c 20 30 2c 20 30 2c 20 63 6f 75 6e 74 53 74  1, 0, 0, countSt
aa80: 65 70 2c 20 20 20 20 20 20 20 63 6f 75 6e 74 46  ep,       countF
aa90: 69 6e 61 6c 69 7a 65 20 20 29 2c 0a 20 20 20 20  inalize  ),.    
aaa0: 41 47 47 52 45 47 41 54 45 28 67 72 6f 75 70 5f  AGGREGATE(group_
aab0: 63 6f 6e 63 61 74 2c 20 20 20 20 20 20 31 2c 20  concat,      1, 
aac0: 30 2c 20 30 2c 20 67 72 6f 75 70 43 6f 6e 63 61  0, 0, groupConca
aad0: 74 53 74 65 70 2c 20 67 72 6f 75 70 43 6f 6e 63  tStep, groupConc
aae0: 61 74 46 69 6e 61 6c 69 7a 65 29 2c 0a 20 20 20  atFinalize),.   
aaf0: 20 41 47 47 52 45 47 41 54 45 28 67 72 6f 75 70   AGGREGATE(group
ab00: 5f 63 6f 6e 63 61 74 2c 20 20 20 20 20 20 32 2c  _concat,      2,
ab10: 20 30 2c 20 30 2c 20 67 72 6f 75 70 43 6f 6e 63   0, 0, groupConc
ab20: 61 74 53 74 65 70 2c 20 67 72 6f 75 70 43 6f 6e  atStep, groupCon
ab30: 63 61 74 46 69 6e 61 6c 69 7a 65 29 2c 0a 20 20  catFinalize),.  
ab40: 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 67 6c  .    LIKEFUNC(gl
ab50: 6f 62 2c 20 32 2c 20 26 67 6c 6f 62 49 6e 66 6f  ob, 2, &globInfo
ab60: 2c 20 53 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49  , SQLITE_FUNC_LI
ab70: 4b 45 7c 53 51 4c 49 54 45 5f 46 55 4e 43 5f 43  KE|SQLITE_FUNC_C
ab80: 41 53 45 29 2c 0a 20 20 23 69 66 64 65 66 20 53  ASE),.  #ifdef S
ab90: 51 4c 49 54 45 5f 43 41 53 45 5f 53 45 4e 53 49  QLITE_CASE_SENSI
aba0: 54 49 56 45 5f 4c 49 4b 45 0a 20 20 20 20 4c 49  TIVE_LIKE.    LI
abb0: 4b 45 46 55 4e 43 28 6c 69 6b 65 2c 20 32 2c 20  KEFUNC(like, 2, 
abc0: 26 6c 69 6b 65 49 6e 66 6f 41 6c 74 2c 20 53 51  &likeInfoAlt, SQ
abd0: 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 7c 53  LITE_FUNC_LIKE|S
abe0: 51 4c 49 54 45 5f 46 55 4e 43 5f 43 41 53 45 29  QLITE_FUNC_CASE)
abf0: 2c 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c  ,.    LIKEFUNC(l
ac00: 69 6b 65 2c 20 33 2c 20 26 6c 69 6b 65 49 6e 66  ike, 3, &likeInf
ac10: 6f 41 6c 74 2c 20 53 51 4c 49 54 45 5f 46 55 4e  oAlt, SQLITE_FUN
ac20: 43 5f 4c 49 4b 45 7c 53 51 4c 49 54 45 5f 46 55  C_LIKE|SQLITE_FU
ac30: 4e 43 5f 43 41 53 45 29 2c 0a 20 20 23 65 6c 73  NC_CASE),.  #els
ac40: 65 0a 20 20 20 20 4c 49 4b 45 46 55 4e 43 28 6c  e.    LIKEFUNC(l
ac50: 69 6b 65 2c 20 32 2c 20 26 6c 69 6b 65 49 6e 66  ike, 2, &likeInf
ac60: 6f 4e 6f 72 6d 2c 20 53 51 4c 49 54 45 5f 46 55  oNorm, SQLITE_FU
ac70: 4e 43 5f 4c 49 4b 45 29 2c 0a 20 20 20 20 4c 49  NC_LIKE),.    LI
ac80: 4b 45 46 55 4e 43 28 6c 69 6b 65 2c 20 33 2c 20  KEFUNC(like, 3, 
ac90: 26 6c 69 6b 65 49 6e 66 6f 4e 6f 72 6d 2c 20 53  &likeInfoNorm, S
aca0: 51 4c 49 54 45 5f 46 55 4e 43 5f 4c 49 4b 45 29  QLITE_FUNC_LIKE)
acb0: 2c 0a 20 20 23 65 6e 64 69 66 0a 20 20 7d 3b 0a  ,.  #endif.  };.
acc0: 0a 20 20 69 6e 74 20 69 3b 0a 20 20 46 75 6e 63  .  int i;.  Func
acd0: 44 65 66 48 61 73 68 20 2a 70 48 61 73 68 20 3d  DefHash *pHash =
ace0: 20 26 47 4c 4f 42 41 4c 28 46 75 6e 63 44 65 66   &GLOBAL(FuncDef
acf0: 48 61 73 68 2c 20 73 71 6c 69 74 65 33 47 6c 6f  Hash, sqlite3Glo
ad00: 62 61 6c 46 75 6e 63 74 69 6f 6e 73 29 3b 0a 20  balFunctions);. 
ad10: 20 46 75 6e 63 44 65 66 20 2a 61 46 75 6e 63 20   FuncDef *aFunc 
ad20: 3d 20 28 46 75 6e 63 44 65 66 2a 29 26 47 4c 4f  = (FuncDef*)&GLO
ad30: 42 41 4c 28 46 75 6e 63 44 65 66 2c 20 61 42 75  BAL(FuncDef, aBu
ad40: 69 6c 74 69 6e 46 75 6e 63 29 3b 0a 0a 20 20 66  iltinFunc);..  f
ad50: 6f 72 28 69 3d 30 3b 20 69 3c 41 72 72 61 79 53  or(i=0; i<ArrayS
ad60: 69 7a 65 28 61 42 75 69 6c 74 69 6e 46 75 6e 63  ize(aBuiltinFunc
ad70: 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 73 71 6c  ); i++){.    sql
ad80: 69 74 65 33 46 75 6e 63 44 65 66 49 6e 73 65 72  ite3FuncDefInser
ad90: 74 28 70 48 61 73 68 2c 20 26 61 46 75 6e 63 5b  t(pHash, &aFunc[
ada0: 69 5d 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74  i]);.  }.  sqlit
adb0: 65 33 52 65 67 69 73 74 65 72 44 61 74 65 54 69  e3RegisterDateTi
adc0: 6d 65 46 75 6e 63 74 69 6f 6e 73 28 29 3b 0a 7d  meFunctions();.}
add0: 0a                                               .