mirror of
https://github.com/FirebirdSQL/firebird-qa.git
synced 2025-01-22 21:43:06 +01:00
133 lines
3.1 KiB
Python
133 lines
3.1 KiB
Python
#coding:utf-8
|
|
|
|
"""
|
|
ID: issue-628
|
|
ISSUE: 628
|
|
TITLE: IB server stalled by simple script
|
|
DESCRIPTION:
|
|
::: NB :::
|
|
### Name of original test has no any relation with actual task of this test: ###
|
|
https://github.com/FirebirdSQL/fbtcs/blob/master/GTCS/tests/CF_ISQL_23.script
|
|
|
|
Issue in original script: bug #585624 IB server stalled by simple script"
|
|
Found in FB tracker as: http://tracker.firebirdsql.org/browse/CORE-297
|
|
Fixed in 1.5.0
|
|
JIRA: CORE-297
|
|
"""
|
|
|
|
import pytest
|
|
from firebird.qa import *
|
|
|
|
db = db_factory(charset='ISO8859_1')
|
|
|
|
test_script = """
|
|
set term ^;
|
|
create procedure group_copy (
|
|
source integer,
|
|
destination integer)
|
|
as
|
|
begin
|
|
exit;
|
|
end^
|
|
|
|
create procedure insert_values (
|
|
cont integer,
|
|
d_group integer)
|
|
as
|
|
begin
|
|
exit;
|
|
end^
|
|
set term ;^
|
|
|
|
create table groups (
|
|
gr_id integer not null,
|
|
gr_name varchar(40) character set iso8859_1 not null
|
|
collate de_de
|
|
);
|
|
|
|
create table test (
|
|
id integer not null,
|
|
t_group integer not null
|
|
);
|
|
|
|
alter table groups add constraint pk_groups primary key (gr_id);
|
|
alter table test add constraint pk_test primary key (id, t_group);
|
|
alter table test add constraint fk_test foreign key (t_group) references groups (gr_id);
|
|
|
|
set term ^;
|
|
alter procedure group_copy (
|
|
source integer,
|
|
destination integer)
|
|
as
|
|
begin
|
|
insert into test( id, t_group )
|
|
select a.id, :destination
|
|
from test a
|
|
where a.t_group = :source
|
|
and not exists (
|
|
select * from test b
|
|
where b.id = a.id
|
|
and :destination = b.t_group
|
|
);
|
|
end
|
|
^
|
|
|
|
alter procedure insert_values (
|
|
cont integer,
|
|
d_group integer)
|
|
as
|
|
declare anz integer;
|
|
begin
|
|
anz = 0;
|
|
|
|
while ( anz < cont ) do
|
|
begin
|
|
if ( not exists (
|
|
select id
|
|
from test where id = :anz
|
|
and t_group = :d_group
|
|
)
|
|
) then
|
|
insert into test( id, t_group ) values( :anz, :d_group );
|
|
|
|
anz = anz +1;
|
|
end
|
|
end
|
|
^
|
|
set term ;^
|
|
commit;
|
|
|
|
|
|
insert into groups values ( 1 , 'Group1' );
|
|
insert into groups values ( 2 , 'Group2' );
|
|
commit;
|
|
execute procedure insert_values( 3000 , 1);
|
|
commit;
|
|
|
|
delete from test where t_group = 2;
|
|
execute procedure group_copy( 1 , 2 );
|
|
commit;
|
|
|
|
set list on;
|
|
select count(*) from test;
|
|
select * from groups;
|
|
|
|
"""
|
|
|
|
act = isql_act('db', test_script, substitutions=[('=', ''), ('[ \t]+', ' ')])
|
|
|
|
expected_stdout = """
|
|
COUNT 6000
|
|
GR_ID 1
|
|
GR_NAME Group1
|
|
GR_ID 2
|
|
GR_NAME Group2
|
|
"""
|
|
|
|
@pytest.mark.version('>=3')
|
|
def test_1(act: Action):
|
|
act.expected_stdout = expected_stdout
|
|
act.execute()
|
|
assert act.clean_stdout == act.clean_expected_stdout
|
|
|