Modül:ping

local export = {}

local match = string.match

local function link(username, link_text)
	if type(username) ~= "string" then
		error('"link" fonksiyonu bir string değerine ihtiyaç duyuyor.')
	end
	
	local namespace = match(username, "^(.+):")
	local userpage
	if namespace and namespace ~= "Kullanıcı" then
		if match(username, "^%x%x?%x?%x?:%x%x?%x?%x?:%x%x?%x?%x?:%x%x?%x?%x?:%x%x?%x?%x?:%x%x?%x?%x?:%x%x?%x?%x?:%x%x?%x?%x?$") then
			userpage = username
		else
			error('"' .. username .. '" kullanıcı adı yanlış alan adı içeriyor: "' .. tostring(namespace) .. '".')
		end
	else
		userpage = match(username, ":(.+)$") or username
	end
	
	if not link_text then
		link_text = userpage
	end
	
	return "]"
end

function export.reply_to(frame)
	local params = {
		 = { list = true, allow_holes = true },
		 = { list = true, allow_holes = true },
		 = { allow_empty = true },
	}
	
	local args = require("Modül:parameters").process(frame:getParent().args, params)
	local usernames = args
	local link_text = args
	local prefix = "@"
	local postfix = args.p or ""
	local namespace = mw.title.getCurrentTitle().nsText
	
	local output = {}
	
	if #usernames == 0 then
		if namespace == "Şablon" then
			usernames = { "Örnek~trvikisözlük", maxindex = 1 }
		else
			error("Ping şablonunda hata: kullanıcı adı girilmedi.")
		end
	end
	
	for i = 1, math.max(usernames.maxindex, link_text.maxindex) do
		table.insert(output, link(usernames, link_text))
	end
	
	output = prefix .. table.concat(output, ", ") .. postfix
	
	return output
end

return export