#coding:utf-8

"""
ID:          issue-6869
ISSUE:       https://github.com/FirebirdSQL/firebird/issues/6869
TITLE:       Domain CHECK-expression can be ignored when we DROP objects that are involved in it
NOTES:
    [25.02.2023] pzotov
    Confirmed bug on 5.0.0.520.
    Checked on 5.0.0.959 - all OK.
"""

import pytest
from firebird.qa import *

init_script = """
    create domain dm_int as int;
    create table test(i dm_int);

    set term ^;
    create function fn_test(a_id dm_int) returns dm_int as
    begin
        return ( select min(i) from test );
    end
    ^
    set term ;^
    alter domain dm_int add constraint check ( value = (select fn_test(max(i)) from test) );
    commit;
"""
db = db_factory(init = init_script)

test_script = """
    set term ^;
    execute block as
    begin
        execute statement 'drop table test'; -- PASSED, despite having two dependent objects (function and domain expr.)
        execute statement 'drop function fn_test'; -- PASSED, despite having dependent object (domain expr.)
    end
    ^
    set term ;^
    commit;
"""

act = isql_act('db', test_script)

expected_stderr = """
    Statement failed, SQLSTATE = 42000
    unsuccessful metadata update
    -cannot delete
    -COLUMN TEST.I
    -there are 1 dependencies

    Statement failed, SQLSTATE = 42000
    unsuccessful metadata update
    -cannot delete
    -COLUMN TEST.I
    -there are 1 dependencies
"""

@pytest.mark.version('>=5.0')
def test_1(act: Action):
    act.expected_stderr = expected_stderr
    act.execute()
    assert act.clean_stderr == act.clean_expected_stderr