پودمان:Hatnote: تفاوت میان نسخه‌ها

    از ویکی پاسخ
     
    جز (۱ نسخه واردشده)
     
    (۴ نسخهٔ میانی ویرایش شده توسط ۳ کاربر نشان داده نشد)
    خط ۹: خط ۹:
    local libraryUtil = require('libraryUtil')
    local libraryUtil = require('libraryUtil')
    local checkType = libraryUtil.checkType
    local checkType = libraryUtil.checkType
    local checkTypeForNamedArg = libraryUtil.checkTypeForNamedArg
    local mArguments -- lazily initialise [[Module:Arguments]]
    local mArguments -- lazily initialise [[Module:Arguments]]
    local yesno -- lazily initialise [[Module:Yesno]]
    local yesno -- lazily initialise [[Module:Yesno]]
    local formatLink -- lazily initialise [[Module:Format link]] ._formatLink


    local p = {}
    local p = {}
    خط ۱۷: خط ۱۹:
    -- Helper functions
    -- Helper functions
    --------------------------------------------------------------------------------
    --------------------------------------------------------------------------------
    local curNs = mw.title.getCurrentTitle().namespace
    p.missingTargetCat =
    --Default missing target category, exported for use in related modules
    ((curNs ==  0) or (curNs == 14)) and
    'مقاله‌های دارای الگوهای سرنویس با صفحه هدف ناموجود' or nil


    local function getArgs(frame)
    local function getArgs(frame)
    خط ۲۷: خط ۳۵:
    local function removeInitialColon(s)
    local function removeInitialColon(s)
    -- Removes the initial colon from a string, if present.
    -- Removes the initial colon from a string, if present.
    return s:match('^:?(.*)')
    return mw.ustring.match(s, '^:?(.*)')
    end
    end


    خط ۴۰: خط ۴۸:
    link = removeInitialColon(link)
    link = removeInitialColon(link)
    end
    end
    local namespace = link:match('^(.-):')
    local namespace = mw.ustring.match(link, '^(.-):')
    if namespace then
    if namespace then
    local nsTable = mw.site.namespaces[namespace]
    local nsTable = mw.site.namespaces[namespace]
    خط ۴۸: خط ۵۶:
    end
    end
    return 0
    return 0
    end
    function p.formatPages(...)
    -- Formats a list of pages using formatLink and returns it as an array. Nil
    -- values are not allowed.
    local pages = {...}
    local ret = {}
    for i, page in ipairs(pages) do
    ret[i] = p._formatLink(page)
    end
    return ret
    end
    function p.formatPageTables(...)
    -- Takes a list of page/display tables and returns it as a list of
    -- formatted links. Nil values are not allowed.
    local pages = {...}
    local links = {}
    for i, t in ipairs(pages) do
    checkType('formatPageTables', i, t, 'table')
    local link = t[1]
    local display = t[2]
    links[i] = p._formatLink(link, display)
    end
    return links
    end
    end


    خط ۹۳: خط ۷۶:
    -- Make the category text.
    -- Make the category text.
    local category
    local category
    if not title.isTalkPage and yesno(addTrackingCategory) ~= false then
    if not title.isTalkPage -- Don't categorise talk pages
    and title.namespace ~= 2 -- Don't categorise userspace
    and yesno(addTrackingCategory) ~= false -- Allow opting out
    then
    category = 'الگو:سرنویس همراه خطا'
    category = 'الگو:سرنویس همراه خطا'
    category = string.format(
    category = mw.ustring.format(
    '[[%s:%s]]',
    '[[%s:%s]]',
    mw.site.namespaces[14].name,
    mw.site.namespaces[14].name,
    خط ۱۰۳: خط ۸۹:
    category = ''
    category = ''
    end
    end
    return string.format(
    return mw.ustring.format(
    '<strong class="error">خطا: %s%s.</strong>%s',
    '<strong class="error">خطا: %s%s.</strong>%s',
    msg,
    msg,
    خط ۱۱۳: خط ۹۹:
    function p.disambiguate(page, disambiguator)
    function p.disambiguate(page, disambiguator)
    -- Formats a page title with a disambiguation parenthetical,
    -- Formats a page title with a disambiguation parenthetical,
    -- i.e. "Example" → "Example (ابهام‌زدایی)".
    -- i.e. "Example" → "Example (disambiguation)".
    checkType('ابهام‌زدایی', 1, page, 'string')
    checkType('disambiguate', 1, page, 'string')
    checkType('ابهام‌زدایی', 2, disambiguator, 'string', true)
    checkType('disambiguate', 2, disambiguator, 'string', true)
    disambiguator = disambiguator or 'ابهام‌زدایی'
    disambiguator = disambiguator or 'ابهام‌زدایی'
    return string.format('%s (%s)', page, disambiguator)
    return mw.ustring.format('%s (%s)', page, disambiguator)
    end
     
    --------------------------------------------------------------------------------
    -- Format link
    --
    -- Makes a wikilink from the given link and display values. Links are escaped
    -- with colons if necessary, and links to sections are detected and displayed
    -- with " § " as a separator rather than the standard MediaWiki "#". Used in
    -- the {{format hatnote link}} template.
    --------------------------------------------------------------------------------
     
    function p.formatLink(frame)
    local args = getArgs(frame)
    local link = args[1]
    local display = args[2]
    if not link then
    return p.makeWikitextError(
    'پیوندی تعریف نشده‌است',
    'الگو:قالب‌بندی پیوند#خطاها',
    args.category
    )
    end
    return p._formatLink(link, display)
    end
     
    function p._formatLink(link, display)
    checkType('_formatLink', 1, link, 'string')
    checkType('_formatLink', 2, display, 'string', true)
     
    -- Remove the initial colon for links where it was specified manually.
    link = removeInitialColon(link)
     
    -- Find whether a faux display value has been added with the {{!}} magic
    -- word.
    if not display then
    local prePipe, postPipe = link:match('^(.-)|(.*)$')
    link = prePipe or link
    display = postPipe
    end
     
    -- Find the display value.
    if not display then
    local page, section = link:match('^(.-)#(.*)$')
    if page then
    display = page .. ' §&nbsp;' .. section
    end
    end
     
    -- Assemble the link.
    local cat
    if not mw.title.new(link).exists then
    cat = '[[رده:صفحه‌های استفاده‌کننده از سرنویس با پیوند قرمز]]'
    else
    cat = ''
    end
    if display then
    return string.format(
    '[[:%s|%s]]',
    string.gsub(link, '|(.*)$', ''), --display overwrites manual piping
    display
    ) .. cat
    else
    return string.format('[[:%s]]', link) .. cat
    end
    end
    end


    خط ۱۹۳: خط ۱۱۵:
    local args = getArgs(frame)
    local args = getArgs(frame)
    local s = args[1]
    local s = args[1]
    local options = {}
    if not s then
    if not s then
    return p.makeWikitextError(
    return p.makeWikitextError(
    'هیچ متنی تعیین نشده‌است',
    'متنی تعریف نشده‌آست',
    'الگو:سرنویس#خطاها',
    'الگو:سرنویس#خطاها',
    args.category
    args.category or args['رده']
    )
    )
    end
    end
    options.extraclasses = args.extraclasses
    return p._hatnote(s, {
    options.selfref = args.selfref
    extraclasses = args.extraclasses or args['کلاس‌های بیشتر'],
    return p._hatnote(s, options)
    selfref = args.selfref or args['خودارجاع']
    })
    end
    end


    خط ۲۱۰: خط ۱۳۲:
    checkType('_hatnote', 2, options, 'table', true)
    checkType('_hatnote', 2, options, 'table', true)
    options = options or {}
    options = options or {}
    local classes = {'hatnote', 'navigation-not-searchable'}
    local inline = options.inline
    local extraclasses = options.extraclasses
    local hatnote = mw.html.create(inline == 1 and 'span' or 'div')
    local selfref = options.selfref
    local extraclasses
    if type(extraclasses) == 'string' then
    if type(options.extraclasses) == 'string' then
    classes[#classes + 1] = extraclasses
    extraclasses = options.extraclasses
    end
    end
    if selfref then
     
    classes[#classes + 1] = 'selfref'
    hatnote
    end
    :attr('role', 'note')
    return string.format(
    :addClass(inline == 1 and 'hatnote-inline' or 'hatnote')
    '<div role="note" class="%s">%s</div>',
    :addClass('navigation-not-searchable')
    table.concat(classes, ' '),
    :addClass(extraclasses)
    s
    :addClass(options.selfref and 'selfref')
    )
    :wikitext(s)
    return mw.getCurrentFrame():extensionTag{
    name = 'templatestyles', args = { src = 'پودمان:Hatnote/styles.css' }
    } .. tostring(hatnote)
    end
    end


    return p
    return p

    نسخهٔ کنونی تا ‏۱۳ دسامبر ۲۰۲۲، ساعت ۱۸:۴۹

    توضیحات این پودمان می‌تواند در پودمان:Hatnote/توضیحات قرار گیرد.

    --------------------------------------------------------------------------------
    --                              Module:Hatnote                                --
    --                                                                            --
    -- This module produces hatnote links and links to related articles. It       --
    -- implements the {{hatnote}} and {{format link}} meta-templates and includes --
    -- helper functions for other Lua hatnote modules.                            --
    --------------------------------------------------------------------------------
    
    local libraryUtil = require('libraryUtil')
    local checkType = libraryUtil.checkType
    local checkTypeForNamedArg = libraryUtil.checkTypeForNamedArg
    local mArguments -- lazily initialise [[Module:Arguments]]
    local yesno -- lazily initialise [[Module:Yesno]]
    local formatLink -- lazily initialise [[Module:Format link]] ._formatLink
    
    local p = {}
    
    --------------------------------------------------------------------------------
    -- Helper functions
    --------------------------------------------------------------------------------
    
    local curNs = mw.title.getCurrentTitle().namespace
    p.missingTargetCat =
    	--Default missing target category, exported for use in related modules
    	((curNs ==  0) or (curNs == 14)) and
    	'مقاله‌های دارای الگوهای سرنویس با صفحه هدف ناموجود' or nil
    
    local function getArgs(frame)
    	-- Fetches the arguments from the parent frame. Whitespace is trimmed and
    	-- blanks are removed.
    	mArguments = require('Module:Arguments')
    	return mArguments.getArgs(frame, {parentOnly = true})
    end
    
    local function removeInitialColon(s)
    	-- Removes the initial colon from a string, if present.
    	return mw.ustring.match(s, '^:?(.*)')
    end
    
    function p.findNamespaceId(link, removeColon)
    	-- Finds the namespace id (namespace number) of a link or a pagename. This
    	-- function will not work if the link is enclosed in double brackets. Colons
    	-- are trimmed from the start of the link by default. To skip colon
    	-- trimming, set the removeColon parameter to false.
    	checkType('findNamespaceId', 1, link, 'string')
    	checkType('findNamespaceId', 2, removeColon, 'boolean', true)
    	if removeColon ~= false then
    		link = removeInitialColon(link)
    	end
    	local namespace = mw.ustring.match(link, '^(.-):')
    	if namespace then
    		local nsTable = mw.site.namespaces[namespace]
    		if nsTable then
    			return nsTable.id
    		end
    	end
    	return 0
    end
    
    function p.makeWikitextError(msg, helpLink, addTrackingCategory, title)
    	-- Formats an error message to be returned to wikitext. If
    	-- addTrackingCategory is not false after being returned from
    	-- [[Module:Yesno]], and if we are not on a talk page, a tracking category
    	-- is added.
    	checkType('makeWikitextError', 1, msg, 'string')
    	checkType('makeWikitextError', 2, helpLink, 'string', true)
    	yesno = require('Module:Yesno')
    	title = title or mw.title.getCurrentTitle()
    	-- Make the help link text.
    	local helpText
    	if helpLink then
    		helpText = ' ([[' .. helpLink .. '|راهنما]])'
    	else
    		helpText = ''
    	end
    	-- Make the category text.
    	local category
    	if not title.isTalkPage -- Don't categorise talk pages
    		and title.namespace ~= 2 -- Don't categorise userspace
    		and yesno(addTrackingCategory) ~= false -- Allow opting out
    	then
    		category = 'الگو:سرنویس همراه خطا'
    		category = mw.ustring.format(
    			'[[%s:%s]]',
    			mw.site.namespaces[14].name,
    			category
    		)
    	else
    		category = ''
    	end
    	return mw.ustring.format(
    		'<strong class="error">خطا: %s%s.</strong>%s',
    		msg,
    		helpText,
    		category
    	)
    end
    
    function p.disambiguate(page, disambiguator)
    	-- Formats a page title with a disambiguation parenthetical,
    	-- i.e. "Example" → "Example (disambiguation)".
    	checkType('disambiguate', 1, page, 'string')
    	checkType('disambiguate', 2, disambiguator, 'string', true)
    	disambiguator = disambiguator or 'ابهام‌زدایی'
    	return mw.ustring.format('%s (%s)', page, disambiguator)
    end
    
    --------------------------------------------------------------------------------
    -- Hatnote
    --
    -- Produces standard hatnote text. Implements the {{hatnote}} template.
    --------------------------------------------------------------------------------
    
    function p.hatnote(frame)
    	local args = getArgs(frame)
    	local s = args[1]
    	if not s then
    		return p.makeWikitextError(
    			'متنی تعریف نشده‌آست',
    			'الگو:سرنویس#خطاها',
    			args.category or args['رده']
    		)
    	end
    	return p._hatnote(s, {
    		extraclasses = args.extraclasses or args['کلاس‌های بیشتر'],
    		selfref = args.selfref or args['خودارجاع']
    	})
    end
    
    function p._hatnote(s, options)
    	checkType('_hatnote', 1, s, 'string')
    	checkType('_hatnote', 2, options, 'table', true)
    	options = options or {}
    	local inline = options.inline
    	local hatnote = mw.html.create(inline == 1 and 'span' or 'div')
    	local extraclasses
    	if type(options.extraclasses) == 'string' then
    		extraclasses = options.extraclasses
    	end
    
    	hatnote
    		:attr('role', 'note')
    		:addClass(inline == 1 and 'hatnote-inline' or 'hatnote')
    		:addClass('navigation-not-searchable')
    		:addClass(extraclasses)
    		:addClass(options.selfref and 'selfref')
    		:wikitext(s)
    	
    	return mw.getCurrentFrame():extensionTag{
    		name = 'templatestyles', args = { src = 'پودمان:Hatnote/styles.css' }
    	} .. tostring(hatnote)
    end
    
    return p