gitlab.com/CoiaPrant/sqlite3@v1.19.1/testdata/tcl/corrupt5.test (about)

     1  # 2008 Jan 22
     2  #
     3  # The author disclaims copyright to this source code.  In place of
     4  # a legal notice, here is a blessing:
     5  #
     6  #    May you do good and not evil.
     7  #    May you find forgiveness for yourself and forgive others.
     8  #    May you share freely, never taking more than you give.
     9  #
    10  #***********************************************************************
    11  # This file implements regression tests for SQLite library.
    12  #
    13  # This file implements tests to make sure SQLite does not crash or
    14  # segfault if it sees a corrupt database file.  Checks for 
    15  # malformed schema.
    16  #
    17  # $Id: corrupt5.test,v 1.3 2009/06/04 02:47:04 shane Exp $
    18  
    19  set testdir [file dirname $argv0]
    20  source $testdir/tester.tcl
    21  
    22  # These tests deal with corrupt database files
    23  #
    24  database_may_be_corrupt
    25  
    26  # We must have the page_size pragma for these tests to work.
    27  #
    28  ifcapable !pager_pragmas {
    29    finish_test
    30    return
    31  }
    32  
    33  # Create a database with a freelist containing at least two pages.
    34  #
    35  do_test corrupt5-1.1 {
    36    sqlite3_db_config db DEFENSIVE 0
    37    execsql {
    38      CREATE TABLE t1(a,b,c);
    39      CREATE INDEX i1 ON t1(a,b);
    40      PRAGMA writable_schema=ON;
    41      UPDATE sqlite_master SET name=NULL, sql=NULL WHERE name='i1';
    42    }
    43    db close
    44    sqlite3 db test.db
    45    catchsql {
    46      SELECT * FROM t1
    47    }
    48  } {1 {malformed database schema (?)}}
    49  
    50  finish_test