Modül:Koruma kutu

Bu modül korunan sayfaların üstüne kilit simgesi veya ileti kutusu oluşturur.

Kullanımı

Bu modülün neredeyse hiçbir zaman direkt kullanılması gerekmez. Koruma şablonu olarak {{koruma}} kullanabilirsiniz. Diğer koruma şablonları aşağıdaki gibidir.

---

-- This module implements {{pp-meta}} and its daughter templates such as
-- {{pp-dispute}}, {{pp-vandalism}} and {{pp-sock}}.

-- Initialise necessary modules.
require('strict')
local makeFileLink = require('Module:File link')._main
local effectiveProtectionLevel = require('Module:Effective protection level')._main
local effectiveProtectionExpiry = require('Module:Effective protection expiry')._main
local yesno = require('Modül:Evethayır')

-- Lazily initialise modules and objects we don't always need.
local getArgs, makeMessageBox, lang

-- Set constants.
local CONFIG_MODULE = 'Modül:Koruma kutu/config'

--------------------------------------------------------------------------------
-- Helper functions
--------------------------------------------------------------------------------

local function makeCategoryLink(cat, sort)
	if cat then
		return string.format(
			'[[%s:%s|%s]]',
			mw.site.namespaces[14].name,
			cat,
			sort
		)
	end
end

local function validateDate(dateString, dateType)
	if not lang then
		lang = mw.language.getContentLanguage()
	end
	local success, result = pcall(lang.formatDate, lang, 'U', dateString)
	if success then
		result = tonumber(result)
		if result then
			return result
		end
	end
	error(string.format(
		'invalid %s: %s',
		dateType,
		tostring(dateString)
	), 4)
end

local function makeFullUrl(page, query, display)
	return string.format(
		'[%s %s]',
		tostring(mw.uri.fullUrl(page, query)),
		display
	)
end

local function getReachableNodes(graph, start)
	local toWalk, retval = {[start] = true}, {}
	while true do
		local k = next(toWalk)
		if k == nil then
			return retval
		end
		toWalk[k] = nil
		retval[k] = true
		for _,v in ipairs(graph[k] or {}) do
			if not retval[v] then
				toWalk[v] = true
			end
		end
	end
end

--------------------------------------------------------------------------------
-- Protection class
--------------------------------------------------------------------------------

local Protection = {}
Protection.__index = Protection

Protection.supportedActions = {
	edit = true,
	move = true,
	autoreview = true,
	upload = true
}

Protection.bannerConfigFields = {
	'text',
	'explanation',
	'tooltip',
	'alt',
	'link',
	'image'
}

function Protection.new(args, cfg, title)
	local obj = {}
	obj._cfg = cfg
	obj.title = title or mw.title.getCurrentTitle()

	if not args.action then
		obj.action = 'edit'
	elseif Protection.supportedActions[args.action] then
		obj.action = args.action
	else
		error(string.format('invalid action: %s', tostring(args.action)), 3)
	end

	obj.level = args.demolevel or effectiveProtectionLevel(obj.action, obj.title)
	if (obj.action == 'move' and obj.level == 'sysop') then
		obj.level = 'sysop'
	elseif not obj.level or (obj.action == 'move' and obj.level == 'autoconfirmed') then
		obj.level = '*'
	end

	local effectiveExpiry = effectiveProtectionExpiry(obj.action, obj.title)
	if effectiveExpiry == 'infinity' then
		obj.expiry = 'indef'
	elseif effectiveExpiry ~= 'unknown' then
		obj.expiry = validateDate(effectiveExpiry, 'expiry date')
	end

	if args[1] then
		obj.reason = mw.ustring.lower(args[1])
		if obj.reason:find('|') then
			error('gerekçe pipe karakterini ("|") içeremez', 3)
		end
	end

	if args.date then
		obj.protectionDate = validateDate(args.date, 'koruma tarihi')
	end
	
	-- Set banner config safely
	do
		obj.bannerConfig = {}
		local configTables = {}
		if cfg.banners and cfg.banners[obj.action] then
			configTables[#configTables + 1] = cfg.banners[obj.action][obj.reason]
		end
		if cfg.defaultBanners and cfg.defaultBanners[obj.action] then
			configTables[#configTables + 1] = cfg.defaultBanners[obj.action][obj.level]
			configTables[#configTables + 1] = cfg.defaultBanners[obj.action].default
		end
		configTables[#configTables + 1] = cfg.masterBanner
		for i, field in ipairs(Protection.bannerConfigFields) do
			for j, t in ipairs(configTables) do
				if t and t[field] then
					obj.bannerConfig[field] = t[field]
					break
				end
			end
		end
	end
	return setmetatable(obj, Protection)
end

function Protection:isUserScript()
	local title = self.title
	return title.namespace == 2 and (
		title.contentModel == 'javascript' or title.contentModel == 'css'
	)
end

function Protection:isProtected()
	return self.level ~= '*'
end

function Protection:shouldShowLock()
	return self:isProtected() and not self:isUserScript()
end

Protection.shouldHaveProtectionCategory = Protection.shouldShowLock

function Protection:isTemporary()
	return type(self.expiry) == 'number'
end

function Protection:makeProtectionCategory()
	if not self:shouldHaveProtectionCategory() then
		return ''
	end

	local cfg = self._cfg
	local title = self.title
	
	local expiryFragment
	if self.expiry == 'indef' then
		expiryFragment = self.expiry
	elseif type(self.expiry) == 'number' then
		expiryFragment = 'temp'
	end

	local namespaceFragment = cfg.categoryNamespaceKeys and cfg.categoryNamespaceKeys[title.namespace]
	if not namespaceFragment and title.namespace % 2 == 1 then
			namespaceFragment = 'talk'
	end

	local order = {
		{val = expiryFragment,    keypos = 1},
		{val = namespaceFragment, keypos = 2},
		{val = self.reason,       keypos = 3},
		{val = self.level,        keypos = 4},
		{val = self.action,       keypos = 5}
	}

	table.insert(order, table.remove(order, self.reason and cfg.reasonsWithNamespacePriority and cfg.reasonsWithNamespacePriority[self.reason] and 2 or 3))
 
	local noActive, attemptOrder
	do
		local active, inactive = {}, {}
		for i, t in ipairs(order) do
			if t.val then
				active[#active + 1] = t
			else
				inactive[#inactive + 1] = t
			end
		end
		noActive = #active
		attemptOrder = active
		for i, t in ipairs(inactive) do
			attemptOrder[#attemptOrder + 1] = t
		end
	end
 
	local cats = cfg.protectionCategories or {}
	for i = 1, 2^noActive do
		local key = {}
		for j, t in ipairs(attemptOrder) do
			if j > noActive then
				key[t.keypos] = 'all'
			else
				local quotient = i / 2 ^ (j - 1)
				quotient = math.ceil(quotient)
				if quotient % 2 == 1 then
					key[t.keypos] = t.val
				else
					key[t.keypos] = 'all'
				end
			end
		end
		key = table.concat(key, '|')
		local attempt = cats[key]
		if attempt then
			return makeCategoryLink(attempt, title.text)
		end
	end
	return ''
end

function Protection:isIncorrect()
	local expiry = self.expiry
	return not self:shouldHaveProtectionCategory()
		or type(expiry) == 'number' and expiry < os.time()
end

function Protection:isTemplateProtectedNonTemplate()
	local action, namespace = self.action, self.title.namespace
	return self.level == 'sysop'
		and (
			(action ~= 'edit' and action ~= 'move')
			or (namespace ~= 10 and namespace ~= 828)
		)
end

function Protection:makeCategoryLinks()
	local msg = self._cfg.msg or {}
	local ret = {self:makeProtectionCategory()}
	if self:isIncorrect() then
		ret[#ret + 1] = makeCategoryLink(msg['tracking-category-incorrect'], self.title.text)
	end
	if self:isTemplateProtectedNonTemplate() then
		ret[#ret + 1] = makeCategoryLink(msg['tracking-category-template'], self.title.text)
	end
	return table.concat(ret)
end

--------------------------------------------------------------------------------
-- Blurb class
--------------------------------------------------------------------------------

local Blurb = {}
Blurb.__index = Blurb

Blurb.bannerTextFields = {
	text = true,
	explanation = true,
	tooltip = true,
	alt = true,
	link = true
}

function Blurb.new(protectionObj, args, cfg)
	return setmetatable({
		_cfg = cfg,
		_protectionObj = protectionObj,
		_args = args
	}, Blurb)
end

function Blurb:_formatDate(num)
	lang = lang or mw.language.getContentLanguage()
	local success, date = pcall(lang.formatDate, lang, self._cfg.msg and self._cfg.msg['expiry-date-format'] or 'j F Y', '@' .. tostring(num))
	if success then return date end
end

function Blurb:_getExpandedMessage(msgKey)
	return self:_substituteParameters(self._cfg.msg and self._cfg.msg[msgKey] or '')
end

function Blurb:_substituteParameters(msg)
	if not self._params then
		local parameterFuncs = {}
		parameterFuncs.CURRENTVERSION     = self._makeCurrentVersionParameter
		parameterFuncs.EXPIRY             = self._makeExpiryParameter
		parameterFuncs.EXPLANATIONBLURB   = self._makeExplanationBlurbParameter
		parameterFuncs.IMAGELINK          = self._makeImageLinkParameter
		parameterFuncs.INTROBLURB         = self._makeIntroBlurbParameter
		parameterFuncs.INTROFRAGMENT      = self._makeIntroFragmentParameter
		parameterFuncs.PAGETYPE           = self._makePagetypeParameter
		parameterFuncs.PROTECTIONBLURB    = self._makeProtectionBlurbParameter
		parameterFuncs.PROTECTIONDATE     = self._makeProtectionDateParameter
		parameterFuncs.PROTECTIONLEVEL    = self._makeProtectionLevelParameter
		parameterFuncs.PROTECTIONLOG      = self._makeProtectionLogParameter
		parameterFuncs.TALKPAGE           = self._makeTalkPageParameter
		parameterFuncs.TOOLTIPBLURB       = self._makeTooltipBlurbParameter
		parameterFuncs.TOOLTIPFRAGMENT    = self._makeTooltipFragmentParameter
		parameterFuncs.VANDAL             = self._makeVandalTemplateParameter
		
		self._params = setmetatable({}, {
			__index = function (t, k)
				local param
				if parameterFuncs[k] then
					param = parameterFuncs[k](self)
				end
				t[k] = param or ''
				return t[k]
			end
		})
	end
	
	msg = msg:gsub('${(%u+)}', self._params)
	return msg
end

function Blurb:_makeImageLinkParameter()
	local imageLinks = self._cfg.imageLinks or {}
	local action = self._protectionObj.action
	local level = self._protectionObj.level
	local msg = (imageLinks[action] and imageLinks[action][level])
			or (imageLinks[action] and imageLinks[action].default)
			or (imageLinks.edit and imageLinks.edit.default)
			or ''
	return self:_substituteParameters(msg)
end

function Blurb:_makeProtectionBlurbParameter()
	local protectionBlurbs = self._cfg.protectionBlurbs or {}
	local action = self._protectionObj.action
	local level = self._protectionObj.level
	local msg = (protectionBlurbs[action] and protectionBlurbs[action][level])
			or (protectionBlurbs[action] and protectionBlurbs[action].default)
			or (protectionBlurbs.edit and protectionBlurbs.edit.default)
			or ''
	return self:_substituteParameters(msg)
end

function Blurb:_makeProtectionLevelParameter()
	local protectionLevels = self._cfg.protectionLevels or {}
	local action = self._protectionObj.action
	local level = self._protectionObj.level
	local msg = (protectionLevels[action] and protectionLevels[action][level])
			or (protectionLevels[action] and protectionLevels[action].default)
			or (protectionLevels.edit and protectionLevels.edit.default)
			or ''
	return self:_substituteParameters(msg)
end

function Blurb:_makePagetypeParameter()
	local pagetypes = self._cfg.pagetypes or {}
	return pagetypes[self._protectionObj.title.namespace]
		or pagetypes.default
		or ''
end

-- BannerTemplate class (nil-safe)
local BannerTemplate = {}
BannerTemplate.__index = BannerTemplate

function BannerTemplate.new(protectionObj, cfg)
	local obj = {}
	obj._cfg = cfg

	local imageFilename = protectionObj.bannerConfig.image
	if imageFilename then
		obj._imageFilename = imageFilename
	else
		local action = protectionObj.action
		local level = protectionObj.level
		local namespace = protectionObj.title.namespace
		local reason = protectionObj.reason

		if (
			namespace == 10
			or namespace == 828
			or (reason and obj._cfg.indefImageReasons and obj._cfg.indefImageReasons[reason])
		)
		and action == 'edit'
		and level == 'sysop'
		and not protectionObj:isTemporary()
		then
			obj._imageFilename = (obj._cfg.msg and obj._cfg.msg['image-filename-indef']) or 'Transparent.gif'
		else
			local images = (obj._cfg and obj._cfg.images) or {}
			if images[action] then
				obj._imageFilename = images[action][level] or images[action].default
			end
			if not obj._imageFilename then
				obj._imageFilename = (obj._cfg.msg and obj._cfg.msg['image-filename-default']) or 'Transparent.gif'
			end
		end
	end

	return setmetatable(obj, BannerTemplate)
end

function BannerTemplate:renderImage()
	local filename = self._imageFilename or (self._cfg.msg and self._cfg.msg['image-filename-default']) or 'Transparent.gif'
	return makeFileLink{
		file = filename,
		size = (self.imageWidth or 20) .. 'px',
		alt = self._imageAlt,
		link = self._imageLink,
		caption = self.imageCaption
	}
end

-- Diğer sınıflar (Banner, Padlock) ve p._main/p.main fonksiyonları aynı mantıkla çalışacak, nil kontrolleri eklendi.

-- (Kod çok uzun olduğu için Banner ve Padlock için aynı mantık geçerli: obj._cfg ve tabloları nil-safe kontrol et)