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

мНет описания правки
Нет описания правки
 
(не показано 35 промежуточных версий этого же участника)
Строка 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 getSpritePath(entry)
    if entry.Sprite and entry.Sprite.sprite then
return normalizeSpritePath(entry.sprite)
        return entry.Sprite.sprite
end
    elseif entry.Icon and entry.Icon.sprite then
 
        return entry.Icon.sprite
local function getSpriteStates(entry)
    elseif entry.Sprite and entry.Sprite.layers then
local result = {}
        for _, layer in pairs(entry.Sprite.layers) do
 
            if layer.sprite then
if entry.layers and type(entry.layers) == "table" then
                return layer.sprite
for _, layer in ipairs(entry.layers) do
            end
if layer.visible ~= false then
        end
table.insert(result, {
    end
state = tostring(layer.state or entry.state or ""),
    return nil
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
end


-- Генерация шаблона repeat
local function buildSet(value)
local function generateRepeatTemplate(data)
local list = splitCsv(value)
    local spriteGroups = {}
if not list then
return nil
end


    for _, entry in pairs(data) do
local set = {}
        local found = false
for _, item in ipairs(list) do
        for _, group in pairs(spriteGroups) do
set[item] = true
            if deepEqual(entry.Sprite, group[1].Sprite) and
end
              deepEqual(entry.EntityStorageVisuals, group[1].EntityStorageVisuals) and
              deepEqual(entry.Icon, group[1].Icon) then
                table.insert(group, entry)
                found = true
                break
            end
        end


        if not found then
return set
            table.insert(spriteGroups, {entry})
end
        end
    end


    local result = {}
local function getParents(entry)
    for _, group in pairs(spriteGroups) do
if not entry then
        if #group > 1 then
return nil
            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")
if type(entry.parents) == "table" then
return entry.parents
end
 
if type(entry.parents) == "string" then
return splitCsv(entry.parents)
end
 
return nil
end
end


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


    -- Определяем state
for _, parent in ipairs(parents) do
    local state = nil
if set[parent] then
    if entry.Sprite and entry.Sprite.state then
return true
        state = entry.Sprite.state
end
    elseif entry.Sprite and entry.Sprite.layers then
end
        for _, layer in pairs(entry.Sprite.layers) do
            if layer.state then
                state = layer.state
                break
            end
        end
    end


    if param == "image" then
return false
        local stateStr = ""
end
        if state then
            stateStr = "(" .. state .. ")"
        end
        return mw.getCurrentFrame():preprocess("{{Entity Sprite/Image|" .. entry.id .. "|" .. spritePath .. stateStr .. "}}")
    end


    return nil
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
 
return result
end
 
local function generateRepeatTemplate(data, project)
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
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
 
local function generateTemplate(id, entry, baseUrl, project)
local spritePath = getSpritePath(entry)
if not id or not spritePath then
return nil
end
 
local prefix = getPrefix(id, project)
 
local states = getSpriteStates(entry)
local stateStr = ""
 
if states then
local links = {}
for _, item in ipairs(states) do
if item.sprite and item.state then
local url = baseUrl .. item.sprite .. "/" .. item.state .. ".png"
table.insert(links, "[" .. url .. " " .. item.state .. "]")
end
end
stateStr = table.concat(links, ", ")
end
 
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