ماڊيول:homophones/doc

local export = {}

-- it is either here, or in Module:ugly hacks, and it is not in ugly hacks. function export.CONTENTMODEL() return mw.title.getCurrentTitle().contentModel end

local skins = { ["common" ] = ""; ["vector" ] = "Vector"; ["monobook" ] = "Monobook"; ["cologneblue"] = "Cologne Blue"; ["modern" ] = "Modern"; }

function export.show(frame)

local output = { '\n

\n' }

local cats = {}

if (not frame.args.hr) or (frame.args.hr == "above") then output[#output + 1] = "----\n" end

local title = ((frame.args['for'] ~= "") and frame.args['for']) and mw.title.new(frame.args['for']) or mw.title.getCurrentTitle() local doc_title = mw.title.new((frame.args['from'] ~= "") and frame.args['from'] or (title.fullText .. '/documentation'))

local pagetype = mw.getContentLanguage():lcfirst(title.nsText) .. " page" local preload

local user_name, skin_name

if title.contentModel == "javascript" then pagetype = "script" preload = 'Template:documentation/preloadTemplate' -- XXX if title.nsText == 'User' then user_name = title.rootText end elseif title.contentModel == "css" then pagetype = "style sheet" preload = 'Template:documentation/preloadTemplate' -- XXX if title.nsText == 'User' then user_name = title.rootText end elseif title.contentModel == "Scribunto" then pagetype = "module" preload = 'Template:documentation/preloadModule' user_name = title.rootText:match("^User:(.+)") elseif title.nsText == "Template" then pagetype = "template" preload = 'Template:documentation/preloadTemplate' elseif title.nsText == "Wiktionary" then pagetype = "project page" preload = 'Template:documentation/preloadTemplate' -- XXX end

local old_title if doc_title.isRedirect then old_title = doc_title doc_title = mw.title.new(string.match(doc_title:getContent(), "^#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*:?%s*%[%[([^%[%]]-)%]%]")) end

local fallback_docs

output[#output + 1] = "

" if doc_title.exists then output[#output + 1] = "

The following documentation is located at " .. doc_title.fullText .. ". " .. "^{[[" .. doc_title:fullUrl { action = 'edit' } .. " edit]]}

" else if title.contentModel == "Scribunto" then if user_name then fallback_docs = 'documentation/fallback/user module' cats[#cats + 1] = "User sandbox modules" else cats[#cats + 1] = "Uncategorized modules" end if not fallback_docs then cats[#cats + 1] = "Templates and modules needing documentation" end elseif title.nsText == "Template" then cats[#cats + 1] = "Uncategorized templates" if not fallback_docs then cats[#cats + 1] = "Templates and modules needing documentation" end elseif (title.contentModel == "css") or (title.contentModel == "javascript") then if user_name then skin_name = skins[title.text:sub(#title.rootText + 1):match("^/([a-z]+)%.[jc]ss?$")] if skin_name then fallback_docs = 'documentation/fallback/user ' .. title.contentModel end end end output[#output + 1] = "

This " .. pagetype .. " lacks a documentation subpage. " .. (fallback_docs and "You may " or "Please ") .. "[" .. doc_title:fullUrl { action = 'edit', preload = preload } .. " create it].

\n" end if title.fullText:match("^MediaWiki:Gadget%-") then local is_gadget = false local gadget_list = mw.title.new("MediaWiki:Gadgets-definition"):getContent() for line in mw.text.gsplit(gadget_list, "\n") do local gadget, opts, items = line:match("^%*%s*([A-Za-z][A-Za-z0-9_%-]*)%[(.-)%]|(.+)$") if not gadget then gadget, items = line:match("^%*%s*([A-Za-z][A-Za-z0-9_%-]*)|(.+)$") end if gadget then items = mw.text.split(items, "|") for i, item in ipairs(items) do if title.fullText == ("MediaWiki:Gadget-" .. item) then is_gadget = true output[#output + 1] = "

This script is a part of the " output[#output + 1] = gadget output[#output + 1] = " gadget ([" output[#output + 1] = tostring(mw.uri.fullUrl('MediaWiki:Gadgets-definition', 'action=edit')) output[#output + 1] = " edit definitions])

" output[#output + 1] = "

Description ([" output[#output + 1] = tostring(mw.uri.fullUrl('MediaWiki:Gadget-' .. gadget, 'action=edit')) output[#output + 1] = " edit]): " output[#output + 1] = mw.message.new('Gadget-' .. gadget):plain() output[#output + 1] = "

" table.remove(items, i) if #items > 0 then for j, item in ipairs(items) do items[j] = '' .. item .. '' end output[#output + 1] = "

Other parts: " output[#output + 1] = mw.text.listToText(items) output[#output + 1] = "

" end output[#output + 1] = "

" break end end end end if not is_gadget then output[#output + 1] = "

This script is not a part of any [" output[#output + 1] = tostring(mw.uri.fullUrl('Special:Gadgets', 'uselang=en')) output[#output + 1] = ' gadget] ([' output[#output + 1] = tostring(mw.uri.fullUrl('MediaWiki:Gadgets-definition', 'action=edit')) output[#output + 1] = ' edit definitions]).

' end end if old_title then output[#output + 1] = "

Redirected from [" output[#output + 1] = old_title:fullUrl { redirect = 'no' } output[#output + 1] = " " output[#output + 1] = old_title.fullText output[#output + 1] = "] ([" output[#output + 1] = old_title:fullUrl { action = 'edit' } output[#output + 1] = " edit]).

\n" end local links = {} if title.isSubpage then links[#links + 1] = "root page" links[#links + 1] = "root page's subpages" else links[#links + 1] = "subpage list" end if (title.contentModel == "javascript") or (title.contentModel == "css") then links[#links + 1] = "what links here" if user_name then links[#links + 1] = "your own" end else links[#links + 1] = '[' .. tostring(mw.uri.fullUrl('Special:WhatLinksHere/' .. title.fullText, 'hidelinks=1&hideredirs=1')) .. ' transclusions]' if title.contentModel ~= "Scribunto" then links[#links + 1] = '[' .. tostring(mw.uri.fullUrl('Special:WhatLinksHere/' .. title.fullText, 'hidelinks=1&hidetrans=1')) .. ' redirects]' end end if title.contentModel == "Scribunto" then if title.isSubpage and (title.subpageText == "testcases") then links[#links + 1] = "tested module" else links[#links + 1] = "testcases" end if user_name then links[#links + 1] = "user page" links[#links + 1] = "user talk page" links[#links + 1] = "userspace" end end if #links > 0 then output[#output + 1] = "

Useful links: " .. table.concat(links, " • ") .. "

" end output[#output + 1] = "

\n"

if doc_title.exists then output[#output + 1] = frame:expandTemplate { title = doc_title.fullText } elseif fallback_docs then output[#output + 1] = frame:expandTemplate { title = fallback_docs; args = { ['user'] = user_name; ['page'] = title.fullText; ['skin name'] = skin_name; } } end

if frame.args.hr == "below" then

output[#output + 1] = '\n

---

'

else output[#output + 1] = '\n
' end

for _, cat in ipairs(cats) do output[#output + 1] = "" end

output[#output + 1] = "

\n"

return table.concat(output) end

return export