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

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


-- Загрузка данных
local function normalizeSpritePath(path)
local function loadData(filePath)
if path == nil then
    local page = mw.title.new(filePath)
return nil
    local content = page and page:getContent()
end
    return content and mw.text.jsonDecode(content) or nil
 
path = mw.text.trim(tostring(path))
path = path:gsub("^/Textures/?", "")
 
return path
end
end


-- Проверка равенства двух таблиц
local function buildEntryKey(entry)
local function deepEqual(t1, t2)
local parts = {}
    if t1 == t2 then return true end
 
    if type(t1) ~= "table" or type(t2) ~= "table" then return false end
if entry.sprite then
table.insert(parts, "sprite=" .. normalizeSpritePath(entry.sprite))
end


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


    for k, v in pairs(t1) do
for k, v in pairs(layer) do
        if t2[k] == nil or not deepEqual(v, t2[k]) then
layerParts[#layerParts+1] = k .. "=" .. tostring(v)
            return false
end
        end
    end


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


    return true
table.sort(layers)
table.insert(parts, "layers=" .. table.concat(layers, "|"))
end
 
return table.concat(parts, ";")
end
end


-- Вспомогательная функция для получения поля без учёта регистра
local function getSpritePath(entry)
local function getInsensitiveKey(t, target)
return normalizeSpritePath(entry.sprite)
    target = target:lower()
    for k, v in pairs(t) do
        if type(k) == "string" and k:lower() == target then
            return v
        end
    end
    return nil
end
end


-- Получение пути спрайта
local function getSpriteStates(entry)
local function getSpritePath(entry)
local result = {}
    local spriteField = getInsensitiveKey(entry, "Sprite")
 
    local iconField = getInsensitiveKey(entry, "Icon")
if entry.layers and type(entry.layers) == "table" then
for _, layer in ipairs(entry.layers) do
if layer.visible ~= false then
table.insert(result, {
state = tostring(layer.state or entry.state or ""),
sprite = normalizeSpritePath(layer.sprite or entry.sprite)
})
end
end
elseif entry.state and entry.sprite then
table.insert(result, {
state = tostring(entry.state or ""),
sprite = normalizeSpritePath(entry.sprite)
})
end
 
return (#result > 0) and result or nil
end
 
local function getPrefix(id, project)
if project ~= "" and JsonPaths.has(id, project) then
return project .. ":"
end
return ""
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(entry)
if not entry then
return nil
end
 
if type(entry.parents) == "table" then
return entry.parents
end
 
if type(entry.parents) == "string" then
return splitCsv(entry.parents)
end
 
return nil
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(entry, whitelistSet, blacklistSet)
local parents = getParents(entry)
 
if whitelistSet then
if not hasAnyParent(parents, whitelistSet) then
return false
end
end
 
if blacklistSet and hasAnyParent(parents, blacklistSet) then
return false
end
 
return true
end
 
local function filterSpriteData(spriteData, prototypeData, whitelistSet, blacklistSet)
local result = {}
 
for id, entry in pairs(spriteData) do
local protoEntry = prototypeData and prototypeData[id] or entry
 
if shouldIncludeEntry(protoEntry, whitelistSet, blacklistSet) then
result[id] = entry
end
end


    if spriteField and spriteField.sprite then
return result
        return spriteField.sprite
    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


-- Генерация шаблона repeat
local function generateRepeatTemplate(data, project)
local function generateRepeatTemplate(data)
local spriteGroups = {}
    local spriteGroups = {}


    for _, entry in pairs(data) do
for id, entry in pairs(data) do
        local found = false
local key = buildEntryKey(entry)
        for _, group in pairs(spriteGroups) do
            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
spriteGroups[key] = spriteGroups[key] or {}
            table.insert(spriteGroups, {entry})
table.insert(spriteGroups[key], { id = id, entry = entry })
        end
end
    end


    local result = {}
local result = {}
    for _, group in pairs(spriteGroups) do
        if #group > 1 then
            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")
for _, group in pairs(spriteGroups) do
if #group > 1 then
local idLinks = {}
for _, obj in ipairs(group) do
local id = obj.id
local prefix = getPrefix(id, project)
table.insert(idLinks, "[[:Файл:" .. prefix .. id .. ".png]]")
end
local firstId = group[1].id
local prefix = getPrefix(firstId, project)
table.insert(result, mw.getCurrentFrame():preprocess(
"{{Entity Sprite/Repeat|спрайты=" .. table.concat(idLinks, " ") ..
"|перенаправление=" .. prefix .. firstId ..
"|id=" .. firstId ..
"}}"
))
end
end
 
return table.concat(result, "\n")
end
end


-- Функция генерации шаблона по записи
local function generateTemplate(id, entry, baseUrl, project)
local function generateTemplate(entry, param, data)
local spritePath = getSpritePath(entry)
    local spritePath = getSpritePath(entry)
if not id or not spritePath then
    if not entry.id or not spritePath then
return nil
        return nil
end
    end


    local spriteField = getInsensitiveKey(entry, "Sprite")
local prefix = getPrefix(id, project)


    -- Определяем state
local states = getSpriteStates(entry)
    local state = nil
local stateStr = ""
    if spriteField and spriteField.state then
        state = spriteField.state
    elseif spriteField and spriteField.layers then
        for _, layer in pairs(spriteField.layers) do
            if layer.state then
                state = layer.state
                break
            end
        end
    end


    if param == "image" then
if states then
        local stateStr = ""
local links = {}
        if state then
for _, item in ipairs(states) do
            stateStr = " (state: " .. state .. ")"
if item.sprite and item.state then
        end
local url = baseUrl .. item.sprite .. "/" .. item.state .. ".png"
        return mw.getCurrentFrame():preprocess("{{Entity Sprite/Image|" .. entry.id .. "|https://github.com/space-syndicate/space-station-14/blob/master/Resources/Textures/" .. spritePath .. stateStr .. "}}")
table.insert(links, "[" .. url .. " " .. item.state .. "]")
    end
end
end
stateStr = table.concat(links, ", ")
end


    return nil
return mw.getCurrentFrame():preprocess(
"{{Entity Sprite/Image|файл=" .. prefix .. id ..
"|id=" .. id ..
"|путь=" .. 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 "sprite_entity.json"
 
local project = JsonPaths.project()
local baseUrl = JsonPaths.git() .. "/Resources/Textures/"
 
local dataPage = JsonPaths.get(json)
local prototypesPage = JsonPaths.get("entity prototypes.json")
 
local spriteData = mw.loadData(dataPage)
local prototypeData = mw.loadData(prototypesPage)
 
if not spriteData or type(spriteData) ~= "table" then
return "Ошибка загрузки JSON: " .. dataPage
end
 
if not prototypeData or type(prototypeData) ~= "table" then
return "Ошибка загрузки JSON: " .. prototypesPage
end
 
local whitelistSet = buildSet(frame.args.whitelistParent)
local blacklistSet = buildSet(frame.args.blacklistParent)
 
local filteredData = filterSpriteData(spriteData, prototypeData, whitelistSet, blacklistSet)
 
if action == "repeat" then
return generateRepeatTemplate(filteredData, project)
 
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