scummvm/engines/hypno/libfile.cpp
2023-12-24 13:19:25 +01:00

146 lines
4.0 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 "hypno/libfile.h"
#include "hypno/hypno.h"
namespace Hypno {
LibFile::LibFile() : Common::Archive() {
_libfile = nullptr;
_encrypted = true;
}
LibFile::~LibFile() {
close();
}
bool LibFile::open(const Common::Path &prefix, const Common::Path &filename, bool encrypted) {
close();
_prefix = prefix;
_encrypted = encrypted;
_libfile = new Common::File();
if (!_libfile->open(filename)) {
warning("Failed to open %s", filename.toString(Common::Path::kNativeSeparator).c_str());
return false;
}
uint32 offset = 0;
while (offset < _libfile->size()) {
byte b;
uint32 size = 0;
uint32 start = _libfile->size();
FileEntry f;
_libfile->seek(offset);
debugC(1, kHypnoDebugParser, "parsing at offset %d with size %li", offset, long(_libfile->size()));
while (true) {
Common::String fname;
for (uint32 i = 0; i < 12; i++) {
b = _libfile->readByte();
if (b != 0x96 && b != 0x0)
fname += tolower(char(b));
}
if (!Common::isAlnum(*fname.c_str()))
break;
debugC(1, kHypnoDebugParser, "file: %s", fname.c_str());
f.name = Common::Path(fname);
f.start = start = _libfile->readUint32LE();
f.size = size = _libfile->readUint32LE();
if (size == 0)
error("Trying to load an empty file");
_libfile->readUint32LE(); // some field?
debugC(1, kHypnoDebugParser, "start: %d, size: %d", f.start, f.size);
_fileEntries.push_back(f);
};
offset = start + size;
}
return true;
}
const FileEntry *LibFile::getEntry(const Common::Path &path) const {
for (Common::Array<FileEntry>::const_iterator it = _fileEntries.begin(); it != _fileEntries.end(); ++it) {
if (((_prefix.join(it->name)).equalsIgnoreCase(path)) || it->name.equalsIgnoreCase(path))
return it;
}
return nullptr;
}
void LibFile::close() {
delete _libfile; _libfile = nullptr;
_fileEntries.clear();
}
bool LibFile::hasFile(const Common::Path &path) const {
return getEntry(path) != nullptr;
}
int LibFile::listMembers(Common::ArchiveMemberList &list) const {
list.clear();
for (Common::Array<FileEntry>::const_iterator it = _fileEntries.begin(); it != _fileEntries.end(); ++it)
list.push_back(getMember(it->name));
return list.size();
}
const Common::ArchiveMemberPtr LibFile::getMember(const Common::Path &path) const {
return Common::ArchiveMemberPtr(new Common::GenericArchiveMember(path, *this));
}
Common::SeekableReadStream *LibFile::createReadStreamForMember(const Common::Path &path) const {
const FileEntry *entry = getEntry(path);
if (!entry)
return nullptr;
byte *data = (byte *)malloc(entry->size);
if (!data) {
warning("Not enough memory to load archive entry %s", path.toString().c_str());
return nullptr;
}
_libfile->seek(entry->start);
_libfile->read(data, entry->size);
Common::String name = path.baseName();
name.toLowercase(); // just in case
if (name.hasSuffix(".raw")) {
for (uint32 i = 0; i < entry->size; i++) {
data[i] = data[i] ^ 0xfe;
}
} else if (_encrypted) {
for (uint32 i = 0; i < entry->size; i++) {
if (data[i] != '\n')
data[i] = data[i] ^ 0xfe;
}
}
return new Common::MemoryReadStream(data, entry->size, DisposeAfterUse::YES);
}
} // namespace Hypno