/*
 Charm System(aka Bonus without equip) Plugin
 -- By Dastgir/Hercules
 -- For Karazu
 -- Please do not remove credits.
*/
 
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "../3rdparty/libconfig/libconfig.h"
 
#include "common/HPMi.h"
#include "common/malloc.h"
#include "common/mmo.h"
#include "common/socket.h"
#include "common/strlib.h"
#include "common/sql.h"
#include "common/utils.h"
#include "common/nullpo.h"
#include "common/conf.h"
#include "common/cbasetypes.h"
 
#include "map/mob.h"
#include "map/map.h"
#include "map/clif.h"
#include "map/pc.h"
#include "map/script.h"
#include "map/elemental.h"
#include "map/npc.h"
#include "map/status.h"
#include "map/storage.h"
#include "map/itemdb.h"
#include "map/guild.h"
 
#include "common/HPMDataCheck.h" /* should always be the last file included! (if you don't make it last, it'll intentionally break compile time) */
 
HPExport struct hplugin_info pinfo = {
    "Charm System",// Plugin name
    SERVER_TYPE_MAP,// Which server types this plugin works with?
    "1.0",          // Plugin version
    HPM_VERSION,    // HPM Version (don't change, macro is automatically updated)
};
 
struct item_charm_data {
    bool charm;
};
 
int charm_stackable(int *nameid){
    struct item_data *data;
    struct item_charm_data *icdt;
    data = itemdb->search(*nameid);
    if( !(icdt = getFromITEMDATA(data,0)) )
        return 1;
    if (icdt->charm==true){
        hookStop();
        return 0;
    }
    return 1;
}
 
int charm_stackable2(struct item_data *data){
    struct item_charm_data *icdt;
    nullpo_ret(data);
    if( !(icdt = getFromITEMDATA(data,0)) )
        return 1;
    if (icdt->charm==true){
        hookStop();
        return 0;
    }
    return 1;
}
 
int charm_add(int retVal, struct map_session_data *sd,struct item *item_data,int amount,e_log_pick_type log_type){
    struct item_data *data;
    struct item_charm_data *icdt;
    if (retVal!=0){
        return retVal;
    }
    
    data = itemdb->search(item_data->nameid);
    if( !(icdt = getFromITEMDATA(data,0)) )
        return retVal;
    if(icdt->charm == true) status->calc_pc_(sd,0);
    return retVal;
}
 
 
int charm_del_pre(struct map_session_data *sd,int *n_,int *amount_,int *type_, short *reason, e_log_pick_type *log_type){
    struct item_charm_data *icdt;
    int n = *n_;
    if (sd->inventory_data[n] == NULL){
        return 0;
    }
    if( !(icdt = getFromITEMDATA(sd->inventory_data[n],0)) )
        return 0;
    if (icdt->charm == true){
        status->calc_pc_(sd,0);
    }
    return 0;
}
 
void charm_bonus(struct map_session_data* sd, enum e_status_calc_opt *opt_) {
    int i;
    struct item_charm_data *icdt;
    for ( i=0; i < MAX_INVENTORY; i++ ) { //dh
        if ( !sd->inventory_data[i])
            continue;
        if( !(icdt = getFromITEMDATA(sd->inventory_data[i],0)) )
            continue;
        if (icdt->charm == false)
            continue;
        if ( sd->inventory_data[i]->script) {
            script->run( sd->inventory_data[i]->script, 0, sd->bl.id, 0 );
        }
    }
    return;
}
 
void charm_readdb(int* itemid, config_setting_t *it, int *n_, const char *source){
    int item_id = *itemid;
    struct item_data *id = itemdb->load(item_id);
    config_setting_t *t = NULL;
    struct item_charm_data *icdt;
    if( !(icdt = getFromITEMDATA(id,0)) ) {
        CREATE(icdt,struct item_charm_data,1);
        addToITEMDATA(id,icdt,0,true);
    }
    if ((t = libconfig->setting_get_member(it, "Charm"))) {
        if (libconfig->setting_get_bool(t)){
            icdt->charm = true;
        }
    }
}
 
HPExport void plugin_init(void) {
    iMalloc = GET_SYMBOL("iMalloc");
    mob = GET_SYMBOL("mob");
    script = GET_SYMBOL("script");
    clif = GET_SYMBOL("clif");
    pc = GET_SYMBOL("pc");
    map = GET_SYMBOL("map");
    npc = GET_SYMBOL("npc");
    status = GET_SYMBOL("status");
    storage = GET_SYMBOL("storage");
    itemdb = GET_SYMBOL("itemdb");
    guild = GET_SYMBOL("guild");
    nullpo = GET_SYMBOL("nullpo");
    libconfig = GET_SYMBOL("libconfig");
 
    addHookPre("itemdb->isstackable", charm_stackable);
    addHookPre("itemdb->isstackable2", charm_stackable2);
    addHookPre("itemdb->readdb_additional_fields",charm_readdb);
    addHookPre("status->calc_pc_additional", charm_bonus);
    addHookPost("pc->additem", charm_add);
    addHookPre("pc->delitem", charm_del_pre);
}
 
HPExport void server_online (void) {
    ShowInfo ("'%s' Plugin by Dastgir/Hercules. Version '%s'\n",pinfo.name,pinfo.version);
}