static boolean D_IsDOOMIWAD(char *filename)
{
return (D_CheckFilename(filename, "DOOM.WAD")
|| D_CheckFilename(filename, "DOOM1.WAD")
|| D_CheckFilename(filename, "DOOM2.WAD")
|| D_CheckFilename(filename, "PLUTONIA.WAD")
|| D_CheckFilename(filename, "TNT.WAD"));
}
char *D_FindWADByName(char *name)
{
char *path;
int i;
// Absolute path?
if (M_FileExists(name))
return name;
BuildIWADDirList();
// Search through all IWAD paths for a file with the given name.
for (i = 0; i < num_iwad_dirs; ++i)
{
// As a special case, if this is in DOOMWADDIR or DOOMWADPATH,
// the "directory" may actually refer directly to an IWAD
// file.
if (D_CheckFilename(iwad_dirs[i], name) && M_FileExists(iwad_dirs[i]))
return strdup(iwad_dirs[i]);
// Construct a string for the full path
path = M_StringJoin(iwad_dirs[i], DIR_SEPARATOR_S, name, NULL);
if (M_FileExists(path))
return path;
free(path);
}
// File not found
return NULL;
}
static boolean D_IsUnsupportedIWAD(char *filename)
{
return (D_CheckFilename(filename, "HERETIC1.WAD")
|| D_CheckFilename(filename, "HERETIC.WAD")
|| D_CheckFilename(filename, "HEXEN.WAD")
|| D_CheckFilename(filename, "HEXDD.WAD")
|| D_CheckFilename(filename, "STRIFE0.WAD")
|| D_CheckFilename(filename, "STRIFE1.WAD")
|| D_CheckFilename(filename, "CHEX.WAD")
|| D_CheckFilename(filename, "HACX.WAD"));
}
//
// D_DoomMainSetup
//
// CPhipps - the old contents of D_DoomMain, but moved out of the main
// line of execution so its stack space can be freed
static void D_DoomMainSetup(void)
{
int p;
char file[256];
int temp;
int choseniwad;
SDL_Init(0);
M_FindResponseFile();
iwadfile = D_FindIWAD();
modifiedgame = false;
nomonsters = M_CheckParm("-nomonsters");
respawnparm = M_CheckParm("-respawn");
fastparm = M_CheckParm("-fast");
devparm = M_CheckParm("-devparm");
if (M_CheckParm("-altdeath"))
deathmatch = 2;
else if (M_CheckParm("-deathmatch"))
deathmatch = 1;
M_SetConfigDir();
// turbo option
p = M_CheckParm("-turbo");
if (p)
{
int scale = 200;
extern int forwardmove[2];
extern int sidemove[2];
if (p < myargc - 1)
scale = atoi(myargv[p + 1]);
if (scale < 10)
scale = 10;
if (scale > 400)
scale = 400;
forwardmove[0] = forwardmove[0] * scale / 100;
forwardmove[1] = forwardmove[1] * scale / 100;
sidemove[0] = sidemove[0] * scale / 100;
sidemove[1] = sidemove[1] * scale / 100;
}
// init subsystems
V_Init();
// Load configuration files before initialising other subsystems.
M_LoadDefaults();
if (!M_FileExists("doomretro.wad"))
if (!M_FileExists("doomretro.wad.temp"))
I_Error("Can't find doomretro.wad.");
if (iwadfile)
{
if (D_AddFile(iwadfile))
if (runcount < RUNCOUNT_MAX)
runcount++;
}
else
{
if (!runcount)
D_FirstUse();
rename("doomretro.wad", "doomretro.wad.temp");
do
{
choseniwad = D_ChooseIWAD();
if (choseniwad == -1)
{
rename("doomretro.wad.temp", "doomretro.wad");
I_Quit(false);
}
else if (!choseniwad)
PlaySound((LPCTSTR)SND_ALIAS_SYSTEMHAND, NULL, SND_ALIAS_ID | SND_ASYNC);
} while (!choseniwad);
rename("doomretro.wad.temp", "doomretro.wad");
if (runcount < RUNCOUNT_MAX)
runcount++;
}
M_SaveDefaults();
if (!W_MergeFile("doomretro.wad"))
if (!W_MergeFile("doomretro.wad.temp"))
I_Error("Can't find doomretro.wad.");
if (W_CheckNumForName("BLD2A0") < 0 ||
W_CheckNumForName("MEDBA0") < 0 ||
W_CheckNumForName("STBAR2") < 0)
I_Error("Wrong version of doomretro.wad.");
p = M_CheckParmsWithArgs("-file", "-pwad", 1);
if (p > 0)
{
for (p = p + 1; p < myargc && myargv[p][0] != '-'; ++p)
{
char *filename = uppercase(D_TryFindWADByName(myargv[p]));
if (W_MergeFile(filename))
{
modifiedgame = true;
if (D_CheckFilename(filename, "NERVE.WAD"))
nerve = true;
}
}
}
if (FREEDOOM && W_CheckNumForName("FREEDM") < 0 && !modifiedgame)
I_Error("FREEDOOM requires a BOOM-compatible source port, and is therefore"
"unable to be opened by DOOM RETRO.");
DMENUPIC = (W_CheckNumForName("DMENUPIC") >= 0);
M_DOOM = (W_CheckMultipleLumps("M_DOOM") > 1);
M_EPISOD = (W_CheckMultipleLumps("M_EPISOD") > 1);
M_GDHIGH = (W_CheckMultipleLumps("M_GDHIGH") > 1);
M_GDLOW = (W_CheckMultipleLumps("M_GDLOW") > 1);
M_LOADG = (W_CheckMultipleLumps("M_LOADG") > 1);
M_LSCNTR = (W_CheckMultipleLumps("M_LSCNTR") > 1);
M_MSENS = (W_CheckMultipleLumps("M_MSENS") > 1);
M_MSGOFF = (W_CheckMultipleLumps("M_MSGOFF") > 1);
M_MSGON = (W_CheckMultipleLumps("M_MSGON") > 1);
M_NEWG = (W_CheckMultipleLumps("M_NEWG") > 1);
M_NMARE = (W_CheckMultipleLumps("M_NMARE") > 1);
M_OPTTTL = (W_CheckMultipleLumps("M_OPTTTL") > 1);
M_PAUSE = (W_CheckMultipleLumps("M_PAUSE") > 1);
M_SAVEG = (W_CheckMultipleLumps("M_SAVEG") > 1);
M_SKILL = (W_CheckMultipleLumps("M_SKILL") > 1);
M_SKULL1 = (W_CheckMultipleLumps("M_SKULL1") > 1);
M_SVOL = (W_CheckMultipleLumps("M_SVOL") > 1);
STARMS = (W_CheckMultipleLumps("STARMS") > 2);
STBAR = (W_CheckMultipleLumps("STBAR") > 2);
STCFN034 = (W_CheckMultipleLumps("STCFN034") > 1);
STCFN039 = (W_CheckMultipleLumps("STCFN039") > 1);
STCFN121 = (W_CheckMultipleLumps("STCFN121") > 1);
STYSNUM0 = (W_CheckMultipleLumps("STYSNUM0") > 1);
TITLEPIC = (W_CheckNumForName("TITLEPIC") >= 0);
WISCRT2 = (W_CheckMultipleLumps("WISCRT2") > 1);
bfgedition = (DMENUPIC && W_CheckNumForName("M_ACPT") >= 0);
// Generate the WAD hash table. Speed things up a bit.
W_GenerateHashTable();
D_IdentifyVersion();
InitGameVersion();
D_SetGameDescription();
D_SetSaveGameDir();
// Check for -file in shareware
if (modifiedgame)
{
// These are the lumps that will be checked in IWAD,
// if any one is not present, execution will be aborted.
char name[23][9] =
{
"e2m1", "e2m2", "e2m3", "e2m4", "e2m5", "e2m6", "e2m7", "e2m8", "e2m9",
"e3m1", "e3m3", "e3m3", "e3m4", "e3m5", "e3m6", "e3m7", "e3m8", "e3m9",
"dphoof", "bfgga0", "heada1", "cybra1", "spida1d1"
};
int i;
if (gamemode == shareware)
I_Error("You cannot use -FILE with the shareware version.\n"
"Please purchase the full version.");
// Check for fake IWAD with right name,
// but w/o all the lumps of the registered version.
if (gamemode == registered)
for (i = 0; i < 23; i++)
if (W_CheckNumForName(name[i]) < 0)
I_Error("This is not the registered version.");
}
// get skill / episode / map from parms
startskill = sk_medium;
startepisode = 1;
startmap = 1;
autostart = false;
p = M_CheckParmWithArgs("-skill", 1);
if (p)
{
temp = myargv[p + 1][0] - '1';
if (temp >= sk_baby && temp <= sk_nightmare)
{
startskill = (skill_t)temp;
autostart = true;
}
}
p = M_CheckParmWithArgs("-episode", 1);
if (p)
{
temp = myargv[p + 1][0] - '0';
if ((gamemode == shareware && temp == 1)
|| (temp >= 1
&& ((gamemode == registered && temp <= 3)
|| (gamemode == retail && temp <= 4))))
{
startepisode = temp;
startmap = 1;
autostart = true;
}
}
p = M_CheckParmWithArgs("-expansion", 1);
if (p)
{
temp = myargv[p + 1][0] - '0';
if (gamemode == commercial && temp <= (nerve ? 2 : 1))
{
gamemission = (temp == 1 ? doom2 : pack_nerve);
selectedexpansion = temp - 1;
startepisode = 1;
startmap = 1;
autostart = true;
}
}
timelimit = 0;
p = M_CheckParmWithArgs("-timer", 1);
if (p)
timelimit = atoi(myargv[p + 1]);
p = M_CheckParm("-avg");
if (p)
timelimit = 20;
p = M_CheckParmWithArgs("-warp", 1);
if (p)
{
static char lumpname[6];
if (gamemode == commercial)
{
if (strlen(myargv[p + 1]) == 5 &&
toupper(myargv[p + 1][0]) == 'M' &&
toupper(myargv[p + 1][1]) == 'A' &&
toupper(myargv[p + 1][2]) == 'P')
startmap = (myargv[p + 1][3] - '0') * 10 + myargv[p + 1][4] - '0';
else
startmap = atoi(myargv[p + 1]);
sprintf(lumpname, "MAP%02i", startmap);
}
else
{
if (strlen(myargv[p + 1]) == 4 &&
toupper(myargv[p + 1][0]) == 'E' &&
toupper(myargv[p + 1][2]) == 'M')
{
startepisode = myargv[p + 1][1] - '0';
startmap = myargv[p + 1][3] - '0';
}
else
{
startepisode = myargv[p + 1][0] - '0';
if (p + 2 < myargc)
startmap = myargv[p + 2][0] - '0';
else
startmap = 1;
}
sprintf(lumpname, "E%iM%i", startepisode, startmap);
}
if (W_CheckNumForName(lumpname) >= 0)
autostart = true;
}
p = M_CheckParmWithArgs("-loadgame", 1);
if (p)
startloadgame = atoi(myargv[p + 1]);
else
startloadgame = -1;
if (mouseSensitivity < MOUSESENSITIVITY_MIN || mouseSensitivity > MOUSESENSITIVITY_MAX)
mouseSensitivity = MOUSESENSITIVITY_DEFAULT;
if (mouseSensitivity == MOUSESENSITIVITY_MIN)
mouseSensitivity = -5;
gamepadSensitivity = (!mouseSensitivity ? 0.0f :
(2.0f + mouseSensitivity / (float)MOUSESENSITIVITY_MAX));
if (sfxVolume < SFXVOLUME_MIN || sfxVolume > SFXVOLUME_MAX)
sfxVolume = SFXVOLUME_DEFAULT;
if (musicVolume < MUSICVOLUME_MIN || musicVolume > MUSICVOLUME_MAX)
musicVolume = MUSICVOLUME_DEFAULT;
if (screensize < SCREENSIZE_MIN || screensize > SCREENSIZE_MAX)
screensize = SCREENSIZE_DEFAULT;
if (widescreen && !fullscreen)
{
widescreen = false;
screensize = SCREENSIZE_MAX;
}
if (!widescreen)
hud = true;
if (fullscreen && screensize == SCREENSIZE_MAX)
{
widescreen = true;
screensize = SCREENSIZE_MAX - 1;
}
if (widescreen)
{
returntowidescreen = true;
widescreen = false;
}
if (screenwidth && screenheight
&& (screenwidth < SCREENWIDTH || screenheight < SCREENHEIGHT * 3 / 4))
{
screenwidth = SCREENWIDTH;
screenheight = SCREENWIDTH * 3 / 4;
}
if (windowwidth < SCREENWIDTH || windowheight < SCREENWIDTH * 3 / 4)
{
windowwidth = SCREENWIDTH;
windowheight = SCREENWIDTH * 3 / 4;
}
if (gammalevel < GAMMALEVEL_MIN || gammalevel > GAMMALEVEL_MAX)
gammalevel = GAMMALEVEL_DEFAULT;
gammalevelindex = 0;
while (gammalevelindex < GAMMALEVELS)
if (gammalevels[gammalevelindex++] == gammalevel)
break;
if (gammalevelindex == GAMMALEVELS)
{
gammalevelindex = 0;
while (gammalevels[gammalevelindex++] != GAMMALEVEL_DEFAULT);
}
gammalevelindex--;
if (bloodsplats < BLOODSPLATS_MIN || bloodsplats > BLOODSPLATS_MAX)
bloodsplats = BLOODSPLATS_DEFAULT;
bloodSplatSpawner = ((bloodsplats == UNLIMITED ? P_SpawnBloodSplat :
(bloodsplats ? P_SpawnBloodSplat2 : P_SpawnBloodSplat3)));
if (pixelwidth < PIXELWIDTH_MIN || pixelwidth > PIXELWIDTH_MAX)
pixelwidth = PIXELWIDTH_DEFAULT;
while (SCREENWIDTH % pixelwidth)
pixelwidth--;
if (pixelheight < PIXELHEIGHT_MIN || pixelheight > PIXELHEIGHT_MAX)
pixelheight = PIXELHEIGHT_DEFAULT;
while (SCREENHEIGHT % pixelheight)
pixelheight--;
M_Init();
R_Init();
P_Init();
I_Init();
S_Init((int)(sfxVolume * (127.0f / 15.0f)), (int)(musicVolume * (127.0f / 15.0f)));
D_CheckNetGame();
HU_Init();
ST_Init();
AM_Init();
if (startloadgame >= 0)
{
M_StringCopy(file, P_SaveGameFile(startloadgame), sizeof(file));
G_LoadGame(file);
}
if (gameaction != ga_loadgame)
{
if (autostart || netgame)
G_DeferredInitNew(startskill, startepisode, startmap);
else
D_StartTitle(); // start up intro loop
}
}
static int D_ChooseIWAD(void)
{
OPENFILENAME ofn;
char szFile[4096];
int iwadfound = -1;
boolean sharewareiwad = false;
ZeroMemory(&ofn, sizeof(ofn));
ofn.lStructSize = sizeof(ofn);
ofn.hwndOwner = NULL;
ofn.lpstrFile = szFile;
ofn.lpstrFile[0] = '\0';
ofn.nMaxFile = sizeof(szFile);
ofn.lpstrFilter = "IWAD/PWAD Files (*.wad)\0*.WAD\0";
ofn.nFilterIndex = 1;
ofn.lpstrFileTitle = NULL;
ofn.nMaxFileTitle = 0;
ofn.lpstrInitialDir = wadfolder;
ofn.Flags = OFN_HIDEREADONLY | OFN_NOCHANGEDIR | OFN_ALLOWMULTISELECT
| OFN_PATHMUSTEXIST | OFN_FILEMUSTEXIST | OFN_EXPLORER;
ofn.lpstrTitle = "Where\u2019s All the Data?\0";
if (GetOpenFileName(&ofn))
{
iwadfound = 0;
// only one file was selected
if (!ofn.lpstrFile[strlen(ofn.lpstrFile) + 1])
{
LPSTR file = ofn.lpstrFile;
wadfolder = strdup(M_ExtractFolder(file));
// check if it's a valid and supported IWAD
if (D_IsDOOMIWAD(file)
|| (W_WadType(file) == IWAD
&& !D_IsUnsupportedIWAD(file)))
{
IdentifyIWADByContents(file, &gamemode, &gamemission);
if (D_AddFile(file))
iwadfound = 1;
}
// if it's a PWAD, determine the IWAD required and try loading that as well
else if (!D_CheckFilename(file, "DOOMRETRO.WAD")
&& W_WadType(file) == PWAD
&& !D_IsUnsupportedPWAD(file))
{
int iwadrequired = IWADRequiredByPWAD(file);
static char fullpath[MAX_PATH];
if (iwadrequired == indetermined)
return 0;
sprintf(fullpath, "%s\\%s", wadfolder,
iwadrequired == doom ? "DOOM.WAD" : "DOOM2.WAD");
IdentifyIWADByName(fullpath);
if (D_AddFile(fullpath))
{
iwadfound = 1;
if (W_MergeFile(file))
{
modifiedgame = true;
if (D_CheckFilename(file, "NERVE.WAD"))
nerve = true;
}
}
}
}
// more than one file was selected
else
{
LPSTR iwad = ofn.lpstrFile;
LPSTR pwad = ofn.lpstrFile;
wadfolder = strdup(szFile);
// find and add IWAD first
while (iwad[0])
{
static char fullpath[MAX_PATH];
iwad += lstrlen(iwad) + 1;
sprintf(fullpath, "%s\\%s", wadfolder, iwad);
if (D_IsDOOMIWAD(fullpath)
|| (W_WadType(fullpath) == IWAD
&& !D_IsUnsupportedIWAD(fullpath)))
{
if (!iwadfound)
{
IdentifyIWADByContents(fullpath, &gamemode, &gamemission);
if (D_AddFile(fullpath))
{
iwadfound = 1;
sharewareiwad = !strcasecmp(iwad, "DOOM1.WAD");
break;
}
}
}
// if it's NERVE.WAD, try to open DOOM2.WAD with it
else if (!strcasecmp(iwad, "NERVE.WAD"))
{
static char fullpath2[MAX_PATH];
sprintf(fullpath2, "%s\\DOOM2.WAD", wadfolder);
IdentifyIWADByName(fullpath2);
if (D_AddFile(fullpath2))
{
iwadfound = 1;
if (W_MergeFile(fullpath))
{
modifiedgame = true;
nerve = true;
}
break;
}
}
}
// merge any pwads
if (iwadfound && !sharewareiwad)
while (pwad[0])
{
static char fullpath[MAX_PATH];
pwad += lstrlen(pwad) + 1;
sprintf(fullpath, "%s\\%s", wadfolder, pwad);
if (!D_CheckFilename(pwad, "DOOMRETRO.WAD")
&& W_WadType(fullpath) == PWAD
&& !D_IsUnsupportedPWAD(fullpath))
if (W_MergeFile(fullpath))
{
modifiedgame = true;
if (!strcasecmp(pwad, "NERVE.WAD"))
nerve = true;
}
}
}
}
return iwadfound;
}
static boolean D_IsUnsupportedPWAD(char *filename)
{
return (D_CheckFilename(filename, "VOICES.WAD")
|| D_CheckFilename(filename, "CHEX3.WAD"));
}
