|
|
Línea 1: |
Línea 1: |
− | -- 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)
| |
− | 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 isnotempty( thumbtime ) then
| |
− | thumbtimestr = '|thumbtime=' .. thumbtime
| |
− | end
| |
− |
| |
− | local imagediv = root:tag('div')
| |
− | imagediv:addClass('thumbimage')
| |
− | 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('thumbcaption')
| |
− | 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('thumbinner')
| |
− | 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'])
| |
− | :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))
| |
− | end
| |
− | end
| |
− | end
| |
− | -- add the footer
| |
− | if( isnotempty(footer) ) then
| |
− | local falign = string.lower(pargs['footer_align'] or args['footer_align'] or 'left')
| |
− | falign = (falign == 'centre') and 'center' or falign
| |
− | div:tag('div')
| |
− | :addClass('trow')
| |
− | :css('display', (falign ~= 'left') and 'flow-root' or 'flex')
| |
− | :tag('div')
| |
− | :addClass('thumbcaption')
| |
− | :css('text-align', (falign ~= 'left') and falign or nil)
| |
− | :css('background-color', pargs['footer_background'])
| |
− | :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
| |
− |
| |
− | return p
| |