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

Нет описания правки
Нет описания правки
 
(не показано 37 промежуточных версий этого же участника)
Строка 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


    -- Если это массивы, проверяем их содержимое без учета порядка
if entry.layers and type(entry.layers) == "table" then
    local function isArray(t)
local layers = {}
        for _, v in pairs(t) do
            if type(v) == "nil" then return false end
        end
        return true
    end


    if isArray(t1) and isArray(t2) then
for _, layer in ipairs(entry.layers) do
        if #t1 ~= #t2 then return false end
local layerParts = {}
        local matched = {}
        for _, v1 in pairs(t1) do
            local found = false
            for _, v2 in pairs(t2) do
                if not matched[v2] and deepEqual(v1, v2) then
                    matched[v2] = true
                    found = true
                    break
                end
            end
            if not found then return false end
        end
        return true
    end


    -- Если это таблицы, проверяем их содержимое
for k, v in pairs(layer) do
    for k, v in pairs(t1) do
layerParts[#layerParts+1] = k .. "=" .. tostring(v)
        if not deepEqual(v, t2[k]) then
end
            return false
        end
    end


    for k, v in pairs(t2) do
table.sort(layerParts)
        if 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
 
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
 
return result
end
end


-- Генерация шаблона repeat
local function generateRepeatTemplate(data, project)
local function generateRepeatTemplate(data)
local spriteGroups = {}
    local spriteGroups = {}
 
for id, entry in pairs(data) do
local key = buildEntryKey(entry)


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


    local result = {}
for _, group in pairs(spriteGroups) do
    for _, group in pairs(spriteGroups) do
if #group > 1 then
        if #group > 1 then
local idLinks = {}
            local idLinks = {}
            for _, entry in pairs(group) do
for _, obj in ipairs(group) do
                table.insert(idLinks, "[[:Файл:" .. entry.id .. ".png]]")
local id = obj.id
            end
local prefix = getPrefix(id, project)
            table.insert(result, mw.getCurrentFrame():preprocess("{{Entity Sprite/Repeat|" .. table.concat(idLinks, " ") .. "|" .. group[1].id .. "}}"))
        end
table.insert(idLinks, "[[:Файл:" .. prefix .. id .. ".png]]")
    end
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")
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 prefix = getPrefix(id, project)
 
local states = getSpriteStates(entry)
local stateStr = ""


    if param == "image" then
if states then
        return mw.getCurrentFrame():preprocess("{{Entity Sprite/Image|" .. entry.id .. "|" .. spritePath .. "}}")
local links = {}
    elseif param == "path" then
for _, item in ipairs(states) do
        return mw.getCurrentFrame():preprocess("{{Entity Sprite/Path|" .. entry.id .. "|" .. spritePath .. "}}")
if item.sprite and item.state then
    end
local url = baseUrl .. item.sprite .. "/" .. item.state .. ".png"
table.insert(links, "[" .. url .. " " .. item.state .. "]")
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