Modul:Transclusion count

Foydalanish

{{#invoke:Transclusion count|fetch|number of transclusions|use + notation|all-pages=|demo=}}

---

local p = {}

function p._fetch(args)
	local template = nil
	local return_value = nil

	local namespace = mw.title.getCurrentTitle().namespace
	if args["demo"] and args["demo"] ~= "" then
		template = mw.ustring.gsub(args["demo"],"^[Aa]ndoza:","")
	elseif namespace == 10 then -- andoza nomfazosi
		template = mw.title.getCurrentTitle().text
	elseif namespace == 828 then -- modul nomfazosi
		template = (mw.site.namespaces[828].name .. ":" .. mw.title.getCurrentTitle().text)
	end

	if template ~= nil then
		namespace = mw.title.new(template, "Andoza").namespace
		if namespace == 10 or namespace == 828 then
			template = mw.ustring.gsub(template, "/hujjat$", "")
			template = mw.ustring.gsub(template, "/qumloq$", "")
			local index = mw.ustring.sub(mw.title.new(template).text, 1, 1)
			local status, data = pcall(function ()
				return(mw.loadData('Modul:Transclusion_count/data/' .. (mw.ustring.find(index, "%a") and index or "boshqa")))
			end)
			if status then
				return_value = tonumber(data[mw.ustring.gsub(template, " ", "_")])
			end
		end
	end
	
	if return_value == nil and args[1] ~= nil then
		local arg1 = mw.ustring.match(args[1], '[%d,]+')
		if arg1 and arg1 ~= '' then
			return_value = tonumber(mw.getCurrentFrame():callParserFunction('formatnum', arg1, 'R'))
		end
	end
	
	return return_value	
end

function p.fetch(frame)
	return p._fetch(frame.args)
end

function p.tabulate()
	local list = {}

	for i = 65, 91 do
		local data = mw.loadData('Modul:Transclusion count/data/' ..
			((i == 91) and 'boshqa' or string.char(i)))

		for name, count in pairs(data) do
			local title = mw.title.new(name, "Andoza")
			table.insert(list, {title, count})
		end
	end

	table.sort(list, function(a, b)
		return (a[2] == b[2]) and (a[1] < b[1]) or (a[2] > b[2])
	end)

	local lang = mw.getContentLanguage()

	for i = 1, #list do
		local title = list[i][1]
		list[i] = ('|-\n| %d || [[%s]] || %s \n')
			:format(i, title.fullText:gsub('_', ' '), lang:formatNum(list[i][2]))
	end

	return table.concat(list)
end

return p