package noppes.npcs.controllers;

import java.io.File;
import java.io.FileInputStream;
import java.io.FileOutputStream;
import java.io.IOException;
import java.util.*;

import net.minecraft.inventory.InventoryCrafting;
import net.minecraft.item.ItemStack;
import net.minecraft.item.crafting.CraftingManager;
import net.minecraft.nbt.CompressedStreamTools;
import net.minecraft.nbt.NBTTagCompound;
import net.minecraft.nbt.NBTTagList;
import noppes.npcs.CustomNpcs;
import noppes.npcs.controllers.data.RecipeCarpentry;
import noppes.npcs.controllers.data.RecipesDefault;
import noppes.npcs.api.handler.IRecipeHandler;
import noppes.npcs.api.handler.data.IRecipe;

public class RecipeController implements IRecipeHandler {
	private static Collection<RecipeCarpentry> prevRecipes;
	public HashMap<Integer,RecipeCarpentry> globalRecipes = new HashMap<Integer, RecipeCarpentry>();
	public HashMap<Integer,RecipeCarpentry> anvilRecipes = new HashMap<Integer, RecipeCarpentry>();
	public static RecipeController instance;

	public static final int version = 1;
	public int nextId = 1;
	
	public static HashMap<Integer,RecipeCarpentry> syncRecipes = new HashMap<Integer, RecipeCarpentry>();
	
	public RecipeController(){
		instance = this;
	}
	public void load(){
		loadCategories();
		reloadGlobalRecipes(globalRecipes);
	}
	public static void reloadGlobalRecipes(HashMap<Integer,RecipeCarpentry> globalRecipes){
		List list = CraftingManager.getInstance().getRecipeList();
		if(prevRecipes != null){
			list.removeAll(prevRecipes);
		}
		
		prevRecipes = new HashSet<RecipeCarpentry>();
		for(RecipeCarpentry recipe : globalRecipes.values()){
			if(recipe.isValid())
				prevRecipes.add(recipe);
		}
		list.addAll(prevRecipes);
	}
	
	private void loadCategories(){
		File saveDir = CustomNpcs.getWorldSaveDirectory();
		try {
	        File file = new File(saveDir, "recipes.dat");
	        if(file.exists()){
		        loadCategories(file);
	        }
	        else{
	    		globalRecipes.clear();
	    		anvilRecipes.clear();
	    		loadDefaultRecipes(-1);
	        }
		} catch (Exception e) {
			e.printStackTrace();
			try {
		        File file = new File(saveDir, "recipes.dat_old");
		        if(file.exists()){
		        	loadCategories(file);
		        }
			} catch (Exception ee) {
				e.printStackTrace();
			}
		}
	}
	private void loadDefaultRecipes(int i) {
		if(i == version)
			return;
		RecipesDefault.loadDefaultRecipes(i);
		saveCategories();
	}

	private void loadCategories(File file) throws Exception{
        NBTTagCompound nbttagcompound1 = CompressedStreamTools.readCompressed(new FileInputStream(file));
        nextId = nbttagcompound1.getInteger("LastId");
        NBTTagList list = nbttagcompound1.getTagList("Data", 10);
        HashMap<Integer,RecipeCarpentry> globalRecipes = new HashMap<Integer, RecipeCarpentry>();
        HashMap<Integer,RecipeCarpentry> anvilRecipes = new HashMap<Integer, RecipeCarpentry>();
        if(list != null){
            for(int i = 0; i < list.tagCount(); i++)
            {
        		RecipeCarpentry recipe = RecipeCarpentry.read(list.getCompoundTagAt(i));
            	if(recipe.isGlobal)
            		globalRecipes.put(recipe.id,recipe);
            	else
            		anvilRecipes.put(recipe.id,recipe);
            	if(recipe.id > nextId)
            		nextId = recipe.id;
            }
        }
        this.anvilRecipes = anvilRecipes;
        this.globalRecipes = globalRecipes;
		loadDefaultRecipes(nbttagcompound1.getInteger("Version"));
	}
	private void saveCategories(){
		try {
			File saveDir = CustomNpcs.getWorldSaveDirectory();
	        NBTTagList list = new NBTTagList();
	        for(RecipeCarpentry recipe : globalRecipes.values()){
	        	list.appendTag(recipe.writeNBT());
	        }
	        for(RecipeCarpentry recipe : anvilRecipes.values()){
	        	list.appendTag(recipe.writeNBT());
	        }
	        NBTTagCompound nbttagcompound = new NBTTagCompound();
	        nbttagcompound.setTag("Data", list);
	        nbttagcompound.setInteger("LastId", nextId);
	        nbttagcompound.setInteger("Version", version);
            File file = new File(saveDir, "recipes.dat_new");
            File file1 = new File(saveDir, "recipes.dat_old");
            File file2 = new File(saveDir, "recipes.dat");
            CompressedStreamTools.writeCompressed(nbttagcompound, new FileOutputStream(file));
            if(file1.exists())
            {
                file1.delete();
            }
            file2.renameTo(file1);
            if(file2.exists())
            {
                file2.delete();
            }
            file.renameTo(file2);
            if(file.exists())
            {
                file.delete();
            }
		} catch (Exception e) {
			e.printStackTrace();
		}
	}
	
    public RecipeCarpentry findMatchingRecipe(InventoryCrafting par1InventoryCrafting){
    	for(RecipeCarpentry recipe : anvilRecipes.values()){
    		if(recipe.isValid() && recipe.matches(par1InventoryCrafting,null))
    			return recipe;
    	}
    	return null;
    }

	public RecipeCarpentry getRecipe(int id) {
		if(globalRecipes.containsKey(id))
			return globalRecipes.get(id);
		if(anvilRecipes.containsKey(id))
			return anvilRecipes.get(id);
		return null;
	}

	public RecipeCarpentry saveRecipe(NBTTagCompound compound) throws IOException {
		RecipeCarpentry recipe = RecipeCarpentry.read(compound);
		
		RecipeCarpentry current = getRecipe(recipe.id);
		if(current != null && !current.name.equals(recipe.name)){
			while(containsRecipeName(recipe.name))
				recipe.name += "_";
		}
		
		if(recipe.id == -1){
			recipe.id = getUniqueId();
			while(containsRecipeName(recipe.name))
				recipe.name += "_";
		}
		if(recipe.isGlobal){
			anvilRecipes.remove(recipe.id);
			globalRecipes.put(recipe.id, recipe);
		}
		else{
			globalRecipes.remove(recipe.id);
			anvilRecipes.put(recipe.id, recipe);
		}
		saveCategories();
		reloadGlobalRecipes(globalRecipes);
		return recipe;
	}

	private int getUniqueId() {
		return nextId++;
	}
	private boolean containsRecipeName(String name) {
		name = name.toLowerCase();
		for(RecipeCarpentry recipe : globalRecipes.values()){
			if(recipe.name.toLowerCase().equals(name))
				return true;
		}
		for(RecipeCarpentry recipe : anvilRecipes.values()){
			if(recipe.name.toLowerCase().equals(name))
				return true;
		}
		return false;
	}

	public RecipeCarpentry delete(int id) {
		RecipeCarpentry recipe = getRecipe(id);
		globalRecipes.remove(recipe.id);
		anvilRecipes.remove(recipe.id);
		saveCategories();
		reloadGlobalRecipes(globalRecipes);
		return recipe;
	}
	public void addRecipe(RecipeCarpentry recipeAnvil) {
		recipeAnvil.id = getUniqueId();
		if(!recipeAnvil.isGlobal)
			RecipeController.instance.anvilRecipes.put(recipeAnvil.id, recipeAnvil);
		else{
			RecipeController.instance.globalRecipes.put(recipeAnvil.id, recipeAnvil);
		}
	}

	public List<IRecipe> getGlobalList() {
		return new ArrayList(this.globalRecipes.values());
	}

	public List<IRecipe> getCarpentryList() {
		return new ArrayList(this.anvilRecipes.values());
	}

	public void addRecipe(String name, boolean global, ItemStack result, Object... objects) {
		RecipeCarpentry recipe = new RecipeCarpentry(name);
		recipe.isGlobal = global;
		recipe = RecipeCarpentry.saveRecipe(recipe, result, objects);

		try {
			this.saveRecipe(recipe.writeNBT());
		} catch (Exception var7) {
			var7.printStackTrace();
		}
	}

	public void addRecipe(String name, boolean global, ItemStack result, int width, int height, ItemStack... objects) {
		ArrayList<ItemStack> list = new ArrayList<>();
		int var9 = objects.length;

		for(int var10 = 0; var10 < var9; ++var10) {
			ItemStack item = objects[var10];
			if (item.stackSize > 0) {
				list.add(item);
			}
		}

		RecipeCarpentry recipe = new RecipeCarpentry(width, height, list.toArray(new ItemStack[0]), result);
		recipe.isGlobal = global;
		recipe.name = name;

		try {
			this.saveRecipe(recipe.writeNBT());
		} catch (IOException var12) {
			var12.printStackTrace();
		}
	}
}