Module:InfoboxImage

لاسوند لپاره ددې موډيول کېدای سی پهModule:InfoboxImage/لاسوندکي وي

-- Inputs:
-- image - Can either be a bare filename (with or without the File:/Image: prefix) or a fully formatted image link
-- page - page to display for multipage images (DjVu)
-- 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
-- suppressplaceholder - if yes then checks to see if image is a placeholder and suppresses it
-- link - page to visit when clicking on image
-- Outputs:
-- Formatted image.
-- More details available at the "Module:InfoboxImage/doc" page

locali={};

localplaceholder_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",
"Replace this image.svg",
"Cricket no pic.png",
"CarersLogo.gif",
"Diagram Needed.svg",
"Example.jpg",
"Image placeholder.png",
"No male portrait.svg",
"Nocover-upload.png",
"NoDVDcover copy.png",
"Noribbon.svg",
"No portrait-BFD-test.svg",
"Placeholder barnstar ribbon.png",
"Project Trains no image.png",
"Image-request.png",
"Sin bandera.svg",
"Sin escudo.svg",
"Replace this image - temple.png",
"Replace this image butterfly.png",
"Replace this image.svg",
"Replace this image1.svg",
"Resolution angle.png",
"Image-No portrait-text-BFD-test.svg",
"Insert image here.svg",
"No image available.png",
"NO IMAGE YET square.png",
"NO IMAGE YET.png",
"No Photo Available.svg",
"No Screenshot.svg",
"No-image-available.jpg",
"Null.png",
"PictureNeeded.gif",
"Place holder.jpg",
"Unbenannt.JPG",
"UploadACopyrightFreeImage.svg",
"UploadAnImage.gif",
"UploadAnImage.svg",
"UploadAnImageShort.svg",
"CarersLogo.gif",
"Diagram Needed.svg",
"No male portrait.svg",
"NoDVDcover copy.png",
"Placeholder barnstar ribbon.png",
"Project Trains no image.png",
"Image-request.png",
}

functioni.IsPlaceholder(image)
-- change underscores to spaces
image=mw.ustring.gsub(image,"_","");
assert(image~=nil,'mw.ustring.gsub(image, "_", "" ) must not return nil')
-- if image starts with [[ then remove that and anything after |
ifmw.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" ) must not return nil')
end
-- Trim spaces
image=mw.ustring.gsub(image,'^[ ]*(.-)[ ]*$','%1');
assert(image~=nil,"mw.ustring.gsub(image, '^[ ]*(.-)[ ]*$', '%1') must not return nil")
-- remove prefix if exists
localallNames=mw.site.namespaces[6].aliases
allNames[#allNames+1]=mw.site.namespaces[6].name
allNames[#allNames+1]=mw.site.namespaces[6].canonicalName
fori,nameinipairs(allNames)do
ifmw.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);

fori,jinpairs(placeholder_image)do
ifimage==jthen
returntrue
end
end
returnfalse
end

functioni.Infobox_Image(args)
localimage=args["image"]orframe.args['انځور'];

ifimage==""orimage==nilthen
return"";
end
ifimage==""then
returnimage;
end
ifargs["suppressplaceholder"]~="no"then
ifi.IsPlaceholder(image)==truethen
return"";
end
end

ifmw.ustring.lower(mw.ustring.sub(image,1,5))=="http:"then
return"";
end
ifmw.ustring.lower(mw.ustring.sub(image,1,6))=="[http:"then
return"";
end
ifmw.ustring.lower(mw.ustring.sub(image,1,7))=="[[http:"then
return"";
end
ifmw.ustring.lower(mw.ustring.sub(image,1,6))=="https:"then
return"";
end
ifmw.ustring.lower(mw.ustring.sub(image,1,7))=="[https:"then
return"";
end
ifmw.ustring.lower(mw.ustring.sub(image,1,8))=="[[https:"then
return"";
end

ifmw.ustring.sub(image,1,2)=="[["then
-- search for thumbnail images and add to tracking cat if found
ifmw.title.getCurrentTitle().namespace==0
and(
mw.ustring.find(image,"|%s*thumb%s*[|%]]")
ormw.ustring.find(image,"|%s*thumbnail%s*[|%]]")
ormw.ustring.find(image,"|%s*بټنوک*[|%]]")
)then
returnimage.."[[وېشنيزه:هغه پاڼي چي تمبنېیلونو والا معلومات بکس کاروي]]";
elseifmw.title.getCurrentTitle().namespace==0then
returnimage.."[[وېشنيزه:د انځورونو لپاره د تخریب شوي نحو څخه کار اخیستل سوي پاڼې]]";
else
returnimage;
end
elseifmw.ustring.sub(image,1,2)=="{{"andmw.ustring.sub(image,1,3)~="{{{"then
returnimage;
elseifmw.ustring.sub(image,1,1)=="<"then
returnimage;
elseifmw.ustring.sub(image,1,5)==mw.ustring.char(127).."UNIQ"then
-- Found strip marker at begining, so pass don't process at all
returnimage;
elseifmw.ustring.sub(image,4,9)=="`UNIQ-"then
-- Found strip marker at begining, so pass don't process at all
returnimage;
else
localresult="";
localpage=args["page"];
localsize=args["size"];
localmaxsize=args["maxsize"];
localsizedefault=args["sizedefault"];
localalt=args["alt"];
locallink=args["link"];
localtitle=args["title"];
localborder=args["border"];
localupright=args["upright"]or"";
localthumbtime=args["thumbtime"]or"";
localcenter=args["center"];
localright=args["right"];
localleft=args["left"];


-- remove prefix if exists
localallNames=mw.site.namespaces[6].aliases
allNames[#allNames+1]=mw.site.namespaces[6].name
allNames[#allNames+1]=mw.site.namespaces[6].canonicalName
fori,nameinipairs(allNames)do
ifmw.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

ifmaxsize~=""andmaxsize~=nilthen
-- if no sizedefault then set to maxsize
ifsizedefault==""orsizedefault==nilthen
sizedefault=maxsize
end
-- check to see if size bigger than maxsize
ifsize~=""andsize~=nilthen
localsizenumber=tonumber(mw.ustring.match(size,"%d*"))or0;
localmaxsizenumber=tonumber(mw.ustring.match(maxsize,"%d*"))or0;
ifsizenumber>maxsizenumberandmaxsizenumber>0then
size=maxsize;
end
end
end
-- add px to size if just a number
if(tonumber(size)or0)>0then
size=size.."px";
end
-- add px to sizedefault if just a number
if(tonumber(sizedefault)or0)>0then
sizedefault=sizedefault.."px";
end

result="[[File:"..image;
ifpage~=""andpage~=nilthen
result=result.."|page="..page;
end
ifsize~=""andsize~=nilthen
result=result.."|"..size;
elseifsizedefault~=""andsizedefault~=nilthen
result=result.."|"..sizedefault;
else
result=result.."|frameless";
end
ifcenter=="yes"then
result=result.."|center"
elseifright~=""then
result=result.."|right"
elseifleft~=""then
result=result.."|left"
end

ifalt~=""andalt~=nilthen
result=result.."|alt="..alt;
end
iflink~=""andlink~=nilthen
result=result.."|link="..link;
end
ifborder=="yes"then
result=result.."|border";
end
ifupright=="yes"then
result=result.."|upright";
elseifupright~=""then
result=result.."|upright="..upright;
end
ifthumbtime~=""then
result=result.."|thumbtime="..thumbtime;
end
iftitle~=""andtitle~=nilthen
result=result.."|"..title;
elseifalt~=""andalt~=nilthen
result=result.."|"..alt;
end
result=result.."]]";

returnresult;
end
end

functioni.InfoboxImage(frame)
localargs=frame.args
returni.Infobox_Image(args)
end

returni;