Initial commit

engines/stark/formats/biff.cpp

@@ -0,0 +1,124 @@
+/* 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