Bharatpedia

Module:Sister project links: Difference between revisions

Module Talk

Module:Sister project links (view source)

Revision as of 11:55, 25 December 2022

4,492 bytes added ,  25 December 2022
no edit summary
m (→‎top: clean up, replaced: Wikipedia: → Bharatpedia:)
No edit summary
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 generateWarning = require('Module:If preview')._warning
local p = {}
local p = {}
local logo = {
wikt="Wiktionary-logo-v2.svg",
c="Commons-logo.svg",
n="Wikinews-logo.svg",
q="Wikiquote-logo.svg",
s="Wikisource-logo.svg",
b="Wikibooks-logo.svg",
voy="Wikivoyage-Logo-v3-icon.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",
m="Wikimedia Community Logo.svg",
mw="MediaWiki-2020-icon.svg"}
local prefixList = {'wikt', 'c', 'n', 'q', 's', 'b', 'voy', 'v',
'species', 'species_author', 'iw', 'iw1', 'iw2', 'd', 'm', 'mw'}
local sisterName = {
wikt="Wiktionary",
c="Commons",
n="Wikinews",
q="Wikiquote",
s="Wikisource",
b="Wikibooks",
voy="Wikivoyage",
v="Wikiversity",
species="Wikispecies",
iw="Wikipedia",
iw1="Wikipedia",
iw2="Wikipedia",
d="Wikidata",
m="Meta-Wiki",
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 = {
wikt="enwiktionary",
n="enwikinews",
q="enwikiquote",
s="enwikisource",
b="enwikibooks",
voy="enwikivoyage",
v="enwikiversity",
species="specieswiki"}
local trackingType = {
wdMismatch="Pages using Sister project links with wikidata mismatch",
wdNamespace="Pages using Sister project links with wikidata namespace mismatch",
wdHidden="Pages using Sister project links with hidden wikidata",
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 16: Line 118:
if s == nil then
if s == nil then
return {nil, nil}
return {nil, nil}
end
-- if s is table/list, then assume already canonicalized and return unchanged
if tostring(type(s)) == "table" then
return s
end
end
s = mw.text.trim(tostring(s))
s = mw.text.trim(tostring(s))
Line 21: 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 71: Line 177:
--  qid = QID of entity to search for, current page entity by default
--  qid = QID of entity to search for, current page entity by default
local function getSitelink(wiki,qid)
local function getSitelink(wiki,qid)
qid = qid or mw.wikibase.getEntityIdForCurrentPage()
qid = qid and qid:upper()
-- return nil if some sort of lookup failure
-- return nil if some sort of lookup failure
return qid and mw.wikibase.getSitelink(qid,wiki)
return qid and mw.wikibase.getSitelink(qid,wiki)
end
end


local wdMismatch = nil
-- Function to get sitelink for a wiki
local wdNamespace = nil
-- Arguments:
local wdHidden = nil
--  prefix = prefix string for wiki to lookup
local defaultSearch = nil
--  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
-- Arguments:
-- Arguments:
--  args = argument table for function
--  args = argument table for function
--    args[1] = canonicalized page to fetch
--    args[1] = page to fetch
--    args.default = link when blank
--    args.default = link when blank
--    args.auto = new auto mode (don't fall back to search)
--    args.auto = new auto mode (don't fall back to search)
--    args.sitelink = wikidata sitelink (if available)
--    args.sitelink = wikidata sitelink (if available)
--    args.sisterDbName = DB name of sister site (to get sitelink)
--    args.qid = QID of entity
--    args.qid = QID of entity
--    args.search = fallback string to search for
--    args.search = fallback string to search for
--    args.sisterPrefix = wikitext prefix for sister site
--    args.sisterPrefix = wikitext prefix for sister site
--    args.information = type of info sister site contains
--    args.information = type of info sister site contains
--     args.sisterName = friendly human name of sister site
-- tracking = tracking table
function p._sisterLink(args)
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 sitelink = args.sitelink or (args.sisterDbName and getSitelink(args.sisterDbName,args.qid))
local sitelink = args.sitelink or fetchWikidata(args.sisterPrefix,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 108: Line 215:
return nil --- no link found, just skip
return nil --- no link found, just skip
end
end
-- update state for tracking categories
if tracking then
if args[1][1] and sitelink then
-- update state for tracking categories
-- transform supplied page name to be in wiki-format
if args[1][1] and sitelink then
local page = mw.ustring.gsub(args[1][1],"_"," ")
-- transform supplied page name to be in wiki-format
page = mw.ustring.sub(page,1,1):upper()..mw.ustring.sub(page,2)
local page = mw.ustring.gsub(args[1][1],"_"," ")
local pageNS = mw.ustring.match(page,"^([^:]+):")
page = mw.ustring.sub(page,1,1):upper()..mw.ustring.sub(page,2)
local sitelinkNS = mw.ustring.match(sitelink,"^([^:]+):")
local pageNS = mw.ustring.match(page,"^([^:]+):")
if page == sitelink then
local sitelinkNS = mw.ustring.match(sitelink,"^([^:]+):")
wdHidden = args.sisterPrefix
if page == sitelink then
elseif pageNS ~= sitelinkNS then
tracking.wdHidden = args.sisterPrefix
wdNamespace = args.sisterPrefix
elseif pageNS ~= sitelinkNS then
else
tracking.wdNamespace = args.sisterPrefix
wdMismatch = args.sisterPrefix
else
tracking.wdMismatch = args.sisterPrefix
end
-- if no page link, nor a wikidata entry, and search is on, then warn
elseif not (args[1][2] or sitelink) and args.search then
tracking.defaultSearch = args.sisterPrefix
end
end
-- if no page link, nor a wikidata entry, and search is on, then warn
elseif not (args[1][2] or sitelink) and args.search then
defaultSearch = args.sisterPrefix
end
end
return "[["..args.sisterPrefix..":"..link.."|"..args.information .."]] from "..args.sisterName
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
end


-- Function to generate HTML for one sister link
-- 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
 
-- Function to create a sister link, by prefix
-- Arguments:
-- Arguments:
-- container = parent HTML object
--   prefix = sister prefix (e.g., "c" for commons)
--  args = argument table for function
--   args = arguments for this sister (see p._sisterLink above)
--    args[1] = canonicalized page to fetch
--   tracking = tracking table
--    args.default = link when blank
local function sisterLink(prefix, args, tracking)
--    args.auto = new auto mode (don't fall back to search)
-- determine arguments to genSisterLink according to prefix
--     args.sitelink = wikidata sitelink (if available)
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
--     args.sisterDbName = DB name of sister site (to get sitelink)
--    args.qid = QID of entity (for debugging)
--     args.search = fallback string to search for
--    args.logo = filename of sister logo (no namespace)
--    args.sisterPrefix = wikitext prefix for sister site
--    args.information = type of info sister site contains
--    args.sisterName = friendly human name of sister site
local function oneSister(container,args)
local link = p._sisterLink(args)
if not link then
return nil
return nil
end
end
local li = container and container:tag('li') or mw.html.create('li')
local default = defaultSisters[prefix]
li:css("min-height","31px")
if default == 'auto' then
-- html element for 27px-high logo
default = args.auto
local logo = li:tag('span')
end
logo:css("display","inline-block")
-- Handle exceptions by prefix
logo:css("width","31px")
local search = ((prefix == 'd' and "ItemByTitle/enwiki/") or "Search/")..args[1]
logo:css("line-height","31px")
local sitelink = prefix == 'd' and args.qid
logo:css("vertical-align","middle")
    local page = args[prefix]
logo:css("text-align","center")
    local info = sisterInfo[prefix]
logo:wikitext("[[File:"..args.logo.."|27x27px|middle|link=|alt=]]")
    -- special case handling of author and cookbook
-- html element for link
    local subtype = nil
local linkspan = li:tag('span')
    if prefix == 's' then
linkspan:css("display","inline-block")
    subtype = handleSubtype({prefix='s',qid=args.qid,subtype=args.author,page=page[1],
linkspan:css("margin-left","4px")
                        ns='Author:',info=nil,default=args[1]})
linkspan:css("width","182px")
    elseif prefix == 'b' then
linkspan:css("vertical-align","middle")
    subtype = handleSubtype({prefix='b',qid=args.qid,subtype=args.cookbook,page=page[1],
linkspan:wikitext(link)
                        ns='Cookbook:',info='Recipes',default=args[1]})
return li
    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
return mw.ustring.format(
'Module:Sister project links/%sstyles.css',
sandbox
)
end
end


Line 176: 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')
local list = mw.html.create('ul')
container:attr("role","navigation")
    for i, link in ipairs(sisterList) do
container:attr("aria-labelledby","sister-projects")
  local li = list:tag('li')
container:addClass("metadata")
  -- html element for 27px-high logo
container:addClass("plainlinks")
  local logoSpan = li:tag('span')
container:addClass("sistersitebox")
  logoSpan:addClass(sandbox("sister-logo"))
container:addClass("plainlist")
  logoSpan:wikitext("[[File:"..link.logo.."|27x27px|middle|link=|alt=]]")
if args.position and args.position:lower() == "left" then
  -- html element for link
container:addClass("mbox-small-left")
  local linkspan = li:tag('span')
else
  linkspan:addClass(sandbox("sister-link"))
container:addClass("mbox-small")
  local linkText = "[["..link.prefix..":"..link.link.."|"..link.information .."]] from "..link.name
end
  linkspan:wikitext(linkText)
if args.collapsible then
    end
container:addClass("mw-collapsible")
    list:allDone()
if args.collapsible == "collapsed" then
   
container:addClass("mw-collapsed")
    return sideBox({
end
role = 'navigation',
end
labelledby = 'sister-projects',
container:css("border","1px solid #aaa")
class = sandbox("sister-box") .. ' sistersitebox plainlinks',
container:css("padding",0)
position = args.position,
container:css("background","#f9f9f9")
style = args.style,
container:cssText(args.style)
abovestyle = args.collapsible and 'clear: both' or nil,
-- Div for text header
above = mw.ustring.format(
local header = container:tag('div')
"'''%s'''  at Wikipedia's [[Wikipedia:Wikimedia sister projects|<span id=\"sister-projects\">sister projects</span>]]",
header:css("clear",args.collapsible and "both")
args.display or args[1]
header:css("padding","0.75em 0")
),
header:css("text-align","center")
text = tostring(list),
-- pagename in bold as part of header
collapsible = args.collapsible,
templatestyles = templatestyles_page()
})
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')
local pagename = header:tag('b')
pagename:css("display","block")
pagename:wikitext(args.display or args[1])
pagename:wikitext(args.display or args[1])
local headerText = "at Wikipedia's [[Bharatpedia:Wikimedia sister projects|"
local headerText = " at Wikipedia's [[Wikipedia:Wikimedia sister projects|"
headerText = headerText..'<span id="sister-projects">sister projects</span>]]'
headerText = headerText..'<span id="sister-projects" style="white-space:nowrap;">sister projects</span>]]:'
header:wikitext(headerText)
header:wikitext(headerText)
-- start the unordered list element here
if #sisterList == 1 and args.trackSingle then
local ul = container:tag('ul')
header:wikitext("[[Category:Pages with single-entry sister bar]]")
ul:addClass(args.collapsible and "mw-collapsible-content")
end
ul:css("border-top","1px solid #aaa")
local container = nav:tag('div')
ul:css("padding","0.75em 0")
container:addClass(sandbox('sister-bar-content'))
ul:css("width","217px")
for _, link in ipairs(sisterList) do
ul:css("margin","0 auto")
local item = container:tag('div')
-- pass ul element back to main, so sister links can be added
item:addClass(sandbox('sister-bar-item'))
return ul
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
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)
-- Initialize tracking categories if main namespace
    args.qid = args.qid or mw.wikibase.getEntityIdForCurrentPage()
local tracking = (args.tracking or ns == 0) and {}
args.qid = args.qid and args.qid:upper()
    local sisterList = {}
-- Initialize tracking categories to "no track"
     local prefix
    wdMismatch = nil
     -- Loop through all sister projects, generate possible links
    wdNamespace = nil
     for _, prefix in ipairs(prefixList) do
    wdHidden = nil
    local link = sisterLink(prefix, args, tracking)
    defaultSearch = nil
    if link then
local ul = createContainer(args)
table.insert(sisterList, link)
-- WIKTIONARY
end
oneSister(ul,{args.wikt,auto=args.auto,qid=args.qid,default=true,
            logo="Wiktionary-logo-v2.svg",sisterPrefix="wikt",
            search="Search/"..args[1],information="Definitions",
            sisterName="Wiktionary",sisterDbName="enwiktionary"})
     -- COMMONS
     --    use [[Module:Commons link]] to determine best commons link
local cLink = (not args.commonscat) and commonsLink._hasGallery(args.qid)
                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
end
local commonsSearch = "Search/"..(args.commonscat and "Category:" or "")..args[1]
    local box = mw.html.create()
oneSister(ul,{commonsPage,auto=args.auto,qid=args.qid,
    if args.bar and #sisterList > 0 then
default=true,sitelink=cLink,logo="Commons-logo.svg",
    box:wikitext(mw.getCurrentFrame():extensionTag{
sisterPrefix="c",search=commonsSearch,information="Media",
name = 'templatestyles', args = { src = templatestyles_page(true) }
sisterName="Wikimedia Commons"})
    })
-- WIKINEWS
    box:node(createSisterBar(sisterList,args))
oneSister(ul,{args.n,auto=args.auto,qid=args.qid,default=true,
    elseif #sisterList == 1 then
logo="Wikinews-logo.svg",sisterPrefix="n",search="Search/"..args[1],
    -- Use  single sister box instead of multi-sister box
information="News",sisterName="Wikinews",sisterDbName="enwikinews"})
    local sister = sisterList[1]
-- WIKIQUOTE
    local link = "[["..sister.prefix..":"..sister.link.."|<b><i>"..(args.display or args[1]).."</i></b>]]"
oneSister(ul,{args.q,auto=args.auto,qid=args.qid,default=true,
    if sister.name == 'Commons' then
logo="Wikiquote-logo.svg",sisterPrefix="q",search="Search/"..args[1],
    sister.name = 'Wikimedia Commons' -- make single sister commons box look like {{Commons}}
information="Quotations",sisterName="Wikiquote",sisterDbName="enwikiquote"})
    end
-- WIKISOURCE
    local text = sister.name.." has "..mw.ustring.lower(sister.information).." related to "..link
if args.author and args.s[1] then
    if sister.name == 'Wikipedia' then  -- make single sister interwiki box look like {{InterWiki}}
args.s[1] = "Author:"..args.s[1]
    text = "[["..sister.prefix..":"..sister.link.."|<b><i>"..sister.information.."</i></b>]] at [[Wikipedia]], the free encyclopedia"
end
    end
oneSister(ul,{args.s,auto=args.auto,qid=args.qid,default=true,
    box:wikitext(sideBox({
logo="Wikisource-logo.svg",sisterPrefix="s",search="Search/"..args[1],
    role = 'navigation',
information="Texts",sisterName="Wikisource",sisterDbName="enwikisource"})
    position=args.position,
-- WIKIBOOKS
    image="[[File:"..sister.logo.."|40x40px|class=noviewer|alt=|link=]]",
oneSister(ul,{args.b,auto=args.auto,qid=args.qid,default=true,
    metadata='no',
            logo="Wikibooks-logo.svg",sisterPrefix="b",search="Search/"..args[1],
    class='plainlinks sistersitebox',
            information="Textbooks",sisterName="Wikibooks",sisterDbName="enwikibooks"})
        text=text,
    -- WIKIVOYAGE
templatestyles = templatestyles_page()
    -- Information="guide" when we can be assured that search cannot be called
    }))
    local voyInfo = (args.voy[1] or args.voy[2] == nil) and "guide" or "information"
     elseif #sisterList > 0 then
    oneSister(ul,{args.voy,auto=args.auto,qid=args.qid,default=args.auto,
     -- else use sister box if non-empty
                logo="Wikivoyage-Logo-v3-icon.svg",sisterPrefix="voy",search="Search/"..args[1],
     box:wikitext(createSisterBox(sisterList,args))
                information="Travel "..voyInfo,sisterName="Wikivoyage",sisterDbName="enwikivoyage"})
    end
    -- WIKIVERSITY
    if #sisterList == 0 and args.auto then
    oneSister(ul,{args.v,auto=args.auto,qid=args.qid,default=true,
    box:wikitext(generateWarning({"No sister project links found in Wikidata. Try auto=0"}))
                logo="Wikiversity logo 2017.svg",sisterPrefix="v",search="Search/"..args[1],
                information="Resources",sisterName="Wikiversity",sisterDbName="enwikiversity"})
    -- WIKIDATA
    oneSister(ul,{args.d,qid=args.qid,default=false,logo="Wikidata-logo.svg",sisterPrefix="d",
                sitelink=args.qid,search="ItemByTitle/enwiki/"..args[1],information="Data",sisterName="Wikidata"})
    -- WIKISPECIES
    oneSister(ul,{mergeArgs({args.species,args.species_author},1),auto=args.auto,
                qid=args.qid,default=args.auto,logo="Wikispecies-logo.svg",
                sisterPrefix="species",search="Search/"..args[1],
                information=(args.species[2] and "Taxonomy")
                              or (args.species_author[2] and "Species author")  
                              or "Taxonomy",
                sisterName="Wikispecies",sisterDbName="specieswiki"})
     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(ul,{args.species_author,auto=args.auto,qid=args.qid,
                default=args.auto,logo="Wikispecies-logo.svg",
                    sisterPrefix="species",search="Search/"..args[1],
                    information="Species author",sisterName="Wikispecies"})
     end
     end
    -- META
    oneSister(ul,{args.m,qid=args.qid,default=false,logo="Wikimedia Community Logo.svg",
                sisterPrefix="m",search="Search/"..args[1],information="Discussion",sisterName="Meta-Wiki"})
    -- MEDIAWIKI
    oneSister(ul,{args.mw,qid=args.qid,default=false,logo="MediaWiki-logo.svg",
                sisterPrefix="mw",search="Search/"..args[1],information="Documentation",sisterName="MediaWiki"})
local container = ul:allDone()
-- 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 titleObject.namespace == 0 then
if tracking then
local trackingCats = wdMismatch and "[[Category:Pages using Sister project links with wikidata mismatch|"..wdMismatch.."]]" or ""
for k, v in pairs(tracking) do
trackingCats = trackingCats..(wdNamespace and "[[Category:Pages using Sister project links with wikidata namespace mismatch|"..wdNamespace.."]]" or "")
box:wikitext("[[Category:"..trackingType[k].."|"..v.."]]")
trackingCats = trackingCats..(wdHidden and "[[Category:Pages using Sister project links with hidden wikidata|"..wdHidden.."]]" or "")
end
trackingCats = trackingCats..(defaultSearch and "[[Category:Pages using Sister project links with default search|"..defaultSearch.."]]" or "")
    if #sisterList == 0 then
    container:wikitext(trackingCats)
    box:wikitext("[[Category:Pages with empty sister project links]]")
    end
end
end
return container
return tostring(box)
end
end


Line 332: 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
 
-- Lua entry point for generate one sister link
function p._sisterlink(args)
    local prefix = args.prefix
-- 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 and args.qid:upper()
local link = sisterLink(prefix, args,nil)
if not link then
return ""
end
return "[["..link.prefix..":"..link.link.."|"..link.information .."]] from "..link.name
end
end


-- 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)
args[1] = canonicalize(args[1])
return p._sisterlink(args)
args.auto = canonicalize(args.auto)[2]
return p._sisterLink(args)
end
end


return p
return p
SonOfZeus
Autopatrolled, Importers, Administrators
1,831

edits

Retrieved from "https://en.bharatpedia.org/wiki/Special:MobileDiff/370480"