4,318
edits
imported>Xaosflux m (Changed protection settings for "Module:Coordinates": 1MM+ uses ([Edit=Require administrator access] (indefinite) [Move=Require administrator access] (indefinite))) |
mNo edit summary |
||
Line 16: | Line 16: | ||
]] | ]] | ||
require(' | require('strict') | ||
local math_mod = require("Module:Math") | local math_mod = require("Module:Math") | ||
local coordinates = {}; | local coordinates = {}; | ||
local isSandbox = mw.getCurrentFrame():getTitle():find('sandbox', 1, true); | |||
local current_page = mw.title.getCurrentTitle() | local current_page = mw.title.getCurrentTitle() | ||
local page_name = mw.uri.encode( current_page.prefixedText, 'WIKI' ); | local page_name = mw.uri.encode( current_page.prefixedText, 'WIKI' ); | ||
local coord_link = '//geohack.toolforge.org/geohack.php?pagename=' .. page_name .. '¶ms= | local coord_link = 'https://geohack.toolforge.org/geohack.php?pagename=' .. page_name .. '¶ms=' | ||
--[[ Helper function, replacement for {{coord/display/title}} ]] | --[[ Helper function, replacement for {{coord/display/title}} ]] | ||
local function displaytitle( | local function displaytitle(coords) | ||
return mw.getCurrentFrame():extensionTag{ | |||
name = 'indicator', | |||
args = { name = 'coordinates' }, | |||
content = '<span id="coordinates">[[Geographic coordinate system|Coordinates]]: ' .. coords .. '</span>' | |||
} | |||
end | end | ||
Line 69: | Line 66: | ||
local result = "" | local result = "" | ||
for i,v in ipairs(errors) do | for i,v in ipairs(errors) do | ||
result = result .. '<strong class="error">Coordinates: ' .. v[2] .. '</strong><br />' | |||
end | end | ||
return result | return result | ||
Line 157: | Line 153: | ||
end | end | ||
return mw.getCurrentFrame():extensionTag{ name = 'templatestyles', args = { src = | local stylesheetLink = 'Module:Coordinates' .. ( isSandbox and '/sandbox' or '' ) .. '/styles.css' | ||
return mw.getCurrentFrame():extensionTag{ | |||
name = 'templatestyles', args = { src = stylesheetLink } | |||
} .. '<span class="plainlinks nourlexpansion">[' .. coord_link .. uriComponents .. | |||
' ' .. inner .. ']</span>' | |||
end | end | ||
Line 633: | Line 630: | ||
local Display = args.display and args.display:lower() or 'inline' | local Display = args.display and args.display:lower() or 'inline' | ||
-- it and ti are short for inline,title and title,inline | |||
local function isInline(s) | local function isInline(s) | ||
-- Finds whether coordinates are displayed inline. | -- Finds whether coordinates are displayed inline. | ||
Line 649: | Line 647: | ||
local text = '' | local text = '' | ||
if isInline(Display) then | if isInline(Display) then | ||
text = text .. | text = text .. '<span class="geo-inline">' .. contents .. Notes .. '</span>' | ||
end | end | ||
if isInTitle(Display) then | if isInTitle(Display) then | ||
text = text | -- Add to output since indicator content is invisible to Lua later on | ||
if not isInline(Display) then | |||
text = text .. '<span class="geo-inline-hidden noexcerpt">' .. contents .. Notes .. '</span>' | |||
end | |||
text = text .. displaytitle(contents .. Notes) .. makeWikidataCategories(args.qid) | |||
end | end | ||
if not args.nosave then | if not args.nosave then | ||
Line 687: | Line 687: | ||
]] | ]] | ||
function coordinates. | function coordinates._coord2text(coord,type) | ||
if | if coord == '' or type == '' or not type then return nil end | ||
type = mw.text.trim(type) | |||
if | if type == 'lat' or type == 'long' then | ||
local result, negative = mw.text.split((mw.ustring.match( | local result, negative = mw.text.split((mw.ustring.match(coord,'[%.%d]+°[NS] [%.%d]+°[EW]') or ''), ' ') | ||
if | if type == 'lat' then | ||
result, negative = result[1], 'S' | result, negative = result[1], 'S' | ||
else | else | ||
Line 701: | Line 701: | ||
return result[1] | return result[1] | ||
else | else | ||
return mw.ustring.match( | return mw.ustring.match(coord, 'params=.-_' .. type .. ':(.-)[ _]') | ||
end | end | ||
end | |||
function coordinates.coord2text(frame) | |||
return coordinates._coord2text(frame.args[1],frame.args[2]) | |||
end | end | ||
Line 719: | Line 723: | ||
]] | ]] | ||
function coordinates.coordinsert(frame) | function coordinates.coordinsert(frame) | ||
-- for the 2nd or later integer parameter (the first is the coord template, as above) | |||
for i, v in ipairs(frame.args) do | for i, v in ipairs(frame.args) do | ||
if i ~= 1 then | if i ~= 1 then | ||
-- if we cannot find in the coord_template the i_th coordinsert parameter e.g. region | |||
if not mw.ustring.find(frame.args[1], (mw.ustring.match(frame.args[i], '^(.-:)') or '')) then | if not mw.ustring.find(frame.args[1], (mw.ustring.match(frame.args[i], '^(.-:)') or '')) then | ||
-- find from the params= up to the first possibly-present underscore | |||
-- and append the i_th coordinsert parameter and a space | |||
-- IDK why we're adding a space but it does seem somewhat convenient | |||
frame.args[1] = mw.ustring.gsub(frame.args[1], '(params=.-)_? ', '%1_'..frame.args[i]..' ') | frame.args[1] = mw.ustring.gsub(frame.args[1], '(params=.-)_? ', '%1_'..frame.args[i]..' ') | ||
end | end | ||
Line 727: | Line 736: | ||
end | end | ||
if frame.args.name then | if frame.args.name then | ||
-- if we can't find the vcard class | |||
if not mw.ustring.find(frame.args[1], '<span class="vcard">') then | if not mw.ustring.find(frame.args[1], '<span class="vcard">') then | ||
-- take something that looks like a coord template and add the vcard span with class and fn org class | |||
local namestr = frame.args.name | local namestr = frame.args.name | ||
frame.args[1] = mw.ustring.gsub(frame.args[1], | frame.args[1] = mw.ustring.gsub( | ||
frame.args[1], | |||
'(<span class="geo%-default">)(<span[^<>]*>[^<>]*</span><span[^<>]*>[^<>]*<span[^<>]*>[^<>]*</span></span>)(</span>)', | '(<span class="geo%-default">)(<span[^<>]*>[^<>]*</span><span[^<>]*>[^<>]*<span[^<>]*>[^<>]*</span></span>)(</span>)', | ||
'%1<span class="vcard">%2<span style="display:none"> (<span class="fn org">' .. namestr .. '</span>)</span></span>%3') | '%1<span class="vcard">%2<span style="display:none"> (<span class="fn org">' .. namestr .. '</span>)</span></span>%3' | ||
frame.args[1] = mw.ustring.gsub(frame.args[1], '(¶ms=[^&"<>%[%] ]*) ', '%1&title=' .. mw.uri.encode(namestr) .. ' ') | ) | ||
-- then find anything from coordinates parameters to the 'end' and attach the title parameter | |||
frame.args[1] = mw.ustring.gsub( | |||
frame.args[1], | |||
'(¶ms=[^&"<>%[%] ]*) ', | |||
'%1&title=' .. mw.uri.encode(namestr) .. ' ' | |||
) | |||
end | end | ||
end | end | ||
-- replace the existing indicator with a new indicator using the modified content | |||
frame.args[1] = mw.ustring.gsub( | |||
frame.args[1], | |||
'(<span class="geo%-inline[^"]*">(.+)</span>)\127[^\127]*UNIQ%-%-indicator%-%x+%-%-?QINU[^\127]*\127', | |||
function (inline, coord) return inline .. displaytitle(coord) end | |||
) | |||
return frame.args[1] | return frame.args[1] | ||
end | end | ||
return coordinates | return coordinates |