rtt-f030/components/external/SQLite-3.8.1/test/tkt1435.test

112 lines
3.3 KiB
Plaintext
Raw Normal View History

# 2005 September 17
#
# 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.
#
# This file implements tests to verify that ticket #1435 has been
# fixed.
#
#
# $Id: tkt1435.test,v 1.2 2006/01/17 09:35:02 danielk1977 Exp $
set testdir [file dirname $argv0]
source $testdir/tester.tcl
ifcapable !memorydb {
finish_test
return
}
# Construct the sample database.
#
do_test tkt1435-1.0 {
sqlite3 db :memory:
execsql {
CREATE TABLE Instances(
instanceId INTEGER PRIMARY KEY,
troveName STR,
versionId INT,
flavorId INT,
timeStamps STR,
isPresent INT,
pinned BOOLEAN
);
INSERT INTO "Instances"
VALUES(1, 'libhello:runtime', 1, 1, 1126929880.094, 1, 1);
INSERT INTO "Instances"
VALUES(2, 'libhello:user', 1, 1, 1126929880.094, 1, 0);
INSERT INTO "Instances"
VALUES(3, 'libhello:script', 1, 1, 1126929880.094, 1, 0);
INSERT INTO "Instances"
VALUES(4, 'libhello', 1, 1, 1126929880.094, 1, 0);
CREATE TABLE Versions(versionId INTEGER PRIMARY KEY,version STR UNIQUE);
INSERT INTO "Versions" VALUES(0, NULL);
INSERT INTO "Versions" VALUES(1, '/localhost@rpl:linux/0-1-1');
CREATE TABLE Flavors(flavorId integer primary key, flavor str unique);
INSERT INTO "Flavors" VALUES(0, NULL);
INSERT INTO "Flavors" VALUES(1, '1#x86');
CREATE TEMPORARY TABLE tlList (
row INTEGER PRIMARY KEY,
name STRING,
version STRING,
flavor STRING
);
INSERT INTO tlList
values(NULL, 'libhello:script', '/localhost@rpl:linux/0-1-1', '1#x86');
INSERT INTO tlList
values(NULL, 'libhello:user', '/localhost@rpl:linux/0-1-1', '1#x86');
INSERT INTO tlList
values(NULL, 'libhello:runtime', '/localhost@rpl:linux/0-1-1', '1#x86');
}
} {}
# Run the query with an index
#
do_test tkt1435-1.1 {
execsql {
select row, pinned from tlList, Instances, Versions, Flavors
where
Instances.troveName = tlList.name
and Versions.version = tlList.version
and Instances.versionId = Versions.versionId
and ( Flavors.flavor = tlList.flavor or Flavors.flavor is NULL
and tlList.flavor = '')
and Instances.flavorId = Flavors.flavorId
order by row asc;
}
} {1 0 2 0 3 1}
# Create a indices, analyze and rerun the query.
# Verify that the results are the same
#
do_test tkt1435-1.2 {
execsql {
CREATE INDEX InstancesNameIdx ON Instances(troveName);
CREATE UNIQUE INDEX InstancesIdx
ON Instances(troveName, versionId, flavorId);
ANALYZE;
select row, pinned from tlList, Instances, Versions, Flavors
where
Instances.troveName = tlList.name
and Versions.version = tlList.version
and Instances.versionId = Versions.versionId
and ( Flavors.flavor = tlList.flavor or Flavors.flavor is NULL
and tlList.flavor = '')
and Instances.flavorId = Flavors.flavorId
order by row asc;
}
} {1 0 2 0 3 1}
finish_test