// • ▌ ▄ ·.  ▄▄▄·  ▄▄ • ▪   ▄▄· ▄▄▄▄·  ▄▄▄·  ▐▄▄▄  ▄▄▄ .
// ·██ ▐███▪▐█ ▀█ ▐█ ▀ ▪██ ▐█ ▌▪▐█ ▀█▪▐█ ▀█ •█▌ ▐█▐▌·
// ▐█ ▌▐▌▐█·▄█▀▀█ ▄█ ▀█▄▐█·██ ▄▄▐█▀▀█▄▄█▀▀█ ▐█▐ ▐▌▐▀▀▀
// ██ ██▌▐█▌▐█ ▪▐▌▐█▄▪▐█▐█▌▐███▌██▄▪▐█▐█ ▪▐▌██▐ █▌▐█▄▄▌
// ▀▀  █▪▀▀▀ ▀  ▀ ·▀▀▀▀ ▀▀▀·▀▀▀ ·▀▀▀▀  ▀  ▀ ▀▀  █▪ ▀▀▀
//      Magicbane Emulator Project © 2013 - 2022
//                www.magicbane.com

package engine.loot;

import engine.Enum;
import engine.gameManager.ConfigManager;
import engine.gameManager.DbManager;
import engine.gameManager.NPCManager;
import engine.gameManager.ZoneManager;
import engine.net.DispatchMessage;
import engine.net.client.msg.chat.ChatSystemMsg;
import engine.objects.*;

import java.sql.ResultSet;
import java.sql.SQLException;
import java.util.ArrayList;
import java.util.HashMap;
import java.util.Random;
import java.util.concurrent.ThreadLocalRandom;

/**
 * Class contains static methods for data from Magicbane's loot tables
 */
public class LootManager {

    //new tables
    private static final HashMap<Integer, GenTable> generalItemTables = new HashMap<>();
    private static final HashMap<Integer, ItemTable> itemTables = new HashMap<>();
    private static final HashMap<Integer, ModTypeTable> modTypeTables = new HashMap<>();
    private static final HashMap<Integer, ModTable> modTables = new HashMap<>();

    private LootManager() {
    }

    // Bootstrap routine to load loot data from database
    public static void loadLootData() {
        DbManager.LootQueries.LOAD_ALL_LOOTGROUPS();
        DbManager.LootQueries.LOAD_ALL_LOOTTABLES();
        DbManager.LootQueries.LOAD_ALL_MODGROUPS();
        DbManager.LootQueries.LOAD_ALL_MODTABLES();
    }

    public static void GenerateMobLoot(Mob mob, boolean fromDeath) {
        //determine if mob is in hotzone
        boolean inHotzone = ZoneManager.inHotZone(mob.getLoc());
        //get multiplier form config manager
        float multiplier = Float.parseFloat(ConfigManager.MB_NORMAL_DROP_RATE.getValue());
        if (inHotzone) {
            //if mob is inside hotzone, use the hotzone gold multiplier form the config instead
            multiplier = Float.parseFloat(ConfigManager.MB_HOTZONE_DROP_RATE.getValue());
        }
        //iterate the booty sets
        if (mob.getMobBase().bootySet != 0 && NPCManager._bootySetMap.containsKey(mob.getMobBase().bootySet)) {
            RunBootySet(NPCManager._bootySetMap.get(mob.getMobBase().bootySet), mob, multiplier, inHotzone, fromDeath);
        }
        if (mob.bootySet != 0) {
            RunBootySet(NPCManager._bootySetMap.get(mob.bootySet), mob, multiplier, inHotzone, fromDeath);
        }
        //lastly, check mobs inventory for godly or disc runes to send a server announcement
        if (!fromDeath) {
            for (Item it : mob.getInventory()) {
                ItemBase ib = it.getItemBase();
                if (ib.isDiscRune() || ib.getName().toLowerCase().contains("of the gods")) {
                    ChatSystemMsg chatMsg = new ChatSystemMsg(null, mob.getName() + " in " + mob.getParentZone().getName() + " has found the " + ib.getName() + ". Are you tough enough to take it?");
                    chatMsg.setMessageType(10);
                    chatMsg.setChannel(Enum.ChatChannelType.SYSTEM.getChannelID());
                    DispatchMessage.dispatchMsgToAll(chatMsg);
                }
            }
        }
    }

    private static void RunBootySet(ArrayList<BootySetEntry> entries, Mob mob, float multiplier, boolean inHotzone, boolean fromDeath) {
        if (fromDeath) {
            //do equipment here
            if (mob.getEquip() != null) {
                for (MobEquipment me : mob.getEquip().values()) {
                    if (me.getDropChance() == 0)
                        continue;
                    float equipmentRoll = ThreadLocalRandom.current().nextInt(101);
                    float dropChance = me.getDropChance() * 100;
                    if (equipmentRoll <= (dropChance * multiplier)) {
                        MobLoot ml = new MobLoot(mob, me.getItemBase(), false);
                        mob.getCharItemManager().addItemToInventory(ml);
                    }
                }
            }
            return;
        }
        for (BootySetEntry bse : entries) {
            int roll;
            float dropChance = bse.dropChance * multiplier;
            switch (bse.bootyType) {
                case "GOLD":
                    roll = ThreadLocalRandom.current().nextInt(101);
                    if (roll > dropChance) {
                        //early exit, failed to hit minimum chance roll OR booty was generated from mob's death
                        break;
                    }
                    //determine and add gold to mob inventory
                    int gold = new Random().nextInt(bse.highGold - bse.lowGold) + bse.lowGold;
                    if (gold > 0) {
                        MobLoot goldAmount = new MobLoot(mob, (int) (gold * multiplier));
                        mob.getCharItemManager().addItemToInventory(goldAmount);
                    }
                    break;
                case "LOOT":
                    roll = ThreadLocalRandom.current().nextInt(101);
                    if (roll > dropChance) {
                        //early exit, failed to hit minimum chance roll
                        break;
                    }
                    //iterate the booty tables and add items to mob inventory
                    MobLoot toAdd = getGenTableItem(bse.lootTable, mob);
                    if (toAdd != null) {
                        mob.getCharItemManager().addItemToInventory(toAdd);
                    }
                    if (inHotzone) {
                        if (generalItemTables.containsKey(bse.lootTable + 1)) {
                            int lootTableID = bse.lootTable + 1;
                            MobLoot toAddHZ = getGenTableItem(lootTableID, mob);
                            if (toAddHZ != null)
                                mob.getCharItemManager().addItemToInventory(toAddHZ);
                        }
                    }
                    break;
                case "ITEM":
                    MobLoot disc = new MobLoot(mob, ItemBase.getItemBase(bse.itemBase), true);
                    if (disc != null && !fromDeath)
                        mob.getCharItemManager().addItemToInventory(disc);

                    break;
            }
        }
        if (inHotzone) {
            //hotzone glass roll, 1% chance to roll on glass table
            if (ThreadLocalRandom.current().nextInt(101) > 99) {
                int roll2 = TableRoll(mob.level);
                if (itemTables.get(126).getRowForRange(roll2) == null) {
                    return;
                }
                ItemTableRow tableRow = itemTables.get(126).getRowForRange(roll2);
                int itemUUID = tableRow.cacheID;
                if (itemUUID == 0) {
                    return;
                }
                MobLoot toAddHZ = new MobLoot(mob, ItemBase.getItemBase(itemUUID), false);
                if (toAddHZ != null)
                    mob.getCharItemManager().addItemToInventory(toAddHZ);
            }
        }
    }


    public static MobLoot getGenTableItem(int genTableID, Mob mob) {
        if (genTableID == 0 || mob == null || generalItemTables.containsKey(genTableID) == false) {
            return null;
        }
        MobLoot outItem;
        int genRoll = new Random().nextInt(101);
        GenTableRow selectedRow = generalItemTables.get(genTableID).getRowForRange(genRoll);
        if (selectedRow == null) {
            return null;
        }
        int itemTableId = selectedRow.itemTableID;
        //gets the 1-320 roll for this mob
        int roll2 = TableRoll(mob.level);
        ItemTableRow tableRow = itemTables.get(itemTableId).getRowForRange(roll2);
        if (tableRow == null) {
            return null;
        }
        int itemUUID = tableRow.cacheID;
        if (itemUUID == 0) {
            return null;
        }
        if (ItemBase.getItemBase(itemUUID).getType().ordinal() == Enum.ItemType.RESOURCE.ordinal()) {
            int amount = ThreadLocalRandom.current().nextInt(tableRow.maxSpawn - tableRow.minSpawn) + tableRow.minSpawn;
            return new MobLoot(mob, ItemBase.getItemBase(itemUUID), amount, false);
        }
        outItem = new MobLoot(mob, ItemBase.getItemBase(itemUUID), false);
        Enum.ItemType outType = outItem.getItemBase().getType();
        if (outType.ordinal() == Enum.ItemType.WEAPON.ordinal() || outType.ordinal() == Enum.ItemType.ARMOR.ordinal() || outType.ordinal() == Enum.ItemType.JEWELRY.ordinal()) {
            if (outItem.getItemBase().isGlass() == false) {
                int prefixChanceRoll = ThreadLocalRandom.current().nextInt(101);
                double prefixChance = 2.057 * mob.level - 28.67;
                if(prefixChanceRoll < prefixChance) {
                    ModTypeTable prefixTable = modTypeTables.get(selectedRow.pModTable);

                    int prefixroll = ThreadLocalRandom.current().nextInt(101);
                    if (modTables.get(prefixTable.getRowForRange(prefixroll).modTableID) != null) {
                        ModTable prefixModTable = modTables.get(prefixTable.getRowForRange(prefixroll).modTableID);
                        ModTableRow prefixMod = prefixModTable.getRowForRange(TableRoll(mob.level));
                        if (prefixMod != null && prefixMod.action.length() > 0) {
                            outItem.setPrefix(prefixMod.action);
                            outItem.addPermanentEnchantment(prefixMod.action, 0, prefixMod.level, true);
                        }
                    }
                }
                int suffixChanceRoll = ThreadLocalRandom.current().nextInt(101);
                double suffixChance = 2.057 * mob.level - 28.67;
                if(suffixChanceRoll < suffixChance) {
                    int suffixroll = ThreadLocalRandom.current().nextInt(101);
                    ModTypeTable suffixTable = modTypeTables.get(selectedRow.sModTable);
                    if (modTables.get(suffixTable.getRowForRange(suffixroll).modTableID) != null) {
                        ModTable suffixModTable = modTables.get(suffixTable.getRowForRange(suffixroll).modTableID);
                        ModTableRow suffixMod = suffixModTable.getRowForRange(TableRoll(mob.level));
                        if (suffixMod != null && suffixMod.action.length() > 0) {
                            outItem.setSuffix(suffixMod.action);
                            outItem.addPermanentEnchantment(suffixMod.action, 0, suffixMod.level, false);
                        }
                    }
                }
            }
        }
        return outItem;
    }
    private static int TableRoll(int mobLevel){
        int max = (int)(4.882 * mobLevel + 121.0);
        if(max > 321){
            max = 321;
        }
        int min = (int)(4.469 * mobLevel - 3.469);
        int roll = ThreadLocalRandom.current().nextInt(max-min) + min;
        return roll;
    }
    public static void AddGenTableRow(int tableID, GenTableRow row) {
        if (!generalItemTables.containsKey(tableID)) {
            //create the new table
            GenTable gt = new GenTable();
            gt.rows.add(row);
            generalItemTables.put(tableID, gt);
        } else {
            //add row to existing table
            GenTable toAdd = generalItemTables.get(tableID);
            toAdd.rows.add(row);
        }
    }

    public static void AddItemTableRow(int tableID, ItemTableRow row) {
        if (!itemTables.containsKey(tableID)) {
            //create the new table
            ItemTable it = new ItemTable();
            it.rows.add(row);
            itemTables.put(tableID, it);
        } else {
            //add row to existing table
            ItemTable toAdd = itemTables.get(tableID);
            toAdd.rows.add(row);
        }
    }

    public static void AddModTypeTableRow(int tableID, ModTypeTableRow row) {
        if (!modTypeTables.containsKey(tableID)) {
            //create the new table
            ModTypeTable mtt = new ModTypeTable();
            mtt.rows.add(row);
            modTypeTables.put(tableID, mtt);
        } else {
            //add row to existing table
            ModTypeTable toAdd = modTypeTables.get(tableID);
            toAdd.rows.add(row);
        }
    }

    public static void AddModTableRow(int tableID, ModTableRow row) {
        if (!modTables.containsKey(tableID)) {
            //create the new table
            ModTable mt = new ModTable();
            mt.rows.add(row);
            modTables.put(tableID, mt);
        } else {
            //add row to existing table
            ModTable toAdd = modTables.get(tableID);
            toAdd.rows.add(row);
        }
    }

    public static class GenTable {
        public ArrayList<GenTableRow> rows = new ArrayList<GenTableRow>();

        public GenTableRow getRowForRange(int roll) {
            GenTableRow outRow = null;
            for (GenTableRow iteration : this.rows) {
                if (roll >= iteration.minRoll && roll <= iteration.maxRoll) {
                    outRow = iteration;
                }
            }
            return outRow;
        }
    }

    public static class ItemTable {
        public ArrayList<ItemTableRow> rows = new ArrayList<ItemTableRow>();

        public ItemTableRow getRowForRange(int roll) {
            if (roll > 320) {
                roll = 320;
            }
            ItemTableRow outRow = null;
            for (ItemTableRow iteration : this.rows) {
                if (roll >= iteration.minRoll && roll <= iteration.maxRoll) {
                    outRow = iteration;
                }
            }
            return outRow;
        }
    }

    public static class ModTypeTable {
        public ArrayList<ModTypeTableRow> rows = new ArrayList<ModTypeTableRow>();

        public ModTypeTableRow getRowForRange(int roll) {
            ModTypeTableRow outRow = null;
            for (ModTypeTableRow iteration : this.rows) {
                if (roll >= iteration.minRoll && roll <= iteration.maxRoll) {
                    return iteration;
                }
            }
            return outRow;
        }
    }

    public static class ModTable {
        public ArrayList<ModTableRow> rows = new ArrayList<ModTableRow>();

        public ModTableRow getRowForRange(int roll) {
            if (roll > 320) {
                roll = 320;
            }
            ModTableRow outRow = null;
            for (ModTableRow iteration : this.rows) {
                if (roll >= iteration.minRoll && roll <= iteration.maxRoll) {
                    outRow = iteration;
                }
            }
            return outRow;
        }
    }

    public static class GenTableRow {
        public int minRoll;
        public int maxRoll;
        public int itemTableID;
        public int pModTable;
        public int sModTable;

        public GenTableRow(ResultSet rs) throws SQLException {
            this.minRoll = rs.getInt("minRoll");
            this.maxRoll = rs.getInt("maxRoll");
            this.itemTableID = rs.getInt("lootTableID");
            this.pModTable = rs.getInt("pModTableID");
            this.sModTable = rs.getInt("sModTableID");
        }
    }

    public static class ItemTableRow {
        public int minRoll;
        public int maxRoll;
        public int cacheID;
        public int minSpawn;
        public int maxSpawn;

        public ItemTableRow(ResultSet rs) throws SQLException {
            this.minRoll = rs.getInt("minRoll");
            this.maxRoll = rs.getInt("maxRoll");
            this.cacheID = rs.getInt("itemBaseUUID");
            this.minSpawn = rs.getInt("minSpawn");
            this.maxSpawn = rs.getInt("maxSpawn");

        }
    }

    public static class ModTypeTableRow {
        public int minRoll;
        public int maxRoll;
        public int modTableID;

        public ModTypeTableRow(ResultSet rs) throws SQLException {
            this.minRoll = rs.getInt("minRoll");
            this.maxRoll = rs.getInt("maxRoll");
            this.modTableID = rs.getInt("subTableID");

        }
    }

    public static class ModTableRow {
        public int minRoll;
        public int maxRoll;
        public String action;
        public int level;

        public ModTableRow(ResultSet rs) throws SQLException {
            this.minRoll = rs.getInt("minRoll");
            this.maxRoll = rs.getInt("maxRoll");
            this.action = rs.getString("action");
            this.level = rs.getInt("level");

        }
    }
}