Module:HonorUtils

Documentation for this module may be created at Module:HonorUtils/doc

local p = {}
local strUtils = require( "Module:StringUtils" )

function p.getExpandedHonorVariants(frame, variantsString, landingPage, targetPage)
	local t_variants = p.expandHonorVariants(frame, variantsString)
	t_variants = p.translateHonorVariants(frame, t_variants)
	t_variants = p.createHonorVariantsURLs(frame, t_variants, landingPage, targetPage)
end

function p.expandHonorVariants(frame, variantsString)
	--[[structure of variants String:
		variant1;;authority1:authority2::counry1;counry2;country3;;variant3
		NAD::United States;;NAD(EUD;SPD)::Austria;Switzerland;Germany
		NAD;;NAD(EUD)
	]]
	if (variantsString == nil or variantsString == "") then return {} end
	
	local t_variants = strUtils.explode(";;", variantsString)
	
	for key, variant in pairs(t_variants) do
		t_variants[key] = {
			orig = variant,
			countries = strUtils.explode(";", variant)
		}
	end
	
	return t_variants
end

function p.translateHonorVariants(frame, variants)
	local t_variants = variants
	for varKey, variant in pairs(variants) do
		for countryKey, country in pairs(variant['countries']) do
			local trans = frame:expandTemplate{ title = 'Localize', args = { subVariant, 'Answer Variants' } }
			local t_countryTrans = {
				orig = country,
				translation = trans
			}
			t_variants[key]['countries'][countryKey] = t_countryTrans
		end
	end
	return t_variants
end

function p.createHonorVariantsURLs(frame, variants, landingPage, targetPage)
	local t_variants = variants
	local langSuffix = frame:expandTemplate{title='GetLangSuffix'}
	for key, variant in pairs(variants) do
		local linkTitle = ""
		for countryKey, country in pairs(variant['countries']) do
			if (#linkTitle > 0) then
				linkTitle = linkTitle .. " & " .. country['translation']
			else
				linkTitle = country['translation']
			end
		end
		t_variants[key]['url'] ="[[" .. landingPage .. "_(" .. variant['orig'] .. ")/" .. targetPage .. langSuffix .. "|" .. linkTitle .. "]]"
	end
	return t_variants
end

return p