firebird-qa/tests/bugs/core_4684_test.py

#coding:utf-8
#
# id:           bugs.core_4684
# title:        Error while preparing a complex query ("Too many Contexts of Relation/Procedure/Views. Maximum allowed is 256")
# decription:   
# tracker_id:   CORE-4684
# min_versions: ['2.5']
# versions:     2.5
# qmid:         None

import pytest
from firebird.qa import db_factory, isql_act, Action

# version: 2.5
# resources: None

substitutions_1 = []

init_script_1 = """
    recreate table tdetl(id int primary key, pid int);
    recreate table tmain(id int primary key, x int, constraint tmain_x_gtz check(x>0));
    commit;
    alter table tdetl add constraint tdetl_fk foreign key(pid) references tmain(id) on delete cascade;
    commit;
    set term ^;
    create or alter trigger tdetl_bi for tdetl active before insert as begin end ^
    create or alter trigger tdetl_ai for tdetl active after insert as begin end ^
    create or alter trigger tmain_bi for tmain inactive before insert as begin end ^
    create or alter trigger tmain_ai for tmain active after insert as begin end ^
    set term ;^
    commit;
"""

db_1 = db_factory(page_size=4096, sql_dialect=3, init=init_script_1)

test_script_1 = """
    set heading off;
    with recursive
    c as (
        select
             rc.rdb$relation_name child_tab
            ,rc.rdb$constraint_name child_fk
            ,ru.rdb$const_name_uq parent_uk
            ,rp.rdb$relation_name parent_tab
        from rdb$relation_constraints rc
        join rdb$ref_constraints ru on
             rc.rdb$constraint_name = ru.rdb$constraint_name
             and rc.rdb$constraint_type = 'FOREIGN KEY'
        join rdb$relation_constraints rp
             on ru.rdb$const_name_uq = rp.rdb$constraint_name
        where rc.rdb$relation_name <> rp.rdb$relation_name
    )
    ,d as(
        select
            0 i
            ,child_tab
            ,child_fk
            ,parent_uk
            ,parent_tab
        from c c0
        where not exists( select * from c cx where cx.parent_tab= c0.child_tab )
        
        union all
        
        select
            d.i+1
            ,c.child_tab
            ,c.child_fk
            ,c.parent_uk
            ,c.parent_tab
        from d
        join c on d.parent_tab = c.child_tab
    )
    ,e as(
        select
            i
            ,child_tab
            ,child_fk
            ,parent_uk
            ,parent_tab
            ,(select max(i) from d) as mi
        from d
    )
    ,f as(
        select distinct
            0 i
            ,child_tab
        from e where i=0
    
        UNION DISTINCT
    
        select
            1
            ,child_tab
        from (select child_tab from e where i>0 order by i)
    
        UNION DISTINCT
    
        select
            2
            ,parent_tab
        from e
        where i=mi
    )
    ,t as(
        select
            rt.rdb$trigger_name trg_name -- f.child_tab, rt.rdb$trigger_name, rt.rdb$trigger_type
        from f
        join rdb$triggers rt on f.child_tab = rt.rdb$relation_name
        where rt.rdb$system_flag=0 and rt.rdb$trigger_inactive=0
    )
    select 'alter trigger '||trim(trg_name)||' inactive' sql_expr
    from t
    union all
    select 'delete from '||trim(child_tab)
    from f
    union all
    select 'alter trigger '||trim(trg_name)||' active'
    from t;
"""

act_1 = isql_act('db_1', test_script_1, substitutions=substitutions_1)

expected_stdout_1 = """
alter trigger TDETL_BI inactive
alter trigger TDETL_AI inactive
alter trigger TMAIN_AI inactive
delete from TDETL
delete from TMAIN
alter trigger TDETL_BI active
alter trigger TDETL_AI active
alter trigger TMAIN_AI active
"""

@pytest.mark.version('>=2.5')
def test_1(act_1: Action):
    act_1.expected_stdout = expected_stdout_1
    act_1.execute()
    assert act_1.clean_stdout == act_1.clean_expected_stdout