Module:Multiple image: Difference between revisions
Appearance
Content deleted Content added
Add support for thumbtimeN per edit request at Template talk:Multiple image |
Per edit request |
||
(28 intermediate revisions by 9 users not shown) | |||
Line 1: | Line 1: | ||
-- implements [[template:multiple image]] |
-- implements [[template:multiple image]] |
||
local p = {} |
local p = {} |
||
local autoscaledimages |
|||
local nonautoscaledimages |
|||
local function isnotempty(s) |
local function isnotempty(s) |
||
Line 6: | Line 9: | ||
end |
end |
||
local function removepx(s) |
|||
local function renderImageCell(image, width, height, link, alt, thumbtime, caption, textalign, istyle) |
|||
return tostring(s or ''):match('^(.*)[Pp][Xx]%s*$') or s |
|||
end |
|||
local function getdimensions(s, w, h) |
|||
if tonumber(w) and tonumber(h) then |
|||
nonautoscaledimages = true |
|||
return tonumber(w), tonumber(h) |
|||
end |
|||
local file = s and mw.title.new('File:' .. mw.uri.decode(mw.ustring.gsub(s,'%|.*$',''), 'WIKI')) |
|||
file = file and file.file or {width = 0, height = 0} |
|||
w = tonumber(file.width) or 0 |
|||
h = tonumber(file.height) or 0 |
|||
autoscaledimages = true |
|||
return w, h |
|||
end |
|||
local function renderImageCell(image, width, height, link, alt, thumbtime, caption, textalign, istyle, border) |
|||
local root = mw.html.create('') |
local root = mw.html.create('') |
||
local altstr = '|alt=' .. (alt or '') |
local altstr = '|alt=' .. (alt or '') |
||
local linkstr = link and ('|link=' .. link) or '' |
local linkstr = link and ('|link=' .. link) or '' |
||
Line 14: | Line 34: | ||
local thumbtimestr = '' |
local thumbtimestr = '' |
||
if widthstr == '|-nanpx' then |
|||
widthstr = '' |
|||
end |
|||
if isnotempty( thumbtime ) then |
if isnotempty( thumbtime ) then |
||
thumbtimestr = '|thumbtime=' .. thumbtime |
thumbtimestr = '|thumbtime=' .. thumbtime |
||
end |
end |
||
local imagediv = root:tag('div') |
local imagediv = root:tag('div') |
||
imagediv:addClass('thumbimage') |
imagediv:addClass((border ~= 'infobox') and 'thumbimage' or nil) |
||
imagediv:cssText(istyle) |
imagediv:cssText(istyle) |
||
if( height ) then |
if( height ) then |
||
Line 28: | Line 51: | ||
if isnotempty(caption) then |
if isnotempty(caption) then |
||
local captiondiv = root:tag('div') |
local captiondiv = root:tag('div') |
||
captiondiv:addClass('thumbcaption') |
captiondiv:addClass((border ~= 'infobox') and 'thumbcaption' or nil) |
||
captiondiv:css('clear', 'left') |
|||
if isnotempty(textalign) then |
if isnotempty(textalign) then |
||
captiondiv: |
captiondiv:addClass('text-align-' .. textalign) |
||
end |
end |
||
captiondiv:wikitext(caption) |
captiondiv:wikitext(caption) |
||
Line 64: | Line 86: | ||
ic = ic - thisrow |
ic = ic - thisrow |
||
r = r + 1 |
r = r + 1 |
||
-- use the previous if the next is missing and |
-- use the previous if the next is missing and |
||
-- make sure we don't overstep the number of images |
-- make sure we don't overstep the number of images |
||
thisrow = math.min(tonumber(pr[r] or thisrow) or ic, ic) |
thisrow = math.min(tonumber(pr[r] or thisrow) or ic, ic) |
||
Line 74: | Line 96: | ||
local pargs = frame:getParent().args |
local pargs = frame:getParent().args |
||
local args = frame.args |
local args = frame.args |
||
local width = pargs['width'] or '' |
local width = removepx(pargs['width'] or '') |
||
local dir = pargs['direction'] or '' |
local dir = pargs['direction'] or '' |
||
local |
local border = pargs['border'] or args['border'] or '' |
||
local align = pargs['align'] or args['align'] or (border == 'infobox' and 'center' or '') |
|||
local capalign = pargs['caption_align'] or args['caption_align'] or '' |
local capalign = pargs['caption_align'] or args['caption_align'] or '' |
||
local totalwidth = pargs['total_width'] or args['total_width'] or '' |
local totalwidth = removepx(pargs['total_width'] or args['total_width'] or '') |
||
local imgstyle = pargs['image_style'] or args['image_style'] |
local imgstyle = pargs['image_style'] or args['image_style'] |
||
local header = pargs['header'] or pargs['title'] or '' |
local header = pargs['header'] or pargs['title'] or '' |
||
local footer = pargs['footer'] or '' |
local footer = pargs['footer'] or '' |
||
local imagegap = tonumber(pargs['image_gap'] or '1') or 1 |
|||
local perrow = nil |
local perrow = nil |
||
local thumbclass = { |
local thumbclass = { |
||
Line 104: | Line 128: | ||
-- sort the imagenumbers |
-- sort the imagenumbers |
||
table.sort(imagenumbers) |
table.sort(imagenumbers) |
||
-- create an array with the number of images per row |
-- create an array with the number of images per row |
||
perrow = getPerRow(dir == 'vertical' and '1' or pargs['perrow'], imagecount) |
perrow = getPerRow(dir == 'vertical' and '1' or pargs['perrow'], imagecount) |
||
-- compute the number of rows |
-- compute the number of rows |
||
local rowcount = #perrow |
local rowcount = #perrow |
||
-- store the image widths and compute row widths and maximum row width |
-- store the image widths and compute row widths and maximum row width |
||
local heights = {} |
|||
local widths = {} |
local widths = {} |
||
local widthmax = 0 |
local widthmax = 0 |
||
Line 122: | Line 147: | ||
if( k <= imagecount ) then |
if( k <= imagecount ) then |
||
local i = imagenumbers[k] |
local i = imagenumbers[k] |
||
if( isnotempty(totalwidth) ) then |
|||
widths[k] = getWidth(width, pargs['width' .. i]) |
|||
widths[k], heights[k] = getdimensions(pargs['image' .. i], pargs['width' .. i], pargs['height' .. i]) |
|||
else |
|||
widths[k] = getWidth(width, pargs['width' .. i]) |
|||
end |
|||
widthsum[r] = widthsum[r] + widths[k] |
widthsum[r] = widthsum[r] + widths[k] |
||
end |
end |
||
Line 128: | Line 157: | ||
widthmax = math.max(widthmax, widthsum[r]) |
widthmax = math.max(widthmax, widthsum[r]) |
||
end |
end |
||
-- make sure the gap is non-negative |
|||
if imagegap < 0 then imagegap = 0 end |
|||
-- if total_width has been specified, rescale the image widths |
-- if total_width has been specified, rescale the image widths |
||
local heights = {} |
|||
if( isnotempty(totalwidth) ) then |
if( isnotempty(totalwidth) ) then |
||
totalwidth = tonumber(totalwidth) |
totalwidth = tonumber(totalwidth) |
||
Line 137: | Line 168: | ||
for r=1,rowcount do |
for r=1,rowcount do |
||
local koffset = k |
local koffset = k |
||
local tw = totalwidth - |
local tw = totalwidth - (3 + imagegap) * (perrow[r] - 1) - 12 |
||
local ar = {} |
local ar = {} |
||
local arsum = 0 |
local arsum = 0 |
||
Line 144: | Line 175: | ||
if( k<= imagecount ) then |
if( k<= imagecount ) then |
||
local i = imagenumbers[k] |
local i = imagenumbers[k] |
||
local h = |
local h = heights[k] or 0 |
||
if (h > 0) then |
if (h > 0) then |
||
ar[j] = widths[k]/h |
ar[j] = widths[k]/h |
||
Line 171: | Line 202: | ||
widthmax = math.max(widthmax, widthsum[r]) |
widthmax = math.max(widthmax, widthsum[r]) |
||
end |
end |
||
end |
end |
||
-- start building the array of images, if there are images |
-- start building the array of images, if there are images |
||
Line 179: | Line 210: | ||
for r=1,rowcount do |
for r=1,rowcount do |
||
if( widthmax == widthsum[r] ) then |
if( widthmax == widthsum[r] ) then |
||
bodywidth = widthmax + |
bodywidth = widthmax + (3 + imagegap) * (perrow[r] - 1) + 12 |
||
end |
end |
||
end |
end |
||
Line 190: | Line 221: | ||
root:addClass('thumb') |
root:addClass('thumb') |
||
root:addClass('tmulti') |
root:addClass('tmulti') |
||
-- root:addClass('tmulti-sandbox') |
|||
root:addClass(thumbclass[align] or 'tright') |
root:addClass(thumbclass[align] or 'tright') |
||
if( align == 'center' or align == 'centre' ) then |
if( align == 'center' or align == 'centre' ) then |
||
root:addClass('center') |
root:addClass('center') |
||
end |
|||
if( pargs['margin_top'] or args['margin_top']) then |
|||
root:css('margin-top', pargs['margin_top'] or args['margin_top']) |
|||
end |
|||
if( pargs['margin_bottom'] or args['margin_bottom']) then |
|||
root:css('margin-bottom', pargs['margin_bottom'] or args['margin_bottom']) |
|||
end |
end |
||
if( bg ~= '' ) then |
if( bg ~= '' ) then |
||
Line 206: | Line 232: | ||
local div = root:tag('div') |
local div = root:tag('div') |
||
div:addClass('thumbinner') |
div:addClass((border ~= 'infobox') and 'thumbinner multiimageinner' or 'multiimageinner') |
||
div:css('width', tostring(bodywidth) .. 'px') |
div:css('width', tostring(bodywidth) .. 'px') |
||
:css('max-width', tostring(bodywidth) .. 'px') |
:css('max-width', tostring(bodywidth) .. 'px') |
||
if( bg ~= '' ) then |
if( bg ~= '' ) then |
||
div:css('background-color', bg) |
div:css('background-color', bg) |
||
end |
|||
if( border == 'infobox' or border == 'none') then |
|||
div:css('border', 'none') |
|||
end |
end |
||
-- add the header |
-- add the header |
||
if( isnotempty(header) ) then |
if( isnotempty(header) ) then |
||
div:tag('div') |
div:tag('div') |
||
: |
:addClass('trow') |
||
: |
:tag('div') |
||
:addClass('theader') |
|||
:css('text-align', pargs['header_align'] or 'center') |
|||
:css(' |
:css('text-align', pargs['header_align']) |
||
:css('background-color', |
|||
:wikitext(header) |
|||
(pargs['header_background'] ~= '') and pargs['header_background'] or nil) |
|||
:wikitext(header) |
|||
end |
end |
||
-- loop through the images |
-- loop through the images |
||
local k = 0 |
local k = 0 |
||
for r=1,rowcount do |
for r=1,rowcount do |
||
local rowdiv = div:tag('div'):addClass('trow'); |
|||
for j=1,perrow[r] do |
for j=1,perrow[r] do |
||
k = k + 1 |
k = k + 1 |
||
if( k <= imagecount ) then |
if( k <= imagecount ) then |
||
local imagediv = |
local imagediv = rowdiv:tag('div') |
||
imagediv:addClass('tsingle') |
imagediv:addClass('tsingle') |
||
if dir ~= 'vertical' then |
|||
imagediv:css('float', 'left') |
|||
end |
|||
if bg ~= '' then |
if bg ~= '' then |
||
imagediv:css('background-color', bg); |
imagediv:css('background-color', bg); |
||
end |
end |
||
if ((imagegap > 1) and (j < perrow[r])) then |
|||
imagediv:css('margin', '1px') |
|||
imagediv:css('margin-right', tostring(imagegap) .. 'px') |
|||
end |
|||
local i = imagenumbers[k] |
local i = imagenumbers[k] |
||
local img = pargs['image' .. i] |
local img = pargs['image' .. i] |
||
Line 241: | Line 272: | ||
imagediv:css('width', tostring(2 + w) .. 'px') |
imagediv:css('width', tostring(2 + w) .. 'px') |
||
:css('max-width', tostring(2 + w) .. 'px') |
:css('max-width', tostring(2 + w) .. 'px') |
||
imagediv:wikitext(renderImageCell(img, w, heights[k], |
imagediv:wikitext(renderImageCell(img, w, heights[k], |
||
pargs['link' .. i], pargs['alt' .. i], |
pargs['link' .. i], pargs['alt' .. i], |
||
pargs['thumbtime' .. i], pargs['caption' .. i], capalign, imgstyle)) |
pargs['thumbtime' .. i], pargs['caption' .. i], capalign, imgstyle, border)) |
||
end |
end |
||
end |
|||
-- only float content gives a parent height:0, so add a clearing div |
|||
if dir ~= 'vertical' then |
|||
div:tag('div') |
|||
:css('clear', 'left') |
|||
end |
end |
||
end |
end |
||
-- add the footer |
-- add the footer |
||
if( isnotempty(footer) ) then |
if( isnotempty(footer) ) then |
||
local falign = string.lower(pargs['footer_align'] or args['footer_align'] or '') |
|||
falign = (falign == 'centre') and 'center' or falign |
|||
div:tag('div') |
div:tag('div') |
||
:addClass(' |
:addClass('trow') |
||
:css(' |
:css('display', (falign ~= '') and 'flow-root' or 'flex') |
||
:tag('div') |
|||
:css('text-align', pargs['footer_align'] or args['footer_align'] or 'left') |
|||
:addClass((border ~= 'infobox') and 'thumbcaption' or nil) |
|||
:css('background-color', pargs['footer_background'] or 'transparent') |
|||
:css('text-align', (falign ~= '') and falign or nil) |
|||
:wikitext(footer) |
|||
:css('background-color', |
|||
(pargs['footer_background'] ~= '') and pargs['footer_background'] or nil) |
|||
:wikitext(footer) |
|||
end |
end |
||
return tostring(root) |
return tostring(root) |
||
Line 267: | Line 298: | ||
function p.render( frame ) |
function p.render( frame ) |
||
autoscaledimages = false |
|||
return renderMultipleImages( frame ) |
|||
nonautoscaledimages = false |
|||
return frame:extensionTag {name = 'templatestyles', args = {src = 'Multiple image/styles.css', wrapper = ".tmulti"}} |
|||
.. renderMultipleImages( frame ) |
|||
.. (autoscaledimages and '[[Category:Pages using multiple image with auto scaled images]]' or '') |
|||
.. (nonautoscaledimages and '[[Category:Pages using multiple image with manual scaled images]]' or '') |
|||
end |
end |
||
p[''] = function( frame ) return p.render( frame:newChild{title = frame:getTitle()} ) end |
|||
return p |
return p |
Latest revision as of 20:26, 10 May 2024
This Lua module is used on approximately 55,000 pages and changes may be widely noticed. Test changes in the module's /sandbox or /testcases subpages, or in your own module sandbox. Consider discussing changes on the talk page before implementing them. |
Implements Template:Multiple image.
Can be called directly with {{#invoke:Multiple image||template parameters}} to reduce article post-expand include size.
This module uses TemplateStyles: |
-- implements [[template:multiple image]]
local p = {}
local autoscaledimages
local nonautoscaledimages
local function isnotempty(s)
return s and s:match( '^%s*(.-)%s*$' ) ~= ''
end
local function removepx(s)
return tostring(s or ''):match('^(.*)[Pp][Xx]%s*$') or s
end
local function getdimensions(s, w, h)
if tonumber(w) and tonumber(h) then
nonautoscaledimages = true
return tonumber(w), tonumber(h)
end
local file = s and mw.title.new('File:' .. mw.uri.decode(mw.ustring.gsub(s,'%|.*$',''), 'WIKI'))
file = file and file.file or {width = 0, height = 0}
w = tonumber(file.width) or 0
h = tonumber(file.height) or 0
autoscaledimages = true
return w, h
end
local function renderImageCell(image, width, height, link, alt, thumbtime, caption, textalign, istyle, border)
local root = mw.html.create('')
local altstr = '|alt=' .. (alt or '')
local linkstr = link and ('|link=' .. link) or ''
local widthstr = '|' .. tostring(width) .. 'px'
local thumbtimestr = ''
if widthstr == '|-nanpx' then
widthstr = ''
end
if isnotempty( thumbtime ) then
thumbtimestr = '|thumbtime=' .. thumbtime
end
local imagediv = root:tag('div')
imagediv:addClass((border ~= 'infobox') and 'thumbimage' or nil)
imagediv:cssText(istyle)
if( height ) then
imagediv:css('height', tostring(height) .. 'px')
imagediv:css('overflow', 'hidden')
end
imagediv:wikitext('[[file:' .. image .. widthstr .. linkstr .. altstr .. thumbtimestr .. ']]')
if isnotempty(caption) then
local captiondiv = root:tag('div')
captiondiv:addClass((border ~= 'infobox') and 'thumbcaption' or nil)
if isnotempty(textalign) then
captiondiv:addClass('text-align-' .. textalign)
end
captiondiv:wikitext(caption)
end
return tostring(root)
end
local function getWidth(w1, w2)
local w
if isnotempty(w1) then
w = tonumber(w1)
elseif isnotempty(w2) then
w = tonumber(w2)
end
return w or 200
end
local function getPerRow(pstr, ic)
-- split string into array using any non-digit as a dilimiter
local pr = mw.text.split(pstr or '', '[^%d][^%d]*')
-- if split failed, assume a single row
if (#pr < 1) then
pr = {tostring(ic)}
end
-- convert the array of strings to an array of numbers,
-- adding any implied/missing numbers at the end of the array
local r = 1
local thisrow = tonumber(pr[1] or ic) or ic
local prownum = {}
while( ic > 0 ) do
prownum[r] = thisrow
ic = ic - thisrow
r = r + 1
-- use the previous if the next is missing and
-- make sure we don't overstep the number of images
thisrow = math.min(tonumber(pr[r] or thisrow) or ic, ic)
end
return prownum
end
local function renderMultipleImages(frame)
local pargs = frame:getParent().args
local args = frame.args
local width = removepx(pargs['width'] or '')
local dir = pargs['direction'] or ''
local border = pargs['border'] or args['border'] or ''
local align = pargs['align'] or args['align'] or (border == 'infobox' and 'center' or '')
local capalign = pargs['caption_align'] or args['caption_align'] or ''
local totalwidth = removepx(pargs['total_width'] or args['total_width'] or '')
local imgstyle = pargs['image_style'] or args['image_style']
local header = pargs['header'] or pargs['title'] or ''
local footer = pargs['footer'] or ''
local imagegap = tonumber(pargs['image_gap'] or '1') or 1
local perrow = nil
local thumbclass = {
["left"] = 'tleft',
["none"] = 'tnone',
["center"] = 'tnone',
["centre"] = 'tnone',
["right"] = 'tright'
}
-- find all the nonempty images
local imagenumbers = {}
local imagecount = 0
for k, v in pairs( pargs ) do
local i = tonumber(tostring(k):match( '^%s*image([%d]+)%s*$' ) or '0')
if( i > 0 and isnotempty(v) ) then
table.insert( imagenumbers, i)
imagecount = imagecount + 1
end
end
-- sort the imagenumbers
table.sort(imagenumbers)
-- create an array with the number of images per row
perrow = getPerRow(dir == 'vertical' and '1' or pargs['perrow'], imagecount)
-- compute the number of rows
local rowcount = #perrow
-- store the image widths and compute row widths and maximum row width
local heights = {}
local widths = {}
local widthmax = 0
local widthsum = {}
local k = 0
for r=1,rowcount do
widthsum[r] = 0
for c=1,perrow[r] do
k = k + 1
if( k <= imagecount ) then
local i = imagenumbers[k]
if( isnotempty(totalwidth) ) then
widths[k], heights[k] = getdimensions(pargs['image' .. i], pargs['width' .. i], pargs['height' .. i])
else
widths[k] = getWidth(width, pargs['width' .. i])
end
widthsum[r] = widthsum[r] + widths[k]
end
end
widthmax = math.max(widthmax, widthsum[r])
end
-- make sure the gap is non-negative
if imagegap < 0 then imagegap = 0 end
-- if total_width has been specified, rescale the image widths
if( isnotempty(totalwidth) ) then
totalwidth = tonumber(totalwidth)
widthmax = 0
local k = 0
for r=1,rowcount do
local koffset = k
local tw = totalwidth - (3 + imagegap) * (perrow[r] - 1) - 12
local ar = {}
local arsum = 0
for j=1,perrow[r] do
k = k + 1
if( k<= imagecount ) then
local i = imagenumbers[k]
local h = heights[k] or 0
if (h > 0) then
ar[j] = widths[k]/h
heights[k] = h
else
ar[j] = widths[k]/100
end
arsum = arsum + ar[j]
end
end
local ht = tw/arsum
local ws = 0
k = koffset
for j=1,perrow[r] do
k = k + 1
if( k<= imagecount ) then
local i = imagenumbers[k]
widths[k] = math.floor(ar[j]*ht + 0.5)
ws = ws + widths[k]
if heights[k] then
heights[k] = math.floor(ht)
end
end
end
widthsum[r] = ws
widthmax = math.max(widthmax, widthsum[r])
end
end
-- start building the array of images, if there are images
if( imagecount > 0 ) then
-- compute width of outer div
local bodywidth = 0
for r=1,rowcount do
if( widthmax == widthsum[r] ) then
bodywidth = widthmax + (3 + imagegap) * (perrow[r] - 1) + 12
end
end
-- The body has a min-width of 100, which needs to be taken into account on specific widths
bodywidth = math.max( 100, bodywidth - 8);
local bg = pargs['background color'] or ''
-- create the array of images
local root = mw.html.create('div')
root:addClass('thumb')
root:addClass('tmulti')
-- root:addClass('tmulti-sandbox')
root:addClass(thumbclass[align] or 'tright')
if( align == 'center' or align == 'centre' ) then
root:addClass('center')
end
if( bg ~= '' ) then
root:css('background-color', bg)
end
local div = root:tag('div')
div:addClass((border ~= 'infobox') and 'thumbinner multiimageinner' or 'multiimageinner')
div:css('width', tostring(bodywidth) .. 'px')
:css('max-width', tostring(bodywidth) .. 'px')
if( bg ~= '' ) then
div:css('background-color', bg)
end
if( border == 'infobox' or border == 'none') then
div:css('border', 'none')
end
-- add the header
if( isnotempty(header) ) then
div:tag('div')
:addClass('trow')
:tag('div')
:addClass('theader')
:css('text-align', pargs['header_align'])
:css('background-color',
(pargs['header_background'] ~= '') and pargs['header_background'] or nil)
:wikitext(header)
end
-- loop through the images
local k = 0
for r=1,rowcount do
local rowdiv = div:tag('div'):addClass('trow');
for j=1,perrow[r] do
k = k + 1
if( k <= imagecount ) then
local imagediv = rowdiv:tag('div')
imagediv:addClass('tsingle')
if bg ~= '' then
imagediv:css('background-color', bg);
end
if ((imagegap > 1) and (j < perrow[r])) then
imagediv:css('margin-right', tostring(imagegap) .. 'px')
end
local i = imagenumbers[k]
local img = pargs['image' .. i]
local w = widths[k]
imagediv:css('width', tostring(2 + w) .. 'px')
:css('max-width', tostring(2 + w) .. 'px')
imagediv:wikitext(renderImageCell(img, w, heights[k],
pargs['link' .. i], pargs['alt' .. i],
pargs['thumbtime' .. i], pargs['caption' .. i], capalign, imgstyle, border))
end
end
end
-- add the footer
if( isnotempty(footer) ) then
local falign = string.lower(pargs['footer_align'] or args['footer_align'] or '')
falign = (falign == 'centre') and 'center' or falign
div:tag('div')
:addClass('trow')
:css('display', (falign ~= '') and 'flow-root' or 'flex')
:tag('div')
:addClass((border ~= 'infobox') and 'thumbcaption' or nil)
:css('text-align', (falign ~= '') and falign or nil)
:css('background-color',
(pargs['footer_background'] ~= '') and pargs['footer_background'] or nil)
:wikitext(footer)
end
return tostring(root)
end
return ''
end
function p.render( frame )
autoscaledimages = false
nonautoscaledimages = false
return frame:extensionTag {name = 'templatestyles', args = {src = 'Multiple image/styles.css', wrapper = ".tmulti"}}
.. renderMultipleImages( frame )
.. (autoscaledimages and '[[Category:Pages using multiple image with auto scaled images]]' or '')
.. (nonautoscaledimages and '[[Category:Pages using multiple image with manual scaled images]]' or '')
end
p[''] = function( frame ) return p.render( frame:newChild{title = frame:getTitle()} ) end
return p