Module:Infobox road/route

This module pulls data from road data strings, such as Module:Road data/strings/USA, and passes it through three functions that draw the necessary route marker images and displays the route name in {{Infobox road}}.

Output examples

Description Output Output (sandbox) Florida Both No parameters Only |marker_image= File:US 66 (1961 cutout).svg Florida |marker_image=none State Road A1A Only |name= Autoroute 10 Australia National Highway 31 File:Australian national highway 31.svg New Zealand File:State Highway 2 NZ.svg State Highway 2 Interstate |name= File:I-10 (TX).svg Motorway 10 Interstate (Infobox road small) France File:Autoroute française 1.svg Autorute A1 UK File:UK road A303.svg A303 Brazil File:SP-052.svg SP-052 Chile BC Saskatchewan File:Saskatchewan Rural Municipal Route.svg File:Saskatchewan Route 600.svg Highway 600 Quebec File:Quebec Autoroute 35.svg Autoroute 35 Ontario File:Ontario 407 Toll.svg Highway 407 ON Secondary File:Ontario Highway 522.svg Highway 522 ON Tertiary File:Ontario Highway 800.svg Highway 800 NWT File:NWT-10.svg Inuvik–Tuktoyaktuk Highway Manitoba Provincial Trunk Highway 3 Tennessee Dual DE/MD Dual Puerto Rico type=PR Puerto Rico type=Urban File:PR urban primary 1.svg Highway 1 Wisconsin North Carolina Nevada BLSR Utah BLSR Texas Both Texas tollway File:Toll Texas President George Bush Turnpike.svg Pres. George Bush Turnpike 1926 USH File:US 6 Connecticut 1926.svg U.S. Route 6 1948 USH File:US 40 California 1948.svg U.S. Route 40 Special route File:Business plate.svg File:US 78.svg U.S. Route 78 Business Special route (style=small) File:Business plate.svg File:US 131.svg Business US Highway 131 Alaska |marker_image= File:Circle sign 2.svg Alaska Route 2 DC File:DC-295.svg District of Columbia Route 295 Mexico File:Carretera federal 40D.svg Federal Highway 40D Sonora File:Carretera estatal 149 (Sonora).svg State Highway 149 GRR File:GreatRiverRoad.svg Great River Road Tour File:Lake Michigan Circle Tour.svg Lake Michigan Circle Tour Turnpike File:Kansas Turnpike.svg Kansas Turnpike County road File:Clinton County Z36.svg County Road Z36 Parish road File:Caddo Parish 16.svg Parish Road 16 CSAH File:Hennepin County 81.svg County State-Aid Highway 81 Secondary File:MT-sec-206.svg Secondary Highway 206 Supplemental File:MO-supp-BB.svg Route BB Oregon File:OR 35.svg Oregon Route 35 Oregon Highway John Day Highway No. 5 Belgium File:BE-N1.svg National Route 1 Belgium File:BE-E19.svg E19

---

local p = {} 

local format = mw.ustring.format
require('Module:No globals')
local getArgs = require('Module:Arguments').getArgs	
local parserModule = require 'Module:Road data/parser'
local parser = parserModule.parser

local function banner(args, style)
	if args.marker_image then return nil end
	
	local bannerSize
		if style == 'small' then
			bannerSize = "40px"
		else
			bannerSize = "70px"
		end
	
	local shield = parser(args, 'banner')
	local alt = parser(args, 'banner')

	if not shield or shield == '' then
		return nil
	else
		return string.format('[[File:%s|%s|alt=%s]]', shield, bannerSize, alt)
	end
end



local function shield(args, style)

	if args.marker_image then return args.marker_image end
	
	local horizontalSize
	local verticalSize
		if style == 'small' then
			horizontalSize = "90x40px"
			verticalSize = "40x90px"
		else
			horizontalSize = "150x70px"
			verticalSize = "70x150px"
		end

	local shield = parser(args, 'shieldmain') or parser(args, 'shield') or ''
	
	local label = parser(args, 'name') or parser(args, 'abbr') or ''
	local alt = label .. ' marker'
	local orientation = parser(args, 'orientation')
	
	local function simpleSize(args)
		if orientation and orientation == 'upright' then
			return verticalSize
		else
			return horizontalSize
		end
	end
	
	local function shield_size(image_name, orientation)
		local image = 'File:' .. image_name
		local title = mw.title.new(image)

		local width = title.file.width
		local height = title.file.height
		
		if (orientation and orientation == 'upright') or height > width then
			return verticalSize
		else
			return horizontalSize
		end
	end
	
	
	
	if not shield or shield == '' then
		return nil
	elseif type(shield) == 'table' then
		local res = {}
		local sizes = {}
		for i,v in ipairs(shield) do
			sizes[i] = v
			res[i] = string.format('[[File:%s|%s|alt=%s]]', v, shield_size(v), alt)
		end
    	return table.concat(res, ' ')
	else
		return string.format('[[File:%s|%s|alt=%s]]', shield, simpleSize(args), alt)
	end
end

-- Links/abbreviations
local function name(args)
	local name = args.name or parser(args, 'name') or parser(args, 'abbr')
	return name
end

function p._routeInfo(args)
	
	local style = args.style
	local banner = banner(args, style)
	local shield = shield(args, style)
	local name = name(args)

	if not args.type and not args.route and not args.name and not args.marker_image then
		local container = nil
	else local container = mw.html.create('div'):cssText('text-align:center;')
		if shield == nil or args.marker_image == 'none' or args.name and not args.marker_image and not args.type and not args.route then 
			container:tag('p'):cssText('margin:0.1em;'):wikitext(name)
		elseif args.marker_image ~= '' and args.name == '' or args.name == nil and not args.type and not args.route then
			container:tag('p'):cssText('margin:0.1em;'):wikitext(shield)
		elseif args.country == 'AUS' then
			container:tag('p'):cssText('margin:0.1em;'):wikitext(name)
			container:tag('p'):cssText('margin:0.1em 0 0 0;'):wikitext(shield)
		else
			container:tag('p'):cssText('margin:0.1em 0 0 0;'):wikitext(banner)
			container:tag('p'):cssText('margin:0 0 0.1em;'):wikitext(shield)
			container:tag('p'):cssText('margin:0.1em;'):wikitext(name)
		end
		return tostring(container)
	end
end

function p.routeInfo(frame)
	local args = getArgs(frame)
	return p._routeInfo(args);
end

return p