mirror of
https://github.com/MariaDB/server.git
synced 2026-01-09 13:04:51 +01:00
75142ff496
This change adds CURSOR declarations inside PACKAGE BODY.
PL/SQL mode:
SET sql_mode=ORACLE;
CREATE PACKAGE BODY pkg AS
CURSOR mc0 IS SELECT c0, c1 FROM t1;
PROCEDURE p1 AS
rec mc0%ROWTYPE;
BEGIN
OPEN mc0;
FETCH mc0 INTO rec;
CLOSE mc0
END;
END;
/
SQL/PSM mode:
SET sql_mode=DEFAULT;
CREATE PACKAGE BODY pkg
mc0 CURSOR FOR SELECT c0, c1 FROM t1;
PROCEDURE p1()
BEGIN
DECLARE rec ROW TYPE OF mc0;
OPEN mc0;
FETCH mc0 INTO rec;
CLOSE mc0
END;
END;
/
PACKAGE BODY cursors like local cursors
(declared inside a FUNCTION or a PROCEDURE) support:
- OPEN/FETCH/CLOSE
- FOR rec IN cur - an explicit cursor loop
- Using a cursor row as an anchored variable data type:
* DECLARE var cur%ROWTYPE; -- sql_mode=ORACLE
* DECLARE var ROW TYPE OF cur; -- sql_mode=DEFAULT
The patch details:
- Changing various class members and function/method parameters which
store a CURSOR run-time address from "uint" to sp_rcontext_addr.
A few classes now derive from sp_rcontext_addr instead of having
a "uint m_cursor;" member.
This change uses the same idea with what we did for SP variables,
when we implemented PACKAGE BODY variables a few years ago.
- Fixing the grammar in sql_yacc.yy to allow CURSOR declarations
inside PACKAGE BODY.
- Adding a new class sp_pcontext_top. It's used for the top level parse
context (of an sp_head). Note, its children contexts still use the old
class sp_pcontext.
sp_pcontext_top context additionally to sp_pcontext has:
const sp_head *m_sp; -- The pointer to the sp_head owning this context
Dynamic_array<sp_pcursor> m_member_cursors; -- PACKAGE BODY wide cursors
m_sp->m_parent->get_parse_context() is used to find the sp_pcontext
belonging to the parent PACKAGE BODY from a sp_pcontext_top instance
belonging to a PROCEDURE/FUNCTION sp_pcontext_top.
- Adding a new member in sp_rcontext:
Dynamic_array<sp_cursor*> m_member_cursors;
It's used to store run-time data of PACKAGE BODY wide cursors.
- Adding a new class sp_instr_copen2. It's used to open PACKAGE BODY cursors.
Unlike the usual cursors, PACKAGE BODY cursors:
* do not use the cursor stack (sp_rcontext::m_cstack)
* do not need a preceeding sp_instr_cpush
* do not need a following sp_instr_cpop
All cursor information such as "sp_lex_cursor" resides inside
sp_instr_copen2 itself (rather than inside sp_instr_cpush which is
used to store "sp_lex_cursor" in case of sp_instr_copen).
Note, the other cursor related instructions:
sp_instr_cfetch
sp_instr_cclose
sp_instr_cursor_copy_struct
do not need sp_instr_xxx2 counter-parts.
Thy just use sp_rcontext_addr to address cursors.
- Adding Sp_rcontext_handler_member
It's used to handle PACKAGE BODY members:
cursors and variables declared in the PACKAGE BODY,
when they are accessed from its executable initialization section:
CREATE PACKAGE BODY pkg AS
CURSOR mc0 IS SELECT c0, c1 FROM t1; -- A member (PACKAGE BODY cursor)
mv0 mc0%ROWTYPE; -- A member (PACKAGE BODY variable)
PROCEDURE p1 AS
BEGIN
-- Accessing members from here use sp_rcontext_handler_package_body
-- (members of the parent PACKAGE BODY)
OPEN mc0;
FETCH mc0 INTO mv0;
CLOSE mc0;
END;
BEGIN
-- NEW:
-- Accessing members from here use sp_rcontext_handler_member
-- (PACKAGE BODY own members)
OPEN mc0;
FETCH mc0 INTO mv0;
CLOSE mc0;
END;
/
Member variables and cursor are now marked with the "MEMBER." prefix
in the "SHOW PACKAGE BODY code" output.
Some old MTR tests have been re-recorded accordingly.
- Adding new virtual methods into Sp_rcontext_handler:
virtual const sp_variable *get_pvariable(const sp_pcontext *pctx,
uint offset) const;
virtual const sp_pcursor *get_pcursor(const sp_pcontext *pctx,
uint offset) const;
They're used from sp_instr::print() virtual implementations.
They internally calculate a proper sp_pcontext using as a parameter
the sp_pcontext pointed by sp_instr::m_ctx.
For example, Sp_handler_package_body::get_pvariable()/get_pcursor()
accesses to this sp_pcontext:
m_ctx->top_context()->m_sp->m_parent->get_parse_context(),
i.e. the parse context of the PACKAGE BODY which is the parent for
the current package PROCEDURE of FUNCTION an sp_instr belongs to.
- Adding a new method LEX::find_cursor(). It searches for a cursor in
this order:
1. Local cursors in the nearst surrounding BEGIN/END block.
2a. A member cursor of the current PACKAGE BODY
(used from the PACKAGE BODY initialization section)
OR
2b. A member cursor of the parrent PACKAGE BODY
(used from a package PROCEDURE or a package FUNCTION)
Adding a new method LEX::find_cursor_with_error().
In case when a cursor is not found, it automatically
raises the ER_SP_CURSOR_MISMATCH SQL condition into
the diagnostics area.
- Adding a new method sp_head::add_instr_copenX().
It creates sp_instr_copen for local cursors,
or sp_instr_copen2 for non-local cursors.
- Adding a new abstract class sp_lex_cursor_instr.
It's used a common parent class for a few sp_instr_xxx classes,
including the new sp_instr_copen2.
This change is needed to avoid code duplication.
- Adding a new protected method sp_instr::print_cmd_and_var(), to print
an instruction using this format: "command name@offset".
It's used from a few implementations of sp_instr_xxx::print(),
including sp_instr_copen2::print().
This change is also needed to avoid code duplication.
- Adding a new method sp_pcontext::frame_for_members_candidate(),
to distinguish easier between local cursors/variables and
PACKAGE BODY cursors/variables.
- Fixing "struct Lex_for_loop_st" to addionally store
a const pointer to Sp_rcontext_handler, to distinguish between:
* FOR rec IN local_cursor
* FOR rec IN package_body_cursor
178 lines
7.5 KiB
Text
178 lines
7.5 KiB
Text
# restart
|
|
drop table if exists test.marker;
|
|
create table test.marker(a int);
|
|
update performance_schema.setup_consumers set enabled='NO';
|
|
update performance_schema.setup_instruments set enabled='NO';
|
|
update performance_schema.setup_instruments set enabled='YES'
|
|
where name like "wait/io/table/%";
|
|
truncate table performance_schema.events_waits_history_long;
|
|
flush global status;
|
|
flush tables;
|
|
# We are forced to suppress here the server response.
|
|
optimize table mysql.user;
|
|
optimize table mysql.db;
|
|
optimize table mysql.proxies_priv;
|
|
optimize table mysql.roles_mapping;
|
|
optimize table mysql.tables_priv;
|
|
optimize table mysql.procs_priv;
|
|
optimize table mysql.servers;
|
|
optimize table mysql.roles_mapping;
|
|
update performance_schema.setup_consumers set enabled='YES';
|
|
update performance_schema.setup_objects set enabled='YES'
|
|
where object_type='TABLE' and object_schema= 'mysql';
|
|
flush privileges;
|
|
insert into test.marker set a = 1;
|
|
insert into test.marker set a = 1;
|
|
insert into test.marker set a = 1;
|
|
show global variables like "performance_schema%";
|
|
Variable_name Value
|
|
performance_schema ON
|
|
performance_schema_accounts_size 100
|
|
performance_schema_digests_size 200
|
|
performance_schema_events_stages_history_long_size 1000
|
|
performance_schema_events_stages_history_size 10
|
|
performance_schema_events_statements_history_long_size 1000
|
|
performance_schema_events_statements_history_size 10
|
|
performance_schema_events_transactions_history_long_size 1000
|
|
performance_schema_events_transactions_history_size 10
|
|
performance_schema_events_waits_history_long_size 10000
|
|
performance_schema_events_waits_history_size 10
|
|
performance_schema_hosts_size 100
|
|
performance_schema_max_cond_classes 90
|
|
performance_schema_max_cond_instances 1500
|
|
performance_schema_max_digest_length 1024
|
|
performance_schema_max_file_classes 80
|
|
performance_schema_max_file_handles 32768
|
|
performance_schema_max_file_instances 10000
|
|
performance_schema_max_index_stat 5000
|
|
performance_schema_max_memory_classes 320
|
|
performance_schema_max_metadata_locks 10000
|
|
performance_schema_max_mutex_classes 210
|
|
performance_schema_max_mutex_instances 5000
|
|
performance_schema_max_prepared_statements_instances 100
|
|
performance_schema_max_program_instances 5000
|
|
performance_schema_max_rwlock_classes 50
|
|
performance_schema_max_rwlock_instances 5000
|
|
performance_schema_max_socket_classes 10
|
|
performance_schema_max_socket_instances 1000
|
|
performance_schema_max_sql_text_length 1024
|
|
performance_schema_max_stage_classes 160
|
|
performance_schema_max_statement_classes 228
|
|
performance_schema_max_statement_stack 10
|
|
performance_schema_max_table_handles 1000
|
|
performance_schema_max_table_instances 500
|
|
performance_schema_max_table_lock_stat 500
|
|
performance_schema_max_thread_classes 50
|
|
performance_schema_max_thread_instances 400
|
|
performance_schema_session_connect_attrs_size 2048
|
|
performance_schema_setup_actors_size 100
|
|
performance_schema_setup_objects_size 100
|
|
performance_schema_users_size 100
|
|
show global status like "performance_schema%";
|
|
Variable_name Value
|
|
Performance_schema_accounts_lost 0
|
|
Performance_schema_cond_classes_lost 0
|
|
Performance_schema_cond_instances_lost 0
|
|
Performance_schema_digest_lost 0
|
|
Performance_schema_file_classes_lost 0
|
|
Performance_schema_file_handles_lost 0
|
|
Performance_schema_file_instances_lost 0
|
|
Performance_schema_hosts_lost 0
|
|
Performance_schema_index_stat_lost 0
|
|
Performance_schema_locker_lost 0
|
|
Performance_schema_memory_classes_lost 0
|
|
Performance_schema_metadata_lock_lost 0
|
|
Performance_schema_mutex_classes_lost 0
|
|
Performance_schema_mutex_instances_lost 0
|
|
Performance_schema_nested_statement_lost 0
|
|
Performance_schema_prepared_statements_lost 0
|
|
Performance_schema_program_lost 0
|
|
Performance_schema_rwlock_classes_lost 0
|
|
Performance_schema_rwlock_instances_lost 0
|
|
Performance_schema_session_connect_attrs_lost 0
|
|
Performance_schema_socket_classes_lost 0
|
|
Performance_schema_socket_instances_lost 0
|
|
Performance_schema_stage_classes_lost 0
|
|
Performance_schema_statement_classes_lost 0
|
|
Performance_schema_table_handles_lost 0
|
|
Performance_schema_table_instances_lost 0
|
|
Performance_schema_table_lock_stat_lost 0
|
|
Performance_schema_thread_classes_lost 0
|
|
Performance_schema_thread_instances_lost 0
|
|
Performance_schema_users_lost 0
|
|
update performance_schema.setup_consumers set enabled='NO';
|
|
select event_name,
|
|
left(source, locate(":", source)) as short_source,
|
|
object_type, object_schema,
|
|
if (locate("#sql-", object_name), "#sql-XXXX", object_name)
|
|
as pretty_name,
|
|
operation, number_of_bytes
|
|
from performance_schema.events_waits_history_long
|
|
where event_name like 'wait/io/table/%'
|
|
and object_schema in ("test", "mysql")
|
|
order by thread_id, event_id;
|
|
event_name short_source object_type object_schema pretty_name operation number_of_bytes
|
|
wait/io/table/sql/handler TABLE mysql global_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql global_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql global_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql global_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql global_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql global_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql db fetch 1
|
|
wait/io/table/sql/handler TABLE mysql proxies_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql proxies_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql proxies_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql proxies_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql proxies_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql roles_mapping fetch 1
|
|
wait/io/table/sql/handler TABLE mysql tables_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql tables_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql procs_priv fetch 1
|
|
wait/io/table/sql/handler TABLE mysql servers fetch 1
|
|
wait/io/table/sql/handler TABLE mysql table_stats fetch 1
|
|
wait/io/table/sql/handler TABLE mysql column_stats fetch 1
|
|
wait/io/table/sql/handler TABLE test marker insert 1
|
|
wait/io/table/sql/handler TABLE test marker insert 1
|
|
wait/io/table/sql/handler TABLE test marker insert 1
|
|
show global status like 'performance_schema_%';
|
|
Variable_name Value
|
|
Performance_schema_accounts_lost 0
|
|
Performance_schema_cond_classes_lost 0
|
|
Performance_schema_cond_instances_lost 0
|
|
Performance_schema_digest_lost 0
|
|
Performance_schema_file_classes_lost 0
|
|
Performance_schema_file_handles_lost 0
|
|
Performance_schema_file_instances_lost 0
|
|
Performance_schema_hosts_lost 0
|
|
Performance_schema_index_stat_lost 0
|
|
Performance_schema_locker_lost 0
|
|
Performance_schema_memory_classes_lost 0
|
|
Performance_schema_metadata_lock_lost 0
|
|
Performance_schema_mutex_classes_lost 0
|
|
Performance_schema_mutex_instances_lost 0
|
|
Performance_schema_nested_statement_lost 0
|
|
Performance_schema_prepared_statements_lost 0
|
|
Performance_schema_program_lost 0
|
|
Performance_schema_rwlock_classes_lost 0
|
|
Performance_schema_rwlock_instances_lost 0
|
|
Performance_schema_session_connect_attrs_lost 0
|
|
Performance_schema_socket_classes_lost 0
|
|
Performance_schema_socket_instances_lost 0
|
|
Performance_schema_stage_classes_lost 0
|
|
Performance_schema_statement_classes_lost 0
|
|
Performance_schema_table_handles_lost 0
|
|
Performance_schema_table_instances_lost 0
|
|
Performance_schema_table_lock_stat_lost 0
|
|
Performance_schema_thread_classes_lost 0
|
|
Performance_schema_thread_instances_lost 0
|
|
Performance_schema_users_lost 0
|
|
truncate performance_schema.events_waits_history_long;
|
|
flush global status;
|
|
update performance_schema.setup_consumers set enabled='NO';
|
|
truncate performance_schema.events_waits_history_long;
|
|
drop table test.marker;
|
|
flush global status;
|
|
update performance_schema.setup_instruments set enabled='YES';
|
|
update performance_schema.setup_consumers set enabled='YES';
|
|
update performance_schema.setup_objects set enabled='NO'
|
|
where object_type='TABLE' and object_schema= 'mysql';
|