/ Hex Artifact Content
Login

Artifact ed34c716a11cc2009a35210e84ad5f9c102362ca:


0000: 23 20 32 30 31 31 20 4d 61 79 20 30 34 0a 23 0a  # 2011 May 04.#.
0010: 23 20 54 68 65 20 61 75 74 68 6f 72 20 64 69 73  # The author dis
0020: 63 6c 61 69 6d 73 20 63 6f 70 79 72 69 67 68 74  claims copyright
0030: 20 74 6f 20 74 68 69 73 20 73 6f 75 72 63 65 20   to this source 
0040: 63 6f 64 65 2e 20 20 49 6e 20 70 6c 61 63 65 20  code.  In place 
0050: 6f 66 0a 23 20 61 20 6c 65 67 61 6c 20 6e 6f 74  of.# a legal not
0060: 69 63 65 2c 20 68 65 72 65 20 69 73 20 61 20 62  ice, here is a b
0070: 6c 65 73 73 69 6e 67 3a 0a 23 0a 23 20 20 20 20  lessing:.#.#    
0080: 4d 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20  May you do good 
0090: 61 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 23 20  and not evil..# 
00a0: 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20     May you find 
00b0: 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20  forgiveness for 
00c0: 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72  yourself and for
00d0: 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 23 20 20  give others..#  
00e0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20    May you share 
00f0: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61  freely, never ta
0100: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79  king more than y
0110: 6f 75 20 67 69 76 65 2e 0a 23 0a 23 2a 2a 2a 2a  ou give..#.#****
0120: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
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 0a 23 20 54 68 69 73 20 66 69 6c  *****.# This fil
0170: 65 20 69 6d 70 6c 65 6d 65 6e 74 73 20 72 65 67  e implements reg
0180: 72 65 73 73 69 6f 6e 20 74 65 73 74 73 20 66 6f  ression tests fo
0190: 72 20 53 51 4c 69 74 65 20 6c 69 62 72 61 72 79  r SQLite library
01a0: 2e 20 20 54 68 65 0a 23 20 66 6f 63 75 73 20 6f  .  The.# focus o
01b0: 66 20 74 68 69 73 20 73 63 72 69 70 74 20 69 73  f this script is
01c0: 20 74 65 73 74 69 6e 67 20 74 68 65 20 46 54 53   testing the FTS
01d0: 33 20 6d 6f 64 75 6c 65 2e 0a 23 0a 0a 73 65 74  3 module..#..set
01e0: 20 74 65 73 74 64 69 72 20 5b 66 69 6c 65 20 64   testdir [file d
01f0: 69 72 6e 61 6d 65 20 24 61 72 67 76 30 5d 0a 73  irname $argv0].s
0200: 6f 75 72 63 65 20 24 74 65 73 74 64 69 72 2f 74  ource $testdir/t
0210: 65 73 74 65 72 2e 74 63 6c 0a 0a 23 20 49 66 20  ester.tcl..# If 
0220: 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f 46 54  SQLITE_ENABLE_FT
0230: 53 33 20 69 73 20 64 65 66 69 6e 65 64 2c 20 6f  S3 is defined, o
0240: 6d 69 74 20 74 68 69 73 20 66 69 6c 65 2e 0a 69  mit this file..i
0250: 66 63 61 70 61 62 6c 65 20 21 66 74 73 33 20 7b  fcapable !fts3 {
0260: 0a 20 20 66 69 6e 69 73 68 5f 74 65 73 74 0a 20  .  finish_test. 
0270: 20 72 65 74 75 72 6e 0a 7d 0a 0a 0a 70 72 6f 63   return.}...proc
0280: 20 62 75 69 6c 64 5f 64 61 74 61 62 61 73 65 20   build_database 
0290: 7b 6e 52 6f 77 20 70 61 72 61 6d 7d 20 7b 0a 20  {nRow param} {. 
02a0: 20 64 62 20 63 6c 6f 73 65 0a 20 20 66 6f 72 63   db close.  forc
02b0: 65 64 65 6c 65 74 65 20 74 65 73 74 2e 64 62 0a  edelete test.db.
02c0: 20 20 73 71 6c 69 74 65 33 20 64 62 20 74 65 73    sqlite3 db tes
02d0: 74 2e 64 62 0a 0a 20 20 73 65 74 20 76 6f 63 61  t.db..  set voca
02e0: 62 20 5b 6c 69 73 74 20 20 20 20 61 61 20 61 62  b [list    aa ab
02f0: 20 61 63 20 20 20 62 61 20 62 62 20 62 63 20 20   ac   ba bb bc  
0300: 20 20 63 61 20 63 62 20 63 63 20 20 20 64 61 5d    ca cb cc   da]
0310: 0a 20 20 65 78 70 72 20 73 72 61 6e 64 28 30 29  .  expr srand(0)
0320: 0a 0a 20 20 65 78 65 63 73 71 6c 20 22 43 52 45  ..  execsql "CRE
0330: 41 54 45 20 56 49 52 54 55 41 4c 20 54 41 42 4c  ATE VIRTUAL TABL
0340: 45 20 74 31 20 55 53 49 4e 47 20 66 74 73 34 28  E t1 USING fts4(
0350: 24 70 61 72 61 6d 29 22 0a 20 20 66 6f 72 20 7b  $param)".  for {
0360: 73 65 74 20 69 20 30 7d 20 7b 24 69 20 3c 20 24  set i 0} {$i < $
0370: 6e 52 6f 77 7d 20 7b 69 6e 63 72 20 69 7d 20 7b  nRow} {incr i} {
0380: 0a 20 20 20 20 73 65 74 20 76 20 5b 65 78 70 72  .    set v [expr
0390: 20 69 6e 74 28 72 61 6e 64 28 29 2a 31 30 30 30   int(rand()*1000
03a0: 30 30 30 29 5d 0a 20 20 20 20 73 65 74 20 64 6f  000)].    set do
03b0: 63 20 5b 6c 69 73 74 5d 0a 20 20 20 20 66 6f 72  c [list].    for
03c0: 20 7b 73 65 74 20 64 69 76 20 31 7d 20 7b 24 64   {set div 1} {$d
03d0: 69 76 20 3c 20 31 30 30 30 30 30 30 7d 20 7b 73  iv < 1000000} {s
03e0: 65 74 20 64 69 76 20 5b 65 78 70 72 20 24 64 69  et div [expr $di
03f0: 76 2a 31 30 5d 7d 20 7b 0a 20 20 20 20 20 20 6c  v*10]} {.      l
0400: 61 70 70 65 6e 64 20 64 6f 63 20 5b 6c 69 6e 64  append doc [lind
0410: 65 78 20 24 76 6f 63 61 62 20 5b 65 78 70 72 20  ex $vocab [expr 
0420: 28 24 76 2f 24 64 69 76 29 20 25 20 31 30 5d 5d  ($v/$div) % 10]]
0430: 0a 20 20 20 20 7d 0a 20 20 20 20 65 78 65 63 73  .    }.    execs
0440: 71 6c 20 7b 20 49 4e 53 45 52 54 20 49 4e 54 4f  ql { INSERT INTO
0450: 20 74 31 20 56 41 4c 55 45 53 28 24 64 6f 63 29   t1 VALUES($doc)
0460: 20 7d 0a 20 20 7d 0a 7d 0a 0a 73 65 74 20 74 65   }.  }.}..set te
0470: 73 74 70 72 65 66 69 78 20 66 74 73 33 73 6f 72  stprefix fts3sor
0480: 74 0a 0a 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70  t..unset -nocomp
0490: 6c 61 69 6e 20 43 4f 4e 54 52 4f 4c 0a 66 6f 72  lain CONTROL.for
04a0: 65 61 63 68 20 7b 74 20 70 61 72 61 6d 7d 20 7b  each {t param} {
04b0: 0a 20 20 31 20 20 20 20 20 22 22 0a 20 20 32 20  .  1     "".  2 
04c0: 20 20 20 20 22 6f 72 64 65 72 3d 61 73 63 22 0a      "order=asc".
04d0: 20 20 33 20 20 20 20 20 22 6f 72 64 65 72 3d 64    3     "order=d
04e0: 65 73 63 22 0a 7d 20 7b 0a 0a 20 20 73 65 74 20  esc".} {..  set 
04f0: 74 65 73 74 70 72 65 66 69 78 20 66 74 73 33 73  testprefix fts3s
0500: 6f 72 74 2d 31 2e 24 74 0a 0a 20 20 73 65 74 20  ort-1.$t..  set 
0510: 6e 52 6f 77 20 31 30 30 30 0a 20 20 64 6f 5f 74  nRow 1000.  do_t
0520: 65 73 74 20 31 2e 30 20 7b 0a 20 20 20 20 62 75  est 1.0 {.    bu
0530: 69 6c 64 5f 64 61 74 61 62 61 73 65 20 24 6e 52  ild_database $nR
0540: 6f 77 20 24 70 61 72 61 6d 0a 20 20 20 20 65 78  ow $param.    ex
0550: 65 63 73 71 6c 20 7b 20 53 45 4c 45 43 54 20 63  ecsql { SELECT c
0560: 6f 75 6e 74 28 2a 29 20 46 52 4f 4d 20 74 31 20  ount(*) FROM t1 
0570: 7d 0a 20 20 7d 20 24 6e 52 6f 77 0a 20 20 0a 20  }.  } $nRow.  . 
0580: 20 66 6f 72 65 61 63 68 20 7b 74 6e 20 71 75 65   foreach {tn que
0590: 72 79 7d 20 7b 0a 20 20 31 20 20 20 22 53 45 4c  ry} {.  1   "SEL
05a0: 45 43 54 20 64 6f 63 69 64 2c 20 2a 20 46 52 4f  ECT docid, * FRO
05b0: 4d 20 74 31 22 0a 20 20 32 20 20 20 22 53 45 4c  M t1".  2   "SEL
05c0: 45 43 54 20 64 6f 63 69 64 2c 20 2a 20 46 52 4f  ECT docid, * FRO
05d0: 4d 20 74 31 20 57 48 45 52 45 20 74 31 20 4d 41  M t1 WHERE t1 MA
05e0: 54 43 48 20 27 61 61 27 22 0a 20 20 33 20 20 20  TCH 'aa'".  3   
05f0: 22 53 45 4c 45 43 54 20 64 6f 63 69 64 2c 20 2a  "SELECT docid, *
0600: 20 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20 74   FROM t1 WHERE t
0610: 31 20 4d 41 54 43 48 20 27 61 2a 27 22 0a 20 20  1 MATCH 'a*'".  
0620: 34 20 20 20 22 53 45 4c 45 43 54 20 64 6f 63 69  4   "SELECT doci
0630: 64 2c 20 71 75 6f 74 65 28 6d 61 74 63 68 69 6e  d, quote(matchin
0640: 66 6f 28 74 31 29 29 20 46 52 4f 4d 20 74 31 20  fo(t1)) FROM t1 
0650: 57 48 45 52 45 20 74 31 20 4d 41 54 43 48 20 27  WHERE t1 MATCH '
0660: 61 2a 27 22 0a 20 20 35 20 20 20 22 53 45 4c 45  a*'".  5   "SELE
0670: 43 54 20 64 6f 63 69 64 2c 20 71 75 6f 74 65 28  CT docid, quote(
0680: 6d 61 74 63 68 69 6e 66 6f 28 74 31 2c 27 70 63  matchinfo(t1,'pc
0690: 6e 78 61 6c 73 27 29 29 20 46 52 4f 4d 20 74 31  nxals')) FROM t1
06a0: 20 57 48 45 52 45 20 74 31 20 4d 41 54 43 48 20   WHERE t1 MATCH 
06b0: 27 62 2a 27 22 0a 20 20 36 20 20 20 22 53 45 4c  'b*'".  6   "SEL
06c0: 45 43 54 20 64 6f 63 69 64 2c 20 2a 20 46 52 4f  ECT docid, * FRO
06d0: 4d 20 74 31 20 57 48 45 52 45 20 74 31 20 4d 41  M t1 WHERE t1 MA
06e0: 54 43 48 20 27 61 2a 20 62 2a 20 63 2a 27 22 0a  TCH 'a* b* c*'".
06f0: 20 20 37 20 20 20 22 53 45 4c 45 43 54 20 64 6f    7   "SELECT do
0700: 63 69 64 2c 20 2a 20 46 52 4f 4d 20 74 31 20 57  cid, * FROM t1 W
0710: 48 45 52 45 20 74 31 20 4d 41 54 43 48 20 27 61  HERE t1 MATCH 'a
0720: 61 20 4f 52 20 64 61 27 22 0a 20 20 38 20 20 20  a OR da'".  8   
0730: 22 53 45 4c 45 43 54 20 64 6f 63 69 64 2c 20 2a  "SELECT docid, *
0740: 20 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20 74   FROM t1 WHERE t
0750: 31 20 4d 41 54 43 48 20 27 6e 6f 73 75 63 68 74  1 MATCH 'nosucht
0760: 6f 6b 65 6e 27 22 0a 20 20 39 20 20 20 22 53 45  oken'".  9   "SE
0770: 4c 45 43 54 20 64 6f 63 69 64 2c 20 73 6e 69 70  LECT docid, snip
0780: 70 65 74 28 74 31 29 20 46 52 4f 4d 20 74 31 20  pet(t1) FROM t1 
0790: 57 48 45 52 45 20 74 31 20 4d 41 54 43 48 20 27  WHERE t1 MATCH '
07a0: 61 61 20 4f 52 20 64 61 27 22 0a 20 20 31 30 20  aa OR da'".  10 
07b0: 20 22 53 45 4c 45 43 54 20 64 6f 63 69 64 2c 20   "SELECT docid, 
07c0: 73 6e 69 70 70 65 74 28 74 31 29 20 46 52 4f 4d  snippet(t1) FROM
07d0: 20 74 31 20 57 48 45 52 45 20 74 31 20 4d 41 54   t1 WHERE t1 MAT
07e0: 43 48 20 27 61 61 20 4f 52 20 6e 6f 73 75 63 68  CH 'aa OR nosuch
07f0: 74 6f 6b 65 6e 27 22 0a 20 20 31 31 20 20 22 53  token'".  11  "S
0800: 45 4c 45 43 54 20 64 6f 63 69 64 2c 20 73 6e 69  ELECT docid, sni
0810: 70 70 65 74 28 74 31 29 20 46 52 4f 4d 20 74 31  ppet(t1) FROM t1
0820: 20 57 48 45 52 45 20 74 31 20 4d 41 54 43 48 20   WHERE t1 MATCH 
0830: 27 61 61 20 4e 45 41 52 20 62 62 27 22 0a 20 20  'aa NEAR bb'".  
0840: 31 32 20 20 22 53 45 4c 45 43 54 20 64 6f 63 69  12  "SELECT doci
0850: 64 2c 20 73 6e 69 70 70 65 74 28 74 31 29 20 46  d, snippet(t1) F
0860: 52 4f 4d 20 74 31 20 57 48 45 52 45 20 74 31 20  ROM t1 WHERE t1 
0870: 4d 41 54 43 48 20 27 5c 22 61 61 20 62 62 5c 22  MATCH '\"aa bb\"
0880: 27 22 0a 20 20 31 33 20 20 22 53 45 4c 45 43 54  '".  13  "SELECT
0890: 20 64 6f 63 69 64 2c 20 63 6f 6e 74 65 6e 74 20   docid, content 
08a0: 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20 74 31  FROM t1 WHERE t1
08b0: 20 4d 41 54 43 48 20 27 61 61 20 4e 45 41 52 2f   MATCH 'aa NEAR/
08c0: 32 20 62 62 20 4e 45 41 52 2f 33 20 63 63 27 22  2 bb NEAR/3 cc'"
08d0: 0a 20 20 31 34 20 20 22 53 45 4c 45 43 54 20 64  .  14  "SELECT d
08e0: 6f 63 69 64 2c 20 63 6f 6e 74 65 6e 74 20 46 52  ocid, content FR
08f0: 4f 4d 20 74 31 20 57 48 45 52 45 20 74 31 20 4d  OM t1 WHERE t1 M
0900: 41 54 43 48 20 27 5c 22 61 61 20 62 62 20 63 63  ATCH '\"aa bb cc
0910: 5c 22 27 22 0a 20 20 7d 20 7b 0a 20 20 0a 20 20  \"'".  } {.  .  
0920: 20 20 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c    unset -nocompl
0930: 61 69 6e 20 41 20 42 20 43 20 44 0a 20 20 20 20  ain A B C D.    
0940: 73 65 74 20 41 5f 6c 69 73 74 20 5b 6c 69 73 74  set A_list [list
0950: 5d 0a 20 20 20 20 73 65 74 20 42 5f 6c 69 73 74  ].    set B_list
0960: 20 5b 6c 69 73 74 5d 0a 20 20 20 20 73 65 74 20   [list].    set 
0970: 43 5f 6c 69 73 74 20 5b 6c 69 73 74 5d 0a 20 20  C_list [list].  
0980: 20 20 73 65 74 20 44 5f 6c 69 73 74 20 5b 6c 69    set D_list [li
0990: 73 74 5d 0a 20 20 0a 20 20 20 20 75 6e 73 65 74  st].  .    unset
09a0: 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e 20 58 0a 20   -nocomplain X. 
09b0: 20 20 20 64 62 20 65 76 61 6c 20 22 24 71 75 65     db eval "$que
09c0: 72 79 20 4f 52 44 45 52 20 42 59 20 72 6f 77 69  ry ORDER BY rowi
09d0: 64 20 41 53 43 22 20 20 58 20 20 7b 20 0a 20 20  d ASC"  X  { .  
09e0: 20 20 20 20 73 65 74 20 41 28 24 58 28 64 6f 63      set A($X(doc
09f0: 69 64 29 29 20 5b 61 72 72 61 79 20 67 65 74 20  id)) [array get 
0a00: 58 5d 20 0a 20 20 20 20 20 20 6c 61 70 70 65 6e  X] .      lappen
0a10: 64 20 41 5f 6c 69 73 74 20 24 58 28 64 6f 63 69  d A_list $X(doci
0a20: 64 29 0a 20 20 20 20 7d 0a 20 20 20 20 75 6e 73  d).    }.    uns
0a30: 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e 20 58  et -nocomplain X
0a40: 0a 20 20 20 20 64 62 20 65 76 61 6c 20 22 24 71  .    db eval "$q
0a50: 75 65 72 79 20 4f 52 44 45 52 20 42 59 20 72 6f  uery ORDER BY ro
0a60: 77 69 64 20 44 45 53 43 22 20 58 20 20 7b 20 0a  wid DESC" X  { .
0a70: 20 20 20 20 20 20 73 65 74 20 42 28 24 58 28 64        set B($X(d
0a80: 6f 63 69 64 29 29 20 5b 61 72 72 61 79 20 67 65  ocid)) [array ge
0a90: 74 20 58 5d 20 0a 20 20 20 20 20 20 6c 61 70 70  t X] .      lapp
0aa0: 65 6e 64 20 42 5f 6c 69 73 74 20 24 58 28 64 6f  end B_list $X(do
0ab0: 63 69 64 29 0a 20 20 20 20 7d 0a 20 20 20 20 75  cid).    }.    u
0ac0: 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e  nset -nocomplain
0ad0: 20 58 0a 20 20 20 20 64 62 20 65 76 61 6c 20 22   X.    db eval "
0ae0: 24 71 75 65 72 79 20 4f 52 44 45 52 20 42 59 20  $query ORDER BY 
0af0: 64 6f 63 69 64 20 41 53 43 22 20 20 58 20 20 7b  docid ASC"  X  {
0b00: 20 0a 20 20 20 20 20 20 73 65 74 20 43 28 24 58   .      set C($X
0b10: 28 64 6f 63 69 64 29 29 20 5b 61 72 72 61 79 20  (docid)) [array 
0b20: 67 65 74 20 58 5d 20 0a 20 20 20 20 20 20 6c 61  get X] .      la
0b30: 70 70 65 6e 64 20 43 5f 6c 69 73 74 20 24 58 28  ppend C_list $X(
0b40: 64 6f 63 69 64 29 0a 20 20 20 20 7d 0a 20 20 20  docid).    }.   
0b50: 20 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61   unset -nocompla
0b60: 69 6e 20 58 0a 20 20 20 20 64 62 20 65 76 61 6c  in X.    db eval
0b70: 20 22 24 71 75 65 72 79 20 4f 52 44 45 52 20 42   "$query ORDER B
0b80: 59 20 64 6f 63 69 64 20 44 45 53 43 22 20 58 20  Y docid DESC" X 
0b90: 20 7b 20 0a 20 20 20 20 20 20 73 65 74 20 44 28   { .      set D(
0ba0: 24 58 28 64 6f 63 69 64 29 29 20 5b 61 72 72 61  $X(docid)) [arra
0bb0: 79 20 67 65 74 20 58 5d 20 0a 20 20 20 20 20 20  y get X] .      
0bc0: 6c 61 70 70 65 6e 64 20 44 5f 6c 69 73 74 20 24  lappend D_list $
0bd0: 58 28 64 6f 63 69 64 29 0a 20 20 20 20 7d 0a 20  X(docid).    }. 
0be0: 20 0a 20 20 20 20 64 6f 5f 74 65 73 74 20 24 74   .    do_test $t
0bf0: 6e 2e 31 20 7b 20 73 65 74 20 41 5f 6c 69 73 74  n.1 { set A_list
0c00: 20 7d 20 5b 6c 73 6f 72 74 20 2d 69 6e 74 65 67   } [lsort -integ
0c10: 65 72 20 2d 69 6e 63 72 65 61 73 69 6e 67 20 24  er -increasing $
0c20: 41 5f 6c 69 73 74 5d 0a 20 20 20 20 64 6f 5f 74  A_list].    do_t
0c30: 65 73 74 20 24 74 6e 2e 32 20 7b 20 73 65 74 20  est $tn.2 { set 
0c40: 42 5f 6c 69 73 74 20 7d 20 5b 6c 73 6f 72 74 20  B_list } [lsort 
0c50: 2d 69 6e 74 65 67 65 72 20 2d 64 65 63 72 65 61  -integer -decrea
0c60: 73 69 6e 67 20 24 42 5f 6c 69 73 74 5d 0a 20 20  sing $B_list].  
0c70: 20 20 64 6f 5f 74 65 73 74 20 24 74 6e 2e 33 20    do_test $tn.3 
0c80: 7b 20 73 65 74 20 43 5f 6c 69 73 74 20 7d 20 5b  { set C_list } [
0c90: 6c 73 6f 72 74 20 2d 69 6e 74 65 67 65 72 20 2d  lsort -integer -
0ca0: 69 6e 63 72 65 61 73 69 6e 67 20 24 43 5f 6c 69  increasing $C_li
0cb0: 73 74 5d 0a 20 20 20 20 64 6f 5f 74 65 73 74 20  st].    do_test 
0cc0: 24 74 6e 2e 34 20 7b 20 73 65 74 20 44 5f 6c 69  $tn.4 { set D_li
0cd0: 73 74 20 7d 20 5b 6c 73 6f 72 74 20 2d 69 6e 74  st } [lsort -int
0ce0: 65 67 65 72 20 2d 64 65 63 72 65 61 73 69 6e 67  eger -decreasing
0cf0: 20 24 44 5f 6c 69 73 74 5d 0a 20 20 0a 20 20 20   $D_list].  .   
0d00: 20 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61   unset -nocompla
0d10: 69 6e 20 44 41 54 41 0a 20 20 20 20 75 6e 73 65  in DATA.    unse
0d20: 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e 20 58 0a  t -nocomplain X.
0d30: 20 20 20 20 64 62 20 65 76 61 6c 20 22 24 71 75      db eval "$qu
0d40: 65 72 79 22 20 58 20 20 7b 20 0a 20 20 20 20 20  ery" X  { .     
0d50: 20 73 65 74 20 44 41 54 41 28 24 58 28 64 6f 63   set DATA($X(doc
0d60: 69 64 29 29 20 5b 61 72 72 61 79 20 67 65 74 20  id)) [array get 
0d70: 58 5d 20 0a 20 20 20 20 7d 0a 20 20 0a 20 20 20  X] .    }.  .   
0d80: 20 64 6f 5f 74 65 73 74 20 24 74 6e 2e 35 20 7b   do_test $tn.5 {
0d90: 20 6c 73 6f 72 74 20 5b 61 72 72 61 79 20 67 65   lsort [array ge
0da0: 74 20 41 5d 20 7d 20 5b 6c 73 6f 72 74 20 5b 61  t A] } [lsort [a
0db0: 72 72 61 79 20 67 65 74 20 44 41 54 41 5d 5d 0a  rray get DATA]].
0dc0: 20 20 20 20 64 6f 5f 74 65 73 74 20 24 74 6e 2e      do_test $tn.
0dd0: 36 20 7b 20 6c 73 6f 72 74 20 5b 61 72 72 61 79  6 { lsort [array
0de0: 20 67 65 74 20 42 5d 20 7d 20 5b 6c 73 6f 72 74   get B] } [lsort
0df0: 20 5b 61 72 72 61 79 20 67 65 74 20 44 41 54 41   [array get DATA
0e00: 5d 5d 0a 20 20 20 20 64 6f 5f 74 65 73 74 20 24  ]].    do_test $
0e10: 74 6e 2e 37 20 7b 20 6c 73 6f 72 74 20 5b 61 72  tn.7 { lsort [ar
0e20: 72 61 79 20 67 65 74 20 43 5d 20 7d 20 5b 6c 73  ray get C] } [ls
0e30: 6f 72 74 20 5b 61 72 72 61 79 20 67 65 74 20 44  ort [array get D
0e40: 41 54 41 5d 5d 0a 20 20 20 20 64 6f 5f 74 65 73  ATA]].    do_tes
0e50: 74 20 24 74 6e 2e 38 20 7b 20 6c 73 6f 72 74 20  t $tn.8 { lsort 
0e60: 5b 61 72 72 61 79 20 67 65 74 20 44 5d 20 7d 20  [array get D] } 
0e70: 5b 6c 73 6f 72 74 20 5b 61 72 72 61 79 20 67 65  [lsort [array ge
0e80: 74 20 44 41 54 41 5d 5d 0a 0a 20 20 20 20 69 66  t DATA]]..    if
0e90: 20 7b 5b 69 6e 66 6f 20 65 78 69 73 74 73 20 43   {[info exists C
0ea0: 4f 4e 54 52 4f 4c 28 24 74 6e 29 5d 7d 20 7b 0a  ONTROL($tn)]} {.
0eb0: 20 20 20 20 20 20 64 6f 5f 74 65 73 74 20 24 74        do_test $t
0ec0: 6e 2e 39 20 7b 20 73 65 74 20 43 4f 4e 54 52 4f  n.9 { set CONTRO
0ed0: 4c 28 24 74 6e 29 20 7d 20 5b 6c 73 6f 72 74 20  L($tn) } [lsort 
0ee0: 5b 61 72 72 61 79 20 67 65 74 20 44 41 54 41 5d  [array get DATA]
0ef0: 5d 0a 20 20 20 20 7d 20 65 6c 73 65 20 7b 0a 20  ].    } else {. 
0f00: 20 20 20 20 20 73 65 74 20 43 4f 4e 54 52 4f 4c       set CONTROL
0f10: 28 24 74 6e 29 20 5b 6c 73 6f 72 74 20 5b 61 72  ($tn) [lsort [ar
0f20: 72 61 79 20 67 65 74 20 44 41 54 41 5d 5d 0a 20  ray get DATA]]. 
0f30: 20 20 20 7d 0a 20 20 7d 0a 7d 0a 75 6e 73 65 74     }.  }.}.unset
0f40: 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e 20 43 4f 4e   -nocomplain CON
0f50: 54 52 4f 4c 0a 0a 73 65 74 20 74 65 73 74 70 72  TROL..set testpr
0f60: 65 66 69 78 20 66 74 73 33 73 6f 72 74 0a 0a 23  efix fts3sort..#
0f70: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0f80: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0f90: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0fa0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0fb0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 23 20 54 65 73 74  ---------.# Test
0fc0: 73 20 66 6f 72 20 70 61 72 73 69 6e 67 20 74 68  s for parsing th
0fd0: 65 20 22 6f 72 64 65 72 3d 61 73 63 22 20 61 6e  e "order=asc" an
0fe0: 64 20 22 6f 72 64 65 72 3d 64 65 73 63 22 20 64  d "order=desc" d
0ff0: 69 72 65 63 74 69 76 65 73 2e 0a 23 0a 66 6f 72  irectives..#.for
1000: 65 61 63 68 20 7b 74 6e 20 70 61 72 61 6d 20 72  each {tn param r
1010: 65 73 7d 20 7b 0a 20 20 31 20 22 6f 72 64 65 72  es} {.  1 "order
1020: 3d 61 73 63 22 20 20 20 20 20 20 20 20 20 20 20  =asc"           
1030: 20 20 7b 30 20 7b 7d 7d 0a 20 20 32 20 22 6f 72    {0 {}}.  2 "or
1040: 64 65 72 3d 64 65 73 63 22 20 20 20 20 20 20 20  der=desc"       
1050: 20 20 20 20 20 7b 30 20 7b 7d 7d 0a 20 20 33 20       {0 {}}.  3 
1060: 22 6f 72 64 65 72 3d 64 65 63 22 20 20 20 20 20  "order=dec"     
1070: 20 20 20 20 20 20 20 20 7b 31 20 7b 75 6e 72 65          {1 {unre
1080: 63 6f 67 6e 69 7a 65 64 20 6f 72 64 65 72 3a 20  cognized order: 
1090: 64 65 63 7d 7d 0a 20 20 34 20 22 6f 72 64 65 72  dec}}.  4 "order
10a0: 3d 78 78 78 2c 20 6f 72 64 65 72 3d 61 73 63 22  =xxx, order=asc"
10b0: 20 20 7b 31 20 7b 75 6e 72 65 63 6f 67 6e 69 7a    {1 {unrecogniz
10c0: 65 64 20 6f 72 64 65 72 3a 20 78 78 78 7d 7d 0a  ed order: xxx}}.
10d0: 20 20 35 20 22 6f 72 64 65 72 3d 64 65 73 63 2c    5 "order=desc,
10e0: 20 6f 72 64 65 72 3d 61 73 63 22 20 7b 30 20 7b   order=asc" {0 {
10f0: 7d 7d 0a 20 20 36 20 22 6f 72 64 65 72 3d 78 78  }}.  6 "order=xx
1100: 78 78 2c 20 6f 72 64 65 72 3d 61 73 63 22 20 7b  xx, order=asc" {
1110: 31 20 7b 75 6e 72 65 63 6f 67 6e 69 7a 65 64 20  1 {unrecognized 
1120: 6f 72 64 65 72 3a 20 78 78 78 78 7d 7d 0a 20 20  order: xxxx}}.  
1130: 37 20 22 6f 72 64 65 72 3d 64 65 73 6b 22 20 20  7 "order=desk"  
1140: 20 20 20 20 20 20 20 20 20 20 7b 31 20 7b 75 6e            {1 {un
1150: 72 65 63 6f 67 6e 69 7a 65 64 20 6f 72 64 65 72  recognized order
1160: 3a 20 64 65 73 6b 7d 7d 0a 7d 20 7b 0a 20 20 65  : desk}}.} {.  e
1170: 78 65 63 73 71 6c 20 7b 20 44 52 4f 50 20 54 41  xecsql { DROP TA
1180: 42 4c 45 20 49 46 20 45 58 49 53 54 53 20 74 31  BLE IF EXISTS t1
1190: 20 7d 0a 20 20 64 6f 5f 63 61 74 63 68 73 71 6c   }.  do_catchsql
11a0: 5f 74 65 73 74 20 32 2e 31 2e 24 74 6e 20 22 0a  _test 2.1.$tn ".
11b0: 20 20 20 20 43 52 45 41 54 45 20 56 49 52 54 55      CREATE VIRTU
11c0: 41 4c 20 54 41 42 4c 45 20 74 31 20 55 53 49 4e  AL TABLE t1 USIN
11d0: 47 20 66 74 73 34 28 61 2c 20 62 2c 20 24 70 61  G fts4(a, b, $pa
11e0: 72 61 6d 29 0a 20 20 22 20 24 72 65 73 0a 7d 0a  ram).  " $res.}.
11f0: 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74  .do_execsql_test
1200: 20 32 2e 32 20 7b 0a 20 20 42 45 47 49 4e 3b 0a   2.2 {.  BEGIN;.
1210: 20 20 20 20 43 52 45 41 54 45 20 56 49 52 54 55      CREATE VIRTU
1220: 41 4c 20 54 41 42 4c 45 20 74 32 20 55 53 49 4e  AL TABLE t2 USIN
1230: 47 20 66 74 73 34 28 6f 72 64 65 72 3d 64 65 73  G fts4(order=des
1240: 63 29 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49  c);.    INSERT I
1250: 4e 54 4f 20 74 32 20 56 41 4c 55 45 53 28 27 61  NTO t2 VALUES('a
1260: 61 20 62 62 27 29 3b 0a 20 20 20 20 49 4e 53 45  a bb');.    INSE
1270: 52 54 20 49 4e 54 4f 20 74 32 20 56 41 4c 55 45  RT INTO t2 VALUE
1280: 53 28 27 62 62 20 63 63 27 29 3b 0a 20 20 20 20  S('bb cc');.    
1290: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 32 20 56  INSERT INTO t2 V
12a0: 41 4c 55 45 53 28 27 63 63 20 61 61 27 29 3b 0a  ALUES('cc aa');.
12b0: 20 20 20 20 53 45 4c 45 43 54 20 64 6f 63 69 64      SELECT docid
12c0: 20 46 52 4f 4d 20 74 32 20 57 48 45 52 45 20 74   FROM t2 WHERE t
12d0: 32 20 4d 41 54 43 48 20 27 61 61 27 3b 0a 20 20  2 MATCH 'aa';.  
12e0: 45 4e 44 3b 0a 7d 20 7b 33 20 31 7d 0a 64 6f 5f  END;.} {3 1}.do_
12f0: 65 78 65 63 73 71 6c 5f 74 65 73 74 20 32 2e 33  execsql_test 2.3
1300: 20 7b 0a 20 20 53 45 4c 45 43 54 20 64 6f 63 69   {.  SELECT doci
1310: 64 20 46 52 4f 4d 20 74 32 20 57 48 45 52 45 20  d FROM t2 WHERE 
1320: 74 32 20 4d 41 54 43 48 20 27 61 61 27 3b 0a 7d  t2 MATCH 'aa';.}
1330: 20 7b 33 20 31 7d 0a 64 6f 5f 65 78 65 63 73 71   {3 1}.do_execsq
1340: 6c 5f 74 65 73 74 20 32 2e 34 20 7b 0a 20 20 53  l_test 2.4 {.  S
1350: 45 4c 45 43 54 20 64 6f 63 69 64 20 46 52 4f 4d  ELECT docid FROM
1360: 20 74 32 20 57 48 45 52 45 20 74 32 20 4d 41 54   t2 WHERE t2 MAT
1370: 43 48 20 27 61 61 27 20 4f 52 44 45 52 20 42 59  CH 'aa' ORDER BY
1380: 20 63 6f 6e 74 65 6e 74 3b 0a 7d 20 7b 31 20 33   content;.} {1 3
1390: 7d 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  }..#------------
13a0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
13b0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
13c0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
13d0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 23 20  -------------.# 
13e0: 54 65 73 74 20 74 68 61 74 20 74 69 63 6b 65 74  Test that ticket
13f0: 20 5b 35 36 62 65 39 37 36 38 35 39 5d 20 68 61   [56be976859] ha
1400: 73 20 62 65 65 6e 20 66 69 78 65 64 2e 0a 23 0a  s been fixed..#.
1410: 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74 20  do_execsql_test 
1420: 33 2e 31 20 7b 0a 20 20 43 52 45 41 54 45 20 56  3.1 {.  CREATE V
1430: 49 52 54 55 41 4c 20 54 41 42 4c 45 20 74 33 20  IRTUAL TABLE t3 
1440: 55 53 49 4e 47 20 66 74 73 34 28 78 2c 20 6f 72  USING fts4(x, or
1450: 64 65 72 3d 44 45 53 43 29 3b 0a 20 20 49 4e 53  der=DESC);.  INS
1460: 45 52 54 20 49 4e 54 4f 20 74 33 28 64 6f 63 69  ERT INTO t3(doci
1470: 64 2c 20 78 29 20 56 41 4c 55 45 53 28 31 31 33  d, x) VALUES(113
1480: 33 38 32 34 30 39 30 30 34 37 38 35 36 36 34 2c  382409004785664,
1490: 20 27 61 61 27 29 3b 0a 20 20 49 4e 53 45 52 54   'aa');.  INSERT
14a0: 20 49 4e 54 4f 20 74 33 28 64 6f 63 69 64 2c 20   INTO t3(docid, 
14b0: 78 29 20 56 41 4c 55 45 53 28 31 2c 20 27 61 62  x) VALUES(1, 'ab
14c0: 27 29 3b 0a 20 20 53 45 4c 45 43 54 20 72 6f 77  ');.  SELECT row
14d0: 69 64 20 46 52 4f 4d 20 74 33 20 57 48 45 52 45  id FROM t3 WHERE
14e0: 20 78 20 4d 41 54 43 48 20 27 61 2a 27 20 4f 52   x MATCH 'a*' OR
14f0: 44 45 52 20 42 59 20 64 6f 63 69 64 20 44 45 53  DER BY docid DES
1500: 43 3b 0a 7d 20 7b 31 31 33 33 38 32 34 30 39 30  C;.} {1133824090
1510: 30 34 37 38 35 36 36 34 20 31 7d 0a 64 6f 5f 65  04785664 1}.do_e
1520: 78 65 63 73 71 6c 5f 74 65 73 74 20 33 2e 32 20  xecsql_test 3.2 
1530: 7b 0a 20 20 43 52 45 41 54 45 20 56 49 52 54 55  {.  CREATE VIRTU
1540: 41 4c 20 54 41 42 4c 45 20 74 34 20 55 53 49 4e  AL TABLE t4 USIN
1550: 47 20 66 74 73 34 28 78 29 3b 0a 20 20 49 4e 53  G fts4(x);.  INS
1560: 45 52 54 20 49 4e 54 4f 20 74 34 28 64 6f 63 69  ERT INTO t4(doci
1570: 64 2c 20 78 29 20 56 41 4c 55 45 53 28 2d 31 31  d, x) VALUES(-11
1580: 33 33 38 32 34 30 39 30 30 34 37 38 35 36 36 34  3382409004785664
1590: 2c 20 27 61 61 27 29 3b 0a 20 20 49 4e 53 45 52  , 'aa');.  INSER
15a0: 54 20 49 4e 54 4f 20 74 34 28 64 6f 63 69 64 2c  T INTO t4(docid,
15b0: 20 78 29 20 56 41 4c 55 45 53 28 31 2c 20 27 61   x) VALUES(1, 'a
15c0: 62 27 29 3b 0a 20 20 53 45 4c 45 43 54 20 72 6f  b');.  SELECT ro
15d0: 77 69 64 20 46 52 4f 4d 20 74 34 20 57 48 45 52  wid FROM t4 WHER
15e0: 45 20 78 20 4d 41 54 43 48 20 27 61 2a 27 3b 0a  E x MATCH 'a*';.
15f0: 7d 20 7b 2d 31 31 33 33 38 32 34 30 39 30 30 34  } {-113382409004
1600: 37 38 35 36 36 34 20 31 7d 0a 0a 0a 0a 66 69 6e  785664 1}....fin
1610: 69 73 68 5f 74 65 73 74 0a                       ish_test.