Модуль:Entity Sprite/all: различия между версиями

мНет описания правки
Нет описания правки
 
(не показаны 64 промежуточные версии этого же участника)
Строка 1: Строка 1:
local p = {}
local p = {}
local JsonPaths = require('Module:JsonPaths')


local spriteData = mw.loadData("Модуль:IanComradeBot/prototypes/entity sprite.json/data")
local function normalizeSpritePath(path)
if path == nil then
return nil
end


local function deepEqual(t1, t2)
path = mw.text.trim(tostring(path))
    if t1 == t2 then return true end
path = path:gsub("^/Textures/?", "")
    if type(t1) ~= "table" or type(t2) ~= "table" then return false end


    local function isArray(t)
return path
        local count = 0
end
        for k in pairs(t) do
            if type(k) ~= "number" then return false end
            count = count + 1
        end
        return count == #t
    end


    if isArray(t1) and isArray(t2) then
local function normalizeData(data)
        if #t1 ~= #t2 then return false end
if type(data) ~= "table" then
        for i = 1, #t1 do
return nil
            if not deepEqual(t1[i], t2[i]) then
end
                return false
            end
        end
        return true
    end


    for k, v in pairs(t1) do
if type(data.id) == "table" then
        if t2[k] == nil or not deepEqual(v, t2[k]) then
return data.id
            return false
end
        end
    end


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


    return true
local function buildEntryKey(entry)
local parts = {}
 
local function addField(name, value)
if value ~= nil then
table.insert(parts, name .. "=" .. tostring(value))
end
end
 
addField("sprite", normalizeSpritePath(entry.sprite))
addField("state", entry.state)
addField("scale", entry.scale)
addField("enableOverrideDir", entry.enableOverrideDir)
addField("overrideDir", entry.overrideDir)
 
if entry.layers and type(entry.layers) == "table" then
local layers = {}
 
for _, layer in ipairs(entry.layers) do
local layerParts = {}
 
for k, v in pairs(layer) do
if type(v) ~= "table" then
layerParts[#layerParts + 1] = k .. "=" .. tostring(v)
end
end
 
table.sort(layerParts)
table.insert(layers, table.concat(layerParts, ","))
end
 
table.sort(layers)
table.insert(parts, "layers=" .. table.concat(layers, "|"))
end
 
table.sort(parts)
return table.concat(parts, ";")
end
end


local function getInsensitiveKey(t, target)
local function getSpriteStates(entry)
    target = target:lower()
local result = {}
    for k, v in pairs(t) do
 
        if type(k) == "string" and k:lower() == target then
if entry.layers and type(entry.layers) == "table" then
            return v
for _, layer in ipairs(entry.layers) do
        end
if layer.visible ~= false and layer.state then
    end
table.insert(result, {
    return nil
state = tostring(layer.state),
sprite = normalizeSpritePath(layer.sprite or entry.sprite)
})
end
end
elseif entry.state and entry.sprite then
table.insert(result, {
state = tostring(entry.state),
sprite = normalizeSpritePath(entry.sprite)
})
end
 
return (#result > 0) and result or nil
end
end


local function getSpritePath(entry)
local function getSpritePath(entry)
    local spriteField = getInsensitiveKey(entry, "Sprite")
if entry.sprite then
    local iconField = getInsensitiveKey(entry, "Icon")
return normalizeSpritePath(entry.sprite)
end
 
if entry.layers and type(entry.layers) == "table" then
for _, layer in ipairs(entry.layers) do
if layer.sprite then
return normalizeSpritePath(layer.sprite)
end
end
end
 
return nil
end
 
local function splitCsv(value)
local result = {}
 
if value == nil then
return nil
end
 
value = mw.text.trim(tostring(value))
if value == "" then
return nil
end
 
for part in mw.text.gsplit(value, ",", true) do
local item = mw.text.trim(part)
if item ~= "" then
table.insert(result, item)
end
end
 
return (#result > 0) and result or nil
end
 
local function buildSet(value)
local list = splitCsv(value)
if not list then
return nil
end
 
local set = {}
for _, item in ipairs(list) do
set[item] = true
end
 
return set
end
 
local function getParents(parentData, id)
if not parentData or type(parentData) ~= "table" or not id then
return nil
end
 
local parents = parentData[id]
if type(parents) ~= "table" then
return nil
end
 
return parents
end
 
local function hasAnyParent(parents, set)
if not parents or not set then
return false
end
 
for _, parent in ipairs(parents) do
if set[parent] then
return true
end
end
 
return false
end
 
local function shouldIncludeEntry(id, whitelistSet, blacklistSet, parentData)
local parents = getParents(parentData, id)


    if spriteField and spriteField.sprite then
if whitelistSet and not hasAnyParent(parents, whitelistSet) then
        return spriteField.sprite
return false
    elseif iconField and iconField.sprite then
end
        return iconField.sprite
 
    elseif spriteField and spriteField.layers then
if blacklistSet and hasAnyParent(parents, blacklistSet) then
        for _, layer in pairs(spriteField.layers) do
return false
            if layer.sprite then
end
                return layer.sprite
 
            end
return true
        end
    end
    return nil
end
end


local function getSpriteState(entry)
local function filterSpriteData(spriteData, parentData, whitelistSet, blacklistSet, project)
    local spriteBlock = getInsensitiveKey(entry, "Sprite")
local result = {}
    if spriteBlock then
        if spriteBlock.state then
            return spriteBlock.state
        elseif spriteBlock.layers then
            for _, layer in pairs(spriteBlock.layers) do
                if layer.state then
                    return layer.state
                end
            end
        end
    end


    local iconBlock = getInsensitiveKey(entry, "Icon")
for id, entry in pairs(spriteData) do
    if iconBlock and iconBlock.state then
if shouldIncludeEntry(id, whitelistSet, blacklistSet, parentData) then
        return iconBlock.state
if project == "" or JsonPaths.has(id, project) then
    end
result[id] = entry
end
end
end


    return nil
return result
end
end


local function generateRepeatTemplate(data)
local function buildFileLink(id, project)
    local spriteGroups = {}
return "[[:Файл:" .. JsonPaths.prefixFile(id) .. ".png]]"
end


    for _, entry in pairs(data) do
local function buildSpriteUrl(baseUrl, spritePath)
        local found = false
return baseUrl .. spritePath
        for _, group in pairs(spriteGroups) do
end
            if deepEqual(getInsensitiveKey(entry, "Sprite"), getInsensitiveKey(group[1], "Sprite")) and
              deepEqual(entry.EntityStorageVisuals, group[1].EntityStorageVisuals) and
              deepEqual(getInsensitiveKey(entry, "Icon"), getInsensitiveKey(group[1], "Icon")) then
                table.insert(group, entry)
                found = true
                break
            end
        end


        if not found then
local function buildSpritePathLink(baseUrl, spritePath)
            table.insert(spriteGroups, {entry})
local url = buildSpriteUrl(baseUrl, spritePath)
        end
return "[" .. url .. " " .. spritePath .. "]"
    end
end
 
local function buildStateLink(baseUrl, spritePath, state)
local url = buildSpriteUrl(baseUrl, spritePath) .. "/" .. state .. ".png"
return "[" .. url .. " " .. state .. "]"
end


    local result = {}
local function buildSpriteStateLinks(baseUrl, states)
    for _, group in pairs(spriteGroups) do
if not states or #states == 0 then
        if #group > 1 then
return ""
            local idLinks = {}
end
            for _, entry in pairs(group) do
                table.insert(idLinks, "[[:Файл:" .. entry.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")
local links = {}
 
for _, item in ipairs(states) do
if item.sprite and item.state then
table.insert(links, buildStateLink(baseUrl, item.sprite, item.state))
end
end
 
return table.concat(links, ", ")
end
end


local function generateTemplate(entry, param)
local function buildRepeatSpriteValue(baseUrl, entry)
    local spritePath = getSpritePath(entry)
local spritePath = getSpritePath(entry)
    if not entry.id or not spritePath then
if not spritePath then
        return nil
return ""
    end
end


    local state = getSpriteState(entry)
local pathLink = buildSpritePathLink(baseUrl, spritePath)
local states = getSpriteStates(entry)


    if param == "image" then
if states and #states > 0 and states[1].state and states[1].state ~= "" then
        local stateStr = ""
return pathLink .. " (" .. buildStateLink(baseUrl, spritePath, states[1].state) .. ")"
        if state then
end
            stateStr = " (state: " .. state .. ")"
        end
        return mw.getCurrentFrame():preprocess(
            "{{Entity Sprite/Image|" .. entry.id ..
            "|https://github.com/space-syndicate/space-station-14/blob/master/Resources/Textures/" ..
            spritePath .. stateStr .. "}}"
        )
    end


    return nil
return pathLink
end
 
local function generateRepeatTemplate(data, project, baseUrl)
local spriteGroups = {}
 
for id, entry in pairs(data) do
local key = buildEntryKey(entry)
 
spriteGroups[key] = spriteGroups[key] or {}
table.insert(spriteGroups[key], { id = id, entry = entry })
end
 
local result = {}
 
for _, group in pairs(spriteGroups) do
if #group > 1 then
local idLinks = {}
 
for _, obj in ipairs(group) do
table.insert(idLinks, buildFileLink(obj.id, project))
end
 
local firstId = group[1].id
local firstEntry = group[1].entry
local spriteValue = buildRepeatSpriteValue(baseUrl, firstEntry)
 
table.insert(result, mw.getCurrentFrame():preprocess(
"{{Entity Sprite/Repeat|файлы=" .. table.concat(idLinks, " ") ..
"|перенаправление=" .. JsonPaths.prefixFile(firstId) ..
"|id=" .. firstId ..
"|спрайт=" .. spriteValue ..
"}}"
))
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 states = getSpriteStates(entry)
local stateStr = buildSpriteStateLinks(baseUrl, states)
 
return mw.getCurrentFrame():preprocess(
"{{Entity Sprite/Image|файл=" .. JsonPaths.prefixFile(id) ..
"|id=" .. id ..
"|путь=" .. buildSpriteUrl(baseUrl, spritePath) ..
"|state=" .. stateStr ..
"}}"
)
end
end


function p.main(frame)
function p.main(frame)
    local param = frame.args[1]
local action = frame.args[1]
local json = frame.args.json or "component/Sprite.json"
 
local project = JsonPaths.project()
local baseUrl = JsonPaths.git() .. "/Resources/Textures/"
 
local dataPage = JsonPaths.get(json)
local parentPage = JsonPaths.get("entity parent.json")
 
local spriteDataRaw = mw.loadData(dataPage)
local parentDataRaw = mw.loadData(parentPage)
 
local spriteData = normalizeData(spriteDataRaw)
local parentData = normalizeData(parentDataRaw)
 
if not spriteData or type(spriteData) ~= "table" then
return "Ошибка загрузки JSON: " .. dataPage
end
 
if not parentData or type(parentData) ~= "table" then
return "Ошибка загрузки JSON: " .. parentPage
end
 
local whitelistSet = buildSet(frame.args.whitelistParent)
local blacklistSet = buildSet(frame.args.blacklistParent)
local filteredData = filterSpriteData(spriteData, parentData, whitelistSet, blacklistSet, project)
 
if action == "repeat" then
return generateRepeatTemplate(filteredData, project, baseUrl)
elseif action == "image" then
local result = {}
 
for id, entry in pairs(filteredData) do
local t = generateTemplate(id, entry, baseUrl, project)
if t then
table.insert(result, t)
end
end


    if not spriteData or type(spriteData) ~= "table" then
return table.concat(result, "\n")
        return "Ошибка: Невозможно загрузить данные из JSON."
end
    end


    if param == "repeat" then
return nil
        return generateRepeatTemplate(spriteData)
    elseif param == "image" or param == "path" then
        local result = {}
        for _, entry in pairs(spriteData) do
            local template = generateTemplate(entry, param)
            if template then
                table.insert(result, template)
            end
        end
        return table.concat(result, "\n")
    else
        return nil
    end
end
end


return p
return p