scummvm/engines/stark/formats/biff.cpp
2021-12-26 21:19:38 +01:00

124 lines
3.1 KiB
C++

/* 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 3 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, see <http://www.gnu.org/licenses/>.
*
*/
#include "engines/stark/formats/biff.h"
#include "engines/stark/services/archiveloader.h"
namespace Stark {
namespace Formats {
BiffArchive::BiffArchive(ArchiveReadStream *stream, ObjectBuilder objectBuilder) :
_objectBuilder(objectBuilder) {
read(stream);
}
BiffArchive::~BiffArchive() {
for (uint i = 0; i < _rootObjects.size(); i++) {
delete _rootObjects[i];
}
}
void BiffArchive::read(ArchiveReadStream *stream) {
uint32 id = stream->readUint32BE();
if (id != MKTAG('B', 'I', 'F', 'F')) {
error("Wrong magic while reading biff archive");
}
_version = stream->readUint32LE();
/*uint32 u1 = */stream->readUint32LE();
/*uint32 u2 = */stream->readUint32LE();
uint32 len = stream->readUint32LE();
for (uint32 i = 0; i < len; i++) {
BiffObject *object = readObject(stream, nullptr);
_rootObjects.push_back(object);
}
}
BiffObject *BiffArchive::readObject(ArchiveReadStream *stream, BiffObject *parent) {
uint32 marker = stream->readUint32LE();
if (marker != 0xf0f0f0f0) {
error("Wrong magic while reading biff archive");
}
uint32 type = stream->readUint32LE();
BiffObject *object = _objectBuilder(type);
if (!object) {
error("Unimplemented BIFF object type %x", type);
}
object->_parent = parent;
object->_u3 = stream->readUint32LE();
uint32 size = stream->readUint32LE();
if (_version >= 2) {
object->_version = stream->readUint32LE();
}
object->readData(stream, size);
marker = stream->readUint32LE();
if (marker != 0x0f0f0f0f) {
error("Wrong magic while reading biff archive");
}
uint32 len = stream->readUint32LE();
for (uint32 i = 0; i < len; ++i) {
BiffObject *child = readObject(stream, object);
object->addChild(child);
}
return object;
}
Common::Array<BiffObject *> BiffArchive::listObjects() {
return _rootObjects;
}
BiffObject::BiffObject() :
_u3(0),
_version(0),
_parent(nullptr),
_type(0) {
}
uint32 BiffObject::getType() const {
return _type;
}
void BiffObject::addChild(BiffObject *child) {
_children.push_back(child);
}
BiffObject::~BiffObject() {
// Delete the children objects
Common::Array<BiffObject *>::iterator i = _children.begin();
while (i != _children.end()) {
delete *i;
i++;
}
}
} // End of namespace Formats
} // End of namespace Stark