Ugrás a tartalomhoz

„Modul:Galeria” változatai közötti eltérés

Innen: MKOE wiki
Nincs szerkesztési összefoglaló
Nincs szerkesztési összefoglaló
25. sor: 25. sor:
         return {
         return {
             tipus = "URL",
             tipus = "URL",
             path = "https://commons.wikimedia.org/wiki/Special:FilePath/" .. url_nev,
             path = "https://commons.wikimedia.org/wiki/Special:FilePath/" .. url_nev
            felirat = nil
         }
         }
     end
     end
33. sor: 32. sor:
         return {
         return {
             tipus = "URL",
             tipus = "URL",
             path = s,
             path = s
            felirat = nil
         }
         }
     end
     end
40. sor: 38. sor:
     return {
     return {
         tipus = "WIKI",
         tipus = "WIKI",
         path = s,
         path = s
        felirat = nil
     }
     }
end
end


local function isKepFormatum(szoveg)
local function kinyerForrasNev(url)
    if not szoveg or szoveg == "" then return false end
    local s = megtisztitString(szoveg):lower()
   
    if s:find("^https?://") or s:find("^encrypted%-tbn") or s:find("gstatic%.com") or s:find("^commons:") then
        return true
    end
   
    if s:find("%.jpg$") or s:find("%.jpeg$") or s:find("%.png$") or s:find("%.gif$") or s:find("%.svg$") or s:find("%.webp$") then
        return true
    end
   
    return false
end
 
local function kinyerForrasNev(url, eredeti_bemenet)
     if not url or url == "" then return "Külső forrás" end
     if not url or url == "" then return "Külső forrás" end
      
      
90. sor: 72. sor:
     end
     end


     -- -------------------------------------------------------------------------
     local html = {}
     -- ÚJ, ATOMBIZTOS PARSER STRATÉGIA: Lineáris láncolás
     table.insert(html, '<div class="egyedi-galeria-container">')
    -- -------------------------------------------------------------------------
    local linearis_lista = {}


     -- Összegyűjtjük a normál numerikus paramétereket sorban
     -- Sorrendben végigmegyünk a numerikus paramétereken
     local max_index = 0
     local max_index = 0
     for k, v in pairs(args) do
     for k, v in pairs(args) do
         if type(k) == "number" and k > max_index then max_index = k end
         if type(k) == "number" and k > max_index then max_index = k end
     end
     end
   
 
    -- Felépítjük az alaptömböt, a hiányzó helyeket (lyukakat) jelöljük
     for i = 1, max_index do
     for i = 1, max_index do
         if args[i] and megtisztitString(args[i]) ~= "" then
         local elem = args[i]
             table.insert(linearis_lista, { szoveg = megtisztitString(args[i]), feldolgozott = false })
        if elem and megtisztitString(elem) ~= "" then
        end
             elem = megtisztitString(elem)
    end


    -- Vadásszuk le a sérült Google/külső URL kulcsokat, és szúrjuk be őket
            -- Szétválasztjuk a képet és a feliratot az egyetlen "~" mentén
    -- közvetlenül a hozzájuk tartozó felirat ELÉ (ami ott maradt árván a listában)
            local kep_resz = elem
    for k, v in pairs(args) do
            local felirat_resz = ""
        if type(k) == "string" then
              
             local tiszta_kulcs = megtisztitString(k)
             if elem:find("~") then
             if tiszta_kulcs:find("^https?://") or tiszta_kulcs:find("^encrypted%-tbn") or tiszta_kulcs:find("gstatic%.com") then
                kep_resz = elem:match("^(.-)~")
                local teljes_url = tiszta_kulcs .. "=" .. megtisztitString(v)
                 felirat_resz = elem:match("~(.*)$")
                  
                -- Megkeressük a feliratot a listában
                local beszurt = false
                for idx, elem in ipairs(linearis_lista) do
                    if not isKepFormatum(elem.szoveg) and not elem.feldolgozott then
                        -- Ez a felirat tartozik a törött URL-hez! Beszúrjuk elé.
                        table.insert(linearis_lista, idx, { szoveg = teljes_url, feldolgozott = false })
                        beszurt = true
                        break
                    end
                end
               
                -- Ha nem találtunk magányos feliratot, csak a lista végére rakjuk
                if not beszurt then
                    table.insert(linearis_lista, { szoveg = teljes_url, feldolgozott = false })
                end
             end
             end
        end
    end
    -- Kigyűjtjük a tiszta stringeket a lineáris listából a végső feldolgozáshoz
    local rendezett_args = {}
    for _, elem in ipairs(linearis_lista) do
        table.insert(rendezett_args, elem.szoveg)
    end
    -- -------------------------------------------------------------------------
    -- FŐ RENDERELŐ CIKLUS
    -- -------------------------------------------------------------------------
    local html = {}
    table.insert(html, '<div class="egyedi-galeria-container">')


    local i = 1
            kep_resz = megtisztitString(kep_resz)
    while rendezett_args[i] do
            felirat_resz = megtisztitString(felirat_resz)
        local v = rendezett_args[i]


        if v ~= "" and isKepFormatum(v) then
             local kepAdat = detektalKepTipus(kep_resz)
             local kepAdat = detektalKepTipus(v)


             if kepAdat then
             if kepAdat then
                -- Megnézzük, hogy a következő elem felirat-e
                if rendezett_args[i+1] then
                    local kovetkezo = rendezett_args[i+1]
                    if kovetkezo ~= "" and not isKepFormatum(kovetkezo) then
                        kepAdat.felirat = kovetkezo
                        i = i + 1 -- A feliratot átugorjuk a következő körben
                    end
                end
                 local tartalom = ""
                 local tartalom = ""
                local tiszta_felirat = kepAdat.felirat or ""


                 if kepAdat.tipus == "URL" then
                 if kepAdat.tipus == "URL" then
174. sor: 110. sor:
                         forras_nev = "Wikimedia Commons"
                         forras_nev = "Wikimedia Commons"
                     else
                     else
                         forras_nev = kinyerForrasNev(kepAdat.path, v)
                         forras_nev = kinyerForrasNev(kepAdat.path)
                     end
                     end


180. sor: 116. sor:
                                                 biztonsagos_path,
                                                 biztonsagos_path,
                                                 forras_nev,
                                                 forras_nev,
                                                 tiszta_felirat)
                                                 felirat_resz)
                 else
                 else
                     if kepAdat.felirat and kepAdat.felirat ~= "" then
                    -- HELYI WIKI KÉP
                         tartalom = string.format('[[Fájl:%s|thumb|180px|%s]]', kepAdat.path, tiszta_felirat)
                     if felirat_resz ~= "" then
                         tartalom = string.format('[[Fájl:%s|thumb|180px|%s]]', kepAdat.path, felirat_resz)
                     else
                     else
                         tartalom = string.format('[[Fájl:%s|thumb|180px]]', kepAdat.path)
                         tartalom = string.format('[[Fájl:%s|thumb|180px]]', kepAdat.path)
194. sor: 131. sor:
             end
             end
         end
         end
        i = i + 1
     end
     end



A lap 2026. június 17., 07:41-kori változata

A modult a Modul:Galeria/doc lapon tudod dokumentálni

local p = {}

-- =============================================================================
-- SEGÉDFÜGGVÉNYEK
-- =============================================================================

local function megtisztitString(s)
    if not s then return "" end
    s = s:gsub("^%s*(.-)%s*$", "%1")
    s = s:gsub("[\n\r]", "")
    return s
end

local function detektalKepTipus(nyers_bemenet)
    if not nyers_bemenet or nyers_bemenet == "" then return nil end
    
    local s = megtisztitString(nyers_bemenet)
    
    if s:lower():find("^commons:") then
        local tiszta_nev = s:sub(9)
        if not tiszta_nev:lower():find("^file:") and not tiszta_nev:lower():find("^fájl:") then
            tiszta_nev = "File:" .. tiszta_nev
        end
        local url_nev = tiszta_nev:gsub(" ", "_")
        return {
            tipus = "URL",
            path = "https://commons.wikimedia.org/wiki/Special:FilePath/" .. url_nev
        }
    end
    
    if s:find("^https?://") or s:find("^encrypted%-tbn") or s:find("gstatic%.com") then
        return {
            tipus = "URL",
            path = s
        }
    end
    
    return {
        tipus = "WIKI",
        path = s
    }
end

local function kinyerForrasNev(url)
    if not url or url == "" then return "Külső forrás" end
    
    if url:find("google%.com") or url:find("gstatic%.com") or url:find("^encrypted%-tbn") then
        return "Google Cache"
    end
    
    local domain = url:match("^https?://([^/]+)")
    if domain then
        domain = domain:gsub("^www%.", "")
        return domain
    end
    
    return "Külső link"
end

-- =============================================================================
-- FŐ FUNKCIÓ: GALÉRIA GENERÁLÁSA
-- =============================================================================
function p.generalGaleria(frame)
    local args = {}
    if type(frame) == "table" and type(frame.getParent) == "function" then
        args = frame:getParent().args
        if not args or (not args[1] and not args['k1']) then
            args = frame.args
        end
    else
        args = frame
    end

    local html = {}
    table.insert(html, '<div class="egyedi-galeria-container">')

    -- Sorrendben végigmegyünk a numerikus paramétereken
    local max_index = 0
    for k, v in pairs(args) do
        if type(k) == "number" and k > max_index then max_index = k end
    end

    for i = 1, max_index do
        local elem = args[i]
        if elem and megtisztitString(elem) ~= "" then
            elem = megtisztitString(elem)

            -- Szétválasztjuk a képet és a feliratot az egyetlen "~" mentén
            local kep_resz = elem
            local felirat_resz = ""
            
            if elem:find("~") then
                kep_resz = elem:match("^(.-)~")
                felirat_resz = elem:match("~(.*)$")
            end

            kep_resz = megtisztitString(kep_resz)
            felirat_resz = megtisztitString(felirat_resz)

            local kepAdat = detektalKepTipus(kep_resz)

            if kepAdat then
                local tartalom = ""

                if kepAdat.tipus == "URL" then
                    local biztonsagos_path = kepAdat.path:gsub(":", "&#58;")

                    local forras_nev = ""
                    if kepAdat.path:find("commons%.wikimedia%.org") then
                        forras_nev = "Wikimedia Commons"
                    else
                        forras_nev = kinyerForrasNev(kepAdat.path)
                    end

                    tartalom = string.format('<div class="kulso-url-doboz" data-src="%s" data-forras-nev="%s"><span class="url-link-szoveg">Külső kép:<br/>[Link]</span><div class="galeria-felirat">%s</div></div>',
                                                biztonsagos_path,
                                                forras_nev,
                                                felirat_resz)
                else
                    -- HELYI WIKI KÉP
                    if felirat_resz ~= "" then
                        tartalom = string.format('[[Fájl:%s|thumb|180px|%s]]', kepAdat.path, felirat_resz)
                    else
                        tartalom = string.format('[[Fájl:%s|thumb|180px]]', kepAdat.path)
                    end
                end

                table.insert(html, '  <div class="galeria-elem">')
                table.insert(html, '    ' .. tartalom)
                table.insert(html, '  </div>')
            end
        end
    end

    table.insert(html, '</div>')

    local vegleges_html = table.concat(html, "\n")
    return frame:preprocess(vegleges_html)
end

return p