/* ScummVM - Graphic Adventure Engine
 *
 * ScummVM is the legal property of its developers, whose names
 * are too numerous to list here. Please refer to the COPYRIGHT
 * file distributed with this source distribution.
 *
 * 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
 *
 */

#include <common/str.h>
#include "engines/pink/objects/pages/game_page.h"
#include "pink.h"

namespace Pink {

OrbFile::OrbFile()
    : File(), _timestamp(0),
      _tableOffset(0),
      _tableSize(0),
      _table(nullptr) {}

OrbFile::~OrbFile() {
    delete[] _table;
}

bool OrbFile::open(const Common::String &name) {
    if (!File::open(name))
        return false;

    if (readUint32BE() != 'ORB\0'){
        return false;
    }

    uint16 minor = readUint16LE();
    uint16 major = readUint16LE();

    debug("Orb v%hu.%hu loaded", major, minor);

    if (major != kOrbMajorVersion || minor != kOrbMinorVersion){
        return false;
    }

    if (!(_timestamp = readUint32LE())){
        return false;
    }

    _tableOffset = readUint32LE();
    _tableSize = readUint32LE();
    _table = new ObjectDescription[_tableSize];

    seek(_tableOffset);

    for (size_t i = 0; i < _tableSize; ++i) {
        _table[i].load(*this);
    }

    return true;
}

void OrbFile::loadGame(PinkEngine *game) {
    seekToObject(kPinkGame);
    Archive archive(this);
    archive.mapObject(reinterpret_cast<Object*>(game)); // hack
    game->load(archive);
}

void OrbFile::loadObject(Object *obj, const Common::String &name) {
    seekToObject(name.c_str());
    Archive archive(this);
    obj->load(archive);
}

void OrbFile::loadObject(Object *obj, ObjectDescription *objDesc) {
    seek(objDesc->objectsOffset);
    Archive archive(this);
    obj->load(archive);
}

uint32 OrbFile::getTimestamp() {
    return _timestamp;
}

void OrbFile::seekToObject(const char *name) {
    ObjectDescription *desc = getObjDesc(name);
    seek(desc->objectsOffset);
}

ObjectDescription *OrbFile::getObjDesc(const char *name){
    ObjectDescription *desc = static_cast<ObjectDescription*>(bsearch(name, _table, _tableSize, sizeof(ObjectDescription),
                                                                      [] (const void *a, const void *b) {
                                                                          return scumm_stricmp((char *) a, (char *) b); }));
    assert(desc != nullptr);
    return desc;
}

ResourceDescription *OrbFile::getResDescTable(ObjectDescription *objDesc){
    ResourceDescription *table = new ResourceDescription[objDesc->resourcesCount];
    seek(objDesc->resourcesOffset);

    for (size_t i = 0; i < objDesc->resourcesCount; ++i) {
        table[i].load(*this);
    }

    return table;
}


bool BroFile::open(const Common::String &name, uint32 orbTimestamp) {
    if (!File::open(name) || readUint32BE() != 'BRO\0')
        return false;

    uint16 minor = readUint16LE();
    uint16 major = readUint16LE();

    debug("Bro v%hu.%hu loaded", major, minor);

    if (major != kBroMajorVersion || minor != kBroMinorVersion){
        return false;
    }

    uint32 timestamp = readUint32LE();

    return timestamp == orbTimestamp;
}

void ObjectDescription::load(Common::File &file) {
    file.read(name, sizeof(name));

    objectsOffset = file.readUint32LE();
    objectsCount = file.readUint32LE();
    resourcesOffset = file.readUint32LE();
    resourcesCount = file.readUint32LE();
}

void ResourceDescription::load(Common::File &file) {
    file.read(name, sizeof(name));

    offset = file.readUint32LE();
    size = file.readUint32LE();
    inBro = (bool) file.readUint16LE();
}

} // End of namespace Pink