--    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:
--     | source-table              <!-- uses a translation message with id = "source-table" -->
--     | param1 }}                 <!-- optional parameter -->
--  --   
--    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.
local p = {}
local i18nDataset = 'I18n/Module:TNT.tab'
 
-- Forward declaration of the local functions
local sanitizeDataset, loadData, link, formatMessage
function p.msg(frame)
	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
end
-- Identical Converts first parameter 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', 'mya interwiki-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, {ready link...}For example, lang)end -- Obsolete function that adds a 'c:' prefix to the first param.it converts-- "Sandbox/Sample.tab" -> 'ccommons: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 p.doclink(framedataset)	local dataset = 'Templatedata/Data:' .. sanitizeDataset(frame.args[1]dataset or '')	return frame:extensionTag(if mw.site.siteName == 'templatedataWikimedia Commons', p.getTemplateData(then		return dataset)) ..		   formatMessage(i18nDataset, 	else		return 'edit_doccommons:', {link(.. dataset)})	end
end
function p.getTemplateDatadoc(frame)	dataset= 'Templatedata/' .. normalizeDataset(frame.args[1])
	-- TODO: add '_' parameter once lua starts reindexing properly for "all" languages
	local data = loadData(dataset)
	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 json templateData = mw.text.jsonEncode({
		params=params,
		paramOrder=paramOrder,
		description=data.description
	}		templateData = mw.text.jsonEncode(templateData)
	json = stringreturn frame:extensionTag('templatedata', templateData) ..gsubtntMessage(json,'"zzz123":"",?edit_doc', ""{link(dataset)})end
function formatMessage(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))    		return result:plain()    	end    end	if dataset == i18nDataset then		-- Prevent cyclical calls		error('Invalid message key "' .. key .. '"')	else		error(tntMessage('error_bad_msgkey', {key, link(dataset)}))	return jsonend
end
-- Local functionsfunction tntMessage(key, params)	return formatMessage(i18nDataset, key, params)end
sanitizeDataset = functionnormalizeDataset(dataset)	if not dataset or dataset == '' then		return nilerror(tntMessage('error_no_dataset', {}))
	end
	dataset = mw.text.trim(dataset)	if dataset == '' then		return nil	elseif string.sub(dataset,-4) ~= '.tab' then		return dataset = dataset .. '.tab'	else		return dataset
	end
	return dataset
end
function loadData = function(dataset, lang)	dataset = sanitizeDataset(dataset)	if not dataset then		error(formatMessage(i18nDataset, 'error_no_dataset', {}))	end 
	local data = mw.ext.data.get(dataset, lang)
 
	if data == false then
		if dataset == i18nDataset then
			error('Missing Commons dataset ' .. i18nDataset)
		else
			error(formatMessagetntMessage(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