esoTERM_char.lua

esoTERM_char = {}

esoTERM_char.cache = {}
esoTERM_char.event_register = {}
esoTERM_char.module_name = "character"
esoTERM_char.is_active = false

local ESOTERM_CHAR_CACHE = esoTERM_char.cache
local PLAYER_UNIT_TAG = "player"
local EXIT_COMBAT_CALL_DELAY = 500

function esoTERM_char.get_gender()
    if ESOTERM_CHAR_CACHE.gender ~= nil then
        return ESOTERM_CHAR_CACHE.gender
    else
        return GetUnitGender(PLAYER_UNIT_TAG)
    end
end

function esoTERM_char.get_class()
    if ESOTERM_CHAR_CACHE.class ~= nil then
        return ESOTERM_CHAR_CACHE.class
    else
        return GetUnitClass(PLAYER_UNIT_TAG)
    end
end

function esoTERM_char.get_name()
    if ESOTERM_CHAR_CACHE.name ~= nil then
        return ESOTERM_CHAR_CACHE.name
    else
        return GetUnitName(PLAYER_UNIT_TAG)
    end
end

function esoTERM_char.get_combat_state()
    if ESOTERM_CHAR_CACHE.combat_state ~= nil then
        return ESOTERM_CHAR_CACHE.combat_state
    else
        return IsUnitInCombat(PLAYER_UNIT_TAG)
    end
end

function esoTERM_char.get_combat_start_time()
    if ESOTERM_CHAR_CACHE.combat_start_time ~= nil then
        return ESOTERM_CHAR_CACHE.combat_start_time
    else
        return 0
    end
end

function esoTERM_char.get_combat_lenght()
    if ESOTERM_CHAR_CACHE.combat_lenght ~= nil and ESOTERM_CHAR_CACHE.combat_lenght > 0 then
        return ESOTERM_CHAR_CACHE.combat_lenght
    else
        return 0
    end
end

function esoTERM_char.get_combat_damage()
    if ESOTERM_CHAR_CACHE.combat_damage ~= nil then
        return ESOTERM_CHAR_CACHE.combat_damage
    else
        return 0
    end
end

function esoTERM_char.get_last_xp_gain_time()
    if ESOTERM_CHAR_CACHE.last_xp_gain_time ~= nil then
        return ESOTERM_CHAR_CACHE.last_xp_gain_time
    else
        return 0
    end
end

function esoTERM_char.on_combat_state_update(event, combat_state)
    ESOTERM_CHAR_CACHE.last_reported_combat_state = combat_state
    if combat_state then
        esoTERM_char.enter_combat()
    else
        zo_callLater(esoTERM_char.exit_combat, EXIT_COMBAT_CALL_DELAY)
    end
end

function esoTERM_char.on_combat_event_update(event,
                                             result,
                                             event_not_ok,
                                             ability_name,
                                             ability_graphic,
                                             action_slot_type,
                                             source_name,
                                             source_type,
                                             target_name,
                                             target_type,
                                             hit_value,
                                             power_type,
                                             damage_type,
                                             log)

    if result ~= ACTION_RESULT_DAMAGE and
       result ~= ACTION_RESULT_CRITICAL_DAMAGE and
       result ~= ACTION_RESULT_DOT_TICK and
       result ~= ACTION_RESULT_DOT_TICK_CRITICAL then return end

    if event_not_ok then return end

    if source_name == "" then return end

    if target_name == "" then return end

    if source_type ~= COMBAT_UNIT_TYPE_PLAYER and
       source_type ~= COMBAT_UNIT_TYPE_PLAYER_PET then return end

    if hit_value < 1 then return end

    if power_type == POWERTYPE_INVALID then return end

    if damage_type < 1 then return end

    ESOTERM_CHAR_CACHE.combat_damage = ESOTERM_CHAR_CACHE.combat_damage + hit_value
    local message = string.format("Dealt damage with %s for: %d",
                                  ability_name,
                                  hit_value)
    esoTERM_output.stdout(message)
end

local function get_combat_enter_message()
    return "Entered combat"
end

function esoTERM_char.enter_combat()
    if ESOTERM_CHAR_CACHE.combat_state == true then
        return
    end
    ESOTERM_CHAR_CACHE.combat_state = true
    ESOTERM_CHAR_CACHE.combat_start_time = GetGameTimeMilliseconds()
    ESOTERM_CHAR_CACHE.combat_damage = 0

    esoTERM_common.register_for_event(esoTERM_char,
                                      EVENT_COMBAT_EVENT,
                                      esoTERM_char.on_combat_event_update)

    esoTERM_output.stdout(get_combat_enter_message())
end

function esoTERM_char.get_combat_exit_time()
    local last_xp_gain_time = esoTERM_char.get_last_xp_gain_time()
    if last_xp_gain_time ~= 0 then
        return last_xp_gain_time
    else
        return GetGameTimeMilliseconds() - EXIT_COMBAT_CALL_DELAY
    end
end

local function get_combat_exit_message()
    local net_length = esoTERM_char.get_combat_lenght()
    local length = net_length >= 1000 and net_length or 1000
    local damage = esoTERM_char.get_combat_damage()
    return string.format(
        "Left combat (lasted: %.2fs, damage: %d, dps: %.2f)",
        (net_length) / 1000, damage, damage * 1000 / (length))
end

function esoTERM_char.exit_combat()
    if ESOTERM_CHAR_CACHE.last_reported_combat_state == true or
       ESOTERM_CHAR_CACHE.combat_state == false then
        return
    end

    local combat_start_time = esoTERM_char.get_combat_start_time()
    local combat_exit_time = esoTERM_char.get_combat_exit_time()
    ESOTERM_CHAR_CACHE.combat_lenght = combat_exit_time - combat_start_time

    esoTERM_common.unregister_from_event(esoTERM_char, EVENT_COMBAT_EVENT)

    esoTERM_output.stdout(get_combat_exit_message())

    ESOTERM_CHAR_CACHE.combat_state = false
    ESOTERM_CHAR_CACHE.combat_start_time = 0
    ESOTERM_CHAR_CACHE.combat_damage = 0
end

function esoTERM_char.on_unit_death_state_change(event, unit, is_dead)
    if unit == PLAYER_UNIT_TAG then
        if is_dead then
            esoTERM_output.stdout("Died, you are pathetic!")
            esoTERM_char.on_combat_state_update(nil, false)
        else
            esoTERM_output.stdout("Resurrected, watch out next time!")
            ESOTERM_CHAR_CACHE.combat_state = IsUnitInCombat(PLAYER_UNIT_TAG)
            esoTERM_char.on_combat_state_update(nil, esoTERM_char.get_combat_state())
        end
    end
end

local function save_current_game_time()
    ESOTERM_CHAR_CACHE.last_xp_gain_time = GetGameTimeMilliseconds()
end

function esoTERM_char.on_xp_gain(event, reason, level, previous_xp, current_xp)
    save_current_game_time()
end

function esoTERM_char.on_vp_gain(event, reason, rank, previous_vp, current_vp)
    save_current_game_time()
end

function esoTERM_char.initialize()
    esoTERM_common.initialize_module(esoTERM_char)
end

function esoTERM_char.on_skill_xp_update(event, skillType, skillLine, lastRankXP, nextRankXP, currentXP)
    local skillName, currentLevel = GetSkillLineInfo(skillType, skillLine)
    local message = string.format(
        "skillName: %s; currentLevel: %d; lastRankXP: %d; nextRankXP: %d; currentXP: %d",
        skillName,
        currentLevel,
        lastRankXP,
        nextRankXP,
        currentXP
    )
    esoTERM_output.sysout(message)
end

function esoTERM_char.activate()
    ESOTERM_CHAR_CACHE.gender = esoTERM_char.get_gender()
    ESOTERM_CHAR_CACHE.class = esoTERM_char.get_class()
    ESOTERM_CHAR_CACHE.name = esoTERM_char.get_name()
    ESOTERM_CHAR_CACHE.combat_state = esoTERM_char.get_combat_state()
    ESOTERM_CHAR_CACHE.combat_start_time = esoTERM_char.get_combat_start_time()
    ESOTERM_CHAR_CACHE.combat_lenght = esoTERM_char.get_combat_lenght()
    ESOTERM_CHAR_CACHE.combat_damage = esoTERM_char.get_combat_damage()
    ESOTERM_CHAR_CACHE.last_xp_gain_time = esoTERM_char.get_last_xp_gain_time()

    esoTERM_common.register_for_event(esoTERM_char,
                                      EVENT_PLAYER_COMBAT_STATE,
                                      esoTERM_char.on_combat_state_update)
    esoTERM_common.register_for_event(esoTERM_char,
                                      EVENT_UNIT_DEATH_STATE_CHANGED,
                                      esoTERM_char.on_unit_death_state_change)
    esoTERM_common.register_for_event(esoTERM_char,
                                      EVENT_EXPERIENCE_GAIN,
                                      esoTERM_char.on_xp_gain)
    esoTERM_common.register_for_event(esoTERM_char,
                                      EVENT_VETERAN_POINTS_GAIN,
                                      esoTERM_char.on_vp_gain)
--  esoTERM_common.register_for_event(esoTERM_char,
--                                    EVENT_SKILL_XP_UPDATE,
--                                    esoTERM_char.on_skill_xp_update)

    esoTERM_char.is_active = true
    esoTERM_char.settings[esoTERM_char.module_name] = esoTERM_char.is_active
end

function esoTERM_char.deactivate()
    esoTERM_common.unregister_from_all_events(esoTERM_char)

    esoTERM_char.is_active = false
    esoTERM_char.settings[esoTERM_char.module_name] = esoTERM_char.is_active
end

return esoTERM_char