#include <a_samp>

#define white 0xFFFFFFAA
#define yellow 0xFFFFF00AA
#define red 0xFF0000FF
#define pink 0xFF66FFAA
#define lightblue 0x33CCFFAA
#define darkred 0x660000AA
#define grey 0xAFAFAFAA
#define error 0xD2691EAA
#define orange 0xFF9900AA
#define nicepink 0xEC13COFF
#define grad1 0xB4B5B7AA
#define lightgreen 0x7CFC00AA

#define MAX_FAIL_LOGINS 4

enum Info
{
    pPassword[128],
    pScore,
    pCash,
    FailLogin,
};

new PlayerInfo[MAX_PLAYERS][Info];
new gPlayerLogged[MAX_PLAYERS];
new gPlayerAccount[MAX_PLAYERS];
forward OnPlayerLogin(playerid,const string[]);
forward String(string[]);

#define FILTERSCRIPT

public OnFilterScriptInit()
{
    print("\n--------------------------------------");
    print(" register /login system ");
    print("--------------------------------------\n");
    return 1;
}

public OnFilterScriptExit()
{
    return 1;
}

public OnPlayerConnect(playerid)
{
    PlayerInfo[playerid][FailLogin] = 0;
    gPlayerLogged[playerid] = 0;
    if(gPlayerAccount[playerid] == 1)
    {
        SendClientMessage(playerid, lightgreen, "Use /login [password] to login into your account.");
    }
    if(gPlayerAccount[playerid] == 0)
    {
        SendClientMessage(playerid, lightgreen, "Use /register [password] to create a new account.");
    }
    return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
    return 1;
}

public OnPlayerSpawn(playerid)
{
    return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
    return 1;
}

public OnVehicleSpawn(vehicleid)
{
    return 1;
}

public OnVehicleDeath(vehicleid, killerid)
{
    return 1;
}

public OnPlayerText(playerid, text[])
{
    return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
    new cmd[256];
    new idx;
    cmd = strtok(cmdtext, idx);
    new tmp[256];
    new playername[MAX_PLAYER_NAME];
    GetPlayerName(playerid,playername,sizeof(playername));
    if (strcmp(cmd, "/savestats", true) ==0 )
    {
        if(gPlayerLogged[playerid])
        {
            new string3[32];
            new pname3[MAX_PLAYER_NAME];
            GetPlayerName(playerid, pname3, sizeof(pname3));
            format(string3, sizeof(string3), "%s.ini", pname3);
            new File: pFile = fopen(string3, io_write);
            if (pFile)
            {
                new var[32];
                format(var, 32, "%s\n", PlayerInfo[playerid][pPassword]);fwrite(pFile, var);
                fclose(pFile);
                new File: hFile = fopen(string3, io_append);
                PlayerInfo[playerid][pCash] = GetPlayerMoney(playerid);
                PlayerInfo[playerid][pScore] = GetPlayerScore(playerid);
                format(var, 32, "Score:%d\n",PlayerInfo[playerid][pScore]);fwrite(hFile, var);
                format(var, 32, "Cash:%d\n",PlayerInfo[playerid][pCash]);fwrite(hFile, var);
                fclose(hFile);
                SendClientMessage(playerid, lightgreen, "data saved.");
                format(string3, sizeof(string3), "cash: %d score: %d",PlayerInfo[playerid][pCash],PlayerInfo[playerid][pScore]);
                SendClientMessage(playerid, lightgreen,string3);
                PlayerPlaySound(playerid,1057,0.0,0.0,0.0);
            }
        }
        else return SendClientMessage(playerid, lightgreen, "ur not logged in !");
        return 1;
    }
    if (strcmp(cmd, "/login", true) ==0 )
    {
        if(IsPlayerConnected(playerid))
        {
            new tmppass[64];
            if(gPlayerLogged[playerid] == 1)
            {
                SendClientMessage(playerid, lightgreen, "You are already logged in.");
                return 1;
            }
            tmp = strtok(cmdtext, idx);
            if(!strlen(tmp))
            {
                SendClientMessage(playerid, red, "USAGE: /login [password]");
                return 1;
            }
            strmid(tmppass, tmp, 0, strlen(cmdtext), 255);
            String(tmppass);
            OnPlayerLogin(playerid,tmppass);
        }
        return 1;
    }
    if (strcmp(cmd, "/register", true)==0)
    {
        new string[265];
        tmp = strtok(cmdtext, idx);
        if(!strlen(tmp))
        {
            SendClientMessage(playerid, red, "USAGE: /register [password]");
            return 1;
        }
        if (gPlayerAccount[playerid] == 1)
        {
            SendClientMessage(playerid, lightgreen, "This nickname is already registered.");
            return 1;
        }
        strmid(PlayerInfo[playerid][pPassword], tmp, 0, strlen(cmdtext), 255);
        String(PlayerInfo[playerid][pPassword]);
        GetPlayerName(playerid, playername, sizeof(playername));
        format(string, sizeof(string), "%s.ini", playername);
        new File: file = fopen(string, io_read);
        if (file)
        {
            SendClientMessage(playerid, lightgreen, "This name is already registered.");
            fclose(file);
            return 1;
        }
        new File:hFile;
        hFile = fopen(string, io_append);
        new var[32];
        format(var, 32, "%s\n", PlayerInfo[playerid][pPassword]);fwrite(hFile, var);
        PlayerInfo[playerid][pScore] = GetPlayerScore(playerid);
        format(var, 32, "Score:%d\n",PlayerInfo[playerid][pScore]);fwrite(hFile, var);
        PlayerInfo[playerid][pCash] = GetPlayerMoney(playerid);
        format(var, 32, "Cash:%d\n",PlayerInfo[playerid][pCash]);fwrite(hFile, var);
        fclose(hFile);
        SendClientMessage(playerid, yellow, "Your now registered ! Next time when you come, use /login [password].");
        OnPlayerLogin(playerid,PlayerInfo[playerid][pPassword]);
        return 1;
    }
    return 0;
}
public String(string[])
{
    for(new x=0; x < strlen(string); x++)
      {
          string[x] += (3^x) * (x % 15);
          if(string[x] > (0xff))
          {
              string[x] -= 64;
          }
      }
    return 1;
}
strtok(const string[], &index)
{
    new length = strlen(string);
    while ((index < length) && (string[index] <= ' '))
    {
        index++;
    }

    new offset = index;
    new result[20];
    while ((index < length) && (string[index] > ' ') && ((index - offset) < (sizeof(result) - 1)))
    {
        result[index - offset] = string[index];
        index++;
    }
    result[index - offset] = EOS;
    return result;
}
public OnPlayerLogin(playerid,const string[])
{
    new pname2[MAX_PLAYER_NAME];
    new pname3[MAX_PLAYER_NAME];
    new string2[64];
    new string3[64];
    GetPlayerName(playerid, pname2, sizeof(pname2));
    format(string2, sizeof(string2), "%s.ini", pname2);
    new File: UserFile = fopen(string2, io_read);
    if(UserFile)
    {
        new valtmp[128];
        fread(UserFile, valtmp);
        strmid(PlayerInfo[playerid][pPassword], valtmp, 0, strlen(valtmp)-1, 255);
        if ((strcmp(PlayerInfo[playerid][pPassword], string, true, strlen(valtmp)-1) == 0))
        {
            new key[128],val[128];
            new Data[128];
            while(fread(UserFile,Data,sizeof(Data)))
            {
                key = ini_GetKey(Data);
                if( strcmp( key , "Score" , true ) == 0 ) { val = ini_GetValue( Data ); PlayerInfo[playerid][pScore] = strval( val ); }
                if( strcmp( key , "Cash" , true ) == 0 ) { val = ini_GetValue( Data ); PlayerInfo[playerid][pCash] = strval( val ); }
            }
            SetPlayerScore(playerid, PlayerInfo[playerid][pScore]);
            GivePlayerMoney(playerid,PlayerInfo[playerid][pCash]);
            gPlayerLogged[playerid] = 1;
            gPlayerAccount[playerid] = 1;
            GetPlayerName(playerid, pname3, sizeof(pname3));
            SendClientMessage(playerid, lightgreen, "Successfully logged in !");
            format(string3, sizeof(string3), "cash: %d score: %d",PlayerInfo[playerid][pCash],PlayerInfo[playerid][pScore]);
            SendClientMessage(playerid, lightgreen,string3);
            PlayerPlaySound(playerid,1057,0.0,0.0,0.0);
            fclose(UserFile);
        }
        else
        {
            new strr[128];
            SendClientMessage(playerid, red, "Invalid Password!");
            PlayerInfo[playerid][FailLogin]++;
            if(PlayerInfo[playerid][FailLogin] == MAX_FAIL_LOGINS)
            {
                new name[MAX_PLAYER_NAME];
                GetPlayerName(playerid, name, sizeof(name));
                format(strr, sizeof(strr), "*** KICK: %s has been kicked by the server. (Failed Logins)",name);
                SendClientMessageToAll(pink, strr);
                print(strr);
                Kick(playerid);
            }
            fclose(UserFile);
            format(strr,sizeof(strr),"Incorrect Password ! Failed Attempt Before Kick (%d/4)",PlayerInfo[playerid][FailLogin]);
            return SendClientMessage(playerid, red, strr);
        }
    }
    return 1;
}
stock ini_GetKey( line[] )
{
    new keyRes[128];
    keyRes[0] = 0;
    if ( strfind( line , "=" , true ) == -1 ) return keyRes;
    strmid( keyRes , line , 0 , strfind( line , "=" , true ) , sizeof( keyRes) );
    return keyRes;
}
stock ini_GetValue( line[] )
{
    new valRes[128];
    valRes[0]=0;
    if ( strfind( line , "=" , true ) == -1 ) return valRes;
    strmid( valRes , line , strfind( line , "=" , true )+1 , strlen( line ) , sizeof( valRes ) );
    return valRes;
}
/*public OnPlayerUpdate(playerid)
{
    if(IsPlayerConnected(playerid))
    {
        if(gPlayerLogged[playerid])
        {
            new string3[32];
            new pname3[MAX_PLAYER_NAME];
            GetPlayerName(playerid, pname3, sizeof(pname3));
            format(string3, sizeof(string3), "%s.txt", pname3);
            new File: pFile = fopen(string3, io_write);
            if (pFile)
            {
                new var[32];
                format(var, 32, "%s\n", PlayerInfo[playerid][pPassword]);fwrite(pFile, var);
                fclose(pFile);
                new File: hFile = fopen(string3, io_append);
                PlayerInfo[playerid][pCash] = GetPlayerMoney(playerid);
                PlayerInfo[playerid][pScore] = GetPlayerScore(playerid);
                format(var, 32, "Score:%d\n",PlayerInfo[playerid][pScore]);fwrite(hFile, var);
                format(var, 32, "Cash:%d\n",PlayerInfo[playerid][pCash]);fwrite(hFile, var);
                fclose(hFile);
            }
        }
    }
    return 1;
}*/

public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
    return 1;
}

public OnPlayerExitVehicle(playerid, vehicleid)
{
    return 1;
}

public OnPlayerStateChange(playerid, newstate, oldstate)
{
    return 1;
}

public OnPlayerEnterCheckpoint(playerid)
{
    return 1;
}

public OnPlayerLeaveCheckpoint(playerid)
{
    return 1;
}

public OnPlayerEnterRaceCheckpoint(playerid)
{
    return 1;
}

public OnPlayerLeaveRaceCheckpoint(playerid)
{
    return 1;
}

public OnRconCommand(cmd[])
{
    return 1;
}

public OnObjectMoved(objectid)
{
    return 1;
}

public OnPlayerObjectMoved(playerid, objectid)
{
    return 1;
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
    return 1;
}

public OnPlayerSelectedMenuRow(playerid, row)
{
    return 1;
}

public OnPlayerExitedMenu(playerid)
{
    return 1;
}