third_party/sqlite/src/test/without_rowid4.test

   1 # 2013-11-04
   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 #
  12 # Regression testing of FOR EACH ROW table triggers on WITHOUT ROWID
  13 # tables.
  14 #
  15 # 1. Trigger execution order tests.
  16 # These tests ensure that BEFORE and AFTER triggers are fired at the correct
  17 # times relative to each other and the triggering statement.
  18 #
  19 # without_rowid4-1.1.*: ON UPDATE trigger execution model.
  20 # without_rowid4-1.2.*: DELETE trigger execution model.
  21 # without_rowid4-1.3.*: INSERT trigger execution model.
  22 #
  23 # 2. Trigger program execution tests.
  24 # These tests ensure that trigger programs execute correctly (ie. that a
  25 # trigger program can correctly execute INSERT, UPDATE, DELETE * SELECT
  26 # statements, and combinations thereof).
  27 #
  28 # 3. Selective trigger execution
  29 # This tests that conditional triggers (ie. UPDATE OF triggers and triggers
  30 # with WHEN clauses) are fired only fired when they are supposed to be.
  31 #
  32 # without_rowid4-3.1: UPDATE OF triggers
  33 # without_rowid4-3.2: WHEN clause
  34 #
  35 # 4. Cascaded trigger execution
  36 # Tests that trigger-programs may cause other triggers to fire. Also that a
  37 # trigger-program is never executed recursively.
  38 #
  39 # without_rowid4-4.1: Trivial cascading trigger
  40 # without_rowid4-4.2: Trivial recursive trigger handling
  41 #
  42 # 5. Count changes behaviour.
  43 # Verify that rows altered by triggers are not included in the return value
  44 # of the "count changes" interface.
  45 #
  46 # 6. ON CONFLICT clause handling
  47 # without_rowid4-6.1[a-f]: INSERT statements
  48 # without_rowid4-6.2[a-f]: UPDATE statements
  49 #
  50 # 7. & 8. Triggers on views fire correctly.
  51 #
  52
  53 set testdir [file dirname $argv0]
  54 source $testdir/tester.tcl
  55 ifcapable {!trigger} {
  56   finish_test
  57   return
  58 }
  59
  60 # The tests in this file were written before SQLite supported recursive
  61 # trigger invocation, and some tests depend on that to pass. So disable
  62 # recursive triggers for this file.
  63 catchsql { pragma recursive_triggers = off }
  64
  65 # 1.
  66 ifcapable subquery {
  67   set ii 0
  68   set tbl_definitions [list \
  69         {CREATE TABLE tbl (a INTEGER PRIMARY KEY, b) WITHOUT rowid;}    \
  70         {CREATE TABLE tbl (a, b PRIMARY KEY) WITHOUT rowid;}            \
  71         {CREATE TABLE tbl (a PRIMARY KEY, b) WITHOUT rowid;
  72          CREATE INDEX tbl_idx ON tbl(b);}      \
  73   ]
  74   ifcapable tempdb {
  75     lappend tbl_definitions \
  76         {CREATE TEMP TABLE tbl (a PRIMARY KEY, b) WITHOUT rowid;
  77          CREATE INDEX tbl_idx ON tbl(b);}
  78     lappend tbl_definitions \
  79         {CREATE TEMP TABLE tbl (a PRIMARY KEY, b) WITHOUT rowid}
  80     lappend tbl_definitions \
  81         {CREATE TEMPORARY TABLE tbl (a INTEGER PRIMARY KEY, b) WITHOUT rowid;}
  82   }
  83   foreach tbl_defn $tbl_definitions {
  84     incr ii
  85     catchsql { DROP INDEX tbl_idx; }
  86     catchsql {
  87       DROP TABLE rlog;
  88       DROP TABLE clog;
  89       DROP TABLE tbl;
  90       DROP TABLE other_tbl;
  91     }
  92
  93     execsql $tbl_defn
  94
  95     execsql {
  96       INSERT INTO tbl VALUES(1, 2);
  97       INSERT INTO tbl VALUES(3, 4);
  98
  99       CREATE TABLE rlog (idx, old_a, old_b, db_sum_a, db_sum_b, new_a, new_b);
 100       CREATE TABLE clog (idx, old_a, old_b, db_sum_a, db_sum_b, new_a, new_b);
 101
 102       CREATE TRIGGER before_update_row BEFORE UPDATE ON tbl FOR EACH ROW
 103         BEGIN
 104         INSERT INTO rlog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM rlog),
 105           old.a, old.b,
 106           (SELECT coalesce(sum(a),0) FROM tbl),
 107           (SELECT coalesce(sum(b),0) FROM tbl),
 108           new.a, new.b);
 109       END;
 110
 111       CREATE TRIGGER after_update_row AFTER UPDATE ON tbl FOR EACH ROW
 112         BEGIN
 113         INSERT INTO rlog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM rlog),
 114           old.a, old.b,
 115           (SELECT coalesce(sum(a),0) FROM tbl),
 116           (SELECT coalesce(sum(b),0) FROM tbl),
 117           new.a, new.b);
 118       END;
 119
 120       CREATE TRIGGER conditional_update_row AFTER UPDATE ON tbl FOR EACH ROW
 121         WHEN old.a = 1
 122         BEGIN
 123         INSERT INTO clog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM clog),
 124           old.a, old.b,
 125           (SELECT coalesce(sum(a),0) FROM tbl),
 126           (SELECT coalesce(sum(b),0) FROM tbl),
 127           new.a, new.b);
 128       END;
 129     }
 130
 131     do_test without_rowid4-1.$ii.1 {
 132       set r {}
 133       foreach v [execsql {
 134         UPDATE tbl SET a = a * 10, b = b * 10;
 135         SELECT * FROM rlog ORDER BY idx;
 136         SELECT * FROM clog ORDER BY idx;
 137       }] {
 138         lappend r [expr {int($v)}]
 139       }
 140       set r
 141     } [list 1 1 2  4  6 10 20 \
 142             2 1 2 13 24 10 20 \
 143             3 3 4 13 24 30 40 \
 144             4 3 4 40 60 30 40 \
 145             1 1 2 13 24 10 20 ]
 146
 147     execsql {
 148       DELETE FROM rlog;
 149       DELETE FROM tbl;
 150       INSERT INTO tbl VALUES (100, 100);
 151       INSERT INTO tbl VALUES (300, 200);
 152       CREATE TRIGGER delete_before_row BEFORE DELETE ON tbl FOR EACH ROW
 153         BEGIN
 154         INSERT INTO rlog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM rlog),
 155           old.a, old.b,
 156           (SELECT coalesce(sum(a),0) FROM tbl),
 157           (SELECT coalesce(sum(b),0) FROM tbl),
 158           0, 0);
 159       END;
 160
 161       CREATE TRIGGER delete_after_row AFTER DELETE ON tbl FOR EACH ROW
 162         BEGIN
 163         INSERT INTO rlog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM rlog),
 164           old.a, old.b,
 165           (SELECT coalesce(sum(a),0) FROM tbl),
 166           (SELECT coalesce(sum(b),0) FROM tbl),
 167           0, 0);
 168       END;
 169     }
 170     do_test without_rowid4-1.$ii.2 {
 171       set r {}
 172       foreach v [execsql {
 173         DELETE FROM tbl;
 174         SELECT * FROM rlog;
 175       }] {
 176         lappend r [expr {int($v)}]
 177       }
 178       set r
 179     } [list 1 100 100 400 300 0 0 \
 180             2 100 100 300 200 0 0 \
 181             3 300 200 300 200 0 0 \
 182             4 300 200 0 0 0 0 ]
 183
 184     execsql {
 185       DELETE FROM rlog;
 186       CREATE TRIGGER insert_before_row BEFORE INSERT ON tbl FOR EACH ROW
 187         BEGIN
 188         INSERT INTO rlog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM rlog),
 189           0, 0,
 190           (SELECT coalesce(sum(a),0) FROM tbl),
 191           (SELECT coalesce(sum(b),0) FROM tbl),
 192           new.a, new.b);
 193       END;
 194
 195       CREATE TRIGGER insert_after_row AFTER INSERT ON tbl FOR EACH ROW
 196         BEGIN
 197         INSERT INTO rlog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM rlog),
 198           0, 0,
 199           (SELECT coalesce(sum(a),0) FROM tbl),
 200           (SELECT coalesce(sum(b),0) FROM tbl),
 201           new.a, new.b);
 202       END;
 203     }
 204     do_test without_rowid4-1.$ii.3 {
 205       execsql {
 206
 207         CREATE TABLE other_tbl(a, b);
 208         INSERT INTO other_tbl VALUES(1, 2);
 209         INSERT INTO other_tbl VALUES(3, 4);
 210         -- INSERT INTO tbl SELECT * FROM other_tbl;
 211         INSERT INTO tbl VALUES(5, 6);
 212         DROP TABLE other_tbl;
 213
 214         SELECT * FROM rlog;
 215       }
 216     } [list 1 0 0 0 0 5 6 \
 217             2 0 0 5 6 5 6 ]
 218
 219     integrity_check without_rowid4-1.$ii.4
 220   }
 221   catchsql {
 222     DROP TABLE rlog;
 223     DROP TABLE clog;
 224     DROP TABLE tbl;
 225     DROP TABLE other_tbl;
 226   }
 227 }
 228
 229 # 2.
 230 set ii 0
 231 foreach tr_program {
 232   {UPDATE tbl SET b = old.b;}
 233   {INSERT INTO log VALUES(new.c, 2, 3);}
 234   {DELETE FROM log WHERE a = 1;}
 235   {INSERT INTO tbl VALUES(500, new.b * 10, 700);
 236     UPDATE tbl SET c = old.c;
 237     DELETE FROM log;}
 238   {INSERT INTO log select * from tbl;}
 239 } {
 240   foreach test_varset [ list \
 241     {
 242       set statement {UPDATE tbl SET c = 10 WHERE a = 1;}
 243       set prep      {INSERT INTO tbl VALUES(1, 2, 3);}
 244       set newC 10
 245       set newB 2
 246       set newA 1
 247       set oldA 1
 248       set oldB 2
 249       set oldC 3
 250     } \
 251     {
 252       set statement {DELETE FROM tbl WHERE a = 1;}
 253       set prep      {INSERT INTO tbl VALUES(1, 2, 3);}
 254       set oldA 1
 255       set oldB 2
 256       set oldC 3
 257     } \
 258     {
 259       set statement {INSERT INTO tbl VALUES(1, 2, 3);}
 260       set newA 1
 261       set newB 2
 262       set newC 3
 263     }
 264   ] \
 265   {
 266     set statement {}
 267     set prep {}
 268     set newA {''}
 269     set newB {''}
 270     set newC {''}
 271     set oldA {''}
 272     set oldB {''}
 273     set oldC {''}
 274
 275     incr ii
 276
 277     eval $test_varset
 278
 279     set statement_type [string range $statement 0 5]
 280     set tr_program_fixed $tr_program
 281     if {$statement_type == "DELETE"} {
 282       regsub -all new\.a $tr_program_fixed {''} tr_program_fixed
 283       regsub -all new\.b $tr_program_fixed {''} tr_program_fixed
 284       regsub -all new\.c $tr_program_fixed {''} tr_program_fixed
 285     }
 286     if {$statement_type == "INSERT"} {
 287       regsub -all old\.a $tr_program_fixed {''} tr_program_fixed
 288       regsub -all old\.b $tr_program_fixed {''} tr_program_fixed
 289       regsub -all old\.c $tr_program_fixed {''} tr_program_fixed
 290     }
 291
 292
 293     set tr_program_cooked $tr_program
 294     regsub -all new\.a $tr_program_cooked $newA tr_program_cooked
 295     regsub -all new\.b $tr_program_cooked $newB tr_program_cooked
 296     regsub -all new\.c $tr_program_cooked $newC tr_program_cooked
 297     regsub -all old\.a $tr_program_cooked $oldA tr_program_cooked
 298     regsub -all old\.b $tr_program_cooked $oldB tr_program_cooked
 299     regsub -all old\.c $tr_program_cooked $oldC tr_program_cooked
 300
 301     catchsql {
 302       DROP TABLE tbl;
 303       DROP TABLE log;
 304     }
 305
 306     execsql {
 307       CREATE TABLE tbl(a PRIMARY KEY, b, c) WITHOUT rowid;
 308       CREATE TABLE log(a, b, c);
 309     }
 310
 311     set query {SELECT * FROM tbl; SELECT * FROM log;}
 312     set prep "$prep; INSERT INTO log VALUES(1, 2, 3);\
 313              INSERT INTO log VALUES(10, 20, 30);"
 314
 315 # Check execution of BEFORE programs:
 316
 317     set before_data [ execsql "$prep $tr_program_cooked $statement $query" ]
 318
 319     execsql "DELETE FROM tbl; DELETE FROM log; $prep";
 320     execsql "CREATE TRIGGER the_trigger BEFORE [string range $statement 0 6]\
 321              ON tbl BEGIN $tr_program_fixed END;"
 322
 323     do_test without_rowid4-2.$ii-before "execsql {$statement $query}" $before_data
 324
 325     execsql "DROP TRIGGER the_trigger;"
 326     execsql "DELETE FROM tbl; DELETE FROM log;"
 327
 328 # Check execution of AFTER programs
 329     set after_data [ execsql "$prep $statement $tr_program_cooked $query" ]
 330
 331     execsql "DELETE FROM tbl; DELETE FROM log; $prep";
 332     execsql "CREATE TRIGGER the_trigger AFTER [string range $statement 0 6]\
 333              ON tbl BEGIN $tr_program_fixed END;"
 334
 335     do_test without_rowid4-2.$ii-after "execsql {$statement $query}" $after_data
 336     execsql "DROP TRIGGER the_trigger;"
 337
 338     integrity_check without_rowid4-2.$ii-integrity
 339   }
 340 }
 341 catchsql {
 342   DROP TABLE tbl;
 343   DROP TABLE log;
 344 }
 345
 346 # 3.
 347
 348 # without_rowid4-3.1: UPDATE OF triggers
 349 execsql {
 350   CREATE TABLE tbl (a, b, c, d, PRIMARY KEY(a,b,c,d)) WITHOUT rowid;
 351   CREATE TABLE log (a);
 352   INSERT INTO log VALUES (0);
 353   INSERT INTO tbl VALUES (0, 0, 0, 0);
 354   INSERT INTO tbl VALUES (1, 0, 0, 0);
 355   CREATE TRIGGER tbl_after_update_cd BEFORE UPDATE OF c, d ON tbl
 356     BEGIN
 357       UPDATE log SET a = a + 1;
 358     END;
 359 }
 360 do_test without_rowid4-3.1 {
 361   execsql {
 362     UPDATE tbl SET b = 1, c = 10; -- 2
 363     UPDATE tbl SET b = 10; -- 0
 364     UPDATE tbl SET d = 4 WHERE a = 0; --1
 365     UPDATE tbl SET a = 4, b = 10; --0
 366     SELECT * FROM log;
 367   }
 368 } {3}
 369 execsql {
 370   DROP TABLE tbl;
 371   DROP TABLE log;
 372 }
 373
 374 # without_rowid4-3.2: WHEN clause
 375 set when_triggers [list {t1 BEFORE INSERT ON tbl WHEN new.a > 20}]
 376 ifcapable subquery {
 377   lappend when_triggers \
 378       {t2 BEFORE INSERT ON tbl WHEN (SELECT count(*) FROM tbl) = 0}
 379 }
 380
 381 execsql {
 382   CREATE TABLE tbl (a, b, c, d);
 383   CREATE TABLE log (a);
 384   INSERT INTO log VALUES (0);
 385 }
 386
 387 foreach trig $when_triggers {
 388   execsql "CREATE TRIGGER $trig BEGIN UPDATE log set a = a + 1; END;"
 389 }
 390
 391 ifcapable subquery {
 392   set t232 {1 0 1}
 393 } else {
 394   set t232 {0 0 1}
 395 }
 396 do_test without_rowid4-3.2 {
 397   execsql {
 398
 399     INSERT INTO tbl VALUES(0, 0, 0, 0);     -- 1 (ifcapable subquery)
 400     SELECT * FROM log;
 401     UPDATE log SET a = 0;
 402
 403     INSERT INTO tbl VALUES(0, 0, 0, 0);     -- 0
 404     SELECT * FROM log;
 405     UPDATE log SET a = 0;
 406
 407     INSERT INTO tbl VALUES(200, 0, 0, 0);     -- 1
 408     SELECT * FROM log;
 409     UPDATE log SET a = 0;
 410   }
 411 } $t232
 412 execsql {
 413   DROP TABLE tbl;
 414   DROP TABLE log;
 415 }
 416 integrity_check without_rowid4-3.3
 417
 418 # Simple cascaded trigger
 419 execsql {
 420   CREATE TABLE tblA(a, b, PRIMARY KEY(a,b)) WITHOUT rowid;
 421   CREATE TABLE tblB(a, b, PRIMARY KEY(a,b)) WITHOUT rowid;
 422   CREATE TABLE tblC(a, b, PRIMARY KEY(a,b)) WITHOUT rowid;
 423
 424   CREATE TRIGGER tr1 BEFORE INSERT ON tblA BEGIN
 425     INSERT INTO tblB values(new.a, new.b);
 426   END;
 427
 428   CREATE TRIGGER tr2 BEFORE INSERT ON tblB BEGIN
 429     INSERT INTO tblC values(new.a, new.b);
 430   END;
 431 }
 432 do_test without_rowid4-4.1 {
 433   execsql {
 434     INSERT INTO tblA values(1, 2);
 435     SELECT * FROM tblA;
 436     SELECT * FROM tblB;
 437     SELECT * FROM tblC;
 438   }
 439 } {1 2 1 2 1 2}
 440 execsql {
 441   DROP TABLE tblA;
 442   DROP TABLE tblB;
 443   DROP TABLE tblC;
 444 }
 445
 446 # Simple recursive trigger
 447 execsql {
 448   CREATE TABLE tbl(a, b, c, PRIMARY KEY(c,a,b)) WITHOUT rowid;
 449   CREATE TRIGGER tbl_trig BEFORE INSERT ON tbl
 450     BEGIN
 451       INSERT INTO tbl VALUES (new.a, new.b, new.c+1);
 452     END;
 453 }
 454 do_test without_rowid4-4.2 {
 455   execsql {
 456     INSERT INTO tbl VALUES (1, 2, 3);
 457     select * from tbl;
 458   }
 459 } {1 2 3 1 2 4}
 460 execsql {
 461   DROP TABLE tbl;
 462 }
 463
 464 # 5.
 465 execsql {
 466   CREATE TABLE tbl(a, b, c, PRIMARY KEY(c,a,b)) WITHOUT rowid;
 467   CREATE TRIGGER tbl_trig BEFORE INSERT ON tbl
 468     BEGIN
 469       INSERT INTO tbl VALUES (1, 2, 3);
 470       INSERT INTO tbl VALUES (2, 2, 3);
 471       UPDATE tbl set b = 10 WHERE a = 1;
 472       DELETE FROM tbl WHERE a = 1;
 473       DELETE FROM tbl;
 474     END;
 475 }
 476 do_test without_rowid4-5 {
 477   execsql {
 478     INSERT INTO tbl VALUES(100, 200, 300);
 479   }
 480   db changes
 481 } {1}
 482 execsql {
 483   DROP TABLE tbl;
 484 }
 485
 486 ifcapable conflict {
 487   # Handling of ON CONFLICT by INSERT statements inside triggers
 488   execsql {
 489     CREATE TABLE tbl (a PRIMARY KEY, b, c) WITHOUT rowid;
 490     CREATE TRIGGER ai_tbl AFTER INSERT ON tbl BEGIN
 491       INSERT OR IGNORE INTO tbl values (new.a, 0, 0);
 492     END;
 493   }
 494   do_test without_rowid4-6.1a {
 495     execsql {
 496       BEGIN;
 497       INSERT INTO tbl values (1, 2, 3);
 498       SELECT * from tbl;
 499     }
 500   } {1 2 3}
 501   do_test without_rowid4-6.1b {
 502     catchsql {
 503       INSERT OR ABORT INTO tbl values (2, 2, 3);
 504     }
 505   } {1 {UNIQUE constraint failed: tbl.a}}
 506   do_test without_rowid4-6.1c {
 507     execsql {
 508       SELECT * from tbl;
 509     }
 510   } {1 2 3}
 511   do_test without_rowid4-6.1d {
 512     catchsql {
 513       INSERT OR FAIL INTO tbl values (2, 2, 3);
 514     }
 515   } {1 {UNIQUE constraint failed: tbl.a}}
 516   do_test without_rowid4-6.1e {
 517     execsql {
 518       SELECT * from tbl;
 519     }
 520   } {1 2 3 2 2 3}
 521   do_test without_rowid4-6.1f {
 522     execsql {
 523       INSERT OR REPLACE INTO tbl values (2, 2, 3);
 524       SELECT * from tbl;
 525     }
 526   } {1 2 3 2 0 0}
 527   do_test without_rowid4-6.1g {
 528     catchsql {
 529       INSERT OR ROLLBACK INTO tbl values (3, 2, 3);
 530     }
 531   } {1 {UNIQUE constraint failed: tbl.a}}
 532   do_test without_rowid4-6.1h {
 533     execsql {
 534       SELECT * from tbl;
 535     }
 536   } {}
 537   execsql {DELETE FROM tbl}
 538
 539
 540   # Handling of ON CONFLICT by UPDATE statements inside triggers
 541   execsql {
 542     INSERT INTO tbl values (4, 2, 3);
 543     INSERT INTO tbl values (6, 3, 4);
 544     CREATE TRIGGER au_tbl AFTER UPDATE ON tbl BEGIN
 545       UPDATE OR IGNORE tbl SET a = new.a, c = 10;
 546     END;
 547   }
 548   do_test without_rowid4-6.2a {
 549     execsql {
 550       BEGIN;
 551       UPDATE tbl SET a = 1 WHERE a = 4;
 552       SELECT * from tbl;
 553     }
 554   } {1 2 10 6 3 4}
 555   do_test without_rowid4-6.2b {
 556     catchsql {
 557       UPDATE OR ABORT tbl SET a = 4 WHERE a = 1;
 558     }
 559   } {1 {UNIQUE constraint failed: tbl.a}}
 560   do_test without_rowid4-6.2c {
 561     execsql {
 562       SELECT * from tbl;
 563     }
 564   } {1 2 10 6 3 4}
 565   do_test without_rowid4-6.2d {
 566     catchsql {
 567       UPDATE OR FAIL tbl SET a = 4 WHERE a = 1;
 568     }
 569   } {1 {UNIQUE constraint failed: tbl.a}}
 570   do_test without_rowid4-6.2e {
 571     execsql {
 572       SELECT * from tbl;
 573     }
 574   } {4 2 10 6 3 4}
 575   do_test without_rowid4-6.2f.1 {
 576     execsql {
 577       UPDATE OR REPLACE tbl SET a = 1 WHERE a = 4;
 578       SELECT * from tbl;
 579     }
 580   } {1 3 10}
 581   do_test without_rowid4-6.2f.2 {
 582     execsql {
 583       INSERT INTO tbl VALUES (2, 3, 4);
 584       SELECT * FROM tbl;
 585     }
 586   } {1 3 10 2 3 4}
 587   do_test without_rowid4-6.2g {
 588     catchsql {
 589       UPDATE OR ROLLBACK tbl SET a = 4 WHERE a = 1;
 590     }
 591   } {1 {UNIQUE constraint failed: tbl.a}}
 592   do_test without_rowid4-6.2h {
 593     execsql {
 594       SELECT * from tbl;
 595     }
 596   } {4 2 3 6 3 4}
 597   execsql {
 598     DROP TABLE tbl;
 599   }
 600 } ; # ifcapable conflict
 601
 602 # 7. Triggers on views
 603 ifcapable view {
 604
 605 do_test without_rowid4-7.1 {
 606   execsql {
 607   CREATE TABLE ab(a, b, PRIMARY KEY(a,b)) WITHOUT rowid;
 608   CREATE TABLE cd(c, d, PRIMARY KEY(c,d)) WITHOUT rowid;
 609   INSERT INTO ab VALUES (1, 2);
 610   INSERT INTO ab VALUES (0, 0);
 611   INSERT INTO cd VALUES (3, 4);
 612
 613   CREATE TABLE tlog(ii INTEGER PRIMARY KEY,
 614       olda, oldb, oldc, oldd, newa, newb, newc, newd);
 615
 616   CREATE VIEW abcd AS SELECT a, b, c, d FROM ab, cd;
 617
 618   CREATE TRIGGER before_update INSTEAD OF UPDATE ON abcd BEGIN
 619     INSERT INTO tlog VALUES(NULL,
 620         old.a, old.b, old.c, old.d, new.a, new.b, new.c, new.d);
 621   END;
 622   CREATE TRIGGER after_update INSTEAD OF UPDATE ON abcd BEGIN
 623     INSERT INTO tlog VALUES(NULL,
 624         old.a, old.b, old.c, old.d, new.a, new.b, new.c, new.d);
 625   END;
 626
 627   CREATE TRIGGER before_delete INSTEAD OF DELETE ON abcd BEGIN
 628     INSERT INTO tlog VALUES(NULL,
 629         old.a, old.b, old.c, old.d, 0, 0, 0, 0);
 630   END;
 631   CREATE TRIGGER after_delete INSTEAD OF DELETE ON abcd BEGIN
 632     INSERT INTO tlog VALUES(NULL,
 633         old.a, old.b, old.c, old.d, 0, 0, 0, 0);
 634   END;
 635
 636   CREATE TRIGGER before_insert INSTEAD OF INSERT ON abcd BEGIN
 637     INSERT INTO tlog VALUES(NULL,
 638         0, 0, 0, 0, new.a, new.b, new.c, new.d);
 639   END;
 640    CREATE TRIGGER after_insert INSTEAD OF INSERT ON abcd BEGIN
 641     INSERT INTO tlog VALUES(NULL,
 642         0, 0, 0, 0, new.a, new.b, new.c, new.d);
 643    END;
 644   }
 645 } {};
 646
 647 do_test without_rowid4-7.2 {
 648   execsql {
 649     UPDATE abcd SET a = 100, b = 5*5 WHERE a = 1;
 650     DELETE FROM abcd WHERE a = 1;
 651     INSERT INTO abcd VALUES(10, 20, 30, 40);
 652     SELECT * FROM tlog;
 653   }
 654 } [ list 1 1 2 3 4 100 25 3 4 \
 655          2 1 2 3 4 100 25 3 4 \
 656          3 1 2 3 4 0 0 0 0 \
 657          4 1 2 3 4 0 0 0 0 \
 658          5 0 0 0 0 10 20 30 40 \
 659          6 0 0 0 0 10 20 30 40 ]
 660
 661 do_test without_rowid4-7.3 {
 662   execsql {
 663     DELETE FROM tlog;
 664     INSERT INTO abcd VALUES(10, 20, 30, 40);
 665     UPDATE abcd SET a = 100, b = 5*5 WHERE a = 1;
 666     DELETE FROM abcd WHERE a = 1;
 667     SELECT * FROM tlog;
 668   }
 669 } [ list \
 670    1 0 0 0 0 10 20 30 40 \
 671    2 0 0 0 0 10 20 30 40 \
 672    3 1 2 3 4 100 25 3 4 \
 673    4 1 2 3 4 100 25 3 4 \
 674    5 1 2 3 4 0 0 0 0 \
 675    6 1 2 3 4 0 0 0 0 \
 676 ]
 677 do_test without_rowid4-7.4 {
 678   execsql {
 679     DELETE FROM tlog;
 680     DELETE FROM abcd WHERE a = 1;
 681     INSERT INTO abcd VALUES(10, 20, 30, 40);
 682     UPDATE abcd SET a = 100, b = 5*5 WHERE a = 1;
 683     SELECT * FROM tlog;
 684   }
 685 } [ list \
 686    1 1 2 3 4 0 0 0 0 \
 687    2 1 2 3 4 0 0 0 0 \
 688    3 0 0 0 0 10 20 30 40 \
 689    4 0 0 0 0 10 20 30 40 \
 690    5 1 2 3 4 100 25 3 4 \
 691    6 1 2 3 4 100 25 3 4 \
 692 ]
 693
 694 do_test without_rowid4-8.1 {
 695   execsql {
 696     CREATE TABLE t1(a,b,c, PRIMARY KEY(a,b,c)) WITHOUT rowid;
 697     INSERT INTO t1 VALUES(1,2,3);
 698     CREATE VIEW v1 AS
 699       SELECT a+b AS x, b+c AS y, a+c AS z FROM t1;
 700     SELECT * FROM v1;
 701   }
 702 } {3 5 4}
 703 do_test without_rowid4-8.2 {
 704   execsql {
 705     CREATE TABLE v1log(a,b,c,d,e,f);
 706     CREATE TRIGGER r1 INSTEAD OF DELETE ON v1 BEGIN
 707       INSERT INTO v1log VALUES(OLD.x,NULL,OLD.y,NULL,OLD.z,NULL);
 708     END;
 709     DELETE FROM v1 WHERE x=1;
 710     SELECT * FROM v1log;
 711   }
 712 } {}
 713 do_test without_rowid4-8.3 {
 714   execsql {
 715     DELETE FROM v1 WHERE x=3;
 716     SELECT * FROM v1log;
 717   }
 718 } {3 {} 5 {} 4 {}}
 719 do_test without_rowid4-8.4 {
 720   execsql {
 721     INSERT INTO t1 VALUES(4,5,6);
 722     DELETE FROM v1log;
 723     DELETE FROM v1 WHERE y=11;
 724     SELECT * FROM v1log;
 725   }
 726 } {9 {} 11 {} 10 {}}
 727 do_test without_rowid4-8.5 {
 728   execsql {
 729     CREATE TRIGGER r2 INSTEAD OF INSERT ON v1 BEGIN
 730       INSERT INTO v1log VALUES(NULL,NEW.x,NULL,NEW.y,NULL,NEW.z);
 731     END;
 732     DELETE FROM v1log;
 733     INSERT INTO v1 VALUES(1,2,3);
 734     SELECT * FROM v1log;
 735   }
 736 } {{} 1 {} 2 {} 3}
 737 do_test without_rowid4-8.6 {
 738   execsql {
 739     CREATE TRIGGER r3 INSTEAD OF UPDATE ON v1 BEGIN
 740       INSERT INTO v1log VALUES(OLD.x,NEW.x,OLD.y,NEW.y,OLD.z,NEW.z);
 741     END;
 742     DELETE FROM v1log;
 743     UPDATE v1 SET x=x+100, y=y+200, z=z+300;
 744     SELECT * FROM v1log;
 745   }
 746 } {3 103 5 205 4 304 9 109 11 211 10 310}
 747
 748 # At one point the following was causing a segfault.
 749 do_test without_rowid4-9.1 {
 750   execsql {
 751     CREATE TABLE t3(a TEXT, b TEXT);
 752     CREATE VIEW v3 AS SELECT t3.a FROM t3;
 753     CREATE TRIGGER trig1 INSTEAD OF DELETE ON v3 BEGIN
 754       SELECT 1;
 755     END;
 756     DELETE FROM v3 WHERE a = 1;
 757   }
 758 } {}
 759
 760 } ;# ifcapable view
 761
 762 integrity_check without_rowid4-9.9
 763
 764 finish_test