/**
 * MaNGOS is a full featured server for World of Warcraft, supporting
 * the following clients: 1.12.x, 2.4.3, 3.3.5a, 4.3.4a and 5.4.8
 *
 * Copyright (C) 2005-2015  MaNGOS project <http://getmangos.eu>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 * World of Warcraft, and all World of Warcraft or Warcraft art, images,
 * and lore are copyrighted by Blizzard Entertainment, Inc.
 */

#include "dbcfile.h"
#undef min
#undef max
#include <ml/mpq.h>

#include <cstdio>

DBCFile::DBCFile(const std::string& filename):
    filename(filename),
    data(0)
{

}
bool DBCFile::open()
{
    MPQFile f(filename.c_str());

    // Need some error checking, otherwise an unhandled exception error occurs
    // if people screw with the data path.
    if (f.isEof() == true)
    {
        f.close();
        data = NULL;
        printf("Could not open DBCFile %s.\n", filename.c_str());
        return false;
    }

    unsigned char header[4];
    unsigned int na, nb, es, ss;

    if (f.read(header, 4) != 4)                             // Number of records
    {
        f.close();
        data = NULL;
        printf("Could not read header in DBCFile %s.\n", filename.c_str());
        return false;
    }

    if (header[0] != 'W' || header[1] != 'D' || header[2] != 'B' || header[3] != 'C')
    {
        f.close();
        data = NULL;
        printf("The header in DBCFile %s did not match.\n", filename.c_str());
        return false;
    }

    if (f.read(&na, 4) != 4)                                // Number of records
    {
        f.close();
        data = NULL;
        printf("Could not read number of records from DBCFile %s.\n", filename.c_str());
        return false;
    }

    if (f.read(&nb, 4) != 4)                                // Number of fields
    {
        f.close();
        data = NULL;
        printf("Could not read number of fields from DBCFile %s.\n", filename.c_str());
        return false;
    }

    if (f.read(&es, 4) != 4)                                // Size of a record
    {
        f.close();
        data = NULL;
        printf("Could not read record size from DBCFile %s.\n", filename.c_str());
        return false;
    }

    if (f.read(&ss, 4) != 4)                                // String size
    {
        f.close();
        data = NULL;
        printf("Could not read string block size from DBCFile %s.\n", filename.c_str());
        return false;
    }

    recordSize = es;
    recordCount = na;
    fieldCount = nb;
    stringSize = ss;
    if (fieldCount * 4 != recordSize)
    {
        f.close();
        data = NULL;
        printf("Field count and record size in DBCFile %s do not match.\n", filename.c_str());
        return false;
    }

    data = new unsigned char[recordSize * recordCount + stringSize];
    stringTable = data + recordSize * recordCount;

    size_t data_size = recordSize * recordCount + stringSize;
    if (f.read(data, data_size) != data_size)
    {
        f.close();
        data = NULL;
        printf("DBCFile %s did not contain expected amount of data for records.\n", filename.c_str());
        return false;
    }

    f.close();
    return true;
}
DBCFile::~DBCFile()
{
    delete [] data;
}

DBCFile::Record DBCFile::getRecord(size_t id)
{
    assert(data);
    return Record(*this, data + id * recordSize);
}

size_t DBCFile::getMaxId()
{
    assert(data);

    size_t maxId = 0;
    for (size_t i = 0; i < getRecordCount(); ++i)
    {
        if (maxId < getRecord(i).getUInt(0))
            { maxId = getRecord(i).getUInt(0); }
    }
    return maxId;
}

DBCFile::Iterator DBCFile::begin()
{
    assert(data);
    return Iterator(*this, data);
}
DBCFile::Iterator DBCFile::end()
{
    assert(data);
    return Iterator(*this, stringTable);
}