[sqlite] Remove obsolete reference version 3.8.7.4.

third_party/sqlite/sqlite-src-3080704/test/alter4.test

-# 2009 February 2
-#
-# 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 testing that SQLite can handle a subtle 
-# file format change that may be used in the future to implement
-# "ALTER TABLE ... ADD COLUMN".
-#
-# $Id: alter4.test,v 1.1 2009/02/02 18:03:22 drh Exp $
-#
-
-set testdir [file dirname $argv0]
-
-source $testdir/tester.tcl
-
-# If SQLITE_OMIT_ALTERTABLE is defined, omit this file.
-ifcapable !altertable {
-  finish_test
-  return
-}
-
-
-# Test Organisation:
-# ------------------
-#
-# alter4-1.*: Test that ALTER TABLE correctly modifies the CREATE TABLE sql.
-# alter4-2.*: Test error messages.
-# alter4-3.*: Test adding columns with default value NULL.
-# alter4-4.*: Test adding columns with default values other than NULL.
-# alter4-5.*: Test adding columns to tables in ATTACHed databases.
-# alter4-6.*: Test that temp triggers are not accidentally dropped.
-# alter4-7.*: Test that VACUUM resets the file-format.
-#
-
-do_test alter4-1.1 {
-  execsql {
-    CREATE TEMP TABLE abc(a, b, c);
-    SELECT sql FROM sqlite_temp_master;
-  }
-} {{CREATE TABLE abc(a, b, c)}}
-do_test alter4-1.2 {
-  execsql {ALTER TABLE abc ADD d INTEGER;}
-  execsql {
-    SELECT sql FROM sqlite_temp_master;
-  }
-} {{CREATE TABLE abc(a, b, c, d INTEGER)}}
-do_test alter4-1.3 {
-  execsql {ALTER TABLE abc ADD e}
-  execsql {
-    SELECT sql FROM sqlite_temp_master;
-  }
-} {{CREATE TABLE abc(a, b, c, d INTEGER, e)}}
-do_test alter4-1.4 {
-  execsql {
-    CREATE TABLE temp.t1(a, b);
-    ALTER TABLE t1 ADD c;
-    SELECT sql FROM sqlite_temp_master WHERE tbl_name = 't1';
-  }
-} {{CREATE TABLE t1(a, b, c)}}
-do_test alter4-1.5 {
-  execsql {
-    ALTER TABLE t1 ADD d CHECK (a>d);
-    SELECT sql FROM sqlite_temp_master WHERE tbl_name = 't1';
-  }
-} {{CREATE TABLE t1(a, b, c, d CHECK (a>d))}}
-ifcapable foreignkey {
-  do_test alter4-1.6 {
-    execsql {
-      CREATE TEMP TABLE t2(a, b, UNIQUE(a, b));
-      ALTER TABLE t2 ADD c REFERENCES t1(c)  ;
-      SELECT sql FROM sqlite_temp_master
-       WHERE tbl_name = 't2' AND type = 'table';
-    }
-  } {{CREATE TABLE t2(a, b, c REFERENCES t1(c), UNIQUE(a, b))}}
-}
-do_test alter4-1.7 {
-  execsql {
-    CREATE TEMPORARY TABLE t3(a, b, UNIQUE(a, b));
-    ALTER TABLE t3 ADD COLUMN c VARCHAR(10, 20);
-    SELECT sql FROM sqlite_temp_master
-     WHERE tbl_name = 't3' AND type = 'table';
-  }
-} {{CREATE TABLE t3(a, b, c VARCHAR(10, 20), UNIQUE(a, b))}}
-do_test alter4-1.99 {
-  catchsql {
-    # May not exist if foriegn-keys are omitted at compile time.
-    DROP TABLE t2; 
-  }
-  execsql {
-    DROP TABLE abc; 
-    DROP TABLE t1; 
-    DROP TABLE t3; 
-  }
-} {}
-
-do_test alter4-2.1 {
-  execsql {
-    CREATE TABLE temp.t1(a, b);
-  }
-  catchsql {
-    ALTER TABLE t1 ADD c PRIMARY KEY;
-  }
-} {1 {Cannot add a PRIMARY KEY column}}
-do_test alter4-2.2 {
-  catchsql {
-    ALTER TABLE t1 ADD c UNIQUE
-  }
-} {1 {Cannot add a UNIQUE column}}
-do_test alter4-2.3 {
-  catchsql {
-    ALTER TABLE t1 ADD b VARCHAR(10)
-  }
-} {1 {duplicate column name: b}}
-do_test alter4-2.3 {
-  catchsql {
-    ALTER TABLE t1 ADD c NOT NULL;
-  }
-} {1 {Cannot add a NOT NULL column with default value NULL}}
-do_test alter4-2.4 {
-  catchsql {
-    ALTER TABLE t1 ADD c NOT NULL DEFAULT 10;
-  }
-} {0 {}}
-ifcapable view {
-  do_test alter4-2.5 {
-    execsql {
-      CREATE TEMPORARY VIEW v1 AS SELECT * FROM t1;
-    }
-    catchsql {
-      alter table v1 add column d;
-    }
-  } {1 {Cannot add a column to a view}}
-}
-do_test alter4-2.6 {
-  catchsql {
-    alter table t1 add column d DEFAULT CURRENT_TIME;
-  }
-} {1 {Cannot add a column with non-constant default}}
-do_test alter4-2.7 {
-  catchsql {
-    alter table t1 add column d default (-5+1);
-  }
-} {1 {Cannot add a column with non-constant default}}
-do_test alter4-2.99 {
-  execsql {
-    DROP TABLE t1;
-  }
-} {}
-
-do_test alter4-3.1 {
-  execsql {
-    CREATE TEMP TABLE t1(a, b);
-    INSERT INTO t1 VALUES(1, 100);
-    INSERT INTO t1 VALUES(2, 300);
-    SELECT * FROM t1;
-  }
-} {1 100 2 300}
-do_test alter4-3.1 {
-  execsql {
-    PRAGMA schema_version = 10;
-  }
-} {}
-do_test alter4-3.2 {
-  execsql {
-    ALTER TABLE t1 ADD c;
-    SELECT * FROM t1;
-  }
-} {1 100 {} 2 300 {}}
-ifcapable schema_version {
-  do_test alter4-3.4 {
-    execsql {
-      PRAGMA schema_version;
-    }
-  } {10}
-}
-
-do_test alter4-4.1 {
-  db close
-  forcedelete test.db
-  set ::DB [sqlite3 db test.db]
-  execsql {
-    CREATE TEMP TABLE t1(a, b);
-    INSERT INTO t1 VALUES(1, 100);
-    INSERT INTO t1 VALUES(2, 300);
-    SELECT * FROM t1;
-  }
-} {1 100 2 300}
-do_test alter4-4.1 {
-  execsql {
-    PRAGMA schema_version = 20;
-  }
-} {}
-do_test alter4-4.2 {
-  execsql {
-    ALTER TABLE t1 ADD c DEFAULT 'hello world';
-    SELECT * FROM t1;
-  }
-} {1 100 {hello world} 2 300 {hello world}}
-ifcapable schema_version {
-  do_test alter4-4.4 {
-    execsql {
-      PRAGMA schema_version;
-    }
-  } {20}
-}
-do_test alter4-4.99 {
-  execsql {
-    DROP TABLE t1;
-  }
-} {}
-
-ifcapable attach {
-  do_test alter4-5.1 {
-    forcedelete test2.db
-    forcedelete test2.db-journal
-    execsql {
-      CREATE TEMP TABLE t1(a, b);
-      INSERT INTO t1 VALUES(1, 'one');
-      INSERT INTO t1 VALUES(2, 'two');
-      ATTACH 'test2.db' AS aux;
-      CREATE TABLE aux.t1 AS SELECT * FROM t1;
-      PRAGMA aux.schema_version = 30;
-      SELECT sql FROM aux.sqlite_master;
-    } 
-  } {{CREATE TABLE t1(a,b)}}
-  do_test alter4-5.2 {
-    execsql {
-      ALTER TABLE aux.t1 ADD COLUMN c VARCHAR(128);
-      SELECT sql FROM aux.sqlite_master;
-    }
-  } {{CREATE TABLE t1(a,b, c VARCHAR(128))}}
-  do_test alter4-5.3 {
-    execsql {
-      SELECT * FROM aux.t1;
-    }
-  } {1 one {} 2 two {}}
-  ifcapable schema_version {
-    do_test alter4-5.4 {
-      execsql {
-        PRAGMA aux.schema_version;
-      }
-    } {31}
-  }
-  do_test alter4-5.6 {
-    execsql {
-      ALTER TABLE aux.t1 ADD COLUMN d DEFAULT 1000;
-      SELECT sql FROM aux.sqlite_master;
-    }
-  } {{CREATE TABLE t1(a,b, c VARCHAR(128), d DEFAULT 1000)}}
-  do_test alter4-5.7 {
-    execsql {
-      SELECT * FROM aux.t1;
-    }
-  } {1 one {} 1000 2 two {} 1000}
-  ifcapable schema_version {
-    do_test alter4-5.8 {
-      execsql {
-        PRAGMA aux.schema_version;
-      }
-    } {32}
-  }
-  do_test alter4-5.9 {
-    execsql {
-      SELECT * FROM t1;
-    }
-  } {1 one 2 two}
-  do_test alter4-5.99 {
-    execsql {
-      DROP TABLE aux.t1;
-      DROP TABLE t1;
-    }
-  } {}
-}
-
-#----------------------------------------------------------------
-# Test that the table schema is correctly reloaded when a column
-# is added to a table.
-#
-ifcapable trigger&&tempdb {
-  do_test alter4-6.1 {
-    execsql {
-      CREATE TEMP TABLE t1(a, b);
-      CREATE TEMP TABLE log(trig, a, b);
-
-      CREATE TRIGGER t1_a AFTER INSERT ON t1 BEGIN
-        INSERT INTO log VALUES('a', new.a, new.b);
-      END;
-      CREATE TEMP TRIGGER t1_b AFTER INSERT ON t1 BEGIN
-        INSERT INTO log VALUES('b', new.a, new.b);
-      END;
-  
-      INSERT INTO t1 VALUES(1, 2);
-      SELECT * FROM log;
-    }
-  } {b 1 2 a 1 2}
-  do_test alter4-6.2 {
-    execsql {
-      ALTER TABLE t1 ADD COLUMN c DEFAULT 'c';
-      INSERT INTO t1(a, b) VALUES(3, 4);
-      SELECT * FROM log;
-    }
-  } {b 1 2 a 1 2 b 3 4 a 3 4}
-}
-
-# Ticket #1183 - Make sure adding columns to large tables does not cause
-# memory corruption (as was the case before this bug was fixed).
-do_test alter4-8.1 {
-  execsql {
-    CREATE TEMP TABLE t4(c1);
-  }
-} {}
-set ::sql ""
-do_test alter4-8.2 {
-  set cols c1
-  for {set i 2} {$i < 100} {incr i} {
-    execsql "
-      ALTER TABLE t4 ADD c$i
-    "
-    lappend cols c$i
-  }
-  set ::sql "CREATE TABLE t4([join $cols {, }])"
-  list 
-} {}
-do_test alter4-8.2 {
-  execsql {
-    SELECT sql FROM sqlite_temp_master WHERE name = 't4';
-  }
-} [list $::sql]
-
-
-# Test that a default value equal to -1 multipied by the smallest possible
-# 64-bit integer is correctly converted to a real.
-do_execsql_test alter4-9.1 {
-  CREATE TABLE t5(
-    a INTEGER DEFAULT -9223372036854775808,
-    b INTEGER DEFAULT (-(-9223372036854775808))
-  );
-  INSERT INTO t5 DEFAULT VALUES;
-}
-
-do_execsql_test alter4-9.2 { SELECT typeof(a), a, typeof(b), b FROM t5; } {
-  integer -9223372036854775808
-  real     9.22337203685478e+18
-}
-
-do_execsql_test alter4-9.3 { 
-  ALTER TABLE t5 ADD COLUMN c INTEGER DEFAULT (-(-9223372036854775808));
-  SELECT typeof(c), c FROM t5;
-} {real 9.22337203685478e+18}
-
-finish_test