Modulo:InfoboxImage
Aspekto
Dokumentado por ĉi tiu modulo povas esti kreata ĉe Modulo:InfoboxImage/dokumentado
-- InfoboxImage, 20190928
-- Inputs:
-- image - Can either be a bare filename (with or without the File:/Image: prefix) or a fully formatted image link
-- ending - An optional parameter for the file ending, like gif, jpg, jpeg, png, svg.
-- endingdefault - An optional parameter for the default ending.
-- size - size to display the image
-- maxsize - maximum size for image
-- sizedefault - default size to display the image if size param is blank
-- alt - alt text for image
-- title - title text for image
-- border - set to yes if border
-- center - set to yes, if the image has to be centered
-- upright - upright image param
-- link - page to visit when clicking on image
-- suppressplaceholder - if yes then checks to see if image is a placeholder and suppresses it
-- usecaption - if yes then the caption from the image is used, else it isn't used
-- and the infobox has to add it. this avoids dupplicates
-- Outputs:
-- Formatted image.
local i = {};
local placeholder_image = {
"Blue - Replace this image female.svg",
"Blue - Replace this image male.svg",
"Female no free image yet.png",
"Flag of None (square).svg",
"Flag of None.svg",
"Flag of.svg",
"Green - Replace this image female.svg",
"Green - Replace this image male.svg",
"Image is needed female.svg",
"Image is needed male.svg",
"Location map of None.svg",
"Male no free image yet.png",
"Missing flag.png",
"No flag.svg",
"No free portrait.svg",
"No portrait (female).svg",
"No portrait (male).svg",
"Red - Replace this image female.svg",
"Red - Replace this image male.svg",
"Replace this image female (blue).svg",
"Replace this image female.svg",
"Replace this image male (blue).svg",
"Replace this image male.svg",
"Silver - Replace this image female.svg",
"Silver - Replace this image male.svg",
}
function i.IsPlaceholder(image)
-- change underscores to spaces
image = mw.ustring.gsub(image, "_", " ");
assert(image ~= nil, 'mw.ustring.gsub(image, "_", " ") ne redonu nenion')
-- if image starts with [[ then remove that and anything after |
if mw.ustring.sub(image,1,2) == "[[" then
image = mw.ustring.sub(image,3);
image = mw.ustring.gsub(image, "([^|]*)|.*", "%1");
assert(image ~= nil, 'mw.ustring.gsub(image, "([^|]*)|.*", "%1") ne redonu nenion')
end
-- Trim spaces
image = mw.ustring.gsub(image, '^[ ]*(.-)[ ]*$', '%1');
assert(image ~= nil, "mw.ustring.gsub(image, '^[ ]*(.-)[ ]*$', '%1') ne redonu nenion")
-- remove prefix if exists
local allNames = mw.site.namespaces[6].aliases
allNames[#allNames + 1] = mw.site.namespaces[6].name
allNames[#allNames + 1] = mw.site.namespaces[6].canonicalName
for i, name in ipairs(allNames) do
if mw.ustring.lower(mw.ustring.sub(image, 1, mw.ustring.len(name) + 1)) == mw.ustring.lower(name .. ":") then
image = mw.ustring.sub(image, mw.ustring.len(name) + 2);
break
end
end
-- Trim spaces
image = mw.ustring.gsub(image, '^[ ]*(.-)[ ]*$', '%1');
-- capitalise first letter
image = mw.ustring.upper(mw.ustring.sub(image,1,1)) .. mw.ustring.sub(image,2);
for i,j in pairs(placeholder_image) do
if image == j then
return true
end
end
return false
end
function i.ValidateEnding (f)
-- analyzes the valid endings for images in the Wikipedia.
-- according to http://commons.wikimedia.org/wiki/Commons:File_types,
-- but not tiff, because browser can have some problems with this format
-- xcf works only in MediaWiki
local f = mw.ustring.lower(f)
if f == "gif" or f == "jpg" or f == "jpeg" or f == "png" or f == "svg" then
return true
else return false
end
end
function i.AddEnding (image, ending, endingdefault)
-- analyzes, if an ending already exists in the image
local f = image:gsub("^(.*)%.","")
f = mw.ustring.lower(f) -- it changes letters into lower case letters
if i.ValidateEnding(f) == true then
return image -- if yes, it returns the image name without change
end
-- add an ending to the image name
if ending ~="" and ending ~=nil then
if i.ValidateEnding(ending) == true then
image = image .. "." .. ending
end
elseif endingdefault ~="" and endingdefault ~=nil then
if i.ValidateEnding(endingdefault) == true then
image = image .. "." .. endingdefault
end
end
return image
end
-- funkction for #invoke: in infoboxes
function i.InfoboxImage(frame)
local image = frame.args["image"];
local usecaption = frame.args["usecaption"];
local ending = frame.args["ending"];
local endingdefault = frame.args["endingdefault"];
local page = frame.args["page"];
local size = frame.args["size"];
local maxsize = frame.args["maxsize"];
local sizedefault = frame.args["sizedefault"];
local alt = frame.args["alt"];
local link = frame.args["link"];
local title = frame.args["title"];
local border = frame.args["border"];
local upright = frame.args["upright"] or "";
local thumbtime = frame.args["thumbtime"] or "";
local center = frame.args["center"]
local placeholder = frame.args["suppressplaceholder"]
local caption = frame.args["caption"] or ""
local wd = frame.args["wd"] or ""
-- test, if there are more than one image in a string, for example if the code is from Wikidata
local strings = ""
local n = 1
local cap = ""
local ncap = 1
local alttext = ""
local nalt = 1
-- only use this code, if the image comes from Wikidata
if image ~= "" and image ~= nil and wd == "yes" then
-- strings = mw.text.split(image, ",", plain)
strings = mw.text.split(image, ";;;", plain) -- in the relating template is now used the module Wikidata
n = #strings -- number of images
cap = mw.text.split(caption,";;;", plain) -- ;; could appear in a caption, if before ; is an entity eg. ĝ
alttext = mw.text.split(alttext,";;;", plain) -- ;; could appear in an alt, if before ; is an entity eg. ĝ
ncap = #cap
nalt = #alttext
end
if n>1 then
local images = ""
local nc = 1
for k,v in pairs(strings) do
--local cap1 = cap[nc] or ""
local cap1 = cap[k] or ""
local alt1 = alttext[k] or ""
-- remove space in the alt
if alt1 == " " then
alt1 = nil
end
images = images .. i._InfoboxImage(v, ending, endingdefault, size, maxsize, sizedefault, alt1, link, title, border, upright, thumbtime, center, usecaption, placeholder, cap1, page)
nc = nc + 1
end
return images
end
return i._InfoboxImage(image, ending, endingdefault, size, maxsize, sizedefault, alt, link, title, border, upright, thumbtime, center, usecaption, placeholder, caption, page)
end
-- function for other modules
function i._InfoboxImage(image, ending, endingdefault, size, maxsize, sizedefault, alt, link, title, border, upright, thumbtime, center, usecaption, placeholder, caption, page)
if image == "" or image == nil then
return "";
end
if image == " " then
return image;
end
--if frame.args["suppressplaceholder"] ~= "no" then
if placeholder ~= "no" then
if i.IsPlaceholder(image) == true then
return "";
end
end
if mw.ustring.lower(mw.ustring.sub(image,1,5)) == "http:" then
return "";
end
if mw.ustring.lower(mw.ustring.sub(image,1,6)) == "[http:" then
return "";
end
if mw.ustring.lower(mw.ustring.sub(image,1,7)) == "[[http:" then
return "";
end
if mw.ustring.lower(mw.ustring.sub(image,1,6)) == "https:" then
return "";
end
if mw.ustring.lower(mw.ustring.sub(image,1,7)) == "[https:" then
return "";
end
if mw.ustring.lower(mw.ustring.sub(image,1,8)) == "[[https:" then
return "";
end
if mw.ustring.sub(image,1,2) == "[[" then
-- search for thumbnail images and add to tracking cat if found
if mw.title.getCurrentTitle().namespace == 0 and (mw.ustring.find(image, "|%s*thumb%s*[|%]]") or mw.ustring.find(image, "|%s*thumbnail%s*[|%]]") or mw.ustring.find(image, "|%s*eta%s*[|%]]")) then
return image .. "[[Kategorio:Paĝoj uzantaj informkestojn kun etaj bildoj]]";
else
return image;
end
elseif mw.ustring.sub(image,1,2) == "{{" and mw.ustring.sub(image,1,3) ~= "{{{" then
return image;
elseif mw.ustring.sub(image,1,1) == "<" then
return image;
elseif mw.ustring.sub(image,1,5) == mw.ustring.char(127).."UNIQ" then
-- Found strip marker at begining, so pass don't process at all
return image;
elseif mw.ustring.sub(image,4,9) == "`UNIQ-" then
-- Found strip marker at begining, so pass don't process at all
return image;
else
local result = "";
-- remove prefix if exists
local allNames = mw.site.namespaces[6].aliases
allNames[#allNames + 1] = mw.site.namespaces[6].name
allNames[#allNames + 1] = mw.site.namespaces[6].canonicalName
for i, name in ipairs(allNames) do
if mw.ustring.lower(mw.ustring.sub(image, 1, mw.ustring.len(name) + 1)) == mw.ustring.lower(name .. ":") then
image = mw.ustring.sub(image, mw.ustring.len(name) + 2);
break
end
end
if maxsize ~= "" and maxsize ~= nil then
-- if no sizedefault then set to maxsize
if sizedefault == "" or sizedefault == nil then
sizedefault = maxsize
end
-- check to see if size bigger than maxsize
if size ~= "" and size ~= nil then
local sizenumber = tonumber(mw.ustring.match(size,"%d*")) or 0;
local maxsizenumber = tonumber(mw.ustring.match(maxsize,"%d*")) or 0;
if sizenumber>maxsizenumber and maxsizenumber>0 then
size = maxsize;
end
end
end
-- add px to size if just a number
if (tonumber(size) or 0) > 0 then
size = size .. "px";
end
image = i.AddEnding (image,ending,endingdefault)
result = "[[File:" .. image;
if page ~= "" and page ~= nil then
result = result .. "|page=" .. page;
end
if size ~= "" and size ~= nil then
result = result .. "|" .. size;
elseif sizedefault ~= "" and sizedefault ~= nil then
result = result .. "|" .. sizedefault;
else
result = result .. "|frameless";
end
if center == "yes" then
result = result .. "|center"
end
if alt ~= "" and alt ~= nil then
result = result .. "|alt=" .. alt;
elseif caption ~= "" and caption ~= nil then
result = result .. "|alt=" .. caption;
end
if link ~= "" and link ~= nil then
result = result .. "|link=" .. link;
end
if border == "yes" then
result = result .. "|border";
end
if upright == "yes" then
result = result .. "|upright";
elseif upright ~= "" then
result = result .. "|upright=" .. upright;
end
if thumbtime ~= "" then
result = result .. "|thumbtime=" .. thumbtime;
end
if title ~= "" and title ~= nil then
result = result .. "|" .. title;
elseif alt ~= "" and alt ~= nil then
result = result .. "|" .. alt;
elseif caption ~= "" and caption ~= nil then
result = result .. "|" .. caption;
end
result = result .. "]]";
-- add caption after the image
if caption ~= "" and caption ~= " " and caption ~= nil then
caption = "<div>" .. caption .. "</div>"
result = result .. caption
end
return result;
end
end
return i;