Modul:CactaceaeTaxonok

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

local p = {}

-- Segédfüggvény a szimbólumokhoz (Unicode-biztos)
local function formazSzinonimak(szoveg)
    if not szoveg or szoveg == "" then return "" end
    local tiszta = mw.ustring.gsub(szoveg, "[đ÷]", "")
    tiszta = mw.ustring.gsub(tiszta, "¤+", "")
    tiszta = mw.ustring.gsub(tiszta, ">−", "−")
    tiszta = mw.ustring.gsub(tiszta, ">≡", "≡")
    tiszta = mw.ustring.gsub(tiszta, ">=", "=")
    tiszta = mw.ustring.gsub(tiszta, "≡≡", "|≡")
    tiszta = mw.ustring.gsub(tiszta, "==", "|=")
    tiszta = mw.ustring.gsub(tiszta, "−−", "|−")
    tiszta = mw.ustring.gsub(tiszta, "%-%-", "|−")

    local lista_elemek = {}
    for resz in mw.text.gsplit(tiszta, "|", true) do
        local tiszta_resz = mw.text.trim(resz)
        if tiszta_resz ~= "" then
            local szavak = {}
            for szo in mw.ustring.gmatch(tiszta_resz, "%S+") do
                if mw.ustring.find(szo, "[≡=−,]") or szo == "var." or szo == "subsp." or szo == "f." or szo == "Type:" then
                    table.insert(szavak, szo)
                else
                    table.insert(szavak, "''" .. szo .. "''")
                end
            end
            table.insert(lista_elemek, "<li>" .. table.concat(szavak, " ") .. "</li>")
        end
    end
    
    if #lista_elemek > 0 then
        return '<ul style="margin-left: 1.1em; list-style-type: disc; padding: 0; margin: 0;">' .. table.concat(lista_elemek) .. "</ul>"
    end
    return ""
end

function p.tablazat(frame)
    local status, adatModul = pcall(require, 'Modul:CactaceaeTaxonokData')
    if not status then return "Hiba: A 'Modul:CactaceaeTaxonokData' nem található!" end
    
    local nyers_adat = adatModul.getAdatok()

    -- 1. Keresés vezérlő (Checkboxok)
    local controls = [[
<div style="margin-bottom: 10px; padding: 8px; background: #f8f9fa; border: 1px solid #a2a9b1; border-radius: 2px; font-size: 90%;">
    <strong>Keresés itt:</strong> 
    <label style="margin-right: 15px;"><input type="checkbox" id="search-taxon" checked> Taxonnév</label>
    <label><input type="checkbox" id="search-szinonima" checked> Szinonimák</label>
</div>
]]

    -- 2. Táblázat generálása
    local res = '{| class="wikitable sortable datatable-hook stripe hover compact" id="cactus-table" data-page-length="50" style="width:100%; font-size:90%;"\n'
    res = res .. "! # !! Taxonnév !! Típusfaj, szinonima\n"

    local sorszam = 0
    for sor in mw.ustring.gmatch(nyers_adat, "[^\r\n]+") do
        local taxon, szinonimak = "", ""
        if mw.ustring.match(sor, "^ß") then
            local nemzettseg, tipus = mw.ustring.match(sor, "^ß%s*([^:]+)::%s*(.+)")
            if nemzettseg then
                taxon = "'''" .. mw.text.trim(nemzettseg):gsub("¤+", "") .. "'''"
                szinonimak = tipus
            end
        elseif mw.ustring.match(sor, "^Ł") then
            local tiszta_sor = mw.ustring.gsub(sor, "^Ł%s*", "")
            local t, sz = mw.ustring.match(tiszta_sor, "([^¤]+)¤¤¤(.*)")
            if t then
                taxon = "''" .. mw.text.trim(t) .. "''"
                szinonimak = sz
            end
        end

        if taxon ~= "" then
            sorszam = sorszam + 1
            res = res .. "|-\n| " .. sorszam .. '\n| style="white-space: nowrap;" | ' .. taxon .. "\n| " .. formazSzinonimak(szinonimak) .. "\n"
        end
    end
    res = res .. "|}"

    -- 3. JavaScript a szűréshez
    -- Ez a kód figyeli a checkboxokat és módosítja a DataTable keresési logikáját
    local script = [[
<script>
document.addEventListener('DOMContentLoaded', function() {
    var table = $('#cactus-table').DataTable();
    
    // Alapértelmezett keresőmező elrejtése vagy átvétele
    $('.dataTables_filter input').on('keyup', function() {
        var term = this.value;
        var searchTaxon = document.getElementById('search-taxon').checked;
        var searchSzin = document.getElementById('search-szinonima').checked;
        
        // Összes keresés törlése
        table.columns().search('');
        
        if (searchTaxon && searchSzin) {
            table.search(term).draw(); // Globális keresés
        } else if (searchTaxon) {
            table.column(1).search(term).draw(); // Csak Taxonnév (2. oszlop)
            table.column(2).search('');
        } else if (searchSzin) {
            table.column(2).search(term).draw(); // Csak Szinonima (3. oszlop)
            table.column(1).search('');
        } else {
            table.search('^$', true, false).draw(); // Semmi (üres keresés)
        }
    });
});
</script>
]]

    return frame:preprocess(controls .. res .. script)
end

return p