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

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


local function loadData(filePath)
local function normalizeSpritePath(path)
    local page = mw.title.new(filePath)
if path == nil then
    local content = page and page:getContent()
return nil
    return content and mw.text.jsonDecode(content) or nil
end
 
path = mw.text.trim(tostring(path))
path = path:gsub("^/Textures/?", "")
 
return path
end
 
local function normalizeData(data)
if type(data) ~= "table" then
return nil
end
 
if type(data.id) == "table" then
return data.id
end
 
return data
end
end


local function deepEqual(t1, t2)
local function buildEntryKey(entry)
    if t1 == t2 then return true end
local parts = {}
    if type(t1) ~= "table" or type(t2) ~= "table" then return false end
 
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 = {}


    local function isArray(t)
for _, layer in ipairs(entry.layers) do
        local count = 0
local layerParts = {}
        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
for k, v in pairs(layer) do
        if #t1 ~= #t2 then return false end
if type(v) ~= "table" then
        for i = 1, #t1 do
layerParts[#layerParts + 1] = k .. "=" .. tostring(v)
            if not deepEqual(t1[i], t2[i]) then
end
                return false
end
            end
        end
        return true
    end


    for k, v in pairs(t1) do
table.sort(layerParts)
        if t2[k] == nil or not deepEqual(v, t2[k]) then
table.insert(layers, table.concat(layerParts, ","))
            return false
end
        end
    end


    for k, v in pairs(t2) do
table.sort(layers)
        if t1[k] == nil or not deepEqual(v, t1[k]) then
table.insert(parts, "layers=" .. table.concat(layers, "|"))
            return false
end
        end
    end


    return true
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 whitelistSet and not hasAnyParent(parents, whitelistSet) then
return false
end
 
if blacklistSet and hasAnyParent(parents, blacklistSet) then
return false
end
 
return true
end
 
local function filterSpriteData(spriteData, parentData, whitelistSet, blacklistSet, project)
local result = {}
 
for id, entry in pairs(spriteData) do
if shouldIncludeEntry(id, whitelistSet, blacklistSet, parentData) then
if project == "" or JsonPaths.has(id, project) then
result[id] = entry
end
end
end
 
return result
end


    if spriteField and spriteField.sprite then
local function buildFileLink(id, project)
        return spriteField.sprite
return "[[:Файл:" .. JsonPaths.prefixFile(id) .. ".png]]"
    elseif iconField and iconField.sprite then
        return iconField.sprite
    elseif spriteField and spriteField.layers then
        for _, layer in pairs(spriteField.layers) do
            if layer.sprite then
                return layer.sprite
            end
        end
    end
    return nil
end
end


local function getSpriteState(entry)
local function buildSpriteUrl(baseUrl, spritePath)
    local spriteBlock = getInsensitiveKey(entry, "Sprite")
return baseUrl .. spritePath
    if spriteBlock then
end
        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")
local function buildSpritePathLink(baseUrl, spritePath)
    if iconBlock and iconBlock.state then
local url = buildSpriteUrl(baseUrl, spritePath)
        return iconBlock.state
return "[" .. url .. " " .. spritePath .. "]"
    end
end


    return nil
local function buildStateLink(baseUrl, spritePath, state)
local url = buildSpriteUrl(baseUrl, spritePath) .. "/" .. state .. ".png"
return "[" .. url .. " " .. state .. "]"
end
end


local function generateRepeatTemplate(data)
local function buildSpriteStateLinks(baseUrl, states)
    local spriteGroups = {}
if not states or #states == 0 then
return ""
end
 
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


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


        if not found then
local pathLink = buildSpritePathLink(baseUrl, spritePath)
            table.insert(spriteGroups, {entry})
local states = getSpriteStates(entry)
        end
    end


    local result = {}
if states and #states > 0 and states[1].state and states[1].state ~= "" then
    for _, group in pairs(spriteGroups) do
return pathLink .. " (" .. buildStateLink(baseUrl, spritePath, states[1].state) .. ")"
        if #group > 1 then
end
            local idLinks = {}
            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")
return pathLink
end
end


local function generateTemplate(entry, param, data)
local function generateRepeatTemplate(data, project, baseUrl)
    local spritePath = getSpritePath(entry)
local spriteGroups = {}
    if not entry.id or not spritePath then
 
        return nil
for id, entry in pairs(data) do
    end
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


    local spriteField = getInsensitiveKey(entry, "Sprite")
return table.concat(result, "\n")
end


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


    if param == "image" then
local states = getSpriteStates(entry)
        local stateStr = ""
local stateStr = buildSpriteStateLinks(baseUrl, states)
        if state then
            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 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


    local data = loadData('User:IanComradeBot/prototypes/entity sprite.json')
return table.concat(result, "\n")
    if not data or type(data) ~= 'table' then
end
        return 'Ошибка: Невозможно загрузить данные из JSON.'
    end


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


return p
return p