OLD | NEW |
(Empty) | |
| 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 CREATE TABLE statement. |
| 13 # |
| 14 |
| 15 set testdir [file dirname $argv0] |
| 16 source $testdir/tester.tcl |
| 17 |
| 18 # Create a basic table and verify it is added to sqlite_master |
| 19 # |
| 20 do_test table-1.1 { |
| 21 execsql { |
| 22 CREATE TABLE test1 ( |
| 23 one varchar(10), |
| 24 two text |
| 25 ) |
| 26 } |
| 27 execsql { |
| 28 SELECT sql FROM sqlite_master WHERE type!='meta' |
| 29 } |
| 30 } {{CREATE TABLE test1 ( |
| 31 one varchar(10), |
| 32 two text |
| 33 )}} |
| 34 |
| 35 |
| 36 # Verify the other fields of the sqlite_master file. |
| 37 # |
| 38 do_test table-1.3 { |
| 39 execsql {SELECT name, tbl_name, type FROM sqlite_master WHERE type!='meta'} |
| 40 } {test1 test1 table} |
| 41 |
| 42 # Close and reopen the database. Verify that everything is |
| 43 # still the same. |
| 44 # |
| 45 do_test table-1.4 { |
| 46 db close |
| 47 sqlite3 db test.db |
| 48 execsql {SELECT name, tbl_name, type from sqlite_master WHERE type!='meta'} |
| 49 } {test1 test1 table} |
| 50 |
| 51 # Drop the database and make sure it disappears. |
| 52 # |
| 53 do_test table-1.5 { |
| 54 execsql {DROP TABLE test1} |
| 55 execsql {SELECT * FROM sqlite_master WHERE type!='meta'} |
| 56 } {} |
| 57 |
| 58 # Close and reopen the database. Verify that the table is |
| 59 # still gone. |
| 60 # |
| 61 do_test table-1.6 { |
| 62 db close |
| 63 sqlite3 db test.db |
| 64 execsql {SELECT name FROM sqlite_master WHERE type!='meta'} |
| 65 } {} |
| 66 |
| 67 # Repeat the above steps, but this time quote the table name. |
| 68 # |
| 69 do_test table-1.10 { |
| 70 execsql {CREATE TABLE "create" (f1 int)} |
| 71 execsql {SELECT name FROM sqlite_master WHERE type!='meta'} |
| 72 } {create} |
| 73 do_test table-1.11 { |
| 74 execsql {DROP TABLE "create"} |
| 75 execsql {SELECT name FROM "sqlite_master" WHERE type!='meta'} |
| 76 } {} |
| 77 do_test table-1.12 { |
| 78 execsql {CREATE TABLE test1("f1 ho" int)} |
| 79 execsql {SELECT name as "X" FROM sqlite_master WHERE type!='meta'} |
| 80 } {test1} |
| 81 do_test table-1.13 { |
| 82 execsql {DROP TABLE "TEST1"} |
| 83 execsql {SELECT name FROM "sqlite_master" WHERE type!='meta'} |
| 84 } {} |
| 85 |
| 86 |
| 87 |
| 88 # Verify that we cannot make two tables with the same name |
| 89 # |
| 90 do_test table-2.1 { |
| 91 execsql {CREATE TABLE TEST2(one text)} |
| 92 catchsql {CREATE TABLE test2(two text default 'hi')} |
| 93 } {1 {table test2 already exists}} |
| 94 do_test table-2.1.1 { |
| 95 catchsql {CREATE TABLE "test2" (two)} |
| 96 } {1 {table "test2" already exists}} |
| 97 do_test table-2.1b { |
| 98 set v [catch {execsql {CREATE TABLE sqlite_master(two text)}} msg] |
| 99 lappend v $msg |
| 100 } {1 {object name reserved for internal use: sqlite_master}} |
| 101 do_test table-2.1c { |
| 102 db close |
| 103 sqlite3 db test.db |
| 104 set v [catch {execsql {CREATE TABLE sqlite_master(two text)}} msg] |
| 105 lappend v $msg |
| 106 } {1 {object name reserved for internal use: sqlite_master}} |
| 107 do_test table-2.1d { |
| 108 catchsql {CREATE TABLE IF NOT EXISTS test2(x,y)} |
| 109 } {0 {}} |
| 110 do_test table-2.1e { |
| 111 catchsql {CREATE TABLE IF NOT EXISTS test2(x UNIQUE, y TEXT PRIMARY KEY)} |
| 112 } {0 {}} |
| 113 do_test table-2.1f { |
| 114 execsql {DROP TABLE test2; SELECT name FROM sqlite_master WHERE type!='meta'} |
| 115 } {} |
| 116 |
| 117 # Verify that we cannot make a table with the same name as an index |
| 118 # |
| 119 do_test table-2.2a { |
| 120 execsql {CREATE TABLE test2(one text)} |
| 121 execsql {CREATE INDEX test3 ON test2(one)} |
| 122 catchsql {CREATE TABLE test3(two text)} |
| 123 } {1 {there is already an index named test3}} |
| 124 do_test table-2.2b { |
| 125 db close |
| 126 sqlite3 db test.db |
| 127 set v [catch {execsql {CREATE TABLE test3(two text)}} msg] |
| 128 lappend v $msg |
| 129 } {1 {there is already an index named test3}} |
| 130 do_test table-2.2c { |
| 131 execsql {SELECT name FROM sqlite_master WHERE type!='meta' ORDER BY name} |
| 132 } {test2 test3} |
| 133 do_test table-2.2d { |
| 134 execsql {DROP INDEX test3} |
| 135 set v [catch {execsql {CREATE TABLE test3(two text)}} msg] |
| 136 lappend v $msg |
| 137 } {0 {}} |
| 138 do_test table-2.2e { |
| 139 execsql {SELECT name FROM sqlite_master WHERE type!='meta' ORDER BY name} |
| 140 } {test2 test3} |
| 141 do_test table-2.2f { |
| 142 execsql {DROP TABLE test2; DROP TABLE test3} |
| 143 execsql {SELECT name FROM sqlite_master WHERE type!='meta' ORDER BY name} |
| 144 } {} |
| 145 |
| 146 # Create a table with many field names |
| 147 # |
| 148 set big_table \ |
| 149 {CREATE TABLE big( |
| 150 f1 varchar(20), |
| 151 f2 char(10), |
| 152 f3 varchar(30) primary key, |
| 153 f4 text, |
| 154 f5 text, |
| 155 f6 text, |
| 156 f7 text, |
| 157 f8 text, |
| 158 f9 text, |
| 159 f10 text, |
| 160 f11 text, |
| 161 f12 text, |
| 162 f13 text, |
| 163 f14 text, |
| 164 f15 text, |
| 165 f16 text, |
| 166 f17 text, |
| 167 f18 text, |
| 168 f19 text, |
| 169 f20 text |
| 170 )} |
| 171 do_test table-3.1 { |
| 172 execsql $big_table |
| 173 execsql {SELECT sql FROM sqlite_master WHERE type=='table'} |
| 174 } \{$big_table\} |
| 175 do_test table-3.2 { |
| 176 set v [catch {execsql {CREATE TABLE BIG(xyz foo)}} msg] |
| 177 lappend v $msg |
| 178 } {1 {table BIG already exists}} |
| 179 do_test table-3.3 { |
| 180 set v [catch {execsql {CREATE TABLE biG(xyz foo)}} msg] |
| 181 lappend v $msg |
| 182 } {1 {table biG already exists}} |
| 183 do_test table-3.4 { |
| 184 set v [catch {execsql {CREATE TABLE bIg(xyz foo)}} msg] |
| 185 lappend v $msg |
| 186 } {1 {table bIg already exists}} |
| 187 do_test table-3.5 { |
| 188 db close |
| 189 sqlite3 db test.db |
| 190 set v [catch {execsql {CREATE TABLE Big(xyz foo)}} msg] |
| 191 lappend v $msg |
| 192 } {1 {table Big already exists}} |
| 193 do_test table-3.6 { |
| 194 execsql {DROP TABLE big} |
| 195 execsql {SELECT name FROM sqlite_master WHERE type!='meta'} |
| 196 } {} |
| 197 |
| 198 # Try creating large numbers of tables |
| 199 # |
| 200 set r {} |
| 201 for {set i 1} {$i<=100} {incr i} { |
| 202 lappend r [format test%03d $i] |
| 203 } |
| 204 do_test table-4.1 { |
| 205 for {set i 1} {$i<=100} {incr i} { |
| 206 set sql "CREATE TABLE [format test%03d $i] (" |
| 207 for {set k 1} {$k<$i} {incr k} { |
| 208 append sql "field$k text," |
| 209 } |
| 210 append sql "last_field text)" |
| 211 execsql $sql |
| 212 } |
| 213 execsql {SELECT name FROM sqlite_master WHERE type!='meta' ORDER BY name} |
| 214 } $r |
| 215 do_test table-4.1b { |
| 216 db close |
| 217 sqlite3 db test.db |
| 218 execsql {SELECT name FROM sqlite_master WHERE type!='meta' ORDER BY name} |
| 219 } $r |
| 220 |
| 221 # Drop the even numbered tables |
| 222 # |
| 223 set r {} |
| 224 for {set i 1} {$i<=100} {incr i 2} { |
| 225 lappend r [format test%03d $i] |
| 226 } |
| 227 do_test table-4.2 { |
| 228 for {set i 2} {$i<=100} {incr i 2} { |
| 229 # if {$i==38} {execsql {pragma vdbe_trace=on}} |
| 230 set sql "DROP TABLE [format TEST%03d $i]" |
| 231 execsql $sql |
| 232 } |
| 233 execsql {SELECT name FROM sqlite_master WHERE type!='meta' ORDER BY name} |
| 234 } $r |
| 235 #exit |
| 236 |
| 237 # Drop the odd number tables |
| 238 # |
| 239 do_test table-4.3 { |
| 240 for {set i 1} {$i<=100} {incr i 2} { |
| 241 set sql "DROP TABLE [format test%03d $i]" |
| 242 execsql $sql |
| 243 } |
| 244 execsql {SELECT name FROM sqlite_master WHERE type!='meta' ORDER BY name} |
| 245 } {} |
| 246 |
| 247 # Try to drop a table that does not exist |
| 248 # |
| 249 do_test table-5.1.1 { |
| 250 catchsql {DROP TABLE test009} |
| 251 } {1 {no such table: test009}} |
| 252 do_test table-5.1.2 { |
| 253 catchsql {DROP TABLE IF EXISTS test009} |
| 254 } {0 {}} |
| 255 |
| 256 # Try to drop sqlite_master |
| 257 # |
| 258 do_test table-5.2 { |
| 259 catchsql {DROP TABLE IF EXISTS sqlite_master} |
| 260 } {1 {table sqlite_master may not be dropped}} |
| 261 |
| 262 # Dropping sqlite_statN tables is OK. |
| 263 # |
| 264 do_test table-5.2.1 { |
| 265 db eval { |
| 266 ANALYZE; |
| 267 DROP TABLE IF EXISTS sqlite_stat1; |
| 268 DROP TABLE IF EXISTS sqlite_stat2; |
| 269 DROP TABLE IF EXISTS sqlite_stat3; |
| 270 DROP TABLE IF EXISTS sqlite_stat4; |
| 271 SELECT name FROM sqlite_master WHERE name GLOB 'sqlite_stat*'; |
| 272 } |
| 273 } {} |
| 274 |
| 275 do_test table-5.2.2 { |
| 276 db close |
| 277 forcedelete test.db |
| 278 sqlite3 db test.db |
| 279 db eval { |
| 280 CREATE TABLE t0(a,b); |
| 281 CREATE INDEX t ON t0(a); |
| 282 PRAGMA writable_schema=ON; |
| 283 UPDATE sqlite_master SET sql='CREATE TABLE a.b(a UNIQUE'; |
| 284 BEGIN; |
| 285 CREATE TABLE t1(x); |
| 286 ROLLBACK; |
| 287 DROP TABLE IF EXISTS t99; |
| 288 } |
| 289 } {} |
| 290 db close |
| 291 forcedelete test.db |
| 292 sqlite3 db test.db |
| 293 |
| 294 # Make sure an EXPLAIN does not really create a new table |
| 295 # |
| 296 do_test table-5.3 { |
| 297 ifcapable {explain} { |
| 298 execsql {EXPLAIN CREATE TABLE test1(f1 int)} |
| 299 } |
| 300 execsql {SELECT name FROM sqlite_master WHERE type!='meta'} |
| 301 } {} |
| 302 |
| 303 # Make sure an EXPLAIN does not really drop an existing table |
| 304 # |
| 305 do_test table-5.4 { |
| 306 execsql {CREATE TABLE test1(f1 int)} |
| 307 ifcapable {explain} { |
| 308 execsql {EXPLAIN DROP TABLE test1} |
| 309 } |
| 310 execsql {SELECT name FROM sqlite_master WHERE type!='meta'} |
| 311 } {test1} |
| 312 |
| 313 # Create a table with a goofy name |
| 314 # |
| 315 #do_test table-6.1 { |
| 316 # execsql {CREATE TABLE 'Spaces In This Name!'(x int)} |
| 317 # execsql {INSERT INTO 'spaces in this name!' VALUES(1)} |
| 318 # set list [glob -nocomplain testdb/spaces*.tbl] |
| 319 #} {testdb/spaces+in+this+name+.tbl} |
| 320 |
| 321 # Try using keywords as table names or column names. |
| 322 # |
| 323 do_test table-7.1 { |
| 324 set v [catch {execsql { |
| 325 CREATE TABLE weird( |
| 326 desc text, |
| 327 asc text, |
| 328 key int, |
| 329 [14_vac] boolean, |
| 330 fuzzy_dog_12 varchar(10), |
| 331 begin blob, |
| 332 end clob |
| 333 ) |
| 334 }} msg] |
| 335 lappend v $msg |
| 336 } {0 {}} |
| 337 do_test table-7.2 { |
| 338 execsql { |
| 339 INSERT INTO weird VALUES('a','b',9,0,'xyz','hi','y''all'); |
| 340 SELECT * FROM weird; |
| 341 } |
| 342 } {a b 9 0 xyz hi y'all} |
| 343 do_test table-7.3 { |
| 344 execsql2 { |
| 345 SELECT * FROM weird; |
| 346 } |
| 347 } {desc a asc b key 9 14_vac 0 fuzzy_dog_12 xyz begin hi end y'all} |
| 348 do_test table-7.3 { |
| 349 execsql { |
| 350 CREATE TABLE savepoint(release); |
| 351 INSERT INTO savepoint(release) VALUES(10); |
| 352 UPDATE savepoint SET release = 5; |
| 353 SELECT release FROM savepoint; |
| 354 } |
| 355 } {5} |
| 356 |
| 357 # Try out the CREATE TABLE AS syntax |
| 358 # |
| 359 do_test table-8.1 { |
| 360 execsql2 { |
| 361 CREATE TABLE t2 AS SELECT * FROM weird; |
| 362 SELECT * FROM t2; |
| 363 } |
| 364 } {desc a asc b key 9 14_vac 0 fuzzy_dog_12 xyz begin hi end y'all} |
| 365 do_test table-8.1.1 { |
| 366 execsql { |
| 367 SELECT sql FROM sqlite_master WHERE name='t2'; |
| 368 } |
| 369 } {{CREATE TABLE t2( |
| 370 "desc" TEXT, |
| 371 "asc" TEXT, |
| 372 "key" INT, |
| 373 "14_vac" NUM, |
| 374 fuzzy_dog_12 TEXT, |
| 375 "begin", |
| 376 "end" TEXT |
| 377 )}} |
| 378 do_test table-8.2 { |
| 379 execsql { |
| 380 CREATE TABLE "t3""xyz"(a,b,c); |
| 381 INSERT INTO [t3"xyz] VALUES(1,2,3); |
| 382 SELECT * FROM [t3"xyz]; |
| 383 } |
| 384 } {1 2 3} |
| 385 do_test table-8.3 { |
| 386 execsql2 { |
| 387 CREATE TABLE [t4"abc] AS SELECT count(*) as cnt, max(b+c) FROM [t3"xyz]; |
| 388 SELECT * FROM [t4"abc]; |
| 389 } |
| 390 } {cnt 1 max(b+c) 5} |
| 391 |
| 392 # Update for v3: The declaration type of anything except a column is now a |
| 393 # NULL pointer, so the created table has no column types. (Changed result |
| 394 # from {{CREATE TABLE 't4"abc'(cnt NUMERIC,"max(b+c)" NUMERIC)}}). |
| 395 do_test table-8.3.1 { |
| 396 execsql { |
| 397 SELECT sql FROM sqlite_master WHERE name='t4"abc' |
| 398 } |
| 399 } {{CREATE TABLE "t4""abc"(cnt,"max(b+c)")}} |
| 400 |
| 401 ifcapable tempdb { |
| 402 do_test table-8.4 { |
| 403 execsql2 { |
| 404 CREATE TEMPORARY TABLE t5 AS SELECT count(*) AS [y'all] FROM [t3"xyz]; |
| 405 SELECT * FROM t5; |
| 406 } |
| 407 } {y'all 1} |
| 408 } |
| 409 |
| 410 do_test table-8.5 { |
| 411 db close |
| 412 sqlite3 db test.db |
| 413 execsql2 { |
| 414 SELECT * FROM [t4"abc]; |
| 415 } |
| 416 } {cnt 1 max(b+c) 5} |
| 417 do_test table-8.6 { |
| 418 execsql2 { |
| 419 SELECT * FROM t2; |
| 420 } |
| 421 } {desc a asc b key 9 14_vac 0 fuzzy_dog_12 xyz begin hi end y'all} |
| 422 do_test table-8.7 { |
| 423 catchsql { |
| 424 SELECT * FROM t5; |
| 425 } |
| 426 } {1 {no such table: t5}} |
| 427 do_test table-8.8 { |
| 428 catchsql { |
| 429 CREATE TABLE t5 AS SELECT * FROM no_such_table; |
| 430 } |
| 431 } {1 {no such table: no_such_table}} |
| 432 |
| 433 do_test table-8.9 { |
| 434 execsql { |
| 435 CREATE TABLE t10("col.1" [char.3]); |
| 436 CREATE TABLE t11 AS SELECT * FROM t10; |
| 437 SELECT sql FROM sqlite_master WHERE name = 't11'; |
| 438 } |
| 439 } {{CREATE TABLE t11("col.1" TEXT)}} |
| 440 do_test table-8.10 { |
| 441 execsql { |
| 442 CREATE TABLE t12( |
| 443 a INTEGER, |
| 444 b VARCHAR(10), |
| 445 c VARCHAR(1,10), |
| 446 d VARCHAR(+1,-10), |
| 447 e VARCHAR (+1,-10), |
| 448 f "VARCHAR (+1,-10, 5)", |
| 449 g BIG INTEGER |
| 450 ); |
| 451 CREATE TABLE t13 AS SELECT * FROM t12; |
| 452 SELECT sql FROM sqlite_master WHERE name = 't13'; |
| 453 } |
| 454 } {{CREATE TABLE t13( |
| 455 a INT, |
| 456 b TEXT, |
| 457 c TEXT, |
| 458 d TEXT, |
| 459 e TEXT, |
| 460 f TEXT, |
| 461 g INT |
| 462 )}} |
| 463 |
| 464 # Make sure we cannot have duplicate column names within a table. |
| 465 # |
| 466 do_test table-9.1 { |
| 467 catchsql { |
| 468 CREATE TABLE t6(a,b,a); |
| 469 } |
| 470 } {1 {duplicate column name: a}} |
| 471 do_test table-9.2 { |
| 472 catchsql { |
| 473 CREATE TABLE t6(a varchar(100), b blob, a integer); |
| 474 } |
| 475 } {1 {duplicate column name: a}} |
| 476 |
| 477 # Check the foreign key syntax. |
| 478 # |
| 479 ifcapable {foreignkey} { |
| 480 do_test table-10.1 { |
| 481 catchsql { |
| 482 CREATE TABLE t6(a REFERENCES t4(a) NOT NULL); |
| 483 INSERT INTO t6 VALUES(NULL); |
| 484 } |
| 485 } {1 {NOT NULL constraint failed: t6.a}} |
| 486 do_test table-10.2 { |
| 487 catchsql { |
| 488 DROP TABLE t6; |
| 489 CREATE TABLE t6(a REFERENCES t4(a) MATCH PARTIAL); |
| 490 } |
| 491 } {0 {}} |
| 492 do_test table-10.3 { |
| 493 catchsql { |
| 494 DROP TABLE t6; |
| 495 CREATE TABLE t6(a REFERENCES t4 MATCH FULL ON DELETE SET NULL NOT NULL); |
| 496 } |
| 497 } {0 {}} |
| 498 do_test table-10.4 { |
| 499 catchsql { |
| 500 DROP TABLE t6; |
| 501 CREATE TABLE t6(a REFERENCES t4 MATCH FULL ON UPDATE SET DEFAULT DEFAULT 1); |
| 502 } |
| 503 } {0 {}} |
| 504 do_test table-10.5 { |
| 505 catchsql { |
| 506 DROP TABLE t6; |
| 507 CREATE TABLE t6(a NOT NULL NOT DEFERRABLE INITIALLY IMMEDIATE); |
| 508 } |
| 509 } {0 {}} |
| 510 do_test table-10.6 { |
| 511 catchsql { |
| 512 DROP TABLE t6; |
| 513 CREATE TABLE t6(a NOT NULL DEFERRABLE INITIALLY DEFERRED); |
| 514 } |
| 515 } {0 {}} |
| 516 do_test table-10.7 { |
| 517 catchsql { |
| 518 DROP TABLE t6; |
| 519 CREATE TABLE t6(a, |
| 520 FOREIGN KEY (a) REFERENCES t4(b) DEFERRABLE INITIALLY DEFERRED |
| 521 ); |
| 522 } |
| 523 } {0 {}} |
| 524 do_test table-10.8 { |
| 525 catchsql { |
| 526 DROP TABLE t6; |
| 527 CREATE TABLE t6(a,b,c, |
| 528 FOREIGN KEY (b,c) REFERENCES t4(x,y) MATCH PARTIAL |
| 529 ON UPDATE SET NULL ON DELETE CASCADE DEFERRABLE INITIALLY DEFERRED |
| 530 ); |
| 531 } |
| 532 } {0 {}} |
| 533 do_test table-10.9 { |
| 534 catchsql { |
| 535 DROP TABLE t6; |
| 536 CREATE TABLE t6(a,b,c, |
| 537 FOREIGN KEY (b,c) REFERENCES t4(x) |
| 538 ); |
| 539 } |
| 540 } {1 {number of columns in foreign key does not match the number of columns in t
he referenced table}} |
| 541 do_test table-10.10 { |
| 542 catchsql {DROP TABLE t6} |
| 543 catchsql { |
| 544 CREATE TABLE t6(a,b,c, |
| 545 FOREIGN KEY (b,c) REFERENCES t4(x,y,z) |
| 546 ); |
| 547 } |
| 548 } {1 {number of columns in foreign key does not match the number of columns in t
he referenced table}} |
| 549 do_test table-10.11 { |
| 550 catchsql {DROP TABLE t6} |
| 551 catchsql { |
| 552 CREATE TABLE t6(a,b, c REFERENCES t4(x,y)); |
| 553 } |
| 554 } {1 {foreign key on c should reference only one column of table t4}} |
| 555 do_test table-10.12 { |
| 556 catchsql {DROP TABLE t6} |
| 557 catchsql { |
| 558 CREATE TABLE t6(a,b,c, |
| 559 FOREIGN KEY (b,x) REFERENCES t4(x,y) |
| 560 ); |
| 561 } |
| 562 } {1 {unknown column "x" in foreign key definition}} |
| 563 do_test table-10.13 { |
| 564 catchsql {DROP TABLE t6} |
| 565 catchsql { |
| 566 CREATE TABLE t6(a,b,c, |
| 567 FOREIGN KEY (x,b) REFERENCES t4(x,y) |
| 568 ); |
| 569 } |
| 570 } {1 {unknown column "x" in foreign key definition}} |
| 571 } ;# endif foreignkey |
| 572 |
| 573 # Test for the "typeof" function. More tests for the |
| 574 # typeof() function are found in bind.test and types.test. |
| 575 # |
| 576 do_test table-11.1 { |
| 577 execsql { |
| 578 CREATE TABLE t7( |
| 579 a integer primary key, |
| 580 b number(5,10), |
| 581 c character varying (8), |
| 582 d VARCHAR(9), |
| 583 e clob, |
| 584 f BLOB, |
| 585 g Text, |
| 586 h |
| 587 ); |
| 588 INSERT INTO t7(a) VALUES(1); |
| 589 SELECT typeof(a), typeof(b), typeof(c), typeof(d), |
| 590 typeof(e), typeof(f), typeof(g), typeof(h) |
| 591 FROM t7 LIMIT 1; |
| 592 } |
| 593 } {integer null null null null null null null} |
| 594 do_test table-11.2 { |
| 595 execsql { |
| 596 SELECT typeof(a+b), typeof(a||b), typeof(c+d), typeof(c||d) |
| 597 FROM t7 LIMIT 1; |
| 598 } |
| 599 } {null null null null} |
| 600 |
| 601 # Test that when creating a table using CREATE TABLE AS, column types are |
| 602 # assigned correctly for (SELECT ...) and 'x AS y' expressions. |
| 603 do_test table-12.1 { |
| 604 ifcapable subquery { |
| 605 execsql { |
| 606 CREATE TABLE t8 AS SELECT b, h, a as i, (SELECT f FROM t7) as j FROM t7; |
| 607 } |
| 608 } else { |
| 609 execsql { |
| 610 CREATE TABLE t8 AS SELECT b, h, a as i, f as j FROM t7; |
| 611 } |
| 612 } |
| 613 } {} |
| 614 do_test table-12.2 { |
| 615 execsql { |
| 616 SELECT sql FROM sqlite_master WHERE tbl_name = 't8' |
| 617 } |
| 618 } {{CREATE TABLE t8(b NUM,h,i INT,j)}} |
| 619 |
| 620 #-------------------------------------------------------------------- |
| 621 # Test cases table-13.* |
| 622 # |
| 623 # Test the ability to have default values of CURRENT_TIME, CURRENT_DATE |
| 624 # and CURRENT_TIMESTAMP. |
| 625 # |
| 626 do_test table-13.1 { |
| 627 execsql { |
| 628 CREATE TABLE tablet8( |
| 629 a integer primary key, |
| 630 tm text DEFAULT CURRENT_TIME, |
| 631 dt text DEFAULT CURRENT_DATE, |
| 632 dttm text DEFAULT CURRENT_TIMESTAMP |
| 633 ); |
| 634 SELECT * FROM tablet8; |
| 635 } |
| 636 } {} |
| 637 set i 0 |
| 638 unset -nocomplain date time seconds |
| 639 foreach {date time seconds} { |
| 640 1976-07-04 12:00:00 205329600 |
| 641 1994-04-16 14:00:00 766504800 |
| 642 2000-01-01 00:00:00 946684800 |
| 643 2003-12-31 12:34:56 1072874096 |
| 644 } { |
| 645 incr i |
| 646 set sqlite_current_time $seconds |
| 647 do_test table-13.2.$i { |
| 648 execsql " |
| 649 INSERT INTO tablet8(a) VALUES($i); |
| 650 SELECT tm, dt, dttm FROM tablet8 WHERE a=$i; |
| 651 " |
| 652 } [list $time $date [list $date $time]] |
| 653 } |
| 654 set sqlite_current_time 0 |
| 655 |
| 656 #-------------------------------------------------------------------- |
| 657 # Test cases table-14.* |
| 658 # |
| 659 # Test that a table cannot be created or dropped while other virtual |
| 660 # machines are active. This is required because otherwise when in |
| 661 # auto-vacuum mode the btree-layer may need to move the root-pages of |
| 662 # a table for which there is an open cursor. |
| 663 # |
| 664 # 2007-05-02: A open btree cursor no longer blocks CREATE TABLE. |
| 665 # But DROP TABLE is still prohibited because we do not want to |
| 666 # delete a table out from under a running query. |
| 667 # |
| 668 |
| 669 # db eval { |
| 670 # pragma vdbe_trace = 0; |
| 671 # } |
| 672 # Try to create a table from within a callback: |
| 673 unset -nocomplain result |
| 674 do_test table-14.1 { |
| 675 set rc [ |
| 676 catch { |
| 677 db eval {SELECT * FROM tablet8 LIMIT 1} {} { |
| 678 db eval {CREATE TABLE t9(a, b, c)} |
| 679 } |
| 680 } msg |
| 681 ] |
| 682 set result [list $rc $msg] |
| 683 } {0 {}} |
| 684 |
| 685 # Try to drop a table from within a callback: |
| 686 do_test table-14.2 { |
| 687 set rc [ |
| 688 catch { |
| 689 db eval {SELECT * FROM tablet8 LIMIT 1} {} { |
| 690 db eval {DROP TABLE t9;} |
| 691 } |
| 692 } msg |
| 693 ] |
| 694 set result [list $rc $msg] |
| 695 } {1 {database table is locked}} |
| 696 |
| 697 ifcapable attach { |
| 698 # Now attach a database and ensure that a table can be created in the |
| 699 # attached database whilst in a callback from a query on the main database. |
| 700 do_test table-14.3 { |
| 701 forcedelete test2.db |
| 702 forcedelete test2.db-journal |
| 703 execsql { |
| 704 ATTACH 'test2.db' as aux; |
| 705 } |
| 706 db eval {SELECT * FROM tablet8 LIMIT 1} {} { |
| 707 db eval {CREATE TABLE aux.t1(a, b, c)} |
| 708 } |
| 709 } {} |
| 710 |
| 711 # On the other hand, it should be impossible to drop a table when any VMs |
| 712 # are active. This is because VerifyCookie instructions may have already |
| 713 # been executed, and btree root-pages may not move after this (which a |
| 714 # delete table might do). |
| 715 do_test table-14.4 { |
| 716 set rc [ |
| 717 catch { |
| 718 db eval {SELECT * FROM tablet8 LIMIT 1} {} { |
| 719 db eval {DROP TABLE aux.t1;} |
| 720 } |
| 721 } msg |
| 722 ] |
| 723 set result [list $rc $msg] |
| 724 } {1 {database table is locked}} |
| 725 } |
| 726 |
| 727 # Create and drop 2000 tables. This is to check that the balance_shallow() |
| 728 # routine works correctly on the sqlite_master table. At one point it |
| 729 # contained a bug that would prevent the right-child pointer of the |
| 730 # child page from being copied to the root page. |
| 731 # |
| 732 do_test table-15.1 { |
| 733 execsql {BEGIN} |
| 734 for {set i 0} {$i<2000} {incr i} { |
| 735 execsql "CREATE TABLE tbl$i (a, b, c)" |
| 736 } |
| 737 execsql {COMMIT} |
| 738 } {} |
| 739 do_test table-15.2 { |
| 740 execsql {BEGIN} |
| 741 for {set i 0} {$i<2000} {incr i} { |
| 742 execsql "DROP TABLE tbl$i" |
| 743 } |
| 744 execsql {COMMIT} |
| 745 } {} |
| 746 |
| 747 # Ticket 3a88d85f36704eebe134f7f48aebf00cd6438c1a (2014-08-05) |
| 748 # The following SQL script segfaults while running the INSERT statement: |
| 749 # |
| 750 # CREATE TABLE t1(x DEFAULT(max(1))); |
| 751 # INSERT INTO t1(rowid) VALUES(1); |
| 752 # |
| 753 # The problem appears to be the use of an aggregate function as part of |
| 754 # the default value for a column. This problem has been in the code since |
| 755 # at least 2006-01-01 and probably before that. This problem was detected |
| 756 # and reported on the sqlite-users@sqlite.org mailing list by Zsbán Ambrus. |
| 757 # |
| 758 do_execsql_test table-16.1 { |
| 759 CREATE TABLE t16(x DEFAULT(max(1))); |
| 760 INSERT INTO t16(x) VALUES(123); |
| 761 SELECT rowid, x FROM t16; |
| 762 } {1 123} |
| 763 do_catchsql_test table-16.2 { |
| 764 INSERT INTO t16(rowid) VALUES(4); |
| 765 } {1 {unknown function: max()}} |
| 766 do_execsql_test table-16.3 { |
| 767 DROP TABLE t16; |
| 768 CREATE TABLE t16(x DEFAULT(abs(1))); |
| 769 INSERT INTO t16(rowid) VALUES(4); |
| 770 SELECT rowid, x FROM t16; |
| 771 } {4 1} |
| 772 do_catchsql_test table-16.4 { |
| 773 DROP TABLE t16; |
| 774 CREATE TABLE t16(x DEFAULT(avg(1))); |
| 775 INSERT INTO t16(rowid) VALUES(123); |
| 776 SELECT rowid, x FROM t16; |
| 777 } {1 {unknown function: avg()}} |
| 778 do_catchsql_test table-16.5 { |
| 779 DROP TABLE t16; |
| 780 CREATE TABLE t16(x DEFAULT(count())); |
| 781 INSERT INTO t16(rowid) VALUES(123); |
| 782 SELECT rowid, x FROM t16; |
| 783 } {1 {unknown function: count()}} |
| 784 do_catchsql_test table-16.6 { |
| 785 DROP TABLE t16; |
| 786 CREATE TABLE t16(x DEFAULT(group_concat('x',','))); |
| 787 INSERT INTO t16(rowid) VALUES(123); |
| 788 SELECT rowid, x FROM t16; |
| 789 } {1 {unknown function: group_concat()}} |
| 790 do_catchsql_test table-16.7 { |
| 791 INSERT INTO t16 DEFAULT VALUES; |
| 792 } {1 {unknown function: group_concat()}} |
| 793 |
| 794 # Ticket [https://www.sqlite.org/src/info/094d39a4c95ee4abbc417f04214617675ba15c
63] |
| 795 # describes a assertion fault that occurs on a CREATE TABLE .. AS SELECT stateme
nt. |
| 796 # the following test verifies that the problem has been fixed. |
| 797 # |
| 798 do_execsql_test table-17.1 { |
| 799 DROP TABLE IF EXISTS t1; |
| 800 CREATE TABLE t1(a TEXT); |
| 801 INSERT INTO t1(a) VALUES(1),(2); |
| 802 DROP TABLE IF EXISTS t2; |
| 803 CREATE TABLE t2(x TEXT, y TEXT); |
| 804 INSERT INTO t2(x,y) VALUES(3,4); |
| 805 DROP TABLE IF EXISTS t3; |
| 806 CREATE TABLE t3 AS |
| 807 SELECT a AS p, coalesce(y,a) AS q FROM t1 LEFT JOIN t2 ON a=x; |
| 808 SELECT p, q, '|' FROM t3 ORDER BY p; |
| 809 } {1 1 | 2 2 |} |
| 810 |
| 811 # 2015-06-16 |
| 812 # Ticket [https://www.sqlite.org/src/tktview/873cae2b6e25b1991ce5e9b782f9cd0409b
96063] |
| 813 # Make sure a CREATE TABLE AS statement correctly rolls back partial changes to
the |
| 814 # sqlite_master table when the SELECT on the right-hand side aborts. |
| 815 # |
| 816 do_catchsql_test table-18.1 { |
| 817 DROP TABLE IF EXISTS t1; |
| 818 BEGIN; |
| 819 CREATE TABLE t1 AS SELECT zeroblob(2e20); |
| 820 } {1 {string or blob too big}} |
| 821 do_execsql_test table-18.2 { |
| 822 COMMIT; |
| 823 PRAGMA integrity_check; |
| 824 } {ok} |
| 825 |
| 826 # 2015-09-09 |
| 827 # Ticket [https://www.sqlite.org/src/info/acd12990885d9276] |
| 828 # "CREATE TABLE ... AS SELECT ... FROM sqlite_master" fails because the row |
| 829 # in the sqlite_master table for the next table is initially populated |
| 830 # with a NULL instead of a record created by OP_Record. |
| 831 # |
| 832 do_execsql_test table-19.1 { |
| 833 CREATE TABLE t19 AS SELECT * FROM sqlite_master; |
| 834 SELECT name FROM t19 ORDER BY name; |
| 835 } {{} savepoint t10 t11 t12 t13 t16 t2 t3 t3\"xyz t4\"abc t7 t8 t9 tablet8 test1
weird} |
| 836 |
| 837 |
| 838 |
| 839 finish_test |
OLD | NEW |