local utils = require('nvim-ts-autotag.utils')
local log = require('nvim-ts-autotag._log')
local api = vim.api

local helpers = {}

function helpers.feed(text, feed_opts, is_replace)
    feed_opts = feed_opts or 'n'
    if not is_replace then
        text = vim.api.nvim_replace_termcodes(text, true, false, true)
    end
    vim.api.nvim_feedkeys(text, feed_opts, true)
end

function helpers.insert(text, is_replace)
    helpers.feed('i' .. text, 'x', is_replace)
end

utils.insert_char = function(text)
    api.nvim_put({ text }, 'c', true, true)
end

utils.feed = function(text, num)
    local result = ''
    for _ = 1, num, 1 do
        result = result .. text
    end
    api.nvim_feedkeys(
        api.nvim_replace_termcodes(result, true, false, true),
        'x',
        true
    )
end

_G.eq = assert.are.same

_G.Test_filter = function(data)
    local run_data = {}
    for _, value in pairs(data) do
        if value.only == true then
            table.insert(run_data, value)
            break
        end
    end
    if #run_data == 0 then
        run_data = data
    end
    return run_data
end

local compare_text = function(linenr, text_after, name, cursor_add, end_cursor)
    cursor_add = cursor_add or 0
    local new_text = vim.api.nvim_buf_get_lines(
        0,
        linenr - 1,
        linenr + #text_after - 1,
        true
    )
    for i = 1, #text_after, 1 do
        local t = string.gsub(text_after[i], '%|', '')
        if t
            and new_text[i]
            and t:gsub('%s+$', '') ~= new_text[i]:gsub('%s+$', '')
        then
            eq(t, new_text[i], '\n\n text error: ' .. name .. '\n')
        end
        local p_after = string.find(text_after[i], '%|')
        if p_after then
            local row, col = utils.get_cursor()
            if end_cursor then
                eq(row, linenr + i - 2, '\n\n cursor row error: ' .. name .. '\n')
                eq(
                    col + 1,
                    end_cursor,
                    '\n\n end cursor column error : ' .. name .. '\n'
                )
            else
                eq(row, linenr + i - 2, '\n\n cursor row error: ' .. name .. '\n')
                p_after = p_after + cursor_add
                eq(
                    col,
                    math.max(p_after - 2, 0),
                    '\n\n cursor column error : ' .. name .. '\n'
                )
            end
        end
    end
    return true
end

_G.Test_withfile = function(test_data, cb)
    for _, value in pairs(test_data) do
        it('test ' .. value.name, function(done)
            local text_before = {}
            value.linenr = value.linenr or 1
            local pos_before = {
                linenr = value.linenr,
                colnr = 0,
            }
            if not vim.tbl_islist(value.before) then
                value.before = { value.before }
            end
            for index, text in pairs(value.before) do
                local txt = string.gsub(text, '%|', '')
                table.insert(text_before, txt)
                if string.match(text, '%|') then
                    if string.find(text, '%|') then
                        pos_before.colnr = string.find(text, '%|')
                        pos_before.linenr = value.linenr + index - 1
                    end
                end
            end
            if not vim.tbl_islist(value.after) then
                value.after = { value.after }
            end
            vim.bo.filetype = value.filetype or 'text'
            vim.cmd(':bd!')
            if cb.before_each then
                cb.before_each(value)
            end
            if vim.fn.filereadable(vim.fn.expand(value.filepath)) == 1 then
                vim.cmd(':e ' .. value.filepath)
                if value.filetype then
                    vim.bo.filetype = value.filetype
                end
                vim.cmd(':e')
            else
                vim.cmd(':new')
                if value.filetype then
                    vim.bo.filetype = value.filetype
                end
            end
            vim.api.nvim_buf_set_lines(
                0,
                value.linenr - 1,
                value.linenr + #text_before,
                false,
                text_before
            )
            vim.api.nvim_win_set_cursor(
                0,
                { pos_before.linenr, pos_before.colnr - 1 }
            )
            log.debug('insert:' .. value.key)

            if type(value.key) == 'string' then
                if cb.mode == 'i' then
                    helpers.insert(value.key, value.not_replace_term_code)
                else
                    helpers.feed(value.key, 'x')
                end
            else
                for _, key in pairs(value.key) do
                    helpers.feed(key, 'x')
                    vim.wait(1)
                end
            end
            vim.wait(2)
            helpers.feed('<esc>')
            compare_text(
                value.linenr,
                value.after,
                value.name,
                cb.cursor_add,
                value.end_cursor
            )
            if cb.after_each then
                cb.after_each(value)
            end
            vim.cmd(':bd!')
        end)
    end
end

_G.dump_node = function(node)
    local text = utils.get_node_text(node)
    for _, txt in pairs(text) do
        log.debug(txt)
    end
end

_G.dump_node_text = function(target)
    for node in target:iter_children() do
        local node_type = node:type()
        local text = utils.get_node_text(node)
        log.debug('type:' .. node_type .. ' ')
        log.debug(text)
    end
end