--
-- INTRO:   (!!! DO NOT RENAME THIS PAGE !!!)
--    This module allows any template or module to be copy/pasted between
--    wikis without any translation changes. All translation text is stored
--    in the global  Data:*.tab  pages on Commons, and used everywhere.
--
-- SEE:   https://www.mediawiki.org/wiki/Multilingual_Templates_and_Modules
--
-- ATTENTION:
--
-- DESCRIPTION:
--    This module allows templates to use translations from the shared Datasets on Commons
--
--    The "msg" function uses a Commons dataset to translate a message
--    with a given key (e.g. source-table), plus optional arguments
--    to the wiki markup in the current content language.
--    Use lang=xx to set language.  Example:
--
--    {{#invoke:TNT | msg
--     | I18n/Template:Graphs.tab  <!-- https://commons.wikimedia.org/wiki/Data:I18n/Template:Graphs.tab -->
--     | source-table              <!-- uses a translation message with id = "source-table" -->
--     | param1 }}                 <!-- optional parameter -->
--
--
--      {{#invoke:TNT | msg | Original/Template:Graphs.tab | source-table | param1 }}
--            uses https://commons.wikimedia.org/wiki/Data:Original/Template:Graphs.tab
--   
--    The "doc" function will generate the <templatedata> parameter documentation for templates.
--    This way all template parameters can be stored and localized in a single Commons dataset.
--    NOTE: "doc" assumes that all documentation is located in Data:Templatedata/* on Commons.
--
--         {{#invoke:TNT | doc | {{BASEPAGENAME}} Graph:Lines }}--                   uses https://commons.wikimedia.org/wiki/Data:Templatedata/Graph:Lines.tab--                   if the current page is Template:Graph:Lines/doc
--
local p = {}
local i18nDataset = 'i18nI18n/Module:TNT.tab' -- Forward declaration of the local functionslocal sanitizeDataset, loadData, link, formatMessage
function p.msg(frame)
	local dataset, id
	local params = {}
	local lang = nil
	for k, v in pairs(frame.args) do
		if k == 1 then
			dataset = mw.text.trim(v)
		elseif k == 2 then
			id = mw.text.trim(v)
		elseif type(k) == 'number' then
			table.insert(params, mw.text.trim(v))		elseif k == 'lang' and v ~= '_' then			lang = mw.text.trim(v)
		end
	end
	return formatMessage(dataset, id, params, lang)end -- Identical to p.msg() above, but used from other lua modules-- Parameters:  name of dataset, message key, optional arguments-- Example with 2 params:  format('I18n/Module:TNT', 'error_bad_msgkey', 'my-key', 'my-dataset')function p.format(dataset, key, ...)	local checkType = require('libraryUtil').checkType	checkType('format', 1, dataset, 'string')	checkType('format', 2, key, 'string')	return formatMessage(dataset, key, {...})end  -- Identical to p.msg() above, but used from other lua modules with the language param-- Parameters:  language code, name of dataset, message key, optional arguments-- Example with 2 params:  formatInLanguage('es', I18n/Module:TNT', 'error_bad_msgkey', 'my-key', 'my-dataset')function p.formatInLanguage(lang, dataset, key, ...)	local checkType = require('libraryUtil').checkType	checkType('formatInLanguage', 1, lang, 'string')	checkType('formatInLanguage', 2, dataset, 'string')	checkType('formatInLanguage', 3, key, 'string')	return formatMessage(dataset, key, {...}, lang)
end
-- Converts Obsolete function that adds a 'c:' prefix to the first parameter to a interwiki-ready linkparam. For example, it converts-- "Sandbox/Sample.tab" -> 'commonsc:Data:Sandbox/Sample.tab'
function p.link(frame)
	return link(frame.args[1])
end
-- Given a dataset name, convert it to a title with the 'commons:data:' prefixfunction linkp.doc(datasetframe)	local dataset = 'Data:Templatedata/' .. sanitizeDataset(dataset or ''frame.args[1])	if mw.site.siteName == return frame:extensionTag('Wikimedia Commonstemplatedata' then		return , p.getTemplateData(dataset)) ..	else		return 		   formatMessage(i18nDataset, 'commons:edit_doc' .. , {link(dataset	end)})
end
function p.docgetTemplateData(framedataset)	dataset = normalizeDataset(frame.args[1])-- TODO: add '_' parameter once lua starts reindexing properly for "all" languages	local data = loadData('templatedata/' .. dataset)
	local names = {}
	for _, field in pairs(data.schema.fields) do
	local params = {}
	local paramOrder = {}
    	for _, row in pairs(data.data) do    			local newVal = {}    			local name = nil    			for pos, val in pairs(row) do    					local columnName = names[pos]    					if columnName == 'name' then    							name = val    					else    							newVal[columnName] = val    					end    			end    			if name then    					params[name] = newVal    					table.insert(paramOrder, name)    			end    	end 	-- Work around json encoding treating {"1":{...}} as an [{...}]	params['zzz123']='' 	local templateData json = mw.text.jsonEncode({
		params=params,
		paramOrder=paramOrder,
		description=data.description
	})		templateData json = mw.textstring.jsonEncodegsub(templateDatajson,'"zzz123":"",?', "")
	return frame:extensionTag('templatedata', templateData)json
end
-- Local functions sanitizeDataset = function formatMessage(dataset, key, params)    for _, row in pairs(loadData(	if not dataset).data) dothen    	local id, msg = unpack(row)		return nil    	if id == key then	end    		local result 	dataset = mw.messagetext.newRawMessagetrim(msg, unpack(paramsdataset))    		return result:plain()    	end    end	if dataset == i18nDataset '' then		-- Prevent cyclical callsreturn nil		error	elseif string.sub(dataset,-4) ~= 'Invalid message key ".tab' then		return dataset .. key .'. tab'"')
	else
		error(tntMessage('error_bad_msgkey', {key, link(return dataset)}))
	end
end
loadData = function tntMessage(keydataset, paramslang)	return dataset = sanitizeDataset(dataset)	if not dataset then		error(formatMessage(i18nDataset, key'error_no_dataset', params{}))	end
function normalizeDataset(dataset)	if not dataset or dataset local data == '' then		error(tntMessage('error_no_dataset', {}))	end	if stringmw.ext.data.subget(dataset,-4lang) ~= '.tab' then		dataset = dataset .. '.tab'	end	return datasetend
function loadData(dataset)
	local data = mw.ext.data.get(dataset)
	if data == false then
		if dataset == i18nDataset then
			error('Missing Commons dataset ' .. i18nDataset)
		else
			error(tntMessageformatMessage(i18nDataset, 'error_bad_dataset', {link(dataset)}))
		end
	end
	return data
end
 
-- Given a dataset name, convert it to a title with the 'commons:data:' prefix
link = function(dataset)
	return 'c:Data:' .. mw.text.trim(dataset or '')
end
 
formatMessage = function(dataset, key, params, lang)
	for _, row in pairs(loadData(dataset, lang).data) do
		local id, msg = unpack(row)
		if id == key then
			local result = mw.message.newRawMessage(msg, unpack(params or {}))
			return result:plain()
		end
	end
	if dataset == i18nDataset then
		-- Prevent cyclical calls
		error('Invalid message key "' .. key .. '"')
	else
		error(formatMessage(i18nDataset, 'error_bad_msgkey', {key, link(dataset)}))
	end
end
return p