#coding:utf-8

"""
ID:          issue-6117
ISSUE:       6117
TITLE:       Varchar computed column length stores incorrect and invalid values for field
DESCRIPTION:
  ONE of test parts works fine.
  There is still problem with accommodation of resulting string in COMPUITED BY
  column when its declared length ("varchar(20)") is equal to the total of lengths
  of concatenated columns.
  Because of this one of check statements was temp-ly disabled.
  See comment in the ticked 27/Jun/18 05:27 AM.
JIRA:        CORE-5857
FBTEST:      bugs.core_5857
"""

import pytest
from firebird.qa import *

db = db_factory(charset='UTF8')

test_script = """
    recreate table test (
        id int,
        vc_default_user varchar(10) character set utf8 default user,
        vc_default_literal varchar(10) character set utf8  default 'Кондуит',
        vc_generated varchar(20) computed by (vc_default_user || ' ' || vc_default_literal)
    );

    insert into test values( 1, 'Австралия', 'Антарктида');
    insert into test values( 2, 'Швамбрания', 'Антарктида');
    commit;

    set count on;
    set list on;

    select
         rf.rdb$field_name
        ,ff.rdb$field_length
        ,ff.rdb$character_length
        ,ff.rdb$character_set_id
        ,ff.rdb$collation_id
        ,ff.rdb$field_type
        ,ff.rdb$field_sub_type
    from rdb$relation_fields rf
    join rdb$fields ff on rf.rdb$field_source = ff.rdb$field_name
    where upper(rf.rdb$relation_name) = upper('test')
    order by 1
    ;

    select vc_generated from test where id = 1;

    -- temply disabled: select vc_generated from test where id = 2;
    --    Statement failed, SQLSTATE = 22001
    --    arithmetic exception, numeric overflow, or string truncation
    --    -string right truncation
    --    -expected length 20, actual 21
"""

act = isql_act('db', test_script)

expected_stdout = """
    RDB$FIELD_NAME                  ID
    RDB$FIELD_LENGTH                4
    RDB$CHARACTER_LENGTH            <null>
    RDB$CHARACTER_SET_ID            <null>
    RDB$COLLATION_ID                <null>
    RDB$FIELD_TYPE                  8
    RDB$FIELD_SUB_TYPE              0
    RDB$FIELD_NAME                  VC_DEFAULT_LITERAL
    RDB$FIELD_LENGTH                40
    RDB$CHARACTER_LENGTH            10
    RDB$CHARACTER_SET_ID            4
    RDB$COLLATION_ID                0
    RDB$FIELD_TYPE                  37
    RDB$FIELD_SUB_TYPE              0
    RDB$FIELD_NAME                  VC_DEFAULT_USER
    RDB$FIELD_LENGTH                40
    RDB$CHARACTER_LENGTH            10
    RDB$CHARACTER_SET_ID            4
    RDB$COLLATION_ID                0
    RDB$FIELD_TYPE                  37
    RDB$FIELD_SUB_TYPE              0
    RDB$FIELD_NAME                  VC_GENERATED
    RDB$FIELD_LENGTH                80
    RDB$CHARACTER_LENGTH            20
    RDB$CHARACTER_SET_ID            4
    RDB$COLLATION_ID                0
    RDB$FIELD_TYPE                  37
    RDB$FIELD_SUB_TYPE              0
    Records affected: 4
    VC_GENERATED                    Австралия Антарктида
    Records affected: 1
"""

@pytest.mark.version('>=3.0')
def test_1(act: Action):
    act.expected_stdout = expected_stdout
    act.execute()
    assert act.clean_stdout == act.clean_expected_stdout