local p = {}
local lib_doc = require("Module:Documentation")
function p.processInput(input_data, default_value)
local retult = input_data
if type((input_data or {}).args) ~= type(nil) then --input_data is a frame
retult = input_data.args['1'] or input_data.args[1] or default_value
end
return retult
end
function p.makeSandboxTitle(input_data, page_tail)
local str_page_tail = page_tail or "sandbox"
local re_page_tail = "/"..str_page_tail.."$"
local text = p.processInput(input_data, "")
local i, j = mw.ustring.find(text, re_page_tail)
i = i or -1
i = mw.ustring.sub(text, i, i) == '/' and (i-1) or i
return mw.ustring.sub(text, 1, i).."/"..str_page_tail
end
function p.path_escape(text)
local result = text:gsub("%%","%%%%")
result = result:gsub("%+","%%+")
result = result:gsub("%-","%%-")
result = result:gsub("%*","%%*")
result = result:gsub("%.","%%.")
return result
end
function p.makeSandboxNotice(input_data, input_page_title)
local current_title_name = input_data
local page_title = input_page_title
if type((input_data or {}).args) ~= type(nil) then --input_data is a frame
current_title_name = input_data.args['1'] or input_data.args[1]
page_title = input_data.args['2'] or input_data.args[2] or input_data.page_title or input_data['page title']
end
local current_title = (type(current_title_name) ~= type(nil)) and ({pcall(mw.title.new, current_title_name)})[2] or mw.title.getCurrentTitle()
local page_title = page_title and ({pcall(mw.title.new, page_title)})[2]
if type(page_title) == type("string") then page_title = nil end
if current_title:inNamespace(mw.title.new("title").namespace) then
current_title = current_title.talkPageTitle
end
local sandbox_title = p.makeSandboxTitle(current_title.fullText)
local lib_doc = require("Module:Documentation")
local args = {page=sandbox_title}
local env = lib_doc.getEnvironment(args)
local result = lib_doc.sandboxNotice(args, env)
if page_title then
local re_orig_path = p.path_escape(tostring(mw.uri.fullUrl('Special:ComparePages',
{page1 = "A", page2 = sandbox_title})):match("page2%=(.+)$"))
local rp_result_path = tostring(mw.uri.fullUrl('Special:ComparePages',
{page1 = "A", page2 = page_title.fullText})):match("page2%=(.+)$"):gsub("%%","%%%%")
result = mw.ustring.gsub(result, re_orig_path, rp_result_path)
end
return result
end
return p
