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