/*
 * gct.h
 * Class to handle Ocarina TXT Cheatfiles
 * nIxx
 */

#include <iostream>
#include <fstream>
#include <stdlib.h>
#include <string.h>
#include "gct.h"

#define ERRORRANGE "Error: CheatNr out of range"

GCTCheats::GCTCheats(void)
{
    iCntCheats = 0;
}

GCTCheats::~GCTCheats(void)
{

    string sGameID = "";
    string sGameTitle = "";
    /*string sCheatName[MAXCHEATS];
     string sCheats[MAXCHEATS];
     string sCheatComment[MAXCHEATS];*/
}

int GCTCheats::getCnt()
{
    return iCntCheats;
}

string GCTCheats::getGameName(void)
{
    return sGameTitle;
}

string GCTCheats::getGameID(void)
{
    return sGameID;
}

string GCTCheats::getCheat(int nr)
{
    if (nr <= (iCntCheats - 1))
    {
        return sCheats[nr];
    }
    else
    {
        return ERRORRANGE;
    }
}

string GCTCheats::getCheatName(int nr)
{
    if (nr <= (iCntCheats - 1))
    {
        return sCheatName[nr];
    }
    else
    {
        return ERRORRANGE;
    }
}

string GCTCheats::getCheatComment(int nr)
{
    if (nr <= (iCntCheats - 1))
    {
        return sCheatComment[nr];
    }
    else
    {
        return ERRORRANGE;
    }
}

int GCTCheats::createGCT(int nr, const char * filename)
{

    if (nr == 0) return 0;

    ofstream filestr;
    filestr.open(filename);

    if (filestr.fail()) return 0;

    //Header and Footer
    char header[] = { 0x00, 0xd0, 0xc0, 0xde, 0x00, 0xd0, 0xc0, 0xde };
    char footer[] = { 0xF0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

    string buf = getCheat(nr);
    filestr.write(header, sizeof(header));

    int x = 0;
    long int li;
    int len = buf.size();

    while (x < len)
    {
        string temp = buf.substr(x, 2);
        li = strtol(temp.c_str(), NULL, 16);
        temp = li;
        filestr.write(temp.c_str(), 1);
        x += 2;
    }
    filestr.write(footer, sizeof(footer));

    filestr.close();
    return 1;
}

int GCTCheats::createGCT(const char * chtbuffer, const char * filename)
{

    ofstream filestr;
    filestr.open(filename);

    if (filestr.fail()) return 0;

    //Header and Footer
    char header[] = { 0x00, 0xd0, 0xc0, 0xde, 0x00, 0xd0, 0xc0, 0xde };
    char footer[] = { 0xF0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

    string buf = chtbuffer;
    filestr.write(header, sizeof(header));

    int x = 0;
    long int li;
    int len = buf.size();

    while (x < len)
    {
        string temp = buf.substr(x, 2);
        li = strtol(temp.c_str(), NULL, 16);
        temp = li;
        filestr.write(temp.c_str(), 1);
        x += 2;
    }

    filestr.write(footer, sizeof(footer));

    filestr.close();

    return 1;
}

int GCTCheats::createGCT(int nr[], int cnt, const char * filename)
{

    if (cnt == 0) return 0;

    ofstream filestr;
    filestr.open(filename);

    if (filestr.fail()) return 0;

    //Header and Footer
    char header[] = { 0x00, 0xd0, 0xc0, 0xde, 0x00, 0xd0, 0xc0, 0xde };
    char footer[] = { 0xF0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

    filestr.write(header, sizeof(header));

    int c = 0;
    while (c != cnt)
    {
        int actnr = nr[c];
        string buf = getCheat(actnr);
        long int li;
        int len = buf.size();
        int x = 0;

        while (x < len)
        {
            string temp = buf.substr(x, 2);
            li = strtol(temp.c_str(), NULL, 16);
            temp = li;
            filestr.write(temp.c_str(), 1);
            x += 2;
        }
        c++;
    }

    filestr.write(footer, sizeof(footer));
    filestr.close();
    return 1;
}

int GCTCheats::openTxtfile(const char * filename)
{
    ifstream filestr;
    int i = 0;
    string str;
    filestr.open(filename);

    if (filestr.fail()) return 0;

    filestr.seekg(0, ios_base::end);
    int size = filestr.tellg();
    if (size <= 0) return -1;
    filestr.seekg(0, ios_base::beg);

    getline(filestr, sGameID);
    if (sGameID[sGameID.length() - 1] == '\r') sGameID.erase(sGameID.length() - 1);

    getline(filestr, sGameTitle);
    if (sGameTitle[sGameTitle.length() - 1] == '\r') sGameTitle.erase(sGameTitle.length() - 1);

    getline(filestr, sCheatName[i]); // skip first line if file uses CRLF
    if (!sGameTitle[sGameTitle.length() - 1] == '\r') filestr.seekg(0, ios_base::beg);

    while (!filestr.eof())
    {
        getline(filestr, sCheatName[i]); // '\n' delimiter by default
        if (sCheatName[i][sCheatName[i].length() - 1] == '\r') sCheatName[i].erase(sCheatName[i].length() - 1);

        string cheatdata;
        bool emptyline = false;

        do
        {
            getline(filestr, str);
            if (str[str.length() - 1] == '\r') str.erase(str.length() - 1);

            if (str == "" || str[0] == '\r' || str[0] == '\n')
            {
                emptyline = true;
                break;
            }

            if (IsCode(str))
            {
                // remove any garbage (comment) after code
                while (str.size() > 17)
                {
                    str.erase(str.length() - 1);
                }
                cheatdata.append(str);
                size_t found = cheatdata.find(' ');
                cheatdata.replace(found, 1, "");
            }
            else
            {
                //printf("%i",str.size());
                sCheatComment[i] = str;
            }
            if (filestr.eof()) break;

        } while (!emptyline);

        sCheats[i] = cheatdata;
        i++;
        if (i == MAXCHEATS) break;
    }
    iCntCheats = i;
    filestr.close();
    return 1;
}

bool GCTCheats::IsCode(const std::string& str)
{
    if (str[8] == ' ' && str.size() >= 17)
    {
        // accept strings longer than 17 in case there is a comment on the same line as the code
        char part1[9];
        char part2[9];
        snprintf(part1, sizeof(part1), "%c%c%c%c%c%c%c%c", str[0], str[1], str[2], str[3], str[4], str[5], str[6],
                str[7]);
        snprintf(part2, sizeof(part2), "%c%c%c%c%c%c%c%c", str[9], str[10], str[11], str[12], str[13], str[14],
                str[15], str[16]);
        if ((strtok(part1, "0123456789ABCDEFabcdef") == NULL) && (strtok(part2, "0123456789ABCDEFabcdef") == NULL))
        {
            return true;
        }
    }
    return false;
}