ref: 52c49e45fb8da3dc0fa7c9d26d34c39b4a7cbc71
dir: /src/heretic/d_main.c/
// // Copyright(C) 1993-1996 Id Software, Inc. // Copyright(C) 1993-2008 Raven Software // Copyright(C) 2005-2014 Simon Howard // // 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 2 // 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. // // D_main.c #include <stdio.h> #include <stdlib.h> #include "txt_main.h" #include "txt_io.h" #include "net_client.h" #include "config.h" #include "ct_chat.h" #include "doomdef.h" #include "deh_main.h" #include "d_iwad.h" #include "i_endoom.h" #include "i_input.h" #include "i_joystick.h" #include "i_sound.h" #include "i_system.h" #include "i_timer.h" #include "i_video.h" #include "m_argv.h" #include "m_config.h" #include "m_controls.h" #include "m_misc.h" #include "p_local.h" #include "s_sound.h" #include "w_main.h" #include "v_video.h" #define CT_KEY_GREEN 'g' #define CT_KEY_YELLOW 'y' #define CT_KEY_RED 'r' #define CT_KEY_BLUE 'b' #define STARTUP_WINDOW_X 17 #define STARTUP_WINDOW_Y 7 GameMode_t gamemode = indetermined; const char *gamedescription = "unknown"; boolean nomonsters; // checkparm of -nomonsters boolean respawnparm; // checkparm of -respawn boolean debugmode; // checkparm of -debug boolean ravpic; // checkparm of -ravpic boolean cdrom; // true if cd-rom mode active boolean noartiskip; // whether shift-enter skips an artifact skill_t startskill; int startepisode; int startmap; int UpdateState; static int graphical_startup = 1; static boolean using_graphical_startup; static boolean main_loop_started = false; boolean autostart; extern boolean automapactive; boolean advancedemo; FILE *debugfile; static int show_endoom = 1; void D_ConnectNetGame(void); void D_CheckNetGame(void); void D_PageDrawer(void); void D_AdvanceDemo(void); boolean F_Responder(event_t * ev); //--------------------------------------------------------------------------- // // PROC D_ProcessEvents // // Send all the events of the given timestamp down the responder chain. // //--------------------------------------------------------------------------- void D_ProcessEvents(void) { event_t *ev; while ((ev = D_PopEvent()) != NULL) { if (F_Responder(ev)) { continue; } if (MN_Responder(ev)) { continue; } G_Responder(ev); } } //--------------------------------------------------------------------------- // // PROC DrawMessage // //--------------------------------------------------------------------------- void DrawMessage(void) { player_t *player; player = &players[consoleplayer]; if (player->messageTics <= 0 || !player->message) { // No message return; } MN_DrTextA(player->message, 160 - MN_TextAWidth(player->message) / 2, 1); } //--------------------------------------------------------------------------- // // PROC D_Display // // Draw current display, possibly wiping it from the previous. // //--------------------------------------------------------------------------- void R_ExecuteSetViewSize(void); extern boolean finalestage; void D_Display(void) { extern boolean askforquit; // Change the view size if needed if (setsizeneeded) { R_ExecuteSetViewSize(); } // // do buffered drawing // switch (gamestate) { case GS_LEVEL: if (!gametic) break; if (automapactive) AM_Drawer(); else R_RenderPlayerView(&players[displayplayer]); CT_Drawer(); UpdateState |= I_FULLVIEW; SB_Drawer(); break; case GS_INTERMISSION: IN_Drawer(); break; case GS_FINALE: F_Drawer(); break; case GS_DEMOSCREEN: D_PageDrawer(); break; } if (testcontrols) { V_DrawMouseSpeedBox(testcontrols_mousespeed); } if (paused && !MenuActive && !askforquit) { if (!netgame) { V_DrawPatch(160, viewwindowy + 5, W_CacheLumpName(DEH_String("PAUSED"), PU_CACHE)); } else { V_DrawPatch(160, 70, W_CacheLumpName(DEH_String("PAUSED"), PU_CACHE)); } } // Handle player messages DrawMessage(); // Menu drawing MN_Drawer(); // Send out any new accumulation NetUpdate(); // Flush buffered stuff to screen I_FinishUpdate(); } // // D_GrabMouseCallback // // Called to determine whether to grab the mouse pointer // boolean D_GrabMouseCallback(void) { // when menu is active or game is paused, release the mouse if (MenuActive || paused) return false; // only grab mouse when playing levels (but not demos) return (gamestate == GS_LEVEL) && !demoplayback && !advancedemo; } //--------------------------------------------------------------------------- // // PROC D_DoomLoop // //--------------------------------------------------------------------------- void D_DoomLoop(void) { if (M_CheckParm("-debugfile")) { char filename[20]; M_snprintf(filename, sizeof(filename), "debug%i.txt", consoleplayer); debugfile = fopen(filename, "w"); } I_GraphicsCheckCommandLine(); I_SetGrabMouseCallback(D_GrabMouseCallback); I_InitGraphics(); main_loop_started = true; while (1) { // Frame syncronous IO operations I_StartFrame(); // Process one or more tics // Will run at least one tic TryRunTics(); // Move positional sounds S_UpdateSounds(players[consoleplayer].mo); D_Display(); } } /* =============================================================================== DEMO LOOP =============================================================================== */ static int demosequence; static int pagetic; static const char *pagename; /* ================ = = D_PageTicker = = Handles timing for warped projection = ================ */ void D_PageTicker(void) { if (--pagetic < 0) D_AdvanceDemo(); } /* ================ = = D_PageDrawer = ================ */ void D_PageDrawer(void) { V_DrawRawScreen(W_CacheLumpName(pagename, PU_CACHE)); if (demosequence == 1) { V_DrawPatch(4, 160, W_CacheLumpName(DEH_String("ADVISOR"), PU_CACHE)); } UpdateState |= I_FULLSCRN; } /* ================= = = D_AdvanceDemo = = Called after each demo or intro demosequence finishes ================= */ void D_AdvanceDemo(void) { advancedemo = true; } void D_DoAdvanceDemo(void) { players[consoleplayer].playerstate = PST_LIVE; // don't reborn advancedemo = false; usergame = false; // can't save / end game here paused = false; gameaction = ga_nothing; demosequence = (demosequence + 1) % 7; switch (demosequence) { case 0: pagetic = 210; gamestate = GS_DEMOSCREEN; pagename = DEH_String("TITLE"); S_StartSong(mus_titl, false); break; case 1: pagetic = 140; gamestate = GS_DEMOSCREEN; pagename = DEH_String("TITLE"); break; case 2: BorderNeedRefresh = true; UpdateState |= I_FULLSCRN; G_DeferedPlayDemo(DEH_String("demo1")); break; case 3: pagetic = 200; gamestate = GS_DEMOSCREEN; pagename = DEH_String("CREDIT"); break; case 4: BorderNeedRefresh = true; UpdateState |= I_FULLSCRN; G_DeferedPlayDemo(DEH_String("demo2")); break; case 5: pagetic = 200; gamestate = GS_DEMOSCREEN; if (gamemode == shareware) { pagename = DEH_String("ORDER"); } else { pagename = DEH_String("CREDIT"); } break; case 6: BorderNeedRefresh = true; UpdateState |= I_FULLSCRN; G_DeferedPlayDemo(DEH_String("demo3")); break; } } /* ================= = = D_StartTitle = ================= */ void D_StartTitle(void) { gameaction = ga_nothing; demosequence = -1; D_AdvanceDemo(); } /* ============== = = D_CheckRecordFrom = = -recordfrom <savegame num> <demoname> ============== */ void D_CheckRecordFrom(void) { int p; char *filename; //! // @vanilla // @category demo // @arg <savenum> <demofile> // // Record a demo, loading from the given filename. Equivalent // to -loadgame <savenum> -record <demofile>. p = M_CheckParmWithArgs("-recordfrom", 2); if (!p) return; filename = SV_Filename(myargv[p + 1][0] - '0'); G_LoadGame(filename); G_DoLoadGame(); // load the gameskill etc info from savegame G_RecordDemo(gameskill, 1, gameepisode, gamemap, myargv[p + 2]); D_DoomLoop(); // never returns free(filename); } /* =============== = = D_AddFile = =============== */ // MAPDIR should be defined as the directory that holds development maps // for the -wart # # command #define MAPDIR "\\data\\" #define SHAREWAREWADNAME "heretic1.wad" char *iwadfile; void wadprintf(void) { if (debugmode) { return; } } boolean D_AddFile(char *file) { wad_file_t *handle; printf(" adding %s\n", file); handle = W_AddFile(file); return handle != NULL; } //========================================================== // // Startup Thermo code // //========================================================== #define MSG_Y 9 #define THERM_X 14 #define THERM_Y 14 int thermMax; int thermCurrent; char smsg[80]; // status bar line // // Heretic startup screen shit // static int startup_line = STARTUP_WINDOW_Y; void hprintf(const char *string) { if (using_graphical_startup) { TXT_BGColor(TXT_COLOR_CYAN, 0); TXT_FGColor(TXT_COLOR_BRIGHT_WHITE); TXT_GotoXY(STARTUP_WINDOW_X, startup_line); ++startup_line; TXT_Puts(string); TXT_UpdateScreen(); } // haleyjd: shouldn't be WATCOMC-only if (debugmode) puts(string); } void drawstatus(void) { int i; TXT_GotoXY(1, 24); TXT_BGColor(TXT_COLOR_BLUE, 0); TXT_FGColor(TXT_COLOR_BRIGHT_WHITE); for (i=0; smsg[i] != '\0'; ++i) { TXT_PutChar(smsg[i]); } } static void status(const char *string) { if (using_graphical_startup) { M_StringConcat(smsg, string, sizeof(smsg)); drawstatus(); } } void DrawThermo(void) { static int last_progress = -1; int progress; int i; if (!using_graphical_startup) { return; } // No progress? Don't update the screen. progress = (50 * thermCurrent) / thermMax + 2; if (last_progress == progress) { return; } last_progress = progress; TXT_GotoXY(THERM_X, THERM_Y); TXT_FGColor(TXT_COLOR_BRIGHT_GREEN); TXT_BGColor(TXT_COLOR_GREEN, 0); for (i = 0; i < progress; i++) { TXT_PutChar(0xdb); } TXT_UpdateScreen(); } void initStartup(void) { byte *textScreen; byte *loading; if (!graphical_startup || debugmode || testcontrols) { using_graphical_startup = false; return; } if (!TXT_Init()) { using_graphical_startup = false; return; } I_InitWindowTitle(); I_InitWindowIcon(); // Blit main screen textScreen = TXT_GetScreenData(); loading = W_CacheLumpName(DEH_String("LOADING"), PU_CACHE); memcpy(textScreen, loading, 4000); // Print version string TXT_BGColor(TXT_COLOR_RED, 0); TXT_FGColor(TXT_COLOR_YELLOW); TXT_GotoXY(46, 2); TXT_Puts(HERETIC_VERSION_TEXT); TXT_UpdateScreen(); using_graphical_startup = true; } static void finishStartup(void) { if (using_graphical_startup) { TXT_Shutdown(); } } char tmsg[300]; void tprintf(const char *msg, int initflag) { printf("%s", msg); } // haleyjd: moved up, removed WATCOMC code void CleanExit(void) { DEH_printf("Exited from HERETIC.\n"); exit(1); } void CheckAbortStartup(void) { // haleyjd: removed WATCOMC // haleyjd FIXME: this should actually work in text mode too, but how to // get input before SDL video init? if(using_graphical_startup) { if(TXT_GetChar() == 27) CleanExit(); } } void IncThermo(void) { thermCurrent++; DrawThermo(); CheckAbortStartup(); } void InitThermo(int max) { thermMax = max; thermCurrent = 0; } // // Add configuration file variable bindings. // void D_BindVariables(void) { extern int screenblocks; extern int snd_Channels; int i; M_ApplyPlatformDefaults(); I_BindInputVariables(); I_BindVideoVariables(); I_BindJoystickVariables(); I_BindSoundVariables(); M_BindBaseControls(); M_BindHereticControls(); M_BindWeaponControls(); M_BindChatControls(MAXPLAYERS); key_multi_msgplayer[0] = CT_KEY_GREEN; key_multi_msgplayer[1] = CT_KEY_YELLOW; key_multi_msgplayer[2] = CT_KEY_RED; key_multi_msgplayer[3] = CT_KEY_BLUE; M_BindMenuControls(); M_BindMapControls(); NET_BindVariables(); M_BindIntVariable("mouse_sensitivity", &mouseSensitivity); M_BindIntVariable("sfx_volume", &snd_MaxVolume); M_BindIntVariable("music_volume", &snd_MusicVolume); M_BindIntVariable("screenblocks", &screenblocks); M_BindIntVariable("snd_channels", &snd_Channels); M_BindIntVariable("vanilla_savegame_limit", &vanilla_savegame_limit); M_BindIntVariable("vanilla_demo_limit", &vanilla_demo_limit); M_BindIntVariable("show_endoom", &show_endoom); M_BindIntVariable("graphical_startup", &graphical_startup); for (i=0; i<10; ++i) { char buf[12]; M_snprintf(buf, sizeof(buf), "chatmacro%i", i); M_BindStringVariable(buf, &chat_macros[i]); } } // // Called at exit to display the ENDOOM screen (ENDTEXT in Heretic) // static void D_Endoom(void) { byte *endoom_data; // Disable ENDOOM? if (!show_endoom || testcontrols || !main_loop_started) { return; } endoom_data = W_CacheLumpName(DEH_String("ENDTEXT"), PU_STATIC); I_Endoom(endoom_data); } //--------------------------------------------------------------------------- // // PROC D_DoomMain // //--------------------------------------------------------------------------- void D_DoomMain(void) { GameMission_t gamemission; int p; char file[256]; char demolumpname[9]; I_PrintBanner(PACKAGE_STRING); I_AtExit(D_Endoom, false); //! // @category game // @vanilla // // Disable monsters. // nomonsters = M_ParmExists("-nomonsters"); //! // @category game // @vanilla // // Monsters respawn after being killed. // respawnparm = M_ParmExists("-respawn"); //! // @vanilla // // Take screenshots when F1 is pressed. // ravpic = M_ParmExists("-ravpic"); //! // @category obscure // @vanilla // // Allow artifacts to be used when the run key is held down. // noartiskip = M_ParmExists("-noartiskip"); debugmode = M_ParmExists("-debug"); startskill = sk_medium; startepisode = 1; startmap = 1; autostart = false; // // get skill / episode / map from parms // //! // @vanilla // @category net // // Start a deathmatch game. // if (M_ParmExists("-deathmatch")) { deathmatch = true; } //! // @category game // @arg <skill> // @vanilla // // Set the game skill, 1-5 (1: easiest, 5: hardest). A skill of // 0 disables all monsters. // p = M_CheckParmWithArgs("-skill", 1); if (p) { startskill = myargv[p + 1][0] - '1'; autostart = true; } //! // @category game // @arg <n> // @vanilla // // Start playing on episode n (1-4) // p = M_CheckParmWithArgs("-episode", 1); if (p) { startepisode = myargv[p + 1][0] - '0'; startmap = 1; autostart = true; } //! // @category game // @arg <x> <y> // @vanilla // // Start a game immediately, warping to level ExMy. // p = M_CheckParmWithArgs("-warp", 2); if (p && p < myargc - 2) { startepisode = myargv[p + 1][0] - '0'; startmap = myargv[p + 2][0] - '0'; autostart = true; } // // init subsystems // DEH_printf("V_Init: allocate screens.\n"); V_Init(); // Check for -CDROM cdrom = false; #ifdef _WIN32 //! // @category obscure // @platform windows // @vanilla // // Save configuration data and savegames in c:\heretic.cd, // allowing play from CD. // if (M_CheckParm("-cdrom")) { cdrom = true; } #endif if (cdrom) { M_SetConfigDir(DEH_String("c:\\heretic.cd")); } else { M_SetConfigDir(NULL); } // Load defaults before initing other systems DEH_printf("M_LoadDefaults: Load system defaults.\n"); D_BindVariables(); M_SetConfigFilenames("heretic.cfg", PROGRAM_PREFIX "heretic.cfg"); M_LoadDefaults(); I_AtExit(M_SaveDefaults, false); DEH_printf("Z_Init: Init zone memory allocation daemon.\n"); Z_Init(); DEH_printf("W_Init: Init WADfiles.\n"); iwadfile = D_FindIWAD(IWAD_MASK_HERETIC, &gamemission); if (iwadfile == NULL) { I_Error("Game mode indeterminate. No IWAD was found. Try specifying\n" "one with the '-iwad' command line parameter."); } D_AddFile(iwadfile); W_CheckCorrectIWAD(heretic); //! // @category mod // // Disable auto-loading of .wad files. // if (!M_ParmExists("-noautoload")) { char *autoload_dir; autoload_dir = M_GetAutoloadDir("heretic.wad"); DEH_AutoLoadPatches(autoload_dir); W_AutoLoadWADs(autoload_dir); free(autoload_dir); } // Load dehacked patches specified on the command line. DEH_ParseCommandLine(); // Load PWAD files. W_ParseCommandLine(); //! // @arg <demo> // @category demo // @vanilla // // Play back the demo named demo.lmp. // p = M_CheckParmWithArgs("-playdemo", 1); if (!p) { //! // @arg <demo> // @category demo // @vanilla // // Play back the demo named demo.lmp, determining the framerate // of the screen. // p = M_CheckParmWithArgs("-timedemo", 1); } if (p) { char *uc_filename = strdup(myargv[p + 1]); M_ForceUppercase(uc_filename); // In Vanilla, the filename must be specified without .lmp, // but make that optional. if (M_StringEndsWith(uc_filename, ".LMP")) { M_StringCopy(file, myargv[p + 1], sizeof(file)); } else { DEH_snprintf(file, sizeof(file), "%s.lmp", myargv[p + 1]); } free(uc_filename); if (D_AddFile(file)) { M_StringCopy(demolumpname, lumpinfo[numlumps - 1]->name, sizeof(demolumpname)); } else { // The file failed to load, but copy the original arg as a // demo name to make tricks like -playdemo demo1 possible. M_StringCopy(demolumpname, myargv[p + 1], sizeof(demolumpname)); } printf("Playing demo %s.\n", file); } // Generate the WAD hash table. Speed things up a bit. W_GenerateHashTable(); //! // @category demo // // Record or playback a demo without automatically quitting // after either level exit or player respawn. // demoextend = M_ParmExists("-demoextend"); if (W_CheckNumForName(DEH_String("E2M1")) == -1) { gamemode = shareware; gamedescription = "Heretic (shareware)"; } else if (W_CheckNumForName("EXTENDED") != -1) { // Presence of the EXTENDED lump indicates the retail version gamemode = retail; gamedescription = "Heretic: Shadow of the Serpent Riders"; } else { gamemode = registered; gamedescription = "Heretic (registered)"; } I_SetWindowTitle(gamedescription); savegamedir = M_GetSaveGameDir("heretic.wad"); I_PrintStartupBanner(gamedescription); if (M_ParmExists("-testcontrols")) { startepisode = 1; startmap = 1; autostart = true; testcontrols = true; } I_InitTimer(); I_InitSound(false); I_InitMusic(); tprintf("NET_Init: Init network subsystem.\n", 1); NET_Init (); D_ConnectNetGame(); // haleyjd: removed WATCOMC initStartup(); // // Build status bar line! // smsg[0] = 0; if (deathmatch) status(DEH_String("DeathMatch...")); if (nomonsters) status(DEH_String("No Monsters...")); if (respawnparm) status(DEH_String("Respawning...")); if (autostart) { char temp[64]; DEH_snprintf(temp, sizeof(temp), "Warp to Episode %d, Map %d, Skill %d ", startepisode, startmap, startskill + 1); status(temp); } wadprintf(); // print the added wadfiles tprintf(DEH_String("MN_Init: Init menu system.\n"), 1); MN_Init(); CT_Init(); tprintf(DEH_String("R_Init: Init Heretic refresh daemon."), 1); hprintf(DEH_String("Loading graphics")); R_Init(); tprintf("\n", 0); tprintf(DEH_String("P_Init: Init Playloop state.\n"), 1); hprintf(DEH_String("Init game engine.")); P_Init(); IncThermo(); tprintf(DEH_String("I_Init: Setting up machine state.\n"), 1); I_CheckIsScreensaver(); I_InitJoystick(); IncThermo(); tprintf(DEH_String("S_Init: Setting up sound.\n"), 1); S_Init(); //IO_StartupTimer(); S_Start(); tprintf(DEH_String("D_CheckNetGame: Checking network game status.\n"), 1); hprintf(DEH_String("Checking network game status.")); D_CheckNetGame(); IncThermo(); // haleyjd: removed WATCOMC tprintf(DEH_String("SB_Init: Loading patches.\n"), 1); SB_Init(); IncThermo(); // // start the apropriate game based on parms // D_CheckRecordFrom(); //! // @arg <x> // @category demo // @vanilla // // Record a demo named x.lmp. // p = M_CheckParmWithArgs("-record", 1); if (p) { G_RecordDemo(startskill, 1, startepisode, startmap, myargv[p + 1]); D_DoomLoop(); // Never returns } p = M_CheckParmWithArgs("-playdemo", 1); if (p) { singledemo = true; // Quit after one demo G_DeferedPlayDemo(demolumpname); D_DoomLoop(); // Never returns } p = M_CheckParmWithArgs("-timedemo", 1); if (p) { G_TimeDemo(demolumpname); D_DoomLoop(); // Never returns } //! // @category game // @arg <s> // @vanilla // // Load the game in savegame slot s. // p = M_CheckParmWithArgs("-loadgame", 1); if (p && p < myargc - 1) { char *filename; filename = SV_Filename(myargv[p + 1][0] - '0'); G_LoadGame(filename); free(filename); } // Check valid episode and map if (autostart || netgame) { if (!D_ValidEpisodeMap(heretic, gamemode, startepisode, startmap)) { startepisode = 1; startmap = 1; } } if (gameaction != ga_loadgame) { UpdateState |= I_FULLSCRN; BorderNeedRefresh = true; if (autostart || netgame) { G_InitNew(startskill, startepisode, startmap); } else { D_StartTitle(); } } finishStartup(); D_DoomLoop(); // Never returns }