Module:ExtractSection

Documentation for this module may be created at Module:ExtractSection/doc

local p = {}

-- Helper function to extract content under a specific section header
function p.extractSection(content, header)
    -- Define the pattern to find the section header
    local startPattern = mw.ustring.gsub(header, "=", "%%=")
    -- Find the start of the specified header
    local sectionStart, sectionEnd = mw.ustring.find(content, startPattern .. "%s-=+%s-\n")
    -- If the section is not found, return nil
    if not sectionStart then
        return nil
    end
    -- Find the next section header (either === or higher)
    local nextHeaderPattern = "\n==+%s*[^=]"
    local nextHeaderStart, nextHeaderEnd = mw.ustring.find(content, nextHeaderPattern, sectionEnd + 1)
    -- Extract the content until the next section header or the end of the content
    if nextHeaderStart then
        return mw.ustring.sub(content, sectionEnd + 1, nextHeaderStart - 1)
    else
        return mw.ustring.sub(content, sectionEnd + 1)
    end
end

function p.extractTab(content, label)
    local pattern = label .. "|"
    local pattern2 = label .. " *= *"
    local matchStart, matchEnd = string.find(content, pattern, 1, true)
    if not matchStart then
        matchStart, matchEnd = string.find(content, pattern2)
        if not matchStart then
            return nil
        end
    end

    local tab = ""
    local braceCount = 0
    local i = matchEnd + 1
    local isNewLine = false

    while i <= #content do
        local char = content:sub(i, i)

        if char == '{' then
            braceCount = braceCount + 1
        elseif char == '}' then
            braceCount = braceCount - 1
            if braceCount < 0 then
                return tab
            end
        end

        if braceCount == 0 and char == '\n' then
            isNewLine = true
            tab = tab .. char
        elseif isNewLine and char == '|' then
            break
        else
            isNewLine = false
            tab = tab .. char
        end

        i = i + 1
    end

    return tab
end

function p.transclude(frame)
    local args = frame.args
    local content = args[1]
    local field = args[2]
    local section = args.section
    local mode = args.mode

    if not (content and field) then
        return "Error: Missing parameters."
    end

    local content = mw.title.new(content):getContent()
    if not content then
        return "Error: Page not found"
    end
    
    if section then
        content = p.extractSection(content, section)
    else
        if not mode or mode ~= "tab" then
            content = p.extractSection(content, field)
        end
    end

    if mode and mode == "tab" then
        content = p.extractTab(content, field)
    end

    return frame:preprocess(content)
end

return p