#pragma semicolon 1
#pragma newdecls required

#include <sdktools>
#include <sdkhooks>

int viTimerDude[MAXPLAYERS+1], pipebomb[MAXPLAYERS+1];
Handle vTimerPipe[MAXPLAYERS+1], sdkKillPipe, sdkActivatePipe;
ConVar iTimerPipeBomb;
bool vSwitch[MAXPLAYERS+1];
Handle gTimer;

// ====================================================================================================
//                PLUGIN INFO / START / END / CVARS
// ====================================================================================================

public Plugin myinfo =
{
    name = "[L4D2] Realistico",
    author = "BHaType",
    description = "Makes pipe bomb more real.",
    version = "1.9.1",
    url = "https://steamcommunity.com/profiles/76561198865209991/"
}

public void OnPluginStart()
{
    Handle hGameConf = LoadGameConfigFile("Realistico.GameData");
    StartPrepSDKCall(view_as<SDKCallType>(1));
    if (!(PrepSDKCall_SetFromConf(hGameConf, view_as<SDKFuncConfSource>(1), "iDetonatePipeBomb")))
        SetFailState("Could not load the \"iDetonatePipeBomb\" gamedata signature.");
    sdkKillPipe = EndPrepSDKCall();

    StartPrepSDKCall(SDKCall_Static);
    if ( PrepSDKCall_SetFromConf(hGameConf, SDKConf_Signature, "CPipeBombProjectile_Create") == false )
        SetFailState("Could not load the \"CPipeBombProjectile_Create\" gamedata signature.");
    PrepSDKCall_AddParameter(SDKType_Vector, SDKPass_ByRef);
    PrepSDKCall_AddParameter(SDKType_Vector, SDKPass_ByRef);
    PrepSDKCall_AddParameter(SDKType_Vector, SDKPass_ByRef);
    PrepSDKCall_AddParameter(SDKType_Vector, SDKPass_ByRef);
    PrepSDKCall_AddParameter(SDKType_CBasePlayer, SDKPass_Pointer);
    PrepSDKCall_AddParameter(SDKType_Float, SDKPass_Plain);
    PrepSDKCall_SetReturnInfo(SDKType_CBaseEntity, SDKPass_Pointer);
    sdkActivatePipe = EndPrepSDKCall();
    if ( sdkActivatePipe == null )
        SetFailState("Could not prep the \"CPipeBombProjectile_Create\" function.");
    iTimerPipeBomb = FindConVar("pipe_bomb_timer_duration");
    HookEvent("round_end", EventFire, EventHookMode_PostNoCopy);
}

public Action EventFire(Handle event, const char[] name, bool dontbroadcast)
{
    for (int i = 1; i <= MaxClients; i++)
    {
        viTimerDude[i] = 0;
        pipebomb[i] = 0;
        vSwitch[i] = false;
        if(vTimerPipe[i] != null)
        {
            KillTimer(vTimerPipe[i]);
            vTimerPipe[i] = null;
        }
    }
    if(gTimer != null)
    {
        KillTimer(gTimer);
        gTimer = null;
    }
}


public Action TimerOut(Handle timer)
{
    bool set;
    for (int i = 1; i <= MaxClients; i++)
    {
        if (IsClientInGame(i) && viTimerDude[i] > 0)
        {
            viTimerDude[i]--;
            PrintHintText(i, "Time to detonate %d", viTimerDude[i]);
            set = true;
        }
    }

    if( !set )
    {
        gTimer = null;
        return Plugin_Stop;
    }
    return Plugin_Continue;
}

// ====================================================================================================
//                Plugin / Hooks
// ====================================================================================================


public void OnClientPutInServer(int client)
{
    SDKHook(client, SDKHook_WeaponCanSwitchTo, WeaponSwitch);
}

public Action WeaponSwitch(int client, int deleted)
{
    if(vSwitch[client])
    {
        int iPipe = GetPlayerWeaponSlot(client, 2);
        if(!IsValidEntity(iPipe))
            return Plugin_Continue;

        char sWeaponEx[32];
        GetEntityClassname(iPipe, sWeaponEx, sizeof(sWeaponEx));
        if(strcmp(sWeaponEx, "weapon_pipe_bomb") == 0)
        {
            RemovePlayerItem(client, iPipe);
            AcceptEntityInput(iPipe, "Kill");

            float vAng[3], vPos[3];
            GetEntPropVector(client, Prop_Send, "m_vecOrigin", vPos);
            vPos[2] += 40.0;
            int entity = SDKCall(sdkActivatePipe, vPos, vAng, vAng, vAng, client, 2.0);
            CreateTimer(float(viTimerDude[client]), vDropPipeBomb, EntIndexToEntRef(entity));
            return Plugin_Continue;
        }
    }
    return Plugin_Continue;
}

public Action OnPlayerRunCmd(int client, int &buttons, int &impulse, float vel[3], float angles[3], int &weapon)
{
    if (vTimerPipe[client] == null)
    {
        int iCurrentWeapon = GetEntPropEnt(client, Prop_Send, "m_hActiveWeapon");

        if (!IsValidEntity(iCurrentWeapon))
            return Plugin_Continue;

        char weaponclass[32];
        GetEntityClassname(iCurrentWeapon, weaponclass, sizeof(weaponclass));
        if (buttons & IN_ATTACK)
        {
            if (strcmp(weaponclass, "weapon_pipe_bomb") == 0)
            {
                vSwitch[client] = true;
                viTimerDude[client] = iTimerPipeBomb.IntValue;
                vTimerPipe[client] = CreateTimer(float(viTimerDude[client]), timerpipe, client);
                if( gTimer == null )
                    gTimer = CreateTimer(1.0, TimerOut, _, TIMER_REPEAT);
            }
        }
    }
    else
    {
        if (!(buttons & IN_ATTACK))
        {
            KillTimer(vTimerPipe[client]);
            vTimerPipe[client] = null;
            vSwitch[client] = false;
            CreateTimer(float(viTimerDude[client]), TimerBomb, client);
        }
    }
    return Plugin_Continue;
}

public Action vDropPipeBomb(Handle timer, any ref)
{
    int entity = EntRefToEntIndex(ref);
    if(IsValidEntity(entity))
        SDKCall(sdkKillPipe, entity);
}

public Action TimerBomb(Handle timer, int client)
{
    client = GetClientUserId(client);
    if(!client || !IsClientInGame(client)) return;
    if (IsValidEntRef(pipebomb[client]))
    {
        int entity = EntRefToEntIndex(pipebomb[client]);
        SDKCall(sdkKillPipe, entity);
    }
}

public Action timerpipe(Handle timer, int client)
{
    client = GetClientUserId(client);
    if(!client || !IsClientInGame(client)) return;
    int iPipe = GetPlayerWeaponSlot(client, 2);
    if (IsValidEntity(iPipe))
    {
        RemovePlayerItem(client, iPipe);
        AcceptEntityInput(iPipe, "Kill");
    }
    ForcePlayerSuicide(client);
    float vPos[3];
    GetEntPropVector(client, Prop_Send, "m_vecOrigin", vPos);
    vPos[2] += 40.0;
    int entity = CreateEntityByName("prop_physics");
    if(IsValidEntity(entity))
    {
        DispatchKeyValue(entity, "model", "models/props_junk/propanecanister001a.mdl");
        DispatchSpawn(entity);
        TeleportEntity(entity, vPos, NULL_VECTOR, NULL_VECTOR);
        AcceptEntityInput(entity, "break");
    }
}

public void OnEntityCreated(int entity, const char[] class)
{
    if (strcmp(class, "pipe_bomb_projectile") == 0)
    {
        SDKHook(entity, SDKHook_SpawnPost, SpawnPost);
    }
}

public void SpawnPost(int entity)
{
    RequestFrame(nextFrame, EntIndexToEntRef(entity));
}

public void nextFrame(int entity)
{
    if( (entity = EntRefToEntIndex(entity)) != INVALID_ENT_REFERENCE )
    {
        int client;
        if ((client = GetEntPropEnt(entity, Prop_Data, "m_hThrower")) > 0 && IsClientInGame(client))
        {
            pipebomb[client] = EntIndexToEntRef(entity);
        }
    }
}

public Action OnHeSpawned(Handle timer, any ent)
{
    int client;
    if ((ent = EntRefToEntIndex(ent)) > 0 && (client = GetEntPropEnt(ent, Prop_Data, "m_hThrower")) > 0 && IsClientInGame(client))
    {
        pipebomb[client] = EntIndexToEntRef(ent);
    }
}

// ====================================================================================================
//                Stocks
// ====================================================================================================

bool IsValidEntRef(int iEnt)
{
    if (iEnt && EntRefToEntIndex(iEnt) != INVALID_ENT_REFERENCE)
        return true;
    return false;
}

stock bool bIsSurvivor(int client)
{
    return client > 0 && client <= MaxClients && IsClientInGame(client) && GetClientTeam(client) == 2 && !IsClientInKickQueue(client) && IsPlayerAlive(client);
}