Difference between revisions of "Module:Jct"
Jump to navigation
Jump to search
blackwiki>Imzadi1979 |
m (48 revisions imported) |
||
| (One intermediate revision by one other user not shown) | |||
| Line 1: | Line 1: | ||
local p = {} | local p = {} | ||
| − | + | local SANDBOX = false | |
| − | local | + | local SANDBOX_SUFFIX = SANDBOX and '/sandbox' or '' |
| − | local | ||
local concat = table.concat | local concat = table.concat | ||
local insert = table.insert | local insert = table.insert | ||
| − | local | + | local getArgs = require('Module:Arguments').getArgs -- Import module function to work with passed arguments |
| − | local | + | local parserModule = require("Module:Road data/parser" .. SANDBOX_SUFFIX) |
| + | local parser = parserModule.parser | ||
| + | |||
| + | -- Shields | ||
| + | local rdt | ||
| + | |||
| + | local function size(args) | ||
| + | local country = args.country | ||
| + | local state = args.state or args.province or '' | ||
| + | local type = args.type | ||
| + | if rdt then | ||
| + | return 'x17' | ||
| + | elseif state == 'FL' then | ||
| + | if type == 'Toll' or type == 'FLTP' or type == 'HEFT' then | ||
| + | return '20' | ||
| + | elseif type == 'Both' then | ||
| + | return '20', 'x20' | ||
| + | end | ||
| + | elseif state == 'NY' then | ||
| + | if type == 'NY 1927' or type == 'NY 1948' or (type == 'Parkway' and args.route == "Robert Moses") or (type == 'CR' and args.county == 'Erie') then | ||
| + | return '20' | ||
| + | end | ||
| + | elseif state == 'AB' then | ||
| + | if type == 'AB' or type == 'Hwy' or type == '2ndHwy' or type == 'TCH' then | ||
| + | return '18' | ||
| + | end | ||
| + | elseif state == 'NS' and type == 'Hwy' or type == 'TCH' then | ||
| + | return '18' | ||
| + | elseif state == 'ON' then | ||
| + | if type == 'ON' or type == 'Hwy' or type == 'Highway' or type == 'QEW' then | ||
| + | return '24x22' | ||
| + | elseif type == 'KLR' then | ||
| + | return '21' | ||
| + | else | ||
| + | local countyTypes = {CH = true, RH = true, District = true, Regional = true, County = true, Municipal = true} | ||
| + | if countyTypes[type] then | ||
| + | return '19' | ||
| + | end | ||
| + | end | ||
| + | elseif state == 'QC' then | ||
| + | if type == 'QC' or type == 'Route' or type == 'A' or type == 'Autoroute' or type == 'TCH' or type == 'ON' then | ||
| + | return '18' | ||
| + | end | ||
| + | elseif state == 'SK' then | ||
| + | if type == 'Hwy' or type == 'SK' then | ||
| + | return 'x25' | ||
| + | end | ||
| + | elseif country == 'MEX' then | ||
| + | return 'x25' | ||
| + | elseif country == 'FRA' then | ||
| + | return 'x18' | ||
| + | elseif country == 'TUR' then | ||
| + | return 'x15' | ||
| + | end | ||
| + | |||
| + | return 'x20' | ||
| + | end | ||
| + | |||
| + | local function shield(args, frame) | ||
| + | if args.noshield then return '' end | ||
| + | local firstSize, secondSize = size(args) | ||
| + | local shield, second = parser(args, 'shield') | ||
| + | if not shield or shield == '' then | ||
| + | return '' | ||
| + | elseif type(shield) == 'table' then | ||
| + | shield, second = shield[1], shield[2] | ||
| + | end | ||
| + | local function render(shield, size) | ||
| + | if frame:callParserFunction('#ifexist', 'Media:' .. shield, '1') ~= '' then | ||
| + | return string.format("[[File:%s|%spx|link=|alt=]]", shield, size) | ||
| + | else | ||
| + | args.shielderr = true | ||
| + | local page = mw.title.getCurrentTitle().prefixedText -- Get transcluding page's title | ||
| + | return mw.ustring.format("[[Category:Jct template errors|1 %s]]", page) | ||
| + | end | ||
| + | end | ||
| + | local rendered = render(shield, firstSize) | ||
| + | if second and type(second) == 'string' then | ||
| + | local size = secondSize or firstSize | ||
| + | rendered = rendered .. render(second, size) | ||
| + | end | ||
| + | return rendered | ||
| + | end | ||
-- Links/abbreviations | -- Links/abbreviations | ||
| − | local function | + | local function link(args) |
| − | local | + | local nolink = args.nolink |
| − | local | + | local abbr = parser(args, 'abbr') |
| − | if | + | if nolink then |
| − | + | return abbr | |
else | else | ||
| − | link = | + | local link = parser(args, 'link') |
| + | if not link or link == '' then | ||
| + | return abbr | ||
| + | else | ||
| + | return mw.ustring.format("<span class=\"nowrap\">[[%s|%s]]</span>", link, abbr) | ||
| + | end | ||
end | end | ||
| + | end | ||
| − | local dir = | + | local function completeLink(args, num) |
| − | + | local actualLink = link(args) | |
| + | if not actualLink then | ||
| + | local page = mw.title.getCurrentTitle().prefixedText -- Get transcluding page's title | ||
| + | actualLink = string.format("<span class=\"error\">Invalid type: %s</span>[[Category:Jct template errors|2 %s]]", args.type, page) | ||
| + | end | ||
| + | local isTo = args.to | ||
| + | local prefix | ||
| + | if num == 1 then | ||
| + | if isTo then | ||
| + | prefix = "To " | ||
| + | else | ||
| + | prefix = '' | ||
| + | end | ||
| + | else | ||
| + | if isTo then | ||
| + | prefix = " to " | ||
| + | else | ||
| + | prefix = " / " | ||
| + | end | ||
| + | end | ||
| + | local suffix = {} | ||
| + | local dir = args.dir | ||
| + | if dir then | ||
| + | insert(suffix, ' ' .. string.lower(dir)) | ||
| + | end | ||
| + | local name = args.name | ||
| + | if name then | ||
| + | insert(suffix, mw.ustring.format(' (%s)', name)) | ||
| + | end | ||
| + | return prefix .. actualLink .. concat(suffix) | ||
| + | end | ||
| − | local name = | + | local function namedLink(args, num) |
| − | if | + | local actualLink = link(args) |
| − | local | + | local name = args.name or '' |
| − | + | local isTo = args.to | |
| + | local prefix | ||
| + | if num == 1 then | ||
| + | if isTo then | ||
| + | prefix = "To " | ||
| + | else | ||
| + | prefix = '' | ||
| + | end | ||
| + | else | ||
| + | if isTo then | ||
| + | prefix = " to " | ||
| + | else | ||
| + | prefix = " / " | ||
| + | end | ||
| + | end | ||
| + | local suffix = {} | ||
| + | local dir = args.dir | ||
| + | if name ~= '' then | ||
| + | if dir then | ||
| + | insert(suffix, mw.ustring.format(' (%s %s)', actualLink, dir)) | ||
| + | else | ||
| + | insert(suffix, mw.ustring.format(' (%s)', actualLink)) | ||
| + | end | ||
| + | else | ||
| + | insert(suffix, actualLink) | ||
| + | if dir then insert(suffix, ' ' .. string.lower(dir)) end | ||
| + | end | ||
| + | return prefix .. name .. concat(suffix) | ||
| + | end | ||
| − | + | local function banners(routes) | |
| − | + | local format = string.format | |
| + | local firstRun = {} | ||
| + | local hasBanner = false | ||
| + | for k,v in ipairs(routes) do | ||
| + | local banner | ||
| + | if v.shield == '' or v.shielderr then | ||
| + | banner = false | ||
else | else | ||
| − | return format('%s (%s)', | + | banner = parser(v, 'banner') or '' |
| + | if banner and banner ~= '' then | ||
| + | hasBanner = true | ||
| + | end | ||
| + | end | ||
| + | insert(firstRun, banner) | ||
| + | end | ||
| + | if not hasBanner then return '' end | ||
| + | local secondRun = {} | ||
| + | for k,v in ipairs(routes) do | ||
| + | local bannerFile = firstRun[k] | ||
| + | if not bannerFile then | ||
| + | |||
| + | elseif bannerFile == '' then | ||
| + | local widthCode = parser(v, 'width') or 'square' | ||
| + | if type(widthCode) == 'number' then | ||
| + | insert(secondRun, "[[File:No image wide.svg|" .. tostring(widthCode) .. "px|link=|alt=]]") | ||
| + | elseif widthCode == 'square' then | ||
| + | insert(secondRun, "[[File:No image wide.svg|20px|link=|alt=]]") | ||
| + | elseif widthCode == 'expand' then | ||
| + | local route = v.route | ||
| + | local width = (#route >= 3) and '25' or '20' | ||
| + | insert(secondRun, format("[[File:No image wide.svg|%spx|link=|alt=]]", width)) | ||
| + | elseif widthCode == 'wide' then | ||
| + | insert(secondRun, "[[File:No image wide.svg|25px|link=|alt=]]") | ||
| + | elseif widthCode == 'US1926' then | ||
| + | insert(secondRun, "[[File:No image wide.svg|21px|link=|alt=]]") | ||
| + | elseif widthCode == 'SD' then | ||
| + | local route = v.route | ||
| + | local width = (#route >= 3) and '23' or '20' | ||
| + | insert(secondRun, format("[[File:No image wide.svg|%spx|link=|alt=]]", width)) | ||
| + | elseif (v.state == 'CA') or (v.type == 'CA') then | ||
| + | local route = v.route | ||
| + | local widths = {default = {'20', '25'}, I = {'20', '24'}, US = {'20', '23'}, SR = {'19', '22'}} | ||
| + | local width = widths[widthCode] or widths.default | ||
| + | local pixels = (#route >= 3) and width[2] or width[1] | ||
| + | insert(secondRun, format("[[File:No image wide.svg|%spx|link=|alt=]]", pixels)) | ||
| + | end | ||
| + | else | ||
| + | local widthCode = parser(v, 'width') or 'square' | ||
| + | if widthCode == 'square' then | ||
| + | insert(secondRun, format("[[File:%s|20px|link=|alt=]]", bannerFile)) | ||
| + | elseif widthCode == 'expand' then | ||
| + | local route = v.route | ||
| + | if #route >= 3 then | ||
| + | insert(secondRun, format("[[File:No image.svg|2px|link=|alt=]][[File:%s|20px|link=|alt=]][[File:No image.svg|3px|link=|alt=]]", bannerFile)) | ||
| + | else | ||
| + | insert(secondRun, format("[[File:%s|20px|link=|alt=]]", bannerFile)) | ||
| + | end | ||
| + | elseif widthCode == 'wide' then | ||
| + | insert(secondRun, format("[[File:No image.svg|2px|link=|alt=]][[File:%s|20px|link=|alt=]][[File:No image.svg|3px|link=|alt=]]", bannerFile)) | ||
| + | elseif widthCode == 'SD' then | ||
| + | local route = v.route | ||
| + | if #route >= 3 then | ||
| + | insert(secondRun, format("[[File:No image.svg|1px|link=|alt=]][[File:%s|20px|link=|alt=]][[File:No image.svg|2px|link=|alt=]]", bannerFile)) | ||
| + | else | ||
| + | insert(secondRun, format("[[File:%s|20px|link=|alt=]]", bannerFile)) | ||
| + | end | ||
| + | elseif widthCode == 'MOSupp' then | ||
| + | local route = v.route | ||
| + | if #route >= 2 then | ||
| + | insert(secondRun, format("[[File:No image.svg|2px|link=|alt=]][[File:%s|20px|link=|alt=]][[File:No image.svg|3px|link=|alt=]]", bannerFile)) | ||
| + | else | ||
| + | insert(secondRun, format("[[File:%s|20px|link=|alt=]]", bannerFile)) | ||
| + | end | ||
| + | elseif widthCode == 'US1926' then | ||
| + | insert(secondRun, format("[[File:%s|20px|link=|alt=]][[File:No image.svg|1px|link=|alt=]]", bannerFile)) | ||
| + | elseif v.state == 'CA' then | ||
| + | local route = v.route | ||
| + | local type = v.type | ||
| + | if type == 'US-Bus' then | ||
| + | if #route >= 3 then | ||
| + | insert(secondRun, format("[[File:No image.svg|1px|link=|alt=]][[File:%s|20px|link=|alt=]][[File:No image.svg|2px|link=|alt=]]", bannerFile)) | ||
| + | else | ||
| + | insert(secondRun, format("[[File:%s|20px|link=|alt=]]", bannerFile)) | ||
| + | end | ||
| + | elseif type == 'CA-Bus' or type == 'SR-Bus' then | ||
| + | if #route >= 3 then | ||
| + | insert(secondRun, format("[[File:No image.svg|1px|link=|alt=]][[File:%s|19px|link=|alt=]][[File:No image.svg|2px|link=|alt=]]", bannerFile)) | ||
| + | else | ||
| + | insert(secondRun, format("[[File:%s|19px|link=|alt=]]", bannerFile)) | ||
| + | end | ||
| + | end | ||
| + | end | ||
end | end | ||
| − | |||
| − | |||
end | end | ||
| + | return concat(secondRun) .. '<br>' | ||
end | end | ||
local function extra(args) | local function extra(args) | ||
| − | local extraTypes = | + | local extraTypes = {rail = {default = "[[File:Rail Sign.svg|20px|alt=|link=]]", |
| + | CAN = {default = "[[File:Ontario M509.svg|20px|alt=|link=]]", | ||
| + | QC = "[[File:Québec I-310.svg|20px|alt=|link=]]"}, | ||
| + | CHL = "[[File:Chile IS-13b.svg|20px|alt=|link=]]", | ||
| + | IDN = "[[File:Indonesia New Road Sign Info 5A2.png|20px|alt=|link=]]", | ||
| + | JPN = "[[File:Japanese Road sign 125-C.svg|20px|alt=|link=]]", | ||
| + | MEX = "[[File:Mexico road sign estacion de ferrocarril.svg|20px|alt=|link=]]"}, | ||
| + | ["light-rail"] = "[[File:Light Rail Sign.svg|20px|alt=|link=]]", | ||
| + | bus = {default = "[[File:Bus Sign.svg|20px|alt=|link=]]", | ||
| + | CAN = {default = "[[File:Ontario M506.svg|20px|alt=|link=]]", | ||
| + | QC = "[[File:Québec I-315.svg|20px|alt=|link=]]"}, | ||
| + | FRA = "[[File:France road sign C6.svg|20px|alt=|link=]]", | ||
| + | HRV = "[[File:Croatia road sign C44.svg|20px|alt=|link=]]", | ||
| + | HUN = "[[File:Hungary road sign E-039.svg|20px|alt=|link=]]", | ||
| + | ITA = "[[File:Italian traffic sign - fermata autobus.svg|20px|alt=|link=]]", | ||
| + | JPN = "[[File:Japanese Road sign 124-C.svg|20px|alt=|link=]]", | ||
| + | MEX = "[[File:Mexico road sign parada de autobus.svg|20px|alt=|link=]]", | ||
| + | NOR = "[[File:Norwegian-road-sign-508.1.svg|20px|alt=|link=]]", | ||
| + | URY = "[[File:Uruguay Road Sign I24.svg|20px|alt=|link=]]"}, | ||
| + | ferry = {default = "[[File:Ferry Sign.svg|20px|alt=|link=]]", | ||
| + | CAN = "[[File:Ontario M508.svg|20px|alt=|link=]]", | ||
| + | CHL = "[[File:Chile IS-14b.svg|20px|alt=|link=]]", | ||
| + | FRA = "[[File:France road sign CE10.svg|20px|alt=|link=]]", | ||
| + | HRV = "[[File:Croatia road sign C49.svg|20px|alt=|link=]]", | ||
| + | ITA = "[[File:Italian traffic signs - auto su nave.svg|20px|alt=|link=]]"}, | ||
| + | hospital = {default = "[[File:Hospital sign.svg|20px|alt=|link=]]", | ||
| + | AUS = "[[File:Western Australia MR-SM-1.svg|20px|alt=|link=]]", | ||
| + | AUT = "[[File:Hinweiszeichen 2.svg|20px|alt=|link=]]", | ||
| + | CAN = {default = "[[File:Québec I-280-1.svg|20px|alt=|link=]]", | ||
| + | ON = "[[File:Ontario M401.svg|20px|alt=|link=]]"}, | ||
| + | CHE = "[[File:CH-Hinweissignal-Spital.svg|20px|alt=|link=]]", | ||
| + | CHL = "[[File:Chile IS-1b.svg|20px|alt=|link=]]", | ||
| + | CZE = "[[File:IJ02cr.jpg|20px|alt=|link=]]", | ||
| + | ESP = "[[File:Spain traffic signal s23.svg|20px|alt=|link=]]", | ||
| + | FRA = "[[File:France road sign ID3.svg|20px|alt=|link=]]", | ||
| + | GBR = "[[File:UK traffic sign 827.2.svg|20px|alt=|link=]]", | ||
| + | GRC = "[[File:Traffic Sign GR - KOK 2009 - P-22.svg|20px|alt=|link=]]", | ||
| + | HUN = "[[File:Hungary road sign E-045.svg|20px|alt=|link=]]", | ||
| + | IDN = "[[File:Indonesian Road Sign d9a.png|20px|alt=|link=]]", | ||
| + | ISL = "[[File:Iceland road sign E01.12.svg|20px|alt=|link=]]", | ||
| + | ITA = "[[File:Italian traffic signs - ospedale.svg|20px|alt=|link=]]", | ||
| + | MEX = "[[File:Mexico road sign medico.svg|20px|alt=|link=]]", | ||
| + | POL = "[[File:Znak D-21.svg|20px|alt=|link=]]", | ||
| + | RUS = "[[File:7.2 Russian road sign.svg|20px|alt=|link=]]", | ||
| + | SVK = "[[File:Dopravná značka II5.svg|20px|alt=|link=]]", | ||
| + | TUR = "[[File:Turkish road sign 84.jpg|20px|alt=|link=]]", | ||
| + | UKR = "[[File:Ukraine road sign 6.2.gif|20px|alt=|link=]]", | ||
| + | URY = "[[File:Uruguay Road Sign I16.svg|20px|alt=|link=]]"}, | ||
| + | airport = {default = "[[File:Airport Sign.svg|20px|alt=|link=]]", | ||
| + | AUS = "[[File:Western Australia MR-SM-11.svg|20px|alt=|link=]]", | ||
| + | CAN = {default = "[[File:Ontario M502.svg|20px|alt=|link=]]", | ||
| + | QC = "[[File:Québec I-300-1.svg |20px|alt=|link=]]"}, | ||
| + | CHL = "[[File:Chile IS-11b.svg|20px|alt=|link=]]", | ||
| + | GBR = "[[File:Aircraft Airport ecomo.svg|20px|alt=|link=]]", | ||
| + | HRV = "[[File:Croatia road sign C47.svg|20px|alt=|link=]]", | ||
| + | IDN = "[[File:Indonesia New Road Sign Info 5a4.png|20px|alt=|link=]]", | ||
| + | MEX = "[[File:Mexico road sign aeropuerto.svg|20px|alt=|link=]]", | ||
| + | NOR = "[[File:Norwegian-road-sign-771.0.svg|20px|alt=|link=]]", | ||
| + | TWN = "[[File:Legenda lotnisko.svg|20px|alt=|link=]]", | ||
| + | UKR = "[[File:Ukraine road sign 5.65.png|20px|alt=|link=]]", | ||
| + | URY = "[[File:Uruguay Road Sign I21.svg|20px|alt=|link=]]"}, | ||
| + | toll = {default = "", | ||
| + | ESP = "[[File:Spain traffic signal r200.svg|18px|alt=|link=]]"}} | ||
| + | |||
local extraIcon = extraTypes[string.lower(args.extra or '')] | local extraIcon = extraTypes[string.lower(args.extra or '')] | ||
| − | if not extraIcon then return '' | + | if not extraIcon then |
| − | local | + | return '' |
| − | + | elseif type(extraIcon) == 'table' then | |
| − | + | local extraIconT = extraIcon[args.country] or extraIcon.default | |
| + | if type(extraIconT) == 'table' then | ||
| + | return extraIconT[args.state] or extraIconT[args.province] or extraIconT.default | ||
| + | else | ||
| + | return extraIconT | ||
| + | end | ||
else | else | ||
| − | return | + | return extraIcon |
end | end | ||
end | end | ||
local function parseArgs(args) | local function parseArgs(args) | ||
| − | local state = args.state or args.province | + | local state = args.state or args.province |
| − | |||
local country | local country | ||
| − | if args.country | + | if args.country then |
country = string.upper(args.country) | country = string.upper(args.country) | ||
| + | args.country = country | ||
else | else | ||
local countryModule = mw.loadData("Module:Road data/countrymask") | local countryModule = mw.loadData("Module:Road data/countrymask") | ||
country = countryModule[state] or 'UNK' | country = countryModule[state] or 'UNK' | ||
| + | args.country = country | ||
end | end | ||
| − | |||
| − | |||
local params = {'denom', 'county', 'township', 'dab', 'nolink', 'noshield', 'to', 'dir', 'name'} | local params = {'denom', 'county', 'township', 'dab', 'nolink', 'noshield', 'to', 'dir', 'name'} | ||
| − | local | + | local routeArgs = {} |
local routeCount = 1 | local routeCount = 1 | ||
| − | |||
while true do | while true do | ||
local routeType = args[routeCount * 2 - 1] | local routeType = args[routeCount * 2 - 1] | ||
| Line 72: | Line 371: | ||
for _,v in pairs(params) do | for _,v in pairs(params) do | ||
route[v] = args[v .. routeCount] | route[v] = args[v .. routeCount] | ||
| + | end | ||
| + | if args.nolink then | ||
| + | route.nolink = args.nolink | ||
end | end | ||
route.country = country | route.country = country | ||
route.state = state | route.state = state | ||
| − | + | insert(routeArgs, route) | |
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | insert( | ||
routeCount = routeCount + 1 | routeCount = routeCount + 1 | ||
end | end | ||
| − | return | + | return routeArgs |
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
end | end | ||
function p._jct(args, frame) | function p._jct(args, frame) | ||
| + | rdt = args.rdt | ||
local routes = parseArgs(args) | local routes = parseArgs(args) | ||
| + | local extra = extra(args) | ||
local shields = {} | local shields = {} | ||
local links = {} | local links = {} | ||
| − | |||
| − | |||
| − | |||
frame = frame or mw.getCurrentFrame() | frame = frame or mw.getCurrentFrame() | ||
for num,route in ipairs(routes) do | for num,route in ipairs(routes) do | ||
| − | + | local routeShield = shield(route, frame) | |
| − | + | insert(shields, routeShield) | |
| − | + | route.shield = routeShield | |
| − | + | if args.jctname then | |
| − | + | insert(links, namedLink(route, num)) | |
| − | + | else | |
| + | insert(links, completeLink(route, num)) | ||
end | end | ||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
end | end | ||
| − | local | + | local bannerText = banners(routes) |
| + | local shieldText = concat(shields) | ||
local linkText = concat(links) | local linkText = concat(links) | ||
| − | local | + | local graphics = (not(args.noshield) and (bannerText .. shieldText) or '') .. extra .. ' ' |
| + | |||
local cities = '' | local cities = '' | ||
if args.city1 or args.location1 then | if args.city1 or args.location1 then | ||
| − | local | + | local cityModule = require("Module:Jct/city" .. SANDBOX_SUFFIX) |
| − | if args. | + | cities = cityModule.city(args) |
| − | + | end | |
| + | |||
| + | local roadStr = '' | ||
| + | local road = args.road | ||
| + | if road then | ||
| + | if args.toroad then | ||
| + | roadStr = ' to ' .. road | ||
else | else | ||
| − | + | roadStr = ' / ' .. road | |
end | end | ||
| − | |||
| − | |||
end | end | ||
| − | + | ||
| − | local | + | local output = graphics .. linkText .. roadStr .. cities |
| − | + | return mw.text.trim(output) | |
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
end | end | ||
function p.jct(frame) | function p.jct(frame) | ||
| − | + | local args = getArgs(frame) | |
| − | |||
| − | local args = getArgs(frame | ||
return p._jct(args, frame) | return p._jct(args, frame) | ||
end | end | ||
return p | return p | ||
Latest revision as of 05:48, 27 September 2020
This module is used to implement Template:Jct.
Usage
{{#invoke:Jct|jct}}
Tracking/maintenance category
local p = {}
local SANDBOX = false
local SANDBOX_SUFFIX = SANDBOX and '/sandbox' or ''
local concat = table.concat
local insert = table.insert
local getArgs = require('Module:Arguments').getArgs -- Import module function to work with passed arguments
local parserModule = require("Module:Road data/parser" .. SANDBOX_SUFFIX)
local parser = parserModule.parser
-- Shields
local rdt
local function size(args)
local country = args.country
local state = args.state or args.province or ''
local type = args.type
if rdt then
return 'x17'
elseif state == 'FL' then
if type == 'Toll' or type == 'FLTP' or type == 'HEFT' then
return '20'
elseif type == 'Both' then
return '20', 'x20'
end
elseif state == 'NY' then
if type == 'NY 1927' or type == 'NY 1948' or (type == 'Parkway' and args.route == "Robert Moses") or (type == 'CR' and args.county == 'Erie') then
return '20'
end
elseif state == 'AB' then
if type == 'AB' or type == 'Hwy' or type == '2ndHwy' or type == 'TCH' then
return '18'
end
elseif state == 'NS' and type == 'Hwy' or type == 'TCH' then
return '18'
elseif state == 'ON' then
if type == 'ON' or type == 'Hwy' or type == 'Highway' or type == 'QEW' then
return '24x22'
elseif type == 'KLR' then
return '21'
else
local countyTypes = {CH = true, RH = true, District = true, Regional = true, County = true, Municipal = true}
if countyTypes[type] then
return '19'
end
end
elseif state == 'QC' then
if type == 'QC' or type == 'Route' or type == 'A' or type == 'Autoroute' or type == 'TCH' or type == 'ON' then
return '18'
end
elseif state == 'SK' then
if type == 'Hwy' or type == 'SK' then
return 'x25'
end
elseif country == 'MEX' then
return 'x25'
elseif country == 'FRA' then
return 'x18'
elseif country == 'TUR' then
return 'x15'
end
return 'x20'
end
local function shield(args, frame)
if args.noshield then return '' end
local firstSize, secondSize = size(args)
local shield, second = parser(args, 'shield')
if not shield or shield == '' then
return ''
elseif type(shield) == 'table' then
shield, second = shield[1], shield[2]
end
local function render(shield, size)
if frame:callParserFunction('#ifexist', 'Media:' .. shield, '1') ~= '' then
return string.format("[[File:%s|%spx|link=|alt=]]", shield, size)
else
args.shielderr = true
local page = mw.title.getCurrentTitle().prefixedText -- Get transcluding page's title
return mw.ustring.format("[[Category:Jct template errors|1 %s]]", page)
end
end
local rendered = render(shield, firstSize)
if second and type(second) == 'string' then
local size = secondSize or firstSize
rendered = rendered .. render(second, size)
end
return rendered
end
-- Links/abbreviations
local function link(args)
local nolink = args.nolink
local abbr = parser(args, 'abbr')
if nolink then
return abbr
else
local link = parser(args, 'link')
if not link or link == '' then
return abbr
else
return mw.ustring.format("<span class=\"nowrap\">[[%s|%s]]</span>", link, abbr)
end
end
end
local function completeLink(args, num)
local actualLink = link(args)
if not actualLink then
local page = mw.title.getCurrentTitle().prefixedText -- Get transcluding page's title
actualLink = string.format("<span class=\"error\">Invalid type: %s</span>[[Category:Jct template errors|2 %s]]", args.type, page)
end
local isTo = args.to
local prefix
if num == 1 then
if isTo then
prefix = "To "
else
prefix = ''
end
else
if isTo then
prefix = " to "
else
prefix = " / "
end
end
local suffix = {}
local dir = args.dir
if dir then
insert(suffix, ' ' .. string.lower(dir))
end
local name = args.name
if name then
insert(suffix, mw.ustring.format(' (%s)', name))
end
return prefix .. actualLink .. concat(suffix)
end
local function namedLink(args, num)
local actualLink = link(args)
local name = args.name or ''
local isTo = args.to
local prefix
if num == 1 then
if isTo then
prefix = "To "
else
prefix = ''
end
else
if isTo then
prefix = " to "
else
prefix = " / "
end
end
local suffix = {}
local dir = args.dir
if name ~= '' then
if dir then
insert(suffix, mw.ustring.format(' (%s %s)', actualLink, dir))
else
insert(suffix, mw.ustring.format(' (%s)', actualLink))
end
else
insert(suffix, actualLink)
if dir then insert(suffix, ' ' .. string.lower(dir)) end
end
return prefix .. name .. concat(suffix)
end
local function banners(routes)
local format = string.format
local firstRun = {}
local hasBanner = false
for k,v in ipairs(routes) do
local banner
if v.shield == '' or v.shielderr then
banner = false
else
banner = parser(v, 'banner') or ''
if banner and banner ~= '' then
hasBanner = true
end
end
insert(firstRun, banner)
end
if not hasBanner then return '' end
local secondRun = {}
for k,v in ipairs(routes) do
local bannerFile = firstRun[k]
if not bannerFile then
elseif bannerFile == '' then
local widthCode = parser(v, 'width') or 'square'
if type(widthCode) == 'number' then
insert(secondRun, "[[File:No image wide.svg|" .. tostring(widthCode) .. "px|link=|alt=]]")
elseif widthCode == 'square' then
insert(secondRun, "[[File:No image wide.svg|20px|link=|alt=]]")
elseif widthCode == 'expand' then
local route = v.route
local width = (#route >= 3) and '25' or '20'
insert(secondRun, format("[[File:No image wide.svg|%spx|link=|alt=]]", width))
elseif widthCode == 'wide' then
insert(secondRun, "[[File:No image wide.svg|25px|link=|alt=]]")
elseif widthCode == 'US1926' then
insert(secondRun, "[[File:No image wide.svg|21px|link=|alt=]]")
elseif widthCode == 'SD' then
local route = v.route
local width = (#route >= 3) and '23' or '20'
insert(secondRun, format("[[File:No image wide.svg|%spx|link=|alt=]]", width))
elseif (v.state == 'CA') or (v.type == 'CA') then
local route = v.route
local widths = {default = {'20', '25'}, I = {'20', '24'}, US = {'20', '23'}, SR = {'19', '22'}}
local width = widths[widthCode] or widths.default
local pixels = (#route >= 3) and width[2] or width[1]
insert(secondRun, format("[[File:No image wide.svg|%spx|link=|alt=]]", pixels))
end
else
local widthCode = parser(v, 'width') or 'square'
if widthCode == 'square' then
insert(secondRun, format("[[File:%s|20px|link=|alt=]]", bannerFile))
elseif widthCode == 'expand' then
local route = v.route
if #route >= 3 then
insert(secondRun, format("[[File:No image.svg|2px|link=|alt=]][[File:%s|20px|link=|alt=]][[File:No image.svg|3px|link=|alt=]]", bannerFile))
else
insert(secondRun, format("[[File:%s|20px|link=|alt=]]", bannerFile))
end
elseif widthCode == 'wide' then
insert(secondRun, format("[[File:No image.svg|2px|link=|alt=]][[File:%s|20px|link=|alt=]][[File:No image.svg|3px|link=|alt=]]", bannerFile))
elseif widthCode == 'SD' then
local route = v.route
if #route >= 3 then
insert(secondRun, format("[[File:No image.svg|1px|link=|alt=]][[File:%s|20px|link=|alt=]][[File:No image.svg|2px|link=|alt=]]", bannerFile))
else
insert(secondRun, format("[[File:%s|20px|link=|alt=]]", bannerFile))
end
elseif widthCode == 'MOSupp' then
local route = v.route
if #route >= 2 then
insert(secondRun, format("[[File:No image.svg|2px|link=|alt=]][[File:%s|20px|link=|alt=]][[File:No image.svg|3px|link=|alt=]]", bannerFile))
else
insert(secondRun, format("[[File:%s|20px|link=|alt=]]", bannerFile))
end
elseif widthCode == 'US1926' then
insert(secondRun, format("[[File:%s|20px|link=|alt=]][[File:No image.svg|1px|link=|alt=]]", bannerFile))
elseif v.state == 'CA' then
local route = v.route
local type = v.type
if type == 'US-Bus' then
if #route >= 3 then
insert(secondRun, format("[[File:No image.svg|1px|link=|alt=]][[File:%s|20px|link=|alt=]][[File:No image.svg|2px|link=|alt=]]", bannerFile))
else
insert(secondRun, format("[[File:%s|20px|link=|alt=]]", bannerFile))
end
elseif type == 'CA-Bus' or type == 'SR-Bus' then
if #route >= 3 then
insert(secondRun, format("[[File:No image.svg|1px|link=|alt=]][[File:%s|19px|link=|alt=]][[File:No image.svg|2px|link=|alt=]]", bannerFile))
else
insert(secondRun, format("[[File:%s|19px|link=|alt=]]", bannerFile))
end
end
end
end
end
return concat(secondRun) .. '<br>'
end
local function extra(args)
local extraTypes = {rail = {default = "[[File:Rail Sign.svg|20px|alt=|link=]]",
CAN = {default = "[[File:Ontario M509.svg|20px|alt=|link=]]",
QC = "[[File:Québec I-310.svg|20px|alt=|link=]]"},
CHL = "[[File:Chile IS-13b.svg|20px|alt=|link=]]",
IDN = "[[File:Indonesia New Road Sign Info 5A2.png|20px|alt=|link=]]",
JPN = "[[File:Japanese Road sign 125-C.svg|20px|alt=|link=]]",
MEX = "[[File:Mexico road sign estacion de ferrocarril.svg|20px|alt=|link=]]"},
["light-rail"] = "[[File:Light Rail Sign.svg|20px|alt=|link=]]",
bus = {default = "[[File:Bus Sign.svg|20px|alt=|link=]]",
CAN = {default = "[[File:Ontario M506.svg|20px|alt=|link=]]",
QC = "[[File:Québec I-315.svg|20px|alt=|link=]]"},
FRA = "[[File:France road sign C6.svg|20px|alt=|link=]]",
HRV = "[[File:Croatia road sign C44.svg|20px|alt=|link=]]",
HUN = "[[File:Hungary road sign E-039.svg|20px|alt=|link=]]",
ITA = "[[File:Italian traffic sign - fermata autobus.svg|20px|alt=|link=]]",
JPN = "[[File:Japanese Road sign 124-C.svg|20px|alt=|link=]]",
MEX = "[[File:Mexico road sign parada de autobus.svg|20px|alt=|link=]]",
NOR = "[[File:Norwegian-road-sign-508.1.svg|20px|alt=|link=]]",
URY = "[[File:Uruguay Road Sign I24.svg|20px|alt=|link=]]"},
ferry = {default = "[[File:Ferry Sign.svg|20px|alt=|link=]]",
CAN = "[[File:Ontario M508.svg|20px|alt=|link=]]",
CHL = "[[File:Chile IS-14b.svg|20px|alt=|link=]]",
FRA = "[[File:France road sign CE10.svg|20px|alt=|link=]]",
HRV = "[[File:Croatia road sign C49.svg|20px|alt=|link=]]",
ITA = "[[File:Italian traffic signs - auto su nave.svg|20px|alt=|link=]]"},
hospital = {default = "[[File:Hospital sign.svg|20px|alt=|link=]]",
AUS = "[[File:Western Australia MR-SM-1.svg|20px|alt=|link=]]",
AUT = "[[File:Hinweiszeichen 2.svg|20px|alt=|link=]]",
CAN = {default = "[[File:Québec I-280-1.svg|20px|alt=|link=]]",
ON = "[[File:Ontario M401.svg|20px|alt=|link=]]"},
CHE = "[[File:CH-Hinweissignal-Spital.svg|20px|alt=|link=]]",
CHL = "[[File:Chile IS-1b.svg|20px|alt=|link=]]",
CZE = "[[File:IJ02cr.jpg|20px|alt=|link=]]",
ESP = "[[File:Spain traffic signal s23.svg|20px|alt=|link=]]",
FRA = "[[File:France road sign ID3.svg|20px|alt=|link=]]",
GBR = "[[File:UK traffic sign 827.2.svg|20px|alt=|link=]]",
GRC = "[[File:Traffic Sign GR - KOK 2009 - P-22.svg|20px|alt=|link=]]",
HUN = "[[File:Hungary road sign E-045.svg|20px|alt=|link=]]",
IDN = "[[File:Indonesian Road Sign d9a.png|20px|alt=|link=]]",
ISL = "[[File:Iceland road sign E01.12.svg|20px|alt=|link=]]",
ITA = "[[File:Italian traffic signs - ospedale.svg|20px|alt=|link=]]",
MEX = "[[File:Mexico road sign medico.svg|20px|alt=|link=]]",
POL = "[[File:Znak D-21.svg|20px|alt=|link=]]",
RUS = "[[File:7.2 Russian road sign.svg|20px|alt=|link=]]",
SVK = "[[File:Dopravná značka II5.svg|20px|alt=|link=]]",
TUR = "[[File:Turkish road sign 84.jpg|20px|alt=|link=]]",
UKR = "[[File:Ukraine road sign 6.2.gif|20px|alt=|link=]]",
URY = "[[File:Uruguay Road Sign I16.svg|20px|alt=|link=]]"},
airport = {default = "[[File:Airport Sign.svg|20px|alt=|link=]]",
AUS = "[[File:Western Australia MR-SM-11.svg|20px|alt=|link=]]",
CAN = {default = "[[File:Ontario M502.svg|20px|alt=|link=]]",
QC = "[[File:Québec I-300-1.svg |20px|alt=|link=]]"},
CHL = "[[File:Chile IS-11b.svg|20px|alt=|link=]]",
GBR = "[[File:Aircraft Airport ecomo.svg|20px|alt=|link=]]",
HRV = "[[File:Croatia road sign C47.svg|20px|alt=|link=]]",
IDN = "[[File:Indonesia New Road Sign Info 5a4.png|20px|alt=|link=]]",
MEX = "[[File:Mexico road sign aeropuerto.svg|20px|alt=|link=]]",
NOR = "[[File:Norwegian-road-sign-771.0.svg|20px|alt=|link=]]",
TWN = "[[File:Legenda lotnisko.svg|20px|alt=|link=]]",
UKR = "[[File:Ukraine road sign 5.65.png|20px|alt=|link=]]",
URY = "[[File:Uruguay Road Sign I21.svg|20px|alt=|link=]]"},
toll = {default = "",
ESP = "[[File:Spain traffic signal r200.svg|18px|alt=|link=]]"}}
local extraIcon = extraTypes[string.lower(args.extra or '')]
if not extraIcon then
return ''
elseif type(extraIcon) == 'table' then
local extraIconT = extraIcon[args.country] or extraIcon.default
if type(extraIconT) == 'table' then
return extraIconT[args.state] or extraIconT[args.province] or extraIconT.default
else
return extraIconT
end
else
return extraIcon
end
end
local function parseArgs(args)
local state = args.state or args.province
local country
if args.country then
country = string.upper(args.country)
args.country = country
else
local countryModule = mw.loadData("Module:Road data/countrymask")
country = countryModule[state] or 'UNK'
args.country = country
end
local params = {'denom', 'county', 'township', 'dab', 'nolink', 'noshield', 'to', 'dir', 'name'}
local routeArgs = {}
local routeCount = 1
while true do
local routeType = args[routeCount * 2 - 1]
if not routeType then break end
local route = {type = routeType, route = args[routeCount * 2]}
for _,v in pairs(params) do
route[v] = args[v .. routeCount]
end
if args.nolink then
route.nolink = args.nolink
end
route.country = country
route.state = state
insert(routeArgs, route)
routeCount = routeCount + 1
end
return routeArgs
end
function p._jct(args, frame)
rdt = args.rdt
local routes = parseArgs(args)
local extra = extra(args)
local shields = {}
local links = {}
frame = frame or mw.getCurrentFrame()
for num,route in ipairs(routes) do
local routeShield = shield(route, frame)
insert(shields, routeShield)
route.shield = routeShield
if args.jctname then
insert(links, namedLink(route, num))
else
insert(links, completeLink(route, num))
end
end
local bannerText = banners(routes)
local shieldText = concat(shields)
local linkText = concat(links)
local graphics = (not(args.noshield) and (bannerText .. shieldText) or '') .. extra .. ' '
local cities = ''
if args.city1 or args.location1 then
local cityModule = require("Module:Jct/city" .. SANDBOX_SUFFIX)
cities = cityModule.city(args)
end
local roadStr = ''
local road = args.road
if road then
if args.toroad then
roadStr = ' to ' .. road
else
roadStr = ' / ' .. road
end
end
local output = graphics .. linkText .. roadStr .. cities
return mw.text.trim(output)
end
function p.jct(frame)
local args = getArgs(frame)
return p._jct(args, frame)
end
return p