Module:translations/multi

--[=[
	This module implements the {{multitrans}} template.
	
	Original author: Benwing2, based on an idea from Rua.
	Significantly reworked by Theknightwho.
	
	The idea is to reduce the memory usage of large translation tables by
	computing the whole table at once instead of through several separate calls.
	The entire text of the translation table should be passed as follows:
	
	{{multitrans|data=
* Abkhaz: {{tt|ab|аиқәаҵәа}}
* Acehnese: {{tt|ace|itam}}
* Afrikaans: {{tt+|af|swart}}
* Albanian: {{tt+|sq|zi}}
* Amharic: {{tt|am|ጥቁር}}
* Arabic: {{tt+|ar|أَسْوَد|m}}, {{tt|ar|سَوْدَاء|f}}, {{tt|ar|سُود|p}}
*: Moroccan Arabic: {{tt|ary|كحال|tr=kḥāl}}
* Armenian: {{tt|hy|սև}}
* Aromanian: {{tt|rup|negru}}, {{tt+|rup|laiu}}
* Asháninka: {{tt|cni|cheenkari}}, {{tt|cni|kisaari}}
* Assamese: {{tt|as|ক‌’লা}}, {{tt|as|কুলা}} {{qualifier|Central}}
* Asturian: {{tt|ast|ñegru}}, {{tt|ast|negru}}, {{tt|ast|prietu}}
* Atikamekw: {{tt|atj|makatewaw}}
* Avar: {{tt|av|чӏегӏера}}
* Aymara: {{tt|ay|ch’iyara}}
* Azerbaijani: {{tt+|az|qara}}
	
	}}
	
	That is, take the original text and add a 't' to the beginning of translation
	templates:
		{{t|...}} -> {{tt|...}}
		{{t+|...}} -> {{tt+|...}}
		{{t-check|...}} -> {{tt-check|...}}
		{{t+check|...}} -> {{tt+check|...}}
		
	The {{tt*|...}} templates are pass-throughs, so that e.g.
	{{tt|ary|كحال|tr=kḥāl}} generates the literal text "{{t|ary|كحال|tr=kḥāl}}".
	This is then parsed by the template parser to extract the arguments, which
	are then passed into the same code that underlyingly implements the regular
	translation templates. Because all of this happens inside a single module
	invocation instead of lots of separate ones, it's much faster and more
	memory-efficient.
]=]

local export = {}

local m_template_parser = require("Module:template parser")

local class_else_type = m_template_parser.class_else_type
local parse = m_template_parser.parse
local pcall = pcall
local process_params = require("Module:parameters").process
local show_terminfo = require("Module:translations").show_terminfo

local templates = {
	 = true,
	 = true,
	 = true,
	 = true,
}

local params = mw.loadData("Module:parameters/data").translation

local function process_template(name, args)
	args = process_params(args, params)
	return show_terminfo({
		lang = args,
		sc = args,
		track_sc = true,
		term = args,
		alt = args,
		id = args,
		genders = args,
		tr = args,
		ts = args,
		lit = args,
		interwiki = (name == "t+" or name == "t+check") and "tpos",
	}, name == "t-check" or name == "t+check")
end

function export.show(frame)
	local text = frame:getParent().args
	if not text then
		return ""
	end
	
	text = parse(frame:getParent().args)
	for node, parent, key in text:__pairs("next_node") do
		local class = class_else_type(node)
		if class ~= "wikitext" then
			local new
			if class == "template" then
				local name = node:get_name()
				if templates then
					local success, result = pcall(process_template, name, node:get_arguments())
					if success then
						new = result
					end
				end
			end
			if not new then
				new = node:expand()
			end
			if parent then
				parent = new
			else
				text = new
			end
		end
	end
	return tostring(text)
end

return export