Module:Copied

local MessageBox = require('Module:Message box')
local getArgs = require('Module:Arguments').getArgs
local p = {}
local function singleText(args)
	local from_oldid = args["from_oldid"] or ""
	local from = args["from"] or ""
	local to_diff = args["to_diff"] or ""
	local diff = args["diff"] or ""
	local to_oldid = args["to_oldid"] or ""
	local to = args["to"] or ""
	local date = args["date"] or ""
	local afd = args["afd"] or ""
	local text = "Text and/or other creative content from " 
	if not from_oldid == "" then
		text = text .. "[{{fullurl:" .. from .. "|oldid=" .. from_oldid .. "this version] of "
	end
	text = text .. "[[" .. from .."]]" 
	text = text .. " was copied or moved into " 
	text = text .. "[[" .. to .. "]]"
	if not diff == "" then
		text = text .. " with [" .. diff .. "|this edit]"
	elseif not to_oldid == "" then
		text = text .. "with [{{fullurl:" .. to .. "|diff=" .. to_diff .. "&oldid=" .. to_oldid .. "}}|this edit]"
	end
	if not date == "" then
		text = text .. " on " .. date
	end
	if not afd == "" then
		text = text .. " after being [[Wikipedia:Articles for deletion/" .. afd "|nominated for deletion]]."
	end
	text = text .. ". The former page's " 
	text = text .. "[{{fullurl:" .. from .. "|action=history}} history] "
	text = text .. "now serves to [[WP:Copying within Wikipedia|provide attribution]] for that content in the latter page, and it must not be deleted so long as the latter page exists."
	return text
end

local function multiText(args)
	local collapse = args["collapse"] or ""
	local text = "Text has been copied to or from this {{#ifeq:{{SUBJECTSPACE}}||article|page}}; see the list below. The source pages now serve to [[WP:Copying within Wikipedia|provide attribution]] for the content in the destination pages and must not be deleted so long as the copies exist. For attribution and to access older versions of the copied text, please see the history links below."
	if collapse == 'yes' then
		text = text .. '<table style="width:100%; background: transparent;" class="collapsible collapsed">\n<tr><th>Copied pages:</th></tr>\n<tr><td>'	
	end
	text = text .. "list(frame)"
	if collapse == 'yes' then
		text = text .. '</td></tr></table>'	
	end
	return text
end

local function BannerText(args)
	local text
	local from2 = (args["from2"] or "")
	if from2 == "" then
		text = singleText(args)
	elseif not (from2 == "") then
		text = multiText(args)
	end
	return text
end

local function renderBanner(args)
	return MessageBox.main('tmbox', {
		small = args["small"],
		type = 'notice',
		image = '[[File:Splitsection.svg|50px]]',
		smallimage = 'none',
		text = BannerText(args)
	})
end

function p.main(frame)
	local args = getArgs(frame)
	return renderBanner(args)
end

return p