0000: 23 20 54 68 65 20 61 75 74 68 6f 72 20 64 69 73 # The author dis
0010: 63 6c 61 69 6d 73 20 63 6f 70 79 72 69 67 68 74 claims copyright
0020: 20 74 6f 20 74 68 69 73 20 73 6f 75 72 63 65 20 to this source
0030: 63 6f 64 65 2e 20 20 49 6e 20 70 6c 61 63 65 20 code. In place
0040: 6f 66 0a 23 20 61 20 6c 65 67 61 6c 20 6e 6f 74 of.# a legal not
0050: 69 63 65 2c 20 68 65 72 65 20 69 73 20 61 20 62 ice, here is a b
0060: 6c 65 73 73 69 6e 67 3a 0a 23 0a 23 20 20 20 20 lessing:.#.#
0070: 4d 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 May you do good
0080: 61 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 23 20 and not evil..#
0090: 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 May you find
00a0: 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 forgiveness for
00b0: 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 yourself and for
00c0: 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 23 20 20 give others..#
00d0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20 May you share
00e0: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61 freely, never ta
00f0: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79 king more than y
0100: 6f 75 20 67 69 76 65 2e 0a 23 0a 23 2a 2a 2a 2a ou give..#.#****
0110: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0120: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0150: 2a 2a 2a 0a 23 0a 23 20 52 65 67 72 65 73 73 69 ***.#.# Regressi
0160: 6f 6e 20 74 65 73 74 69 6e 67 20 6f 66 20 46 4f on testing of FO
0170: 52 20 45 41 43 48 20 52 4f 57 20 74 61 62 6c 65 R EACH ROW table
0180: 20 74 72 69 67 67 65 72 73 0a 23 0a 23 20 31 2e triggers.#.# 1.
0190: 20 54 72 69 67 67 65 72 20 65 78 65 63 75 74 69 Trigger executi
01a0: 6f 6e 20 6f 72 64 65 72 20 74 65 73 74 73 2e 20 on order tests.
01b0: 0a 23 20 54 68 65 73 65 20 74 65 73 74 73 20 65 .# These tests e
01c0: 6e 73 75 72 65 20 74 68 61 74 20 42 45 46 4f 52 nsure that BEFOR
01d0: 45 20 61 6e 64 20 41 46 54 45 52 20 74 72 69 67 E and AFTER trig
01e0: 67 65 72 73 20 61 72 65 20 66 69 72 65 64 20 61 gers are fired a
01f0: 74 20 74 68 65 20 63 6f 72 72 65 63 74 0a 23 20 t the correct.#
0200: 74 69 6d 65 73 20 72 65 6c 61 74 69 76 65 20 74 times relative t
0210: 6f 20 65 61 63 68 20 6f 74 68 65 72 20 61 6e 64 o each other and
0220: 20 74 68 65 20 74 72 69 67 67 65 72 69 6e 67 20 the triggering
0230: 73 74 61 74 65 6d 65 6e 74 2e 20 0a 23 0a 23 20 statement. .#.#
0240: 74 72 69 67 67 65 72 32 2d 31 2e 31 2e 2a 3a 20 trigger2-1.1.*:
0250: 4f 4e 20 55 50 44 41 54 45 20 74 72 69 67 67 65 ON UPDATE trigge
0260: 72 20 65 78 65 63 75 74 69 6f 6e 20 6d 6f 64 65 r execution mode
0270: 6c 2e 0a 23 20 74 72 69 67 67 65 72 32 2d 31 2e l..# trigger2-1.
0280: 32 2e 2a 3a 20 44 45 4c 45 54 45 20 74 72 69 67 2.*: DELETE trig
0290: 67 65 72 20 65 78 65 63 75 74 69 6f 6e 20 6d 6f ger execution mo
02a0: 64 65 6c 2e 0a 23 20 74 72 69 67 67 65 72 32 2d del..# trigger2-
02b0: 31 2e 33 2e 2a 3a 20 49 4e 53 45 52 54 20 74 72 1.3.*: INSERT tr
02c0: 69 67 67 65 72 20 65 78 65 63 75 74 69 6f 6e 20 igger execution
02d0: 6d 6f 64 65 6c 2e 0a 23 0a 23 20 32 2e 20 54 72 model..#.# 2. Tr
02e0: 69 67 67 65 72 20 70 72 6f 67 72 61 6d 20 65 78 igger program ex
02f0: 65 63 75 74 69 6f 6e 20 74 65 73 74 73 2e 0a 23 ecution tests..#
0300: 20 54 68 65 73 65 20 74 65 73 74 73 20 65 6e 73 These tests ens
0310: 75 72 65 20 74 68 61 74 20 74 72 69 67 67 65 72 ure that trigger
0320: 20 70 72 6f 67 72 61 6d 73 20 65 78 65 63 75 74 programs execut
0330: 65 20 63 6f 72 72 65 63 74 6c 79 20 28 69 65 2e e correctly (ie.
0340: 20 74 68 61 74 20 61 0a 23 20 74 72 69 67 67 65 that a.# trigge
0350: 72 20 70 72 6f 67 72 61 6d 20 63 61 6e 20 63 6f r program can co
0360: 72 72 65 63 74 6c 79 20 65 78 65 63 75 74 65 20 rrectly execute
0370: 49 4e 53 45 52 54 2c 20 55 50 44 41 54 45 2c 20 INSERT, UPDATE,
0380: 44 45 4c 45 54 45 20 2a 20 53 45 4c 45 43 54 0a DELETE * SELECT.
0390: 23 20 73 74 61 74 65 6d 65 6e 74 73 2c 20 61 6e # statements, an
03a0: 64 20 63 6f 6d 62 69 6e 61 74 69 6f 6e 73 20 74 d combinations t
03b0: 68 65 72 65 6f 66 29 2e 0a 23 0a 23 20 33 2e 20 hereof)..#.# 3.
03c0: 53 65 6c 65 63 74 69 76 65 20 74 72 69 67 67 65 Selective trigge
03d0: 72 20 65 78 65 63 75 74 69 6f 6e 20 0a 23 20 54 r execution .# T
03e0: 68 69 73 20 74 65 73 74 73 20 74 68 61 74 20 63 his tests that c
03f0: 6f 6e 64 69 74 69 6f 6e 61 6c 20 74 72 69 67 67 onditional trigg
0400: 65 72 73 20 28 69 65 2e 20 55 50 44 41 54 45 20 ers (ie. UPDATE
0410: 4f 46 20 74 72 69 67 67 65 72 73 20 61 6e 64 20 OF triggers and
0420: 74 72 69 67 67 65 72 73 0a 23 20 77 69 74 68 20 triggers.# with
0430: 57 48 45 4e 20 63 6c 61 75 73 65 73 29 20 61 72 WHEN clauses) ar
0440: 65 20 66 69 72 65 64 20 6f 6e 6c 79 20 66 69 72 e fired only fir
0450: 65 64 20 77 68 65 6e 20 74 68 65 79 20 61 72 65 ed when they are
0460: 20 73 75 70 70 6f 73 65 64 20 74 6f 20 62 65 2e supposed to be.
0470: 0a 23 0a 23 20 74 72 69 67 67 65 72 32 2d 33 2e .#.# trigger2-3.
0480: 31 3a 20 55 50 44 41 54 45 20 4f 46 20 74 72 69 1: UPDATE OF tri
0490: 67 67 65 72 73 0a 23 20 74 72 69 67 67 65 72 32 ggers.# trigger2
04a0: 2d 33 2e 32 3a 20 57 48 45 4e 20 63 6c 61 75 73 -3.2: WHEN claus
04b0: 65 0a 23 0a 23 20 34 2e 20 43 61 73 63 61 64 65 e.#.# 4. Cascade
04c0: 64 20 74 72 69 67 67 65 72 20 65 78 65 63 75 74 d trigger execut
04d0: 69 6f 6e 20 0a 23 20 54 65 73 74 73 20 74 68 61 ion .# Tests tha
04e0: 74 20 74 72 69 67 67 65 72 2d 70 72 6f 67 72 61 t trigger-progra
04f0: 6d 73 20 6d 61 79 20 63 61 75 73 65 20 6f 74 68 ms may cause oth
0500: 65 72 20 74 72 69 67 67 65 72 73 20 74 6f 20 66 er triggers to f
0510: 69 72 65 2e 20 41 6c 73 6f 20 74 68 61 74 20 61 ire. Also that a
0520: 20 0a 23 20 74 72 69 67 67 65 72 2d 70 72 6f 67 .# trigger-prog
0530: 72 61 6d 20 69 73 20 6e 65 76 65 72 20 65 78 65 ram is never exe
0540: 63 75 74 65 64 20 72 65 63 75 72 73 69 76 65 6c cuted recursivel
0550: 79 2e 0a 23 20 0a 23 20 74 72 69 67 67 65 72 32 y..# .# trigger2
0560: 2d 34 2e 31 3a 20 54 72 69 76 69 61 6c 20 63 61 -4.1: Trivial ca
0570: 73 63 61 64 69 6e 67 20 74 72 69 67 67 65 72 0a scading trigger.
0580: 23 20 74 72 69 67 67 65 72 32 2d 34 2e 32 3a 20 # trigger2-4.2:
0590: 54 72 69 76 69 61 6c 20 72 65 63 75 72 73 69 76 Trivial recursiv
05a0: 65 20 74 72 69 67 67 65 72 20 68 61 6e 64 6c 69 e trigger handli
05b0: 6e 67 20 0a 23 0a 23 20 35 2e 20 43 6f 75 6e 74 ng .#.# 5. Count
05c0: 20 63 68 61 6e 67 65 73 20 62 65 68 61 76 69 6f changes behavio
05d0: 75 72 2e 0a 23 20 56 65 72 69 66 79 20 74 68 61 ur..# Verify tha
05e0: 74 20 72 6f 77 73 20 61 6c 74 65 72 65 64 20 62 t rows altered b
05f0: 79 20 74 72 69 67 67 65 72 73 20 61 72 65 20 6e y triggers are n
0600: 6f 74 20 69 6e 63 6c 75 64 65 64 20 69 6e 20 74 ot included in t
0610: 68 65 20 72 65 74 75 72 6e 20 76 61 6c 75 65 0a he return value.
0620: 23 20 6f 66 20 74 68 65 20 22 63 6f 75 6e 74 20 # of the "count
0630: 63 68 61 6e 67 65 73 22 20 69 6e 74 65 72 66 61 changes" interfa
0640: 63 65 2e 0a 23 0a 23 20 36 2e 20 4f 4e 20 43 4f ce..#.# 6. ON CO
0650: 4e 46 4c 49 43 54 20 63 6c 61 75 73 65 20 68 61 NFLICT clause ha
0660: 6e 64 6c 69 6e 67 0a 23 20 74 72 69 67 67 65 72 ndling.# trigger
0670: 32 2d 36 2e 31 5b 61 2d 66 5d 3a 20 49 4e 53 45 2-6.1[a-f]: INSE
0680: 52 54 20 73 74 61 74 65 6d 65 6e 74 73 0a 23 20 RT statements.#
0690: 74 72 69 67 67 65 72 32 2d 36 2e 32 5b 61 2d 66 trigger2-6.2[a-f
06a0: 5d 3a 20 55 50 44 41 54 45 20 73 74 61 74 65 6d ]: UPDATE statem
06b0: 65 6e 74 73 0a 23 0a 23 20 37 2e 20 54 72 69 67 ents.#.# 7. Trig
06c0: 67 65 72 73 20 6f 6e 20 76 69 65 77 73 20 66 69 gers on views fi
06d0: 72 65 20 63 6f 72 72 65 63 74 6c 79 2e 0a 23 0a re correctly..#.
06e0: 0a 73 65 74 20 74 65 73 74 64 69 72 20 5b 66 69 .set testdir [fi
06f0: 6c 65 20 64 69 72 6e 61 6d 65 20 24 61 72 67 76 le dirname $argv
0700: 30 5d 0a 73 6f 75 72 63 65 20 24 74 65 73 74 64 0].source $testd
0710: 69 72 2f 74 65 73 74 65 72 2e 74 63 6c 0a 0a 23 ir/tester.tcl..#
0720: 20 31 2e 0a 73 65 74 20 69 69 20 30 0a 66 6f 72 1..set ii 0.for
0730: 65 61 63 68 20 74 62 6c 5f 64 65 66 6e 20 7b 0a each tbl_defn {.
0740: 09 7b 43 52 45 41 54 45 20 54 45 4d 50 20 54 41 .{CREATE TEMP TA
0750: 42 4c 45 20 74 62 6c 20 28 61 2c 20 62 29 3b 7d BLE tbl (a, b);}
0760: 20 0a 09 7b 43 52 45 41 54 45 20 54 41 42 4c 45 ..{CREATE TABLE
0770: 20 74 62 6c 20 28 61 2c 20 62 29 3b 7d 20 0a 09 tbl (a, b);} ..
0780: 7b 43 52 45 41 54 45 20 54 41 42 4c 45 20 74 62 {CREATE TABLE tb
0790: 6c 20 28 61 20 49 4e 54 45 47 45 52 20 50 52 49 l (a INTEGER PRI
07a0: 4d 41 52 59 20 4b 45 59 2c 20 62 29 3b 7d 20 0a MARY KEY, b);} .
07b0: 09 7b 43 52 45 41 54 45 20 54 45 4d 50 4f 52 41 .{CREATE TEMPORA
07c0: 52 59 20 54 41 42 4c 45 20 74 62 6c 20 28 61 20 RY TABLE tbl (a
07d0: 49 4e 54 45 47 45 52 20 50 52 49 4d 41 52 59 20 INTEGER PRIMARY
07e0: 4b 45 59 2c 20 62 29 3b 7d 20 0a 20 20 20 20 20 KEY, b);} .
07f0: 20 20 20 7b 43 52 45 41 54 45 20 54 41 42 4c 45 {CREATE TABLE
0800: 20 74 62 6c 20 28 61 2c 20 62 20 50 52 49 4d 41 tbl (a, b PRIMA
0810: 52 59 20 4b 45 59 29 3b 7d 20 0a 09 7b 43 52 45 RY KEY);} ..{CRE
0820: 41 54 45 20 54 41 42 4c 45 20 74 62 6c 20 28 61 ATE TABLE tbl (a
0830: 2c 20 62 29 3b 20 43 52 45 41 54 45 20 49 4e 44 , b); CREATE IND
0840: 45 58 20 74 62 6c 5f 69 64 78 20 4f 4e 20 74 62 EX tbl_idx ON tb
0850: 6c 28 62 29 3b 7d 20 0a 09 7b 43 52 45 41 54 45 l(b);} ..{CREATE
0860: 20 54 45 4d 50 20 54 41 42 4c 45 20 74 62 6c 20 TEMP TABLE tbl
0870: 28 61 2c 20 62 29 3b 20 43 52 45 41 54 45 20 49 (a, b); CREATE I
0880: 4e 44 45 58 20 74 62 6c 5f 69 64 78 20 4f 4e 20 NDEX tbl_idx ON
0890: 74 62 6c 28 62 29 3b 7d 20 0a 09 7b 43 52 45 41 tbl(b);} ..{CREA
08a0: 54 45 20 54 41 42 4c 45 20 74 62 6c 20 28 61 2c TE TABLE tbl (a,
08b0: 20 62 29 3b 20 43 52 45 41 54 45 20 54 45 4d 50 b); CREATE TEMP
08c0: 20 49 4e 44 45 58 20 74 62 6c 5f 69 64 78 20 4f INDEX tbl_idx O
08d0: 4e 20 74 62 6c 28 62 29 3b 7d 20 0a 7d 20 7b 0a N tbl(b);} .} {.
08e0: 20 20 69 6e 63 72 20 69 69 0a 20 20 63 61 74 63 incr ii. catc
08f0: 68 73 71 6c 20 7b 20 44 52 4f 50 20 49 4e 44 45 hsql { DROP INDE
0900: 58 20 74 62 6c 5f 69 64 78 3b 20 7d 0a 20 20 63 X tbl_idx; }. c
0910: 61 74 63 68 73 71 6c 20 7b 0a 20 20 20 20 44 52 atchsql {. DR
0920: 4f 50 20 54 41 42 4c 45 20 72 6c 6f 67 3b 0a 20 OP TABLE rlog;.
0930: 20 20 20 44 52 4f 50 20 54 41 42 4c 45 20 63 6c DROP TABLE cl
0940: 6f 67 3b 0a 20 20 20 20 44 52 4f 50 20 54 41 42 og;. DROP TAB
0950: 4c 45 20 74 62 6c 3b 0a 20 20 20 20 44 52 4f 50 LE tbl;. DROP
0960: 20 54 41 42 4c 45 20 6f 74 68 65 72 5f 74 62 6c TABLE other_tbl
0970: 3b 0a 20 20 7d 0a 0a 20 20 65 78 65 63 73 71 6c ;. }.. execsql
0980: 20 24 74 62 6c 5f 64 65 66 6e 0a 0a 20 20 65 78 $tbl_defn.. ex
0990: 65 63 73 71 6c 20 7b 0a 20 20 20 20 49 4e 53 45 ecsql {. INSE
09a0: 52 54 20 49 4e 54 4f 20 74 62 6c 20 56 41 4c 55 RT INTO tbl VALU
09b0: 45 53 28 31 2c 20 32 29 3b 0a 20 20 20 20 49 4e ES(1, 2);. IN
09c0: 53 45 52 54 20 49 4e 54 4f 20 74 62 6c 20 56 41 SERT INTO tbl VA
09d0: 4c 55 45 53 28 33 2c 20 34 29 3b 0a 0a 20 20 20 LUES(3, 4);..
09e0: 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 72 6c CREATE TABLE rl
09f0: 6f 67 20 28 69 64 78 2c 20 6f 6c 64 5f 61 2c 20 og (idx, old_a,
0a00: 6f 6c 64 5f 62 2c 20 64 62 5f 73 75 6d 5f 61 2c old_b, db_sum_a,
0a10: 20 64 62 5f 73 75 6d 5f 62 2c 20 6e 65 77 5f 61 db_sum_b, new_a
0a20: 2c 20 6e 65 77 5f 62 29 3b 0a 20 20 20 20 43 52 , new_b);. CR
0a30: 45 41 54 45 20 54 41 42 4c 45 20 63 6c 6f 67 20 EATE TABLE clog
0a40: 28 69 64 78 2c 20 6f 6c 64 5f 61 2c 20 6f 6c 64 (idx, old_a, old
0a50: 5f 62 2c 20 64 62 5f 73 75 6d 5f 61 2c 20 64 62 _b, db_sum_a, db
0a60: 5f 73 75 6d 5f 62 2c 20 6e 65 77 5f 61 2c 20 6e _sum_b, new_a, n
0a70: 65 77 5f 62 29 3b 0a 0a 20 20 20 20 43 52 45 41 ew_b);.. CREA
0a80: 54 45 20 54 52 49 47 47 45 52 20 62 65 66 6f 72 TE TRIGGER befor
0a90: 65 5f 75 70 64 61 74 65 5f 72 6f 77 20 42 45 46 e_update_row BEF
0aa0: 4f 52 45 20 55 50 44 41 54 45 20 4f 4e 20 74 62 ORE UPDATE ON tb
0ab0: 6c 20 46 4f 52 20 45 41 43 48 20 52 4f 57 20 0a l FOR EACH ROW .
0ac0: 20 20 20 20 20 20 42 45 47 49 4e 0a 20 20 20 20 BEGIN.
0ad0: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 72 6c INSERT INTO rl
0ae0: 6f 67 20 56 41 4c 55 45 53 20 28 20 28 53 45 4c og VALUES ( (SEL
0af0: 45 43 54 20 63 6f 61 6c 65 73 63 65 28 6d 61 78 ECT coalesce(max
0b00: 28 69 64 78 29 2c 30 29 20 2b 20 31 20 46 52 4f (idx),0) + 1 FRO
0b10: 4d 20 72 6c 6f 67 29 2c 20 0a 09 20 20 6f 6c 64 M rlog), .. old
0b20: 2e 61 2c 20 6f 6c 64 2e 62 2c 20 0a 09 20 20 28 .a, old.b, .. (
0b30: 53 45 4c 45 43 54 20 73 75 6d 28 61 29 20 46 52 SELECT sum(a) FR
0b40: 4f 4d 20 74 62 6c 29 2c 20 28 53 45 4c 45 43 54 OM tbl), (SELECT
0b50: 20 73 75 6d 28 62 29 20 46 52 4f 4d 20 74 62 6c sum(b) FROM tbl
0b60: 29 2c 20 0a 09 20 20 6e 65 77 2e 61 2c 20 6e 65 ), .. new.a, ne
0b70: 77 2e 62 29 3b 0a 20 20 20 20 45 4e 44 3b 0a 0a w.b);. END;..
0b80: 20 20 20 20 43 52 45 41 54 45 20 54 52 49 47 47 CREATE TRIGG
0b90: 45 52 20 61 66 74 65 72 5f 75 70 64 61 74 65 5f ER after_update_
0ba0: 72 6f 77 20 41 46 54 45 52 20 55 50 44 41 54 45 row AFTER UPDATE
0bb0: 20 4f 4e 20 74 62 6c 20 46 4f 52 20 45 41 43 48 ON tbl FOR EACH
0bc0: 20 52 4f 57 20 0a 20 20 20 20 20 20 42 45 47 49 ROW . BEGI
0bd0: 4e 0a 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 N. INSERT I
0be0: 4e 54 4f 20 72 6c 6f 67 20 56 41 4c 55 45 53 20 NTO rlog VALUES
0bf0: 28 20 28 53 45 4c 45 43 54 20 63 6f 61 6c 65 73 ( (SELECT coales
0c00: 63 65 28 6d 61 78 28 69 64 78 29 2c 30 29 20 2b ce(max(idx),0) +
0c10: 20 31 20 46 52 4f 4d 20 72 6c 6f 67 29 2c 20 0a 1 FROM rlog), .
0c20: 09 20 20 6f 6c 64 2e 61 2c 20 6f 6c 64 2e 62 2c . old.a, old.b,
0c30: 20 0a 09 20 20 28 53 45 4c 45 43 54 20 73 75 6d .. (SELECT sum
0c40: 28 61 29 20 46 52 4f 4d 20 74 62 6c 29 2c 20 28 (a) FROM tbl), (
0c50: 53 45 4c 45 43 54 20 73 75 6d 28 62 29 20 46 52 SELECT sum(b) FR
0c60: 4f 4d 20 74 62 6c 29 2c 20 0a 09 20 20 6e 65 77 OM tbl), .. new
0c70: 2e 61 2c 20 6e 65 77 2e 62 29 3b 0a 20 20 20 20 .a, new.b);.
0c80: 45 4e 44 3b 0a 0a 20 20 20 20 43 52 45 41 54 45 END;.. CREATE
0c90: 20 54 52 49 47 47 45 52 20 63 6f 6e 64 69 74 69 TRIGGER conditi
0ca0: 6f 6e 61 6c 5f 75 70 64 61 74 65 5f 72 6f 77 20 onal_update_row
0cb0: 41 46 54 45 52 20 55 50 44 41 54 45 20 4f 4e 20 AFTER UPDATE ON
0cc0: 74 62 6c 20 46 4f 52 20 45 41 43 48 20 52 4f 57 tbl FOR EACH ROW
0cd0: 0a 20 20 20 20 20 20 57 48 45 4e 20 6f 6c 64 2e . WHEN old.
0ce0: 61 20 3d 20 31 0a 20 20 20 20 20 20 42 45 47 49 a = 1. BEGI
0cf0: 4e 0a 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 N. INSERT I
0d00: 4e 54 4f 20 63 6c 6f 67 20 56 41 4c 55 45 53 20 NTO clog VALUES
0d10: 28 20 28 53 45 4c 45 43 54 20 63 6f 61 6c 65 73 ( (SELECT coales
0d20: 63 65 28 6d 61 78 28 69 64 78 29 2c 30 29 20 2b ce(max(idx),0) +
0d30: 20 31 20 46 52 4f 4d 20 63 6c 6f 67 29 2c 20 0a 1 FROM clog), .
0d40: 09 20 20 6f 6c 64 2e 61 2c 20 6f 6c 64 2e 62 2c . old.a, old.b,
0d50: 20 0a 09 20 20 28 53 45 4c 45 43 54 20 73 75 6d .. (SELECT sum
0d60: 28 61 29 20 46 52 4f 4d 20 74 62 6c 29 2c 20 28 (a) FROM tbl), (
0d70: 53 45 4c 45 43 54 20 73 75 6d 28 62 29 20 46 52 SELECT sum(b) FR
0d80: 4f 4d 20 74 62 6c 29 2c 20 0a 09 20 20 6e 65 77 OM tbl), .. new
0d90: 2e 61 2c 20 6e 65 77 2e 62 29 3b 0a 20 20 20 20 .a, new.b);.
0da0: 45 4e 44 3b 0a 20 20 7d 0a 0a 20 20 64 6f 5f 74 END;. }.. do_t
0db0: 65 73 74 20 74 72 69 67 67 65 72 32 2d 31 2e 24 est trigger2-1.$
0dc0: 69 69 2e 31 20 7b 0a 20 20 20 20 65 78 65 63 73 ii.1 {. execs
0dd0: 71 6c 20 7b 20 0a 20 20 20 20 20 20 55 50 44 41 ql { . UPDA
0de0: 54 45 20 74 62 6c 20 53 45 54 20 61 20 3d 20 61 TE tbl SET a = a
0df0: 20 2a 20 31 30 2c 20 62 20 3d 20 62 20 2a 20 31 * 10, b = b * 1
0e00: 30 3b 0a 20 20 20 20 20 20 53 45 4c 45 43 54 20 0;. SELECT
0e10: 2a 20 46 52 4f 4d 20 72 6c 6f 67 20 4f 52 44 45 * FROM rlog ORDE
0e20: 52 20 42 59 20 69 64 78 3b 0a 20 20 20 20 20 20 R BY idx;.
0e30: 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 63 6c SELECT * FROM cl
0e40: 6f 67 20 4f 52 44 45 52 20 42 59 20 69 64 78 3b og ORDER BY idx;
0e50: 0a 20 20 20 20 7d 0a 20 20 7d 20 5b 6c 69 73 74 . }. } [list
0e60: 20 31 20 31 20 32 20 20 34 20 20 36 20 31 30 20 1 1 2 4 6 10
0e70: 32 30 20 5c 0a 20 20 20 20 20 20 20 20 20 20 32 20 \. 2
0e80: 20 31 20 32 20 31 33 20 32 34 20 31 30 20 32 30 1 2 13 24 10 20
0e90: 20 5c 0a 09 20 20 33 20 33 20 34 20 31 33 20 32 \.. 3 3 4 13 2
0ea0: 34 20 33 30 20 34 30 20 5c 0a 09 20 20 34 20 33 4 30 40 \.. 4 3
0eb0: 20 34 20 34 30 20 36 30 20 33 30 20 34 30 20 5c 4 40 60 30 40 \
0ec0: 0a 20 20 20 20 20 20 20 20 20 20 31 20 31 20 32 . 1 1 2
0ed0: 20 31 33 20 32 34 20 31 30 20 32 30 20 5d 0a 0a 13 24 10 20 ]..
0ee0: 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 execsql {.
0ef0: 44 45 4c 45 54 45 20 46 52 4f 4d 20 72 6c 6f 67 DELETE FROM rlog
0f00: 3b 0a 20 20 20 20 44 45 4c 45 54 45 20 46 52 4f ;. DELETE FRO
0f10: 4d 20 74 62 6c 3b 0a 20 20 20 20 49 4e 53 45 52 M tbl;. INSER
0f20: 54 20 49 4e 54 4f 20 74 62 6c 20 56 41 4c 55 45 T INTO tbl VALUE
0f30: 53 20 28 31 30 30 2c 20 31 30 30 29 3b 0a 20 20 S (100, 100);.
0f40: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 62 INSERT INTO tb
0f50: 6c 20 56 41 4c 55 45 53 20 28 33 30 30 2c 20 32 l VALUES (300, 2
0f60: 30 30 29 3b 0a 20 20 20 20 43 52 45 41 54 45 20 00);. CREATE
0f70: 54 52 49 47 47 45 52 20 64 65 6c 65 74 65 5f 62 TRIGGER delete_b
0f80: 65 66 6f 72 65 5f 72 6f 77 20 42 45 46 4f 52 45 efore_row BEFORE
0f90: 20 44 45 4c 45 54 45 20 4f 4e 20 74 62 6c 20 46 DELETE ON tbl F
0fa0: 4f 52 20 45 41 43 48 20 52 4f 57 0a 20 20 20 20 OR EACH ROW.
0fb0: 20 20 42 45 47 49 4e 0a 20 20 20 20 20 20 49 4e BEGIN. IN
0fc0: 53 45 52 54 20 49 4e 54 4f 20 72 6c 6f 67 20 56 SERT INTO rlog V
0fd0: 41 4c 55 45 53 20 28 20 28 53 45 4c 45 43 54 20 ALUES ( (SELECT
0fe0: 63 6f 61 6c 65 73 63 65 28 6d 61 78 28 69 64 78 coalesce(max(idx
0ff0: 29 2c 30 29 20 2b 20 31 20 46 52 4f 4d 20 72 6c ),0) + 1 FROM rl
1000: 6f 67 29 2c 20 0a 09 20 20 6f 6c 64 2e 61 2c 20 og), .. old.a,
1010: 6f 6c 64 2e 62 2c 20 0a 09 20 20 28 53 45 4c 45 old.b, .. (SELE
1020: 43 54 20 73 75 6d 28 61 29 20 46 52 4f 4d 20 74 CT sum(a) FROM t
1030: 62 6c 29 2c 20 28 53 45 4c 45 43 54 20 73 75 6d bl), (SELECT sum
1040: 28 62 29 20 46 52 4f 4d 20 74 62 6c 29 2c 20 0a (b) FROM tbl), .
1050: 09 20 20 30 2c 20 30 29 3b 0a 20 20 20 20 45 4e . 0, 0);. EN
1060: 44 3b 0a 0a 20 20 20 20 43 52 45 41 54 45 20 54 D;.. CREATE T
1070: 52 49 47 47 45 52 20 64 65 6c 65 74 65 5f 61 66 RIGGER delete_af
1080: 74 65 72 5f 72 6f 77 20 41 46 54 45 52 20 44 45 ter_row AFTER DE
1090: 4c 45 54 45 20 4f 4e 20 74 62 6c 20 46 4f 52 20 LETE ON tbl FOR
10a0: 45 41 43 48 20 52 4f 57 0a 20 20 20 20 20 20 42 EACH ROW. B
10b0: 45 47 49 4e 0a 20 20 20 20 20 20 49 4e 53 45 52 EGIN. INSER
10c0: 54 20 49 4e 54 4f 20 72 6c 6f 67 20 56 41 4c 55 T INTO rlog VALU
10d0: 45 53 20 28 20 28 53 45 4c 45 43 54 20 63 6f 61 ES ( (SELECT coa
10e0: 6c 65 73 63 65 28 6d 61 78 28 69 64 78 29 2c 30 lesce(max(idx),0
10f0: 29 20 2b 20 31 20 46 52 4f 4d 20 72 6c 6f 67 29 ) + 1 FROM rlog)
1100: 2c 20 0a 09 20 20 6f 6c 64 2e 61 2c 20 6f 6c 64 , .. old.a, old
1110: 2e 62 2c 20 0a 09 20 20 28 53 45 4c 45 43 54 20 .b, .. (SELECT
1120: 73 75 6d 28 61 29 20 46 52 4f 4d 20 74 62 6c 29 sum(a) FROM tbl)
1130: 2c 20 28 53 45 4c 45 43 54 20 73 75 6d 28 62 29 , (SELECT sum(b)
1140: 20 46 52 4f 4d 20 74 62 6c 29 2c 20 0a 09 20 20 FROM tbl), ..
1150: 30 2c 20 30 29 3b 0a 20 20 20 20 45 4e 44 3b 0a 0, 0);. END;.
1160: 20 20 7d 0a 20 20 64 6f 5f 74 65 73 74 20 74 72 }. do_test tr
1170: 69 67 67 65 72 32 2d 31 2e 24 69 69 2e 32 20 7b igger2-1.$ii.2 {
1180: 0a 20 20 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 . execsql {.
1190: 20 20 20 20 20 44 45 4c 45 54 45 20 46 52 4f 4d DELETE FROM
11a0: 20 74 62 6c 3b 0a 20 20 20 20 20 20 53 45 4c 45 tbl;. SELE
11b0: 43 54 20 2a 20 46 52 4f 4d 20 72 6c 6f 67 3b 0a CT * FROM rlog;.
11c0: 20 20 20 20 7d 0a 20 20 7d 20 5b 6c 69 73 74 20 }. } [list
11d0: 31 20 31 30 30 20 31 30 30 20 34 30 30 20 33 30 1 100 100 400 30
11e0: 30 20 30 20 30 20 5c 0a 20 20 20 20 20 20 20 20 0 0 0 \.
11f0: 20 20 32 20 31 30 30 20 31 30 30 20 33 30 30 20 2 100 100 300
1200: 32 30 30 20 30 20 30 20 5c 0a 20 20 20 20 20 20 200 0 0 \.
1210: 20 20 20 20 33 20 33 30 30 20 32 30 30 20 33 30 3 300 200 30
1220: 30 20 32 30 30 20 30 20 30 20 5c 0a 20 20 20 20 0 200 0 0 \.
1230: 20 20 20 20 20 20 34 20 33 30 30 20 32 30 30 20 4 300 200
1240: 30 20 30 20 30 20 30 20 5d 0a 0a 20 20 65 78 65 0 0 0 0 ].. exe
1250: 63 73 71 6c 20 7b 0a 20 20 20 20 44 45 4c 45 54 csql {. DELET
1260: 45 20 46 52 4f 4d 20 72 6c 6f 67 3b 0a 20 20 20 E FROM rlog;.
1270: 20 43 52 45 41 54 45 20 54 52 49 47 47 45 52 20 CREATE TRIGGER
1280: 69 6e 73 65 72 74 5f 62 65 66 6f 72 65 5f 72 6f insert_before_ro
1290: 77 20 42 45 46 4f 52 45 20 49 4e 53 45 52 54 20 w BEFORE INSERT
12a0: 4f 4e 20 74 62 6c 20 46 4f 52 20 45 41 43 48 20 ON tbl FOR EACH
12b0: 52 4f 57 0a 20 20 20 20 20 20 42 45 47 49 4e 0a ROW. BEGIN.
12c0: 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 INSERT INT
12d0: 4f 20 72 6c 6f 67 20 56 41 4c 55 45 53 20 28 20 O rlog VALUES (
12e0: 28 53 45 4c 45 43 54 20 63 6f 61 6c 65 73 63 65 (SELECT coalesce
12f0: 28 6d 61 78 28 69 64 78 29 2c 30 29 20 2b 20 31 (max(idx),0) + 1
1300: 20 46 52 4f 4d 20 72 6c 6f 67 29 2c 20 0a 09 20 FROM rlog), ..
1310: 20 30 2c 20 30 2c 0a 09 20 20 28 53 45 4c 45 43 0, 0,.. (SELEC
1320: 54 20 73 75 6d 28 61 29 20 46 52 4f 4d 20 74 62 T sum(a) FROM tb
1330: 6c 29 2c 20 28 53 45 4c 45 43 54 20 73 75 6d 28 l), (SELECT sum(
1340: 62 29 20 46 52 4f 4d 20 74 62 6c 29 2c 20 0a 09 b) FROM tbl), ..
1350: 20 20 6e 65 77 2e 61 2c 20 6e 65 77 2e 62 29 3b new.a, new.b);
1360: 0a 20 20 20 20 45 4e 44 3b 0a 0a 20 20 20 20 43 . END;.. C
1370: 52 45 41 54 45 20 54 52 49 47 47 45 52 20 69 6e REATE TRIGGER in
1380: 73 65 72 74 5f 61 66 74 65 72 5f 72 6f 77 20 41 sert_after_row A
1390: 46 54 45 52 20 49 4e 53 45 52 54 20 4f 4e 20 74 FTER INSERT ON t
13a0: 62 6c 20 46 4f 52 20 45 41 43 48 20 52 4f 57 0a bl FOR EACH ROW.
13b0: 20 20 20 20 20 20 42 45 47 49 4e 0a 20 20 20 20 BEGIN.
13c0: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 72 6c INSERT INTO rl
13d0: 6f 67 20 56 41 4c 55 45 53 20 28 20 28 53 45 4c og VALUES ( (SEL
13e0: 45 43 54 20 63 6f 61 6c 65 73 63 65 28 6d 61 78 ECT coalesce(max
13f0: 28 69 64 78 29 2c 30 29 20 2b 20 31 20 46 52 4f (idx),0) + 1 FRO
1400: 4d 20 72 6c 6f 67 29 2c 20 0a 09 20 20 30 2c 20 M rlog), .. 0,
1410: 30 2c 0a 09 20 20 28 53 45 4c 45 43 54 20 73 75 0,.. (SELECT su
1420: 6d 28 61 29 20 46 52 4f 4d 20 74 62 6c 29 2c 20 m(a) FROM tbl),
1430: 28 53 45 4c 45 43 54 20 73 75 6d 28 62 29 20 46 (SELECT sum(b) F
1440: 52 4f 4d 20 74 62 6c 29 2c 20 0a 09 20 20 6e 65 ROM tbl), .. ne
1450: 77 2e 61 2c 20 6e 65 77 2e 62 29 3b 0a 20 20 20 w.a, new.b);.
1460: 20 45 4e 44 3b 0a 20 20 7d 0a 20 20 64 6f 5f 74 END;. }. do_t
1470: 65 73 74 20 74 72 69 67 67 65 72 32 2d 31 2e 24 est trigger2-1.$
1480: 69 69 2e 33 20 7b 0a 20 20 20 20 65 78 65 63 73 ii.3 {. execs
1490: 71 6c 20 7b 0a 0a 20 20 20 20 20 20 43 52 45 41 ql {.. CREA
14a0: 54 45 20 54 41 42 4c 45 20 6f 74 68 65 72 5f 74 TE TABLE other_t
14b0: 62 6c 28 61 2c 20 62 29 3b 0a 20 20 20 20 20 20 bl(a, b);.
14c0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 6f 74 68 65 INSERT INTO othe
14d0: 72 5f 74 62 6c 20 56 41 4c 55 45 53 28 31 2c 20 r_tbl VALUES(1,
14e0: 32 29 3b 0a 20 20 20 20 20 20 49 4e 53 45 52 54 2);. INSERT
14f0: 20 49 4e 54 4f 20 6f 74 68 65 72 5f 74 62 6c 20 INTO other_tbl
1500: 56 41 4c 55 45 53 28 33 2c 20 34 29 3b 0a 20 20 VALUES(3, 4);.
1510: 20 20 20 20 2d 2d 20 49 4e 53 45 52 54 20 49 4e -- INSERT IN
1520: 54 4f 20 74 62 6c 20 53 45 4c 45 43 54 20 2a 20 TO tbl SELECT *
1530: 46 52 4f 4d 20 6f 74 68 65 72 5f 74 62 6c 3b 0a FROM other_tbl;.
1540: 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 INSERT INT
1550: 4f 20 74 62 6c 20 56 41 4c 55 45 53 28 35 2c 20 O tbl VALUES(5,
1560: 36 29 3b 0a 20 20 20 20 20 20 44 52 4f 50 20 54 6);. DROP T
1570: 41 42 4c 45 20 6f 74 68 65 72 5f 74 62 6c 3b 0a ABLE other_tbl;.
1580: 0a 20 20 20 20 20 20 53 45 4c 45 43 54 20 2a 20 . SELECT *
1590: 46 52 4f 4d 20 72 6c 6f 67 3b 0a 20 20 20 20 7d FROM rlog;. }
15a0: 0a 20 20 7d 20 5b 6c 69 73 74 20 31 20 30 20 30 . } [list 1 0 0
15b0: 20 30 20 30 20 35 20 36 20 5c 0a 20 20 20 20 20 0 0 5 6 \.
15c0: 20 20 20 20 20 32 20 30 20 30 20 35 20 36 20 35 2 0 0 5 6 5
15d0: 20 36 20 5d 0a 0a 20 20 64 6f 5f 74 65 73 74 20 6 ].. do_test
15e0: 74 72 69 67 67 65 72 32 2d 31 2e 24 69 69 2e 34 trigger2-1.$ii.4
15f0: 20 7b 0a 20 20 20 20 65 78 65 63 73 71 6c 20 7b {. execsql {
1600: 0a 20 20 20 20 20 20 50 52 41 47 4d 41 20 69 6e . PRAGMA in
1610: 74 65 67 72 69 74 79 5f 63 68 65 63 6b 3b 0a 20 tegrity_check;.
1620: 20 20 20 7d 0a 20 20 7d 20 7b 6f 6b 7d 0a 7d 0a }. } {ok}.}.
1630: 63 61 74 63 68 73 71 6c 20 7b 0a 20 20 44 52 4f catchsql {. DRO
1640: 50 20 54 41 42 4c 45 20 72 6c 6f 67 3b 0a 20 20 P TABLE rlog;.
1650: 44 52 4f 50 20 54 41 42 4c 45 20 63 6c 6f 67 3b DROP TABLE clog;
1660: 0a 20 20 44 52 4f 50 20 54 41 42 4c 45 20 74 62 . DROP TABLE tb
1670: 6c 3b 0a 20 20 44 52 4f 50 20 54 41 42 4c 45 20 l;. DROP TABLE
1680: 6f 74 68 65 72 5f 74 62 6c 3b 0a 7d 0a 0a 23 20 other_tbl;.}..#
1690: 32 2e 0a 73 65 74 20 69 69 20 30 0a 66 6f 72 65 2..set ii 0.fore
16a0: 61 63 68 20 74 72 5f 70 72 6f 67 72 61 6d 20 7b ach tr_program {
16b0: 0a 20 20 7b 55 50 44 41 54 45 20 74 62 6c 20 53 . {UPDATE tbl S
16c0: 45 54 20 62 20 3d 20 6f 6c 64 2e 62 3b 7d 0a 20 ET b = old.b;}.
16d0: 20 7b 49 4e 53 45 52 54 20 49 4e 54 4f 20 6c 6f {INSERT INTO lo
16e0: 67 20 56 41 4c 55 45 53 28 6e 65 77 2e 63 2c 20 g VALUES(new.c,
16f0: 32 2c 20 33 29 3b 7d 0a 20 20 7b 44 45 4c 45 54 2, 3);}. {DELET
1700: 45 20 46 52 4f 4d 20 6c 6f 67 20 57 48 45 52 45 E FROM log WHERE
1710: 20 61 20 3d 20 31 3b 7d 0a 20 20 7b 49 4e 53 45 a = 1;}. {INSE
1720: 52 54 20 49 4e 54 4f 20 74 62 6c 20 56 41 4c 55 RT INTO tbl VALU
1730: 45 53 28 35 30 30 2c 20 6e 65 77 2e 62 20 2a 20 ES(500, new.b *
1740: 31 30 2c 20 37 30 30 29 3b 20 0a 20 20 20 20 55 10, 700); . U
1750: 50 44 41 54 45 20 74 62 6c 20 53 45 54 20 63 20 PDATE tbl SET c
1760: 3d 20 6f 6c 64 2e 63 3b 20 0a 20 20 20 20 44 45 = old.c; . DE
1770: 4c 45 54 45 20 46 52 4f 4d 20 6c 6f 67 3b 7d 0a LETE FROM log;}.
1780: 20 20 7b 49 4e 53 45 52 54 20 49 4e 54 4f 20 6c {INSERT INTO l
1790: 6f 67 20 73 65 6c 65 63 74 20 2a 20 66 72 6f 6d og select * from
17a0: 20 74 62 6c 3b 7d 20 0a 7d 20 7b 0a 20 20 66 6f tbl;} .} {. fo
17b0: 72 65 61 63 68 20 74 65 73 74 5f 76 61 72 73 65 reach test_varse
17c0: 74 20 5b 20 6c 69 73 74 20 5c 0a 20 20 20 20 7b t [ list \. {
17d0: 0a 20 20 20 20 20 20 73 65 74 20 73 74 61 74 65 . set state
17e0: 6d 65 6e 74 20 7b 55 50 44 41 54 45 20 74 62 6c ment {UPDATE tbl
17f0: 20 53 45 54 20 63 20 3d 20 31 30 20 57 48 45 52 SET c = 10 WHER
1800: 45 20 61 20 3d 20 31 3b 7d 20 0a 20 20 20 20 20 E a = 1;} .
1810: 20 73 65 74 20 70 72 65 70 20 20 20 20 20 20 7b set prep {
1820: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 62 6c 20 INSERT INTO tbl
1830: 56 41 4c 55 45 53 28 31 2c 20 32 2c 20 33 29 3b VALUES(1, 2, 3);
1840: 7d 0a 20 20 20 20 20 20 73 65 74 20 6e 65 77 43 }. set newC
1850: 20 31 30 0a 20 20 20 20 20 20 73 65 74 20 6e 65 10. set ne
1860: 77 42 20 32 0a 20 20 20 20 20 20 73 65 74 20 6e wB 2. set n
1870: 65 77 41 20 31 0a 20 20 20 20 20 20 73 65 74 20 ewA 1. set
1880: 6f 6c 64 41 20 31 0a 20 20 20 20 20 20 73 65 74 oldA 1. set
1890: 20 6f 6c 64 42 20 32 0a 20 20 20 20 20 20 73 65 oldB 2. se
18a0: 74 20 6f 6c 64 43 20 33 0a 20 20 20 20 7d 20 5c t oldC 3. } \
18b0: 0a 20 20 20 20 7b 0a 20 20 20 20 20 20 73 65 74 . {. set
18c0: 20 73 74 61 74 65 6d 65 6e 74 20 7b 44 45 4c 45 statement {DELE
18d0: 54 45 20 46 52 4f 4d 20 74 62 6c 20 57 48 45 52 TE FROM tbl WHER
18e0: 45 20 61 20 3d 20 31 3b 7d 0a 20 20 20 20 20 20 E a = 1;}.
18f0: 73 65 74 20 70 72 65 70 20 20 20 20 20 20 7b 49 set prep {I
1900: 4e 53 45 52 54 20 49 4e 54 4f 20 74 62 6c 20 56 NSERT INTO tbl V
1910: 41 4c 55 45 53 28 31 2c 20 32 2c 20 33 29 3b 7d ALUES(1, 2, 3);}
1920: 0a 20 20 20 20 20 20 73 65 74 20 6f 6c 64 41 20 . set oldA
1930: 31 0a 20 20 20 20 20 20 73 65 74 20 6f 6c 64 42 1. set oldB
1940: 20 32 0a 20 20 20 20 20 20 73 65 74 20 6f 6c 64 2. set old
1950: 43 20 33 0a 20 20 20 20 7d 20 5c 0a 20 20 20 20 C 3. } \.
1960: 7b 0a 20 20 20 20 20 20 73 65 74 20 73 74 61 74 {. set stat
1970: 65 6d 65 6e 74 20 7b 49 4e 53 45 52 54 20 49 4e ement {INSERT IN
1980: 54 4f 20 74 62 6c 20 56 41 4c 55 45 53 28 31 2c TO tbl VALUES(1,
1990: 20 32 2c 20 33 29 3b 7d 0a 20 20 20 20 20 20 73 2, 3);}. s
19a0: 65 74 20 6e 65 77 41 20 31 0a 20 20 20 20 20 20 et newA 1.
19b0: 73 65 74 20 6e 65 77 42 20 32 0a 20 20 20 20 20 set newB 2.
19c0: 20 73 65 74 20 6e 65 77 43 20 33 0a 20 20 20 20 set newC 3.
19d0: 7d 0a 20 20 5d 20 5c 0a 20 20 7b 0a 20 20 20 20 }. ] \. {.
19e0: 73 65 74 20 73 74 61 74 65 6d 65 6e 74 20 7b 7d set statement {}
19f0: 0a 20 20 20 20 73 65 74 20 70 72 65 70 20 7b 7d . set prep {}
1a00: 0a 20 20 20 20 73 65 74 20 6e 65 77 41 20 7b 27 . set newA {'
1a10: 27 7d 0a 20 20 20 20 73 65 74 20 6e 65 77 42 20 '}. set newB
1a20: 7b 27 27 7d 0a 20 20 20 20 73 65 74 20 6e 65 77 {''}. set new
1a30: 43 20 7b 27 27 7d 0a 20 20 20 20 73 65 74 20 6f C {''}. set o
1a40: 6c 64 41 20 7b 27 27 7d 0a 20 20 20 20 73 65 74 ldA {''}. set
1a50: 20 6f 6c 64 42 20 7b 27 27 7d 0a 20 20 20 20 73 oldB {''}. s
1a60: 65 74 20 6f 6c 64 43 20 7b 27 27 7d 0a 0a 20 20 et oldC {''}..
1a70: 20 20 69 6e 63 72 20 69 69 0a 0a 20 20 20 20 65 incr ii.. e
1a80: 76 61 6c 20 24 74 65 73 74 5f 76 61 72 73 65 74 val $test_varset
1a90: 0a 0a 20 20 20 20 73 65 74 20 73 74 61 74 65 6d .. set statem
1aa0: 65 6e 74 5f 74 79 70 65 20 5b 73 74 72 69 6e 67 ent_type [string
1ab0: 20 72 61 6e 67 65 20 24 73 74 61 74 65 6d 65 6e range $statemen
1ac0: 74 20 30 20 35 5d 0a 20 20 20 20 73 65 74 20 74 t 0 5]. set t
1ad0: 72 5f 70 72 6f 67 72 61 6d 5f 66 69 78 65 64 20 r_program_fixed
1ae0: 24 74 72 5f 70 72 6f 67 72 61 6d 0a 20 20 20 20 $tr_program.
1af0: 69 66 20 7b 24 73 74 61 74 65 6d 65 6e 74 5f 74 if {$statement_t
1b00: 79 70 65 20 3d 3d 20 22 44 45 4c 45 54 45 22 7d ype == "DELETE"}
1b10: 20 7b 0a 20 20 20 20 20 20 72 65 67 73 75 62 20 {. regsub
1b20: 2d 61 6c 6c 20 6e 65 77 5c 2e 61 20 24 74 72 5f -all new\.a $tr_
1b30: 70 72 6f 67 72 61 6d 5f 66 69 78 65 64 20 7b 27 program_fixed {'
1b40: 27 7d 20 74 72 5f 70 72 6f 67 72 61 6d 5f 66 69 '} tr_program_fi
1b50: 78 65 64 20 0a 20 20 20 20 20 20 72 65 67 73 75 xed . regsu
1b60: 62 20 2d 61 6c 6c 20 6e 65 77 5c 2e 62 20 24 74 b -all new\.b $t
1b70: 72 5f 70 72 6f 67 72 61 6d 5f 66 69 78 65 64 20 r_program_fixed
1b80: 7b 27 27 7d 20 74 72 5f 70 72 6f 67 72 61 6d 5f {''} tr_program_
1b90: 66 69 78 65 64 20 0a 20 20 20 20 20 20 72 65 67 fixed . reg
1ba0: 73 75 62 20 2d 61 6c 6c 20 6e 65 77 5c 2e 63 20 sub -all new\.c
1bb0: 24 74 72 5f 70 72 6f 67 72 61 6d 5f 66 69 78 65 $tr_program_fixe
1bc0: 64 20 7b 27 27 7d 20 74 72 5f 70 72 6f 67 72 61 d {''} tr_progra
1bd0: 6d 5f 66 69 78 65 64 20 0a 20 20 20 20 7d 0a 20 m_fixed . }.
1be0: 20 20 20 69 66 20 7b 24 73 74 61 74 65 6d 65 6e if {$statemen
1bf0: 74 5f 74 79 70 65 20 3d 3d 20 22 49 4e 53 45 52 t_type == "INSER
1c00: 54 22 7d 20 7b 0a 20 20 20 20 20 20 72 65 67 73 T"} {. regs
1c10: 75 62 20 2d 61 6c 6c 20 6f 6c 64 5c 2e 61 20 24 ub -all old\.a $
1c20: 74 72 5f 70 72 6f 67 72 61 6d 5f 66 69 78 65 64 tr_program_fixed
1c30: 20 7b 27 27 7d 20 74 72 5f 70 72 6f 67 72 61 6d {''} tr_program
1c40: 5f 66 69 78 65 64 20 0a 20 20 20 20 20 20 72 65 _fixed . re
1c50: 67 73 75 62 20 2d 61 6c 6c 20 6f 6c 64 5c 2e 62 gsub -all old\.b
1c60: 20 24 74 72 5f 70 72 6f 67 72 61 6d 5f 66 69 78 $tr_program_fix
1c70: 65 64 20 7b 27 27 7d 20 74 72 5f 70 72 6f 67 72 ed {''} tr_progr
1c80: 61 6d 5f 66 69 78 65 64 20 0a 20 20 20 20 20 20 am_fixed .
1c90: 72 65 67 73 75 62 20 2d 61 6c 6c 20 6f 6c 64 5c regsub -all old\
1ca0: 2e 63 20 24 74 72 5f 70 72 6f 67 72 61 6d 5f 66 .c $tr_program_f
1cb0: 69 78 65 64 20 7b 27 27 7d 20 74 72 5f 70 72 6f ixed {''} tr_pro
1cc0: 67 72 61 6d 5f 66 69 78 65 64 20 0a 20 20 20 20 gram_fixed .
1cd0: 7d 0a 0a 0a 20 20 20 20 73 65 74 20 74 72 5f 70 }... set tr_p
1ce0: 72 6f 67 72 61 6d 5f 63 6f 6f 6b 65 64 20 24 74 rogram_cooked $t
1cf0: 72 5f 70 72 6f 67 72 61 6d 0a 20 20 20 20 72 65 r_program. re
1d00: 67 73 75 62 20 2d 61 6c 6c 20 6e 65 77 5c 2e 61 gsub -all new\.a
1d10: 20 24 74 72 5f 70 72 6f 67 72 61 6d 5f 63 6f 6f $tr_program_coo
1d20: 6b 65 64 20 24 6e 65 77 41 20 74 72 5f 70 72 6f ked $newA tr_pro
1d30: 67 72 61 6d 5f 63 6f 6f 6b 65 64 20 0a 20 20 20 gram_cooked .
1d40: 20 72 65 67 73 75 62 20 2d 61 6c 6c 20 6e 65 77 regsub -all new
1d50: 5c 2e 62 20 24 74 72 5f 70 72 6f 67 72 61 6d 5f \.b $tr_program_
1d60: 63 6f 6f 6b 65 64 20 24 6e 65 77 42 20 74 72 5f cooked $newB tr_
1d70: 70 72 6f 67 72 61 6d 5f 63 6f 6f 6b 65 64 20 0a program_cooked .
1d80: 20 20 20 20 72 65 67 73 75 62 20 2d 61 6c 6c 20 regsub -all
1d90: 6e 65 77 5c 2e 63 20 24 74 72 5f 70 72 6f 67 72 new\.c $tr_progr
1da0: 61 6d 5f 63 6f 6f 6b 65 64 20 24 6e 65 77 43 20 am_cooked $newC
1db0: 74 72 5f 70 72 6f 67 72 61 6d 5f 63 6f 6f 6b 65 tr_program_cooke
1dc0: 64 20 0a 20 20 20 20 72 65 67 73 75 62 20 2d 61 d . regsub -a
1dd0: 6c 6c 20 6f 6c 64 5c 2e 61 20 24 74 72 5f 70 72 ll old\.a $tr_pr
1de0: 6f 67 72 61 6d 5f 63 6f 6f 6b 65 64 20 24 6f 6c ogram_cooked $ol
1df0: 64 41 20 74 72 5f 70 72 6f 67 72 61 6d 5f 63 6f dA tr_program_co
1e00: 6f 6b 65 64 20 0a 20 20 20 20 72 65 67 73 75 62 oked . regsub
1e10: 20 2d 61 6c 6c 20 6f 6c 64 5c 2e 62 20 24 74 72 -all old\.b $tr
1e20: 5f 70 72 6f 67 72 61 6d 5f 63 6f 6f 6b 65 64 20 _program_cooked
1e30: 24 6f 6c 64 42 20 74 72 5f 70 72 6f 67 72 61 6d $oldB tr_program
1e40: 5f 63 6f 6f 6b 65 64 20 0a 20 20 20 20 72 65 67 _cooked . reg
1e50: 73 75 62 20 2d 61 6c 6c 20 6f 6c 64 5c 2e 63 20 sub -all old\.c
1e60: 24 74 72 5f 70 72 6f 67 72 61 6d 5f 63 6f 6f 6b $tr_program_cook
1e70: 65 64 20 24 6f 6c 64 43 20 74 72 5f 70 72 6f 67 ed $oldC tr_prog
1e80: 72 61 6d 5f 63 6f 6f 6b 65 64 20 0a 0a 20 20 20 ram_cooked ..
1e90: 20 63 61 74 63 68 73 71 6c 20 7b 0a 20 20 20 20 catchsql {.
1ea0: 20 20 44 52 4f 50 20 54 41 42 4c 45 20 74 62 6c DROP TABLE tbl
1eb0: 3b 0a 20 20 20 20 20 20 44 52 4f 50 20 54 41 42 ;. DROP TAB
1ec0: 4c 45 20 6c 6f 67 3b 0a 20 20 20 20 7d 0a 0a 20 LE log;. }..
1ed0: 20 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 execsql {.
1ee0: 20 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 CREATE TABLE
1ef0: 74 62 6c 28 61 20 50 52 49 4d 41 52 59 20 4b 45 tbl(a PRIMARY KE
1f00: 59 2c 20 62 2c 20 63 29 3b 0a 20 20 20 20 20 20 Y, b, c);.
1f10: 43 52 45 41 54 45 20 54 41 42 4c 45 20 6c 6f 67 CREATE TABLE log
1f20: 28 61 2c 20 62 2c 20 63 29 3b 0a 20 20 20 20 7d (a, b, c);. }
1f30: 0a 0a 20 20 20 20 73 65 74 20 71 75 65 72 79 20 .. set query
1f40: 7b 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 74 {SELECT * FROM t
1f50: 62 6c 3b 20 53 45 4c 45 43 54 20 2a 20 46 52 4f bl; SELECT * FRO
1f60: 4d 20 6c 6f 67 3b 7d 0a 20 20 20 20 73 65 74 20 M log;}. set
1f70: 70 72 65 70 20 22 24 70 72 65 70 3b 20 49 4e 53 prep "$prep; INS
1f80: 45 52 54 20 49 4e 54 4f 20 6c 6f 67 20 56 41 4c ERT INTO log VAL
1f90: 55 45 53 28 31 2c 20 32 2c 20 33 29 3b 5c 0a 20 UES(1, 2, 3);\.
1fa0: 20 20 20 20 20 20 20 20 20 20 20 20 49 4e 53 45 INSE
1fb0: 52 54 20 49 4e 54 4f 20 6c 6f 67 20 56 41 4c 55 RT INTO log VALU
1fc0: 45 53 28 31 30 2c 20 32 30 2c 20 33 30 29 3b 22 ES(10, 20, 30);"
1fd0: 0a 0a 23 20 43 68 65 63 6b 20 65 78 65 63 75 74 ..# Check execut
1fe0: 69 6f 6e 20 6f 66 20 42 45 46 4f 52 45 20 70 72 ion of BEFORE pr
1ff0: 6f 67 72 61 6d 73 3a 0a 0a 20 20 20 20 73 65 74 ograms:.. set
2000: 20 62 65 66 6f 72 65 5f 64 61 74 61 20 5b 20 65 before_data [ e
2010: 78 65 63 73 71 6c 20 22 24 70 72 65 70 20 24 74 xecsql "$prep $t
2020: 72 5f 70 72 6f 67 72 61 6d 5f 63 6f 6f 6b 65 64 r_program_cooked
2030: 20 24 73 74 61 74 65 6d 65 6e 74 20 24 71 75 65 $statement $que
2040: 72 79 22 20 5d 0a 0a 20 20 20 20 65 78 65 63 73 ry" ].. execs
2050: 71 6c 20 22 44 45 4c 45 54 45 20 46 52 4f 4d 20 ql "DELETE FROM
2060: 74 62 6c 3b 20 44 45 4c 45 54 45 20 46 52 4f 4d tbl; DELETE FROM
2070: 20 6c 6f 67 3b 20 24 70 72 65 70 22 3b 0a 20 20 log; $prep";.
2080: 20 20 65 78 65 63 73 71 6c 20 22 43 52 45 41 54 execsql "CREAT
2090: 45 20 54 52 49 47 47 45 52 20 74 68 65 5f 74 72 E TRIGGER the_tr
20a0: 69 67 67 65 72 20 42 45 46 4f 52 45 20 5b 73 74 igger BEFORE [st
20b0: 72 69 6e 67 20 72 61 6e 67 65 20 24 73 74 61 74 ring range $stat
20c0: 65 6d 65 6e 74 20 30 20 36 5d 5c 0a 20 20 20 20 ement 0 6]\.
20d0: 20 20 20 20 20 20 20 20 20 4f 4e 20 74 62 6c 20 ON tbl
20e0: 42 45 47 49 4e 20 24 74 72 5f 70 72 6f 67 72 61 BEGIN $tr_progra
20f0: 6d 5f 66 69 78 65 64 20 45 4e 44 3b 22 0a 0a 20 m_fixed END;"..
2100: 20 20 20 64 6f 5f 74 65 73 74 20 74 72 69 67 67 do_test trigg
2110: 65 72 32 2d 32 2e 24 69 69 2d 62 65 66 6f 72 65 er2-2.$ii-before
2120: 20 22 65 78 65 63 73 71 6c 20 7b 24 73 74 61 74 "execsql {$stat
2130: 65 6d 65 6e 74 20 24 71 75 65 72 79 7d 22 20 24 ement $query}" $
2140: 62 65 66 6f 72 65 5f 64 61 74 61 0a 0a 20 20 20 before_data..
2150: 20 65 78 65 63 73 71 6c 20 22 44 52 4f 50 20 54 execsql "DROP T
2160: 52 49 47 47 45 52 20 74 68 65 5f 74 72 69 67 67 RIGGER the_trigg
2170: 65 72 3b 22 0a 20 20 20 20 65 78 65 63 73 71 6c er;". execsql
2180: 20 22 44 45 4c 45 54 45 20 46 52 4f 4d 20 74 62 "DELETE FROM tb
2190: 6c 3b 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 6c l; DELETE FROM l
21a0: 6f 67 3b 22 0a 0a 23 20 43 68 65 63 6b 20 65 78 og;"..# Check ex
21b0: 65 63 75 74 69 6f 6e 20 6f 66 20 41 46 54 45 52 ecution of AFTER
21c0: 20 70 72 6f 67 72 61 6d 73 0a 20 20 20 20 73 65 programs. se
21d0: 74 20 61 66 74 65 72 5f 64 61 74 61 20 5b 20 65 t after_data [ e
21e0: 78 65 63 73 71 6c 20 22 24 70 72 65 70 20 24 73 xecsql "$prep $s
21f0: 74 61 74 65 6d 65 6e 74 20 24 74 72 5f 70 72 6f tatement $tr_pro
2200: 67 72 61 6d 5f 63 6f 6f 6b 65 64 20 24 71 75 65 gram_cooked $que
2210: 72 79 22 20 5d 0a 0a 20 20 20 20 65 78 65 63 73 ry" ].. execs
2220: 71 6c 20 22 44 45 4c 45 54 45 20 46 52 4f 4d 20 ql "DELETE FROM
2230: 74 62 6c 3b 20 44 45 4c 45 54 45 20 46 52 4f 4d tbl; DELETE FROM
2240: 20 6c 6f 67 3b 20 24 70 72 65 70 22 3b 0a 20 20 log; $prep";.
2250: 20 20 65 78 65 63 73 71 6c 20 22 43 52 45 41 54 execsql "CREAT
2260: 45 20 54 52 49 47 47 45 52 20 74 68 65 5f 74 72 E TRIGGER the_tr
2270: 69 67 67 65 72 20 41 46 54 45 52 20 5b 73 74 72 igger AFTER [str
2280: 69 6e 67 20 72 61 6e 67 65 20 24 73 74 61 74 65 ing range $state
2290: 6d 65 6e 74 20 30 20 36 5d 5c 0a 20 20 20 20 20 ment 0 6]\.
22a0: 20 20 20 20 20 20 20 20 4f 4e 20 74 62 6c 20 42 ON tbl B
22b0: 45 47 49 4e 20 24 74 72 5f 70 72 6f 67 72 61 6d EGIN $tr_program
22c0: 5f 66 69 78 65 64 20 45 4e 44 3b 22 0a 0a 20 20 _fixed END;"..
22d0: 20 20 64 6f 5f 74 65 73 74 20 74 72 69 67 67 65 do_test trigge
22e0: 72 32 2d 32 2e 24 69 69 2d 61 66 74 65 72 20 22 r2-2.$ii-after "
22f0: 65 78 65 63 73 71 6c 20 7b 24 73 74 61 74 65 6d execsql {$statem
2300: 65 6e 74 20 24 71 75 65 72 79 7d 22 20 24 61 66 ent $query}" $af
2310: 74 65 72 5f 64 61 74 61 0a 20 20 20 20 65 78 65 ter_data. exe
2320: 63 73 71 6c 20 22 44 52 4f 50 20 54 52 49 47 47 csql "DROP TRIGG
2330: 45 52 20 74 68 65 5f 74 72 69 67 67 65 72 3b 22 ER the_trigger;"
2340: 0a 0a 20 20 20 20 64 6f 5f 74 65 73 74 20 74 72 .. do_test tr
2350: 69 67 67 65 72 32 2d 32 2e 24 69 69 2d 69 6e 74 igger2-2.$ii-int
2360: 65 67 72 69 74 79 20 7b 0a 20 20 20 20 20 20 65 egrity {. e
2370: 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 20 20 20 xecsql {.
2380: 20 50 52 41 47 4d 41 20 69 6e 74 65 67 72 69 74 PRAGMA integrit
2390: 79 5f 63 68 65 63 6b 3b 0a 20 20 20 20 20 20 7d y_check;. }
23a0: 0a 20 20 20 20 7d 20 7b 6f 6b 7d 0a 0a 20 20 7d . } {ok}.. }
23b0: 0a 7d 0a 63 61 74 63 68 73 71 6c 20 7b 0a 20 20 .}.catchsql {.
23c0: 44 52 4f 50 20 54 41 42 4c 45 20 74 62 6c 3b 0a DROP TABLE tbl;.
23d0: 20 20 44 52 4f 50 20 54 41 42 4c 45 20 6c 6f 67 DROP TABLE log
23e0: 3b 0a 7d 0a 0a 23 20 33 2e 0a 0a 23 20 74 72 69 ;.}..# 3...# tri
23f0: 67 67 65 72 32 2d 33 2e 31 3a 20 55 50 44 41 54 gger2-3.1: UPDAT
2400: 45 20 4f 46 20 74 72 69 67 67 65 72 73 0a 65 78 E OF triggers.ex
2410: 65 63 73 71 6c 20 7b 0a 20 20 43 52 45 41 54 45 ecsql {. CREATE
2420: 20 54 41 42 4c 45 20 74 62 6c 20 28 61 2c 20 62 TABLE tbl (a, b
2430: 2c 20 63 2c 20 64 29 3b 0a 20 20 43 52 45 41 54 , c, d);. CREAT
2440: 45 20 54 41 42 4c 45 20 6c 6f 67 20 28 61 29 3b E TABLE log (a);
2450: 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 6c . INSERT INTO l
2460: 6f 67 20 56 41 4c 55 45 53 20 28 30 29 3b 0a 20 og VALUES (0);.
2470: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 62 6c INSERT INTO tbl
2480: 20 56 41 4c 55 45 53 20 28 30 2c 20 30 2c 20 30 VALUES (0, 0, 0
2490: 2c 20 30 29 3b 0a 20 20 49 4e 53 45 52 54 20 49 , 0);. INSERT I
24a0: 4e 54 4f 20 74 62 6c 20 56 41 4c 55 45 53 20 28 NTO tbl VALUES (
24b0: 31 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20 43 1, 0, 0, 0);. C
24c0: 52 45 41 54 45 20 54 52 49 47 47 45 52 20 74 62 REATE TRIGGER tb
24d0: 6c 5f 61 66 74 65 72 5f 75 70 64 61 74 65 5f 63 l_after_update_c
24e0: 64 20 42 45 46 4f 52 45 20 55 50 44 41 54 45 20 d BEFORE UPDATE
24f0: 4f 46 20 63 2c 20 64 20 4f 4e 20 74 62 6c 0a 20 OF c, d ON tbl.
2500: 20 20 20 42 45 47 49 4e 0a 20 20 20 20 20 20 55 BEGIN. U
2510: 50 44 41 54 45 20 6c 6f 67 20 53 45 54 20 61 20 PDATE log SET a
2520: 3d 20 61 20 2b 20 31 3b 0a 20 20 20 20 45 4e 44 = a + 1;. END
2530: 3b 0a 7d 0a 64 6f 5f 74 65 73 74 20 74 72 69 67 ;.}.do_test trig
2540: 67 65 72 32 2d 33 2e 31 20 7b 0a 20 20 65 78 65 ger2-3.1 {. exe
2550: 63 73 71 6c 20 7b 0a 20 20 20 20 55 50 44 41 54 csql {. UPDAT
2560: 45 20 74 62 6c 20 53 45 54 20 62 20 3d 20 31 2c E tbl SET b = 1,
2570: 20 63 20 3d 20 31 30 3b 20 2d 2d 20 32 0a 20 20 c = 10; -- 2.
2580: 20 20 55 50 44 41 54 45 20 74 62 6c 20 53 45 54 UPDATE tbl SET
2590: 20 62 20 3d 20 31 30 3b 20 2d 2d 20 30 0a 20 20 b = 10; -- 0.
25a0: 20 20 55 50 44 41 54 45 20 74 62 6c 20 53 45 54 UPDATE tbl SET
25b0: 20 64 20 3d 20 34 20 57 48 45 52 45 20 61 20 3d d = 4 WHERE a =
25c0: 20 30 3b 20 2d 2d 31 0a 20 20 20 20 55 50 44 41 0; --1. UPDA
25d0: 54 45 20 74 62 6c 20 53 45 54 20 61 20 3d 20 34 TE tbl SET a = 4
25e0: 2c 20 62 20 3d 20 31 30 3b 20 2d 2d 30 0a 20 20 , b = 10; --0.
25f0: 20 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 SELECT * FROM
2600: 6c 6f 67 3b 0a 20 20 7d 0a 7d 20 7b 33 7d 0a 65 log;. }.} {3}.e
2610: 78 65 63 73 71 6c 20 7b 0a 20 20 44 52 4f 50 20 xecsql {. DROP
2620: 54 41 42 4c 45 20 74 62 6c 3b 0a 20 20 44 52 4f TABLE tbl;. DRO
2630: 50 20 54 41 42 4c 45 20 6c 6f 67 3b 0a 7d 0a 0a P TABLE log;.}..
2640: 23 20 74 72 69 67 67 65 72 32 2d 33 2e 32 3a 20 # trigger2-3.2:
2650: 57 48 45 4e 20 63 6c 61 75 73 65 0a 73 65 74 20 WHEN clause.set
2660: 77 68 65 6e 5f 74 72 69 67 67 65 72 73 20 5b 20 when_triggers [
2670: 6c 69 73 74 20 5c 0a 20 20 20 20 20 20 20 20 20 list \.
2680: 20 20 20 20 7b 74 31 20 42 45 46 4f 52 45 20 49 {t1 BEFORE I
2690: 4e 53 45 52 54 20 4f 4e 20 74 62 6c 20 57 48 45 NSERT ON tbl WHE
26a0: 4e 20 6e 65 77 2e 61 20 3e 20 32 30 7d 20 5c 0a N new.a > 20} \.
26b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7b 74 32 {t2
26c0: 20 42 45 46 4f 52 45 20 49 4e 53 45 52 54 20 4f BEFORE INSERT O
26d0: 4e 20 74 62 6c 20 57 48 45 4e 20 28 53 45 4c 45 N tbl WHEN (SELE
26e0: 43 54 20 63 6f 75 6e 74 28 2a 29 20 46 52 4f 4d CT count(*) FROM
26f0: 20 74 62 6c 29 20 3d 20 30 7d 20 5d 0a 0a 65 78 tbl) = 0} ]..ex
2700: 65 63 73 71 6c 20 7b 0a 20 20 43 52 45 41 54 45 ecsql {. CREATE
2710: 20 54 41 42 4c 45 20 74 62 6c 20 28 61 2c 20 62 TABLE tbl (a, b
2720: 2c 20 63 2c 20 64 29 3b 0a 20 20 43 52 45 41 54 , c, d);. CREAT
2730: 45 20 54 41 42 4c 45 20 6c 6f 67 20 28 61 29 3b E TABLE log (a);
2740: 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 6c . INSERT INTO l
2750: 6f 67 20 56 41 4c 55 45 53 20 28 30 29 3b 0a 7d og VALUES (0);.}
2760: 0a 0a 66 6f 72 65 61 63 68 20 74 72 69 67 20 24 ..foreach trig $
2770: 77 68 65 6e 5f 74 72 69 67 67 65 72 73 20 7b 0a when_triggers {.
2780: 20 20 65 78 65 63 73 71 6c 20 22 43 52 45 41 54 execsql "CREAT
2790: 45 20 54 52 49 47 47 45 52 20 24 74 72 69 67 20 E TRIGGER $trig
27a0: 42 45 47 49 4e 20 55 50 44 41 54 45 20 6c 6f 67 BEGIN UPDATE log
27b0: 20 73 65 74 20 61 20 3d 20 61 20 2b 20 31 3b 20 set a = a + 1;
27c0: 45 4e 44 3b 22 0a 7d 0a 0a 64 6f 5f 74 65 73 74 END;".}..do_test
27d0: 20 74 72 69 67 67 65 72 32 2d 33 2e 32 20 7b 0a trigger2-3.2 {.
27e0: 20 20 65 78 65 63 73 71 6c 20 7b 20 0a 0a 20 20 execsql { ..
27f0: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 62 INSERT INTO tb
2800: 6c 20 56 41 4c 55 45 53 28 30 2c 20 30 2c 20 30 l VALUES(0, 0, 0
2810: 2c 20 30 29 3b 20 20 20 20 20 2d 2d 20 31 0a 20 , 0); -- 1.
2820: 20 20 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d SELECT * FROM
2830: 20 6c 6f 67 3b 0a 20 20 20 20 55 50 44 41 54 45 log;. UPDATE
2840: 20 6c 6f 67 20 53 45 54 20 61 20 3d 20 30 3b 0a log SET a = 0;.
2850: 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f . INSERT INTO
2860: 20 74 62 6c 20 56 41 4c 55 45 53 28 30 2c 20 30 tbl VALUES(0, 0
2870: 2c 20 30 2c 20 30 29 3b 20 20 20 20 20 2d 2d 20 , 0, 0); --
2880: 30 0a 20 20 20 20 53 45 4c 45 43 54 20 2a 20 46 0. SELECT * F
2890: 52 4f 4d 20 6c 6f 67 3b 0a 20 20 20 20 55 50 44 ROM log;. UPD
28a0: 41 54 45 20 6c 6f 67 20 53 45 54 20 61 20 3d 20 ATE log SET a =
28b0: 30 3b 0a 0a 20 20 20 20 49 4e 53 45 52 54 20 49 0;.. INSERT I
28c0: 4e 54 4f 20 74 62 6c 20 56 41 4c 55 45 53 28 32 NTO tbl VALUES(2
28d0: 30 30 2c 20 30 2c 20 30 2c 20 30 29 3b 20 20 20 00, 0, 0, 0);
28e0: 20 20 2d 2d 20 31 0a 20 20 20 20 53 45 4c 45 43 -- 1. SELEC
28f0: 54 20 2a 20 46 52 4f 4d 20 6c 6f 67 3b 0a 20 20 T * FROM log;.
2900: 20 20 55 50 44 41 54 45 20 6c 6f 67 20 53 45 54 UPDATE log SET
2910: 20 61 20 3d 20 30 3b 0a 20 20 7d 0a 7d 20 7b 31 a = 0;. }.} {1
2920: 20 30 20 31 7d 0a 65 78 65 63 73 71 6c 20 7b 0a 0 1}.execsql {.
2930: 20 20 44 52 4f 50 20 54 41 42 4c 45 20 74 62 6c DROP TABLE tbl
2940: 3b 0a 20 20 44 52 4f 50 20 54 41 42 4c 45 20 6c ;. DROP TABLE l
2950: 6f 67 3b 0a 7d 0a 64 6f 5f 74 65 73 74 20 74 72 og;.}.do_test tr
2960: 69 67 67 65 72 32 2d 33 2e 33 20 7b 0a 20 20 65 igger2-3.3 {. e
2970: 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 50 52 41 xecsql {. PRA
2980: 47 4d 41 20 69 6e 74 65 67 72 69 74 79 5f 63 68 GMA integrity_ch
2990: 65 63 6b 3b 0a 20 20 7d 0a 7d 20 7b 6f 6b 7d 0a eck;. }.} {ok}.
29a0: 0a 23 20 53 69 6d 70 6c 65 20 63 61 73 63 61 64 .# Simple cascad
29b0: 65 64 20 74 72 69 67 67 65 72 0a 65 78 65 63 73 ed trigger.execs
29c0: 71 6c 20 7b 0a 20 20 43 52 45 41 54 45 20 54 41 ql {. CREATE TA
29d0: 42 4c 45 20 74 62 6c 41 28 61 2c 20 62 29 3b 0a BLE tblA(a, b);.
29e0: 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 74 CREATE TABLE t
29f0: 62 6c 42 28 61 2c 20 62 29 3b 0a 20 20 43 52 45 blB(a, b);. CRE
2a00: 41 54 45 20 54 41 42 4c 45 20 74 62 6c 43 28 61 ATE TABLE tblC(a
2a10: 2c 20 62 29 3b 0a 0a 20 20 43 52 45 41 54 45 20 , b);.. CREATE
2a20: 54 52 49 47 47 45 52 20 74 72 31 20 42 45 46 4f TRIGGER tr1 BEFO
2a30: 52 45 20 49 4e 53 45 52 54 20 4f 4e 20 74 62 6c RE INSERT ON tbl
2a40: 41 20 42 45 47 49 4e 0a 20 20 20 20 49 4e 53 45 A BEGIN. INSE
2a50: 52 54 20 49 4e 54 4f 20 74 62 6c 42 20 76 61 6c RT INTO tblB val
2a60: 75 65 73 28 6e 65 77 2e 61 2c 20 6e 65 77 2e 62 ues(new.a, new.b
2a70: 29 3b 0a 20 20 45 4e 44 3b 0a 0a 20 20 43 52 45 );. END;.. CRE
2a80: 41 54 45 20 54 52 49 47 47 45 52 20 74 72 32 20 ATE TRIGGER tr2
2a90: 42 45 46 4f 52 45 20 49 4e 53 45 52 54 20 4f 4e BEFORE INSERT ON
2aa0: 20 74 62 6c 42 20 42 45 47 49 4e 0a 20 20 20 20 tblB BEGIN.
2ab0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 62 6c 43 INSERT INTO tblC
2ac0: 20 76 61 6c 75 65 73 28 6e 65 77 2e 61 2c 20 6e values(new.a, n
2ad0: 65 77 2e 62 29 3b 0a 20 20 45 4e 44 3b 0a 7d 0a ew.b);. END;.}.
2ae0: 64 6f 5f 74 65 73 74 20 74 72 69 67 67 65 72 32 do_test trigger2
2af0: 2d 34 2e 31 20 7b 0a 20 20 65 78 65 63 73 71 6c -4.1 {. execsql
2b00: 20 7b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e {. INSERT IN
2b10: 54 4f 20 74 62 6c 41 20 76 61 6c 75 65 73 28 31 TO tblA values(1
2b20: 2c 20 32 29 3b 0a 20 20 20 20 53 45 4c 45 43 54 , 2);. SELECT
2b30: 20 2a 20 46 52 4f 4d 20 74 62 6c 41 3b 0a 20 20 * FROM tblA;.
2b40: 20 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 SELECT * FROM
2b50: 74 62 6c 42 3b 0a 20 20 20 20 53 45 4c 45 43 54 tblB;. SELECT
2b60: 20 2a 20 46 52 4f 4d 20 74 62 6c 43 3b 0a 20 20 * FROM tblC;.
2b70: 7d 0a 7d 20 7b 31 20 32 20 31 20 32 20 31 20 32 }.} {1 2 1 2 1 2
2b80: 7d 0a 65 78 65 63 73 71 6c 20 7b 0a 20 20 44 52 }.execsql {. DR
2b90: 4f 50 20 54 41 42 4c 45 20 74 62 6c 41 3b 0a 20 OP TABLE tblA;.
2ba0: 20 44 52 4f 50 20 54 41 42 4c 45 20 74 62 6c 42 DROP TABLE tblB
2bb0: 3b 0a 20 20 44 52 4f 50 20 54 41 42 4c 45 20 74 ;. DROP TABLE t
2bc0: 62 6c 43 3b 0a 7d 0a 0a 23 20 53 69 6d 70 6c 65 blC;.}..# Simple
2bd0: 20 72 65 63 75 72 73 69 76 65 20 74 72 69 67 67 recursive trigg
2be0: 65 72 0a 65 78 65 63 73 71 6c 20 7b 0a 20 20 43 er.execsql {. C
2bf0: 52 45 41 54 45 20 54 41 42 4c 45 20 74 62 6c 28 REATE TABLE tbl(
2c00: 61 2c 20 62 2c 20 63 29 3b 0a 20 20 43 52 45 41 a, b, c);. CREA
2c10: 54 45 20 54 52 49 47 47 45 52 20 74 62 6c 5f 74 TE TRIGGER tbl_t
2c20: 72 69 67 20 42 45 46 4f 52 45 20 49 4e 53 45 52 rig BEFORE INSER
2c30: 54 20 4f 4e 20 74 62 6c 20 0a 20 20 20 20 42 45 T ON tbl . BE
2c40: 47 49 4e 0a 20 20 20 20 20 20 49 4e 53 45 52 54 GIN. INSERT
2c50: 20 49 4e 54 4f 20 74 62 6c 20 56 41 4c 55 45 53 INTO tbl VALUES
2c60: 20 28 6e 65 77 2e 61 2c 20 6e 65 77 2e 62 2c 20 (new.a, new.b,
2c70: 6e 65 77 2e 63 29 3b 0a 20 20 20 20 45 4e 44 3b new.c);. END;
2c80: 0a 7d 0a 64 6f 5f 74 65 73 74 20 74 72 69 67 67 .}.do_test trigg
2c90: 65 72 32 2d 34 2e 32 20 7b 0a 20 20 65 78 65 63 er2-4.2 {. exec
2ca0: 73 71 6c 20 7b 0a 20 20 20 20 49 4e 53 45 52 54 sql {. INSERT
2cb0: 20 49 4e 54 4f 20 74 62 6c 20 56 41 4c 55 45 53 INTO tbl VALUES
2cc0: 20 28 31 2c 20 32 2c 20 33 29 3b 0a 20 20 20 20 (1, 2, 3);.
2cd0: 73 65 6c 65 63 74 20 2a 20 66 72 6f 6d 20 74 62 select * from tb
2ce0: 6c 3b 0a 20 20 7d 0a 7d 20 7b 31 20 32 20 33 20 l;. }.} {1 2 3
2cf0: 31 20 32 20 33 7d 0a 65 78 65 63 73 71 6c 20 7b 1 2 3}.execsql {
2d00: 0a 20 20 44 52 4f 50 20 54 41 42 4c 45 20 74 62 . DROP TABLE tb
2d10: 6c 3b 0a 7d 0a 0a 23 20 35 2e 0a 65 78 65 63 73 l;.}..# 5..execs
2d20: 71 6c 20 7b 0a 20 20 43 52 45 41 54 45 20 54 41 ql {. CREATE TA
2d30: 42 4c 45 20 74 62 6c 28 61 2c 20 62 2c 20 63 29 BLE tbl(a, b, c)
2d40: 3b 0a 20 20 43 52 45 41 54 45 20 54 52 49 47 47 ;. CREATE TRIGG
2d50: 45 52 20 74 62 6c 5f 74 72 69 67 20 42 45 46 4f ER tbl_trig BEFO
2d60: 52 45 20 49 4e 53 45 52 54 20 4f 4e 20 74 62 6c RE INSERT ON tbl
2d70: 20 0a 20 20 20 20 42 45 47 49 4e 0a 20 20 20 20 . BEGIN.
2d80: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 62 INSERT INTO tb
2d90: 6c 20 56 41 4c 55 45 53 20 28 31 2c 20 32 2c 20 l VALUES (1, 2,
2da0: 33 29 3b 0a 20 20 20 20 20 20 49 4e 53 45 52 54 3);. INSERT
2db0: 20 49 4e 54 4f 20 74 62 6c 20 56 41 4c 55 45 53 INTO tbl VALUES
2dc0: 20 28 32 2c 20 32 2c 20 33 29 3b 0a 20 20 20 20 (2, 2, 3);.
2dd0: 20 20 55 50 44 41 54 45 20 74 62 6c 20 73 65 74 UPDATE tbl set
2de0: 20 62 20 3d 20 31 30 20 57 48 45 52 45 20 61 20 b = 10 WHERE a
2df0: 3d 20 31 3b 0a 20 20 20 20 20 20 44 45 4c 45 54 = 1;. DELET
2e00: 45 20 46 52 4f 4d 20 74 62 6c 20 57 48 45 52 45 E FROM tbl WHERE
2e10: 20 61 20 3d 20 31 3b 0a 20 20 20 20 20 20 44 45 a = 1;. DE
2e20: 4c 45 54 45 20 46 52 4f 4d 20 74 62 6c 3b 0a 20 LETE FROM tbl;.
2e30: 20 20 20 45 4e 44 3b 0a 7d 0a 64 6f 5f 74 65 73 END;.}.do_tes
2e40: 74 20 74 72 69 67 67 65 72 32 2d 35 20 7b 0a 20 t trigger2-5 {.
2e50: 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 49 execsql {. I
2e60: 4e 53 45 52 54 20 49 4e 54 4f 20 74 62 6c 20 56 NSERT INTO tbl V
2e70: 41 4c 55 45 53 28 31 30 30 2c 20 32 30 30 2c 20 ALUES(100, 200,
2e80: 33 30 30 29 3b 0a 20 20 7d 0a 20 20 64 62 20 63 300);. }. db c
2e90: 68 61 6e 67 65 73 0a 7d 20 7b 31 7d 0a 65 78 65 hanges.} {1}.exe
2ea0: 63 73 71 6c 20 7b 0a 20 20 44 52 4f 50 20 54 41 csql {. DROP TA
2eb0: 42 4c 45 20 74 62 6c 3b 0a 7d 0a 0a 23 20 48 61 BLE tbl;.}..# Ha
2ec0: 6e 64 6c 69 6e 67 20 6f 66 20 4f 4e 20 43 4f 4e ndling of ON CON
2ed0: 46 4c 49 43 54 20 62 79 20 49 4e 53 45 52 54 20 FLICT by INSERT
2ee0: 73 74 61 74 65 6d 65 6e 74 73 20 69 6e 73 69 64 statements insid
2ef0: 65 20 74 72 69 67 67 65 72 73 0a 65 78 65 63 73 e triggers.execs
2f00: 71 6c 20 7b 0a 20 20 43 52 45 41 54 45 20 54 41 ql {. CREATE TA
2f10: 42 4c 45 20 74 62 6c 20 28 61 20 70 72 69 6d 61 BLE tbl (a prima
2f20: 72 79 20 6b 65 79 2c 20 62 2c 20 63 29 3b 0a 20 ry key, b, c);.
2f30: 20 43 52 45 41 54 45 20 54 52 49 47 47 45 52 20 CREATE TRIGGER
2f40: 61 69 5f 74 62 6c 20 41 46 54 45 52 20 49 4e 53 ai_tbl AFTER INS
2f50: 45 52 54 20 4f 4e 20 74 62 6c 20 42 45 47 49 4e ERT ON tbl BEGIN
2f60: 0a 20 20 20 20 49 4e 53 45 52 54 20 4f 52 20 49 . INSERT OR I
2f70: 47 4e 4f 52 45 20 49 4e 54 4f 20 74 62 6c 20 76 GNORE INTO tbl v
2f80: 61 6c 75 65 73 20 28 6e 65 77 2e 61 2c 20 30 2c alues (new.a, 0,
2f90: 20 30 29 3b 0a 20 20 45 4e 44 3b 0a 7d 0a 64 6f 0);. END;.}.do
2fa0: 5f 74 65 73 74 20 74 72 69 67 67 65 72 32 2d 36 _test trigger2-6
2fb0: 2e 31 61 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 .1a {. execsql
2fc0: 7b 0a 20 20 20 20 42 45 47 49 4e 3b 0a 20 20 20 {. BEGIN;.
2fd0: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 62 6c INSERT INTO tbl
2fe0: 20 76 61 6c 75 65 73 20 28 31 2c 20 32 2c 20 33 values (1, 2, 3
2ff0: 29 3b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a 20 );. SELECT *
3000: 66 72 6f 6d 20 74 62 6c 3b 0a 20 20 7d 0a 7d 20 from tbl;. }.}
3010: 7b 31 20 32 20 33 7d 0a 64 6f 5f 74 65 73 74 20 {1 2 3}.do_test
3020: 74 72 69 67 67 65 72 32 2d 36 2e 31 62 20 7b 0a trigger2-6.1b {.
3030: 20 20 63 61 74 63 68 73 71 6c 20 7b 0a 20 20 20 catchsql {.
3040: 20 49 4e 53 45 52 54 20 4f 52 20 41 42 4f 52 54 INSERT OR ABORT
3050: 20 49 4e 54 4f 20 74 62 6c 20 76 61 6c 75 65 73 INTO tbl values
3060: 20 28 32 2c 20 32 2c 20 33 29 3b 0a 20 20 7d 0a (2, 2, 3);. }.
3070: 7d 20 7b 31 20 7b 63 6f 6c 75 6d 6e 20 61 20 69 } {1 {column a i
3080: 73 20 6e 6f 74 20 75 6e 69 71 75 65 7d 7d 0a 64 s not unique}}.d
3090: 6f 5f 74 65 73 74 20 74 72 69 67 67 65 72 32 2d o_test trigger2-
30a0: 36 2e 31 63 20 7b 0a 20 20 65 78 65 63 73 71 6c 6.1c {. execsql
30b0: 20 7b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a 20 {. SELECT *
30c0: 66 72 6f 6d 20 74 62 6c 3b 0a 20 20 7d 0a 7d 20 from tbl;. }.}
30d0: 7b 31 20 32 20 33 7d 0a 64 6f 5f 74 65 73 74 20 {1 2 3}.do_test
30e0: 74 72 69 67 67 65 72 32 2d 36 2e 31 64 20 7b 0a trigger2-6.1d {.
30f0: 20 20 63 61 74 63 68 73 71 6c 20 7b 0a 20 20 20 catchsql {.
3100: 20 49 4e 53 45 52 54 20 4f 52 20 46 41 49 4c 20 INSERT OR FAIL
3110: 49 4e 54 4f 20 74 62 6c 20 76 61 6c 75 65 73 20 INTO tbl values
3120: 28 32 2c 20 32 2c 20 33 29 3b 0a 20 20 7d 0a 7d (2, 2, 3);. }.}
3130: 20 7b 31 20 7b 63 6f 6c 75 6d 6e 20 61 20 69 73 {1 {column a is
3140: 20 6e 6f 74 20 75 6e 69 71 75 65 7d 7d 0a 64 6f not unique}}.do
3150: 5f 74 65 73 74 20 74 72 69 67 67 65 72 32 2d 36 _test trigger2-6
3160: 2e 31 65 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 .1e {. execsql
3170: 7b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a 20 66 {. SELECT * f
3180: 72 6f 6d 20 74 62 6c 3b 0a 20 20 7d 0a 7d 20 7b rom tbl;. }.} {
3190: 31 20 32 20 33 20 32 20 32 20 33 7d 0a 64 6f 5f 1 2 3 2 2 3}.do_
31a0: 74 65 73 74 20 74 72 69 67 67 65 72 32 2d 36 2e test trigger2-6.
31b0: 31 66 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 1f {. execsql {
31c0: 0a 20 20 20 20 49 4e 53 45 52 54 20 4f 52 20 52 . INSERT OR R
31d0: 45 50 4c 41 43 45 20 49 4e 54 4f 20 74 62 6c 20 EPLACE INTO tbl
31e0: 76 61 6c 75 65 73 20 28 32 2c 20 32 2c 20 33 29 values (2, 2, 3)
31f0: 3b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a 20 66 ;. SELECT * f
3200: 72 6f 6d 20 74 62 6c 3b 0a 20 20 7d 0a 7d 20 7b rom tbl;. }.} {
3210: 31 20 32 20 33 20 32 20 30 20 30 7d 0a 64 6f 5f 1 2 3 2 0 0}.do_
3220: 74 65 73 74 20 74 72 69 67 67 65 72 32 2d 36 2e test trigger2-6.
3230: 31 67 20 7b 0a 20 20 63 61 74 63 68 73 71 6c 20 1g {. catchsql
3240: 7b 0a 20 20 20 20 49 4e 53 45 52 54 20 4f 52 20 {. INSERT OR
3250: 52 4f 4c 4c 42 41 43 4b 20 49 4e 54 4f 20 74 62 ROLLBACK INTO tb
3260: 6c 20 76 61 6c 75 65 73 20 28 33 2c 20 32 2c 20 l values (3, 2,
3270: 33 29 3b 0a 20 20 7d 0a 7d 20 7b 31 20 7b 63 6f 3);. }.} {1 {co
3280: 6c 75 6d 6e 20 61 20 69 73 20 6e 6f 74 20 75 6e lumn a is not un
3290: 69 71 75 65 7d 7d 0a 64 6f 5f 74 65 73 74 20 74 ique}}.do_test t
32a0: 72 69 67 67 65 72 32 2d 36 2e 31 68 20 7b 0a 20 rigger2-6.1h {.
32b0: 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 20 53 execsql {. S
32c0: 45 4c 45 43 54 20 2a 20 66 72 6f 6d 20 74 62 6c ELECT * from tbl
32d0: 3b 0a 20 20 7d 0a 7d 20 7b 7d 0a 65 78 65 63 73 ;. }.} {}.execs
32e0: 71 6c 20 7b 44 45 4c 45 54 45 20 46 52 4f 4d 20 ql {DELETE FROM
32f0: 74 62 6c 7d 0a 0a 0a 23 20 48 61 6e 64 6c 69 6e tbl}...# Handlin
3300: 67 20 6f 66 20 4f 4e 20 43 4f 4e 46 4c 49 43 54 g of ON CONFLICT
3310: 20 62 79 20 55 50 44 41 54 45 20 73 74 61 74 65 by UPDATE state
3320: 6d 65 6e 74 73 20 69 6e 73 69 64 65 20 74 72 69 ments inside tri
3330: 67 67 65 72 73 0a 65 78 65 63 73 71 6c 20 7b 0a ggers.execsql {.
3340: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 62 INSERT INTO tb
3350: 6c 20 76 61 6c 75 65 73 20 28 34 2c 20 32 2c 20 l values (4, 2,
3360: 33 29 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 3);. INSERT INT
3370: 4f 20 74 62 6c 20 76 61 6c 75 65 73 20 28 36 2c O tbl values (6,
3380: 20 33 2c 20 34 29 3b 0a 20 20 43 52 45 41 54 45 3, 4);. CREATE
3390: 20 54 52 49 47 47 45 52 20 61 75 5f 74 62 6c 20 TRIGGER au_tbl
33a0: 41 46 54 45 52 20 55 50 44 41 54 45 20 4f 4e 20 AFTER UPDATE ON
33b0: 74 62 6c 20 42 45 47 49 4e 0a 20 20 20 20 55 50 tbl BEGIN. UP
33c0: 44 41 54 45 20 4f 52 20 49 47 4e 4f 52 45 20 74 DATE OR IGNORE t
33d0: 62 6c 20 53 45 54 20 61 20 3d 20 6e 65 77 2e 61 bl SET a = new.a
33e0: 2c 20 63 20 3d 20 31 30 3b 0a 20 20 45 4e 44 3b , c = 10;. END;
33f0: 0a 7d 0a 64 6f 5f 74 65 73 74 20 74 72 69 67 67 .}.do_test trigg
3400: 65 72 32 2d 36 2e 32 61 20 7b 0a 20 20 65 78 65 er2-6.2a {. exe
3410: 63 73 71 6c 20 7b 0a 20 20 20 20 42 45 47 49 4e csql {. BEGIN
3420: 3b 0a 20 20 20 20 55 50 44 41 54 45 20 74 62 6c ;. UPDATE tbl
3430: 20 53 45 54 20 61 20 3d 20 31 20 57 48 45 52 45 SET a = 1 WHERE
3440: 20 61 20 3d 20 34 3b 0a 20 20 20 20 53 45 4c 45 a = 4;. SELE
3450: 43 54 20 2a 20 66 72 6f 6d 20 74 62 6c 3b 0a 20 CT * from tbl;.
3460: 20 7d 0a 7d 20 7b 31 20 32 20 31 30 20 36 20 33 }.} {1 2 10 6 3
3470: 20 34 7d 0a 64 6f 5f 74 65 73 74 20 74 72 69 67 4}.do_test trig
3480: 67 65 72 32 2d 36 2e 32 62 20 7b 0a 20 20 63 61 ger2-6.2b {. ca
3490: 74 63 68 73 71 6c 20 7b 0a 20 20 20 20 55 50 44 tchsql {. UPD
34a0: 41 54 45 20 4f 52 20 41 42 4f 52 54 20 74 62 6c ATE OR ABORT tbl
34b0: 20 53 45 54 20 61 20 3d 20 34 20 57 48 45 52 45 SET a = 4 WHERE
34c0: 20 61 20 3d 20 31 3b 0a 20 20 7d 0a 7d 20 7b 31 a = 1;. }.} {1
34d0: 20 7b 63 6f 6c 75 6d 6e 20 61 20 69 73 20 6e 6f {column a is no
34e0: 74 20 75 6e 69 71 75 65 7d 7d 0a 64 6f 5f 74 65 t unique}}.do_te
34f0: 73 74 20 74 72 69 67 67 65 72 32 2d 36 2e 32 63 st trigger2-6.2c
3500: 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 {. execsql {.
3510: 20 20 20 53 45 4c 45 43 54 20 2a 20 66 72 6f 6d SELECT * from
3520: 20 74 62 6c 3b 0a 20 20 7d 0a 7d 20 7b 31 20 32 tbl;. }.} {1 2
3530: 20 31 30 20 36 20 33 20 34 7d 0a 64 6f 5f 74 65 10 6 3 4}.do_te
3540: 73 74 20 74 72 69 67 67 65 72 32 2d 36 2e 32 64 st trigger2-6.2d
3550: 20 7b 0a 20 20 63 61 74 63 68 73 71 6c 20 7b 0a {. catchsql {.
3560: 20 20 20 20 55 50 44 41 54 45 20 4f 52 20 46 41 UPDATE OR FA
3570: 49 4c 20 74 62 6c 20 53 45 54 20 61 20 3d 20 34 IL tbl SET a = 4
3580: 20 57 48 45 52 45 20 61 20 3d 20 31 3b 0a 20 20 WHERE a = 1;.
3590: 7d 0a 7d 20 7b 31 20 7b 63 6f 6c 75 6d 6e 20 61 }.} {1 {column a
35a0: 20 69 73 20 6e 6f 74 20 75 6e 69 71 75 65 7d 7d is not unique}}
35b0: 0a 64 6f 5f 74 65 73 74 20 74 72 69 67 67 65 72 .do_test trigger
35c0: 32 2d 36 2e 32 65 20 7b 0a 20 20 65 78 65 63 73 2-6.2e {. execs
35d0: 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43 54 20 ql {. SELECT
35e0: 2a 20 66 72 6f 6d 20 74 62 6c 3b 0a 20 20 7d 0a * from tbl;. }.
35f0: 7d 20 7b 34 20 32 20 31 30 20 36 20 33 20 34 7d } {4 2 10 6 3 4}
3600: 0a 64 6f 5f 74 65 73 74 20 74 72 69 67 67 65 72 .do_test trigger
3610: 32 2d 36 2e 32 66 2e 31 20 7b 0a 20 20 65 78 65 2-6.2f.1 {. exe
3620: 63 73 71 6c 20 7b 0a 20 20 20 20 55 50 44 41 54 csql {. UPDAT
3630: 45 20 4f 52 20 52 45 50 4c 41 43 45 20 74 62 6c E OR REPLACE tbl
3640: 20 53 45 54 20 61 20 3d 20 31 20 57 48 45 52 45 SET a = 1 WHERE
3650: 20 61 20 3d 20 34 3b 0a 20 20 20 20 53 45 4c 45 a = 4;. SELE
3660: 43 54 20 2a 20 66 72 6f 6d 20 74 62 6c 3b 0a 20 CT * from tbl;.
3670: 20 7d 0a 7d 20 7b 31 20 33 20 31 30 7d 0a 64 6f }.} {1 3 10}.do
3680: 5f 74 65 73 74 20 74 72 69 67 67 65 72 32 2d 36 _test trigger2-6
3690: 2e 32 66 2e 32 20 7b 0a 20 20 65 78 65 63 73 71 .2f.2 {. execsq
36a0: 6c 20 7b 0a 20 20 20 20 49 4e 53 45 52 54 20 49 l {. INSERT I
36b0: 4e 54 4f 20 74 62 6c 20 56 41 4c 55 45 53 20 28 NTO tbl VALUES (
36c0: 32 2c 20 33 2c 20 34 29 3b 0a 20 20 20 20 53 45 2, 3, 4);. SE
36d0: 4c 45 43 54 20 2a 20 46 52 4f 4d 20 74 62 6c 3b LECT * FROM tbl;
36e0: 0a 20 20 7d 0a 7d 20 7b 31 20 33 20 31 30 20 32 . }.} {1 3 10 2
36f0: 20 33 20 34 7d 0a 64 6f 5f 74 65 73 74 20 74 72 3 4}.do_test tr
3700: 69 67 67 65 72 32 2d 36 2e 32 67 20 7b 0a 20 20 igger2-6.2g {.
3710: 63 61 74 63 68 73 71 6c 20 7b 0a 20 20 20 20 55 catchsql {. U
3720: 50 44 41 54 45 20 4f 52 20 52 4f 4c 4c 42 41 43 PDATE OR ROLLBAC
3730: 4b 20 74 62 6c 20 53 45 54 20 61 20 3d 20 34 20 K tbl SET a = 4
3740: 57 48 45 52 45 20 61 20 3d 20 31 3b 0a 20 20 7d WHERE a = 1;. }
3750: 0a 7d 20 7b 31 20 7b 63 6f 6c 75 6d 6e 20 61 20 .} {1 {column a
3760: 69 73 20 6e 6f 74 20 75 6e 69 71 75 65 7d 7d 0a is not unique}}.
3770: 64 6f 5f 74 65 73 74 20 74 72 69 67 67 65 72 32 do_test trigger2
3780: 2d 36 2e 32 68 20 7b 0a 20 20 65 78 65 63 73 71 -6.2h {. execsq
3790: 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a l {. SELECT *
37a0: 20 66 72 6f 6d 20 74 62 6c 3b 0a 20 20 7d 0a 7d from tbl;. }.}
37b0: 20 7b 34 20 32 20 33 20 36 20 33 20 34 7d 0a 65 {4 2 3 6 3 4}.e
37c0: 78 65 63 73 71 6c 20 7b 0a 20 20 44 52 4f 50 20 xecsql {. DROP
37d0: 54 41 42 4c 45 20 74 62 6c 3b 0a 7d 0a 0a 23 20 TABLE tbl;.}..#
37e0: 37 2e 20 54 72 69 67 67 65 72 73 20 6f 6e 20 76 7. Triggers on v
37f0: 69 65 77 73 0a 64 6f 5f 74 65 73 74 20 74 72 69 iews.do_test tri
3800: 67 67 65 72 32 2d 37 2e 31 20 7b 0a 20 20 65 78 gger2-7.1 {. ex
3810: 65 63 73 71 6c 20 7b 0a 20 20 43 52 45 41 54 45 ecsql {. CREATE
3820: 20 54 41 42 4c 45 20 61 62 28 61 2c 20 62 29 3b TABLE ab(a, b);
3830: 0a 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 . CREATE TABLE
3840: 63 64 28 63 2c 20 64 29 3b 0a 20 20 49 4e 53 45 cd(c, d);. INSE
3850: 52 54 20 49 4e 54 4f 20 61 62 20 56 41 4c 55 45 RT INTO ab VALUE
3860: 53 20 28 31 2c 20 32 29 3b 0a 20 20 49 4e 53 45 S (1, 2);. INSE
3870: 52 54 20 49 4e 54 4f 20 61 62 20 56 41 4c 55 45 RT INTO ab VALUE
3880: 53 20 28 30 2c 20 30 29 3b 0a 20 20 49 4e 53 45 S (0, 0);. INSE
3890: 52 54 20 49 4e 54 4f 20 63 64 20 56 41 4c 55 45 RT INTO cd VALUE
38a0: 53 20 28 33 2c 20 34 29 3b 0a 0a 20 20 43 52 45 S (3, 4);.. CRE
38b0: 41 54 45 20 54 41 42 4c 45 20 74 6c 6f 67 28 69 ATE TABLE tlog(i
38c0: 69 20 49 4e 54 45 47 45 52 20 50 52 49 4d 41 52 i INTEGER PRIMAR
38d0: 59 20 4b 45 59 2c 20 0a 20 20 20 20 20 20 6f 6c Y KEY, . ol
38e0: 64 61 2c 20 6f 6c 64 62 2c 20 6f 6c 64 63 2c 20 da, oldb, oldc,
38f0: 6f 6c 64 64 2c 20 6e 65 77 61 2c 20 6e 65 77 62 oldd, newa, newb
3900: 2c 20 6e 65 77 63 2c 20 6e 65 77 64 29 3b 0a 0a , newc, newd);..
3910: 20 20 43 52 45 41 54 45 20 56 49 45 57 20 61 62 CREATE VIEW ab
3920: 63 64 20 41 53 20 53 45 4c 45 43 54 20 61 2c 20 cd AS SELECT a,
3930: 62 2c 20 63 2c 20 64 20 46 52 4f 4d 20 61 62 2c b, c, d FROM ab,
3940: 20 63 64 3b 0a 0a 20 20 43 52 45 41 54 45 20 54 cd;.. CREATE T
3950: 52 49 47 47 45 52 20 62 65 66 6f 72 65 5f 75 70 RIGGER before_up
3960: 64 61 74 65 20 49 4e 53 54 45 41 44 20 4f 46 20 date INSTEAD OF
3970: 55 50 44 41 54 45 20 4f 4e 20 61 62 63 64 20 42 UPDATE ON abcd B
3980: 45 47 49 4e 0a 20 20 20 20 49 4e 53 45 52 54 20 EGIN. INSERT
3990: 49 4e 54 4f 20 74 6c 6f 67 20 56 41 4c 55 45 53 INTO tlog VALUES
39a0: 28 4e 55 4c 4c 2c 20 0a 09 6f 6c 64 2e 61 2c 20 (NULL, ..old.a,
39b0: 6f 6c 64 2e 62 2c 20 6f 6c 64 2e 63 2c 20 6f 6c old.b, old.c, ol
39c0: 64 2e 64 2c 20 6e 65 77 2e 61 2c 20 6e 65 77 2e d.d, new.a, new.
39d0: 62 2c 20 6e 65 77 2e 63 2c 20 6e 65 77 2e 64 29 b, new.c, new.d)
39e0: 3b 0a 20 20 45 4e 44 3b 0a 20 20 43 52 45 41 54 ;. END;. CREAT
39f0: 45 20 54 52 49 47 47 45 52 20 61 66 74 65 72 5f E TRIGGER after_
3a00: 75 70 64 61 74 65 20 49 4e 53 54 45 41 44 20 4f update INSTEAD O
3a10: 46 20 55 50 44 41 54 45 20 4f 4e 20 61 62 63 64 F UPDATE ON abcd
3a20: 20 42 45 47 49 4e 0a 20 20 20 20 49 4e 53 45 52 BEGIN. INSER
3a30: 54 20 49 4e 54 4f 20 74 6c 6f 67 20 56 41 4c 55 T INTO tlog VALU
3a40: 45 53 28 4e 55 4c 4c 2c 20 0a 09 6f 6c 64 2e 61 ES(NULL, ..old.a
3a50: 2c 20 6f 6c 64 2e 62 2c 20 6f 6c 64 2e 63 2c 20 , old.b, old.c,
3a60: 6f 6c 64 2e 64 2c 20 6e 65 77 2e 61 2c 20 6e 65 old.d, new.a, ne
3a70: 77 2e 62 2c 20 6e 65 77 2e 63 2c 20 6e 65 77 2e w.b, new.c, new.
3a80: 64 29 3b 0a 20 20 45 4e 44 3b 0a 0a 20 20 43 52 d);. END;.. CR
3a90: 45 41 54 45 20 54 52 49 47 47 45 52 20 62 65 66 EATE TRIGGER bef
3aa0: 6f 72 65 5f 64 65 6c 65 74 65 20 49 4e 53 54 45 ore_delete INSTE
3ab0: 41 44 20 4f 46 20 44 45 4c 45 54 45 20 4f 4e 20 AD OF DELETE ON
3ac0: 61 62 63 64 20 42 45 47 49 4e 0a 20 20 20 20 49 abcd BEGIN. I
3ad0: 4e 53 45 52 54 20 49 4e 54 4f 20 74 6c 6f 67 20 NSERT INTO tlog
3ae0: 56 41 4c 55 45 53 28 4e 55 4c 4c 2c 20 0a 09 6f VALUES(NULL, ..o
3af0: 6c 64 2e 61 2c 20 6f 6c 64 2e 62 2c 20 6f 6c 64 ld.a, old.b, old
3b00: 2e 63 2c 20 6f 6c 64 2e 64 2c 20 30 2c 20 30 2c .c, old.d, 0, 0,
3b10: 20 30 2c 20 30 29 3b 0a 20 20 45 4e 44 3b 0a 20 0, 0);. END;.
3b20: 20 43 52 45 41 54 45 20 54 52 49 47 47 45 52 20 CREATE TRIGGER
3b30: 61 66 74 65 72 5f 64 65 6c 65 74 65 20 49 4e 53 after_delete INS
3b40: 54 45 41 44 20 4f 46 20 44 45 4c 45 54 45 20 4f TEAD OF DELETE O
3b50: 4e 20 61 62 63 64 20 42 45 47 49 4e 0a 20 20 20 N abcd BEGIN.
3b60: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 6c 6f INSERT INTO tlo
3b70: 67 20 56 41 4c 55 45 53 28 4e 55 4c 4c 2c 20 0a g VALUES(NULL, .
3b80: 09 6f 6c 64 2e 61 2c 20 6f 6c 64 2e 62 2c 20 6f .old.a, old.b, o
3b90: 6c 64 2e 63 2c 20 6f 6c 64 2e 64 2c 20 30 2c 20 ld.c, old.d, 0,
3ba0: 30 2c 20 30 2c 20 30 29 3b 0a 20 20 45 4e 44 3b 0, 0, 0);. END;
3bb0: 0a 0a 20 20 43 52 45 41 54 45 20 54 52 49 47 47 .. CREATE TRIGG
3bc0: 45 52 20 62 65 66 6f 72 65 5f 69 6e 73 65 72 74 ER before_insert
3bd0: 20 49 4e 53 54 45 41 44 20 4f 46 20 49 4e 53 45 INSTEAD OF INSE
3be0: 52 54 20 4f 4e 20 61 62 63 64 20 42 45 47 49 4e RT ON abcd BEGIN
3bf0: 0a 20 20 20 20 49 4e 53 45 52 54 20 49 4e 54 4f . INSERT INTO
3c00: 20 74 6c 6f 67 20 56 41 4c 55 45 53 28 4e 55 4c tlog VALUES(NUL
3c10: 4c 2c 20 0a 09 30 2c 20 30 2c 20 30 2c 20 30 2c L, ..0, 0, 0, 0,
3c20: 20 6e 65 77 2e 61 2c 20 6e 65 77 2e 62 2c 20 6e new.a, new.b, n
3c30: 65 77 2e 63 2c 20 6e 65 77 2e 64 29 3b 0a 20 20 ew.c, new.d);.
3c40: 45 4e 44 3b 0a 20 20 20 43 52 45 41 54 45 20 54 END;. CREATE T
3c50: 52 49 47 47 45 52 20 61 66 74 65 72 5f 69 6e 73 RIGGER after_ins
3c60: 65 72 74 20 49 4e 53 54 45 41 44 20 4f 46 20 49 ert INSTEAD OF I
3c70: 4e 53 45 52 54 20 4f 4e 20 61 62 63 64 20 42 45 NSERT ON abcd BE
3c80: 47 49 4e 0a 20 20 20 20 49 4e 53 45 52 54 20 49 GIN. INSERT I
3c90: 4e 54 4f 20 74 6c 6f 67 20 56 41 4c 55 45 53 28 NTO tlog VALUES(
3ca0: 4e 55 4c 4c 2c 20 0a 09 30 2c 20 30 2c 20 30 2c NULL, ..0, 0, 0,
3cb0: 20 30 2c 20 6e 65 77 2e 61 2c 20 6e 65 77 2e 62 0, new.a, new.b
3cc0: 2c 20 6e 65 77 2e 63 2c 20 6e 65 77 2e 64 29 3b , new.c, new.d);
3cd0: 0a 20 20 20 45 4e 44 3b 0a 20 20 7d 0a 7d 20 7b . END;. }.} {
3ce0: 7d 3b 0a 0a 64 6f 5f 74 65 73 74 20 74 72 69 67 };..do_test trig
3cf0: 67 65 72 32 2d 37 2e 32 20 7b 0a 20 20 65 78 65 ger2-7.2 {. exe
3d00: 63 73 71 6c 20 7b 0a 20 20 20 20 55 50 44 41 54 csql {. UPDAT
3d10: 45 20 61 62 63 64 20 53 45 54 20 61 20 3d 20 31 E abcd SET a = 1
3d20: 30 30 2c 20 62 20 3d 20 35 2a 35 20 57 48 45 52 00, b = 5*5 WHER
3d30: 45 20 61 20 3d 20 31 3b 0a 20 20 20 20 44 45 4c E a = 1;. DEL
3d40: 45 54 45 20 46 52 4f 4d 20 61 62 63 64 20 57 48 ETE FROM abcd WH
3d50: 45 52 45 20 61 20 3d 20 31 3b 0a 20 20 20 20 49 ERE a = 1;. I
3d60: 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63 64 20 NSERT INTO abcd
3d70: 56 41 4c 55 45 53 28 31 30 2c 20 32 30 2c 20 33 VALUES(10, 20, 3
3d80: 30 2c 20 34 30 29 3b 0a 20 20 20 20 53 45 4c 45 0, 40);. SELE
3d90: 43 54 20 2a 20 46 52 4f 4d 20 74 6c 6f 67 3b 0a CT * FROM tlog;.
3da0: 20 20 7d 0a 7d 20 5b 20 6c 69 73 74 20 31 20 31 }.} [ list 1 1
3db0: 20 32 20 33 20 34 20 31 30 30 20 32 35 20 33 20 2 3 4 100 25 3
3dc0: 34 20 5c 0a 20 20 20 20 20 20 20 20 20 32 20 31 4 \. 2 1
3dd0: 20 32 20 33 20 34 20 31 30 30 20 32 35 20 33 20 2 3 4 100 25 3
3de0: 34 20 5c 0a 09 20 33 20 31 20 32 20 33 20 34 20 4 \.. 3 1 2 3 4
3df0: 30 20 30 20 30 20 30 20 5c 0a 09 20 34 20 31 20 0 0 0 0 \.. 4 1
3e00: 32 20 33 20 34 20 30 20 30 20 30 20 30 20 5c 0a 2 3 4 0 0 0 0 \.
3e10: 09 20 35 20 30 20 30 20 30 20 30 20 31 30 20 32 . 5 0 0 0 0 10 2
3e20: 30 20 33 30 20 34 30 20 5c 0a 09 20 36 20 30 20 0 30 40 \.. 6 0
3e30: 30 20 30 20 30 20 31 30 20 32 30 20 33 30 20 34 0 0 0 10 20 30 4
3e40: 30 20 5d 0a 0a 64 6f 5f 74 65 73 74 20 74 72 69 0 ]..do_test tri
3e50: 67 67 65 72 32 2d 37 2e 33 20 7b 0a 20 20 65 78 gger2-7.3 {. ex
3e60: 65 63 73 71 6c 20 7b 0a 20 20 20 20 44 45 4c 45 ecsql {. DELE
3e70: 54 45 20 46 52 4f 4d 20 74 6c 6f 67 3b 0a 20 20 TE FROM tlog;.
3e80: 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 INSERT INTO ab
3e90: 63 64 20 56 41 4c 55 45 53 28 31 30 2c 20 32 30 cd VALUES(10, 20
3ea0: 2c 20 33 30 2c 20 34 30 29 3b 0a 20 20 20 20 55 , 30, 40);. U
3eb0: 50 44 41 54 45 20 61 62 63 64 20 53 45 54 20 61 PDATE abcd SET a
3ec0: 20 3d 20 31 30 30 2c 20 62 20 3d 20 35 2a 35 20 = 100, b = 5*5
3ed0: 57 48 45 52 45 20 61 20 3d 20 31 3b 0a 20 20 20 WHERE a = 1;.
3ee0: 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 61 62 63 DELETE FROM abc
3ef0: 64 20 57 48 45 52 45 20 61 20 3d 20 31 3b 0a 20 d WHERE a = 1;.
3f00: 20 20 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d SELECT * FROM
3f10: 20 74 6c 6f 67 3b 0a 20 20 7d 0a 7d 20 5b 20 6c tlog;. }.} [ l
3f20: 69 73 74 20 5c 0a 20 20 20 31 20 30 20 30 20 30 ist \. 1 0 0 0
3f30: 20 30 20 31 30 20 32 30 20 33 30 20 34 30 20 5c 0 10 20 30 40 \
3f40: 0a 20 20 20 32 20 30 20 30 20 30 20 30 20 31 30 . 2 0 0 0 0 10
3f50: 20 32 30 20 33 30 20 34 30 20 5c 0a 20 20 20 33 20 30 40 \. 3
3f60: 20 31 20 32 20 33 20 34 20 31 30 30 20 32 35 20 1 2 3 4 100 25
3f70: 33 20 34 20 5c 0a 20 20 20 34 20 31 20 32 20 33 3 4 \. 4 1 2 3
3f80: 20 34 20 31 30 30 20 32 35 20 33 20 34 20 5c 0a 4 100 25 3 4 \.
3f90: 20 20 20 35 20 31 20 32 20 33 20 34 20 30 20 30 5 1 2 3 4 0 0
3fa0: 20 30 20 30 20 5c 0a 20 20 20 36 20 31 20 32 20 0 0 \. 6 1 2
3fb0: 33 20 34 20 30 20 30 20 30 20 30 20 5c 0a 5d 0a 3 4 0 0 0 0 \.].
3fc0: 64 6f 5f 74 65 73 74 20 74 72 69 67 67 65 72 32 do_test trigger2
3fd0: 2d 37 2e 34 20 7b 0a 20 20 65 78 65 63 73 71 6c -7.4 {. execsql
3fe0: 20 7b 0a 20 20 20 20 44 45 4c 45 54 45 20 46 52 {. DELETE FR
3ff0: 4f 4d 20 74 6c 6f 67 3b 0a 20 20 20 20 44 45 4c OM tlog;. DEL
4000: 45 54 45 20 46 52 4f 4d 20 61 62 63 64 20 57 48 ETE FROM abcd WH
4010: 45 52 45 20 61 20 3d 20 31 3b 0a 20 20 20 20 49 ERE a = 1;. I
4020: 4e 53 45 52 54 20 49 4e 54 4f 20 61 62 63 64 20 NSERT INTO abcd
4030: 56 41 4c 55 45 53 28 31 30 2c 20 32 30 2c 20 33 VALUES(10, 20, 3
4040: 30 2c 20 34 30 29 3b 0a 20 20 20 20 55 50 44 41 0, 40);. UPDA
4050: 54 45 20 61 62 63 64 20 53 45 54 20 61 20 3d 20 TE abcd SET a =
4060: 31 30 30 2c 20 62 20 3d 20 35 2a 35 20 57 48 45 100, b = 5*5 WHE
4070: 52 45 20 61 20 3d 20 31 3b 0a 20 20 20 20 53 45 RE a = 1;. SE
4080: 4c 45 43 54 20 2a 20 46 52 4f 4d 20 74 6c 6f 67 LECT * FROM tlog
4090: 3b 0a 20 20 7d 0a 7d 20 5b 20 6c 69 73 74 20 5c ;. }.} [ list \
40a0: 0a 20 20 20 31 20 31 20 32 20 33 20 34 20 30 20 . 1 1 2 3 4 0
40b0: 30 20 30 20 30 20 5c 0a 20 20 20 32 20 31 20 32 0 0 0 \. 2 1 2
40c0: 20 33 20 34 20 30 20 30 20 30 20 30 20 5c 0a 20 3 4 0 0 0 0 \.
40d0: 20 20 33 20 30 20 30 20 30 20 30 20 31 30 20 32 3 0 0 0 0 10 2
40e0: 30 20 33 30 20 34 30 20 5c 0a 20 20 20 34 20 30 0 30 40 \. 4 0
40f0: 20 30 20 30 20 30 20 31 30 20 32 30 20 33 30 20 0 0 0 10 20 30
4100: 34 30 20 5c 0a 20 20 20 35 20 31 20 32 20 33 20 40 \. 5 1 2 3
4110: 34 20 31 30 30 20 32 35 20 33 20 34 20 5c 0a 20 4 100 25 3 4 \.
4120: 20 20 36 20 31 20 32 20 33 20 34 20 31 30 30 20 6 1 2 3 4 100
4130: 32 35 20 33 20 34 20 5c 0a 5d 0a 0a 64 6f 5f 74 25 3 4 \.]..do_t
4140: 65 73 74 20 74 72 69 67 67 65 72 32 2d 38 2e 31 est trigger2-8.1
4150: 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 {. execsql {.
4160: 20 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 CREATE TABLE
4170: 74 31 28 61 2c 62 2c 63 29 3b 0a 20 20 20 20 49 t1(a,b,c);. I
4180: 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 56 41 NSERT INTO t1 VA
4190: 4c 55 45 53 28 31 2c 32 2c 33 29 3b 0a 20 20 20 LUES(1,2,3);.
41a0: 20 43 52 45 41 54 45 20 56 49 45 57 20 76 31 20 CREATE VIEW v1
41b0: 41 53 0a 20 20 20 20 20 20 53 45 4c 45 43 54 20 AS. SELECT
41c0: 61 2b 62 20 41 53 20 78 2c 20 62 2b 63 20 41 53 a+b AS x, b+c AS
41d0: 20 79 2c 20 61 2b 63 20 41 53 20 7a 20 46 52 4f y, a+c AS z FRO
41e0: 4d 20 74 31 3b 0a 20 20 20 20 53 45 4c 45 43 54 M t1;. SELECT
41f0: 20 2a 20 46 52 4f 4d 20 76 31 3b 0a 20 20 7d 0a * FROM v1;. }.
4200: 7d 20 7b 33 20 35 20 34 7d 0a 64 6f 5f 74 65 73 } {3 5 4}.do_tes
4210: 74 20 74 72 69 67 67 65 72 32 2d 38 2e 32 20 7b t trigger2-8.2 {
4220: 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 . execsql {.
4230: 20 43 52 45 41 54 45 20 54 41 42 4c 45 20 76 31 CREATE TABLE v1
4240: 6c 6f 67 28 61 2c 62 2c 63 2c 64 2c 65 2c 66 29 log(a,b,c,d,e,f)
4250: 3b 0a 20 20 20 20 43 52 45 41 54 45 20 54 52 49 ;. CREATE TRI
4260: 47 47 45 52 20 72 31 20 49 4e 53 54 45 41 44 20 GGER r1 INSTEAD
4270: 4f 46 20 44 45 4c 45 54 45 20 4f 4e 20 76 31 20 OF DELETE ON v1
4280: 42 45 47 49 4e 0a 20 20 20 20 20 20 49 4e 53 45 BEGIN. INSE
4290: 52 54 20 49 4e 54 4f 20 76 31 6c 6f 67 20 56 41 RT INTO v1log VA
42a0: 4c 55 45 53 28 4f 4c 44 2e 78 2c 4e 55 4c 4c 2c LUES(OLD.x,NULL,
42b0: 4f 4c 44 2e 79 2c 4e 55 4c 4c 2c 4f 4c 44 2e 7a OLD.y,NULL,OLD.z
42c0: 2c 4e 55 4c 4c 29 3b 0a 20 20 20 20 45 4e 44 3b ,NULL);. END;
42d0: 0a 20 20 20 20 44 45 4c 45 54 45 20 46 52 4f 4d . DELETE FROM
42e0: 20 76 31 20 57 48 45 52 45 20 78 3d 31 3b 0a 20 v1 WHERE x=1;.
42f0: 20 20 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d SELECT * FROM
4300: 20 76 31 6c 6f 67 3b 0a 20 20 7d 0a 7d 20 7b 7d v1log;. }.} {}
4310: 0a 64 6f 5f 74 65 73 74 20 74 72 69 67 67 65 72 .do_test trigger
4320: 32 2d 38 2e 33 20 7b 0a 20 20 65 78 65 63 73 71 2-8.3 {. execsq
4330: 6c 20 7b 0a 20 20 20 20 44 45 4c 45 54 45 20 46 l {. DELETE F
4340: 52 4f 4d 20 76 31 20 57 48 45 52 45 20 78 3d 33 ROM v1 WHERE x=3
4350: 3b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a 20 46 ;. SELECT * F
4360: 52 4f 4d 20 76 31 6c 6f 67 3b 0a 20 20 7d 0a 7d ROM v1log;. }.}
4370: 20 7b 33 20 7b 7d 20 35 20 7b 7d 20 34 20 7b 7d {3 {} 5 {} 4 {}
4380: 7d 0a 64 6f 5f 74 65 73 74 20 74 72 69 67 67 65 }.do_test trigge
4390: 72 32 2d 38 2e 34 20 7b 0a 20 20 65 78 65 63 73 r2-8.4 {. execs
43a0: 71 6c 20 7b 0a 20 20 20 20 49 4e 53 45 52 54 20 ql {. INSERT
43b0: 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28 34 INTO t1 VALUES(4
43c0: 2c 35 2c 36 29 3b 0a 20 20 20 20 44 45 4c 45 54 ,5,6);. DELET
43d0: 45 20 46 52 4f 4d 20 76 31 6c 6f 67 3b 0a 20 20 E FROM v1log;.
43e0: 20 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 76 31 DELETE FROM v1
43f0: 20 57 48 45 52 45 20 79 3d 31 31 3b 0a 20 20 20 WHERE y=11;.
4400: 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 76 SELECT * FROM v
4410: 31 6c 6f 67 3b 0a 20 20 7d 0a 7d 20 7b 39 20 7b 1log;. }.} {9 {
4420: 7d 20 31 31 20 7b 7d 20 31 30 20 7b 7d 7d 0a 64 } 11 {} 10 {}}.d
4430: 6f 5f 74 65 73 74 20 74 72 69 67 67 65 72 32 2d o_test trigger2-
4440: 38 2e 35 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 8.5 {. execsql
4450: 7b 0a 20 20 20 20 43 52 45 41 54 45 20 54 52 49 {. CREATE TRI
4460: 47 47 45 52 20 72 32 20 49 4e 53 54 45 41 44 20 GGER r2 INSTEAD
4470: 4f 46 20 49 4e 53 45 52 54 20 4f 4e 20 76 31 20 OF INSERT ON v1
4480: 42 45 47 49 4e 0a 20 20 20 20 20 20 49 4e 53 45 BEGIN. INSE
4490: 52 54 20 49 4e 54 4f 20 76 31 6c 6f 67 20 56 41 RT INTO v1log VA
44a0: 4c 55 45 53 28 4e 55 4c 4c 2c 4e 45 57 2e 78 2c LUES(NULL,NEW.x,
44b0: 4e 55 4c 4c 2c 4e 45 57 2e 79 2c 4e 55 4c 4c 2c NULL,NEW.y,NULL,
44c0: 4e 45 57 2e 7a 29 3b 0a 20 20 20 20 45 4e 44 3b NEW.z);. END;
44d0: 0a 20 20 20 20 44 45 4c 45 54 45 20 46 52 4f 4d . DELETE FROM
44e0: 20 76 31 6c 6f 67 3b 0a 20 20 20 20 49 4e 53 45 v1log;. INSE
44f0: 52 54 20 49 4e 54 4f 20 76 31 20 56 41 4c 55 45 RT INTO v1 VALUE
4500: 53 28 31 2c 32 2c 33 29 3b 0a 20 20 20 20 53 45 S(1,2,3);. SE
4510: 4c 45 43 54 20 2a 20 46 52 4f 4d 20 76 31 6c 6f LECT * FROM v1lo
4520: 67 3b 0a 20 20 7d 0a 7d 20 7b 7b 7d 20 31 20 7b g;. }.} {{} 1 {
4530: 7d 20 32 20 7b 7d 20 33 7d 0a 64 6f 5f 74 65 73 } 2 {} 3}.do_tes
4540: 74 20 74 72 69 67 67 65 72 32 2d 38 2e 36 20 7b t trigger2-8.6 {
4550: 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20 . execsql {.
4560: 20 43 52 45 41 54 45 20 54 52 49 47 47 45 52 20 CREATE TRIGGER
4570: 72 33 20 49 4e 53 54 45 41 44 20 4f 46 20 55 50 r3 INSTEAD OF UP
4580: 44 41 54 45 20 4f 4e 20 76 31 20 42 45 47 49 4e DATE ON v1 BEGIN
4590: 0a 20 20 20 20 20 20 49 4e 53 45 52 54 20 49 4e . INSERT IN
45a0: 54 4f 20 76 31 6c 6f 67 20 56 41 4c 55 45 53 28 TO v1log VALUES(
45b0: 4f 4c 44 2e 78 2c 4e 45 57 2e 78 2c 4f 4c 44 2e OLD.x,NEW.x,OLD.
45c0: 79 2c 4e 45 57 2e 79 2c 4f 4c 44 2e 7a 2c 4e 45 y,NEW.y,OLD.z,NE
45d0: 57 2e 7a 29 3b 0a 20 20 20 20 45 4e 44 3b 0a 20 W.z);. END;.
45e0: 20 20 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 76 DELETE FROM v
45f0: 31 6c 6f 67 3b 0a 20 20 20 20 55 50 44 41 54 45 1log;. UPDATE
4600: 20 76 31 20 53 45 54 20 78 3d 78 2b 31 30 30 2c v1 SET x=x+100,
4610: 20 79 3d 79 2b 32 30 30 2c 20 7a 3d 7a 2b 33 30 y=y+200, z=z+30
4620: 30 3b 0a 20 20 20 20 53 45 4c 45 43 54 20 2a 20 0;. SELECT *
4630: 46 52 4f 4d 20 76 31 6c 6f 67 3b 0a 20 20 7d 0a FROM v1log;. }.
4640: 7d 20 7b 33 20 31 30 33 20 35 20 32 30 35 20 34 } {3 103 5 205 4
4650: 20 33 30 34 20 39 20 31 30 39 20 31 31 20 32 31 304 9 109 11 21
4660: 31 20 31 30 20 33 31 30 7d 0a 0a 64 6f 5f 74 65 1 10 310}..do_te
4670: 73 74 20 74 72 69 67 67 65 72 32 2d 39 2e 39 20 st trigger2-9.9
4680: 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 50 52 41 {. execsql {PRA
4690: 47 4d 41 20 69 6e 74 65 67 72 69 74 79 5f 63 68 GMA integrity_ch
46a0: 65 63 6b 7d 0a 7d 20 7b 6f 6b 7d 0a 0a 66 69 6e eck}.} {ok}..fin
46b0: 69 73 68 5f 74 65 73 74 0a ish_test.