| 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 # Make sure an EXPLAIN does not really create a new table | |
| 276 # | |
| 277 do_test table-5.3 { | |
| 278 ifcapable {explain} { | |
| 279 execsql {EXPLAIN CREATE TABLE test1(f1 int)} | |
| 280 } | |
| 281 execsql {SELECT name FROM sqlite_master WHERE type!='meta'} | |
| 282 } {} | |
| 283 | |
| 284 # Make sure an EXPLAIN does not really drop an existing table | |
| 285 # | |
| 286 do_test table-5.4 { | |
| 287 execsql {CREATE TABLE test1(f1 int)} | |
| 288 ifcapable {explain} { | |
| 289 execsql {EXPLAIN DROP TABLE test1} | |
| 290 } | |
| 291 execsql {SELECT name FROM sqlite_master WHERE type!='meta'} | |
| 292 } {test1} | |
| 293 | |
| 294 # Create a table with a goofy name | |
| 295 # | |
| 296 #do_test table-6.1 { | |
| 297 # execsql {CREATE TABLE 'Spaces In This Name!'(x int)} | |
| 298 # execsql {INSERT INTO 'spaces in this name!' VALUES(1)} | |
| 299 # set list [glob -nocomplain testdb/spaces*.tbl] | |
| 300 #} {testdb/spaces+in+this+name+.tbl} | |
| 301 | |
| 302 # Try using keywords as table names or column names. | |
| 303 # | |
| 304 do_test table-7.1 { | |
| 305 set v [catch {execsql { | |
| 306 CREATE TABLE weird( | |
| 307 desc text, | |
| 308 asc text, | |
| 309 key int, | |
| 310 [14_vac] boolean, | |
| 311 fuzzy_dog_12 varchar(10), | |
| 312 begin blob, | |
| 313 end clob | |
| 314 ) | |
| 315 }} msg] | |
| 316 lappend v $msg | |
| 317 } {0 {}} | |
| 318 do_test table-7.2 { | |
| 319 execsql { | |
| 320 INSERT INTO weird VALUES('a','b',9,0,'xyz','hi','y''all'); | |
| 321 SELECT * FROM weird; | |
| 322 } | |
| 323 } {a b 9 0 xyz hi y'all} | |
| 324 do_test table-7.3 { | |
| 325 execsql2 { | |
| 326 SELECT * FROM weird; | |
| 327 } | |
| 328 } {desc a asc b key 9 14_vac 0 fuzzy_dog_12 xyz begin hi end y'all} | |
| 329 do_test table-7.3 { | |
| 330 execsql { | |
| 331 CREATE TABLE savepoint(release); | |
| 332 INSERT INTO savepoint(release) VALUES(10); | |
| 333 UPDATE savepoint SET release = 5; | |
| 334 SELECT release FROM savepoint; | |
| 335 } | |
| 336 } {5} | |
| 337 | |
| 338 # Try out the CREATE TABLE AS syntax | |
| 339 # | |
| 340 do_test table-8.1 { | |
| 341 execsql2 { | |
| 342 CREATE TABLE t2 AS SELECT * FROM weird; | |
| 343 SELECT * FROM t2; | |
| 344 } | |
| 345 } {desc a asc b key 9 14_vac 0 fuzzy_dog_12 xyz begin hi end y'all} | |
| 346 do_test table-8.1.1 { | |
| 347 execsql { | |
| 348 SELECT sql FROM sqlite_master WHERE name='t2'; | |
| 349 } | |
| 350 } {{CREATE TABLE t2( | |
| 351 "desc" TEXT, | |
| 352 "asc" TEXT, | |
| 353 "key" INT, | |
| 354 "14_vac" NUM, | |
| 355 fuzzy_dog_12 TEXT, | |
| 356 "begin", | |
| 357 "end" TEXT | |
| 358 )}} | |
| 359 do_test table-8.2 { | |
| 360 execsql { | |
| 361 CREATE TABLE "t3""xyz"(a,b,c); | |
| 362 INSERT INTO [t3"xyz] VALUES(1,2,3); | |
| 363 SELECT * FROM [t3"xyz]; | |
| 364 } | |
| 365 } {1 2 3} | |
| 366 do_test table-8.3 { | |
| 367 execsql2 { | |
| 368 CREATE TABLE [t4"abc] AS SELECT count(*) as cnt, max(b+c) FROM [t3"xyz]; | |
| 369 SELECT * FROM [t4"abc]; | |
| 370 } | |
| 371 } {cnt 1 max(b+c) 5} | |
| 372 | |
| 373 # Update for v3: The declaration type of anything except a column is now a | |
| 374 # NULL pointer, so the created table has no column types. (Changed result | |
| 375 # from {{CREATE TABLE 't4"abc'(cnt NUMERIC,"max(b+c)" NUMERIC)}}). | |
| 376 do_test table-8.3.1 { | |
| 377 execsql { | |
| 378 SELECT sql FROM sqlite_master WHERE name='t4"abc' | |
| 379 } | |
| 380 } {{CREATE TABLE "t4""abc"(cnt,"max(b+c)")}} | |
| 381 | |
| 382 ifcapable tempdb { | |
| 383 do_test table-8.4 { | |
| 384 execsql2 { | |
| 385 CREATE TEMPORARY TABLE t5 AS SELECT count(*) AS [y'all] FROM [t3"xyz]; | |
| 386 SELECT * FROM t5; | |
| 387 } | |
| 388 } {y'all 1} | |
| 389 } | |
| 390 | |
| 391 do_test table-8.5 { | |
| 392 db close | |
| 393 sqlite3 db test.db | |
| 394 execsql2 { | |
| 395 SELECT * FROM [t4"abc]; | |
| 396 } | |
| 397 } {cnt 1 max(b+c) 5} | |
| 398 do_test table-8.6 { | |
| 399 execsql2 { | |
| 400 SELECT * FROM t2; | |
| 401 } | |
| 402 } {desc a asc b key 9 14_vac 0 fuzzy_dog_12 xyz begin hi end y'all} | |
| 403 do_test table-8.7 { | |
| 404 catchsql { | |
| 405 SELECT * FROM t5; | |
| 406 } | |
| 407 } {1 {no such table: t5}} | |
| 408 do_test table-8.8 { | |
| 409 catchsql { | |
| 410 CREATE TABLE t5 AS SELECT * FROM no_such_table; | |
| 411 } | |
| 412 } {1 {no such table: no_such_table}} | |
| 413 | |
| 414 do_test table-8.9 { | |
| 415 execsql { | |
| 416 CREATE TABLE t10("col.1" [char.3]); | |
| 417 CREATE TABLE t11 AS SELECT * FROM t10; | |
| 418 SELECT sql FROM sqlite_master WHERE name = 't11'; | |
| 419 } | |
| 420 } {{CREATE TABLE t11("col.1" TEXT)}} | |
| 421 do_test table-8.10 { | |
| 422 execsql { | |
| 423 CREATE TABLE t12( | |
| 424 a INTEGER, | |
| 425 b VARCHAR(10), | |
| 426 c VARCHAR(1,10), | |
| 427 d VARCHAR(+1,-10), | |
| 428 e VARCHAR (+1,-10), | |
| 429 f "VARCHAR (+1,-10, 5)", | |
| 430 g BIG INTEGER | |
| 431 ); | |
| 432 CREATE TABLE t13 AS SELECT * FROM t12; | |
| 433 SELECT sql FROM sqlite_master WHERE name = 't13'; | |
| 434 } | |
| 435 } {{CREATE TABLE t13( | |
| 436 a INT, | |
| 437 b TEXT, | |
| 438 c TEXT, | |
| 439 d TEXT, | |
| 440 e TEXT, | |
| 441 f TEXT, | |
| 442 g INT | |
| 443 )}} | |
| 444 | |
| 445 # Make sure we cannot have duplicate column names within a table. | |
| 446 # | |
| 447 do_test table-9.1 { | |
| 448 catchsql { | |
| 449 CREATE TABLE t6(a,b,a); | |
| 450 } | |
| 451 } {1 {duplicate column name: a}} | |
| 452 do_test table-9.2 { | |
| 453 catchsql { | |
| 454 CREATE TABLE t6(a varchar(100), b blob, a integer); | |
| 455 } | |
| 456 } {1 {duplicate column name: a}} | |
| 457 | |
| 458 # Check the foreign key syntax. | |
| 459 # | |
| 460 ifcapable {foreignkey} { | |
| 461 do_test table-10.1 { | |
| 462 catchsql { | |
| 463 CREATE TABLE t6(a REFERENCES t4(a) NOT NULL); | |
| 464 INSERT INTO t6 VALUES(NULL); | |
| 465 } | |
| 466 } {1 {NOT NULL constraint failed: t6.a}} | |
| 467 do_test table-10.2 { | |
| 468 catchsql { | |
| 469 DROP TABLE t6; | |
| 470 CREATE TABLE t6(a REFERENCES t4(a) MATCH PARTIAL); | |
| 471 } | |
| 472 } {0 {}} | |
| 473 do_test table-10.3 { | |
| 474 catchsql { | |
| 475 DROP TABLE t6; | |
| 476 CREATE TABLE t6(a REFERENCES t4 MATCH FULL ON DELETE SET NULL NOT NULL); | |
| 477 } | |
| 478 } {0 {}} | |
| 479 do_test table-10.4 { | |
| 480 catchsql { | |
| 481 DROP TABLE t6; | |
| 482 CREATE TABLE t6(a REFERENCES t4 MATCH FULL ON UPDATE SET DEFAULT DEFAULT 1); | |
| 483 } | |
| 484 } {0 {}} | |
| 485 do_test table-10.5 { | |
| 486 catchsql { | |
| 487 DROP TABLE t6; | |
| 488 CREATE TABLE t6(a NOT NULL NOT DEFERRABLE INITIALLY IMMEDIATE); | |
| 489 } | |
| 490 } {0 {}} | |
| 491 do_test table-10.6 { | |
| 492 catchsql { | |
| 493 DROP TABLE t6; | |
| 494 CREATE TABLE t6(a NOT NULL DEFERRABLE INITIALLY DEFERRED); | |
| 495 } | |
| 496 } {0 {}} | |
| 497 do_test table-10.7 { | |
| 498 catchsql { | |
| 499 DROP TABLE t6; | |
| 500 CREATE TABLE t6(a, | |
| 501 FOREIGN KEY (a) REFERENCES t4(b) DEFERRABLE INITIALLY DEFERRED | |
| 502 ); | |
| 503 } | |
| 504 } {0 {}} | |
| 505 do_test table-10.8 { | |
| 506 catchsql { | |
| 507 DROP TABLE t6; | |
| 508 CREATE TABLE t6(a,b,c, | |
| 509 FOREIGN KEY (b,c) REFERENCES t4(x,y) MATCH PARTIAL | |
| 510 ON UPDATE SET NULL ON DELETE CASCADE DEFERRABLE INITIALLY DEFERRED | |
| 511 ); | |
| 512 } | |
| 513 } {0 {}} | |
| 514 do_test table-10.9 { | |
| 515 catchsql { | |
| 516 DROP TABLE t6; | |
| 517 CREATE TABLE t6(a,b,c, | |
| 518 FOREIGN KEY (b,c) REFERENCES t4(x) | |
| 519 ); | |
| 520 } | |
| 521 } {1 {number of columns in foreign key does not match the number of columns in t
he referenced table}} | |
| 522 do_test table-10.10 { | |
| 523 catchsql {DROP TABLE t6} | |
| 524 catchsql { | |
| 525 CREATE TABLE t6(a,b,c, | |
| 526 FOREIGN KEY (b,c) REFERENCES t4(x,y,z) | |
| 527 ); | |
| 528 } | |
| 529 } {1 {number of columns in foreign key does not match the number of columns in t
he referenced table}} | |
| 530 do_test table-10.11 { | |
| 531 catchsql {DROP TABLE t6} | |
| 532 catchsql { | |
| 533 CREATE TABLE t6(a,b, c REFERENCES t4(x,y)); | |
| 534 } | |
| 535 } {1 {foreign key on c should reference only one column of table t4}} | |
| 536 do_test table-10.12 { | |
| 537 catchsql {DROP TABLE t6} | |
| 538 catchsql { | |
| 539 CREATE TABLE t6(a,b,c, | |
| 540 FOREIGN KEY (b,x) REFERENCES t4(x,y) | |
| 541 ); | |
| 542 } | |
| 543 } {1 {unknown column "x" in foreign key definition}} | |
| 544 do_test table-10.13 { | |
| 545 catchsql {DROP TABLE t6} | |
| 546 catchsql { | |
| 547 CREATE TABLE t6(a,b,c, | |
| 548 FOREIGN KEY (x,b) REFERENCES t4(x,y) | |
| 549 ); | |
| 550 } | |
| 551 } {1 {unknown column "x" in foreign key definition}} | |
| 552 } ;# endif foreignkey | |
| 553 | |
| 554 # Test for the "typeof" function. More tests for the | |
| 555 # typeof() function are found in bind.test and types.test. | |
| 556 # | |
| 557 do_test table-11.1 { | |
| 558 execsql { | |
| 559 CREATE TABLE t7( | |
| 560 a integer primary key, | |
| 561 b number(5,10), | |
| 562 c character varying (8), | |
| 563 d VARCHAR(9), | |
| 564 e clob, | |
| 565 f BLOB, | |
| 566 g Text, | |
| 567 h | |
| 568 ); | |
| 569 INSERT INTO t7(a) VALUES(1); | |
| 570 SELECT typeof(a), typeof(b), typeof(c), typeof(d), | |
| 571 typeof(e), typeof(f), typeof(g), typeof(h) | |
| 572 FROM t7 LIMIT 1; | |
| 573 } | |
| 574 } {integer null null null null null null null} | |
| 575 do_test table-11.2 { | |
| 576 execsql { | |
| 577 SELECT typeof(a+b), typeof(a||b), typeof(c+d), typeof(c||d) | |
| 578 FROM t7 LIMIT 1; | |
| 579 } | |
| 580 } {null null null null} | |
| 581 | |
| 582 # Test that when creating a table using CREATE TABLE AS, column types are | |
| 583 # assigned correctly for (SELECT ...) and 'x AS y' expressions. | |
| 584 do_test table-12.1 { | |
| 585 ifcapable subquery { | |
| 586 execsql { | |
| 587 CREATE TABLE t8 AS SELECT b, h, a as i, (SELECT f FROM t7) as j FROM t7; | |
| 588 } | |
| 589 } else { | |
| 590 execsql { | |
| 591 CREATE TABLE t8 AS SELECT b, h, a as i, f as j FROM t7; | |
| 592 } | |
| 593 } | |
| 594 } {} | |
| 595 do_test table-12.2 { | |
| 596 execsql { | |
| 597 SELECT sql FROM sqlite_master WHERE tbl_name = 't8' | |
| 598 } | |
| 599 } {{CREATE TABLE t8(b NUM,h,i INT,j)}} | |
| 600 | |
| 601 #-------------------------------------------------------------------- | |
| 602 # Test cases table-13.* | |
| 603 # | |
| 604 # Test the ability to have default values of CURRENT_TIME, CURRENT_DATE | |
| 605 # and CURRENT_TIMESTAMP. | |
| 606 # | |
| 607 do_test table-13.1 { | |
| 608 execsql { | |
| 609 CREATE TABLE tablet8( | |
| 610 a integer primary key, | |
| 611 tm text DEFAULT CURRENT_TIME, | |
| 612 dt text DEFAULT CURRENT_DATE, | |
| 613 dttm text DEFAULT CURRENT_TIMESTAMP | |
| 614 ); | |
| 615 SELECT * FROM tablet8; | |
| 616 } | |
| 617 } {} | |
| 618 set i 0 | |
| 619 unset -nocomplain date time seconds | |
| 620 foreach {date time seconds} { | |
| 621 1976-07-04 12:00:00 205329600 | |
| 622 1994-04-16 14:00:00 766504800 | |
| 623 2000-01-01 00:00:00 946684800 | |
| 624 2003-12-31 12:34:56 1072874096 | |
| 625 } { | |
| 626 incr i | |
| 627 set sqlite_current_time $seconds | |
| 628 do_test table-13.2.$i { | |
| 629 execsql " | |
| 630 INSERT INTO tablet8(a) VALUES($i); | |
| 631 SELECT tm, dt, dttm FROM tablet8 WHERE a=$i; | |
| 632 " | |
| 633 } [list $time $date [list $date $time]] | |
| 634 } | |
| 635 set sqlite_current_time 0 | |
| 636 | |
| 637 #-------------------------------------------------------------------- | |
| 638 # Test cases table-14.* | |
| 639 # | |
| 640 # Test that a table cannot be created or dropped while other virtual | |
| 641 # machines are active. This is required because otherwise when in | |
| 642 # auto-vacuum mode the btree-layer may need to move the root-pages of | |
| 643 # a table for which there is an open cursor. | |
| 644 # | |
| 645 # 2007-05-02: A open btree cursor no longer blocks CREATE TABLE. | |
| 646 # But DROP TABLE is still prohibited because we do not want to | |
| 647 # delete a table out from under a running query. | |
| 648 # | |
| 649 | |
| 650 # db eval { | |
| 651 # pragma vdbe_trace = 0; | |
| 652 # } | |
| 653 # Try to create a table from within a callback: | |
| 654 unset -nocomplain result | |
| 655 do_test table-14.1 { | |
| 656 set rc [ | |
| 657 catch { | |
| 658 db eval {SELECT * FROM tablet8 LIMIT 1} {} { | |
| 659 db eval {CREATE TABLE t9(a, b, c)} | |
| 660 } | |
| 661 } msg | |
| 662 ] | |
| 663 set result [list $rc $msg] | |
| 664 } {0 {}} | |
| 665 | |
| 666 # Try to drop a table from within a callback: | |
| 667 do_test table-14.2 { | |
| 668 set rc [ | |
| 669 catch { | |
| 670 db eval {SELECT * FROM tablet8 LIMIT 1} {} { | |
| 671 db eval {DROP TABLE t9;} | |
| 672 } | |
| 673 } msg | |
| 674 ] | |
| 675 set result [list $rc $msg] | |
| 676 } {1 {database table is locked}} | |
| 677 | |
| 678 ifcapable attach { | |
| 679 # Now attach a database and ensure that a table can be created in the | |
| 680 # attached database whilst in a callback from a query on the main database. | |
| 681 do_test table-14.3 { | |
| 682 forcedelete test2.db | |
| 683 forcedelete test2.db-journal | |
| 684 execsql { | |
| 685 ATTACH 'test2.db' as aux; | |
| 686 } | |
| 687 db eval {SELECT * FROM tablet8 LIMIT 1} {} { | |
| 688 db eval {CREATE TABLE aux.t1(a, b, c)} | |
| 689 } | |
| 690 } {} | |
| 691 | |
| 692 # On the other hand, it should be impossible to drop a table when any VMs | |
| 693 # are active. This is because VerifyCookie instructions may have already | |
| 694 # been executed, and btree root-pages may not move after this (which a | |
| 695 # delete table might do). | |
| 696 do_test table-14.4 { | |
| 697 set rc [ | |
| 698 catch { | |
| 699 db eval {SELECT * FROM tablet8 LIMIT 1} {} { | |
| 700 db eval {DROP TABLE aux.t1;} | |
| 701 } | |
| 702 } msg | |
| 703 ] | |
| 704 set result [list $rc $msg] | |
| 705 } {1 {database table is locked}} | |
| 706 } | |
| 707 | |
| 708 # Create and drop 2000 tables. This is to check that the balance_shallow() | |
| 709 # routine works correctly on the sqlite_master table. At one point it | |
| 710 # contained a bug that would prevent the right-child pointer of the | |
| 711 # child page from being copied to the root page. | |
| 712 # | |
| 713 do_test table-15.1 { | |
| 714 execsql {BEGIN} | |
| 715 for {set i 0} {$i<2000} {incr i} { | |
| 716 execsql "CREATE TABLE tbl$i (a, b, c)" | |
| 717 } | |
| 718 execsql {COMMIT} | |
| 719 } {} | |
| 720 do_test table-15.2 { | |
| 721 execsql {BEGIN} | |
| 722 for {set i 0} {$i<2000} {incr i} { | |
| 723 execsql "DROP TABLE tbl$i" | |
| 724 } | |
| 725 execsql {COMMIT} | |
| 726 } {} | |
| 727 | |
| 728 # Ticket 3a88d85f36704eebe134f7f48aebf00cd6438c1a (2014-08-05) | |
| 729 # The following SQL script segfaults while running the INSERT statement: | |
| 730 # | |
| 731 # CREATE TABLE t1(x DEFAULT(max(1))); | |
| 732 # INSERT INTO t1(rowid) VALUES(1); | |
| 733 # | |
| 734 # The problem appears to be the use of an aggregate function as part of | |
| 735 # the default value for a column. This problem has been in the code since | |
| 736 # at least 2006-01-01 and probably before that. This problem was detected | |
| 737 # and reported on the sqlite-users@sqlite.org mailing list by Zsbán Ambrus. | |
| 738 # | |
| 739 do_execsql_test table-16.1 { | |
| 740 CREATE TABLE t16(x DEFAULT(max(1))); | |
| 741 INSERT INTO t16(x) VALUES(123); | |
| 742 SELECT rowid, x FROM t16; | |
| 743 } {1 123} | |
| 744 do_catchsql_test table-16.2 { | |
| 745 INSERT INTO t16(rowid) VALUES(4); | |
| 746 } {1 {unknown function: max()}} | |
| 747 do_execsql_test table-16.3 { | |
| 748 DROP TABLE t16; | |
| 749 CREATE TABLE t16(x DEFAULT(abs(1))); | |
| 750 INSERT INTO t16(rowid) VALUES(4); | |
| 751 SELECT rowid, x FROM t16; | |
| 752 } {4 1} | |
| 753 do_catchsql_test table-16.4 { | |
| 754 DROP TABLE t16; | |
| 755 CREATE TABLE t16(x DEFAULT(avg(1))); | |
| 756 INSERT INTO t16(rowid) VALUES(123); | |
| 757 SELECT rowid, x FROM t16; | |
| 758 } {1 {unknown function: avg()}} | |
| 759 do_catchsql_test table-16.5 { | |
| 760 DROP TABLE t16; | |
| 761 CREATE TABLE t16(x DEFAULT(count())); | |
| 762 INSERT INTO t16(rowid) VALUES(123); | |
| 763 SELECT rowid, x FROM t16; | |
| 764 } {1 {unknown function: count()}} | |
| 765 do_catchsql_test table-16.6 { | |
| 766 DROP TABLE t16; | |
| 767 CREATE TABLE t16(x DEFAULT(group_concat('x',','))); | |
| 768 INSERT INTO t16(rowid) VALUES(123); | |
| 769 SELECT rowid, x FROM t16; | |
| 770 } {1 {unknown function: group_concat()}} | |
| 771 do_catchsql_test table-16.7 { | |
| 772 INSERT INTO t16 DEFAULT VALUES; | |
| 773 } {1 {unknown function: group_concat()}} | |
| 774 | |
| 775 # Ticket [https://www.sqlite.org/src/info/094d39a4c95ee4abbc417f04214617675ba15c
63] | |
| 776 # describes a assertion fault that occurs on a CREATE TABLE .. AS SELECT stateme
nt. | |
| 777 # the following test verifies that the problem has been fixed. | |
| 778 # | |
| 779 do_execsql_test table-17.1 { | |
| 780 DROP TABLE IF EXISTS t1; | |
| 781 CREATE TABLE t1(a TEXT); | |
| 782 INSERT INTO t1(a) VALUES(1),(2); | |
| 783 DROP TABLE IF EXISTS t2; | |
| 784 CREATE TABLE t2(x TEXT, y TEXT); | |
| 785 INSERT INTO t2(x,y) VALUES(3,4); | |
| 786 DROP TABLE IF EXISTS t3; | |
| 787 CREATE TABLE t3 AS | |
| 788 SELECT a AS p, coalesce(y,a) AS q FROM t1 LEFT JOIN t2 ON a=x; | |
| 789 SELECT p, q, '|' FROM t3 ORDER BY p; | |
| 790 } {1 1 | 2 2 |} | |
| 791 | |
| 792 finish_test | |
| OLD | NEW |