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

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


local function deepEqual(t1, t2)
local function normalizeSpritePath(path)
    if t1 == t2 then return true end
if path == nil then
    if type(t1) ~= "table" or type(t2) ~= "table" then return false end
return nil
end


    local function isArray(t)
path = mw.text.trim(tostring(path))
        local count = 0
path = path:gsub("^/Textures/?", "")
        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
return path
        if #t1 ~= #t2 then return false end
end
        for i = 1, #t1 do
 
            if not deepEqual(t1[i], t2[i]) then
local function buildEntryKey(entry)
                return false
local parts = {}
            end
 
        end
if entry.sprite then
        return true
table.insert(parts, "sprite=" .. normalizeSpritePath(entry.sprite))
    end
end
 
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
layerParts[#layerParts+1] = k .. "=" .. tostring(v)
end
 
table.sort(layerParts)
table.insert(layers, table.concat(layerParts, ","))
end
 
table.sort(layers)
table.insert(parts, "layers=" .. table.concat(layers, "|"))
end
 
return table.concat(parts, ";")
end
 
local function getSpritePath(entry)
return normalizeSpritePath(entry.sprite)
end
 
local function getSpriteStates(entry)
local result = {}
 
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


    for k, v in pairs(t1) do
value = mw.text.trim(tostring(value))
        if t2[k] == nil or not deepEqual(v, t2[k]) then
if value == "" then
            return false
return nil
        end
end
    end


    for k, v in pairs(t2) do
for part in mw.text.gsplit(value, ",", true) do
        if t1[k] == nil or not deepEqual(v, t1[k]) then
local item = mw.text.trim(part)
            return false
if item ~= "" then
        end
table.insert(result, item)
    end
end
end


    return true
return (#result > 0) and result or nil
end
end


local function findFieldInsensitive(tbl, fieldName)
local function buildSet(value)
    for key, value in pairs(tbl) do
local list = splitCsv(value)
        if type(key) == "string" and mw.ustring.lower(key) == mw.ustring.lower(fieldName) then
if not list then
            return value
return nil
        end
end
    end
 
    return nil
local set = {}
for _, item in ipairs(list) do
set[item] = true
end
 
return set
end
end


local function getSpritePath(entry)
local function getParents(entry)
    local iconField = findFieldInsensitive(entry, "Icon")
if not entry then
    local spriteField = findFieldInsensitive(entry, "Sprite")
return nil
   
end
    if iconField and iconField.sprite then
 
        return iconField.sprite
if type(entry.parents) == "table" then
    elseif spriteField and spriteField.sprite then
return entry.parents
        return spriteField.sprite
end
    elseif spriteField and spriteField.layers then
 
        for _, layer in pairs(spriteField.layers) do
if type(entry.parents) == "string" then
            if layer.sprite then
return splitCsv(entry.parents)
                return layer.sprite
end
            end
 
        end
return nil
    end
    return nil
end
end


local function isStateFirstKey(layer)
local function hasAnyParent(parents, set)
    for k, _ in pairs(layer) do
if not parents or not set then
        return k == "state"
return false
    end
end
    return false
 
for _, parent in ipairs(parents) do
if set[parent] then
return true
end
end
 
return false
end
end


local function getSpriteStates(entry)
local function shouldIncludeEntry(entry, whitelistSet, blacklistSet)
    local spriteBlock = findFieldInsensitive(entry, "Sprite")
local parents = getParents(entry)
    if not spriteBlock or not spriteBlock.layers then
 
        local iconBlock = findFieldInsensitive(entry, "Icon")
if whitelistSet then
        if iconBlock and iconBlock.state then
if not hasAnyParent(parents, whitelistSet) then
            return { { state = iconBlock.state, sprite = getSpritePath(entry) } }
return false
        end
end
        if spriteBlock and spriteBlock.state then
end
            return { { state = spriteBlock.state, sprite = getSpritePath(entry) } }
 
        end
if blacklistSet and hasAnyParent(parents, blacklistSet) then
        return nil
return false
    end
end
 
return true
end


    local firstStateLayer
local function filterSpriteData(spriteData, prototypeData, whitelistSet, blacklistSet)
    for _, layer in ipairs(spriteBlock.layers) do
local result = {}
        if layer.state then
            firstStateLayer = layer
            break
        end
    end
    if not firstStateLayer then
        return nil
    end


    local result = {}
for id, entry in pairs(spriteData) do
    if firstStateLayer.visible ~= false then
local protoEntry = prototypeData and prototypeData[id] or entry
        if firstStateLayer.sprite then
            table.insert(result, { state = firstStateLayer.state, sprite = firstStateLayer.sprite })
        else
            table.insert(result, { state = firstStateLayer.state, sprite = getSpritePath(entry) })
        end
    end


    for _, layer in ipairs(spriteBlock.layers) do
if shouldIncludeEntry(protoEntry, whitelistSet, blacklistSet) then
        if layer ~= firstStateLayer and layer.state and isStateFirstKey(layer) and layer.visible ~= false then
result[id] = entry
            if layer.sprite then
end
                table.insert(result, { state = layer.state, sprite = layer.sprite })
end
            else
                table.insert(result, { state = layer.state, sprite = getSpritePath(entry) })
            end
        end
    end


    return (#result > 0) and result or nil
return result
end
end


local function generateRepeatTemplate(data)
local function generateRepeatTemplate(data, project)
    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(findFieldInsensitive(entry, "Sprite"), findFieldInsensitive(group[1], "Sprite")) and
              deepEqual(entry.EntityStorageVisuals, group[1].EntityStorageVisuals) and
              deepEqual(findFieldInsensitive(entry, "Icon"), findFieldInsensitive(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(entry, param)
local function generateTemplate(id, entry, baseUrl, project)
    local spritePath = getSpritePath(entry)
local spritePath = getSpritePath(entry)
    if not entry.id or not spritePath then
if not id or not spritePath then
        return nil
return nil
    end
end


    if param == "image" then
local prefix = getPrefix(id, project)
        local states = getSpriteStates(entry)
        local stateStr = ""
        if states then
            local baseUrl = "https://github.com/space-syndicate/space-station-14/blob/master/Resources/Textures/"
            local links = {}
            for _, item in ipairs(states) do
                local spritePath = item.sprite
                local stateName = item.state
                local url = baseUrl .. spritePath .. "/" .. stateName .. ".png"
                table.insert(links, "[" .. url .. " " .. stateName .. "]")
            end
            stateStr = table.concat(links, ", ")
        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
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 action = frame.args[1]
local action = frame.args[1]
    local mode = frame.args[2]
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 = {}


    local dataPage
for id, entry in pairs(filteredData) do
    if mode == "item" then
local t = generateTemplate(id, entry, baseUrl, project)
        dataPage = "Модуль:IanComradeBot/prototypes/entity sprite/item.json/data"
if t then
    elseif mode == "structure" then
table.insert(result, t)
        dataPage = "Модуль:IanComradeBot/prototypes/entity sprite/structure.json/data"
end
    elseif mode == "mob" then
end
        dataPage = "Модуль:IanComradeBot/prototypes/entity sprite/mob.json/data"
    elseif mode == "other" then
        dataPage = "Модуль:IanComradeBot/prototypes/entity sprite/other.json/data"
    else
        dataPage = "Модуль:IanComradeBot/prototypes/entity sprite.json/data"
    end


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


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


return p
return p