Home | History | Annotate | Download | only in test
      1 # 2001 September 15
      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.  The
     12 # focus of this file is testing the INSERT statement.
     13 #
     14 # $Id: insert.test,v 1.31 2007/04/05 11:25:59 drh Exp $
     15 
     16 set testdir [file dirname $argv0]
     17 source $testdir/tester.tcl
     18 
     19 # Try to insert into a non-existant table.
     20 #
     21 do_test insert-1.1 {
     22   set v [catch {execsql {INSERT INTO test1 VALUES(1,2,3)}} msg]
     23   lappend v $msg
     24 } {1 {no such table: test1}}
     25 
     26 # Try to insert into sqlite_master
     27 #
     28 do_test insert-1.2 {
     29   set v [catch {execsql {INSERT INTO sqlite_master VALUES(1,2,3,4)}} msg]
     30   lappend v $msg
     31 } {1 {table sqlite_master may not be modified}}
     32 
     33 # Try to insert the wrong number of entries.
     34 #
     35 do_test insert-1.3 {
     36   execsql {CREATE TABLE test1(one int, two int, three int)}
     37   set v [catch {execsql {INSERT INTO test1 VALUES(1,2)}} msg]
     38   lappend v $msg
     39 } {1 {table test1 has 3 columns but 2 values were supplied}}
     40 do_test insert-1.3b {
     41   set v [catch {execsql {INSERT INTO test1 VALUES(1,2,3,4)}} msg]
     42   lappend v $msg
     43 } {1 {table test1 has 3 columns but 4 values were supplied}}
     44 do_test insert-1.3c {
     45   set v [catch {execsql {INSERT INTO test1(one,two) VALUES(1,2,3,4)}} msg]
     46   lappend v $msg
     47 } {1 {4 values for 2 columns}}
     48 do_test insert-1.3d {
     49   set v [catch {execsql {INSERT INTO test1(one,two) VALUES(1)}} msg]
     50   lappend v $msg
     51 } {1 {1 values for 2 columns}}
     52 
     53 # Try to insert into a non-existant column of a table.
     54 #
     55 do_test insert-1.4 {
     56   set v [catch {execsql {INSERT INTO test1(one,four) VALUES(1,2)}} msg]
     57   lappend v $msg
     58 } {1 {table test1 has no column named four}}
     59 
     60 # Make sure the inserts actually happen
     61 #
     62 do_test insert-1.5 {
     63   execsql {INSERT INTO test1 VALUES(1,2,3)}
     64   execsql {SELECT * FROM test1}
     65 } {1 2 3}
     66 do_test insert-1.5b {
     67   execsql {INSERT INTO test1 VALUES(4,5,6)}
     68   execsql {SELECT * FROM test1 ORDER BY one}
     69 } {1 2 3 4 5 6}
     70 do_test insert-1.5c {
     71   execsql {INSERT INTO test1 VALUES(7,8,9)}
     72   execsql {SELECT * FROM test1 ORDER BY one}
     73 } {1 2 3 4 5 6 7 8 9}
     74 
     75 do_test insert-1.6 {
     76   execsql {DELETE FROM test1}
     77   execsql {INSERT INTO test1(one,two) VALUES(1,2)}
     78   execsql {SELECT * FROM test1 ORDER BY one}
     79 } {1 2 {}}
     80 do_test insert-1.6b {
     81   execsql {INSERT INTO test1(two,three) VALUES(5,6)}
     82   execsql {SELECT * FROM test1 ORDER BY one}
     83 } {{} 5 6 1 2 {}}
     84 do_test insert-1.6c {
     85   execsql {INSERT INTO test1(three,one) VALUES(7,8)}
     86   execsql {SELECT * FROM test1 ORDER BY one}
     87 } {{} 5 6 1 2 {} 8 {} 7}
     88 
     89 # A table to use for testing default values
     90 #
     91 do_test insert-2.1 {
     92   execsql {
     93     CREATE TABLE test2(
     94       f1 int default -111, 
     95       f2 real default +4.32,
     96       f3 int default +222,
     97       f4 int default 7.89
     98     )
     99   }
    100   execsql {SELECT * from test2}
    101 } {}
    102 do_test insert-2.2 {
    103   execsql {INSERT INTO test2(f1,f3) VALUES(+10,-10)}
    104   execsql {SELECT * FROM test2}
    105 } {10 4.32 -10 7.89}
    106 do_test insert-2.3 {
    107   execsql {INSERT INTO test2(f2,f4) VALUES(1.23,-3.45)}
    108   execsql {SELECT * FROM test2 WHERE f1==-111}
    109 } {-111 1.23 222 -3.45}
    110 do_test insert-2.4 {
    111   execsql {INSERT INTO test2(f1,f2,f4) VALUES(77,+1.23,3.45)}
    112   execsql {SELECT * FROM test2 WHERE f1==77}
    113 } {77 1.23 222 3.45}
    114 do_test insert-2.10 {
    115   execsql {
    116     DROP TABLE test2;
    117     CREATE TABLE test2(
    118       f1 int default 111, 
    119       f2 real default -4.32,
    120       f3 text default hi,
    121       f4 text default 'abc-123',
    122       f5 varchar(10)
    123     )
    124   }
    125   execsql {SELECT * from test2}
    126 } {}
    127 do_test insert-2.11 {
    128   execsql {INSERT INTO test2(f2,f4) VALUES(-2.22,'hi!')}
    129   execsql {SELECT * FROM test2}
    130 } {111 -2.22 hi hi! {}}
    131 do_test insert-2.12 {
    132   execsql {INSERT INTO test2(f1,f5) VALUES(1,'xyzzy')}
    133   execsql {SELECT * FROM test2 ORDER BY f1}
    134 } {1 -4.32 hi abc-123 xyzzy 111 -2.22 hi hi! {}}
    135 
    136 # Do additional inserts with default values, but this time
    137 # on a table that has indices.  In particular we want to verify
    138 # that the correct default values are inserted into the indices.
    139 #
    140 do_test insert-3.1 {
    141   execsql {
    142     DELETE FROM test2;
    143     CREATE INDEX index9 ON test2(f1,f2);
    144     CREATE INDEX indext ON test2(f4,f5);
    145     SELECT * from test2;
    146   }
    147 } {}
    148 
    149 # Update for sqlite3 v3:
    150 # Change the 111 to '111' in the following two test cases, because
    151 # the default value is being inserted as a string. TODO: It shouldn't be.
    152 do_test insert-3.2 {
    153   execsql {INSERT INTO test2(f2,f4) VALUES(-3.33,'hum')}
    154   execsql {SELECT * FROM test2 WHERE f1='111' AND f2=-3.33}
    155 } {111 -3.33 hi hum {}}
    156 do_test insert-3.3 {
    157   execsql {INSERT INTO test2(f1,f2,f5) VALUES(22,-4.44,'wham')}
    158   execsql {SELECT * FROM test2 WHERE f1='111' AND f2=-3.33}
    159 } {111 -3.33 hi hum {}}
    160 do_test insert-3.4 {
    161   execsql {SELECT * FROM test2 WHERE f1=22 AND f2=-4.44}
    162 } {22 -4.44 hi abc-123 wham}
    163 ifcapable {reindex} {
    164   do_test insert-3.5 {
    165     execsql REINDEX
    166   } {}
    167 }
    168 integrity_check insert-3.5
    169 
    170 # Test of expressions in the VALUES clause
    171 #
    172 do_test insert-4.1 {
    173   execsql {
    174     CREATE TABLE t3(a,b,c);
    175     INSERT INTO t3 VALUES(1+2+3,4,5);
    176     SELECT * FROM t3;
    177   }
    178 } {6 4 5}
    179 do_test insert-4.2 {
    180   ifcapable subquery {
    181     execsql {INSERT INTO t3 VALUES((SELECT max(a) FROM t3)+1,5,6);}
    182   } else {
    183     set maxa [execsql {SELECT max(a) FROM t3}]
    184     execsql "INSERT INTO t3 VALUES($maxa+1,5,6);"
    185   }
    186   execsql {
    187     SELECT * FROM t3 ORDER BY a;
    188   }
    189 } {6 4 5 7 5 6}
    190 ifcapable subquery {
    191   do_test insert-4.3 {
    192     catchsql {
    193       INSERT INTO t3 VALUES((SELECT max(a) FROM t3)+1,t3.a,6);
    194       SELECT * FROM t3 ORDER BY a;
    195     }
    196   } {1 {no such column: t3.a}}
    197 }
    198 do_test insert-4.4 {
    199   ifcapable subquery {
    200     execsql {INSERT INTO t3 VALUES((SELECT b FROM t3 WHERE a=0),6,7);}
    201   } else {
    202     set b [execsql {SELECT b FROM t3 WHERE a = 0}]
    203     if {$b==""} {set b NULL}
    204     execsql "INSERT INTO t3 VALUES($b,6,7);"
    205   }
    206   execsql {
    207     SELECT * FROM t3 ORDER BY a;
    208   }
    209 } {{} 6 7 6 4 5 7 5 6}
    210 do_test insert-4.5 {
    211   execsql {
    212     SELECT b,c FROM t3 WHERE a IS NULL;
    213   }
    214 } {6 7}
    215 do_test insert-4.6 {
    216   catchsql {
    217     INSERT INTO t3 VALUES(notafunc(2,3),2,3);
    218   }
    219 } {1 {no such function: notafunc}}
    220 do_test insert-4.7 {
    221   execsql {
    222     INSERT INTO t3 VALUES(min(1,2,3),max(1,2,3),99);
    223     SELECT * FROM t3 WHERE c=99;
    224   }
    225 } {1 3 99}
    226 
    227 # Test the ability to insert from a temporary table into itself.
    228 # Ticket #275.
    229 #
    230 ifcapable tempdb {
    231   do_test insert-5.1 {
    232     execsql {
    233       CREATE TEMP TABLE t4(x);
    234       INSERT INTO t4 VALUES(1);
    235       SELECT * FROM t4;
    236     }
    237   } {1}
    238   do_test insert-5.2 {
    239     execsql {
    240       INSERT INTO t4 SELECT x+1 FROM t4;
    241       SELECT * FROM t4;
    242     }
    243   } {1 2}
    244   ifcapable {explain} {
    245     do_test insert-5.3 {
    246       # verify that a temporary table is used to copy t4 to t4
    247       set x [execsql {
    248         EXPLAIN INSERT INTO t4 SELECT x+2 FROM t4;
    249       }]
    250       expr {[lsearch $x OpenEphemeral]>0}
    251     } {1}
    252   }
    253   
    254   do_test insert-5.4 {
    255     # Verify that table "test1" begins on page 3.  This should be the same
    256     # page number used by "t4" above.
    257     #
    258     # Update for v3 - the first table now begins on page 2 of each file, not 3.
    259     execsql {
    260       SELECT rootpage FROM sqlite_master WHERE name='test1';
    261     }
    262   } [expr $AUTOVACUUM?3:2]
    263   do_test insert-5.5 {
    264     # Verify that "t4" begins on page 3.
    265     #
    266     # Update for v3 - the first table now begins on page 2 of each file, not 3.
    267     execsql {
    268       SELECT rootpage FROM sqlite_temp_master WHERE name='t4';
    269     }
    270   } {2}
    271   do_test insert-5.6 {
    272     # This should not use an intermediate temporary table.
    273     execsql {
    274       INSERT INTO t4 SELECT one FROM test1 WHERE three=7;
    275       SELECT * FROM t4
    276     }
    277   } {1 2 8}
    278   ifcapable {explain} {
    279     do_test insert-5.7 {
    280       # verify that no temporary table is used to copy test1 to t4
    281       set x [execsql {
    282         EXPLAIN INSERT INTO t4 SELECT one FROM test1;
    283       }]
    284       expr {[lsearch $x OpenTemp]>0}
    285     } {0}
    286   }
    287 }
    288 
    289 # Ticket #334:  REPLACE statement corrupting indices.
    290 #
    291 ifcapable conflict {
    292   # The REPLACE command is not available if SQLITE_OMIT_CONFLICT is 
    293   # defined at compilation time.
    294   do_test insert-6.1 {
    295     execsql {
    296       CREATE TABLE t1(a INTEGER PRIMARY KEY, b UNIQUE);
    297       INSERT INTO t1 VALUES(1,2);
    298       INSERT INTO t1 VALUES(2,3);
    299       SELECT b FROM t1 WHERE b=2;
    300     }
    301   } {2}
    302   do_test insert-6.2 {
    303     execsql {
    304       REPLACE INTO t1 VALUES(1,4);
    305       SELECT b FROM t1 WHERE b=2;
    306     }
    307   } {}
    308   do_test insert-6.3 {
    309     execsql {
    310       UPDATE OR REPLACE t1 SET a=2 WHERE b=4;
    311       SELECT * FROM t1 WHERE b=4;
    312     }
    313   } {2 4}
    314   do_test insert-6.4 {
    315     execsql {
    316       SELECT * FROM t1 WHERE b=3;
    317     }
    318   } {}
    319   ifcapable {reindex} {
    320     do_test insert-6.5 {
    321       execsql REINDEX
    322     } {}
    323   }
    324   do_test insert-6.6 {
    325     execsql {
    326       DROP TABLE t1;
    327     }
    328   } {}
    329 }
    330 
    331 # Test that the special optimization for queries of the form 
    332 # "SELECT max(x) FROM tbl" where there is an index on tbl(x) works with 
    333 # INSERT statments.
    334 do_test insert-7.1 {
    335   execsql {
    336     CREATE TABLE t1(a);
    337     INSERT INTO t1 VALUES(1);
    338     INSERT INTO t1 VALUES(2);
    339     CREATE INDEX i1 ON t1(a);
    340   }
    341 } {}
    342 do_test insert-7.2 {
    343   execsql {
    344     INSERT INTO t1 SELECT max(a) FROM t1;
    345   }
    346 } {}
    347 do_test insert-7.3 {
    348   execsql {
    349     SELECT a FROM t1;
    350   }
    351 } {1 2 2}
    352 
    353 # Ticket #1140:  Check for an infinite loop in the algorithm that tests
    354 # to see if the right-hand side of an INSERT...SELECT references the left-hand
    355 # side.
    356 #
    357 ifcapable subquery&&compound {
    358   do_test insert-8.1 {
    359     execsql {
    360       INSERT INTO t3 SELECT * FROM (SELECT * FROM t3 UNION ALL SELECT 1,2,3)
    361     }
    362   } {}
    363 }
    364 
    365 # Make sure the rowid cache in the VDBE is reset correctly when
    366 # an explicit rowid is given.
    367 #
    368 do_test insert-9.1 {
    369   execsql {
    370     CREATE TABLE t5(x);
    371     INSERT INTO t5 VALUES(1);
    372     INSERT INTO t5 VALUES(2);
    373     INSERT INTO t5 VALUES(3);
    374     INSERT INTO t5(rowid, x) SELECT nullif(x*2+10,14), x+100 FROM t5;
    375     SELECT rowid, x FROM t5;
    376   }
    377 } {1 1 2 2 3 3 12 101 13 102 16 103}
    378 do_test insert-9.2 {
    379   execsql {
    380     CREATE TABLE t6(x INTEGER PRIMARY KEY, y);
    381     INSERT INTO t6 VALUES(1,1);
    382     INSERT INTO t6 VALUES(2,2);
    383     INSERT INTO t6 VALUES(3,3);
    384     INSERT INTO t6 SELECT nullif(y*2+10,14), y+100 FROM t6;
    385     SELECT x, y FROM t6;
    386   }
    387 } {1 1 2 2 3 3 12 101 13 102 16 103}
    388 
    389 integrity_check insert-99.0
    390 
    391 finish_test
    392