/ Hex Artifact Content
Login

Artifact 9a5176c9317bb545ec5f144d62e6fedb4da6c66e:


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 7d 20 7b 0a 20 20 65 78 65 63 73 71 6c  }}.} {.  execsql
1100: 20 7b 20 44 52 4f 50 20 54 41 42 4c 45 20 49 46   { DROP TABLE IF
1110: 20 45 58 49 53 54 53 20 74 31 20 7d 0a 20 20 64   EXISTS t1 }.  d
1120: 6f 5f 63 61 74 63 68 73 71 6c 5f 74 65 73 74 20  o_catchsql_test 
1130: 32 2e 31 2e 24 74 6e 20 22 0a 20 20 20 20 43 52  2.1.$tn ".    CR
1140: 45 41 54 45 20 56 49 52 54 55 41 4c 20 54 41 42  EATE VIRTUAL TAB
1150: 4c 45 20 74 31 20 55 53 49 4e 47 20 66 74 73 34  LE t1 USING fts4
1160: 28 61 2c 20 62 2c 20 24 70 61 72 61 6d 29 0a 20  (a, b, $param). 
1170: 20 22 20 24 72 65 73 0a 7d 0a 0a 64 6f 5f 65 78   " $res.}..do_ex
1180: 65 63 73 71 6c 5f 74 65 73 74 20 32 2e 32 20 7b  ecsql_test 2.2 {
1190: 0a 20 20 42 45 47 49 4e 3b 0a 20 20 20 20 43 52  .  BEGIN;.    CR
11a0: 45 41 54 45 20 56 49 52 54 55 41 4c 20 54 41 42  EATE VIRTUAL TAB
11b0: 4c 45 20 74 32 20 55 53 49 4e 47 20 66 74 73 34  LE t2 USING fts4
11c0: 28 6f 72 64 65 72 3d 64 65 73 63 29 3b 0a 20 20  (order=desc);.  
11d0: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 32    INSERT INTO t2
11e0: 20 56 41 4c 55 45 53 28 27 61 61 20 62 62 27 29   VALUES('aa bb')
11f0: 3b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54  ;.    INSERT INT
1200: 4f 20 74 32 20 56 41 4c 55 45 53 28 27 62 62 20  O t2 VALUES('bb 
1210: 63 63 27 29 3b 0a 20 20 20 20 49 4e 53 45 52 54  cc');.    INSERT
1220: 20 49 4e 54 4f 20 74 32 20 56 41 4c 55 45 53 28   INTO t2 VALUES(
1230: 27 63 63 20 61 61 27 29 3b 0a 20 20 20 20 53 45  'cc aa');.    SE
1240: 4c 45 43 54 20 64 6f 63 69 64 20 46 52 4f 4d 20  LECT docid FROM 
1250: 74 32 20 57 48 45 52 45 20 74 32 20 4d 41 54 43  t2 WHERE t2 MATC
1260: 48 20 27 61 61 27 3b 0a 20 20 45 4e 44 3b 0a 7d  H 'aa';.  END;.}
1270: 20 7b 33 20 31 7d 0a 64 6f 5f 65 78 65 63 73 71   {3 1}.do_execsq
1280: 6c 5f 74 65 73 74 20 32 2e 33 20 7b 0a 20 20 53  l_test 2.3 {.  S
1290: 45 4c 45 43 54 20 64 6f 63 69 64 20 46 52 4f 4d  ELECT docid FROM
12a0: 20 74 32 20 57 48 45 52 45 20 74 32 20 4d 41 54   t2 WHERE t2 MAT
12b0: 43 48 20 27 61 61 27 3b 0a 7d 20 7b 33 20 31 7d  CH 'aa';.} {3 1}
12c0: 0a 0a 23 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ..#-------------
12d0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
12e0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
12f0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
1300: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 23 20 54  ------------.# T
1310: 65 73 74 20 74 68 61 74 20 74 69 63 6b 65 74 20  est that ticket 
1320: 5b 35 36 62 65 39 37 36 38 35 39 5d 20 68 61 73  [56be976859] has
1330: 20 62 65 65 6e 20 66 69 78 65 64 2e 0a 23 0a 64   been fixed..#.d
1340: 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74 20 33  o_execsql_test 3
1350: 2e 31 20 7b 0a 20 20 43 52 45 41 54 45 20 56 49  .1 {.  CREATE VI
1360: 52 54 55 41 4c 20 54 41 42 4c 45 20 74 33 20 55  RTUAL TABLE t3 U
1370: 53 49 4e 47 20 66 74 73 34 28 78 2c 20 6f 72 64  SING fts4(x, ord
1380: 65 72 3d 44 45 53 43 29 3b 0a 20 20 49 4e 53 45  er=DESC);.  INSE
1390: 52 54 20 49 4e 54 4f 20 74 33 28 64 6f 63 69 64  RT INTO t3(docid
13a0: 2c 20 78 29 20 56 41 4c 55 45 53 28 31 31 33 33  , x) VALUES(1133
13b0: 38 32 34 30 39 30 30 34 37 38 35 36 36 34 2c 20  82409004785664, 
13c0: 27 61 61 27 29 3b 0a 20 20 49 4e 53 45 52 54 20  'aa');.  INSERT 
13d0: 49 4e 54 4f 20 74 33 28 64 6f 63 69 64 2c 20 78  INTO t3(docid, x
13e0: 29 20 56 41 4c 55 45 53 28 31 2c 20 27 61 62 27  ) VALUES(1, 'ab'
13f0: 29 3b 0a 20 20 53 45 4c 45 43 54 20 72 6f 77 69  );.  SELECT rowi
1400: 64 20 46 52 4f 4d 20 74 33 20 57 48 45 52 45 20  d FROM t3 WHERE 
1410: 78 20 4d 41 54 43 48 20 27 61 2a 27 20 4f 52 44  x MATCH 'a*' ORD
1420: 45 52 20 42 59 20 64 6f 63 69 64 20 44 45 53 43  ER BY docid DESC
1430: 3b 0a 7d 20 7b 31 31 33 33 38 32 34 30 39 30 30  ;.} {11338240900
1440: 34 37 38 35 36 36 34 20 31 7d 0a 64 6f 5f 65 78  4785664 1}.do_ex
1450: 65 63 73 71 6c 5f 74 65 73 74 20 33 2e 32 20 7b  ecsql_test 3.2 {
1460: 0a 20 20 43 52 45 41 54 45 20 56 49 52 54 55 41  .  CREATE VIRTUA
1470: 4c 20 54 41 42 4c 45 20 74 34 20 55 53 49 4e 47  L TABLE t4 USING
1480: 20 66 74 73 34 28 78 29 3b 0a 20 20 49 4e 53 45   fts4(x);.  INSE
1490: 52 54 20 49 4e 54 4f 20 74 34 28 64 6f 63 69 64  RT INTO t4(docid
14a0: 2c 20 78 29 20 56 41 4c 55 45 53 28 2d 31 31 33  , x) VALUES(-113
14b0: 33 38 32 34 30 39 30 30 34 37 38 35 36 36 34 2c  382409004785664,
14c0: 20 27 61 61 27 29 3b 0a 20 20 49 4e 53 45 52 54   'aa');.  INSERT
14d0: 20 49 4e 54 4f 20 74 34 28 64 6f 63 69 64 2c 20   INTO t4(docid, 
14e0: 78 29 20 56 41 4c 55 45 53 28 31 2c 20 27 61 62  x) VALUES(1, 'ab
14f0: 27 29 3b 0a 20 20 53 45 4c 45 43 54 20 72 6f 77  ');.  SELECT row
1500: 69 64 20 46 52 4f 4d 20 74 34 20 57 48 45 52 45  id FROM t4 WHERE
1510: 20 78 20 4d 41 54 43 48 20 27 61 2a 27 3b 0a 7d   x MATCH 'a*';.}
1520: 20 7b 2d 31 31 33 33 38 32 34 30 39 30 30 34 37   {-1133824090047
1530: 38 35 36 36 34 20 31 7d 0a 0a 0a 0a 66 69 6e 69  85664 1}....fini
1540: 73 68 5f 74 65 73 74 0a 0a                       sh_test..