79 lines
		
	
	
		
			2.5 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			79 lines
		
	
	
		
			2.5 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
# 2013 March 05
 | 
						|
#
 | 
						|
# The author disclaims copyright to this source code.  In place of
 | 
						|
# a legal notice, here is a blessing:
 | 
						|
#
 | 
						|
#    May you do good and not evil.
 | 
						|
#    May you find forgiveness for yourself and forgive others.
 | 
						|
#    May you share freely, never taking more than you give.
 | 
						|
#
 | 
						|
#***********************************************************************
 | 
						|
# This file implements regression tests for SQLite library. Specifically,
 | 
						|
# it tests that ticket [fc7bd6358f]:
 | 
						|
#
 | 
						|
# The following SQL yields an incorrect result (zero rows) in all
 | 
						|
# versions of SQLite between 3.6.14 and 3.7.15.2:
 | 
						|
#
 | 
						|
#    CREATE TABLE t(textid TEXT);
 | 
						|
#    INSERT INTO t VALUES('12');
 | 
						|
#    INSERT INTO t VALUES('34');
 | 
						|
#    CREATE TABLE i(intid INTEGER PRIMARY KEY);
 | 
						|
#    INSERT INTO i VALUES(12);
 | 
						|
#    INSERT INTO i VALUES(34);
 | 
						|
#
 | 
						|
#    SELECT t1.textid AS a, i.intid AS b, t2.textid AS c
 | 
						|
#      FROM t t1, i, t t2
 | 
						|
#     WHERE t1.textid = i.intid
 | 
						|
#       AND t1.textid = t2.textid;
 | 
						|
#
 | 
						|
# The correct result should be two rows, one with 12|12|12 and the other
 | 
						|
# with 34|34|34. With this bug, no rows are returned. Bisecting shows that
 | 
						|
# this bug was introduced with check-in [dd4d67a67454] on 2009-04-23. 
 | 
						|
#
 | 
						|
 | 
						|
set testdir [file dirname $argv0]
 | 
						|
source $testdir/tester.tcl
 | 
						|
 | 
						|
do_test tkt-fc7bd6358f.100 {
 | 
						|
  db eval {
 | 
						|
    CREATE TABLE t(textid TEXT);
 | 
						|
    INSERT INTO t VALUES('12');
 | 
						|
    INSERT INTO t VALUES('34');
 | 
						|
    CREATE TABLE i(intid INTEGER PRIMARY KEY);
 | 
						|
    INSERT INTO i VALUES(12);
 | 
						|
    INSERT INTO i VALUES(34);
 | 
						|
  }
 | 
						|
} {}
 | 
						|
unset -nocomplain from
 | 
						|
unset -nocomplain where
 | 
						|
unset -nocomplain a
 | 
						|
unset -nocomplain b
 | 
						|
foreach {a from} {
 | 
						|
  1 {FROM t t1, i, t t2}
 | 
						|
  2 {FROM i, t t1, t t2}
 | 
						|
  3 {FROM t t1, t t2, i}
 | 
						|
} {
 | 
						|
  foreach {b where} {
 | 
						|
    1 {WHERE t1.textid=i.intid AND t1.textid=t2.textid}
 | 
						|
    2 {WHERE i.intid=t1.textid AND t1.textid=t2.textid}
 | 
						|
    3 {WHERE t1.textid=i.intid AND i.intid=t2.textid}
 | 
						|
    4 {WHERE t1.textid=i.intid AND t2.textid=i.intid}
 | 
						|
    5 {WHERE i.intid=t1.textid AND i.intid=t2.textid}
 | 
						|
    6 {WHERE i.intid=t1.textid AND t2.textid=i.intid}
 | 
						|
    7 {WHERE t1.textid=t2.textid AND i.intid=t2.textid}
 | 
						|
    8 {WHERE t1.textid=t2.textid AND t2.textid=i.intid}
 | 
						|
  } {
 | 
						|
    do_test tkt-fc7bd6358f.110.$a.$b.1 {
 | 
						|
       db eval {PRAGMA automatic_index=ON}
 | 
						|
       db eval "SELECT t1.textid, i.intid, t2.textid $from $where"
 | 
						|
    } {12 12 12 34 34 34}
 | 
						|
    do_test tkt-fc7bd6358f.110.$a.$b.2 {
 | 
						|
       db eval {PRAGMA automatic_index=OFF}
 | 
						|
       db eval "SELECT t1.textid, i.intid, t2.textid $from $where"
 | 
						|
    } {12 12 12 34 34 34}
 | 
						|
  }
 | 
						|
}
 | 
						|
 | 
						|
    
 | 
						|
finish_test
 |