Модуль:Песочница/Pok

Для документации этого модуля может быть создана страница Модуль:Песочница/Pok/doc

local p = {}
local JsonPaths = require('Module:JsonPaths')

local function deepEqual(t1, t2)
    if t1 == t2 then return true end
    if type(t1) ~= "table" or type(t2) ~= "table" then return false end

    for k, v in pairs(t1) do
        if not deepEqual(v, t2[k]) then
            return false
        end
    end

    for k, v in pairs(t2) do
        if not deepEqual(v, t1[k]) then
            return false
        end
    end

    return true
end

local function getSpritePath(entry)
    return entry.sprite
end

local function getSpriteStates(entry)
    local result = {}

    if entry.state and entry.sprite then
        table.insert(result, {
            state = entry.state,
            sprite = entry.sprite
        })
    end

    return (#result > 0) and result or nil
end

local function getTextureBaseUrl(project)
    if project == "Goob" then
        return "https://github.com/space-syndicate/Goob-Station/blob/master/Resources/Textures/"
    end

    return "https://github.com/space-syndicate/space-station-14/blob/master/Resources/Textures/"
end

local function generateRepeatTemplate(data, project)
    local spriteGroups = {}

    for id, entry in pairs(data) do
        local found = false

        for _, group in pairs(spriteGroups) do
            local g = group[1]

            if entry.sprite == g.sprite and entry.state == g.state then
                table.insert(group, { id = id, entry = entry })
                found = true
                break
            end
        end

        if not found then
            table.insert(spriteGroups, {
                { id = id, entry = entry }
            })
        end
    end

    local result = {}

    for _, group in pairs(spriteGroups) do
        if #group > 1 then
            local idLinks = {}

            for _, obj in pairs(group) do
                local id = obj.id
                local prefix = (project ~= "" and JsonPaths.has(id)) and (project .. ":") or ""
                table.insert(idLinks, "[[:Файл:" .. prefix .. id .. ".png]]")
            end

            table.insert(result, mw.getCurrentFrame():preprocess(
                "{{Entity Sprite/Repeat|" ..
                table.concat(idLinks, " ") ..
                "|" .. group[1].id ..
                "}}"
            ))
        end
    end

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

local function generateTemplate(id, entry, baseUrl, project)
    local spritePath = getSpritePath(entry)
    if not id or not spritePath then
        return nil
    end

    local prefix = (project ~= "" and JsonPaths.has(id)) and (project .. ":") or ""

    local states = getSpriteStates(entry)
    local stateStr = ""

    if states then
        local links = {}
        for _, item in ipairs(states) do
            local url = baseUrl .. item.sprite .. "/" .. item.state .. ".png"
            table.insert(links, "[" .. url .. " " .. item.state .. "]")
        end
        stateStr = table.concat(links, ", ")
    end

    return mw.getCurrentFrame():preprocess(
        "{{Entity Sprite/Image|" ..
        prefix .. id ..
        "|" .. baseUrl .. spritePath ..
        "|" .. stateStr ..
        "}}"
    )
end

function p.main(frame)
    local action = frame.args[1]

    local project = JsonPaths.project()
    local baseUrl = getTextureBaseUrl(project)

    local dataPage = JsonPaths.get("prototype/sprite.json")
    local spriteData = mw.loadData(dataPage)

    if not spriteData or type(spriteData) ~= "table" then
        return "Ошибка загрузки JSON: " .. dataPage
    end

    if action == "repeat" then
        return generateRepeatTemplate(spriteData, project)

    elseif action == "image" then
        local result = {}

        for id, entry in pairs(spriteData) do
            local t = generateTemplate(id, entry, baseUrl, project)
            if t then
                table.insert(result, t)
            end
        end

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

    return nil
end

return p