static int
load_progs (const char *name)
{
QFile *file;
int i, size;
char buff[5];
Hash_FlushTable (func_tab);
file = open_file (name, &size);
if (!file) {
perror (name);
return 0;
}
Qread (file, buff, 4);
buff[4] = 0;
Qseek (file, 0, SEEK_SET);
if (!strcmp (buff, QFO)) {
qfo = qfo_read (file);
Qclose (file);
if (!qfo)
return 0;
if (!need_progs)
return 1;
convert_qfo ();
} else {
pr.progs_name = name;
PR_LoadProgsFile (&pr, file, size, 1, 0);
Qclose (file);
if (!pr.progs)
return 0;
PR_LoadStrings (&pr);
PR_ResolveGlobals (&pr);
PR_LoadDebug (&pr);
}
for (i = 0; i < pr.progs->numfunctions; i++) {
// don't bother with builtins
if (pr.pr_functions[i].first_statement > 0)
Hash_AddElement (func_tab, &pr.pr_functions[i]);
}
return 1;
}
/*
==================
CL_ParseServerInfo
==================
*/
static void CL_ParseServerInfo (void)
{
const char *str;
int i;
int nummodels, numsounds;
char model_precache[MAX_MODELS][MAX_QPATH];
char sound_precache[MAX_SOUNDS][MAX_QPATH];
// rjr edict_t *ent;
Con_DPrintf ("Serverinfo packet received.\n");
//
// wipe the client_state_t struct
//
CL_ClearState ();
// parse protocol version number
cl_protocol = MSG_ReadLong ();
switch (cl_protocol)
{
case PROTOCOL_RAVEN_111:
case PROTOCOL_RAVEN_112:
case PROTOCOL_UQE_113:
Con_Printf ("\nServer using protocol %i\n", cl_protocol);
break;
default:
Con_Printf ("\nServer returned version %i, not %i or %i\n",
cl_protocol, PROTOCOL_RAVEN_112, PROTOCOL_UQE_113);
return;
}
// parse maxclients
cl.maxclients = MSG_ReadByte ();
if (cl.maxclients < 1 || cl.maxclients > MAX_CLIENTS)
{
Con_Printf("Bad maxclients (%d) from server\n", cl.maxclients);
return;
}
cl.scores = (scoreboard_t *) Hunk_AllocName (cl.maxclients*sizeof(*cl.scores), "scores");
// parse gametype
cl.gametype = MSG_ReadByte ();
if (cl.gametype == GAME_DEATHMATCH && cl_protocol > PROTOCOL_RAVEN_111)
sv_kingofhill = MSG_ReadShort ();
// parse signon message
str = MSG_ReadString ();
q_strlcpy (cl.levelname, str, sizeof(cl.levelname));
// seperate the printfs so the server message can have a color
Con_Printf("\n\n\35\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\36\37\n\n");
Con_Printf ("%c%s\n", 2, str);
//
// first we go through and touch all of the precache data that still
// happens to be in the cache, so precaching something else doesn't
// needlessly purge it
//
// precache models
memset (cl.model_precache, 0, sizeof(cl.model_precache));
for (nummodels = 1 ; ; nummodels++)
{
str = MSG_ReadString ();
if (!str[0])
break;
if (nummodels == MAX_MODELS)
{
Con_Printf ("Server sent too many model precaches\n");
return;
}
q_strlcpy (model_precache[nummodels], str, MAX_QPATH);
Mod_TouchModel (str);
}
// precache sounds
memset (cl.sound_precache, 0, sizeof(cl.sound_precache));
for (numsounds = 1 ; ; numsounds++)
{
str = MSG_ReadString ();
if (!str[0])
break;
if (numsounds == MAX_SOUNDS)
{
Con_Printf ("Server sent too many sound precaches\n");
return;
}
q_strlcpy (sound_precache[numsounds], str, MAX_QPATH);
S_TouchSound (str);
}
//
// now we try to load everything else until a cache allocation fails
//
if (precache.integer)
{
total_loading_size = nummodels + numsounds;
current_loading_size = 1;
loading_stage = 2;
}
// copy the naked name of the map file to the cl structure
COM_StripExtension (COM_SkipPath(model_precache[1]), cl.mapname, sizeof(cl.mapname));
//always precache the world!!!
cl.model_precache[1] = Mod_ForName (model_precache[1], false);
for (i = 2; i < nummodels; i++)
{
if (precache.integer)
{
cl.model_precache[i] = Mod_ForName (model_precache[i], false);
current_loading_size++;
D_ShowLoadingSize();
}
else
cl.model_precache[i] = (model_t *)Mod_FindName (model_precache[i]);
if (cl.model_precache[i] == NULL)
{
Host_Error("Model %s not found", model_precache[i]);
return;
}
CL_KeepaliveMessage ();
}
player_models[0] = (model_t *)Mod_FindName ("models/paladin.mdl");
// Note: old demo doesnt have necro and crusader classes. add
// a GAME_OLD_DEMO flag check ?
player_models[1] = (model_t *)Mod_FindName ("models/crusader.mdl");
player_models[2] = (model_t *)Mod_FindName ("models/necro.mdl");
player_models[3] = (model_t *)Mod_FindName ("models/assassin.mdl");
if (gameflags & GAME_PORTALS)
player_models[4] = (model_t *)Mod_FindName ("models/succubus.mdl");
S_BeginPrecaching ();
for (i = 1; i < numsounds; i++)
{
cl.sound_precache[i] = S_PrecacheSound (sound_precache[i]);
if (precache.integer)
{
current_loading_size++;
D_ShowLoadingSize();
}
CL_KeepaliveMessage ();
}
S_EndPrecaching ();
total_loading_size = 0;
loading_stage = 0;
// local state
cl_entities[0].model = cl.worldmodel = cl.model_precache[1];
R_NewMap ();
if (!sv.active)
{
PR_LoadStrings();
}
PR_LoadPuzzleStrings();
// mission pack, objectives strings
if (gameflags & GAME_PORTALS)
PR_LoadInfoStrings();
Hunk_Check (); // make sure nothing is hurt
// we connected to the server, make sure the mouse is going - S.A.
menu_disabled_mouse = false;
IN_ActivateMouse();
}
