Index: third_party/sqlite/sqlite-src-3080704/test/instr.test |
diff --git a/third_party/sqlite/sqlite-src-3080704/test/instr.test b/third_party/sqlite/sqlite-src-3080704/test/instr.test |
deleted file mode 100644 |
index c8be4862b930641b2c73411467b57d97e91a4370..0000000000000000000000000000000000000000 |
--- a/third_party/sqlite/sqlite-src-3080704/test/instr.test |
+++ /dev/null |
@@ -1,251 +0,0 @@ |
-# 2012 October 24 |
-# |
-# 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. The |
-# focus of this file is testing the built-in INSTR() functions. |
-# |
-# EVIDENCE-OF: R-27549-59611 The instr(X,Y) function finds the first |
-# occurrence of string Y within string X and returns the number of prior |
-# characters plus 1, or 0 if Y is nowhere found within X. |
-# |
- |
- |
-set testdir [file dirname $argv0] |
-source $testdir/tester.tcl |
- |
-# Create a table to work with. |
-# |
-do_test instr-1.1 { |
- db eval {SELECT instr('abcdefg','a');} |
-} {1} |
-do_test instr-1.2 { |
- db eval {SELECT instr('abcdefg','b');} |
-} {2} |
-do_test instr-1.3 { |
- db eval {SELECT instr('abcdefg','c');} |
-} {3} |
-do_test instr-1.4 { |
- db eval {SELECT instr('abcdefg','d');} |
-} {4} |
-do_test instr-1.5 { |
- db eval {SELECT instr('abcdefg','e');} |
-} {5} |
-do_test instr-1.6 { |
- db eval {SELECT instr('abcdefg','f');} |
-} {6} |
-do_test instr-1.7 { |
- db eval {SELECT instr('abcdefg','g');} |
-} {7} |
-do_test instr-1.8 { |
- db eval {SELECT instr('abcdefg','h');} |
-} {0} |
-do_test instr-1.9 { |
- db eval {SELECT instr('abcdefg','abcdefg');} |
-} {1} |
-do_test instr-1.10 { |
- db eval {SELECT instr('abcdefg','abcdefgh');} |
-} {0} |
-do_test instr-1.11 { |
- db eval {SELECT instr('abcdefg','bcdefg');} |
-} {2} |
-do_test instr-1.12 { |
- db eval {SELECT instr('abcdefg','bcdefgh');} |
-} {0} |
-do_test instr-1.13 { |
- db eval {SELECT instr('abcdefg','cdefg');} |
-} {3} |
-do_test instr-1.14 { |
- db eval {SELECT instr('abcdefg','cdefgh');} |
-} {0} |
-do_test instr-1.15 { |
- db eval {SELECT instr('abcdefg','defg');} |
-} {4} |
-do_test instr-1.16 { |
- db eval {SELECT instr('abcdefg','defgh');} |
-} {0} |
-do_test instr-1.17 { |
- db eval {SELECT instr('abcdefg','efg');} |
-} {5} |
-do_test instr-1.18 { |
- db eval {SELECT instr('abcdefg','efgh');} |
-} {0} |
-do_test instr-1.19 { |
- db eval {SELECT instr('abcdefg','fg');} |
-} {6} |
-do_test instr-1.20 { |
- db eval {SELECT instr('abcdefg','fgh');} |
-} {0} |
-do_test instr-1.21 { |
- db eval {SELECT coalesce(instr('abcdefg',NULL),'nil');} |
-} {nil} |
-do_test instr-1.22 { |
- db eval {SELECT coalesce(instr(NULL,'x'),'nil');} |
-} {nil} |
-do_test instr-1.23 { |
- db eval {SELECT instr(12345,34);} |
-} {3} |
-do_test instr-1.24 { |
- db eval {SELECT instr(123456.78,34);} |
-} {3} |
-do_test instr-1.25 { |
- db eval {SELECT instr(123456.78,x'3334');} |
-} {3} |
-do_test instr-1.26 { |
- db eval {SELECT instr('äbcdefg','efg');} |
-} {5} |
-do_test instr-1.27 { |
- db eval {SELECT instr('€xyzzy','xyz');} |
-} {2} |
-do_test instr-1.28 { |
- db eval {SELECT instr('abc€xyzzy','xyz');} |
-} {5} |
-do_test instr-1.29 { |
- db eval {SELECT instr('abc€xyzzy','€xyz');} |
-} {4} |
-do_test instr-1.30 { |
- db eval {SELECT instr('abc€xyzzy','c€xyz');} |
-} {3} |
-do_test instr-1.31 { |
- db eval {SELECT instr(x'0102030405',x'01');} |
-} {1} |
-do_test instr-1.32 { |
- db eval {SELECT instr(x'0102030405',x'02');} |
-} {2} |
-do_test instr-1.33 { |
- db eval {SELECT instr(x'0102030405',x'03');} |
-} {3} |
-do_test instr-1.34 { |
- db eval {SELECT instr(x'0102030405',x'04');} |
-} {4} |
-do_test instr-1.35 { |
- db eval {SELECT instr(x'0102030405',x'05');} |
-} {5} |
-do_test instr-1.36 { |
- db eval {SELECT instr(x'0102030405',x'06');} |
-} {0} |
-do_test instr-1.37 { |
- db eval {SELECT instr(x'0102030405',x'0102030405');} |
-} {1} |
-do_test instr-1.38 { |
- db eval {SELECT instr(x'0102030405',x'02030405');} |
-} {2} |
-do_test instr-1.39 { |
- db eval {SELECT instr(x'0102030405',x'030405');} |
-} {3} |
-do_test instr-1.40 { |
- db eval {SELECT instr(x'0102030405',x'0405');} |
-} {4} |
-do_test instr-1.41 { |
- db eval {SELECT instr(x'0102030405',x'0506');} |
-} {0} |
-do_test instr-1.42 { |
- db eval {SELECT instr(x'0102030405',x'');} |
-} {1} |
-do_test instr-1.43 { |
- db eval {SELECT instr(x'',x'');} |
-} {1} |
-do_test instr-1.44 { |
- db eval {SELECT instr('','');} |
-} {1} |
-do_test instr-1.45 { |
- db eval {SELECT instr('abcdefg','');} |
-} {1} |
-unset -nocomplain longstr |
-set longstr abcdefghijklmonpqrstuvwxyz |
-append longstr $longstr |
-append longstr $longstr |
-append longstr $longstr |
-append longstr $longstr |
-append longstr $longstr |
-append longstr $longstr |
-append longstr $longstr |
-append longstr $longstr |
-append longstr $longstr |
-append longstr $longstr |
-append longstr $longstr |
-append longstr $longstr |
-# puts [string length $longstr] |
-append longstr Xabcde |
-do_test instr-1.46 { |
- db eval {SELECT instr($longstr,'X');} |
-} {106497} |
-do_test instr-1.47 { |
- db eval {SELECT instr($longstr,'Y');} |
-} {0} |
-do_test instr-1.48 { |
- db eval {SELECT instr($longstr,'Xa');} |
-} {106497} |
-do_test instr-1.49 { |
- db eval {SELECT instr($longstr,'zXa');} |
-} {106496} |
-set longstr [string map {a ä} $longstr] |
-do_test instr-1.50 { |
- db eval {SELECT instr($longstr,'X');} |
-} {106497} |
-do_test instr-1.51 { |
- db eval {SELECT instr($longstr,'Y');} |
-} {0} |
-do_test instr-1.52 { |
- db eval {SELECT instr($longstr,'Xä');} |
-} {106497} |
-do_test instr-1.53 { |
- db eval {SELECT instr($longstr,'zXä');} |
-} {106496} |
-do_test instr-1.54 { |
- db eval {SELECT instr(x'78c3a4e282ac79','x');} |
-} {1} |
-do_test instr-1.55 { |
- db eval {SELECT instr(x'78c3a4e282ac79','y');} |
-} {4} |
- |
-# EVIDENCE-OF: R-46421-32541 Or, if X and Y are both BLOBs, then |
-# instr(X,Y) returns one more than the number bytes prior to the first |
-# occurrence of Y, or 0 if Y does not occur anywhere within X. |
-# |
-do_test instr-1.56.1 { |
- db eval {SELECT instr(x'78c3a4e282ac79',x'79');} |
-} {7} |
-do_test instr-1.56.2 { |
- db eval {SELECT instr(x'78c3a4e282ac79',x'7a');} |
-} {0} |
-do_test instr-1.56.3 { |
- db eval {SELECT instr(x'78c3a4e282ac79',x'78');} |
-} {1} |
-do_test instr-1.56.3 { |
- db eval {SELECT instr(x'78c3a4e282ac79',x'a4');} |
-} {3} |
- |
-# EVIDENCE-OF: R-17329-35644 If both arguments X and Y to instr(X,Y) are |
-# non-NULL and are not BLOBs then both are interpreted as strings. |
-# |
-do_test instr-1.57.1 { |
- db eval {SELECT instr('xä€y',x'79');} |
-} {4} |
-do_test instr-1.57.2 { |
- db eval {SELECT instr('xä€y',x'a4');} |
-} {0} |
-do_test instr-1.57.3 { |
- db eval {SELECT instr(x'78c3a4e282ac79','y');} |
-} {4} |
- |
-# EVIDENCE-OF: R-14708-27487 If either X or Y are NULL in instr(X,Y) |
-# then the result is NULL. |
-# |
-do_execsql_test instr-1.60 { |
- SELECT coalesce(instr(NULL,'abc'), 999); |
-} {999} |
-do_execsql_test instr-1.61 { |
- SELECT coalesce(instr('abc',NULL), 999); |
-} {999} |
-do_execsql_test instr-1.62 { |
- SELECT coalesce(instr(NULL,NULL), 999); |
-} {999} |
- |
-finish_test |