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 Template:Tlx.

Output examples

Description	Output	Description	Output
Florida Both (current output)		Florida Both (intended output)	70px x70px State Road 869
No parameters		Only Template:Para	x70px
Florida Template:Para	State Road A1A	Only Template:Para	Autoroute 10
Australia	National Highway 31 70px	New Zealand
Interstate Template:Para		Interstate (Infobox road small)
France		UK
Brazil		Chile
BC		Saskatchewan	70px 70px Highway 600
Quebec	70px Autoroute 35	Ontario
ON Secondary		ON Tertiary	70px Highway 800
NWT	70px Inuvik–Tuktoyaktuk Highway	Manitoba	Provincial Trunk Highway 3
Tennessee Dual		DE/MD Dual
Puerto Rico type=PR		Puerto Rico type=Urban
Wisconsin		North Carolina
Nevada BLSR		Utah BLSR
Texas Both		Texas tollway	70px Pres. George Bush Turnpike
1926 USH		1948 USH
Special route		Special route
Alaska Template:Para	x70px Alaska Route 2	DC
Mexico		Sonora
GRR		Tour
Turnpike		County road
Parish road		CSAH
Secondary		Supplemental
Oregon		Oregon Highway	John Day Highway No. 5
Belgium		Belgium

---

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, bannerSize)
	if args.marker_image then return nil end
	
	if args.shielderr then return nil end
		
	local shield = parser(args, 'banner')
	if not shield or shield == '' then return nil end
	
	local alt = parser(args, 'banner')
	
	return string.format('[[File:%s|%s|alt=%s]]', shield, bannerSize, alt)
end



local function shield(args, shieldSize)
	if args.marker_image then return args.marker_image end

	local shield = parser(args, 'shieldmain') or parser(args, 'shield')
	
	if not shield or shield == '' then return nil end
	
	local label = parser(args, 'name') or parser(args, 'abbr') or ''
	local alt = label .. ' marker'
	local orientation = parser(args, 'orientation')
	
	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 shieldSize
		else
			return 'x' .. shieldSize
		end
	end
	
	if 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, shield_size(shield, orientation), 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, require('Module:Road data/size').size({style = style}))
	local shield = shield(args, require('Module:Road data/size').size({style = 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;')
			container:tag('p'):wikitext('')
		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