Module:Infobox Item

---

local p = {}

local data_module_names = {
	item = 'Module:Items/data',
	enchantment = 'Module:Enchantment/data'
}

local loaded_data_modules = {}

function p.loadData(data_type) 
	local module_name = data_module_names[data_type]
	if loaded_data_modules[module_name] == nil then
		loaded_data_modules[module_name] = mw.loadData(module_name)
	end
		
	return loaded_data_modules[module_name]
end

local function findItem(name)
	for key, item in pairs(p.loadData("item")) do
		if name == item['name'] then
			return item
		end
	end
	return 0
end

local function getEnchantmentName(id)
	return p.loadData("enchantment")[tostring(id)]['name']
end

local function getItemName(id)
	return p.loadData("item")[tostring(id)]['name']
end

local function fullUrl(url)
	local newUrl = url
	if url:sub(1,5) == "https" then
		return newUrl
	end
	
	if url:sub(1,1) ~= "/" then
		newUrl = "/" .. newUrl
	end
	
	newUrl = "https://www.play.idlescape.com" .. newUrl
	return newUrl
end

local function icon(name, url, word)
	local s = fullUrl(url)
	s = "[[" .. name .. "|<img src=\"" .. s
	s = s .. "\" alt=\""  .. name .. "\" width=\"20\">"
	if word then
		s = s .. name
	end
	s = s .. "]]"
	return s
end

local function itemImage(id, word)
	local item = p.loadData("item")[tostring(id)]
	local url = ""
	if item['itemIcon'] then
		url = item['itemIcon']
	else
		url = item['itemImage']
	end
	return icon(item['name'], url, word)
end

local function link(name)
	local s = ""
	s = "<a href=/p/\"" .. name .. "\" title=\"" .. name .. "\">" .. name .. "</a>"
	return s
end

local function img(id)
	local url = ""
	if item['itemIcon'] then
		url = item['itemIcon']
	else
		url = item['itemImage']
	end
	return fullUrl(url)
end

local function addSeparator(num)
	return tostring(tonumber(num)):reverse():gsub("(%d%d%d)","%1,"):gsub(",(%-?)$","%1"):reverse()
end

local function createInfobox(item)
	local args = {}	
	local url = ""
	local s = ""
	args['autoheaders'] = "y"
	args['title'] = item['name']
	
	if item['itemIcon'] then
		url = item['itemIcon']
	else
		url = item['itemImage']
	end
	args['image'] = "<img src=\"" .. fullUrl(url) .. "\" width=\"150\">"
	
	if item['value'] then
		args['label1'] = icon('Gold', "/images/gold_coin.png")
		args['data1'] = addSeparator(item['value'])
	end
	
	local market = require("Module:Market")["_price"]({item['name'], 1, 1})
	if market then
		args['label2'] = icon('Market', "/images/ui/marketplace_icon.png")
		args['data2'] = addSeparator(market)
	end
	
	if item['requiredLevel'] then
		s = ""
		for skill, level in pairs(item['requiredLevel']) do
			s = s .. level .. " " .. skill .. "<br>"
		end
		s = s:sub(1,s:len()-4)
		args['label3'] = "Level Required"
		args['data3'] = s
	end
	
	if item['craftable'] then
		args['label4'] = "Source"
		args['data4'] = "[[Crafting]]"
	end
	
	
	if item['heat'] then
		args['label5'] = itemImage(2)
		args['data5'] = addSeparator(item['heat'])
	end
	
	if item['augmentationCost'] then
		s = ""
		for key, bonus in pairs(item['equipmentStats']['augmentationBonus']) do
			s = s .. "+" .. bonus.value .. " "
			s = s .. bonus.stat:sub(bonus.stat:find('%.')+1,bonus.stat:len()) .. "<br>"
		end
		s = s:sub(1,s:len()-4)
		args['label7'] = "Aug Bonus"
		args['data7'] = s
		
		s = ""
		for key, cost in pairs(item['augmentationCost']) do
			s = s .. cost .. " "
			s = s .. itemImage(key, true) .. "<br>"
		end
		s = s:sub(1,s:len()-4)
		args['label9'] = "Aug Cost"
		args['data9'] = s
	end
	
	if item['equipmentStats'] then
		if item['equipmentStats']['toolBoost'] then
			local s2 = ""
			s = ""
			for key, stat in pairs(item['equipmentStats']['toolBoost']) do
				s = s .. "+" .. stat.skill .. "<br>"
				s2 = s2 .. "+" .. stat.boost .. "<br>"
			end
			s = s:sub(1,s:len()-4)
			s2 = s2:sub(1,s2:len()-4)
			args['label71'] = s
			args['data71'] = s2
		end
	end
	
	args['header20'] = "Cooking"
	
	if item['size'] then
		args['label21'] = "Size"
		args['data21'] = item['size']
	end
	
	if item['difficulty'] then
		args['label22'] = "Difficulty"
		args['data22'] = item['difficulty']
	end
	
	if item['ingredientTags'] then
		s = ""
		for key, tag in pairs(item['ingredientTags']) do
			s = s .. tag .. "<br>"
		end
		s = s:sub(1,s:len()-4)
		args['label23'] = "Category"
		args['data23'] = item['size']
	end	
	
	if item['cookingEnchantment'] then
		args['label24'] = "Buff"
		args['data24'] = getEnchantmentName(item['cookingEnchantment'])
	end
	
	args['header80'] = "Seeds"
	
	local farming = item['farmingStats']
	if farming then
		s = ""
		for key, yield in pairs(farming['yield']) do
			s = s .. yield['min'] .. "-" .. yield['max'] .. " "
			s = s .. getItemName(yield['id'])
			if yield['chance'] ~= 1 then
				s = s .. " " .. tonumber(string.format('%.2f', yield['chance'] * 100)) .. "%"
			end
			s = s .. "<br>"
		end
		s = s:sub(1,s:len()-4)
		args['label81'] = "Level Required"
		args['data81'] = farming['requiredLevel']
		args['label82'] = "Experience"
		args['data82'] = farming['experience']
		args['label83'] = "Plot Size"
		args['data83'] = farming['height'] .. "x" .. farming['width']
		args['label84'] = "Harvest Time"
		args['data84'] = farming['time'] .. " minutes"
		args['label85'] = "Yield"
		args['data85'] = s
	end
	
	local args2 = {}
	
	args2['subbox'] = "yes"
	args2['bodystyle'] = "padding: 0.5em; margin:auto; font-style:italic; font-size:110%; text-align: center"
	args2['data1'] = item['extraTooltipInfo']
	args['header100'] = "Tooltip"
	args['data101'] = require('Module:Infobox')['infobox'](args2)
	args['subbox'] = "no"
	args['bodystyle'] = " "
	
	return require('Module:Infobox')['infobox'](args)
end

function p.item(frame)
	local args = frame:getParent().args
	return p._item(args)
end

function p._item(args)
	local name = args[1]
	local item = 0
	local infobox = ""
	
	item = findItem (name)
	infobox = createInfobox(item)
	return infobox
end

return p