Difference between revisions of "Module:File link"

From BESA® Wiki
Jump to: navigation, search
(enable call-chaining and tweak the error messages to use "image:method" rather than just "method")
m (20 revisions)
 
(17 intermediate revisions by 2 users not shown)
Line 1: Line 1:
-- This module provides a library for formatting image wikilinks.
+
-- This module provides a library for formatting file wikilinks.
  
local libraryUtil = require('libraryUtil')
+
local yesno = require('Module:Yesno')
local checkType = libraryUtil.checkType
+
local checkType = require('libraryUtil').checkType
  
local image = {}
+
local p = {}
  
function image.new(filename)
+
function p._main(args)
checkType('image.new', 1, filename, 'string', true)
+
checkType('_main', 1, args, 'table')
local obj, data = {}, {}
+
 
+
-- This is basically libraryUtil.checkTypeForNamedArg, but we are rolling our
local checkSelf = libraryUtil.makeCheckSelfFunction(
+
-- own function to get the right error level.
'image',
+
local function checkArg(key, val, level)
'image',
+
if type(val) ~= 'string' then
obj,
+
'image object'
+
)
+
+
-- Set the filename if we were passed it as an input to image.new.
+
if filename then
+
data.theName = filename
+
end
+
+
function data:name(s)
+
checkSelf(self, 'image:name')
+
checkType('image:name', 1, s, 'string')
+
data.theName = s
+
return self
+
end
+
+
function data:format(s, filename)
+
checkSelf(self, 'image:format')
+
checkType('image:format', 1, s, 'string')
+
checkType('image:format', 2, format, 'string', true)
+
local validFormats = {
+
thumb = true,
+
thumbnail = true,
+
frame = true,
+
framed = true,
+
frameless = true
+
}
+
if validFormats[s] then
+
data.theFormat = s
+
data.theFormatFilename = filename
+
else
+
 
error(string.format(
 
error(string.format(
"bad argument #1 to 'image:format' ('%s' is not a valid format)",
+
"type error in '%s' parameter of '_main' (expected string, got %s)",
s
+
key, type(val)
), 2)
+
), level)
 
end
 
end
return self
 
 
end
 
end
  
local function sizeError(methodName)
+
local ret = {}
-- Used for formatting duplication errors in size-related methods.
+
 
error(string.format(
+
-- Adds a positional parameter to the buffer.
"duplicate size argument detected in '%s'"
+
local function addPositional(key)
.. " ('upright' cannot be used in conjunction with height or width)",
+
local val = args[key]
methodName
+
if not val then
), 3)
+
return nil
end
+
+
function data:width(px)
+
checkSelf(self, 'image:width')
+
checkType('image:width', 1, px, 'number')
+
if data.isUpright then
+
sizeError('image:width')
+
 
end
 
end
data.theWidth = px
+
checkArg(key, val, 4)
return self
+
ret[#ret + 1] = val
 
end
 
end
+
 
function data:height(px)
+
-- Adds a named parameter to the buffer. We assume that the parameter name
checkSelf(self, 'image:height')
+
-- is the same as the argument key.
checkType('image:height', 1, px, 'number')
+
local function addNamed(key)
if data.isUpright then
+
local val = args[key]
sizeError('image:height')
+
if not val then
 +
return nil
 
end
 
end
data.theHeight = px
+
checkArg(key, val, 4)
return self
+
ret[#ret + 1] = key .. '=' .. val
 
end
 
end
+
 
function data:upright(factor)
+
-- Filename
checkSelf(self, 'image:upright')
+
checkArg('file', args.file, 3)
checkType('image:upright', 1, factor, 'number', true)
+
ret[#ret + 1] = 'File:' .. args.file
if data.theWidth or data.theHeight then
+
 
sizeError('image:upright')
+
-- Format
end
+
if args.format then
data.isUpright = true
+
checkArg('format', args.format)
data.uprightFactor = factor
+
if args.formatfile then
return self
+
checkArg('formatfile', args.formatfile)
end
+
ret[#ret + 1] = args.format .. '=' .. args.formatfile
+
function data:resetSize()
+
checkSelf(self, 'image:resetSize')
+
for i, field in ipairs{'theWidth', 'theHeight', 'isUpright', 'uprightFactor'} do
+
data[field] = nil
+
end
+
return self
+
end
+
+
function data:location(s)
+
checkSelf(self, 'image:location')
+
checkType('image:location', 1, s, 'string')
+
local validLocations = {
+
right = true,
+
left = true,
+
center = true,
+
none = true
+
}
+
if validLocations[s] then
+
data.theLocation = s
+
 
else
 
else
error(string.format(
+
ret[#ret + 1] = args.format
"bad argument #1 to 'image:location' ('%s' is not a valid location)",
+
s
+
), 2)
+
 
end
 
end
return self
 
 
end
 
end
+
 
function data:alignment(s)
+
-- Border
checkSelf(self, 'image:alignment')
+
if yesno(args.border) then
checkType('image:alignment', 1, s, 'string')
+
ret[#ret + 1] = 'border'
local validAlignments = {
+
baseline = true,
+
middle = true,
+
sub = true,
+
super = true,
+
['text-top'] = true,
+
['text-bottom'] = true,
+
top = true,
+
bottom = true
+
}
+
if validAlignments[s] then
+
data.theAlignment = s
+
else
+
error(string.format(
+
"bad argument #1 to 'image:alignment' ('%s' is not a valid alignment)",
+
s
+
), 2)
+
end
+
return self
+
 
end
 
end
+
 
function data:border()
+
addPositional('location')
checkSelf(self, 'image:border')
+
addPositional('alignment')
data.hasBorder = true
+
addPositional('size')
return self
+
addNamed('upright')
 +
addNamed('link')
 +
addNamed('alt')
 +
addNamed('page')
 +
addNamed('class')
 +
addNamed('lang')
 +
addNamed('start')
 +
addNamed('end')
 +
addNamed('thumbtime')
 +
addPositional('caption')
 +
 
 +
return string.format('[[%s]]', table.concat(ret, '|'))
 +
end
 +
 
 +
function p.main(frame)
 +
local origArgs = require('Module:Arguments').getArgs(frame, {
 +
wrappers = 'Template:File link'
 +
})
 +
if not origArgs.file then
 +
error("'file' parameter missing from [[Template:File link]]", 0)
 
end
 
end
 
function data:link(s)
 
checkSelf(self, 'image:link')
 
checkType('image:link', 1, s, 'string')
 
data.theLink = s
 
return self
 
end
 
 
function data:alt(s)
 
checkSelf(self, 'image:alt')
 
checkType('image:alt', 1, s, 'string')
 
data.theAlt = s
 
return self
 
end
 
 
function data:caption(s)
 
checkSelf(self, 'image:caption')
 
checkType('image:caption', 1, s, 'string')
 
data.theCaption = s
 
return self
 
end
 
 
function data:render()
 
checkSelf(self, 'image:render')
 
local ret = {}
 
 
-- Image name.
 
if not data.theName then
 
error('image:render: no image name was found')
 
end
 
ret[#ret + 1] = 'File:' .. data.theName
 
 
-- Image format
 
if data.theFormat and data.theFormatFilename then
 
ret[#ret + 1] = data.theFormat .. '=' .. data.theFormatFilename
 
elseif data.theFormat then
 
ret[#ret + 1] = data.theFormat
 
end
 
 
-- Border
 
if data.hasBorder then
 
ret[#ret + 1] = 'border'
 
end
 
 
-- Location
 
ret[#ret + 1] = data.theLocation
 
  
-- Alignment
+
-- Copy the arguments that were passed to a new table to avoid looking up
ret[#ret + 1] = data.theAlignment
+
-- every possible parameter in the frame object.
+
local args = {}
-- Size
+
for k, v in pairs(origArgs) do
if data.isUpright and data.uprightFactor then
+
-- Make _BLANK a special argument to add a blank parameter. For use in
ret[#ret + 1] = 'upright=' .. tostring(data.uprightFactor)
+
-- conditional templates etc. it is useful for blank arguments to be
elseif data.isUpright then
+
-- ignored, but we still need a way to specify them so that we can do
ret[#ret + 1] = 'upright'
+
-- things like [[File:Example.png|link=]].
elseif data.theWidth and data.theHeight then
+
if v == '_BLANK' then
ret[#ret + 1] = string.format('%dx%dpx', data.theWidth, data.theHeight)
+
v = ''
elseif data.theWidth then
+
ret[#ret + 1] = tostring(data.theWidth) .. 'px'
+
elseif data.theHeight then
+
ret[#ret + 1] = string.format('x%dpx', data.theHeight)
+
 
end
 
end
+
args[k] = v
-- Link
+
if data.theLink then
+
ret[#ret + 1] = 'link=' .. data.theLink
+
end
+
+
-- Alt
+
if data.theAlt then
+
ret[#ret + 1] = 'alt=' .. data.theAlt
+
end
+
+
-- Caption
+
ret[#ret + 1] = data.theCaption
+
+
return string.format('[[%s]]', table.concat(ret, '|'))
+
 
end
 
end
+
return p._main(args)
local readOnlyFields = {
+
theName = true,
+
theFormat = true,
+
theFormatFilename = true,
+
theWidth = true,
+
theHeight = true,
+
isUpright = true,
+
uprightFactor = true,
+
theLocation = true,
+
theAlignment = true,
+
hasBorder = true,
+
theLink = true,
+
theAlt = true,
+
theCaption = true
+
}
+
for field in pairs(data) do
+
readOnlyFields[field] = true
+
end
+
+
setmetatable(obj, {
+
__index = data,
+
__newindex = function (t, key, value)
+
if readOnlyFields[key] then
+
error(string.format(
+
"field '%s' is read-only",
+
tostring(key)
+
), 2)
+
else
+
data[key] = value
+
end
+
end,
+
__tostring = function (t)
+
return t:render()
+
end
+
})
+
+
return obj
+
 
end
 
end
  
return image
+
return p

Latest revision as of 13:23, 8 April 2016

Documentation for this module may be created at Module:File link/doc

Script error: Lua error: Internal error: Error reading from pipe.

-- This module provides a library for formatting file wikilinks.

local yesno = require('Module:Yesno')
local checkType = require('libraryUtil').checkType

local p = {}

function p._main(args)
	checkType('_main', 1, args, 'table')

	-- This is basically libraryUtil.checkTypeForNamedArg, but we are rolling our
	-- own function to get the right error level.
	local function checkArg(key, val, level)
		if type(val) ~= 'string' then
			error(string.format(
				"type error in '%s' parameter of '_main' (expected string, got %s)",
				key, type(val)
			), level)
		end
	end

	local ret = {}

	-- Adds a positional parameter to the buffer.
	local function addPositional(key)
		local val = args[key]
		if not val then
			return nil
		end
		checkArg(key, val, 4)
		ret[#ret + 1] = val
	end

	-- Adds a named parameter to the buffer. We assume that the parameter name
	-- is the same as the argument key.
	local function addNamed(key)
		local val = args[key]
		if not val then
			return nil
		end
		checkArg(key, val, 4)
		ret[#ret + 1] = key .. '=' .. val
	end

	-- Filename
	checkArg('file', args.file, 3)
	ret[#ret + 1] = 'File:' .. args.file

	-- Format
	if args.format then
		checkArg('format', args.format)
		if args.formatfile then
			checkArg('formatfile', args.formatfile)
			ret[#ret + 1] = args.format .. '=' .. args.formatfile
		else
			ret[#ret + 1] = args.format
		end
	end

	-- Border
	if yesno(args.border) then
		ret[#ret + 1] = 'border'
	end

	addPositional('location')
	addPositional('alignment')
	addPositional('size')
	addNamed('upright')
	addNamed('link')
	addNamed('alt')
	addNamed('page')
	addNamed('class')
	addNamed('lang')
	addNamed('start')
	addNamed('end')
	addNamed('thumbtime')
	addPositional('caption')

	return string.format('[[%s]]', table.concat(ret, '|'))
end

function p.main(frame)
	local origArgs = require('Module:Arguments').getArgs(frame, {
		wrappers = 'Template:File link'
	})
	if not origArgs.file then
		error("'file' parameter missing from [[Template:File link]]", 0)
	end

	-- Copy the arguments that were passed to a new table to avoid looking up
	-- every possible parameter in the frame object.
	local args = {}
	for k, v in pairs(origArgs) do
		-- Make _BLANK a special argument to add a blank parameter. For use in
		-- conditional templates etc. it is useful for blank arguments to be
		-- ignored, but we still need a way to specify them so that we can do
		-- things like [[File:Example.png|link=]].
		if v == '_BLANK' then
			v = ''
		end
		args[k] = v
	end
	return p._main(args)
end

return p