Core.lua

local addonName, ns = ...

ns.addonName = addonName
ns.version = "0.2.11"
ns.PRINT_PREFIX = "|cff5dade2[ProfessionMaster]|r "

local frame = CreateFrame("Frame")
ns.eventFrame = frame

--- Forever (Camelot) vs Mainline/Midnight (standard). Detect before Data/*.lua runs.
local function DetectClientFlavor()
    if WOW_PROJECT_CAMELOT and WOW_PROJECT_ID == WOW_PROJECT_CAMELOT then
        ns.isForever = true
    elseif WOW_PROJECT_MAINLINE and WOW_PROJECT_ID == WOW_PROJECT_MAINLINE then
        ns.isForever = false
    else
        local iface = select(4, GetBuildInfo())
        ns.isForever = type(iface) == "number" and iface > 16000 and iface < 20000
    end
    ns.isMainline = not ns.isForever
    ns.clientFlavor = ns.isForever and "forever" or "mainline"
end

DetectClientFlavor()

function ns.ApplyClientFlavor()
    local key = ns.isForever and "forever" or "mainline"
    local professions = ns.ProfessionsByFlavor and ns.ProfessionsByFlavor[key]
    if not professions then
        return
    end
    ns.Professions = professions
    ns.ProfessionLabel = {}
    ns.ProfessionNameToKey = {}
    ns.CraftNotifyProfessions = {}
    for _, p in ipairs(professions) do
        ns.ProfessionLabel[p.key] = p.label
        ns.ProfessionNameToKey[p.label] = p.key
        if p.kind == "craft" or p.kind == "secondary" then
            ns.CraftNotifyProfessions[p.key] = true
        end
    end
end

function ns.Print(...)
    print(ns.PRINT_PREFIX .. string.format(...))
end

function ns.SafeString(value, fallback)
    if value == nil then
        return fallback or "?"
    end
    if type(issecretvalue) == "function" and issecretvalue(value) then
        return fallback or "?"
    end
    return tostring(value)
end

function ns.SurnameSeparator()
    local consts = Constants and Constants.CharacterNameSeparatorConsts
    if consts and consts.CHARACTERNAME_SURNAME_SEPARATOR then
        return consts.CHARACTERNAME_SURNAME_SEPARATOR
    end
    return " "
end

function ns.HasRegionalUniqueNames()
    return type(RegionalUniqueNamesEnabled) == "function" and RegionalUniqueNamesEnabled()
end

function ns.UsesSurnameNames()
    return ns.isForever or ns.HasRegionalUniqueNames()
end

--- On Forever, UnitName returns (first, surname). On Mainline, (name, realm).
function ns.GetUnitNameParts(unit)
    unit = unit or "player"
    local first, second
    if UnitNameUnmodified then
        first, second = UnitNameUnmodified(unit)
    else
        first, second = UnitName(unit)
    end
    first = ns.SafeString(first, nil)
    if not first or first == "?" then
        first = ns.SafeString(UnitName(unit), "Player")
    end

    if not ns.UsesSurnameNames() then
        return first, nil
    end

    local surname
    if second and second ~= "" and not (type(issecretvalue) == "function" and issecretvalue(second)) then
        surname = tostring(second)
    end
    if (not surname or surname == "") and NameUtil and NameUtil.SplitPlayerNameIntoParts then
        local a, b = NameUtil.SplitPlayerNameIntoParts(first)
        if a and b and b ~= "" then
            first, surname = a, b
        end
    elseif (not surname or surname == "") then
        local sep = ns.SurnameSeparator()
        if sep == " " then
            local a, b = string.match(first, "^(%S+)%s+(.+)$")
            if a and b and b ~= "" then
                first, surname = a, b
            end
        elseif sep and sep ~= "" and sep ~= "-" then
            local pos = string.find(first, sep, 1, true)
            if pos and pos > 1 then
                first, surname = string.sub(first, 1, pos - 1), string.sub(first, pos + #sep)
            end
        end
    end

    return first, surname
end

function ns.ComposeFullName(firstName, surname)
    firstName = ns.SafeString(firstName, "Player")
    if not surname or surname == "" then
        return firstName
    end
    surname = ns.SafeString(surname, "")
    if surname == "" or surname == "?" then
        return firstName
    end
    if NameUtil and NameUtil.GetFullNameWithoutRealm then
        local composed = NameUtil.GetFullNameWithoutRealm(firstName, surname)
        if composed and composed ~= "" then
            return ns.SafeString(composed, firstName .. ns.SurnameSeparator() .. surname)
        end
    end
    return firstName .. ns.SurnameSeparator() .. surname
end

function ns.PlayerFullName()
    local first, surname = ns.GetUnitNameParts("player")
    if ns.UsesSurnameNames() then
        return ns.ComposeFullName(first, surname), first, surname
    end
    return first, first, nil
end

function ns.CharKey(name, realm)
    if not name then
        name = select(1, ns.PlayerFullName())
    end
    realm = realm or GetNormalizedRealmName() or GetRealmName() or "Unknown"
    name = ns.SafeString(name, "Player")
    realm = ns.SafeString(realm, "Realm"):gsub("%s+", "")
    return name .. "-" .. realm
end

function ns.PlayerKey()
    return ns.CharKey()
end

function ns.MigrateCharKey(oldKey, newKey)
    if not oldKey or not newKey or oldKey == newKey or not ns.db then
        return false
    end
    local chars = ns.db.chars
    if chars and chars[oldKey] then
        if not chars[newKey] then
            chars[newKey] = chars[oldKey]
        else
            local dest = chars[newKey]
            local src = chars[oldKey]
            if src.professions then
                dest.professions = dest.professions or {}
                for k, v in pairs(src.professions) do
                    if dest.professions[k] == nil then
                        dest.professions[k] = v
                    end
                end
            end
            if src.recipes then
                dest.recipes = dest.recipes or {}
                for k, v in pairs(src.recipes) do
                    dest.recipes[k] = dest.recipes[k] or v
                end
            end
        end
        chars[oldKey] = nil
    end
    local prefs = ns.db.charPrefs
    if prefs and prefs[oldKey] then
        prefs[newKey] = prefs[newKey] or prefs[oldKey]
        prefs[oldKey] = nil
    end
    return true
end

--- Per-character prefs (notify professions, hidden recipes). Seeded once from the
--- old account-wide settings so existing choices carry over to each character.
function ns.CharPrefs(charKey)
    charKey = charKey or ns.PlayerKey()
    if not ns.db or not charKey then
        return { notifyProfessions = {}, hiddenRecipes = {} }
    end
    ns.db.charPrefs = ns.db.charPrefs or {}
    local p = ns.db.charPrefs[charKey]
    if not p then
        local s = ns.db.settings or {}
        p = {
            notifyProfessions = ns.DeepCopy(s.notifyProfessions or {}),
            hiddenRecipes = ns.DeepCopy(s.hiddenRecipes or {}),
        }
        ns.db.charPrefs[charKey] = p
    end
    p.notifyProfessions = p.notifyProfessions or {}
    p.hiddenRecipes = p.hiddenRecipes or {}
    return p
end

function ns.DeepCopy(src)
    if type(src) ~= "table" then
        return src
    end
    local out = {}
    for k, v in pairs(src) do
        out[k] = ns.DeepCopy(v)
    end
    return out
end

local function MergeDefaults(dest, src)
    for k, v in pairs(src) do
        if type(v) == "table" then
            if type(dest[k]) ~= "table" then
                dest[k] = {}
            end
            MergeDefaults(dest[k], v)
        elseif dest[k] == nil then
            dest[k] = v
        end
    end
end

local pendingRescan = false
local function ScheduleRescan()
    if pendingRescan then
        return
    end
    pendingRescan = true
    C_Timer.After(0.35, function()
        pendingRescan = false
        if ns.Inventory then
            ns.Inventory:Refresh()
        end
        if ns.SkillUp then
            ns.SkillUp:Refresh()
        end
        if ns.UI and ns.UI.RefreshIfShown then
            ns.UI:RefreshIfShown()
        end
    end)
end

ns.ScheduleRescan = ScheduleRescan

local function OnEvent(self, event, ...)
    if event == "ADDON_LOADED" then
        local loaded = ...
        if loaded ~= addonName then
            return
        end
        ProfessionMasterDB = ProfessionMasterDB or {}
        MergeDefaults(ProfessionMasterDB, ns.defaults)
        ns.db = ProfessionMasterDB
        if ns.RecipeDB then
            if ns.RecipeDB.LoadPersistedLiveRecipes then
                ns.RecipeDB:LoadPersistedLiveRecipes()
            end
            ns.RecipeDB:BuildIndexes()
        end
        local n = ns.RecipeCount or 0
        if n == 0 then
            if ns.isForever then
                ns.Print("WARNING: recipe catalog empty (TOC load order?). Skill-up toasts disabled until fixed.")
            else
                ns.Print("No cached recipes yet — open each profession or /pm scan to harvest.")
            end
        else
            ns.Print("Loaded %d catalog recipes (%s).", n, ns.clientFlavor or "?")
        end
        self:UnregisterEvent("ADDON_LOADED")
        return
    end

    if event == "PLAYER_LOGIN" then
        if ns.CharDB then
            ns.CharDB:ScanPlayer()
        end
        if ns.MinimapButton then
            ns.MinimapButton:Init()
        end
        if ns.Notify then
            ns.Notify:Init()
        end
        if ns.Gathering then
            ns.Gathering:HookTooltips()
        end
        ScheduleRescan()
        -- Surname + skill APIs / bags often aren't ready at login; re-scan so
        -- professions don't land under a short CharKey or get wiped to empty.
        C_Timer.After(1.0, function()
            if ns.CharDB then
                ns.CharDB:ScanPlayer()
            end
            ScheduleRescan()
        end)
        C_Timer.After(3.0, function()
            if ns.CharDB then
                ns.CharDB:ScanPlayer()
            end
            ScheduleRescan()
        end)
        return
    end

    if event == "TRADE_SKILL_LIST_UPDATE"
        or event == "TRADE_SKILL_DATA_SOURCE_CHANGED"
        or event == "TRADE_SKILL_SHOW"
        or event == "SKILL_LINES_CHANGED" then
        if ns.CharDB then
            ns.CharDB:ScanPlayer()
            C_Timer.After(0.1, function()
                if ns.CharDB then
                    local n = ns.CharDB:HarvestOpenTradeSkill()
                    if n > 0 then
                        ns.Print("Cached +%d recipes from open profession.", n)
                    end
                end
                if ns.UI and ns.UI.RefreshIfShown then
                    ns.UI:RefreshIfShown()
                end
                ScheduleRescan()
            end)
        end
        return
    end

    if event == "BAG_UPDATE"
        or event == "PLAYERBANKSLOTS_CHANGED"
        or event == "BANKFRAME_OPENED"
        or event == "BANKFRAME_CLOSED"
        or event == "PLAYER_INTERACTION_MANAGER_FRAME_SHOW"
        or event == "PLAYER_INTERACTION_MANAGER_FRAME_HIDE"
        or event == "CHAT_MSG_SKILL" then
        ScheduleRescan()
        return
    end

    if event == "PLAYER_REGEN_ENABLED" then
        if ns.Craft and ns.Craft.FlushPending then
            ns.Craft:FlushPending()
        end
    end
end

frame:SetScript("OnEvent", OnEvent)
frame:RegisterEvent("ADDON_LOADED")
frame:RegisterEvent("PLAYER_LOGIN")
frame:RegisterEvent("BAG_UPDATE")
frame:RegisterEvent("PLAYERBANKSLOTS_CHANGED")
frame:RegisterEvent("BANKFRAME_OPENED")
frame:RegisterEvent("BANKFRAME_CLOSED")
frame:RegisterEvent("SKILL_LINES_CHANGED")
frame:RegisterEvent("CHAT_MSG_SKILL")
frame:RegisterEvent("PLAYER_REGEN_ENABLED")

C_Timer.After(0, function()
    frame:RegisterEvent("TRADE_SKILL_LIST_UPDATE")
    frame:RegisterEvent("TRADE_SKILL_DATA_SOURCE_CHANGED")
    frame:RegisterEvent("TRADE_SKILL_SHOW")
    pcall(function()
        frame:RegisterEvent("PLAYER_INTERACTION_MANAGER_FRAME_SHOW")
        frame:RegisterEvent("PLAYER_INTERACTION_MANAGER_FRAME_HIDE")
    end)
end)