[External] Remove external from RT-Thread

1 files changed, 0 insertions, 432 deletions

diff --git a/components/external/SQLite-3.8.1/test/memdb.test b/components/external/SQLite-3.8.1/test/memdb.test
deleted file mode 100644
index 802fb1a5c4..0000000000
--- a/components/external/SQLite-3.8.1/test/memdb.test
+++ /dev/null
@@ -1,432 +0,0 @@
-# 2001 September 15
-#
-# 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 script is in-memory database backend.
-#
-# $Id: memdb.test,v 1.19 2009/05/18 16:04:38 danielk1977 Exp $
-
-
-set testdir [file dirname $argv0]
-source $testdir/tester.tcl
-
-ifcapable memorydb {
-
-# In the following sequence of tests, compute the MD5 sum of the content
-# of a table, make lots of modifications to that table, then do a rollback.
-# Verify that after the rollback, the MD5 checksum is unchanged.
-#
-# These tests were browed from trans.tcl.
-#
-do_test memdb-1.1 {
-  db close
-  sqlite3 db :memory:
-  # sqlite3 db test.db
-  execsql {
-    BEGIN;
-    CREATE TABLE t3(x TEXT);
-    INSERT INTO t3 VALUES(randstr(10,400));
-    INSERT INTO t3 VALUES(randstr(10,400));
-    INSERT INTO t3 SELECT randstr(10,400) FROM t3;
-    INSERT INTO t3 SELECT randstr(10,400) FROM t3;
-    INSERT INTO t3 SELECT randstr(10,400) FROM t3;
-    INSERT INTO t3 SELECT randstr(10,400) FROM t3;
-    INSERT INTO t3 SELECT randstr(10,400) FROM t3;
-    INSERT INTO t3 SELECT randstr(10,400) FROM t3;
-    INSERT INTO t3 SELECT randstr(10,400) FROM t3;
-    INSERT INTO t3 SELECT randstr(10,400) FROM t3;
-    INSERT INTO t3 SELECT randstr(10,400) FROM t3;
-    COMMIT;
-    SELECT count(*) FROM t3;
-  }
-} {1024}
-
-# The following procedure computes a "signature" for table "t3".  If
-# T3 changes in any way, the signature should change.  
-#
-# This is used to test ROLLBACK.  We gather a signature for t3, then
-# make lots of changes to t3, then rollback and take another signature.
-# The two signatures should be the same.
-#
-proc signature {{fn {}}} {
-  set rx [db eval {SELECT x FROM t3}]
-  # set r1 [md5 $rx\n]
-  if {$fn!=""} {
-    # set fd [open $fn w]
-    # puts $fd $rx
-    # close $fd
-  }
-  # set r [db eval {SELECT count(*), md5sum(x) FROM t3}]
-  # puts "SIG($fn)=$r1"
-  return [list [string length $rx] $rx]
-}
-
-# Do rollbacks.  Make sure the signature does not change.
-#
-set limit 10
-for {set i 2} {$i<=$limit} {incr i} {
-  set ::sig [signature one]
-  # puts "sig=$sig"
-  set cnt [lindex $::sig 0]
-  if {$i%2==0} {
-    execsql {PRAGMA synchronous=FULL}
-  } else {
-    execsql {PRAGMA synchronous=NORMAL}
-  }
-  do_test memdb-1.$i.1-$cnt {
-     execsql {
-       BEGIN;
-       DELETE FROM t3 WHERE random()%10!=0;
-       INSERT INTO t3 SELECT randstr(10,10)||x FROM t3;
-       INSERT INTO t3 SELECT randstr(10,10)||x FROM t3;
-       ROLLBACK;
-     }
-     set sig2 [signature two]
-  } $sig
-  # puts "sig2=$sig2"
-  # if {$sig2!=$sig} exit
-  do_test memdb-1.$i.2-$cnt {
-     execsql {
-       BEGIN;
-       DELETE FROM t3 WHERE random()%10!=0;
-       INSERT INTO t3 SELECT randstr(10,10)||x FROM t3;
-       DELETE FROM t3 WHERE random()%10!=0;
-       INSERT INTO t3 SELECT randstr(10,10)||x FROM t3;
-       ROLLBACK;
-     }
-     signature
-  } $sig
-  if {$i<$limit} {
-    do_test memdb-1.$i.9-$cnt {
-       execsql {
-         INSERT INTO t3 SELECT randstr(10,400) FROM t3 WHERE random()%10==0;
-       }
-    } {}
-  }
-  set ::pager_old_format 0
-}
-
-integrity_check memdb-2.1
-
-do_test memdb-3.1 {
-  execsql {
-    CREATE TABLE t4(a,b,c,d);
-    BEGIN;
-    INSERT INTO t4 VALUES(1,2,3,4);
-    SELECT * FROM t4;
-  }
-} {1 2 3 4}
-do_test memdb-3.2 {
-  execsql {
-    SELECT name FROM sqlite_master WHERE type='table';
-  }
-} {t3 t4}
-do_test memdb-3.3 {
-  execsql {
-    DROP TABLE t4;
-    SELECT name FROM sqlite_master WHERE type='table';
-  }
-} {t3}
-do_test memdb-3.4 {
-  execsql {
-    ROLLBACK;
-    SELECT name FROM sqlite_master WHERE type='table';
-  }
-} {t3 t4}
-
-# Create tables for the first group of tests.
-#
-do_test memdb-4.0 {
-  execsql {
-    CREATE TABLE t1(a, b, c, UNIQUE(a,b));
-    CREATE TABLE t2(x);
-    SELECT c FROM t1 ORDER BY c;
-  }
-} {}
-
-# Six columns of configuration data as follows:
-#
-#   i      The reference number of the test
-#   conf   The conflict resolution algorithm on the BEGIN statement
-#   cmd    An INSERT or REPLACE command to execute against table t1
-#   t0     True if there is an error from $cmd
-#   t1     Content of "c" column of t1 assuming no error in $cmd
-#   t2     Content of "x" column of t2
-#
-foreach {i conf cmd t0 t1 t2} {
-  1 {}       INSERT                  1 {}  1
-  2 {}       {INSERT OR IGNORE}      0 3   1
-  3 {}       {INSERT OR REPLACE}     0 4   1
-  4 {}       REPLACE                 0 4   1
-  5 {}       {INSERT OR FAIL}        1 {}  1
-  6 {}       {INSERT OR ABORT}       1 {}  1
-  7 {}       {INSERT OR ROLLBACK}    1 {}  {}
-} {
-
-  # All tests after test 1 depend on conflict resolution. So end the
-  # loop if that is not available in this build.
-  ifcapable !conflict {if {$i>1} break}
-
-  do_test memdb-4.$i {
-    if {$conf!=""} {set conf "ON CONFLICT $conf"}
-    set r0 [catch {execsql [subst {
-      DELETE FROM t1;
-      DELETE FROM t2;
-      INSERT INTO t1 VALUES(1,2,3);
-      BEGIN $conf;
-      INSERT INTO t2 VALUES(1); 
-      $cmd INTO t1 VALUES(1,2,4);
-    }]} r1]
-    catch {execsql {COMMIT}}
-    if {$r0} {set r1 {}} {set r1 [execsql {SELECT c FROM t1}]}
-    set r2 [execsql {SELECT x FROM t2}]
-    list $r0 $r1 $r2
-  } [list $t0 $t1 $t2]
-}
-
-do_test memdb-5.0 {
-  execsql {
-    DROP TABLE t2;
-    DROP TABLE t3;
-    CREATE TABLE t2(a,b,c);
-    INSERT INTO t2 VALUES(1,2,1);
-    INSERT INTO t2 VALUES(2,3,2);
-    INSERT INTO t2 VALUES(3,4,1);
-    INSERT INTO t2 VALUES(4,5,4);
-    SELECT c FROM t2 ORDER BY b;
-    CREATE TABLE t3(x);
-    INSERT INTO t3 VALUES(1);
-  }
-} {1 2 1 4}
-
-# Six columns of configuration data as follows:
-#
-#   i      The reference number of the test
-#   conf1  The conflict resolution algorithm on the UNIQUE constraint
-#   conf2  The conflict resolution algorithm on the BEGIN statement
-#   cmd    An UPDATE command to execute against table t1
-#   t0     True if there is an error from $cmd
-#   t1     Content of "b" column of t1 assuming no error in $cmd
-#   t2     Content of "x" column of t3
-#
-foreach {i conf1 conf2 cmd t0 t1 t2} {
-  1 {}       {}       UPDATE                  1 {6 7 8 9}  1
-  2 REPLACE  {}       UPDATE                  0 {7 6 9}    1
-  3 IGNORE   {}       UPDATE                  0 {6 7 3 9}  1
-  4 FAIL     {}       UPDATE                  1 {6 7 3 4}  1
-  5 ABORT    {}       UPDATE                  1 {1 2 3 4}  1
-  6 ROLLBACK {}       UPDATE                  1 {1 2 3 4}  0
-  7 REPLACE  {}       {UPDATE OR IGNORE}      0 {6 7 3 9}  1
-  8 IGNORE   {}       {UPDATE OR REPLACE}     0 {7 6 9}    1
-  9 FAIL     {}       {UPDATE OR IGNORE}      0 {6 7 3 9}  1
- 10 ABORT    {}       {UPDATE OR REPLACE}     0 {7 6 9}    1
- 11 ROLLBACK {}       {UPDATE OR IGNORE}      0 {6 7 3 9}   1
- 12 {}       {}       {UPDATE OR IGNORE}      0 {6 7 3 9}  1
- 13 {}       {}       {UPDATE OR REPLACE}     0 {7 6 9}    1
- 14 {}       {}       {UPDATE OR FAIL}        1 {6 7 3 4}  1
- 15 {}       {}       {UPDATE OR ABORT}       1 {1 2 3 4}  1
- 16 {}       {}       {UPDATE OR ROLLBACK}    1 {1 2 3 4}  0
-} {
-  # All tests after test 1 depend on conflict resolution. So end the
-  # loop if that is not available in this build.
-  ifcapable !conflict {
-    if {$i>1} break
-  }
-
-  if {$t0} {set t1 {column a is not unique}}
-  do_test memdb-5.$i {
-    if {$conf1!=""} {set conf1 "ON CONFLICT $conf1"}
-    if {$conf2!=""} {set conf2 "ON CONFLICT $conf2"}
-    set r0 [catch {execsql "
-      DROP TABLE t1;
-      CREATE TABLE t1(a,b,c, UNIQUE(a) $conf1);
-      INSERT INTO t1 SELECT * FROM t2;
-      UPDATE t3 SET x=0;
-      BEGIN $conf2;
-      $cmd t3 SET x=1;
-      $cmd t1 SET b=b*2;
-      $cmd t1 SET a=c+5;
-    "} r1]
-    catch {execsql {COMMIT}}
-    if {!$r0} {set r1 [execsql {SELECT a FROM t1 ORDER BY b}]}
-    set r2 [execsql {SELECT x FROM t3}]
-    list $r0 $r1 $r2
-  } [list $t0 $t1 $t2]
-}
-
-do_test memdb-6.1 {
-  execsql {
-    SELECT * FROM t2;
-  }
-} {1 2 1 2 3 2 3 4 1 4 5 4}
-do_test memdb-6.2 {
-  execsql {
-    BEGIN;
-    DROP TABLE t2;
-    SELECT name FROM sqlite_master WHERE type='table' ORDER BY 1;
-  }
-} {t1 t3 t4}
-do_test memdb-6.3 {
-  execsql {
-    ROLLBACK;
-    SELECT name FROM sqlite_master WHERE type='table' ORDER BY 1;
-  }
-} {t1 t2 t3 t4}
-do_test memdb-6.4 {
-  execsql {
-    SELECT * FROM t2;
-  }
-} {1 2 1 2 3 2 3 4 1 4 5 4}
-ifcapable compound {
-do_test memdb-6.5 {
-  execsql {
-    SELECT a FROM t2 UNION SELECT b FROM t2 ORDER BY 1;
-  }
-} {1 2 3 4 5}
-} ;# ifcapable compound 
-do_test memdb-6.6 {
-  execsql {
-    CREATE INDEX i2 ON t2(c);
-    SELECT a FROM t2 ORDER BY c;
-  }
-} {1 3 2 4}
-do_test memdb-6.6 {
-  execsql {
-    SELECT a FROM t2 ORDER BY c DESC;
-  }
-} {4 2 3 1}
-do_test memdb-6.7 {
-  execsql {
-    BEGIN;
-    CREATE TABLE t5(x,y);
-    INSERT INTO t5 VALUES(1,2);
-    SELECT * FROM t5;
-  }
-} {1 2}
-do_test memdb-6.8 {
-  execsql {
-    SELECT name FROM sqlite_master WHERE type='table' ORDER BY 1;
-  }
-} {t1 t2 t3 t4 t5}
-do_test memdb-6.9 {
-  execsql {
-    ROLLBACK;
-    SELECT name FROM sqlite_master WHERE type='table' ORDER BY 1;
-  }
-} {t1 t2 t3 t4}
-do_test memdb-6.10 {
-  execsql {
-    CREATE TABLE t5(x PRIMARY KEY, y UNIQUE);
-    SELECT * FROM t5;
-  }
-} {}
-do_test memdb-6.11 {
-  execsql {
-    SELECT * FROM t5 ORDER BY y DESC;
-  }
-} {}
-
-ifcapable conflict {
-  do_test memdb-6.12 {
-    execsql {
-      INSERT INTO t5 VALUES(1,2);
-      INSERT INTO t5 VALUES(3,4);
-      REPLACE INTO t5 VALUES(1,4);
-      SELECT rowid,* FROM t5;
-    }
-  } {3 1 4}
-  do_test memdb-6.13 {
-    execsql {
-      DELETE FROM t5 WHERE x>5;
-      SELECT * FROM t5;
-    }
-  } {1 4}
-  do_test memdb-6.14 {
-    execsql {
-      DELETE FROM t5 WHERE y<3;
-      SELECT * FROM t5;
-    }
-  } {1 4}
-}
-
-do_test memdb-6.15 {
-  execsql {
-    DELETE FROM t5 WHERE x>0;
-    SELECT * FROM t5;
-  }
-} {}
-
-ifcapable subquery&&vtab {
-  do_test memdb-7.1 {
-    load_static_extension db wholenumber
-    execsql {
-      CREATE TABLE t6(x);
-      CREATE VIRTUAL TABLE nums USING wholenumber;
-      INSERT INTO t6 SELECT value FROM nums WHERE value BETWEEN 1 AND 256;
-      SELECT count(*) FROM (SELECT DISTINCT x FROM t6);
-    }
-  } {256}
-  for {set i 1} {$i<=256} {incr i} {
-    do_test memdb-7.2.$i {
-       execsql "DELETE FROM t6 WHERE x=\
-                (SELECT x FROM t6 ORDER BY random() LIMIT 1)"
-       execsql {SELECT count(*) FROM t6}
-    } [expr {256-$i}]
-  }
-}
-
-# Ticket #1524
-#
-do_test memdb-8.1 {
-  db close
-  sqlite3 db {:memory:}
-  execsql {
-    PRAGMA auto_vacuum=TRUE;
-    CREATE TABLE t1(a);
-    INSERT INTO t1 VALUES(randstr(5000,6000));
-    INSERT INTO t1 VALUES(randstr(5000,6000));
-    INSERT INTO t1 VALUES(randstr(5000,6000));
-    INSERT INTO t1 VALUES(randstr(5000,6000));
-    INSERT INTO t1 VALUES(randstr(5000,6000));
-    SELECT count(*) FROM t1;
-  }
-} 5
-do_test memdb-8.2 {
-  execsql {
-    DELETE FROM t1;
-    SELECT count(*) FROM t1;
-  }
-} 0
-
-# Test that auto-vacuum works with in-memory databases.
-# 
-ifcapable autovacuum {
-  do_test memdb-9.1 {
-    db close
-    sqlite3 db test.db
-    db cache size 0
-    execsql {
-      PRAGMA auto_vacuum = full;
-      CREATE TABLE t1(a);
-      INSERT INTO t1 VALUES(randstr(1000,1000));
-      INSERT INTO t1 VALUES(randstr(1000,1000));
-      INSERT INTO t1 VALUES(randstr(1000,1000));
-    }
-    set memused [lindex [sqlite3_status SQLITE_STATUS_MEMORY_USED 0] 1]
-    set pgovfl [lindex [sqlite3_status SQLITE_STATUS_PAGECACHE_OVERFLOW 0] 1]
-    execsql { DELETE FROM t1 }
-    set memused2 [lindex [sqlite3_status SQLITE_STATUS_MEMORY_USED 0] 1]
-    expr {($memused2 + 2048 < $memused) || $pgovfl==0}
-  } {1}
-}
-
-} ;# ifcapable memorydb
-
-finish_test