static uint32 Load_FindChunk(FILE *fp, uint32 chunk)
{
uint32 header;
uint32 length;
while (fread(&header, sizeof(uint32), 1, fp) == 1) {
if (fread(&length, sizeof(uint32), 1, fp) != 1) return 0;
length = BETOH32(length);
if (BETOH32(header) != chunk) {
fseek(fp, length + (length & 1), SEEK_CUR);
continue;
}
return length;
}
return 0;
}
static bool Load_Main(FILE *fp)
{
uint32 position;
uint32 length;
uint32 header;
uint16 version;
/* All OpenDUNE / Dune2 savegames should start with 'FORM' */
if (fread(&header, sizeof(uint32), 1, fp) != 1) return false;
if (BETOH32(header) != 'FORM') {
Error("Invalid magic header in savegame. Not an OpenDUNE / Dune2 savegame.");
return false;
}
/* The total length field, which is ignored */
if (fread(&length, sizeof(uint32), 1, fp) != 1) return false;
/* The next 'chunk' is fake, and has no length field */
if (fread(&header, sizeof(uint32), 1, fp) != 1) return false;
if (BETOH32(header) != 'SCEN') return false;
position = ftell(fp);
/* Find the 'INFO' chunk, as it contains the savegame version */
version = 0;
length = Load_FindChunk(fp, 'INFO');
if (length == 0) return false;
/* Read the savegame version */
if (fread(&version, sizeof(uint16), 1, fp) != 1) return false;
length -= 2;
if (version == 0) return false;
if (version != 0x0290) {
/* Get the scenarioID / campaignID */
if (!Info_LoadOld(fp, length)) return false;
g_gameMode = GM_RESTART;
/* Find the 'PLYR' chunk */
fseek(fp, position, SEEK_SET);
length = Load_FindChunk(fp, 'PLYR');
if (length == 0) return false;
/* Find the human player */
if (!House_LoadOld(fp, length)) return false;
GUI_DisplayModalMessage(String_Get_ByIndex(STR_WARNING_ORIGINAL_SAVED_GAMES_ARE_INCOMPATABLE_WITH_THE_NEW_VERSION_THE_BATTLE_WILL_BE_RESTARTED), 0xFFFF);
return true;
}
/* Load the 'INFO' chunk'. It has to be the first chunk loaded */
if (!Info_Load(fp, length)) return false;
/* Rewind, and read other chunks */
fseek(fp, position, SEEK_SET);
while (fread(&header, sizeof(uint32), 1, fp) == 1) {
if (fread(&length, sizeof(uint32), 1, fp) != 1) return false;
length = BETOH32(length);
switch (BETOH32(header)) {
case 'NAME': break; /* 'NAME' chunk is of no interest to us */
case 'INFO': break; /* 'INFO' chunk is already read */
case 'MAP ': if (!Map_Load (fp, length)) return false; break;
case 'PLYR': if (!House_Load (fp, length)) return false; break;
case 'UNIT': if (!Unit_Load (fp, length)) return false; break;
case 'BLDG': if (!Structure_Load(fp, length)) return false; break;
case 'TEAM': if (!Team_Load (fp, length)) return false; break;
case 'ODUN': if (!UnitNew_Load (fp, length)) return false; break;
default:
Error("Unknown chunk in savegame: %c%c%c%c (length: %d). Skipped.\n", header, header >> 8, header >> 16, header >> 24, length);
break;
}
/* Savegames are word aligned */
position += length + 8 + (length & 1);
fseek(fp, position, SEEK_SET);
}
return true;
}
0x7A, 0xE8, 0x08, 0x2C, 0x12, 0x97, 0x32, 0xAB, 0xB4, 0x27, 0x0A, 0x23, 0xDF, 0xEF, 0xCA, 0xD9,
0xB8, 0xFA, 0xDC, 0x31, 0x6B, 0xD1, 0xAD, 0x19, 0x49, 0xBD, 0x51, 0x96, 0xEE, 0xE4, 0xA8, 0x41,
0xDA, 0xFF, 0xCD, 0x55, 0x86, 0x36, 0xBE, 0x61, 0x52, 0xF8, 0xBB, 0x0E, 0x82, 0x48, 0x69, 0x9A,
0xE0, 0x47, 0x9E, 0x5C, 0x04, 0x4B, 0x34, 0x15, 0x79, 0x26, 0xA7, 0xDE, 0x29, 0xAE, 0x92, 0xD7,
0x84, 0xE9, 0xD2, 0xBA, 0x5D, 0xF3, 0xC5, 0xB0, 0xBF, 0xA4, 0x3B, 0x71, 0x44, 0x46, 0x2B, 0xFC,
0xEB, 0x6F, 0xD5, 0xF6, 0x14, 0xFE, 0x7C, 0x70, 0x5A, 0x7D, 0xFD, 0x2F, 0x18, 0x83, 0x16, 0xA5,
0x91, 0x1F, 0x05, 0x95, 0x74, 0xA9, 0xC1, 0x5B, 0x4A, 0x85, 0x6D, 0x13, 0x07, 0x4F, 0x4E, 0x45,
0xB2, 0x0F, 0xC9, 0x1C, 0xA6, 0xBC, 0xEC, 0x73, 0x90, 0x7B, 0xCF, 0x59, 0x8F, 0xA1, 0xF9, 0x2D,
0xF2, 0xB1, 0x00, 0x94, 0x37, 0x9F, 0xD0, 0x2E, 0x9C, 0x6E, 0x28, 0x3F, 0x80, 0xF0, 0x3D, 0xD3,
0x25, 0x8A, 0xB5, 0xE7, 0x42, 0xB3, 0xC7, 0xEA, 0xF7, 0x4C, 0x11, 0x33, 0x03, 0xA2, 0xAC, 0x60
};
//Key scheduling constants
static const uint32_t c[12] =
{
BETOH32(0x517CC1B7), BETOH32(0x27220A94), BETOH32(0xFE13ABE8), BETOH32(0xFA9A6EE0),
BETOH32(0x6DB14ACC), BETOH32(0x9E21C820), BETOH32(0xFF28B1D5), BETOH32(0xEF5DE2B0),
BETOH32(0xDB92371D), BETOH32(0x2126E970), BETOH32(0x03249775), BETOH32(0x04E8C90E)
};
//Common interface for encryption algorithms
const CipherAlgo ariaCipherAlgo =
{
"ARIA",
sizeof(AriaContext),
CIPHER_ALGO_TYPE_BLOCK,
ARIA_BLOCK_SIZE,
(CipherAlgoInit) ariaInit,
NULL,
NULL,
(CipherAlgoEncryptBlock) ariaEncryptBlock,
