/ Hex Artifact Content
Login

Artifact 055f3dc7369585350b28db1ee0f3b214dca6724d:


0000: 2f 2a 0a 2a 2a 20 32 30 30 37 20 4a 75 6e 65 20  /*.** 2007 June 
0010: 32 32 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 75 74  22.**.** The aut
0020: 68 6f 72 20 64 69 73 63 6c 61 69 6d 73 20 63 6f  hor disclaims co
0030: 70 79 72 69 67 68 74 20 74 6f 20 74 68 69 73 20  pyright to this 
0040: 73 6f 75 72 63 65 20 63 6f 64 65 2e 20 20 49 6e  source code.  In
0050: 20 70 6c 61 63 65 20 6f 66 0a 2a 2a 20 61 20 6c   place of.** a l
0060: 65 67 61 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72  egal notice, her
0070: 65 20 69 73 20 61 20 62 6c 65 73 73 69 6e 67 3a  e is a blessing:
0080: 0a 2a 2a 0a 2a 2a 20 20 20 20 4d 61 79 20 79 6f  .**.**    May yo
0090: 75 20 64 6f 20 67 6f 6f 64 20 61 6e 64 20 6e 6f  u do good and no
00a0: 74 20 65 76 69 6c 2e 0a 2a 2a 20 20 20 20 4d 61  t evil..**    Ma
00b0: 79 20 79 6f 75 20 66 69 6e 64 20 66 6f 72 67 69  y you find forgi
00c0: 76 65 6e 65 73 73 20 66 6f 72 20 79 6f 75 72 73  veness for yours
00d0: 65 6c 66 20 61 6e 64 20 66 6f 72 67 69 76 65 20  elf and forgive 
00e0: 6f 74 68 65 72 73 2e 0a 2a 2a 20 20 20 20 4d 61  others..**    Ma
00f0: 79 20 79 6f 75 20 73 68 61 72 65 20 66 72 65 65  y you share free
0100: 6c 79 2c 20 6e 65 76 65 72 20 74 61 6b 69 6e 67  ly, never taking
0110: 20 6d 6f 72 65 20 74 68 61 6e 20 79 6f 75 20 67   more than you g
0120: 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a 2a 2a 2a 2a  ive..**.********
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 2a 0a 2a 2a 0a 2a 2a 20 54 68 69  ******.**.** Thi
0180: 73 20 69 73 20 70 61 72 74 20 6f 66 20 61 6e 20  s is part of an 
0190: 53 51 4c 69 74 65 20 6d 6f 64 75 6c 65 20 69 6d  SQLite module im
01a0: 70 6c 65 6d 65 6e 74 69 6e 67 20 66 75 6c 6c 2d  plementing full-
01b0: 74 65 78 74 20 73 65 61 72 63 68 2e 0a 2a 2a 20  text search..** 
01c0: 54 68 69 73 20 70 61 72 74 69 63 75 6c 61 72 20  This particular 
01d0: 66 69 6c 65 20 69 6d 70 6c 65 6d 65 6e 74 73 20  file implements 
01e0: 74 68 65 20 67 65 6e 65 72 69 63 20 74 6f 6b 65  the generic toke
01f0: 6e 69 7a 65 72 20 69 6e 74 65 72 66 61 63 65 2e  nizer interface.
0200: 0a 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 63  .*/../*.** The c
0210: 6f 64 65 20 69 6e 20 74 68 69 73 20 66 69 6c 65  ode in this file
0220: 20 69 73 20 6f 6e 6c 79 20 63 6f 6d 70 69 6c 65   is only compile
0230: 64 20 69 66 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20  d if:.**.**     
0240: 2a 20 54 68 65 20 46 54 53 33 20 6d 6f 64 75 6c  * The FTS3 modul
0250: 65 20 69 73 20 62 65 69 6e 67 20 62 75 69 6c 74  e is being built
0260: 20 61 73 20 61 6e 20 65 78 74 65 6e 73 69 6f 6e   as an extension
0270: 0a 2a 2a 20 20 20 20 20 20 20 28 69 6e 20 77 68  .**       (in wh
0280: 69 63 68 20 63 61 73 65 20 53 51 4c 49 54 45 5f  ich case SQLITE_
0290: 43 4f 52 45 20 69 73 20 6e 6f 74 20 64 65 66 69  CORE is not defi
02a0: 6e 65 64 29 2c 20 6f 72 0a 2a 2a 0a 2a 2a 20 20  ned), or.**.**  
02b0: 20 20 20 2a 20 54 68 65 20 46 54 53 33 20 6d 6f     * The FTS3 mo
02c0: 64 75 6c 65 20 69 73 20 62 65 69 6e 67 20 62 75  dule is being bu
02d0: 69 6c 74 20 69 6e 74 6f 20 74 68 65 20 63 6f 72  ilt into the cor
02e0: 65 20 6f 66 0a 2a 2a 20 20 20 20 20 20 20 53 51  e of.**       SQ
02f0: 4c 69 74 65 20 28 69 6e 20 77 68 69 63 68 20 63  Lite (in which c
0300: 61 73 65 20 53 51 4c 49 54 45 5f 45 4e 41 42 4c  ase SQLITE_ENABL
0310: 45 5f 46 54 53 33 20 69 73 20 64 65 66 69 6e 65  E_FTS3 is define
0320: 64 29 2e 0a 2a 2f 0a 23 69 66 20 21 64 65 66 69  d)..*/.#if !defi
0330: 6e 65 64 28 53 51 4c 49 54 45 5f 43 4f 52 45 29  ned(SQLITE_CORE)
0340: 20 7c 7c 20 64 65 66 69 6e 65 64 28 53 51 4c 49   || defined(SQLI
0350: 54 45 5f 45 4e 41 42 4c 45 5f 46 54 53 33 29 0a  TE_ENABLE_FTS3).
0360: 0a 23 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74  .#include "sqlit
0370: 65 33 65 78 74 2e 68 22 0a 23 69 66 6e 64 65 66  e3ext.h".#ifndef
0380: 20 53 51 4c 49 54 45 5f 43 4f 52 45 0a 20 20 53   SQLITE_CORE.  S
0390: 51 4c 49 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f  QLITE_EXTENSION_
03a0: 49 4e 49 54 31 0a 23 65 6e 64 69 66 0a 0a 23 69  INIT1.#endif..#i
03b0: 6e 63 6c 75 64 65 20 22 66 74 73 33 49 6e 74 2e  nclude "fts3Int.
03c0: 68 22 0a 23 69 6e 63 6c 75 64 65 20 3c 61 73 73  h".#include <ass
03d0: 65 72 74 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20  ert.h>.#include 
03e0: 3c 73 74 72 69 6e 67 2e 68 3e 0a 0a 2f 2a 0a 2a  <string.h>../*.*
03f0: 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  * Implementation
0400: 20 6f 66 20 74 68 65 20 53 51 4c 20 73 63 61 6c   of the SQL scal
0410: 61 72 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20  ar function for 
0420: 61 63 63 65 73 73 69 6e 67 20 74 68 65 20 75 6e  accessing the un
0430: 64 65 72 6c 79 69 6e 67 20 0a 2a 2a 20 68 61 73  derlying .** has
0440: 68 20 74 61 62 6c 65 2e 20 54 68 69 73 20 66 75  h table. This fu
0450: 6e 63 74 69 6f 6e 20 6d 61 79 20 62 65 20 63 61  nction may be ca
0460: 6c 6c 65 64 20 61 73 20 66 6f 6c 6c 6f 77 73 3a  lled as follows:
0470: 0a 2a 2a 0a 2a 2a 20 20 20 53 45 4c 45 43 54 20  .**.**   SELECT 
0480: 3c 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 3e 28  <function-name>(
0490: 3c 6b 65 79 2d 6e 61 6d 65 3e 29 3b 0a 2a 2a 20  <key-name>);.** 
04a0: 20 20 53 45 4c 45 43 54 20 3c 66 75 6e 63 74 69    SELECT <functi
04b0: 6f 6e 2d 6e 61 6d 65 3e 28 3c 6b 65 79 2d 6e 61  on-name>(<key-na
04c0: 6d 65 3e 2c 20 3c 70 6f 69 6e 74 65 72 3e 29 3b  me>, <pointer>);
04d0: 0a 2a 2a 0a 2a 2a 20 77 68 65 72 65 20 3c 66 75  .**.** where <fu
04e0: 6e 63 74 69 6f 6e 2d 6e 61 6d 65 3e 20 69 73 20  nction-name> is 
04f0: 74 68 65 20 6e 61 6d 65 20 70 61 73 73 65 64 20  the name passed 
0500: 61 73 20 74 68 65 20 73 65 63 6f 6e 64 20 61 72  as the second ar
0510: 67 75 6d 65 6e 74 0a 2a 2a 20 74 6f 20 74 68 65  gument.** to the
0520: 20 73 71 6c 69 74 65 33 46 74 73 33 49 6e 69 74   sqlite3Fts3Init
0530: 48 61 73 68 54 61 62 6c 65 28 29 20 66 75 6e 63  HashTable() func
0540: 74 69 6f 6e 20 28 65 2e 67 2e 20 27 66 74 73 33  tion (e.g. 'fts3
0550: 5f 74 6f 6b 65 6e 69 7a 65 72 27 29 2e 0a 2a 2a  _tokenizer')..**
0560: 0a 2a 2a 20 49 66 20 74 68 65 20 3c 70 6f 69 6e  .** If the <poin
0570: 74 65 72 3e 20 61 72 67 75 6d 65 6e 74 20 69 73  ter> argument is
0580: 20 73 70 65 63 69 66 69 65 64 2c 20 69 74 20 6d   specified, it m
0590: 75 73 74 20 62 65 20 61 20 62 6c 6f 62 20 76 61  ust be a blob va
05a0: 6c 75 65 0a 2a 2a 20 63 6f 6e 74 61 69 6e 69 6e  lue.** containin
05b0: 67 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 62  g a pointer to b
05c0: 65 20 73 74 6f 72 65 64 20 61 73 20 74 68 65 20  e stored as the 
05d0: 68 61 73 68 20 64 61 74 61 20 63 6f 72 72 65 73  hash data corres
05e0: 70 6f 6e 64 69 6e 67 0a 2a 2a 20 74 6f 20 74 68  ponding.** to th
05f0: 65 20 73 74 72 69 6e 67 20 3c 6b 65 79 2d 6e 61  e string <key-na
0600: 6d 65 3e 2e 20 49 66 20 3c 70 6f 69 6e 74 65 72  me>. If <pointer
0610: 3e 20 69 73 20 6e 6f 74 20 73 70 65 63 69 66 69  > is not specifi
0620: 65 64 2c 20 74 68 65 6e 0a 2a 2a 20 74 68 65 20  ed, then.** the 
0630: 73 74 72 69 6e 67 20 3c 6b 65 79 2d 6e 61 6d 65  string <key-name
0640: 3e 20 6d 75 73 74 20 61 6c 72 65 61 64 79 20 65  > must already e
0650: 78 69 73 74 20 69 6e 20 74 68 65 20 68 61 73 20  xist in the has 
0660: 74 61 62 6c 65 2e 20 4f 74 68 65 72 77 69 73 65  table. Otherwise
0670: 2c 0a 2a 2a 20 61 6e 20 65 72 72 6f 72 20 69 73  ,.** an error is
0680: 20 72 65 74 75 72 6e 65 64 2e 0a 2a 2a 0a 2a 2a   returned..**.**
0690: 20 57 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20   Whether or not 
06a0: 74 68 65 20 3c 70 6f 69 6e 74 65 72 3e 20 61 72  the <pointer> ar
06b0: 67 75 6d 65 6e 74 20 69 73 20 73 70 65 63 69 66  gument is specif
06c0: 69 65 64 2c 20 74 68 65 20 76 61 6c 75 65 20 72  ied, the value r
06d0: 65 74 75 72 6e 65 64 0a 2a 2a 20 69 73 20 61 20  eturned.** is a 
06e0: 62 6c 6f 62 20 63 6f 6e 74 61 69 6e 69 6e 67 20  blob containing 
06f0: 74 68 65 20 70 6f 69 6e 74 65 72 20 73 74 6f 72  the pointer stor
0700: 65 64 20 61 73 20 74 68 65 20 68 61 73 68 20 64  ed as the hash d
0710: 61 74 61 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e  ata correspondin
0720: 67 0a 2a 2a 20 74 6f 20 73 74 72 69 6e 67 20 3c  g.** to string <
0730: 6b 65 79 2d 6e 61 6d 65 3e 20 28 61 66 74 65 72  key-name> (after
0740: 20 74 68 65 20 68 61 73 68 2d 74 61 62 6c 65 20   the hash-table 
0750: 69 73 20 75 70 64 61 74 65 64 2c 20 69 66 20 61  is updated, if a
0760: 70 70 6c 69 63 61 62 6c 65 29 2e 0a 2a 2f 0a 73  pplicable)..*/.s
0770: 74 61 74 69 63 20 76 6f 69 64 20 73 63 61 6c 61  tatic void scala
0780: 72 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33  rFunc(.  sqlite3
0790: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
07a0: 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20  t,.  int argc,. 
07b0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
07c0: 2a 61 72 67 76 0a 29 7b 0a 20 20 46 74 73 33 48  *argv.){.  Fts3H
07d0: 61 73 68 20 2a 70 48 61 73 68 3b 0a 20 20 76 6f  ash *pHash;.  vo
07e0: 69 64 20 2a 70 50 74 72 20 3d 20 30 3b 0a 20 20  id *pPtr = 0;.  
07f0: 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63  const unsigned c
0800: 68 61 72 20 2a 7a 4e 61 6d 65 3b 0a 20 20 69 6e  har *zName;.  in
0810: 74 20 6e 4e 61 6d 65 3b 0a 0a 20 20 61 73 73 65  t nName;..  asse
0820: 72 74 28 20 61 72 67 63 3d 3d 31 20 7c 7c 20 61  rt( argc==1 || a
0830: 72 67 63 3d 3d 32 20 29 3b 0a 0a 20 20 70 48 61  rgc==2 );..  pHa
0840: 73 68 20 3d 20 28 46 74 73 33 48 61 73 68 20 2a  sh = (Fts3Hash *
0850: 29 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64 61  )sqlite3_user_da
0860: 74 61 28 63 6f 6e 74 65 78 74 29 3b 0a 0a 20 20  ta(context);..  
0870: 7a 4e 61 6d 65 20 3d 20 73 71 6c 69 74 65 33 5f  zName = sqlite3_
0880: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
0890: 30 5d 29 3b 0a 20 20 6e 4e 61 6d 65 20 3d 20 73  0]);.  nName = s
08a0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74  qlite3_value_byt
08b0: 65 73 28 61 72 67 76 5b 30 5d 29 2b 31 3b 0a 0a  es(argv[0])+1;..
08c0: 20 20 69 66 28 20 61 72 67 63 3d 3d 32 20 29 7b    if( argc==2 ){
08d0: 0a 20 20 20 20 76 6f 69 64 20 2a 70 4f 6c 64 3b  .    void *pOld;
08e0: 0a 20 20 20 20 69 6e 74 20 6e 20 3d 20 73 71 6c  .    int n = sql
08f0: 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74 65 73  ite3_value_bytes
0900: 28 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 69  (argv[1]);.    i
0910: 66 28 20 6e 21 3d 73 69 7a 65 6f 66 28 70 50 74  f( n!=sizeof(pPt
0920: 72 29 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69  r) ){.      sqli
0930: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
0940: 28 63 6f 6e 74 65 78 74 2c 20 22 61 72 67 75 6d  (context, "argum
0950: 65 6e 74 20 74 79 70 65 20 6d 69 73 6d 61 74 63  ent type mismatc
0960: 68 22 2c 20 2d 31 29 3b 0a 20 20 20 20 20 20 72  h", -1);.      r
0970: 65 74 75 72 6e 3b 0a 20 20 20 20 7d 0a 20 20 20  eturn;.    }.   
0980: 20 70 50 74 72 20 3d 20 2a 28 76 6f 69 64 20 2a   pPtr = *(void *
0990: 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  *)sqlite3_value_
09a0: 62 6c 6f 62 28 61 72 67 76 5b 31 5d 29 3b 0a 20  blob(argv[1]);. 
09b0: 20 20 20 70 4f 6c 64 20 3d 20 73 71 6c 69 74 65     pOld = sqlite
09c0: 33 46 74 73 33 48 61 73 68 49 6e 73 65 72 74 28  3Fts3HashInsert(
09d0: 70 48 61 73 68 2c 20 28 76 6f 69 64 20 2a 29 7a  pHash, (void *)z
09e0: 4e 61 6d 65 2c 20 6e 4e 61 6d 65 2c 20 70 50 74  Name, nName, pPt
09f0: 72 29 3b 0a 20 20 20 20 69 66 28 20 70 4f 6c 64  r);.    if( pOld
0a00: 3d 3d 70 50 74 72 20 29 7b 0a 20 20 20 20 20 20  ==pPtr ){.      
0a10: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65  sqlite3_result_e
0a20: 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 6f  rror(context, "o
0a30: 75 74 20 6f 66 20 6d 65 6d 6f 72 79 22 2c 20 2d  ut of memory", -
0a40: 31 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e  1);.      return
0a50: 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b  ;.    }.  }else{
0a60: 0a 20 20 20 20 70 50 74 72 20 3d 20 73 71 6c 69  .    pPtr = sqli
0a70: 74 65 33 46 74 73 33 48 61 73 68 46 69 6e 64 28  te3Fts3HashFind(
0a80: 70 48 61 73 68 2c 20 7a 4e 61 6d 65 2c 20 6e 4e  pHash, zName, nN
0a90: 61 6d 65 29 3b 0a 20 20 20 20 69 66 28 20 21 70  ame);.    if( !p
0aa0: 50 74 72 20 29 7b 0a 20 20 20 20 20 20 63 68 61  Ptr ){.      cha
0ab0: 72 20 2a 7a 45 72 72 20 3d 20 73 71 6c 69 74 65  r *zErr = sqlite
0ac0: 33 5f 6d 70 72 69 6e 74 66 28 22 75 6e 6b 6e 6f  3_mprintf("unkno
0ad0: 77 6e 20 74 6f 6b 65 6e 69 7a 65 72 3a 20 25 73  wn tokenizer: %s
0ae0: 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 20 20 20  ", zName);.     
0af0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
0b00: 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 7a  error(context, z
0b10: 45 72 72 2c 20 2d 31 29 3b 0a 20 20 20 20 20 20  Err, -1);.      
0b20: 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 45 72  sqlite3_free(zEr
0b30: 72 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e  r);.      return
0b40: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 73  ;.    }.  }..  s
0b50: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 62 6c  qlite3_result_bl
0b60: 6f 62 28 63 6f 6e 74 65 78 74 2c 20 28 76 6f 69  ob(context, (voi
0b70: 64 20 2a 29 26 70 50 74 72 2c 20 73 69 7a 65 6f  d *)&pPtr, sizeo
0b80: 66 28 70 50 74 72 29 2c 20 53 51 4c 49 54 45 5f  f(pPtr), SQLITE_
0b90: 54 52 41 4e 53 49 45 4e 54 29 3b 0a 7d 0a 0a 69  TRANSIENT);.}..i
0ba0: 6e 74 20 73 71 6c 69 74 65 33 46 74 73 33 49 73  nt sqlite3Fts3Is
0bb0: 49 64 43 68 61 72 28 63 68 61 72 20 63 29 7b 0a  IdChar(char c){.
0bc0: 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63    static const c
0bd0: 68 61 72 20 69 73 46 74 73 49 64 43 68 61 72 5b  har isFtsIdChar[
0be0: 5d 20 3d 20 7b 0a 20 20 20 20 20 20 30 2c 20 30  ] = {.      0, 0
0bf0: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
0c00: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
0c10: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 2f 2a 20  0, 0, 0, 0,  /* 
0c20: 30 78 20 2a 2f 0a 20 20 20 20 20 20 30 2c 20 30  0x */.      0, 0
0c30: 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c  , 0, 0, 0, 0, 0,
0c40: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
0c50: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 2f 2a 20  0, 0, 0, 0,  /* 
0c60: 31 78 20 2a 2f 0a 20 20 20 20 20 20 30 2c 20 30  1x */.      0, 0
0c70: 2c 20 30 2c 20 30 2c 20 31 2c 20 30 2c 20 30 2c  , 0, 0, 1, 0, 0,
0c80: 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20   0, 0, 0, 0, 0, 
0c90: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 2f 2a 20  0, 0, 0, 0,  /* 
0ca0: 32 78 20 2a 2f 0a 20 20 20 20 20 20 31 2c 20 31  2x */.      1, 1
0cb0: 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c  , 1, 1, 1, 1, 1,
0cc0: 20 31 2c 20 31 2c 20 31 2c 20 30 2c 20 30 2c 20   1, 1, 1, 0, 0, 
0cd0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 2f 2a 20  0, 0, 0, 0,  /* 
0ce0: 33 78 20 2a 2f 0a 20 20 20 20 20 20 30 2c 20 31  3x */.      0, 1
0cf0: 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c  , 1, 1, 1, 1, 1,
0d00: 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20   1, 1, 1, 1, 1, 
0d10: 31 2c 20 31 2c 20 31 2c 20 31 2c 20 20 2f 2a 20  1, 1, 1, 1,  /* 
0d20: 34 78 20 2a 2f 0a 20 20 20 20 20 20 31 2c 20 31  4x */.      1, 1
0d30: 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c  , 1, 1, 1, 1, 1,
0d40: 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 30 2c 20   1, 1, 1, 1, 0, 
0d50: 30 2c 20 30 2c 20 30 2c 20 31 2c 20 20 2f 2a 20  0, 0, 0, 1,  /* 
0d60: 35 78 20 2a 2f 0a 20 20 20 20 20 20 30 2c 20 31  5x */.      0, 1
0d70: 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c  , 1, 1, 1, 1, 1,
0d80: 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20   1, 1, 1, 1, 1, 
0d90: 31 2c 20 31 2c 20 31 2c 20 31 2c 20 20 2f 2a 20  1, 1, 1, 1,  /* 
0da0: 36 78 20 2a 2f 0a 20 20 20 20 20 20 31 2c 20 31  6x */.      1, 1
0db0: 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 31 2c  , 1, 1, 1, 1, 1,
0dc0: 20 31 2c 20 31 2c 20 31 2c 20 31 2c 20 30 2c 20   1, 1, 1, 1, 0, 
0dd0: 30 2c 20 30 2c 20 30 2c 20 30 2c 20 20 2f 2a 20  0, 0, 0, 0,  /* 
0de0: 37 78 20 2a 2f 0a 20 20 7d 3b 0a 20 20 72 65 74  7x */.  };.  ret
0df0: 75 72 6e 20 28 63 26 30 78 38 30 20 7c 7c 20 69  urn (c&0x80 || i
0e00: 73 46 74 73 49 64 43 68 61 72 5b 28 69 6e 74 29  sFtsIdChar[(int)
0e10: 28 63 29 5d 29 3b 0a 7d 0a 0a 63 6f 6e 73 74 20  (c)]);.}..const 
0e20: 63 68 61 72 20 2a 73 71 6c 69 74 65 33 46 74 73  char *sqlite3Fts
0e30: 33 4e 65 78 74 54 6f 6b 65 6e 28 63 6f 6e 73 74  3NextToken(const
0e40: 20 63 68 61 72 20 2a 7a 53 74 72 2c 20 69 6e 74   char *zStr, int
0e50: 20 2a 70 6e 29 7b 0a 20 20 63 6f 6e 73 74 20 63   *pn){.  const c
0e60: 68 61 72 20 2a 7a 31 3b 0a 20 20 63 6f 6e 73 74  har *z1;.  const
0e70: 20 63 68 61 72 20 2a 7a 32 20 3d 20 30 3b 0a 0a   char *z2 = 0;..
0e80: 20 20 2f 2a 20 46 69 6e 64 20 74 68 65 20 73 74    /* Find the st
0e90: 61 72 74 20 6f 66 20 74 68 65 20 6e 65 78 74 20  art of the next 
0ea0: 74 6f 6b 65 6e 2e 20 2a 2f 0a 20 20 7a 31 20 3d  token. */.  z1 =
0eb0: 20 7a 53 74 72 3b 0a 20 20 77 68 69 6c 65 28 20   zStr;.  while( 
0ec0: 7a 32 3d 3d 30 20 29 7b 0a 20 20 20 20 63 68 61  z2==0 ){.    cha
0ed0: 72 20 63 20 3d 20 2a 7a 31 3b 0a 20 20 20 20 73  r c = *z1;.    s
0ee0: 77 69 74 63 68 28 20 63 20 29 7b 0a 20 20 20 20  witch( c ){.    
0ef0: 20 20 63 61 73 65 20 27 5c 30 27 3a 20 72 65 74    case '\0': ret
0f00: 75 72 6e 20 30 3b 20 20 20 20 20 20 20 20 2f 2a  urn 0;        /*
0f10: 20 4e 6f 20 6d 6f 72 65 20 74 6f 6b 65 6e 73 20   No more tokens 
0f20: 68 65 72 65 20 2a 2f 0a 20 20 20 20 20 20 63 61  here */.      ca
0f30: 73 65 20 27 5c 27 27 3a 0a 20 20 20 20 20 20 63  se '\'':.      c
0f40: 61 73 65 20 27 22 27 3a 0a 20 20 20 20 20 20 63  ase '"':.      c
0f50: 61 73 65 20 27 60 27 3a 20 7b 0a 20 20 20 20 20  ase '`': {.     
0f60: 20 20 20 7a 32 20 3d 20 7a 31 3b 0a 20 20 20 20     z2 = z1;.    
0f70: 20 20 20 20 77 68 69 6c 65 28 20 2a 2b 2b 7a 32      while( *++z2
0f80: 20 26 26 20 28 2a 7a 32 21 3d 63 20 7c 7c 20 2a   && (*z2!=c || *
0f90: 2b 2b 7a 32 3d 3d 63 29 20 29 3b 0a 20 20 20 20  ++z2==c) );.    
0fa0: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20      break;.     
0fb0: 20 7d 0a 20 20 20 20 20 20 63 61 73 65 20 27 5b   }.      case '[
0fc0: 27 3a 0a 20 20 20 20 20 20 20 20 7a 32 20 3d 20  ':.        z2 = 
0fd0: 26 7a 31 5b 31 5d 3b 0a 20 20 20 20 20 20 20 20  &z1[1];.        
0fe0: 77 68 69 6c 65 28 20 2a 7a 32 20 26 26 20 7a 32  while( *z2 && z2
0ff0: 5b 30 5d 21 3d 27 5d 27 20 29 20 7a 32 2b 2b 3b  [0]!=']' ) z2++;
1000: 0a 20 20 20 20 20 20 20 20 69 66 28 20 2a 7a 32  .        if( *z2
1010: 20 29 20 7a 32 2b 2b 3b 0a 20 20 20 20 20 20 20   ) z2++;.       
1020: 20 62 72 65 61 6b 3b 0a 0a 20 20 20 20 20 20 64   break;..      d
1030: 65 66 61 75 6c 74 3a 0a 20 20 20 20 20 20 20 20  efault:.        
1040: 69 66 28 20 73 71 6c 69 74 65 33 46 74 73 33 49  if( sqlite3Fts3I
1050: 73 49 64 43 68 61 72 28 2a 7a 31 29 20 29 7b 0a  sIdChar(*z1) ){.
1060: 20 20 20 20 20 20 20 20 20 20 7a 32 20 3d 20 26            z2 = &
1070: 7a 31 5b 31 5d 3b 0a 20 20 20 20 20 20 20 20 20  z1[1];.         
1080: 20 77 68 69 6c 65 28 20 73 71 6c 69 74 65 33 46   while( sqlite3F
1090: 74 73 33 49 73 49 64 43 68 61 72 28 2a 7a 32 29  ts3IsIdChar(*z2)
10a0: 20 29 20 7a 32 2b 2b 3b 0a 20 20 20 20 20 20 20   ) z2++;.       
10b0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20   }else{.        
10c0: 20 20 7a 31 2b 2b 3b 0a 20 20 20 20 20 20 20 20    z1++;.        
10d0: 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 2a  }.    }.  }..  *
10e0: 70 6e 20 3d 20 28 69 6e 74 29 28 7a 32 2d 7a 31  pn = (int)(z2-z1
10f0: 29 3b 0a 20 20 72 65 74 75 72 6e 20 7a 31 3b 0a  );.  return z1;.
1100: 7d 0a 0a 69 6e 74 20 73 71 6c 69 74 65 33 46 74  }..int sqlite3Ft
1110: 73 33 49 6e 69 74 54 6f 6b 65 6e 69 7a 65 72 28  s3InitTokenizer(
1120: 0a 20 20 46 74 73 33 48 61 73 68 20 2a 70 48 61  .  Fts3Hash *pHa
1130: 73 68 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  sh,             
1140: 20 20 20 2f 2a 20 54 6f 6b 65 6e 69 7a 65 72 20     /* Tokenizer 
1150: 68 61 73 68 20 74 61 62 6c 65 20 2a 2f 0a 20 20  hash table */.  
1160: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 41 72 67  const char *zArg
1170: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
1180: 2f 2a 20 54 6f 6b 65 6e 69 7a 65 72 20 6e 61 6d  /* Tokenizer nam
1190: 65 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 74  e */.  sqlite3_t
11a0: 6f 6b 65 6e 69 7a 65 72 20 2a 2a 70 70 54 6f 6b  okenizer **ppTok
11b0: 2c 20 20 20 20 20 20 2f 2a 20 4f 55 54 3a 20 54  ,      /* OUT: T
11c0: 6f 6b 65 6e 69 7a 65 72 20 28 69 66 20 61 70 70  okenizer (if app
11d0: 6c 69 63 61 62 6c 65 29 20 2a 2f 0a 20 20 63 68  licable) */.  ch
11e0: 61 72 20 2a 2a 70 7a 45 72 72 20 20 20 20 20 20  ar **pzErr      
11f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
1200: 20 4f 55 54 3a 20 53 65 74 20 74 6f 20 6d 61 6c   OUT: Set to mal
1210: 6c 6f 63 65 64 20 65 72 72 6f 72 20 6d 65 73 73  loced error mess
1220: 61 67 65 20 2a 2f 0a 29 7b 0a 20 20 69 6e 74 20  age */.){.  int 
1230: 72 63 3b 0a 20 20 63 68 61 72 20 2a 7a 20 3d 20  rc;.  char *z = 
1240: 28 63 68 61 72 20 2a 29 7a 41 72 67 3b 0a 20 20  (char *)zArg;.  
1250: 69 6e 74 20 6e 3b 0a 20 20 63 68 61 72 20 2a 7a  int n;.  char *z
1260: 43 6f 70 79 3b 0a 20 20 63 68 61 72 20 2a 7a 45  Copy;.  char *zE
1270: 6e 64 3b 20 20 20 20 20 20 20 20 20 20 20 20 20  nd;             
1280: 20 20 20 20 20 20 20 20 2f 2a 20 50 6f 69 6e 74          /* Point
1290: 65 72 20 74 6f 20 6e 75 6c 2d 74 65 72 6d 20 6f  er to nul-term o
12a0: 66 20 7a 43 6f 70 79 20 2a 2f 0a 20 20 73 71 6c  f zCopy */.  sql
12b0: 69 74 65 33 5f 74 6f 6b 65 6e 69 7a 65 72 5f 6d  ite3_tokenizer_m
12c0: 6f 64 75 6c 65 20 2a 6d 3b 0a 0a 20 20 7a 43 6f  odule *m;..  zCo
12d0: 70 79 20 3d 20 73 71 6c 69 74 65 33 5f 6d 70 72  py = sqlite3_mpr
12e0: 69 6e 74 66 28 22 25 73 22 2c 20 7a 41 72 67 29  intf("%s", zArg)
12f0: 3b 0a 20 20 69 66 28 20 21 7a 43 6f 70 79 20 29  ;.  if( !zCopy )
1300: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e   return SQLITE_N
1310: 4f 4d 45 4d 3b 0a 20 20 7a 45 6e 64 20 3d 20 26  OMEM;.  zEnd = &
1320: 7a 43 6f 70 79 5b 73 74 72 6c 65 6e 28 7a 43 6f  zCopy[strlen(zCo
1330: 70 79 29 5d 3b 0a 0a 20 20 7a 20 3d 20 28 63 68  py)];..  z = (ch
1340: 61 72 20 2a 29 73 71 6c 69 74 65 33 46 74 73 33  ar *)sqlite3Fts3
1350: 4e 65 78 74 54 6f 6b 65 6e 28 7a 43 6f 70 79 2c  NextToken(zCopy,
1360: 20 26 6e 29 3b 0a 20 20 7a 5b 6e 5d 20 3d 20 27   &n);.  z[n] = '
1370: 5c 30 27 3b 0a 20 20 73 71 6c 69 74 65 33 46 74  \0';.  sqlite3Ft
1380: 73 33 44 65 71 75 6f 74 65 28 7a 29 3b 0a 0a 20  s3Dequote(z);.. 
1390: 20 6d 20 3d 20 28 73 71 6c 69 74 65 33 5f 74 6f   m = (sqlite3_to
13a0: 6b 65 6e 69 7a 65 72 5f 6d 6f 64 75 6c 65 20 2a  kenizer_module *
13b0: 29 73 71 6c 69 74 65 33 46 74 73 33 48 61 73 68  )sqlite3Fts3Hash
13c0: 46 69 6e 64 28 70 48 61 73 68 2c 7a 2c 28 69 6e  Find(pHash,z,(in
13d0: 74 29 73 74 72 6c 65 6e 28 7a 29 2b 31 29 3b 0a  t)strlen(z)+1);.
13e0: 20 20 69 66 28 20 21 6d 20 29 7b 0a 20 20 20 20    if( !m ){.    
13f0: 2a 70 7a 45 72 72 20 3d 20 73 71 6c 69 74 65 33  *pzErr = sqlite3
1400: 5f 6d 70 72 69 6e 74 66 28 22 75 6e 6b 6e 6f 77  _mprintf("unknow
1410: 6e 20 74 6f 6b 65 6e 69 7a 65 72 3a 20 25 73 22  n tokenizer: %s"
1420: 2c 20 7a 29 3b 0a 20 20 20 20 72 63 20 3d 20 53  , z);.    rc = S
1430: 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0a 20 20 7d  QLITE_ERROR;.  }
1440: 65 6c 73 65 7b 0a 20 20 20 20 63 68 61 72 20 63  else{.    char c
1450: 6f 6e 73 74 20 2a 2a 61 41 72 67 20 3d 20 30 3b  onst **aArg = 0;
1460: 0a 20 20 20 20 69 6e 74 20 69 41 72 67 20 3d 20  .    int iArg = 
1470: 30 3b 0a 20 20 20 20 7a 20 3d 20 26 7a 5b 6e 2b  0;.    z = &z[n+
1480: 31 5d 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 7a  1];.    while( z
1490: 3c 7a 45 6e 64 20 26 26 20 28 4e 55 4c 4c 21 3d  <zEnd && (NULL!=
14a0: 28 7a 20 3d 20 28 63 68 61 72 20 2a 29 73 71 6c  (z = (char *)sql
14b0: 69 74 65 33 46 74 73 33 4e 65 78 74 54 6f 6b 65  ite3Fts3NextToke
14c0: 6e 28 7a 2c 20 26 6e 29 29 29 20 29 7b 0a 20 20  n(z, &n))) ){.  
14d0: 20 20 20 20 69 6e 74 20 6e 4e 65 77 20 3d 20 73      int nNew = s
14e0: 69 7a 65 6f 66 28 63 68 61 72 20 2a 29 2a 28 69  izeof(char *)*(i
14f0: 41 72 67 2b 31 29 3b 0a 20 20 20 20 20 20 63 68  Arg+1);.      ch
1500: 61 72 20 63 6f 6e 73 74 20 2a 2a 61 4e 65 77 20  ar const **aNew 
1510: 3d 20 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 2a  = (const char **
1520: 29 73 71 6c 69 74 65 33 5f 72 65 61 6c 6c 6f 63  )sqlite3_realloc
1530: 28 28 76 6f 69 64 20 2a 29 61 41 72 67 2c 20 6e  ((void *)aArg, n
1540: 4e 65 77 29 3b 0a 20 20 20 20 20 20 69 66 28 20  New);.      if( 
1550: 21 61 4e 65 77 20 29 7b 0a 20 20 20 20 20 20 20  !aNew ){.       
1560: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 43   sqlite3_free(zC
1570: 6f 70 79 29 3b 0a 20 20 20 20 20 20 20 20 73 71  opy);.        sq
1580: 6c 69 74 65 33 5f 66 72 65 65 28 28 76 6f 69 64  lite3_free((void
1590: 20 2a 29 61 41 72 67 29 3b 0a 20 20 20 20 20 20   *)aArg);.      
15a0: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
15b0: 4e 4f 4d 45 4d 3b 0a 20 20 20 20 20 20 7d 0a 20  NOMEM;.      }. 
15c0: 20 20 20 20 20 61 41 72 67 20 3d 20 61 4e 65 77       aArg = aNew
15d0: 3b 0a 20 20 20 20 20 20 61 41 72 67 5b 69 41 72  ;.      aArg[iAr
15e0: 67 2b 2b 5d 20 3d 20 7a 3b 0a 20 20 20 20 20 20  g++] = z;.      
15f0: 7a 5b 6e 5d 20 3d 20 27 5c 30 27 3b 0a 20 20 20  z[n] = '\0';.   
1600: 20 20 20 73 71 6c 69 74 65 33 46 74 73 33 44 65     sqlite3Fts3De
1610: 71 75 6f 74 65 28 7a 29 3b 0a 20 20 20 20 20 20  quote(z);.      
1620: 7a 20 3d 20 26 7a 5b 6e 2b 31 5d 3b 0a 20 20 20  z = &z[n+1];.   
1630: 20 7d 0a 20 20 20 20 72 63 20 3d 20 6d 2d 3e 78   }.    rc = m->x
1640: 43 72 65 61 74 65 28 69 41 72 67 2c 20 61 41 72  Create(iArg, aAr
1650: 67 2c 20 70 70 54 6f 6b 29 3b 0a 20 20 20 20 61  g, ppTok);.    a
1660: 73 73 65 72 74 28 20 72 63 21 3d 53 51 4c 49 54  ssert( rc!=SQLIT
1670: 45 5f 4f 4b 20 7c 7c 20 2a 70 70 54 6f 6b 20 29  E_OK || *ppTok )
1680: 3b 0a 20 20 20 20 69 66 28 20 72 63 21 3d 53 51  ;.    if( rc!=SQ
1690: 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 20  LITE_OK ){.     
16a0: 20 2a 70 7a 45 72 72 20 3d 20 73 71 6c 69 74 65   *pzErr = sqlite
16b0: 33 5f 6d 70 72 69 6e 74 66 28 22 75 6e 6b 6e 6f  3_mprintf("unkno
16c0: 77 6e 20 74 6f 6b 65 6e 69 7a 65 72 22 29 3b 0a  wn tokenizer");.
16d0: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20      }else{.     
16e0: 20 28 2a 70 70 54 6f 6b 29 2d 3e 70 4d 6f 64 75   (*ppTok)->pModu
16f0: 6c 65 20 3d 20 6d 3b 20 0a 20 20 20 20 7d 0a 20  le = m; .    }. 
1700: 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28     sqlite3_free(
1710: 28 76 6f 69 64 20 2a 29 61 41 72 67 29 3b 0a 20  (void *)aArg);. 
1720: 20 7d 0a 0a 20 20 73 71 6c 69 74 65 33 5f 66 72   }..  sqlite3_fr
1730: 65 65 28 7a 43 6f 70 79 29 3b 0a 20 20 72 65 74  ee(zCopy);.  ret
1740: 75 72 6e 20 72 63 3b 0a 7d 0a 0a 0a 23 69 66 64  urn rc;.}...#ifd
1750: 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 0a  ef SQLITE_TEST..
1760: 23 69 6e 63 6c 75 64 65 20 3c 74 63 6c 2e 68 3e  #include <tcl.h>
1770: 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74 72 69 6e  .#include <strin
1780: 67 2e 68 3e 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c  g.h>../*.** Impl
1790: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 61 20  ementation of a 
17a0: 73 70 65 63 69 61 6c 20 53 51 4c 20 73 63 61 6c  special SQL scal
17b0: 61 72 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20  ar function for 
17c0: 74 65 73 74 69 6e 67 20 74 6f 6b 65 6e 69 7a 65  testing tokenize
17d0: 72 73 20 0a 2a 2a 20 64 65 73 69 67 6e 65 64 20  rs .** designed 
17e0: 74 6f 20 62 65 20 75 73 65 64 20 69 6e 20 63 6f  to be used in co
17f0: 6e 63 65 72 74 20 77 69 74 68 20 74 68 65 20 54  ncert with the T
1800: 63 6c 20 74 65 73 74 69 6e 67 20 66 72 61 6d 65  cl testing frame
1810: 77 6f 72 6b 2e 20 54 68 69 73 0a 2a 2a 20 66 75  work. This.** fu
1820: 6e 63 74 69 6f 6e 20 6d 75 73 74 20 62 65 20 63  nction must be c
1830: 61 6c 6c 65 64 20 77 69 74 68 20 74 77 6f 20 61  alled with two a
1840: 72 67 75 6d 65 6e 74 73 3a 0a 2a 2a 0a 2a 2a 20  rguments:.**.** 
1850: 20 20 53 45 4c 45 43 54 20 3c 66 75 6e 63 74 69    SELECT <functi
1860: 6f 6e 2d 6e 61 6d 65 3e 28 3c 6b 65 79 2d 6e 61  on-name>(<key-na
1870: 6d 65 3e 2c 20 3c 69 6e 70 75 74 2d 73 74 72 69  me>, <input-stri
1880: 6e 67 3e 29 3b 0a 2a 2a 20 20 20 53 45 4c 45 43  ng>);.**   SELEC
1890: 54 20 3c 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65  T <function-name
18a0: 3e 28 3c 6b 65 79 2d 6e 61 6d 65 3e 2c 20 3c 70  >(<key-name>, <p
18b0: 6f 69 6e 74 65 72 3e 29 3b 0a 2a 2a 0a 2a 2a 20  ointer>);.**.** 
18c0: 77 68 65 72 65 20 3c 66 75 6e 63 74 69 6f 6e 2d  where <function-
18d0: 6e 61 6d 65 3e 20 69 73 20 74 68 65 20 6e 61 6d  name> is the nam
18e0: 65 20 70 61 73 73 65 64 20 61 73 20 74 68 65 20  e passed as the 
18f0: 73 65 63 6f 6e 64 20 61 72 67 75 6d 65 6e 74 0a  second argument.
1900: 2a 2a 20 74 6f 20 74 68 65 20 73 71 6c 69 74 65  ** to the sqlite
1910: 33 46 74 73 33 49 6e 69 74 48 61 73 68 54 61 62  3Fts3InitHashTab
1920: 6c 65 28 29 20 66 75 6e 63 74 69 6f 6e 20 28 65  le() function (e
1930: 2e 67 2e 20 27 66 74 73 33 5f 74 6f 6b 65 6e 69  .g. 'fts3_tokeni
1940: 7a 65 72 27 29 0a 2a 2a 20 63 6f 6e 63 61 74 65  zer').** concate
1950: 6e 61 74 65 64 20 77 69 74 68 20 74 68 65 20 73  nated with the s
1960: 74 72 69 6e 67 20 27 5f 74 65 73 74 27 20 28 65  tring '_test' (e
1970: 2e 67 2e 20 27 66 74 73 33 5f 74 6f 6b 65 6e 69  .g. 'fts3_tokeni
1980: 7a 65 72 5f 74 65 73 74 27 29 2e 0a 2a 2a 0a 2a  zer_test')..**.*
1990: 2a 20 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c  * The return val
19a0: 75 65 20 69 73 20 61 20 73 74 72 69 6e 67 20 74  ue is a string t
19b0: 68 61 74 20 6d 61 79 20 62 65 20 69 6e 74 65 72  hat may be inter
19c0: 70 72 65 74 65 64 20 61 73 20 61 20 54 63 6c 0a  preted as a Tcl.
19d0: 2a 2a 20 6c 69 73 74 2e 20 46 6f 72 20 65 61 63  ** list. For eac
19e0: 68 20 74 6f 6b 65 6e 20 69 6e 20 74 68 65 20 3c  h token in the <
19f0: 69 6e 70 75 74 2d 73 74 72 69 6e 67 3e 2c 20 74  input-string>, t
1a00: 68 72 65 65 20 65 6c 65 6d 65 6e 74 73 20 61 72  hree elements ar
1a10: 65 0a 2a 2a 20 61 64 64 65 64 20 74 6f 20 74 68  e.** added to th
1a20: 65 20 72 65 74 75 72 6e 65 64 20 6c 69 73 74 2e  e returned list.
1a30: 20 54 68 65 20 66 69 72 73 74 20 69 73 20 74 68   The first is th
1a40: 65 20 74 6f 6b 65 6e 20 70 6f 73 69 74 69 6f 6e  e token position
1a50: 2c 20 74 68 65 20 0a 2a 2a 20 73 65 63 6f 6e 64  , the .** second
1a60: 20 69 73 20 74 68 65 20 74 6f 6b 65 6e 20 74 65   is the token te
1a70: 78 74 20 28 66 6f 6c 64 65 64 2c 20 73 74 65 6d  xt (folded, stem
1a80: 6d 65 64 2c 20 65 74 63 2e 29 20 61 6e 64 20 74  med, etc.) and t
1a90: 68 65 20 74 68 69 72 64 20 69 73 20 74 68 65 0a  he third is the.
1aa0: 2a 2a 20 73 75 62 73 74 72 69 6e 67 20 6f 66 20  ** substring of 
1ab0: 3c 69 6e 70 75 74 2d 73 74 72 69 6e 67 3e 20 61  <input-string> a
1ac0: 73 73 6f 63 69 61 74 65 64 20 77 69 74 68 20 74  ssociated with t
1ad0: 68 65 20 74 6f 6b 65 6e 2e 20 46 6f 72 20 65 78  he token. For ex
1ae0: 61 6d 70 6c 65 2c 20 0a 2a 2a 20 75 73 69 6e 67  ample, .** using
1af0: 20 74 68 65 20 62 75 69 6c 74 2d 69 6e 20 22 73   the built-in "s
1b00: 69 6d 70 6c 65 22 20 74 6f 6b 65 6e 69 7a 65 72  imple" tokenizer
1b10: 3a 0a 2a 2a 0a 2a 2a 20 20 20 53 45 4c 45 43 54  :.**.**   SELECT
1b20: 20 66 74 73 5f 74 6f 6b 65 6e 69 7a 65 72 5f 74   fts_tokenizer_t
1b30: 65 73 74 28 27 73 69 6d 70 6c 65 27 2c 20 27 49  est('simple', 'I
1b40: 20 64 6f 6e 27 74 20 73 65 65 20 68 6f 77 27 29   don't see how')
1b50: 3b 0a 2a 2a 0a 2a 2a 20 77 69 6c 6c 20 72 65 74  ;.**.** will ret
1b60: 75 72 6e 20 74 68 65 20 73 74 72 69 6e 67 3a 0a  urn the string:.
1b70: 2a 2a 0a 2a 2a 20 20 20 22 7b 30 20 69 20 49 20  **.**   "{0 i I 
1b80: 31 20 64 6f 6e 74 20 64 6f 6e 27 74 20 32 20 73  1 dont don't 2 s
1b90: 65 65 20 73 65 65 20 33 20 68 6f 77 20 68 6f 77  ee see 3 how how
1ba0: 7d 22 0a 2a 2a 20 20 20 0a 2a 2f 0a 73 74 61 74  }".**   .*/.stat
1bb0: 69 63 20 76 6f 69 64 20 74 65 73 74 46 75 6e 63  ic void testFunc
1bc0: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74  (.  sqlite3_cont
1bd0: 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20  ext *context,.  
1be0: 69 6e 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69  int argc,.  sqli
1bf0: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
1c00: 0a 29 7b 0a 20 20 46 74 73 33 48 61 73 68 20 2a  .){.  Fts3Hash *
1c10: 70 48 61 73 68 3b 0a 20 20 73 71 6c 69 74 65 33  pHash;.  sqlite3
1c20: 5f 74 6f 6b 65 6e 69 7a 65 72 5f 6d 6f 64 75 6c  _tokenizer_modul
1c30: 65 20 2a 70 3b 0a 20 20 73 71 6c 69 74 65 33 5f  e *p;.  sqlite3_
1c40: 74 6f 6b 65 6e 69 7a 65 72 20 2a 70 54 6f 6b 65  tokenizer *pToke
1c50: 6e 69 7a 65 72 20 3d 20 30 3b 0a 20 20 73 71 6c  nizer = 0;.  sql
1c60: 69 74 65 33 5f 74 6f 6b 65 6e 69 7a 65 72 5f 63  ite3_tokenizer_c
1c70: 75 72 73 6f 72 20 2a 70 43 73 72 20 3d 20 30 3b  ursor *pCsr = 0;
1c80: 0a 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ..  const char *
1c90: 7a 45 72 72 20 3d 20 30 3b 0a 0a 20 20 63 6f 6e  zErr = 0;..  con
1ca0: 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 3b 0a  st char *zName;.
1cb0: 20 20 69 6e 74 20 6e 4e 61 6d 65 3b 0a 20 20 63    int nName;.  c
1cc0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 49 6e 70 75  onst char *zInpu
1cd0: 74 3b 0a 20 20 69 6e 74 20 6e 49 6e 70 75 74 3b  t;.  int nInput;
1ce0: 0a 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ..  const char *
1cf0: 7a 41 72 67 20 3d 20 30 3b 0a 0a 20 20 63 6f 6e  zArg = 0;..  con
1d00: 73 74 20 63 68 61 72 20 2a 7a 54 6f 6b 65 6e 3b  st char *zToken;
1d10: 0a 20 20 69 6e 74 20 6e 54 6f 6b 65 6e 3b 0a 20  .  int nToken;. 
1d20: 20 69 6e 74 20 69 53 74 61 72 74 3b 0a 20 20 69   int iStart;.  i
1d30: 6e 74 20 69 45 6e 64 3b 0a 20 20 69 6e 74 20 69  nt iEnd;.  int i
1d40: 50 6f 73 3b 0a 0a 20 20 54 63 6c 5f 4f 62 6a 20  Pos;..  Tcl_Obj 
1d50: 2a 70 52 65 74 3b 0a 0a 20 20 61 73 73 65 72 74  *pRet;..  assert
1d60: 28 20 61 72 67 63 3d 3d 32 20 7c 7c 20 61 72 67  ( argc==2 || arg
1d70: 63 3d 3d 33 20 29 3b 0a 0a 20 20 6e 4e 61 6d 65  c==3 );..  nName
1d80: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
1d90: 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 3b  _bytes(argv[0]);
1da0: 0a 20 20 7a 4e 61 6d 65 20 3d 20 28 63 6f 6e 73  .  zName = (cons
1db0: 74 20 63 68 61 72 20 2a 29 73 71 6c 69 74 65 33  t char *)sqlite3
1dc0: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
1dd0: 5b 30 5d 29 3b 0a 20 20 6e 49 6e 70 75 74 20 3d  [0]);.  nInput =
1de0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62   sqlite3_value_b
1df0: 79 74 65 73 28 61 72 67 76 5b 61 72 67 63 2d 31  ytes(argv[argc-1
1e00: 5d 29 3b 0a 20 20 7a 49 6e 70 75 74 20 3d 20 28  ]);.  zInput = (
1e10: 63 6f 6e 73 74 20 63 68 61 72 20 2a 29 73 71 6c  const char *)sql
1e20: 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28  ite3_value_text(
1e30: 61 72 67 76 5b 61 72 67 63 2d 31 5d 29 3b 0a 0a  argv[argc-1]);..
1e40: 20 20 69 66 28 20 61 72 67 63 3d 3d 33 20 29 7b    if( argc==3 ){
1e50: 0a 20 20 20 20 7a 41 72 67 20 3d 20 28 63 6f 6e  .    zArg = (con
1e60: 73 74 20 63 68 61 72 20 2a 29 73 71 6c 69 74 65  st char *)sqlite
1e70: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
1e80: 76 5b 31 5d 29 3b 0a 20 20 7d 0a 0a 20 20 70 48  v[1]);.  }..  pH
1e90: 61 73 68 20 3d 20 28 46 74 73 33 48 61 73 68 20  ash = (Fts3Hash 
1ea0: 2a 29 73 71 6c 69 74 65 33 5f 75 73 65 72 5f 64  *)sqlite3_user_d
1eb0: 61 74 61 28 63 6f 6e 74 65 78 74 29 3b 0a 20 20  ata(context);.  
1ec0: 70 20 3d 20 28 73 71 6c 69 74 65 33 5f 74 6f 6b  p = (sqlite3_tok
1ed0: 65 6e 69 7a 65 72 5f 6d 6f 64 75 6c 65 20 2a 29  enizer_module *)
1ee0: 73 71 6c 69 74 65 33 46 74 73 33 48 61 73 68 46  sqlite3Fts3HashF
1ef0: 69 6e 64 28 70 48 61 73 68 2c 20 7a 4e 61 6d 65  ind(pHash, zName
1f00: 2c 20 6e 4e 61 6d 65 2b 31 29 3b 0a 0a 20 20 69  , nName+1);..  i
1f10: 66 28 20 21 70 20 29 7b 0a 20 20 20 20 63 68 61  f( !p ){.    cha
1f20: 72 20 2a 7a 45 72 72 20 3d 20 73 71 6c 69 74 65  r *zErr = sqlite
1f30: 33 5f 6d 70 72 69 6e 74 66 28 22 75 6e 6b 6e 6f  3_mprintf("unkno
1f40: 77 6e 20 74 6f 6b 65 6e 69 7a 65 72 3a 20 25 73  wn tokenizer: %s
1f50: 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 20 20 73  ", zName);.    s
1f60: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72  qlite3_result_er
1f70: 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 7a 45 72  ror(context, zEr
1f80: 72 2c 20 2d 31 29 3b 0a 20 20 20 20 73 71 6c 69  r, -1);.    sqli
1f90: 74 65 33 5f 66 72 65 65 28 7a 45 72 72 29 3b 0a  te3_free(zErr);.
1fa0: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a      return;.  }.
1fb0: 0a 20 20 70 52 65 74 20 3d 20 54 63 6c 5f 4e 65  .  pRet = Tcl_Ne
1fc0: 77 4f 62 6a 28 29 3b 0a 20 20 54 63 6c 5f 49 6e  wObj();.  Tcl_In
1fd0: 63 72 52 65 66 43 6f 75 6e 74 28 70 52 65 74 29  crRefCount(pRet)
1fe0: 3b 0a 0a 20 20 69 66 28 20 53 51 4c 49 54 45 5f  ;..  if( SQLITE_
1ff0: 4f 4b 21 3d 70 2d 3e 78 43 72 65 61 74 65 28 7a  OK!=p->xCreate(z
2000: 41 72 67 20 3f 20 31 20 3a 20 30 2c 20 26 7a 41  Arg ? 1 : 0, &zA
2010: 72 67 2c 20 26 70 54 6f 6b 65 6e 69 7a 65 72 29  rg, &pTokenizer)
2020: 20 29 7b 0a 20 20 20 20 7a 45 72 72 20 3d 20 22   ){.    zErr = "
2030: 65 72 72 6f 72 20 69 6e 20 78 43 72 65 61 74 65  error in xCreate
2040: 28 29 22 3b 0a 20 20 20 20 67 6f 74 6f 20 66 69  ()";.    goto fi
2050: 6e 69 73 68 3b 0a 20 20 7d 0a 20 20 70 54 6f 6b  nish;.  }.  pTok
2060: 65 6e 69 7a 65 72 2d 3e 70 4d 6f 64 75 6c 65 20  enizer->pModule 
2070: 3d 20 70 3b 0a 20 20 69 66 28 20 53 51 4c 49 54  = p;.  if( SQLIT
2080: 45 5f 4f 4b 21 3d 70 2d 3e 78 4f 70 65 6e 28 70  E_OK!=p->xOpen(p
2090: 54 6f 6b 65 6e 69 7a 65 72 2c 20 7a 49 6e 70 75  Tokenizer, zInpu
20a0: 74 2c 20 6e 49 6e 70 75 74 2c 20 26 70 43 73 72  t, nInput, &pCsr
20b0: 29 20 29 7b 0a 20 20 20 20 7a 45 72 72 20 3d 20  ) ){.    zErr = 
20c0: 22 65 72 72 6f 72 20 69 6e 20 78 4f 70 65 6e 28  "error in xOpen(
20d0: 29 22 3b 0a 20 20 20 20 67 6f 74 6f 20 66 69 6e  )";.    goto fin
20e0: 69 73 68 3b 0a 20 20 7d 0a 20 20 70 43 73 72 2d  ish;.  }.  pCsr-
20f0: 3e 70 54 6f 6b 65 6e 69 7a 65 72 20 3d 20 70 54  >pTokenizer = pT
2100: 6f 6b 65 6e 69 7a 65 72 3b 0a 0a 20 20 77 68 69  okenizer;..  whi
2110: 6c 65 28 20 53 51 4c 49 54 45 5f 4f 4b 3d 3d 70  le( SQLITE_OK==p
2120: 2d 3e 78 4e 65 78 74 28 70 43 73 72 2c 20 26 7a  ->xNext(pCsr, &z
2130: 54 6f 6b 65 6e 2c 20 26 6e 54 6f 6b 65 6e 2c 20  Token, &nToken, 
2140: 26 69 53 74 61 72 74 2c 20 26 69 45 6e 64 2c 20  &iStart, &iEnd, 
2150: 26 69 50 6f 73 29 20 29 7b 0a 20 20 20 20 54 63  &iPos) ){.    Tc
2160: 6c 5f 4c 69 73 74 4f 62 6a 41 70 70 65 6e 64 45  l_ListObjAppendE
2170: 6c 65 6d 65 6e 74 28 30 2c 20 70 52 65 74 2c 20  lement(0, pRet, 
2180: 54 63 6c 5f 4e 65 77 49 6e 74 4f 62 6a 28 69 50  Tcl_NewIntObj(iP
2190: 6f 73 29 29 3b 0a 20 20 20 20 54 63 6c 5f 4c 69  os));.    Tcl_Li
21a0: 73 74 4f 62 6a 41 70 70 65 6e 64 45 6c 65 6d 65  stObjAppendEleme
21b0: 6e 74 28 30 2c 20 70 52 65 74 2c 20 54 63 6c 5f  nt(0, pRet, Tcl_
21c0: 4e 65 77 53 74 72 69 6e 67 4f 62 6a 28 7a 54 6f  NewStringObj(zTo
21d0: 6b 65 6e 2c 20 6e 54 6f 6b 65 6e 29 29 3b 0a 20  ken, nToken));. 
21e0: 20 20 20 7a 54 6f 6b 65 6e 20 3d 20 26 7a 49 6e     zToken = &zIn
21f0: 70 75 74 5b 69 53 74 61 72 74 5d 3b 0a 20 20 20  put[iStart];.   
2200: 20 6e 54 6f 6b 65 6e 20 3d 20 69 45 6e 64 2d 69   nToken = iEnd-i
2210: 53 74 61 72 74 3b 0a 20 20 20 20 54 63 6c 5f 4c  Start;.    Tcl_L
2220: 69 73 74 4f 62 6a 41 70 70 65 6e 64 45 6c 65 6d  istObjAppendElem
2230: 65 6e 74 28 30 2c 20 70 52 65 74 2c 20 54 63 6c  ent(0, pRet, Tcl
2240: 5f 4e 65 77 53 74 72 69 6e 67 4f 62 6a 28 7a 54  _NewStringObj(zT
2250: 6f 6b 65 6e 2c 20 6e 54 6f 6b 65 6e 29 29 3b 0a  oken, nToken));.
2260: 20 20 7d 0a 0a 20 20 69 66 28 20 53 51 4c 49 54    }..  if( SQLIT
2270: 45 5f 4f 4b 21 3d 70 2d 3e 78 43 6c 6f 73 65 28  E_OK!=p->xClose(
2280: 70 43 73 72 29 20 29 7b 0a 20 20 20 20 7a 45 72  pCsr) ){.    zEr
2290: 72 20 3d 20 22 65 72 72 6f 72 20 69 6e 20 78 43  r = "error in xC
22a0: 6c 6f 73 65 28 29 22 3b 0a 20 20 20 20 67 6f 74  lose()";.    got
22b0: 6f 20 66 69 6e 69 73 68 3b 0a 20 20 7d 0a 20 20  o finish;.  }.  
22c0: 69 66 28 20 53 51 4c 49 54 45 5f 4f 4b 21 3d 70  if( SQLITE_OK!=p
22d0: 2d 3e 78 44 65 73 74 72 6f 79 28 70 54 6f 6b 65  ->xDestroy(pToke
22e0: 6e 69 7a 65 72 29 20 29 7b 0a 20 20 20 20 7a 45  nizer) ){.    zE
22f0: 72 72 20 3d 20 22 65 72 72 6f 72 20 69 6e 20 78  rr = "error in x
2300: 44 65 73 74 72 6f 79 28 29 22 3b 0a 20 20 20 20  Destroy()";.    
2310: 67 6f 74 6f 20 66 69 6e 69 73 68 3b 0a 20 20 7d  goto finish;.  }
2320: 0a 0a 66 69 6e 69 73 68 3a 0a 20 20 69 66 28 20  ..finish:.  if( 
2330: 7a 45 72 72 20 29 7b 0a 20 20 20 20 73 71 6c 69  zErr ){.    sqli
2340: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
2350: 28 63 6f 6e 74 65 78 74 2c 20 7a 45 72 72 2c 20  (context, zErr, 
2360: 2d 31 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  -1);.  }else{.  
2370: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
2380: 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 54  _text(context, T
2390: 63 6c 5f 47 65 74 53 74 72 69 6e 67 28 70 52 65  cl_GetString(pRe
23a0: 74 29 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 54  t), -1, SQLITE_T
23b0: 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20 7d 0a 20  RANSIENT);.  }. 
23c0: 20 54 63 6c 5f 44 65 63 72 52 65 66 43 6f 75 6e   Tcl_DecrRefCoun
23d0: 74 28 70 52 65 74 29 3b 0a 7d 0a 0a 73 74 61 74  t(pRet);.}..stat
23e0: 69 63 0a 69 6e 74 20 72 65 67 69 73 74 65 72 54  ic.int registerT
23f0: 6f 6b 65 6e 69 7a 65 72 28 0a 20 20 73 71 6c 69  okenizer(.  sqli
2400: 74 65 33 20 2a 64 62 2c 20 0a 20 20 63 68 61 72  te3 *db, .  char
2410: 20 2a 7a 4e 61 6d 65 2c 20 0a 20 20 63 6f 6e 73   *zName, .  cons
2420: 74 20 73 71 6c 69 74 65 33 5f 74 6f 6b 65 6e 69  t sqlite3_tokeni
2430: 7a 65 72 5f 6d 6f 64 75 6c 65 20 2a 70 0a 29 7b  zer_module *p.){
2440: 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 73 71 6c  .  int rc;.  sql
2450: 69 74 65 33 5f 73 74 6d 74 20 2a 70 53 74 6d 74  ite3_stmt *pStmt
2460: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 7a  ;.  const char z
2470: 53 71 6c 5b 5d 20 3d 20 22 53 45 4c 45 43 54 20  Sql[] = "SELECT 
2480: 66 74 73 33 5f 74 6f 6b 65 6e 69 7a 65 72 28 3f  fts3_tokenizer(?
2490: 2c 20 3f 29 22 3b 0a 0a 20 20 72 63 20 3d 20 73  , ?)";..  rc = s
24a0: 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f 76  qlite3_prepare_v
24b0: 32 28 64 62 2c 20 7a 53 71 6c 2c 20 2d 31 2c 20  2(db, zSql, -1, 
24c0: 26 70 53 74 6d 74 2c 20 30 29 3b 0a 20 20 69 66  &pStmt, 0);.  if
24d0: 28 20 72 63 21 3d 53 51 4c 49 54 45 5f 4f 4b 20  ( rc!=SQLITE_OK 
24e0: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 72 63  ){.    return rc
24f0: 3b 0a 20 20 7d 0a 0a 20 20 73 71 6c 69 74 65 33  ;.  }..  sqlite3
2500: 5f 62 69 6e 64 5f 74 65 78 74 28 70 53 74 6d 74  _bind_text(pStmt
2510: 2c 20 31 2c 20 7a 4e 61 6d 65 2c 20 2d 31 2c 20  , 1, zName, -1, 
2520: 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a  SQLITE_STATIC);.
2530: 20 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 62    sqlite3_bind_b
2540: 6c 6f 62 28 70 53 74 6d 74 2c 20 32 2c 20 26 70  lob(pStmt, 2, &p
2550: 2c 20 73 69 7a 65 6f 66 28 70 29 2c 20 53 51 4c  , sizeof(p), SQL
2560: 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 20 20 73  ITE_STATIC);.  s
2570: 71 6c 69 74 65 33 5f 73 74 65 70 28 70 53 74 6d  qlite3_step(pStm
2580: 74 29 3b 0a 0a 20 20 72 65 74 75 72 6e 20 73 71  t);..  return sq
2590: 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 70  lite3_finalize(p
25a0: 53 74 6d 74 29 3b 0a 7d 0a 0a 73 74 61 74 69 63  Stmt);.}..static
25b0: 0a 69 6e 74 20 71 75 65 72 79 54 6f 6b 65 6e 69  .int queryTokeni
25c0: 7a 65 72 28 0a 20 20 73 71 6c 69 74 65 33 20 2a  zer(.  sqlite3 *
25d0: 64 62 2c 20 0a 20 20 63 68 61 72 20 2a 7a 4e 61  db, .  char *zNa
25e0: 6d 65 2c 20 20 0a 20 20 63 6f 6e 73 74 20 73 71  me,  .  const sq
25f0: 6c 69 74 65 33 5f 74 6f 6b 65 6e 69 7a 65 72 5f  lite3_tokenizer_
2600: 6d 6f 64 75 6c 65 20 2a 2a 70 70 0a 29 7b 0a 20  module **pp.){. 
2610: 20 69 6e 74 20 72 63 3b 0a 20 20 73 71 6c 69 74   int rc;.  sqlit
2620: 65 33 5f 73 74 6d 74 20 2a 70 53 74 6d 74 3b 0a  e3_stmt *pStmt;.
2630: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 7a 53 71    const char zSq
2640: 6c 5b 5d 20 3d 20 22 53 45 4c 45 43 54 20 66 74  l[] = "SELECT ft
2650: 73 33 5f 74 6f 6b 65 6e 69 7a 65 72 28 3f 29 22  s3_tokenizer(?)"
2660: 3b 0a 0a 20 20 2a 70 70 20 3d 20 30 3b 0a 20 20  ;..  *pp = 0;.  
2670: 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 70 72 65  rc = sqlite3_pre
2680: 70 61 72 65 5f 76 32 28 64 62 2c 20 7a 53 71 6c  pare_v2(db, zSql
2690: 2c 20 2d 31 2c 20 26 70 53 74 6d 74 2c 20 30 29  , -1, &pStmt, 0)
26a0: 3b 0a 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49  ;.  if( rc!=SQLI
26b0: 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 72 65 74  TE_OK ){.    ret
26c0: 75 72 6e 20 72 63 3b 0a 20 20 7d 0a 0a 20 20 73  urn rc;.  }..  s
26d0: 71 6c 69 74 65 33 5f 62 69 6e 64 5f 74 65 78 74  qlite3_bind_text
26e0: 28 70 53 74 6d 74 2c 20 31 2c 20 7a 4e 61 6d 65  (pStmt, 1, zName
26f0: 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54 41  , -1, SQLITE_STA
2700: 54 49 43 29 3b 0a 20 20 69 66 28 20 53 51 4c 49  TIC);.  if( SQLI
2710: 54 45 5f 52 4f 57 3d 3d 73 71 6c 69 74 65 33 5f  TE_ROW==sqlite3_
2720: 73 74 65 70 28 70 53 74 6d 74 29 20 29 7b 0a 20  step(pStmt) ){. 
2730: 20 20 20 69 66 28 20 73 71 6c 69 74 65 33 5f 63     if( sqlite3_c
2740: 6f 6c 75 6d 6e 5f 74 79 70 65 28 70 53 74 6d 74  olumn_type(pStmt
2750: 2c 20 30 29 3d 3d 53 51 4c 49 54 45 5f 42 4c 4f  , 0)==SQLITE_BLO
2760: 42 20 29 7b 0a 20 20 20 20 20 20 6d 65 6d 63 70  B ){.      memcp
2770: 79 28 28 76 6f 69 64 20 2a 29 70 70 2c 20 73 71  y((void *)pp, sq
2780: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 62 6c 6f  lite3_column_blo
2790: 62 28 70 53 74 6d 74 2c 20 30 29 2c 20 73 69 7a  b(pStmt, 0), siz
27a0: 65 6f 66 28 2a 70 70 29 29 3b 0a 20 20 20 20 7d  eof(*pp));.    }
27b0: 0a 20 20 7d 0a 0a 20 20 72 65 74 75 72 6e 20 73  .  }..  return s
27c0: 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28  qlite3_finalize(
27d0: 70 53 74 6d 74 29 3b 0a 7d 0a 0a 76 6f 69 64 20  pStmt);.}..void 
27e0: 73 71 6c 69 74 65 33 46 74 73 33 53 69 6d 70 6c  sqlite3Fts3Simpl
27f0: 65 54 6f 6b 65 6e 69 7a 65 72 4d 6f 64 75 6c 65  eTokenizerModule
2800: 28 73 71 6c 69 74 65 33 5f 74 6f 6b 65 6e 69 7a  (sqlite3_tokeniz
2810: 65 72 5f 6d 6f 64 75 6c 65 20 63 6f 6e 73 74 2a  er_module const*
2820: 2a 70 70 4d 6f 64 75 6c 65 29 3b 0a 0a 2f 2a 0a  *ppModule);../*.
2830: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
2840: 6e 20 6f 66 20 74 68 65 20 73 63 61 6c 61 72 20  n of the scalar 
2850: 66 75 6e 63 74 69 6f 6e 20 66 74 73 33 5f 74 6f  function fts3_to
2860: 6b 65 6e 69 7a 65 72 5f 69 6e 74 65 72 6e 61 6c  kenizer_internal
2870: 5f 74 65 73 74 28 29 2e 0a 2a 2a 20 54 68 69 73  _test()..** This
2880: 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 75 73 65   function is use
2890: 64 20 66 6f 72 20 74 65 73 74 69 6e 67 20 6f 6e  d for testing on
28a0: 6c 79 2c 20 69 74 20 69 73 20 6e 6f 74 20 69 6e  ly, it is not in
28b0: 63 6c 75 64 65 64 20 69 6e 20 74 68 65 0a 2a 2a  cluded in the.**
28c0: 20 62 75 69 6c 64 20 75 6e 6c 65 73 73 20 53 51   build unless SQ
28d0: 4c 49 54 45 5f 54 45 53 54 20 69 73 20 64 65 66  LITE_TEST is def
28e0: 69 6e 65 64 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20  ined..**.** The 
28f0: 70 75 72 70 6f 73 65 20 6f 66 20 74 68 69 73 20  purpose of this 
2900: 69 73 20 74 6f 20 74 65 73 74 20 74 68 61 74 20  is to test that 
2910: 74 68 65 20 66 74 73 33 5f 74 6f 6b 65 6e 69 7a  the fts3_tokeniz
2920: 65 72 28 29 20 66 75 6e 63 74 69 6f 6e 0a 2a 2a  er() function.**
2930: 20 63 61 6e 20 62 65 20 75 73 65 64 20 61 73 20   can be used as 
2940: 64 65 73 69 67 6e 65 64 20 62 79 20 74 68 65 20  designed by the 
2950: 43 2d 63 6f 64 65 20 69 6e 20 74 68 65 20 71 75  C-code in the qu
2960: 65 72 79 54 6f 6b 65 6e 69 7a 65 72 20 61 6e 64  eryTokenizer and
2970: 0a 2a 2a 20 72 65 67 69 73 74 65 72 54 6f 6b 65  .** registerToke
2980: 6e 69 7a 65 72 28 29 20 66 75 6e 63 74 69 6f 6e  nizer() function
2990: 73 20 61 62 6f 76 65 2e 20 54 68 65 73 65 20 74  s above. These t
29a0: 77 6f 20 66 75 6e 63 74 69 6f 6e 73 20 61 72 65  wo functions are
29b0: 20 72 65 70 65 61 74 65 64 0a 2a 2a 20 69 6e 20   repeated.** in 
29c0: 74 68 65 20 52 45 41 44 4d 45 2e 74 6f 6b 65 6e  the README.token
29d0: 69 7a 65 72 20 66 69 6c 65 20 61 73 20 61 6e 20  izer file as an 
29e0: 65 78 61 6d 70 6c 65 2c 20 73 6f 20 69 74 20 69  example, so it i
29f0: 73 20 69 6d 70 6f 72 74 61 6e 74 20 74 6f 0a 2a  s important to.*
2a00: 2a 20 74 65 73 74 20 74 68 65 6d 2e 0a 2a 2a 0a  * test them..**.
2a10: 2a 2a 20 54 6f 20 72 75 6e 20 74 68 65 20 74 65  ** To run the te
2a20: 73 74 73 2c 20 65 76 61 6c 75 61 74 65 20 74 68  sts, evaluate th
2a30: 65 20 66 74 73 33 5f 74 6f 6b 65 6e 69 7a 65 72  e fts3_tokenizer
2a40: 5f 69 6e 74 65 72 6e 61 6c 5f 74 65 73 74 28 29  _internal_test()
2a50: 20 73 63 61 6c 61 72 0a 2a 2a 20 66 75 6e 63 74   scalar.** funct
2a60: 69 6f 6e 20 77 69 74 68 20 6e 6f 20 61 72 67 75  ion with no argu
2a70: 6d 65 6e 74 73 2e 20 41 6e 20 61 73 73 65 72 74  ments. An assert
2a80: 28 29 20 77 69 6c 6c 20 66 61 69 6c 20 69 66 20  () will fail if 
2a90: 61 20 70 72 6f 62 6c 65 6d 20 69 73 0a 2a 2a 20  a problem is.** 
2aa0: 64 65 74 65 63 74 65 64 2e 20 69 2e 65 2e 3a 0a  detected. i.e.:.
2ab0: 2a 2a 0a 2a 2a 20 20 20 20 20 53 45 4c 45 43 54  **.**     SELECT
2ac0: 20 66 74 73 33 5f 74 6f 6b 65 6e 69 7a 65 72 5f   fts3_tokenizer_
2ad0: 69 6e 74 65 72 6e 61 6c 5f 74 65 73 74 28 29 3b  internal_test();
2ae0: 0a 2a 2a 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  .**.*/.static vo
2af0: 69 64 20 69 6e 74 54 65 73 74 46 75 6e 63 28 0a  id intTestFunc(.
2b00: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78    sqlite3_contex
2b10: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e  t *context,.  in
2b20: 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65  t argc,.  sqlite
2b30: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29  3_value **argv.)
2b40: 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 63 6f  {.  int rc;.  co
2b50: 6e 73 74 20 73 71 6c 69 74 65 33 5f 74 6f 6b 65  nst sqlite3_toke
2b60: 6e 69 7a 65 72 5f 6d 6f 64 75 6c 65 20 2a 70 31  nizer_module *p1
2b70: 3b 0a 20 20 63 6f 6e 73 74 20 73 71 6c 69 74 65  ;.  const sqlite
2b80: 33 5f 74 6f 6b 65 6e 69 7a 65 72 5f 6d 6f 64 75  3_tokenizer_modu
2b90: 6c 65 20 2a 70 32 3b 0a 20 20 73 71 6c 69 74 65  le *p2;.  sqlite
2ba0: 33 20 2a 64 62 20 3d 20 28 73 71 6c 69 74 65 33  3 *db = (sqlite3
2bb0: 20 2a 29 73 71 6c 69 74 65 33 5f 75 73 65 72 5f   *)sqlite3_user_
2bc0: 64 61 74 61 28 63 6f 6e 74 65 78 74 29 3b 0a 0a  data(context);..
2bd0: 20 20 55 4e 55 53 45 44 5f 50 41 52 41 4d 45 54    UNUSED_PARAMET
2be0: 45 52 28 61 72 67 63 29 3b 0a 20 20 55 4e 55 53  ER(argc);.  UNUS
2bf0: 45 44 5f 50 41 52 41 4d 45 54 45 52 28 61 72 67  ED_PARAMETER(arg
2c00: 76 29 3b 0a 0a 20 20 2f 2a 20 54 65 73 74 20 74  v);..  /* Test t
2c10: 68 65 20 71 75 65 72 79 20 66 75 6e 63 74 69 6f  he query functio
2c20: 6e 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33 46 74  n */.  sqlite3Ft
2c30: 73 33 53 69 6d 70 6c 65 54 6f 6b 65 6e 69 7a 65  s3SimpleTokenize
2c40: 72 4d 6f 64 75 6c 65 28 26 70 31 29 3b 0a 20 20  rModule(&p1);.  
2c50: 72 63 20 3d 20 71 75 65 72 79 54 6f 6b 65 6e 69  rc = queryTokeni
2c60: 7a 65 72 28 64 62 2c 20 22 73 69 6d 70 6c 65 22  zer(db, "simple"
2c70: 2c 20 26 70 32 29 3b 0a 20 20 61 73 73 65 72 74  , &p2);.  assert
2c80: 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20  ( rc==SQLITE_OK 
2c90: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 70 31 3d  );.  assert( p1=
2ca0: 3d 70 32 20 29 3b 0a 20 20 72 63 20 3d 20 71 75  =p2 );.  rc = qu
2cb0: 65 72 79 54 6f 6b 65 6e 69 7a 65 72 28 64 62 2c  eryTokenizer(db,
2cc0: 20 22 6e 6f 73 75 63 68 74 6f 6b 65 6e 69 7a 65   "nosuchtokenize
2cd0: 72 22 2c 20 26 70 32 29 3b 0a 20 20 61 73 73 65  r", &p2);.  asse
2ce0: 72 74 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 45  rt( rc==SQLITE_E
2cf0: 52 52 4f 52 20 29 3b 0a 20 20 61 73 73 65 72 74  RROR );.  assert
2d00: 28 20 70 32 3d 3d 30 20 29 3b 0a 20 20 61 73 73  ( p2==0 );.  ass
2d10: 65 72 74 28 20 30 3d 3d 73 74 72 63 6d 70 28 73  ert( 0==strcmp(s
2d20: 71 6c 69 74 65 33 5f 65 72 72 6d 73 67 28 64 62  qlite3_errmsg(db
2d30: 29 2c 20 22 75 6e 6b 6e 6f 77 6e 20 74 6f 6b 65  ), "unknown toke
2d40: 6e 69 7a 65 72 3a 20 6e 6f 73 75 63 68 74 6f 6b  nizer: nosuchtok
2d50: 65 6e 69 7a 65 72 22 29 20 29 3b 0a 0a 20 20 2f  enizer") );..  /
2d60: 2a 20 54 65 73 74 20 74 68 65 20 73 74 6f 72 61  * Test the stora
2d70: 67 65 20 66 75 6e 63 74 69 6f 6e 20 2a 2f 0a 20  ge function */. 
2d80: 20 72 63 20 3d 20 72 65 67 69 73 74 65 72 54 6f   rc = registerTo
2d90: 6b 65 6e 69 7a 65 72 28 64 62 2c 20 22 6e 6f 73  kenizer(db, "nos
2da0: 75 63 68 74 6f 6b 65 6e 69 7a 65 72 22 2c 20 70  uchtokenizer", p
2db0: 31 29 3b 0a 20 20 61 73 73 65 72 74 28 20 72 63  1);.  assert( rc
2dc0: 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 3b 0a 20  ==SQLITE_OK );. 
2dd0: 20 72 63 20 3d 20 71 75 65 72 79 54 6f 6b 65 6e   rc = queryToken
2de0: 69 7a 65 72 28 64 62 2c 20 22 6e 6f 73 75 63 68  izer(db, "nosuch
2df0: 74 6f 6b 65 6e 69 7a 65 72 22 2c 20 26 70 32 29  tokenizer", &p2)
2e00: 3b 0a 20 20 61 73 73 65 72 74 28 20 72 63 3d 3d  ;.  assert( rc==
2e10: 53 51 4c 49 54 45 5f 4f 4b 20 29 3b 0a 20 20 61  SQLITE_OK );.  a
2e20: 73 73 65 72 74 28 20 70 32 3d 3d 70 31 20 29 3b  ssert( p2==p1 );
2e30: 0a 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75  ..  sqlite3_resu
2e40: 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 78 74 2c  lt_text(context,
2e50: 20 22 6f 6b 22 2c 20 2d 31 2c 20 53 51 4c 49 54   "ok", -1, SQLIT
2e60: 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 0a 23 65  E_STATIC);.}..#e
2e70: 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 53 65 74 20  ndif../*.** Set 
2e80: 75 70 20 53 51 4c 20 6f 62 6a 65 63 74 73 20 69  up SQL objects i
2e90: 6e 20 64 61 74 61 62 61 73 65 20 64 62 20 75 73  n database db us
2ea0: 65 64 20 74 6f 20 61 63 63 65 73 73 20 74 68 65  ed to access the
2eb0: 20 63 6f 6e 74 65 6e 74 73 20 6f 66 0a 2a 2a 20   contents of.** 
2ec0: 74 68 65 20 68 61 73 68 20 74 61 62 6c 65 20 70  the hash table p
2ed0: 6f 69 6e 74 65 64 20 74 6f 20 62 79 20 61 72 67  ointed to by arg
2ee0: 75 6d 65 6e 74 20 70 48 61 73 68 2e 20 54 68 65  ument pHash. The
2ef0: 20 68 61 73 68 20 74 61 62 6c 65 20 6d 75 73 74   hash table must
2f00: 0a 2a 2a 20 62 65 65 6e 20 69 6e 69 74 69 61 6c  .** been initial
2f10: 69 73 65 64 20 74 6f 20 75 73 65 20 73 74 72 69  ised to use stri
2f20: 6e 67 20 6b 65 79 73 2c 20 61 6e 64 20 74 6f 20  ng keys, and to 
2f30: 74 61 6b 65 20 61 20 70 72 69 76 61 74 65 20 63  take a private c
2f40: 6f 70 79 20 0a 2a 2a 20 6f 66 20 74 68 65 20 6b  opy .** of the k
2f50: 65 79 20 77 68 65 6e 20 61 20 76 61 6c 75 65 20  ey when a value 
2f60: 69 73 20 69 6e 73 65 72 74 65 64 2e 20 69 2e 65  is inserted. i.e
2f70: 2e 20 62 79 20 61 20 63 61 6c 6c 20 73 69 6d 69  . by a call simi
2f80: 6c 61 72 20 74 6f 3a 0a 2a 2a 0a 2a 2a 20 20 20  lar to:.**.**   
2f90: 20 73 71 6c 69 74 65 33 46 74 73 33 48 61 73 68   sqlite3Fts3Hash
2fa0: 49 6e 69 74 28 70 48 61 73 68 2c 20 46 54 53 33  Init(pHash, FTS3
2fb0: 5f 48 41 53 48 5f 53 54 52 49 4e 47 2c 20 31 29  _HASH_STRING, 1)
2fc0: 3b 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 75 6e  ;.**.** This fun
2fd0: 63 74 69 6f 6e 20 61 64 64 73 20 61 20 73 63 61  ction adds a sca
2fe0: 6c 61 72 20 66 75 6e 63 74 69 6f 6e 20 28 73 65  lar function (se
2ff0: 65 20 68 65 61 64 65 72 20 63 6f 6d 6d 65 6e 74  e header comment
3000: 20 61 62 6f 76 65 0a 2a 2a 20 73 63 61 6c 61 72   above.** scalar
3010: 46 75 6e 63 28 29 20 69 6e 20 74 68 69 73 20 66  Func() in this f
3020: 69 6c 65 20 66 6f 72 20 64 65 74 61 69 6c 73 29  ile for details)
3030: 20 61 6e 64 2c 20 69 66 20 45 4e 41 42 4c 45 5f   and, if ENABLE_
3040: 54 41 42 4c 45 20 69 73 0a 2a 2a 20 64 65 66 69  TABLE is.** defi
3050: 6e 65 64 20 61 74 20 63 6f 6d 70 69 6c 61 74 69  ned at compilati
3060: 6f 6e 20 74 69 6d 65 2c 20 61 20 74 65 6d 70 6f  on time, a tempo
3070: 72 61 72 79 20 76 69 72 74 75 61 6c 20 74 61 62  rary virtual tab
3080: 6c 65 20 28 73 65 65 20 68 65 61 64 65 72 20 0a  le (see header .
3090: 2a 2a 20 63 6f 6d 6d 65 6e 74 20 61 62 6f 76 65  ** comment above
30a0: 20 73 74 72 75 63 74 20 48 61 73 68 54 61 62 6c   struct HashTabl
30b0: 65 56 74 61 62 29 20 74 6f 20 74 68 65 20 64 61  eVtab) to the da
30c0: 74 61 62 61 73 65 20 73 63 68 65 6d 61 2e 20 42  tabase schema. B
30d0: 6f 74 68 20 0a 2a 2a 20 70 72 6f 76 69 64 65 20  oth .** provide 
30e0: 72 65 61 64 2f 77 72 69 74 65 20 61 63 63 65 73  read/write acces
30f0: 73 20 74 6f 20 74 68 65 20 63 6f 6e 74 65 6e 74  s to the content
3100: 73 20 6f 66 20 2a 70 48 61 73 68 2e 0a 2a 2a 0a  s of *pHash..**.
3110: 2a 2a 20 54 68 65 20 74 68 69 72 64 20 61 72 67  ** The third arg
3120: 75 6d 65 6e 74 20 74 6f 20 74 68 69 73 20 66 75  ument to this fu
3130: 6e 63 74 69 6f 6e 2c 20 7a 4e 61 6d 65 2c 20 69  nction, zName, i
3140: 73 20 75 73 65 64 20 61 73 20 74 68 65 20 6e 61  s used as the na
3150: 6d 65 0a 2a 2a 20 6f 66 20 62 6f 74 68 20 74 68  me.** of both th
3160: 65 20 73 63 61 6c 61 72 20 61 6e 64 2c 20 69 66  e scalar and, if
3170: 20 63 72 65 61 74 65 64 2c 20 74 68 65 20 76 69   created, the vi
3180: 72 74 75 61 6c 20 74 61 62 6c 65 2e 0a 2a 2f 0a  rtual table..*/.
3190: 69 6e 74 20 73 71 6c 69 74 65 33 46 74 73 33 49  int sqlite3Fts3I
31a0: 6e 69 74 48 61 73 68 54 61 62 6c 65 28 0a 20 20  nitHashTable(.  
31b0: 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 0a 20 20  sqlite3 *db, .  
31c0: 46 74 73 33 48 61 73 68 20 2a 70 48 61 73 68 2c  Fts3Hash *pHash,
31d0: 20 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a   .  const char *
31e0: 7a 4e 61 6d 65 0a 29 7b 0a 20 20 69 6e 74 20 72  zName.){.  int r
31f0: 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20  c = SQLITE_OK;. 
3200: 20 76 6f 69 64 20 2a 70 20 3d 20 28 76 6f 69 64   void *p = (void
3210: 20 2a 29 70 48 61 73 68 3b 0a 20 20 63 6f 6e 73   *)pHash;.  cons
3220: 74 20 69 6e 74 20 61 6e 79 20 3d 20 53 51 4c 49  t int any = SQLI
3230: 54 45 5f 41 4e 59 3b 0a 0a 23 69 66 64 65 66 20  TE_ANY;..#ifdef 
3240: 53 51 4c 49 54 45 5f 54 45 53 54 0a 20 20 63 68  SQLITE_TEST.  ch
3250: 61 72 20 2a 7a 54 65 73 74 20 3d 20 30 3b 0a 20  ar *zTest = 0;. 
3260: 20 63 68 61 72 20 2a 7a 54 65 73 74 32 20 3d 20   char *zTest2 = 
3270: 30 3b 0a 20 20 76 6f 69 64 20 2a 70 64 62 20 3d  0;.  void *pdb =
3280: 20 28 76 6f 69 64 20 2a 29 64 62 3b 0a 20 20 7a   (void *)db;.  z
3290: 54 65 73 74 20 3d 20 73 71 6c 69 74 65 33 5f 6d  Test = sqlite3_m
32a0: 70 72 69 6e 74 66 28 22 25 73 5f 74 65 73 74 22  printf("%s_test"
32b0: 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7a 54 65 73  , zName);.  zTes
32c0: 74 32 20 3d 20 73 71 6c 69 74 65 33 5f 6d 70 72  t2 = sqlite3_mpr
32d0: 69 6e 74 66 28 22 25 73 5f 69 6e 74 65 72 6e 61  intf("%s_interna
32e0: 6c 5f 74 65 73 74 22 2c 20 7a 4e 61 6d 65 29 3b  l_test", zName);
32f0: 0a 20 20 69 66 28 20 21 7a 54 65 73 74 20 7c 7c  .  if( !zTest ||
3300: 20 21 7a 54 65 73 74 32 20 29 7b 0a 20 20 20 20   !zTest2 ){.    
3310: 72 63 20 3d 20 53 51 4c 49 54 45 5f 4e 4f 4d 45  rc = SQLITE_NOME
3320: 4d 3b 0a 20 20 7d 0a 23 65 6e 64 69 66 0a 0a 20  M;.  }.#endif.. 
3330: 20 69 66 28 20 53 51 4c 49 54 45 5f 4f 4b 3d 3d   if( SQLITE_OK==
3340: 72 63 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 73  rc ){.    rc = s
3350: 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75  qlite3_create_fu
3360: 6e 63 74 69 6f 6e 28 64 62 2c 20 7a 4e 61 6d 65  nction(db, zName
3370: 2c 20 31 2c 20 61 6e 79 2c 20 70 2c 20 73 63 61  , 1, any, p, sca
3380: 6c 61 72 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0a  larFunc, 0, 0);.
3390: 20 20 7d 0a 20 20 69 66 28 20 53 51 4c 49 54 45    }.  if( SQLITE
33a0: 5f 4f 4b 3d 3d 72 63 20 29 7b 0a 20 20 20 20 72  _OK==rc ){.    r
33b0: 63 20 3d 20 73 71 6c 69 74 65 33 5f 63 72 65 61  c = sqlite3_crea
33c0: 74 65 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20  te_function(db, 
33d0: 7a 4e 61 6d 65 2c 20 32 2c 20 61 6e 79 2c 20 70  zName, 2, any, p
33e0: 2c 20 73 63 61 6c 61 72 46 75 6e 63 2c 20 30 2c  , scalarFunc, 0,
33f0: 20 30 29 3b 0a 20 20 7d 0a 23 69 66 64 65 66 20   0);.  }.#ifdef 
3400: 53 51 4c 49 54 45 5f 54 45 53 54 0a 20 20 69 66  SQLITE_TEST.  if
3410: 28 20 53 51 4c 49 54 45 5f 4f 4b 3d 3d 72 63 20  ( SQLITE_OK==rc 
3420: 29 7b 0a 20 20 20 20 72 63 20 3d 20 73 71 6c 69  ){.    rc = sqli
3430: 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74  te3_create_funct
3440: 69 6f 6e 28 64 62 2c 20 7a 54 65 73 74 2c 20 32  ion(db, zTest, 2
3450: 2c 20 61 6e 79 2c 20 70 2c 20 74 65 73 74 46 75  , any, p, testFu
3460: 6e 63 2c 20 30 2c 20 30 29 3b 0a 20 20 7d 0a 20  nc, 0, 0);.  }. 
3470: 20 69 66 28 20 53 51 4c 49 54 45 5f 4f 4b 3d 3d   if( SQLITE_OK==
3480: 72 63 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 73  rc ){.    rc = s
3490: 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75  qlite3_create_fu
34a0: 6e 63 74 69 6f 6e 28 64 62 2c 20 7a 54 65 73 74  nction(db, zTest
34b0: 2c 20 33 2c 20 61 6e 79 2c 20 70 2c 20 74 65 73  , 3, any, p, tes
34c0: 74 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0a 20 20  tFunc, 0, 0);.  
34d0: 7d 0a 20 20 69 66 28 20 53 51 4c 49 54 45 5f 4f  }.  if( SQLITE_O
34e0: 4b 3d 3d 72 63 20 29 7b 0a 20 20 20 20 72 63 20  K==rc ){.    rc 
34f0: 3d 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 65  = sqlite3_create
3500: 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20 7a 54  _function(db, zT
3510: 65 73 74 32 2c 20 30 2c 20 61 6e 79 2c 20 70 64  est2, 0, any, pd
3520: 62 2c 20 69 6e 74 54 65 73 74 46 75 6e 63 2c 20  b, intTestFunc, 
3530: 30 2c 20 30 29 3b 0a 20 20 7d 0a 23 65 6e 64 69  0, 0);.  }.#endi
3540: 66 0a 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45  f..#ifdef SQLITE
3550: 5f 54 45 53 54 0a 20 20 73 71 6c 69 74 65 33 5f  _TEST.  sqlite3_
3560: 66 72 65 65 28 7a 54 65 73 74 29 3b 0a 20 20 73  free(zTest);.  s
3570: 71 6c 69 74 65 33 5f 66 72 65 65 28 7a 54 65 73  qlite3_free(zTes
3580: 74 32 29 3b 0a 23 65 6e 64 69 66 0a 0a 20 20 72  t2);.#endif..  r
3590: 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 23 65 6e  eturn rc;.}..#en
35a0: 64 69 66 20 2f 2a 20 21 64 65 66 69 6e 65 64 28  dif /* !defined(
35b0: 53 51 4c 49 54 45 5f 43 4f 52 45 29 20 7c 7c 20  SQLITE_CORE) || 
35c0: 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 45  defined(SQLITE_E
35d0: 4e 41 42 4c 45 5f 46 54 53 33 29 20 2a 2f 0a     NABLE_FTS3) */.