host_cmd.c

   1 /*
   2 Copyright (C) 1996-1997 Id Software, Inc.
   3
   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.
   8
   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.
  12
  13 See the GNU General Public License for more details.
  14
  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.
  18
  19 */
  20
  21 #include "quakedef.h"
  22 #include "sv_demo.h"
  23 #include "image.h"
  24
  25 int current_skill;
  26 cvar_t sv_cheats = {0, "sv_cheats", "0", "enables cheat commands in any game, and cheat impulses in dpmod"};
  27 cvar_t sv_adminnick = {CVAR_SAVE, "sv_adminnick", "", "nick name to use for admin messages instead of host name"};
  28 cvar_t sv_status_privacy = {CVAR_SAVE, "sv_status_privacy", "0", "do not show IP addresses in 'status' replies to clients"};
  29 cvar_t rcon_password = {CVAR_PRIVATE, "rcon_password", "", "password to authenticate rcon commands"};
  30 cvar_t rcon_address = {0, "rcon_address", "", "server address to send rcon commands to (when not connected to a server)"};
  31 cvar_t team = {CVAR_USERINFO | CVAR_SAVE, "team", "none", "QW team (4 character limit, example: blue)"};
  32 cvar_t skin = {CVAR_USERINFO | CVAR_SAVE, "skin", "", "QW player skin name (example: base)"};
  33 cvar_t noaim = {CVAR_USERINFO | CVAR_SAVE, "noaim", "1", "QW option to disable vertical autoaim"};
  34 cvar_t r_fixtrans_auto = {0, "r_fixtrans_auto", "0", "automatically fixtrans textures (when set to 2, it also saves the fixed versions to a fixtrans directory)"};
  35 qboolean allowcheats = false;
  36
  37 extern qboolean host_shuttingdown;
  38 extern cvar_t developer_entityparsing;
  39
  40 /*
  41 ==================
  42 Host_Quit_f
  43 ==================
  44 */
  45
  46 void Host_Quit_f (void)
  47 {
  48         if(host_shuttingdown)
  49                 Con_Printf("shutting down already!\n");
  50         else
  51                 Sys_Quit (0);
  52 }
  53
  54 /*
  55 ==================
  56 Host_Status_f
  57 ==================
  58 */
  59 void Host_Status_f (void)
  60 {
  61         client_t *client;
  62         int seconds, minutes, hours = 0, j, players;
  63         void (*print) (const char *fmt, ...);
  64
  65         if (cmd_source == src_command)
  66         {
  67                 // if running a client, try to send over network so the client's status report parser will see the report
  68                 if (cls.state == ca_connected)
  69                 {
  70                         Cmd_ForwardToServer ();
  71                         return;
  72                 }
  73                 print = Con_Printf;
  74         }
  75         else
  76                 print = SV_ClientPrintf;
  77
  78         if (!sv.active)
  79                 return;
  80
  81         for (players = 0, j = 0;j < svs.maxclients;j++)
  82                 if (svs.clients[j].active)
  83                         players++;
  84         print ("host:     %s\n", Cvar_VariableString ("hostname"));
  85         print ("version:  %s build %s\n", gamename, buildstring);
  86         print ("protocol: %i (%s)\n", Protocol_NumberForEnum(sv.protocol), Protocol_NameForEnum(sv.protocol));
  87         print ("map:      %s\n", sv.name);
  88         print ("timing:   %s\n", Host_TimingReport());
  89         print ("players:  %i active (%i max)\n\n", players, svs.maxclients);
  90         for (j = 0, client = svs.clients;j < svs.maxclients;j++, client++)
  91         {
  92                 if (!client->active)
  93                         continue;
  94                 seconds = (int)(realtime - client->connecttime);
  95                 minutes = seconds / 60;
  96                 if (minutes)
  97                 {
  98                         seconds -= (minutes * 60);
  99                         hours = minutes / 60;
 100                         if (hours)
 101                                 minutes -= (hours * 60);
 102                 }
 103                 else
 104                         hours = 0;
 105                 print ("#%-3u %-16.16s  %3i  %2i:%02i:%02i\n", j+1, client->name, client->frags, hours, minutes, seconds);
 106                 if(sv_status_privacy.integer && cmd_source != src_command)
 107                         print ("   %s\n", client->netconnection ? "hidden" : "botclient");
 108                 else
 109                         print ("   %s\n", client->netconnection ? client->netconnection->address : "botclient");
 110         }
 111 }
 112
 113
 114 /*
 115 ==================
 116 Host_God_f
 117
 118 Sets client to godmode
 119 ==================
 120 */
 121 void Host_God_f (void)
 122 {
 123         if (!allowcheats)
 124         {
 125                 SV_ClientPrint("No cheats allowed, use sv_cheats 1 and restart level to enable.\n");
 126                 return;
 127         }
 128
 129         host_client->edict->fields.server->flags = (int)host_client->edict->fields.server->flags ^ FL_GODMODE;
 130         if (!((int)host_client->edict->fields.server->flags & FL_GODMODE) )
 131                 SV_ClientPrint("godmode OFF\n");
 132         else
 133                 SV_ClientPrint("godmode ON\n");
 134 }
 135
 136 void Host_Notarget_f (void)
 137 {
 138         if (!allowcheats)
 139         {
 140                 SV_ClientPrint("No cheats allowed, use sv_cheats 1 and restart level to enable.\n");
 141                 return;
 142         }
 143
 144         host_client->edict->fields.server->flags = (int)host_client->edict->fields.server->flags ^ FL_NOTARGET;
 145         if (!((int)host_client->edict->fields.server->flags & FL_NOTARGET) )
 146                 SV_ClientPrint("notarget OFF\n");
 147         else
 148                 SV_ClientPrint("notarget ON\n");
 149 }
 150
 151 qboolean noclip_anglehack;
 152
 153 void Host_Noclip_f (void)
 154 {
 155         if (!allowcheats)
 156         {
 157                 SV_ClientPrint("No cheats allowed, use sv_cheats 1 and restart level to enable.\n");
 158                 return;
 159         }
 160
 161         if (host_client->edict->fields.server->movetype != MOVETYPE_NOCLIP)
 162         {
 163                 noclip_anglehack = true;
 164                 host_client->edict->fields.server->movetype = MOVETYPE_NOCLIP;
 165                 SV_ClientPrint("noclip ON\n");
 166         }
 167         else
 168         {
 169                 noclip_anglehack = false;
 170                 host_client->edict->fields.server->movetype = MOVETYPE_WALK;
 171                 SV_ClientPrint("noclip OFF\n");
 172         }
 173 }
 174
 175 /*
 176 ==================
 177 Host_Fly_f
 178
 179 Sets client to flymode
 180 ==================
 181 */
 182 void Host_Fly_f (void)
 183 {
 184         if (!allowcheats)
 185         {
 186                 SV_ClientPrint("No cheats allowed, use sv_cheats 1 and restart level to enable.\n");
 187                 return;
 188         }
 189
 190         if (host_client->edict->fields.server->movetype != MOVETYPE_FLY)
 191         {
 192                 host_client->edict->fields.server->movetype = MOVETYPE_FLY;
 193                 SV_ClientPrint("flymode ON\n");
 194         }
 195         else
 196         {
 197                 host_client->edict->fields.server->movetype = MOVETYPE_WALK;
 198                 SV_ClientPrint("flymode OFF\n");
 199         }
 200 }
 201
 202
 203 /*
 204 ==================
 205 Host_Ping_f
 206
 207 ==================
 208 */
 209 void Host_Pings_f (void); // called by Host_Ping_f
 210 void Host_Ping_f (void)
 211 {
 212         int i;
 213         client_t *client;
 214         void (*print) (const char *fmt, ...);
 215
 216         if (cmd_source == src_command)
 217         {
 218                 // if running a client, try to send over network so the client's ping report parser will see the report
 219                 if (cls.state == ca_connected)
 220                 {
 221                         Cmd_ForwardToServer ();
 222                         return;
 223                 }
 224                 print = Con_Printf;
 225         }
 226         else
 227                 print = SV_ClientPrintf;
 228
 229         if (!sv.active)
 230                 return;
 231
 232         print("Client ping times:\n");
 233         for (i = 0, client = svs.clients;i < svs.maxclients;i++, client++)
 234         {
 235                 if (!client->active)
 236                         continue;
 237                 print("%4i %s\n", bound(0, (int)floor(client->ping*1000+0.5), 9999), client->name);
 238         }
 239
 240         // 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)
 241         // actually, don't, it confuses old clients (resulting in "unknown command pingplreport" flooding the console)
 242         //Host_Pings_f();
 243 }
 244
 245 /*
 246 ===============================================================================
 247
 248 SERVER TRANSITIONS
 249
 250 ===============================================================================
 251 */
 252
 253 /*
 254 ======================
 255 Host_Map_f
 256
 257 handle a
 258 map <servername>
 259 command from the console.  Active clients are kicked off.
 260 ======================
 261 */
 262 void Host_Map_f (void)
 263 {
 264         char level[MAX_QPATH];
 265
 266         if (Cmd_Argc() != 2)
 267         {
 268                 Con_Print("map <levelname> : start a new game (kicks off all players)\n");
 269                 return;
 270         }
 271
 272         // GAME_DELUXEQUAKE - clear warpmark (used by QC)
 273         if (gamemode == GAME_DELUXEQUAKE)
 274                 Cvar_Set("warpmark", "");
 275
 276         cls.demonum = -1;               // stop demo loop in case this fails
 277
 278         CL_Disconnect ();
 279         Host_ShutdownServer();
 280
 281         // remove menu
 282         key_dest = key_game;
 283
 284         svs.serverflags = 0;                    // haven't completed an episode yet
 285         allowcheats = sv_cheats.integer != 0;
 286         strlcpy(level, Cmd_Argv(1), sizeof(level));
 287         SV_SpawnServer(level);
 288         if (sv.active && cls.state == ca_disconnected)
 289                 CL_EstablishConnection("local:1");
 290 }
 291
 292 /*
 293 ==================
 294 Host_Changelevel_f
 295
 296 Goes to a new map, taking all clients along
 297 ==================
 298 */
 299 void Host_Changelevel_f (void)
 300 {
 301         char level[MAX_QPATH];
 302
 303         if (Cmd_Argc() != 2)
 304         {
 305                 Con_Print("changelevel <levelname> : continue game on a new level\n");
 306                 return;
 307         }
 308         // HACKHACKHACK
 309         if (!sv.active) {
 310                 Host_Map_f();
 311                 return;
 312         }
 313
 314         // remove menu
 315         key_dest = key_game;
 316
 317         SV_VM_Begin();
 318         SV_SaveSpawnparms ();
 319         SV_VM_End();
 320         allowcheats = sv_cheats.integer != 0;
 321         strlcpy(level, Cmd_Argv(1), sizeof(level));
 322         SV_SpawnServer(level);
 323         if (sv.active && cls.state == ca_disconnected)
 324                 CL_EstablishConnection("local:1");
 325 }
 326
 327 /*
 328 ==================
 329 Host_Restart_f
 330
 331 Restarts the current server for a dead player
 332 ==================
 333 */
 334 void Host_Restart_f (void)
 335 {
 336         char mapname[MAX_QPATH];
 337
 338         if (Cmd_Argc() != 1)
 339         {
 340                 Con_Print("restart : restart current level\n");
 341                 return;
 342         }
 343         if (!sv.active)
 344         {
 345                 Con_Print("Only the server may restart\n");
 346                 return;
 347         }
 348
 349         // remove menu
 350         key_dest = key_game;
 351
 352         allowcheats = sv_cheats.integer != 0;
 353         strlcpy(mapname, sv.name, sizeof(mapname));
 354         SV_SpawnServer(mapname);
 355         if (sv.active && cls.state == ca_disconnected)
 356                 CL_EstablishConnection("local:1");
 357 }
 358
 359 /*
 360 ==================
 361 Host_Reconnect_f
 362
 363 This command causes the client to wait for the signon messages again.
 364 This is sent just before a server changes levels
 365 ==================
 366 */
 367 void Host_Reconnect_f (void)
 368 {
 369         char temp[128];
 370         // if not connected, reconnect to the most recent server
 371         if (!cls.netcon)
 372         {
 373                 // if we have connected to a server recently, the userinfo
 374                 // will still contain its IP address, so get the address...
 375                 InfoString_GetValue(cls.userinfo, "*ip", temp, sizeof(temp));
 376                 if (temp[0])
 377                         CL_EstablishConnection(temp);
 378                 else
 379                         Con_Printf("Reconnect to what server?  (you have not connected to a server yet)\n");
 380                 return;
 381         }
 382         // if connected, do something based on protocol
 383         if (cls.protocol == PROTOCOL_QUAKEWORLD)
 384         {
 385                 // quakeworld can just re-login
 386                 if (cls.qw_downloadmemory)  // don't change when downloading
 387                         return;
 388
 389                 S_StopAllSounds();
 390
 391                 if (cls.state == ca_connected && cls.signon < SIGNONS)
 392                 {
 393                         Con_Printf("reconnecting...\n");
 394                         MSG_WriteChar(&cls.netcon->message, qw_clc_stringcmd);
 395                         MSG_WriteString(&cls.netcon->message, "new");
 396                 }
 397         }
 398         else
 399         {
 400                 // netquake uses reconnect on level changes (silly)
 401                 if (Cmd_Argc() != 1)
 402                 {
 403                         Con_Print("reconnect : wait for signon messages again\n");
 404                         return;
 405                 }
 406                 if (!cls.signon)
 407                 {
 408                         Con_Print("reconnect: no signon, ignoring reconnect\n");
 409                         return;
 410                 }
 411                 cls.signon = 0;         // need new connection messages
 412         }
 413 }
 414
 415 /*
 416 =====================
 417 Host_Connect_f
 418
 419 User command to connect to server
 420 =====================
 421 */
 422 void Host_Connect_f (void)
 423 {
 424         if (Cmd_Argc() != 2)
 425         {
 426                 Con_Print("connect <serveraddress> : connect to a multiplayer game\n");
 427                 return;
 428         }
 429         CL_EstablishConnection(Cmd_Argv(1));
 430 }
 431
 432
 433 /*
 434 ===============================================================================
 435
 436 LOAD / SAVE GAME
 437
 438 ===============================================================================
 439 */
 440
 441 #define SAVEGAME_VERSION        5
 442
 443 void Host_Savegame_to (const char *name)
 444 {
 445         qfile_t *f;
 446         int             i, lightstyles = 64;
 447         char    comment[SAVEGAME_COMMENT_LENGTH+1];
 448         qboolean isserver;
 449
 450         // first we have to figure out if this can be saved in 64 lightstyles
 451         // (for Quake compatibility)
 452         for (i=64 ; i<MAX_LIGHTSTYLES ; i++)
 453                 if (sv.lightstyles[i][0])
 454                         lightstyles = i+1;
 455
 456         isserver = !strcmp(PRVM_NAME, "server");
 457
 458         Con_Printf("Saving game to %s...\n", name);
 459         f = FS_OpenRealFile(name, "wb", false);
 460         if (!f)
 461         {
 462                 Con_Print("ERROR: couldn't open.\n");
 463                 return;
 464         }
 465
 466         FS_Printf(f, "%i\n", SAVEGAME_VERSION);
 467
 468         memset(comment, 0, sizeof(comment));
 469         if(isserver)
 470                 dpsnprintf(comment, sizeof(comment), "%-21.21s kills:%3i/%3i", PRVM_GetString(prog->edicts->fields.server->message), (int)prog->globals.server->killed_monsters, (int)prog->globals.server->total_monsters);
 471         else
 472                 dpsnprintf(comment, sizeof(comment), "(crash dump of %s progs)", PRVM_NAME);
 473         // convert space to _ to make stdio happy
 474         // LordHavoc: convert control characters to _ as well
 475         for (i=0 ; i<SAVEGAME_COMMENT_LENGTH ; i++)
 476                 if (comment[i] <= ' ')
 477                         comment[i] = '_';
 478         comment[SAVEGAME_COMMENT_LENGTH] = '\0';
 479
 480         FS_Printf(f, "%s\n", comment);
 481         if(isserver)
 482         {
 483                 for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
 484                         FS_Printf(f, "%f\n", svs.clients[0].spawn_parms[i]);
 485                 FS_Printf(f, "%d\n", current_skill);
 486                 FS_Printf(f, "%s\n", sv.name);
 487                 FS_Printf(f, "%f\n",sv.time);
 488         }
 489         else
 490         {
 491                 for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
 492                         FS_Printf(f, "(dummy)\n");
 493                 FS_Printf(f, "%d\n", 0);
 494                 FS_Printf(f, "%s\n", "(dummy)");
 495                 FS_Printf(f, "%f\n", realtime);
 496         }
 497
 498         // write the light styles
 499         for (i=0 ; i<lightstyles ; i++)
 500         {
 501                 if (isserver && sv.lightstyles[i][0])
 502                         FS_Printf(f, "%s\n", sv.lightstyles[i]);
 503                 else
 504                         FS_Print(f,"m\n");
 505         }
 506
 507         PRVM_ED_WriteGlobals (f);
 508         for (i=0 ; i<prog->num_edicts ; i++)
 509         {
 510                 FS_Printf(f,"// edict %d\n", i);
 511                 //Con_Printf("edict %d...\n", i);
 512                 PRVM_ED_Write (f, PRVM_EDICT_NUM(i));
 513         }
 514
 515 #if 1
 516         FS_Printf(f,"/*\n");
 517         FS_Printf(f,"// DarkPlaces extended savegame\n");
 518         // darkplaces extension - extra lightstyles, support for color lightstyles
 519         for (i=0 ; i<MAX_LIGHTSTYLES ; i++)
 520                 if (isserver && sv.lightstyles[i][0])
 521                         FS_Printf(f, "sv.lightstyles %i %s\n", i, sv.lightstyles[i]);
 522
 523         // darkplaces extension - model precaches
 524         for (i=1 ; i<MAX_MODELS ; i++)
 525                 if (sv.model_precache[i][0])
 526                         FS_Printf(f,"sv.model_precache %i %s\n", i, sv.model_precache[i]);
 527
 528         // darkplaces extension - sound precaches
 529         for (i=1 ; i<MAX_SOUNDS ; i++)
 530                 if (sv.sound_precache[i][0])
 531                         FS_Printf(f,"sv.sound_precache %i %s\n", i, sv.sound_precache[i]);
 532         FS_Printf(f,"*/\n");
 533 #endif
 534
 535         FS_Close (f);
 536         Con_Print("done.\n");
 537 }
 538
 539 /*
 540 ===============
 541 Host_Savegame_f
 542 ===============
 543 */
 544 void Host_Savegame_f (void)
 545 {
 546         char    name[MAX_QPATH];
 547
 548         if (!sv.active)
 549         {
 550                 Con_Print("Can't save - no server running.\n");
 551                 return;
 552         }
 553
 554         if (cl.islocalgame)
 555         {
 556                 // singleplayer checks
 557                 if (cl.intermission)
 558                 {
 559                         Con_Print("Can't save in intermission.\n");
 560                         return;
 561                 }
 562
 563                 if (svs.clients[0].active && svs.clients[0].edict->fields.server->deadflag)
 564                 {
 565                         Con_Print("Can't savegame with a dead player\n");
 566                         return;
 567                 }
 568         }
 569         else
 570                 Con_Print("Warning: saving a multiplayer game may have strange results when restored (to properly resume, all players must join in the same player slots and then the game can be reloaded).\n");
 571
 572         if (Cmd_Argc() != 2)
 573         {
 574                 Con_Print("save <savename> : save a game\n");
 575                 return;
 576         }
 577
 578         if (strstr(Cmd_Argv(1), ".."))
 579         {
 580                 Con_Print("Relative pathnames are not allowed.\n");
 581                 return;
 582         }
 583
 584         strlcpy (name, Cmd_Argv(1), sizeof (name));
 585         FS_DefaultExtension (name, ".sav", sizeof (name));
 586
 587         SV_VM_Begin();
 588         Host_Savegame_to(name);
 589         SV_VM_End();
 590 }
 591
 592
 593 /*
 594 ===============
 595 Host_Loadgame_f
 596 ===============
 597 */
 598 void Host_Loadgame_f (void)
 599 {
 600         char filename[MAX_QPATH];
 601         char mapname[MAX_QPATH];
 602         float time;
 603         const char *start;
 604         const char *end;
 605         const char *t;
 606         char *text;
 607         prvm_edict_t *ent;
 608         int i;
 609         int entnum;
 610         int version;
 611         float spawn_parms[NUM_SPAWN_PARMS];
 612
 613         if (Cmd_Argc() != 2)
 614         {
 615                 Con_Print("load <savename> : load a game\n");
 616                 return;
 617         }
 618
 619         strlcpy (filename, Cmd_Argv(1), sizeof(filename));
 620         FS_DefaultExtension (filename, ".sav", sizeof (filename));
 621
 622         Con_Printf("Loading game from %s...\n", filename);
 623
 624         // stop playing demos
 625         if (cls.demoplayback)
 626                 CL_Disconnect ();
 627
 628         // remove menu
 629         key_dest = key_game;
 630
 631         cls.demonum = -1;               // stop demo loop in case this fails
 632
 633         t = text = (char *)FS_LoadFile (filename, tempmempool, false, NULL);
 634         if (!text)
 635         {
 636                 Con_Print("ERROR: couldn't open.\n");
 637                 return;
 638         }
 639
 640         if(developer_entityparsing.integer)
 641                 Con_Printf("Host_Loadgame_f: loading version\n");
 642
 643         // version
 644         COM_ParseToken_Simple(&t, false, false);
 645         version = atoi(com_token);
 646         if (version != SAVEGAME_VERSION)
 647         {
 648                 Mem_Free(text);
 649                 Con_Printf("Savegame is version %i, not %i\n", version, SAVEGAME_VERSION);
 650                 return;
 651         }
 652
 653         if(developer_entityparsing.integer)
 654                 Con_Printf("Host_Loadgame_f: loading description\n");
 655
 656         // description
 657         COM_ParseToken_Simple(&t, false, false);
 658
 659         for (i = 0;i < NUM_SPAWN_PARMS;i++)
 660         {
 661                 COM_ParseToken_Simple(&t, false, false);
 662                 spawn_parms[i] = atof(com_token);
 663         }
 664         // skill
 665         COM_ParseToken_Simple(&t, false, false);
 666 // this silliness is so we can load 1.06 save files, which have float skill values
 667         current_skill = (int)(atof(com_token) + 0.5);
 668         Cvar_SetValue ("skill", (float)current_skill);
 669
 670         if(developer_entityparsing.integer)
 671                 Con_Printf("Host_Loadgame_f: loading mapname\n");
 672
 673         // mapname
 674         COM_ParseToken_Simple(&t, false, false);
 675         strlcpy (mapname, com_token, sizeof(mapname));
 676
 677         if(developer_entityparsing.integer)
 678                 Con_Printf("Host_Loadgame_f: loading time\n");
 679
 680         // time
 681         COM_ParseToken_Simple(&t, false, false);
 682         time = atof(com_token);
 683
 684         allowcheats = sv_cheats.integer != 0;
 685
 686         if(developer_entityparsing.integer)
 687                 Con_Printf("Host_Loadgame_f: spawning server\n");
 688
 689         SV_SpawnServer (mapname);
 690         if (!sv.active)
 691         {
 692                 Mem_Free(text);
 693                 Con_Print("Couldn't load map\n");
 694                 return;
 695         }
 696         sv.paused = true;               // pause until all clients connect
 697         sv.loadgame = true;
 698
 699         if(developer_entityparsing.integer)
 700                 Con_Printf("Host_Loadgame_f: loading light styles\n");
 701
 702 // load the light styles
 703
 704         SV_VM_Begin();
 705         // -1 is the globals
 706         entnum = -1;
 707
 708         for (i = 0;i < MAX_LIGHTSTYLES;i++)
 709         {
 710                 // light style
 711                 start = t;
 712                 COM_ParseToken_Simple(&t, false, false);
 713                 // if this is a 64 lightstyle savegame produced by Quake, stop now
 714                 // we have to check this because darkplaces may save more than 64
 715                 if (com_token[0] == '{')
 716                 {
 717                         t = start;
 718                         break;
 719                 }
 720                 strlcpy(sv.lightstyles[i], com_token, sizeof(sv.lightstyles[i]));
 721         }
 722
 723         if(developer_entityparsing.integer)
 724                 Con_Printf("Host_Loadgame_f: skipping until globals\n");
 725
 726         // now skip everything before the first opening brace
 727         // (this is for forward compatibility, so that older versions (at
 728         // least ones with this fix) can load savegames with extra data before the
 729         // first brace, as might be produced by a later engine version)
 730         for (;;)
 731         {
 732                 start = t;
 733                 if (!COM_ParseToken_Simple(&t, false, false))
 734                         break;
 735                 if (com_token[0] == '{')
 736                 {
 737                         t = start;
 738                         break;
 739                 }
 740         }
 741
 742 // load the edicts out of the savegame file
 743         end = t;
 744         for (;;)
 745         {
 746                 start = t;
 747                 while (COM_ParseToken_Simple(&t, false, false))
 748                         if (!strcmp(com_token, "}"))
 749                                 break;
 750                 if (!COM_ParseToken_Simple(&start, false, false))
 751                 {
 752                         // end of file
 753                         break;
 754                 }
 755                 if (strcmp(com_token,"{"))
 756                 {
 757                         Mem_Free(text);
 758                         Host_Error ("First token isn't a brace");
 759                 }
 760
 761                 if (entnum == -1)
 762                 {
 763                         if(developer_entityparsing.integer)
 764                                 Con_Printf("Host_Loadgame_f: loading globals\n");
 765
 766                         // parse the global vars
 767                         PRVM_ED_ParseGlobals (start);
 768                 }
 769                 else
 770                 {
 771                         // parse an edict
 772                         if (entnum >= MAX_EDICTS)
 773                         {
 774                                 Mem_Free(text);
 775                                 Host_Error("Host_PerformLoadGame: too many edicts in save file (reached MAX_EDICTS %i)", MAX_EDICTS);
 776                         }
 777                         while (entnum >= prog->max_edicts)
 778                                 PRVM_MEM_IncreaseEdicts();
 779                         ent = PRVM_EDICT_NUM(entnum);
 780                         memset (ent->fields.server, 0, prog->progs->entityfields * 4);
 781                         ent->priv.server->free = false;
 782
 783                         if(developer_entityparsing.integer)
 784                                 Con_Printf("Host_Loadgame_f: loading edict %d\n", entnum);
 785
 786                         PRVM_ED_ParseEdict (start, ent);
 787
 788                         // link it into the bsp tree
 789                         if (!ent->priv.server->free)
 790                                 SV_LinkEdict (ent, false);
 791                 }
 792
 793                 end = t;
 794                 entnum++;
 795         }
 796         Mem_Free(text);
 797
 798         prog->num_edicts = entnum;
 799         sv.time = time;
 800
 801         for (i = 0;i < NUM_SPAWN_PARMS;i++)
 802                 svs.clients[0].spawn_parms[i] = spawn_parms[i];
 803
 804         if(developer_entityparsing.integer)
 805                 Con_Printf("Host_Loadgame_f: skipping until extended data\n");
 806
 807         // read extended data if present
 808         // the extended data is stored inside a /* */ comment block, which the
 809         // parser intentionally skips, so we have to check for it manually here
 810         while (*end == '\r' || *end == '\n')
 811                 end++;
 812         if (end[0] == '/' && end[1] == '*' && (end[2] == '\r' || end[2] == '\n'))
 813         {
 814                 if(developer_entityparsing.integer)
 815                         Con_Printf("Host_Loadgame_f: loading extended data\n");
 816
 817                 Con_Printf("Loading extended DarkPlaces savegame\n");
 818                 t = end + 2;
 819                 memset(sv.lightstyles[0], 0, sizeof(sv.lightstyles));
 820                 memset(sv.model_precache[0], 0, sizeof(sv.model_precache));
 821                 memset(sv.sound_precache[0], 0, sizeof(sv.sound_precache));
 822                 while (COM_ParseToken_Simple(&t, false, false))
 823                 {
 824                         if (!strcmp(com_token, "sv.lightstyles"))
 825                         {
 826                                 COM_ParseToken_Simple(&t, false, false);
 827                                 i = atoi(com_token);
 828                                 COM_ParseToken_Simple(&t, false, false);
 829                                 if (i >= 0 && i < MAX_LIGHTSTYLES)
 830                                         strlcpy(sv.lightstyles[i], com_token, sizeof(sv.lightstyles[i]));
 831                                 else
 832                                         Con_Printf("unsupported lightstyle %i \"%s\"\n", i, com_token);
 833                         }
 834                         else if (!strcmp(com_token, "sv.model_precache"))
 835                         {
 836                                 COM_ParseToken_Simple(&t, false, false);
 837                                 i = atoi(com_token);
 838                                 COM_ParseToken_Simple(&t, false, false);
 839                                 if (i >= 0 && i < MAX_MODELS)
 840                                 {
 841                                         strlcpy(sv.model_precache[i], com_token, sizeof(sv.model_precache[i]));
 842                                         sv.models[i] = Mod_ForName (sv.model_precache[i], true, false, false);
 843                                 }
 844                                 else
 845                                         Con_Printf("unsupported model %i \"%s\"\n", i, com_token);
 846                         }
 847                         else if (!strcmp(com_token, "sv.sound_precache"))
 848                         {
 849                                 COM_ParseToken_Simple(&t, false, false);
 850                                 i = atoi(com_token);
 851                                 COM_ParseToken_Simple(&t, false, false);
 852                                 if (i >= 0 && i < MAX_SOUNDS)
 853                                         strlcpy(sv.sound_precache[i], com_token, sizeof(sv.sound_precache[i]));
 854                                 else
 855                                         Con_Printf("unsupported sound %i \"%s\"\n", i, com_token);
 856                         }
 857                         // skip any trailing text or unrecognized commands
 858                         while (COM_ParseToken_Simple(&t, true, false) && strcmp(com_token, "\n"))
 859                                 ;
 860                 }
 861         }
 862
 863         if(developer_entityparsing.integer)
 864                 Con_Printf("Host_Loadgame_f: finished\n");
 865
 866         SV_VM_End();
 867
 868         // make sure we're connected to loopback
 869         if (sv.active && cls.state == ca_disconnected)
 870                 CL_EstablishConnection("local:1");
 871 }
 872
 873 //============================================================================
 874
 875 /*
 876 ======================
 877 Host_Name_f
 878 ======================
 879 */
 880 cvar_t cl_name = {CVAR_SAVE | CVAR_NQUSERINFOHACK, "_cl_name", "player", "internal storage cvar for current player name (changed by name command)"};
 881 void Host_Name_f (void)
 882 {
 883         int i, j;
 884         qboolean valid_colors;
 885         char newName[sizeof(host_client->name)];
 886
 887         if (Cmd_Argc () == 1)
 888         {
 889                 Con_Printf("\"name\" is \"%s\"\n", cl_name.string);
 890                 return;
 891         }
 892
 893         if (Cmd_Argc () == 2)
 894                 strlcpy (newName, Cmd_Argv(1), sizeof (newName));
 895         else
 896                 strlcpy (newName, Cmd_Args(), sizeof (newName));
 897
 898         if (cmd_source == src_command)
 899         {
 900                 Cvar_Set ("_cl_name", newName);
 901                 return;
 902         }
 903
 904         if (realtime < host_client->nametime)
 905         {
 906                 SV_ClientPrintf("You can't change name more than once every 5 seconds!\n");
 907                 return;
 908         }
 909
 910         host_client->nametime = realtime + 5;
 911
 912         // point the string back at updateclient->name to keep it safe
 913         strlcpy (host_client->name, newName, sizeof (host_client->name));
 914
 915         for (i = 0, j = 0;host_client->name[i];i++)
 916                 if (host_client->name[i] != '\r' && host_client->name[i] != '\n')
 917                         host_client->name[j++] = host_client->name[i];
 918         host_client->name[j] = 0;
 919
 920         if(host_client->name[0] == 1 || host_client->name[0] == 2)
 921         // may interfere with chat area, and will needlessly beep; so let's add a ^7
 922         {
 923                 memmove(host_client->name + 2, host_client->name, sizeof(host_client->name) - 2);
 924                 host_client->name[sizeof(host_client->name) - 1] = 0;
 925                 host_client->name[0] = STRING_COLOR_TAG;
 926                 host_client->name[1] = '0' + STRING_COLOR_DEFAULT;
 927         }
 928
 929         COM_StringLengthNoColors(host_client->name, 0, &valid_colors);
 930         if(!valid_colors) // NOTE: this also proves the string is not empty, as "" is a valid colored string
 931         {
 932                 size_t l;
 933                 l = strlen(host_client->name);
 934                 if(l < sizeof(host_client->name) - 1)
 935                 {
 936                         // duplicate the color tag to escape it
 937                         host_client->name[i] = STRING_COLOR_TAG;
 938                         host_client->name[i+1] = 0;
 939                         //Con_DPrintf("abuse detected, adding another trailing color tag\n");
 940                 }
 941                 else
 942                 {
 943                         // remove the last character to fix the color code
 944                         host_client->name[l-1] = 0;
 945                         //Con_DPrintf("abuse detected, removing a trailing color tag\n");
 946                 }
 947         }
 948
 949         // find the last color tag offset and decide if we need to add a reset tag
 950         for (i = 0, j = -1;host_client->name[i];i++)
 951         {
 952                 if (host_client->name[i] == STRING_COLOR_TAG)
 953                 {
 954                         if (host_client->name[i+1] >= '0' && host_client->name[i+1] <= '9')
 955                         {
 956                                 j = i;
 957                                 // if this happens to be a reset  tag then we don't need one
 958                                 if (host_client->name[i+1] == '0' + STRING_COLOR_DEFAULT)
 959                                         j = -1;
 960                                 i++;
 961                                 continue;
 962                         }
 963                         if (host_client->name[i+1] == STRING_COLOR_TAG)
 964                         {
 965                                 i++;
 966                                 continue;
 967                         }
 968                 }
 969         }
 970         // does not end in the default color string, so add it
 971         if (j >= 0 && strlen(host_client->name) < sizeof(host_client->name) - 2)
 972                 memcpy(host_client->name + strlen(host_client->name), STRING_COLOR_DEFAULT_STR, strlen(STRING_COLOR_DEFAULT_STR) + 1);
 973
 974         host_client->edict->fields.server->netname = PRVM_SetEngineString(host_client->name);
 975         if (strcmp(host_client->old_name, host_client->name))
 976         {
 977                 if (host_client->spawned)
 978                         SV_BroadcastPrintf("%s changed name to %s\n", host_client->old_name, host_client->name);
 979                 strlcpy(host_client->old_name, host_client->name, sizeof(host_client->old_name));
 980                 // send notification to all clients
 981                 MSG_WriteByte (&sv.reliable_datagram, svc_updatename);
 982                 MSG_WriteByte (&sv.reliable_datagram, host_client - svs.clients);
 983                 MSG_WriteString (&sv.reliable_datagram, host_client->name);
 984                 SV_WriteNetnameIntoDemo(host_client);
 985         }
 986 }
 987
 988 /*
 989 ======================
 990 Host_Playermodel_f
 991 ======================
 992 */
 993 cvar_t cl_playermodel = {CVAR_SAVE | CVAR_NQUSERINFOHACK, "_cl_playermodel", "", "internal storage cvar for current player model in Nexuiz (changed by playermodel command)"};
 994 // the old cl_playermodel in cl_main has been renamed to __cl_playermodel
 995 void Host_Playermodel_f (void)
 996 {
 997         int i, j;
 998         char newPath[sizeof(host_client->playermodel)];
 999
1000         if (Cmd_Argc () == 1)
1001         {
1002                 Con_Printf("\"playermodel\" is \"%s\"\n", cl_playermodel.string);
1003                 return;
1004         }
1005
1006         if (Cmd_Argc () == 2)
1007                 strlcpy (newPath, Cmd_Argv(1), sizeof (newPath));
1008         else
1009                 strlcpy (newPath, Cmd_Args(), sizeof (newPath));
1010
1011         for (i = 0, j = 0;newPath[i];i++)
1012                 if (newPath[i] != '\r' && newPath[i] != '\n')
1013                         newPath[j++] = newPath[i];
1014         newPath[j] = 0;
1015
1016         if (cmd_source == src_command)
1017         {
1018                 Cvar_Set ("_cl_playermodel", newPath);
1019                 return;
1020         }
1021
1022         /*
1023         if (realtime < host_client->nametime)
1024         {
1025                 SV_ClientPrintf("You can't change playermodel more than once every 5 seconds!\n");
1026                 return;
1027         }
1028
1029         host_client->nametime = realtime + 5;
1030         */
1031
1032         // point the string back at updateclient->name to keep it safe
1033         strlcpy (host_client->playermodel, newPath, sizeof (host_client->playermodel));
1034         if( prog->fieldoffsets.playermodel >= 0 )
1035                 PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.playermodel)->string = PRVM_SetEngineString(host_client->playermodel);
1036         if (strcmp(host_client->old_model, host_client->playermodel))
1037         {
1038                 strlcpy(host_client->old_model, host_client->playermodel, sizeof(host_client->old_model));
1039                 /*// send notification to all clients
1040                 MSG_WriteByte (&sv.reliable_datagram, svc_updatepmodel);
1041                 MSG_WriteByte (&sv.reliable_datagram, host_client - svs.clients);
1042                 MSG_WriteString (&sv.reliable_datagram, host_client->playermodel);*/
1043         }
1044 }
1045
1046 /*
1047 ======================
1048 Host_Playerskin_f
1049 ======================
1050 */
1051 cvar_t cl_playerskin = {CVAR_SAVE | CVAR_NQUSERINFOHACK, "_cl_playerskin", "", "internal storage cvar for current player skin in Nexuiz (changed by playerskin command)"};
1052 void Host_Playerskin_f (void)
1053 {
1054         int i, j;
1055         char newPath[sizeof(host_client->playerskin)];
1056
1057         if (Cmd_Argc () == 1)
1058         {
1059                 Con_Printf("\"playerskin\" is \"%s\"\n", cl_playerskin.string);
1060                 return;
1061         }
1062
1063         if (Cmd_Argc () == 2)
1064                 strlcpy (newPath, Cmd_Argv(1), sizeof (newPath));
1065         else
1066                 strlcpy (newPath, Cmd_Args(), sizeof (newPath));
1067
1068         for (i = 0, j = 0;newPath[i];i++)
1069                 if (newPath[i] != '\r' && newPath[i] != '\n')
1070                         newPath[j++] = newPath[i];
1071         newPath[j] = 0;
1072
1073         if (cmd_source == src_command)
1074         {
1075                 Cvar_Set ("_cl_playerskin", newPath);
1076                 return;
1077         }
1078
1079         /*
1080         if (realtime < host_client->nametime)
1081         {
1082                 SV_ClientPrintf("You can't change playermodel more than once every 5 seconds!\n");
1083                 return;
1084         }
1085
1086         host_client->nametime = realtime + 5;
1087         */
1088
1089         // point the string back at updateclient->name to keep it safe
1090         strlcpy (host_client->playerskin, newPath, sizeof (host_client->playerskin));
1091         if( prog->fieldoffsets.playerskin >= 0 )
1092                 PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.playerskin)->string = PRVM_SetEngineString(host_client->playerskin);
1093         if (strcmp(host_client->old_skin, host_client->playerskin))
1094         {
1095                 //if (host_client->spawned)
1096                 //      SV_BroadcastPrintf("%s changed skin to %s\n", host_client->name, host_client->playerskin);
1097                 strlcpy(host_client->old_skin, host_client->playerskin, sizeof(host_client->old_skin));
1098                 /*// send notification to all clients
1099                 MSG_WriteByte (&sv.reliable_datagram, svc_updatepskin);
1100                 MSG_WriteByte (&sv.reliable_datagram, host_client - svs.clients);
1101                 MSG_WriteString (&sv.reliable_datagram, host_client->playerskin);*/
1102         }
1103 }
1104
1105 void Host_Version_f (void)
1106 {
1107         Con_Printf("Version: %s build %s\n", gamename, buildstring);
1108 }
1109
1110 void Host_Say(qboolean teamonly)
1111 {
1112         client_t *save;
1113         int j, quoted;
1114         const char *p1;
1115         char *p2;
1116         // LordHavoc: long say messages
1117         char text[1024];
1118         qboolean fromServer = false;
1119
1120         if (cmd_source == src_command)
1121         {
1122                 if (cls.state == ca_dedicated)
1123                 {
1124                         fromServer = true;
1125                         teamonly = false;
1126                 }
1127                 else
1128                 {
1129                         Cmd_ForwardToServer ();
1130                         return;
1131                 }
1132         }
1133
1134         if (Cmd_Argc () < 2)
1135                 return;
1136
1137         if (!teamplay.integer)
1138                 teamonly = false;
1139
1140         p1 = Cmd_Args();
1141         quoted = false;
1142         if (*p1 == '\"')
1143         {
1144                 quoted = true;
1145                 p1++;
1146         }
1147         // note this uses the chat prefix \001
1148         if (!fromServer && !teamonly)
1149                 dpsnprintf (text, sizeof(text), "\001%s: %s", host_client->name, p1);
1150         else if (!fromServer && teamonly)
1151                 dpsnprintf (text, sizeof(text), "\001(%s): %s", host_client->name, p1);
1152         else if(*(sv_adminnick.string))
1153                 dpsnprintf (text, sizeof(text), "\001<%s> %s", sv_adminnick.string, p1);
1154         else
1155                 dpsnprintf (text, sizeof(text), "\001<%s> %s", hostname.string, p1);
1156         p2 = text + strlen(text);
1157         while ((const char *)p2 > (const char *)text && (p2[-1] == '\r' || p2[-1] == '\n' || (p2[-1] == '\"' && quoted)))
1158         {
1159                 if (p2[-1] == '\"' && quoted)
1160                         quoted = false;
1161                 p2[-1] = 0;
1162                 p2--;
1163         }
1164         strlcat(text, "\n", sizeof(text));
1165
1166         // note: save is not a valid edict if fromServer is true
1167         save = host_client;
1168         for (j = 0, host_client = svs.clients;j < svs.maxclients;j++, host_client++)
1169                 if (host_client->active && (!teamonly || host_client->edict->fields.server->team == save->edict->fields.server->team))
1170                         SV_ClientPrint(text);
1171         host_client = save;
1172
1173         if (cls.state == ca_dedicated)
1174                 Con_Print(&text[1]);
1175 }
1176
1177
1178 void Host_Say_f(void)
1179 {
1180         Host_Say(false);
1181 }
1182
1183
1184 void Host_Say_Team_f(void)
1185 {
1186         Host_Say(true);
1187 }
1188
1189
1190 void Host_Tell_f(void)
1191 {
1192         const char *playername_start = NULL;
1193         size_t playername_length = 0;
1194         int playernumber = 0;
1195         client_t *save;
1196         int j;
1197         const char *p1, *p2;
1198         char text[MAX_INPUTLINE]; // LordHavoc: FIXME: temporary buffer overflow fix (was 64)
1199         qboolean fromServer = false;
1200
1201         if (cmd_source == src_command)
1202         {
1203                 if (cls.state == ca_dedicated)
1204                         fromServer = true;
1205                 else
1206                 {
1207                         Cmd_ForwardToServer ();
1208                         return;
1209                 }
1210         }
1211
1212         if (Cmd_Argc () < 2)
1213                 return;
1214
1215         // note this uses the chat prefix \001
1216         if (!fromServer)
1217                 dpsnprintf (text, sizeof(text), "\001%s tells you: ", host_client->name);
1218         else if(*(sv_adminnick.string))
1219                 dpsnprintf (text, sizeof(text), "\001<%s tells you> ", sv_adminnick.string);
1220         else
1221                 dpsnprintf (text, sizeof(text), "\001<%s tells you> ", hostname.string);
1222
1223         p1 = Cmd_Args();
1224         p2 = p1 + strlen(p1);
1225         // remove the target name
1226         while (p1 < p2 && *p1 == ' ')
1227                 p1++;
1228         if(*p1 == '#')
1229         {
1230                 ++p1;
1231                 while (p1 < p2 && *p1 == ' ')
1232                         p1++;
1233                 while (p1 < p2 && isdigit(*p1))
1234                 {
1235                         playernumber = playernumber * 10 + (*p1 - '0');
1236                         p1++;
1237                 }
1238                 --playernumber;
1239         }
1240         else if(*p1 == '"')
1241         {
1242                 ++p1;
1243                 playername_start = p1;
1244                 while (p1 < p2 && *p1 != '"')
1245                         p1++;
1246                 playername_length = p1 - playername_start;
1247                 if(p1 < p2)
1248                         p1++;
1249         }
1250         else
1251         {
1252                 playername_start = p1;
1253                 while (p1 < p2 && *p1 != ' ')
1254                         p1++;
1255                 playername_length = p1 - playername_start;
1256         }
1257         while (p1 < p2 && *p1 == ' ')
1258                 p1++;
1259         if(playername_start)
1260         {
1261                 // set playernumber to the right client
1262                 char namebuf[128];
1263                 if(playername_length >= sizeof(namebuf))
1264                 {
1265                         if (fromServer)
1266                                 Con_Print("Host_Tell: too long player name/ID\n");
1267                         else
1268                                 SV_ClientPrint("Host_Tell: too long player name/ID\n");
1269                         return;
1270                 }
1271                 memcpy(namebuf, playername_start, playername_length);
1272                 namebuf[playername_length] = 0;
1273                 for (playernumber = 0; playernumber < svs.maxclients; playernumber++)
1274                 {
1275                         if (!svs.clients[playernumber].active)
1276                                 continue;
1277                         if (strcasecmp(svs.clients[playernumber].name, namebuf) == 0)
1278                                 break;
1279                 }
1280         }
1281         if(playernumber < 0 || playernumber >= svs.maxclients || !(svs.clients[playernumber].active))
1282         {
1283                 if (fromServer)
1284                         Con_Print("Host_Tell: invalid player name/ID\n");
1285                 else
1286                         SV_ClientPrint("Host_Tell: invalid player name/ID\n");
1287                 return;
1288         }
1289         // remove trailing newlines
1290         while (p2 > p1 && (p2[-1] == '\n' || p2[-1] == '\r'))
1291                 p2--;
1292         // remove quotes if present
1293         if (*p1 == '"')
1294         {
1295                 p1++;
1296                 if (p2[-1] == '"')
1297                         p2--;
1298                 else if (fromServer)
1299                         Con_Print("Host_Tell: missing end quote\n");
1300                 else
1301                         SV_ClientPrint("Host_Tell: missing end quote\n");
1302         }
1303         while (p2 > p1 && (p2[-1] == '\n' || p2[-1] == '\r'))
1304                 p2--;
1305         if(p1 == p2)
1306                 return; // empty say
1307         for (j = (int)strlen(text);j < (int)(sizeof(text) - 2) && p1 < p2;)
1308                 text[j++] = *p1++;
1309         text[j++] = '\n';
1310         text[j++] = 0;
1311
1312         save = host_client;
1313         host_client = svs.clients + playernumber;
1314         SV_ClientPrint(text);
1315         host_client = save;
1316 }
1317
1318
1319 /*
1320 ==================
1321 Host_Color_f
1322 ==================
1323 */
1324 cvar_t cl_color = {CVAR_SAVE | CVAR_NQUSERINFOHACK, "_cl_color", "0", "internal storage cvar for current player colors (changed by color command)"};
1325 void Host_Color(int changetop, int changebottom)
1326 {
1327         int top, bottom, playercolor;
1328
1329         // get top and bottom either from the provided values or the current values
1330         // (allows changing only top or bottom, or both at once)
1331         top = changetop >= 0 ? changetop : (cl_color.integer >> 4);
1332         bottom = changebottom >= 0 ? changebottom : cl_color.integer;
1333
1334         top &= 15;
1335         bottom &= 15;
1336         // LordHavoc: allowing skin colormaps 14 and 15 by commenting this out
1337         //if (top > 13)
1338         //      top = 13;
1339         //if (bottom > 13)
1340         //      bottom = 13;
1341
1342         playercolor = top*16 + bottom;
1343
1344         if (cmd_source == src_command)
1345         {
1346                 Cvar_SetValueQuick(&cl_color, playercolor);
1347                 return;
1348         }
1349
1350         if (cls.protocol == PROTOCOL_QUAKEWORLD)
1351                 return;
1352
1353         if (host_client->edict && prog->funcoffsets.SV_ChangeTeam)
1354         {
1355                 Con_DPrint("Calling SV_ChangeTeam\n");
1356                 prog->globals.server->time = sv.time;
1357                 prog->globals.generic[OFS_PARM0] = playercolor;
1358                 prog->globals.server->self = PRVM_EDICT_TO_PROG(host_client->edict);
1359                 PRVM_ExecuteProgram(prog->funcoffsets.SV_ChangeTeam, "QC function SV_ChangeTeam is missing");
1360         }
1361         else
1362         {
1363                 prvm_eval_t *val;
1364                 if (host_client->edict)
1365                 {
1366                         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.clientcolors)))
1367                                 val->_float = playercolor;
1368                         host_client->edict->fields.server->team = bottom + 1;
1369                 }
1370                 host_client->colors = playercolor;
1371                 if (host_client->old_colors != host_client->colors)
1372                 {
1373                         host_client->old_colors = host_client->colors;
1374                         // send notification to all clients
1375                         MSG_WriteByte (&sv.reliable_datagram, svc_updatecolors);
1376                         MSG_WriteByte (&sv.reliable_datagram, host_client - svs.clients);
1377                         MSG_WriteByte (&sv.reliable_datagram, host_client->colors);
1378                 }
1379         }
1380 }
1381
1382 void Host_Color_f(void)
1383 {
1384         int             top, bottom;
1385
1386         if (Cmd_Argc() == 1)
1387         {
1388                 Con_Printf("\"color\" is \"%i %i\"\n", cl_color.integer >> 4, cl_color.integer & 15);
1389                 Con_Print("color <0-15> [0-15]\n");
1390                 return;
1391         }
1392
1393         if (Cmd_Argc() == 2)
1394                 top = bottom = atoi(Cmd_Argv(1));
1395         else
1396         {
1397                 top = atoi(Cmd_Argv(1));
1398                 bottom = atoi(Cmd_Argv(2));
1399         }
1400         Host_Color(top, bottom);
1401 }
1402
1403 void Host_TopColor_f(void)
1404 {
1405         if (Cmd_Argc() == 1)
1406         {
1407                 Con_Printf("\"topcolor\" is \"%i\"\n", (cl_color.integer >> 4) & 15);
1408                 Con_Print("topcolor <0-15>\n");
1409                 return;
1410         }
1411
1412         Host_Color(atoi(Cmd_Argv(1)), -1);
1413 }
1414
1415 void Host_BottomColor_f(void)
1416 {
1417         if (Cmd_Argc() == 1)
1418         {
1419                 Con_Printf("\"bottomcolor\" is \"%i\"\n", cl_color.integer & 15);
1420                 Con_Print("bottomcolor <0-15>\n");
1421                 return;
1422         }
1423
1424         Host_Color(-1, atoi(Cmd_Argv(1)));
1425 }
1426
1427 cvar_t cl_rate = {CVAR_SAVE | CVAR_NQUSERINFOHACK, "_cl_rate", "20000", "internal storage cvar for current rate (changed by rate command)"};
1428 void Host_Rate_f(void)
1429 {
1430         int rate;
1431
1432         if (Cmd_Argc() != 2)
1433         {
1434                 Con_Printf("\"rate\" is \"%i\"\n", cl_rate.integer);
1435                 Con_Print("rate <bytespersecond>\n");
1436                 return;
1437         }
1438
1439         rate = atoi(Cmd_Argv(1));
1440
1441         if (cmd_source == src_command)
1442         {
1443                 Cvar_SetValue ("_cl_rate", max(NET_MINRATE, rate));
1444                 return;
1445         }
1446
1447         host_client->rate = rate;
1448 }
1449
1450 /*
1451 ==================
1452 Host_Kill_f
1453 ==================
1454 */
1455 void Host_Kill_f (void)
1456 {
1457         if (host_client->edict->fields.server->health <= 0)
1458         {
1459                 SV_ClientPrint("Can't suicide -- already dead!\n");
1460                 return;
1461         }
1462
1463         prog->globals.server->time = sv.time;
1464         prog->globals.server->self = PRVM_EDICT_TO_PROG(host_client->edict);
1465         PRVM_ExecuteProgram (prog->globals.server->ClientKill, "QC function ClientKill is missing");
1466 }
1467
1468
1469 /*
1470 ==================
1471 Host_Pause_f
1472 ==================
1473 */
1474 void Host_Pause_f (void)
1475 {
1476         if (!pausable.integer)
1477                 SV_ClientPrint("Pause not allowed.\n");
1478         else
1479         {
1480                 sv.paused ^= 1;
1481                 SV_BroadcastPrintf("%s %spaused the game\n", host_client->name, sv.paused ? "" : "un");
1482                 // send notification to all clients
1483                 MSG_WriteByte(&sv.reliable_datagram, svc_setpause);
1484                 MSG_WriteByte(&sv.reliable_datagram, sv.paused);
1485         }
1486 }
1487
1488 /*
1489 ======================
1490 Host_PModel_f
1491 LordHavoc: only supported for Nehahra, I personally think this is dumb, but Mindcrime won't listen.
1492 LordHavoc: correction, Mindcrime will be removing pmodel in the future, but it's still stuck here for compatibility.
1493 ======================
1494 */
1495 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)"};
1496 static void Host_PModel_f (void)
1497 {
1498         int i;
1499         prvm_eval_t *val;
1500
1501         if (Cmd_Argc () == 1)
1502         {
1503                 Con_Printf("\"pmodel\" is \"%s\"\n", cl_pmodel.string);
1504                 return;
1505         }
1506         i = atoi(Cmd_Argv(1));
1507
1508         if (cmd_source == src_command)
1509         {
1510                 if (cl_pmodel.integer == i)
1511                         return;
1512                 Cvar_SetValue ("_cl_pmodel", i);
1513                 if (cls.state == ca_connected)
1514                         Cmd_ForwardToServer ();
1515                 return;
1516         }
1517
1518         if (host_client->edict && (val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.pmodel)))
1519                 val->_float = i;
1520 }
1521
1522 //===========================================================================
1523
1524
1525 /*
1526 ==================
1527 Host_PreSpawn_f
1528 ==================
1529 */
1530 void Host_PreSpawn_f (void)
1531 {
1532         if (host_client->spawned)
1533         {
1534                 Con_Print("prespawn not valid -- already spawned\n");
1535                 return;
1536         }
1537
1538         if (host_client->netconnection)
1539         {
1540                 SZ_Write (&host_client->netconnection->message, sv.signon.data, sv.signon.cursize);
1541                 MSG_WriteByte (&host_client->netconnection->message, svc_signonnum);
1542                 MSG_WriteByte (&host_client->netconnection->message, 2);
1543                 host_client->sendsignon = 0;            // enable unlimited sends again
1544         }
1545
1546         // reset the name change timer because the client will send name soon
1547         host_client->nametime = 0;
1548 }
1549
1550 /*
1551 ==================
1552 Host_Spawn_f
1553 ==================
1554 */
1555 void Host_Spawn_f (void)
1556 {
1557         int i;
1558         client_t *client;
1559         int stats[MAX_CL_STATS];
1560
1561         if (host_client->spawned)
1562         {
1563                 Con_Print("Spawn not valid -- already spawned\n");
1564                 return;
1565         }
1566
1567         // reset name change timer again because they might want to change name
1568         // again in the first 5 seconds after connecting
1569         host_client->nametime = 0;
1570
1571         // LordHavoc: moved this above the QC calls at FrikaC's request
1572         // LordHavoc: commented this out
1573         //if (host_client->netconnection)
1574         //      SZ_Clear (&host_client->netconnection->message);
1575
1576         // run the entrance script
1577         if (sv.loadgame)
1578         {
1579                 // loaded games are fully initialized already
1580                 if (prog->funcoffsets.RestoreGame)
1581                 {
1582                         Con_DPrint("Calling RestoreGame\n");
1583                         prog->globals.server->time = sv.time;
1584                         prog->globals.server->self = PRVM_EDICT_TO_PROG(host_client->edict);
1585                         PRVM_ExecuteProgram(prog->funcoffsets.RestoreGame, "QC function RestoreGame is missing");
1586                 }
1587         }
1588         else
1589         {
1590                 //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);
1591
1592                 // copy spawn parms out of the client_t
1593                 for (i=0 ; i< NUM_SPAWN_PARMS ; i++)
1594                         (&prog->globals.server->parm1)[i] = host_client->spawn_parms[i];
1595
1596                 // call the spawn function
1597                 host_client->clientconnectcalled = true;
1598                 prog->globals.server->time = sv.time;
1599                 prog->globals.server->self = PRVM_EDICT_TO_PROG(host_client->edict);
1600                 PRVM_ExecuteProgram (prog->globals.server->ClientConnect, "QC function ClientConnect is missing");
1601
1602                 if (cls.state == ca_dedicated)
1603                         Con_Printf("%s connected\n", host_client->name);
1604
1605                 PRVM_ExecuteProgram (prog->globals.server->PutClientInServer, "QC function PutClientInServer is missing");
1606         }
1607
1608         if (!host_client->netconnection)
1609                 return;
1610
1611         // send time of update
1612         MSG_WriteByte (&host_client->netconnection->message, svc_time);
1613         MSG_WriteFloat (&host_client->netconnection->message, sv.time);
1614
1615         // send all current names, colors, and frag counts
1616         for (i = 0, client = svs.clients;i < svs.maxclients;i++, client++)
1617         {
1618                 if (!client->active)
1619                         continue;
1620                 MSG_WriteByte (&host_client->netconnection->message, svc_updatename);
1621                 MSG_WriteByte (&host_client->netconnection->message, i);
1622                 MSG_WriteString (&host_client->netconnection->message, client->name);
1623                 MSG_WriteByte (&host_client->netconnection->message, svc_updatefrags);
1624                 MSG_WriteByte (&host_client->netconnection->message, i);
1625                 MSG_WriteShort (&host_client->netconnection->message, client->frags);
1626                 MSG_WriteByte (&host_client->netconnection->message, svc_updatecolors);
1627                 MSG_WriteByte (&host_client->netconnection->message, i);
1628                 MSG_WriteByte (&host_client->netconnection->message, client->colors);
1629         }
1630
1631         // send all current light styles
1632         for (i=0 ; i<MAX_LIGHTSTYLES ; i++)
1633         {
1634                 if (sv.lightstyles[i][0])
1635                 {
1636                         MSG_WriteByte (&host_client->netconnection->message, svc_lightstyle);
1637                         MSG_WriteByte (&host_client->netconnection->message, (char)i);
1638                         MSG_WriteString (&host_client->netconnection->message, sv.lightstyles[i]);
1639                 }
1640         }
1641
1642         // send some stats
1643         MSG_WriteByte (&host_client->netconnection->message, svc_updatestat);
1644         MSG_WriteByte (&host_client->netconnection->message, STAT_TOTALSECRETS);
1645         MSG_WriteLong (&host_client->netconnection->message, (int)prog->globals.server->total_secrets);
1646
1647         MSG_WriteByte (&host_client->netconnection->message, svc_updatestat);
1648         MSG_WriteByte (&host_client->netconnection->message, STAT_TOTALMONSTERS);
1649         MSG_WriteLong (&host_client->netconnection->message, (int)prog->globals.server->total_monsters);
1650
1651         MSG_WriteByte (&host_client->netconnection->message, svc_updatestat);
1652         MSG_WriteByte (&host_client->netconnection->message, STAT_SECRETS);
1653         MSG_WriteLong (&host_client->netconnection->message, (int)prog->globals.server->found_secrets);
1654
1655         MSG_WriteByte (&host_client->netconnection->message, svc_updatestat);
1656         MSG_WriteByte (&host_client->netconnection->message, STAT_MONSTERS);
1657         MSG_WriteLong (&host_client->netconnection->message, (int)prog->globals.server->killed_monsters);
1658
1659         // send a fixangle
1660         // Never send a roll angle, because savegames can catch the server
1661         // in a state where it is expecting the client to correct the angle
1662         // and it won't happen if the game was just loaded, so you wind up
1663         // with a permanent head tilt
1664         if (sv.loadgame)
1665         {
1666                 MSG_WriteByte (&host_client->netconnection->message, svc_setangle);
1667                 MSG_WriteAngle (&host_client->netconnection->message, host_client->edict->fields.server->v_angle[0], sv.protocol);
1668                 MSG_WriteAngle (&host_client->netconnection->message, host_client->edict->fields.server->v_angle[1], sv.protocol);
1669                 MSG_WriteAngle (&host_client->netconnection->message, 0, sv.protocol);
1670         }
1671         else
1672         {
1673                 MSG_WriteByte (&host_client->netconnection->message, svc_setangle);
1674                 MSG_WriteAngle (&host_client->netconnection->message, host_client->edict->fields.server->angles[0], sv.protocol);
1675                 MSG_WriteAngle (&host_client->netconnection->message, host_client->edict->fields.server->angles[1], sv.protocol);
1676                 MSG_WriteAngle (&host_client->netconnection->message, 0, sv.protocol);
1677         }
1678
1679         SV_WriteClientdataToMessage (host_client, host_client->edict, &host_client->netconnection->message, stats);
1680
1681         MSG_WriteByte (&host_client->netconnection->message, svc_signonnum);
1682         MSG_WriteByte (&host_client->netconnection->message, 3);
1683 }
1684
1685 /*
1686 ==================
1687 Host_Begin_f
1688 ==================
1689 */
1690 void Host_Begin_f (void)
1691 {
1692         host_client->spawned = true;
1693
1694         // LordHavoc: note: this code also exists in SV_DropClient
1695         if (sv.loadgame)
1696         {
1697                 int i;
1698                 for (i = 0;i < svs.maxclients;i++)
1699                         if (svs.clients[i].active && !svs.clients[i].spawned)
1700                                 break;
1701                 if (i == svs.maxclients)
1702                 {
1703                         Con_Printf("Loaded game, everyone rejoined - unpausing\n");
1704                         sv.paused = sv.loadgame = false; // we're basically done with loading now
1705                 }
1706         }
1707 }
1708
1709 //===========================================================================
1710
1711
1712 /*
1713 ==================
1714 Host_Kick_f
1715
1716 Kicks a user off of the server
1717 ==================
1718 */
1719 void Host_Kick_f (void)
1720 {
1721         char *who;
1722         const char *message = NULL;
1723         client_t *save;
1724         int i;
1725         qboolean byNumber = false;
1726
1727         if (!sv.active)
1728                 return;
1729
1730         SV_VM_Begin();
1731         save = host_client;
1732
1733         if (Cmd_Argc() > 2 && strcmp(Cmd_Argv(1), "#") == 0)
1734         {
1735                 i = (int)(atof(Cmd_Argv(2)) - 1);
1736                 if (i < 0 || i >= svs.maxclients || !(host_client = svs.clients + i)->active)
1737                         return;
1738                 byNumber = true;
1739         }
1740         else
1741         {
1742                 for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
1743                 {
1744                         if (!host_client->active)
1745                                 continue;
1746                         if (strcasecmp(host_client->name, Cmd_Argv(1)) == 0)
1747                                 break;
1748                 }
1749         }
1750
1751         if (i < svs.maxclients)
1752         {
1753                 if (cmd_source == src_command)
1754                 {
1755                         if (cls.state == ca_dedicated)
1756                                 who = "Console";
1757                         else
1758                                 who = cl_name.string;
1759                 }
1760                 else
1761                         who = save->name;
1762
1763                 // can't kick yourself!
1764                 if (host_client == save)
1765                         return;
1766
1767                 if (Cmd_Argc() > 2)
1768                 {
1769                         message = Cmd_Args();
1770                         COM_ParseToken_Simple(&message, false, false);
1771                         if (byNumber)
1772                         {
1773                                 message++;                                                      // skip the #
1774                                 while (*message == ' ')                         // skip white space
1775                                         message++;
1776                                 message += strlen(Cmd_Argv(2)); // skip the number
1777                         }
1778                         while (*message && *message == ' ')
1779                                 message++;
1780                 }
1781                 if (message)
1782                         SV_ClientPrintf("Kicked by %s: %s\n", who, message);
1783                 else
1784                         SV_ClientPrintf("Kicked by %s\n", who);
1785                 SV_DropClient (false); // kicked
1786         }
1787
1788         host_client = save;
1789         SV_VM_End();
1790 }
1791
1792 /*
1793 ===============================================================================
1794
1795 DEBUGGING TOOLS
1796
1797 ===============================================================================
1798 */
1799
1800 /*
1801 ==================
1802 Host_Give_f
1803 ==================
1804 */
1805 void Host_Give_f (void)
1806 {
1807         const char *t;
1808         int v;
1809         prvm_eval_t *val;
1810
1811         if (!allowcheats)
1812         {
1813                 SV_ClientPrint("No cheats allowed, use sv_cheats 1 and restart level to enable.\n");
1814                 return;
1815         }
1816
1817         t = Cmd_Argv(1);
1818         v = atoi (Cmd_Argv(2));
1819
1820         switch (t[0])
1821         {
1822         case '0':
1823         case '1':
1824         case '2':
1825         case '3':
1826         case '4':
1827         case '5':
1828         case '6':
1829         case '7':
1830         case '8':
1831         case '9':
1832                 // MED 01/04/97 added hipnotic give stuff
1833                 if (gamemode == GAME_HIPNOTIC)
1834                 {
1835                         if (t[0] == '6')
1836                         {
1837                                 if (t[1] == 'a')
1838                                         host_client->edict->fields.server->items = (int)host_client->edict->fields.server->items | HIT_PROXIMITY_GUN;
1839                                 else
1840                                         host_client->edict->fields.server->items = (int)host_client->edict->fields.server->items | IT_GRENADE_LAUNCHER;
1841                         }
1842                         else if (t[0] == '9')
1843                                 host_client->edict->fields.server->items = (int)host_client->edict->fields.server->items | HIT_LASER_CANNON;
1844                         else if (t[0] == '0')
1845                                 host_client->edict->fields.server->items = (int)host_client->edict->fields.server->items | HIT_MJOLNIR;
1846                         else if (t[0] >= '2')
1847                                 host_client->edict->fields.server->items = (int)host_client->edict->fields.server->items | (IT_SHOTGUN << (t[0] - '2'));
1848                 }
1849                 else
1850                 {
1851                         if (t[0] >= '2')
1852                                 host_client->edict->fields.server->items = (int)host_client->edict->fields.server->items | (IT_SHOTGUN << (t[0] - '2'));
1853                 }
1854                 break;
1855
1856         case 's':
1857                 if (gamemode == GAME_ROGUE && (val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_shells1)))
1858                         val->_float = v;
1859
1860                 host_client->edict->fields.server->ammo_shells = v;
1861                 break;
1862         case 'n':
1863                 if (gamemode == GAME_ROGUE)
1864                 {
1865                         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_nails1)))
1866                         {
1867                                 val->_float = v;
1868                                 if (host_client->edict->fields.server->weapon <= IT_LIGHTNING)
1869                                         host_client->edict->fields.server->ammo_nails = v;
1870                         }
1871                 }
1872                 else
1873                 {
1874                         host_client->edict->fields.server->ammo_nails = v;
1875                 }
1876                 break;
1877         case 'l':
1878                 if (gamemode == GAME_ROGUE)
1879                 {
1880                         val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_lava_nails);
1881                         if (val)
1882                         {
1883                                 val->_float = v;
1884                                 if (host_client->edict->fields.server->weapon > IT_LIGHTNING)
1885                                         host_client->edict->fields.server->ammo_nails = v;
1886                         }
1887                 }
1888                 break;
1889         case 'r':
1890                 if (gamemode == GAME_ROGUE)
1891                 {
1892                         val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_rockets1);
1893                         if (val)
1894                         {
1895                                 val->_float = v;
1896                                 if (host_client->edict->fields.server->weapon <= IT_LIGHTNING)
1897                                         host_client->edict->fields.server->ammo_rockets = v;
1898                         }
1899                 }
1900                 else
1901                 {
1902                         host_client->edict->fields.server->ammo_rockets = v;
1903                 }
1904                 break;
1905         case 'm':
1906                 if (gamemode == GAME_ROGUE)
1907                 {
1908                         val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_multi_rockets);
1909                         if (val)
1910                         {
1911                                 val->_float = v;
1912                                 if (host_client->edict->fields.server->weapon > IT_LIGHTNING)
1913                                         host_client->edict->fields.server->ammo_rockets = v;
1914                         }
1915                 }
1916                 break;
1917         case 'h':
1918                 host_client->edict->fields.server->health = v;
1919                 break;
1920         case 'c':
1921                 if (gamemode == GAME_ROGUE)
1922                 {
1923                         val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_cells1);
1924                         if (val)
1925                         {
1926                                 val->_float = v;
1927                                 if (host_client->edict->fields.server->weapon <= IT_LIGHTNING)
1928                                         host_client->edict->fields.server->ammo_cells = v;
1929                         }
1930                 }
1931                 else
1932                 {
1933                         host_client->edict->fields.server->ammo_cells = v;
1934                 }
1935                 break;
1936         case 'p':
1937                 if (gamemode == GAME_ROGUE)
1938                 {
1939                         val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ammo_plasma);
1940                         if (val)
1941                         {
1942                                 val->_float = v;
1943                                 if (host_client->edict->fields.server->weapon > IT_LIGHTNING)
1944                                         host_client->edict->fields.server->ammo_cells = v;
1945                         }
1946                 }
1947                 break;
1948         }
1949 }
1950
1951 prvm_edict_t    *FindViewthing (void)
1952 {
1953         int             i;
1954         prvm_edict_t    *e;
1955
1956         for (i=0 ; i<prog->num_edicts ; i++)
1957         {
1958                 e = PRVM_EDICT_NUM(i);
1959                 if (!strcmp (PRVM_GetString(e->fields.server->classname), "viewthing"))
1960                         return e;
1961         }
1962         Con_Print("No viewthing on map\n");
1963         return NULL;
1964 }
1965
1966 /*
1967 ==================
1968 Host_Viewmodel_f
1969 ==================
1970 */
1971 void Host_Viewmodel_f (void)
1972 {
1973         prvm_edict_t    *e;
1974         dp_model_t      *m;
1975
1976         if (!sv.active)
1977                 return;
1978
1979         SV_VM_Begin();
1980         e = FindViewthing ();
1981         SV_VM_End();
1982         if (!e)
1983                 return;
1984
1985         m = Mod_ForName (Cmd_Argv(1), false, true, false);
1986         if (!m || !m->loaded || !m->Draw)
1987         {
1988                 Con_Printf("viewmodel: can't load %s\n", Cmd_Argv(1));
1989                 return;
1990         }
1991
1992         e->fields.server->frame = 0;
1993         cl.model_precache[(int)e->fields.server->modelindex] = m;
1994 }
1995
1996 /*
1997 ==================
1998 Host_Viewframe_f
1999 ==================
2000 */
2001 void Host_Viewframe_f (void)
2002 {
2003         prvm_edict_t    *e;
2004         int             f;
2005         dp_model_t      *m;
2006
2007         if (!sv.active)
2008                 return;
2009
2010         SV_VM_Begin();
2011         e = FindViewthing ();
2012         SV_VM_End();
2013         if (!e)
2014                 return;
2015         m = cl.model_precache[(int)e->fields.server->modelindex];
2016
2017         f = atoi(Cmd_Argv(1));
2018         if (f >= m->numframes)
2019                 f = m->numframes-1;
2020
2021         e->fields.server->frame = f;
2022 }
2023
2024
2025 void PrintFrameName (dp_model_t *m, int frame)
2026 {
2027         if (m->animscenes)
2028                 Con_Printf("frame %i: %s\n", frame, m->animscenes[frame].name);
2029         else
2030                 Con_Printf("frame %i\n", frame);
2031 }
2032
2033 /*
2034 ==================
2035 Host_Viewnext_f
2036 ==================
2037 */
2038 void Host_Viewnext_f (void)
2039 {
2040         prvm_edict_t    *e;
2041         dp_model_t      *m;
2042
2043         if (!sv.active)
2044                 return;
2045
2046         SV_VM_Begin();
2047         e = FindViewthing ();
2048         SV_VM_End();
2049         if (!e)
2050                 return;
2051         m = cl.model_precache[(int)e->fields.server->modelindex];
2052
2053         e->fields.server->frame = e->fields.server->frame + 1;
2054         if (e->fields.server->frame >= m->numframes)
2055                 e->fields.server->frame = m->numframes - 1;
2056
2057         PrintFrameName (m, (int)e->fields.server->frame);
2058 }
2059
2060 /*
2061 ==================
2062 Host_Viewprev_f
2063 ==================
2064 */
2065 void Host_Viewprev_f (void)
2066 {
2067         prvm_edict_t    *e;
2068         dp_model_t      *m;
2069
2070         if (!sv.active)
2071                 return;
2072
2073         SV_VM_Begin();
2074         e = FindViewthing ();
2075         SV_VM_End();
2076         if (!e)
2077                 return;
2078
2079         m = cl.model_precache[(int)e->fields.server->modelindex];
2080
2081         e->fields.server->frame = e->fields.server->frame - 1;
2082         if (e->fields.server->frame < 0)
2083                 e->fields.server->frame = 0;
2084
2085         PrintFrameName (m, (int)e->fields.server->frame);
2086 }
2087
2088 /*
2089 ===============================================================================
2090
2091 DEMO LOOP CONTROL
2092
2093 ===============================================================================
2094 */
2095
2096
2097 /*
2098 ==================
2099 Host_Startdemos_f
2100 ==================
2101 */
2102 void Host_Startdemos_f (void)
2103 {
2104         int             i, c;
2105
2106         if (cls.state == ca_dedicated || COM_CheckParm("-listen") || COM_CheckParm("-benchmark") || COM_CheckParm("-demo") || COM_CheckParm("-capturedemo"))
2107                 return;
2108
2109         c = Cmd_Argc() - 1;
2110         if (c > MAX_DEMOS)
2111         {
2112                 Con_Printf("Max %i demos in demoloop\n", MAX_DEMOS);
2113                 c = MAX_DEMOS;
2114         }
2115         Con_DPrintf("%i demo(s) in loop\n", c);
2116
2117         for (i=1 ; i<c+1 ; i++)
2118                 strlcpy (cls.demos[i-1], Cmd_Argv(i), sizeof (cls.demos[i-1]));
2119
2120         // LordHavoc: clear the remaining slots
2121         for (;i <= MAX_DEMOS;i++)
2122                 cls.demos[i-1][0] = 0;
2123
2124         if (!sv.active && cls.demonum != -1 && !cls.demoplayback)
2125         {
2126                 cls.demonum = 0;
2127                 CL_NextDemo ();
2128         }
2129         else
2130                 cls.demonum = -1;
2131 }
2132
2133
2134 /*
2135 ==================
2136 Host_Demos_f
2137
2138 Return to looping demos
2139 ==================
2140 */
2141 void Host_Demos_f (void)
2142 {
2143         if (cls.state == ca_dedicated)
2144                 return;
2145         if (cls.demonum == -1)
2146                 cls.demonum = 1;
2147         CL_Disconnect_f ();
2148         CL_NextDemo ();
2149 }
2150
2151 /*
2152 ==================
2153 Host_Stopdemo_f
2154
2155 Return to looping demos
2156 ==================
2157 */
2158 void Host_Stopdemo_f (void)
2159 {
2160         if (!cls.demoplayback)
2161                 return;
2162         CL_Disconnect ();
2163         Host_ShutdownServer ();
2164 }
2165
2166 void Host_SendCvar_f (void)
2167 {
2168         int             i;
2169         cvar_t  *c;
2170         const char *cvarname;
2171         client_t *old;
2172
2173         if(Cmd_Argc() != 2)
2174                 return;
2175         cvarname = Cmd_Argv(1);
2176         if (cls.state == ca_connected)
2177         {
2178                 c = Cvar_FindVar(cvarname);
2179                 // LordHavoc: if there is no such cvar or if it is private, send a
2180                 // reply indicating that it has no value
2181                 if(!c || (c->flags & CVAR_PRIVATE))
2182                         Cmd_ForwardStringToServer(va("sentcvar %s", cvarname));
2183                 else
2184                         Cmd_ForwardStringToServer(va("sentcvar %s \"%s\"", c->name, c->string));
2185                 return;
2186         }
2187         if(!sv.active)// || !prog->funcoffsets.SV_ParseClientCommand)
2188                 return;
2189
2190         old = host_client;
2191         if (cls.state != ca_dedicated)
2192                 i = 1;
2193         else
2194                 i = 0;
2195         for(;i<svs.maxclients;i++)
2196                 if(svs.clients[i].active && svs.clients[i].netconnection)
2197                 {
2198                         host_client = &svs.clients[i];
2199                         Host_ClientCommands("sendcvar %s\n", cvarname);
2200                 }
2201         host_client = old;
2202 }
2203
2204 static void MaxPlayers_f(void)
2205 {
2206         int n;
2207
2208         if (Cmd_Argc() != 2)
2209         {
2210                 Con_Printf("\"maxplayers\" is \"%u\"\n", svs.maxclients);
2211                 return;
2212         }
2213
2214         if (sv.active)
2215         {
2216                 Con_Print("maxplayers can not be changed while a server is running.\n");
2217                 return;
2218         }
2219
2220         n = atoi(Cmd_Argv(1));
2221         n = bound(1, n, MAX_SCOREBOARD);
2222         Con_Printf("\"maxplayers\" set to \"%u\"\n", n);
2223
2224         if (svs.clients)
2225                 Mem_Free(svs.clients);
2226         svs.maxclients = n;
2227         svs.clients = (client_t *)Mem_Alloc(sv_mempool, sizeof(client_t) * svs.maxclients);
2228         if (n == 1)
2229                 Cvar_Set ("deathmatch", "0");
2230         else
2231                 Cvar_Set ("deathmatch", "1");
2232 }
2233
2234 //=============================================================================
2235
2236 // QuakeWorld commands
2237
2238 /*
2239 =====================
2240 Host_Rcon_f
2241
2242   Send the rest of the command line over as
2243   an unconnected command.
2244 =====================
2245 */
2246 void Host_Rcon_f (void) // credit: taken from QuakeWorld
2247 {
2248         int i;
2249         lhnetaddress_t to;
2250         lhnetsocket_t *mysocket;
2251
2252         if (!rcon_password.string || !rcon_password.string[0])
2253         {
2254                 Con_Printf ("You must set rcon_password before issuing an rcon command.\n");
2255                 return;
2256         }
2257
2258         for (i = 0;rcon_password.string[i];i++)
2259         {
2260                 if (rcon_password.string[i] <= ' ')
2261                 {
2262                         Con_Printf("rcon_password is not allowed to have any whitespace.\n");
2263                         return;
2264                 }
2265         }
2266
2267         if (cls.netcon)
2268                 to = cls.netcon->peeraddress;
2269         else
2270         {
2271                 if (!rcon_address.string[0])
2272                 {
2273                         Con_Printf ("You must either be connected, or set the rcon_address cvar to issue rcon commands\n");
2274                         return;
2275                 }
2276                 LHNETADDRESS_FromString(&to, rcon_address.string, sv_netport.integer);
2277         }
2278         mysocket = NetConn_ChooseClientSocketForAddress(&to);
2279         if (mysocket)
2280         {
2281                 // simply put together the rcon packet and send it
2282                 NetConn_WriteString(mysocket, va("\377\377\377\377rcon %s %s", rcon_password.string, Cmd_Args()), &to);
2283         }
2284 }
2285
2286 /*
2287 ====================
2288 Host_User_f
2289
2290 user <name or userid>
2291
2292 Dump userdata / masterdata for a user
2293 ====================
2294 */
2295 void Host_User_f (void) // credit: taken from QuakeWorld
2296 {
2297         int             uid;
2298         int             i;
2299
2300         if (Cmd_Argc() != 2)
2301         {
2302                 Con_Printf ("Usage: user <username / userid>\n");
2303                 return;
2304         }
2305
2306         uid = atoi(Cmd_Argv(1));
2307
2308         for (i = 0;i < cl.maxclients;i++)
2309         {
2310                 if (!cl.scores[i].name[0])
2311                         continue;
2312                 if (cl.scores[i].qw_userid == uid || !strcasecmp(cl.scores[i].name, Cmd_Argv(1)))
2313                 {
2314                         InfoString_Print(cl.scores[i].qw_userinfo);
2315                         return;
2316                 }
2317         }
2318         Con_Printf ("User not in server.\n");
2319 }
2320
2321 /*
2322 ====================
2323 Host_Users_f
2324
2325 Dump userids for all current players
2326 ====================
2327 */
2328 void Host_Users_f (void) // credit: taken from QuakeWorld
2329 {
2330         int             i;
2331         int             c;
2332
2333         c = 0;
2334         Con_Printf ("userid frags name\n");
2335         Con_Printf ("------ ----- ----\n");
2336         for (i = 0;i < cl.maxclients;i++)
2337         {
2338                 if (cl.scores[i].name[0])
2339                 {
2340                         Con_Printf ("%6i %4i %s\n", cl.scores[i].qw_userid, cl.scores[i].frags, cl.scores[i].name);
2341                         c++;
2342                 }
2343         }
2344
2345         Con_Printf ("%i total users\n", c);
2346 }
2347
2348 /*
2349 ==================
2350 Host_FullServerinfo_f
2351
2352 Sent by server when serverinfo changes
2353 ==================
2354 */
2355 // TODO: shouldn't this be a cvar instead?
2356 void Host_FullServerinfo_f (void) // credit: taken from QuakeWorld
2357 {
2358         char temp[512];
2359         if (Cmd_Argc() != 2)
2360         {
2361                 Con_Printf ("usage: fullserverinfo <complete info string>\n");
2362                 return;
2363         }
2364
2365         strlcpy (cl.qw_serverinfo, Cmd_Argv(1), sizeof(cl.qw_serverinfo));
2366         InfoString_GetValue(cl.qw_serverinfo, "teamplay", temp, sizeof(temp));
2367         cl.qw_teamplay = atoi(temp);
2368 }
2369
2370 /*
2371 ==================
2372 Host_FullInfo_f
2373
2374 Allow clients to change userinfo
2375 ==================
2376 Casey was here :)
2377 */
2378 void Host_FullInfo_f (void) // credit: taken from QuakeWorld
2379 {
2380         char key[512];
2381         char value[512];
2382         char *o;
2383         const char *s;
2384
2385         if (Cmd_Argc() != 2)
2386         {
2387                 Con_Printf ("fullinfo <complete info string>\n");
2388                 return;
2389         }
2390
2391         s = Cmd_Argv(1);
2392         if (*s == '\\')
2393                 s++;
2394         while (*s)
2395         {
2396                 o = key;
2397                 while (*s && *s != '\\')
2398                         *o++ = *s++;
2399                 *o = 0;
2400
2401                 if (!*s)
2402                 {
2403                         Con_Printf ("MISSING VALUE\n");
2404                         return;
2405                 }
2406
2407                 o = value;
2408                 s++;
2409                 while (*s && *s != '\\')
2410                         *o++ = *s++;
2411                 *o = 0;
2412
2413                 if (*s)
2414                         s++;
2415
2416                 CL_SetInfo(key, value, false, false, false, false);
2417         }
2418 }
2419
2420 /*
2421 ==================
2422 CL_SetInfo_f
2423
2424 Allow clients to change userinfo
2425 ==================
2426 */
2427 void Host_SetInfo_f (void) // credit: taken from QuakeWorld
2428 {
2429         if (Cmd_Argc() == 1)
2430         {
2431                 InfoString_Print(cls.userinfo);
2432                 return;
2433         }
2434         if (Cmd_Argc() != 3)
2435         {
2436                 Con_Printf ("usage: setinfo [ <key> <value> ]\n");
2437                 return;
2438         }
2439         CL_SetInfo(Cmd_Argv(1), Cmd_Argv(2), true, false, false, false);
2440 }
2441
2442 /*
2443 ====================
2444 Host_Packet_f
2445
2446 packet <destination> <contents>
2447
2448 Contents allows \n escape character
2449 ====================
2450 */
2451 void Host_Packet_f (void) // credit: taken from QuakeWorld
2452 {
2453         char send[2048];
2454         int i, l;
2455         const char *in;
2456         char *out;
2457         lhnetaddress_t address;
2458         lhnetsocket_t *mysocket;
2459
2460         if (Cmd_Argc() != 3)
2461         {
2462                 Con_Printf ("packet <destination> <contents>\n");
2463                 return;
2464         }
2465
2466         if (!LHNETADDRESS_FromString (&address, Cmd_Argv(1), sv_netport.integer))
2467         {
2468                 Con_Printf ("Bad address\n");
2469                 return;
2470         }
2471
2472         in = Cmd_Argv(2);
2473         out = send+4;
2474         send[0] = send[1] = send[2] = send[3] = 0xff;
2475
2476         l = (int)strlen (in);
2477         for (i=0 ; i<l ; i++)
2478         {
2479                 if (out >= send + sizeof(send) - 1)
2480                         break;
2481                 if (in[i] == '\\' && in[i+1] == 'n')
2482                 {
2483                         *out++ = '\n';
2484                         i++;
2485                 }
2486                 else if (in[i] == '\\' && in[i+1] == '0')
2487                 {
2488                         *out++ = '\0';
2489                         i++;
2490                 }
2491                 else if (in[i] == '\\' && in[i+1] == 't')
2492                 {
2493                         *out++ = '\t';
2494                         i++;
2495                 }
2496                 else if (in[i] == '\\' && in[i+1] == 'r')
2497                 {
2498                         *out++ = '\r';
2499                         i++;
2500                 }
2501                 else if (in[i] == '\\' && in[i+1] == '"')
2502                 {
2503                         *out++ = '\"';
2504                         i++;
2505                 }
2506                 else
2507                         *out++ = in[i];
2508         }
2509
2510         mysocket = NetConn_ChooseClientSocketForAddress(&address);
2511         if (!mysocket)
2512                 mysocket = NetConn_ChooseServerSocketForAddress(&address);
2513         if (mysocket)
2514                 NetConn_Write(mysocket, send, out - send, &address);
2515 }
2516
2517 /*
2518 ====================
2519 Host_Pings_f
2520
2521 Send back ping and packet loss update for all current players to this player
2522 ====================
2523 */
2524 void Host_Pings_f (void)
2525 {
2526         int             i, j, ping, packetloss;
2527         char temp[128];
2528
2529         if (!host_client->netconnection)
2530                 return;
2531
2532         if (sv.protocol != PROTOCOL_QUAKEWORLD)
2533         {
2534                 MSG_WriteByte(&host_client->netconnection->message, svc_stufftext);
2535                 MSG_WriteUnterminatedString(&host_client->netconnection->message, "pingplreport");
2536         }
2537         for (i = 0;i < svs.maxclients;i++)
2538         {
2539                 packetloss = 0;
2540                 if (svs.clients[i].netconnection)
2541                         for (j = 0;j < NETGRAPH_PACKETS;j++)
2542                                 if (svs.clients[i].netconnection->incoming_unreliablesize[j] == NETGRAPH_LOSTPACKET)
2543                                         packetloss++;
2544                 packetloss = packetloss * 100 / NETGRAPH_PACKETS;
2545                 ping = (int)floor(svs.clients[i].ping*1000+0.5);
2546                 ping = bound(0, ping, 9999);
2547                 if (sv.protocol == PROTOCOL_QUAKEWORLD)
2548                 {
2549                         // send qw_svc_updateping and qw_svc_updatepl messages
2550                         MSG_WriteByte(&host_client->netconnection->message, qw_svc_updateping);
2551                         MSG_WriteShort(&host_client->netconnection->message, ping);
2552                         MSG_WriteByte(&host_client->netconnection->message, qw_svc_updatepl);
2553                         MSG_WriteByte(&host_client->netconnection->message, packetloss);
2554                 }
2555                 else
2556                 {
2557                         // write the string into the packet as multiple unterminated strings to avoid needing a local buffer
2558                         dpsnprintf(temp, sizeof(temp), " %d %d", ping, packetloss);
2559                         MSG_WriteUnterminatedString(&host_client->netconnection->message, temp);
2560                 }
2561         }
2562         if (sv.protocol != PROTOCOL_QUAKEWORLD)
2563                 MSG_WriteString(&host_client->netconnection->message, "\n");
2564 }
2565
2566 void Host_PingPLReport_f(void)
2567 {
2568         int i;
2569         int l = Cmd_Argc();
2570         if (l > cl.maxclients)
2571                 l = cl.maxclients;
2572         for (i = 0;i < l;i++)
2573         {
2574                 cl.scores[i].qw_ping = atoi(Cmd_Argv(1+i*2));
2575                 cl.scores[i].qw_packetloss = atoi(Cmd_Argv(1+i*2+1));
2576         }
2577 }
2578
2579 //=============================================================================
2580
2581 /*
2582 ==================
2583 Host_InitCommands
2584 ==================
2585 */
2586 void Host_InitCommands (void)
2587 {
2588         dpsnprintf(cls.userinfo, sizeof(cls.userinfo), "\\name\\player\\team\\none\\topcolor\\0\\bottomcolor\\0\\rate\\10000\\msg\\1\\noaim\\1\\*ver\\dp");
2589
2590         Cmd_AddCommand_WithClientCommand ("status", Host_Status_f, Host_Status_f, "print server status information");
2591         Cmd_AddCommand ("quit", Host_Quit_f, "quit the game");
2592         if (gamemode == GAME_NEHAHRA)
2593         {
2594                 Cmd_AddCommand_WithClientCommand ("max", NULL, Host_God_f, "god mode (invulnerability)");
2595                 Cmd_AddCommand_WithClientCommand ("monster", NULL, Host_Notarget_f, "notarget mode (monsters do not see you)");
2596                 Cmd_AddCommand_WithClientCommand ("scrag", NULL, Host_Fly_f, "fly mode (flight)");
2597                 Cmd_AddCommand_WithClientCommand ("wraith", NULL, Host_Noclip_f, "noclip mode (flight without collisions, move through walls)");
2598                 Cmd_AddCommand_WithClientCommand ("gimme", NULL, Host_Give_f, "alter inventory");
2599         }
2600         else
2601         {
2602                 Cmd_AddCommand_WithClientCommand ("god", NULL, Host_God_f, "god mode (invulnerability)");
2603                 Cmd_AddCommand_WithClientCommand ("notarget", NULL, Host_Notarget_f, "notarget mode (monsters do not see you)");
2604                 Cmd_AddCommand_WithClientCommand ("fly", NULL, Host_Fly_f, "fly mode (flight)");
2605                 Cmd_AddCommand_WithClientCommand ("noclip", NULL, Host_Noclip_f, "noclip mode (flight without collisions, move through walls)");
2606                 Cmd_AddCommand_WithClientCommand ("give", NULL, Host_Give_f, "alter inventory");
2607         }
2608         Cmd_AddCommand ("map", Host_Map_f, "kick everyone off the server and start a new level");
2609         Cmd_AddCommand ("restart", Host_Restart_f, "restart current level");
2610         Cmd_AddCommand ("changelevel", Host_Changelevel_f, "change to another level, bringing along all connected clients");
2611         Cmd_AddCommand ("connect", Host_Connect_f, "connect to a server by IP address or hostname");
2612         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)");
2613         Cmd_AddCommand ("version", Host_Version_f, "print engine version");
2614         Cmd_AddCommand_WithClientCommand ("say", Host_Say_f, Host_Say_f, "send a chat message to everyone on the server");
2615         Cmd_AddCommand_WithClientCommand ("say_team", Host_Say_Team_f, Host_Say_Team_f, "send a chat message to your team on the server");
2616         Cmd_AddCommand_WithClientCommand ("tell", Host_Tell_f, Host_Tell_f, "send a chat message to only one person on the server");
2617         Cmd_AddCommand_WithClientCommand ("kill", NULL, Host_Kill_f, "die instantly");
2618         Cmd_AddCommand_WithClientCommand ("pause", NULL, Host_Pause_f, "pause the game (if the server allows pausing)");
2619         Cmd_AddCommand ("kick", Host_Kick_f, "kick a player off the server by number or name");
2620         Cmd_AddCommand_WithClientCommand ("ping", Host_Ping_f, Host_Ping_f, "print ping times of all players on the server");
2621         Cmd_AddCommand ("load", Host_Loadgame_f, "load a saved game file");
2622         Cmd_AddCommand ("save", Host_Savegame_f, "save the game to a file");
2623
2624         Cmd_AddCommand ("startdemos", Host_Startdemos_f, "start playing back the selected demos sequentially (used at end of startup script)");
2625         Cmd_AddCommand ("demos", Host_Demos_f, "restart looping demos defined by the last startdemos command");
2626         Cmd_AddCommand ("stopdemo", Host_Stopdemo_f, "stop playing or recording demo (like stop command) and return to looping demos");
2627
2628         Cmd_AddCommand ("viewmodel", Host_Viewmodel_f, "change model of viewthing entity in current level");
2629         Cmd_AddCommand ("viewframe", Host_Viewframe_f, "change animation frame of viewthing entity in current level");
2630         Cmd_AddCommand ("viewnext", Host_Viewnext_f, "change to next animation frame of viewthing entity in current level");
2631         Cmd_AddCommand ("viewprev", Host_Viewprev_f, "change to previous animation frame of viewthing entity in current level");
2632
2633         Cvar_RegisterVariable (&cl_name);
2634         Cmd_AddCommand_WithClientCommand ("name", Host_Name_f, Host_Name_f, "change your player name");
2635         Cvar_RegisterVariable (&cl_color);
2636         Cmd_AddCommand_WithClientCommand ("color", Host_Color_f, Host_Color_f, "change your player shirt and pants colors");
2637         Cvar_RegisterVariable (&cl_rate);
2638         Cmd_AddCommand_WithClientCommand ("rate", Host_Rate_f, Host_Rate_f, "change your network connection speed");
2639         if (gamemode == GAME_NEHAHRA)
2640         {
2641                 Cvar_RegisterVariable (&cl_pmodel);
2642                 Cmd_AddCommand_WithClientCommand ("pmodel", Host_PModel_f, Host_PModel_f, "change your player model choice (Nehahra specific)");
2643         }
2644
2645         // BLACK: This isnt game specific anymore (it was GAME_NEXUIZ at first)
2646         Cvar_RegisterVariable (&cl_playermodel);
2647         Cmd_AddCommand_WithClientCommand ("playermodel", Host_Playermodel_f, Host_Playermodel_f, "change your player model");
2648         Cvar_RegisterVariable (&cl_playerskin);
2649         Cmd_AddCommand_WithClientCommand ("playerskin", Host_Playerskin_f, Host_Playerskin_f, "change your player skin number");
2650
2651         Cmd_AddCommand_WithClientCommand ("prespawn", NULL, Host_PreSpawn_f, "signon 1 (client acknowledges that server information has been received)");
2652         Cmd_AddCommand_WithClientCommand ("spawn", NULL, Host_Spawn_f, "signon 2 (client has sent player information, and is asking server to send scoreboard rankings)");
2653         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)");
2654         Cmd_AddCommand ("maxplayers", MaxPlayers_f, "sets limit on how many players (or bots) may be connected to the server at once");
2655
2656         Cmd_AddCommand ("sendcvar", Host_SendCvar_f, "sends the value of a cvar to the server as a sentcvar command, for use by QuakeC");
2657
2658         Cvar_RegisterVariable (&rcon_password);
2659         Cvar_RegisterVariable (&rcon_address);
2660         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)");
2661         Cmd_AddCommand ("user", Host_User_f, "prints additional information about a player number or name on the scoreboard");
2662         Cmd_AddCommand ("users", Host_Users_f, "prints additional information about all players on the scoreboard");
2663         Cmd_AddCommand ("fullserverinfo", Host_FullServerinfo_f, "internal use only, sent by server to client to update client's local copy of serverinfo string");
2664         Cmd_AddCommand ("fullinfo", Host_FullInfo_f, "allows client to modify their userinfo");
2665         Cmd_AddCommand ("setinfo", Host_SetInfo_f, "modifies your userinfo");
2666         Cmd_AddCommand ("packet", Host_Packet_f, "send a packet to the specified address:port containing a text string");
2667         Cmd_AddCommand ("topcolor", Host_TopColor_f, "QW command to set top color without changing bottom color");
2668         Cmd_AddCommand ("bottomcolor", Host_BottomColor_f, "QW command to set bottom color without changing top color");
2669
2670         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)");
2671         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)");
2672
2673         Cmd_AddCommand ("fixtrans", Image_FixTransparentPixels_f, "change alpha-zero pixels in an image file to sensible values, and write out a new TGA (warning: SLOW)");
2674         Cvar_RegisterVariable (&r_fixtrans_auto);
2675
2676         Cvar_RegisterVariable (&team);
2677         Cvar_RegisterVariable (&skin);
2678         Cvar_RegisterVariable (&noaim);
2679
2680         Cvar_RegisterVariable(&sv_cheats);
2681         Cvar_RegisterVariable(&sv_adminnick);
2682         Cvar_RegisterVariable(&sv_status_privacy);
2683 }
2684
2685 void Host_NoOperation_f(void)
2686 {
2687 }