Commit f595847e authored by sergefp@mysql.com's avatar sergefp@mysql.com

Manual merge

parents 2b706159 b6a6fe08
drop database if exists mysqltest;
drop table if exists t1, t2, t3, t4;
drop procedure if exists sp1;
drop procedure if exists sp2;
drop procedure if exists sp3;
drop procedure if exists sp4;
drop function if exists f1;
drop function if exists f2;
drop function if exists f3;
create database mysqltest;
use mysqltest//
create procedure sp1 ()
begin
drop table if exists t1;
select 1 as "my-col";
end;
//
select database();
database()
mysqltest
call sp1();
my-col
1
Warnings:
Note 1051 Unknown table 't1'
select database();
database()
mysqltest
use test;
select database();
database()
test
call mysqltest.sp1();
my-col
1
Warnings:
Note 1051 Unknown table 't1'
select database();
database()
test
drop procedure mysqltest.sp1;
drop database mysqltest;
create procedure sp1()
begin
create table t1 (a int);
insert into t1 values (10);
end//
create procedure sp2()
begin
create table t2(a int);
insert into t2 values(1);
call sp1();
end//
create function f1() returns int
begin
return (select max(a) from t1);
end//
create procedure sp3()
begin
call sp1();
select 'func', f1();
end//
call sp1();
select 't1',a from t1;
t1 a
t1 10
drop table t1;
call sp2();
select 't1',a from t1;
t1 a
t1 10
select 't2',a from t2;
t2 a
t2 1
drop table t1, t2;
call sp3();
func f1()
func 10
select 't1',a from t1;
t1 a
t1 10
drop table t1;
drop procedure sp1;
drop procedure sp2;
drop procedure sp3;
drop function f1;
create procedure sp1()
begin
create temporary table t2(a int);
insert into t2 select * from t1;
end//
create procedure sp2()
begin
create temporary table t1 (a int);
insert into t1 values(1);
call sp1();
select 't1', a from t1;
select 't2', a from t2;
drop table t1;
drop table t2;
end//
call sp2();
t1 a
t1 1
t2 a
t2 1
drop procedure sp1;
drop procedure sp2;
create table t1 (a int);
insert into t1 values(1),(2);
create table t2 as select * from t1;
create table t3 as select * from t1;
create table t4 as select * from t1;
create procedure sp1(a int)
begin
select a;
end //
create function f1() returns int
begin
return (select max(a) from t1);
end //
CALL sp1(f1());
a
2
create procedure sp2(a int)
begin
select * from t3;
select a;
end //
create procedure sp3()
begin
select * from t1;
call sp2(5);
end //
create procedure sp4()
begin
select * from t2;
call sp3();
end //
call sp4();
a
1
2
a
1
2
a
1
2
a
5
drop procedure sp1;
drop procedure sp2;
drop procedure sp3;
drop procedure sp4;
drop function f1;
drop view if exists v1;
create function f1(ab int) returns int
begin
declare i int;
set i= (select max(a) from t1 where a < ab) ;
return i;
end //
create function f2(ab int) returns int
begin
declare i int;
set i= (select max(a) from t2 where a < ab) ;
return i;
end //
create view v1 as
select t3.a as x, t4.a as y, f2(3) as z
from t3, t4 where t3.a = t4.a //
create procedure sp1()
begin
declare a int;
set a= (select f1(4) + count(*) A from t1, v1);
end //
create function f3() returns int
begin
call sp1();
return 1;
end //
call sp1() //
select f3() //
f3()
1
select f3() //
f3()
1
call sp1() //
drop procedure sp1//
drop function f3//
create procedure sp1()
begin
declare x int;
declare c cursor for select f1(3) + count(*) from v1;
open c;
fetch c into x;
end;//
create function f3() returns int
begin
call sp1();
return 1;
end //
call sp1() //
call sp1() //
select f3() //
f3()
1
call sp1() //
drop table t1,t2,t3;
drop function f1;
drop function f2;
drop function f3;
drop procedure sp1;
...@@ -35,7 +35,7 @@ lock tables t2 write; ...@@ -35,7 +35,7 @@ lock tables t2 write;
show processlist; show processlist;
Id User Host db Command Time State Info Id User Host db Command Time State Info
# root localhost test Sleep # NULL # root localhost test Sleep # NULL
# root localhost test Query # Locked call bug9486() # root localhost test Query # Locked update t1, t2 set val= 1 where id1=id2
# root localhost test Query # NULL show processlist # root localhost test Query # NULL show processlist
unlock tables; unlock tables;
drop procedure bug9486; drop procedure bug9486;
......
use test; use test;
drop table if exists t1; drop table if exists t1,t2,t3,t4;
create table t1 ( create table t1 (
id char(16) not null default '', id char(16) not null default '',
data int not null data int not null
); );
drop table if exists t2;
create table t2 ( create table t2 (
s char(16), s char(16),
i int, i int,
...@@ -85,7 +84,6 @@ foo 1 ...@@ -85,7 +84,6 @@ foo 1
kaka 3 kaka 3
delete from t1| delete from t1|
drop procedure setcontext| drop procedure setcontext|
drop table if exists t3|
create table t3 ( d date, i int, f double, s varchar(32) )| create table t3 ( d date, i int, f double, s varchar(32) )|
drop procedure if exists nullset| drop procedure if exists nullset|
create procedure nullset() create procedure nullset()
...@@ -521,7 +519,6 @@ select data into x from test.t1 limit 1; ...@@ -521,7 +519,6 @@ select data into x from test.t1 limit 1;
insert into test.t3 values ("into4", x); insert into test.t3 values ("into4", x);
end| end|
delete from t1| delete from t1|
drop table if exists t3|
create table t3 ( s char(16), d int)| create table t3 ( s char(16), d int)|
call into_test4()| call into_test4()|
Warnings: Warnings:
...@@ -565,13 +562,12 @@ insert into test.t1 values (x, y); ...@@ -565,13 +562,12 @@ insert into test.t1 values (x, y);
create temporary table test.t3 select * from test.t1; create temporary table test.t3 select * from test.t1;
insert into test.t3 values (concat(x, "2"), y+2); insert into test.t3 values (concat(x, "2"), y+2);
end| end|
drop table if exists t3|
call create_select("cs", 90)| call create_select("cs", 90)|
select * from t1, t3| select * from t1, t3|
id data id data id data id data
cs 90 cs 90 cs 90 cs 90
cs 90 cs2 92 cs 90 cs2 92
drop table if exists t3| drop table t3|
delete from t1| delete from t1|
drop procedure create_select| drop procedure create_select|
drop function if exists e| drop function if exists e|
...@@ -702,7 +698,6 @@ id data ...@@ -702,7 +698,6 @@ id data
hndlr3 13 hndlr3 13
delete from t1| delete from t1|
drop procedure hndlr3| drop procedure hndlr3|
drop table if exists t3|
create table t3 ( id char(16), data int )| create table t3 ( id char(16), data int )|
drop procedure if exists hndlr4| drop procedure if exists hndlr4|
create procedure hndlr4() create procedure hndlr4()
...@@ -745,7 +740,6 @@ foo 40 ...@@ -745,7 +740,6 @@ foo 40
bar 15 bar 15
zap 663 zap 663
drop procedure cur1| drop procedure cur1|
drop table if exists t3|
create table t3 ( s char(16), i int )| create table t3 ( s char(16), i int )|
drop procedure if exists cur2| drop procedure if exists cur2|
create procedure cur2() create procedure cur2()
...@@ -1309,7 +1303,6 @@ select t1max()| ...@@ -1309,7 +1303,6 @@ select t1max()|
t1max() t1max()
5 5
drop function t1max| drop function t1max|
drop table if exists t3|
create table t3 ( create table t3 (
v char(16) not null primary key, v char(16) not null primary key,
c int unsigned not null c int unsigned not null
...@@ -1430,7 +1423,6 @@ select @1, @2| ...@@ -1430,7 +1423,6 @@ select @1, @2|
2 NULL 2 NULL
drop table t70| drop table t70|
drop procedure bug1656| drop procedure bug1656|
drop table if exists t3|
create table t3(a int)| create table t3(a int)|
drop procedure if exists bug1862| drop procedure if exists bug1862|
create procedure bug1862() create procedure bug1862()
...@@ -1555,7 +1547,6 @@ select @x| ...@@ -1555,7 +1547,6 @@ select @x|
42 42
drop procedure bug2776_1| drop procedure bug2776_1|
drop procedure bug2776_2| drop procedure bug2776_2|
drop table if exists t3|
create table t3 (s1 smallint)| create table t3 (s1 smallint)|
insert into t3 values (123456789012)| insert into t3 values (123456789012)|
Warnings: Warnings:
...@@ -1616,7 +1607,6 @@ f1 rc t3 ...@@ -1616,7 +1607,6 @@ f1 rc t3
drop procedure bug1863| drop procedure bug1863|
drop temporary table temp_t1; drop temporary table temp_t1;
drop table t3, t4| drop table t3, t4|
drop table if exists t3, t4|
create table t3 ( create table t3 (
OrderID int not null, OrderID int not null,
MarketID int, MarketID int,
...@@ -1694,7 +1684,6 @@ select @i, from_unixtime(@stamped_time, '%d-%m-%Y %h:%i:%s') as time| ...@@ -1694,7 +1684,6 @@ select @i, from_unixtime(@stamped_time, '%d-%m-%Y %h:%i:%s') as time|
@i time @i time
2 01-01-1970 03:16:40 2 01-01-1970 03:16:40
drop procedure bug3426| drop procedure bug3426|
drop table if exists t3, t4|
create table t3 ( create table t3 (
a int primary key, a int primary key,
ach char(1) ach char(1)
...@@ -1724,7 +1713,6 @@ a ach b bch ...@@ -1724,7 +1713,6 @@ a ach b bch
1 a 1 b 1 a 1 b
drop procedure bug3448| drop procedure bug3448|
drop table t3, t4| drop table t3, t4|
drop table if exists t3|
create table t3 ( create table t3 (
id int unsigned auto_increment not null primary key, id int unsigned auto_increment not null primary key,
title VARCHAR(200), title VARCHAR(200),
...@@ -1873,7 +1861,6 @@ select 1+2| ...@@ -1873,7 +1861,6 @@ select 1+2|
1+2 1+2
3 3
drop procedure bug3843| drop procedure bug3843|
drop table if exists t3|
create table t3 ( s1 char(10) )| create table t3 ( s1 char(10) )|
insert into t3 values ('a'), ('b')| insert into t3 values ('a'), ('b')|
drop procedure if exists bug3368| drop procedure if exists bug3368|
...@@ -1889,7 +1876,6 @@ group_concat(v) ...@@ -1889,7 +1876,6 @@ group_concat(v)
yz,yz yz,yz
drop procedure bug3368| drop procedure bug3368|
drop table t3| drop table t3|
drop table if exists t3|
create table t3 (f1 int, f2 int)| create table t3 (f1 int, f2 int)|
insert into t3 values (1,1)| insert into t3 values (1,1)|
drop procedure if exists bug4579_1| drop procedure if exists bug4579_1|
...@@ -1914,7 +1900,6 @@ Warning 1329 No data to FETCH ...@@ -1914,7 +1900,6 @@ Warning 1329 No data to FETCH
drop procedure bug4579_1| drop procedure bug4579_1|
drop procedure bug4579_2| drop procedure bug4579_2|
drop table t3| drop table t3|
drop table if exists t3|
drop procedure if exists bug2773| drop procedure if exists bug2773|
create function bug2773() returns int return null| create function bug2773() returns int return null|
create table t3 as select bug2773()| create table t3 as select bug2773()|
...@@ -1936,7 +1921,6 @@ select bug3788()| ...@@ -1936,7 +1921,6 @@ select bug3788()|
bug3788() bug3788()
5 5
drop function bug3788| drop function bug3788|
drop table if exists t3|
create table t3 (f1 int, f2 int, f3 int)| create table t3 (f1 int, f2 int, f3 int)|
insert into t3 values (1,1,1)| insert into t3 values (1,1,1)|
drop procedure if exists bug4726| drop procedure if exists bug4726|
...@@ -2097,7 +2081,6 @@ call bug4902_2()| ...@@ -2097,7 +2081,6 @@ call bug4902_2()|
Id User Host db Command Time State Info Id User Host db Command Time State Info
# root localhost test Query # NULL show processlist # root localhost test Query # NULL show processlist
drop procedure bug4902_2| drop procedure bug4902_2|
drop table if exists t3|
drop procedure if exists bug4904| drop procedure if exists bug4904|
create procedure bug4904() create procedure bug4904()
begin begin
...@@ -2286,7 +2269,6 @@ flush status| ...@@ -2286,7 +2269,6 @@ flush status|
flush query cache| flush query cache|
delete from t1| delete from t1|
drop procedure bug3583| drop procedure bug3583|
drop table if exists t3|
drop procedure if exists bug4905| drop procedure if exists bug4905|
create table t3 (s1 int,primary key (s1))| create table t3 (s1 int,primary key (s1))|
drop procedure if exists bug4905| drop procedure if exists bug4905|
...@@ -2344,7 +2326,6 @@ call bug8540()| ...@@ -2344,7 +2326,6 @@ call bug8540()|
y z y z
1 1 1 1
drop procedure bug8540| drop procedure bug8540|
drop table if exists t3|
create table t3 (s1 int)| create table t3 (s1 int)|
drop procedure if exists bug6642| drop procedure if exists bug6642|
create procedure bug6642() create procedure bug6642()
...@@ -2427,7 +2408,6 @@ call bug7992_2()| ...@@ -2427,7 +2408,6 @@ call bug7992_2()|
drop procedure bug7992_1| drop procedure bug7992_1|
drop procedure bug7992_2| drop procedure bug7992_2|
drop table t3| drop table t3|
drop table if exists t3|
create table t3 ( userid bigint(20) not null default 0 )| create table t3 ( userid bigint(20) not null default 0 )|
drop procedure if exists bug8116| drop procedure if exists bug8116|
create procedure bug8116(in _userid int) create procedure bug8116(in _userid int)
...@@ -2588,7 +2568,6 @@ delete from t1| ...@@ -2588,7 +2568,6 @@ delete from t1|
drop procedure if exists bug6900| drop procedure if exists bug6900|
drop procedure if exists bug9074| drop procedure if exists bug9074|
drop procedure if exists bug6900_9074| drop procedure if exists bug6900_9074|
drop table if exists t3|
create table t3 (w char unique, x char)| create table t3 (w char unique, x char)|
insert into t3 values ('a', 'b')| insert into t3 values ('a', 'b')|
create procedure bug6900() create procedure bug6900()
...@@ -3042,32 +3021,6 @@ drop procedure bug11529| ...@@ -3042,32 +3021,6 @@ drop procedure bug11529|
drop procedure if exists bug6063| drop procedure if exists bug6063|
drop procedure if exists bug7088_1| drop procedure if exists bug7088_1|
drop procedure if exists bug7088_2| drop procedure if exists bug7088_2|
create procedure bug6063()
lbel: begin end|
call bug6063()|
show create procedure bug6063|
Procedure sql_mode Create Procedure
bug6063 CREATE PROCEDURE `test`.`bug6063`()
l?bel: begin end
set character set utf8|
create procedure bug7088_1()
label1: begin end label1|
create procedure bug7088_2()
läbel1: begin end|
call bug7088_1()|
call bug7088_2()|
set character set default|
show create procedure bug7088_1|
Procedure sql_mode Create Procedure
bug7088_1 CREATE PROCEDURE `test`.`bug7088_1`()
label1: begin end label1
show create procedure bug7088_2|
Procedure sql_mode Create Procedure
bug7088_2 CREATE PROCEDURE `test`.`bug7088_2`()
lbel1: begin end
drop procedure bug6063|
drop procedure bug7088_1|
drop procedure bug7088_2|
drop procedure if exists bug9565_sub| drop procedure if exists bug9565_sub|
drop procedure if exists bug9565| drop procedure if exists bug9565|
create procedure bug9565_sub() create procedure bug9565_sub()
......
...@@ -581,6 +581,11 @@ ERROR HY000: View 'test.v1' references invalid table(s) or column(s) or function ...@@ -581,6 +581,11 @@ ERROR HY000: View 'test.v1' references invalid table(s) or column(s) or function
drop view v1; drop view v1;
create view v1 (a,a) as select 'a','a'; create view v1 (a,a) as select 'a','a';
ERROR 42S21: Duplicate column name 'a' ERROR 42S21: Duplicate column name 'a'
drop procedure if exists p1;
create procedure p1 () begin declare v int; create view v1 as select v; end;//
call p1();
ERROR HY000: View's SELECT contains a variable or parameter
drop procedure p1;
create table t1 (col1 int,col2 char(22)); create table t1 (col1 int,col2 char(22));
insert into t1 values(5,'Hello, world of views'); insert into t1 values(5,'Hello, world of views');
create view v1 as select * from t1; create view v1 as select * from t1;
......
#
# Tests of prelocking-free execution of stored procedures.
# Currently two properties of prelocking-free SP execution are checked:
# - It is possible to execute DDL statements in prelocking-free stored
# procedure
# - The same procedure can be called in prelocking-free mode and
# in prelocked mode (from within a function).
--disable_warnings
drop database if exists mysqltest;
drop table if exists t1, t2, t3, t4;
drop procedure if exists sp1;
drop procedure if exists sp2;
drop procedure if exists sp3;
drop procedure if exists sp4;
drop function if exists f1;
drop function if exists f2;
drop function if exists f3;
--enable_warnings
# BUG#8072
create database mysqltest;
delimiter //;
use mysqltest//
create procedure sp1 ()
begin
drop table if exists t1;
select 1 as "my-col";
end;
//
delimiter ;//
select database();
call sp1();
select database();
use test;
select database();
call mysqltest.sp1();
select database();
drop procedure mysqltest.sp1;
drop database mysqltest;
# BUG#8766
delimiter //;
create procedure sp1()
begin
create table t1 (a int);
insert into t1 values (10);
end//
create procedure sp2()
begin
create table t2(a int);
insert into t2 values(1);
call sp1();
end//
create function f1() returns int
begin
return (select max(a) from t1);
end//
create procedure sp3()
begin
call sp1();
select 'func', f1();
end//
delimiter ;//
call sp1();
select 't1',a from t1;
drop table t1;
call sp2();
select 't1',a from t1;
select 't2',a from t2;
drop table t1, t2;
call sp3();
select 't1',a from t1;
drop table t1;
drop procedure sp1;
drop procedure sp2;
drop procedure sp3;
drop function f1;
delimiter //;
create procedure sp1()
begin
create temporary table t2(a int);
insert into t2 select * from t1;
end//
create procedure sp2()
begin
create temporary table t1 (a int);
insert into t1 values(1);
call sp1();
select 't1', a from t1;
select 't2', a from t2;
drop table t1;
drop table t2;
end//
delimiter ;//
call sp2();
drop procedure sp1;
drop procedure sp2;
# Miscelaneous tests
create table t1 (a int);
insert into t1 values(1),(2);
create table t2 as select * from t1;
create table t3 as select * from t1;
create table t4 as select * from t1;
delimiter //;
create procedure sp1(a int)
begin
select a;
end //
create function f1() returns int
begin
return (select max(a) from t1);
end //
delimiter ;//
CALL sp1(f1());
#############
delimiter //;
create procedure sp2(a int)
begin
select * from t3;
select a;
end //
create procedure sp3()
begin
select * from t1;
call sp2(5);
end //
create procedure sp4()
begin
select * from t2;
call sp3();
end //
delimiter ;//
call sp4();
drop procedure sp1;
drop procedure sp2;
drop procedure sp3;
drop procedure sp4;
drop function f1;
# Test that prelocking state restoration works with cursors
--disable_warnings
drop view if exists v1;
--enable_warnings
delimiter //;
create function f1(ab int) returns int
begin
declare i int;
set i= (select max(a) from t1 where a < ab) ;
return i;
end //
create function f2(ab int) returns int
begin
declare i int;
set i= (select max(a) from t2 where a < ab) ;
return i;
end //
create view v1 as
select t3.a as x, t4.a as y, f2(3) as z
from t3, t4 where t3.a = t4.a //
create procedure sp1()
begin
declare a int;
set a= (select f1(4) + count(*) A from t1, v1);
end //
create function f3() returns int
begin
call sp1();
return 1;
end //
call sp1() //
select f3() //
select f3() //
call sp1() //
---------------
drop procedure sp1//
drop function f3//
create procedure sp1()
begin
declare x int;
declare c cursor for select f1(3) + count(*) from v1;
open c;
fetch c into x;
end;//
create function f3() returns int
begin
call sp1();
return 1;
end //
call sp1() //
call sp1() //
select f3() //
call sp1() //
delimiter ;//
drop table t1,t2,t3;
drop function f1;
drop function f2;
drop function f3;
drop procedure sp1;
...@@ -22,15 +22,12 @@ use test; ...@@ -22,15 +22,12 @@ use test;
# t3 and up are created and dropped when needed. # t3 and up are created and dropped when needed.
# #
--disable_warnings --disable_warnings
drop table if exists t1; drop table if exists t1,t2,t3,t4;
--enable_warnings --enable_warnings
create table t1 ( create table t1 (
id char(16) not null default '', id char(16) not null default '',
data int not null data int not null
); );
--disable_warnings
drop table if exists t2;
--enable_warnings
create table t2 ( create table t2 (
s char(16), s char(16),
i int, i int,
...@@ -150,9 +147,6 @@ drop procedure setcontext| ...@@ -150,9 +147,6 @@ drop procedure setcontext|
# Set things to null # Set things to null
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3 ( d date, i int, f double, s varchar(32) )| create table t3 ( d date, i int, f double, s varchar(32) )|
--disable_warnings --disable_warnings
...@@ -686,9 +680,6 @@ begin ...@@ -686,9 +680,6 @@ begin
end| end|
delete from t1| delete from t1|
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3 ( s char(16), d int)| create table t3 ( s char(16), d int)|
call into_test4()| call into_test4()|
select * from t3| select * from t3|
...@@ -744,14 +735,9 @@ begin ...@@ -744,14 +735,9 @@ begin
insert into test.t3 values (concat(x, "2"), y+2); insert into test.t3 values (concat(x, "2"), y+2);
end| end|
--disable_warnings
drop table if exists t3|
--enable_warnings
call create_select("cs", 90)| call create_select("cs", 90)|
select * from t1, t3| select * from t1, t3|
--disable_warnings drop table t3|
drop table if exists t3|
--enable_warnings
delete from t1| delete from t1|
drop procedure create_select| drop procedure create_select|
...@@ -925,9 +911,6 @@ drop procedure hndlr3| ...@@ -925,9 +911,6 @@ drop procedure hndlr3|
# Variables might be uninitialized when using handlers # Variables might be uninitialized when using handlers
# (Otherwise the compiler can detect if a variable is not set, but # (Otherwise the compiler can detect if a variable is not set, but
# not in this case.) # not in this case.)
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3 ( id char(16), data int )| create table t3 ( id char(16), data int )|
--disable_warnings --disable_warnings
...@@ -980,9 +963,6 @@ call cur1()| ...@@ -980,9 +963,6 @@ call cur1()|
select * from t1| select * from t1|
drop procedure cur1| drop procedure cur1|
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3 ( s char(16), i int )| create table t3 ( s char(16), i int )|
--disable_warnings --disable_warnings
...@@ -1619,9 +1599,6 @@ insert into t1 values ("foo", 3), ("bar", 2), ("zip", 5), ("zap", 1)| ...@@ -1619,9 +1599,6 @@ insert into t1 values ("foo", 3), ("bar", 2), ("zip", 5), ("zap", 1)|
select t1max()| select t1max()|
drop function t1max| drop function t1max|
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3 ( create table t3 (
v char(16) not null primary key, v char(16) not null primary key,
c int unsigned not null c int unsigned not null
...@@ -1755,9 +1732,6 @@ drop procedure bug1656| ...@@ -1755,9 +1732,6 @@ drop procedure bug1656|
# #
# BUG#1862 # BUG#1862
# #
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3(a int)| create table t3(a int)|
--disable_warnings --disable_warnings
...@@ -2018,9 +1992,6 @@ drop procedure bug2776_2| ...@@ -2018,9 +1992,6 @@ drop procedure bug2776_2|
# #
# BUG#2780 # BUG#2780
# #
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3 (s1 smallint)| create table t3 (s1 smallint)|
insert into t3 values (123456789012)| insert into t3 values (123456789012)|
...@@ -2094,9 +2065,6 @@ drop table t3, t4| ...@@ -2094,9 +2065,6 @@ drop table t3, t4|
# #
# BUG#2656 # BUG#2656
# #
--disable_warnings
drop table if exists t3, t4|
--enable_warnings
create table t3 ( create table t3 (
OrderID int not null, OrderID int not null,
...@@ -2184,8 +2152,6 @@ drop procedure bug3426| ...@@ -2184,8 +2152,6 @@ drop procedure bug3426|
# BUG#3448 # BUG#3448
# #
--disable_warnings --disable_warnings
drop table if exists t3, t4|
create table t3 ( create table t3 (
a int primary key, a int primary key,
ach char(1) ach char(1)
...@@ -2217,9 +2183,6 @@ drop table t3, t4| ...@@ -2217,9 +2183,6 @@ drop table t3, t4|
# #
# BUG#3734 # BUG#3734
# #
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3 ( create table t3 (
id int unsigned auto_increment not null primary key, id int unsigned auto_increment not null primary key,
title VARCHAR(200), title VARCHAR(200),
...@@ -2395,9 +2358,6 @@ drop procedure bug3843| ...@@ -2395,9 +2358,6 @@ drop procedure bug3843|
# #
# BUG#3368 # BUG#3368
# #
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3 ( s1 char(10) )| create table t3 ( s1 char(10) )|
insert into t3 values ('a'), ('b')| insert into t3 values ('a'), ('b')|
...@@ -2417,9 +2377,6 @@ drop table t3| ...@@ -2417,9 +2377,6 @@ drop table t3|
# #
# BUG#4579 # BUG#4579
# #
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3 (f1 int, f2 int)| create table t3 (f1 int, f2 int)|
insert into t3 values (1,1)| insert into t3 values (1,1)|
...@@ -2454,7 +2411,6 @@ drop table t3| ...@@ -2454,7 +2411,6 @@ drop table t3|
# BUG#2773: Function's data type ignored in stored procedures # BUG#2773: Function's data type ignored in stored procedures
# #
--disable_warnings --disable_warnings
drop table if exists t3|
drop procedure if exists bug2773| drop procedure if exists bug2773|
--enable_warnings --enable_warnings
...@@ -2483,10 +2439,6 @@ drop function bug3788| ...@@ -2483,10 +2439,6 @@ drop function bug3788|
# #
# BUG#4726 # BUG#4726
# #
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3 (f1 int, f2 int, f3 int)| create table t3 (f1 int, f2 int, f3 int)|
insert into t3 values (1,1,1)| insert into t3 values (1,1,1)|
...@@ -2517,29 +2469,24 @@ drop table t3| ...@@ -2517,29 +2469,24 @@ drop table t3|
# BUG#4318 # BUG#4318
# #
#QQ Don't know if HANDLER commands can work with SPs, or at all... #QQ Don't know if HANDLER commands can work with SPs, or at all...
--disable_parsing #
--disable_warnings #create table t3 (s1 int)|
drop table if exists t3| #insert into t3 values (3), (4)|
--enable_warnings #
#--disable_warnings
create table t3 (s1 int)| #drop procedure if exists bug4318|
insert into t3 values (3), (4)| #--enable_warnings
#create procedure bug4318()
--disable_warnings # handler t3 read next|
drop procedure if exists bug4318| #
--enable_warnings #handler t3 open|
create procedure bug4318() ## Expect no results, as tables are closed, but there shouldn't be any errors
handler t3 read next| #call bug4318()|
#call bug4318()|
handler t3 open| #handler t3 close|
# Expect no results, as tables are closed, but there shouldn't be any errors #
call bug4318()| #drop procedure bug4318|
call bug4318()| #drop table t3|
handler t3 close|
drop procedure bug4318|
drop table t3|
--enable_parsing
# #
# BUG#4902: Stored procedure with SHOW WARNINGS leads to packet error # BUG#4902: Stored procedure with SHOW WARNINGS leads to packet error
...@@ -2604,10 +2551,6 @@ drop procedure bug4902_2| ...@@ -2604,10 +2551,6 @@ drop procedure bug4902_2|
# #
# BUG#4904 # BUG#4904
# #
--disable_warnings
drop table if exists t3|
--enable_warnings
--disable_warnings --disable_warnings
drop procedure if exists bug4904| drop procedure if exists bug4904|
--enable_warnings --enable_warnings
...@@ -2861,7 +2804,6 @@ drop procedure bug3583| ...@@ -2861,7 +2804,6 @@ drop procedure bug3583|
# BUG#4905: Stored procedure doesn't clear for "Rows affected" # BUG#4905: Stored procedure doesn't clear for "Rows affected"
# #
--disable_warnings --disable_warnings
drop table if exists t3|
drop procedure if exists bug4905| drop procedure if exists bug4905|
--enable_warnings --enable_warnings
...@@ -2961,9 +2903,6 @@ drop procedure bug8540| ...@@ -2961,9 +2903,6 @@ drop procedure bug8540|
# #
# BUG#6642: Stored procedure crash if expression with set function # BUG#6642: Stored procedure crash if expression with set function
# #
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3 (s1 int)| create table t3 (s1 int)|
--disable_warnings --disable_warnings
...@@ -3051,9 +2990,6 @@ drop table t3| ...@@ -3051,9 +2990,6 @@ drop table t3|
# BUG#8116: calling simple stored procedure twice in a row results # BUG#8116: calling simple stored procedure twice in a row results
# in server crash # in server crash
# #
--disable_warnings
drop table if exists t3|
--enable_warnings
create table t3 ( userid bigint(20) not null default 0 )| create table t3 ( userid bigint(20) not null default 0 )|
--disable_warnings --disable_warnings
...@@ -3296,7 +3232,6 @@ delete from t1| ...@@ -3296,7 +3232,6 @@ delete from t1|
drop procedure if exists bug6900| drop procedure if exists bug6900|
drop procedure if exists bug9074| drop procedure if exists bug9074|
drop procedure if exists bug6900_9074| drop procedure if exists bug6900_9074|
drop table if exists t3|
--enable_warnings --enable_warnings
create table t3 (w char unique, x char)| create table t3 (w char unique, x char)|
...@@ -3825,26 +3760,27 @@ drop procedure if exists bug7088_1| ...@@ -3825,26 +3760,27 @@ drop procedure if exists bug7088_1|
drop procedure if exists bug7088_2| drop procedure if exists bug7088_2|
--enable_warnings --enable_warnings
create procedure bug6063() # psergey: temporarily disabled until Bar fixes BUG#11986
lbel: begin end| # create procedure bug6063()
call bug6063()| # lbel: begin end|
# QQ Known bug: this will not show the label correctly. # call bug6063()|
show create procedure bug6063| # # QQ Known bug: this will not show the label correctly.
# show create procedure bug6063|
set character set utf8| #
create procedure bug7088_1() # set character set utf8|
label1: begin end label1| # create procedure bug7088_1()
create procedure bug7088_2() # label1: begin end label1|
läbel1: begin end| # create procedure bug7088_2()
call bug7088_1()| # läbel1: begin end|
call bug7088_2()| # call bug7088_1()|
set character set default| # call bug7088_2()|
show create procedure bug7088_1| # set character set default|
show create procedure bug7088_2| # show create procedure bug7088_1|
# show create procedure bug7088_2|
drop procedure bug6063| #
drop procedure bug7088_1| # drop procedure bug6063|
drop procedure bug7088_2| # drop procedure bug7088_1|
# drop procedure bug7088_2|
# #
# BUG#9565: "Wrong locking in stored procedure if a sub-sequent procedure # BUG#9565: "Wrong locking in stored procedure if a sub-sequent procedure
......
...@@ -491,15 +491,15 @@ create view v1 (a,a) as select 'a','a'; ...@@ -491,15 +491,15 @@ create view v1 (a,a) as select 'a','a';
# #
# SP variables inside view test # SP variables inside view test
# #
# QQ This can't be tested with the new table locking for functions, --disable_warnings
# QQ since views created in an SP can't be used within the same SP drop procedure if exists p1;
# QQ (just as for tables). Instead it fails with error 1146. --enable_warnings
#delimiter //; delimiter //;
#create procedure p1 () begin declare v int; create view v1 as select v; end;// create procedure p1 () begin declare v int; create view v1 as select v; end;//
#delimiter ;// delimiter ;//
#-- error 1351 -- error 1351
#call p1(); call p1();
#drop procedure p1; drop procedure p1;
# #
# updatablity should be transitive # updatablity should be transitive
......
...@@ -598,7 +598,7 @@ int ha_commit_trans(THD *thd, bool all) ...@@ -598,7 +598,7 @@ int ha_commit_trans(THD *thd, bool all)
my_xid xid= thd->transaction.xid.get_my_xid(); my_xid xid= thd->transaction.xid.get_my_xid();
DBUG_ENTER("ha_commit_trans"); DBUG_ENTER("ha_commit_trans");
if (thd->transaction.in_sub_stmt) if (thd->in_sub_stmt)
{ {
/* /*
Since we don't support nested statement transactions in 5.0, Since we don't support nested statement transactions in 5.0,
...@@ -717,7 +717,7 @@ int ha_rollback_trans(THD *thd, bool all) ...@@ -717,7 +717,7 @@ int ha_rollback_trans(THD *thd, bool all)
THD_TRANS *trans=all ? &thd->transaction.all : &thd->transaction.stmt; THD_TRANS *trans=all ? &thd->transaction.all : &thd->transaction.stmt;
bool is_real_trans=all || thd->transaction.all.nht == 0; bool is_real_trans=all || thd->transaction.all.nht == 0;
DBUG_ENTER("ha_rollback_trans"); DBUG_ENTER("ha_rollback_trans");
if (thd->transaction.in_sub_stmt) if (thd->in_sub_stmt)
{ {
/* /*
If we are inside stored function or trigger we should not commit or If we are inside stored function or trigger we should not commit or
......
...@@ -4656,7 +4656,7 @@ Item_func_sp::execute(Item **itp) ...@@ -4656,7 +4656,7 @@ Item_func_sp::execute(Item **itp)
THD *thd= current_thd; THD *thd= current_thd;
ulong old_client_capabilites; ulong old_client_capabilites;
int res= -1; int res= -1;
bool save_in_sub_stmt= thd->transaction.in_sub_stmt; bool save_in_sub_stmt= thd->in_sub_stmt;
my_bool save_no_send_ok; my_bool save_no_send_ok;
#ifndef NO_EMBEDDED_ACCESS_CHECKS #ifndef NO_EMBEDDED_ACCESS_CHECKS
st_sp_security_context save_ctx; st_sp_security_context save_ctx;
...@@ -4694,11 +4694,11 @@ Item_func_sp::execute(Item **itp) ...@@ -4694,11 +4694,11 @@ Item_func_sp::execute(Item **itp)
*/ */
tmp_disable_binlog(thd); /* don't binlog the substatements */ tmp_disable_binlog(thd); /* don't binlog the substatements */
thd->transaction.in_sub_stmt= TRUE; thd->in_sub_stmt= TRUE;
res= m_sp->execute_function(thd, args, arg_count, itp); res= m_sp->execute_function(thd, args, arg_count, itp);
thd->transaction.in_sub_stmt= save_in_sub_stmt; thd->in_sub_stmt= save_in_sub_stmt;
reenable_binlog(thd); reenable_binlog(thd);
if (res && mysql_bin_log.is_open() && if (res && mysql_bin_log.is_open() &&
(m_sp->m_chistics->daccess == SP_CONTAINS_SQL || (m_sp->m_chistics->daccess == SP_CONTAINS_SQL ||
......
...@@ -1175,6 +1175,43 @@ extern "C" byte* sp_sroutine_key(const byte *ptr, uint *plen, my_bool first) ...@@ -1175,6 +1175,43 @@ extern "C" byte* sp_sroutine_key(const byte *ptr, uint *plen, my_bool first)
} }
/*
Check if
- current statement (the one in thd->lex) needs table prelocking
- first routine in thd->lex->sroutines_list needs to execute its body in
prelocked mode.
SYNOPSIS
sp_get_prelocking_info()
thd Current thread, thd->lex is the statement to be
checked.
need_prelocking OUT TRUE - prelocked mode should be activated
before executing the statement
FALSE - Don't activate prelocking
first_no_prelocking OUT TRUE - Tables used by first routine in
thd->lex->sroutines_list should be
prelocked.
FALSE - Otherwise.
NOTES
This function assumes that for any "CALL proc(...)" statement routines_list
will have 'proc' as first element (it may have several, consider e.g.
"proc(sp_func(...)))". This property is currently guaranted by the parser.
*/
void sp_get_prelocking_info(THD *thd, bool *need_prelocking,
bool *first_no_prelocking)
{
Sroutine_hash_entry *routine;
routine= (Sroutine_hash_entry*)thd->lex->sroutines_list.first;
DBUG_ASSERT(routine);
bool first_is_procedure= (routine->key.str[0] == TYPE_ENUM_PROCEDURE);
*first_no_prelocking= first_is_procedure;
*need_prelocking= !first_is_procedure || test(routine->next);
}
/* /*
Auxilary function that adds new element to the set of stored routines Auxilary function that adds new element to the set of stored routines
used by statement. used by statement.
...@@ -1312,11 +1349,13 @@ static void sp_update_stmt_used_routines(THD *thd, LEX *lex, HASH *src) ...@@ -1312,11 +1349,13 @@ static void sp_update_stmt_used_routines(THD *thd, LEX *lex, HASH *src)
SYNOPSIS SYNOPSIS
sp_cache_routines_and_add_tables_aux() sp_cache_routines_and_add_tables_aux()
thd - thread context thd - thread context
lex - LEX representing statement lex - LEX representing statement
start - first routine from the list of routines to be cached start - first routine from the list of routines to be cached
(this list defines mentioned sub-set). (this list defines mentioned sub-set).
first_no_prelock - If true, don't add tables or cache routines used by
the body of the first routine (i.e. *start)
will be executed in non-prelocked mode.
NOTE NOTE
If some function is missing this won't be reported here. If some function is missing this won't be reported here.
Instead this fact will be discovered during query execution. Instead this fact will be discovered during query execution.
...@@ -1328,10 +1367,11 @@ static void sp_update_stmt_used_routines(THD *thd, LEX *lex, HASH *src) ...@@ -1328,10 +1367,11 @@ static void sp_update_stmt_used_routines(THD *thd, LEX *lex, HASH *src)
static bool static bool
sp_cache_routines_and_add_tables_aux(THD *thd, LEX *lex, sp_cache_routines_and_add_tables_aux(THD *thd, LEX *lex,
Sroutine_hash_entry *start) Sroutine_hash_entry *start,
bool first_no_prelock)
{ {
bool result= FALSE; bool result= FALSE;
bool first= TRUE;
DBUG_ENTER("sp_cache_routines_and_add_tables_aux"); DBUG_ENTER("sp_cache_routines_and_add_tables_aux");
for (Sroutine_hash_entry *rt= start; rt; rt= rt->next) for (Sroutine_hash_entry *rt= start; rt; rt= rt->next)
...@@ -1367,9 +1407,13 @@ sp_cache_routines_and_add_tables_aux(THD *thd, LEX *lex, ...@@ -1367,9 +1407,13 @@ sp_cache_routines_and_add_tables_aux(THD *thd, LEX *lex,
} }
if (sp) if (sp)
{ {
sp_update_stmt_used_routines(thd, lex, &sp->m_sroutines); if (!(first && first_no_prelock))
result|= sp->add_used_tables_to_table_list(thd, &lex->query_tables_last); {
sp_update_stmt_used_routines(thd, lex, &sp->m_sroutines);
result|= sp->add_used_tables_to_table_list(thd, &lex->query_tables_last);
}
} }
first= FALSE;
} }
DBUG_RETURN(result); DBUG_RETURN(result);
} }
...@@ -1382,20 +1426,22 @@ sp_cache_routines_and_add_tables_aux(THD *thd, LEX *lex, ...@@ -1382,20 +1426,22 @@ sp_cache_routines_and_add_tables_aux(THD *thd, LEX *lex,
SYNOPSIS SYNOPSIS
sp_cache_routines_and_add_tables() sp_cache_routines_and_add_tables()
thd - thread context thd - thread context
lex - LEX representing statement lex - LEX representing statement
first_no_prelock - If true, don't add tables or cache routines used by
the body of the first routine (i.e. *start)
RETURN VALUE RETURN VALUE
TRUE - some tables were added TRUE - some tables were added
FALSE - no tables were added. FALSE - no tables were added.
*/ */
bool bool
sp_cache_routines_and_add_tables(THD *thd, LEX *lex) sp_cache_routines_and_add_tables(THD *thd, LEX *lex, bool first_no_prelock)
{ {
return sp_cache_routines_and_add_tables_aux(thd, lex, return sp_cache_routines_and_add_tables_aux(thd, lex,
(Sroutine_hash_entry *)lex->sroutines_list.first); (Sroutine_hash_entry *)lex->sroutines_list.first,
first_no_prelock);
} }
...@@ -1417,8 +1463,8 @@ sp_cache_routines_and_add_tables_for_view(THD *thd, LEX *lex, LEX *aux_lex) ...@@ -1417,8 +1463,8 @@ sp_cache_routines_and_add_tables_for_view(THD *thd, LEX *lex, LEX *aux_lex)
Sroutine_hash_entry **last_cached_routine_ptr= Sroutine_hash_entry **last_cached_routine_ptr=
(Sroutine_hash_entry **)lex->sroutines_list.next; (Sroutine_hash_entry **)lex->sroutines_list.next;
sp_update_stmt_used_routines(thd, lex, &aux_lex->sroutines); sp_update_stmt_used_routines(thd, lex, &aux_lex->sroutines);
(void)sp_cache_routines_and_add_tables_aux(thd, lex, (void)sp_cache_routines_and_add_tables_aux(thd, lex,
*last_cached_routine_ptr); *last_cached_routine_ptr, FALSE);
} }
...@@ -1456,7 +1502,8 @@ sp_cache_routines_and_add_tables_for_triggers(THD *thd, LEX *lex, ...@@ -1456,7 +1502,8 @@ sp_cache_routines_and_add_tables_for_triggers(THD *thd, LEX *lex,
} }
} }
(void)sp_cache_routines_and_add_tables_aux(thd, lex, (void)sp_cache_routines_and_add_tables_aux(thd, lex,
*last_cached_routine_ptr); *last_cached_routine_ptr,
FALSE);
} }
} }
......
...@@ -79,10 +79,13 @@ sp_show_status_function(THD *thd, const char *wild); ...@@ -79,10 +79,13 @@ sp_show_status_function(THD *thd, const char *wild);
Procedures for pre-caching of stored routines and building table list Procedures for pre-caching of stored routines and building table list
for prelocking. for prelocking.
*/ */
void sp_get_prelocking_info(THD *thd, bool *need_prelocking,
bool *first_no_prelocking);
void sp_add_used_routine(LEX *lex, Query_arena *arena, void sp_add_used_routine(LEX *lex, Query_arena *arena,
sp_name *rt, char rt_type); sp_name *rt, char rt_type);
void sp_update_sp_used_routines(HASH *dst, HASH *src); void sp_update_sp_used_routines(HASH *dst, HASH *src);
bool sp_cache_routines_and_add_tables(THD *thd, LEX *lex); bool sp_cache_routines_and_add_tables(THD *thd, LEX *lex,
bool first_no_prelock);
void sp_cache_routines_and_add_tables_for_view(THD *thd, LEX *lex, void sp_cache_routines_and_add_tables_for_view(THD *thd, LEX *lex,
LEX *aux_lex); LEX *aux_lex);
void sp_cache_routines_and_add_tables_for_triggers(THD *thd, LEX *lex, void sp_cache_routines_and_add_tables_for_triggers(THD *thd, LEX *lex,
......
...@@ -22,6 +22,13 @@ ...@@ -22,6 +22,13 @@
#pragma interface /* gcc class implementation */ #pragma interface /* gcc class implementation */
#endif #endif
/*
Stored procedures/functions cache. This is used as follows:
* Each thread has its own cache.
* Each sp_head object is put into its thread cache after creation and is
removed from there on its deletion.
*/
class sp_head; class sp_head;
class sp_cache; class sp_cache;
...@@ -31,16 +38,20 @@ void sp_cache_init(); ...@@ -31,16 +38,20 @@ void sp_cache_init();
/* Clear the cache *cp and set *cp to NULL */ /* Clear the cache *cp and set *cp to NULL */
void sp_cache_clear(sp_cache **cp); void sp_cache_clear(sp_cache **cp);
/* Insert an SP to cache. If 'cp' points to NULL, it's set to a new cache */ /* Insert an SP into cache. If 'cp' points to NULL, it's set to a new cache */
void sp_cache_insert(sp_cache **cp, sp_head *sp); void sp_cache_insert(sp_cache **cp, sp_head *sp);
/* Lookup an SP in cache */ /* Lookup an SP in cache */
sp_head *sp_cache_lookup(sp_cache **cp, sp_name *name); sp_head *sp_cache_lookup(sp_cache **cp, sp_name *name);
/* Remove an SP from cache. Returns true if something was removed */ /*
Remove an SP from cache, and also bump the Cversion number so all other
caches are invalidated.
Returns true if something was removed.
*/
bool sp_cache_remove(sp_cache **cp, sp_name *name); bool sp_cache_remove(sp_cache **cp, sp_name *name);
/* Invalidate a cache */ /* Invalidate all existing SP caches by bumping Cversion number. */
void sp_cache_invalidate(); void sp_cache_invalidate();
......
...@@ -883,7 +883,10 @@ sp_head::execute_procedure(THD *thd, List<Item> *args) ...@@ -883,7 +883,10 @@ sp_head::execute_procedure(THD *thd, List<Item> *args)
octx= new sp_rcontext(csize, hmax, cmax); octx= new sp_rcontext(csize, hmax, cmax);
tmp_octx= TRUE; tmp_octx= TRUE;
} }
/* Evaluate SP arguments (i.e. get the values passed as parameters) */
// QQ: Should do type checking? // QQ: Should do type checking?
DBUG_PRINT("info",(" %.*s: eval args", m_name.length, m_name.str));
for (i = 0 ; (it= li++) && i < params ; i++) for (i = 0 ; (it= li++) && i < params ; i++)
{ {
sp_pvar_t *pvar= m_pcont->find_pvar(i); sp_pvar_t *pvar= m_pcont->find_pvar(i);
...@@ -920,6 +923,15 @@ sp_head::execute_procedure(THD *thd, List<Item> *args) ...@@ -920,6 +923,15 @@ sp_head::execute_procedure(THD *thd, List<Item> *args)
} }
} }
/*
Okay, got values for all arguments. Close tables that might be used by
arguments evaluation. If arguments evaluation required prelocking mode,
we'll leave it here.
*/
if (!thd->in_sub_stmt)
close_thread_tables(thd, 0, 0, 0);
DBUG_PRINT("info",(" %.*s: eval args done", m_name.length, m_name.str));
// The rest of the frame are local variables which are all IN. // The rest of the frame are local variables which are all IN.
// Default all variables to null (those with default clauses will // Default all variables to null (those with default clauses will
// be set by an set instruction). // be set by an set instruction).
...@@ -1464,8 +1476,27 @@ sp_lex_keeper::reset_lex_and_exec_core(THD *thd, uint *nextp, ...@@ -1464,8 +1476,27 @@ sp_lex_keeper::reset_lex_and_exec_core(THD *thd, uint *nextp,
implemented at the same time as ability not to store LEX for implemented at the same time as ability not to store LEX for
instruction if it is not really used. instruction if it is not really used.
*/ */
reinit_stmt_before_use(thd, m_lex);
if (thd->prelocked_mode == NON_PRELOCKED)
{
/*
This statement will enter/leave prelocked mode on its own.
Entering prelocked mode changes table list and related members
of LEX, so we'll need to restore them.
*/
if (lex_query_tables_own_last)
{
/*
We've already entered/left prelocked mode with this statement.
Attach the list of tables that need to be prelocked and mark m_lex
as having such list attached.
*/
*lex_query_tables_own_last= prelocking_tables;
m_lex->mark_as_requiring_prelocking(lex_query_tables_own_last);
}
}
reinit_stmt_before_use(thd, m_lex);
/* /*
If requested check whenever we have access to tables in LEX's table list If requested check whenever we have access to tables in LEX's table list
and open and lock them before executing instructtions core function. and open and lock them before executing instructtions core function.
...@@ -1483,6 +1514,26 @@ sp_lex_keeper::reset_lex_and_exec_core(THD *thd, uint *nextp, ...@@ -1483,6 +1514,26 @@ sp_lex_keeper::reset_lex_and_exec_core(THD *thd, uint *nextp,
thd->proc_info="closing tables"; thd->proc_info="closing tables";
close_thread_tables(thd); close_thread_tables(thd);
if (m_lex->query_tables_own_last)
{
/*
We've entered and left prelocking mode when executing statement
stored in m_lex.
m_lex->query_tables(->next_global)* list now has a 'tail' - a list
of tables that are added for prelocking. (If this is the first
execution, the 'tail' was added by open_tables(), otherwise we've
attached it above in this function).
Now we'll save the 'tail', and detach it.
*/
DBUG_ASSERT(!lex_query_tables_own_last ||
lex_query_tables_own_last == m_lex->query_tables_own_last &&
prelocking_tables == *(m_lex->query_tables_own_last));
lex_query_tables_own_last= m_lex->query_tables_own_last;
prelocking_tables= *lex_query_tables_own_last;
*lex_query_tables_own_last= NULL;
m_lex->mark_as_requiring_prelocking(NULL);
}
thd->rollback_item_tree_changes(); thd->rollback_item_tree_changes();
/* /*
......
...@@ -282,6 +282,10 @@ class sp_head :private Query_arena ...@@ -282,6 +282,10 @@ class sp_head :private Query_arena
/* /*
Multi-set representing optimized list of tables to be locked by this Multi-set representing optimized list of tables to be locked by this
routine. Does not include tables which are used by invoked routines. routine. Does not include tables which are used by invoked routines.
Note: for prelocking-free SPs this multiset is constructed too.
We do so because the same instance of sp_head may be called both
in prelocked mode and in non-prelocked mode.
*/ */
HASH m_sptabs; HASH m_sptabs;
...@@ -383,7 +387,8 @@ class sp_lex_keeper ...@@ -383,7 +387,8 @@ class sp_lex_keeper
public: public:
sp_lex_keeper(LEX *lex, bool lex_resp) sp_lex_keeper(LEX *lex, bool lex_resp)
: m_lex(lex), m_lex_resp(lex_resp) : m_lex(lex), m_lex_resp(lex_resp),
lex_query_tables_own_last(NULL)
{ {
lex->sp_lex_in_use= TRUE; lex->sp_lex_in_use= TRUE;
} }
...@@ -418,6 +423,25 @@ class sp_lex_keeper ...@@ -418,6 +423,25 @@ class sp_lex_keeper
for LEX deletion. for LEX deletion.
*/ */
bool m_lex_resp; bool m_lex_resp;
/*
Support for being able to execute this statement in two modes:
a) inside prelocked mode set by the calling procedure or its ancestor.
b) outside of prelocked mode, when this statement enters/leaves
prelocked mode itself.
*/
/*
List of additional tables this statement needs to lock when it
enters/leaves prelocked mode on its own.
*/
TABLE_LIST *prelocking_tables;
/*
The value m_lex->query_tables_own_last should be set to this when the
statement enters/leaves prelocked mode on its own.
*/
TABLE_LIST **lex_query_tables_own_last;
}; };
......
...@@ -391,6 +391,8 @@ static void mark_used_tables_as_free_for_reuse(THD *thd, TABLE *table) ...@@ -391,6 +391,8 @@ static void mark_used_tables_as_free_for_reuse(THD *thd, TABLE *table)
LOCK_open LOCK_open
skip_derived Set to 1 (0 = default) if we should not free derived skip_derived Set to 1 (0 = default) if we should not free derived
tables. tables.
stopper When closing tables from thd->open_tables(->next)*,
don't close/remove tables starting from stopper.
IMPLEMENTATION IMPLEMENTATION
Unlocks tables and frees derived tables. Unlocks tables and frees derived tables.
...@@ -474,6 +476,7 @@ void close_thread_tables(THD *thd, bool lock_in_use, bool skip_derived, ...@@ -474,6 +476,7 @@ void close_thread_tables(THD *thd, bool lock_in_use, bool skip_derived,
We are in prelocked mode, so we have to leave it now with doing We are in prelocked mode, so we have to leave it now with doing
implicit UNLOCK TABLES if need. implicit UNLOCK TABLES if need.
*/ */
DBUG_PRINT("info",("thd->prelocked_mode= NON_PRELOCKED"));
thd->prelocked_mode= NON_PRELOCKED; thd->prelocked_mode= NON_PRELOCKED;
if (prelocked_mode == PRELOCKED_UNDER_LOCK_TABLES) if (prelocked_mode == PRELOCKED_UNDER_LOCK_TABLES)
...@@ -1792,6 +1795,7 @@ memory to write 'DELETE FROM `%s`.`%s`' to the binary log",db,name); ...@@ -1792,6 +1795,7 @@ memory to write 'DELETE FROM `%s`.`%s`' to the binary log",db,name);
DBUG_RETURN(1); DBUG_RETURN(1);
} }
/* /*
Open all tables in list Open all tables in list
...@@ -1843,10 +1847,6 @@ int open_tables(THD *thd, TABLE_LIST **start, uint *counter) ...@@ -1843,10 +1847,6 @@ int open_tables(THD *thd, TABLE_LIST **start, uint *counter)
statement for which table list for prelocking is already built, let statement for which table list for prelocking is already built, let
us cache routines and try to build such table list. us cache routines and try to build such table list.
NOTE: If we want queries with functions to work under explicit
LOCK TABLES we have to additionaly lock mysql.proc table in it.
At least until Monty will fix SP loading :)
NOTE: We can't delay prelocking until we will met some sub-statement NOTE: We can't delay prelocking until we will met some sub-statement
which really uses tables, since this will imply that we have to restore which really uses tables, since this will imply that we have to restore
its table list to be able execute it in some other context. its table list to be able execute it in some other context.
...@@ -1860,16 +1860,23 @@ int open_tables(THD *thd, TABLE_LIST **start, uint *counter) ...@@ -1860,16 +1860,23 @@ int open_tables(THD *thd, TABLE_LIST **start, uint *counter)
mode we will have some locked tables, because queries which use only mode we will have some locked tables, because queries which use only
derived/information schema tables and views possible. Thus "counter" derived/information schema tables and views possible. Thus "counter"
may be still zero for prelocked statement... may be still zero for prelocked statement...
NOTE: The above notes may be out of date. Please wait for psergey to
document new prelocked behavior.
*/ */
if (!thd->prelocked_mode && !thd->lex->requires_prelocking() &&
thd->lex->sroutines.records) if (!thd->prelocked_mode && !thd->lex->requires_prelocking() &&
thd->lex->sroutines_list.elements)
{ {
bool first_no_prelocking, need_prelocking;
TABLE_LIST **save_query_tables_last= thd->lex->query_tables_last; TABLE_LIST **save_query_tables_last= thd->lex->query_tables_last;
DBUG_ASSERT(thd->lex->query_tables == *start); DBUG_ASSERT(thd->lex->query_tables == *start);
sp_get_prelocking_info(thd, &need_prelocking, &first_no_prelocking);
if (sp_cache_routines_and_add_tables(thd, thd->lex) || if ((sp_cache_routines_and_add_tables(thd, thd->lex,
*start) first_no_prelocking) ||
*start) && need_prelocking)
{ {
query_tables_last_own= save_query_tables_last; query_tables_last_own= save_query_tables_last;
*start= thd->lex->query_tables; *start= thd->lex->query_tables;
...@@ -1891,14 +1898,32 @@ int open_tables(THD *thd, TABLE_LIST **start, uint *counter) ...@@ -1891,14 +1898,32 @@ int open_tables(THD *thd, TABLE_LIST **start, uint *counter)
DBUG_RETURN(-1); DBUG_RETURN(-1);
} }
(*counter)++; (*counter)++;
if (!tables->table && if (!tables->table &&
!(tables->table= open_table(thd, tables, &new_frm_mem, &refresh, 0))) !(tables->table= open_table(thd, tables, &new_frm_mem, &refresh, 0)))
{ {
free_root(&new_frm_mem, MYF(MY_KEEP_PREALLOC)); free_root(&new_frm_mem, MYF(MY_KEEP_PREALLOC));
if (tables->view) if (tables->view)
{ {
/* VIEW placeholder */ /* VIEW placeholder */
(*counter)--; (*counter)--;
/*
tables->next_global list consists of two parts:
1) Query tables and underlying tables of views.
2) Tables used by all stored routines that this statement invokes on
execution.
We need to know where the bound between these two parts is. If we've
just opened a view, which was the last table in part #1, and it
has added its base tables after itself, adjust the boundary pointer
accordingly.
*/
if (query_tables_last_own &&
query_tables_last_own == &(tables->next_global) &&
tables->view->query_tables)
query_tables_last_own= tables->view->query_tables_last;
/* /*
Again if needed we have to get cache all routines used by this view Again if needed we have to get cache all routines used by this view
and add tables used by them to table list. and add tables used by them to table list.
...@@ -2323,6 +2348,7 @@ int lock_tables(THD *thd, TABLE_LIST *tables, uint count) ...@@ -2323,6 +2348,7 @@ int lock_tables(THD *thd, TABLE_LIST *tables, uint count)
and was marked as occupied during open_tables() as free for reuse. and was marked as occupied during open_tables() as free for reuse.
*/ */
mark_real_tables_as_free_for_reuse(first_not_own); mark_real_tables_as_free_for_reuse(first_not_own);
DBUG_PRINT("info",("prelocked_mode= PRELOCKED"));
thd->prelocked_mode= PRELOCKED; thd->prelocked_mode= PRELOCKED;
} }
} }
...@@ -2346,6 +2372,7 @@ int lock_tables(THD *thd, TABLE_LIST *tables, uint count) ...@@ -2346,6 +2372,7 @@ int lock_tables(THD *thd, TABLE_LIST *tables, uint count)
if (thd->lex->requires_prelocking()) if (thd->lex->requires_prelocking())
{ {
mark_real_tables_as_free_for_reuse(first_not_own); mark_real_tables_as_free_for_reuse(first_not_own);
DBUG_PRINT("info", ("thd->prelocked_mode= PRELOCKED_UNDER_LOCK_TABLES"));
thd->prelocked_mode= PRELOCKED_UNDER_LOCK_TABLES; thd->prelocked_mode= PRELOCKED_UNDER_LOCK_TABLES;
} }
} }
......
...@@ -174,7 +174,7 @@ THD::THD() ...@@ -174,7 +174,7 @@ THD::THD()
:Statement(CONVENTIONAL_EXECUTION, 0, ALLOC_ROOT_MIN_BLOCK_SIZE, 0), :Statement(CONVENTIONAL_EXECUTION, 0, ALLOC_ROOT_MIN_BLOCK_SIZE, 0),
Open_tables_state(), Open_tables_state(),
lock_id(&main_lock_id), lock_id(&main_lock_id),
user_time(0), global_read_lock(0), is_fatal_error(0), user_time(0), in_sub_stmt(FALSE), global_read_lock(0), is_fatal_error(0),
rand_used(0), time_zone_used(0), rand_used(0), time_zone_used(0),
last_insert_id_used(0), insert_id_used(0), clear_next_insert_id(0), last_insert_id_used(0), insert_id_used(0), clear_next_insert_id(0),
in_lock_tables(0), bootstrap(0), derived_tables_processing(FALSE), in_lock_tables(0), bootstrap(0), derived_tables_processing(FALSE),
......
...@@ -1132,6 +1132,10 @@ class THD :public Statement, ...@@ -1132,6 +1132,10 @@ class THD :public Statement,
thr_lock_type update_lock_default; thr_lock_type update_lock_default;
delayed_insert *di; delayed_insert *di;
my_bool tablespace_op; /* This is TRUE in DISCARD/IMPORT TABLESPACE */ my_bool tablespace_op; /* This is TRUE in DISCARD/IMPORT TABLESPACE */
/* TRUE if we are inside of trigger or stored function. */
bool in_sub_stmt;
/* container for handler's private per-connection data */ /* container for handler's private per-connection data */
void *ha_data[MAX_HA]; void *ha_data[MAX_HA];
struct st_transactions { struct st_transactions {
...@@ -1139,8 +1143,6 @@ class THD :public Statement, ...@@ -1139,8 +1143,6 @@ class THD :public Statement,
THD_TRANS all; // Trans since BEGIN WORK THD_TRANS all; // Trans since BEGIN WORK
THD_TRANS stmt; // Trans for current statement THD_TRANS stmt; // Trans for current statement
bool on; // see ha_enable_transaction() bool on; // see ha_enable_transaction()
/* TRUE if we are inside of trigger or stored function. */
bool in_sub_stmt;
XID xid; // transaction identifier XID xid; // transaction identifier
enum xa_states xa_state; // used by external XA only enum xa_states xa_state; // used by external XA only
/* /*
......
...@@ -2008,6 +2008,7 @@ void st_lex::cleanup_after_one_table_open() ...@@ -2008,6 +2008,7 @@ void st_lex::cleanup_after_one_table_open()
time_zone_tables_used= 0; time_zone_tables_used= 0;
if (sroutines.records) if (sroutines.records)
my_hash_reset(&sroutines); my_hash_reset(&sroutines);
sroutines_list.empty();
} }
......
...@@ -27,6 +27,7 @@ ...@@ -27,6 +27,7 @@
#include "sp_head.h" #include "sp_head.h"
#include "sp.h" #include "sp.h"
#include "sp_cache.h"
#ifdef HAVE_OPENSSL #ifdef HAVE_OPENSSL
/* /*
...@@ -124,7 +125,7 @@ static bool end_active_trans(THD *thd) ...@@ -124,7 +125,7 @@ static bool end_active_trans(THD *thd)
{ {
int error=0; int error=0;
DBUG_ENTER("end_active_trans"); DBUG_ENTER("end_active_trans");
if (unlikely(thd->transaction.in_sub_stmt)) if (unlikely(thd->in_sub_stmt))
{ {
my_error(ER_COMMIT_NOT_ALLOWED_IN_SF_OR_TRG, MYF(0)); my_error(ER_COMMIT_NOT_ALLOWED_IN_SF_OR_TRG, MYF(0));
DBUG_RETURN(1); DBUG_RETURN(1);
...@@ -147,11 +148,7 @@ static bool end_active_trans(THD *thd) ...@@ -147,11 +148,7 @@ static bool end_active_trans(THD *thd)
static bool begin_trans(THD *thd) static bool begin_trans(THD *thd)
{ {
int error=0; int error=0;
/* if (unlikely(thd->in_sub_stmt))
QQ: May be it is better to simply prohibit COMMIT and ROLLBACK in
stored routines as SQL2003 suggests?
*/
if (unlikely(thd->transaction.in_sub_stmt))
{ {
my_error(ER_COMMIT_NOT_ALLOWED_IN_SF_OR_TRG, MYF(0)); my_error(ER_COMMIT_NOT_ALLOWED_IN_SF_OR_TRG, MYF(0));
return 1; return 1;
...@@ -1340,11 +1337,7 @@ int end_trans(THD *thd, enum enum_mysql_completiontype completion) ...@@ -1340,11 +1337,7 @@ int end_trans(THD *thd, enum enum_mysql_completiontype completion)
int res= 0; int res= 0;
DBUG_ENTER("end_trans"); DBUG_ENTER("end_trans");
/* if (unlikely(thd->in_sub_stmt))
QQ: May be it is better to simply prohibit COMMIT and ROLLBACK in
stored routines as SQL2003 suggests?
*/
if (unlikely(thd->transaction.in_sub_stmt))
{ {
my_error(ER_COMMIT_NOT_ALLOWED_IN_SF_OR_TRG, MYF(0)); my_error(ER_COMMIT_NOT_ALLOWED_IN_SF_OR_TRG, MYF(0));
DBUG_RETURN(1); DBUG_RETURN(1);
...@@ -4129,9 +4122,8 @@ mysql_execute_command(THD *thd) ...@@ -4129,9 +4122,8 @@ mysql_execute_command(THD *thd)
goto error; goto error;
/* /*
By this moment all needed SPs should be in cache so no need By this moment all needed SPs should be in cache so no need to look
to look into DB. Moreover we may be unable to do it becuase into DB.
we may don't have read lock on mysql.proc
*/ */
if (!(sp= sp_find_procedure(thd, lex->spname, TRUE))) if (!(sp= sp_find_procedure(thd, lex->spname, TRUE)))
{ {
...@@ -4196,7 +4188,7 @@ mysql_execute_command(THD *thd) ...@@ -4196,7 +4188,7 @@ mysql_execute_command(THD *thd)
select_limit= thd->variables.select_limit; select_limit= thd->variables.select_limit;
thd->variables.select_limit= HA_POS_ERROR; thd->variables.select_limit= HA_POS_ERROR;
thd->row_count_func= 0; thd->row_count_func= 0;
tmp_disable_binlog(thd); /* don't binlog the substatements */ tmp_disable_binlog(thd); /* don't binlog the substatements */
res= sp->execute_procedure(thd, &lex->value_list); res= sp->execute_procedure(thd, &lex->value_list);
reenable_binlog(thd); reenable_binlog(thd);
......
...@@ -82,7 +82,7 @@ class Table_triggers_list: public Sql_alloc ...@@ -82,7 +82,7 @@ class Table_triggers_list: public Sql_alloc
if (bodies[event][time_type]) if (bodies[event][time_type])
{ {
bool save_in_sub_stmt= thd->transaction.in_sub_stmt; bool save_in_sub_stmt= thd->in_sub_stmt;
#ifndef EMBEDDED_LIBRARY #ifndef EMBEDDED_LIBRARY
/* Surpress OK packets in case if we will execute statements */ /* Surpress OK packets in case if we will execute statements */
my_bool nsok= thd->net.no_send_ok; my_bool nsok= thd->net.no_send_ok;
...@@ -111,11 +111,11 @@ class Table_triggers_list: public Sql_alloc ...@@ -111,11 +111,11 @@ class Table_triggers_list: public Sql_alloc
does NOT go into binlog. does NOT go into binlog.
*/ */
tmp_disable_binlog(thd); tmp_disable_binlog(thd);
thd->transaction.in_sub_stmt= TRUE; thd->in_sub_stmt= TRUE;
res= bodies[event][time_type]->execute_function(thd, 0, 0, 0); res= bodies[event][time_type]->execute_function(thd, 0, 0, 0);
thd->transaction.in_sub_stmt= save_in_sub_stmt; thd->in_sub_stmt= save_in_sub_stmt;
reenable_binlog(thd); reenable_binlog(thd);
#ifndef EMBEDDED_LIBRARY #ifndef EMBEDDED_LIBRARY
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment