وحدة:ملعب/Mr. Ibrahem/find3

من أرابيكا، الموسوعة الحرة
اذهب إلى التنقل اذهب إلى البحث
-- محاولة لإيجاد الصور المستخدمة في قوالب المعلومات وبنفس الوقت خارج القالب
-- [[تصنيف:صفحات_بها_صور_مكررة]]


local p = {}
local wd = require('Module:Wikidata2').formatStatementsFromLua

local pat = { 'Image','image', 'صورة' , 'File', 'file', 'ملف' }

function p.m(frame)
	local output = {}
	local image = wd({property = 'P18', firstvalue= 'true', noref = 'true' }) or ""
	if mw.ustring.find( image , "%)" ) ~= nil or mw.ustring.find(image , "%(" ) ~= nil then return "" end
	
	if image ~= "" then 
		local page_title_object = mw.title.getCurrentTitle();	
		local text = page_title_object:getContent();	
		local title = page_title_object.text;	
		local lenth = 0 -- %[%[صورة:(sdfsdf.jpg)([^%]]*|)%]%]
		mw.log(image)
	   	for v, pattern in pairs(pat) do
	   		 --_, lon = mw.ustring.gsub (text, "%[%[".. pattern .."%:" .. image .. "([^%]]*|)%]%]", '%1');
	   		 _, lon = mw.ustring.gsub (text, "%[%[".. pattern .."%:" .. image , '%1');
			mw.log(lon)
			lenth = lenth + lon
		end
		if lenth > 0 then 
			--mw.log("" )
			return frame:preprocess("[[تصنيف:صفحات بها صور مكررة]]")
		end
	end
end

return p