Implemented saving/loading in Woodruff. Should work, although it tries to save and load sprites (which we ignore currently, doesn't seem to have any impact).

svn-id: r32040

2 files changed, 208 insertions, 0 deletions

diff --git a/engines/gob/saveload.h b/engines/gob/saveload.h
index d13bd2c15f..9581b43a6c 100644
--- a/engines/gob/saveload.h
+++ b/engines/gob/saveload.h
@@ -335,9 +335,12 @@ class SaveLoad_v4 : public SaveLoad {
 public:
 	enum SaveType {
 		kSaveNone,
+		kSaveGame,
 		kSaveTempBuffer
 	};
 
+	bool _firstSizeGame;
+
 	SaveLoad_v4(GobEngine *vm, const char *targetName);
 	virtual ~SaveLoad_v4();
 
@@ -356,6 +359,11 @@ protected:
 	int32 _varSize;
 
 	PagedBuffer _tmpBuffer;
+	StagedSave _save;
+
+	byte _propBuffer[1000];
+	byte _indexBuffer[1200];
+	bool _hasIndex;
 
 	virtual int getSaveType(const char *fileName);
 
@@ -363,10 +371,16 @@ protected:
 	virtual bool loadVersioned(int type, int16 dataVar, int32 size, int32 offset);
 	virtual bool saveVersioned(int type, int16 dataVar, int32 size, int32 offset);
 
+	int getSlot(int32 offset) const;
+	int getSlotRemainder(int32 offset) const;
+
+	int32 getSizeGame(SaveFile &saveFile);
 	int32 getSizeTempBuffer(SaveFile &saveFile);
 
+	bool loadGame(SaveFile &saveFile, int16 dataVar, int32 size, int32 offset);
 	bool loadTempBuffer(SaveFile &saveFile, int16 dataVar, int32 size, int32 offset);
 
+	bool saveGame(SaveFile &saveFile, int16 dataVar, int32 size, int32 offset);
 	bool saveTempBuffer(SaveFile &saveFile, int16 dataVar, int32 size, int32 offset);
 
 	void assertInited();
diff --git a/engines/gob/saveload_v4.cpp b/engines/gob/saveload_v4.cpp
index 75e44cc1bc..a770f03c00 100644
--- a/engines/gob/saveload_v4.cpp
+++ b/engines/gob/saveload_v4.cpp
@@ -33,16 +33,27 @@
 namespace Gob {
 
 SaveLoad_v4::SaveFile SaveLoad_v4::_saveFiles[] = {
+	{  "cat.inf", 0, kSaveModeSave, kSaveGame       },
 	{ "save.tmp", 0, kSaveModeSave, kSaveTempBuffer }
 };
 
 SaveLoad_v4::SaveLoad_v4(GobEngine *vm, const char *targetName) :
 	SaveLoad(vm, targetName) {
 
+	_firstSizeGame = true;
+
+	_saveFiles[0].destName = new char[strlen(targetName) + 5];
+	_saveFiles[1].destName = 0;
+
+	sprintf(_saveFiles[0].destName, "%s.s00", targetName);
+
 	_varSize = 0;
+	_hasIndex = false;
+	memset(_propBuffer, 0, 1000);
 }
 
 SaveLoad_v4::~SaveLoad_v4() {
+	delete[] _saveFiles[0].destName;
 }
 
 SaveLoad::SaveMode SaveLoad_v4::getSaveMode(const char *fileName) {
@@ -67,6 +78,8 @@ int32 SaveLoad_v4::getSizeVersioned(int type) {
 	assertInited();
 
 	switch (_saveFiles[type].type) {
+	case kSaveGame:
+		return getSizeGame(_saveFiles[type]);
 	case kSaveTempBuffer:
 		return getSizeTempBuffer(_saveFiles[type]);
 	default:
@@ -80,6 +93,13 @@ bool SaveLoad_v4::loadVersioned(int type, int16 dataVar, int32 size, int32 offse
 	assertInited();
 
 	switch (_saveFiles[type].type) {
+	case kSaveGame:
+		if (loadGame(_saveFiles[type], dataVar, size, offset))
+			return true;
+
+		warning("While loading from slot %d", getSlot(offset));
+		break;
+
 	case kSaveTempBuffer:
 		if (loadTempBuffer(_saveFiles[type], dataVar, size, offset))
 			return true;
@@ -98,6 +118,13 @@ bool SaveLoad_v4::saveVersioned(int type, int16 dataVar, int32 size, int32 offse
 	assertInited();
 
 	switch (_saveFiles[type].type) {
+	case kSaveGame:
+		if (saveGame(_saveFiles[type], dataVar, size, offset))
+			return true;
+
+		warning("While saving to slot %d", getSlot(offset));
+		break;
+
 	case kSaveTempBuffer:
 		if (saveTempBuffer(_saveFiles[type], dataVar, size, offset))
 			return true;
@@ -112,25 +139,188 @@ bool SaveLoad_v4::saveVersioned(int type, int16 dataVar, int32 size, int32 offse
 	return false;
 }
 
+int SaveLoad_v4::getSlot(int32 offset) const {
+	return ((offset - 1700) / _varSize);
+}
+
+int SaveLoad_v4::getSlotRemainder(int32 offset) const {
+	return ((offset - 1700) % _varSize);
+}
+
+int32 SaveLoad_v4::getSizeGame(SaveFile &saveFile) {
+	if (_firstSizeGame) {
+		_firstSizeGame = false;
+		return -1;
+	}
+
+	Common::SaveFileManager *saveMan = g_system->getSavefileManager();
+	Common::InSaveFile *in;
+	int32 size = -1;
+
+	for (int i = 29; i >= 0; i--) {
+		in = saveMan->openForLoading(setCurrentSlot(saveFile.destName, i));
+		if (in) {
+			delete in;
+			size = (i + 1) * _varSize + 1700;
+			break;
+		}
+	}
+
+	return size;
+}
+
 int32 SaveLoad_v4::getSizeTempBuffer(SaveFile &saveFile) {
 	return _tmpBuffer.getSize();
 }
 
+bool SaveLoad_v4::loadGame(SaveFile &saveFile,
+		int16 dataVar, int32 size, int32 offset) {
+
+	if (size == 0) {
+		dataVar = 0;
+		size = _varSize;
+	}
+
+	if (offset < 500) {
+		debugC(3, kDebugSaveLoad, "Loading global properties");
+
+		if ((size + offset) > 500) {
+			warning("Wrong global properties list size (%d, %d)", size, offset);
+			return false;
+		}
+
+		memcpy(_vm->_global->_inter_variables + dataVar,
+				_propBuffer + offset, size);
+		memcpy(_vm->_global->_inter_variablesSizes + dataVar,
+				_propBuffer + offset + 500, size);
+
+	} else if (offset == 500) {
+		debugC(3, kDebugSaveLoad, "Loading save index");
+
+		if (size != 1200) {
+			warning("Requested index has wrong size (%d)", size);
+			return false;
+		}
+
+		SaveLoad::buildIndex(_vm->_global->_inter_variables + dataVar,
+				saveFile.destName, 30, 40, 1000);
+		memset(_vm->_global->_inter_variablesSizes + dataVar, 0, 1200);
+
+	} else {
+		int slot = getSlot(offset);
+		int slotRem = getSlotRemainder(offset);
+
+		debugC(2, kDebugSaveLoad, "Loading from slot %d", slot); 
+
+		SaveLoad::setCurrentSlot(saveFile.destName, slot);
+
+		if ((slot < 0) || (slot >= 30) || (slotRem != 0)) {
+			warning("Invalid loading procedure (%d, %d, %d, %d, %d)",
+					dataVar, size, offset, slot, slotRem);
+			return false;
+		}
+
+		if (!_save.load(dataVar, size, 540, saveFile.destName,
+					_vm->_global->_inter_variables, _vm->_global->_inter_variablesSizes))
+			return false;
+	}
+
+	return true;
+}
+
 bool SaveLoad_v4::loadTempBuffer(SaveFile &saveFile,
 		int16 dataVar, int32 size, int32 offset) {
 
 	debugC(3, kDebugSaveLoad, "Loading from the temporary buffer (%d, %d, %d)",
 			dataVar, size, offset);
 
+	if (size < 0) {
+		warning("Woodruff stub: Read screenshot");
+		return false;
+	}
+
 	return _tmpBuffer.read(_vm->_global->_inter_variables + dataVar, size, offset);
 }
 
+bool SaveLoad_v4::saveGame(SaveFile &saveFile,
+		int16 dataVar, int32 size, int32 offset) {
+
+	if (size == 0) {
+		dataVar = 0;
+		size = _varSize;
+	}
+
+	if (offset < 500) {
+		debugC(3, kDebugSaveLoad, "Loading global properties");
+
+		if ((size + offset) > 500) {
+			warning("Wrong global properties list size (%d, %d)", size, offset);
+			return false;
+		}
+
+		memcpy(_propBuffer + offset,
+				_vm->_global->_inter_variables + dataVar, size);
+		memcpy(_propBuffer + offset + 500,
+				_vm->_global->_inter_variablesSizes + dataVar, size);
+
+	} else if (offset == 500) {
+		debugC(3, kDebugSaveLoad, "Saving save index");
+
+		if (size != 1200) {
+			warning("Requested index has wrong size (%d)", size);
+			return false;
+		}
+
+		memcpy(_indexBuffer, _vm->_global->_inter_variables + dataVar, size);
+		_hasIndex = true;
+
+	} else {
+		int slot = getSlot(offset);
+		int slotRem = getSlotRemainder(offset);
+
+		debugC(2, kDebugSaveLoad, "Saving to slot %d", slot);
+
+		SaveLoad::setCurrentSlot(saveFile.destName, slot);
+
+		if ((slot < 0) || (slot >= 30) || (slotRem != 0)) {
+			warning("Invalid saving procedure (%d, %d, %d, %d, %d)",
+					dataVar, size, offset, slot, slotRem);
+			return false;
+		}
+
+		if (!_hasIndex) {
+			warning("No index written yet");
+			return false;
+		}
+
+		_hasIndex = false;
+
+		if(!_save.save(0, 500, 0, saveFile.destName, _propBuffer, _propBuffer + 500))
+			return false;
+
+		if(!_save.save(0, 40, 500, saveFile.destName, _indexBuffer + (slot * 40), 0))
+			return false;
+
+		if (!_save.save(dataVar, size, 540, saveFile.destName,
+					_vm->_global->_inter_variables, _vm->_global->_inter_variablesSizes))
+			return false;
+
+	}
+
+	return true;
+}
+
 bool SaveLoad_v4::saveTempBuffer(SaveFile &saveFile,
 		int16 dataVar, int32 size, int32 offset) {
 
 	debugC(3, kDebugSaveLoad, "Saving to the temporary buffer (%d, %d, %d)",
 			dataVar, size, offset);
 
+	if (size < 0) {
+		warning("Woodruff stub: Write screenshot");
+		return false;
+	}
+
 	return _tmpBuffer.write(_vm->_global->_inter_variables + dataVar, size, offset);
 }
 
@@ -139,6 +329,10 @@ void SaveLoad_v4::assertInited() {
 		return;
 
 	_varSize = READ_LE_UINT32(_vm->_game->_totFileData + 0x2C) * 4;
+
+	_save.addStage(500);
+	_save.addStage(40, false);
+	_save.addStage(_varSize);
 }
 
 } // End of namespace Gob