Module:Coordinates: Difference between revisions

m
no edit summary
m (1 revision imported)
mNo edit summary
 
(One intermediate revision by one other user not shown)
Line 16: Line 16:
]]
]]


require('Module:No globals')
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 .. '&params='
local coord_link = 'https://geohack.toolforge.org/geohack.php?pagename=' .. page_name .. '&params='
local templatestyles = 'Module:Coordinates/styles.css'


--[[ Helper function, replacement for {{coord/display/title}} ]]
--[[ Helper function, replacement for {{coord/display/title}} ]]
local function displaytitle(s, notes)
local function displaytitle(coords)
local l = "[[Geographic coordinate system|Coordinates]]: " .. s
return mw.getCurrentFrame():extensionTag{
local co = '<span id="coordinates">' .. l .. notes .. '</span>';
name = 'indicator',
return '<span style="font-size: small;">' .. co .. '</span>';
args = { name = 'coordinates' },
end
content = '<span id="coordinates">[[Geographic coordinate system|Coordinates]]: ' .. coords .. '</span>'
 
}
--[[ Helper function, Replacement for {{coord/display/inline}} ]]
local function displayinline(s, notes)
return s .. notes
end
end


Line 69: Line 66:
local result = ""
local result = ""
for i,v in ipairs(errors) do
for i,v in ipairs(errors) do
local errorHTML = '<strong class="error">Coordinates: ' .. v[2] .. '</strong>'
result = result .. '<strong class="error">Coordinates: ' .. v[2] .. '</strong><br />'
result = result .. errorHTML .. "<br />"
end
end
return result
return result
Line 157: Line 153:
end
end


return mw.getCurrentFrame():extensionTag{ name = 'templatestyles', args = { src = templatestyles} }
    local stylesheetLink = 'Module:Coordinates' .. ( isSandbox and '/sandbox' or '' ) .. '/styles.css'
      .. '<span class="plainlinks nourlexpansion">'
return mw.getCurrentFrame():extensionTag{
      .. '[' .. coord_link .. uriComponents .. ' ' .. inner .. ']'
name = 'templatestyles', args = { src = stylesheetLink }
      .. '</span>'
} .. '<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 .. displayinline(contents, Notes)
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
.. displaytitle(contents, Notes)
if not isInline(Display) then
.. makeWikidataCategories(args.qid)
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.coord2text(frame)
function coordinates._coord2text(coord,type)
if frame.args[1] == '' or frame.args[2] == '' or not frame.args[2] then return nil end
if coord == '' or type == '' or not type then return nil end
frame.args[2] = mw.text.trim(frame.args[2])
type = mw.text.trim(type)
if frame.args[2] == 'lat' or frame.args[2] == 'long' then
if type == 'lat' or type == 'long' then
local result, negative = mw.text.split((mw.ustring.match(frame.args[1],'[%.%d]+°[NS] [%.%d]+°[EW]') or ''), ' ')
local result, negative = mw.text.split((mw.ustring.match(coord,'[%.%d]+°[NS] [%.%d]+°[EW]') or ''), ' ')
if frame.args[2] == 'lat' then
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(frame.args[1], 'params=.-_'..frame.args[2]..':(.-)[ _]')
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">&#xfeff; (<span class="fn org">' .. namestr .. '</span>)</span></span>%3')
'%1<span class="vcard">%2<span style="display:none">&#xfeff; (<span class="fn org">' .. namestr .. '</span>)</span></span>%3'
frame.args[1] = mw.ustring.gsub(frame.args[1], '(&params=[^&"<>%[%] ]*) ', '%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],
'(&params=[^&"<>%[%] ]*) ',
'%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