Module:Episode

Documentation module[créer]

local data = require("Module:Episode/data")
local p = {}

-- Function 1: Get full episode link from key
function p.getEpisode(frame)
    local key = string.lower(frame.args[1] or "")
    local entry = data[key]

    if not entry then
        return "Épisode non référencé"
    end

    local ns, link, title = unpack(entry)

    if ns == "" or ns == nil then
        return string.format("[[%s|%s]]", link, title)
    else
        return string.format("[[%s:%s|%s]]", ns, link, title)
    end
end

-- Function 2: Force namespace to "Credits:"
function p.getCreditsLink(frame)
    local key = string.lower(frame.args[1] or "")
    local entry = data[key]

    if not entry then
        return "Épisode non référencé"
    end

    local _, link, title = unpack(entry)
    return string.format("[[Crédits:%s|%s]]", link, title)
end

-- Function 3: Force namespace to "Transcript:"
function p.getTranscriptLink(frame)
    local key = string.lower(frame.args[1] or "")
    local entry = data[key]

    if not entry then
        return "Épisode non référencé"
    end

    local _, link, title = unpack(entry)
    return string.format("[[Retranscription:%s|%s]]", link, title)
end

-- Function 4: Force namespace to "Quotes:"
function p.getQuotesLink(frame)
    local key = string.lower(frame.args[1] or "")
    local entry = data[key]

    if not entry then
        return "Épisode non référencé"
    end

    -- FIX : 4 valeurs → il faut 4 variables
    local _, link, title = unpack(entry)
    return string.format("[[Citations:%s|%s]]", link, title)
end

-- Function 5: Force namespace to "Category:Images from"
function p.getImagesLink(frame)
    local key = string.lower(frame.args[1] or "")
    local entry = data[key]

    if not entry then
        return "Épisode non référencé"
    end

    local _, link, title = unpack(entry)
    return string.format("[[:Catégorie:Images de %s|%s]]", link, title)
end

-- Function 6: Retrieve from link
function p.getEpisodeLink(frame)
    local key = string.lower(frame.args[1] or "")
    local entry = data[key]

    if not entry then
        return "Épisode non référencé"
    end

    local _, link = unpack(entry)
    return link
end

-- Function 7: Get full episode link only from key
function p.getEpisodeFullLink(frame)
    local key = string.lower(frame.args[1] or "")
    local entry = data[key]

    if not entry then
        return "Épisode non référencé"
    end

    local ns, link = unpack(entry)

    if ns == "" or ns == nil then
        return link
    else
        return ns .. ":" .. link
    end
end

-- Function 8: Get episode title only from key
function p.getEpisodeTitle(frame)
    local key = string.lower(frame.args[1] or "")
    local entry = data[key]

    if not entry then
        return "Episode not found"
    end

    local _, _, title = unpack(entry)
    return title
end

-- Function X: Detect duplicates in Module:Episode/data

function p.checkAliasConflicts()
    local seen = {}
    local conflicts = {}

    for alias, entry in pairs(data) do
        local link = entry[2]

        if seen[alias] and seen[alias] ~= link then
            table.insert(conflicts, {
                alias = alias,
                link1 = seen[alias],
                link2 = link
            })
        else
            seen[alias] = link
        end
    end

    return conflicts
end

function p.showAliasConflicts()
    local list = p.checkAliasConflicts()
    local out = {}

    table.insert(out, "== Alias pointant vers plusieurs pages ==")

    if #list == 0 then
        table.insert(out, "* Aucun conflit")
    else
        for _, c in ipairs(list) do
            table.insert(out,
                "* " .. c.alias ..
                " → " .. c.link1 ..
                " / " .. c.link2
            )
        end
    end

    return table.concat(out, "\n")
end

function p.aliasToPages()
    local map = {}

    for alias, entry in pairs(data) do
        local link = entry[2]

        if not map[alias] then
            map[alias] = { link }
        else
            -- éviter les doublons exacts
            local exists = false
            for _, v in ipairs(map[alias]) do
                if v == link then
                    exists = true
                    break
                end
            end
            if not exists then
                table.insert(map[alias], link)
            end
        end
    end

    return map
end

function p.showAliasToPages()
    local map = p.aliasToPages()
    local out = {}

    table.insert(out, "== Alias → Pages ==")

    for alias, pages in pairs(map) do
        if #pages == 1 then
            table.insert(out, "* <code>" .. alias .. "</code> → " .. pages[1])
        else
            table.insert(out,
                "* <code>" .. alias .. "</code> → '''CONFLIT''' : " .. table.concat(pages, " / ")
            )
        end
    end

    return table.concat(out, "\n")
end

return p