--- /dev/null
+/*
+Copyright (C) 2001-2006, William Joseph.
+All Rights Reserved.
+
+This file is part of GtkRadiant.
+
+GtkRadiant 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.
+
+GtkRadiant 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 GtkRadiant; if not, write to the Free Software
+Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+*/
+
+#include "archive.h"
+
+#include "idatastream.h"
+#include "cmdlib.h"
+#include "bytestreamutils.h"
+#include <algorithm>
+#include "stream/filestream.h"
+
+#include "iarchive.h"
+
+#include "archivelib.h"
+
+
+#include "plugin.h"
+
+#include <map>
+#include "string/string.h"
+#include "fs_filesystem.h"
+
+inline void buffer_findreplace(char* buffer, char find, char replace)
+{
+ while(*buffer != '\0')
+ {
+ if(*buffer == find)
+ *buffer = replace;
+ ++buffer;
+ }
+}
+
+#include "pak.h"
+
+class PakArchive : public Archive
+{
+ class PakRecord
+ {
+ public:
+ PakRecord(unsigned int position, unsigned int stream_size)
+ : m_position(position), m_stream_size(stream_size)
+ {
+ }
+ unsigned int m_position;
+ unsigned int m_stream_size;
+ };
+ typedef GenericFileSystem<PakRecord> PakFileSystem;
+ PakFileSystem m_filesystem;
+ FileInputStream m_pakfile;
+ CopiedString m_name;
+
+public:
+
+ PakArchive(const char* name)
+ : m_pakfile(name), m_name(name)
+ {
+ if(!m_pakfile.failed())
+ {
+ pakheader_t header;
+
+ m_pakfile.read(reinterpret_cast<FileInputStream::byte_type*>(header.magic), 4);
+ header.diroffset = istream_read_uint32_le(m_pakfile);
+ header.dirsize = istream_read_uint32_le(m_pakfile);
+
+ if(strncmp (header.magic, "PACK", 4) == 0)
+ {
+ m_pakfile.seek(header.diroffset);
+
+ for(unsigned int i = 0; i < header.dirsize; i += sizeof(pakentry_t))
+ {
+ pakentry_t entry;
+
+ m_pakfile.read(reinterpret_cast<FileInputStream::byte_type*>(entry.filename), 0x38);
+ entry.offset = istream_read_uint32_le(m_pakfile);
+ entry.size = istream_read_uint32_le(m_pakfile);
+
+ buffer_findreplace(entry.filename, '\\', '/');
+
+ PakFileSystem::entry_type& file = m_filesystem[entry.filename];
+ if(!file.is_directory())
+ {
+ globalOutputStream() << "Warning: pak archive " << makeQuoted(m_name.c_str()) << " contains duplicated file: " << makeQuoted(entry.filename) << "\n";
+ }
+ else
+ {
+ file = new PakRecord(entry.offset, entry.size);
+ }
+ }
+ }
+ }
+ }
+
+ ~PakArchive()
+ {
+ for(PakFileSystem::iterator i = m_filesystem.begin(); i != m_filesystem.end(); ++i)
+ delete i->second.file();
+ }
+
+ void release()
+ {
+ delete this;
+ }
+ ArchiveFile* openFile(const char* name)
+ {
+ PakFileSystem::iterator i = m_filesystem.find(name);
+ if(i != m_filesystem.end() && !i->second.is_directory())
+ {
+ PakRecord* file = i->second.file();
+ return StoredArchiveFile::create(name, m_name.c_str(), file->m_position, file->m_stream_size, file->m_stream_size);
+ }
+ return 0;
+ }
+ virtual ArchiveTextFile* openTextFile(const char* name)
+ {
+ PakFileSystem::iterator i = m_filesystem.find(name);
+ if(i != m_filesystem.end() && !i->second.is_directory())
+ {
+ PakRecord* file = i->second.file();
+ return StoredArchiveTextFile::create(name, m_name.c_str(), file->m_position, file->m_stream_size);
+ }
+ return 0;
+ }
+ bool containsFile(const char* name)
+ {
+ PakFileSystem::iterator i = m_filesystem.find(name);
+ return i != m_filesystem.end() && !i->second.is_directory();
+ }
+ void forEachFile(VisitorFunc visitor, const char* root)
+ {
+ m_filesystem.traverse(visitor, root);
+ }
+};
+
+
+Archive* OpenArchive(const char* name)
+{
+ return new PakArchive(name);
+}
+
+#if 0
+
+class TestArchive
+{
+public:
+ TestArchive()
+ {
+ Archive* archive = OpenArchive("c:/quake3/baseq3/pak0.pak");
+ ArchiveFile* file = archive->openFile("gfx/palette.lmp");
+ if(file != 0)
+ {
+ char buffer[1024];
+ file->getInputStream().read((InputStream::byte_type*)buffer, 1024);
+ file->release();
+ }
+ archive->release();
+ }
+};
+
+TestArchive g_test;
+
+#endif
+
+#if 0
+
+class TestArchive
+{
+ class TestVisitor : public Archive::IVisitor
+ {
+ public:
+ void visit(const char* name)
+ {
+ int bleh = 0;
+ }
+ };
+public:
+ TestArchive()
+ {
+ {
+ Archive* archive = OpenArchive("");
+ archive->release();
+ }
+ {
+ Archive* archive = OpenArchive("NONEXISTANTFILE");
+ archive->release();
+ }
+ {
+ Archive* archive = OpenArchive("c:/quake/id1/pak0.pak");
+ ArchiveFile* file = archive->openFile("gfx/palette.lmp");
+ if(file != 0)
+ {
+ char buffer[1024];
+ file->getInputStream().read((InputStream::byte_type*)buffer, 1024);
+ file->release();
+ }
+ TestVisitor visitor;
+ archive->forEachFile(Archive::VisitorFunc(&visitor, Archive::eFilesAndDirectories, 0), "");
+ archive->forEachFile(Archive::VisitorFunc(&visitor, Archive::eFiles, 0), "progs/");
+ archive->forEachFile(Archive::VisitorFunc(&visitor, Archive::eFiles, 0), "maps/");
+ archive->forEachFile(Archive::VisitorFunc(&visitor, Archive::eFiles, 1), "sound/ambience/");
+ archive->forEachFile(Archive::VisitorFunc(&visitor, Archive::eFilesAndDirectories, 1), "sound/");
+ archive->forEachFile(Archive::VisitorFunc(&visitor, Archive::eDirectories, 1), "sound/");
+ archive->forEachFile(Archive::VisitorFunc(&visitor, Archive::eFilesAndDirectories, 2), "sound/");
+ archive->forEachFile(Archive::VisitorFunc(&visitor, Archive::eFilesAndDirectories, 2), "");
+ archive->release();
+ }
+ }
+};
+
+TestArchive g_test;
+
+#endif