~drizzle-trunk/drizzle/development

1 by brian
clean slate
1
#======================================================================
2
#
3
# Trigger Tests 
4
# (test case numbering refer to requirement document TP v1.1) 
5
#======================================================================
6
7
# OBM - ToDo
8
############
9
# 1. Information Schema Trigger Table
10
# 2. Performace
11
###############################################
12
13
# General setup for Trigger tests
14
let $message= Testcase: 3.5:;
15
--source include/show_msg.inc
16
17
--disable_abort_on_error
18
19
	create User test_general@localhost;
20
	set password for test_general@localhost = password('PWD');
21
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_general@localhost;
22
23
	create User test_super@localhost;
24
	set password for test_super@localhost = password('PWD');
25
	grant ALL on *.* to test_super@localhost with grant OPTION;
26
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
27
	connect (con_general,localhost,test_general,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
28
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
29
	connect (con_super,localhost,test_super,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
30
	connection default;
31
32
33
#####################################################
34
################# Section 3.5.1 #####################
35
# Syntax checks for CREATE TRIGGER and DROP TRIGGER #
36
#####################################################
37
38
#Section 3.5.1.1
39
# Testcase: Ensure that all clauses that should be supported are supported.
40
let $message= Testcase: 3.5.1.1:;
41
--source include/show_msg.inc
42
# OBN - This test case tests basic trigger definition and execution 
43
#       of INSERT/UPDATE/DELETE actions and BEFORE/AFTER timings.
44
#       As such it covers the equirements in sections 3.5.6.1, 3.5.6.2, 
45
#       3.5.6.4, 3.5.6.5, 3.5.7.1, 3.5.7.2, 3.5.7.3, 3.5.7.17 below.
46
#     - Note currently as a result of limitations with locking tables in 
47
#       triggers, a specifc lockingof the tables is done.
48
#       Once fixed, the locking and alias referances should be removed
49
50
use test;
51
# Trigger Definition
52
	Create trigger trg1_1 BEFORE INSERT 
53
		on tb3 for each row set @test_before = 2, new.f142 = @test_before;
54
	Create trigger trg1_2 AFTER INSERT 
55
		on tb3 for each row set @test_after = 6;
56
	Create trigger trg1_4 BEFORE UPDATE 
57
		on tb3 for each row set @test_before = 27, 
58
					new.f142 = @test_before, 
59
					new.f122 = 'Before Update Trigger';
60
	Create trigger trg1_3 AFTER UPDATE 
61
		on tb3 for each row set @test_after = '15';
62
	Create trigger trg1_5 BEFORE DELETE on tb3 for each row  
63
		select count(*) into @test_before from tb3 as tr_tb3 
64
			where f121 = 'Test 3.5.1.1';
65
	Create trigger trg1_6 AFTER DELETE on tb3 for each row  
66
		select count(*) into @test_after from tb3 as tr_tb3 
67
			where f121 = 'Test 3.5.1.1';
68
# Trigger Execution Insert (before and after)
69
	set @test_before = 1;
70
	set @test_after = 5;
71
        select @test_before, @test_after;
72
	Insert into tb3 (f121, f122, f142, f144, f134) 
73
		values ('Test 3.5.1.1', 'First Row', @test_before, @test_after, 1);
74
	select f121, f122, f142, f144, f134 from tb3 where f121 = 'Test 3.5.1.1';
75
        select @test_before, @test_after;
76
77
# Trigger Execution Update (before and after)
78
	set @test_before = 18;
79
	set @test_after = 8;
80
        select @test_before, @test_after;
81
	Update tb3 set  tb3.f122 = 'Update', 
82
			tb3.f142 = @test_before, 
83
			tb3.f144 = @test_after 
84
		where tb3.f121 = 'Test 3.5.1.1';
85
	select f121, f122, f142, f144, f134 from tb3 where f121 = 'Test 3.5.1.1';
86
        select @test_before, @test_after;
87
88
# Trigger Execution Delete (before and after)
89
	Insert into tb3 (f121, f122, f142, f144, f134) 
90
		values ('Test 3.5.1.1', 'Second Row', 5, 6, 2);
91
	set @test_before = 0;
92
	set @test_after = 0;
93
	select f121, f122, f142, f144, f134 from tb3 where f121 = 'Test 3.5.1.1';
94
        select @test_before, @test_after;
95
	Delete from tb3 where f121 = 'Test 3.5.1.1' and f134 = 2;
96
	select f121, f122, f142, f144, f134 from tb3 where f121 = 'Test 3.5.1.1';
97
        select @test_before, @test_after;
98
99
#Cleanup
100
	--disable_warnings
101
	--error 0, 1360
102
	drop trigger trg1_1;
103
	--error 0, 1360
104
	drop trigger trg1_2;
105
	--error 0, 1360
106
	drop trigger trg1_3;
107
	--error 0, 1360
108
	drop trigger trg1_4;
109
	--error 0, 1360
110
	drop trigger trg1_5;
111
	--error 0, 1360
112
	drop trigger trg1_6;
113
	--enable_warnings
114
	delete from tb3 where f121='Test 3.5.1.1';
115
	--enable_warnings
116
117
#Section 3.5.1.2
118
# Testcase: Ensure that all clauses that should not be supported are disallowed 
119
#           with an appropriate error message. 
120
let $message= Testcase: 3.5.1.2:;
121
--source include/show_msg.inc
122
	
123
	--error 1064
124
	Create trigger trg_1 after insert 
125
		on tb3 for each statement set @x= 1;
126
127
#Cleanup 
128
	--disable_warnings 
129
	--error 0, 1360
130
	drop trigger trg_1;
131
	--enable_warnings
132
	
133
134
#Section 3.5.1.3
135
# Testcase: Ensure that all supported clauses are supported only in the correct order.
136
let $message= Testcase 3.5.1.3:;
137
--source include/show_msg.inc
138
	--error 1064 
139
	CREATE TRIGGER trg3_1 on tb3 BEFORE INSERT for each row set new.f120 = 't';
140
141
	--error 1064 
142
	CREATE trg3_2 TRIGGER AFTER INSERT on tb3 for each row set new.f120 = 's';
143
		
144
	--error 1064 
145
	CREATE TRIGGER trg3_3 Before DELETE on tb3 set @ret1 = 'test' for each row;
146
	
147
	--error 1064 
148
	CREATE TRIGGER trg3_4 DELETE AFTER on tb3 set @ret1 = 'test' for each row;
149
150
	--error 1064 
151
	CREATE for each row TRIGGER trg3_5 AFTER UPDATE on tb3 set @ret1 = 'test'; 
152
	
153
#Cleanup
154
# OBN - Although none of the above should have been created we should do a cleanup
155
#       since if they have been created, not dropping them will affect following
156
#       tests.
157
	--disable_warnings
158
	--error 0, 1360
159
	drop trigger trg3_1;
160
	--error 0, 1360
161
	drop trigger trg3_2;
162
	--error 0, 1360
163
	drop trigger trg3_3;
164
	--error 0, 1360
165
	drop trigger trg3_4;
166
	--error 0, 1360
167
	drop trigger trg3_5;
168
	--enable_warnings
169
170
171
#Section 3.5.1.4
172
# Testcase: Ensure that an appropriate error message is returned if a clause 
173
#           is out-of-order in an SQL statement.
174
# OBN - FIXME - Missing 3.5.1.4 need to add
175
176
#Section 3.5.1.5
177
# Testcase: Ensure that all clauses that are defined to be mandatory are indeed 
178
#           required to be mandatory by the MySQL server and tools
179
let  $message= Testcase: 3.5.1.5:;
180
--source include/show_msg.inc
181
182
	--error 1064 
183
	CREATE TRIGGER trg4_1 AFTER on tb3 for each row set new.f120 = 'e';
184
185
	--error 1064 
186
	CREATE TRIGGER trg4_2 INSERT on tb3 for each set row  new.f120 = 'f';
187
188
	--error 1064 
189
	CREATE TRIGGER trg4_3 BEFORE INSERT tb3 for each row set new.f120 = 'g';
190
191
	--error 1064 
192
	CREATE TRIGGER trg4_4 AFTER UPDATE on tb3 for each set new.f120 = 'g';
193
194
	--error 1064 
195
	CREATE trg4_5 AFTER DELETE on tb3 for each set new.f120 = 'g';
196
197
	--error 1064 
198
	CREATE TRIGGER trg4_6 BEFORE DELETE for each row set new.f120 = 'g';
199
200
#Cleanup
201
# OBN - Although none of the above should have been created we should do a cleanup
202
#       since if they have been created, not dropping them will affect following
203
#       tests.
204
	--disable_warnings
205
	--error 0, 1360
206
	drop trigger trg4_1;
207
	--error 0, 1360
208
	drop trigger trg4_2;
209
	--error 0, 1360
210
	drop trigger trg4_3;
211
	--error 0, 1360
212
	drop trigger trg4_4;
213
	--error 0, 1360
214
	drop trigger trg4_5;
215
	--error 0, 1360
216
	drop trigger trg4_6;
217
	--enable_warnings 
218
219
#Section 3.5.1.6
220
# Testcase: Ensure that any clauses that are defined to be optional are indeed
221
#           trated as optional by MySQL server and tools
222
let $message= Testcase 3.5.1.6: - Need to fix;
223
--source include/show_msg.inc
224
# OBN - FIXME - Missing 3.5.1.6 need to add
225
226
#Section 3.5.1.7 
227
# Testcase: Ensure that all valid, fully-qualified, and non-qualified, 
228
#           trigger names are accepted, at creation time.
229
let $message= Testcase 3.5.1.7: - need to fix;
230
--source include/show_msg.inc
231
232
	drop table if exists t1;
233
	eval create table t1 (f1 int, f2 char(25),f3 int) engine=$engine_type;
234
	CREATE TRIGGER trg5_1 BEFORE INSERT on test.t1 
235
		for each row set new.f3 = '14';
236
	CREATE TRIGGER trg_abcdefghijklmnopqrstuvwxyz1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ
237
		BEFORE UPDATE on test.t1 for each row set new.f3 = '42';
238
239
	insert into t1 (f2) values ('insert 3.5.1.7');
240
	select * from t1;
241
	update t1 set f2='update 3.5.1.7';
242
	select * from t1;
243
	select trigger_name from information_schema.triggers;
244
245
#Cleanup
246
	--disable_warnings 
247
	--error 0, 1360
248
	drop trigger trg5_1;
249
	# The above trigger should be dropped since the name was trimmed.
250
	drop trigger trg_abcdefghijklmnopqrstuvwxyz1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ;
251
	drop table t1;
252
253
#Section 3.5.1.8
254
# Testcase: Ensure that any invalid trigger name is never accepted, and that an 
255
#            appropriate error message is returned when the name is rejected.
256
let $message= Testcase 3.5.1.8:;
257
--source include/show_msg.inc
258
259
	--error 1064 
260
	CREATE TRIGGER trg12* before insert on tb3 for each row set new.f120 = 't';
261
262
	--error 1064 
263
	CREATE TRIGGER trigger before insert on tb3 for each row set new.f120 = 't';
264
265
	--error 1064 
266
	CREATE TRIGGER 100 before insert on tb3 for each row set new.f120 = 't';
267
268
	--error 1064 
269
	CREATE TRIGGER @@view before insert on tb3 for each row set new.f120 = 't';
270
271
	--error 1064 
272
	CREATE TRIGGER @name before insert on tb3 for each row set new.f120 = 't';
273
274
	--error 1435	
275
	CREATE TRIGGER tb3.trg6_1 BEFORE INSERT on test.tb3 
276
		for each row set new.f120 ='X';
277
	
278
	--disable_warnings
279
        drop database if exists trig_db;
280
	--enable_warnings
281
	create database trig_db;
282
	use trig_db;
283
	eval create table t1 (f1 integer) engine = $engine_type;
284
285
	# Can't create a trigger in a different database
286
	use test;
287
	--error 1435
288
	CREATE TRIGGER trig_db.trg6_2 AFTER INSERT on tb3 
289
		for each row set @ret_trg6_2 = 5;
290
291
	# Can't create a trigger refrencing a table in a different db
292
	use trig_db;
293
	--error 1435
294
	CREATE TRIGGER trg6_3 AFTER INSERT on test.tb3 
295
		for each row set @ret_trg6_3 = 18;
296
297
	use test;
298
299
#Cleanup
300
	--disable_warnings 
301
	drop database trig_db;
302
# OBN - Although none of the above should have been created we should do a cleanup
303
#       since if they have been created, not dropping them will affect following
304
#       tests.
305
	--error 0, 1360
306
	drop trigger trg6_1;
307
	--error 0, 1360
308
	drop trigger trg6_3;
309
	--enable_warnings 
310
311
#Section 3.5.1.9
312
#Testcase:  Ensure that a reference to a non-existent trigger is rejected with
313
#           an appropriate error message.
314
let $message= Testcase 3.5.1.9:(cannot be inplemented at this point);
315
--source include/show_msg.inc
316
317
318
#Section 3.5.1.10
319
#Testcase: Ensure that it is not possible to create two triggers with the same name on 
320
#          the same table
321
let $message= Testcase 3.5.1.10:;
322
--source include/show_msg.inc
323
324
	CREATE TRIGGER trg7_1 BEFORE UPDATE on tb3 for each row set new.f120 ='X';
325
326
	--error 1359
327
	CREATE TRIGGER trg7_1 AFTER INSERT on tb3 for each row set @x ='Y';
328
329
#Cleanup
330
	--disable_warnings 
331
	--error 0, 1360
332
	drop trigger trg7_1;
333
	--enable_warnings
334
335
336
#Section 3.5.1.? 
337
# Testcase: Ensure that it is not possible to create two or more triggers with 
338
#           the same name, provided each is associated with a different table.
339
let $message= Testcase 3.5.1.?:;
340
--source include/show_msg.inc
341
342
	--disable_warnings 
343
	drop table if exists t1;
344
	drop table if exists t2;
345
	--enable_warnings
346
	eval create table t1 (f1 char(50), f2 integer) engine = $engine_type;
347
	eval create table t2 (f1 char(50), f2 integer) engine = $engine_type;
348
349
	create trigger trig before insert on t1 
350
		for each row set new.f1 ='trig t1';
351
352
	--error 1359
353
	create trigger trig before update on t2 
354
		for each row set new.f1 ='trig t2';
355
356
	insert into t1 value ('insert to t1',1);
357
	select * from t1;
358
	update t1 set f1='update to t1';
359
	select * from t1;
360
	insert into t2 value ('insert to t2',2);
361
	update t2 set f1='update to t1';
362
	select * from t2;
363
364
#Cleanup
365
	--disable_warnings 
366
	drop table t1;
367
	drop table t2;
368
	--error 0, 1360
369
	drop trigger trig;
370
	--enable_warnings
371
372
373
#Section 3.5.1.11 
374
# Testcase: Ensure that it is possible to create two or more triggers with 
375
#           the same name, provided each resides in a different database
376
let $message= Testcase 3.5.1.11:;
377
--source include/show_msg.inc
378
379
	--disable_warnings
380
        drop database if exists trig_db1;
381
        drop database if exists trig_db2;
382
        drop database if exists trig_db3;
383
	--enable_warnings
384
	create database trig_db1;
385
	create database trig_db2;
386
	create database trig_db3;
387
	use trig_db1;
388
	eval create table t1 (f1 char(50), f2 integer) engine = $engine_type;
389
	create trigger trig before insert on t1 
390
		for each row set new.f1 ='trig1', @test_var1='trig1';
391
	use trig_db2;
392
	eval create table t2 (f1 char(50), f2 integer) engine = $engine_type;
393
	create trigger trig before insert on t2 
394
		for each row set new.f1 ='trig2', @test_var2='trig2';
395
	use trig_db3;
396
	eval create table t1 (f1 char(50), f2 integer) engine = $engine_type;
397
	create trigger trig before insert on t1 
398
		for each row set new.f1 ='trig3', @test_var3='trig3';
399
400
	set @test_var1= '', @test_var2= '', @test_var3= '';
401
	use trig_db1;
402
	insert into t1 (f1,f2) values ('insert to db1 t1',1);
403
	insert into trig_db1.t1 (f1,f2) values ('insert to db1 t1 from db1',2);
404
	insert into trig_db2.t2 (f1,f2) values ('insert to db2 t2 from db1',3);
405
	insert into trig_db3.t1 (f1,f2) values ('insert to db3 t1 from db1',4);
406
	select @test_var1, @test_var2, @test_var3;
407
	select * from t1;
408
	select * from trig_db2.t2;
409
	select * from trig_db3.t1;
410
	select * from t1;
411
	use test;
412
413
#Cleanup
414
	--disable_warnings 
415
	drop database trig_db1;
416
	drop database trig_db2;
417
	drop database trig_db3;
418
	--enable_warnings
419
420
###########################################
421
################ Section 3.5.2 ############
422
# Check for the global nature of Triggers #
423
###########################################
424
425
#Section 3.5.2.1 
426
# Test case: Ensure that if a trigger created without a qualifying database 
427
#            name belongs to the database in use at creation time.
428
#Section 3.5.2.2 
429
# Test case: Ensure that if a trigger created with a qualifying database name 
430
#            belongs to the database specified.
431
#Section 3.5.2.3 
432
# Test case: Ensure that if a trigger created with a qualifying database name 
433
#            does not belong to the database in use at creation time unless 
434
#            the qualifying database name identifies the database that is 
435
#            also in use at creation time.
436
let $message= Testcase 3.5.2.1/2/3:;
437
--source include/show_msg.inc
438
439
440
	--disable_warnings
441
        drop database if exists trig_db1;
442
        drop database if exists trig_db2;
443
	--enable_warnings
444
	create database trig_db1;
445
	create database trig_db2;
446
	use trig_db1;
447
	eval create table t1 (f1 char(50), f2 integer) engine = $engine_type;
448
	eval create table trig_db2.t1 (f1 char(50), f2 integer) engine = $engine_type;
449
	create trigger trig1_b before insert on t1 
450
		for each row set @test_var1='trig1_b';
451
	create trigger trig_db1.trig1_a after insert on t1 
452
		for each row set @test_var2='trig1_a';
453
	create trigger trig_db2.trig2 before insert on trig_db2.t1 
454
		for each row set @test_var3='trig2';
455
	select trigger_schema, trigger_name, event_object_table
456
		from information_schema.triggers;
457
458
	set @test_var1= '', @test_var2= '', @test_var3= '';
459
	insert into t1 (f1,f2) values ('insert to db1 t1 from db1',352);
460
	insert into trig_db2.t1 (f1,f2) values ('insert to db2 t1 from db1',352);
461
	select @test_var1, @test_var2, @test_var3;
462
463
#Cleanup
464
	--disable_warnings 
465
	drop database trig_db1;
466
	drop database trig_db2;
467
468
###########################################
469
################ Section 3.5.3 ############
470
# Check for the global nature of Triggers #
471
###########################################
472
473
# General setup to be used in all testcases of 3.5.3
474
let $message= Testcase 3.5.3:;
475
--source include/show_msg.inc
476
477
        --disable_warnings
478
	drop database if exists priv_db;
479
	--enable_warnings
480
	create database priv_db;
481
	use priv_db;
482
	create table t1 (f1 char(20));
483
484
	create User test_noprivs@localhost;
485
	set password for test_noprivs@localhost = password('PWD');
486
487
	create User test_yesprivs@localhost;
488
	set password for test_yesprivs@localhost = password('PWD');
489
490
#Section 3.5.3.1 / 3.5.3.2 
491
# Test case: Ensure SUPER privilege is required to create a trigger
492
#Section 3.5.3.3 / 3.5.3.4
493
# Test case: Ensure that root always has the SUPER privilege.
494
# OMR - No need to test this since SUPER priv is an existing one and not related
495
#       or added for triggers (TP 2005-06-06) 
496
#Section 3.5.3.5 / 3.5.3.6 
497
# Test case: Ensure that the SUPER privilege is required to drop a trigger.
498
let $message= Testcase 3.5.3.2/6:;
499
--source include/show_msg.inc
500
501
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_noprivs@localhost;
502
	grant ALL  on *.* to test_noprivs@localhost;
503
	revoke SUPER  on *.* from test_noprivs@localhost;
504
	show grants for test_noprivs@localhost;
505
506
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_yesprivs@localhost;
507
	grant SUPER on *.* to test_yesprivs@localhost;
508
# Adding the minimal priv to be able to set to the db
509
	grant SELECT on priv_db.t1 to test_yesprivs@localhost;
510
	show grants for test_yesprivs@localhost;
511
512
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
513
	connect (no_privs,localhost,test_noprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
514
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
515
	connect (yes_privs,localhost,test_yesprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
516
	connection default;
517
518
let $message= Testcase 3.5.3.2:;
519
--source include/show_msg.inc
520
	
521
	connection no_privs;
522
        select current_user;
523
	use priv_db;
524
	
525
	--error 1227
526
	create trigger trg1_1 before INSERT on t1 for each row 
527
		set new.f1 = 'trig 3.5.3.2_1-no';
528
529
	connection default;
530
	use priv_db;
531
	insert into t1 (f1) values ('insert 3.5.3.2-no');
532
	select f1 from t1;
533
534
	connection yes_privs;
535
        select current_user;
536
	use priv_db;
537
538
	create trigger trg1_2 before INSERT  on t1 for each row 
539
		set new.f1 = 'trig 3.5.3.2_2-yes';
540
541
	connection default;
542
	use priv_db;
543
	insert into t1 (f1) values ('insert 3.5.3.2-yes');
544
	select f1 from t1;
545
	
546
let $message= Testcase 3.5.3.6:;
547
--source include/show_msg.inc
548
549
	connection no_privs;
550
	use priv_db;
551
	
552
	--error 1227
553
	drop trigger trg1_2;  
554
555
	connection default;
556
	use priv_db;
557
	insert into t1 (f1) values ('insert 3.5.3.6-yes');
558
	select f1 from t1;
559
560
	connection yes_privs;
561
	use priv_db;
562
563
	drop trigger trg1_2;  
564
565
	connection default;
566
	use priv_db;
567
	insert into t1 (f1) values ('insert 3.5.3.6-no');
568
	select f1 from t1;
569
570
# Cleanup	
571
	--disable_warnings 
572
	connection default;
573
	--error 0, 1360
574
	drop trigger trg1_2;
575
	disconnect no_privs;
576
	disconnect yes_privs;
577
	--enable_warnings
578
579
580
#Section 3.5.3.7
581
# Test case: Ensure that use of the construct "SET NEW. <column name> = <value>" 
582
#            fails at CREATE TRIGGER time, if the current user does not have the
583
#            UPDATE privilege on the column specified
584
# Note: As a result of bug 8884 the triggers are actually created. 
585
#       Disabled because of bug 8884
586
587
# --- 3.5.3.7a - Privs set on a global level
588
let $message=Testcase 3.5.3.7a:;
589
--source include/show_msg.inc
590
591
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_noprivs@localhost;
592
	grant ALL  on *.* to test_noprivs@localhost;
593
	revoke UPDATE  on *.* from test_noprivs@localhost;
594
	show grants for test_noprivs@localhost;
595
596
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_yesprivs@localhost;
597
	grant SUPER, UPDATE on *.* to test_yesprivs@localhost;
598
	show grants for test_yesprivs@localhost;
599
600
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
601
	connect (no_privs_424a,localhost,test_noprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
602
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
603
	connect (yes_privs_424a,localhost,test_yesprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
604
605
	connection no_privs_424a;
606
	select current_user;
607
	use priv_db;
608
	show grants;
609
	select f1 from t1;
610
611
let $message= Trigger create disabled - should fail - Bug 8884;
612
--source include/show_msg.inc
613
#	--error 1227
614
#	create trigger trg4a_1 before INSERT on t1 for each row 
615
#		set new.f1 = 'trig 3.5.3.7-1a';
616
617
	connection default;
618
	insert into t1 (f1) values ('insert 3.5.3.7-1a');
619
	select f1 from t1;
620
	--error 0, 1360
621
	drop trigger trg4a_1;
622
623
	connection yes_privs_424a;
624
	use priv_db;
625
	select current_user;
626
	show grants;
627
	create trigger trg4a_2 before INSERT  on t1 for each row 
628
		set new.f1 = 'trig 3.5.3.7-2a';
629
630
	connection default;
631
	insert into t1 (f1) values ('insert 3.5.3.7-2b');
632
	select f1 from t1;
633
634
# Cleanup
635
	--disable_warnings 
636
	drop trigger trg4a_2;
637
	disconnect no_privs_424a;
638
	disconnect yes_privs_424a;
639
	--enable_warnings
640
641
# --- 3.5.3.7b - Privs set on a database level
642
let $message= Testcase 3.5.3.7b:;
643
--source include/show_msg.inc
644
645
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_noprivs@localhost;
646
	grant SUPER on *.* to test_noprivs;
647
	grant ALL  on priv_db.* to test_noprivs@localhost;
648
	revoke UPDATE  on priv_db.* from test_noprivs@localhost;
649
	show grants for test_noprivs;
650
651
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_yesprivs@localhost;
652
	grant SUPER on *.* to test_yesprivs@localhost;
653
	grant UPDATE on priv_db.* to test_yesprivs@localhost;
654
	show grants for test_yesprivs@localhost;
655
656
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
657
	connect (no_privs_424b,localhost,test_noprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
658
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
659
	connect (yes_privs_424b,localhost,test_yesprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
660
	connection default;
661
662
	connection no_privs_424b;
663
	show grants;
664
	use priv_db;
665
666
let $message= Trigger create disabled - should fail - Bug 8884;
667
--source include/show_msg.inc
668
#	--error 1227
669
#	create trigger trg4b_1 before UPDATE on t1 for each row 
670
#		set new.f1 = 'trig 3.5.3.7-1b';
671
672
	connection default;
673
	insert into t1 (f1) values ('insert 3.5.3.7-1b');
674
	select f1 from t1;
675
	update t1 set  f1 = 'update 3.5.3.7-1b' where f1 = 'insert 3.5.3.7-1b';
676
	select f1 from t1;
677
	--error 0, 1360
678
	drop trigger trg4b_1;
679
680
	connection yes_privs_424b;
681
	show grants;
682
	use priv_db;
683
	create trigger trg4b_2 before UPDATE  on t1 for each row 
684
		set new.f1 = 'trig 3.5.3.7-2b';
685
686
	connection default;
687
	insert into t1 (f1) values ('insert 3.5.3.7-2b');
688
	select f1 from t1;
689
	update t1 set  f1 = 'update 3.5.3.7-2b' where f1 = 'insert 3.5.3.7-2b';
690
	select f1 from t1;
691
# Cleanup
692
	--disable_warnings 
693
	drop trigger trg4b_2;
694
	disconnect no_privs_424b;
695
	disconnect yes_privs_424b;
696
	--enable_warnings
697
698
# --- 3.5.3.7c - Privs set on a table level
699
let $message= Testcase 3.5.3.7c;
700
--source include/show_msg.inc
701
702
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_noprivs@localhost;
703
	grant SUPER on *.* to test_noprivs@localhost;
704
	grant ALL  on priv_db.t1 to test_noprivs@localhost;
705
	revoke UPDATE  on priv_db.t1 from test_noprivs@localhost;
706
	show grants for test_noprivs;
707
708
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_yesprivs@localhost;
709
	grant SUPER on *.* to test_yesprivs@localhost;
710
	grant UPDATE on priv_db.t1 to test_yesprivs@localhost;
711
	show grants for test_yesprivs@localhost;
712
713
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
714
	connect (no_privs_424c,localhost,test_noprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
715
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
716
	connect (yes_privs_424c,localhost,test_yesprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
717
	connection default;
718
719
	connection no_privs_424c;
720
	show grants;
721
	use priv_db;
722
723
let $message= Trigger create disabled - should fail - Bug 8884;
724
--source include/show_msg.inc
725
#	--error 1227
726
#	create trigger trg4c_1 before INSERT on t1 for each row 
727
#		set new.f1 = 'trig 3.5.3.7-1c';
728
729
	connection default;
730
	insert into t1 (f1) values ('insert 3.5.3.7-1c');
731
	select f1 from t1;
732
	--error 0, 1360
733
	drop trigger trg4c_1;
734
735
	connection yes_privs_424c;
736
	show grants;
737
	use priv_db;
738
	create trigger trg4c_2 before INSERT  on t1 for each row 
739
		set new.f1 = 'trig 3.5.3.7-2c';
740
741
	connection default;
742
	insert into t1 (f1) values ('insert 3.5.3.7-2c');
743
	select f1 from t1;
744
745
# Cleanup
746
	--disable_warnings 
747
	drop trigger trg4c_2;
748
	disconnect no_privs_424c;
749
	disconnect yes_privs_424c;
750
	--enable_warnings
751
752
# --- 3.5.3.7d - Privs set on a column level
753
--disable_query_log
754
let $message= Testcase 3.5.3.7d:;
755
--enable_query_log
756
--source include/show_msg.inc
757
758
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_noprivs@localhost;
759
	grant SUPER on *.* to test_noprivs@localhost;
760
# There is no ALL privs on the column level
761
	grant SELECT (f1), INSERT (f1) on priv_db.t1 to test_noprivs@localhost;
762
	show grants for test_noprivs;
763
764
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_yesprivs@localhost;
765
	grant SUPER on *.* to test_yesprivs@localhost;
766
	grant UPDATE (f1) on priv_db.t1 to test_yesprivs@localhost;
767
	show grants for test_noprivs;
768
769
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
770
	connect (no_privs_424d,localhost,test_noprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
771
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
772
	connect (yes_privs_424d,localhost,test_yesprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
773
	connection default;
774
775
	connection no_privs_424d;
776
	show grants;
777
	use priv_db;
778
let $message= Trigger create disabled - should fail - Bug 8884;
779
--source include/show_msg.inc
780
#	--error 1227
781
#	create trigger trg4d_1 before INSERT on t1 for each row 
782
#		set new.f1 = 'trig 3.5.3.7-1d';
783
784
	connection default;
785
	insert into t1 (f1) values ('insert 3.5.3.7-1d');
786
	select f1 from t1;
787
	--error 0, 1360
788
	drop trigger trg4d_1;
789
790
	connection yes_privs_424d;
791
	show grants;
792
	use priv_db;
793
	create trigger trg4d_2 before INSERT  on t1 for each row 
794
		set new.f1 = 'trig 3.5.3.7-2d';
795
796
	connection default;
797
	insert into t1 (f1) values ('insert 3.5.3.7-2d');
798
	select f1 from t1;
799
800
# Cleanup
801
	--disable_warnings 
802
	drop trigger trg4d_2;
803
	disconnect no_privs_424d;
804
	disconnect yes_privs_424d;
805
	--enable_warnings
806
807
#Section 3.5.3.8
808
# Test case: Ensure that use of the construct "SET <target> = NEW. <Column name>" fails 
809
#            at CREATE TRIGGER time, if the current user does not have the SELECT privilege 
810
#            on the column specified.
811
812
# --- 3.5.3.8a - Privs set on a global level
813
let $message= Testcase 3.5.3.8a:;
814
--source include/show_msg.inc
815
816
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_noprivs@localhost;
817
	grant ALL  on *.* to test_noprivs@localhost;
818
	revoke SELECT  on *.* from test_noprivs@localhost;
819
	show grants for test_noprivs@localhost;
820
821
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_yesprivs@localhost;
822
	grant SUPER, SELECT on *.* to test_yesprivs@localhost;
823
	show grants for test_yesprivs@localhost;
824
825
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
826
	connect (no_privs_425a,localhost,test_noprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
827
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
828
	connect (yes_privs_425a,localhost,test_yesprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
829
	connection default;
830
831
	connection no_privs_425a;
832
	select current_user;
833
	use priv_db;
834
	show grants;
835
836
let $message= Trigger create disabled - should fail - Bug 8887;
837
--source include/show_msg.inc
838
#	--error 1227
839
#	create trigger trg5a_1 before INSERT on t1 for each row 
840
#		set @test_var = new.f1;
841
842
	connection default;
843
        set @test_var = 'before trig 3.5.3.8-1a';
844
	select @test_var;
845
	insert into t1 (f1) values ('insert 3.5.3.8-1a');
846
	select @test_var;
847
	--error 0, 1360
848
	drop trigger trg5a_1;
849
850
	connection yes_privs_425a;
851
	use priv_db;
852
	select current_user;
853
	show grants;
854
	create trigger trg5a_2 before INSERT  on t1 for each row 
855
		set @test_var= new.f1;
856
857
	connection default;
858
        set @test_var= 'before trig 3.5.3.8-2a';
859
	select @test_var;
860
	insert into t1 (f1) values ('insert 3.5.3.8-2a');
861
	select @test_var;
862
863
# Cleanup
864
	--disable_warnings 
865
	drop trigger trg5a_2;
866
	disconnect no_privs_425a;
867
	disconnect yes_privs_425a;
868
	--enable_warnings
869
870
# --- 3.5.3.8b - Privs set on a database level
871
let $message= Testcase: 3.5.3.8b;
872
--source include/show_msg.inc
873
874
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_noprivs@localhost;
875
	grant SUPER on *.* to test_noprivs@localhost;
876
	grant ALL  on priv_db.* to test_noprivs@localhost;
877
	revoke SELECT  on priv_db.* from test_noprivs@localhost;
878
	show grants for test_noprivs@localhost;
879
880
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_yesprivs@localhost;
881
	grant SUPER on *.* to test_yesprivs@localhost;
882
	grant SELECT on priv_db.* to test_yesprivs@localhost;
883
	show grants for test_yesprivs@localhost;
884
885
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
886
	connect (no_privs_425b,localhost,test_noprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
887
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
888
	connect (yes_privs_425b,localhost,test_yesprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
889
	connection default;
890
891
	connection no_privs_425b;
892
	show grants;
893
	use priv_db;
894
895
let $message= Trigger create disabled - should fail - Bug 8887;
896
--source include/show_msg.inc
897
#	--error 1227
898
#	create trigger trg5b_1 before UPDATE on t1 for each row 
899
#		set @test_var= new.f1;
900
901
	connection default;
902
        set @test_var= 'before trig 3.5.3.8-1b';
903
	insert into t1 (f1) values ('insert 3.5.3.8-1b');
904
	select @test_var;
905
	update t1 set  f1= 'update 3.5.3.8-1b' where f1 = 'insert 3.5.3.8-1b';
906
	select @test_var;
907
	--error 0, 1360
908
	drop trigger trg5b_1;
909
910
	connection yes_privs_425b;
911
	show grants;
912
	use priv_db;
913
	create trigger trg5b_2 before UPDATE  on t1 for each row 
914
		set @test_var= new.f1;
915
916
	connection default;
917
        set @test_var= 'before trig 3.5.3.8-2b';
918
	insert into t1 (f1) values ('insert 3.5.3.8-2b');
919
	select @test_var;
920
	update t1 set  f1= 'update 3.5.3.8-2b' where f1 = 'insert 3.5.3.8-2b';
921
	select @test_var;
922
# Cleanup
923
	--disable_warnings 
924
	drop trigger trg5b_2;
925
	disconnect no_privs_425b;
926
	disconnect yes_privs_425b;
927
	--enable_warnings
928
929
# --- 3.5.3.8c - Privs set on a table level
930
let $message= Testcase 3.5.3.8c:;
931
--source include/show_msg.inc
932
933
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_noprivs@localhost;
934
	grant SUPER on *.* to test_noprivs@localhost;
935
	grant ALL  on priv_db.t1 to test_noprivs@localhost;
936
	revoke SELECT  on priv_db.t1 from test_noprivs@localhost;
937
	show grants for test_noprivs@localhost;
938
939
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_yesprivs@localhost;
940
	grant SUPER on *.* to test_yesprivs@localhost;
941
	grant SELECT on priv_db.t1 to test_yesprivs@localhost;
942
	show grants for test_yesprivs@localhost;
943
944
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
945
	connect (no_privs_425c,localhost,test_noprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
946
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
947
	connect (yes_privs_425c,localhost,test_yesprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
948
	connection default;
949
950
	connection no_privs_425c;
951
	show grants;
952
	use priv_db;
953
954
let $message= Trigger create disabled - should fail - Bug 8887;
955
--source include/show_msg.inc
956
#	--error 1227
957
#	create trigger trg5c_1 before INSERT on t1 for each row 
958
#		set @test_var= new.f1;
959
960
	connection default;
961
        set @test_var= 'before trig 3.5.3.8-1c';
962
	insert into t1 (f1) values ('insert 3.5.3.8-1c');
963
	select @test_var;
964
	--error 0, 1360
965
	drop trigger trg5c_1;
966
967
	connection yes_privs_425c;
968
	show grants;
969
	use priv_db;
970
	create trigger trg5c_2 before INSERT  on t1 for each row 
971
		set @test_var= new.f1;
972
973
	connection default;
974
        set @test_var='before trig 3.5.3.8-2c';
975
	insert into t1 (f1) values ('insert 3.5.3.8-2c');
976
	select @test_var;
977
# Cleanup
978
	--disable_warnings 
979
	drop trigger trg5c_2;
980
	disconnect no_privs_425c;
981
	disconnect yes_privs_425c;
982
	--enable_warnings
983
984
# --- 3.5.3.8d - Privs set on a column level
985
let $message=Testcase: 3.5.3.8d:;
986
--source include/show_msg.inc
987
988
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_noprivs@localhost;
989
	grant SUPER on *.* to test_noprivs@localhost;
990
# There is no ALL prov on the column level
991
	grant UPDATE (f1), INSERT (f1) on priv_db.t1 to test_noprivs@localhost;
992
	show grants for test_noprivs@localhost;
993
994
	revoke ALL PRIVILEGES, GRANT OPTION FROM test_yesprivs@localhost;
995
	grant SUPER on *.* to test_yesprivs@localhost;
996
	grant SELECT (f1) on priv_db.t1 to test_yesprivs@localhost;
997
	show grants for test_noprivs@localhost;
998
999
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
1000
	connect (no_privs_425d,localhost,test_noprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
1001
	--replace_result $MASTER_MYPORT MASTER_MYPORT $MASTER_MYSOCK MASTER_MYSOCK
1002
	connect (yes_privs_425d,localhost,test_yesprivs,PWD,test,$MASTER_MYPORT,$MASTER_MYSOCK);
1003
	connection default;
1004
1005
	connection no_privs_425d;
1006
	show grants;
1007
	use priv_db;
1008
let $message= Trigger create disabled - should fail - Bug 8887;
1009
--source include/show_msg.inc
1010
#	--error 1227
1011
#	create trigger trg5d_1 before INSERT on t1 for each row 
1012
#		set @test_var= new.f1;
1013
1014
	connection default;
1015
        set @test_var='before trig 3.5.3.8-1d';
1016
	insert into t1 (f1) values ('insert 3.5.3.8-1d');
1017
	select @test_var;
1018
	--error 0, 1360
1019
	drop trigger trg5d_1;
1020
1021
	connection yes_privs_425d;
1022
	show grants;
1023
	use priv_db;
1024
	create trigger trg5d_2 before INSERT  on t1 for each row 
1025
		set @test_var= new.f1;
1026
1027
	connection default;
1028
        set @test_var='before trig 3.5.3.8-2d';
1029
	insert into t1 (f1) values ('insert 3.5.3.8-2d');
1030
	select @test_var;
1031
1032
# Cleanup 3.5.3.8
1033
	--disable_warnings 
1034
	drop trigger trg5d_2;
1035
	--enable_warnings
1036
1037
# Cleanup 3.5.3
1038
	--disable_warnings 
1039
	drop database if exists priv_db;
1040
	drop user test_yesprivs@localhost;
1041
	drop user test_noprivs@localhost;
1042
	drop user test_noprivs;
1043
	--enable_warnings
1044
1045
####################################
1046
############ Section 3.5.4 #########
1047
# Drop Trigger Checkes:            #
1048
####################################
1049
let $message= Testcase 3.5.4:;
1050
--source include/show_msg.inc
1051
1052
	connection default;
1053
	use test;
1054
1055
#Section 3.5.4.1
1056
# Testcase: Ensure that the DROP TRIGGER statement cleanly drops its target trigger.
1057
let $message= Testcase 3.5.4.1:;
1058
--source include/show_msg.inc
1059
1060
	connection con_super;
1061
	create database db_drop;
1062
	Use db_drop;
1063
	eval create table t1 (f1 char(30)) engine=$engine_type;
1064
	grant INSERT, SELECT on db_drop.t1 to test_general;
1065
	Use db_drop;
1066
	Create trigger trg1 BEFORE INSERT on t1 
1067
		for each row set new.f1='Trigger 3.5.4.1';
1068
	connection con_general;
1069
	Use db_drop;
1070
	Insert into t1 values ('Insert error 3.5.4.1');
1071
	Select * from t1;
1072
	connection con_super;
1073
	drop trigger trg1;
1074
	select trigger_schema, trigger_name, event_object_table
1075
		from information_schema.triggers;
1076
	connection con_general;
1077
	Insert into t1 values ('Insert no trigger 3.5.4.1');
1078
	Select * from t1;
1079
1080
#Cleanup
1081
	--disable_warnings 
1082
	connection con_super;
1083
        --disable_warnings
1084
	--error 0,1360
1085
	drop trigger trg1; 
1086
	drop database if exists db_drop;
1087
	revoke ALL PRIVILEGES, GRANT OPTION FROM 'test_general'@'localhost';
1088
	--enable_warnings
1089
1090
#Section 3.5.4.2
1091
# Test case: Ensure that DROP TRIGGER <trigger name> fails, with an appropriate error 
1092
#            message, if the trigger name does not exist.
1093
let $message= Testcase 3.5.4.2:;
1094
--source include/show_msg.inc
1095
1096
	connection con_super;
1097
	create database db_drop2;
1098
	Use db_drop2;
1099
	--disable_warnings
1100
	drop table if exists t1_432 ;
1101
	--enable_warnings
1102
	eval create table t1_432 (f1 char (30)) engine=$engine_type;
1103
	--error 1360
1104
	Drop trigger tr_does_not_exit;
1105
#cleanup 
1106
	--disable_warnings
1107
	drop table if exists t1_432 ;
1108
	drop database  if exists db_drop2;
1109
	--enable_warnings
1110
1111
#Section 3.5.4.3
1112
# Test case: Ensure that DROP TRIGGER <trigger name> fails, with an appropriate 
1113
#            error message, if <trigger name> is not a qualified name.
1114
let $message= Testcase 3.5.4.3:;
1115
--source include/show_msg.inc
1116
1117
	connection con_super;
1118
	create database db_drop3;
1119
	Use db_drop3;
1120
	--disable_warnings
1121
	drop table if exists t1_433 ;
1122
	drop table if exists t1_433a ;
1123
	--enable_warnings
1124
	eval create table t1_433 (f1 char (30)) engine=$engine_type;
1125
	eval create table t1_433a (f1a char (5)) engine=$engine_type;
1126
1127
	CREATE TRIGGER trg3 BEFORE INSERT on t1_433 for each row 
1128
		set new.f1 = 'Trigger 3.5.4.3';
1129
1130
# Using table 
1131
	--error 1064
1132
	Drop trigger t1.433.trg3;
1133
1134
# Using database.table 
1135
	--error 1064
1136
	Drop trigger db_drop3.t1.433.trg3;
1137
1138
# wrong database
1139
	--error 1360
1140
	Drop trigger mysql.trg3;
1141
1142
# database does not exist
1143
	--error 1360
1144
	Drop trigger tbx.trg3;
1145
1146
#cleanup 
1147
	Drop trigger db_drop3.trg3;
1148
	drop table if exists t1_433;
1149
	drop table if exists t1_433a;
1150
	drop database if exists db_drop3;
1151
1152
#Section 3.5.4.4
1153
# Test case: Ensure that when a database is dropped, all triggers created within 
1154
#            that database are also cleanly dropped.
1155
let $message= Testcase 3.5.4.4:;
1156
--source include/show_msg.inc
1157
1158
	connection con_super;
1159
	create database db_drop4;
1160
	Use db_drop4;
1161
	eval create table t1 (f1 char(30)) engine=$engine_type;
1162
	grant INSERT, SELECT on db_drop4.t1 to test_general;
1163
	Create trigger trg4 BEFORE INSERT on t1 
1164
		for each row set new.f1='Trigger 3.5.4.4';
1165
	connection con_general;
1166
	Use db_drop4;
1167
	Insert into t1 values ('Insert 3.5.4.4');
1168
	Select * from t1;
1169
	connection con_super;
1170
	Drop database db_drop4;
1171
	Show databases;
1172
	select trigger_schema, trigger_name, event_object_table
1173
		from information_schema.triggers
1174
		where information_schema.triggers.trigger_name='trg4';
1175
	create database db_drop4;
1176
	Use db_drop4;
1177
	eval create table t1 (f1 char(30)) engine=$engine_type;
1178
	grant INSERT, SELECT on db_drop4.t1 to test_general;
1179
	connection con_general;
1180
	Insert into t1 values ('2nd Insert 3.5.4.4');
1181
	Select * from t1;
1182
1183
#Cleanup
1184
	connection con_super;
1185
        --disable_warnings
1186
	--error 1360
1187
	drop trigger trg4; 
1188
	drop database if exists db_drop4;
1189
	--enable_warnings
1190
	revoke ALL PRIVILEGES, GRANT OPTION FROM 'test_general'@'localhost';
1191
1192
#Section 3.5.4.5
1193
# Test case: Ensure that when a table is dropped, all triggers for which it is the 
1194
#            subject table are also cleanly dropped.
1195
let $message= Testcase 3.5.4.5:;
1196
--source include/show_msg.inc
1197
1198
	connection con_super;
1199
	create database db_drop5;
1200
	Use db_drop5;
1201
	eval create table t1 (f1 char(50)) engine=$engine_type;
1202
	grant INSERT, SELECT on t1 to test_general;
1203
	Create trigger trg5 BEFORE INSERT on t1 
1204
		for each row set new.f1='Trigger 3.5.4.5';
1205
	connection con_general;
1206
	Use db_drop5;
1207
	Insert into t1 values ('Insert 3.5.4.5');
1208
	Select * from t1;
1209
	connection con_super;
1210
	Drop table t1;
1211
	Show tables;
1212
	select trigger_schema, trigger_name, event_object_table
1213
		from information_schema.triggers
1214
		where information_schema.triggers.trigger_name='trg5';
1215
	eval create table t1 (f1 char(50)) engine=$engine_type;
1216
	grant INSERT, SELECT on t1 to test_general;
1217
	connection con_general;
1218
	Insert into t1 values ('2nd Insert 3.5.4.5');
1219
	Select * from t1;
1220
1221
#Cleanup
1222
	connection con_super;
1223
        --disable_warnings
1224
	--error 1360
1225
	drop trigger trg5; 
1226
	drop database if exists db_drop5;
1227
	--enable_warnings
1228
	revoke ALL PRIVILEGES, GRANT OPTION FROM 'test_general'@'localhost';
1229
1230
1231
##################################
1232
######### Section 3.5.5 ##########
1233
# Checks on the Subject Table    #
1234
##################################
1235
1236
let $message= Testcase 3.5.5:;
1237
--source include/show_msg.inc
1238
1239
	connection default;
1240
	use test;
1241
1242
#Section 3.5.5.1
1243
# Test case: Ensure that, if CREATE TRIGGER is executed with a non-existent 
1244
#            subject table, the statement fails with an appropriate error message.
1245
let $message= Testcase 3.5.5.1:;
1246
--source include/show_msg.inc
1247
1248
	--error 1146
1249
	Create trigger trg1 before INSERT on t100 for each row set new.f2=1000;
1250
1251
1252
#Section 3.5.5.2
1253
# Test case: Ensure that, if CREATE TRIGGER is executed with a temporary table 
1254
#           as the subject table, the statement fails with an appropriate error message.
1255
let $message= Testcase 3.5.5.2:;
1256
--source include/show_msg.inc
1257
	
1258
	Create temporary table t1_temp (f1 bigint signed, f2 bigint unsigned);
1259
	
1260
	--error 1361
1261
	Create trigger trg2 before INSERT 
1262
		on t1_temp for each row set new.f2=9999;
1263
1264
#Cleanup
1265
	--disable_warnings 
1266
	drop table t1_temp;
1267
	--enable_warnings
1268
1269
1270
#Section 3.5.5.3
1271
# Test case: Ensure that, if CREATE TRIGGER is executed with a view as the subject 
1272
#            table, the statement fails with an appropriate error message.
1273
let $message= Testcase 3.5.5.3:;
1274
--source include/show_msg.inc
1275
1276
	Create view vw3 as select f118 from tb3;
1277
	
1278
# OBN Not sure why the server is returning error 1347
1279
	--error 1347
1280
	Create trigger trg3 before INSERT 
1281
		on vw3 for each row set new.f118='s';
1282
1283
#Cleanup
1284
	--disable_warnings 
1285
	drop view vw3;
1286
	--enable_warnings
1287
1288
1289
#Section 3.5.5.4
1290
# Test case: Ensure that, if CREATE TRIGGER is executed with a table that resides 
1291
#            in a different database than in which the trigger will reside, the 
1292
#            statement fails with an appropriate error message; that is, ensure that
1293
#            the trigger and its subject table must reside in the same database.
1294
let $message= Testcase 3.5.5.4:;
1295
--source include/show_msg.inc
1296
1297
	connection con_super;
1298
	create database dbtest_one;
1299
	create database dbtest_two;
1300
	use dbtest_two;
1301
	create table t2 (f1 char(15));
1302
	use dbtest_one;
1303
	--error 1435
1304
	create trigger trg4 before INSERT
1305
		on dbtest_two.t2 for each row set new.f1='trig 3.5.5.4';
1306
	grant INSERT, SELECT on dbtest_two.t2 to test_general;
1307
	grant SELECT on dbtest_one.* to test_general;
1308
	connection con_general;
1309
	use dbtest_two;
1310
	Insert into t2 values ('1st Insert 3.5.5.4');
1311
	Select * from t2;
1312
	use dbtest_one;
1313
	Insert into dbtest_two.t2 values ('2nd Insert 3.5.5.4');
1314
	Select * from dbtest_two.t2;
1315
1316
#Cleanup
1317
	connection con_super;
1318
	--disable_warnings 
1319
	revoke ALL PRIVILEGES, GRANT OPTION FROM 'test_general'@'localhost';
1320
	DROP DATABASE if exists dbtest_one;
1321
	drop database if EXISTS dbtest_two;
1322
	--enable_warnings
1323
1324
#####################################
1325
########### Section 3.5.6 ###########
1326
# Check on the Trigger Action Time  #
1327
#####################################
1328
1329
let $message= Testcase 3.5.6:;
1330
--source include/show_msg.inc
1331
1332
	connection default;
1333
	use test;
1334
1335
#Section 3.5.6.1
1336
# Test case: Ensure that a trigger definition can specify a trigger action time of BEFORE. 
1337
# See section 3.5.1.1
1338
let $message= Testcase 3.5.6.1 (see Testcase 3.5.1.1);
1339
--source include/show_msg.inc
1340
1341
#Section 3.5.6.2
1342
# Test case: Ensure that a trigger definition can specify a trigger action time of AFTER.
1343
# See section 3.5.1.1
1344
let $message= Testcase 3.5.6.2 (see Testcase 3.5.1.1);
1345
--source include/show_msg.inc
1346
1347
#Section 3.5.6.3
1348
# Test case: Ensure that a trigger definition that specifies a trigger action 
1349
#            time that is not either BEFORE or AFTER fails, with an appropriate 
1350
#            error message, at CREATE TRIGGER time.
1351
let $message= Testcase 3.5.6.3:;
1352
--source include/show_msg.inc
1353
1354
	--error 1064
1355
	Create trigger trg3_1 DURING UPDATE on tb3 for each row set new.f132=25;
1356
	--error 1064
1357
	Create trigger trg3_2 TIME INSERT on tb3 for each row set new.f132=15;
1358
1359
#Cleanup 
1360
# OBN - Although none of the above should have been created we should do a cleanup
1361
#       since if they have been created, not dropping them will affect following
1362
#       tests.
1363
	--disable_warnings
1364
	--error 0, 1360
1365
	drop trigger tb3.trg3_1;
1366
	--error 0, 1360
1367
	drop trigger tb3.trg3_2;
1368
	--enable_warnings
1369
1370
#Section 3.5.6.4
1371
# Test case: Ensure that a trigger defined with a trigger action time of BEFORE 
1372
#            always executes its triggered action immediately before the trigger event. 
1373
# See section 3.5.1.1
1374
let $message= Testcase 3.5.6.4 (see Testcase 3.5.1.1);
1375
--source include/show_msg.inc
1376
1377
#Section 3.5.6.5
1378
# Test case: Ensure that a trigger defined with a trigger action time of AFTER 
1379
#            always executes its triggered action immediately after the trigger event.
1380
let $message= Testcase 3.5.6.5 (see Testcase 3.5.1.1);
1381
--source include/show_msg.inc
1382
1383
#############################
1384
####### Section 3.5.7 #######
1385
# Check on Trigger Event    #
1386
#############################
1387
1388
#Section 3.5.7.1
1389
#Test case: Ensure that a trigger definition can specify a trigger event of INSERT.
1390
let $message= Testcase 3.5.7.1 (see Testcase 3.5.1.1);
1391
--source include/show_msg.inc
1392
	
1393
#Section 3.5.7.2
1394
# Test case: Ensure that a trigger definition can specify a trigger event of UPDATE.
1395
let $message= Testcase 3.5.7.2 (see Testcase 3.5.1.1);
1396
--source include/show_msg.inc
1397
1398
#Section 3.5.7.3
1399
# Test case: Ensure that a trigger definition can specify a trigger event of DELETE.
1400
let $message= Testcase 3.5.7.3 (see Testcase 3.5.1.1);
1401
--source include/show_msg.inc
1402
1403
#Section 3.5.7.4
1404
# Test case: Ensure that a trigger definition that specifies a trigger event that 
1405
#            is not either INSERT, UPDATE or DELETE fails, with an appropriate error 
1406
#            message, at CREATE TRIGGER time.
1407
let $message= Testcase 3.5.7.4:;
1408
--source include/show_msg.inc
1409
1410
	--error 1064
1411
	Create trigger trg4_1 BEFORE SELECT on tb3 for each row set new.f132=5;
1412
	--error 1064
1413
	Create trigger trg4_2 AFTER VALUE on tb3 for each row set new.f132=1;
1414
1415
#Cleanup 
1416
# OBN - Although none of the above should have been created we should do a cleanup
1417
#       since if they have been created, not dropping them will affect following
1418
#       tests.
1419
	--disable_warnings
1420
	--error 0, 1360
1421
	drop trigger tb3.trg4_1;
1422
	--error 0, 1360
1423
	drop trigger tb3.trg4_2;
1424
	--enable_warnings
1425
1426
#Section 3.5.7.5 / 3.5.7.6 
1427
# Test case: Ensure that it is not possible to create multiple BEFORE INSERT triggers 
1428
#            on the same table, even if the triggers have different names / different
1429
#            triggered actions.
1430
let $message= Testcase 3.5.7.5 / 3.5.7.6:;
1431
--source include/show_msg.inc
1432
1433
	Create trigger trg5_1 BEFORE INSERT 
1434
		on tb3 for each row set new.f122='Trigger1 3.5.7.5/6';
1435
1436
	--error 1359 
1437
	Create trigger trg5_2 BEFORE INSERT 
1438
		on tb3 for each row set new.f122='Trigger2 3.5.7.5';
1439
1440
	Insert into tb3 (f121,f122) values ('Test 3.5.7.5/6','Insert 3.5.7.5');
1441
	Select f121,f122 from tb3 where f121='Test 3.5.7.5/6';
1442
	update tb3 set f122='Update 3.5.7.6' where f121= 'Test 3.5.7.5/6';
1443
	Select f121,f122 from tb3 where f121='Test 3.5.7.5/6';
1444
1445
#Cleanup
1446
	--disable_warnings 
1447
	drop trigger trg5_1;
1448
	--error 0, 1360
1449
	drop trigger trg5_2;
1450
	delete from tb3 where f121='Test 3.5.7.5/6';
1451
	--enable_warnings
1452
1453
1454
#Section 3.5.7.7 / 3.5.7.8 
1455
# Test case: Ensure that it is not possible to create multiple AFTER INSERT triggers 
1456
#            on the same table, even if the triggers have different names / different
1457
#            triggered actions.
1458
let $message= Testcase 3.5.7.7 / 3.5.7.8:;
1459
--source include/show_msg.inc
1460
	
1461
	set @test_var='Before trig 3.5.7.7';
1462
	Create trigger trg6_1 AFTER INSERT 
1463
		on tb3 for each row set @test_var='Trigger1 3.5.7.7/8';
1464
1465
	--error 1359 
1466
	Create trigger trg6_2 AFTER INSERT 
1467
		on tb3 for each row set @test_var='Trigger2 3.5.7.7';
1468
1469
	select @test_var;
1470
	Insert into tb3 (f121,f122) values ('Test 3.5.7.7/8','Insert 3.5.7.7');
1471
	Select f121,f122 from tb3 where f121='Test 3.5.7.7/8';
1472
	select @test_var;
1473
	update tb3 set f122='Update 3.5.7.8' where f121= 'Test 3.5.7.7/8';
1474
	Select f121,f122 from tb3 where f121='Test 3.5.7.7/8';
1475
	select @test_var;
1476
1477
#Cleanup
1478
	--disable_warnings 
1479
	drop trigger trg6_1;
1480
	--error 0, 1360
1481
	drop trigger trg6_2;
1482
	delete from tb3 where f121='Test 3.5.7.7/8';	
1483
	--enable_warnings
1484
1485
1486
#Section 3.5.7.9 / 3.5.7.10
1487
# Test case: Ensure that it is not possible to create multiple BEFORE UPDATE triggers 
1488
#            on the same table, even if the triggers have different names / different 
1489
#            triggered actions.
1490
let $message= Testcase 3.5.7.9/10:;
1491
--source include/show_msg.inc
1492
1493
	Create trigger trg7_1 BEFORE UPDATE 
1494
		on tb3 for each row set new.f122='Trigger1 3.5.7.9/10';
1495
1496
	--error 1359 
1497
	Create trigger trg7_2 BEFORE UPDATE 
1498
		on tb3 for each row set new.f122='Trigger2 3.5.7.9';
1499
1500
	Insert into tb3 (f121,f122) values ('Test 3.5.7.9/10','Insert 3.5.7.9');
1501
	Select f121,f122 from tb3 where f121='Test 3.5.7.9/10';
1502
	update tb3 set f122='update 3.5.7.10' where f121='Test 3.5.7.9/10';
1503
	Select f121,f122 from tb3 where f121='Test 3.5.7.9/10';
1504
1505
#Cleanup
1506
	--disable_warnings 
1507
	drop trigger trg7_1;
1508
	--error 0, 1360
1509
	drop trigger trg7_2;
1510
	delete from tb3 where f121='Test 3.5.7.9/10';	
1511
1512
#Section 3.5.7.11 / 3.5.7.12
1513
# Test case: Ensure that it is not possible to create multiple AFTER UPDATE triggers 
1514
#            on the same table, even if the triggers have different names / different
1515
#            triggered actions. 
1516
let $message= Testcase 3.5.7.11/12:;
1517
--source include/show_msg.inc
1518
1519
	set @test_var='Before trig 3.5.7.11';
1520
	Create trigger trg8_1 AFTER UPDATE 
1521
		on tb3 for each row set @test_var='Trigger 3.5.7.11/12';
1522
1523
	--error 1359 
1524
	Create trigger trg8_2 AFTER UPDATE 
1525
		on tb3 for each row set @test_var='Trigger2 3.5.7.11';
1526
1527
1528
	select @test_var;
1529
	Insert into tb3 (f121,f122) values ('Test 3.5.7.11/12','Insert 3.5.7.11/12');
1530
	select @test_var;
1531
	Select f121,f122 from tb3 where f121='Test 3.5.7.11/12';
1532
	update tb3 set f122='update 3.5.7.12' where f121='Test 3.5.7.11/12';
1533
	Select f121,f122 from tb3 where f121='Test 3.5.7.11/12';
1534
	select @test_var;
1535
	delete from tb3 where f121='Test 3.5.7.11/12';
1536
1537
#Cleanup
1538
	--disable_warnings 
1539
	drop trigger trg8_1;
1540
	--error 0, 1360
1541
	drop trigger trg8_2;
1542
	delete from tb3 where f121='Test 3.5.7.11/12';	
1543
1544
#Section 3.5.7.13 / 3.5.7.14
1545
# Test case: Ensure that it is not possible to create multiple BEFORE DELETE triggers 
1546
#            on the same table, even if the triggers have different names / different
1547
#            triggered actions.
1548
let $message= Testcase 3.5.7.13/14:;
1549
--source include/show_msg.inc
1550
1551
	set @test_var=1;
1552
	Create trigger trg9_1 BEFORE DELETE 
1553
		on tb3 for each row set @test_var=@test_var+1;
1554
1555
	--error 1359 
1556
	Create trigger trg9_2 BEFORE DELETE 
1557
		on tb3 for each row set @test_var=@test_var+10;
1558
1559
	select @test_var;
1560
	Insert into tb3 (f121,f122) values ('Test 3.5.7.13/14','Insert 3.5.7.13');
1561
	Select f121,f122 from tb3 where f121='Test 3.5.7.13/14';
1562
	select @test_var;
1563
	delete from tb3 where f121='Test 3.5.7.13/14';	
1564
	Select f121,f122 from tb3 where f121='Test 3.5.7.13/14';
1565
	select @test_var;
1566
	delete from tb3 where f121='Test 3.5.7.13/14';	
1567
	select @test_var;
1568
1569
#Cleanup
1570
	--disable_warnings 
1571
	drop trigger trg9_1;
1572
	--error 0, 1360
1573
	drop trigger trg9_2;
1574
	delete from tb3 where f121='Test 3.5.7.13/14';	
1575
1576
#Section 3.5.7.15 / 3.5.7.16
1577
# Test case: Ensure that it is not possible to create multiple AFTER DELETE triggers 
1578
#            on the same table, even if the triggers have different names / different 
1579
#            triggered actions.
1580
let $message= Testcase 3.5.7.15/16:;
1581
--source include/show_msg.inc
1582
	
1583
	set @test_var=1;
1584
	Create trigger trg_3_406010_1 AFTER DELETE 
1585
		on tb3 for each row set @test_var=@test_var+5;
1586
1587
	--error 1359 
1588
	Create trigger trg_3_406010_2 AFTER DELETE 
1589
		on tb3 for each row set @test_var=@test_var+50;
1590
1591
	--error 1359 
1592
	Create trigger trg_3_406010_1 AFTER INSERT 
1593
		on tb3 for each row set @test_var=@test_var+1;
1594
1595
	select @test_var;
1596
	Insert into tb3 (f121,f122) values ('Test 3.5.7.15/16','Insert 3.5.7.15/16');
1597
	Select f121,f122 from tb3 where f121='Test 3.5.7.15/16';
1598
	select @test_var;
1599
	delete from tb3 where f121='Test 3.5.7.15/16';	
1600
	Select f121,f122 from tb3 where f121='Test 3.5.7.15/16';
1601
	select @test_var;
1602
	delete from tb3 where f121='Test 3.5.7.15/16';	
1603
	select @test_var;
1604
1605
#Cleanup
1606
	--disable_warnings 
1607
	drop trigger trg_3_406010_1;
1608
	--error 0, 1360
1609
	drop trigger trg_3_406010_2;
1610
	delete from tb3 where f121='Test 3.5.7.15/16';	
1611
	--enable_warnings
1612
1613
1614
#Section 3.5.7.17
1615
# Test case: Ensure that it is possible to have a BEFORE INSERT, an AFTER INSERT, 
1616
#            a BEFORE UPDATE, an AFTER UPDATE, a BEFORE DELETE, and an AFTER DELETE 
1617
#            trigger on the same table; that is, ensure that every persistent base 
1618
#            table may be the subject table for exactly six triggers
1619
let $message= Testcase 3.5.7.17 (see Testcase 3.5.1.1);
1620
--source include/show_msg.inc
1621
1622
1623
#################################
1624
####### Section 3.5.8 ###########
1625
# Checks on Triggered Actions   #
1626
#################################
1627
1628
#Section 3.5.8.1
1629
# Testcase: Ensure that the triggered action of every trigger always executes 
1630
#           correctly and the results in all expected changes made to the database
1631
let $message= Testcase 3.5.8.1: (implied in previous tests);
1632
--source include/show_msg.inc
1633
# OBN - FIXME - Missing 3.5.8.1 need to add
1634
1635
#Section 3.5.8.2
1636
# Testcase: Ensure that the triggered actions of every trigger never results 
1637
#           in an unexpected change made to the database.
1638
let $message= Testcase 3.5.8.2: (implied in previous tests);
1639
--source include/show_msg.inc
1640
1641
1642
#Section 3.5.8.3 / 3.5.8.4
1643
#Test case: Ensure that the triggered action can any valid SQL statement / set 
1644
#           of valid SQL statements, provided the statements are written within
1645
#           a BEGIN/END compound statement construct
1646
# OBN - At this point the tests focuses on the the INSERT/UPDATE/DELETE SQL statements
1647
#       as there are the most likely to be used in triggers
1648
let $message= Testcase 3.5.8.3/4:;
1649
--source include/show_msg.inc
1650
1651
# creating test tables to perform the trigger SQL on
1652
	connection con_super;
1653
	create database db_test;
1654
	grant SELECT, INSERT, UPDATE, DELETE on db_test.* to test_general;
1655
	grant LOCK TABLES on db_test.* to test_general;
1656
	Use db_test;
1657
	eval create table t1_i ( 
1658
		i120 char ascii not null DEFAULT b'101',
1659
		i136 smallint zerofill not null DEFAULT 999,
1660
		i144 int zerofill not null DEFAULT 99999,
1661
		i163 decimal (63,30)) engine=$engine_type;
1662
	eval create table t1_u ( 
1663
		u120 char ascii not null DEFAULT b'101',
1664
		u136 smallint zerofill not null DEFAULT 999,
1665
		u144 int zerofill not null DEFAULT 99999,
1666
		u163 decimal (63,30)) engine=$engine_type;
1667
	eval create table t1_d ( 
1668
		d120 char ascii not null DEFAULT b'101',
1669
		d136 smallint zerofill not null DEFAULT 999,
1670
		d144 int zerofill not null DEFAULT 99999,
1671
		d163 decimal (63,30)) engine=$engine_type;
1672
	Insert into t1_u values ('a',111,99999,999.99);
1673
	Insert into t1_u values ('b',222,99999,999.99);
1674
	Insert into t1_u values ('c',333,99999,999.99);
1675
	Insert into t1_u values ('d',222,99999,999.99);
1676
	Insert into t1_u values ('e',222,99999,999.99);
1677
	Insert into t1_u values ('f',333,99999,999.99);
1678
	Insert into t1_d values ('a',111,99999,999.99);
1679
	Insert into t1_d values ('b',222,99999,999.99);
1680
	Insert into t1_d values ('c',333,99999,999.99);
1681
	Insert into t1_d values ('d',444,99999,999.99);
1682
	Insert into t1_d values ('e',222,99999,999.99);
1683
	Insert into t1_d values ('f',222,99999,999.99);
1684
1685
let $message= 3.5.8.4 - multiple SQL;
1686
--source include/show_msg.inc
1687
# Trigger definition - multiple SQL
1688
	use test;
1689
	delimiter //;
1690
	Create trigger trg1 AFTER INSERT on tb3 for each row
1691
	BEGIN
1692
		insert into db_test.t1_i 
1693
			values (new.f120, new.f136, new.f144, new.f163);
1694
		update db_test.t1_u 
1695
			set u144=new.f144, u163=new.f163
1696
			where u136=new.f136; 
1697
		delete from db_test.t1_d where d136= new.f136;
1698
		select sum(db_test.t1_u.u163) into @test_var from db_test.t1_u 
1699
			where u136= new.f136; 
1700
	END// 
1701
	delimiter ;//
1702
1703
# Test trigger execution - multiple SQL
1704
	connection con_general;
1705
	Use test;
1706
	set @test_var=0;
1707
	Insert into tb3 (f120, f122, f136, f144, f163) 
1708
		values ('1', 'Test 3.5.8.4', 222, 23456, 1.05);
1709
	Select f120, f122, f136, f144, f163 from tb3 where f122= 'Test 3.5.8.4';
1710
	select * from db_test.t1_i;
1711
	select * from db_test.t1_u;
1712
	select * from db_test.t1_d;
1713
	select @test_var;
1714
1715
1716
let $message= 3.5.8.4 - single SQL - insert;
1717
--source include/show_msg.inc
1718
# Trigger definition - single SQL Insert
1719
	connection con_super;
1720
	Create trigger trg2 BEFORE UPDATE on tb3 for each row
1721
		insert into db_test.t1_i 
1722
			values (new.f120, new.f136, new.f144, new.f163);
1723
1724
# Trigger exeution - single SQL Insert
1725
	connection con_general;
1726
	update tb3 set f120='I', f122='Test 3.5.8.4-Single Insert'
1727
		 where f122='Test 3.5.8.4';
1728
	Select f120, f122, f136, f144, f163 from tb3 where f122 like 'Test 3.5.8.4%';
1729
	select * from db_test.t1_i;
1730
1731
1732
let $message= 3.5.8.4 - single SQL - update;
1733
--source include/show_msg.inc
1734
# Trigger definition - single SQL update
1735
	connection con_super;
1736
	drop trigger trg2;
1737
	Create trigger trg3 BEFORE UPDATE on tb3 for each row
1738
		update db_test.t1_u 
1739
			set u120=new.f120
1740
			where u136=new.f136; 
1741
1742
# Trigger exeution - single SQL  - update;
1743
	connection con_general;
1744
	update tb3 set f120='U', f122='Test 3.5.8.4-Single Update'
1745
		 where f122='Test 3.5.8.4-Single Insert';
1746
	Select f120, f122, f136, f144, f163 from tb3 where f122 like 'Test 3.5.8.4%';
1747
	select * from db_test.t1_u;
1748
1749
1750
let $message= 3.5.8.3/4 - single SQL - delete;
1751
--source include/show_msg.inc
1752
# Trigger definition - single SQL delete
1753
	connection con_super;
1754
	drop trigger trg3;
1755
	Create trigger trg4 AFTER UPDATE on tb3 for each row
1756
		delete from db_test.t1_d where d136= new.f136;
1757
1758
# Trigger exeution - single SQL delete
1759
	connection con_general;
1760
#lock tables tb3 write, db_test.t1_i write, db_test.t1_u write, db_test.t1_d write;
1761
	update tb3 set f120='D', f136=444, 
1762
		f122='Test 3.5.8.4-Single Delete'
1763
		 where f122='Test 3.5.8.4-Single Update';
1764
#unlock tables;
1765
	Select f120, f122, f136, f144, f163 from tb3 where f122 like 'Test 3.5.8.4%';
1766
	select * from db_test.t1_d;
1767
1768
1769
let $message= 3.5.8.3/4 - single SQL - select;
1770
--source include/show_msg.inc
1771
# Trigger definition - single SQL select
1772
	connection con_super;
1773
	drop trigger trg4;
1774
	Create trigger trg5 AFTER UPDATE on tb3 for each row
1775
		select sum(db_test.t1_u.u163) into @test_var from db_test.t1_u 
1776
			where u136= new.f136; 
1777
1778
# Trigger exeution - single SQL select
1779
	connection con_general;
1780
	set @test_var=0;
1781
	update tb3 set f120='S', f136=111, 
1782
		f122='Test 3.5.8.4-Single Select'
1783
		 where f122='Test 3.5.8.4-Single Delete';
1784
	Select f120, f122, f136, f144, f163 from tb3 where f122 like 'Test 3.5.8.4%';
1785
	select @test_var;
1786
1787
#Cleanup
1788
	connection default;
1789
	--disable_warnings 
1790
	drop trigger trg1;
1791
	drop trigger trg5;
1792
	drop database if exists db_test;
1793
	delete from tb3 where f122 like 'Test 3.5.8.4%';
1794
	revoke ALL PRIVILEGES, GRANT OPTION FROM 'test_general'@'localhost';
1795
	--enable_warnings
1796
1797
1798
#Section 3.5.8.5 (IF)
1799
# Test case: Ensure that the stored procedure-specific flow control statement like IF 
1800
#            works correctly when it is a part of the triggered action portion of a 
1801
#            trigger definition.
1802
let $message= Testcase 3.5.8.5 (IF):;
1803
--source include/show_msg.inc
1804
1805
	delimiter //;
1806
	create trigger trg2 before insert on tb3 for each row
1807
	BEGIN
1808
		IF new.f120='1' then
1809
			set @test_var='one', new.f120='2';
1810
		ELSEIF new.f120='2' then
1811
			set @test_var='two', new.f120='3';
1812
		ELSEIF new.f120='3' then
1813
			set @test_var='three', new.f120='4';
1814
		END IF;
1815
1816
		IF (new.f120='4') and (new.f136=10) then
1817
			set @test_var2='2nd if', new.f120='d';
1818
		ELSE 
1819
			set @test_var2='2nd else', new.f120='D';
1820
		END IF;
1821
	END//
1822
	delimiter ;//
1823
1824
	set @test_var='Empty', @test_var2=0;
1825
	Insert into tb3 (f120, f122, f136) values ('1', 'Test 3.5.8.5-if', 101);
1826
	select f120, f122, f136, @test_var, @test_var2 
1827
		from tb3 where f122 = 'Test 3.5.8.5-if';
1828
	Insert into tb3 (f120, f122, f136) values ('2', 'Test 3.5.8.5-if', 102);
1829
	select f120, f122, f136, @test_var, @test_var2 
1830
		from tb3 where f122 = 'Test 3.5.8.5-if';
1831
	Insert into tb3 (f120, f122, f136) values ('3', 'Test 3.5.8.5-if', 10);
1832
	select f120, f122, f136, @test_var, @test_var2 
1833
		from tb3 where f122 = 'Test 3.5.8.5-if';
1834
	Insert into tb3 (f120, f122, f136) values ('3', 'Test 3.5.8.5-if', 103);
1835
	select f120, f122, f136, @test_var, @test_var2 
1836
		from tb3 where f122 = 'Test 3.5.8.5-if';
1837
1838
	delimiter //;
1839
	--error 1064
1840
	create trigger trg3 before update on tb3 for each row
1841
	BEGIN
1842
		ELSEIF new.f120='2' then
1843
		END IF;
1844
	END//
1845
	--error 0, 1360
1846
	drop trigger trg3//
1847
1848
	--error 1064
1849
	create trigger trg4 before update on tb3 for each row
1850
	BEGIN
1851
		IF (new.f120='4') and (new.f136=10) then
1852
			set @test_var2='2nd if', new.f120='d';
1853
		ELSE 
1854
			set @test_var2='2nd else', new.f120='D';
1855
	END//
1856
	delimiter ;//
1857
	--error 0, 1360
1858
	drop trigger trg4;
1859
1860
#Cleanup
1861
	--disable_warnings 
1862
	drop trigger trg2;
1863
	delete from tb3 where f121='Test 3.5.8.5-if';	
1864
	--enable_warnings
1865
1866
1867
#Section 3.5.8.5 (CASE)
1868
# Test case: Ensure that the stored procedure-specific flow control statement 
1869
#            like CASE works correctly when it is a part of the triggered action 
1870
#            portion of a trigger definition.
1871
let $message= Testcase 3.5.8.5-case:;
1872
--source include/show_msg.inc
1873
	
1874
	delimiter //;
1875
	create trigger trg3 before insert on tb3 for each row
1876
	BEGIN
1877
		SET new.f120=char(ascii(new.f120)-32);
1878
		CASE
1879
			when new.f136<100 then set new.f136=new.f136+120;
1880
			when new.f136<10 then set new.f144=777;
1881
			when new.f136>100 then set new.f120=new.f136-1;
1882
		END case;
1883
		CASE
1884
			when new.f136=200 then set @test_var=CONCAT(new.f120, '=');
1885
			ELSE set @test_var=concat(new.f120, '*');
1886
		END case;
1887
		CASE new.f144
1888
			when 1 then set @test_var=concat(@test_var, 'one');
1889
			when 2 then set @test_var=concat(@test_var, 'two');
1890
			when 3 then set @test_var=concat(@test_var, 'three');
1891
			when 4 then set @test_var=concat(@test_var, 'four');
1892
			when 5 then set @test_var=concat(@test_var, 'five');
1893
			when 6 then set @test_var=concat(@test_var, 'six');
1894
			when 7 then set @test_var=concat(@test_var, 'seven');
1895
			when 8 then set @test_var=concat(@test_var, 'eight');
1896
			when 9 then set @test_var=concat(@test_var, 'nine');
1897
			when 10 then set @test_var=concat(@test_var, 'ten');
1898
			when 11 then set @test_var=concat(@test_var, 'eleven');
1899
			when 12 then set @test_var=concat(@test_var, 'twelve');
1900
			when 13 then set @test_var=concat(@test_var, 'thirteen');
1901
			when 14 then set @test_var=concat(@test_var, 'fourteen');
1902
			when 15 then set @test_var=concat(@test_var, 'fifteen');
1903
			ELSE set @test_var=CONCAT(new.f120, '*', new.f144);
1904
		END case;
1905
	END//
1906
	delimiter ;//
1907
1908
	set @test_var='Empty';
1909
	Insert into tb3 (f120, f122, f136, f144) 
1910
		values ('a', 'Test 3.5.8.5-case', 5, 7);
1911
	select f120, f122, f136, f144, @test_var 
1912
		from tb3 where f122 = 'Test 3.5.8.5-case';
1913
	Insert into tb3 (f120, f122, f136, f144) 
1914
		values ('b', 'Test 3.5.8.5-case', 71,16);
1915
	select f120, f122, f136, f144, @test_var 
1916
		from tb3 where f122 = 'Test 3.5.8.5-case';
1917
	Insert into tb3 (f120, f122, f136, f144) 
1918
		values ('c', 'Test 3.5.8.5-case', 80,1);
1919
	select f120, f122, f136, f144, @test_var 
1920
		from tb3 where f122 = 'Test 3.5.8.5-case';
1921
	Insert into tb3 (f120, f122, f136) 
1922
		values ('d', 'Test 3.5.8.5-case', 152);
1923
	select f120, f122, f136, f144, @test_var 
1924
		from tb3 where f122 = 'Test 3.5.8.5-case';
1925
	Insert into tb3 (f120, f122, f136, f144) 
1926
		values ('e', 'Test 3.5.8.5-case', 200, 8);
1927
	select f120, f122, f136, f144, @test_var 
1928
		from tb3 where f122 = 'Test 3.5.8.5-case';
1929
	--error 0, 1339
1930
	Insert into tb3 (f120, f122, f136, f144) 
1931
		values ('f', 'Test 3.5.8.5-case', 100, 8);
1932
	select f120, f122, f136, f144, @test_var 
1933
		from tb3 where f122 = 'Test 3.5.8.5-case';
1934
1935
	delimiter //;
1936
	--error 1064
1937
	create trigger trg3a before update on tb3 for each row
1938
	BEGIN
1939
		CASE
1940
			when new.f136<100 then set new.f120='p';
1941
	END//
1942
	delimiter ;//
1943
1944
	--error 0, 1360
1945
	drop trigger trg3a;
1946
1947
#Cleanup
1948
	--disable_warnings 
1949
	drop trigger trg3;
1950
	delete from tb3 where f121='Test 3.5.8.5-case';	
1951
	--enable_warnings
1952
1953
#Section 3.5.8.5 (LOOP)
1954
# Test case: Ensure that the stored procedure-specific flow control
1955
#            statement like LOOP / LEAVE work correctly when they are
1956
#            part of the triggered action portion of a trigger definition.
1957
let $message= Testcase 3.5.8.5-loop/leave:;
1958
--source include/show_msg.inc
1959
		
1960
	delimiter //;
1961
	Create trigger trg4 after insert on tb3 for each row
1962
	BEGIN 
1963
		set @counter=0, @flag='Initial';
1964
		Label1: loop 
1965
			if new.f136<new.f144 then
1966
				set @counter='Nothing to loop';
1967
				leave Label1; 
1968
			else
1969
				set @counter=@counter+1;
1970
				if new.f136=new.f144+@counter then
1971
					set @counter=concat(@counter, ' loops');
1972
					leave Label1;
1973
				end if; 
1974
			end if; 
1975
			iterate label1; 
1976
			set @flag='Final';
1977
		END loop Label1; 
1978
	END//
1979
	delimiter ;//
1980
	Insert into tb3 (f122, f136, f144) 
1981
		values ('Test 3.5.8.5-loop', 2, 8);
1982
		select @counter, @flag;
1983
	Insert into tb3 (f122, f136, f144) 
1984
		values ('Test 3.5.8.5-loop', 11, 8);
1985
		select @counter, @flag;
1986
1987
1988
	delimiter //;
1989
1990
	--error 1064
1991
	Create trigger trg4_2 after update on tb3 for each row
1992
	BEGIN 
1993
		Label1: loop 
1994
			set @counter=@counter+1;
1995
		END;  
1996
	END//
1997
	delimiter ;//
1998
	--error 0, 1360
1999
	drop trigger trg4_2;
2000
2001
#Cleanup
2002
	--disable_warnings 
2003
	drop trigger trg4;
2004
	delete from tb3 where f122='Test 3.5.8.5-loop';
2005
	--enable_warnings
2006
2007
#Section 3.5.8.5 (REPEAT ITERATE)
2008
#Testcase: Ensure that the stored procedure-specific flow control statements 
2009
#          like REPEAT work correctly when they are part of the triggered action
2010
#          portion of a trigger definition.
2011
let $message= Testcase 3.5.8.5-repeat:;
2012
--source include/show_msg.inc
2013
			
2014
	delimiter //;
2015
	Create trigger trg6 after insert on tb3 for each row
2016
	BEGIN
2017
		rp_label: REPEAT 
2018
			SET @counter1 = @counter1 + 1; 
2019
			IF (@counter1 MOD 2 = 0) THEN ITERATE rp_label; 	
2020
			END IF;
2021
			SET @counter2 = @counter2 + 1; 
2022
		UNTIL @counter1> new.f136 END REPEAT rp_label;
2023
	END//
2024
	delimiter ;//
2025
2026
	set @counter1= 0, @counter2= 0;
2027
	Insert into tb3 (f122, f136) 
2028
		values ('Test 3.5.8.5-repeat', 13);
2029
	select @counter1, @counter2;
2030
2031
			
2032
	delimiter //;
2033
	--error 1064 
2034
	Create trigger trg6_2 after update on tb3 for each row
2035
	BEGIN
2036
		REPEAT 
2037
			SET @counter2 = @counter2 + 1; 
2038
	END//
2039
	delimiter ;//
2040
2041
#Cleanup			
2042
	--disable_warnings 
2043
	drop trigger trg6;
2044
	delete from tb3 where f122='Test 3.5.8.5-repeat';
2045
	--enable_warnings
2046
2047
2048
#Section 3.5.8.5 (WHILE)
2049
# Test case: Ensure that the stored procedure-specific flow control 
2050
#            statements WHILE, work correctly when they are part of 
2051
#            the triggered action portion of a trigger definition.
2052
let $message= Testcase 3.5.8.5-while:;
2053
--source include/show_msg.inc
2054
2055
	delimiter //;
2056
	Create trigger trg7 after insert on tb3 for each row
2057
		wl_label: WHILE @counter1 < new.f136 DO 
2058
			SET @counter1 = @counter1 + 1; 
2059
			IF (@counter1 MOD 2 = 0) THEN ITERATE wl_label; 	
2060
			END IF;
2061
			SET @counter2 = @counter2 + 1; 
2062
		END WHILE wl_label//
2063
	delimiter ;//
2064
2065
	set @counter1= 0, @counter2= 0;
2066
	Insert into tb3 (f122, f136) 
2067
		values ('Test 3.5.8.5-while', 7);
2068
	select @counter1, @counter2;
2069
	delimiter //;
2070
	--error 1064 
2071
	Create trigger trg7_2 after update on tb3 for each row
2072
	BEGIN
2073
		WHILE @counter1 < new.f136 
2074
			SET @counter1 = @counter1 + 1; 
2075
	END//
2076
	delimiter ;//
2077
2078
#Cleanup
2079
	--disable_warnings 
2080
	delete from tb3 where f122='Test 3.5.8.5-while';
2081
	drop trigger trg7;
2082
	--enable_warnings
2083
2084
#Section 3.5.8.6
2085
# Test case: Ensure that a trigger definition that includes a CALL to a stored 
2086
#            procedure fails, at CREATE TRIGGER time, with an appropriate error 
2087
#            message
2088
# OBN - requirement void since allowed 
2089
#       Fails due to Bug 9909 the bug allows the trigger to be created
2090
#       and fails in execution time
2091
let $message= Testcase 3.5.8.6: (requirement void);
2092
--source include/show_msg.inc
2093
2094
2095
#Section 3.5.8.7
2096
# Test case: Ensure that a trigger definition that includes a 
2097
#            transaction-delimiting statement (e.g. COMMIT, 
2098
#            ROLLBACK, START TRANSACTION) fails, at CREATE TRIGGER 
2099
#            time, with an appropriate error message.
2100
# OBN - Fails due to Bug ____
2101
let $message= Testcase 3.5.8.7: (Disabled as a result of bug _____);
2102
--source include/show_msg.inc
2103
2104
#	--error 1314
2105
#	Create trigger trg9_1 before update on tb3 for each row
2106
#	BEGIN
2107
#		Start transaction;
2108
#			Set new.f120='U';
2109
#		Commit;
2110
#	END;
2111
2112
#	--error 1314
2113
#	Create trigger trg9_2 before delete on tb3 for each row
2114
#	BEGIN
2115
#		Start transaction;
2116
#			Set @var2=old.f120;
2117
#		Rollback;
2118
#	END;
2119
2120
#################################
2121
####### Section 3.5.9 ###########
2122
#   Checks on old and new rows  #
2123
#################################
2124
2125
#Section 3.5.9.1
2126
#Test case: Ensure that every trigger executes its triggered action on each row 
2127
#           that meets the conditions stated in the trigger definition.
2128
#Section 3.5.9.2
2129
#Testcase: Ensure that a trigger never executes its triggered action on any row 
2130
#          that doesn't meet the conditions stated in the trigger definition.
2131
let $message= Testcase 3.5.9.1/2:;
2132
--source include/show_msg.inc
2133
2134
	Create trigger trg1 BEFORE UPDATE on tb3 for each row 
2135
		set new.f142 = 94087, @counter=@counter+1;
2136
--disable_query_log
2137
	select count(*) as TotalRows from tb3;
2138
	select count(*) as Affected from tb3 where f130<100;
2139
	select count(*) as NotAffected from tb3 where f130>=100;
2140
	select count(*) as NewValuew from tb3 where f142=94087;
2141
--enable_query_log
2142
	set @counter=0;
2143
	Update tb3 Set f142='1' where f130<100;
2144
	select count(*) as ExpectedChanged, @counter as TrigCounter 
2145
		from tb3 where f142=94087;
2146
	select count(*) as ExpectedNotChange from tb3 
2147
		where f130<100 and f142<>94087;
2148
	select count(*) as NonExpectedChanged from tb3 
2149
		where f130>=130 and f142=94087;
2150
2151
#Cleanup
2152
	--disable_warnings 
2153
	drop trigger trg1;
2154
	--enable_warnings
2155
2156
2157
#Section 3.5.9.3
2158
#Test case: Ensure that a reference to OLD.<column name> always correctly refers 
2159
#           to the values of the specified column of the subject table before a 
2160
#           data row is updated or deleted.
2161
let $message= Testcase 3.5.9.3:;
2162
--source include/show_msg.inc
2163
	
2164
	Create trigger trg2_a before update on tb3 for each row
2165
		set @tr_var_b4_118=old.f118, @tr_var_b4_121=old.f121,
2166
		    @tr_var_b4_122=old.f122, @tr_var_b4_136=old.f136,
2167
		    @tr_var_b4_163=old.f163;
2168
2169
	Create trigger trg2_b after update on tb3 for each row
2170
		set @tr_var_af_118=old.f118, @tr_var_af_121=old.f121,
2171
		    @tr_var_af_122=old.f122, @tr_var_af_136=old.f136,
2172
		    @tr_var_af_163=old.f163;
2173
2174
	Create trigger trg2_c before delete on tb3 for each row
2175
		set @tr_var_b4_118=old.f118, @tr_var_b4_121=old.f121,
2176
		    @tr_var_b4_122=old.f122, @tr_var_b4_136=old.f136,
2177
		    @tr_var_b4_163=old.f163;
2178
2179
	Create trigger trg2_d after delete on tb3 for each row
2180
		set @tr_var_af_118=old.f118, @tr_var_af_121=old.f121,
2181
		    @tr_var_af_122=old.f122, @tr_var_af_136=old.f136,
2182
		    @tr_var_af_163=old.f163;
2183
2184
2185
--disable_query_log
2186
	set @tr_var_b4_118=0, @tr_var_b4_121=0, @tr_var_b4_122=0, 
2187
		@tr_var_b4_136=0, @tr_var_b4_163=0;
2188
	set @tr_var_af_118=0, @tr_var_af_121=0, @tr_var_af_122=0, 
2189
		@tr_var_af_136=0, @tr_var_af_163=0;
2190
	select  @tr_var_b4_118, @tr_var_b4_121, @tr_var_b4_122, 
2191
		@tr_var_b4_136, @tr_var_b4_163;
2192
	select  @tr_var_af_118, @tr_var_af_121, @tr_var_af_122, 
2193
		@tr_var_af_136, @tr_var_af_163;
2194
--enable_query_log
2195
2196
	Insert into tb3 (f122, f136, f163) 
2197
		values ('Test 3.5.9.3', 7, 123.17);
2198
	Update tb3 Set f136=8 where f122='Test 3.5.9.3';
2199
2200
	select f118, f121, f122, f136, f163 from tb3 where f122='Test 3.5.9.3';
2201
	select  @tr_var_b4_118, @tr_var_b4_121, @tr_var_b4_122, 
2202
		@tr_var_b4_136, @tr_var_b4_163;
2203
	select  @tr_var_af_118, @tr_var_af_121, @tr_var_af_122, 
2204
		@tr_var_af_136, @tr_var_af_163;
2205
2206
--disable_query_log
2207
	set @tr_var_b4_118=0, @tr_var_b4_121=0, @tr_var_b4_122=0, 
2208
		@tr_var_b4_136=0, @tr_var_b4_163=0;
2209
	set @tr_var_af_118=0, @tr_var_af_121=0, @tr_var_af_122=0, 
2210
		@tr_var_af_136=0, @tr_var_af_163=0;
2211
	select  @tr_var_b4_118, @tr_var_b4_121, @tr_var_b4_122, 
2212
		@tr_var_b4_136, @tr_var_b4_163;
2213
	select  @tr_var_af_118, @tr_var_af_121, @tr_var_af_122, 
2214
		@tr_var_af_136, @tr_var_af_163;
2215
--enable_query_log
2216
2217
	delete from tb3 where f122='Test 3.5.9.3';
2218
2219
	select f118, f121, f122, f136, f163 from tb3 where f122='Test 3.5.9.3';
2220
	select  @tr_var_b4_118, @tr_var_b4_121, @tr_var_b4_122, 
2221
		@tr_var_b4_136, @tr_var_b4_163;
2222
	select  @tr_var_af_118, @tr_var_af_121, @tr_var_af_122, 
2223
		@tr_var_af_136, @tr_var_af_163;
2224
#Cleanup
2225
	--disable_warnings 
2226
	drop trigger trg2_a;
2227
	drop trigger trg2_b;
2228
	drop trigger trg2_c;
2229
	drop trigger trg2_d;
2230
	--enable_warnings
2231
2232
#Section 3.5.9.4
2233
#Test case: Ensure that a reference to NEW.<column name> always correctly refers 
2234
#           to the values of the specified column of the subject table after an 
2235
#           existing data row has been updated or a new data row has been inserted.
2236
let $message= Testcase 3.5.9.4:;
2237
--source include/show_msg.inc
2238
	
2239
	Create trigger trg3_a before insert on tb3 for each row
2240
		set @tr_var_b4_118=new.f118, @tr_var_b4_121=new.f121,
2241
		    @tr_var_b4_122=new.f122, @tr_var_b4_136=new.f136,
2242
		    @tr_var_b4_151=new.f151, @tr_var_b4_163=new.f163;
2243
2244
	Create trigger trg3_b after insert on tb3 for each row
2245
		set @tr_var_af_118=new.f118, @tr_var_af_121=new.f121,
2246
		    @tr_var_af_122=new.f122, @tr_var_af_136=new.f136,
2247
		    @tr_var_af_151=new.f151, @tr_var_af_163=new.f163;
2248
2249
	Create trigger trg3_c before update on tb3 for each row
2250
		set @tr_var_b4_118=new.f118, @tr_var_b4_121=new.f121,
2251
		    @tr_var_b4_122=new.f122, @tr_var_b4_136=new.f136,
2252
		    @tr_var_b4_151=new.f151, @tr_var_b4_163=new.f163;
2253
2254
	Create trigger trg3_d after update on tb3 for each row
2255
		set @tr_var_af_118=new.f118, @tr_var_af_121=new.f121,
2256
		    @tr_var_af_122=new.f122, @tr_var_af_136=new.f136,
2257
		    @tr_var_af_151=new.f151, @tr_var_af_163=new.f163;
2258
2259
--disable_query_log
2260
	set @tr_var_b4_118=0, @tr_var_b4_121=0, @tr_var_b4_122=0, 
2261
		@tr_var_b4_136=0, @tr_var_b4_151=0, @tr_var_b4_163=0;
2262
	set @tr_var_af_118=0, @tr_var_af_121=0, @tr_var_af_122=0, 
2263
		@tr_var_af_136=0, @tr_var_af_151=0, @tr_var_af_163=0;
2264
	select  @tr_var_b4_118, @tr_var_b4_121, @tr_var_b4_122, 
2265
		@tr_var_b4_136, @tr_var_b4_151, @tr_var_b4_163;
2266
	select  @tr_var_af_118, @tr_var_af_121, @tr_var_af_122, 
2267
		@tr_var_af_136, @tr_var_af_151, @tr_var_af_163;
2268
--enable_query_log
2269
2270
	Insert into tb3 (f122, f136, f151, f163) 
2271
		values ('Test 3.5.9.4', 7, DEFAULT, 995.24);
2272
2273
	select f118, f121, f122, f136, f151, f163 from tb3 
2274
		where f122 like 'Test 3.5.9.4%';
2275
	select  @tr_var_b4_118, @tr_var_b4_121, @tr_var_b4_122, 
2276
		@tr_var_b4_136, @tr_var_b4_151, @tr_var_b4_163;
2277
	select  @tr_var_af_118, @tr_var_af_121, @tr_var_af_122, 
2278
		@tr_var_af_136, @tr_var_af_151, @tr_var_af_163;
2279
2280
--disable_query_log
2281
	set @tr_var_b4_118=0, @tr_var_b4_121=0, @tr_var_b4_122=0, 
2282
		@tr_var_b4_136=0, @tr_var_b4_151=0, @tr_var_b4_163=0;
2283
	set @tr_var_af_118=0, @tr_var_af_121=0, @tr_var_af_122=0, 
2284
		@tr_var_af_136=0, @tr_var_af_151=0, @tr_var_af_163=0;
2285
	select  @tr_var_b4_118, @tr_var_b4_121, @tr_var_b4_122, 
2286
		@tr_var_b4_136, @tr_var_b4_151, @tr_var_b4_163;
2287
	select  @tr_var_af_118, @tr_var_af_121, @tr_var_af_122, 
2288
		@tr_var_af_136, @tr_var_af_151, @tr_var_af_163;
2289
--enable_query_log
2290
2291
	Update tb3 Set f122='Test 3.5.9.4-trig', f136=NULL, f151=DEFAULT, f163=NULL
2292
		 where f122='Test 3.5.9.4';
2293
2294
	select f118, f121, f122, f136, f151, f163 from tb3 
2295
		where f122 like 'Test 3.5.9.4-trig';
2296
	select  @tr_var_b4_118, @tr_var_b4_121, @tr_var_b4_122, 
2297
		@tr_var_b4_136, @tr_var_b4_151, @tr_var_b4_163;
2298
	select  @tr_var_af_118, @tr_var_af_121, @tr_var_af_122, 
2299
		@tr_var_af_136, @tr_var_af_151, @tr_var_af_163;
2300
#Cleanup
2301
	--disable_warnings 
2302
	drop trigger trg3_a;
2303
	drop trigger trg3_b;
2304
	drop trigger trg3_c;
2305
	drop trigger trg3_d;
2306
	delete from tb3 where f122='Test 3.5.9.4-trig';
2307
	--enable_warnings
2308
2309
2310
#Section 3.5.9.5
2311
# Test case: Ensure that the definition of an INSERT trigger can include a 
2312
#            reference to NEW. <Column name>.
2313
let $message= Testcase 3.5.9.5: (implied in previous tests);
2314
--source include/show_msg.inc
2315
	
2316
#Section 3.5.9.6
2317
# Test case: Ensure that the definition of an INSERT trigger cannot include 
2318
#            a reference to OLD. <Column name>.
2319
let $message= Testcase 3.5.9.6:;
2320
--source include/show_msg.inc
2321
	
2322
	--error 1363
2323
	create trigger trg4a before insert on tb3 for each row
2324
		set @temp1= old.f120;
2325
	--error 1362
2326
	create trigger trg4b after insert on tb3 for each row
2327
		set old.f120= 'test';
2328
2329
#Cleanup
2330
	--disable_warnings 
2331
	--error 0, 1360
2332
	drop trigger trg4a;
2333
	--error 0, 1360
2334
	drop trigger trg4b;
2335
	--enable_warnings
2336
2337
2338
#Section 3.5.9.7
2339
# Test case: Ensure that the definition of an UPDATE trigger can include a 
2340
#            reference to NEW. <Column name>.
2341
let $message= Testcase 3.5.9.7: (implied in previous tests);
2342
--source include/show_msg.inc
2343
	
2344
#Section 3.5.9.8
2345
# Test case: Ensure that the definition of an UPDATE trigger cannot include a 
2346
#            reference to OLD. <Column name>.
2347
let $message= Testcase 3.5.9.8: (implied in previous tests);
2348
--source include/show_msg.inc
2349
	
2350
#Section 3.5.9.9
2351
# Test case: Ensure that the definition of a DELETE trigger cannot include a 
2352
#            reference to NEW.<column name>.
2353
let $message= Testcase 3.5.9.9:;
2354
--source include/show_msg.inc
2355
	
2356
	--error 1363
2357
	create trigger trg5a before DELETE on tb3 for each row
2358
		set @temp1=new.f122;
2359
	--error 1363
2360
	create trigger trg5b after DELETE on tb3 for each row
2361
		set new.f122='test';
2362
let $message= The above returns the wrong error, should be error 1362 (Bug 11648)
2363
--source include/show_msg.inc
2364
2365
#Cleanup
2366
	--disable_warnings 
2367
	--error 0, 1360
2368
	drop trigger trg5a;
2369
	--error 0, 1360
2370
	drop trigger trg5b;
2371
	--enable_warnings
2372
2373
2374
#Section 3.5.9.10
2375
# Test case: Ensure that the definition of a DELETE trigger can include a reference 
2376
#            to OLD.<column name>.
2377
let $message= Testcase 3.5.9.10: (implied in previous tests);
2378
--source include/show_msg.inc
2379
	
2380
2381
#Section 3.5.9.11
2382
# Testcase: Ensure that trigger definition that includes a referance to 
2383
#           NEW.<colunm name> fails with an appropriate error message, 
2384
#           at CREATE TRIGGER time, if the trigger event in not INSERT or UPDATE
2385
let $message= Testcase 3.5.9.11: covered by 3.5.9.9;
2386
--source include/show_msg.inc
2387
2388
2389
#Section 3.5.9.12
2390
# Testcase: Ensure that trigger definition that includes a referance to 
2391
#           OLD.<column name> fails with an appropriate error message, at 
2392
#           CREATE TRIGGER time, if the trigger event is not DELETE or UPDATE
2393
let $message= Testcase 3.5.9.12: covered by 3.5.9.6;
2394
--source include/show_msg.inc
2395
2396
2397
#Section 3.5.9.13
2398
# Test case: Ensure that all references to OLD. <Column name> are read-only, 
2399
#            that is, that they cannot be used to modify a data row.
2400
let $message= Testcase 3.5.9.13:;
2401
--source include/show_msg.inc
2402
	
2403
	--error 1362
2404
	create trigger trg6a before UPDATE on tb3 for each row
2405
		set old.f118='C', new.f118='U';
2406
	--error 1362
2407
	create trigger trg6b after INSERT on tb3 for each row
2408
		set old.f136=163, new.f118='U';
2409
	--error 1362
2410
	create trigger trg6c after UPDATE on tb3 for each row
2411
		set old.f136=NULL;
2412
2413
#Cleanup
2414
	--disable_warnings 
2415
	--error 0, 1360
2416
	drop trigger trg6a;
2417
	--error 0, 1360
2418
	drop trigger trg6b;
2419
	--error 0, 1360
2420
	drop trigger trg6c;
2421
	--enable_warnings
2422
2423
2424
#Section 3.5.9.14
2425
# Test case: Ensure that all references to NEW. <Column name> may be used both to 
2426
#            read a data row and to modify a data row
2427
let $message= Testcase 3.5.9.14: (implied in previous tests);
2428
--source include/show_msg.inc
2429
2430
	
2431
##############################################
2432
################ Section 3.5.10 #################
2433
# Check on Trigger Activation
2434
##############################################
2435
#Section 3.5.10.1
2436
# Test case: Ensure that every trigger that should be activated by 
2437
#            every possible type of implicit insertion into its subject 
2438
#            table (INSERT into a view based on the subject table) is 
2439
#            indeed activated correctly
2440
#Section 3.5.10.2
2441
# Test case: Ensure that every trigger that should be activated by every 
2442
#            possible type of implicit insertion into its subject table 
2443
#            (UPDATE into a view based on the subject table) is indeed 
2444
#            activated correctly
2445
#Section 3.5.10.3
2446
# Test case: Ensure that every trigger that should be activated by every 
2447
#            possible type of implicit insertion into its subject table 
2448
#            (DELETE from a view based on the subject table) is indeed 
2449
#            activated correctly
2450
let $message= Testcase 3.5.10.1/2/3:;
2451
--source include/show_msg.inc
2452
2453
	Create view vw11 as select * from tb3
2454
		 where f122 like 'Test 3.5.10.1/2/3%';
2455
	Create trigger trg1a before insert on tb3 
2456
		for each row set new.f163=111.11;
2457
	Create trigger trg1b after insert on tb3 
2458
		for each row set @test_var='After Insert';
2459
	Create trigger trg1c before update on tb3 
2460
		for each row set new.f121='Y', new.f122='Test 3.5.10.1/2/3-Update';
2461
	Create trigger trg1d after update on tb3 
2462
		for each row set @test_var='After Update';
2463
	Create trigger trg1e before delete on tb3 
2464
		for each row set @test_var=5;
2465
	Create trigger trg1f after delete on tb3 
2466
		for each row set @test_var= 2* @test_var+7;
2467
2468
#Section 3.5.10.1
2469
	Insert into vw11 (f122, f151) values ('Test 3.5.10.1/2/3', 1);
2470
	Insert into vw11 (f122, f151) values ('Test 3.5.10.1/2/3', 2);
2471
	Insert into vw11 (f122, f151) values ('Not in View', 3);
2472
	select f121, f122, f151, f163 
2473
		from tb3 where f122 like 'Test 3.5.10.1/2/3%';
2474
	select f121, f122, f151, f163 from vw11;
2475
	select f121, f122, f151, f163 
2476
		from tb3 where f122 like 'Not in View';
2477
2478
#Section 3.5.10.2
2479
	Update vw11 set f163=1;
2480
	select f121, f122, f151, f163 from tb3 
2481
		where f122 like 'Test 3.5.10.1/2/3%';
2482
	select f121, f122, f151, f163 from vw11;
2483
2484
#Section 3.5.10.3
2485
	set @test_var=0;
2486
	Select @test_var as 'before delete';
2487
	delete from vw11 where f151=1;
2488
	select f121, f122, f151, f163 from tb3 
2489
		where f122 like 'Test 3.5.10.1/2/3%';
2490
	select f121, f122, f151, f163 from vw11;
2491
	Select @test_var as 'after delete';
2492
2493
#Cleanup
2494
	--disable_warnings 
2495
	drop view vw11;
2496
	drop trigger trg1a;  
2497
	drop trigger trg1b;  
2498
	drop trigger trg1c;  
2499
	drop trigger trg1d;  
2500
	drop trigger trg1e;  
2501
	drop trigger trg1f;  
2502
	delete from tb3 where f122 like 'Test 3.5.10.1/2/3%';
2503
	--enable_warnings
2504
2505
2506
#Section 3.5.10.4
2507
# Test case: Ensure that every trigger that should be activated by every 
2508
#            possible type of implicit insertion into its subject table 
2509
#            (LOAD into the subject table) is indeed activated correctly
2510
let $message= Testcase 3.5.10.4:;
2511
--source include/show_msg.inc
2512
	
2513
	eval create table tb_load (f1 int, f2 char(25),f3 int) engine=$engine_type;
2514
	Create trigger trg4 before insert on tb_load 
2515
		for each row set new.f3=-(new.f1 div 5), @counter= @counter+1;
2516
2517
        set @counter= 0;
2518
	select @counter as 'Rows Loaded Before';
2519
        --replace_result $MYSQL_TEST_DIR MYSQL_TEST_DIR
2520
        eval load data infile '$MYSQL_TEST_DIR/suite/funcs_1/data/t9.txt' into table tb_load;
2521
2522
	select @counter as 'Rows Loaded After';
2523
	Select * from tb_load limit 10;
2524
2525
#Cleanup 
2526
	--disable_warnings 
2527
	drop trigger trg4;
2528
	drop table tb_load;
2529
	--enable_warnings
2530
2531
2532
#Section 3.5.10.5
2533
# Testcase: Ensure that every trigger that should be activated by every possible 
2534
#           type of implicit update of its subject table (e.g.a FOREIGN KEY SET 
2535
#           DEFAULT action or an UPDATE of a view based on the subject table) is 
2536
#           indeed activated correctly
2537
let $message= Testcase 3.5.10.5: (implemented in trig_frkey.test);
2538
--source include/show_msg.inc
2539
2540
2541
#Section 3.5.10.6
2542
# Testcase: Ensure that every trigger that should be activated by every possible 
2543
#           type of implicit deletion from its subject table (e.g.a FOREIGN KEY 
2544
#           CASCADE action or a DELETE from a view based on the subject table) is 
2545
#           indeed activated correctly
2546
let $message= Testcase 3.5.10.6: (implemented in trig_frkey.test);
2547
--source include/show_msg.inc
2548
2549
#Section 3.5.10.extra
2550
# Testcase: Ensure that every trigger that should be activated by every possible 
2551
#           type of implicit deletion from its subject table (e.g. an action performed
2552
#           on the subject table from a stored procedure is indeed activated correctly
2553
let $message= Testcase 3.5.10.extra:; 
2554
--source include/show_msg.inc
2555
2556
	eval create table t1_sp (var136 tinyint, var151 decimal) engine=$engine_type;
2557
2558
	create trigger trg before insert on t1_sp 
2559
		for each row set @counter=@counter+1;		
2560
                # declare continue handler for sqlstate '01000' set done = 1;
2561
2562
	delimiter //;
2563
	create procedure trig_sp()
2564
        begin
2565
                declare done int default 0;
2566
                declare var151 decimal;
2567
		declare var136 tinyint;
2568
                declare cur1 cursor for select f136, f151 from tb3;
2569
                declare continue handler for sqlstate '01000' set done = 1;
2570
                open cur1;
2571
                fetch cur1 into var136, var151;
2572
		wl_loop: WHILE NOT done DO 
2573
                        insert into t1_sp values (var136, var151);
2574
                        fetch cur1 into var136, var151;
2575
		END WHILE wl_loop;
2576
                close cur1;
2577
        end//
2578
	delimiter ;//
2579
2580
	set @counter=0;
2581
	select @counter;
2582
	--error 1329
2583
	call trig_sp();
2584
	select @counter;
2585
	select count(*) from tb3;
2586
	select count(*) from t1_sp;
2587
2588
#Cleanup 
2589
	--disable_warnings 
2590
	drop procedure trig_sp;
2591
	drop trigger trg;
2592
	drop table t1_sp;
2593
	--enable_warnings
2594
2595
##################################
2596
########## Section 3.5.11 ########
2597
# Check on Trigger Performance   # 
2598
##################################
2599
#Section 3.5.11.1
2600
# Testcase: Ensure that a set of complicated, interlocking triggers that are activated 
2601
#           by multiple trigger events on no fewer than 50 different tables with at least 
2602
#           500,000 rows each, all work correctly, return the correct results, and have 
2603
#           the correct effects on the database. It is expected that the Services Provider 
2604
#           will use its own skills and experience in database testing to devise tables and 
2605
#           triggers that fulfill this requirement.
2606
let $message= Testcase 3.5.11.1 (implemented in trig_perf.test);
2607
--source include/show_msg.inc
2608
2609
# Cleanup section 3.5
2610
	connection default;
2611
	drop user test_general@localhost;
2612
	drop user test_general;
2613
	drop user test_super@localhost;
2614
2615
##########################################
2616
# Other Scenasrios (not in requirements) # 
2617
##########################################
2618
# Testcase: y.y.y.2:
2619
# Checking for triggers starting triggers (no direct requirement)
2620
let $message= Testcase y.y.y.2: Check for triggers starting triggers;
2621
--source include/show_msg.inc
2622
2623
	use test;
2624
	--disable_warnings
2625
	drop table if exists t1;
2626
	drop table if exists t2_1;
2627
	drop table if exists t2_2;
2628
	drop table if exists t2_3;
2629
	drop table if exists t2_4;
2630
	drop table if exists t3;
2631
	--enable_warnings
2632
2633
	create table t1 (f1 integer);
2634
	create table t2_1 (f1 integer);
2635
	create table t2_2 (f1 integer);
2636
	create table t2_3 (f1 integer);
2637
	create table t2_4 (f1 integer);
2638
	create table t3 (f1 integer);
2639
2640
	insert into t1 values (1);
2641
	delimiter //;
2642
	create trigger tr1 after insert on t1 for each row 
2643
	BEGIN
2644
		insert into t2_1 (f1) values (new.f1+1);
2645
		insert into t2_2 (f1) values (new.f1+1);
2646
		insert into t2_3 (f1) values (new.f1+1);
2647
		insert into t2_4 (f1) values (new.f1+1);
2648
	END//
2649
	delimiter ;//
2650
2651
	create trigger tr2_1 after insert on t2_1 for each row 
2652
		insert into t3 (f1) values (new.f1+10);
2653
	create trigger tr2_2 after insert on t2_2 for each row 
2654
		insert into t3 (f1) values (new.f1+100);
2655
	create trigger tr2_3 after insert on t2_3 for each row 
2656
		insert into t3 (f1) values (new.f1+1000);
2657
	create trigger tr2_4 after insert on t2_4 for each row 
2658
		insert into t3 (f1) values (new.f1+10000);
2659
2660
#lock tables t1 write, t2_1 write, t2_2 write, t2_3 write, t2_4 write, t3 write;
2661
	insert into t1 values (1);
2662
#unlock tables;
2663
	select * from t3;
2664
2665
#Cleanup 
2666
	--disable_warnings 
2667
	drop trigger tr1;
2668
	drop trigger tr2_1;
2669
	drop trigger tr2_2;
2670
	drop trigger tr2_3;
2671
	drop trigger tr2_4;
2672
	drop table t1, t2_1, t2_2, t2_3, t2_4, t3;
2673
	--enable_warnings 
2674
2675
# Testcase: y.y.y.3:
2676
# Checking for circular trigger definitions
2677
let $message= Testcase y.y.y.3: Circular trigger reference;
2678
--source include/show_msg.inc
2679
	use test;
2680
	--disable_warnings 
2681
	drop table if exists t1;
2682
	drop table if exists t2;
2683
	drop table if exists t3;
2684
	drop table if exists t4;
2685
	--enable_warnings 
2686
	eval create table t1 (f1 integer) engine = $engine_type;
2687
	eval create table t2 (f2 integer) engine = $engine_type;
2688
	eval create table t3 (f3 integer) engine = $engine_type;
2689
	eval create table t4 (f4 integer) engine = $engine_type;
2690
2691
	insert into t1 values (0);
2692
	create trigger tr1 after insert on t1 
2693
		for each row insert into t2 (f2) values (new.f1+1);
2694
	create trigger tr2 after insert on t2 
2695
		for each row insert into t3 (f3) values (new.f2+1);
2696
	create trigger tr3 after insert on t3 
2697
		for each row insert into t4 (f4) values (new.f3+1);
2698
	create trigger tr4 after insert on t4 
2699
		for each row insert into t1 (f1) values (new.f4+1);
2700
2701
	# OBN See bug 11896
2702
	--error 1442
2703
	insert into t1 values (1);
2704
	select * from t1;
2705
	select * from t2;
2706
	select * from t3;
2707
	select * from t4;
2708
2709
#Cleanup 
2710
	--disable_warnings 
2711
	drop trigger tr1;
2712
	drop trigger tr2;
2713
	drop trigger tr3;
2714
	drop trigger tr4;
2715
	drop table t1;
2716
	drop table t2;
2717
	drop table t3;
2718
	drop table t4;
2719
	--enable_warnings 
2720
2721
2722
#Section y.y.y.4
2723
# Testcase: create recursive trigger/storedprocedures conditions
2724
let $message= Testcase y.y.y.4: Recursive trigger/SP references (disabled bug 11889);
2725
--source include/show_msg.inc
2726
2727
set @sql_mode='traditional';
2728
	eval create table t1_sp (
2729
		count integer, 
2730
   		var136 tinyint, 
2731
		var151 decimal) engine=$engine_type;
2732
	
2733
	delimiter //;
2734
	create procedure trig_sp()
2735
        begin
2736
                declare done int default 0;
2737
		declare var151 decimal;
2738
       	 	declare var136 tinyint;
2739
                declare cur1 cursor for select f136, f151 from tb3;
2740
                declare continue handler for sqlstate '01000' set done = 1;
2741
		set @counter= @counter+1;
2742
                open cur1;
2743
                fetch cur1 into var136, var151;
2744
		wl_loop: WHILE NOT done DO 
2745
                        insert into t1_sp values (@counter, var136, var151);
2746
                        fetch cur1 into var136, var151;
2747
		END WHILE wl_loop;
2748
                close cur1;
2749
        end//
2750
	delimiter ;//
2751
2752
	create trigger trg before insert on t1_sp 
2753
		for each row call trig_sp(); 
2754
2755
	set @counter=0;
2756
	select @counter;
2757
	--error 1424
2758
	call trig_sp();
2759
	select @counter;
2760
	select count(*) from tb3;
2761
	select count(*) from t1_sp;
2762
2763
#Cleanup 
2764
	--disable_warnings 
2765
	drop procedure trig_sp;
2766
	drop trigger trg;
2767
	drop table t1_sp;
2768
	--enable_warnings
2769
2770
2771
# Testcase: y.y.y.5:
2772
# Checking rollback of nested trigger definitions
2773
let $message= Testcase y.y.y.5: Roleback of nested trigger references;
2774
--source include/show_msg.inc
2775
	
2776
	set @@sql_mode='traditional';
2777
	use test;
2778
	--disable_warnings 
2779
	drop table if exists t1;
2780
	drop table if exists t2;
2781
	drop table if exists t3;
2782
	drop table if exists t4;
2783
	--enable_warnings 
2784
	eval create table t1 (f1 integer) engine = $engine_type;
2785
	eval create table t2 (f2 integer) engine = $engine_type;
2786
	eval create table t3 (f3 integer) engine = $engine_type;
2787
	eval create table t4 (f4 tinyint) engine = $engine_type;
2788
	show create table t1;
2789
	insert into t1 values (1);
2790
	create trigger tr1 after insert on t1 
2791
		for each row insert into t2 (f2) values (new.f1+1);
2792
	create trigger tr2 after insert on t2 
2793
		for each row insert into t3 (f3) values (new.f2+1);
2794
	create trigger tr3 after insert on t3 
2795
		for each row insert into t4 (f4) values (new.f3+1000);
2796
2797
#lock tables t1 write, t2 write, t3 write, t4 write;
2798
	
2799
	set autocommit=0;
2800
	start transaction;
2801
	--error 1264
2802
	insert into t1 values (1);
2803
	commit;
2804
	select * from t1;
2805
	select * from t2;
2806
	select * from t3;
2807
#unlock tables;
2808
#Cleanup 
2809
	--disable_warnings 
2810
	drop trigger tr1;
2811
	drop trigger tr2;
2812
	drop trigger tr3;
2813
	drop table t1;
2814
	drop table t2;
2815
	drop table t3;
2816
	drop table t4;
2817
	--enable_warnings 
2818