Module:Official website/sandbox: Difference between revisions

Revision as of 15:57, 7 January 2016

Latest revision as of 02:09, 1 December 2021

(58 intermediate revisions by 8 users not shown)

Line 9:

return result

end

end

-- Gets the rank for a Wikidata property table. Returns 1, 0 or -1, in

-- order of rank.

local function getRank(prop)

local ranksrank = {}prop.rank

if rank == 'preferred' then

return 1

elseif rank == 'normal' then

return 0

elseif rank == 'deprecated' then

return -1

else

-- No rank or undefined rank is treated as "normal".

return 0

end

end

-- Finds whether a Wikidata property is qualified as being in English.

local function isEnglish(prop)

local ret = quickPcall(function ()

for i, lang in ipairs(prop.qualifiers.P407) do

if lang.datavalue.value['numeric-id'] == 1860 then

return true

end

end

return false

end)

return ret == true

end

Line 16 ⟶ 45:

-- Get objects for all official sites on Wikidata.

local websites = quickPcall(function ()

return mw.wikibase.getEntityObjectgetAllStatements()mw.claimswikibase.getEntityIdForCurrentPage(), 'P856')

end)

websites = websites or {}

-- Clone the objects in case other code needs them in their original order.

websites = websites and mw.clone(websites) or {}

-- Find the website object with the highest rank, or the first one if there

-- is a tie. Then get the URL from that object.

-- Add the table index to the objects in case it is needed in the sort.

local ranks = {}

for i, website in ipairs(websites) do

if website.rank_index and not ranks[website.rank]= theni

ranks[website.rank] = i

end

end

-- Sort the websites, first by highest rank, and then by websites in the

-- English language, then by the website's original position in the

-- property list. When we are done, get the URL from the highest-sorted

-- object.

table.sort(websites, function(ws1, ws2)

local r1 = getRank(ws1)

local r2 = getRank(ws2)

if r1 ~= r2 then

return r1 > r2

end

local e1 = isEnglish(ws1)

local e2 = isEnglish(ws2)

if e1 ~= e2 then

return e1

end

return ws1._index < ws2._index

end)

local url = quickPcall(function ()

return websitewebsites[1].mainsnak.datavalue.value

local website = websites[ranks.preferred or ranks.normal or ranks.deprecated]

return website.mainsnak.datavalue.value

end)

-- Cache the result so that we only do the heavy lifting once per #invoke.

fetchWikidataUrl = function ()

Line 43 ⟶ 87:

-- Render the URL link, plus other visible output.

local function renderUrl(options)

if not options.url and not options.wikidataurl then

local qid = mw.wikibase.getEntityIdForCurrentPage()

returnlocal result = '<strong class="error">' ..

'No URL found. Please specify a URL here or add one to Wikidata.' ..

'</strong>'

if qid then

result = result.. ' [[File:OOjs UI icon edit-ltr-progressive.svg |frameless |text-top |10px |alt=Edit this at Wikidata |link=https://www.wikidata.org/wiki/' .. qid .. '#P856|Edit this at Wikidata]]'

end

return result

end

local ret = {}

ret[#ret + 1] = string.format(

'<span class="official-website">%s</span>',

makeUrl(options.url or options.wikidataurl, options.display)

)

if options.wikidataurl and not options.url then

local qid = mw.wikibase.getEntityIdForCurrentPage()

if qid then

ret[#ret + 1] = '[[File:OOjs UI icon edit-ltr-progressive.svg |frameless |text-top |10px |alt=Edit this at Wikidata |link=https://www.wikidata.org/wiki/' .. qid .. '#P856|Edit this at Wikidata]]'

end

end

if options.format == 'flash' then

ret[#ret + 1] = mw.getCurrentFrame():expandTemplate{

title = 'Link noteColor',

args = {note ='#505050', '(Requires [[Adobe Flash playerPlayer]])'}

}

end

Line 66 ⟶ 121:

-- Render the tracking category.

local function renderTrackingCategory(url, wikidataurl)

if mw.title.getCurrentTitle().namespace ~= 0 then

return ''

end

local category

if not url and not wikidataurl then

category = 'Official website missing URL'

elseif fetchWikidataUrl()not url and wikidataurl then

return ''

if url and url ~= fetchWikidataUrl() then

elseif url and wikidataurl then

if url:gsub('/%s*$', '') ~= wikidataurl:gsub('/%s*$', '') then

category = 'Official website different in Wikidata and Wikipedia'

end

Line 84 ⟶ 141:

function p._main(args)

local url = args[1] or args.___URL or fetchWikidataUrl()args.url

if local urlwikidataurl and url ~= fetchWikidataUrl() then

local formattedUrl = renderUrl{

url = url,

wikidataurl = wikidataurl,

display = args[2] or args.name or 'Official website',

mobileformat = args.mobileformat,

formatmobile = args.formatmobile

}

return formattedUrl .. renderTrackingCategory(url, wikidataurl)

end