Module:CopyEmbeddedStories: Difference between revisions

From Seven Sages of Rome
No edit summary
No edit summary
 
(4 intermediate revisions by the same user not shown)
Line 1: Line 1:
-- Module:CopyEmbeddedStories
local p = {}
local p = {}


-- Helper function to extract all EmbeddedStory templates from text
-- Function to fetch EmbeddedStory templates from a given page
local function extractEmbeddedStories(text)
function p.fetchEmbeddedStories(frame)
     local stories = {}
     local pageTitle = frame.args["sourcePage"]
     -- Match all EmbeddedStory templates
     if not pageTitle then
    for story in mw.ustring.gmatch(text, "{{EmbeddedStory.-}}") do
        return "Error: No source page specified."
        table.insert(stories, story)
     end
     end
    return stories
end


-- Helper function to append templates to a page
     -- Get the wikitext content of the source page
local function appendToPage(title, templates)
     local content = mw.title.new(pageTitle):getContent()
    local page = mw.title.new(title)
     if not content then
    if not page then return false, "Invalid page title" end
         return "Error: Source page not found or empty."
   
     local status, err = pcall(function()
        local pageText = mw.text.trim(mw.title.new(title):getContent() or "")
        -- Add a newline if the page isn't empty
        if pageText ~= "" then
            pageText = pageText .. "\n\n"
        end
        -- Append all templates
        for _, template in ipairs(templates) do
            pageText = pageText .. template .. "\n"
        end
       
        -- Save the page
        local success = page:update({
            text = pageText,
            summary = "Copied EmbeddedStory templates",
            minor = false
        })
        if not success then
            error("Failed to save page")
        end
    end)
   
    return status, err
end
 
-- Main function to copy templates
function p.copyTemplates(frame)
    local sourcePage = frame.args[1]
     local targetPage = frame.args[2]
   
    if not sourcePage or not targetPage then
        return "Error: Source and target pages must be specified"
    end
   
    -- Get source page content
    local sourceTitle = mw.title.new(sourcePage)
    if not sourceTitle then
        return "Error: Invalid source page title"
    end
   
    local sourceContent = sourceTitle:getContent()
     if not sourceContent then
         return "Error: Could not read source page"
    end
   
    -- Extract templates
    local stories = extractEmbeddedStories(sourceContent)
    if #stories == 0 then
        return "No EmbeddedStory templates found on source page"
     end
     end
   
    -- Copy templates to target page
    local success, err = appendToPage(targetPage, stories)
    if not success then
        return "Error copying templates: " .. (err or "unknown error")
    end
   
    return string.format("Successfully copied %d templates to %s", #stories, targetPage)
end


-- Function to generate form
     -- Find all EmbeddedStory templates
function p.showForm(frame)
     local templates = {}
    local currentPage = mw.title.getCurrentTitle().text
     for embeddedStory in content:gmatch("{{EmbeddedStory.-}}") do
   
         table.insert(templates, embeddedStory)
     -- Get list of pages in main namespace
     local options = {}
     for page in mw.allpages.allpages{namespace = 0} do
         if page.title ~= currentPage then
            table.insert(options, string.format("* %s", page.title))
        end
     end
     end
   
    -- Generate form HTML
    local form = string.format([[
<div class="template-copy-form">
=== Copy Embedded Stories ===
<select id="targetPage">
%s
</select>
<button onclick="copyTemplates()">Copy Stories</button>
</div>
<script>
function copyTemplates() {
    var targetPage = document.getElementById('targetPage').value;
    var currentPage = '%s';
   
    // Call the Lua module via API
    new mw.Api().post({
        action: 'parse',
        text: '{{#invoke:CopyEmbeddedStories|copyTemplates|' + currentPage + '|' + targetPage + '}}',
        contentmodel: 'wikitext'
    }).done(function(response) {
        mw.notify(response.parse.text['*']);
    });
}
</script>
]], table.concat(options, "\n"), currentPage)


     return form
    -- Return templates as a single concatenated string
     return table.concat(templates, "\n")
end
end


return p
return p

Latest revision as of 20:17, 13 November 2024

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

local p = {}

-- Function to fetch EmbeddedStory templates from a given page
function p.fetchEmbeddedStories(frame)
    local pageTitle = frame.args["sourcePage"]
    if not pageTitle then
        return "Error: No source page specified."
    end

    -- Get the wikitext content of the source page
    local content = mw.title.new(pageTitle):getContent()
    if not content then
        return "Error: Source page not found or empty."
    end

    -- Find all EmbeddedStory templates
    local templates = {}
    for embeddedStory in content:gmatch("{{EmbeddedStory.-}}") do
        table.insert(templates, embeddedStory)
    end

    -- Return templates as a single concatenated string
    return table.concat(templates, "\n")
end

return p
Retrieved from "https://db.seven-sages-of-rome.org/index.php?title=Module:CopyEmbeddedStories&oldid=4537"
Powered by MediaWiki
Powered by Semantic MediaWiki