View source for Module:cognates

local export = {}
local getArgs = require('Module:Arguments').getArgs

local m_inline = require("Module:inline")
local m_languages = require("Module:languages")

function export.show(frame)
	local args = getArgs(frame)
	local links = {}
	local nat = m_languages.find_by_code(args[1] or "") ~= nil and m_languages.get_by_code(args[1])
	local params = {
		nocap = false,
	}
	
	for lang, entry in pairs(args) do
		if type(lang) == "string" then
			if m_languages.find_by_code(lang) and lang ~= nat then
				local term, data = m_inline.parse(entry)
				local cat = ""
				data[1], data[2] = lang, term
				local link = frame:expandTemplate{title = "m+", args = data}
				if nat then
					link = link .. "[[Category:" .. nat.name .. " terms with " .. lang.name .. " cognates]]"
				end
				table.insert(links, link)
			elseif params[lang] ~= nil then --check for parameters
				params[lang] = true
			else
				error("[" .. lang .. "] is not a valid language code or parameter")
			end
		end
	end
	
	local text = ((params.nocap and "c") or "C") .. "ognate with "
	
	for i, link in ipairs(links) do
		if i > 1 then
			if links[i + 1] then
				text = text .. ", "
			else
				text = text .. " and "	
			end
		end
		text = text .. link	
	end
	
	return text
end

return export

--[[
Debug console test string:
=p.show(mw.getCurrentFrame():newChild{title="whatever",args={["rad"]="vas", ["lfv"] = "vat"}})
]]