Initial commit

engines/efh/utils.cpp

@@ -0,0 +1,297 @@
+/* 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 "common/config-manager.h"
+#include "common/system.h"
+#include "common/random.h"
+#include "efh/efh.h"
+
+#include "backends/keymapper/keymapper.h"
+
+namespace Efh {
+
+void EfhEngine::decryptImpFile(bool techMapFl) {
+	debugC(1, kDebugUtils, "decryptImpFile %s", techMapFl ? "True" : "False");
+	uint16 counter = 0;
+	uint16 target;
+	uint8 *curPtr;
+
+	if (!techMapFl) {
+		_imp2PtrArray[counter++] = curPtr = _imp2;
+		target = 431;
+	} else {
+		_imp1PtrArray[counter++] = curPtr = _imp1;
+		target = 99;
+	}
+
+	do {
+		*curPtr = (*curPtr - 3) ^ 0xD7;
+		if (*curPtr == 0x40) {
+			curPtr += 3;
+			if (!techMapFl)
+				_imp2PtrArray[counter++] = curPtr;
+			else
+				_imp1PtrArray[counter++] = curPtr;
+		} else
+			++curPtr;
+	} while (*curPtr != 0x60 && counter <= target && !shouldQuit());
+
+	if (ConfMan.getBool("dump_scripts")) {
+		// Dump the decompressed IMP file
+		Common::DumpFile dump;
+		if (!techMapFl) {
+			dump.open("imp2_unc.dump");
+			dump.write(_imp2, curPtr - _imp2);
+		} else {
+			dump.open("imp1_unc.dump");
+			dump.write(_imp1, curPtr - _imp1);
+		}
+		dump.flush();
+		dump.close();
+	}
+}
+
+void EfhEngine::loadImageSet(int16 imageSetId, uint8 *buffer, uint8 **subFilesArray, uint8 *destBuffer) {
+	debugC(1, kDebugUtils, "loadImageSet %d", imageSetId);
+	Common::Path fileName(Common::String::format("imageset.%d", imageSetId));
+	rImageFile(fileName, buffer, subFilesArray, destBuffer);
+}
+
+uint32 EfhEngine::uncompressBuffer(uint8 *compressedBuf, uint8 *destBuf) {
+	debugC(1, kDebugUtils, "uncompressBuffer");
+	if (compressedBuf == nullptr || destBuf == nullptr)
+		error("uncompressBuffer - Invalid pointer used in parameter list");
+
+	uint8 *curPtrDest = destBuf;
+
+	uint16 compSize = READ_LE_UINT16(compressedBuf) + 1;
+	uint8 *curPtrCompressed = compressedBuf + 2;
+
+	// Not in the original. This has been added for debug purposes (the original function doesn't return a value)
+	uint32 decompSize = 0;
+
+	for (;;) {
+		uint8 next = *curPtrCompressed++;
+		if (--compSize <= 0)
+			break;
+
+		if (next != 0xC3) {
+			*curPtrDest++ = next;
+			++decompSize;
+			continue;
+		}
+
+		next = *curPtrCompressed++;
+		if (--compSize <= 0)
+			break;
+
+		if (next == 0) {
+			*curPtrDest++ = 0xC3;
+			++decompSize;
+			continue;
+		}
+
+		uint8 loopVal = next;
+		next = *curPtrCompressed++;
+
+		for (int i = 0; i < loopVal; ++i) {
+			*curPtrDest++ = next;
+			++decompSize;
+		}
+
+		--compSize;
+		if (compSize == 0)
+			break;
+	}
+
+	curPtrDest[0] = curPtrDest[1] = 0;
+	decompSize += 2;
+
+	return decompSize;
+}
+
+int16 EfhEngine::getRandom(int16 maxVal) {
+	debugC(1, kDebugUtils, "getRandom %d", maxVal);
+	if (maxVal <= 0)
+		return 0;
+
+	return 1 + _rnd->getRandomNumber(maxVal - 1);
+}
+
+Common::CustomEventType EfhEngine::getLastCharAfterAnimCount(int16 delay, bool waitForTTS) {
+	debugC(1, kDebugUtils, "getLastCharAfterAnimCount %d", delay);
+	if (delay == 0)
+		return kActionNone;
+
+	Common::CustomEventType action = kActionNone;
+
+	uint32 lastMs = _system->getMillis();
+	Common::TextToSpeechManager *ttsMan = g_system->getTextToSpeechManager();
+	while ((delay > 0 || (waitForTTS && ttsMan && ttsMan->isSpeaking())) && action == kActionNone && !shouldQuit()) {
+		_system->delayMillis(20);
+		uint32 newMs = _system->getMillis();
+
+		if (newMs - lastMs >= 200) {
+			lastMs = newMs;
+			--delay;
+			handleAnimations();
+		}
+
+		action = handleAndMapInput(false);
+	}
+
+	if (waitForTTS) {
+		stopTextToSpeech();
+	}
+
+	return action;
+}
+
+Common::CustomEventType EfhEngine::getInput(int16 delay) {
+	debugC(1, kDebugUtils, "getInput %d", delay);
+	if (delay == 0)
+		return kActionNone;
+
+	Common::CustomEventType lastAction = kActionNone;
+	Common::CustomEventType retVal = kActionNone;
+	uint32 lastMs = _system->getMillis();
+	Common::TextToSpeechManager *ttsMan = g_system->getTextToSpeechManager();
+	while ((delay > 0 || (ttsMan && ttsMan->isSpeaking())) && !shouldQuit()) {
+		_system->delayMillis(20);
+		uint32 newMs = _system->getMillis();
+
+		if (newMs - lastMs >= 200) {
+			lastMs = newMs;
+			--delay;
+			handleAnimations();
+		}
+
+		lastAction = handleAndMapInput(false);
+		if (lastAction != kActionNone)
+			retVal = lastAction;
+	}
+	return retVal;
+}
+
+Common::CustomEventType EfhEngine::waitForKey() {
+	debugC(1, kDebugUtils, "waitForKey");
+	Common::CustomEventType retVal = kActionNone;
+	Common::Event event;
+
+	uint32 lastMs = _system->getMillis();
+	while (retVal == kActionNone && !shouldQuit()) {
+		_system->delayMillis(20);
+		uint32 newMs = _system->getMillis();
+
+		if (newMs - lastMs >= 200) {
+			lastMs = newMs;
+			handleAnimations();
+		}
+
+		_system->getEventManager()->pollEvent(event);
+		switch (event.type) {
+		case Common::EVENT_KEYUP:
+			retVal = kActionNo;
+			break;
+		case Common::EVENT_CUSTOM_ENGINE_ACTION_END:
+			if (event.customType == kActionQuit) {
+				quitGame();
+			} else
+				retVal = event.customType;
+			break;
+		default:
+			break;
+		}
+	}
+
+	return retVal;
+}
+
+Common::CustomEventType EfhEngine::handleAndMapInput(bool animFl) {
+	debugC(1, kDebugUtils, "handleAndMapInput %s", animFl ? "True" : "False");
+	// The original checks for the joystick input
+	Common::Event event;
+	_system->getEventManager()->pollEvent(event);
+	Common::CustomEventType retVal = kActionNone;
+
+	uint32 lastMs = _system->getMillis();
+	while (retVal == kActionNone && !shouldQuit()) {
+		_system->getEventManager()->pollEvent(event);
+
+		if (event.type == Common::EVENT_CUSTOM_ENGINE_ACTION_END) {
+			if (event.customType == kActionQuit)
+				quitGame();
+			else
+				retVal = event.customType;
+		}
+
+		if (animFl) {
+			_system->delayMillis(20);
+			uint32 newMs = _system->getMillis();
+
+			if (newMs - lastMs >= 200) {
+				lastMs = newMs;
+				handleAnimations();
+			}
+		} else
+			break;
+	}
+	return retVal;
+}
+
+bool EfhEngine::getValidationFromUser() {
+	debugC(1, kDebugUtils, "getValidationFromUser");
+
+	setKeymap(kKeymapMenu);
+
+	Common::CustomEventType action = handleAndMapInput(true);
+
+	setKeymap(kKeymapDefault);
+
+	if (action == kActionYes) // or if joystick button 1
+		return true;
+
+	return false;
+}
+
+uint32 EfhEngine::ROR(uint32 val, uint8 shiftVal) {
+	return val >> shiftVal | val << (32 - shiftVal);
+}
+
+Common::String EfhEngine::getArticle(int pronoun) {
+	if (pronoun == 2)
+		return "The ";
+
+	return "";
+}
+
+void EfhEngine::setKeymap(EfhKeymapCode keymapCode) {
+	Common::Keymapper *keymapper = g_system->getEventManager()->getKeymapper();
+	keymapper->disableAllGameKeymaps();
+	keymapper->getKeymap("efh-quit")->setEnabled(true);
+	for(int i = 0;i < ARRAYSIZE(_efhKeymaps); ++i) {
+		if (_efhKeymaps[i]._keymap == keymapCode) {
+			keymapper->getKeymap(_efhKeymaps[i]._id)->setEnabled(true);
+			break;
+		}
+	}
+}
+} // End of namespace Efh