aboutsummaryrefslogtreecommitdiff
path: root/engines/sword25/sword25.cpp
blob: f850bfb43bb2f5468035442956a9f817155608ca (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
/* 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.
 *
 * $URL$
 * $Id$
 *
 */

/*
 * This code is based on Broken Sword 2.5 engine
 *
 * Copyright (c) Malte Thiesen, Daniel Queteschiner and Michael Elsdoerfer
 *
 * Licensed under GNU GPL v2
 *
 */

#include "common/config-manager.h"
#include "common/debug-channels.h"
#include "engines/util.h"

#include "sword25/sword25.h"
#include "sword25/kernel/filesystemutil.h"
#include "sword25/kernel/kernel.h"
#include "sword25/package/packagemanager.h"
#include "sword25/script/script.h"

namespace Sword25 {

#define BS_LOG_PREFIX "MAIN"

const char *const PACKAGE_MANAGER = "archiveFS";
const char *const DEFAULT_SCRIPT_FILE = "/system/boot.lua";

void LogToStdout(const char *Message) {
	debugN(0, "%s", Message);
}

Sword25Engine::Sword25Engine(OSystem *syst, const ADGameDescription *gameDesc):
	Engine(syst),
	_gameDescription(gameDesc) {

	DebugMan.addDebugChannel(kDebugScript, "Script", "Script debug level");
}

Sword25Engine::~Sword25Engine() {
}

Common::Error Sword25Engine::run() {
	// Engine initialisation
	Common::StringArray commandParameters;
	Common::Error errorCode = AppStart(commandParameters);
	if (errorCode != Common::kNoError) {
		AppEnd();
		return errorCode;
	}

	// Run the game
	bool RunSuccess = AppMain();

	// Engine de-initialisation
	bool DeinitSuccess = AppEnd();

	return (RunSuccess && DeinitSuccess) ? Common::kNoError : Common::kUnknownError;
}

Common::Error Sword25Engine::AppStart(const Common::StringArray &CommandParameters) {
	// All log messages will be sent to StdOut
	BS_Log::RegisterLogListener(LogToStdout);

	// Initialise the graphics mode to ARGB8888
	Graphics::PixelFormat format = Graphics::PixelFormat(4, 8, 8, 8, 8, 16, 8, 0, 24);
	initGraphics(800, 600, true, &format);
	if (format != g_system->getScreenFormat())
		return Common::kUnsupportedColorMode;

	// Kernel initialization
	if (!Kernel::GetInstance()->GetInitSuccess()) {
		BS_LOG_ERRORLN("Kernel initialization failed.");
		return Common::kUnknownError;
	}

	// Package-Manager starten, damit die Packfiles geladen werden k�nnen.
	PackageManager *PackageManagerPtr = static_cast<PackageManager *>(Kernel::GetInstance()->NewService("package", PACKAGE_MANAGER));
	if (!PackageManagerPtr) {
		BS_LOG_ERRORLN("Packagemanager initialization failed.");
		return Common::kUnknownError;
	}

	// Packages laden oder das aktuelle Verzeichnis mounten, wenn das �ber Kommandozeile angefordert wurde.
	if (getGameFlags() & GF_EXTRACTED) {
		if (!PackageManagerPtr->LoadDirectoryAsPackage(ConfMan.get("path"), "/"))
			return Common::kUnknownError;
	} else {
		if (!LoadPackages())
			return Common::kUnknownError;
	}

	// Einen Pointer auf den Skript-Engine holen.
	ScriptEngine *ScriptPtr = static_cast<ScriptEngine *>(Kernel::GetInstance()->GetService("script"));
	if (!ScriptPtr) {
		BS_LOG_ERRORLN("Script intialization failed.");
		return Common::kUnknownError;
	}

	// Die Kommandozeilen-Parameter der Skriptumgebung zug�nglich machen.
	ScriptPtr->SetCommandLine(CommandParameters);

	return Common::kNoError;
}

bool Sword25Engine::AppMain() {
	// The main script start. This script loads all the other scripts and starts the actual game.
	ScriptEngine *ScriptPtr = static_cast<ScriptEngine *>(Kernel::GetInstance()->GetService("script"));
	BS_ASSERT(ScriptPtr);
	ScriptPtr->ExecuteFile(DEFAULT_SCRIPT_FILE);

	return true;
}

bool Sword25Engine::AppEnd() {
	// The kernel is shutdown, and un-initialises all subsystems
	Kernel::DeleteInstance();

	// Free the log file if it was used
	BS_Log::_CloseLog();

	return true;
}

bool Sword25Engine::LoadPackages() {
	PackageManager *PackageManagerPtr = reinterpret_cast<PackageManager *>(Kernel::GetInstance()->GetService("package"));
	BS_ASSERT(PackageManagerPtr);

	// Load the main package
	if (!PackageManagerPtr->LoadPackage("data.b25c", "/")) return false;

	// Get the contents of the main program directory and sort them alphabetically
	Common::StringArray Filenames = FileSystemUtil::GetInstance().GetFilesInDirectory(".");
	Common::sort(Filenames.begin(), Filenames.end());

	// Identity all patch packages
	// The filename of patch packages must have the form patch??.b25c, with the question marks
	// are placeholders for numbers.
	// Since the filenames have been sorted, patches are mounted with low numbers first, through
	// to ones with high numbers. This is important, because newly mount packages overwrite
	// existing files in the virtual file system, if they include files with the same name.
	for (Common::StringArray::const_iterator it = Filenames.begin(); it != Filenames.end(); ++it) {
		const Common::String &CurFilename = *it;

		// Is the current file a patch package?
		static const Common::String PatchPattern = "patch???.b25c";
		if (CurFilename.size() == PatchPattern.size()) {
			// Check the file against the patch pattern character by character
			Common::String::const_iterator PatchPatternIt = PatchPattern.begin();
			Common::String::const_iterator CurFilenameIt = CurFilename.begin();
			for (; PatchPatternIt != PatchPattern.end(); ++PatchPatternIt, ++CurFilenameIt) {
				if (*PatchPatternIt == '?') {
					if (*CurFilenameIt < '0' || *CurFilenameIt > '9') break;
				} else {
					if (*PatchPatternIt != *CurFilenameIt) break;
				}
			}

			if (PatchPatternIt == PatchPattern.end()) {
				// The pattern fits, so the file should be mounted
				if (!PackageManagerPtr->LoadPackage(CurFilename, "/")) return false;
			}
		}
	}

	// Identity and mount all language packages
	// The filename of the packages have the form lang_*.b25c (eg. lang_de.b25c)
	for (Common::StringArray::const_iterator it = Filenames.begin(); it != Filenames.end(); ++it) {
		const Common::String &CurFilename = *it;

		static const Common::String Prefix = "lang_";
		static const Common::String Suffix = ".b25c";

		// Make sure the filename prefix and suffix has characters between them
		if ((CurFilename.size() >= Prefix.size() && Common::String(CurFilename.begin(), CurFilename.begin() + Prefix.size()) == Prefix) &&  // Prefix test
		        (CurFilename.size() >= Suffix.size() && Common::String(CurFilename.end() - Suffix.size(), CurFilename.end()) == Suffix) &&      // Suffix test
		        (CurFilename.size() > Prefix.size() + Suffix.size())) {
			// Pattern matches - the file should be mounted
			if (!PackageManagerPtr->LoadPackage(CurFilename, "/")) return false;
		}
	}

	return true;
}

} // End of namespace Sword25