import os
import sys
import inspect
import pyerrors.input.sfcf as sfin
import shutil
import pytest

current_dir = os.path.dirname(os.path.abspath(inspect.getfile(inspect.currentframe())))
parent_dir = os.path.dirname(current_dir)
sys.path.insert(0, parent_dir)


def build_test_environment(path, env_type, cfgs, reps):
    shutil.copytree("tests/data/sfcf_test/data_"+env_type, (path + "/data_" + env_type))
    if env_type == "o":
        for i in range(2, cfgs+1):
            shutil.copytree(path + "/data_o/test_r0/cfg1", path + "/data_o/test_r0/cfg"+str(i))
        for i in range(1, reps):
            shutil.copytree(path + "/data_o/test_r0", path + "/data_o/test_r"+str(i))
    elif env_type == "c":
        for i in range(2, cfgs+1):
            shutil.copy(path + "/data_c/data_c_r0/data_c_r0_n1", path + "/data_c/data_c_r0/data_c_r0_n"+str(i))
        for i in range(1, reps):
            os.mkdir(path + "/data_c/data_c_r"+str(i))
            for j in range(1, cfgs+1):
                shutil.copy(path + "/data_c/data_c_r0/data_c_r0_n1", path + "/data_c/data_c_r"+str(i)+"/data_c_r"+str(i)+"_n"+str(j))
    elif env_type == "a":
        for i in range(1, reps):
            for corr in ["f_1", "f_A", "F_V0"]:
                shutil.copy(path + "/data_a/data_a_r0." + corr, path + "/data_a/data_a_r" + str(i) + "." + corr)


def test_o_bb(tmp_path):
    build_test_environment(str(tmp_path), "o", 5, 3)
    f_1 = sfin.read_sfcf(str(tmp_path) + "/data_o", "test", "f_1", quarks="lquark lquark", wf=0, wf2=0, version="2.0", corr_type="bb")
    print(f_1)
    assert len(f_1) == 1
    assert list(f_1[0].shape.keys()) == ["test_|r0", "test_|r1", "test_|r2"]
    assert f_1[0].value == 351.1941525454502


def test_o_bi(tmp_path):
    build_test_environment(str(tmp_path), "o", 5, 3)
    f_A = sfin.read_sfcf(str(tmp_path) + "/data_o", "test", "f_A", quarks="lquark lquark", wf=0, version="2.0")
    print(f_A)
    assert len(f_A) == 3
    assert list(f_A[0].shape.keys()) == ["test_|r0", "test_|r1", "test_|r2"]
    assert f_A[0].value == 65.4711887279723
    assert f_A[1].value == 1.0447210336915187
    assert f_A[2].value == -41.025094911185185


def test_o_bi_files(tmp_path):
    build_test_environment(str(tmp_path), "o", 10, 3)
    f_A = sfin.read_sfcf(str(tmp_path) + "/data_o", "test", "f_A", quarks="lquark lquark", wf=0, version="2.0",
                         files=[["cfg" + str(i) for i in range(1, 11, 2)], ["cfg" + str(i) for i in range(2, 11, 2)], ["cfg" + str(i) for i in range(1, 11, 2)]])
    print(f_A)
    assert len(f_A) == 3
    assert list(f_A[0].shape.keys()) == ["test_|r0", "test_|r1", "test_|r2"]
    assert f_A[0].value == 65.4711887279723
    assert f_A[1].value == 1.0447210336915187
    assert f_A[2].value == -41.025094911185185


def test_o_bib(tmp_path):
    build_test_environment(str(tmp_path), "o", 5, 3)
    f_V0 = sfin.read_sfcf(str(tmp_path) + "/data_o", "test", "F_V0", quarks="lquark lquark", wf=0, wf2=0, version="2.0", corr_type="bib")
    print(f_V0)
    assert len(f_V0) == 3
    assert list(f_V0[0].shape.keys()) == ["test_|r0", "test_|r1", "test_|r2"]
    assert f_V0[0] == 683.6776090085115
    assert f_V0[1] == 661.3188585582334
    assert f_V0[2] == 683.6776090081005


def test_simple_multi_o(tmp_path):
    build_test_environment(str(tmp_path), "o", 5, 3)
    corrs = sfin.read_sfcf_multi(str(tmp_path) + "/data_o", "test", ["F_V0"], quarks_list=["lquark lquark"], wf1_list=[0], wf2_list=[0], version="2.0", corr_type_list=["bib"])
    f_V0 = corrs["F_V0"]['lquark lquark']['0']['0']['0']
    assert len(f_V0) == 3
    assert list(f_V0[0].shape.keys()) == ["test_|r0", "test_|r1", "test_|r2"]
    assert f_V0[0] == 683.6776090085115
    assert f_V0[1] == 661.3188585582334
    assert f_V0[2] == 683.6776090081005


def test_dict_multi_o(tmp_path):
    build_test_environment(str(tmp_path), "o", 5, 3)
    corrs = sfin.read_sfcf_multi(str(tmp_path) + "/data_o", "test",
                                 ["F_V0", "f_A", "f_1"], quarks_list=["lquark lquark"],
                                 wf_list=[0], wf2_list=[0], version="2.0",
                                 corr_type_list=["bib", "bi", "bb"], nice_output=False)
    print(corrs)
    f_1 = corrs["f_1"]['lquark lquark']['0']['0']['0']
    f_A = corrs["f_A"]['lquark lquark']['0']['0']['0']
    f_V0 = corrs["F_V0"]['lquark lquark']['0']['0']['0']

    assert len(f_1) == 1
    assert list(f_1[0].shape.keys()) == ["test_|r0", "test_|r1", "test_|r2"]
    assert f_1[0].value == 351.1941525454502

    assert len(f_A) == 3
    assert list(f_A[0].shape.keys()) == ["test_|r0", "test_|r1", "test_|r2"]
    assert f_A[0].value == 65.4711887279723
    assert f_A[1].value == 1.0447210336915187
    assert f_A[2].value == -41.025094911185185

    assert len(f_V0) == 3
    assert list(f_V0[0].shape.keys()) == ["test_|r0", "test_|r1", "test_|r2"]
    assert f_V0[0] == 683.6776090085115
    assert f_V0[1] == 661.3188585582334
    assert f_V0[2] == 683.6776090081005


def test_c_bb(tmp_path):
    build_test_environment(str(tmp_path), "c", 5, 3)
    f_1 = sfin.read_sfcf(str(tmp_path) + "/data_c", "data_c", "f_1", quarks="lquark lquark", wf=0, wf2=0, version="2.0c", corr_type="bb")
    print(f_1)
    assert len(f_1) == 1
    assert list(f_1[0].shape.keys()) == ["data_c_|r0", "data_c_|r1", "data_c_|r2"]
    assert f_1[0].value == 351.1941525454502


def test_c_bi(tmp_path):
    build_test_environment(str(tmp_path), "c", 5, 3)
    f_A = sfin.read_sfcf(str(tmp_path) + "/data_c", "data_c", "f_A", quarks="lquark lquark", wf=0, version="2.0c")
    print(f_A)
    assert len(f_A) == 3
    assert list(f_A[0].shape.keys()) == ["data_c_|r0", "data_c_|r1", "data_c_|r2"]
    assert f_A[0].value == 65.4711887279723
    assert f_A[1].value == 1.0447210336915187
    assert f_A[2].value == -41.025094911185185


def test_c_bi_files(tmp_path):
    build_test_environment(str(tmp_path), "c", 10, 3)
    f_A = sfin.read_sfcf(str(tmp_path) + "/data_c", "data_c", "f_A", quarks="lquark lquark", wf=0, version="2.0c",
                         files=[["data_c_r0_n" + str(i) for i in range(1, 11, 2)], ["data_c_r1_n" + str(i) for i in range(2, 11, 2)], ["data_c_r2_n" + str(i) for i in range(1, 11, 2)]])
    print(f_A)
    assert len(f_A) == 3
    assert list(f_A[0].shape.keys()) == ["data_c_|r0", "data_c_|r1", "data_c_|r2"]
    assert f_A[0].value == 65.4711887279723
    assert f_A[1].value == 1.0447210336915187
    assert f_A[2].value == -41.025094911185185


def test_c_bi_files_int_fail(tmp_path):
    build_test_environment(str(tmp_path), "c", 10, 3)
    with pytest.raises(TypeError):
        sfin.read_sfcf(str(tmp_path) + "/data_c", "data_c", "f_A", quarks="lquark lquark", wf=0, version="2.0c",
                       files=[[range(1, 11, 2)], [range(2, 11, 2)], [range(1, 11, 2)]])


def test_c_bib(tmp_path):
    build_test_environment(str(tmp_path), "c", 5, 3)
    f_V0 = sfin.read_sfcf(str(tmp_path) + "/data_c", "data_c", "F_V0", quarks="lquark lquark", wf=0, wf2=0, version="2.0c", corr_type="bib")
    print(f_V0)
    assert len(f_V0) == 3
    assert list(f_V0[0].shape.keys()) == ["data_c_|r0", "data_c_|r1", "data_c_|r2"]
    assert f_V0[0] == 683.6776090085115
    assert f_V0[1] == 661.3188585582334
    assert f_V0[2] == 683.6776090081005


def test_simple_multi_c(tmp_path):
    build_test_environment(str(tmp_path), "c", 5, 3)
    corrs = sfin.read_sfcf_multi(str(tmp_path) + "/data_c", "data_c", ["F_V0"], quarks_list=["lquark lquark"], wf1_list=[0], wf2_list=[0], version="2.0c", corr_type_list=["bib"])
    f_V0 = corrs["F_V0"]['lquark lquark']['0']['0']['0']
    assert len(f_V0) == 3
    assert list(f_V0[0].shape.keys()) == ["data_c_|r0", "data_c_|r1", "data_c_|r2"]
    assert f_V0[0] == 683.6776090085115
    assert f_V0[1] == 661.3188585582334
    assert f_V0[2] == 683.6776090081005


def test_dict_multi_c(tmp_path):
    build_test_environment(str(tmp_path), "c", 5, 3)
    corrs = sfin.read_sfcf_multi(str(tmp_path) + "/data_c", "data_c",
                                 ["F_V0", "f_A", "f_1"], quarks_list=["lquark lquark"],
                                 wf_list=[0], wf2_list=[0], version="2.0c",
                                 corr_type_list=["bib", "bi", "bb"], nice_output=False)
    print(corrs)
    f_1 = corrs["f_1"]['lquark lquark']['0']['0']['0']
    f_A = corrs["f_A"]['lquark lquark']['0']['0']['0']
    f_V0 = corrs["F_V0"]['lquark lquark']['0']['0']['0']

    assert len(f_1) == 1
    assert list(f_1[0].shape.keys()) == ["data_c_|r0", "data_c_|r1", "data_c_|r2"]
    assert f_1[0].value == 351.1941525454502

    assert len(f_A) == 3
    assert list(f_A[0].shape.keys()) == ["data_c_|r0", "data_c_|r1", "data_c_|r2"]
    assert f_A[0].value == 65.4711887279723
    assert f_A[1].value == 1.0447210336915187
    assert f_A[2].value == -41.025094911185185

    assert len(f_V0) == 3
    assert list(f_V0[0].shape.keys()) == ["data_c_|r0", "data_c_|r1", "data_c_|r2"]
    assert f_V0[0] == 683.6776090085115
    assert f_V0[1] == 661.3188585582334
    assert f_V0[2] == 683.6776090081005


def test_dict_multi_wf_c(tmp_path):
    build_test_environment(str(tmp_path), "c", 5, 3)
    corrs = sfin.read_sfcf_multi(str(tmp_path) + "/data_c", "data_c",
                                 ["F_V0", "f_A", "f_1"], quarks_list=["lquark lquark"],
                                 wf_list=[0, 1], wf2_list=[0, 1], version="2.0c",
                                 corr_type_list=["bib", "bi", "bb"], nice_output=False)
    rep_names = ["data_c_|r0", "data_c_|r1", "data_c_|r2"]
    f_1_00 = corrs["f_1"]['lquark lquark']['0']['0']['0']
    f_1_01 = corrs["f_1"]['lquark lquark']['0']['0']['1']
    f_1_10 = corrs["f_1"]['lquark lquark']['0']['1']['0']
    f_1_11 = corrs["f_1"]['lquark lquark']['0']['1']['1']

    assert len(f_1_00) == 1
    assert list(f_1_00[0].shape.keys()) == rep_names
    assert f_1_00[0].value == 351.1941525454502

    assert len(f_1_01) == 1
    assert list(f_1_01[0].shape.keys()) == rep_names
    assert f_1_01[0].value == 351.20703575855345

    assert len(f_1_10) == 1
    assert list(f_1_10[0].shape.keys()) == rep_names
    assert f_1_10[0].value == 351.20703575855515

    assert len(f_1_11) == 1
    assert list(f_1_11[0].shape.keys()) == rep_names
    assert f_1_11[0].value == 351.22001235609065

    f_A = corrs["f_A"]['lquark lquark']['0']['0']['0']

    assert len(f_A) == 3
    assert list(f_A[0].shape.keys()) == rep_names
    assert f_A[0].value == 65.4711887279723
    assert f_A[1].value == 1.0447210336915187
    assert f_A[2].value == -41.025094911185185

    f_V0_00 = corrs["F_V0"]['lquark lquark']['0']['0']['0']
    f_V0_01 = corrs["F_V0"]['lquark lquark']['0']['0']['1']
    f_V0_10 = corrs["F_V0"]['lquark lquark']['0']['1']['0']
    f_V0_11 = corrs["F_V0"]['lquark lquark']['0']['1']['1']

    assert len(f_V0_00) == 3
    assert list(f_V0_00[0].shape.keys()) == rep_names
    assert f_V0_00[0].value == 683.6776090085115
    assert f_V0_00[1].value == 661.3188585582334
    assert f_V0_00[2].value == 683.6776090081005

    assert len(f_V0_01) == 3
    assert list(f_V0_01[0].shape.keys()) == rep_names
    assert f_V0_01[0].value == 683.7028316879306
    assert f_V0_01[1].value == 661.3432563640756
    assert f_V0_01[2].value == 683.7028316875197

    assert len(f_V0_10) == 3
    assert list(f_V0_10[0].shape.keys()) == rep_names
    assert f_V0_10[0].value == 683.7028316879289
    assert f_V0_10[1].value == 661.343256364074
    assert f_V0_10[2].value == 683.702831687518

    assert len(f_V0_11) == 3
    assert list(f_V0_11[0].shape.keys()) == rep_names
    assert f_V0_11[0].value == 683.7280552978792
    assert f_V0_11[1].value == 661.3676550700158
    assert f_V0_11[2].value == 683.7280552974681


def test_a_bb(tmp_path):
    build_test_environment(str(tmp_path), "a", 5, 3)
    f_1 = sfin.read_sfcf(str(tmp_path) + "/data_a", "data_a", "f_1", quarks="lquark lquark", wf=0, wf2=0, version="2.0a", corr_type="bb")
    print(f_1)
    assert len(f_1) == 1
    assert list(f_1[0].shape.keys()) == ["data_a_|r0", "data_a_|r1", "data_a_|r2"]
    assert f_1[0].value == 351.1941525454502


def test_a_bi(tmp_path):
    build_test_environment(str(tmp_path), "a", 5, 3)
    f_A = sfin.read_sfcf(str(tmp_path) + "/data_a", "data_a", "f_A", quarks="lquark lquark", wf=0, version="2.0a")
    print(f_A)
    assert len(f_A) == 3
    assert list(f_A[0].shape.keys()) == ["data_a_|r0", "data_a_|r1", "data_a_|r2"]
    assert f_A[0].value == 65.4711887279723
    assert f_A[1].value == 1.0447210336915187
    assert f_A[2].value == -41.025094911185185


def test_a_bi_files(tmp_path):
    build_test_environment(str(tmp_path), "a", 5, 3)
    f_A = sfin.read_sfcf(str(tmp_path) + "/data_a", "data_a", "f_A", quarks="lquark lquark", wf=0, version="2.0a", files=["data_a_r0.f_A", "data_a_r1.f_A", "data_a_r2.f_A"])
    print(f_A)
    assert len(f_A) == 3
    assert list(f_A[0].shape.keys()) == ["data_a_|r0", "data_a_|r1", "data_a_|r2"]
    assert f_A[0].value == 65.4711887279723
    assert f_A[1].value == 1.0447210336915187
    assert f_A[2].value == -41.025094911185185


def test_a_bi_files_int_fail(tmp_path):
    build_test_environment(str(tmp_path), "a", 10, 3)
    with pytest.raises(TypeError):
        sfin.read_sfcf(str(tmp_path) + "/data_a", "data_a", "f_A", quarks="lquark lquark", wf=0, version="2.0a",
                       files=[[range(1, 11, 2)], [range(2, 11, 2)], [range(1, 11, 2)]])


def test_a_bib(tmp_path):
    build_test_environment(str(tmp_path), "a", 5, 3)
    f_V0 = sfin.read_sfcf(str(tmp_path) + "/data_a", "data_a", "F_V0", quarks="lquark lquark", wf=0, wf2=0, version="2.0a", corr_type="bib")
    print(f_V0)
    assert len(f_V0) == 3
    assert list(f_V0[0].shape.keys()) == ["data_a_|r0", "data_a_|r1", "data_a_|r2"]
    assert f_V0[0] == 683.6776090085115
    assert f_V0[1] == 661.3188585582334
    assert f_V0[2] == 683.6776090081005


def test_simple_multi_a(tmp_path):
    build_test_environment(str(tmp_path), "a", 5, 3)
    corrs = sfin.read_sfcf_multi(str(tmp_path) + "/data_a", "data_a", ["F_V0"], quarks_list=["lquark lquark"], wf1_list=[0], wf2_list=[0], version="2.0a", corr_type_list=["bib"])
    f_V0 = corrs["F_V0"]['lquark lquark']['0']['0']['0']
    assert len(f_V0) == 3
    assert list(f_V0[0].shape.keys()) == ["data_a_|r0", "data_a_|r1", "data_a_|r2"]
    assert f_V0[0] == 683.6776090085115
    assert f_V0[1] == 661.3188585582334
    assert f_V0[2] == 683.6776090081005


def test_dict_multi_a(tmp_path):
    build_test_environment(str(tmp_path), "a", 5, 3)
    corrs = sfin.read_sfcf_multi(str(tmp_path) + "/data_a", "data_a",
                                 ["F_V0", "f_A", "f_1"], quarks_list=["lquark lquark"],
                                 wf_list=[0], wf2_list=[0], version="2.0a",
                                 corr_type_list=["bib", "bi", "bb"], nice_output=False)
    print(corrs)
    f_1 = corrs["f_1"]['lquark lquark']['0']['0']['0']
    f_A = corrs["f_A"]['lquark lquark']['0']['0']['0']
    f_V0 = corrs["F_V0"]['lquark lquark']['0']['0']['0']

    assert len(f_1) == 1
    assert list(f_1[0].shape.keys()) == ["data_a_|r0", "data_a_|r1", "data_a_|r2"]
    assert f_1[0].value == 351.1941525454502

    assert len(f_A) == 3
    assert list(f_A[0].shape.keys()) == ["data_a_|r0", "data_a_|r1", "data_a_|r2"]
    assert f_A[0].value == 65.4711887279723
    assert f_A[1].value == 1.0447210336915187
    assert f_A[2].value == -41.025094911185185

    assert len(f_V0) == 3
    assert list(f_V0[0].shape.keys()) == ["data_a_|r0", "data_a_|r1", "data_a_|r2"]
    assert f_V0[0] == 683.6776090085115
    assert f_V0[1] == 661.3188585582334
    assert f_V0[2] == 683.6776090081005


def test_find_corr():
    pattern = 'name      ' + "f_A" + '\nquarks    ' + "lquark lquark" + '\noffset    ' + str(0) + '\nwf        ' + str(0)
    start_read, T = sfin._find_correlator("tests/data/sfcf_test/data_c/data_c_r0/data_c_r0_n1", "2.0c", pattern, False)
    assert start_read == 21
    assert T == 3

    pattern = 'name      ' + "f_X" + '\nquarks    ' + "lquark lquark" + '\noffset    ' + str(0) + '\nwf        ' + str(0)
    with pytest.raises(ValueError):
        sfin._find_correlator("tests/data/sfcf_test/data_c/data_c_r0/data_c_r0_n1", "2.0c", pattern, False)

    pattern = 'name      ' + "f_A" + '\nquarks    ' + "lquark lquark" + '\noffset    ' + str(0) + '\nwf        ' + str(0)
    with pytest.raises(ValueError):
        sfin._find_correlator("tests/data/sfcf_test/broken_data_c/data_c_r0/data_c_r0_n1", "2.0c", pattern, False)


def test_read_compact_file():
    rep_path = "tests/data/sfcf_test/broken_data_c/data_c_r0/"
    config_file = "data_c_r0_n1"
    start_read = 469
    T = 3
    b2b = False
    name = "F_V0"
    im = False
    with pytest.raises(Exception):
        sfin._read_compact_file(rep_path, config_file, start_read, T, b2b, name, im)


def test_find_correlator():
    file = "tests/data/sfcf_test/data_c/data_c_r0/data_c_r0_n1"
    found_start, found_T = sfin._find_correlator(file, "2.0", "name      f_A\nquarks    lquark lquark\noffset    0\nwf        0", False, False)
    assert found_start == 21
    assert found_T == 3


def test_get_rep_name():
    names = ['data_r0', 'data_r1', 'data_r2']
    new_names = sfin._get_rep_names(names)
    assert len(new_names) == 3
    assert new_names[0] == 'data_|r0'
    assert new_names[1] == 'data_|r1'
    assert new_names[2] == 'data_|r2'
    names = ['data_q0', 'data_q1', 'data_q2']
    new_names = sfin._get_rep_names(names, rep_sep='q')
    assert len(new_names) == 3
    assert new_names[0] == 'data_|q0'
    assert new_names[1] == 'data_|q1'
    assert new_names[2] == 'data_|q2'


def test_get_appended_rep_name():
    names = ['data_r0.f_1', 'data_r1.f_1', 'data_r2.f_1']
    new_names = sfin._get_appended_rep_names(names, 'data', 'f_1')
    assert len(new_names) == 3
    assert new_names[0] == 'data_|r0'
    assert new_names[1] == 'data_|r1'
    assert new_names[2] == 'data_|r2'
    names = ['data_q0.f_1', 'data_q1.f_1', 'data_q2.f_1']
    new_names = sfin._get_appended_rep_names(names, 'data', 'f_1', rep_sep='q')
    assert len(new_names) == 3
    assert new_names[0] == 'data_|q0'
    assert new_names[1] == 'data_|q1'
    assert new_names[2] == 'data_|q2'