Module:RecipeDetails

Documentation for this module may be created at Module:RecipeDetails/doc

local p = {}
local cargo = mw.ext.cargo
local allRecipes = mw.loadData("Module:RecipeDetails/data").allRecipes 

local function fuseBaseIngredients(oldTable, newTable)
	local old = oldTable
	local new = newTable
	for n=1, #new do -- For each item in the new table
		local newItem = true   -- Initialize newItem boolean
		for o=1, #old do  -- Check each item in the old table
			if old[o].Item == new[n].Item then  -- If the there is a match
				-- Add value, set boolean to false, and break loop.
				old[o].Amount = old[o].Amount + new[n].Amount 
				newItem = false
				break
			end
		end
		if newItem == true then old[#old+1] = new[n] end -- If it is a new item then add new item.
	end
	return old
end

local function getRecipeItems( inItem, multi, pad )
	local item = inItem
	local multiplier = multi or 1
	local ingredients = {}
	local indent = pad or 1

    if allRecipes[item] == nil then return {} end -- if no results, exit with an empty table.
    local recipe = {}
    for _, v in pairs(allRecipes[item]) do
    	recipe[#recipe+1] = v
    end
    for n=1, #recipe / 2 do
    	local tuple = {}
    	local i = 1 + ((n-1) * 2) -- Need to go by twos instead of ones.
    	tuple.Padding = indent
    	tuple.Item = recipe[i]
    	tuple.Amount = tonumber(recipe[i+1]) * multiplier
		ingredients[n] = tuple
    end
	
	-- Return table of items and values.
    return ingredients
end

-- Takes a list of items and an optional iterator for indentation.
local function RecipeBreakdownRecursive(inItems, i, inFullTable)
	local fullTableStruct = inFullTable or {}
	local items = inItems
	local indent = i 
	
	for n = 1, #items do
		local tuple = {Padding = indent, Item = items[n].Item, Amount = items[n].Amount}
		-- Insert item into fullTableStruct.
		fullTableStruct[#fullTableStruct+1] = tuple
		-- Query smithing table for the recipe and retrieve the ingeredients
		local reciItems = getRecipeItems(items[n].Item, items[n].Amount)
		-- If previous line's result is not empty then recursively call this function and increment i.
		if #reciItems ~= 0 then
			-- If reciItems is not nil then recursively call this function and increment i.
			local retTable = RecipeBreakdownRecursive(reciItems, indent + 1, fullTableStruct)
		end
	end
	
	return fullTableStruct
end

-- Takes a list of items and an optional iterator for indentation.
local function RecipeBreakdownLoop(inItems)
	local items = inItems
	local fullTable = items
	
	local function insertItems(newItems, index)
		local newTable = {}
		local o = 1
		while o <= index do newTable[#newTable+1] = items[o]; o = o + 1 end
		for n=1, #newItems do newTable[#newTable+1] = newItems[n] end
		while o <= #items do newTable[#newTable+1] = items[o]; o = o + 1 end
		fullTable = newTable
	end
	
	local indent = 1
	local deepest = 1
	-- For each item in a growing table, check if the item at current indent level has a recipe. 
	-- If it does, set deepest to index +1 and add items to table at index.
	-- Repeat until indent equals deepest after processing full table.
	while true do
		for n=1, #items do
			if items[n].Padding == indent then
				-- Check if item has a recipe: (Name, Multi, Padding)
				local recipe = getRecipeItems(items[n].Item, items[n].Amount, indent + 1)
				if #recipe >= 1 then
					deepest = indent + 1
					-- insert recipe into items table at n with padding indent + 1.
					insertItems(recipe, indent + 1)
				end
			end
		end
		if deepest == indent then break else indent = indent + 1; items = fullTable end
	end
	
	return items
end

local function RecipeBreakdownFormatter(inFullTable)
	local fullTable = inFullTable
	local results = {}
	local Row = [==[<tr><td style="padding-left:%spx">{{CraftReq|%s}}</td><td>{{Numdisplay|%s}}</td></tr>]==]
	-- Format output rows.
	local padding = 0
	for n=1, #fullTable do
    -- Index is 6 for the first tier, and 20n+5 for the rest.
		if fullTable[n].Padding > 1 then padding = fullTable[n].Padding * 20 + 5 else padding = 6 end
		results[n] = string.format(Row, padding, fullTable[n].Item, fullTable[n].Amount)
	end
	-- Concatenate strings together.
	return table.concat(results, "")
end

local function ParseBaseItemsTable(fullTableStruct)
	local fullList = fullTableStruct
	local baseList = {}
	
	for item=1, #fullList do
		local itemRecipe = getRecipeItems(fullList[item].Item, 1, 1)
		if itemRecipe == {} then
			local addBaseItem = {Item = fullList[item].Item, Amount = fullList[item].Amount}
			baseList = fuseBaseIngredients(baseList, addBaseItem)
		end
	end
	
	return baseList
end

local function RecipeTotalsFormatter(inBaseIngTable)
	local baseIngTable = inBaseIngTable
	local result = {}
	local Row = [==[<tr><td style="text-align:right">{{CraftReq|%s}}</td><td>{{Numdisplay|%s}}</td></tr>]==]
	-- Format output rows.
	for n=1, #baseIngTable do
		result[n] = string.format(Row, baseIngTable[n].Item, baseIngTable[n].Amount)
	end
	
	return table.concat(result, "")
end

local function checkDeepestLevel(inRecipesTable)
	local items = inRecipesTable
	for n=1, #items do 
		local item = items[n].Item
		local ret = getRecipeItems(item, 1, 1)
		if #ret >= 1 then 
			return 2 -- If it goes deeper than the first level then return 2.
		end
	end
	return 1 -- If it is not deeper than the first level then return 1.
end

function p.Builder( frame )
	local item = frame.args.Item
	mw.logObject(item, ":::: ")
	local items = getRecipeItems(item)
	-- Check if deepest level is greater than 1. If it is then continue.
	if checkDeepestLevel(items) > 1 then
		-- local fullTableStruct = RecipeBreakdownRecursive(items, 1, {})
		local fullTableStruct = RecipeBreakdownLoop(items)
		local baseIngredients = ParseBaseItemsTable(fullTableStruct)
		local tablehead = [[<table class="wikitable">
							<tr><th style="width:80%;">Item</th><th>Qty</th></tr>]]
		-- build the data.
		local breakdown = tablehead..RecipeBreakdownFormatter(fullTableStruct).."</table>"
		local totals    = tablehead..RecipeTotalsFormatter(baseIngredients).."</table>"
	
		-- Store it in the Cargo Table: item, breakdown, totals.
		frame:callParserFunction{ name = '#cargo_store', args = {"_table=DetailedRecipes", Item = item, Breakdown = breakdown, Totals = totals} }
		return '<br/>Stored data for the item: ' .. item
	end
end

function p.cargo_attach( frame )
	frame:callParserFunction{ name = '#cargo_attach', args = {"_table=DetailedRecipes"} }
	-- frame:extensionTag{ name = 'cargo_attach', args= {_table = "DetailedRecipes"} }
	return 'Attach script ran. <br/>'
end

function p.Main( frame )
	local item = frame.args.Item
	local tabstr = [[Recipe=%s
	|-|Totals=%s]]
	-- Query 'DetailedRecipes' table for the recipe and retrieve the outputs
	local tables = 'DetailedRecipes'
    local fields = 'Breakdown, Totals'
    local args = {
        where = 'DetailedRecipes.Item="' .. item .. '"',
        orderBy = 'DetailedRecipes.Item'
    }
    local results = cargo.query( tables, fields, args )
    if #results == 0 then return end
	return '<div class="detrecipe">' .. frame:extensionTag( 'tabber', string.format(tabstr, results[1].Breakdown, results[1].Totals)) .. "</div>"
end

return p