]> de.git.xonotic.org Git - xonotic/darkplaces.git/blobdiff - host.c
TEU uses teu.rc, not quake.rc
[xonotic/darkplaces.git] / host.c
diff --git a/host.c b/host.c
index 25240ec386594ed5afa6ac18ce2d68fc79cbc7d1..c1657d10f933d862605f1534ba082550613fb133 100644 (file)
--- a/host.c
+++ b/host.c
@@ -8,7 +8,7 @@ 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.  
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 See the GNU General Public License for more details.
 
@@ -19,11 +19,13 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 */
 // host.c -- coordinates spawning and killing of local servers
 
+#include <time.h>
 #include "quakedef.h"
+#include "cl_video.h"
 
 /*
 
-A server can allways be started, even if the system started out as a client
+A server can always be started, even if the system started out as a client
 to a remote system.
 
 A client can NOT be started if the system started as a dedicated server.
@@ -32,77 +34,89 @@ Memory is cleared / released when a server or client begins, not when they end.
 
 */
 
-quakeparms_t host_parms;
+// true if into command execution
+qboolean host_initialized;
+// LordHavoc: used to turn Host_Error into Sys_Error if starting up or shutting down
+qboolean host_loopactive = false;
+// LordHavoc: set when quit is executed
+qboolean host_shuttingdown = false;
 
-qboolean       host_initialized;               // true if into command execution
+double host_frametime;
+// LordHavoc: the real frametime, before slowmo and clamping are applied (used for console scrolling)
+double host_realframetime;
+// the real time, without any slowmo or clamping
+double realtime;
+// realtime from previous frame
+double oldrealtime;
+// how many frames have occurred
+int host_framecount;
 
-double         host_frametime;
-double         host_realframetime;             // LordHavoc: the real frametime, before slowmo and clamping are applied (used for console scrolling)
-double         host_time;
-double         realtime;                               // without any filtering or bounding
-double         oldrealtime;                    // last frame run
-int                    host_framecount;
+// used for -developer commandline parameter, hacky hacky
+int forcedeveloper;
 
-double         sv_frametime;
+// current client
+client_t *host_client;
 
-int                    host_hunklevel;
+jmp_buf host_abortserver;
 
-int                    minimum_memory;
+// pretend frames take this amount of time (in seconds), 0 = realtime
+cvar_t host_framerate = {0, "host_framerate","0"};
+// shows time used by certain subsystems
+cvar_t host_speeds = {0, "host_speeds","0"};
+// LordHavoc: framerate independent slowmo
+cvar_t slowmo = {0, "slowmo", "1.0"};
+// LordHavoc: game logic lower cap on framerate (if framerate is below this is, it pretends it is this, so game logic will run normally)
+cvar_t host_minfps = {CVAR_SAVE, "host_minfps", "10"};
+// LordHavoc: framerate upper cap
+cvar_t host_maxfps = {CVAR_SAVE, "host_maxfps", "1000"};
 
-client_t       *host_client;                   // current client
+// print broadcast messages in dedicated mode
+cvar_t sv_echobprint = {CVAR_SAVE, "sv_echobprint", "1"};
 
-jmp_buf        host_abortserver;
+cvar_t sys_ticrate = {CVAR_SAVE, "sys_ticrate","0.05"};
+cvar_t serverprofile = {0, "serverprofile","0"};
 
-cvar_t host_framerate = {"host_framerate","0"};        // set for slow motion
-cvar_t host_speeds = {"host_speeds","0"};                      // set for running times
-cvar_t slowmo = {"slowmo", "1.0"};                                     // LordHavoc: framerate independent slowmo
-cvar_t host_minfps = {"host_minfps", "10"};            // LordHavoc: game logic lower cap on framerate (if framerate is below this is, it pretends it is this, so game logic will run normally)
-cvar_t host_maxfps = {"host_maxfps", "1000"};          // LordHavoc: framerate upper cap
+cvar_t fraglimit = {CVAR_NOTIFY, "fraglimit","0"};
+cvar_t timelimit = {CVAR_NOTIFY, "timelimit","0"};
+cvar_t teamplay = {CVAR_NOTIFY, "teamplay","0"};
 
-cvar_t sys_ticrate = {"sys_ticrate","0.05"};
-cvar_t serverprofile = {"serverprofile","0"};
+cvar_t samelevel = {0, "samelevel","0"};
+cvar_t noexit = {CVAR_NOTIFY, "noexit","0"};
 
-cvar_t fraglimit = {"fraglimit","0",false,true};
-cvar_t timelimit = {"timelimit","0",false,true};
-cvar_t teamplay = {"teamplay","0",false,true};
+cvar_t developer = {0, "developer","0"};
 
-cvar_t samelevel = {"samelevel","0"};
-cvar_t noexit = {"noexit","0",false,true};
+cvar_t skill = {0, "skill","1"};
+cvar_t deathmatch = {0, "deathmatch","0"};
+cvar_t coop = {0, "coop","0"};
 
-cvar_t developer = {"developer","0"};
+cvar_t pausable = {0, "pausable","1"};
 
-cvar_t skill = {"skill","1"};                                          // 0 - 3
-cvar_t deathmatch = {"deathmatch","0"};                        // 0, 1, or 2
-cvar_t coop = {"coop","0"};                    // 0 or 1
+cvar_t temp1 = {0, "temp1","0"};
 
-cvar_t pausable = {"pausable","1"};
-
-cvar_t temp1 = {"temp1","0"};
-
-cvar_t timestamps = {"timestamps", "0", true};
-cvar_t timeformat = {"timeformat", "[%b %e %X] ", true};
+cvar_t timestamps = {CVAR_SAVE, "timestamps", "0"};
+cvar_t timeformat = {CVAR_SAVE, "timeformat", "[%b %e %X] "};
 
 /*
 ================
 Host_EndGame
 ================
 */
-void Host_EndGame (char *message, ...)
+void Host_EndGame (const char *format, ...)
 {
-       va_list         argptr;
-       char            string[1024];
-       
-       va_start (argptr,message);
-       vsprintf (string,message,argptr);
+       va_list argptr;
+       char string[1024];
+
+       va_start (argptr,format);
+       vsprintf (string,format,argptr);
        va_end (argptr);
        Con_DPrintf ("Host_EndGame: %s\n",string);
-       
+
        if (sv.active)
                Host_ShutdownServer (false);
 
        if (cls.state == ca_dedicated)
                Sys_Error ("Host_EndGame: %s\n",string);        // dedicated servers exit
-       
+
        if (cls.demonum != -1)
                CL_NextDemo ();
        else
@@ -118,110 +132,142 @@ Host_Error
 This shuts down both the client and server
 ================
 */
-char           hosterrorstring[1024];
-void Host_Error (char *error, ...)
+void PRVM_ProcessError(void);
+static char hosterrorstring1[4096];
+static char hosterrorstring2[4096];
+static qboolean hosterror = false;
+void Host_Error (const char *error, ...)
 {
-       va_list         argptr;
-       static  qboolean inerror = false;
-       
-       if (inerror)
-       {
-               char string[1024];
-               va_start (argptr,error);
-               vsprintf (string,error,argptr);
-               va_end (argptr);
-               Sys_Error ("Host_Error: recursively entered (original error was: %s    new error is: %s)", hosterrorstring, string);
-       }
-       inerror = true;
-       
-       SCR_EndLoadingPlaque ();                // reenable screen updates
+       va_list argptr;
 
        va_start (argptr,error);
-       vsprintf (hosterrorstring,error,argptr);
+       vsprintf (hosterrorstring1,error,argptr);
        va_end (argptr);
-       Con_Printf ("Host_Error: %s\n",hosterrorstring);
-       
+
+       Con_Printf ("Host_Error: %s\n", hosterrorstring1);
+
+       // LordHavoc: if first frame has not been shown, or currently shutting
+       // down, do Sys_Error instead
+       if (!host_loopactive || host_shuttingdown)
+               Sys_Error ("Host_Error: %s", hosterrorstring1);
+
+       if (hosterror)
+               Sys_Error ("Host_Error: recursively entered (original error was: %s    new error is: %s)", hosterrorstring2, hosterrorstring1);
+       hosterror = true;
+
+       strcpy(hosterrorstring2, hosterrorstring1);
+
+       CL_Parse_DumpPacket();
+
+       PR_Crash();
+
+       //PRVM_Crash(); // crash current prog
+
+       // crash all prvm progs
+       PRVM_CrashAll();
+
+       PRVM_ProcessError();
+
        if (sv.active)
                Host_ShutdownServer (false);
 
        if (cls.state == ca_dedicated)
-               Sys_Error ("Host_Error: %s\n",hosterrorstring); // dedicated servers exit
+               Sys_Error ("Host_Error: %s\n",hosterrorstring2);        // dedicated servers exit
 
        CL_Disconnect ();
        cls.demonum = -1;
 
-       inerror = false;
+       hosterror = false;
 
        longjmp (host_abortserver, 1);
 }
 
-/*
-================
-Host_FindMaxClients
-================
-*/
-void   Host_FindMaxClients (void)
+mempool_t *sv_clients_mempool = NULL;
+
+void Host_ServerOptions (void)
 {
-       int             i;
+       int i, numplayers;
+
+       // general default
+       numplayers = 8;
 
-       svs.maxclients = 1;
-               
-       i = COM_CheckParm ("-dedicated");
-       if (i)
+       if (cl_available)
        {
-               cls.state = ca_dedicated;
-               if (i != (com_argc - 1))
+               // client exists, check what mode the user wants
+               i = COM_CheckParm ("-dedicated");
+               if (i)
                {
-                       svs.maxclients = atoi (com_argv[i+1]);
+                       cls.state = ca_dedicated;
+                       // default players unless specified
+                       if (i != (com_argc - 1))
+                               numplayers = atoi (com_argv[i+1]);
+                       if (COM_CheckParm ("-listen"))
+                               Sys_Error ("Only one of -dedicated or -listen can be specified");
                }
                else
-                       svs.maxclients = 8;
+               {
+                       cls.state = ca_disconnected;
+                       i = COM_CheckParm ("-listen");
+                       if (i)
+                       {
+                               // default players unless specified
+                               if (i != (com_argc - 1))
+                                       numplayers = atoi (com_argv[i+1]);
+                       }
+                       else
+                       {
+                               // default players in some games, singleplayer in most
+                               if (gamemode != GAME_TRANSFUSION && gamemode != GAME_GOODVSBAD2 && gamemode != GAME_NEXUIZ && gamemode != GAME_BATTLEMECH)
+                                       numplayers = 1;
+                       }
+               }
        }
        else
-               cls.state = ca_disconnected;
-
-       i = COM_CheckParm ("-listen");
-       if (i)
        {
-               if (cls.state == ca_dedicated)
-                       Sys_Error ("Only one of -dedicated or -listen can be specified");
-               if (i != (com_argc - 1))
-                       svs.maxclients = atoi (com_argv[i+1]);
-               else
-                       svs.maxclients = 8;
+               // no client in the executable, always start dedicated server
+               if (COM_CheckParm ("-listen"))
+                       Sys_Error ("-listen not available in a dedicated server executable");
+               cls.state = ca_dedicated;
+               // check for -dedicated specifying how many players
+               i = COM_CheckParm ("-dedicated");
+               // default players unless specified
+               if (i && i != (com_argc - 1))
+                       numplayers = atoi (com_argv[i+1]);
        }
-       if (svs.maxclients < 1)
-               svs.maxclients = 8;
-       else if (svs.maxclients > MAX_SCOREBOARD)
-               svs.maxclients = MAX_SCOREBOARD;
-
-       svs.maxclientslimit = svs.maxclients;
-       if (svs.maxclientslimit < MAX_SCOREBOARD) // LordHavoc: upped listen mode limit from 4 to MAX_SCOREBOARD
-               svs.maxclientslimit = MAX_SCOREBOARD;
-       svs.clients = Hunk_AllocName (svs.maxclientslimit*sizeof(client_t), "clients");
-
-       if (svs.maxclients > 1)
-               Cvar_SetValue ("deathmatch", 1.0);
-       else
-               Cvar_SetValue ("deathmatch", 0.0);
-}
 
+       if (numplayers < 1)
+               numplayers = 8;
+
+       numplayers = bound(1, numplayers, MAX_SCOREBOARD);
+
+       if (numplayers > 1 && !deathmatch.integer)
+               Cvar_SetValueQuick(&deathmatch, 1);
+
+       svs.maxclients = numplayers;
+       sv_clients_mempool = Mem_AllocPool("server clients");
+       svs.clients = Mem_Alloc(sv_clients_mempool, sizeof(client_t) * svs.maxclients);
+}
 
 /*
 =======================
 Host_InitLocal
 ======================
 */
+void Host_SaveConfig_f(void);
 void Host_InitLocal (void)
 {
        Host_InitCommands ();
        
+       Cmd_AddCommand("saveconfig", Host_SaveConfig_f);
+
        Cvar_RegisterVariable (&host_framerate);
        Cvar_RegisterVariable (&host_speeds);
        Cvar_RegisterVariable (&slowmo);
        Cvar_RegisterVariable (&host_minfps);
        Cvar_RegisterVariable (&host_maxfps);
 
+       Cvar_RegisterVariable (&sv_echobprint);
+
        Cvar_RegisterVariable (&sys_ticrate);
        Cvar_RegisterVariable (&serverprofile);
 
@@ -232,6 +278,8 @@ void Host_InitLocal (void)
        Cvar_RegisterVariable (&noexit);
        Cvar_RegisterVariable (&skill);
        Cvar_RegisterVariable (&developer);
+       if (forcedeveloper) // make it real now that the cvar is registered
+               Cvar_SetValue("developer", 1);
        Cvar_RegisterVariable (&deathmatch);
        Cvar_RegisterVariable (&coop);
 
@@ -242,38 +290,36 @@ void Host_InitLocal (void)
        Cvar_RegisterVariable (&timestamps);
        Cvar_RegisterVariable (&timeformat);
 
-       Host_FindMaxClients ();
-       
-       host_time = 1.0;                // so a think at time 0 won't get called
+       Host_ServerOptions ();
 }
 
 
 /*
 ===============
-Host_WriteConfiguration
+Host_SaveConfig_f
 
 Writes key bindings and archived cvars to config.cfg
 ===============
 */
-void Host_WriteConfiguration (void)
+void Host_SaveConfig_f(void)
 {
-       FILE    *f;
+       qfile_t *f;
 
 // dedicated servers initialize the host but don't parse and set the
 // config.cfg cvars
-       if (host_initialized & !isDedicated)
+       if (host_initialized && cls.state != ca_dedicated)
        {
-               f = fopen (va("%s/config.cfg",com_gamedir), "w");
+               f = FS_Open ("config.cfg", "w", false);
                if (!f)
                {
                        Con_Printf ("Couldn't write config.cfg.\n");
                        return;
                }
-               
+
                Key_WriteBindings (f);
                Cvar_WriteVariables (f);
 
-               fclose (f);
+               FS_Close (f);
        }
 }
 
@@ -282,19 +328,19 @@ void Host_WriteConfiguration (void)
 =================
 SV_ClientPrintf
 
-Sends text across to be displayed 
+Sends text across to be displayed
 FIXME: make this just a stuffed echo?
 =================
 */
-void SV_ClientPrintf (char *fmt, ...)
+void SV_ClientPrintf(const char *fmt, ...)
 {
-       va_list         argptr;
-       char            string[1024];
-       
+       va_list argptr;
+       char string[1024];
+
        va_start (argptr,fmt);
        vsprintf (string, fmt,argptr);
        va_end (argptr);
-       
+
        MSG_WriteByte (&host_client->message, svc_print);
        MSG_WriteString (&host_client->message, string);
 }
@@ -306,22 +352,28 @@ SV_BroadcastPrintf
 Sends text to all active clients
 =================
 */
-void SV_BroadcastPrintf (char *fmt, ...)
+void SV_BroadcastPrintf(const char *fmt, ...)
 {
-       va_list         argptr;
-       char            string[1024];
-       int                     i;
-       
-       va_start (argptr,fmt);
-       vsprintf (string, fmt,argptr);
-       va_end (argptr);
-       
-       for (i=0 ; i<svs.maxclients ; i++)
-               if (svs.clients[i].active && svs.clients[i].spawned)
+       va_list argptr;
+       char string[4096];
+       int i;
+       client_t *client;
+
+       va_start(argptr,fmt);
+       vsnprintf(string, sizeof(string), fmt,argptr);
+       va_end(argptr);
+
+       for (i = 0, client = svs.clients;i < svs.maxclients;i++, client++)
+       {
+               if (client->spawned)
                {
-                       MSG_WriteByte (&svs.clients[i].message, svc_print);
-                       MSG_WriteString (&svs.clients[i].message, string);
+                       MSG_WriteByte(&client->message, svc_print);
+                       MSG_WriteString(&client->message, string);
                }
+       }
+
+       if (sv_echobprint.integer && cls.state == ca_dedicated)
+               Sys_Printf("%s", string);
 }
 
 /*
@@ -331,17 +383,17 @@ Host_ClientCommands
 Send text over to the client to be executed
 =================
 */
-void Host_ClientCommands (char *fmt, ...)
+void Host_ClientCommands(const char *fmt, ...)
 {
-       va_list         argptr;
-       char            string[1024];
-       
-       va_start (argptr,fmt);
-       vsprintf (string, fmt,argptr);
-       va_end (argptr);
-       
-       MSG_WriteByte (&host_client->message, svc_stufftext);
-       MSG_WriteString (&host_client->message, string);
+       va_list argptr;
+       char string[1024];
+
+       va_start(argptr,fmt);
+       vsprintf(string, fmt,argptr);
+       va_end(argptr);
+
+       MSG_WriteByte(&host_client->message, svc_stufftext);
+       MSG_WriteString(&host_client->message, string);
 }
 
 /*
@@ -352,59 +404,65 @@ Called when the player is getting totally kicked off the host
 if (crash = true), don't bother sending signofs
 =====================
 */
-void SV_DropClient (qboolean crash)
+void SV_DropClient(qboolean crash)
 {
-       int             saveSelf;
-       int             i;
+       int saveSelf;
+       int i;
        client_t *client;
 
-       if (!crash)
+       Con_Printf("Client \"%s\" dropped\n", host_client->name);
+
+       // send any final messages (don't check for errors)
+       if (host_client->netconnection)
        {
-               // send any final messages (don't check for errors)
-               if (NET_CanSendMessage (host_client->netconnection))
+               // free the client (the body stays around)
+               if (!crash)
                {
-                       MSG_WriteByte (&host_client->message, svc_disconnect);
-                       NET_SendMessage (host_client->netconnection, &host_client->message);
+                       // LordHavoc: no opportunity for resending, so use unreliable
+                       MSG_WriteByte(&host_client->message, svc_disconnect);
+                       NetConn_SendUnreliableMessage(host_client->netconnection, &host_client->message);
                }
-       
-               if (sv.active && host_client->edict && host_client->spawned) // LordHavoc: don't call QC if server is dead (avoids recursive Host_Error in some mods when they run out of edicts)
+
+               // break the net connection
+               NetConn_Close(host_client->netconnection);
+               host_client->netconnection = NULL;
+
+               // LordHavoc: don't call QC if server is dead (avoids recursive
+               // Host_Error in some mods when they run out of edicts)
+               if (sv.active && host_client->edict && host_client->spawned)
                {
-               // call the prog function for removing a client
-               // this will set the body to a dead frame, among other things
+                       // call the prog function for removing a client
+                       // this will set the body to a dead frame, among other things
                        saveSelf = pr_global_struct->self;
                        pr_global_struct->self = EDICT_TO_PROG(host_client->edict);
-                       PR_ExecuteProgram (pr_global_struct->ClientDisconnect);
+                       PR_ExecuteProgram(pr_global_struct->ClientDisconnect, "QC function ClientDisconnect is missing");
                        pr_global_struct->self = saveSelf;
                }
-
-               Sys_Printf ("Client %s removed\n",host_client->name);
        }
 
-// break the net connection
-       NET_Close (host_client->netconnection);
-       host_client->netconnection = NULL;
-
-// free the client (the body stays around)
-       host_client->active = false;
-       host_client->name[0] = 0;
-       host_client->old_frags = -999999;
-       net_activeconnections--;
-
-// send notification to all clients
-       for (i=0, client = svs.clients ; i<svs.maxclients ; i++, client++)
+       // send notification to all clients
+       for (i = 0, client = svs.clients;i < svs.maxclients;i++, client++)
        {
                if (!client->active)
                        continue;
-               MSG_WriteByte (&client->message, svc_updatename);
-               MSG_WriteByte (&client->message, host_client - svs.clients);
-               MSG_WriteString (&client->message, "");
-               MSG_WriteByte (&client->message, svc_updatefrags);
-               MSG_WriteByte (&client->message, host_client - svs.clients);
-               MSG_WriteShort (&client->message, 0);
-               MSG_WriteByte (&client->message, svc_updatecolors);
-               MSG_WriteByte (&client->message, host_client - svs.clients);
-               MSG_WriteByte (&client->message, 0);
+               MSG_WriteByte(&client->message, svc_updatename);
+               MSG_WriteByte(&client->message, host_client->number);
+               MSG_WriteString(&client->message, "");
+               MSG_WriteByte(&client->message, svc_updatefrags);
+               MSG_WriteByte(&client->message, host_client->number);
+               MSG_WriteShort(&client->message, 0);
+               MSG_WriteByte(&client->message, svc_updatecolors);
+               MSG_WriteByte(&client->message, host_client->number);
+               MSG_WriteByte(&client->message, 0);
        }
+
+       NetConn_Heartbeat(1);
+
+       // free the client now
+       if (host_client->entitydatabase4)
+               EntityFrame4_FreeDatabase(host_client->entitydatabase4);
+       // clear the client struct (this sets active to false)
+       memset(host_client, 0, sizeof(*host_client));
 }
 
 /*
@@ -416,65 +474,44 @@ This only happens at the end of a game, not between levels
 */
 void Host_ShutdownServer(qboolean crash)
 {
-       int             i;
-       int             count;
-       sizebuf_t       buf;
-       char            message[4];
-       double  start;
+       int i, count;
+       sizebuf_t buf;
+       char message[4];
 
        if (!sv.active)
                return;
 
+       // print out where the crash happened, if it was caused by QC
+       PR_Crash();
+
        sv.active = false;
 
 // stop all client sounds immediately
-       if (cls.state == ca_connected)
-               CL_Disconnect ();
+       CL_Disconnect();
 
-// flush any pending messages - like the score!!!
-       start = Sys_FloatTime();
-       do
-       {
-               count = 0;
-               for (i=0, host_client = svs.clients ; i<svs.maxclients ; i++, host_client++)
-               {
-                       if (host_client->active && host_client->message.cursize)
-                       {
-                               if (NET_CanSendMessage (host_client->netconnection))
-                               {
-                                       NET_SendMessage(host_client->netconnection, &host_client->message);
-                                       SZ_Clear (&host_client->message);
-                               }
-                               else
-                               {
-                                       NET_GetMessage(host_client->netconnection);
-                                       count++;
-                               }
-                       }
-               }
-               if ((Sys_FloatTime() - start) > 3.0)
-                       break;
-       }
-       while (count);
+       NetConn_Heartbeat(2);
+       NetConn_Heartbeat(2);
 
 // make sure all the clients know we're disconnecting
        buf.data = message;
        buf.maxsize = 4;
        buf.cursize = 0;
        MSG_WriteByte(&buf, svc_disconnect);
-       count = NET_SendToAll(&buf, 5);
+       count = NetConn_SendToAll(&buf, 5);
        if (count)
-               Con_Printf("Host_ShutdownServer: NET_SendToAll failed for %u clients\n", count);
+               Con_Printf("Host_ShutdownServer: NetConn_SendToAll failed for %u clients\n", count);
 
-       for (i=0, host_client = svs.clients ; i<svs.maxclients ; i++, host_client++)
+       for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
                if (host_client->active)
-                       SV_DropClient(crash);
+                       SV_DropClient(crash); // server shutdown
+
+       NetConn_CloseServerPorts();
 
 //
 // clear structures
 //
-       memset (&sv, 0, sizeof(sv));
-       memset (svs.clients, 0, svs.maxclientslimit*sizeof(client_t));
+       memset(&sv, 0, sizeof(sv));
+       memset(svs.clients, 0, svs.maxclients*sizeof(client_t));
 }
 
 
@@ -490,8 +527,6 @@ void Host_ClearMemory (void)
 {
        Con_DPrintf ("Clearing memory\n");
        Mod_ClearAll ();
-       if (host_hunklevel)
-               Hunk_FreeToLowMark (host_hunklevel);
 
        cls.signon = 0;
        memset (&sv, 0, sizeof(sv));
@@ -508,8 +543,10 @@ Host_FilterTime
 Returns false if the time is too short to run a frame
 ===================
 */
-qboolean Host_FilterTime (float time)
+extern cvar_t cl_avidemo;
+qboolean Host_FilterTime (double time)
 {
+       double timecap, timeleft;
        realtime += time;
 
        if (slowmo.value < 0.0f)
@@ -518,18 +555,48 @@ qboolean Host_FilterTime (float time)
                Cvar_SetValue("host_minfps", 10.0f);
        if (host_maxfps.value < host_minfps.value)
                Cvar_SetValue("host_maxfps", host_minfps.value);
+       if (cl_avidemo.value < 0.1f && cl_avidemo.value != 0.0f)
+               Cvar_SetValue("cl_avidemo", 0.0f);
+
+       // check if framerate is too high
+       if (!cls.timedemo)
+       {
+               // default to sys_ticrate (server framerate - presumably low) unless we
+               // have a good reason to run faster
+               timecap = sys_ticrate.value;
+               if (cls.state != ca_dedicated)
+               {
+                       if (cl_avidemo.value >= 0.1f)
+                               timecap = 1.0 / (double)cl_avidemo.value;
+                       else if (vid_activewindow)
+                               timecap = 1.0 / host_maxfps.value;
+               }
 
-       if ((!cls.timedemo) && ((realtime - oldrealtime) < (1.0 / host_maxfps.value)))
-               return false;           // framerate is too high
+               timeleft = oldrealtime + timecap - realtime;
+               if (timeleft > 0)
+               {
+                       // don't totally hog the CPU
+                       if (timeleft >= 0.02)
+                               Sys_Sleep((int)(timeleft * 1000) - 5);
+                       return false;
+               }
+       }
 
-       host_realframetime = host_frametime = realtime - oldrealtime; // LordHavoc: copy into host_realframetime as well
+       // LordHavoc: copy into host_realframetime as well
+       host_realframetime = host_frametime = realtime - oldrealtime;
        oldrealtime = realtime;
 
        if (cls.timedemo)
-               return true; // disable time effects
+       {
+               // disable time effects
+               cl.frametime = host_frametime;
+               return true;
+       }
 
        if (host_framerate.value > 0)
                host_frametime = host_framerate.value;
+       else if (cl_avidemo.value >= 0.1f)
+               host_frametime = (1.0 / cl_avidemo.value);
        else
        {
                // don't allow really short frames
@@ -537,8 +604,8 @@ qboolean Host_FilterTime (float time)
                        host_frametime = (1.0 / host_minfps.value);
        }
 
-       host_frametime *= slowmo.value;
-       
+       cl.frametime = host_frametime = bound(0, host_frametime * slowmo.value, 0.1f); // LordHavoc: the QC code relies on no less than 10fps
+
        return true;
 }
 
@@ -552,7 +619,7 @@ Add them exactly as if they had been typed at the console
 */
 void Host_GetConsoleCommands (void)
 {
-       char    *cmd;
+       char *cmd;
 
        while (1)
        {
@@ -570,34 +637,40 @@ Host_ServerFrame
 
 ==================
 */
-double frametimetotal = 0, lastservertime = 0;
 void Host_ServerFrame (void)
 {
+       static double frametimetotal = 0, lastservertime = 0;
        frametimetotal += host_frametime;
-       // LordHavoc: cap server at sys_ticrate in listen games
-       if (!isDedicated && svs.maxclients > 1 && ((realtime - lastservertime) < sys_ticrate.value))
+       // LordHavoc: cap server at sys_ticrate in networked games
+       if (!cl.islocalgame && ((realtime - lastservertime) < sys_ticrate.value))
                return;
+
+       NetConn_ServerFrame();
+
 // run the world state
-       sv_frametime = pr_global_struct->frametime = frametimetotal;
+       if (!sv.paused && (!cl.islocalgame || (key_dest == key_game && !key_consoleactive)))
+               sv.frametime = pr_global_struct->frametime = frametimetotal;
+       else
+               sv.frametime = 0;
        frametimetotal = 0;
-//     pr_global_struct->frametime = host_frametime;
+       lastservertime = realtime;
 
 // set the time and clear the general datagram
-       SV_ClearDatagram ();
-       
-// check for new clients
-       SV_CheckForNewClients ();
+       SV_ClearDatagram();
 
 // read client messages
-       SV_RunClients ();
-       
+       SV_RunClients();
+
 // move things around and think
 // always pause in single player if in console or menus
-       if (!sv.paused && (svs.maxclients > 1 || key_dest == key_game) )
-               SV_Physics ();
+       if (sv.frametime)
+               SV_Physics();
 
 // send all messages to the clients
-       SV_SendClientMessages ();
+       SV_SendClientMessages();
+
+// send an heartbeat if enough time has passed since the last one
+       NetConn_Heartbeat(0);
 }
 
 
@@ -610,47 +683,51 @@ Runs all active servers
 */
 void _Host_Frame (float time)
 {
-       static double           time1 = 0;
-       static double           time2 = 0;
-       static double           time3 = 0;
-       int                     pass1, pass2, pass3;
+       static double time1 = 0;
+       static double time2 = 0;
+       static double time3 = 0;
+       int pass1, pass2, pass3;
+       usercmd_t cmd; // Used for receiving input
 
-       if (setjmp (host_abortserver) )
+       if (setjmp(host_abortserver))
                return;                 // something bad happened, or the server disconnected
 
-// keep the random time dependent
-       rand ();
-       
-// decide the simulation time
-       if (!Host_FilterTime (time))
-               return;                 // don't run too fast, or packets will flood out
-               
-// get new key events
-       Sys_SendKeyEvents ();
+       // keep the random time dependent
+       rand();
 
-// allow mice or other external controllers to add commands
-       IN_Commands ();
+       // decide the simulation time
+       if (!Host_FilterTime(time))
+               return;
 
-// process console commands
-       Cbuf_Execute ();
+       cl.islocalgame = NetConn_IsLocalGame();
 
-       NET_Poll();
+       // get new key events
+       Sys_SendKeyEvents();
+
+       // allow mice or other external controllers to add commands
+       IN_Commands();
+
+       // Collect input into cmd
+       IN_ProcessMove(&cmd);
+
+       // process console commands
+       Cbuf_Execute();
+
+       // if running the server locally, make intentions now
+       if (cls.state == ca_connected && sv.active)
+               CL_SendCmd(&cmd);
 
-// if running the server locally, make intentions now
-       if (sv.active)
-               CL_SendCmd ();
-       
 //-------------------
 //
 // server operations
 //
 //-------------------
 
-// check for commands typed to the host
-       Host_GetConsoleCommands ();
-       
+       // check for commands typed to the host
+       Host_GetConsoleCommands();
+
        if (sv.active)
-               Host_ServerFrame ();
+               Host_ServerFrame();
 
 //-------------------
 //
@@ -658,72 +735,82 @@ void _Host_Frame (float time)
 //
 //-------------------
 
-// if running the server remotely, send intentions now after
-// the incoming messages have been read
-       if (!sv.active)
-               CL_SendCmd ();
+       cl.oldtime = cl.time;
+       cl.time += cl.frametime;
 
-       host_time += host_frametime;
+       NetConn_ClientFrame();
 
-// fetch results from server
        if (cls.state == ca_connected)
        {
-               CL_ReadFromServer ();
+               // if running the server remotely, send intentions now after
+               // the incoming messages have been read
+               if (!sv.active)
+                       CL_SendCmd(&cmd);
+               CL_ReadFromServer();
        }
 
-// update video
-       if (host_speeds.value)
-               time1 = Sys_FloatTime ();
-               
-       SCR_UpdateScreen ();
-
-       if (host_speeds.value)
-               time2 = Sys_FloatTime ();
-               
-// update audio
-       if (cls.signon == SIGNONS)
+       //ui_update();
+
+       CL_VideoFrame();
+
+       // update video
+       if (host_speeds.integer)
+               time1 = Sys_DoubleTime();
+
+       R_UpdateWorld();
+       CL_UpdateScreen();
+
+       if (host_speeds.integer)
+               time2 = Sys_DoubleTime();
+
+       // update audio
+       if (cls.signon == SIGNONS && cl.viewentity >= 0 && cl.viewentity < MAX_EDICTS && cl_entities[cl.viewentity].state_current.active)
        {
-               S_Update (r_origin, vpn, vright, vup);
-               CL_DecayLights ();
+               // LordHavoc: this used to use renderer variables (eww)
+               vec3_t forward, left, up, origin;
+               Matrix4x4_ToVectors(&cl_entities[cl.viewentity].render.matrix, forward, left, up, origin);
+               S_Update(origin, forward, left, up);
        }
        else
-               S_Update (vec3_origin, vec3_origin, vec3_origin, vec3_origin);
-       
+               S_Update(vec3_origin, vec3_origin, vec3_origin, vec3_origin);
+
        CDAudio_Update();
 
-       if (host_speeds.value)
+       if (host_speeds.integer)
        {
-               pass1 = (time1 - time3)*1000;
-               time3 = Sys_FloatTime ();
-               pass2 = (time2 - time1)*1000;
-               pass3 = (time3 - time2)*1000;
-               Con_Printf ("%3i tot %3i server %3i gfx %3i snd\n",
+               pass1 = (time1 - time3)*1000000;
+               time3 = Sys_DoubleTime();
+               pass2 = (time2 - time1)*1000000;
+               pass3 = (time3 - time2)*1000000;
+               Con_Printf("%6ius total %6ius server %6ius gfx %6ius snd\n",
                                        pass1+pass2+pass3, pass1, pass2, pass3);
        }
-       
+
        host_framecount++;
+       host_loopactive = true;
+
 }
 
 void Host_Frame (float time)
 {
-       double  time1, time2;
-       static double   timetotal;
-       static int              timecount;
-       int             i, c, m;
+       double time1, time2;
+       static double timetotal;
+       static int timecount;
+       int i, c, m;
 
-       if (!serverprofile.value)
+       if (!serverprofile.integer)
        {
                _Host_Frame (time);
                return;
        }
-       
-       time1 = Sys_FloatTime ();
+
+       time1 = Sys_DoubleTime ();
        _Host_Frame (time);
-       time2 = Sys_FloatTime ();       
-       
+       time2 = Sys_DoubleTime ();
+
        timetotal += time2 - time1;
        timecount++;
-       
+
        if (timecount < 1000)
                return;
 
@@ -742,143 +829,80 @@ void Host_Frame (float time)
 
 //============================================================================
 
-
-extern int vcrFile;
-#define        VCR_SIGNATURE   0x56435231
-// "VCR1"
-
-void Host_InitVCR ()
-{
-       int             i, len, n;
-       char    *p;
-       
-       if (COM_CheckParm("-playback"))
-       {
-               if (com_argc != 2)
-                       Sys_Error("No other parameters allowed with -playback\n");
-
-               Sys_FileOpenRead("quake.vcr", &vcrFile);
-               if (vcrFile == -1)
-                       Sys_Error("playback file not found\n");
-
-               Sys_FileRead (vcrFile, &i, sizeof(int));
-               if (i != VCR_SIGNATURE)
-                       Sys_Error("Invalid signature in vcr file\n");
-
-               Sys_FileRead (vcrFile, &com_argc, sizeof(int));
-               com_argv = qmalloc(com_argc * sizeof(char *));
-               com_argv[0] = host_parms.argv[0];
-               for (i = 0; i < com_argc; i++)
-               {
-                       Sys_FileRead (vcrFile, &len, sizeof(int));
-                       p = qmalloc(len);
-                       Sys_FileRead (vcrFile, p, len);
-                       com_argv[i+1] = p;
-               }
-               com_argc++; /* add one for arg[0] */
-               host_parms.argc = com_argc;
-               host_parms.argv = com_argv;
-       }
-
-       if ( (n = COM_CheckParm("-record")) != 0)
-       {
-               vcrFile = Sys_FileOpenWrite("quake.vcr");
-
-               i = VCR_SIGNATURE;
-               Sys_FileWrite(vcrFile, &i, sizeof(int));
-               i = com_argc - 1;
-               Sys_FileWrite(vcrFile, &i, sizeof(int));
-               for (i = 1; i < com_argc; i++)
-               {
-                       if (i == n)
-                       {
-                               len = 10;
-                               Sys_FileWrite(vcrFile, &len, sizeof(int));
-                               Sys_FileWrite(vcrFile, "-playback", len);
-                               continue;
-                       }
-                       len = strlen(com_argv[i]) + 1;
-                       Sys_FileWrite(vcrFile, &len, sizeof(int));
-                       Sys_FileWrite(vcrFile, com_argv[i], len);
-               }
-       }
-       
-}
-
-void Render_Init();
+void Render_Init(void);
 
 /*
 ====================
 Host_Init
 ====================
 */
-void Host_Init ()
+void Host_Init (void)
 {
-       /*
-       if (standard_quake)
-               minimum_memory = MINIMUM_MEMORY;
-       else
-               minimum_memory = MINIMUM_MEMORY_LEVELPAK;
-
-       if (COM_CheckParm ("-minmemory"))
-               host_parms.memsize = minimum_memory;
-
-       if (host_parms.memsize < minimum_memory)
-               Sys_Error ("Only %4.1f megs of memory available, can't execute game", host_parms.memsize / (float)0x100000);
-       */
-
-       com_argc = host_parms.argc;
-       com_argv = host_parms.argv;
-
-       Memory_Init (host_parms.membase, host_parms.memsize);
-       Cbuf_Init ();
-       Cmd_Init ();    
-       V_Init ();
-       Chase_Init ();
-       Host_InitVCR ();
-       COM_Init (host_parms.basedir);
-       Host_InitLocal ();
-       W_LoadWadFile ("gfx.wad");
-       Key_Init ();
-       Con_Init ();    
-       M_Init ();      
-       PR_Init ();
-       Mod_Init ();
-       NET_Init ();
-       SV_Init ();
-
-       Con_Printf ("Exe: "__TIME__" "__DATE__"\n");
-       Con_Printf ("%4.1f megabyte heap\n",host_parms.memsize/(1024*1024.0));
-       
-       R_InitTextures ();              // needed even for dedicated servers
-       if (cls.state != ca_dedicated)
+       // LordHavoc: quake never seeded the random number generator before... heh
+       srand(time(NULL));
+
+       // FIXME: this is evil, but possibly temporary
+       if (COM_CheckParm("-developer"))
        {
-               Palette_Init("gfx/palette.lmp");
+               forcedeveloper = true;
+               developer.integer = 1;
+               developer.value = 1;
+       }
 
-#ifndef _WIN32 // on non win32, mouse comes before video for security reasons
-               IN_Init ();
-#endif
-               VID_Init ();
+       Cmd_Init();
+       Memory_Init_Commands();
+       R_Modules_Init();
+       Cbuf_Init();
+       V_Init();
+       COM_Init();
+       Host_InitLocal();
+       Key_Init();
+       Con_Init();
+       PR_Init();
+       PRVM_Init();
+       Mod_Init();
+       NetConn_Init();
+       SV_Init();
+
+       Con_Printf ("Builddate: %s\n", buildstring);
+
+       if (cls.state != ca_dedicated)
+       {
+               Palette_Init();
+               VID_Shared_Init();
+               VID_Init();
 
                Render_Init();
-               S_Init ();
-               CDAudio_Init ();
-               Sbar_Init ();
-               CL_Init ();
-#ifdef _WIN32 // on non win32, mouse comes before video for security reasons
-               IN_Init ();
-#endif
+               S_Init();
+               CDAudio_Init();
+               CL_Init();
        }
 
-       Cbuf_InsertText ("exec quake.rc\n");
-
-       Hunk_AllocName (0, "-HOST_HUNKLEVEL-");
-       host_hunklevel = Hunk_LowMark ();
+       // only cvars are executed when host_initialized == false
+       if (gamemode == GAME_TEU)
+               Cbuf_InsertText("exec teu.rc\n");
+       else
+               Cbuf_InsertText("exec quake.rc\n");
+       Cbuf_Execute();
 
        host_initialized = true;
-       
-       Sys_Printf ("========Quake Initialized=========\n");    
+
+       Con_DPrintf ("========Initialized=========\n");
+
+       if (cls.state != ca_dedicated)
+       {
+               VID_Open();
+               SCR_BeginLoadingPlaque();
+               MR_Init();
+       }
+
+       // stuff it again so the first host frame will execute it again, this time
+       // in its entirety
+       if (gamemode == GAME_TEU)
+               Cbuf_InsertText("exec teu.rc\n");
+       else
+               Cbuf_InsertText("exec quake.rc\n");
+       Cbuf_Execute();
 }
 
 
@@ -893,27 +917,30 @@ to run quit through here before the final handoff to the sys code.
 void Host_Shutdown(void)
 {
        static qboolean isdown = false;
-       
+
        if (isdown)
        {
-               printf ("recursive shutdown\n");
+               Con_Printf ("recursive shutdown\n");
                return;
        }
        isdown = true;
 
-// keep Con_Printf from trying to update the screen
-       scr_disabled_for_loading = true;
+       // Shutdown menu
+       if(MR_Shutdown)
+               MR_Shutdown();
+
+       // AK shutdown PRVM
+       // AK hmm, no PRVM_Shutdown(); yet
+
 
-       Host_WriteConfiguration (); 
+       Host_SaveConfig_f();
 
        CDAudio_Shutdown ();
-       NET_Shutdown ();
-       S_Shutdown();
-       IN_Shutdown ();
+       NetConn_Shutdown ();
 
        if (cls.state != ca_dedicated)
        {
-               R_ShutdownModules();
+               R_Modules_Shutdown();
                VID_Shutdown();
        }
 }