Modul:Galeria

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

local p = {}

-- Letisztítja az összes láthatatlan karaktert és újsort a szöveg elejéről/végéről
local function megtisztitString(s)
    if not s then return "" end
    return s:match("^%s*(.-)%s*$")
end

-- Képtípus meghatározása és tisztítása
local function detektalKepTipus(nyers_bemenet)
    local tiszta_bemenet = megtisztitString(nyers_bemenet)
    if tiszta_bemenet == "" then return nil end

    local kep_resz = tiszta_bemenet
    local felirat = nil

    -- Megkeressük a '|' karaktert, ha esetleg mégis átjönne a stringben
    local pipe_pos = tiszta_bemenet:find("|")
    if pipe_pos then
        kep_resz = megtisztitString(tiszta_bemenet:sub(1, pipe_pos - 1))
        felirat = megtisztitString(tiszta_bemenet:sub(pipe_pos + 1))
    end

    if felirat == "" then felirat = nil end

    -- Ha gstatic vagy google link, de lemaradt a protokoll, pótoljuk
    if (kep_resz:find("^encrypted%-tbn") or kep_resz:find("^lh%d+%.google")) and not kep_resz:find("^https?://") then
        kep_resz = "https://" .. kep_resz
    end

    -- 1. Internetes link vizsgálata
    if kep_resz:find("^https?://") then
        return { tipus = "URL", path = kep_resz, felirat = felirat }
    end

    -- 2. Wikimedia Commons átalakítása közvetlen külső URL-lé
    if kep_resz:find("^[Cc]ommons:") or kep_resz:find("^[Cc]:") then
        local fajlnev = kep_resz:gsub("^[Cc]ommons:", ""):gsub("^[Cc]:", "")
                               :gsub("^[Ff]ájl:", ""):gsub("^[Ff]ile:", "")
                               :match("^%s*(.-)%s*$")

        local tiszta_fajlnev = fajlnev:gsub(" ", "_")
        local commons_url = "https://commons.wikimedia.org/wiki/Special:FilePath/" .. tiszta_fajlnev

        return { tipus = "URL", path = commons_url, felirat = felirat }
    end

    -- 3. Helyi kép vizsgálata
    local helyi_fajl = kep_resz:gsub("^[Ff]ájl:", ""):gsub("^[Ff]ile:", "")
    return { tipus = "HELYI", path = megtisztitString(helyi_fajl), felirat = felirat }
end

-- Segédfüggvény annak eldöntésére, hogy egy paraméter kép-e
local function isKepFormatum(szoveg)
    if not szoveg or szoveg == "" then return false end
    local s = mw.ustring.lower(szoveg)

    return mw.ustring.find(s, '^http')
        or mw.ustring.find(s, 'gstatic%.com')        -- ÚJ: Google gyorsítótáras képek felismerése
        or mw.ustring.find(s, 'googleusercontent')  -- ÚJ: Egyéb Google-képek felismerése
        or mw.ustring.find(s, '^commons:')
        or mw.ustring.find(s, '^c:')
        or mw.ustring.find(s, '%.jpg')
        or mw.ustring.find(s, '%.jpeg')
        or mw.ustring.find(s, '%.png')
        or mw.ustring.find(s, '%.gif')
        or mw.ustring.find(s, '%.webp')
end

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

    -- TRÜKK: Ha az egyenlőségjel miatt a MediaWiki szétvágta a Google linket, összefűzzük és berakjuk a helyére
    local tiszta_args = {}
    local pozicios_szamlalo = 1

    -- Először átmásoljuk a valódi pozíciós paramétereket, de figyelünk a szakadásokra
    for k, v in pairs(args) do
        if type(k) == "string" and (k:find("^https?://") or k:find("^encrypted%-tbn")) then
            -- Megtaláltuk a széttört Google linket! Újraépítjük a kulcsból és az értékből
            local teljes_url = k .. "=" .. v
            -- Megkeressük a lyukat vagy a sor végét, és beillesztjük
            table.insert(tiszta_args, teljes_url)
        end
    end
    
    local html = {}
    table.insert(html, '<div class="egyedi-galeria-container">')

    -- ÚJ LOGIKA: Végigmegyünk az összes névtelen (pozíciós) paraméteren (1, 2, 3...)
    local i = 1
    while args[i] do
        local v = megtisztitString(args[i])

        -- Ha nem üres a paraméter és KÉP formátumnak tűnik
        if v ~= "" and isKepFormatum(v) then
            local kepAdat = detektalKepTipus(v)

            if kepAdat then
                -- INTELLIGENS FELIRAT DETEKTÁLÁS (OPCIONÁLIS LEÍRÁS):
                -- Megnézzük a közvetlenül utána következő paramétert (i + 1).
                -- Ha létezik, nem üres, és NEM kép, akkor az bizony a képünk felirata!
                if args[i+1] then
                    local kovetkezo = megtisztitString(args[i+1])
                    if kovetkezo ~= "" and not isKepFormatum(kovetkezo) then
                        kepAdat.felirat = kovetkezo
                        i = i + 1 -- Mivel a feliratot felhasználtuk, a fő számlálót eggyel tovább léptetjük
                    end
                end

                local tartalom = ""
                local tiszta_felirat = kepAdat.felirat or ""

                if kepAdat.tipus == "URL" then
                    -- Elrejtjük a kettőspontot a preprocess elől
                    local biztonsagos_path = kepAdat.path:gsub(":", "&#58;")
                    tartalom = string.format('<div class="kulso-url-doboz" data-src="%s"><span class="url-link-szoveg">Külső kép:<br/>[Link]</span><div class="galeria-felirat">%s</div></div>', biztonsagos_path, tiszta_felirat)
                else -- HELYI
                    if kepAdat.felirat and kepAdat.felirat ~= "" then
                        tartalom = string.format('[[Fájl:%s|thumb|180px|%s]]', kepAdat.path, tiszta_felirat)
                    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

        -- Továbblépünk a következő paraméterre
        i = i + 1
    end

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

    local vegleges_html = table.concat(html, "\n")

    -- -------------------------------------------------------------------------
    -- IDEIGLENES DEBUG BLOKK: Kiírjuk a lap tetejére, mit kapott a Lua
    -- -------------------------------------------------------------------------
    local debug_infok = {}
    for idx, arg_val in pairs(args) do
        if type(idx) == "number" then
            table.insert(debug_infok, string.format("Paraméter [%d]: '%s' (Kép formátum? %s)", idx, arg_val, tostring(isKepFormatum(arg_val))))
        end
    end
    if #debug_infok > 0 then
        vegleges_html = '<pre style="background:#fff3cd; color:#856404; padding:10px; border:1px solid #ffeeba;">'
                        .. "LUA SUTI-DEBUG:\n" .. table.concat(debug_infok, "\n") .. "</pre>\n" .. vegleges_html
    end

    return frame:preprocess(vegleges_html)
end

return p