Module:lite-new

export = {}

local decode_entities = require("Module:string utilities").decode_entities

function export.new(frame)
	frameArgs = frame:getParent().args
	for arg, val in pairs(frameArgs) do
		frameArgs = mw.text.trim(val)
	end
	local template = frame.args
	local twoLangs = (template == "der-lite" or template == "inh-lite" or template == "bor-lite") and true
	if twoLangs then
		local firstLang = require("Module:languages").getByCode(frameArgs, nil, true, true)
		if not firstLang then
			require("Module:languages/error")(frameArgs, 1, "code")
		end
	end
	
	local langParam = (twoLangs and frameArgs) or (not twoLangs and frameArgs)
	local lang = require("Module:languages").getByCode(langParam, nil, true, true)
	
	if not lang then
		if twoLangs then
			require("Module:languages/error")(langParam, 2, "code")
		else
			require("Module:languages/error")(langParam, 1, "code")
		end
	elseif lang:hasType("family") then
		if twoLangs then
			return "{{" .. template .. "|" .. frameArgs .. "|" .. frameArgs .. "}}"
		else
			return "{{" .. template .. "|" .. frameArgs .. "}}"
		end
	elseif lang:hasType("etymology-only") then
		lang = lang:getFull()
	end
	
	local entryName = (twoLangs and frameArgs and (lang:makeEntryName(frameArgs))) or (not twoLangs and frameArgs and (lang:makeEntryName(frameArgs))) or ""
	local displayText
	if template ~= "t-simple" then
		displayText = (twoLangs and frameArgs and frameArgs ~= "" and not frameArgs and frameArgs) or (twoLangs and frameArgs and frameArgs ~= "" and not frameArgs and frameArgs) or (twoLangs and frameArgs and frameArgs ~= "" and (lang:makeDisplayText(frameArgs))) or (not twoLangs and frameArgs and frameArgs ~= "" and not frameArgs and frameArgs) or (not twoLangs and frameArgs and frameArgs ~= "" and not frameArgs and frameArgs) or (not twoLangs and frameArgs and frameArgs ~= "" and (lang:makeDisplayText(frameArgs))) or ""
	else
		displayText = frameArgs or (lang:makeDisplayText(frameArgs))
	end
	local gloss = (twoLangs and frameArgs) or (not twoLangs and frameArgs) or frameArgs or frameArgs or ""
	local sc
	if displayText and displayText ~= "" and displayText ~= "-" then
		scObj = lang:findBestScript(displayText)
		sc = scObj:getCode()
		if sc == "Latn" or sc == "None" then sc = "" end
	end
	local tr = displayText and not frameArgs and frameArgs or (lang:transliterate(displayText, scObj))
	if tr == displayText then tr = "" end
	if entryName and displayText and decode_entities(displayText) == entryName then displayText = "" end
	
	local args = {}
	args = twoLangs and frameArgs or ""
	args = (twoLangs and frameArgs) or (not twoLangs and frameArgs)
	args = entryName or ""
	args = template ~= "t-simple" and displayText or ""
	args = gloss or ""
	args = sc or ""
	args = template == "t-simple" and displayText or ""
	args = tr or ""
	args = frameArgs or ""
	args = frameArgs or ""
	args = frameArgs or ""
	args = frameArgs or ""
	args = frameArgs or ""
	args = frameArgs or ""
	args = frameArgs or ""
	args = frameArgs or ""
	args = template == "t-simple" and frameArgs or ""
	
	for arg, val in pairs(args) do
		if type(arg) ~= "number" and val ~= "" then
			val = arg .. "=" .. val
		end
		if val ~= "" or (arg == 3 and (args ~= "" or args ~= "")) or (arg == 4 and args ~= "") then
			val = "|" .. val
		end
		args = val
	end
	
	return decode_entities("{{" .. template .. args .. args .. args .. args .. args .. args .. args .. args .. args .. args .. args .. args .. args .. args .. args .. args .. args .. "}}")
end

return export