mirror of
https://github.com/libretro/scummvm.git
synced 2024-12-13 21:31:53 +00:00
301 lines
9.4 KiB
C++
301 lines
9.4 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 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.
|
|
*
|
|
*/
|
|
|
|
// The following code is based on unshield
|
|
// Original copyright:
|
|
|
|
// Copyright (c) 2003 David Eriksson <twogood@users.sourceforge.net>
|
|
//
|
|
// Permission is hereby granted, free of charge, to any person obtaining a copy of
|
|
// this software and associated documentation files (the "Software"), to deal in
|
|
// the Software without restriction, including without limitation the rights to
|
|
// use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
|
|
// of the Software, and to permit persons to whom the Software is furnished to do
|
|
// so, subject to the following conditions:
|
|
//
|
|
// The above copyright notice and this permission notice shall be included in all
|
|
// copies or substantial portions of the Software.
|
|
//
|
|
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
|
// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
|
|
// SOFTWARE.
|
|
|
|
#include "common/archive.h"
|
|
#include "common/debug.h"
|
|
#include "common/hash-str.h"
|
|
#include "common/installshield_cab.h"
|
|
#include "common/memstream.h"
|
|
#include "common/substream.h"
|
|
#include "common/ptr.h"
|
|
#include "common/zlib.h"
|
|
|
|
namespace Common {
|
|
|
|
namespace {
|
|
|
|
class InstallShieldCabinet : public Archive {
|
|
public:
|
|
InstallShieldCabinet();
|
|
|
|
bool open(const String &baseName);
|
|
void close();
|
|
|
|
// Archive API implementation
|
|
virtual bool hasFile(const Path &path) const;
|
|
virtual int listMembers(ArchiveMemberList &list) const;
|
|
virtual const ArchiveMemberPtr getMember(const Path &path) const;
|
|
virtual SeekableReadStream *createReadStreamForMember(const Path &path) const;
|
|
|
|
private:
|
|
struct FileEntry {
|
|
uint32 uncompressedSize;
|
|
uint32 compressedSize;
|
|
uint32 offset;
|
|
uint16 flags;
|
|
uint16 volume;
|
|
};
|
|
|
|
int _version;
|
|
typedef HashMap<String, FileEntry, IgnoreCase_Hash, IgnoreCase_EqualTo> FileMap;
|
|
FileMap _map;
|
|
String _baseName;
|
|
|
|
String getHeaderName() const;
|
|
String getVolumeName(uint volume) const;
|
|
};
|
|
|
|
InstallShieldCabinet::InstallShieldCabinet() : _version(0) {
|
|
}
|
|
|
|
bool InstallShieldCabinet::open(const String &baseName) {
|
|
// Store the base name so we can generate file names
|
|
_baseName = baseName;
|
|
|
|
// Try to find the file
|
|
SeekableReadStream *header = SearchMan.createReadStreamForMember(getHeaderName());
|
|
if (!header)
|
|
header = SearchMan.createReadStreamForMember(getVolumeName(1));
|
|
|
|
if (!header) {
|
|
close();
|
|
return false;
|
|
}
|
|
|
|
// Check for the cab signature
|
|
uint32 signature = header->readUint32LE();
|
|
if (signature != 0x28635349) {
|
|
warning("InstallShieldCabinet::InstallShieldCabinet(): Signature doesn't match: expecting %x but got %x", 0x28635349, signature);
|
|
close();
|
|
return false;
|
|
}
|
|
|
|
// We support cabinet versions 5 - 13, with some exceptions:
|
|
// - obfuscated files are not deobfuscated
|
|
// - no support for files split across volumes
|
|
// - single-volume v5 cabinets only
|
|
|
|
uint32 magicBytes = header->readUint32LE();
|
|
int shift = magicBytes >> 24;
|
|
_version = shift == 1 ? (magicBytes >> 12) & 0xf : (magicBytes & 0xffff) / 100;
|
|
_version = (_version == 0) ? 5 : _version;
|
|
|
|
if (_version < 5 || _version > 13) {
|
|
warning("Unsupported CAB version %d, magic bytes %08x", _version, magicBytes);
|
|
close();
|
|
return false;
|
|
}
|
|
|
|
/* uint32 volumeInfo = */ header->readUint32LE();
|
|
uint32 cabDescriptorOffset = header->readUint32LE();
|
|
/* uint32 cabDescriptorSize = */ header->readUint32LE();
|
|
|
|
header->seek(cabDescriptorOffset);
|
|
|
|
header->skip(12);
|
|
uint32 fileTableOffset = header->readUint32LE();
|
|
header->skip(4);
|
|
uint32 fileTableSize = header->readUint32LE();
|
|
uint32 fileTableSize2 = header->readUint32LE();
|
|
uint32 directoryCount = header->readUint32LE();
|
|
header->skip(8);
|
|
uint32 fileCount = header->readUint32LE();
|
|
|
|
if (fileTableSize != fileTableSize2)
|
|
warning("file table sizes do not match");
|
|
|
|
// We're ignoring file groups and components since we
|
|
// should not need them. Moving on to the files...
|
|
|
|
if (_version >= 6) {
|
|
uint32 fileTableOffset2 = header->readUint32LE();
|
|
|
|
for (uint32 i = 0; i < fileCount; i++) {
|
|
header->seek(cabDescriptorOffset + fileTableOffset + fileTableOffset2 + i * 0x57);
|
|
FileEntry entry;
|
|
entry.flags = header->readUint16LE();
|
|
entry.uncompressedSize = header->readUint32LE();
|
|
header->skip(4);
|
|
entry.compressedSize = header->readUint32LE();
|
|
header->skip(4);
|
|
entry.offset = header->readUint32LE();
|
|
header->skip(36);
|
|
uint32 nameOffset = header->readUint32LE();
|
|
/* uint32 directoryIndex = */ header->readUint16LE();
|
|
header->skip(12);
|
|
/* entry.linkPrev = */ header->readUint32LE();
|
|
/* entry.linkNext = */ header->readUint32LE();
|
|
/* entry.linkFlags = */ header->readByte();
|
|
entry.volume = header->readUint16LE();
|
|
|
|
// Make sure the entry has a name and data inside the cab
|
|
if (nameOffset == 0 || entry.offset == 0 || (entry.flags & 8))
|
|
continue;
|
|
|
|
// Then let's get the string
|
|
header->seek(cabDescriptorOffset + fileTableOffset + nameOffset);
|
|
String fileName = header->readString();
|
|
_map[fileName] = entry;
|
|
}
|
|
} else {
|
|
header->seek(cabDescriptorOffset + fileTableOffset);
|
|
uint32 fileTableCount = directoryCount + fileCount;
|
|
Array<uint32> fileTableOffsets;
|
|
fileTableOffsets.resize(fileTableCount);
|
|
for (uint32 i = 0; i < fileTableCount; i++)
|
|
fileTableOffsets[i] = header->readUint32LE();
|
|
|
|
for (uint32 i = directoryCount; i < fileCount + directoryCount; i++) {
|
|
header->seek(cabDescriptorOffset + fileTableOffset + fileTableOffsets[i]);
|
|
uint32 nameOffset = header->readUint32LE();
|
|
/* uint32 directoryIndex = */ header->readUint32LE();
|
|
|
|
// First read in data needed by us to get at the file data
|
|
FileEntry entry;
|
|
entry.flags = header->readUint16LE();
|
|
entry.uncompressedSize = header->readUint32LE();
|
|
entry.compressedSize = header->readUint32LE();
|
|
header->skip(20);
|
|
entry.offset = header->readUint32LE();
|
|
entry.volume = 0;
|
|
|
|
// Then let's get the string
|
|
header->seek(cabDescriptorOffset + fileTableOffset + nameOffset);
|
|
String fileName = header->readString();
|
|
_map[fileName] = entry;
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
void InstallShieldCabinet::close() {
|
|
_baseName.clear();
|
|
_map.clear();
|
|
_version = 0;
|
|
}
|
|
|
|
bool InstallShieldCabinet::hasFile(const Path &path) const {
|
|
String name = path.toString();
|
|
return _map.contains(name);
|
|
}
|
|
|
|
int InstallShieldCabinet::listMembers(ArchiveMemberList &list) const {
|
|
for (FileMap::const_iterator it = _map.begin(); it != _map.end(); it++)
|
|
list.push_back(getMember(it->_key));
|
|
|
|
return _map.size();
|
|
}
|
|
|
|
const ArchiveMemberPtr InstallShieldCabinet::getMember(const Path &path) const {
|
|
String name = path.toString();
|
|
return ArchiveMemberPtr(new GenericArchiveMember(name, this));
|
|
}
|
|
|
|
SeekableReadStream *InstallShieldCabinet::createReadStreamForMember(const Path &path) const {
|
|
String name = path.toString();
|
|
if (!_map.contains(name))
|
|
return nullptr;
|
|
|
|
const FileEntry &entry = _map[name];
|
|
|
|
ScopedPtr<SeekableReadStream> stream(SearchMan.createReadStreamForMember(getVolumeName((entry.volume == 0) ? 1 : entry.volume)));
|
|
if (!stream) {
|
|
warning("Failed to open volume for file '%s'", name.c_str());
|
|
return 0;
|
|
}
|
|
|
|
if (!(entry.flags & 0x04)) {
|
|
// Uncompressed
|
|
// Return a substream
|
|
return new SeekableSubReadStream(stream.release(), entry.offset, entry.offset + entry.uncompressedSize, DisposeAfterUse::YES);
|
|
}
|
|
|
|
stream->seek(entry.offset);
|
|
|
|
#ifdef USE_ZLIB
|
|
byte *src = (byte *)malloc(entry.compressedSize);
|
|
byte *dst = (byte *)malloc(entry.uncompressedSize);
|
|
|
|
stream->read(src, entry.compressedSize);
|
|
|
|
bool result = inflateZlibInstallShield(dst, entry.uncompressedSize, src, entry.compressedSize);
|
|
free(src);
|
|
|
|
if (!result) {
|
|
warning("failed to inflate CAB file '%s'", name.c_str());
|
|
free(dst);
|
|
return nullptr;
|
|
}
|
|
|
|
return new MemoryReadStream(dst, entry.uncompressedSize, DisposeAfterUse::YES);
|
|
#else
|
|
warning("zlib required to extract compressed CAB file '%s'", name.c_str());
|
|
return 0;
|
|
#endif
|
|
}
|
|
|
|
String InstallShieldCabinet::getHeaderName() const {
|
|
return _baseName + "1.hdr";
|
|
}
|
|
|
|
String InstallShieldCabinet::getVolumeName(uint volume) const {
|
|
return String::format("%s%d.cab", _baseName.c_str(), volume);
|
|
}
|
|
|
|
} // End of anonymous namespace
|
|
|
|
Archive *makeInstallShieldArchive(const String &baseName) {
|
|
InstallShieldCabinet *cab = new InstallShieldCabinet();
|
|
if (!cab->open(baseName)) {
|
|
delete cab;
|
|
return 0;
|
|
}
|
|
|
|
return cab;
|
|
}
|
|
|
|
} // End of namespace Common
|