Module:Sister project links: Difference between revisions

refactor to remove redundant sitelink lookup
 
imported>Hike395
reverse display order of wikivoyage and wikiversity
 
(3 intermediate revisions by 2 users not shown)
Line 1: Line 1:
require('strict')
-- Module to create sister project link box
-- Module to create sister project link box
local getArgs = require('Module:Arguments').getArgs
local getArgs = require('Module:Arguments').getArgs
local commonsLink = require('Module:Commons link')
local commonsLink = require('Module:Commons link')
local sideBox = require('Module:Side box')._main
local sideBox = require('Module:Side box')._main
local generateWarning = require('Module:If preview')._warning
local p = {}
local p = {}


Line 14: Line 17:
voy="Wikivoyage-Logo-v3-icon.svg",
voy="Wikivoyage-Logo-v3-icon.svg",
v="Wikiversity logo 2017.svg",
v="Wikiversity logo 2017.svg",
species="Wikispecies-logo.svg",
iw="Wikipedia-logo-v2.svg",
iw1="Wikipedia-logo-v2.svg",
iw2="Wikipedia-logo-v2.svg",
d="Wikidata-logo.svg",
d="Wikidata-logo.svg",
species="Wikispecies-logo.svg",
m="Wikimedia Community Logo.svg",
m="Wikimedia Community Logo.svg",
mw="MediaWiki-2020-icon.svg"}
mw="MediaWiki-2020-icon.svg"}
local prefixList = {'wikt', 'c', 'n', 'q', 's', 'b', 'v', 'voy',
'species', 'species_author', 'iw', 'iw1', 'iw2', 'd', 'm', 'mw'}


local sisterName = {
local sisterName = {
wikt="Wiktionary",
wikt="Wiktionary",
c="Wikimedia Commons",
c="Commons",
n="Wikinews",
n="Wikinews",
q="Wikiquote",
q="Wikiquote",
Line 28: Line 37:
voy="Wikivoyage",
voy="Wikivoyage",
v="Wikiversity",
v="Wikiversity",
species="Wikispecies",
iw="Wikipedia",
iw1="Wikipedia",
iw2="Wikipedia",
d="Wikidata",
d="Wikidata",
species="Wikispecies",
m="Meta-Wiki",
m="Meta-Wiki",
mw="MediaWiki"}
mw="MediaWiki"}
local sisterInfo = {
wikt="Definitions",
c="Media",
n="News",
q="Quotations",
s="Texts",
b="Textbooks",
voy="Travel guides",
v="Resources",
species="Taxa",
species_author="Authorship",
iw="Edition",
iw1="Edition",
iw2="Edition",
d="Data",
m="Discussions",
mw="Documentation"
}
local defaultSisters = {
wikt=true,
c=true,
n=true,
q=true,
s=true,
b=true,
voy='auto',
v=true,
species='auto',
species_author=false,
iw=false,
iw1=false,
iw2=false,
d=false,
m=false,
mw=false
}


local sisterDb = {
local sisterDb = {
Line 48: Line 98:
wdHidden="Pages using Sister project links with hidden wikidata",
wdHidden="Pages using Sister project links with hidden wikidata",
defaultSearch="Pages using Sister project links with default search"}
defaultSearch="Pages using Sister project links with default search"}
local inSandbox = mw.getCurrentFrame():getTitle():find('sandbox', 1, true)
-- Function to add "-sand" to classes when called from sandbox
local function sandbox(s)
return inSandbox and s.."-sand" or s
end


-- Function to canonicalize string
-- Function to canonicalize string
Line 70: Line 127:
return {nil, nil}
return {nil, nil}
end
end
lowerS = s:lower()
local lowerS = s:lower()
-- Check for various forms of "yes"
-- Check for various forms of "yes"
if lowerS == 'yes' or lowerS == 'y' or lowerS == 't'  
if lowerS == 'yes' or lowerS == 'y' or lowerS == 't'  
Line 124: Line 181:
end
end


-- Function to get sitelink for a wiki
-- Arguments:
--  prefix = prefix string for wiki to lookup
--  qid = QID of entity to search for, current page entity by default
local function fetchWikidata(prefix,qid)
local sisterDbName = sisterDb[prefix]
return sisterDbName and getSitelink(sisterDbName,qid)
end


-- Function to generate the sister link itself
-- Function to generate the sister link itself
Line 137: Line 202:
--    args.information = type of info sister site contains
--    args.information = type of info sister site contains
--  tracking = tracking table
--  tracking = tracking table
local function sisterLink(args, tracking)
local function genSisterLink(args, tracking)
if args[1][2] == false or (not args.default and args[1][2] == nil) then
if args[1][2] == false or (not args.default and args[1][2] == nil) then
return nil --- either editor specified "no", or "blank" (and default=no), then skip this sister
return nil --- either editor specified "no", or "blank" (and default=no), then skip this sister
end
end
local sisterDbName = sisterDb[args.sisterPrefix]
local sitelink = args.sitelink or fetchWikidata(args.sisterPrefix,args.qid)
local sitelink = args.sitelink or (sisterDbName and getSitelink(sisterDbName,args.qid))
if args.auto and not sitelink and args[1][2] == nil then
if args.auto and not sitelink and args[1][2] == nil then
return nil --- in auto mode, if link is blank and no sitelink, then skip
return nil --- in auto mode, if link is blank and no sitelink, then skip
Line 151: Line 215:
return nil --- no link found, just skip
return nil --- no link found, just skip
end
end
if tracking ~= nil then
if tracking then
-- update state for tracking categories
-- update state for tracking categories
if args[1][1] and sitelink then
if args[1][1] and sitelink then
Line 171: Line 235:
end
end
end
end
return {prefix=args.sisterPrefix, link=link, information=args.information}
return {prefix=args.sisterPrefix, link=link, logo=args.logo, name=args.name,
    information=args.information}
end
 
-- Function to handle special case of commons link
local function commonsLinks(args, commonsPage)
-- use [[Module:Commons link]] to determine best commons link
local cLink = (not args.commonscat) and commonsLink._hasGallery(args.qid)
                or commonsLink._hasCategory(args.qid)
if commonsPage[1] and not mw.ustring.match(commonsPage[1]:lower(),"^category:") then
commonsPage[1] = (args.commonscat and "Category:" or "")..commonsPage[1]
end
local commonsSearch = "Search/"..(args.commonscat and "Category:" or "")..args[1]
return {link=cLink, search=commonsSearch}
end
 
-- Function to handle special case for "author" and "cookbook"
local function handleSubtype(args)
local ns = args.ns
local ns_len = mw.ustring.len(ns)
local result = {}
result.sitelink = fetchWikidata(args.prefix, args.qid)
local subtype = false
if args.page then
if mw.ustring.sub(args.page,1,ns_len) == ns then
    subtype = true
    elseif args.subtype then
    result.page = ns..args.page
    subtype = true
    end
elseif result.sitelink then
subtype = mw.ustring.sub(result.sitelink,1,ns_len) == ns
elseif args.subtype then
result.search = "Search/"..ns..args.default
subtype = true
end
if subtype then
result.info = args.info
end
return result
end
end


-- Function to add one sister to sister list
-- Function to create a sister link, by prefix
-- Arguments:
-- Arguments:
--  sisterList = accumulated list of sisters
--  prefix = sister prefix (e.g., "c" for commons)
--  args = arguments for this sister (see p._sisterLink above)
--  args = arguments for this sister (see p._sisterLink above)
--  tracking = tracking table
--  tracking = tracking table
local function oneSister(sisterList,args,tracking)
local function sisterLink(prefix, args, tracking)
local link = sisterLink(args,tracking)
-- determine arguments to genSisterLink according to prefix
if link then
if prefix == 'species_author' and not args.species[1] and args.species[2] and not args.species_author[1] and args.species_author[2] then
table.insert(sisterList, link)
return nil
end
local default = defaultSisters[prefix]
if default == 'auto' then
default = args.auto
end
-- Handle exceptions by prefix
local search = ((prefix == 'd' and "ItemByTitle/enwiki/") or "Search/")..args[1]
local sitelink = prefix == 'd' and args.qid
    local page = args[prefix]
    local info = sisterInfo[prefix]
    -- special case handling of author and cookbook
    local subtype = nil
    if prefix == 's' then
    subtype = handleSubtype({prefix='s',qid=args.qid,subtype=args.author,page=page[1],
                        ns='Author:',info=nil,default=args[1]})
    elseif prefix == 'b' then
    subtype = handleSubtype({prefix='b',qid=args.qid,subtype=args.cookbook,page=page[1],
                        ns='Cookbook:',info='Recipes',default=args[1]})
    end
    if subtype then
        page[1] = subtype.page or page[1]
search = subtype.search or search
sitelink = subtype.sitelink or sitelink
info = subtype.info or info
end
    if prefix == 'voy' then
    if not args.bar then
    info = "Travel information"
    end
    if page[1] then
    if mw.ustring.match(page[1],"phrasebook") then
    info = "Phrasebook"
    end
    elseif page[2] or args.auto then
    sitelink = sitelink or fetchWikidata('voy',args.qid)
    if sitelink and mw.ustring.match(sitelink,"phrasebook") then
    info = "Phrasebook"
    end
end
    end
    info = args.information or info
    if prefix == 'c' then
    local commons = commonsLinks(args, page)
    search = commons.search
    sitelink = commons.link
    end
    prefix = (prefix == 'species_author' and 'species') or prefix
    local logo = logo[prefix]
    local name = sisterName[prefix]
    if mw.ustring.sub(prefix,1,2) == 'iw' then
    local lang = nil
    local iw_arg = args[prefix]
    if iw_arg[1] then
    lang = iw_arg[1]
    elseif iw_arg[2] then
    local P424 = mw.wikibase.getBestStatements(args.qid, "P424")[1]
        if P424 and P424.mainsnak.datavalue then
        lang = P424.mainsnak.datavalue.value
        end
    end
if lang == nil then
return nil
end
    prefix = ':'..lang
    page[1] = ""
    page[2] = true
    local langname = mw.language.fetchLanguageName( lang, 'en')
    if langname then
    info = langname..' '..info
    end
    end
    return genSisterLink({
    page,
    auto=args.auto,
    qid=args.qid,
    logo=logo,
    name=name,
    sitelink=sitelink,
    default=default,
    sisterPrefix = prefix,
    search=search,
    information=info}, tracking)
end
 
local function templatestyles_page(is_bar)
local sandbox = inSandbox and 'sandbox/' or ''
if is_bar then
return mw.ustring.format(
'Module:Sister project links/bar/%sstyles.css',
sandbox
)
end
end
return mw.ustring.format(
'Module:Sister project links/%sstyles.css',
sandbox
)
end
end


Line 193: Line 391:
--      args.style: CSS style string appended to end of default CSS
--      args.style: CSS style string appended to end of default CSS
--      args.display: boldface name to display
--      args.display: boldface name to display
local function createContainer(args)
local function createSisterBox(sisterList, args)
-- Outermost div (css from previous version of [[Template:Project sister links]])
local container = mw.html.create('div')
container:attr("role","navigation")
container:attr("aria-labelledby","sister-projects")
container:addClass("metadata")
container:addClass("plainlinks")
container:addClass("sistersitebox")
container:addClass("plainlist")
if args.position and args.position:lower() == "left" then
container:addClass("mbox-small-left")
else
container:addClass("mbox-small")
end
if args.collapsible then
container:addClass("mw-collapsible")
if args.collapsible == "collapsed" then
container:addClass("mw-collapsed")
end
end
container:css("border","1px solid #aaa")
container:css("padding",0)
container:css("background","#f9f9f9")
container:cssText(args.style)
-- Div for text header
local header = container:tag('div')
header:css("clear",args.collapsible and "both")
header:css("padding","0.75em 0")
header:css("text-align","center")
-- pagename in bold as part of header
local pagename = header:tag('b')
pagename:css("display","block")
pagename:wikitext(args.display or args[1])
local headerText = "at Wikipedia's [[Wikipedia:Wikimedia sister projects|"
headerText = headerText..'<span id="sister-projects">sister projects</span>]]'
header:wikitext(headerText)
-- start the unordered list element here
local ul = container:tag('ul')
ul:addClass(args.collapsible and "mw-collapsible-content")
ul:css("border-top","1px solid #aaa")
ul:css("padding","0.75em 0")
ul:css("width","217px")
ul:css("margin","0 auto")
-- pass ul element back to main, so sister links can be added
return ul
end


local function createSisterBox(sisterList,args)
local list = mw.html.create('ul')
container = createContainer(args)
     for i, link in ipairs(sisterList) do
     for i, link in ipairs(sisterList) do
  local li = container:tag('li')
  local li = list:tag('li')
  li:css("min-height","31px")
  -- html element for 27px-high logo
  -- html element for 27px-high logo
  local logoSpan = li:tag('span')
  local logoSpan = li:tag('span')
  logoSpan:css("display","inline-block")
  logoSpan:addClass(sandbox("sister-logo"))
  logoSpan:css("width","31px")
  logoSpan:wikitext("[[File:"..link.logo.."|27x27px|middle|link=|alt=]]")
  logoSpan:css("line-height","31px")
  logoSpan:css("vertical-align","middle")
  logoSpan:css("text-align","center")
  logoSpan:wikitext("[[File:"..logo[link.prefix].."|27x27px|middle|link=|alt=]]")
  -- html element for link
  -- html element for link
  local linkspan = li:tag('span')
  local linkspan = li:tag('span')
  linkspan:css("display","inline-block")
  linkspan:addClass(sandbox("sister-link"))
  linkspan:css("margin-left","4px")
  local linkText = "[["..link.prefix..":"..link.link.."|"..link.information .."]] from "..link.name
  linkspan:css("width","182px")
  linkspan:css("vertical-align","middle")
  local linkText = "[["..link.prefix..":"..link.link.."|"..link.information .."]] from "..sisterName[link.prefix]
  linkspan:wikitext(linkText)
  linkspan:wikitext(linkText)
     end
     end
     return container:allDone()
    list:allDone()
   
     return sideBox({
role = 'navigation',
labelledby = 'sister-projects',
class = sandbox("sister-box") .. ' sistersitebox plainlinks',
position = args.position,
style = args.style,
abovestyle = args.collapsible and 'clear: both' or nil,
above = mw.ustring.format(
"<b>%s</b>  at Wikipedia's [[Wikipedia:Wikimedia sister projects|<span id=\"sister-projects\">sister projects</span>]]",
args.display or args[1]
),
text = tostring(list),
collapsible = args.collapsible,
templatestyles = templatestyles_page()
})
end
end


local function createSisterBar(sisterList,args)
local nav = mw.html.create( 'div' )
nav:addClass( 'noprint')
nav:addClass( 'metadata')
nav:addClass( sandbox('sister-bar'))
nav:attr( 'role', 'navigation' )
nav:attr( 'aria-label' , 'sister-projects' )
local header = nav:tag('div')
header:addClass(sandbox('sister-bar-header'))
local pagename = header:tag('b')
pagename:wikitext(args.display or args[1])
local headerText = " at Wikipedia's [[Wikipedia:Wikimedia sister projects|"
headerText = headerText..'<span id="sister-projects" style="white-space:nowrap;">sister projects</span>]]:'
header:wikitext(headerText)
if #sisterList == 1 and args.trackSingle then
header:wikitext("[[Category:Pages with single-entry sister bar]]")
end
local container = nav:tag('ul')
container:addClass(sandbox('sister-bar-content'))
for _, link in ipairs(sisterList) do
local item = container:tag('li')
item:addClass(sandbox('sister-bar-item'))
local logoSpan = item:tag('span')
logoSpan:addClass(sandbox('sister-bar-logo'))
logoSpan:wikitext("[[File:"..link.logo.."|21x19px|link=|alt=]]")
local linkSpan = item:tag('span')
linkSpan:addClass(sandbox('sister-bar-link'))
linkSpan:wikitext("<b>[["..link.prefix..":"..link.link.."|"..link.information .."]]</b> from "..link.name)
end
return nav
end


function p._main(args)
function p._main(args)
local titleObject = mw.title.getCurrentTitle()
local titleObject = mw.title.getCurrentTitle()
-- Default title/search string is PAGENAME
local ns = titleObject.namespace
args[1] = args[1] or titleObject.text
-- find qid, either supplied with args, from search string, or from current page
args.qid = args.qid or mw.wikibase.getEntityIdForTitle(args[1] or "") or mw.wikibase.getEntityIdForCurrentPage()
args.qid = args.qid and args.qid:upper()
-- search string defaults to PAGENAME
    args[1] = args[1] or mw.wikibase.getSitelink(args.qid or "") or titleObject.text
    -- handle redundant "commons"/"c" prefix
    args.c = args.c or args.commons
-- Canonicalize all sister links (handle yes/no/empty)
-- Canonicalize all sister links (handle yes/no/empty)
for _, k in pairs({"wikt","c","commons","n","q","s","b","voy",
for _, k in ipairs(prefixList) do
                "v","d","species","species_author","m","mw"}) do
args[k] = canonicalize(args[k])
args[k] = canonicalize(args[k])
end
-- Canonicalize cookbook
args.cookbook = canonicalize(args.cookbook)
args.b = mergeArgs({args.b,args.cookbook})
args.cookbook = args.cookbook[2]
-- handle trackSingle parameter
if args.trackSingle == nil then
    args.trackSingle = true
end
    if ns ~= 0 and ns ~= 14 then
    args.trackSingle = false
     end
     end
     -- Canonicalize general parameters
     -- Canonicalize general parameters
     for _,k in pairs({"auto","commonscat","author"}) do
     for _,k in pairs({"auto","commonscat","author","bar","tracking","sandbox","trackSingle"}) do
     args[k] = canonicalize(args[k])[2]
     args[k] = canonicalize(args[k])[2]
     end
     end
    -- Fill in args.qid with current qid (if available)
    args.qid = args.qid or mw.wikibase.getEntityIdForCurrentPage()
args.qid = args.qid and args.qid:upper()
-- Initialize tracking categories if main namespace
-- Initialize tracking categories if main namespace
local tracking = nil
local tracking = (args.tracking or ns == 0) and {}
if titleObject.namespace == 0 then
tracking = {}
end
     local sisterList = {}
     local sisterList = {}
-- WIKTIONARY
     local prefix
oneSister(sisterList,{args.wikt,auto=args.auto,qid=args.qid,default=true,
     -- Loop through all sister projects, generate possible links
            sisterPrefix="wikt",search="Search/"..args[1],
    for _, prefix in ipairs(prefixList) do
            information="Definitions"},tracking)
    local link = sisterLink(prefix, args, tracking)
     -- COMMONS
    if link then
     --     use [[Module:Commons link]] to determine best commons link
table.insert(sisterList, link)
local cLink = (not args.commonscat) and commonsLink._hasGallery(args.qid)
end
                or commonsLink._hasCategory(args.qid)
local commonsPage = mergeArgs({args.c,args.commons})
if commonsPage[1] and not mw.ustring.match(commonsPage[1]:lower(),"^category:") then
commonsPage[1] = (args.commonscat and "Category:" or "")..commonsPage[1]
end
local commonsSearch = "Search/"..(args.commonscat and "Category:" or "")..args[1]
oneSister(sisterList,{commonsPage,auto=args.auto,qid=args.qid,
default=true,sitelink=cLink,
sisterPrefix="c",search=commonsSearch,information="Media"},
tracking)
-- WIKINEWS
oneSister(sisterList,{args.n,auto=args.auto,qid=args.qid,default=true,
sisterPrefix="n",search="Search/"..args[1],
information="News"},tracking)
-- WIKIQUOTE
oneSister(sisterList,{args.q,auto=args.auto,qid=args.qid,default=true,
sisterPrefix="q",search="Search/"..args[1],
information="Quotations"},tracking)
-- WIKISOURCE
if args.author and args.s[1] then
args.s[1] = "Author:"..args.s[1]
end
end
oneSister(sisterList,{args.s,auto=args.auto,qid=args.qid,default=true,
    local box = mw.html.create()
sisterPrefix="s",search="Search/"..args[1],
     if args.bar and #sisterList > 0 then
information="Texts"},tracking)
    box:wikitext(mw.getCurrentFrame():extensionTag{
-- WIKIBOOKS
name = 'templatestyles', args = { src = templatestyles_page(true) }
oneSister(sisterList,{args.b,auto=args.auto,qid=args.qid,default=true,
     })
            sisterPrefix="b",search="Search/"..args[1],
    box:node(createSisterBar(sisterList,args))
            information="Textbooks"},tracking)
     elseif #sisterList == 1 then
     -- WIKIVOYAGE
    -- Information="guide" when we can be assured that search cannot be called
    local voyInfo = (args.voy[1] or args.voy[2] == nil) and "guides" or "information"
    oneSister(sisterList,{args.voy,auto=args.auto,qid=args.qid,default=args.auto,
                sisterPrefix="voy",search="Search/"..args[1],
                information="Travel "..voyInfo},tracking)
    -- WIKIVERSITY
    oneSister(sisterList,{args.v,auto=args.auto,qid=args.qid,default=true,
                sisterPrefix="v",search="Search/"..args[1],
                information="Resources"},tracking)
    -- WIKIDATA
    oneSister(sisterList,{args.d,qid=args.qid,default=false,sisterPrefix="d",
                sitelink=args.qid,search="ItemByTitle/enwiki/"..args[1],
                information="Data"},tracking)
    -- WIKISPECIES
    oneSister(sisterList,{mergeArgs({args.species,args.species_author},1),auto=args.auto,
                qid=args.qid,default=args.auto,
                sisterPrefix="species",search="Search/"..args[1],
                information=(args.species[2] and "Taxons")
                              or (args.species_author[2] and "Authorship")
                              or "Taxons",},tracking)
    if args.species[2] and args.species_author[1] then
    -- If species_author is explicitly defined, and species is used, then make second row
     oneSister(sisterList,{args.species_author,auto=args.auto,qid=args.qid,
                default=args.auto,
                    sisterPrefix="species",search="Search/"..args[1],
                    information="Authorship"},tracking)
    end
    -- META
    oneSister(sisterList,{args.m,qid=args.qid,default=false,
                sisterPrefix="m",search="Search/"..args[1],
                information="Discussions",},tracking)
    -- MEDIAWIKI
    oneSister(sisterList,{args.mw,qid=args.qid,default=false,
                sisterPrefix="mw",search="Search/"..args[1],
                information="Documentation",},tracking)
    local box = mw.html.create('div')
     if #sisterList == 1 then
     -- Use  single sister box instead of multi-sister box
     -- Use  single sister box instead of multi-sister box
     local sister = sisterList[1]
     local sister = sisterList[1]
    local frame = mw.getCurrentFrame()
     local link =  "[["..sister.prefix..":"..sister.link.."|<b><i>"..(args.display or args[1]).."</i></b>]]"
     local link =  "[["..sister.prefix..":"..sister.link.."|<b><i>"..(args.display or args[1]).."</i></b>]]"
     box:wikitext(sideBox({position=args.position,
    if sister.name == 'Commons' then
     image="[[File:"..logo[sister.prefix].."|40x40px|class=noviewer|alt=|link=]]",
    sister.name = 'Wikimedia Commons' -- make single sister commons box look like {{Commons}}
     metadata='no', textclass='plainlist', class='plainlinks sistersitebox',
    end
         text=sisterName[sister.prefix].." has "..mw.ustring.lower(sister.information).." related to "..link}))
    local text = sister.name.." has "..mw.ustring.lower(sister.information).." related to "..link
    if sister.name == 'Wikipedia' then  -- make single sister interwiki box look like {{InterWiki}}
    text = "[["..sister.prefix..":"..sister.link.."|<b><i>"..sister.information.."</i></b>]] at [[Wikipedia]], the free encyclopedia"
    end
     box:wikitext(sideBox({
    role = 'navigation',
    position=args.position,
     image="[[File:"..sister.logo.."|40x40px|class=noviewer|alt=|link=]]",
     metadata='no',
    class='plainlinks sistersitebox',
         text=text,
templatestyles = templatestyles_page()
    }))
     elseif #sisterList > 0 then
     elseif #sisterList > 0 then
     -- else use sister box if non-empty
     -- else use sister box if non-empty
     box = createSisterBox(sisterList,args)
     box:wikitext(createSisterBox(sisterList,args))
    end
    if #sisterList == 0 and args.auto then
    box:wikitext(generateWarning({"No sister project links found in Wikidata. Try auto=0"}))
     end
     end
-- Append tracking categories to container div
-- Append tracking categories to container div
-- Alpha ordering is by sister prefix
-- Alpha ordering is by sister prefix
if tracking ~= nil then
if tracking then
for k, v in pairs(tracking) do
for k, v in pairs(tracking) do
box:wikitext("[[Category:"..trackingType[k].."|"..v.."]]")
box:wikitext("[[Category:"..trackingType[k].."|"..v.."]]")
    end
end
    if #sisterList == 0 then
    box:wikitext("[[Category:Pages with empty sister project links]]")
    end
end
end
return box
return tostring(box)
end
end


Line 387: Line 546:
function p.main(frame)
function p.main(frame)
local args = getArgs(frame,{frameOnly=false,parentOnly=false,parentFirst=false})
local args = getArgs(frame,{frameOnly=false,parentOnly=false,parentFirst=false})
return tostring(p._main(args))
return p._main(args)
end
end


-- Lua entry point for generate one sister link
-- Lua entry point for generate one sister link
function p._sisterlink(args)
function p._sisterlink(args)
args[1] = canonicalize(args[1])
    local prefix = args.prefix
args.auto = canonicalize(args.auto)[2]
-- Canonicalize all sister links (handle yes/no/empty)
for _, k in ipairs(prefixList) do
args[k] = canonicalize(args[k])
end
-- Canonicalize cookbook
args.cookbook = canonicalize(args.cookbook)
args.b = mergeArgs({args.b,args.cookbook})
args.cookbook = args.cookbook[2]
    -- Canonicalize general parameters
    for _,k in pairs({"auto","commonscat","author"}) do
    args[k] = canonicalize(args[k])[2]
    end
    args[1] = args[1] or mw.title.getCurrentTitle().text
args.qid = args.qid or mw.wikibase.getEntityIdForCurrentPage()
args.qid = args.qid or mw.wikibase.getEntityIdForCurrentPage()
args.qid = args.qid and args.qid:upper()
args.qid = args.qid and args.qid:upper()
local link = sisterLink(args,nil)
local link = sisterLink(prefix, args,nil)
return "[["..link.prefix..":"..link.link.."|"..link.information .."]] from "..sisterName[link.prefix]
if not link then
return ""
end
return "[["..link.prefix..":"..link.link.."|"..link.information .."]] from "..link.name
end
end


-- Template entry point for generating one sister link
-- Template entry point for generating one sister link
function p.link(frame)
function p.link(frame)
local args = getArgs(frame,{frameOnly=false,parentOnly=false,parentFirst=false})
local args = getArgs(frame)
return p._sisterlink(args)
return p._sisterlink(args)
end
end


return p
return p