/ Hex Artifact Content
Login

Artifact ddd86cbd438e385123785b67bd6c37a40a3c92bd:


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 35 36 20 32 30 30 34 2f 30 35 2f 32 36 20  1.56 2004/05/26 
02a0: 30 36 3a 31 38 3a 33 37 20 64 61 6e 69 65 6c 6b  06:18:37 danielk
02b0: 31 39 37 37 20 45 78 70 20 24 0a 2a 2f 0a 23 69  1977 Exp $.*/.#i
02c0: 6e 63 6c 75 64 65 20 3c 63 74 79 70 65 2e 68 3e  nclude <ctype.h>
02d0: 0a 23 69 6e 63 6c 75 64 65 20 3c 6d 61 74 68 2e  .#include <math.
02e0: 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74 64  h>.#include <std
02f0: 6c 69 62 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20  lib.h>.#include 
0300: 3c 61 73 73 65 72 74 2e 68 3e 0a 23 69 6e 63 6c  <assert.h>.#incl
0310: 75 64 65 20 22 73 71 6c 69 74 65 49 6e 74 2e 68  ude "sqliteInt.h
0320: 22 0a 23 69 6e 63 6c 75 64 65 20 22 76 64 62 65  ".#include "vdbe
0330: 49 6e 74 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20  Int.h".#include 
0340: 22 6f 73 2e 68 22 0a 0a 2f 2a 0a 2a 2a 20 49 6d  "os.h"../*.** Im
0350: 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20  plementation of 
0360: 74 68 65 20 6e 6f 6e 2d 61 67 67 72 65 67 61 74  the non-aggregat
0370: 65 20 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78 28  e min() and max(
0380: 29 20 66 75 6e 63 74 69 6f 6e 73 0a 2a 2f 0a 73  ) functions.*/.s
0390: 74 61 74 69 63 20 76 6f 69 64 20 6d 69 6e 6d 61  tatic void minma
03a0: 78 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f  xFunc(sqlite3_co
03b0: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
03c0: 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65  int argc, sqlite
03d0: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b  3_value **argv){
03e0: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
03f0: 42 65 73 74 3b 20 0a 20 20 69 6e 74 20 69 3b 0a  Best; .  int i;.
0400: 20 20 69 6e 74 20 28 2a 78 43 6f 6d 70 61 72 65    int (*xCompare
0410: 29 28 63 6f 6e 73 74 20 63 68 61 72 2a 2c 20 63  )(const char*, c
0420: 6f 6e 73 74 20 63 68 61 72 2a 29 3b 0a 20 20 69  onst char*);.  i
0430: 6e 74 20 6d 61 73 6b 3b 20 20 20 20 2f 2a 20 30  nt mask;    /* 0
0440: 20 66 6f 72 20 6d 69 6e 28 29 20 6f 72 20 30 78   for min() or 0x
0450: 66 66 66 66 66 66 66 66 20 66 6f 72 20 6d 61 78  ffffffff for max
0460: 28 29 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68  () */.  const ch
0470: 61 72 20 2a 7a 41 72 67 3b 0a 0a 20 20 69 66 28  ar *zArg;..  if(
0480: 20 61 72 67 63 3d 3d 30 20 29 20 72 65 74 75 72   argc==0 ) retur
0490: 6e 3b 0a 20 20 6d 61 73 6b 20 3d 20 28 69 6e 74  n;.  mask = (int
04a0: 29 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64 61  )sqlite3_user_da
04b0: 74 61 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20 7a  ta(context);.  z
04c0: 42 65 73 74 20 3d 20 73 71 6c 69 74 65 33 5f 76  Best = sqlite3_v
04d0: 61 6c 75 65 5f 64 61 74 61 28 61 72 67 76 5b 30  alue_data(argv[0
04e0: 5d 29 3b 0a 20 20 69 66 28 20 7a 42 65 73 74 3d  ]);.  if( zBest=
04f0: 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 7a  =0 ) return;.  z
0500: 41 72 67 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  Arg = sqlite3_va
0510: 6c 75 65 5f 64 61 74 61 28 61 72 67 76 5b 31 5d  lue_data(argv[1]
0520: 29 3b 0a 20 20 69 66 28 20 7a 41 72 67 5b 30 5d  );.  if( zArg[0]
0530: 3d 3d 27 6e 27 20 29 7b 0a 20 20 20 20 78 43 6f  =='n' ){.    xCo
0540: 6d 70 61 72 65 20 3d 20 73 71 6c 69 74 65 33 43  mpare = sqlite3C
0550: 6f 6d 70 61 72 65 3b 0a 20 20 7d 65 6c 73 65 7b  ompare;.  }else{
0560: 0a 20 20 20 20 78 43 6f 6d 70 61 72 65 20 3d 20  .    xCompare = 
0570: 73 74 72 63 6d 70 3b 0a 20 20 7d 0a 20 20 66 6f  strcmp;.  }.  fo
0580: 72 28 69 3d 32 3b 20 69 3c 61 72 67 63 3b 20 69  r(i=2; i<argc; i
0590: 2b 3d 32 29 7b 0a 20 20 20 20 7a 41 72 67 20 3d  +=2){.    zArg =
05a0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64   sqlite3_value_d
05b0: 61 74 61 28 61 72 67 76 5b 69 5d 29 3b 0a 20 20  ata(argv[i]);.  
05c0: 20 20 69 66 28 20 7a 41 72 67 3d 3d 30 20 29 20    if( zArg==0 ) 
05d0: 72 65 74 75 72 6e 3b 0a 20 20 20 20 69 66 28 20  return;.    if( 
05e0: 28 78 43 6f 6d 70 61 72 65 28 7a 41 72 67 2c 20  (xCompare(zArg, 
05f0: 7a 42 65 73 74 29 5e 6d 61 73 6b 29 3c 30 20 29  zBest)^mask)<0 )
0600: 7b 0a 20 20 20 20 20 20 7a 42 65 73 74 20 3d 20  {.      zBest = 
0610: 7a 41 72 67 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a  zArg;.    }.  }.
0620: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
0630: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a  _text(context, z
0640: 42 65 73 74 2c 20 2d 31 2c 20 31 29 3b 0a 7d 0a  Best, -1, 1);.}.
0650: 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68  ./*.** Return th
0660: 65 20 74 79 70 65 20 6f 66 20 74 68 65 20 61 72  e type of the ar
0670: 67 75 6d 65 6e 74 2e 0a 2a 2f 0a 73 74 61 74 69  gument..*/.stati
0680: 63 20 76 6f 69 64 20 74 79 70 65 6f 66 46 75 6e  c void typeofFun
0690: 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  c(sqlite3_contex
06a0: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20  t *context, int 
06b0: 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61  argc, sqlite3_va
06c0: 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63  lue **argv){.  c
06d0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 20 3d 20 30  onst char *z = 0
06e0: 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63  ;.  assert( argc
06f0: 3d 3d 32 20 29 3b 0a 20 20 73 77 69 74 63 68 28  ==2 );.  switch(
0700: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74   sqlite3_value_t
0710: 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29 7b 0a  ype(argv[0]) ){.
0720: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 33      case SQLITE3
0730: 5f 4e 55 4c 4c 3a 20 7a 20 3d 20 22 6e 75 6c 6c  _NULL: z = "null
0740: 22 20 3b 20 62 72 65 61 6b 3b 0a 20 20 20 20 63  " ; break;.    c
0750: 61 73 65 20 53 51 4c 49 54 45 33 5f 49 4e 54 45  ase SQLITE3_INTE
0760: 47 45 52 3a 20 7a 20 3d 20 22 69 6e 74 65 67 65  GER: z = "intege
0770: 72 22 20 3b 20 62 72 65 61 6b 3b 0a 20 20 20 20  r" ; break;.    
0780: 63 61 73 65 20 53 51 4c 49 54 45 33 5f 54 45 58  case SQLITE3_TEX
0790: 54 3a 20 7a 20 3d 20 22 74 65 78 74 22 20 3b 20  T: z = "text" ; 
07a0: 62 72 65 61 6b 3b 0a 20 20 20 20 63 61 73 65 20  break;.    case 
07b0: 53 51 4c 49 54 45 33 5f 46 4c 4f 41 54 3a 20 7a  SQLITE3_FLOAT: z
07c0: 20 3d 20 22 72 65 61 6c 22 20 3b 20 62 72 65 61   = "real" ; brea
07d0: 6b 3b 0a 20 20 20 20 63 61 73 65 20 53 51 4c 49  k;.    case SQLI
07e0: 54 45 33 5f 42 4c 4f 42 3a 20 7a 20 3d 20 22 62  TE3_BLOB: z = "b
07f0: 6c 6f 62 22 20 3b 20 62 72 65 61 6b 3b 0a 20 20  lob" ; break;.  
0800: 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  }.  sqlite3_resu
0810: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
0820: 20 7a 2c 20 2d 31 2c 20 30 29 3b 0a 7d 0a 0a 2f   z, -1, 0);.}../
0830: 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74  *.** Implementat
0840: 69 6f 6e 20 6f 66 20 74 68 65 20 6c 65 6e 67 74  ion of the lengt
0850: 68 28 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a  h() function.*/.
0860: 73 74 61 74 69 63 20 76 6f 69 64 20 6c 65 6e 67  static void leng
0870: 74 68 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63  thFunc(sqlite3_c
0880: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
0890: 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74   int argc, sqlit
08a0: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29  e3_value **argv)
08b0: 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  {.  const char *
08c0: 7a 3b 0a 20 20 69 6e 74 20 6c 65 6e 3b 0a 0a 20  z;.  int len;.. 
08d0: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31   assert( argc==1
08e0: 20 29 3b 0a 20 20 7a 20 3d 20 73 71 6c 69 74 65   );.  z = sqlite
08f0: 33 5f 76 61 6c 75 65 5f 64 61 74 61 28 61 72 67  3_value_data(arg
0900: 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a 3d 3d  v[0]);.  if( z==
0910: 30 20 29 20 72 65 74 75 72 6e 3b 0a 23 69 66 64  0 ) return;.#ifd
0920: 65 66 20 53 51 4c 49 54 45 5f 55 54 46 38 0a 20  ef SQLITE_UTF8. 
0930: 20 66 6f 72 28 6c 65 6e 3d 30 3b 20 2a 7a 3b 20   for(len=0; *z; 
0940: 7a 2b 2b 29 7b 20 69 66 28 20 28 30 78 63 30 26  z++){ if( (0xc0&
0950: 2a 7a 29 21 3d 30 78 38 30 20 29 20 6c 65 6e 2b  *z)!=0x80 ) len+
0960: 2b 3b 20 7d 0a 23 65 6c 73 65 0a 20 20 6c 65 6e  +; }.#else.  len
0970: 20 3d 20 73 74 72 6c 65 6e 28 7a 29 3b 0a 23 65   = strlen(z);.#e
0980: 6e 64 69 66 0a 20 20 73 71 6c 69 74 65 33 5f 72  ndif.  sqlite3_r
0990: 65 73 75 6c 74 5f 69 6e 74 33 32 28 63 6f 6e 74  esult_int32(cont
09a0: 65 78 74 2c 20 6c 65 6e 29 3b 0a 7d 0a 0a 2f 2a  ext, len);.}../*
09b0: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
09c0: 6f 6e 20 6f 66 20 74 68 65 20 61 62 73 28 29 20  on of the abs() 
09d0: 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a 73 74 61 74  function.*/.stat
09e0: 69 63 20 76 6f 69 64 20 61 62 73 46 75 6e 63 28  ic void absFunc(
09f0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
0a00: 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72  *context, int ar
0a10: 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  gc, sqlite3_valu
0a20: 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63 6f 6e  e **argv){.  con
0a30: 73 74 20 63 68 61 72 20 2a 7a 3b 0a 20 20 61 73  st char *z;.  as
0a40: 73 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29 3b  sert( argc==1 );
0a50: 0a 20 20 7a 20 3d 20 73 71 6c 69 74 65 33 5f 76  .  z = sqlite3_v
0a60: 61 6c 75 65 5f 64 61 74 61 28 61 72 67 76 5b 30  alue_data(argv[0
0a70: 5d 29 3b 0a 20 20 69 66 28 20 7a 3d 3d 30 20 29  ]);.  if( z==0 )
0a80: 20 72 65 74 75 72 6e 3b 0a 20 20 69 66 28 20 7a   return;.  if( z
0a90: 5b 30 5d 3d 3d 27 2d 27 20 26 26 20 69 73 64 69  [0]=='-' && isdi
0aa0: 67 69 74 28 7a 5b 31 5d 29 20 29 20 7a 2b 2b 3b  git(z[1]) ) z++;
0ab0: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c  .  sqlite3_resul
0ac0: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
0ad0: 7a 2c 20 2d 31 2c 20 31 29 3b 0a 7d 0a 0a 2f 2a  z, -1, 1);.}../*
0ae0: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
0af0: 6f 6e 20 6f 66 20 74 68 65 20 73 75 62 73 74 72  on of the substr
0b00: 28 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2f 0a 73  () function.*/.s
0b10: 74 61 74 69 63 20 76 6f 69 64 20 73 75 62 73 74  tatic void subst
0b20: 72 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f  rFunc(sqlite3_co
0b30: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
0b40: 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65  int argc, sqlite
0b50: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b  3_value **argv){
0b60: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
0b70: 3b 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f  ;.#ifdef SQLITE_
0b80: 55 54 46 38 0a 20 20 63 6f 6e 73 74 20 63 68 61  UTF8.  const cha
0b90: 72 20 2a 7a 32 3b 0a 20 20 69 6e 74 20 69 3b 0a  r *z2;.  int i;.
0ba0: 23 65 6e 64 69 66 0a 20 20 69 6e 74 20 70 31 2c  #endif.  int p1,
0bb0: 20 70 32 2c 20 6c 65 6e 3b 0a 20 20 61 73 73 65   p2, len;.  asse
0bc0: 72 74 28 20 61 72 67 63 3d 3d 33 20 29 3b 0a 20  rt( argc==3 );. 
0bd0: 20 7a 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c   z = sqlite3_val
0be0: 75 65 5f 64 61 74 61 28 61 72 67 76 5b 30 5d 29  ue_data(argv[0])
0bf0: 3b 0a 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72  ;.  if( z==0 ) r
0c00: 65 74 75 72 6e 3b 0a 20 20 70 31 20 3d 20 73 71  eturn;.  p1 = sq
0c10: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28  lite3_value_int(
0c20: 61 72 67 76 5b 31 5d 29 3b 0a 20 20 70 32 20 3d  argv[1]);.  p2 =
0c30: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69   sqlite3_value_i
0c40: 6e 74 28 61 72 67 76 5b 32 5d 29 3b 0a 23 69 66  nt(argv[2]);.#if
0c50: 64 65 66 20 53 51 4c 49 54 45 5f 55 54 46 38 0a  def SQLITE_UTF8.
0c60: 20 20 66 6f 72 28 6c 65 6e 3d 30 2c 20 7a 32 3d    for(len=0, z2=
0c70: 7a 3b 20 2a 7a 32 3b 20 7a 32 2b 2b 29 7b 20 69  z; *z2; z2++){ i
0c80: 66 28 20 28 30 78 63 30 26 2a 7a 32 29 21 3d 30  f( (0xc0&*z2)!=0
0c90: 78 38 30 20 29 20 6c 65 6e 2b 2b 3b 20 7d 0a 23  x80 ) len++; }.#
0ca0: 65 6c 73 65 0a 20 20 6c 65 6e 20 3d 20 73 74 72  else.  len = str
0cb0: 6c 65 6e 28 7a 29 3b 0a 23 65 6e 64 69 66 0a 20  len(z);.#endif. 
0cc0: 20 69 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20   if( p1<0 ){.   
0cd0: 20 70 31 20 2b 3d 20 6c 65 6e 3b 0a 20 20 20 20   p1 += len;.    
0ce0: 69 66 28 20 70 31 3c 30 20 29 7b 0a 20 20 20 20  if( p1<0 ){.    
0cf0: 20 20 70 32 20 2b 3d 20 70 31 3b 0a 20 20 20 20    p2 += p1;.    
0d00: 20 20 70 31 20 3d 20 30 3b 0a 20 20 20 20 7d 0a    p1 = 0;.    }.
0d10: 20 20 7d 65 6c 73 65 20 69 66 28 20 70 31 3e 30    }else if( p1>0
0d20: 20 29 7b 0a 20 20 20 20 70 31 2d 2d 3b 0a 20 20   ){.    p1--;.  
0d30: 7d 0a 20 20 69 66 28 20 70 31 2b 70 32 3e 6c 65  }.  if( p1+p2>le
0d40: 6e 20 29 7b 0a 20 20 20 20 70 32 20 3d 20 6c 65  n ){.    p2 = le
0d50: 6e 2d 70 31 3b 0a 20 20 7d 0a 23 69 66 64 65 66  n-p1;.  }.#ifdef
0d60: 20 53 51 4c 49 54 45 5f 55 54 46 38 0a 20 20 66   SQLITE_UTF8.  f
0d70: 6f 72 28 69 3d 30 3b 20 69 3c 70 31 20 26 26 20  or(i=0; i<p1 && 
0d80: 7a 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  z[i]; i++){.    
0d90: 69 66 28 20 28 7a 5b 69 5d 26 30 78 63 30 29 3d  if( (z[i]&0xc0)=
0da0: 3d 30 78 38 30 20 29 20 70 31 2b 2b 3b 0a 20 20  =0x80 ) p1++;.  
0db0: 7d 0a 20 20 77 68 69 6c 65 28 20 7a 5b 69 5d 20  }.  while( z[i] 
0dc0: 26 26 20 28 7a 5b 69 5d 26 30 78 63 30 29 3d 3d  && (z[i]&0xc0)==
0dd0: 30 78 38 30 20 29 7b 20 69 2b 2b 3b 20 70 31 2b  0x80 ){ i++; p1+
0de0: 2b 3b 20 7d 0a 20 20 66 6f 72 28 3b 20 69 3c 70  +; }.  for(; i<p
0df0: 31 2b 70 32 20 26 26 20 7a 5b 69 5d 3b 20 69 2b  1+p2 && z[i]; i+
0e00: 2b 29 7b 0a 20 20 20 20 69 66 28 20 28 7a 5b 69  +){.    if( (z[i
0e10: 5d 26 30 78 63 30 29 3d 3d 30 78 38 30 20 29 20  ]&0xc0)==0x80 ) 
0e20: 70 32 2b 2b 3b 0a 20 20 7d 0a 20 20 77 68 69 6c  p2++;.  }.  whil
0e30: 65 28 20 7a 5b 69 5d 20 26 26 20 28 7a 5b 69 5d  e( z[i] && (z[i]
0e40: 26 30 78 63 30 29 3d 3d 30 78 38 30 20 29 7b 20  &0xc0)==0x80 ){ 
0e50: 69 2b 2b 3b 20 70 32 2b 2b 3b 20 7d 0a 23 65 6e  i++; p2++; }.#en
0e60: 64 69 66 0a 20 20 69 66 28 20 70 32 3c 30 20 29  dif.  if( p2<0 )
0e70: 20 70 32 20 3d 20 30 3b 0a 20 20 73 71 6c 69 74   p2 = 0;.  sqlit
0e80: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
0e90: 6f 6e 74 65 78 74 2c 20 26 7a 5b 70 31 5d 2c 20  ontext, &z[p1], 
0ea0: 70 32 2c 20 31 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  p2, 1);.}../*.**
0eb0: 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20   Implementation 
0ec0: 6f 66 20 74 68 65 20 72 6f 75 6e 64 28 29 20 66  of the round() f
0ed0: 75 6e 63 74 69 6f 6e 0a 2a 2f 0a 73 74 61 74 69  unction.*/.stati
0ee0: 63 20 76 6f 69 64 20 72 6f 75 6e 64 46 75 6e 63  c void roundFunc
0ef0: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74  (sqlite3_context
0f00: 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61   *context, int a
0f10: 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c  rgc, sqlite3_val
0f20: 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 69 6e  ue **argv){.  in
0f30: 74 20 6e 20 3d 20 30 3b 0a 20 20 64 6f 75 62 6c  t n = 0;.  doubl
0f40: 65 20 72 3b 0a 20 20 63 68 61 72 20 7a 42 75 66  e r;.  char zBuf
0f50: 5b 31 30 30 5d 3b 0a 20 20 61 73 73 65 72 74 28  [100];.  assert(
0f60: 20 61 72 67 63 3d 3d 31 20 7c 7c 20 61 72 67 63   argc==1 || argc
0f70: 3d 3d 32 20 29 3b 0a 20 20 69 66 28 20 61 72 67  ==2 );.  if( arg
0f80: 63 3d 3d 32 20 29 7b 0a 20 20 20 20 69 66 28 20  c==2 ){.    if( 
0f90: 53 51 4c 49 54 45 33 5f 4e 55 4c 4c 3d 3d 73 71  SQLITE3_NULL==sq
0fa0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65  lite3_value_type
0fb0: 28 61 72 67 76 5b 31 5d 29 20 29 20 72 65 74 75  (argv[1]) ) retu
0fc0: 72 6e 3b 0a 20 20 20 20 6e 20 3d 20 73 71 6c 69  rn;.    n = sqli
0fd0: 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72  te3_value_int(ar
0fe0: 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69 66 28 20  gv[1]);.    if( 
0ff0: 6e 3e 33 30 20 29 20 6e 20 3d 20 33 30 3b 0a 20  n>30 ) n = 30;. 
1000: 20 20 20 69 66 28 20 6e 3c 30 20 29 20 6e 20 3d     if( n<0 ) n =
1010: 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 53 51   0;.  }.  if( SQ
1020: 4c 49 54 45 33 5f 4e 55 4c 4c 3d 3d 73 71 6c 69  LITE3_NULL==sqli
1030: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
1040: 72 67 76 5b 30 5d 29 20 29 20 72 65 74 75 72 6e  rgv[0]) ) return
1050: 3b 0a 20 20 72 20 3d 20 73 71 6c 69 74 65 33 5f  ;.  r = sqlite3_
1060: 76 61 6c 75 65 5f 66 6c 6f 61 74 28 61 72 67 76  value_float(argv
1070: 5b 30 5d 29 3b 0a 20 20 73 70 72 69 6e 74 66 28  [0]);.  sprintf(
1080: 7a 42 75 66 2c 22 25 2e 2a 66 22 2c 6e 2c 72 29  zBuf,"%.*f",n,r)
1090: 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  ;.  sqlite3_resu
10a0: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
10b0: 20 7a 42 75 66 2c 20 2d 31 2c 20 31 29 3b 0a 7d   zBuf, -1, 1);.}
10c0: 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ../*.** Implemen
10d0: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 75 70  tation of the up
10e0: 70 65 72 28 29 20 61 6e 64 20 6c 6f 77 65 72 28  per() and lower(
10f0: 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 73 2e  ) SQL functions.
1100: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
1110: 75 70 70 65 72 46 75 6e 63 28 73 71 6c 69 74 65  upperFunc(sqlite
1120: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
1130: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
1140: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
1150: 67 76 29 7b 0a 20 20 63 68 61 72 20 2a 7a 3b 0a  gv){.  char *z;.
1160: 20 20 69 6e 74 20 69 3b 0a 20 20 69 66 28 20 61    int i;.  if( a
1170: 72 67 63 3c 31 20 7c 7c 20 53 51 4c 49 54 45 33  rgc<1 || SQLITE3
1180: 5f 4e 55 4c 4c 3d 3d 73 71 6c 69 74 65 33 5f 76  _NULL==sqlite3_v
1190: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30  alue_type(argv[0
11a0: 5d 29 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 7a  ]) ) return;.  z
11b0: 20 3d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28   = sqliteMalloc(
11c0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79  sqlite3_value_by
11d0: 74 65 73 28 61 72 67 76 5b 30 5d 29 29 3b 0a 20  tes(argv[0]));. 
11e0: 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75   if( z==0 ) retu
11f0: 72 6e 3b 0a 20 20 73 74 72 63 70 79 28 7a 2c 20  rn;.  strcpy(z, 
1200: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 61  sqlite3_value_da
1210: 74 61 28 61 72 67 76 5b 30 5d 29 29 3b 0a 20 20  ta(argv[0]));.  
1220: 66 6f 72 28 69 3d 30 3b 20 7a 5b 69 5d 3b 20 69  for(i=0; z[i]; i
1230: 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 69 73 6c  ++){.    if( isl
1240: 6f 77 65 72 28 7a 5b 69 5d 29 20 29 20 7a 5b 69  ower(z[i]) ) z[i
1250: 5d 20 3d 20 74 6f 75 70 70 65 72 28 7a 5b 69 5d  ] = toupper(z[i]
1260: 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33  );.  }.  sqlite3
1270: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
1280: 74 65 78 74 2c 20 7a 2c 20 2d 31 2c 20 31 29 3b  text, z, -1, 1);
1290: 0a 20 20 73 71 6c 69 74 65 46 72 65 65 28 7a 29  .  sqliteFree(z)
12a0: 3b 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20  ;.}.static void 
12b0: 6c 6f 77 65 72 46 75 6e 63 28 73 71 6c 69 74 65  lowerFunc(sqlite
12c0: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
12d0: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
12e0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
12f0: 67 76 29 7b 0a 20 20 63 68 61 72 20 2a 7a 3b 0a  gv){.  char *z;.
1300: 20 20 69 6e 74 20 69 3b 0a 20 20 69 66 28 20 61    int i;.  if( a
1310: 72 67 63 3c 31 20 7c 7c 20 53 51 4c 49 54 45 33  rgc<1 || SQLITE3
1320: 5f 4e 55 4c 4c 3d 3d 73 71 6c 69 74 65 33 5f 76  _NULL==sqlite3_v
1330: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30  alue_type(argv[0
1340: 5d 29 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 7a  ]) ) return;.  z
1350: 20 3d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28   = sqliteMalloc(
1360: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79  sqlite3_value_by
1370: 74 65 73 28 61 72 67 76 5b 30 5d 29 29 3b 0a 20  tes(argv[0]));. 
1380: 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75   if( z==0 ) retu
1390: 72 6e 3b 0a 20 20 73 74 72 63 70 79 28 7a 2c 20  rn;.  strcpy(z, 
13a0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 61  sqlite3_value_da
13b0: 74 61 28 61 72 67 76 5b 30 5d 29 29 3b 0a 20 20  ta(argv[0]));.  
13c0: 66 6f 72 28 69 3d 30 3b 20 7a 5b 69 5d 3b 20 69  for(i=0; z[i]; i
13d0: 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 69 73 75  ++){.    if( isu
13e0: 70 70 65 72 28 7a 5b 69 5d 29 20 29 20 7a 5b 69  pper(z[i]) ) z[i
13f0: 5d 20 3d 20 74 6f 6c 6f 77 65 72 28 7a 5b 69 5d  ] = tolower(z[i]
1400: 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33  );.  }.  sqlite3
1410: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
1420: 74 65 78 74 2c 20 7a 2c 20 2d 31 2c 20 31 29 3b  text, z, -1, 1);
1430: 0a 20 20 73 71 6c 69 74 65 46 72 65 65 28 7a 29  .  sqliteFree(z)
1440: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65  ;.}../*.** Imple
1450: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
1460: 20 49 46 4e 55 4c 4c 28 29 2c 20 4e 56 4c 28 29   IFNULL(), NVL()
1470: 2c 20 61 6e 64 20 43 4f 41 4c 45 53 43 45 28 29  , and COALESCE()
1480: 20 66 75 6e 63 74 69 6f 6e 73 2e 20 20 0a 2a 2a   functions.  .**
1490: 20 41 6c 6c 20 74 68 72 65 65 20 64 6f 20 74 68   All three do th
14a0: 65 20 73 61 6d 65 20 74 68 69 6e 67 2e 20 20 54  e same thing.  T
14b0: 68 65 79 20 72 65 74 75 72 6e 20 74 68 65 20 66  hey return the f
14c0: 69 72 73 74 20 6e 6f 6e 2d 4e 55 4c 4c 0a 2a 2a  irst non-NULL.**
14d0: 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2f 0a 73 74   argument..*/.st
14e0: 61 74 69 63 20 76 6f 69 64 20 69 66 6e 75 6c 6c  atic void ifnull
14f0: 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e  Func(sqlite3_con
1500: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69  text *context, i
1510: 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33  nt argc, sqlite3
1520: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a  _value **argv){.
1530: 20 20 69 6e 74 20 69 3b 0a 20 20 66 6f 72 28 69    int i;.  for(i
1540: 3d 30 3b 20 69 3c 61 72 67 63 3b 20 69 2b 2b 29  =0; i<argc; i++)
1550: 7b 0a 20 20 20 20 69 66 28 20 53 51 4c 49 54 45  {.    if( SQLITE
1560: 33 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74 65 33 5f  3_NULL!=sqlite3_
1570: 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b  value_type(argv[
1580: 69 5d 29 20 29 7b 0a 20 20 20 20 20 20 73 71 6c  i]) ){.      sql
1590: 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74  ite3_result_text
15a0: 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65  (context, sqlite
15b0: 33 5f 76 61 6c 75 65 5f 64 61 74 61 28 61 72 67  3_value_data(arg
15c0: 76 5b 69 5d 29 2c 20 2d 31 2c 20 31 29 3b 0a 20  v[i]), -1, 1);. 
15d0: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20       break;.    
15e0: 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49  }.  }.}../*.** I
15f0: 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66  mplementation of
1600: 20 72 61 6e 64 6f 6d 28 29 2e 20 20 52 65 74 75   random().  Retu
1610: 72 6e 20 61 20 72 61 6e 64 6f 6d 20 69 6e 74 65  rn a random inte
1620: 67 65 72 2e 20 20 0a 2a 2f 0a 73 74 61 74 69 63  ger.  .*/.static
1630: 20 76 6f 69 64 20 72 61 6e 64 6f 6d 46 75 6e 63   void randomFunc
1640: 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74  (sqlite3_context
1650: 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61   *context, int a
1660: 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c  rgc, sqlite3_val
1670: 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 69 6e  ue **argv){.  in
1680: 74 20 72 3b 0a 20 20 73 71 6c 69 74 65 33 52 61  t r;.  sqlite3Ra
1690: 6e 64 6f 6d 6e 65 73 73 28 73 69 7a 65 6f 66 28  ndomness(sizeof(
16a0: 72 29 2c 20 26 72 29 3b 0a 20 20 73 71 6c 69 74  r), &r);.  sqlit
16b0: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 33 32 28  e3_result_int32(
16c0: 63 6f 6e 74 65 78 74 2c 20 72 29 3b 0a 7d 0a 0a  context, r);.}..
16d0: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
16e0: 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 61 73 74  tion of the last
16f0: 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 29 20  _insert_rowid() 
1700: 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54  SQL function.  T
1710: 68 65 20 72 65 74 75 72 6e 0a 2a 2a 20 76 61 6c  he return.** val
1720: 75 65 20 69 73 20 74 68 65 20 73 61 6d 65 20 61  ue is the same a
1730: 73 20 74 68 65 20 73 71 6c 69 74 65 33 5f 6c 61  s the sqlite3_la
1740: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28  st_insert_rowid(
1750: 29 20 41 50 49 20 66 75 6e 63 74 69 6f 6e 2e 0a  ) API function..
1760: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  */.static void l
1770: 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64  ast_insert_rowid
1780: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
1790: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a 20  ext *context, . 
17a0: 20 69 6e 74 20 61 72 67 2c 20 0a 20 20 73 71 6c   int arg, .  sql
17b0: 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67  ite3_value **arg
17c0: 76 0a 29 7b 0a 20 20 73 71 6c 69 74 65 20 2a 64  v.){.  sqlite *d
17d0: 62 20 3d 20 73 71 6c 69 74 65 33 5f 75 73 65 72  b = sqlite3_user
17e0: 5f 64 61 74 61 28 63 6f 6e 74 65 78 74 29 3b 0a  _data(context);.
17f0: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
1800: 5f 69 6e 74 33 32 28 63 6f 6e 74 65 78 74 2c 20  _int32(context, 
1810: 73 71 6c 69 74 65 33 5f 6c 61 73 74 5f 69 6e 73  sqlite3_last_ins
1820: 65 72 74 5f 72 6f 77 69 64 28 64 62 29 29 3b 0a  ert_rowid(db));.
1830: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
1840: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 63  ntation of the c
1850: 68 61 6e 67 65 5f 63 6f 75 6e 74 28 29 20 53 51  hange_count() SQ
1860: 4c 20 66 75 6e 63 74 69 6f 6e 2e 20 20 54 68 65  L function.  The
1870: 20 72 65 74 75 72 6e 0a 2a 2a 20 76 61 6c 75 65   return.** value
1880: 20 69 73 20 74 68 65 20 73 61 6d 65 20 61 73 20   is the same as 
1890: 74 68 65 20 73 71 6c 69 74 65 33 5f 63 68 61 6e  the sqlite3_chan
18a0: 67 65 73 28 29 20 41 50 49 20 66 75 6e 63 74 69  ges() API functi
18b0: 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  on..*/.static vo
18c0: 69 64 20 63 68 61 6e 67 65 5f 63 6f 75 6e 74 28  id change_count(
18d0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
18e0: 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72  *context, int ar
18f0: 67 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  g, sqlite3_value
1900: 20 2a 2a 61 72 67 76 29 7b 0a 20 20 73 71 6c 69   **argv){.  sqli
1910: 74 65 20 2a 64 62 20 3d 20 73 71 6c 69 74 65 33  te *db = sqlite3
1920: 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e 74 65  _user_data(conte
1930: 78 74 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72  xt);.  sqlite3_r
1940: 65 73 75 6c 74 5f 69 6e 74 33 32 28 63 6f 6e 74  esult_int32(cont
1950: 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 63 68 61  ext, sqlite3_cha
1960: 6e 67 65 73 28 64 62 29 29 3b 0a 7d 0a 0a 2f 2a  nges(db));.}../*
1970: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69  .** Implementati
1980: 6f 6e 20 6f 66 20 74 68 65 20 6c 61 73 74 5f 73  on of the last_s
1990: 74 61 74 65 6d 65 6e 74 5f 63 68 61 6e 67 65 5f  tatement_change_
19a0: 63 6f 75 6e 74 28 29 20 53 51 4c 20 66 75 6e 63  count() SQL func
19b0: 74 69 6f 6e 2e 20 20 54 68 65 0a 2a 2a 20 72 65  tion.  The.** re
19c0: 74 75 72 6e 20 76 61 6c 75 65 20 69 73 20 74 68  turn value is th
19d0: 65 20 73 61 6d 65 20 61 73 20 74 68 65 20 73 71  e same as the sq
19e0: 6c 69 74 65 33 5f 6c 61 73 74 5f 73 74 61 74 65  lite3_last_state
19f0: 6d 65 6e 74 5f 63 68 61 6e 67 65 73 28 29 20 41  ment_changes() A
1a00: 50 49 0a 2a 2a 20 66 75 6e 63 74 69 6f 6e 2e 0a  PI.** function..
1a10: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c  */.static void l
1a20: 61 73 74 5f 73 74 61 74 65 6d 65 6e 74 5f 63 68  ast_statement_ch
1a30: 61 6e 67 65 5f 63 6f 75 6e 74 28 0a 20 20 73 71  ange_count(.  sq
1a40: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63  lite3_context *c
1a50: 6f 6e 74 65 78 74 2c 20 0a 20 20 69 6e 74 20 61  ontext, .  int a
1a60: 72 67 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61  rg,.  sqlite3_va
1a70: 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20  lue **argv.){.  
1a80: 73 71 6c 69 74 65 20 2a 64 62 20 3d 20 73 71 6c  sqlite *db = sql
1a90: 69 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63  ite3_user_data(c
1aa0: 6f 6e 74 65 78 74 29 3b 0a 20 20 73 71 6c 69 74  ontext);.  sqlit
1ab0: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 33 32 28  e3_result_int32(
1ac0: 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33  context, sqlite3
1ad0: 5f 6c 61 73 74 5f 73 74 61 74 65 6d 65 6e 74 5f  _last_statement_
1ae0: 63 68 61 6e 67 65 73 28 64 62 29 29 3b 0a 7d 0a  changes(db));.}.
1af0: 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74  ./*.** Implement
1b00: 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6c 69 6b  ation of the lik
1b10: 65 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e  e() SQL function
1b20: 2e 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e  .  This function
1b30: 20 69 6d 70 6c 65 6d 65 6e 74 73 0a 2a 2a 20 74   implements.** t
1b40: 68 65 20 62 75 69 6c 64 2d 69 6e 20 4c 49 4b 45  he build-in LIKE
1b50: 20 6f 70 65 72 61 74 6f 72 2e 20 20 54 68 65 20   operator.  The 
1b60: 66 69 72 73 74 20 61 72 67 75 6d 65 6e 74 20 74  first argument t
1b70: 6f 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 69  o the function i
1b80: 73 20 74 68 65 0a 2a 2a 20 73 74 72 69 6e 67 20  s the.** string 
1b90: 61 6e 64 20 74 68 65 20 73 65 63 6f 6e 64 20 61  and the second a
1ba0: 72 67 75 6d 65 6e 74 20 69 73 20 74 68 65 20 70  rgument is the p
1bb0: 61 74 74 65 72 6e 2e 20 20 53 6f 2c 20 74 68 65  attern.  So, the
1bc0: 20 53 51 4c 20 73 74 61 74 65 6d 65 6e 74 73 3a   SQL statements:
1bd0: 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 41 20 4c  .**.**       A L
1be0: 49 4b 45 20 42 0a 2a 2a 0a 2a 2a 20 69 73 20 69  IKE B.**.** is i
1bf0: 6d 70 6c 65 6d 65 6e 74 65 64 20 61 73 20 6c 69  mplemented as li
1c00: 6b 65 28 41 2c 42 29 2e 0a 2a 2f 0a 73 74 61 74  ke(A,B)..*/.stat
1c10: 69 63 20 76 6f 69 64 20 6c 69 6b 65 46 75 6e 63  ic void likeFunc
1c20: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
1c30: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 0a 20  ext *context, . 
1c40: 20 69 6e 74 20 61 72 67 63 2c 20 0a 20 20 73 71   int argc, .  sq
1c50: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
1c60: 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 75 6e  gv.){.  const un
1c70: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 7a 41 20  signed char *zA 
1c80: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
1c90: 64 61 74 61 28 61 72 67 76 5b 30 5d 29 3b 0a 20  data(argv[0]);. 
1ca0: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
1cb0: 63 68 61 72 20 2a 7a 42 20 3d 20 73 71 6c 69 74  char *zB = sqlit
1cc0: 65 33 5f 76 61 6c 75 65 5f 64 61 74 61 28 61 72  e3_value_data(ar
1cd0: 67 76 5b 31 5d 29 3b 0a 20 20 69 66 28 20 7a 41  gv[1]);.  if( zA
1ce0: 20 26 26 20 7a 42 20 29 7b 0a 20 20 20 20 73 71   && zB ){.    sq
1cf0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74  lite3_result_int
1d00: 33 32 28 63 6f 6e 74 65 78 74 2c 20 73 71 6c 69  32(context, sqli
1d10: 74 65 33 4c 69 6b 65 43 6f 6d 70 61 72 65 28 7a  te3LikeCompare(z
1d20: 41 2c 20 7a 42 29 29 3b 0a 20 20 7d 0a 7d 0a 0a  A, zB));.  }.}..
1d30: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61  /*.** Implementa
1d40: 74 69 6f 6e 20 6f 66 20 74 68 65 20 67 6c 6f 62  tion of the glob
1d50: 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 2e  () SQL function.
1d60: 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20    This function 
1d70: 69 6d 70 6c 65 6d 65 6e 74 73 0a 2a 2a 20 74 68  implements.** th
1d80: 65 20 62 75 69 6c 64 2d 69 6e 20 47 4c 4f 42 20  e build-in GLOB 
1d90: 6f 70 65 72 61 74 6f 72 2e 20 20 54 68 65 20 66  operator.  The f
1da0: 69 72 73 74 20 61 72 67 75 6d 65 6e 74 20 74 6f  irst argument to
1db0: 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 69 73   the function is
1dc0: 20 74 68 65 0a 2a 2a 20 73 74 72 69 6e 67 20 61   the.** string a
1dd0: 6e 64 20 74 68 65 20 73 65 63 6f 6e 64 20 61 72  nd the second ar
1de0: 67 75 6d 65 6e 74 20 69 73 20 74 68 65 20 70 61  gument is the pa
1df0: 74 74 65 72 6e 2e 20 20 53 6f 2c 20 74 68 65 20  ttern.  So, the 
1e00: 53 51 4c 20 73 74 61 74 65 6d 65 6e 74 73 3a 0a  SQL statements:.
1e10: 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 41 20 47 4c  **.**       A GL
1e20: 4f 42 20 42 0a 2a 2a 0a 2a 2a 20 69 73 20 69 6d  OB B.**.** is im
1e30: 70 6c 65 6d 65 6e 74 65 64 20 61 73 20 67 6c 6f  plemented as glo
1e40: 62 28 41 2c 42 29 2e 0a 2a 2f 0a 73 74 61 74 69  b(A,B)..*/.stati
1e50: 63 20 76 6f 69 64 20 67 6c 6f 62 46 75 6e 63 28  c void globFunc(
1e60: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20  sqlite3_context 
1e70: 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20 61 72  *context, int ar
1e80: 67 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  g, sqlite3_value
1e90: 20 2a 2a 61 72 67 76 29 7b 0a 20 20 63 6f 6e 73   **argv){.  cons
1ea0: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
1eb0: 2a 7a 41 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  *zA = sqlite3_va
1ec0: 6c 75 65 5f 64 61 74 61 28 61 72 67 76 5b 30 5d  lue_data(argv[0]
1ed0: 29 3b 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67  );.  const unsig
1ee0: 6e 65 64 20 63 68 61 72 20 2a 7a 42 20 3d 20 73  ned char *zB = s
1ef0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 61 74  qlite3_value_dat
1f00: 61 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 69 66  a(argv[1]);.  if
1f10: 28 20 7a 41 20 26 26 20 7a 42 20 29 7b 0a 20 20  ( zA && zB ){.  
1f20: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
1f30: 5f 69 6e 74 33 32 28 63 6f 6e 74 65 78 74 2c 20  _int32(context, 
1f40: 73 71 6c 69 74 65 33 47 6c 6f 62 43 6f 6d 70 61  sqlite3GlobCompa
1f50: 72 65 28 7a 41 2c 20 7a 42 29 29 3b 0a 20 20 7d  re(zA, zB));.  }
1f60: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d  .}../*.** Implem
1f70: 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20  entation of the 
1f80: 4e 55 4c 4c 49 46 28 78 2c 79 29 20 66 75 6e 63  NULLIF(x,y) func
1f90: 74 69 6f 6e 2e 20 20 54 68 65 20 72 65 73 75 6c  tion.  The resul
1fa0: 74 20 69 73 20 74 68 65 20 66 69 72 73 74 0a 2a  t is the first.*
1fb0: 2a 20 61 72 67 75 6d 65 6e 74 20 69 66 20 74 68  * argument if th
1fc0: 65 20 61 72 67 75 6d 65 6e 74 73 20 61 72 65 20  e arguments are 
1fd0: 64 69 66 66 65 72 65 6e 74 2e 20 20 54 68 65 20  different.  The 
1fe0: 72 65 73 75 6c 74 20 69 73 20 4e 55 4c 4c 20 69  result is NULL i
1ff0: 66 20 74 68 65 0a 2a 2a 20 61 72 67 75 6d 65 6e  f the.** argumen
2000: 74 73 20 61 72 65 20 65 71 75 61 6c 20 74 6f 20  ts are equal to 
2010: 65 61 63 68 20 6f 74 68 65 72 2e 0a 2a 2f 0a 73  each other..*/.s
2020: 74 61 74 69 63 20 76 6f 69 64 20 6e 75 6c 6c 69  tatic void nulli
2030: 66 46 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f  fFunc(sqlite3_co
2040: 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20  ntext *context, 
2050: 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65  int argc, sqlite
2060: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b  3_value **argv){
2070: 0a 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65  .  const unsigne
2080: 64 20 63 68 61 72 20 2a 7a 58 20 3d 20 73 71 6c  d char *zX = sql
2090: 69 74 65 33 5f 76 61 6c 75 65 5f 64 61 74 61 28  ite3_value_data(
20a0: 61 72 67 76 5b 30 5d 29 3b 0a 20 20 63 6f 6e 73  argv[0]);.  cons
20b0: 74 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20  t unsigned char 
20c0: 2a 7a 59 20 3d 20 73 71 6c 69 74 65 33 5f 76 61  *zY = sqlite3_va
20d0: 6c 75 65 5f 64 61 74 61 28 61 72 67 76 5b 31 5d  lue_data(argv[1]
20e0: 29 3b 0a 20 20 69 66 28 20 7a 58 21 3d 30 20 26  );.  if( zX!=0 &
20f0: 26 20 73 71 6c 69 74 65 33 43 6f 6d 70 61 72 65  & sqlite3Compare
2100: 28 7a 58 2c 20 7a 59 29 21 3d 30 20 29 7b 0a 20  (zX, zY)!=0 ){. 
2110: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
2120: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
2130: 7a 58 2c 20 2d 31 2c 20 31 29 3b 0a 20 20 7d 0a  zX, -1, 1);.  }.
2140: 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65  }../*.** Impleme
2150: 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 56  ntation of the V
2160: 45 52 53 49 4f 4e 28 2a 29 20 66 75 6e 63 74 69  ERSION(*) functi
2170: 6f 6e 2e 20 20 54 68 65 20 72 65 73 75 6c 74 20  on.  The result 
2180: 69 73 20 74 68 65 20 76 65 72 73 69 6f 6e 0a 2a  is the version.*
2190: 2a 20 6f 66 20 74 68 65 20 53 51 4c 69 74 65 20  * of the SQLite 
21a0: 6c 69 62 72 61 72 79 20 74 68 61 74 20 69 73 20  library that is 
21b0: 72 75 6e 6e 69 6e 67 2e 0a 2a 2f 0a 73 74 61 74  running..*/.stat
21c0: 69 63 20 76 6f 69 64 20 76 65 72 73 69 6f 6e 46  ic void versionF
21d0: 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  unc(sqlite3_cont
21e0: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e  ext *context, in
21f0: 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f  t argc, sqlite3_
2200: 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20  value **argv){. 
2210: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
2220: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 71  text(context, sq
2230: 6c 69 74 65 33 5f 76 65 72 73 69 6f 6e 2c 20 2d  lite3_version, -
2240: 31 2c 20 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  1, 0);.}../*.** 
2250: 45 58 50 45 52 49 4d 45 4e 54 41 4c 20 2d 20 54  EXPERIMENTAL - T
2260: 68 69 73 20 69 73 20 6e 6f 74 20 61 6e 20 6f 66  his is not an of
2270: 66 69 63 69 61 6c 20 66 75 6e 63 74 69 6f 6e 2e  ficial function.
2280: 20 20 54 68 65 20 69 6e 74 65 72 66 61 63 65 20    The interface 
2290: 6d 61 79 0a 2a 2a 20 63 68 61 6e 67 65 2e 20 20  may.** change.  
22a0: 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 6d 61  This function ma
22b0: 79 20 64 69 73 61 70 70 65 61 72 2e 20 20 44 6f  y disappear.  Do
22c0: 20 6e 6f 74 20 77 72 69 74 65 20 63 6f 64 65 20   not write code 
22d0: 74 68 61 74 20 64 65 70 65 6e 64 73 0a 2a 2a 20  that depends.** 
22e0: 6f 6e 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e  on this function
22f0: 2e 0a 2a 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e  ..**.** Implemen
2300: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 51 55  tation of the QU
2310: 4f 54 45 28 29 20 66 75 6e 63 74 69 6f 6e 2e 20  OTE() function. 
2320: 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 74   This function t
2330: 61 6b 65 73 20 61 20 73 69 6e 67 6c 65 0a 2a 2a  akes a single.**
2340: 20 61 72 67 75 6d 65 6e 74 2e 20 20 49 66 20 74   argument.  If t
2350: 68 65 20 61 72 67 75 6d 65 6e 74 20 69 73 20 6e  he argument is n
2360: 75 6d 65 72 69 63 2c 20 74 68 65 20 72 65 74 75  umeric, the retu
2370: 72 6e 20 76 61 6c 75 65 20 69 73 20 74 68 65 20  rn value is the 
2380: 73 61 6d 65 20 61 73 0a 2a 2a 20 74 68 65 20 61  same as.** the a
2390: 72 67 75 6d 65 6e 74 2e 20 20 49 66 20 74 68 65  rgument.  If the
23a0: 20 61 72 67 75 6d 65 6e 74 20 69 73 20 4e 55 4c   argument is NUL
23b0: 4c 2c 20 74 68 65 20 72 65 74 75 72 6e 20 76 61  L, the return va
23c0: 6c 75 65 20 69 73 20 74 68 65 20 73 74 72 69 6e  lue is the strin
23d0: 67 0a 2a 2a 20 22 4e 55 4c 4c 22 2e 20 20 4f 74  g.** "NULL".  Ot
23e0: 68 65 72 77 69 73 65 2c 20 74 68 65 20 61 72 67  herwise, the arg
23f0: 75 6d 65 6e 74 20 69 73 20 65 6e 63 6c 6f 73 65  ument is enclose
2400: 64 20 69 6e 20 73 69 6e 67 6c 65 20 71 75 6f 74  d in single quot
2410: 65 73 20 77 69 74 68 0a 2a 2a 20 73 69 6e 67 6c  es with.** singl
2420: 65 2d 71 75 6f 74 65 20 65 73 63 61 70 65 73 2e  e-quote escapes.
2430: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
2440: 71 75 6f 74 65 46 75 6e 63 28 73 71 6c 69 74 65  quoteFunc(sqlite
2450: 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65  3_context *conte
2460: 78 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 73 71  xt, int argc, sq
2470: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72  lite3_value **ar
2480: 67 76 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61  gv){.  const cha
2490: 72 20 2a 7a 41 72 67 20 3d 20 73 71 6c 69 74 65  r *zArg = sqlite
24a0: 33 5f 76 61 6c 75 65 5f 64 61 74 61 28 61 72 67  3_value_data(arg
24b0: 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 61 72 67  v[0]);.  if( arg
24c0: 63 3c 31 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  c<1 ) return;.  
24d0: 69 66 28 20 7a 41 72 67 3d 3d 30 20 29 7b 0a 20  if( zArg==0 ){. 
24e0: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
24f0: 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20  t_text(context, 
2500: 22 4e 55 4c 4c 22 2c 20 34 2c 20 30 29 3b 0a 20  "NULL", 4, 0);. 
2510: 20 7d 65 6c 73 65 20 69 66 28 20 73 71 6c 69 74   }else if( sqlit
2520: 65 33 49 73 4e 75 6d 62 65 72 28 7a 41 72 67 2c  e3IsNumber(zArg,
2530: 20 30 2c 20 54 45 58 54 5f 55 74 66 38 29 20 29   0, TEXT_Utf8) )
2540: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65  {.    sqlite3_re
2550: 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78  sult_text(contex
2560: 74 2c 20 7a 41 72 67 2c 20 2d 31 2c 20 31 29 3b  t, zArg, -1, 1);
2570: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 69 6e  .  }else{.    in
2580: 74 20 69 2c 6a 2c 6e 3b 0a 20 20 20 20 63 68 61  t i,j,n;.    cha
2590: 72 20 2a 7a 3b 0a 20 20 20 20 66 6f 72 28 69 3d  r *z;.    for(i=
25a0: 6e 3d 30 3b 20 7a 41 72 67 5b 69 5d 3b 20 69 2b  n=0; zArg[i]; i+
25b0: 2b 29 7b 20 69 66 28 20 7a 41 72 67 5b 69 5d 3d  +){ if( zArg[i]=
25c0: 3d 27 5c 27 27 20 29 20 6e 2b 2b 3b 20 7d 0a 20  ='\'' ) n++; }. 
25d0: 20 20 20 7a 20 3d 20 73 71 6c 69 74 65 4d 61 6c     z = sqliteMal
25e0: 6c 6f 63 28 20 69 2b 6e 2b 33 20 29 3b 0a 20 20  loc( i+n+3 );.  
25f0: 20 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74    if( z==0 ) ret
2600: 75 72 6e 3b 0a 20 20 20 20 7a 5b 30 5d 20 3d 20  urn;.    z[0] = 
2610: 27 5c 27 27 3b 0a 20 20 20 20 66 6f 72 28 69 3d  '\'';.    for(i=
2620: 30 2c 20 6a 3d 31 3b 20 7a 41 72 67 5b 69 5d 3b  0, j=1; zArg[i];
2630: 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 7a 5b 6a   i++){.      z[j
2640: 2b 2b 5d 20 3d 20 7a 41 72 67 5b 69 5d 3b 0a 20  ++] = zArg[i];. 
2650: 20 20 20 20 20 69 66 28 20 7a 41 72 67 5b 69 5d       if( zArg[i]
2660: 3d 3d 27 5c 27 27 20 29 7b 0a 20 20 20 20 20 20  =='\'' ){.      
2670: 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27 3b    z[j++] = '\'';
2680: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20  .      }.    }. 
2690: 20 20 20 7a 5b 6a 2b 2b 5d 20 3d 20 27 5c 27 27     z[j++] = '\''
26a0: 3b 0a 20 20 20 20 7a 5b 6a 5d 20 3d 20 30 3b 0a  ;.    z[j] = 0;.
26b0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
26c0: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
26d0: 20 7a 2c 20 6a 2c 20 31 29 3b 0a 20 20 20 20 73   z, j, 1);.    s
26e0: 71 6c 69 74 65 46 72 65 65 28 7a 29 3b 0a 20 20  qliteFree(z);.  
26f0: 7d 0a 7d 0a 0a 23 69 66 64 65 66 20 53 51 4c 49  }.}..#ifdef SQLI
2700: 54 45 5f 53 4f 55 4e 44 45 58 0a 2f 2a 0a 2a 2a  TE_SOUNDEX./*.**
2710: 20 43 6f 6d 70 75 74 65 20 74 68 65 20 73 6f 75   Compute the sou
2720: 6e 64 65 78 20 65 6e 63 6f 64 69 6e 67 20 6f 66  ndex encoding of
2730: 20 61 20 77 6f 72 64 2e 0a 2a 2f 0a 73 74 61 74   a word..*/.stat
2740: 69 63 20 76 6f 69 64 20 73 6f 75 6e 64 65 78 46  ic void soundexF
2750: 75 6e 63 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  unc(sqlite3_cont
2760: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e  ext *context, in
2770: 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f  t argc, sqlite3_
2780: 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20  value **argv){. 
2790: 20 63 68 61 72 20 7a 52 65 73 75 6c 74 5b 38 5d   char zResult[8]
27a0: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
27b0: 7a 49 6e 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b  zIn;.  int i, j;
27c0: 0a 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20  .  static const 
27d0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 69 43  unsigned char iC
27e0: 6f 64 65 5b 5d 20 3d 20 7b 0a 20 20 20 20 30 2c  ode[] = {.    0,
27f0: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
2800: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
2810: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 0a 20 20  , 0, 0, 0, 0,.  
2820: 20 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c    0, 0, 0, 0, 0,
2830: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
2840: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
2850: 2c 0a 20 20 20 20 30 2c 20 30 2c 20 30 2c 20 30  ,.    0, 0, 0, 0
2860: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
2870: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
2880: 30 2c 20 30 2c 0a 20 20 20 20 30 2c 20 30 2c 20  0, 0,.    0, 0, 
2890: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  0, 0, 0, 0, 0, 0
28a0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
28b0: 20 30 2c 20 30 2c 20 30 2c 0a 20 20 20 20 30 2c   0, 0, 0,.    0,
28c0: 20 30 2c 20 31 2c 20 32 2c 20 33 2c 20 30 2c 20   0, 1, 2, 3, 0, 
28d0: 31 2c 20 32 2c 20 30 2c 20 30 2c 20 32 2c 20 32  1, 2, 0, 0, 2, 2
28e0: 2c 20 34 2c 20 35 2c 20 35 2c 20 30 2c 0a 20 20  , 4, 5, 5, 0,.  
28f0: 20 20 31 2c 20 32 2c 20 36 2c 20 32 2c 20 33 2c    1, 2, 6, 2, 3,
2900: 20 30 2c 20 31 2c 20 30 2c 20 32 2c 20 30 2c 20   0, 1, 0, 2, 0, 
2910: 32 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30  2, 0, 0, 0, 0, 0
2920: 2c 0a 20 20 20 20 30 2c 20 30 2c 20 31 2c 20 32  ,.    0, 0, 1, 2
2930: 2c 20 33 2c 20 30 2c 20 31 2c 20 32 2c 20 30 2c  , 3, 0, 1, 2, 0,
2940: 20 30 2c 20 32 2c 20 32 2c 20 34 2c 20 35 2c 20   0, 2, 2, 4, 5, 
2950: 35 2c 20 30 2c 0a 20 20 20 20 31 2c 20 32 2c 20  5, 0,.    1, 2, 
2960: 36 2c 20 32 2c 20 33 2c 20 30 2c 20 31 2c 20 30  6, 2, 3, 0, 1, 0
2970: 2c 20 32 2c 20 30 2c 20 32 2c 20 30 2c 20 30 2c  , 2, 0, 2, 0, 0,
2980: 20 30 2c 20 30 2c 20 30 2c 0a 20 20 7d 3b 0a 20   0, 0, 0,.  };. 
2990: 20 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 31   assert( argc==1
29a0: 20 29 3b 0a 20 20 7a 49 6e 20 3d 20 73 71 6c 69   );.  zIn = sqli
29b0: 74 65 33 5f 76 61 6c 75 65 5f 64 61 74 61 28 61  te3_value_data(a
29c0: 72 67 76 5b 30 5d 29 3b 0a 20 20 66 6f 72 28 69  rgv[0]);.  for(i
29d0: 3d 30 3b 20 7a 49 6e 5b 69 5d 20 26 26 20 21 69  =0; zIn[i] && !i
29e0: 73 61 6c 70 68 61 28 7a 49 6e 5b 69 5d 29 3b 20  salpha(zIn[i]); 
29f0: 69 2b 2b 29 7b 7d 0a 20 20 69 66 28 20 7a 49 6e  i++){}.  if( zIn
2a00: 5b 69 5d 20 29 7b 0a 20 20 20 20 7a 52 65 73 75  [i] ){.    zResu
2a10: 6c 74 5b 30 5d 20 3d 20 74 6f 75 70 70 65 72 28  lt[0] = toupper(
2a20: 7a 49 6e 5b 69 5d 29 3b 0a 20 20 20 20 66 6f 72  zIn[i]);.    for
2a30: 28 6a 3d 31 3b 20 6a 3c 34 20 26 26 20 7a 49 6e  (j=1; j<4 && zIn
2a40: 5b 69 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20  [i]; i++){.     
2a50: 20 69 6e 74 20 63 6f 64 65 20 3d 20 69 43 6f 64   int code = iCod
2a60: 65 5b 7a 49 6e 5b 69 5d 26 30 78 37 66 5d 3b 0a  e[zIn[i]&0x7f];.
2a70: 20 20 20 20 20 20 69 66 28 20 63 6f 64 65 3e 30        if( code>0
2a80: 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 52 65 73   ){.        zRes
2a90: 75 6c 74 5b 6a 2b 2b 5d 20 3d 20 63 6f 64 65 20  ult[j++] = code 
2aa0: 2b 20 27 30 27 3b 0a 20 20 20 20 20 20 7d 0a 20  + '0';.      }. 
2ab0: 20 20 20 7d 0a 20 20 20 20 77 68 69 6c 65 28 20     }.    while( 
2ac0: 6a 3c 34 20 29 7b 0a 20 20 20 20 20 20 7a 52 65  j<4 ){.      zRe
2ad0: 73 75 6c 74 5b 6a 2b 2b 5d 20 3d 20 27 30 27 3b  sult[j++] = '0';
2ae0: 0a 20 20 20 20 7d 0a 20 20 20 20 7a 52 65 73 75  .    }.    zResu
2af0: 6c 74 5b 6a 5d 20 3d 20 30 3b 0a 20 20 20 20 73  lt[j] = 0;.    s
2b00: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65  qlite3_result_te
2b10: 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 52 65 73  xt(context, zRes
2b20: 75 6c 74 2c 20 34 2c 20 31 29 3b 0a 20 20 7d 65  ult, 4, 1);.  }e
2b30: 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  lse{.    sqlite3
2b40: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e  _result_text(con
2b50: 74 65 78 74 2c 20 22 3f 30 30 30 22 2c 20 34 2c  text, "?000", 4,
2b60: 20 30 29 3b 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69   0);.  }.}.#endi
2b70: 66 0a 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45  f..#ifdef SQLITE
2b80: 5f 54 45 53 54 0a 2f 2a 0a 2a 2a 20 54 68 69 73  _TEST./*.** This
2b90: 20 66 75 6e 63 74 69 6f 6e 20 67 65 6e 65 72 61   function genera
2ba0: 74 65 73 20 61 20 73 74 72 69 6e 67 20 6f 66 20  tes a string of 
2bb0: 72 61 6e 64 6f 6d 20 63 68 61 72 61 63 74 65 72  random character
2bc0: 73 2e 20 20 55 73 65 64 20 66 6f 72 0a 2a 2a 20  s.  Used for.** 
2bd0: 67 65 6e 65 72 61 74 69 6e 67 20 74 65 73 74 20  generating test 
2be0: 64 61 74 61 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  data..*/.static 
2bf0: 76 6f 69 64 20 72 61 6e 64 53 74 72 28 73 71 6c  void randStr(sql
2c00: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
2c10: 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c  ntext, int argc,
2c20: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
2c30: 2a 61 72 67 76 29 7b 0a 20 20 73 74 61 74 69 63  *argv){.  static
2c40: 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20   const unsigned 
2c50: 63 68 61 72 20 7a 53 72 63 5b 5d 20 3d 20 0a 20  char zSrc[] = . 
2c60: 20 20 20 20 22 61 62 63 64 65 66 67 68 69 6a 6b      "abcdefghijk
2c70: 6c 6d 6e 6f 70 71 72 73 74 75 76 77 78 79 7a 22  lmnopqrstuvwxyz"
2c80: 0a 20 20 20 20 20 22 41 42 43 44 45 46 47 48 49  .     "ABCDEFGHI
2c90: 4a 4b 4c 4d 4e 4f 50 51 52 53 54 55 56 57 58 59  JKLMNOPQRSTUVWXY
2ca0: 5a 22 0a 20 20 20 20 20 22 30 31 32 33 34 35 36  Z".     "0123456
2cb0: 37 38 39 22 0a 20 20 20 20 20 22 2e 2d 21 2c 3a  789".     ".-!,:
2cc0: 2a 5e 2b 3d 5f 7c 3f 2f 3c 3e 20 22 3b 0a 20 20  *^+=_|?/<> ";.  
2cd0: 69 6e 74 20 69 4d 69 6e 2c 20 69 4d 61 78 2c 20  int iMin, iMax, 
2ce0: 6e 2c 20 72 2c 20 69 3b 0a 20 20 75 6e 73 69 67  n, r, i;.  unsig
2cf0: 6e 65 64 20 63 68 61 72 20 7a 42 75 66 5b 31 30  ned char zBuf[10
2d00: 30 30 5d 3b 0a 20 20 69 66 28 20 61 72 67 63 3e  00];.  if( argc>
2d10: 3d 31 20 29 7b 0a 20 20 20 20 69 4d 69 6e 20 3d  =1 ){.    iMin =
2d20: 20 61 74 6f 69 28 73 71 6c 69 74 65 33 5f 76 61   atoi(sqlite3_va
2d30: 6c 75 65 5f 64 61 74 61 28 61 72 67 76 5b 30 5d  lue_data(argv[0]
2d40: 29 29 3b 0a 20 20 20 20 69 66 28 20 69 4d 69 6e  ));.    if( iMin
2d50: 3c 30 20 29 20 69 4d 69 6e 20 3d 20 30 3b 0a 20  <0 ) iMin = 0;. 
2d60: 20 20 20 69 66 28 20 69 4d 69 6e 3e 3d 73 69 7a     if( iMin>=siz
2d70: 65 6f 66 28 7a 42 75 66 29 20 29 20 69 4d 69 6e  eof(zBuf) ) iMin
2d80: 20 3d 20 73 69 7a 65 6f 66 28 7a 42 75 66 29 2d   = sizeof(zBuf)-
2d90: 31 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  1;.  }else{.    
2da0: 69 4d 69 6e 20 3d 20 31 3b 0a 20 20 7d 0a 20 20  iMin = 1;.  }.  
2db0: 69 66 28 20 61 72 67 63 3e 3d 32 20 29 7b 0a 20  if( argc>=2 ){. 
2dc0: 20 20 20 69 4d 61 78 20 3d 20 61 74 6f 69 28 73     iMax = atoi(s
2dd0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 64 61 74  qlite3_value_dat
2de0: 61 28 61 72 67 76 5b 31 5d 29 29 3b 0a 20 20 20  a(argv[1]));.   
2df0: 20 69 66 28 20 69 4d 61 78 3c 69 4d 69 6e 20 29   if( iMax<iMin )
2e00: 20 69 4d 61 78 20 3d 20 69 4d 69 6e 3b 0a 20 20   iMax = iMin;.  
2e10: 20 20 69 66 28 20 69 4d 61 78 3e 3d 73 69 7a 65    if( iMax>=size
2e20: 6f 66 28 7a 42 75 66 29 20 29 20 69 4d 61 78 20  of(zBuf) ) iMax 
2e30: 3d 20 73 69 7a 65 6f 66 28 7a 42 75 66 29 2d 31  = sizeof(zBuf)-1
2e40: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 69  ;.  }else{.    i
2e50: 4d 61 78 20 3d 20 35 30 3b 0a 20 20 7d 0a 20 20  Max = 50;.  }.  
2e60: 6e 20 3d 20 69 4d 69 6e 3b 0a 20 20 69 66 28 20  n = iMin;.  if( 
2e70: 69 4d 61 78 3e 69 4d 69 6e 20 29 7b 0a 20 20 20  iMax>iMin ){.   
2e80: 20 73 71 6c 69 74 65 33 52 61 6e 64 6f 6d 6e 65   sqlite3Randomne
2e90: 73 73 28 73 69 7a 65 6f 66 28 72 29 2c 20 26 72  ss(sizeof(r), &r
2ea0: 29 3b 0a 20 20 20 20 72 20 26 3d 20 30 78 37 66  );.    r &= 0x7f
2eb0: 66 66 66 66 66 66 3b 0a 20 20 20 20 6e 20 2b 3d  ffffff;.    n +=
2ec0: 20 72 25 28 69 4d 61 78 20 2b 20 31 20 2d 20 69   r%(iMax + 1 - i
2ed0: 4d 69 6e 29 3b 0a 20 20 7d 0a 20 20 61 73 73 65  Min);.  }.  asse
2ee0: 72 74 28 20 6e 3c 73 69 7a 65 6f 66 28 7a 42 75  rt( n<sizeof(zBu
2ef0: 66 29 20 29 3b 0a 20 20 73 71 6c 69 74 65 33 52  f) );.  sqlite3R
2f00: 61 6e 64 6f 6d 6e 65 73 73 28 6e 2c 20 7a 42 75  andomness(n, zBu
2f10: 66 29 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69  f);.  for(i=0; i
2f20: 3c 6e 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 7a 42  <n; i++){.    zB
2f30: 75 66 5b 69 5d 20 3d 20 7a 53 72 63 5b 7a 42 75  uf[i] = zSrc[zBu
2f40: 66 5b 69 5d 25 28 73 69 7a 65 6f 66 28 7a 53 72  f[i]%(sizeof(zSr
2f50: 63 29 2d 31 29 5d 3b 0a 20 20 7d 0a 20 20 7a 42  c)-1)];.  }.  zB
2f60: 75 66 5b 6e 5d 20 3d 20 30 3b 0a 20 20 73 71 6c  uf[n] = 0;.  sql
2f70: 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74  ite3_result_text
2f80: 28 63 6f 6e 74 65 78 74 2c 20 7a 42 75 66 2c 20  (context, zBuf, 
2f90: 6e 2c 20 31 29 3b 0a 7d 0a 23 65 6e 64 69 66 0a  n, 1);.}.#endif.
2fa0: 0a 2f 2a 0a 2a 2a 20 41 6e 20 69 6e 73 74 61 6e  ./*.** An instan
2fb0: 63 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77  ce of the follow
2fc0: 69 6e 67 20 73 74 72 75 63 74 75 72 65 20 68 6f  ing structure ho
2fd0: 6c 64 73 20 74 68 65 20 63 6f 6e 74 65 78 74 20  lds the context 
2fe0: 6f 66 20 61 0a 2a 2a 20 73 75 6d 28 29 20 6f 72  of a.** sum() or
2ff0: 20 61 76 67 28 29 20 61 67 67 72 65 67 61 74 65   avg() aggregate
3000: 20 63 6f 6d 70 75 74 61 74 69 6f 6e 2e 0a 2a 2f   computation..*/
3010: 0a 74 79 70 65 64 65 66 20 73 74 72 75 63 74 20  .typedef struct 
3020: 53 75 6d 43 74 78 20 53 75 6d 43 74 78 3b 0a 73  SumCtx SumCtx;.s
3030: 74 72 75 63 74 20 53 75 6d 43 74 78 20 7b 0a 20  truct SumCtx {. 
3040: 20 64 6f 75 62 6c 65 20 73 75 6d 3b 20 20 20 20   double sum;    
3050: 20 2f 2a 20 53 75 6d 20 6f 66 20 74 65 72 6d 73   /* Sum of terms
3060: 20 2a 2f 0a 20 20 69 6e 74 20 63 6e 74 3b 20 20   */.  int cnt;  
3070: 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20        /* Number 
3080: 6f 66 20 65 6c 65 6d 65 6e 74 73 20 73 75 6d 6d  of elements summ
3090: 65 64 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20  ed */.};../*.** 
30a0: 52 6f 75 74 69 6e 65 73 20 75 73 65 64 20 74 6f  Routines used to
30b0: 20 63 6f 6d 70 75 74 65 20 74 68 65 20 73 75 6d   compute the sum
30c0: 20 6f 72 20 61 76 65 72 61 67 65 2e 0a 2a 2f 0a   or average..*/.
30d0: 73 74 61 74 69 63 20 76 6f 69 64 20 73 75 6d 53  static void sumS
30e0: 74 65 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74  tep(sqlite3_cont
30f0: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e  ext *context, in
3100: 74 20 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f  t argc, sqlite3_
3110: 76 61 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20  value **argv){. 
3120: 20 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 69 66   SumCtx *p;.  if
3130: 28 20 61 72 67 63 3c 31 20 29 20 72 65 74 75 72  ( argc<1 ) retur
3140: 6e 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33  n;.  p = sqlite3
3150: 5f 67 65 74 5f 63 6f 6e 74 65 78 74 28 63 6f 6e  _get_context(con
3160: 74 65 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 29  text, sizeof(*p)
3170: 29 3b 0a 20 20 69 66 28 20 70 20 26 26 20 53 51  );.  if( p && SQ
3180: 4c 49 54 45 33 5f 4e 55 4c 4c 21 3d 73 71 6c 69  LITE3_NULL!=sqli
3190: 74 65 33 5f 76 61 6c 75 65 5f 74 79 70 65 28 61  te3_value_type(a
31a0: 72 67 76 5b 30 5d 29 20 29 7b 0a 20 20 20 20 70  rgv[0]) ){.    p
31b0: 2d 3e 73 75 6d 20 2b 3d 20 73 71 6c 69 74 65 33  ->sum += sqlite3
31c0: 5f 76 61 6c 75 65 5f 66 6c 6f 61 74 28 61 72 67  _value_float(arg
31d0: 76 5b 30 5d 29 3b 0a 20 20 20 20 70 2d 3e 63 6e  v[0]);.    p->cn
31e0: 74 2b 2b 3b 0a 20 20 7d 0a 7d 0a 73 74 61 74 69  t++;.  }.}.stati
31f0: 63 20 76 6f 69 64 20 73 75 6d 46 69 6e 61 6c 69  c void sumFinali
3200: 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65  ze(sqlite3_conte
3210: 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a 20 20  xt *context){.  
3220: 53 75 6d 43 74 78 20 2a 70 3b 0a 20 20 70 20 3d  SumCtx *p;.  p =
3230: 20 73 71 6c 69 74 65 33 5f 67 65 74 5f 63 6f 6e   sqlite3_get_con
3240: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 69  text(context, si
3250: 7a 65 6f 66 28 2a 70 29 29 3b 0a 20 20 73 71 6c  zeof(*p));.  sql
3260: 69 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62  ite3_result_doub
3270: 6c 65 28 63 6f 6e 74 65 78 74 2c 20 70 20 3f 20  le(context, p ? 
3280: 70 2d 3e 73 75 6d 20 3a 20 30 2e 30 29 3b 0a 7d  p->sum : 0.0);.}
3290: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 61 76 67  .static void avg
32a0: 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74 65 33  Finalize(sqlite3
32b0: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
32c0: 74 29 7b 0a 20 20 53 75 6d 43 74 78 20 2a 70 3b  t){.  SumCtx *p;
32d0: 0a 20 20 70 20 3d 20 73 71 6c 69 74 65 33 5f 67  .  p = sqlite3_g
32e0: 65 74 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65  et_context(conte
32f0: 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 29 29 3b  xt, sizeof(*p));
3300: 0a 20 20 69 66 28 20 70 20 26 26 20 70 2d 3e 63  .  if( p && p->c
3310: 6e 74 3e 30 20 29 7b 0a 20 20 20 20 73 71 6c 69  nt>0 ){.    sqli
3320: 74 65 33 5f 72 65 73 75 6c 74 5f 64 6f 75 62 6c  te3_result_doubl
3330: 65 28 63 6f 6e 74 65 78 74 2c 20 70 2d 3e 73 75  e(context, p->su
3340: 6d 2f 28 64 6f 75 62 6c 65 29 70 2d 3e 63 6e 74  m/(double)p->cnt
3350: 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  );.  }.}../*.** 
3360: 41 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74  An instance of t
3370: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72  he following str
3380: 75 63 74 75 72 65 20 68 6f 6c 64 73 20 74 68 65  ucture holds the
3390: 20 63 6f 6e 74 65 78 74 20 6f 66 20 61 0a 2a 2a   context of a.**
33a0: 20 76 61 72 69 61 6e 63 65 20 6f 72 20 73 74 61   variance or sta
33b0: 6e 64 61 72 64 20 64 65 76 69 61 74 69 6f 6e 20  ndard deviation 
33c0: 63 6f 6d 70 75 74 61 74 69 6f 6e 2e 0a 2a 2f 0a  computation..*/.
33d0: 74 79 70 65 64 65 66 20 73 74 72 75 63 74 20 53  typedef struct S
33e0: 74 64 44 65 76 43 74 78 20 53 74 64 44 65 76 43  tdDevCtx StdDevC
33f0: 74 78 3b 0a 73 74 72 75 63 74 20 53 74 64 44 65  tx;.struct StdDe
3400: 76 43 74 78 20 7b 0a 20 20 64 6f 75 62 6c 65 20  vCtx {.  double 
3410: 73 75 6d 3b 20 20 20 20 20 2f 2a 20 53 75 6d 20  sum;     /* Sum 
3420: 6f 66 20 74 65 72 6d 73 20 2a 2f 0a 20 20 64 6f  of terms */.  do
3430: 75 62 6c 65 20 73 75 6d 32 3b 20 20 20 20 2f 2a  uble sum2;    /*
3440: 20 53 75 6d 20 6f 66 20 74 68 65 20 73 71 75 61   Sum of the squa
3450: 72 65 73 20 6f 66 20 74 65 72 6d 73 20 2a 2f 0a  res of terms */.
3460: 20 20 69 6e 74 20 63 6e 74 3b 20 20 20 20 20 20    int cnt;      
3470: 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 74    /* Number of t
3480: 65 72 6d 73 20 63 6f 75 6e 74 65 64 20 2a 2f 0a  erms counted */.
3490: 7d 3b 0a 0a 23 69 66 20 30 20 20 20 2f 2a 20 4f  };..#if 0   /* O
34a0: 6d 69 74 20 62 65 63 61 75 73 65 20 6d 61 74 68  mit because math
34b0: 20 6c 69 62 72 61 72 79 20 69 73 20 72 65 71 75   library is requ
34c0: 69 72 65 64 20 2a 2f 0a 2f 2a 0a 2a 2a 20 52 6f  ired */./*.** Ro
34d0: 75 74 69 6e 65 73 20 75 73 65 64 20 74 6f 20 63  utines used to c
34e0: 6f 6d 70 75 74 65 20 74 68 65 20 73 74 61 6e 64  ompute the stand
34f0: 61 72 64 20 64 65 76 69 61 74 69 6f 6e 20 61 73  ard deviation as
3500: 20 61 6e 20 61 67 67 72 65 67 61 74 65 2e 0a 2a   an aggregate..*
3510: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 73 74  /.static void st
3520: 64 44 65 76 53 74 65 70 28 73 71 6c 69 74 65 33  dDevStep(sqlite3
3530: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
3540: 74 2c 20 69 6e 74 20 61 72 67 63 2c 20 63 6f 6e  t, int argc, con
3550: 73 74 20 63 68 61 72 20 2a 2a 61 72 67 76 29 7b  st char **argv){
3560: 0a 20 20 53 74 64 44 65 76 43 74 78 20 2a 70 3b  .  StdDevCtx *p;
3570: 0a 20 20 64 6f 75 62 6c 65 20 78 3b 0a 20 20 69  .  double x;.  i
3580: 66 28 20 61 72 67 63 3c 31 20 29 20 72 65 74 75  f( argc<1 ) retu
3590: 72 6e 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74 65  rn;.  p = sqlite
35a0: 33 5f 61 67 67 72 65 67 61 74 65 5f 63 6f 6e 74  3_aggregate_cont
35b0: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a  ext(context, siz
35c0: 65 6f 66 28 2a 70 29 29 3b 0a 20 20 69 66 28 20  eof(*p));.  if( 
35d0: 70 20 26 26 20 61 72 67 76 5b 30 5d 20 29 7b 0a  p && argv[0] ){.
35e0: 20 20 20 20 78 20 3d 20 73 71 6c 69 74 65 33 41      x = sqlite3A
35f0: 74 6f 46 28 61 72 67 76 5b 30 5d 2c 20 30 29 3b  toF(argv[0], 0);
3600: 0a 20 20 20 20 70 2d 3e 73 75 6d 20 2b 3d 20 78  .    p->sum += x
3610: 3b 0a 20 20 20 20 70 2d 3e 73 75 6d 32 20 2b 3d  ;.    p->sum2 +=
3620: 20 78 2a 78 3b 0a 20 20 20 20 70 2d 3e 63 6e 74   x*x;.    p->cnt
3630: 2b 2b 3b 0a 20 20 7d 0a 7d 0a 73 74 61 74 69 63  ++;.  }.}.static
3640: 20 76 6f 69 64 20 73 74 64 44 65 76 46 69 6e 61   void stdDevFina
3650: 6c 69 7a 65 28 73 71 6c 69 74 65 33 5f 63 6f 6e  lize(sqlite3_con
3660: 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 29 7b 0a  text *context){.
3670: 20 20 64 6f 75 62 6c 65 20 72 4e 20 3d 20 73 71    double rN = sq
3680: 6c 69 74 65 33 5f 61 67 67 72 65 67 61 74 65 5f  lite3_aggregate_
3690: 63 6f 75 6e 74 28 63 6f 6e 74 65 78 74 29 3b 0a  count(context);.
36a0: 20 20 53 74 64 44 65 76 43 74 78 20 2a 70 20 3d    StdDevCtx *p =
36b0: 20 73 71 6c 69 74 65 33 5f 61 67 67 72 65 67 61   sqlite3_aggrega
36c0: 74 65 5f 63 6f 6e 74 65 78 74 28 63 6f 6e 74 65  te_context(conte
36d0: 78 74 2c 20 73 69 7a 65 6f 66 28 2a 70 29 29 3b  xt, sizeof(*p));
36e0: 0a 20 20 69 66 28 20 70 20 26 26 20 70 2d 3e 63  .  if( p && p->c
36f0: 6e 74 3e 31 20 29 7b 0a 20 20 20 20 64 6f 75 62  nt>1 ){.    doub
3700: 6c 65 20 72 43 6e 74 20 3d 20 63 6e 74 3b 0a 20  le rCnt = cnt;. 
3710: 20 20 20 73 71 6c 69 74 65 33 5f 73 65 74 5f 72     sqlite3_set_r
3720: 65 73 75 6c 74 5f 64 6f 75 62 6c 65 28 63 6f 6e  esult_double(con
3730: 74 65 78 74 2c 20 0a 20 20 20 20 20 20 20 73 71  text, .       sq
3740: 72 74 28 28 70 2d 3e 73 75 6d 32 20 2d 20 70 2d  rt((p->sum2 - p-
3750: 3e 73 75 6d 2a 70 2d 3e 73 75 6d 2f 72 43 6e 74  >sum*p->sum/rCnt
3760: 29 2f 28 72 43 6e 74 2d 31 2e 30 29 29 29 3b 0a  )/(rCnt-1.0)));.
3770: 20 20 7d 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f 2a    }.}.#endif../*
3780: 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e  .** The followin
3790: 67 20 73 74 72 75 63 74 75 72 65 20 6b 65 65 70  g structure keep
37a0: 73 20 74 72 61 63 6b 20 6f 66 20 73 74 61 74 65  s track of state
37b0: 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72   information for
37c0: 20 74 68 65 0a 2a 2a 20 63 6f 75 6e 74 28 29 20   the.** count() 
37d0: 61 67 67 72 65 67 61 74 65 20 66 75 6e 63 74 69  aggregate functi
37e0: 6f 6e 2e 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73  on..*/.typedef s
37f0: 74 72 75 63 74 20 43 6f 75 6e 74 43 74 78 20 43  truct CountCtx C
3800: 6f 75 6e 74 43 74 78 3b 0a 73 74 72 75 63 74 20  ountCtx;.struct 
3810: 43 6f 75 6e 74 43 74 78 20 7b 0a 20 20 69 6e 74  CountCtx {.  int
3820: 20 6e 3b 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f   n;.};../*.** Ro
3830: 75 74 69 6e 65 73 20 74 6f 20 69 6d 70 6c 65 6d  utines to implem
3840: 65 6e 74 20 74 68 65 20 63 6f 75 6e 74 28 29 20  ent the count() 
3850: 61 67 67 72 65 67 61 74 65 20 66 75 6e 63 74 69  aggregate functi
3860: 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  on..*/.static vo
3870: 69 64 20 63 6f 75 6e 74 53 74 65 70 28 73 71 6c  id countStep(sql
3880: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
3890: 6e 74 65 78 74 2c 20 69 6e 74 20 61 72 67 63 2c  ntext, int argc,
38a0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
38b0: 2a 61 72 67 76 29 7b 0a 20 20 43 6f 75 6e 74 43  *argv){.  CountC
38c0: 74 78 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c  tx *p;.  p = sql
38d0: 69 74 65 33 5f 67 65 74 5f 63 6f 6e 74 65 78 74  ite3_get_context
38e0: 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f 66  (context, sizeof
38f0: 28 2a 70 29 29 3b 0a 20 20 69 66 28 20 28 61 72  (*p));.  if( (ar
3900: 67 63 3d 3d 30 20 7c 7c 20 53 51 4c 49 54 45 33  gc==0 || SQLITE3
3910: 5f 4e 55 4c 4c 21 3d 73 71 6c 69 74 65 33 5f 76  _NULL!=sqlite3_v
3920: 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76 5b 30  alue_type(argv[0
3930: 5d 29 29 20 26 26 20 70 20 29 7b 0a 20 20 20 20  ])) && p ){.    
3940: 70 2d 3e 6e 2b 2b 3b 0a 20 20 7d 0a 7d 20 20 20  p->n++;.  }.}   
3950: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63 6f 75  .static void cou
3960: 6e 74 46 69 6e 61 6c 69 7a 65 28 73 71 6c 69 74  ntFinalize(sqlit
3970: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74  e3_context *cont
3980: 65 78 74 29 7b 0a 20 20 43 6f 75 6e 74 43 74 78  ext){.  CountCtx
3990: 20 2a 70 3b 0a 20 20 70 20 3d 20 73 71 6c 69 74   *p;.  p = sqlit
39a0: 65 33 5f 67 65 74 5f 63 6f 6e 74 65 78 74 28 63  e3_get_context(c
39b0: 6f 6e 74 65 78 74 2c 20 73 69 7a 65 6f 66 28 2a  ontext, sizeof(*
39c0: 70 29 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72  p));.  sqlite3_r
39d0: 65 73 75 6c 74 5f 69 6e 74 33 32 28 63 6f 6e 74  esult_int32(cont
39e0: 65 78 74 2c 20 70 20 3f 20 70 2d 3e 6e 20 3a 20  ext, p ? p->n : 
39f0: 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69  0);.}../*.** Thi
3a00: 73 20 66 75 6e 63 74 69 6f 6e 20 74 72 61 63 6b  s function track
3a10: 73 20 73 74 61 74 65 20 69 6e 66 6f 72 6d 61 74  s state informat
3a20: 69 6f 6e 20 66 6f 72 20 74 68 65 20 6d 69 6e 28  ion for the min(
3a30: 29 20 61 6e 64 20 6d 61 78 28 29 0a 2a 2a 20 61  ) and max().** a
3a40: 67 67 72 65 67 61 74 65 20 66 75 6e 63 74 69 6f  ggregate functio
3a50: 6e 73 2e 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73  ns..*/.typedef s
3a60: 74 72 75 63 74 20 4d 69 6e 4d 61 78 43 74 78 20  truct MinMaxCtx 
3a70: 4d 69 6e 4d 61 78 43 74 78 3b 0a 73 74 72 75 63  MinMaxCtx;.struc
3a80: 74 20 4d 69 6e 4d 61 78 43 74 78 20 7b 0a 20 20  t MinMaxCtx {.  
3a90: 63 68 61 72 20 2a 7a 3b 20 20 20 20 20 20 20 20  char *z;        
3aa0: 20 2f 2a 20 54 68 65 20 62 65 73 74 20 73 6f 20   /* The best so 
3ab0: 66 61 72 20 2a 2f 0a 20 20 63 68 61 72 20 7a 42  far */.  char zB
3ac0: 75 66 5b 32 38 5d 3b 20 20 20 2f 2a 20 53 70 61  uf[28];   /* Spa
3ad0: 63 65 20 74 68 61 74 20 63 61 6e 20 62 65 20 75  ce that can be u
3ae0: 73 65 64 20 66 6f 72 20 73 74 6f 72 61 67 65 20  sed for storage 
3af0: 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 52 6f 75  */.};../*.** Rou
3b00: 74 69 6e 65 73 20 74 6f 20 69 6d 70 6c 65 6d 65  tines to impleme
3b10: 6e 74 20 6d 69 6e 28 29 20 61 6e 64 20 6d 61 78  nt min() and max
3b20: 28 29 20 61 67 67 72 65 67 61 74 65 20 66 75 6e  () aggregate fun
3b30: 63 74 69 6f 6e 73 2e 0a 2a 2f 0a 73 74 61 74 69  ctions..*/.stati
3b40: 63 20 76 6f 69 64 20 6d 69 6e 6d 61 78 53 74 65  c void minmaxSte
3b50: 70 28 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  p(sqlite3_contex
3b60: 74 20 2a 63 6f 6e 74 65 78 74 2c 20 69 6e 74 20  t *context, int 
3b70: 61 72 67 63 2c 20 73 71 6c 69 74 65 33 5f 76 61  argc, sqlite3_va
3b80: 6c 75 65 20 2a 2a 61 72 67 76 29 7b 0a 20 20 69  lue **argv){.  i
3b90: 6e 74 20 6d 61 78 20 3d 20 30 3b 0a 20 20 69 6e  nt max = 0;.  in
3ba0: 74 20 63 6d 70 20 3d 20 30 3b 0a 20 20 4d 65 6d  t cmp = 0;.  Mem
3bb0: 20 2a 70 41 72 67 20 20 3d 20 28 4d 65 6d 20 2a   *pArg  = (Mem *
3bc0: 29 61 72 67 76 5b 30 5d 3b 0a 20 20 4d 65 6d 20  )argv[0];.  Mem 
3bd0: 2a 70 42 65 73 74 20 3d 20 28 4d 65 6d 20 2a 29  *pBest = (Mem *)
3be0: 73 71 6c 69 74 65 33 5f 67 65 74 5f 63 6f 6e 74  sqlite3_get_cont
3bf0: 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 73 69 7a  ext(context, siz
3c00: 65 6f 66 28 2a 70 42 65 73 74 29 29 3b 0a 0a 20  eof(*pBest));.. 
3c10: 20 69 66 28 20 53 51 4c 49 54 45 33 5f 4e 55 4c   if( SQLITE3_NUL
3c20: 4c 3d 3d 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  L==sqlite3_value
3c30: 5f 74 79 70 65 28 61 72 67 76 5b 30 5d 29 20 29  _type(argv[0]) )
3c40: 20 72 65 74 75 72 6e 3b 0a 0a 20 20 69 66 28 20   return;..  if( 
3c50: 70 42 65 73 74 2d 3e 66 6c 61 67 73 20 29 7b 0a  pBest->flags ){.
3c60: 20 20 20 20 2f 2a 20 54 68 69 73 20 73 74 65 70      /* This step
3c70: 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 75 73 65   function is use
3c80: 64 20 66 6f 72 20 62 6f 74 68 20 74 68 65 20 6d  d for both the m
3c90: 69 6e 28 29 20 61 6e 64 20 6d 61 78 28 29 20 61  in() and max() a
3ca0: 67 67 72 65 67 61 74 65 73 2c 0a 20 20 20 20 2a  ggregates,.    *
3cb0: 2a 20 74 68 65 20 6f 6e 6c 79 20 64 69 66 66 65  * the only diffe
3cc0: 72 65 6e 63 65 20 62 65 74 77 65 65 6e 20 74 68  rence between th
3cd0: 65 20 74 77 6f 20 62 65 69 6e 67 20 74 68 61 74  e two being that
3ce0: 20 74 68 65 20 73 65 6e 73 65 20 6f 66 20 74 68   the sense of th
3cf0: 65 0a 20 20 20 20 2a 2a 20 63 6f 6d 70 61 72 69  e.    ** compari
3d00: 73 6f 6e 20 69 73 20 69 6e 76 65 72 74 65 64 2e  son is inverted.
3d10: 20 46 6f 72 20 74 68 65 20 6d 61 78 28 29 20 61   For the max() a
3d20: 67 67 72 65 67 61 74 65 2c 20 74 68 65 0a 20 20  ggregate, the.  
3d30: 20 20 2a 2a 20 73 71 6c 69 74 65 33 5f 75 73 65    ** sqlite3_use
3d40: 72 5f 64 61 74 61 28 29 20 66 75 6e 63 74 69 6f  r_data() functio
3d50: 6e 20 72 65 74 75 72 6e 73 20 28 76 6f 69 64 20  n returns (void 
3d60: 2a 29 2d 31 2e 20 46 6f 72 20 6d 69 6e 28 29 20  *)-1. For min() 
3d70: 69 74 0a 20 20 20 20 2a 2a 20 72 65 74 75 72 6e  it.    ** return
3d80: 73 20 28 76 6f 69 64 20 2a 29 64 62 2c 20 77 68  s (void *)db, wh
3d90: 65 72 65 20 64 62 20 69 73 20 74 68 65 20 73 71  ere db is the sq
3da0: 6c 69 74 65 33 2a 20 64 61 74 61 62 61 73 65 20  lite3* database 
3db0: 70 6f 69 6e 74 65 72 2e 0a 20 20 20 20 2a 2a 20  pointer..    ** 
3dc0: 54 68 65 72 65 66 6f 72 65 20 74 68 65 20 6e 65  Therefore the ne
3dd0: 78 74 20 73 74 61 74 65 6d 65 6e 74 20 73 65 74  xt statement set
3de0: 73 20 76 61 72 69 61 62 6c 65 20 27 6d 61 78 27  s variable 'max'
3df0: 20 74 6f 20 31 20 66 6f 72 20 74 68 65 20 6d 61   to 1 for the ma
3e00: 78 28 29 0a 20 20 20 20 2a 2a 20 61 67 67 72 65  x().    ** aggre
3e10: 67 61 74 65 2c 20 6f 72 20 30 20 66 6f 72 20 6d  gate, or 0 for m
3e20: 69 6e 28 29 2e 0a 20 20 20 20 2a 2f 0a 20 20 20  in()..    */.   
3e30: 20 6d 61 78 20 3d 20 28 28 73 71 6c 69 74 65 33   max = ((sqlite3
3e40: 5f 75 73 65 72 5f 64 61 74 61 28 63 6f 6e 74 65  _user_data(conte
3e50: 78 74 29 3d 3d 28 76 6f 69 64 20 2a 29 2d 31 29  xt)==(void *)-1)
3e60: 3f 31 3a 30 29 3b 0a 20 20 20 20 63 6d 70 20 3d  ?1:0);.    cmp =
3e70: 20 73 71 6c 69 74 65 33 4d 65 6d 43 6f 6d 70 61   sqlite3MemCompa
3e80: 72 65 28 70 42 65 73 74 2c 20 70 41 72 67 2c 20  re(pBest, pArg, 
3e90: 30 29 3b 0a 20 20 20 20 69 66 28 20 28 6d 61 78  0);.    if( (max
3ea0: 20 26 26 20 63 6d 70 3c 30 29 20 7c 7c 20 28 21   && cmp<0) || (!
3eb0: 6d 61 78 20 26 26 20 63 6d 70 3e 30 29 20 29 7b  max && cmp>0) ){
3ec0: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 56 64  .      sqlite3Vd
3ed0: 62 65 4d 65 6d 43 6f 70 79 28 70 42 65 73 74 2c  beMemCopy(pBest,
3ee0: 20 70 41 72 67 29 3b 0a 20 20 20 20 7d 0a 20 20   pArg);.    }.  
3ef0: 7d 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74  }else{.    sqlit
3f00: 65 33 56 64 62 65 4d 65 6d 43 6f 70 79 28 70 42  e3VdbeMemCopy(pB
3f10: 65 73 74 2c 20 70 41 72 67 29 3b 0a 20 20 7d 0a  est, pArg);.  }.
3f20: 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6d 69  }.static void mi
3f30: 6e 4d 61 78 46 69 6e 61 6c 69 7a 65 28 73 71 6c  nMaxFinalize(sql
3f40: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
3f50: 6e 74 65 78 74 29 7b 0a 20 20 73 71 6c 69 74 65  ntext){.  sqlite
3f60: 33 5f 76 61 6c 75 65 20 2a 70 52 65 73 3b 0a 20  3_value *pRes;. 
3f70: 20 70 52 65 73 20 3d 20 28 73 71 6c 69 74 65 33   pRes = (sqlite3
3f80: 5f 76 61 6c 75 65 20 2a 29 73 71 6c 69 74 65 33  _value *)sqlite3
3f90: 5f 67 65 74 5f 63 6f 6e 74 65 78 74 28 63 6f 6e  _get_context(con
3fa0: 74 65 78 74 2c 20 73 69 7a 65 6f 66 28 4d 65 6d  text, sizeof(Mem
3fb0: 29 29 3b 0a 20 20 0a 20 20 69 66 28 20 70 52 65  ));.  .  if( pRe
3fc0: 73 2d 3e 66 6c 61 67 73 20 29 7b 0a 20 20 20 20  s->flags ){.    
3fd0: 73 77 69 74 63 68 28 20 73 71 6c 69 74 65 33 5f  switch( sqlite3_
3fe0: 76 61 6c 75 65 5f 74 79 70 65 28 70 52 65 73 29  value_type(pRes)
3ff0: 20 29 7b 0a 20 20 20 20 20 20 63 61 73 65 20 53   ){.      case S
4000: 51 4c 49 54 45 33 5f 49 4e 54 45 47 45 52 3a 20  QLITE3_INTEGER: 
4010: 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33  .        sqlite3
4020: 5f 72 65 73 75 6c 74 5f 69 6e 74 33 32 28 63 6f  _result_int32(co
4030: 6e 74 65 78 74 2c 20 73 71 6c 69 74 65 33 5f 76  ntext, sqlite3_v
4040: 61 6c 75 65 5f 69 6e 74 28 70 52 65 73 29 29 3b  alue_int(pRes));
4050: 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a  .        break;.
4060: 20 20 20 20 20 20 63 61 73 65 20 53 51 4c 49 54        case SQLIT
4070: 45 33 5f 46 4c 4f 41 54 3a 20 0a 20 20 20 20 20  E3_FLOAT: .     
4080: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
4090: 74 5f 64 6f 75 62 6c 65 28 63 6f 6e 74 65 78 74  t_double(context
40a0: 2c 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  , sqlite3_value_
40b0: 66 6c 6f 61 74 28 70 52 65 73 29 29 3b 0a 20 20  float(pRes));.  
40c0: 20 20 20 20 63 61 73 65 20 53 51 4c 49 54 45 33      case SQLITE3
40d0: 5f 54 45 58 54 3a 20 0a 20 20 20 20 20 20 63 61  _TEXT: .      ca
40e0: 73 65 20 53 51 4c 49 54 45 33 5f 42 4c 4f 42 3a  se SQLITE3_BLOB:
40f0: 20 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65   .        sqlite
4100: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 6f  3_result_text(co
4110: 6e 74 65 78 74 2c 0a 20 20 20 20 20 20 20 20 20  ntext,.         
4120: 20 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65     sqlite3_value
4130: 5f 64 61 74 61 28 70 52 65 73 29 2c 20 73 71 6c  _data(pRes), sql
4140: 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73  ite3_value_bytes
4150: 28 70 52 65 73 29 2c 20 31 29 3b 0a 20 20 20 20  (pRes), 1);.    
4160: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20      break;.     
4170: 20 63 61 73 65 20 53 51 4c 49 54 45 33 5f 4e 55   case SQLITE3_NU
4180: 4c 4c 3a 20 0a 20 20 20 20 20 20 64 65 66 61 75  LL: .      defau
4190: 6c 74 3a 0a 20 20 20 20 20 20 20 20 61 73 73 65  lt:.        asse
41a0: 72 74 28 30 29 3b 0a 20 20 20 20 7d 0a 20 20 7d  rt(0);.    }.  }
41b0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 66  .}../*.** This f
41c0: 75 6e 63 74 69 6f 6e 20 72 65 67 69 73 74 65 72  unction register
41d0: 65 64 20 61 6c 6c 20 6f 66 20 74 68 65 20 61 62  ed all of the ab
41e0: 6f 76 65 20 43 20 66 75 6e 63 74 69 6f 6e 73 20  ove C functions 
41f0: 61 73 20 53 51 4c 0a 2a 2a 20 66 75 6e 63 74 69  as SQL.** functi
4200: 6f 6e 73 2e 20 20 54 68 69 73 20 73 68 6f 75 6c  ons.  This shoul
4210: 64 20 62 65 20 74 68 65 20 6f 6e 6c 79 20 72 6f  d be the only ro
4220: 75 74 69 6e 65 20 69 6e 20 74 68 69 73 20 66 69  utine in this fi
4230: 6c 65 20 77 69 74 68 0a 2a 2a 20 65 78 74 65 72  le with.** exter
4240: 6e 61 6c 20 6c 69 6e 6b 61 67 65 2e 0a 2a 2f 0a  nal linkage..*/.
4250: 76 6f 69 64 20 73 71 6c 69 74 65 33 52 65 67 69  void sqlite3Regi
4260: 73 74 65 72 42 75 69 6c 74 69 6e 46 75 6e 63 74  sterBuiltinFunct
4270: 69 6f 6e 73 28 73 71 6c 69 74 65 20 2a 64 62 29  ions(sqlite *db)
4280: 7b 0a 20 20 73 74 61 74 69 63 20 73 74 72 75 63  {.  static struc
4290: 74 20 7b 0a 20 20 20 20 20 63 68 61 72 20 2a 7a  t {.     char *z
42a0: 4e 61 6d 65 3b 0a 20 20 20 20 20 73 69 67 6e 65  Name;.     signe
42b0: 64 20 63 68 61 72 20 6e 41 72 67 3b 0a 20 20 20  d char nArg;.   
42c0: 20 20 73 69 67 6e 65 64 20 63 68 61 72 20 64 61    signed char da
42d0: 74 61 54 79 70 65 3b 0a 20 20 20 20 20 75 38 20  taType;.     u8 
42e0: 61 72 67 54 79 70 65 3b 20 20 20 20 20 20 20 20  argType;        
42f0: 20 20 20 20 20 20 20 2f 2a 20 30 3a 20 6e 6f 6e         /* 0: non
4300: 65 2e 20 20 31 3a 20 64 62 20 20 32 3a 20 28 2d  e.  1: db  2: (-
4310: 31 29 20 2a 2f 0a 20 20 20 20 20 76 6f 69 64 20  1) */.     void 
4320: 28 2a 78 46 75 6e 63 29 28 73 71 6c 69 74 65 33  (*xFunc)(sqlite3
4330: 5f 63 6f 6e 74 65 78 74 2a 2c 69 6e 74 2c 73 71  _context*,int,sq
4340: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 29 3b  lite3_value **);
4350: 0a 20 20 7d 20 61 46 75 6e 63 73 5b 5d 20 3d 20  .  } aFuncs[] = 
4360: 7b 0a 20 20 20 20 7b 20 22 6d 69 6e 22 2c 20 20  {.    { "min",  
4370: 20 20 20 20 20 2d 31 2c 20 53 51 4c 49 54 45 5f       -1, SQLITE_
4380: 41 52 47 53 2c 20 20 20 20 30 2c 20 6d 69 6e 6d  ARGS,    0, minm
4390: 61 78 46 75 6e 63 20 7d 2c 0a 20 20 20 20 7b 20  axFunc },.    { 
43a0: 22 6d 69 6e 22 2c 20 20 20 20 20 20 20 20 30 2c  "min",        0,
43b0: 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20   0,             
43c0: 20 30 2c 20 30 20 20 20 20 20 20 20 20 20 20 7d   0, 0          }
43d0: 2c 0a 20 20 20 20 7b 20 22 6d 61 78 22 2c 20 20  ,.    { "max",  
43e0: 20 20 20 20 20 2d 31 2c 20 53 51 4c 49 54 45 5f       -1, SQLITE_
43f0: 41 52 47 53 2c 20 20 20 20 32 2c 20 6d 69 6e 6d  ARGS,    2, minm
4400: 61 78 46 75 6e 63 20 7d 2c 0a 20 20 20 20 7b 20  axFunc },.    { 
4410: 22 6d 61 78 22 2c 20 20 20 20 20 20 20 20 30 2c  "max",        0,
4420: 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20   0,             
4430: 20 32 2c 20 30 20 20 20 20 20 20 20 20 20 20 7d   2, 0          }
4440: 2c 0a 20 20 20 20 7b 20 22 74 79 70 65 6f 66 22  ,.    { "typeof"
4450: 2c 20 20 20 20 20 31 2c 20 53 51 4c 49 54 45 5f  ,     1, SQLITE_
4460: 54 45 58 54 2c 20 20 20 20 30 2c 20 74 79 70 65  TEXT,    0, type
4470: 6f 66 46 75 6e 63 20 7d 2c 0a 20 20 20 20 7b 20  ofFunc },.    { 
4480: 22 63 6c 61 73 73 6f 66 22 2c 20 20 20 20 31 2c  "classof",    1,
4490: 20 53 51 4c 49 54 45 5f 54 45 58 54 2c 20 20 20   SQLITE_TEXT,   
44a0: 20 30 2c 20 74 79 70 65 6f 66 46 75 6e 63 20 7d   0, typeofFunc }
44b0: 2c 20 2f 2a 20 46 49 58 20 4d 45 3a 20 68 61 63  , /* FIX ME: hac
44c0: 6b 20 2a 2f 0a 20 20 20 20 7b 20 22 6c 65 6e 67  k */.    { "leng
44d0: 74 68 22 2c 20 20 20 20 20 31 2c 20 53 51 4c 49  th",     1, SQLI
44e0: 54 45 5f 4e 55 4d 45 52 49 43 2c 20 30 2c 20 6c  TE_NUMERIC, 0, l
44f0: 65 6e 67 74 68 46 75 6e 63 20 7d 2c 0a 20 20 20  engthFunc },.   
4500: 20 7b 20 22 73 75 62 73 74 72 22 2c 20 20 20 20   { "substr",    
4510: 20 33 2c 20 53 51 4c 49 54 45 5f 54 45 58 54 2c   3, SQLITE_TEXT,
4520: 20 20 20 20 30 2c 20 73 75 62 73 74 72 46 75 6e      0, substrFun
4530: 63 20 7d 2c 0a 20 20 20 20 7b 20 22 61 62 73 22  c },.    { "abs"
4540: 2c 20 20 20 20 20 20 20 20 31 2c 20 53 51 4c 49  ,        1, SQLI
4550: 54 45 5f 4e 55 4d 45 52 49 43 2c 20 30 2c 20 61  TE_NUMERIC, 0, a
4560: 62 73 46 75 6e 63 20 20 20 20 7d 2c 0a 20 20 20  bsFunc    },.   
4570: 20 7b 20 22 72 6f 75 6e 64 22 2c 20 20 20 20 20   { "round",     
4580: 20 31 2c 20 53 51 4c 49 54 45 5f 4e 55 4d 45 52   1, SQLITE_NUMER
4590: 49 43 2c 20 30 2c 20 72 6f 75 6e 64 46 75 6e 63  IC, 0, roundFunc
45a0: 20 20 7d 2c 0a 20 20 20 20 7b 20 22 72 6f 75 6e    },.    { "roun
45b0: 64 22 2c 20 20 20 20 20 20 32 2c 20 53 51 4c 49  d",      2, SQLI
45c0: 54 45 5f 4e 55 4d 45 52 49 43 2c 20 30 2c 20 72  TE_NUMERIC, 0, r
45d0: 6f 75 6e 64 46 75 6e 63 20 20 7d 2c 0a 20 20 20  oundFunc  },.   
45e0: 20 7b 20 22 75 70 70 65 72 22 2c 20 20 20 20 20   { "upper",     
45f0: 20 31 2c 20 53 51 4c 49 54 45 5f 54 45 58 54 2c   1, SQLITE_TEXT,
4600: 20 20 20 20 30 2c 20 75 70 70 65 72 46 75 6e 63      0, upperFunc
4610: 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6c 6f 77 65    },.    { "lowe
4620: 72 22 2c 20 20 20 20 20 20 31 2c 20 53 51 4c 49  r",      1, SQLI
4630: 54 45 5f 54 45 58 54 2c 20 20 20 20 30 2c 20 6c  TE_TEXT,    0, l
4640: 6f 77 65 72 46 75 6e 63 20 20 7d 2c 0a 20 20 20  owerFunc  },.   
4650: 20 7b 20 22 63 6f 61 6c 65 73 63 65 22 2c 20 20   { "coalesce",  
4660: 2d 31 2c 20 53 51 4c 49 54 45 5f 41 52 47 53 2c  -1, SQLITE_ARGS,
4670: 20 20 20 20 30 2c 20 69 66 6e 75 6c 6c 46 75 6e      0, ifnullFun
4680: 63 20 7d 2c 0a 20 20 20 20 7b 20 22 63 6f 61 6c  c },.    { "coal
4690: 65 73 63 65 22 2c 20 20 20 30 2c 20 30 2c 20 20  esce",   0, 0,  
46a0: 20 20 20 20 20 20 20 20 20 20 20 20 30 2c 20 30              0, 0
46b0: 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20            },.   
46c0: 20 7b 20 22 63 6f 61 6c 65 73 63 65 22 2c 20 20   { "coalesce",  
46d0: 20 31 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20   1, 0,          
46e0: 20 20 20 20 30 2c 20 30 20 20 20 20 20 20 20 20      0, 0        
46f0: 20 20 7d 2c 0a 20 20 20 20 7b 20 22 69 66 6e 75    },.    { "ifnu
4700: 6c 6c 22 2c 20 20 20 20 20 32 2c 20 53 51 4c 49  ll",     2, SQLI
4710: 54 45 5f 41 52 47 53 2c 20 20 20 20 30 2c 20 69  TE_ARGS,    0, i
4720: 66 6e 75 6c 6c 46 75 6e 63 20 7d 2c 0a 20 20 20  fnullFunc },.   
4730: 20 7b 20 22 72 61 6e 64 6f 6d 22 2c 20 20 20 20   { "random",    
4740: 2d 31 2c 20 53 51 4c 49 54 45 5f 4e 55 4d 45 52  -1, SQLITE_NUMER
4750: 49 43 2c 20 30 2c 20 72 61 6e 64 6f 6d 46 75 6e  IC, 0, randomFun
4760: 63 20 7d 2c 0a 20 20 20 20 7b 20 22 6c 69 6b 65  c },.    { "like
4770: 22 2c 20 20 20 20 20 20 20 32 2c 20 53 51 4c 49  ",       2, SQLI
4780: 54 45 5f 4e 55 4d 45 52 49 43 2c 20 30 2c 20 6c  TE_NUMERIC, 0, l
4790: 69 6b 65 46 75 6e 63 20 20 20 7d 2c 0a 20 20 20  ikeFunc   },.   
47a0: 20 7b 20 22 67 6c 6f 62 22 2c 20 20 20 20 20 20   { "glob",      
47b0: 20 32 2c 20 53 51 4c 49 54 45 5f 4e 55 4d 45 52   2, SQLITE_NUMER
47c0: 49 43 2c 20 30 2c 20 67 6c 6f 62 46 75 6e 63 20  IC, 0, globFunc 
47d0: 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6e 75 6c 6c    },.    { "null
47e0: 69 66 22 2c 20 20 20 20 20 32 2c 20 53 51 4c 49  if",     2, SQLI
47f0: 54 45 5f 41 52 47 53 2c 20 20 20 20 30 2c 20 6e  TE_ARGS,    0, n
4800: 75 6c 6c 69 66 46 75 6e 63 20 7d 2c 0a 20 20 20  ullifFunc },.   
4810: 20 7b 20 22 73 71 6c 69 74 65 5f 76 65 72 73 69   { "sqlite_versi
4820: 6f 6e 22 2c 30 2c 53 51 4c 49 54 45 5f 54 45 58  on",0,SQLITE_TEX
4830: 54 2c 20 20 30 2c 20 76 65 72 73 69 6f 6e 46 75  T,  0, versionFu
4840: 6e 63 7d 2c 0a 20 20 20 20 7b 20 22 71 75 6f 74  nc},.    { "quot
4850: 65 22 2c 20 20 20 20 20 20 31 2c 20 53 51 4c 49  e",      1, SQLI
4860: 54 45 5f 41 52 47 53 2c 20 20 20 20 30 2c 20 71  TE_ARGS,    0, q
4870: 75 6f 74 65 46 75 6e 63 20 20 7d 2c 0a 20 20 20  uoteFunc  },.   
4880: 20 7b 20 22 6c 61 73 74 5f 69 6e 73 65 72 74 5f   { "last_insert_
4890: 72 6f 77 69 64 22 2c 20 30 2c 20 53 51 4c 49 54  rowid", 0, SQLIT
48a0: 45 5f 4e 55 4d 45 52 49 43 2c 20 31 2c 20 6c 61  E_NUMERIC, 1, la
48b0: 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 20  st_insert_rowid 
48c0: 7d 2c 0a 20 20 20 20 7b 20 22 63 68 61 6e 67 65  },.    { "change
48d0: 5f 63 6f 75 6e 74 22 2c 20 20 20 20 20 20 30 2c  _count",      0,
48e0: 20 53 51 4c 49 54 45 5f 4e 55 4d 45 52 49 43 2c   SQLITE_NUMERIC,
48f0: 20 31 2c 20 63 68 61 6e 67 65 5f 63 6f 75 6e 74   1, change_count
4900: 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22        },.    { "
4910: 6c 61 73 74 5f 73 74 61 74 65 6d 65 6e 74 5f 63  last_statement_c
4920: 68 61 6e 67 65 5f 63 6f 75 6e 74 22 2c 0a 20 20  hange_count",.  
4930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4940: 20 20 20 20 20 20 20 20 20 30 2c 20 53 51 4c 49           0, SQLI
4950: 54 45 5f 4e 55 4d 45 52 49 43 2c 20 31 2c 20 6c  TE_NUMERIC, 1, l
4960: 61 73 74 5f 73 74 61 74 65 6d 65 6e 74 5f 63 68  ast_statement_ch
4970: 61 6e 67 65 5f 63 6f 75 6e 74 20 7d 2c 0a 23 69  ange_count },.#i
4980: 66 64 65 66 20 53 51 4c 49 54 45 5f 53 4f 55 4e  fdef SQLITE_SOUN
4990: 44 45 58 0a 20 20 20 20 7b 20 22 73 6f 75 6e 64  DEX.    { "sound
49a0: 65 78 22 2c 20 20 20 20 31 2c 20 53 51 4c 49 54  ex",    1, SQLIT
49b0: 45 5f 54 45 58 54 2c 20 20 20 20 30 2c 20 73 6f  E_TEXT,    0, so
49c0: 75 6e 64 65 78 46 75 6e 63 7d 2c 0a 23 65 6e 64  undexFunc},.#end
49d0: 69 66 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45  if.#ifdef SQLITE
49e0: 5f 54 45 53 54 0a 20 20 20 20 7b 20 22 72 61 6e  _TEST.    { "ran
49f0: 64 73 74 72 22 2c 20 20 20 20 32 2c 20 53 51 4c  dstr",    2, SQL
4a00: 49 54 45 5f 54 45 58 54 2c 20 20 20 20 30 2c 20  ITE_TEXT,    0, 
4a10: 72 61 6e 64 53 74 72 20 20 20 20 7d 2c 0a 23 65  randStr    },.#e
4a20: 6e 64 69 66 0a 20 20 7d 3b 0a 20 20 73 74 61 74  ndif.  };.  stat
4a30: 69 63 20 73 74 72 75 63 74 20 7b 0a 20 20 20 20  ic struct {.    
4a40: 63 68 61 72 20 2a 7a 4e 61 6d 65 3b 0a 20 20 20  char *zName;.   
4a50: 20 73 69 67 6e 65 64 20 63 68 61 72 20 6e 41 72   signed char nAr
4a60: 67 3b 0a 20 20 20 20 73 69 67 6e 65 64 20 63 68  g;.    signed ch
4a70: 61 72 20 64 61 74 61 54 79 70 65 3b 0a 20 20 20  ar dataType;.   
4a80: 20 75 38 20 61 72 67 54 79 70 65 3b 0a 20 20 20   u8 argType;.   
4a90: 20 76 6f 69 64 20 28 2a 78 53 74 65 70 29 28 73   void (*xStep)(s
4aa0: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 2a 2c  qlite3_context*,
4ab0: 69 6e 74 2c 73 71 6c 69 74 65 33 5f 76 61 6c 75  int,sqlite3_valu
4ac0: 65 2a 2a 29 3b 0a 20 20 20 20 76 6f 69 64 20 28  e**);.    void (
4ad0: 2a 78 46 69 6e 61 6c 69 7a 65 29 28 73 71 6c 69  *xFinalize)(sqli
4ae0: 74 65 33 5f 63 6f 6e 74 65 78 74 2a 29 3b 0a 20  te3_context*);. 
4af0: 20 7d 20 61 41 67 67 73 5b 5d 20 3d 20 7b 0a 20   } aAggs[] = {. 
4b00: 20 20 20 7b 20 22 6d 69 6e 22 2c 20 20 20 20 31     { "min",    1
4b10: 2c 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20  , 0,            
4b20: 20 20 30 2c 20 6d 69 6e 6d 61 78 53 74 65 70 2c    0, minmaxStep,
4b30: 20 20 20 6d 69 6e 4d 61 78 46 69 6e 61 6c 69 7a     minMaxFinaliz
4b40: 65 20 7d 2c 0a 20 20 20 20 7b 20 22 6d 61 78 22  e },.    { "max"
4b50: 2c 20 20 20 20 31 2c 20 30 2c 20 20 20 20 20 20  ,    1, 0,      
4b60: 20 20 20 20 20 20 20 20 32 2c 20 6d 69 6e 6d 61          2, minma
4b70: 78 53 74 65 70 2c 20 20 20 6d 69 6e 4d 61 78 46  xStep,   minMaxF
4b80: 69 6e 61 6c 69 7a 65 20 7d 2c 0a 20 20 20 20 7b  inalize },.    {
4b90: 20 22 73 75 6d 22 2c 20 20 20 20 31 2c 20 53 51   "sum",    1, SQ
4ba0: 4c 49 54 45 5f 4e 55 4d 45 52 49 43 2c 20 30 2c  LITE_NUMERIC, 0,
4bb0: 20 73 75 6d 53 74 65 70 2c 20 20 20 20 20 20 73   sumStep,      s
4bc0: 75 6d 46 69 6e 61 6c 69 7a 65 20 20 20 20 7d 2c  umFinalize    },
4bd0: 0a 20 20 20 20 7b 20 22 61 76 67 22 2c 20 20 20  .    { "avg",   
4be0: 20 31 2c 20 53 51 4c 49 54 45 5f 4e 55 4d 45 52   1, SQLITE_NUMER
4bf0: 49 43 2c 20 30 2c 20 73 75 6d 53 74 65 70 2c 20  IC, 0, sumStep, 
4c00: 20 20 20 20 20 61 76 67 46 69 6e 61 6c 69 7a 65       avgFinalize
4c10: 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 63 6f      },.    { "co
4c20: 75 6e 74 22 2c 20 20 30 2c 20 53 51 4c 49 54 45  unt",  0, SQLITE
4c30: 5f 4e 55 4d 45 52 49 43 2c 20 30 2c 20 63 6f 75  _NUMERIC, 0, cou
4c40: 6e 74 53 74 65 70 2c 20 20 20 20 63 6f 75 6e 74  ntStep,    count
4c50: 46 69 6e 61 6c 69 7a 65 20 20 7d 2c 0a 20 20 20  Finalize  },.   
4c60: 20 7b 20 22 63 6f 75 6e 74 22 2c 20 20 31 2c 20   { "count",  1, 
4c70: 53 51 4c 49 54 45 5f 4e 55 4d 45 52 49 43 2c 20  SQLITE_NUMERIC, 
4c80: 30 2c 20 63 6f 75 6e 74 53 74 65 70 2c 20 20 20  0, countStep,   
4c90: 20 63 6f 75 6e 74 46 69 6e 61 6c 69 7a 65 20 20   countFinalize  
4ca0: 7d 2c 0a 23 69 66 20 30 0a 20 20 20 20 7b 20 22  },.#if 0.    { "
4cb0: 73 74 64 64 65 76 22 2c 20 31 2c 20 53 51 4c 49  stddev", 1, SQLI
4cc0: 54 45 5f 4e 55 4d 45 52 49 43 2c 20 30 2c 20 73  TE_NUMERIC, 0, s
4cd0: 74 64 44 65 76 53 74 65 70 2c 20 20 20 73 74 64  tdDevStep,   std
4ce0: 44 65 76 46 69 6e 61 6c 69 7a 65 20 7d 2c 0a 23  DevFinalize },.#
4cf0: 65 6e 64 69 66 0a 20 20 7d 3b 0a 20 20 73 74 61  endif.  };.  sta
4d00: 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  tic const char *
4d10: 61 7a 54 79 70 65 46 75 6e 63 73 5b 5d 20 3d 20  azTypeFuncs[] = 
4d20: 7b 20 22 6d 69 6e 22 2c 20 22 6d 61 78 22 2c 20  { "min", "max", 
4d30: 22 74 79 70 65 6f 66 22 20 7d 3b 0a 20 20 69 6e  "typeof" };.  in
4d40: 74 20 69 3b 0a 0a 20 20 66 6f 72 28 69 3d 30 3b  t i;..  for(i=0;
4d50: 20 69 3c 73 69 7a 65 6f 66 28 61 46 75 6e 63 73   i<sizeof(aFuncs
4d60: 29 2f 73 69 7a 65 6f 66 28 61 46 75 6e 63 73 5b  )/sizeof(aFuncs[
4d70: 30 5d 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 76  0]); i++){.    v
4d80: 6f 69 64 20 2a 70 41 72 67 20 3d 20 61 46 75 6e  oid *pArg = aFun
4d90: 63 73 5b 69 5d 2e 61 72 67 54 79 70 65 3d 3d 32  cs[i].argType==2
4da0: 20 3f 20 28 76 6f 69 64 2a 29 28 2d 31 29 20 3a   ? (void*)(-1) :
4db0: 20 64 62 3b 0a 20 20 20 20 73 71 6c 69 74 65 33   db;.    sqlite3
4dc0: 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e  _create_function
4dd0: 28 64 62 2c 20 61 46 75 6e 63 73 5b 69 5d 2e 7a  (db, aFuncs[i].z
4de0: 4e 61 6d 65 2c 20 61 46 75 6e 63 73 5b 69 5d 2e  Name, aFuncs[i].
4df0: 6e 41 72 67 2c 20 30 2c 20 30 2c 0a 20 20 20 20  nArg, 0, 0,.    
4e00: 20 20 20 20 70 41 72 67 2c 20 61 46 75 6e 63 73      pArg, aFuncs
4e10: 5b 69 5d 2e 78 46 75 6e 63 2c 20 30 2c 20 30 29  [i].xFunc, 0, 0)
4e20: 3b 0a 20 20 20 20 69 66 28 20 61 46 75 6e 63 73  ;.    if( aFuncs
4e30: 5b 69 5d 2e 78 46 75 6e 63 20 29 7b 0a 20 20 20  [i].xFunc ){.   
4e40: 20 20 20 73 71 6c 69 74 65 33 5f 66 75 6e 63 74     sqlite3_funct
4e50: 69 6f 6e 5f 74 79 70 65 28 64 62 2c 20 61 46 75  ion_type(db, aFu
4e60: 6e 63 73 5b 69 5d 2e 7a 4e 61 6d 65 2c 20 61 46  ncs[i].zName, aF
4e70: 75 6e 63 73 5b 69 5d 2e 64 61 74 61 54 79 70 65  uncs[i].dataType
4e80: 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 66  );.    }.  }.  f
4e90: 6f 72 28 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66  or(i=0; i<sizeof
4ea0: 28 61 41 67 67 73 29 2f 73 69 7a 65 6f 66 28 61  (aAggs)/sizeof(a
4eb0: 41 67 67 73 5b 30 5d 29 3b 20 69 2b 2b 29 7b 0a  Aggs[0]); i++){.
4ec0: 20 20 20 20 76 6f 69 64 20 2a 70 41 72 67 20 3d      void *pArg =
4ed0: 20 61 41 67 67 73 5b 69 5d 2e 61 72 67 54 79 70   aAggs[i].argTyp
4ee0: 65 3d 3d 32 20 3f 20 28 76 6f 69 64 2a 29 28 2d  e==2 ? (void*)(-
4ef0: 31 29 20 3a 20 64 62 3b 0a 20 20 20 20 73 71 6c  1) : db;.    sql
4f00: 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63  ite3_create_func
4f10: 74 69 6f 6e 28 64 62 2c 20 61 41 67 67 73 5b 69  tion(db, aAggs[i
4f20: 5d 2e 7a 4e 61 6d 65 2c 20 61 41 67 67 73 5b 69  ].zName, aAggs[i
4f30: 5d 2e 6e 41 72 67 2c 20 30 2c 20 30 2c 20 70 41  ].nArg, 0, 0, pA
4f40: 72 67 2c 0a 20 20 20 20 20 20 20 20 30 2c 20 61  rg,.        0, a
4f50: 41 67 67 73 5b 69 5d 2e 78 53 74 65 70 2c 20 61  Aggs[i].xStep, a
4f60: 41 67 67 73 5b 69 5d 2e 78 46 69 6e 61 6c 69 7a  Aggs[i].xFinaliz
4f70: 65 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f  e);.    sqlite3_
4f80: 66 75 6e 63 74 69 6f 6e 5f 74 79 70 65 28 64 62  function_type(db
4f90: 2c 20 61 41 67 67 73 5b 69 5d 2e 7a 4e 61 6d 65  , aAggs[i].zName
4fa0: 2c 20 61 41 67 67 73 5b 69 5d 2e 64 61 74 61 54  , aAggs[i].dataT
4fb0: 79 70 65 29 3b 0a 20 20 7d 0a 0a 20 20 66 6f 72  ype);.  }..  for
4fc0: 28 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66 28 61  (i=0; i<sizeof(a
4fd0: 7a 54 79 70 65 46 75 6e 63 73 29 2f 73 69 7a 65  zTypeFuncs)/size
4fe0: 6f 66 28 61 7a 54 79 70 65 46 75 6e 63 73 5b 30  of(azTypeFuncs[0
4ff0: 5d 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 6e  ]); i++){.    in
5000: 74 20 6e 20 3d 20 73 74 72 6c 65 6e 28 61 7a 54  t n = strlen(azT
5010: 79 70 65 46 75 6e 63 73 5b 69 5d 29 3b 0a 20 20  ypeFuncs[i]);.  
5020: 20 20 46 75 6e 63 44 65 66 20 2a 70 20 3d 20 73    FuncDef *p = s
5030: 71 6c 69 74 65 33 48 61 73 68 46 69 6e 64 28 26  qlite3HashFind(&
5040: 64 62 2d 3e 61 46 75 6e 63 2c 20 61 7a 54 79 70  db->aFunc, azTyp
5050: 65 46 75 6e 63 73 5b 69 5d 2c 20 6e 29 3b 0a 20  eFuncs[i], n);. 
5060: 20 20 20 77 68 69 6c 65 28 20 70 20 29 7b 0a 20     while( p ){. 
5070: 20 20 20 20 20 70 2d 3e 69 6e 63 6c 75 64 65 54       p->includeT
5080: 79 70 65 73 20 3d 20 31 3b 0a 20 20 20 20 20 20  ypes = 1;.      
5090: 70 20 3d 20 70 2d 3e 70 4e 65 78 74 3b 0a 20 20  p = p->pNext;.  
50a0: 20 20 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65    }.  }.  sqlite
50b0: 33 52 65 67 69 73 74 65 72 44 61 74 65 54 69 6d  3RegisterDateTim
50c0: 65 46 75 6e 63 74 69 6f 6e 73 28 64 62 29 3b 0a  eFunctions(db);.
50d0: 7d 0a 0a 0a 0a                                   }....