#include "common/hercules.h"
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include "map/pc.h"
#include "common/memmgr.h"
#include "common/HPMDataCheck.h"

HPExport struct hplugin_info pinfo = {
	"pkonoff", // 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)
};

int config_delay = 5; // After turn pk on/off, how many seconds delay before the player allow to pk on/off ?

struct player_data {
	unsigned int pkmode :1;
	int pkmode_delay;
};

ACMD(pvpmode) {
	struct player_data *ssd;
	char output[CHAT_SIZE_MAX];
	if ( !( ssd = getFromMSD(sd,0) ) ) {
		CREATE( ssd, struct player_data, 1 );
		ssd->pkmode = 0;
		addToMSD( sd, ssd, 0, true );
	}
	if ( !map->list[sd->bl.m].flag.town ) {
		clif->message( sd->fd, "You can only change your PK state in towns.");
		return false;
	}
	if ( pc_isdead(sd) ) { //Disable @pvpmode when player is dead
		clif->message( sd->fd, "No puedes usar este comando estando muerto.");
		return false;
		}
	if ( ssd->pkmode_delay + config_delay > (int)time(NULL) ) {
		safesnprintf( output, CHAT_SIZE_MAX, "You must wait %d seconds before using this command again.", ssd->pkmode_delay + config_delay - (int)time(NULL) );
		clif->message( sd->fd, output );
		return false;
	}
	if ( !ssd->pkmode ) {
		
		clif->message( sd->fd, "Your PK state is now ON" );
		pc->setpos(sd, sd->mapindex, sd->bl.x, sd->bl.y, (clr_type)CLR_RESPAWN);
		pc_setglobalreg(sd, script->add_str("USERAURA"), 586);
		ssd->pkmode = 1;
	} else {
		ssd->pkmode = 0;
		clif->message( sd->fd, "Your PK state is now OFF" );
		pc->setpos(sd, sd->mapindex, sd->bl.x, sd->bl.y, (clr_type)CLR_RESPAWN);
		pc_setglobalreg(sd, script->add_str("USERAURA"), -1);
	}
	ssd->pkmode_delay = (int)time(NULL);
	return true;
}

int battle_check_target_post( int retVal, struct block_list *src, struct block_list *target, int *flag ) {
	if ( retVal != 1 && src->type == BL_PC && target->type == BL_PC ) {
		struct player_data *src_pc = getFromMSD( (TBL_PC*)src, 0 );
		struct player_data *target_pc = getFromMSD( (TBL_PC*)target, 0 );
		if ( src_pc != NULL && target_pc != NULL )
			if ( src_pc->pkmode && target_pc->pkmode )
				return 1;
	}
	return retVal;
}
//===========================================================
//	 			Disable Aura PvP Mode when player quit
//===========================================================
int map_quit_prepk( struct map_session_data *sd ) {
	struct player_data *ssd;
	if (( ssd = getFromMSD(sd,0) ))
		if ( ssd->pkmode)
			pc_setglobalreg(sd, script->add_str("USERAURA"), -1);
	return 0;
}
//===========================================================
//				 Disable PvP Mode/Aura when player die 
//===========================================================

int pc_dead_prepk( struct map_session_data *sd ) {
	struct player_data *ssd;
	if (( ssd = getFromMSD(sd,0) ))
		if ( ssd->pkmode) {
			ssd->pkmode = 0;
			pc_setglobalreg(sd, script->add_str("USERAURA"), -1);
			pc->setpos(sd, sd->mapindex, sd->bl.x, sd->bl.y, (clr_type)CLR_RESPAWN);
			status_kill(&sd->bl);	
			clif->message( sd->fd, "Your PK state is now OFF" );
			}
	return 0;
}
//===========================================================
//	 Prevents the player abandon pvpmode when receiving damage
//===========================================================
int pc_damage_receivedpk(struct map_session_data *sd,struct block_list *src,unsigned int hp, unsigned int sp){
	struct player_data *ssd;
	if (( ssd = getFromMSD(sd,0) ))
		if ( ssd->pkmode)
	ssd->pkmode_delay = (int)time(NULL);	
	return 0;
	
}
//===========================================================
//	 Disable Teleport/Warp/Go when player is in PvP Mode
//===========================================================
int pc_setpos_delaypk(struct map_session_data* sd, unsigned short *map_index, int *x, int *y, clr_type *clrtype) {
	int16 m;
	struct player_data *ssd;
	unsigned short mapindex_ = *map_index;

	if (!sd)
		return 0;

	if( !mapindex_ || !mapindex_id2name(mapindex_) || ( m = map->mapindex2mapid(mapindex_) ) == -1 ) {
		ShowDebug("pc_setpos: Passed mapindex(%d) is invalid!\n", mapindex_);
		return 1;
	}
	if( !(ssd = getFromMSD(sd,0)) ) {
		return 0;
	}
	if ( ssd->pkmode) {
		clif->message( sd->fd, "No puedes teletransportarte en PvP Mode" );
		hookStop();
	}
	return 0;
}
HPExport void plugin_init (void) {
	addAtcommand("pvpmode",pvpmode);
	addHookPost( "battle->check_target", battle_check_target_post );
	addHookPre( "map->quit", map_quit_prepk );
	addHookPre( "pc->dead", pc_dead_prepk );
	addHookPre("pc->damage",pc_damage_receivedpk);
	addHookPre("pc->setpos",pc_setpos_delaypk);

	
}