/*
 Based on pkmode src
 */

/// Sample Hercules Plugin

#include "common/hercules.h" /* Should always be the first Hercules file included! (if you don't make it first, you won't be able to use interfaces) */
#include "common/memmgr.h"
#include "common/mmo.h"
#include "common/socket.h"
#include "common/strlib.h"
#include "common/nullpo.h"
#include "common/timer.h"
#include "map/clif.h"
#include "map/pc.h"
#include "map/battle.h"
#include "map/script.h"

#include "common/HPMDataCheck.h" /* should always be the last Hercules file included! (if you don't make it last, it'll intentionally break compile time) */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

HPExport struct hplugin_info pinfo = {
	"Pkmode",    // Plugin name
	SERVER_TYPE_MAP,// Which server types this plugin works with?
	"0.1",       // Plugin version
	HPM_VERSION, // HPM Version (don't change, macro is automatically updated)
};

struct pkmode_data_struct {
	struct {
		unsigned int pk_mode : 1;
	} state;
	int64 pk_mode_tick;
};

struct Battle_Config battle_config;

int pc_setnewpc_post(int retVal, struct map_session_data *sd, int *account_id, int *char_id, int *login_id1, unsigned int *client_tick, int *sex, int *fd)
{
	struct pkmode_data_struct *pksd;

	if (!(pksd = getFromMSD(sd, 0))) {
		CREATE(pksd, struct pkmode_data_struct, 1);
		pksd->pk_mode_tick = timer->gettick();
		addToMSD(sd, pksd, 0, true);
	}

	return retVal;
}


ACMD(pkmode) {
		struct pkmode_data_struct *pksd;
		int64 tick;

		if (!(pksd = getFromMSD(sd, 0))) {
			return 0;
		}
	
		tick = timer->gettick();
	
		nullpo_retr(-1, sd);
		nullpo_retr(-1, pksd);
	
		if (map->list[sd->bl.m].flag.pvp || map->list[sd->bl.m].flag.gvg || map->list[sd->bl.m].flag.gvg_castle || map->list[sd->bl.m].flag.gvg_dungeon) {
		clif->message(sd->fd, "You can only change your PK state on non-PVP maps.");
		return false;
		
	}
	
		if (DIFF_TICK(pksd->pk_mode_tick, tick) > 0) { //check the delay before use this command again
		clif->message(sd->fd, "You cannot turn OFF your PK state twice within just 15 minutes.");
		return false;
		
	}
	else {
		if (!pksd->state.pk_mode) {
			pksd->state.pk_mode = 1;
			clif->message(sd->fd, "Your PK state is now OFF");
			pksd->pk_mode_tick = tick + 0; //set the delay here
			
		}
		else {
			pksd->state.pk_mode = 0;
			clif->message(sd->fd, "Your PK state is now ON");
			pksd->pk_mode_tick = tick + 1500000; //set the delay here
			
		}
		
	}
	return true;
	
}

int battle_check_target_post(int retVal, struct block_list *src, struct block_list *target, int flag)
{
	struct block_list *s_bl = src, *t_bl = target;
	struct pkmode_data_struct *pksd;
	int16 m; //map
	if (retVal <= 0) return retVal; // Don't do anything
	if (s_bl->type != BL_PC && s_bl->type != BL_SKILL) return retVal;


	nullpo_ret(src);
	nullpo_ret(target);

	

	m = target->m;
	if ((t_bl = battle->get_master(target)) == NULL)
		t_bl = target;

	if ((s_bl = battle->get_master(src)) == NULL)
		s_bl = src;


	switch (t_bl->type)
	{
		case BL_PC:
		{
			const struct map_session_data *sd = BL_UCCAST(BL_PC, t_bl);

			if (!(pksd = getFromMSD(sd, 0))) {
				return 0;
			}

			switch (battle->get_current_skill(src)) {
				case SN_WINDWALK: // add more like this for other skills with same issue
					return retVal;
			}

			if (t_bl == s_bl)
				break;


			if (map->list[m].flag.pvp && pksd->state.pk_mode && s_bl->type != BL_MOB)
				return 0;
		}
	}

	switch(s_bl->type)
	{
		case BL_PC:
		{
			const struct map_session_data *sd = BL_UCCAST(BL_PC, s_bl);

			if (!(pksd = getFromMSD(sd, 0))) {
				return 0;
			}

			if (s_bl != t_bl) {
				if (map->list[m].flag.pvp && pksd->state.pk_mode && t_bl->type != BL_MOB)
					return 0;
			}
		}

	}
	return retVal;;

}


// pc.h stuffs here
// learn how to append to structs.

/* run when server starts */
HPExport void plugin_init (void) {

	addAtcommand("pk",pkmode);//link our '@sample' command

	addHookPost("pc->setnewpc", pc_setnewpc_post);

	addHookPost("battle->check_target", battle_check_target_post);

}