2 Copyright (C) 1996-1997 Id Software, Inc.
4 This program is free software; you can redistribute it and/or
5 modify it under the terms of the GNU General Public License
6 as published by the Free Software Foundation; either version 2
7 of the License, or (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
13 See the GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
24 cvar_t sv_cheats = {0, "sv_cheats", "0", "enables cheat commands in any game, and cheat impulses in dpmod"};
25 cvar_t sv_adminnick = {CVAR_SAVE, "sv_adminnick", "", "nick name to use for admin messages instead of host name"};
26 cvar_t rcon_password = {CVAR_PRIVATE, "rcon_password", "", "password to authenticate rcon commands"};
27 cvar_t rcon_address = {0, "rcon_address", "", "server address to send rcon commands to (when not connected to a server)"};
28 cvar_t team = {CVAR_USERINFO | CVAR_SAVE, "team", "none", "QW team (4 character limit, example: blue)"};
29 cvar_t skin = {CVAR_USERINFO | CVAR_SAVE, "skin", "", "QW player skin name (example: base)"};
30 cvar_t noaim = {CVAR_USERINFO | CVAR_SAVE, "noaim", "1", "QW option to disable vertical autoaim"};
31 qboolean allowcheats = false;
39 void Host_Quit_f (void)
50 void Host_Status_f (void)
53 int seconds, minutes, hours = 0, j, players;
54 void (*print) (const char *fmt, ...);
56 if (cmd_source == src_command)
58 // if running a client, try to send over network so the client's status report parser will see the report
59 if (cls.state == ca_connected)
61 Cmd_ForwardToServer ();
67 print = SV_ClientPrintf;
72 for (players = 0, j = 0;j < svs.maxclients;j++)
73 if (svs.clients[j].active)
75 print ("host: %s\n", Cvar_VariableString ("hostname"));
76 print ("version: %s build %s\n", gamename, buildstring);
77 print ("protocol: %i (%s)\n", Protocol_NumberForEnum(sv.protocol), Protocol_NameForEnum(sv.protocol));
78 print ("map: %s\n", sv.name);
79 print ("players: %i active (%i max)\n\n", players, svs.maxclients);
80 for (j = 0, client = svs.clients;j < svs.maxclients;j++, client++)
84 seconds = (int)(realtime - client->connecttime);
85 minutes = seconds / 60;
88 seconds -= (minutes * 60);
91 minutes -= (hours * 60);
95 print ("#%-3u %-16.16s^%i %3i %2i:%02i:%02i\n", j+1, client->name, STRING_COLOR_DEFAULT, client->frags, hours, minutes, seconds);
96 print (" %s\n", client->netconnection ? client->netconnection->address : "botclient");
105 Sets client to godmode
108 void Host_God_f (void)
112 SV_ClientPrint("No cheats allowed, use sv_cheats 1 and restart level to enable.\n");
116 host_client->edict->fields.server->flags = (int)host_client->edict->fields.server->flags ^ FL_GODMODE;
117 if (!((int)host_client->edict->fields.server->flags & FL_GODMODE) )
118 SV_ClientPrint("godmode OFF\n");
120 SV_ClientPrint("godmode ON\n");
123 void Host_Notarget_f (void)
127 SV_ClientPrint("No cheats allowed, use sv_cheats 1 and restart level to enable.\n");
131 host_client->edict->fields.server->flags = (int)host_client->edict->fields.server->flags ^ FL_NOTARGET;
132 if (!((int)host_client->edict->fields.server->flags & FL_NOTARGET) )
133 SV_ClientPrint("notarget OFF\n");
135 SV_ClientPrint("notarget ON\n");
138 qboolean noclip_anglehack;
140 void Host_Noclip_f (void)
144 SV_ClientPrint("No cheats allowed, use sv_cheats 1 and restart level to enable.\n");
148 if (host_client->edict->fields.server->movetype != MOVETYPE_NOCLIP)
150 noclip_anglehack = true;
151 host_client->edict->fields.server->movetype = MOVETYPE_NOCLIP;
152 SV_ClientPrint("noclip ON\n");
156 noclip_anglehack = false;
157 host_client->edict->fields.server->movetype = MOVETYPE_WALK;
158 SV_ClientPrint("noclip OFF\n");
166 Sets client to flymode
169 void Host_Fly_f (void)
173 SV_ClientPrint("No cheats allowed, use sv_cheats 1 and restart level to enable.\n");
177 if (host_client->edict->fields.server->movetype != MOVETYPE_FLY)
179 host_client->edict->fields.server->movetype = MOVETYPE_FLY;
180 SV_ClientPrint("flymode ON\n");
184 host_client->edict->fields.server->movetype = MOVETYPE_WALK;
185 SV_ClientPrint("flymode OFF\n");
196 void Host_Pings_f (void); // called by Host_Ping_f
197 void Host_Ping_f (void)
201 void (*print) (const char *fmt, ...);
203 if (cmd_source == src_command)
205 // if running a client, try to send over network so the client's ping report parser will see the report
206 if (cls.state == ca_connected)
208 Cmd_ForwardToServer ();
214 print = SV_ClientPrintf;
219 print("Client ping times:\n");
220 for (i = 0, client = svs.clients;i < svs.maxclients;i++, client++)
224 print("%4i %s\n", bound(0, (int)floor(client->ping*1000+0.5), 9999), client->name);
227 // now call the Pings command also, which will send a report that contains packet loss for the scoreboard (as well as a simpler ping report)
232 ===============================================================================
236 ===============================================================================
240 ======================
245 command from the console. Active clients are kicked off.
246 ======================
248 void Host_Map_f (void)
250 char level[MAX_QPATH];
254 Con_Print("map <levelname> : start a new game (kicks off all players)\n");
258 cls.demonum = -1; // stop demo loop in case this fails
261 Host_ShutdownServer();
266 svs.serverflags = 0; // haven't completed an episode yet
267 allowcheats = sv_cheats.integer != 0;
268 strlcpy(level, Cmd_Argv(1), sizeof(level));
269 SV_SpawnServer(level);
270 if (sv.active && cls.state == ca_disconnected)
271 CL_EstablishConnection("local:1");
278 Goes to a new map, taking all clients along
281 void Host_Changelevel_f (void)
283 char level[MAX_QPATH];
287 Con_Print("changelevel <levelname> : continue game on a new level\n");
300 SV_SaveSpawnparms ();
302 allowcheats = sv_cheats.integer != 0;
303 strlcpy(level, Cmd_Argv(1), sizeof(level));
304 SV_SpawnServer(level);
305 if (sv.active && cls.state == ca_disconnected)
306 CL_EstablishConnection("local:1");
313 Restarts the current server for a dead player
316 void Host_Restart_f (void)
318 char mapname[MAX_QPATH];
322 Con_Print("restart : restart current level\n");
327 Con_Print("Only the server may restart\n");
334 allowcheats = sv_cheats.integer != 0;
335 strlcpy(mapname, sv.name, sizeof(mapname));
336 SV_SpawnServer(mapname);
337 if (sv.active && cls.state == ca_disconnected)
338 CL_EstablishConnection("local:1");
345 This command causes the client to wait for the signon messages again.
346 This is sent just before a server changes levels
349 void Host_Reconnect_f (void)
352 // if not connected, reconnect to the most recent server
355 // if we have connected to a server recently, the userinfo
356 // will still contain its IP address, so get the address...
357 InfoString_GetValue(cls.userinfo, "*ip", temp, sizeof(temp));
359 CL_EstablishConnection(temp);
361 Con_Printf("Reconnect to what server? (you have not connected to a server yet)\n");
364 // if connected, do something based on protocol
365 if (cls.protocol == PROTOCOL_QUAKEWORLD)
367 // quakeworld can just re-login
368 if (cls.qw_downloadmemory) // don't change when downloading
373 if (cls.state == ca_connected && cls.signon < SIGNONS)
375 Con_Printf("reconnecting...\n");
376 MSG_WriteChar(&cls.netcon->message, qw_clc_stringcmd);
377 MSG_WriteString(&cls.netcon->message, "new");
382 // netquake uses reconnect on level changes (silly)
385 Con_Print("reconnect : wait for signon messages again\n");
390 Con_Print("reconnect: no signon, ignoring reconnect\n");
393 cls.signon = 0; // need new connection messages
398 =====================
401 User command to connect to server
402 =====================
404 void Host_Connect_f (void)
408 Con_Print("connect <serveraddress> : connect to a multiplayer game\n");
411 CL_EstablishConnection(Cmd_Argv(1));
416 ===============================================================================
420 ===============================================================================
423 #define SAVEGAME_VERSION 5
429 Writes a SAVEGAME_COMMENT_LENGTH character comment describing the current
432 void Host_SavegameComment (char *text)
437 for (i=0 ; i<SAVEGAME_COMMENT_LENGTH ; i++)
439 // LordHavoc: added min() to prevent overflow
440 memcpy (text, cl.levelname, min(strlen(cl.levelname), SAVEGAME_COMMENT_LENGTH));
441 sprintf (kills,"kills:%3i/%3i", cl.stats[STAT_MONSTERS], cl.stats[STAT_TOTALMONSTERS]);
442 memcpy (text+22, kills, strlen(kills));
443 // convert space to _ to make stdio happy
444 // LordHavoc: convert control characters to _ as well
445 for (i=0 ; i<SAVEGAME_COMMENT_LENGTH ; i++)
448 text[SAVEGAME_COMMENT_LENGTH] = '\0';
457 void Host_Savegame_f (void)
459 char name[MAX_QPATH];
462 char comment[SAVEGAME_COMMENT_LENGTH+1];
464 if (cls.state != ca_connected || !sv.active)
466 Con_Print("Not playing a local game.\n");
472 Con_Print("Can't save in intermission.\n");
476 for (i = 0;i < svs.maxclients;i++)
478 if (svs.clients[i].active)
482 Con_Print("Can't save multiplayer games.\n");
485 if (svs.clients[i].edict->fields.server->deadflag)
487 Con_Print("Can't savegame with a dead player\n");
495 Con_Print("save <savename> : save a game\n");
499 if (strstr(Cmd_Argv(1), ".."))
501 Con_Print("Relative pathnames are not allowed.\n");
505 strlcpy (name, Cmd_Argv(1), sizeof (name));
506 FS_DefaultExtension (name, ".sav", sizeof (name));
508 Con_Printf("Saving game to %s...\n", name);
509 f = FS_Open (name, "wb", false, false);
512 Con_Print("ERROR: couldn't open.\n");
516 FS_Printf(f, "%i\n", SAVEGAME_VERSION);
517 Host_SavegameComment (comment);
518 FS_Printf(f, "%s\n", comment);
519 for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
520 FS_Printf(f, "%f\n", svs.clients[0].spawn_parms[i]);
521 FS_Printf(f, "%d\n", current_skill);
522 FS_Printf(f, "%s\n", sv.name);
523 FS_Printf(f, "%f\n",sv.time);
525 // write the light styles
526 for (i=0 ; i<MAX_LIGHTSTYLES ; i++)
528 if (sv.lightstyles[i][0])
529 FS_Printf(f, "%s\n", sv.lightstyles[i]);
536 PRVM_ED_WriteGlobals (f);
537 for (i=0 ; i<prog->num_edicts ; i++)
538 PRVM_ED_Write (f, PRVM_EDICT_NUM(i));
543 Con_Print("done.\n");
552 void Host_Loadgame_f (void)
554 char filename[MAX_QPATH];
555 char mapname[MAX_QPATH];
565 float spawn_parms[NUM_SPAWN_PARMS];
569 Con_Print("load <savename> : load a game\n");
573 strlcpy (filename, Cmd_Argv(1), sizeof(filename));
574 FS_DefaultExtension (filename, ".sav", sizeof (filename));
576 Con_Printf("Loading game from %s...\n", filename);
578 cls.demonum = -1; // stop demo loop in case this fails
580 t = text = (char *)FS_LoadFile (filename, tempmempool, false, NULL);
583 Con_Print("ERROR: couldn't open.\n");
588 COM_ParseTokenConsole(&t);
589 version = atoi(com_token);
590 if (version != SAVEGAME_VERSION)
593 Con_Printf("Savegame is version %i, not %i\n", version, SAVEGAME_VERSION);
598 // this is a little hard to parse, as : is a separator in COM_ParseToken,
599 // so use the console parser instead
600 COM_ParseTokenConsole(&t);
602 for (i = 0;i < NUM_SPAWN_PARMS;i++)
604 COM_ParseTokenConsole(&t);
605 spawn_parms[i] = atof(com_token);
608 COM_ParseTokenConsole(&t);
609 // this silliness is so we can load 1.06 save files, which have float skill values
610 current_skill = (int)(atof(com_token) + 0.5);
611 Cvar_SetValue ("skill", (float)current_skill);
614 COM_ParseTokenConsole(&t);
615 strlcpy (mapname, com_token, sizeof(mapname));
618 COM_ParseTokenConsole(&t);
619 time = atof(com_token);
621 allowcheats = sv_cheats.integer != 0;
623 SV_SpawnServer (mapname);
627 Con_Print("Couldn't load map\n");
630 sv.paused = true; // pause until all clients connect
633 // load the light styles
635 for (i = 0;i < MAX_LIGHTSTYLES;i++)
639 COM_ParseTokenConsole(&t);
640 // if this is a 64 lightstyle savegame produced by Quake, stop now
641 // we have to check this because darkplaces saves 256 lightstyle savegames
642 if (com_token[0] == '{')
647 strlcpy(sv.lightstyles[i], com_token, sizeof(sv.lightstyles[i]));
650 // now skip everything before the first opening brace
651 // (this is for forward compatibility, so that older versions (at
652 // least ones with this fix) can load savegames with extra data before the
653 // first brace, as might be produced by a later engine version)
657 COM_ParseTokenConsole(&t);
658 if (com_token[0] == '{')
665 // load the edicts out of the savegame file
672 while (COM_ParseTokenConsole(&t))
673 if (!strcmp(com_token, "}"))
675 if (!COM_ParseTokenConsole(&start))
680 if (strcmp(com_token,"{"))
683 Host_Error ("First token isn't a brace");
688 // parse the global vars
689 PRVM_ED_ParseGlobals (start);
694 if (entnum >= MAX_EDICTS)
697 Host_Error("Host_PerformLoadGame: too many edicts in save file (reached MAX_EDICTS %i)", MAX_EDICTS);
699 while (entnum >= prog->max_edicts)
700 PRVM_MEM_IncreaseEdicts();
701 ent = PRVM_EDICT_NUM(entnum);
702 memset (ent->fields.server, 0, prog->progs->entityfields * 4);
703 ent->priv.server->free = false;
704 PRVM_ED_ParseEdict (start, ent);
706 // link it into the bsp tree
707 if (!ent->priv.server->free)
708 SV_LinkEdict (ent, false);
715 prog->num_edicts = entnum;
718 for (i = 0;i < NUM_SPAWN_PARMS;i++)
719 svs.clients[0].spawn_parms[i] = spawn_parms[i];
723 // make sure we're connected to loopback
724 if (cls.state == ca_disconnected || !(cls.state == ca_connected && cls.netcon != NULL && LHNETADDRESS_GetAddressType(&cls.netcon->peeraddress) == LHNETADDRESSTYPE_LOOP))
725 CL_EstablishConnection("local:1");
728 //============================================================================
731 ======================
733 ======================
735 cvar_t cl_name = {CVAR_SAVE | CVAR_NQUSERINFOHACK, "_cl_name", "player", "internal storage cvar for current player name (changed by name command)"};
736 void Host_Name_f (void)
739 qboolean valid_colors;
740 char newName[sizeof(host_client->name)];
742 if (Cmd_Argc () == 1)
744 Con_Printf("\"name\" is \"%s\"\n", cl_name.string);
748 if (Cmd_Argc () == 2)
749 strlcpy (newName, Cmd_Argv(1), sizeof (newName));
751 strlcpy (newName, Cmd_Args(), sizeof (newName));
753 for (i = 0, j = 0;newName[i];i++)
754 if (newName[i] != '\r' && newName[i] != '\n')
755 newName[j++] = newName[i];
758 if (cmd_source == src_command)
760 Cvar_Set ("_cl_name", newName);
764 if (realtime < host_client->nametime)
766 SV_ClientPrintf("You can't change name more than once every 5 seconds!\n");
770 host_client->nametime = realtime + 5;
772 // point the string back at updateclient->name to keep it safe
773 strlcpy (host_client->name, newName, sizeof (host_client->name));
775 COM_StringLengthNoColors(host_client->name, 0, &valid_colors);
776 if(!valid_colors) // NOTE: this also proves the string is not empty, as "" is a valid colored string
779 l = strlen(host_client->name);
780 if(l < sizeof(host_client->name) - 1)
782 // duplicate the color tag to escape it
783 host_client->name[i] = STRING_COLOR_TAG;
784 host_client->name[i+1] = 0;
785 //Con_DPrintf("abuse detected, adding another trailing color tag\n");
789 // remove the last character to fix the color code
790 host_client->name[l-1] = 0;
791 //Con_DPrintf("abuse detected, removing a trailing color tag\n");
795 host_client->edict->fields.server->netname = PRVM_SetEngineString(host_client->name);
796 if (strcmp(host_client->old_name, host_client->name))
798 if (host_client->spawned)
799 SV_BroadcastPrintf("%s^%i changed name to %s\n", host_client->old_name, STRING_COLOR_DEFAULT, host_client->name);
800 strlcpy(host_client->old_name, host_client->name, sizeof(host_client->old_name));
801 // send notification to all clients
802 MSG_WriteByte (&sv.reliable_datagram, svc_updatename);
803 MSG_WriteByte (&sv.reliable_datagram, host_client - svs.clients);
804 MSG_WriteString (&sv.reliable_datagram, host_client->name);
809 ======================
811 ======================
813 cvar_t cl_playermodel = {CVAR_SAVE | CVAR_NQUSERINFOHACK, "_cl_playermodel", "", "internal storage cvar for current player model in Nexuiz (changed by playermodel command)"};
814 // the old cl_playermodel in cl_main has been renamed to __cl_playermodel
815 void Host_Playermodel_f (void)
818 char newPath[sizeof(host_client->playermodel)];
820 if (Cmd_Argc () == 1)
822 Con_Printf("\"playermodel\" is \"%s\"\n", cl_playermodel.string);
826 if (Cmd_Argc () == 2)
827 strlcpy (newPath, Cmd_Argv(1), sizeof (newPath));
829 strlcpy (newPath, Cmd_Args(), sizeof (newPath));
831 for (i = 0, j = 0;newPath[i];i++)
832 if (newPath[i] != '\r' && newPath[i] != '\n')
833 newPath[j++] = newPath[i];
836 if (cmd_source == src_command)
838 Cvar_Set ("_cl_playermodel", newPath);
843 if (realtime < host_client->nametime)
845 SV_ClientPrintf("You can't change playermodel more than once every 5 seconds!\n");
849 host_client->nametime = realtime + 5;
852 // point the string back at updateclient->name to keep it safe
853 strlcpy (host_client->playermodel, newPath, sizeof (host_client->playermodel));
854 if( prog->fieldoffsets.playermodel >= 0 )
855 PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.playermodel)->string = PRVM_SetEngineString(host_client->playermodel);
856 if (strcmp(host_client->old_model, host_client->playermodel))
858 strlcpy(host_client->old_model, host_client->playermodel, sizeof(host_client->old_model));
859 /*// send notification to all clients
860 MSG_WriteByte (&sv.reliable_datagram, svc_updatepmodel);
861 MSG_WriteByte (&sv.reliable_datagram, host_client - svs.clients);
862 MSG_WriteString (&sv.reliable_datagram, host_client->playermodel);*/
867 ======================
869 ======================
871 cvar_t cl_playerskin = {CVAR_SAVE | CVAR_NQUSERINFOHACK, "_cl_playerskin", "", "internal storage cvar for current player skin in Nexuiz (changed by playerskin command)"};
872 void Host_Playerskin_f (void)
875 char newPath[sizeof(host_client->playerskin)];
877 if (Cmd_Argc () == 1)
879 Con_Printf("\"playerskin\" is \"%s\"\n", cl_playerskin.string);
883 if (Cmd_Argc () == 2)
884 strlcpy (newPath, Cmd_Argv(1), sizeof (newPath));
886 strlcpy (newPath, Cmd_Args(), sizeof (newPath));
888 for (i = 0, j = 0;newPath[i];i++)
889 if (newPath[i] != '\r' && newPath[i] != '\n')
890 newPath[j++] = newPath[i];
893 if (cmd_source == src_command)
895 Cvar_Set ("_cl_playerskin", newPath);
900 if (realtime < host_client->nametime)
902 SV_ClientPrintf("You can't change playermodel more than once every 5 seconds!\n");
906 host_client->nametime = realtime + 5;
909 // point the string back at updateclient->name to keep it safe
910 strlcpy (host_client->playerskin, newPath, sizeof (host_client->playerskin));
911 if( prog->fieldoffsets.playerskin >= 0 )
912 PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.playerskin)->string = PRVM_SetEngineString(host_client->playerskin);
913 if (strcmp(host_client->old_skin, host_client->playerskin))
915 //if (host_client->spawned)
916 // SV_BroadcastPrintf("%s changed skin to %s\n", host_client->name, host_client->playerskin);
917 strlcpy(host_client->old_skin, host_client->playerskin, sizeof(host_client->old_skin));
918 /*// send notification to all clients
919 MSG_WriteByte (&sv.reliable_datagram, svc_updatepskin);
920 MSG_WriteByte (&sv.reliable_datagram, host_client - svs.clients);
921 MSG_WriteString (&sv.reliable_datagram, host_client->playerskin);*/
925 void Host_Version_f (void)
927 Con_Printf("Version: %s build %s\n", gamename, buildstring);
930 void Host_Say(qboolean teamonly)
936 // LordHavoc: long say messages
938 qboolean fromServer = false;
940 if (cmd_source == src_command)
942 if (cls.state == ca_dedicated)
949 Cmd_ForwardToServer ();
957 if (!teamplay.integer)
967 // note this uses the chat prefix \001
968 if (!fromServer && !teamonly)
969 dpsnprintf (text, sizeof(text), "\001%s" STRING_COLOR_DEFAULT_STR ": %s", host_client->name, p1);
970 else if (!fromServer && teamonly)
971 dpsnprintf (text, sizeof(text), "\001(%s" STRING_COLOR_DEFAULT_STR "): %s", host_client->name, p1);
972 else if(*(sv_adminnick.string))
973 dpsnprintf (text, sizeof(text), "\001<%s" STRING_COLOR_DEFAULT_STR "> %s", sv_adminnick.string, p1);
975 dpsnprintf (text, sizeof(text), "\001<%s" STRING_COLOR_DEFAULT_STR "> %s", hostname.string, p1);
976 p2 = text + strlen(text);
977 while ((const char *)p2 > (const char *)text && (p2[-1] == '\r' || p2[-1] == '\n' || (p2[-1] == '\"' && quoted)))
979 if (p2[-1] == '\"' && quoted)
984 strlcat(text, "\n", sizeof(text));
986 // note: save is not a valid edict if fromServer is true
988 for (j = 0, host_client = svs.clients;j < svs.maxclients;j++, host_client++)
989 if (host_client->active && (!teamonly || host_client->edict->fields.server->team == save->edict->fields.server->team))
990 SV_ClientPrint(text);
993 if (cls.state == ca_dedicated)
998 void Host_Say_f(void)
1004 void Host_Say_Team_f(void)
1010 void Host_Tell_f(void)
1012 const char *playername_start = NULL;
1013 size_t playername_length = 0;
1014 int playernumber = 0;
1017 const char *p1, *p2;
1018 char text[MAX_INPUTLINE]; // LordHavoc: FIXME: temporary buffer overflow fix (was 64)
1019 qboolean fromServer = false;
1021 if (cmd_source == src_command)
1023 if (cls.state == ca_dedicated)
1027 Cmd_ForwardToServer ();
1032 if (Cmd_Argc () < 2)
1035 // note this uses the chat prefix \001
1037 sprintf (text, "\001%s tells you: ", host_client->name);
1038 else if(*(sv_adminnick.string))
1039 sprintf (text, "\001<%s tells you> ", sv_adminnick.string);
1041 sprintf (text, "\001<%s tells you> ", hostname.string);
1044 p2 = p1 + strlen(p1);
1045 // remove the target name
1046 while (p1 < p2 && *p1 == ' ')
1051 while (p1 < p2 && *p1 == ' ')
1053 while (p1 < p2 && isdigit(*p1))
1055 playernumber = playernumber * 10 + (*p1 - '0');
1063 playername_start = p1;
1064 while (p1 < p2 && *p1 != '"')
1066 playername_length = p1 - playername_start;
1072 playername_start = p1;
1073 while (p1 < p2 && *p1 != ' ')
1075 playername_length = p1 - playername_start;
1077 while (p1 < p2 && *p1 == ' ')
1079 if(playername_start)
1081 // set playernumber to the right client
1083 if(playername_length >= sizeof(namebuf))
1086 Con_Print("Host_Tell: too long player name/ID\n");
1088 SV_ClientPrint("Host_Tell: too long player name/ID\n");
1091 memcpy(namebuf, playername_start, playername_length);
1092 namebuf[playername_length] = 0;
1093 for (playernumber = 0; playernumber < svs.maxclients; playernumber++)
1095 if (!svs.clients[playernumber].active)
1097 if (strcasecmp(svs.clients[playernumber].name, namebuf) == 0)
1101 if(playernumber < 0 || playernumber >= svs.maxclients || !(svs.clients[playernumber].active))
1104 Con_Print("Host_Tell: invalid player name/ID\n");
1106 SV_ClientPrint("Host_Tell: invalid player name/ID\n");
1109 // remove trailing newlines
1110 while (p2 > p1 && (p2[-1] == '\n' || p2[-1] == '\r'))
1112 // remove quotes if present
1118 else if (fromServer)
1119 Con_Print("Host_Tell: missing end quote\n");
1121 SV_ClientPrint("Host_Tell: missing end quote\n");
1123 while (p2 > p1 && (p2[-1] == '\n' || p2[-1] == '\r'))
1126 return; // empty say
1127 for (j = (int)strlen(text);j < (int)(sizeof(text) - 2) && p1 < p2;)
1133 host_client = svs.clients + playernumber;
1134 SV_ClientPrint(text);
1144 cvar_t cl_color = {CVAR_SAVE | CVAR_NQUSERINFOHACK, "_cl_color", "0", "internal storage cvar for current player colors (changed by color command)"};
1145 void Host_Color(int changetop, int changebottom)
1147 int top, bottom, playercolor;
1149 // get top and bottom either from the provided values or the current values
1150 // (allows changing only top or bottom, or both at once)
1151 top = changetop >= 0 ? changetop : (cl_color.integer >> 4);
1152 bottom = changebottom >= 0 ? changebottom : cl_color.integer;
1156 // LordHavoc: allowing skin colormaps 14 and 15 by commenting this out
1162 playercolor = top*16 + bottom;
1164 if (cmd_source == src_command)
1166 Cvar_SetValueQuick(&cl_color, playercolor);
1170 if (cls.protocol == PROTOCOL_QUAKEWORLD)
1173 if (host_client->edict && prog->funcoffsets.SV_ChangeTeam)
1175 Con_DPrint("Calling SV_ChangeTeam\n");
1176 prog->globals.server->time = sv.time;
1177 prog->globals.generic[OFS_PARM0] = playercolor;
1178 prog->globals.server->self = PRVM_EDICT_TO_PROG(host_client->edict);
1179 PRVM_ExecuteProgram(prog->funcoffsets.SV_ChangeTeam, "QC function SV_ChangeTeam is missing");
1184 if (host_client->edict)
1186 if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.clientcolors)))
1187 val->_float = playercolor;
1188 host_client->edict->fields.server->team = bottom + 1;
1190 host_client->colors = playercolor;
1191 if (host_client->old_colors != host_client->colors)
1193 host_client->old_colors = host_client->colors;
1194 // send notification to all clients
1195 MSG_WriteByte (&sv.reliable_datagram, svc_updatecolors);
1196 MSG_WriteByte (&sv.reliable_datagram, host_client - svs.clients);
1197 MSG_WriteByte (&sv.reliable_datagram, host_client->colors);
1202 void Host_Color_f(void)
1206 if (Cmd_Argc() == 1)
1208 Con_Printf("\"color\" is \"%i %i\"\n", cl_color.integer >> 4, cl_color.integer & 15);
1209 Con_Print("color <0-15> [0-15]\n");
1213 if (Cmd_Argc() == 2)
1214 top = bottom = atoi(Cmd_Argv(1));
1217 top = atoi(Cmd_Argv(1));
1218 bottom = atoi(Cmd_Argv(2));
1220 Host_Color(top, bottom);
1223 void Host_TopColor_f(void)
1225 if (Cmd_Argc() == 1)
1227 Con_Printf("\"topcolor\" is \"%i\"\n", (cl_color.integer >> 4) & 15);
1228 Con_Print("topcolor <0-15>\n");
1232 Host_Color(atoi(Cmd_Argv(1)), -1);
1235 void Host_BottomColor_f(void)
1237 if (Cmd_Argc() == 1)
1239 Con_Printf("\"bottomcolor\" is \"%i\"\n", cl_color.integer & 15);
1240 Con_Print("bottomcolor <0-15>\n");
1244 Host_Color(-1, atoi(Cmd_Argv(1)));
1247 cvar_t cl_rate = {CVAR_SAVE | CVAR_NQUSERINFOHACK, "_cl_rate", "10000", "internal storage cvar for current rate (changed by rate command)"};
1248 void Host_Rate_f(void)
1252 if (Cmd_Argc() != 2)
1254 Con_Printf("\"rate\" is \"%i\"\n", cl_rate.integer);
1255 Con_Print("rate <bytespersecond>\n");
1259 rate = atoi(Cmd_Argv(1));
1261 if (cmd_source == src_command)
1263 Cvar_SetValue ("_cl_rate", max(NET_MINRATE, rate));
1267 host_client->rate = rate;
1275 void Host_Kill_f (void)
1277 if (host_client->edict->fields.server->health <= 0)
1279 SV_ClientPrint("Can't suicide -- already dead!\n");
1283 prog->globals.server->time = sv.time;
1284 prog->globals.server->self = PRVM_EDICT_TO_PROG(host_client->edict);
1285 PRVM_ExecuteProgram (prog->globals.server->ClientKill, "QC function ClientKill is missing");
1294 void Host_Pause_f (void)
1296 if (!pausable.integer)
1297 SV_ClientPrint("Pause not allowed.\n");
1301 SV_BroadcastPrintf("%s %spaused the game\n", host_client->name, sv.paused ? "" : "un");
1302 // send notification to all clients
1303 MSG_WriteByte(&sv.reliable_datagram, svc_setpause);
1304 MSG_WriteByte(&sv.reliable_datagram, sv.paused);
1309 ======================
1311 LordHavoc: only supported for Nehahra, I personally think this is dumb, but Mindcrime won't listen.
1312 LordHavoc: correction, Mindcrime will be removing pmodel in the future, but it's still stuck here for compatibility.
1313 ======================
1315 cvar_t cl_pmodel = {CVAR_SAVE | CVAR_NQUSERINFOHACK, "_cl_pmodel", "0", "internal storage cvar for current player model number in nehahra (changed by pmodel command)"};
1316 static void Host_PModel_f (void)
1321 if (Cmd_Argc () == 1)
1323 Con_Printf("\"pmodel\" is \"%s\"\n", cl_pmodel.string);
1326 i = atoi(Cmd_Argv(1));
1328 if (cmd_source == src_command)
1330 if (cl_pmodel.integer == i)
1332 Cvar_SetValue ("_cl_pmodel", i);
1333 if (cls.state == ca_connected)
1334 Cmd_ForwardToServer ();
1338 if (host_client->edict && (val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.pmodel)))
1342 //===========================================================================
1350 void Host_PreSpawn_f (void)
1352 if (host_client->spawned)
1354 Con_Print("prespawn not valid -- already spawned\n");
1358 if (host_client->netconnection)
1360 SZ_Write (&host_client->netconnection->message, sv.signon.data, sv.signon.cursize);
1361 MSG_WriteByte (&host_client->netconnection->message, svc_signonnum);
1362 MSG_WriteByte (&host_client->netconnection->message, 2);
1365 // reset the name change timer because the client will send name soon
1366 host_client->nametime = 0;
1374 void Host_Spawn_f (void)
1378 int stats[MAX_CL_STATS];
1380 if (host_client->spawned)
1382 Con_Print("Spawn not valid -- already spawned\n");
1386 // reset name change timer again because they might want to change name
1387 // again in the first 5 seconds after connecting
1388 host_client->nametime = 0;
1390 // LordHavoc: moved this above the QC calls at FrikaC's request
1391 // LordHavoc: commented this out
1392 //if (host_client->netconnection)
1393 // SZ_Clear (&host_client->netconnection->message);
1395 // run the entrance script
1398 // loaded games are fully initialized already
1399 // if this is the last client to be connected, unpause
1402 if (prog->funcoffsets.RestoreGame)
1404 Con_DPrint("Calling RestoreGame\n");
1405 prog->globals.server->time = sv.time;
1406 prog->globals.server->self = PRVM_EDICT_TO_PROG(host_client->edict);
1407 PRVM_ExecuteProgram(prog->funcoffsets.RestoreGame, "QC function RestoreGame is missing");
1412 //Con_Printf("Host_Spawn_f: host_client->edict->netname = %s, host_client->edict->netname = %s, host_client->name = %s\n", PRVM_GetString(host_client->edict->fields.server->netname), PRVM_GetString(host_client->edict->fields.server->netname), host_client->name);
1414 // copy spawn parms out of the client_t
1415 for (i=0 ; i< NUM_SPAWN_PARMS ; i++)
1416 (&prog->globals.server->parm1)[i] = host_client->spawn_parms[i];
1418 // call the spawn function
1419 host_client->clientconnectcalled = true;
1420 prog->globals.server->time = sv.time;
1421 prog->globals.server->self = PRVM_EDICT_TO_PROG(host_client->edict);
1422 PRVM_ExecuteProgram (prog->globals.server->ClientConnect, "QC function ClientConnect is missing");
1424 if (svs.maxclients > 1 || cls.state == ca_dedicated)
1425 Con_Printf("%s^%i entered the game\n", host_client->name, STRING_COLOR_DEFAULT);
1427 PRVM_ExecuteProgram (prog->globals.server->PutClientInServer, "QC function PutClientInServer is missing");
1430 if (!host_client->netconnection)
1433 // send time of update
1434 MSG_WriteByte (&host_client->netconnection->message, svc_time);
1435 MSG_WriteFloat (&host_client->netconnection->message, sv.time);
1437 // send all current names, colors, and frag counts
1438 for (i = 0, client = svs.clients;i < svs.maxclients;i++, client++)
1440 if (!client->active)
1442 MSG_WriteByte (&host_client->netconnection->message, svc_updatename);
1443 MSG_WriteByte (&host_client->netconnection->message, i);
1444 MSG_WriteString (&host_client->netconnection->message, client->name);
1445 MSG_WriteByte (&host_client->netconnection->message, svc_updatefrags);
1446 MSG_WriteByte (&host_client->netconnection->message, i);
1447 MSG_WriteShort (&host_client->netconnection->message, client->frags);
1448 MSG_WriteByte (&host_client->netconnection->message, svc_updatecolors);
1449 MSG_WriteByte (&host_client->netconnection->message, i);
1450 MSG_WriteByte (&host_client->netconnection->message, client->colors);
1453 // send all current light styles
1454 for (i=0 ; i<MAX_LIGHTSTYLES ; i++)
1456 if (sv.lightstyles[i][0])
1458 MSG_WriteByte (&host_client->netconnection->message, svc_lightstyle);
1459 MSG_WriteByte (&host_client->netconnection->message, (char)i);
1460 MSG_WriteString (&host_client->netconnection->message, sv.lightstyles[i]);
1465 MSG_WriteByte (&host_client->netconnection->message, svc_updatestat);
1466 MSG_WriteByte (&host_client->netconnection->message, STAT_TOTALSECRETS);
1467 MSG_WriteLong (&host_client->netconnection->message, (int)prog->globals.server->total_secrets);
1469 MSG_WriteByte (&host_client->netconnection->message, svc_updatestat);
1470 MSG_WriteByte (&host_client->netconnection->message, STAT_TOTALMONSTERS);
1471 MSG_WriteLong (&host_client->netconnection->message, (int)prog->globals.server->total_monsters);
1473 MSG_WriteByte (&host_client->netconnection->message, svc_updatestat);
1474 MSG_WriteByte (&host_client->netconnection->message, STAT_SECRETS);
1475 MSG_WriteLong (&host_client->netconnection->message, (int)prog->globals.server->found_secrets);
1477 MSG_WriteByte (&host_client->netconnection->message, svc_updatestat);
1478 MSG_WriteByte (&host_client->netconnection->message, STAT_MONSTERS);
1479 MSG_WriteLong (&host_client->netconnection->message, (int)prog->globals.server->killed_monsters);
1482 // Never send a roll angle, because savegames can catch the server
1483 // in a state where it is expecting the client to correct the angle
1484 // and it won't happen if the game was just loaded, so you wind up
1485 // with a permanent head tilt
1488 MSG_WriteByte (&host_client->netconnection->message, svc_setangle);
1489 MSG_WriteAngle (&host_client->netconnection->message, host_client->edict->fields.server->v_angle[0], sv.protocol);
1490 MSG_WriteAngle (&host_client->netconnection->message, host_client->edict->fields.server->v_angle[1], sv.protocol);
1491 MSG_WriteAngle (&host_client->netconnection->message, 0, sv.protocol);
1492 sv.loadgame = false; // we're basically done with loading now
1496 MSG_WriteByte (&host_client->netconnection->message, svc_setangle);
1497 MSG_WriteAngle (&host_client->netconnection->message, host_client->edict->fields.server->angles[0], sv.protocol);
1498 MSG_WriteAngle (&host_client->netconnection->message, host_client->edict->fields.server->angles[1], sv.protocol);
1499 MSG_WriteAngle (&host_client->netconnection->message, 0, sv.protocol);
1502 SV_WriteClientdataToMessage (host_client, host_client->edict, &host_client->netconnection->message, stats);
1504 MSG_WriteByte (&host_client->netconnection->message, svc_signonnum);
1505 MSG_WriteByte (&host_client->netconnection->message, 3);
1513 void Host_Begin_f (void)
1515 host_client->spawned = true;
1518 //===========================================================================
1525 Kicks a user off of the server
1528 void Host_Kick_f (void)
1531 const char *message = NULL;
1534 qboolean byNumber = false;
1542 if (Cmd_Argc() > 2 && strcmp(Cmd_Argv(1), "#") == 0)
1544 i = (int)(atof(Cmd_Argv(2)) - 1);
1545 if (i < 0 || i >= svs.maxclients || !(host_client = svs.clients + i)->active)
1551 for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
1553 if (!host_client->active)
1555 if (strcasecmp(host_client->name, Cmd_Argv(1)) == 0)
1560 if (i < svs.maxclients)
1562 if (cmd_source == src_command)
1564 if (cls.state == ca_dedicated)
1567 who = cl_name.string;
1572 // can't kick yourself!
1573 if (host_client == save)
1578 message = Cmd_Args();
1579 COM_ParseTokenConsole(&message);
1582 message++; // skip the #
1583 while (*message == ' ') // skip white space
1585 message += strlen(Cmd_Argv(2)); // skip the number
1587 while (*message && *message == ' ')
1591 SV_ClientPrintf("Kicked by %s: %s\n", who, message);
1593 SV_ClientPrintf("Kicked by %s\n", who);
1594 SV_DropClient (false); // kicked
1602 ===============================================================================
1606 ===============================================================================
1614 void Host_Give_f (void)
1622 SV_ClientPrint("No cheats allowed, use sv_cheats 1 and restart level to enable.\n");
1627 v = atoi (Cmd_Argv(2));
1641 // MED 01/04/97 added hipnotic give stuff
1642 if (gamemode == GAME_HIPNOTIC)
1647 host_client->edict->fields.server->items = (int)host_client->edict->fields.server->items | HIT_PROXIMITY_GUN;
1649 host_client->edict->fields.server->items = (int)host_client->edict->fields.server->items | IT_GRENADE_LAUNCHER;
1651 else if (t[0] == '9')
1652 host_client->edict->fields.server->items = (int)host_client->edict->fields.server->items | HIT_LASER_CANNON;
1653 else if (t[0] == '0')
1654 host_client->edict->fields.server->items = (int)host_client->edict->fields.server->items | HIT_MJOLNIR;
1655 else if (t[0] >= '2')
1656 host_client->edict->fields.server->items = (int)host_client->edict->fields.server->items | (IT_SHOTGUN << (t[0] - '2'));
1661 host_client->edict->fields.server->items = (int)host_client->edict->fields.server->items | (IT_SHOTGUN << (t[0] - '2'));
1666 if (gamemode == GAME_ROGUE && (val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_shells1)))
1669 host_client->edict->fields.server->ammo_shells = v;
1672 if (gamemode == GAME_ROGUE)
1674 if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_nails1)))
1677 if (host_client->edict->fields.server->weapon <= IT_LIGHTNING)
1678 host_client->edict->fields.server->ammo_nails = v;
1683 host_client->edict->fields.server->ammo_nails = v;
1687 if (gamemode == GAME_ROGUE)
1689 val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_lava_nails);
1693 if (host_client->edict->fields.server->weapon > IT_LIGHTNING)
1694 host_client->edict->fields.server->ammo_nails = v;
1699 if (gamemode == GAME_ROGUE)
1701 val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_rockets1);
1705 if (host_client->edict->fields.server->weapon <= IT_LIGHTNING)
1706 host_client->edict->fields.server->ammo_rockets = v;
1711 host_client->edict->fields.server->ammo_rockets = v;
1715 if (gamemode == GAME_ROGUE)
1717 val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_multi_rockets);
1721 if (host_client->edict->fields.server->weapon > IT_LIGHTNING)
1722 host_client->edict->fields.server->ammo_rockets = v;
1727 host_client->edict->fields.server->health = v;
1730 if (gamemode == GAME_ROGUE)
1732 val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_cells1);
1736 if (host_client->edict->fields.server->weapon <= IT_LIGHTNING)
1737 host_client->edict->fields.server->ammo_cells = v;
1742 host_client->edict->fields.server->ammo_cells = v;
1746 if (gamemode == GAME_ROGUE)
1748 val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_plasma);
1752 if (host_client->edict->fields.server->weapon > IT_LIGHTNING)
1753 host_client->edict->fields.server->ammo_cells = v;
1760 prvm_edict_t *FindViewthing (void)
1765 for (i=0 ; i<prog->num_edicts ; i++)
1767 e = PRVM_EDICT_NUM(i);
1768 if (!strcmp (PRVM_GetString(e->fields.server->classname), "viewthing"))
1771 Con_Print("No viewthing on map\n");
1780 void Host_Viewmodel_f (void)
1789 e = FindViewthing ();
1794 m = Mod_ForName (Cmd_Argv(1), false, true, false);
1795 if (!m || !m->loaded || !m->Draw)
1797 Con_Printf("viewmodel: can't load %s\n", Cmd_Argv(1));
1801 e->fields.server->frame = 0;
1802 cl.model_precache[(int)e->fields.server->modelindex] = m;
1810 void Host_Viewframe_f (void)
1820 e = FindViewthing ();
1824 m = cl.model_precache[(int)e->fields.server->modelindex];
1826 f = atoi(Cmd_Argv(1));
1827 if (f >= m->numframes)
1830 e->fields.server->frame = f;
1834 void PrintFrameName (model_t *m, int frame)
1837 Con_Printf("frame %i: %s\n", frame, m->animscenes[frame].name);
1839 Con_Printf("frame %i\n", frame);
1847 void Host_Viewnext_f (void)
1856 e = FindViewthing ();
1860 m = cl.model_precache[(int)e->fields.server->modelindex];
1862 e->fields.server->frame = e->fields.server->frame + 1;
1863 if (e->fields.server->frame >= m->numframes)
1864 e->fields.server->frame = m->numframes - 1;
1866 PrintFrameName (m, (int)e->fields.server->frame);
1874 void Host_Viewprev_f (void)
1883 e = FindViewthing ();
1888 m = cl.model_precache[(int)e->fields.server->modelindex];
1890 e->fields.server->frame = e->fields.server->frame - 1;
1891 if (e->fields.server->frame < 0)
1892 e->fields.server->frame = 0;
1894 PrintFrameName (m, (int)e->fields.server->frame);
1898 ===============================================================================
1902 ===============================================================================
1911 void Host_Startdemos_f (void)
1915 if (cls.state == ca_dedicated || COM_CheckParm("-listen") || COM_CheckParm("-benchmark") || COM_CheckParm("-demo"))
1921 Con_Printf("Max %i demos in demoloop\n", MAX_DEMOS);
1924 Con_Printf("%i demo(s) in loop\n", c);
1926 for (i=1 ; i<c+1 ; i++)
1927 strlcpy (cls.demos[i-1], Cmd_Argv(i), sizeof (cls.demos[i-1]));
1929 // LordHavoc: clear the remaining slots
1930 for (;i <= MAX_DEMOS;i++)
1931 cls.demos[i-1][0] = 0;
1933 if (!sv.active && cls.demonum != -1 && !cls.demoplayback)
1947 Return to looping demos
1950 void Host_Demos_f (void)
1952 if (cls.state == ca_dedicated)
1954 if (cls.demonum == -1)
1964 Return to looping demos
1967 void Host_Stopdemo_f (void)
1969 if (!cls.demoplayback)
1972 Host_ShutdownServer ();
1975 void Host_SendCvar_f (void)
1979 const char *cvarname;
1984 cvarname = Cmd_Argv(1);
1985 if (cls.state == ca_connected)
1987 c = Cvar_FindVar(cvarname);
1988 // LordHavoc: if there is no such cvar or if it is private, send a
1989 // reply indicating that it has no value
1990 if(!c || (c->flags & CVAR_PRIVATE))
1991 Cmd_ForwardStringToServer(va("sentcvar %s\n", cvarname));
1993 Cmd_ForwardStringToServer(va("sentcvar %s \"%s\"\n", c->name, c->string));
1996 if(!sv.active)// || !prog->funcoffsets.SV_ParseClientCommand)
2000 if (cls.state != ca_dedicated)
2004 for(;i<svs.maxclients;i++)
2005 if(svs.clients[i].active && svs.clients[i].netconnection)
2007 host_client = &svs.clients[i];
2008 Host_ClientCommands(va("sendcvar %s\n", cvarname));
2013 static void MaxPlayers_f(void)
2017 if (Cmd_Argc() != 2)
2019 Con_Printf("\"maxplayers\" is \"%u\"\n", svs.maxclients);
2025 Con_Print("maxplayers can not be changed while a server is running.\n");
2029 n = atoi(Cmd_Argv(1));
2030 n = bound(1, n, MAX_SCOREBOARD);
2031 Con_Printf("\"maxplayers\" set to \"%u\"\n", n);
2034 Mem_Free(svs.clients);
2036 svs.clients = (client_t *)Mem_Alloc(sv_mempool, sizeof(client_t) * svs.maxclients);
2038 Cvar_Set ("deathmatch", "0");
2040 Cvar_Set ("deathmatch", "1");
2043 //=============================================================================
2045 // QuakeWorld commands
2048 =====================
2051 Send the rest of the command line over as
2052 an unconnected command.
2053 =====================
2055 void Host_Rcon_f (void) // credit: taken from QuakeWorld
2059 lhnetsocket_t *mysocket;
2061 if (!rcon_password.string || !rcon_password.string[0])
2063 Con_Printf ("You must set rcon_password before issuing an rcon command.\n");
2067 for (i = 0;rcon_password.string[i];i++)
2069 if (rcon_password.string[i] <= ' ')
2071 Con_Printf("rcon_password is not allowed to have any whitespace.\n");
2077 to = cls.netcon->peeraddress;
2080 if (!rcon_address.string[0])
2082 Con_Printf ("You must either be connected, or set the rcon_address cvar to issue rcon commands\n");
2085 LHNETADDRESS_FromString(&to, rcon_address.string, sv_netport.integer);
2087 mysocket = NetConn_ChooseClientSocketForAddress(&to);
2090 // simply put together the rcon packet and send it
2091 NetConn_WriteString(mysocket, va("\377\377\377\377rcon %s %s", rcon_password.string, Cmd_Args()), &to);
2096 ====================
2099 user <name or userid>
2101 Dump userdata / masterdata for a user
2102 ====================
2104 void Host_User_f (void) // credit: taken from QuakeWorld
2109 if (Cmd_Argc() != 2)
2111 Con_Printf ("Usage: user <username / userid>\n");
2115 uid = atoi(Cmd_Argv(1));
2117 for (i = 0;i < cl.maxclients;i++)
2119 if (!cl.scores[i].name[0])
2121 if (cl.scores[i].qw_userid == uid || !strcasecmp(cl.scores[i].name, Cmd_Argv(1)))
2123 InfoString_Print(cl.scores[i].qw_userinfo);
2127 Con_Printf ("User not in server.\n");
2131 ====================
2134 Dump userids for all current players
2135 ====================
2137 void Host_Users_f (void) // credit: taken from QuakeWorld
2143 Con_Printf ("userid frags name\n");
2144 Con_Printf ("------ ----- ----\n");
2145 for (i = 0;i < cl.maxclients;i++)
2147 if (cl.scores[i].name[0])
2149 Con_Printf ("%6i %4i %s\n", cl.scores[i].qw_userid, cl.scores[i].frags, cl.scores[i].name);
2154 Con_Printf ("%i total users\n", c);
2159 Host_FullServerinfo_f
2161 Sent by server when serverinfo changes
2164 // TODO: shouldn't this be a cvar instead?
2165 void Host_FullServerinfo_f (void) // credit: taken from QuakeWorld
2168 if (Cmd_Argc() != 2)
2170 Con_Printf ("usage: fullserverinfo <complete info string>\n");
2174 strlcpy (cl.qw_serverinfo, Cmd_Argv(1), sizeof(cl.qw_serverinfo));
2175 InfoString_GetValue(cl.qw_serverinfo, "teamplay", temp, sizeof(temp));
2176 cl.qw_teamplay = atoi(temp);
2183 Allow clients to change userinfo
2187 void Host_FullInfo_f (void) // credit: taken from QuakeWorld
2194 if (Cmd_Argc() != 2)
2196 Con_Printf ("fullinfo <complete info string>\n");
2206 while (*s && *s != '\\')
2212 Con_Printf ("MISSING VALUE\n");
2218 while (*s && *s != '\\')
2225 CL_SetInfo(key, value, false, false, false, false);
2233 Allow clients to change userinfo
2236 void Host_SetInfo_f (void) // credit: taken from QuakeWorld
2238 if (Cmd_Argc() == 1)
2240 InfoString_Print(cls.userinfo);
2243 if (Cmd_Argc() != 3)
2245 Con_Printf ("usage: setinfo [ <key> <value> ]\n");
2248 CL_SetInfo(Cmd_Argv(1), Cmd_Argv(2), true, false, false, false);
2252 ====================
2255 packet <destination> <contents>
2257 Contents allows \n escape character
2258 ====================
2260 void Host_Packet_f (void) // credit: taken from QuakeWorld
2266 lhnetaddress_t address;
2267 lhnetsocket_t *mysocket;
2269 if (Cmd_Argc() != 3)
2271 Con_Printf ("packet <destination> <contents>\n");
2275 if (!LHNETADDRESS_FromString (&address, Cmd_Argv(1), sv_netport.integer))
2277 Con_Printf ("Bad address\n");
2283 send[0] = send[1] = send[2] = send[3] = 0xff;
2285 l = (int)strlen (in);
2286 for (i=0 ; i<l ; i++)
2288 if (out >= send + sizeof(send) - 1)
2290 if (in[i] == '\\' && in[i+1] == 'n')
2295 else if (in[i] == '\\' && in[i+1] == '0')
2300 else if (in[i] == '\\' && in[i+1] == 't')
2305 else if (in[i] == '\\' && in[i+1] == 'r')
2310 else if (in[i] == '\\' && in[i+1] == '"')
2319 mysocket = NetConn_ChooseClientSocketForAddress(&address);
2321 NetConn_Write(mysocket, send, out - send, &address);
2325 ====================
2328 Send back ping and packet loss update for all current players to this player
2329 ====================
2331 void Host_Pings_f (void)
2333 int i, j, ping, packetloss;
2336 if (!host_client->netconnection)
2339 if (sv.protocol != PROTOCOL_QUAKEWORLD)
2341 MSG_WriteByte(&host_client->netconnection->message, svc_stufftext);
2342 MSG_WriteUnterminatedString(&host_client->netconnection->message, "pingplreport");
2344 for (i = 0;i < svs.maxclients;i++)
2347 if (svs.clients[i].netconnection)
2348 for (j = 0;j < NETGRAPH_PACKETS;j++)
2349 if (svs.clients[i].netconnection->incoming_unreliablesize[j] == NETGRAPH_LOSTPACKET)
2351 packetloss = packetloss * 100 / NETGRAPH_PACKETS;
2352 ping = (int)floor(svs.clients[i].ping*1000+0.5);
2353 ping = bound(0, ping, 9999);
2354 if (sv.protocol == PROTOCOL_QUAKEWORLD)
2356 // send qw_svc_updateping and qw_svc_updatepl messages
2357 MSG_WriteByte(&host_client->netconnection->message, qw_svc_updateping);
2358 MSG_WriteShort(&host_client->netconnection->message, ping);
2359 MSG_WriteByte(&host_client->netconnection->message, qw_svc_updatepl);
2360 MSG_WriteByte(&host_client->netconnection->message, packetloss);
2364 // write the string into the packet as multiple unterminated strings to avoid needing a local buffer
2365 dpsnprintf(temp, sizeof(temp), " %d %d", ping, packetloss);
2366 MSG_WriteUnterminatedString(&host_client->netconnection->message, temp);
2369 if (sv.protocol != PROTOCOL_QUAKEWORLD)
2370 MSG_WriteString(&host_client->netconnection->message, "\n");
2373 void Host_PingPLReport_f(void)
2377 if (l > cl.maxclients)
2379 for (i = 0;i < l;i++)
2381 cl.scores[i].qw_ping = atoi(Cmd_Argv(1+i*2));
2382 cl.scores[i].qw_packetloss = atoi(Cmd_Argv(1+i*2+1));
2386 //=============================================================================
2393 void Host_InitCommands (void)
2395 dpsnprintf(cls.userinfo, sizeof(cls.userinfo), "\\name\\player\\team\\none\\topcolor\\0\\bottomcolor\\0\\rate\\10000\\msg\\1\\noaim\\1\\*ver\\dp");
2397 Cmd_AddCommand_WithClientCommand ("status", Host_Status_f, Host_Status_f, "print server status information");
2398 Cmd_AddCommand ("quit", Host_Quit_f, "quit the game");
2399 if (gamemode == GAME_NEHAHRA)
2401 Cmd_AddCommand_WithClientCommand ("max", NULL, Host_God_f, "god mode (invulnerability)");
2402 Cmd_AddCommand_WithClientCommand ("monster", NULL, Host_Notarget_f, "notarget mode (monsters do not see you)");
2403 Cmd_AddCommand_WithClientCommand ("scrag", NULL, Host_Fly_f, "fly mode (flight)");
2404 Cmd_AddCommand_WithClientCommand ("wraith", NULL, Host_Noclip_f, "noclip mode (flight without collisions, move through walls)");
2405 Cmd_AddCommand_WithClientCommand ("gimme", NULL, Host_Give_f, "alter inventory");
2409 Cmd_AddCommand_WithClientCommand ("god", NULL, Host_God_f, "god mode (invulnerability)");
2410 Cmd_AddCommand_WithClientCommand ("notarget", NULL, Host_Notarget_f, "notarget mode (monsters do not see you)");
2411 Cmd_AddCommand_WithClientCommand ("fly", NULL, Host_Fly_f, "fly mode (flight)");
2412 Cmd_AddCommand_WithClientCommand ("noclip", NULL, Host_Noclip_f, "noclip mode (flight without collisions, move through walls)");
2413 Cmd_AddCommand_WithClientCommand ("give", NULL, Host_Give_f, "alter inventory");
2415 Cmd_AddCommand ("map", Host_Map_f, "kick everyone off the server and start a new level");
2416 Cmd_AddCommand ("restart", Host_Restart_f, "restart current level");
2417 Cmd_AddCommand ("changelevel", Host_Changelevel_f, "change to another level, bringing along all connected clients");
2418 Cmd_AddCommand ("connect", Host_Connect_f, "connect to a server by IP address or hostname");
2419 Cmd_AddCommand ("reconnect", Host_Reconnect_f, "reconnect to the last server you were on, or resets a quakeworld connection (do not use if currently playing on a netquake server)");
2420 Cmd_AddCommand ("version", Host_Version_f, "print engine version");
2421 Cmd_AddCommand_WithClientCommand ("say", Host_Say_f, Host_Say_f, "send a chat message to everyone on the server");
2422 Cmd_AddCommand_WithClientCommand ("say_team", Host_Say_Team_f, Host_Say_Team_f, "send a chat message to your team on the server");
2423 Cmd_AddCommand_WithClientCommand ("tell", Host_Tell_f, Host_Tell_f, "send a chat message to only one person on the server");
2424 Cmd_AddCommand_WithClientCommand ("kill", NULL, Host_Kill_f, "die instantly");
2425 Cmd_AddCommand_WithClientCommand ("pause", NULL, Host_Pause_f, "pause the game (if the server allows pausing)");
2426 Cmd_AddCommand ("kick", Host_Kick_f, "kick a player off the server by number or name");
2427 Cmd_AddCommand_WithClientCommand ("ping", Host_Ping_f, Host_Ping_f, "print ping times of all players on the server");
2428 Cmd_AddCommand ("load", Host_Loadgame_f, "load a saved game file");
2429 Cmd_AddCommand ("save", Host_Savegame_f, "save the game to a file");
2431 Cmd_AddCommand ("startdemos", Host_Startdemos_f, "start playing back the selected demos sequentially (used at end of startup script)");
2432 Cmd_AddCommand ("demos", Host_Demos_f, "restart looping demos defined by the last startdemos command");
2433 Cmd_AddCommand ("stopdemo", Host_Stopdemo_f, "stop playing or recording demo (like stop command) and return to looping demos");
2435 Cmd_AddCommand ("viewmodel", Host_Viewmodel_f, "change model of viewthing entity in current level");
2436 Cmd_AddCommand ("viewframe", Host_Viewframe_f, "change animation frame of viewthing entity in current level");
2437 Cmd_AddCommand ("viewnext", Host_Viewnext_f, "change to next animation frame of viewthing entity in current level");
2438 Cmd_AddCommand ("viewprev", Host_Viewprev_f, "change to previous animation frame of viewthing entity in current level");
2440 Cvar_RegisterVariable (&cl_name);
2441 Cmd_AddCommand_WithClientCommand ("name", Host_Name_f, Host_Name_f, "change your player name");
2442 Cvar_RegisterVariable (&cl_color);
2443 Cmd_AddCommand_WithClientCommand ("color", Host_Color_f, Host_Color_f, "change your player shirt and pants colors");
2444 Cvar_RegisterVariable (&cl_rate);
2445 Cmd_AddCommand_WithClientCommand ("rate", Host_Rate_f, Host_Rate_f, "change your network connection speed");
2446 if (gamemode == GAME_NEHAHRA)
2448 Cvar_RegisterVariable (&cl_pmodel);
2449 Cmd_AddCommand_WithClientCommand ("pmodel", Host_PModel_f, Host_PModel_f, "change your player model choice (Nehahra specific)");
2452 // BLACK: This isnt game specific anymore (it was GAME_NEXUIZ at first)
2453 Cvar_RegisterVariable (&cl_playermodel);
2454 Cmd_AddCommand_WithClientCommand ("playermodel", Host_Playermodel_f, Host_Playermodel_f, "change your player model");
2455 Cvar_RegisterVariable (&cl_playerskin);
2456 Cmd_AddCommand_WithClientCommand ("playerskin", Host_Playerskin_f, Host_Playerskin_f, "change your player skin number");
2458 Cmd_AddCommand_WithClientCommand ("prespawn", NULL, Host_PreSpawn_f, "signon 1 (client acknowledges that server information has been received)");
2459 Cmd_AddCommand_WithClientCommand ("spawn", NULL, Host_Spawn_f, "signon 2 (client has sent player information, and is asking server to send scoreboard rankings)");
2460 Cmd_AddCommand_WithClientCommand ("begin", NULL, Host_Begin_f, "signon 3 (client asks server to start sending entities, and will go to signon 4 (playing) when the first entity update is received)");
2461 Cmd_AddCommand ("maxplayers", MaxPlayers_f, "sets limit on how many players (or bots) may be connected to the server at once");
2463 Cmd_AddCommand ("sendcvar", Host_SendCvar_f, "sends the value of a cvar to the server as a sentcvar command, for use by QuakeC");
2465 Cvar_RegisterVariable (&rcon_password);
2466 Cvar_RegisterVariable (&rcon_address);
2467 Cmd_AddCommand ("rcon", Host_Rcon_f, "sends a command to the server console (if your rcon_password matches the server's rcon_password), or to the address specified by rcon_address when not connected (again rcon_password must match the server's)");
2468 Cmd_AddCommand ("user", Host_User_f, "prints additional information about a player number or name on the scoreboard");
2469 Cmd_AddCommand ("users", Host_Users_f, "prints additional information about all players on the scoreboard");
2470 Cmd_AddCommand ("fullserverinfo", Host_FullServerinfo_f, "internal use only, sent by server to client to update client's local copy of serverinfo string");
2471 Cmd_AddCommand ("fullinfo", Host_FullInfo_f, "allows client to modify their userinfo");
2472 Cmd_AddCommand ("setinfo", Host_SetInfo_f, "modifies your userinfo");
2473 Cmd_AddCommand ("packet", Host_Packet_f, "send a packet to the specified address:port containing a text string");
2474 Cmd_AddCommand ("topcolor", Host_TopColor_f, "QW command to set top color without changing bottom color");
2475 Cmd_AddCommand ("bottomcolor", Host_BottomColor_f, "QW command to set bottom color without changing top color");
2477 Cmd_AddCommand_WithClientCommand ("pings", NULL, Host_Pings_f, "command sent by clients to request updated ping and packetloss of players on scoreboard (originally from QW, but also used on NQ servers)");
2478 Cmd_AddCommand ("pingplreport", Host_PingPLReport_f, "command sent by server containing client ping and packet loss values for scoreboard, triggered by pings command from client (not used by QW servers)");
2480 Cvar_RegisterVariable (&team);
2481 Cvar_RegisterVariable (&skin);
2482 Cvar_RegisterVariable (&noaim);
2484 Cvar_RegisterVariable(&sv_cheats);
2485 Cvar_RegisterVariable(&sv_adminnick);