bool GameVariableManager::ReadFrom(std::fstream & stream)
{
// Read version.
int version;
stream.read((char*) &version, sizeof(int));
if (version != 0)
return false;
int num;
// Readn umber of vars.
int sizeofInt = sizeof(int);
assert(sizeofInt == 4);
stream.read((char*)&num, sizeof(int));
for (int i = 0; i < num; ++i)
{
GameVar * newGV = new GameVar();
bool ok = newGV->ReadFrom(stream);
if (!ok)
return false;
// Check if a duplicate exists, if so copy over the values.
GameVar * exist = Get(newGV->name);
if (exist)
{
*exist = *newGV;
delete newGV;
}
else
{
gameVariables.Add(newGV);
}
}
return true;
}
int FullpipeEngine::getObjectState(const char *objname) {
GameVar *var = _gameLoader->_gameVar->getSubVarByName("OBJSTATES");
if (var)
return var->getSubVarAsInt(objname);
return 0;
}
void FullpipeEngine::setObjectState(const char *name, int state) {
GameVar *var = _gameLoader->_gameVar->getSubVarByName("OBJSTATES");
if (!var) {
var = _gameLoader->_gameVar->addSubVarAsInt("OBJSTATES", 0);
}
var->setSubVarAsInt(name, state);
}
void FullpipeEngine::setSwallowedEggsState() {
GameVar *v = _gameLoader->_gameVar->getSubVarByName("OBJSTATES")->getSubVarByName(sO_GulpedEggs);
g_vars->swallowedEgg1 = v->getSubVarByName(sO_Egg1);
g_vars->swallowedEgg2 = v->getSubVarByName(sO_Egg2);
g_vars->swallowedEgg3 = v->getSubVarByName(sO_Egg3);
g_vars->swallowedEgg1->_value.intValue = 0;
g_vars->swallowedEgg2->_value.intValue = 0;
g_vars->swallowedEgg3->_value.intValue = 0;
}
GameVar * GameVariableManager::CreateTime(String name, Time initialValue)
{
GameVar * exists = Get(name);
if (exists)
{
if (exists->Type() == GameVariable::TIME)
return exists;
assert(false);
return NULL;
}
GameVar * timeVar = new GameVar(name, GameVariable::TIME);
timeVar->timeValue = initialValue;
timeVars.Add(timeVar);
gameVariables.Add(timeVar);
return timeVar;
}
int FullpipeEngine::getObjectEnumState(const char *name, const char *state) {
GameVar *var = _gameLoader->_gameVar->getSubVarByName("OBJSTATES");
if (!var) {
var = _gameLoader->_gameVar->addSubVarAsInt("OBJSTATES", 0);
}
var = var->getSubVarByName(name);
if (var) {
var = var->getSubVarByName("ENUMSTATES");
if (var)
return var->getSubVarAsInt(state);
}
return 0;
}
void scene03_initScene(Scene *sc) {
debugC(1, kDebugSceneLogic, "scene03_initScene()");
g_vars->scene03_eggeater = sc->getStaticANIObject1ById(ANI_EGGEATER, -1);
g_vars->scene03_domino = sc->getStaticANIObject1ById(ANI_DOMINO_3, -1);
GameVar *v = g_fp->_gameLoader->_gameVar->getSubVarByName("OBJSTATES")->getSubVarByName(sO_GulpedEggs);
g_vars->swallowedEgg1 = v->getSubVarByName(sO_Egg1);
g_vars->swallowedEgg2 = v->getSubVarByName(sO_Egg2);
g_vars->swallowedEgg3 = v->getSubVarByName(sO_Egg3);
g_fp->lift_setButton(sO_Level2, ST_LBN_2N);
g_fp->lift_init(sc, QU_SC3_ENTERLIFT, QU_SC3_EXITLIFT);
debugC(2, kDebugSceneLogic, "scene03: egg1: %d egg2: %d egg3: %d", g_vars->swallowedEgg1->_value.intValue,
g_vars->swallowedEgg2->_value.intValue, g_vars->swallowedEgg3->_value.intValue);
}
void FullpipeEngine::initArcadeKeys(const char *varname) {
_arcadeKeys.clear();
GameVar *var = getGameLoaderGameVar()->getSubVarByName(varname)->getSubVarByName("KEYPOS");
if (!var)
return;
int cnt = var->getSubVarsCount();
for (int i = 0; i < cnt; i++) {
Common::Point *point = new Common::Point;
GameVar *sub = var->getSubVarByIndex(i);
point->x = sub->getSubVarAsInt("X");
point->y = sub->getSubVarAsInt("Y");
_arcadeKeys.push_back(point);
}
}
void FullpipeEngine::playTrack(GameVar *sceneVar, const char *name, bool delayed) {
warning("STUB: FullpipeEngine::playTrack(var, %s, %d)", name, delayed);
#if 0
stopSoundStream2();
if (soundStream3)
FSOUND_Stream_Stop(soundStream4);
#endif
if (_musicLocal)
stopAllSoundStreams();
GameVar *var = sceneVar->getSubVarByName(name);
memset(_sceneTracks, 0, sizeof(_sceneTracks));
_numSceneTracks = 0;
_sceneTrackHasSequence = false;
if (!var)
return;
_musicGameVar = var;
GameVar *tr = var->getSubVarByName("TRACKS");
if (tr) {
GameVar *sub = tr->_subVars;
while (sub) {
if (_musicAllowed & sub->_value.intValue) {
Common::strlcpy(_sceneTracks[_numSceneTracks], sub->_varName, 260);
_numSceneTracks++;
}
sub = sub->_nextVarObj;
}
}
_musicMinDelay = var->getSubVarAsInt("MINDELAY");
_musicMaxDelay = var->getSubVarAsInt("MAXDELAY");
_musicLocal = var->getSubVarAsInt("LOCAL");
GameVar *seq = var->getSubVarByName("SEQUENCE");
if (seq) {
_sceneTrackHasSequence = true;
Common::strlcpy(_trackName, seq->_value.stringValue, 2600);
}
if (delayed) {
if (_sceneTrackIsPlaying && _numSceneTracks == 1) {
if (strcmp(_sceneTracksCurrentTrack, _sceneTracks[0]))
stopAllSoundStreams();
}
_trackStartDelay = var->getSubVarAsInt("STARTDELAY");
}
}
void FullpipeEngine::setSceneMusicParameters(GameVar *gvar) {
warning("STUB: FullpipeEngine::setSceneMusicParameters()");
#if 0
stopSoundStream2();
if (soundStream3)
FSOUND_Stream_Stop(soundStream4);
#endif
if (_musicLocal)
stopAllSoundStreams();
GameVar *var = gvar->getSubVarByName("MUSIC");
memset(_sceneTracks, 0, sizeof(_sceneTracks));
_numSceneTracks = 0;
_sceneTrackHasSequence = false;
if (!var)
return;
_musicGameVar = var;
GameVar *tr = var->getSubVarByName("TRACKS");
if (tr) {
GameVar *sub = tr->_subVars;
while (sub) {
if (_musicAllowed & sub->_value.intValue) {
Common::strlcpy(_sceneTracks[_numSceneTracks], sub->_varName, 260);
_numSceneTracks++;
}
sub = sub->_nextVarObj;
}
}
_musicMinDelay = var->getSubVarAsInt("MINDELAY");
_musicMaxDelay = var->getSubVarAsInt("MAXDELAY");
_musicLocal = var->getSubVarAsInt("LOCAL");
GameVar *seq = var->getSubVarByName("SEQUENCE");
if (seq) {
_sceneTrackHasSequence = true;
Common::strlcpy(_trackName, seq->_value.stringValue, 2600);
}
if (_musicLocal)
stopAllSoundStreams();
if (!_sceneTrackIsPlaying || _musicLocal)
_trackStartDelay = var->getSubVarAsInt("STARTDELAY");
}
void FullpipeEngine::setLevelStates() {
GameVar *v = _gameLoader->_gameVar->getSubVarByName("OBJSTATES")->getSubVarByName(sO_LiftButtons);
if (v) {
v->setSubVarAsInt(sO_Level0, 2833);
v->setSubVarAsInt(sO_Level1, 2754);
v->setSubVarAsInt(sO_Level2, 2757);
v->setSubVarAsInt(sO_Level3, 2760);
v->setSubVarAsInt(sO_Level4, 2763);
v->setSubVarAsInt(sO_Level5, 2766);
v->setSubVarAsInt(sO_Level6, 2769);
v->setSubVarAsInt(sO_Level7, 2772);
v->setSubVarAsInt(sO_Level8, 2775);
v->setSubVarAsInt(sO_Level9, 2778);
}
}
bool GameLoader::gotoScene(int sceneId, int entranceId) {
SceneTag *st;
int sc2idx = getSceneTagBySceneId(sceneId, &st);
if (sc2idx < 0)
return false;
if (!_sc2array[sc2idx]._isLoaded)
return false;
if (_sc2array[sc2idx]._entranceDataCount < 1) {
g_fp->_currentScene = st->_scene;
return true;
}
if (_sc2array[sc2idx]._entranceDataCount <= 0)
return false;
int entranceIdx = 0;
if (sceneId != 726) // WORKAROUND
for (entranceIdx = 0; _sc2array[sc2idx]._entranceData[entranceIdx]->_field_4 != entranceId; entranceIdx++) {
if (entranceIdx >= _sc2array[sc2idx]._entranceDataCount)
return false;
}
GameVar *sg = _gameVar->getSubVarByName("OBJSTATES")->getSubVarByName("SAVEGAME");
if (sg || (sg = _gameVar->getSubVarByName("OBJSTATES")->addSubVarAsInt("SAVEGAME", 0)) != 0)
sg->setSubVarAsInt("Entrance", entranceId);
if (!g_fp->sceneSwitcher(_sc2array[sc2idx]._entranceData[entranceIdx]))
return false;
g_fp->_msgObjectId2 = 0;
g_fp->_msgY = -1;
g_fp->_msgX = -1;
g_fp->_currentScene = st->_scene;
MessageQueue *mq1 = g_fp->_currentScene->getMessageQueueById(_sc2array[sc2idx]._entranceData[entranceIdx]->_messageQueueId);
if (mq1) {
MessageQueue *mq = new MessageQueue(mq1, 0, 0);
StaticANIObject *stobj = g_fp->_currentScene->getStaticANIObject1ById(_field_FA, -1);
if (stobj) {
stobj->_flags &= 0x100;
ExCommand *ex = new ExCommand(stobj->_id, 34, 256, 0, 0, 0, 1, 0, 0, 0);
ex->_field_14 = 256;
ex->_messageNum = 0;
ex->_excFlags |= 3;
mq->addExCommandToEnd(ex);
}
mq->setFlags(mq->getFlags() | 1);
if (!mq->chain(0)) {
delete mq;
return false;
}
} else {
StaticANIObject *stobj = g_fp->_currentScene->getStaticANIObject1ById(_field_FA, -1);
if (stobj)
stobj->_flags &= 0xfeff;
}
return true;
}
void scene01_fixEntrance() {
GameVar *var = g_fp->getGameLoaderGameVar()->getSubVarByName("OBJSTATES")->getSubVarByName("SAVEGAME");
if (var->getSubVarAsInt("Entrance") == TrubaLeft)
var->setSubVarAsInt("Entrance", TrubaRight);
}
bool GameLoader::writeSavegame(Scene *sc, const char *fname) {
GameVar *v = _gameVar->getSubVarByName("OBJSTATES")->getSubVarByName("SAVEGAME");
if (!v) {
v = _gameVar->getSubVarByName("OBJSTATES")->addSubVarAsInt("SAVEGAME", 0);
if (!v) {
warning("No state to save");
return false;
}
}
SaveHeader header;
v->setSubVarAsInt("Scene", sc->_sceneId);
saveScenePicAniInfos(sc->_sceneId);
memset(&header, 0, sizeof(header));
header.version = 48; // '0'
strcpy(header.magic, "FullPipe Savegame");
header.updateCounter = _updateCounter;
header.unkField = 1;
Common::MemoryWriteStreamDynamic stream;
MfcArchive *archive = new MfcArchive(&stream);
v = _gameVar->getSubVarByName("OBJSTATES");
GameVar *nxt = 0;
GameVar *prv = 0;
GameVar *par;
if (v) {
nxt = v->_nextVarObj;
prv = v->_prevVarObj;
par = v->_parentVarObj;
v->_parentVarObj = 0;
v->_nextVarObj = 0;
v->_prevVarObj = 0;
}
archive->writeObject(v);
if (v) {
v->_parentVarObj = par;
v->_nextVarObj = nxt;
v->_prevVarObj = prv;
}
getGameLoaderInventory()->savePartial(*archive);
archive->writeUint32LE(_sc2array.size());
debugC(3, kDebugLoading, "Saving %d infos", _sc2array.size());
for (uint i = 0; i < _sc2array.size(); i++) {
archive->writeUint32LE(_sc2array[i]._picAniInfosCount);
if (_sc2array[i]._picAniInfosCount)
debugC(3, kDebugLoading, "Count %d: %d", i, _sc2array[i]._picAniInfosCount);
for (uint j = 0; j < _sc2array[i]._picAniInfosCount; j++) {
_sc2array[i]._picAniInfos[j]->save(*archive);
}
}
header.encSize = stream.size();
// Now obfuscate the data
for (uint i = 0; i < header.encSize; i++)
stream.getData()[i] += i & 0x7f;
if (_savegameCallback)
_savegameCallback(archive, true);
// Now dump it into save file
Common::OutSaveFile *saveFile = g_system->getSavefileManager()->openForSaving(fname);
if (!saveFile) {
warning("Cannot open file for writing: %s", fname);
return false;
}
saveFile->writeUint32LE(header.version);
saveFile->write(header.magic, 32);
saveFile->writeUint32LE(header.updateCounter);
saveFile->writeUint32LE(header.unkField);
saveFile->writeUint32LE(header.encSize);
debugC(3, kDebugLoading, "version: %d magic: %s updateCounter: %d unkField: %d encSize: %d, pos: %d",
header.version, header.magic, header.updateCounter, header.unkField, header.encSize, saveFile->pos());
saveFile->write(stream.getData(), stream.size());
uint headerPos = saveFile->pos();
FullpipeSavegameHeader header2;
strcpy(header2.id, "SVMCR");
header2.version = FULLPIPE_SAVEGAME_VERSION;
TimeDate curTime;
g_system->getTimeAndDate(curTime);
header2.date = ((curTime.tm_mday & 0xFF) << 24) | (((curTime.tm_mon + 1) & 0xFF) << 16) | ((curTime.tm_year + 1900) & 0xFFFF);
header2.time = ((curTime.tm_hour & 0xFF) << 8) | ((curTime.tm_min) & 0xFF);
header2.playtime = g_fp->getTotalPlayTime() / 1000;
saveFile->write(header2.id, 6);
saveFile->writeByte(header2.version);
saveFile->writeUint32LE(header2.date);
saveFile->writeUint16LE(header2.time);
saveFile->writeUint32LE(header2.playtime);
g_fp->_currentScene->draw();
Graphics::saveThumbnail(*saveFile); // FIXME. Render proper screen
saveFile->writeUint32LE(headerPos); // Store where the header starts
saveFile->finalize();
delete saveFile;
delete archive;
return true;
}
void FullpipeEngine::lift_setButton(const char *name, int state) {
GameVar *var = g_fp->getGameLoaderGameVar()->getSubVarByName("OBJSTATES")->getSubVarByName(sO_LiftButtons);
if (var)
var->setSubVarAsInt(name, state);
}
