پودمان:High-use: Difference between revisions

From faraghaib
Jump to navigation Jump to search
VisualWikitext
admin>Admin
صفحه‌ای تازه حاوی «-------------------------------------------------------------------------------- -- Module:Hatnote list -- -- -- -- This module produces and formats lists for use in hatnotes. In particular, -- -- it implements the for-see list, i.e. lists of "For X, see Y" statements, -- -- as used in {{about}}, {{redirec...» ایجاد کرد
 
m 3 revisions imported
 
(2 intermediate revisions by one other user not shown)
Line 1: Line 1:
--------------------------------------------------------------------------------
--                          Module:Hatnote list                              --
--                                                                            --
-- This module produces and formats lists for use in hatnotes. In particular, --
-- it implements the for-see list, i.e. lists of "For X, see Y" statements,  --
-- as used in {{about}}, {{redirect}}, and their variants. Also introduced    --
-- are andList & orList helpers for formatting lists with those conjunctions. --
--------------------------------------------------------------------------------
local mArguments --initialize lazily
local mFormatLink = require('Module:Format link')
local mHatnote = require('Module:Hatnote')
local libraryUtil = require('libraryUtil')
local checkType = libraryUtil.checkType
local p = {}
local p = {}


--------------------------------------------------------------------------------
-- _fetch looks at the "demo" argument.
-- List stringification helper functions
local _fetch = require('Module:Transclusion_count').fetch
--
local yesno = require('Module:Yesno')
-- These functions are used for stringifying lists, usually page lists inside
local numConv = require('Module:Numeral converter').convert
-- the "Y" portion of "For X, see Y" for-see items.
--------------------------------------------------------------------------------


--default options table used across the list stringification functions
function p.num(frame, count)
local stringifyListDefaultOptions = {
if count == nil then
conjunction = "و",
if yesno(frame.args['fetch'] or frame.args['واکشی']) == false then
separator = "،",
if (frame.args[1] or '') ~= '' then count = tonumber(frame.args[1]) end
altSeparator = "؛",
else
space = " ",
count = _fetch(frame)
formatted = false
end
}
end
-- Build output string
local return_value = ""
if count == nil then
if (frame.args[1] == "risk" or frame.args[1] == "ریسک") then
return_value = "تعداد بسیار زیادی صفحه"
else
return_value = "تعداد زیادی صفحه"
end
else
-- Use 2 significant figures for smaller numbers and 3 for larger ones
local sigfig = 2
if count >= 100000 then
sigfig = 3
end
-- Prepare to round to appropriate number of sigfigs
local f = math.floor(math.log10(count)) - sigfig + 1
-- Round and insert "approximately" or "+" when appropriate
if (yesno(frame.args[2])) or (mw.ustring.sub(frame.args[1], -1) == "+") then
-- Round down
return_value = mw.ustring.format("%s+", mw.getContentLanguage():formatNum(math.floor( (count / 10^(f)) ) * (10^(f))) )
else
-- Round to nearest
return_value = mw.ustring.format("نزدیک به %s", mw.getContentLanguage():formatNum(math.floor( (count / 10^(f)) + 0.5) * (10^(f))) )
end


--Searches display text only
-- Insert percentage of pages if that is likely to be >= 1% and when |no-percent= not set to yes
local function searchDisp(haystack, needle)
if count and count > 250000 and not yesno (frame:getParent().args['no-percent'] or frame:getParent().args['بدون درصد']) then
return mw.ustring.find(
local percent = math.floor( ( (count/frame:callParserFunction('NUMBEROFPAGES', 'R') ) * 100) + 0.5)
mw.ustring.sub(haystack, (mw.ustring.find(haystack, '|') or 0) + 1), needle
if percent >= 1 then
)
return_value = mw.ustring.format("%s صفحه، یا نزدیک به %s٪ از کل صفحه‌ها", return_value, numConv('fa', percent))
end
end
end
return return_value
end
-- Actions if there is a large (greater than or equal to 100,000) transclusion count
function p.risk(frame)
local return_value = ""
if (frame.args[1] == "risk" or frame.args[1] == "ریسک") then
return_value = "risk"
else
local count = _fetch(frame)
if count and count >= 100000 then return_value = "risk" end
end
return return_value
end
end


-- Stringifies a list generically; probably shouldn't be used directly
function p.text(frame, count)
local function stringifyList(list, options)
-- Only show the information about how this template gets updated if someone
-- Type-checks, defaults, and a shortcut
-- is actually editing the page and maybe trying to update the count.
checkType("stringifyList", 1, list, "table")
local bot_text = (frame:preprocess("{{REVISIONID}}") == "") and "\n\n----\n'''پیام پیش‌نمایش''': شمار تراگنجانش‌ها ممکن است توسط ربات به‌روز شود ([[الگو:پراستفاده/توضیحات#جزئیات فنی|مستندات الگو را ببینید]])." or ''
if #list == 0 then return nil end
checkType("stringifyList", 2, options, "table", true)
if count == nil then
options = options or {}
if yesno(frame.args['fetch'] or frame.args['واکشی']) == false then
for k, v in pairs(stringifyListDefaultOptions) do
if (frame.args[1] or '') ~= '' then count = tonumber(frame.args[1]) end
if options[k] == nil then options[k] = v end
else
count = _fetch(frame)
end
end
end
local s = options.space
local title = mw.title.getCurrentTitle()
-- Format the list if requested
if title.subpageText == "توضیحات" or title.subpageText == "تمرین" then
if options.formatted then
title = title.basePageTitle
list = mFormatLink.formatPages(
{categorizeMissing = mHatnote.missingTargetCat}, list
)
end
end
-- Set the separator; if any item contains it, use the alternate separator
local separator = options.separator
local systemMessages = frame.args['system'] or frame.args['سامانه']
for k, v in pairs(list) do
if (frame.args['system'] or frame.args['سامانه']) == '' then
if searchDisp(v, separator) then
systemMessages = nil
separator = options.altSeparator
end
break
-- This retrieves the project URL automatically to simplify localiation.
local templateCount = ('در [https://linkcount.toolforge.org/index.php?project=%s&page=%s %s صفحه]'):format(
mw.title.getCurrentTitle():fullUrl():gsub('//(.-)/.*', '%1'),
mw.uri.encode(title.fullText), p.num(frame, count))
local used_on_text = "'''این " .. (mw.title.getCurrentTitle().namespace == 828 and "پودمان لوآ" or "الگو") .. ' ';
if systemMessages then
used_on_text = used_on_text .. systemMessages ..
((count and count > 2000) and ("،''' و " .. templateCount) or ("'''"))
else
used_on_text = used_on_text .. templateCount .. " به‌کار رفته است'''"
end
local sandbox_text =  ("زیرصفحه‌های [[%s/تمرین|/تمرین]] یا [[%s/آزمایشی|/آزمایشی]] %s، یا در [[%s]] خودتان"):format(
title.fullText, title.fullText,
(mw.title.getCurrentTitle().namespace == 828 and "پودمان" or "الگو"),
mw.title.getCurrentTitle().namespace == 828 and "پودمان:Sandbox|پودمان تمرینی" or "ویکی‌پدیا:صفحه‌های کاربری#زیرصفحه‌های کاربری چه؟|زیرصفحهٔ کاربری"
)
local infoArg = frame.args["info"] ~= "" and frame.args["info"]
if (systemMessages or (frame.args[1] == "risk" or frame.args[1] == "ریسک") or (count and count >= 100000) ) then
local info = systemMessages and '.<br/>تغییر دادن آن می‌تواند به تغییر بی‌درنگ در رابط کاربری ویکی‌پدیا منجر شود.' or '.'
if infoArg then
info = info .. "<br />" .. infoArg
end
end
sandbox_text = info .. '<br /> به‌منظور جلوگیری از ایجاد اخلال' ..
(count and count >= 100000 and ' و وارد شدن فشار به سرورها' or '') ..
'، هرگونه تغییر باید ابتدا در ' .. sandbox_text .. ' آزمایش شود. ' ..
'تغییرات آزمایش‌شده را می‌توان در یک ویرایش به این صفحه افزود. '
else
sandbox_text = (infoArg and ('.<br />' .. infoArg .. ' ت') or ' و ت') ..
'غییر دادن آن می‌تواند تأثیرات گسترده‌ای داشته باشد. لطفاً تغییرات را در  ' .. sandbox_text .. ' بیازمایید. '
end
end
-- Set the conjunction, apply Oxford comma, and force a comma if #1 has "§"
 
local conjunction = s .. options.conjunction .. s
if #list == 2 and searchDisp(list[1], "§") or #list > 2 then
local discussion_text = systemMessages and 'لطفاً ابتدا در خصوص تغییرات مورد نظر ' or 'توصیه می‌شود که ابتدا در خصوص تغییرات مورد نظر '
conjunction = separator .. conjunction
if frame.args["2"] and frame.args["2"] ~= "" and not yesno(frame.args["2"]) then
discussion_text = mw.ustring.format("%sدر [[%s]]", discussion_text, frame.args["2"]) .. ' گفتگو کرده'
else
discussion_text = mw.ustring.format("%sدر [[%s|صفحهٔ بحث]]", discussion_text, title.talkPageTitle.fullText ) .. ' گفتگو کرده'
end
end
-- Return the formatted string
return mw.text.listToText(list, separator .. s, conjunction)
return used_on_text .. sandbox_text .. discussion_text .. " و سپس آن‌ها را پیاده‌سازی کنید." .. bot_text
end
 
--DRY function
function p.conjList (conj, list, fmt)
return stringifyList(list, {conjunction = conj, formatted = fmt})
end
 
-- Stringifies lists with "and" or "or"
function p.andList (...) return p.conjList("و", ...) end
function p.orList (...) return p.conjList("یا", ...) end
 
--------------------------------------------------------------------------------
-- For see
--
-- Makes a "For X, see [[Y]]." list from raw parameters. Intended for the
-- {{about}} and {{redirect}} templates and their variants.
--------------------------------------------------------------------------------
 
--default options table used across the forSee family of functions
local forSeeDefaultOptions = {
andKeyword = 'و',
title = mw.title.getCurrentTitle().text,
otherText = 'دیگر کاربردها',
forSeeForm = 'برای %s %s را ببینید.',
}
 
--Collapses duplicate punctuation
local function punctuationCollapse (text)
local replacements = {
["%.%.$"] = ".",
["%؟%.$"] = "؟",
["%!%.$"] = "!",
["%.%]%]%.$"] = ".]]",
["%؟%]%]%.$"] = "؟]]",
["%!%]%]%.$"] = "!]]"
}
for k, v in pairs(replacements) do text = mw.ustring.gsub(text, k, v) end
return text
end
end


-- Structures arguments into a table for stringification, & options
function p.main(frame)
function p.forSeeArgsToTable (args, from, options)
local count = nil
-- Type-checks and defaults
if yesno(frame.args['fetch'] or frame.args['واکشی']) == false then
checkType("forSeeArgsToTable", 1, args, 'table')
if (frame.args[1] or '') ~= '' then count = tonumber(frame.args[1]) end
checkType("forSeeArgsToTable", 2, from, 'number', true)
else
from = from or 1
count = _fetch(frame)
checkType("forSeeArgsToTable", 3, options, 'table', true)
options = options or {}
for k, v in pairs(forSeeDefaultOptions) do
if options[k] == nil then options[k] = v end
end
end
-- maxArg's gotten manually because getArgs() and table.maxn aren't friends
local image = "[[پرونده:Ambox warning yellow.svg|40px|alt=هشدار|link=]]"
local maxArg = 0
local type_param = "style"
for k, v in pairs(args) do
local epilogue = ''
if type(k) == 'number' and k > maxArg then maxArg = k end
if (frame.args['system'] or frame.args['سامانه']) and (frame.args['system'] or frame.args['سامانه']) ~= '' then
image = "[[پرونده:Ambox important.svg|40px|alt=هشدار|link=]]"
type_param = "content"
local nocat = frame:getParent().args['nocat'] or frame:getParent().args['بی‌رده'] or frame.args['nocat'] or frame.args['بی‌رده']
local categorise = (nocat == '' or not yesno(nocat))
if categorise then
epilogue = frame:preprocess('{{Sandbox other||{{#switch:{{#invoke:Effective protection level|{{#switch:{{NAMESPACE}}|File=upload|#default=edit}}|{{FULLPAGENAME}}}}|sysop|templateeditor|interfaceadmin=|#default=[[رده:صفحه‌های مورد استفاده در پیام‌های سامانه نیازمند محافظت]]}}}}')
end
elseif ((frame.args[1] == "risk" or frame.args[1] == "ریسک") or (count and count >= 100000)) then
image = "[[پرونده:Ambox warning orange.svg|40px|alt=هشدار|link=]]"
type_param = "content"
end
end
-- Structure the data out from the parameter list:
-- * forTable is the wrapper table, with forRow rows
-- * Rows are tables of a "use" string & a "pages" table of pagename strings
-- * Blanks are left empty for defaulting elsewhere, but can terminate list
local forTable = {}
local i = from
local terminated = false
-- If there is extra text, and no arguments are given, give nil value
-- to not produce default of "For other uses, see foo (disambiguation)"
if options.extratext and i > maxArg then return nil end
-- Loop to generate rows
repeat
-- New empty row
local forRow = {}
-- On blank use, assume list's ended & break at end of this loop
forRow.use = args[i]
if not args[i] then terminated = true end
-- New empty list of pages
forRow.pages = {}
-- Insert first pages item if present
table.insert(forRow.pages, args[i + 1])
-- If the param after next is "and", do inner loop to collect params
-- until the "and"'s stop. Blanks are ignored: "1|and||and|3" → {1, 3}
while args[i + 2] == options.andKeyword do
if args[i + 3] then
table.insert(forRow.pages, args[i + 3])
end
-- Increment to next "and"
i = i + 2
end
-- Increment to next use
i = i + 2
-- Append the row
table.insert(forTable, forRow)
until terminated or i > maxArg
return forTable
if frame.args["form"] == "editnotice" then
end
return frame:expandTemplate{
 
title = 'editnotice',
-- Stringifies a table as formatted by forSeeArgsToTable
args = {
function p.forSeeTableToString (forSeeTable, options)
["image"] = image,
-- Type-checks and defaults
["text"] = p.text(frame, count),
checkType("forSeeTableToString", 1, forSeeTable, "table", true)
["expiry"] = (frame.args["expiry"] or frame.args["منقضی"] or "")
checkType("forSeeTableToString", 2, options, "table", true)
options = options or {}
for k, v in pairs(forSeeDefaultOptions) do
if options[k] == nil then options[k] = v end
end
-- Stringify each for-see item into a list
local strList = {}
if forSeeTable then
for k, v in pairs(forSeeTable) do
local useStr = v.use or options.otherText
local pagesStr =
p.andList(v.pages, true) or
mFormatLink._formatLink{
categorizeMissing = mHatnote.missingTargetCat,
link = mHatnote.disambiguate(options.title)
}
}
local forSeeStr = mw.ustring.format(options.forSeeForm, useStr, pagesStr)
} .. epilogue
forSeeStr = punctuationCollapse(forSeeStr)
else
table.insert(strList, forSeeStr)
return require('Module:Message box').main('ombox', {
end
type = type_param,
image = image,
text = p.text(frame, count),
expiry = (frame.args["expiry"] or frame.args["منقضی"] or "")
}) .. epilogue
end
end
if options.extratext then table.insert(strList, punctuationCollapse(options.extratext..'.')) end
-- Return the concatenated list
return table.concat(strList, ' ')
end
-- Produces a "For X, see [[Y]]" string from arguments. Expects index gaps
-- but not blank/whitespace values. Ignores named args and args < "from".
function p._forSee (args, from, options)
local forSeeTable = p.forSeeArgsToTable(args, from, options)
return p.forSeeTableToString(forSeeTable, options)
end
-- As _forSee, but uses the frame.
function p.forSee (frame, from, options)
mArguments = require('Module:Arguments')
return p._forSee(mArguments.getArgs(frame), from, options)
end
end


return p
return p

Latest revision as of 12:17, November 30, 2025

local p = {}

-- _fetch looks at the "demo" argument. local _fetch = require('Module:Transclusion_count').fetch local yesno = require('Module:Yesno') local numConv = require('Module:Numeral converter').convert

function p.num(frame, count) if count == nil then if yesno(frame.args['fetch'] or frame.args['واکشی']) == false then if (frame.args[1] or ) ~= then count = tonumber(frame.args[1]) end else count = _fetch(frame) end end

-- Build output string local return_value = "" if count == nil then if (frame.args[1] == "risk" or frame.args[1] == "ریسک") then return_value = "تعداد بسیار زیادی صفحه" else return_value = "تعداد زیادی صفحه" end else -- Use 2 significant figures for smaller numbers and 3 for larger ones local sigfig = 2 if count >= 100000 then sigfig = 3 end

-- Prepare to round to appropriate number of sigfigs local f = math.floor(math.log10(count)) - sigfig + 1

-- Round and insert "approximately" or "+" when appropriate if (yesno(frame.args[2])) or (mw.ustring.sub(frame.args[1], -1) == "+") then -- Round down return_value = mw.ustring.format("%s+", mw.getContentLanguage():formatNum(math.floor( (count / 10^(f)) ) * (10^(f))) ) else -- Round to nearest return_value = mw.ustring.format("نزدیک به %s", mw.getContentLanguage():formatNum(math.floor( (count / 10^(f)) + 0.5) * (10^(f))) ) end

-- Insert percentage of pages if that is likely to be >= 1% and when |no-percent= not set to yes if count and count > 250000 and not yesno (frame:getParent().args['no-percent'] or frame:getParent().args['بدون درصد']) then local percent = math.floor( ( (count/frame:callParserFunction('NUMBEROFPAGES', 'R') ) * 100) + 0.5) if percent >= 1 then return_value = mw.ustring.format("%s صفحه، یا نزدیک به %s٪ از کل صفحه‌ها", return_value, numConv('fa', percent)) end end end

return return_value end -- Actions if there is a large (greater than or equal to 100,000) transclusion count function p.risk(frame) local return_value = "" if (frame.args[1] == "risk" or frame.args[1] == "ریسک") then return_value = "risk" else local count = _fetch(frame) if count and count >= 100000 then return_value = "risk" end end return return_value end

function p.text(frame, count) -- Only show the information about how this template gets updated if someone -- is actually editing the page and maybe trying to update the count. local bot_text = (frame:preprocess("692") == "") and "\n\n----\nپیام پیش‌نمایش: شمار تراگنجانش‌ها ممکن است توسط ربات به‌روز شود (مستندات الگو را ببینید)." or

if count == nil then if yesno(frame.args['fetch'] or frame.args['واکشی']) == false then if (frame.args[1] or ) ~= then count = tonumber(frame.args[1]) end else count = _fetch(frame) end end local title = mw.title.getCurrentTitle() if title.subpageText == "توضیحات" or title.subpageText == "تمرین" then title = title.basePageTitle end

local systemMessages = frame.args['system'] or frame.args['سامانه'] if (frame.args['system'] or frame.args['سامانه']) == then systemMessages = nil end

-- This retrieves the project URL automatically to simplify localiation. local templateCount = ('در %s صفحه'):format( mw.title.getCurrentTitle():fullUrl():gsub('//(.-)/.*', '%1'), mw.uri.encode(title.fullText), p.num(frame, count)) local used_on_text = "این " .. (mw.title.getCurrentTitle().namespace == 828 and "پودمان لوآ" or "الگو") .. ' '; if systemMessages then used_on_text = used_on_text .. systemMessages .. ((count and count > 2000) and ("، و " .. templateCount) or ("")) else used_on_text = used_on_text .. templateCount .. " به‌کار رفته است" end


local sandbox_text = ("زیرصفحه‌های /تمرین یا /آزمایشی %s، یا در %s خودتان"):format( title.fullText, title.fullText, (mw.title.getCurrentTitle().namespace == 828 and "پودمان" or "الگو"), mw.title.getCurrentTitle().namespace == 828 and "پودمان:Sandbox|پودمان تمرینی" or "ویکی‌پدیا:صفحه‌های کاربری#زیرصفحه‌های کاربری چه؟|زیرصفحهٔ کاربری" )

local infoArg = frame.args["info"] ~= "" and frame.args["info"] if (systemMessages or (frame.args[1] == "risk" or frame.args[1] == "ریسک") or (count and count >= 100000) ) then local info = systemMessages and '.
تغییر دادن آن می‌تواند به تغییر بی‌درنگ در رابط کاربری ویکی‌پدیا منجر شود.' or '.' if infoArg then info = info .. "
" .. infoArg end sandbox_text = info .. '
به‌منظور جلوگیری از ایجاد اخلال' .. (count and count >= 100000 and ' و وارد شدن فشار به سرورها' or ) .. '، هرگونه تغییر باید ابتدا در ' .. sandbox_text .. ' آزمایش شود. ' .. 'تغییرات آزمایش‌شده را می‌توان در یک ویرایش به این صفحه افزود. ' else sandbox_text = (infoArg and ('.
' .. infoArg .. ' ت') or ' و ت') .. 'غییر دادن آن می‌تواند تأثیرات گسترده‌ای داشته باشد. لطفاً تغییرات را در ' .. sandbox_text .. ' بیازمایید. ' end


local discussion_text = systemMessages and 'لطفاً ابتدا در خصوص تغییرات مورد نظر ' or 'توصیه می‌شود که ابتدا در خصوص تغییرات مورد نظر ' if frame.args["2"] and frame.args["2"] ~= "" and not yesno(frame.args["2"]) then discussion_text = mw.ustring.format("%sدر %s", discussion_text, frame.args["2"]) .. ' گفتگو کرده' else discussion_text = mw.ustring.format("%sدر صفحهٔ بحث", discussion_text, title.talkPageTitle.fullText ) .. ' گفتگو کرده' end

return used_on_text .. sandbox_text .. discussion_text .. " و سپس آن‌ها را پیاده‌سازی کنید." .. bot_text end

function p.main(frame) local count = nil if yesno(frame.args['fetch'] or frame.args['واکشی']) == false then if (frame.args[1] or ) ~= then count = tonumber(frame.args[1]) end else count = _fetch(frame) end local image = "40px|alt=هشدار|link=" local type_param = "style" local epilogue = if (frame.args['system'] or frame.args['سامانه']) and (frame.args['system'] or frame.args['سامانه']) ~= then image = "40px|alt=هشدار|link=" type_param = "content" local nocat = frame:getParent().args['nocat'] or frame:getParent().args['بی‌رده'] or frame.args['nocat'] or frame.args['بی‌رده'] local categorise = (nocat == or not yesno(nocat)) if categorise then epilogue = frame:preprocess('Template:Sandbox other') end elseif ((frame.args[1] == "risk" or frame.args[1] == "ریسک") or (count and count >= 100000)) then image = "40px|alt=هشدار|link=" type_param = "content" end

if frame.args["form"] == "editnotice" then return frame:expandTemplate{ title = 'editnotice', args = { ["image"] = image, ["text"] = p.text(frame, count), ["expiry"] = (frame.args["expiry"] or frame.args["منقضی"] or "") } } .. epilogue else return require('Module:Message box').main('ombox', { type = type_param, image = image, text = p.text(frame, count), expiry = (frame.args["expiry"] or frame.args["منقضی"] or "") }) .. epilogue end end

return p

Retrieved from "https://en.faraghaib.ir/w/index.php?title=پودمان:High-use&oldid=692"