qcsrc/server/gamecommand.qc

   1 // =====================================================
   2 //  Server side game commands code, reworked by Samual
   3 //  Last updated: November 8th, 2011
   4 // =====================================================
   5
   6 #define GC_REQUEST_COMMAND 1
   7 #define GC_REQUEST_USAGE 2
   8
   9 float RadarMap_Make(float argc);
  10
  11 string GotoMap(string m);
  12
  13 void race_deleteTime(string map, float pos);
  14
  15 #define SHUFFLETEAMS_MAX_PLAYERS 255
  16 #define SHUFFLETEAMS_MAX_TEAMS 4
  17 float shuffleteams_players[SHUFFLETEAMS_MAX_PLAYERS]; // maximum of 255 player slots
  18 float shuffleteams_teams[SHUFFLETEAMS_MAX_TEAMS]; // maximum of 4 teams
  19
  20
  21 // ============================
  22 //  Misc. Supporting Functions
  23 // ============================
  24
  25 //  used by GameCommand_make_mapinfo()
  26 void make_mapinfo_Think()
  27 {
  28         if(MapInfo_FilterGametype(MAPINFO_TYPE_ALL, 0, 0, 0, 1))
  29         {
  30                 print("Done rebuiling mapinfos.\n");
  31                 MapInfo_FilterGametype(MapInfo_CurrentGametype(), MapInfo_CurrentFeatures(), MapInfo_RequiredFlags(), MapInfo_ForbiddenFlags(), 0);
  32                 remove(self);
  33         }
  34         else
  35         {
  36                 self.think = make_mapinfo_Think;
  37                 self.nextthink = time;
  38         }
  39 }
  40
  41 //  used by GameCommand_extendmatchtime() and GameCommand_reducematchtime()
  42 void changematchtime(float delta, float mi, float ma)
  43 {
  44         float cur;
  45         float new;
  46         float lim;
  47
  48         if(delta == 0)
  49                 return;
  50         if(autocvar_timelimit < 0)
  51                 return;
  52
  53         if(mi <= 10)
  54                 mi = 10; // at least ten sec in the future
  55         cur = time - game_starttime;
  56         if(cur > 0)
  57                 mi += cur; // from current time!
  58
  59         lim = autocvar_timelimit * 60;
  60
  61         if(delta > 0)
  62         {
  63                 if(lim == 0)
  64                         return; // cannot increase any further
  65                 else if(lim < ma)
  66                         new = min(ma, lim + delta);
  67                 else // already above maximum: FAIL
  68                         return;
  69         }
  70         else
  71         {
  72                 if(lim == 0) // infinite: try reducing to max, if we are allowed to
  73                         new = max(mi, ma);
  74                 else if(lim > mi) // above minimum: decrease
  75                         new = max(mi, lim + delta);
  76                 else // already below minimum: FAIL
  77                         return;
  78         }
  79
  80         cvar_set("timelimit", ftos(new / 60));
  81 }
  82
  83 //  used by GameCommand_modelbug() // TODO: is this even needed?
  84 float g_clientmodel_genericsendentity (entity to, float sf);
  85 void modelbug_make_svqc();
  86 void modelbug_make_csqc()
  87 {
  88         Net_LinkEntity(self, TRUE, 0, g_clientmodel_genericsendentity);
  89         self.think = modelbug_make_svqc;
  90         self.nextthink = time + 1;
  91         setorigin(self, self.origin - '0 0 8');
  92 }
  93 void modelbug_make_svqc()
  94 {
  95         self.SendEntity = func_null;
  96         self.think = modelbug_make_csqc;
  97         self.nextthink = time + 1;
  98         setorigin(self, self.origin + '0 0 8');
  99 }
 100 void modelbug()
 101 {
 102         entity e;
 103         e = spawn();
 104         setorigin(e, nextent(world).origin);
 105         precache_model("models_portal.md3");
 106         setmodel(e, "models/portal.md3");
 107         e.think = modelbug_make_svqc;
 108         e.nextthink = time + 1;
 109 }
 110
 111
 112 // =======================
 113 //  Command Sub-Functions
 114 // =======================
 115
 116 void GameCommand_adminmsg(float request, float argc)
 117 {
 118         switch(request)
 119         {
 120                 case GC_REQUEST_COMMAND:
 121                 {
 122                         entity client;
 123                         float entno = stof(argv(1));
 124                         float n, i;
 125                         string s;
 126
 127                         if(argc >= 3 && argc <= 4) {
 128                                 if((entno < 0) | (entno > maxclients)) {
 129                                         print("Player ", argv(1), " doesn't exist\n");
 130                                         return;
 131                                 }
 132                                 n = 0;
 133                                 for(i = (entno ? entno : 1); i <= (entno ? entno : maxclients); ++i)
 134                                 {
 135                                         client = edict_num(i);
 136                                         if(client.flags & FL_CLIENT)
 137                                         {
 138                                                 if(argc == 4)
 139                                                 {
 140                                                         // make the string console safe
 141                                                         s = argv(2);
 142                                                         s = strreplace("\n", "", s);
 143                                                         s = strreplace("\\", "\\\\", s);
 144                                                         s = strreplace("$", "$$", s);
 145                                                         s = strreplace("\"", "\\\"", s);
 146                                                         stuffcmd(client, sprintf("\ninfobar %f \"%s\"\n", stof(argv(3)), s));
 147                                                 }
 148                                                 else
 149                                                 {
 150                                                         centerprint(client, strcat("^3", admin_name(), ":\n\n^7", argv(2)));
 151                                                         sprint(client, strcat("\{1}\{13}^3", admin_name(), "^7: ", argv(2), "\n"));
 152                                                 }
 153                                                 dprint("Message sent to ", client.netname, "\n");
 154                                                 ++n;
 155                                         }
 156                                 }
 157                                 if(!n) { print(strcat("Client (", argv(1) ,") not found.\n")); }
 158                                 return;
 159                         }
 160                 }
 161
 162                 default:
 163                         print("Incorrect parameters for ^2adminmsg^7\n");
 164                 case GC_REQUEST_USAGE:
 165                 {
 166                         print("\nUsage:^3 sv_cmd adminmsg clientnumber \"message\" [infobartime]\n");
 167                         print("  If infobartime is provided, the message will be sent to infobar.\n");
 168                         print("  Otherwise, it will just be sent as a centerprint message.\n");
 169                         print("Examples: adminmsg 4 \"this infomessage will last for ten seconds\" 10\n");
 170                         print("          adminmsg 2 \"this message will be a centerprint\"\n");
 171                         return;
 172                 }
 173         }
 174 }
 175
 176 void GameCommand_allready(float request)
 177 {
 178         switch(request)
 179         {
 180                 case GC_REQUEST_COMMAND:
 181                 {
 182                         ReadyRestart();
 183                         return;
 184                 }
 185
 186                 default:
 187                 case GC_REQUEST_USAGE:
 188                 {
 189                         print("\nUsage:^3 sv_cmd allready\n");
 190                         print("  No arguments required.\n");
 191                         return;
 192                 }
 193         }
 194 }
 195
 196 void GameCommand_allspec(float request, float argc)
 197 {
 198         switch(request)
 199         {
 200                 case GC_REQUEST_COMMAND:
 201                 {
 202                         entity client;
 203                         string reason = argv(1);
 204                         float i;
 205
 206                         FOR_EACH_PLAYER(client)
 207                         {
 208                                 self = client;
 209                                 PutObserverInServer();
 210                                 ++i;
 211                         }
 212                         if(i) { bprint(strcat("Successfully forced all (", ftos(i), ") players to spectate", (reason ? strcat(" for reason: '", reason, "'") : ""), ".\n")); }
 213                         else { print("No players found to spectate.\n"); }
 214                         return;
 215                 }
 216
 217                 default:
 218                 case GC_REQUEST_USAGE:
 219                 {
 220                         print("\nUsage:^3 sv_cmd allspec [reason]\n");
 221                         print("  Where 'reason' is an optional argument for explanation of allspec command.\n");
 222                         print("See also: ^2moveplayer, shuffleteams^7\n");
 223                         return;
 224                 }
 225         }
 226 }
 227
 228 void GameCommand_anticheat(float request, float argc)
 229 {
 230         switch(request)
 231         {
 232                 case GC_REQUEST_COMMAND:
 233                 {
 234                         entity client;
 235                         float entno = stof(argv(1));
 236
 237                         if((entno < 1) | (entno > maxclients)) {
 238                                 print("Player ", argv(1), " doesn't exist\n");
 239                                 return;
 240                         }
 241                         client = edict_num(entno);
 242                         if(clienttype(client) != CLIENTTYPE_REAL || clienttype(client) != CLIENTTYPE_BOT) {
 243                                 print("Player ", client.netname, " is not active\n");
 244                                 return;
 245                         }
 246                         self = client;
 247                         anticheat_report();
 248                         return;
 249                 }
 250
 251                 default:
 252                         print("Incorrect parameters for ^2anticheat^7\n");
 253                 case GC_REQUEST_USAGE:
 254                 {
 255                         print("\nUsage:^3 sv_cmd anticheat clientnumber\n");
 256                         print("  where 'clientnumber' is player entity number.\n");
 257                         return;
 258                 }
 259         }
 260 }
 261
 262 void GameCommand_bbox(float request)
 263 {
 264         switch(request)
 265         {
 266                 case GC_REQUEST_COMMAND:
 267                 {
 268                         print("Original size: ", ftos(world.absmin_x), " ", ftos(world.absmin_y), " ", ftos(world.absmin_z));
 269                         print(" ", ftos(world.absmax_x), " ", ftos(world.absmax_y), " ", ftos(world.absmax_z), "\n");
 270                         print("Currently set size: ", ftos(world.mins_x), " ", ftos(world.mins_y), " ", ftos(world.mins_z));
 271                         print(" ", ftos(world.maxs_x), " ", ftos(world.maxs_y), " ", ftos(world.maxs_z), "\n");
 272                         print("Solid bounding box size:");
 273
 274                         tracebox('1 0 0' * world.absmin_x,
 275                                                         '0 1 0' * world.absmin_y + '0 0 1' * world.absmin_z,
 276                                                         '0 1 0' * world.absmax_y + '0 0 1' * world.absmax_z,
 277                                                         '1 0 0' * world.absmax_x,
 278                                         MOVE_WORLDONLY,
 279                                         world);
 280                         if(trace_startsolid)
 281                                 print(" ", ftos(world.absmin_x));
 282                         else
 283                                 print(" ", ftos(trace_endpos_x));
 284
 285                         tracebox('0 1 0' * world.absmin_y,
 286                                                         '1 0 0' * world.absmin_x + '0 0 1' * world.absmin_z,
 287                                                         '1 0 0' * world.absmax_x + '0 0 1' * world.absmax_z,
 288                                                         '0 1 0' * world.absmax_y,
 289                                         MOVE_WORLDONLY,
 290                                         world);
 291                         if(trace_startsolid)
 292                                 print(" ", ftos(world.absmin_y));
 293                         else
 294                                 print(" ", ftos(trace_endpos_y));
 295
 296                         tracebox('0 0 1' * world.absmin_z,
 297                                                         '1 0 0' * world.absmin_x + '0 1 0' * world.absmin_y,
 298                                                         '1 0 0' * world.absmax_x + '0 1 0' * world.absmax_y,
 299                                                         '0 0 1' * world.absmax_z,
 300                                         MOVE_WORLDONLY,
 301                                         world);
 302                         if(trace_startsolid)
 303                                 print(" ", ftos(world.absmin_z));
 304                         else
 305                                 print(" ", ftos(trace_endpos_z));
 306
 307                         tracebox('1 0 0' * world.absmax_x,
 308                                                         '0 1 0' * world.absmin_y + '0 0 1' * world.absmin_z,
 309                                                         '0 1 0' * world.absmax_y + '0 0 1' * world.absmax_z,
 310                                                         '1 0 0' * world.absmin_x,
 311                                         MOVE_WORLDONLY,
 312                                         world);
 313                         if(trace_startsolid)
 314                                 print(" ", ftos(world.absmax_x));
 315                         else
 316                                 print(" ", ftos(trace_endpos_x));
 317
 318                         tracebox('0 1 0' * world.absmax_y,
 319                                                         '1 0 0' * world.absmin_x + '0 0 1' * world.absmin_z,
 320                                                         '1 0 0' * world.absmax_x + '0 0 1' * world.absmax_z,
 321                                                         '0 1 0' * world.absmin_y,
 322                                         MOVE_WORLDONLY,
 323                                         world);
 324                         if(trace_startsolid)
 325                                 print(" ", ftos(world.absmax_y));
 326                         else
 327                                 print(" ", ftos(trace_endpos_y));
 328
 329                         tracebox('0 0 1' * world.absmax_z,
 330                                                         '1 0 0' * world.absmin_x + '0 1 0' * world.absmin_y,
 331                                                         '1 0 0' * world.absmax_x + '0 1 0' * world.absmax_y,
 332                                                         '0 0 1' * world.absmin_z,
 333                                         MOVE_WORLDONLY,
 334                                         world);
 335                         if(trace_startsolid)
 336                                 print(" ", ftos(world.absmax_z));
 337                         else
 338                                 print(" ", ftos(trace_endpos_z));
 339
 340                         print("\n");
 341                         return;
 342                 }
 343
 344                 default:
 345                 case GC_REQUEST_USAGE:
 346                 {
 347                         print("\nUsage:^3 sv_cmd bbox\n");
 348                         print("  No arguments required.\n");
 349                         print("See also: ^2gettaginfo^7\n");
 350                         return;
 351                 }
 352         }
 353 }
 354
 355 void GameCommand_bot_cmd(float request, float argc) // what a mess... old old code.
 356 {
 357         switch(request)
 358         {
 359                 case GC_REQUEST_COMMAND:
 360                 {
 361                         entity bot;
 362
 363                         if(argv(1) == "reset")
 364                         {
 365                                 bot_resetqueues();
 366                                 return;
 367                         }
 368                         else if(argv(1) == "load" && argc == 3)
 369                         {
 370                                 float fh, i;
 371                                 string s;
 372                                 fh = fopen(argv(2), FILE_READ);
 373                                 if(fh < 0)
 374                                 {
 375                                         print("cannot open the file\n");
 376                                         return;
 377                                 }
 378
 379                                 i = 0;
 380                                 while((s = fgets(fh)))
 381                                 {
 382                                         argc = tokenize_console(s);
 383
 384                                         if(argc >= 3 && argv(0) == "sv_cmd" && argv(1) == "bot_cmd")
 385                                         {
 386                                                 if(argv(2) == "reset")
 387                                                 {
 388                                                         bot_resetqueues();
 389                                                 }
 390                                                 else if(argv(2) == "setbots")
 391                                                 {
 392                                                         cvar_settemp("minplayers", "0");
 393                                                         cvar_settemp("bot_number", argv(3));
 394                                                         if(!bot_fixcount())
 395                                                                 print("Sorry, could not set requested bot count\n");
 396                                                 }
 397                                                 else
 398                                                 {
 399                                                         // let's start at token 2 so we can skip sv_cmd bot_cmd
 400                                                         bot = find_bot_by_number(stof(argv(2)));
 401                                                         if(bot == world)
 402                                                                 bot = find_bot_by_name(argv(2));
 403                                                         if(bot)
 404                                                                 bot_queuecommand(bot, strcat(argv(3), " ", argv(4)));
 405                                                 }
 406                                         }
 407                                         else
 408                                                 localcmd(strcat(s, "\n"));
 409
 410                                         ++i;
 411                                 }
 412                                 print(ftos(i), " commands read\n");
 413                                 fclose(fh);
 414                                 return;
 415                         }
 416                         else if(argv(1) == "help")
 417                         {
 418                                 if(argv(2))
 419                                         bot_cmdhelp(argv(2));
 420                                 else
 421                                         bot_list_commands();
 422                                 return;
 423                         }
 424                         else if(argc >= 3) // this comes last
 425                         {
 426                                 bot = find_bot_by_number(stof(argv(1)));
 427                                 if(bot == world)
 428                                         bot = find_bot_by_name(argv(1));
 429                                 if(bot)
 430                                 {
 431                                         print(strcat("Command '", strcat(argv(2), " ", argv(3)), "' sent to bot ", bot.netname, "\n"));
 432                                         bot_queuecommand(bot, strcat(argv(2), " ", argv(3)));
 433                                         return;
 434                                 }
 435                                 else
 436                                         print(strcat("Error: Can't find bot with the name or id '", argv(1),"' - Did you mistype the command?\n")); // don't return so that usage is shown
 437                         }
 438                 }
 439
 440                 default:
 441                         print("Incorrect parameters for ^2bot_cmd^7\n");
 442                 case GC_REQUEST_USAGE:
 443                 {
 444                         print("\nUsage:^3 sv_cmd bot_cmd client command [argument]\n");
 445                         print("  'client' can be either the name or entity id of the bot\n");
 446                         print("  For full list of commands, see bot_cmd help [command].\n");
 447                         print("Examples: bot_cmd <id> cc \"say something\"\n");
 448                         print("          bot_cmd <id> presskey jump\n");
 449                         return;
 450                 }
 451         }
 452 }
 453
 454 void GameCommand_cointoss(float request, float argc)
 455 {
 456         switch(request)
 457         {
 458                 case GC_REQUEST_COMMAND:
 459                 {
 460                         entity client;
 461                         string result1 = (argv(2) ? strcat("^7", argv(1), "^3!\n") : "^1HEADS^3!\n");
 462                         string result2 = (argv(2) ? strcat("^7", argv(2), "^3!\n") : "^4TAILS^3!\n");
 463                         string choice = ((random() > 0.5) ? result1 : result2);
 464
 465                         FOR_EACH_CLIENT(client)
 466                                 centerprint(client, strcat("^3Throwing coin... Result: ", choice));
 467                         bprint(strcat("^3Throwing coin... Result: ", choice));
 468                         return;
 469                 }
 470
 471                 default:
 472                 case GC_REQUEST_USAGE:
 473                 {
 474                         print("\nUsage:^3 sv_cmd cointoss [result1 result2]\n");
 475                         print("  Where 'result1' and 'result2' are user created options.\n");
 476                         return;
 477                 }
 478         }
 479 }
 480
 481 void GameCommand_cvar_changes(float request)
 482 {
 483         switch(request)
 484         {
 485                 case GC_REQUEST_COMMAND:
 486                 {
 487                         print(cvar_changes);
 488                         return;
 489                 }
 490
 491                 default:
 492                 case GC_REQUEST_USAGE:
 493                 {
 494                         print("\nUsage:^3 sv_cmd cvar_changes\n");
 495                         print("  No arguments required.\n");
 496                         print("See also: ^2cvar_purechanges^7\n");
 497                         return;
 498                 }
 499         }
 500 }
 501
 502 void GameCommand_cvar_purechanges(float request)
 503 {
 504         switch(request)
 505         {
 506                 case GC_REQUEST_COMMAND:
 507                 {
 508                         print(cvar_purechanges);
 509                         return;
 510                 }
 511
 512                 default:
 513                 case GC_REQUEST_USAGE:
 514                 {
 515                         print("\nUsage:^3 sv_cmd cvar_purechanges\n");
 516                         print("  No arguments required.\n");
 517                         print("See also: ^2cvar_changes^7\n");
 518                         return;
 519                 }
 520         }
 521 }
 522
 523 void GameCommand_database(float request, float argc)
 524 {
 525         switch(request)
 526         {
 527                 case GC_REQUEST_COMMAND:
 528                 {
 529                         if(argc == 3)
 530                         {
 531                                 if(argv(1) == "save")
 532                                 {
 533                                         db_save(ServerProgsDB, argv(2));
 534                                         print(strcat("Copied serverprogs database to '", argv(2), "' in the data directory.\n"));
 535                                         return;
 536                                 }
 537                                 else if(argv(1) == "dump")
 538                                 {
 539                                         db_dump(ServerProgsDB, argv(2));
 540                                         print("DB dumped.\n"); // wtf does this do?
 541                                         return;
 542                                 }
 543                                 else if(argv(1) == "load")
 544                                 {
 545                                         db_close(ServerProgsDB);
 546                                         ServerProgsDB = db_load(argv(2));
 547                                         print(strcat("Loaded '", argv(2), "' as new serverprogs database.\n"));
 548                                         return;
 549                                 }
 550                         }
 551                 }
 552
 553                 default:
 554                         print("Incorrect parameters for ^2database^7\n");
 555                 case GC_REQUEST_USAGE:
 556                 {
 557                         print("\nUsage:^3 sv_cmd database action filename\n");
 558                         print("  Where 'action' is the command to complete,\n");
 559                         print("  and 'filename' is what it acts upon.\n");
 560                         print("  Full list of commands here: \"save, dump, load.\"\n");
 561                         return;
 562                 }
 563         }
 564 }
 565
 566 void GameCommand_defer_clear(float request, float argc)
 567 {
 568         switch(request)
 569         {
 570                 case GC_REQUEST_COMMAND:
 571                 {
 572                         entity client;
 573                         float entno = stof(argv(1));
 574
 575                         if(argc == 2)
 576                         {
 577                                 // player_id is out of range
 578                                 if((entno < 1) | (entno > maxclients)) {
 579                                         print("Player ", argv(1), " doesn't exist\n");
 580                                         return;
 581                                 }
 582                                 client = edict_num(entno);
 583                                 if not(client.flags & FL_CLIENT) {
 584                                         print("Player ", argv(1), " doesn't exist\n");
 585                                         return;
 586                                 }
 587                                 if(clienttype(client) == CLIENTTYPE_BOT) {
 588                                         print("Player ", argv(1), " (", client.netname, ") is a bot\n");
 589                                         return;
 590                                 }
 591                                 stuffcmd(client, "defer clear\n");
 592                                 print("defer clear stuffed to ", argv(1), " (", client.netname, ")\n");
 593                                 return;
 594                         }
 595                 }
 596
 597                 default:
 598                         print("Incorrect parameters for ^2defer_clear^7\n");
 599                 case GC_REQUEST_USAGE:
 600                 {
 601                         print("\nUsage:^3 sv_cmd defer_clear clientnumber\n");
 602                         print("  where 'clientnumber' is player entity number.\n");
 603                         print("See also: ^2defer_clear_all^7\n");
 604                         return;
 605                 }
 606         }
 607 }
 608
 609 void GameCommand_defer_clear_all(float request)
 610 {
 611         switch(request)
 612         {
 613                 case GC_REQUEST_COMMAND:
 614                 {
 615                         entity client;
 616                         float i;
 617                         float argc;
 618
 619                         FOR_EACH_CLIENT(client)
 620                         {
 621                                 argc = tokenize_console(strcat("defer_clear ", ftos(num_for_edict(client))));
 622                                 GameCommand_defer_clear(GC_REQUEST_COMMAND, argc);
 623                                 ++i;
 624                         }
 625                         if(i) { bprint(strcat("Successfully stuffed defer clear to all clients (", ftos(i), ")\n")); } // should a message be added if no players were found?
 626                         return;
 627                 }
 628
 629                 default:
 630                 case GC_REQUEST_USAGE:
 631                 {
 632                         print("\nUsage:^3 sv_cmd defer_clear_all\n");
 633                         print("  No arguments required.\n");
 634                         print("See also: ^2defer_clear^7\n");
 635                         return;
 636                 }
 637         }
 638 }
 639
 640 void GameCommand_delrec(float request, float argc) // UNTESTED // perhaps merge later with records and printstats and such?
 641 {
 642         switch(request)
 643         {
 644                 case GC_REQUEST_COMMAND:
 645                 {
 646                         if(argv(1))
 647                         {
 648                                 if(argv(2))
 649                                         race_deleteTime(argv(2), stof(argv(1)));
 650                                 else
 651                                         race_deleteTime(GetMapname(), stof(argv(1)));
 652                                 return;
 653                         }
 654                 }
 655
 656                 default:
 657                         print("Incorrect parameters for ^2delrec^7\n");
 658                 case GC_REQUEST_USAGE:
 659                 {
 660                         print("\nUsage:^3 sv_cmd delrec ranking [map]\n");
 661                         print("  'ranking' is which ranking level to clear up to, \n");
 662                         print("  it will clear all records up to nth place.\n");
 663                         print("  if 'map' is not provided it will use current map.\n");
 664                         return;
 665                 }
 666         }
 667 }
 668
 669 void GameCommand_effectindexdump(float request)
 670 {
 671         switch(request)
 672         {
 673                 case GC_REQUEST_COMMAND:
 674                 {
 675                         float fh, d;
 676                         string s;
 677
 678                         d = db_create();
 679                         print("begin of effects list\n");
 680                         db_put(d, "TE_GUNSHOT", "1"); print("effect TE_GUNSHOT is ", ftos(particleeffectnum("TE_GUNSHOT")), "\n");
 681                         db_put(d, "TE_GUNSHOTQUAD", "1"); print("effect TE_GUNSHOTQUAD is ", ftos(particleeffectnum("TE_GUNSHOTQUAD")), "\n");
 682                         db_put(d, "TE_SPIKE", "1"); print("effect TE_SPIKE is ", ftos(particleeffectnum("TE_SPIKE")), "\n");
 683                         db_put(d, "TE_SPIKEQUAD", "1"); print("effect TE_SPIKEQUAD is ", ftos(particleeffectnum("TE_SPIKEQUAD")), "\n");
 684                         db_put(d, "TE_SUPERSPIKE", "1"); print("effect TE_SUPERSPIKE is ", ftos(particleeffectnum("TE_SUPERSPIKE")), "\n");
 685                         db_put(d, "TE_SUPERSPIKEQUAD", "1"); print("effect TE_SUPERSPIKEQUAD is ", ftos(particleeffectnum("TE_SUPERSPIKEQUAD")), "\n");
 686                         db_put(d, "TE_WIZSPIKE", "1"); print("effect TE_WIZSPIKE is ", ftos(particleeffectnum("TE_WIZSPIKE")), "\n");
 687                         db_put(d, "TE_KNIGHTSPIKE", "1"); print("effect TE_KNIGHTSPIKE is ", ftos(particleeffectnum("TE_KNIGHTSPIKE")), "\n");
 688                         db_put(d, "TE_EXPLOSION", "1"); print("effect TE_EXPLOSION is ", ftos(particleeffectnum("TE_EXPLOSION")), "\n");
 689                         db_put(d, "TE_EXPLOSIONQUAD", "1"); print("effect TE_EXPLOSIONQUAD is ", ftos(particleeffectnum("TE_EXPLOSIONQUAD")), "\n");
 690                         db_put(d, "TE_TAREXPLOSION", "1"); print("effect TE_TAREXPLOSION is ", ftos(particleeffectnum("TE_TAREXPLOSION")), "\n");
 691                         db_put(d, "TE_TELEPORT", "1"); print("effect TE_TELEPORT is ", ftos(particleeffectnum("TE_TELEPORT")), "\n");
 692                         db_put(d, "TE_LAVASPLASH", "1"); print("effect TE_LAVASPLASH is ", ftos(particleeffectnum("TE_LAVASPLASH")), "\n");
 693                         db_put(d, "TE_SMALLFLASH", "1"); print("effect TE_SMALLFLASH is ", ftos(particleeffectnum("TE_SMALLFLASH")), "\n");
 694                         db_put(d, "TE_FLAMEJET", "1"); print("effect TE_FLAMEJET is ", ftos(particleeffectnum("TE_FLAMEJET")), "\n");
 695                         db_put(d, "EF_FLAME", "1"); print("effect EF_FLAME is ", ftos(particleeffectnum("EF_FLAME")), "\n");
 696                         db_put(d, "TE_BLOOD", "1"); print("effect TE_BLOOD is ", ftos(particleeffectnum("TE_BLOOD")), "\n");
 697                         db_put(d, "TE_SPARK", "1"); print("effect TE_SPARK is ", ftos(particleeffectnum("TE_SPARK")), "\n");
 698                         db_put(d, "TE_PLASMABURN", "1"); print("effect TE_PLASMABURN is ", ftos(particleeffectnum("TE_PLASMABURN")), "\n");
 699                         db_put(d, "TE_TEI_G3", "1"); print("effect TE_TEI_G3 is ", ftos(particleeffectnum("TE_TEI_G3")), "\n");
 700                         db_put(d, "TE_TEI_SMOKE", "1"); print("effect TE_TEI_SMOKE is ", ftos(particleeffectnum("TE_TEI_SMOKE")), "\n");
 701                         db_put(d, "TE_TEI_BIGEXPLOSION", "1"); print("effect TE_TEI_BIGEXPLOSION is ", ftos(particleeffectnum("TE_TEI_BIGEXPLOSION")), "\n");
 702                         db_put(d, "TE_TEI_PLASMAHIT", "1"); print("effect TE_TEI_PLASMAHIT is ", ftos(particleeffectnum("TE_TEI_PLASMAHIT")), "\n");
 703                         db_put(d, "EF_STARDUST", "1"); print("effect EF_STARDUST is ", ftos(particleeffectnum("EF_STARDUST")), "\n");
 704                         db_put(d, "TR_ROCKET", "1"); print("effect TR_ROCKET is ", ftos(particleeffectnum("TR_ROCKET")), "\n");
 705                         db_put(d, "TR_GRENADE", "1"); print("effect TR_GRENADE is ", ftos(particleeffectnum("TR_GRENADE")), "\n");
 706                         db_put(d, "TR_BLOOD", "1"); print("effect TR_BLOOD is ", ftos(particleeffectnum("TR_BLOOD")), "\n");
 707                         db_put(d, "TR_WIZSPIKE", "1"); print("effect TR_WIZSPIKE is ", ftos(particleeffectnum("TR_WIZSPIKE")), "\n");
 708                         db_put(d, "TR_SLIGHTBLOOD", "1"); print("effect TR_SLIGHTBLOOD is ", ftos(particleeffectnum("TR_SLIGHTBLOOD")), "\n");
 709                         db_put(d, "TR_KNIGHTSPIKE", "1"); print("effect TR_KNIGHTSPIKE is ", ftos(particleeffectnum("TR_KNIGHTSPIKE")), "\n");
 710                         db_put(d, "TR_VORESPIKE", "1"); print("effect TR_VORESPIKE is ", ftos(particleeffectnum("TR_VORESPIKE")), "\n");
 711                         db_put(d, "TR_NEHAHRASMOKE", "1"); print("effect TR_NEHAHRASMOKE is ", ftos(particleeffectnum("TR_NEHAHRASMOKE")), "\n");
 712                         db_put(d, "TR_NEXUIZPLASMA", "1"); print("effect TR_NEXUIZPLASMA is ", ftos(particleeffectnum("TR_NEXUIZPLASMA")), "\n");
 713                         db_put(d, "TR_GLOWTRAIL", "1"); print("effect TR_GLOWTRAIL is ", ftos(particleeffectnum("TR_GLOWTRAIL")), "\n");
 714                         db_put(d, "TR_SEEKER", "1"); print("effect TR_SEEKER is ", ftos(particleeffectnum("TR_SEEKER")), "\n");
 715                         db_put(d, "SVC_PARTICLE", "1"); print("effect SVC_PARTICLE is ", ftos(particleeffectnum("SVC_PARTICLE")), "\n");
 716
 717                         fh = fopen("effectinfo.txt", FILE_READ);
 718                         while((s = fgets(fh)))
 719                         {
 720                                 tokenize_console(s);
 721                                 if(argv(0) == "effect")
 722                                 {
 723                                         if(db_get(d, argv(1)) != "1")
 724                                         {
 725                                                 if(particleeffectnum(argv(1)) >= 0)
 726                                                         print("effect ", argv(1), " is ", ftos(particleeffectnum(argv(1))), "\n");
 727                                                 db_put(d, argv(1), "1");
 728                                         }
 729                                 }
 730                         }
 731                         print("end of effects list\n");
 732
 733                         db_close(d);
 734                         return;
 735                 }
 736
 737                 default:
 738                 case GC_REQUEST_USAGE:
 739                 {
 740                         print("\nUsage:^3 sv_cmd effectindexdump\n");
 741                         print("  No arguments required.\n");
 742                         return;
 743                 }
 744         }
 745 }
 746
 747 void GameCommand_extendmatchtime(float request)
 748 {
 749         switch(request)
 750         {
 751                 case GC_REQUEST_COMMAND:
 752                 {
 753                         changematchtime(autocvar_timelimit_increment* 60, autocvar_timelimit_min*60, autocvar_timelimit_max*60);
 754                         return;
 755                 }
 756
 757                 default:
 758                 case GC_REQUEST_USAGE:
 759                 {
 760                         print("\nUsage:^3 sv_cmd extendmatchtime\n");
 761                         print("  No arguments required.\n");
 762                         print("See also: ^2reducematchtime^7\n");
 763                         return;
 764                 }
 765         }
 766 }
 767
 768 void GameCommand_find(float request, float argc)
 769 {
 770         switch(request)
 771         {
 772                 case GC_REQUEST_COMMAND:
 773                 {
 774                         entity client;
 775
 776                         for(client = world; (client = find(client, classname, argv(1))); )
 777                                 print(etos(client), "\n");
 778
 779                         return;
 780                 }
 781
 782                 default:
 783                         print("Incorrect parameters for ^2find^7\n");
 784                 case GC_REQUEST_USAGE:
 785                 {
 786                         print("\nUsage:^3 sv_cmd find classname\n");
 787                         print("  Where 'classname' is the classname to search for.\n");
 788                         return;
 789                 }
 790         }
 791 }
 792
 793 void GameCommand_gametype(float request, float argc)
 794 {
 795         switch(request)
 796         {
 797                 case GC_REQUEST_COMMAND:
 798                 {
 799                         string s = argv(1);
 800                         float t = MapInfo_Type_FromString(s), tsave = MapInfo_CurrentGametype();
 801
 802                         if(t)
 803                         {
 804                                 MapInfo_SwitchGameType(t);
 805                                 MapInfo_FilterGametype(MapInfo_CurrentGametype(), MapInfo_CurrentFeatures(), MapInfo_RequiredFlags(), MapInfo_ForbiddenFlags(), 0);
 806                                 if(MapInfo_count > 0)
 807                                         bprint("Game type successfully switched to ", s, "\n");
 808                                 else
 809                                 {
 810                                         bprint("Cannot use this game type: no map for it found\n");
 811                                         MapInfo_SwitchGameType(tsave);
 812                                         MapInfo_FilterGametype(MapInfo_CurrentGametype(), MapInfo_CurrentFeatures(), MapInfo_RequiredFlags(), MapInfo_ForbiddenFlags(), 0);
 813                                 }
 814                         }
 815                         else
 816                                 bprint("Game type switch to ", s, " failed: this type does not exist!\n");
 817                         return;
 818                 }
 819
 820                 default:
 821                         print("Incorrect parameters for ^2gametype^7\n");
 822                 case GC_REQUEST_USAGE:
 823                 {
 824                         print("\nUsage:^3 sv_cmd gametype mode\n");
 825                         print("  Where 'mode' is the gametype mode to switch to.\n");
 826                         print("See also: ^2gotomap^7\n");
 827                         return;
 828                 }
 829         }
 830 }
 831
 832 void GameCommand_gettaginfo(float request, float argc) // UNTESTED // todo: finish usage description for it (but, must first learn this shit)
 833 {
 834         switch(request)
 835         {
 836                 case GC_REQUEST_COMMAND:
 837                 {
 838                         entity tmp_entity;
 839                         float i;
 840                         vector v;
 841
 842                         if(argc >= 4)
 843                         {
 844                                 tmp_entity = spawn();
 845                                 if(argv(1) == "w")
 846                                         setmodel(tmp_entity, (nextent(world)).weaponentity.model);
 847                                 else
 848                                 {
 849                                         precache_model(argv(1));
 850                                         setmodel(tmp_entity, argv(1));
 851                                 }
 852                                 tmp_entity.frame = stof(argv(2));
 853                                 if(substring(argv(3), 0, 1) == "#")
 854                                         i = stof(substring(argv(3), 1, -1));
 855                                 else
 856                                         i = gettagindex(tmp_entity, argv(3));
 857                                 if(i)
 858                                 {
 859                                         v = gettaginfo(tmp_entity, i);
 860                                         print("model ", tmp_entity.model, " frame ", ftos(tmp_entity.frame), " tag ", gettaginfo_name);
 861                                         print(" index ", ftos(i), " parent ", ftos(gettaginfo_parent), "\n");
 862                                         print(" vector = ", ftos(v_x), " ", ftos(v_y), " ", ftos(v_z), "\n");
 863                                         print(" offset = ", ftos(gettaginfo_offset_x), " ", ftos(gettaginfo_offset_y), " ", ftos(gettaginfo_offset_z), "\n");
 864                                         print(" forward = ", ftos(gettaginfo_forward_x), " ", ftos(gettaginfo_forward_y), " ", ftos(gettaginfo_forward_z), "\n");
 865                                         print(" right = ", ftos(gettaginfo_right_x), " ", ftos(gettaginfo_right_y), " ", ftos(gettaginfo_right_z), "\n");
 866                                         print(" up = ", ftos(gettaginfo_up_x), " ", ftos(gettaginfo_up_y), " ", ftos(gettaginfo_up_z), "\n");
 867                                         if(argc >= 6)
 868                                         {
 869                                                 v_y = -v_y;
 870                                                 localcmd(strcat(argv(4), vtos(v), argv(5), "\n"));
 871                                         }
 872                                 }
 873                                 else
 874                                         print("bone not found\n");
 875
 876                                 remove(tmp_entity);
 877                                 return;
 878                         }
 879                 }
 880
 881                 default:
 882                         print("Incorrect parameters for ^2gettaginfo^7\n");
 883                 case GC_REQUEST_USAGE:
 884                 {
 885                         print("\nUsage:^3 sv_cmd gettaginfo\n");
 886                         print("  FIXME: Arguments currently unknown\n");
 887                         print("See also: ^2bbox^7\n");
 888                         return;
 889                 }
 890         }
 891 }
 892
 893 void GameCommand_gotomap(float request, float argc)
 894 {
 895         switch(request)
 896         {
 897                 case GC_REQUEST_COMMAND:
 898                 {
 899                         if(argc == 2)
 900                         {
 901                                 print(GotoMap(argv(1)), "\n");
 902                                 return;
 903                         }
 904                 }
 905
 906                 default:
 907                         print("Incorrect parameters for ^2gotomap^7\n");
 908                 case GC_REQUEST_USAGE:
 909                 {
 910                         print("\nUsage:^3 sv_cmd gotomap map\n");
 911                         print("  Where 'map' is the *.bsp file to change to.\n");
 912                         print("See also: ^2gametype^7\n");
 913                         return;
 914                 }
 915         }
 916 }
 917
 918 void GameCommand_ladder(float request)
 919 {
 920         switch(request)
 921         {
 922                 case GC_REQUEST_COMMAND:
 923                 {
 924                         print(ladder_reply);
 925                         return;
 926                 }
 927
 928                 default:
 929                 case GC_REQUEST_USAGE:
 930                 {
 931                         print("\nUsage:^3 sv_cmd ladder\n");
 932                         print("  No arguments required.\n");
 933                         return;
 934                 }
 935         }
 936 }
 937
 938 void GameCommand_lockteams(float request)
 939 {
 940         switch(request)
 941         {
 942                 case GC_REQUEST_COMMAND:
 943                 {
 944                         if(teamplay)
 945                         {
 946                                 lockteams = 1;
 947                                 bprint("^1The teams are now locked.\n");
 948                         }
 949                         else
 950                                 bprint("That command can only be used in a team-based gamemode.\n");
 951                         return;
 952                 }
 953
 954                 default:
 955                 case GC_REQUEST_USAGE:
 956                 {
 957                         print("\nUsage:^3 sv_cmd lockteams\n");
 958                         print("  No arguments required.\n");
 959                         print("See also: ^2unlockteams^7\n");
 960                         return;
 961                 }
 962         }
 963 }
 964
 965 void GameCommand_make_mapinfo(float request) // UNTESTED
 966 {
 967         switch(request)
 968         {
 969                 case GC_REQUEST_COMMAND:
 970                 {
 971                         entity tmp_entity;
 972
 973                         tmp_entity = spawn();
 974                         tmp_entity.classname = "make_mapinfo";
 975                         tmp_entity.think = make_mapinfo_Think;
 976                         tmp_entity.nextthink = time; // this sucks... todo: re-write this -- Use initializeentity later
 977                         MapInfo_Enumerate();
 978                         return;
 979                 }
 980
 981                 default:
 982                 case GC_REQUEST_USAGE:
 983                 {
 984                         print("\nUsage:^3 sv_cmd make_mapinfo\n");
 985                         print("  No arguments required.\n");
 986                         return;
 987                 }
 988         }
 989 }
 990
 991 void GameCommand_modelbug(float request) // UNTESTED // is this even needed anymore?
 992 {
 993         switch(request)
 994         {
 995                 case GC_REQUEST_COMMAND:
 996                 {
 997                         modelbug();
 998                         return;
 999                 }
1000
1001                 default:
1002                 case GC_REQUEST_USAGE:
1003                 {
1004                         print("\nUsage:^3 sv_cmd modelbug\n");
1005                         print("  No arguments required.\n");
1006                         return;
1007                 }
1008         }
1009 }
1010
1011 void GameCommand_moveplayer(float request, float argc)
1012 {
1013         switch(request)
1014         {
1015                 case GC_REQUEST_COMMAND:
1016                 {
1017                         entity client;
1018
1019                         string targets = strreplace(",", " ", argv(1));
1020                         string original_targets = strreplace(" ", ", ", targets);
1021                         string destination = argv(2);
1022                         string notify = argv(3);
1023
1024                         string successful, t;
1025
1026                         // lets see if the target(s) even actually exist.
1027                         if((targets) && (destination))
1028                         {
1029                                 for(;targets;)
1030                                 {
1031                                         t = car(targets); targets = cdr(targets);
1032
1033                                         // Check to see if the player is a valid target
1034                                         if((GetFilteredNumber(t) < 1) || (GetFilteredNumber(t) > maxclients)) // player_id is out of range
1035                                         {
1036                                                 print("Player ", ftos(GetFilteredNumber(t)), " doesn't exist (out of range)", (targets ? ", skipping to next player.\n" : ".\n"));
1037                                                 continue;
1038                                         }
1039                                         client = edict_num(GetFilteredNumber(t));
1040                                         if not(client.flags & FL_CLIENT) // player entity is not a client
1041                                         {
1042                                                 print("Player ", ftos(GetFilteredNumber(t)), " doesn't exist (not a client)", (targets ? ", skipping to next player.\n" : ".\n"));
1043                                                 continue;
1044                                         }
1045
1046                                         // Where are we putting this player?
1047                                         if(destination == "spec" || destination == "spectator")
1048                                         {
1049                                                 if(client.classname != "spectator" && client.classname != "observer")
1050                                                 {
1051                                                         self = client;
1052                                                         PutObserverInServer();
1053
1054                                                         successful = strcat(successful, (successful ? ", " : ""), client.netname);
1055                                                 }
1056                                                 else
1057                                                 {
1058                                                         print("Player ", ftos(GetFilteredNumber(t)), " (", client.netname, ") is already spectating.\n");
1059                                                 }
1060                                                 continue;
1061                                         }
1062                                         else
1063                                         {
1064                                                 if(client.classname != "spectator" && client.classname != "observer")
1065                                                 {
1066                                                         if(teamplay)
1067                                                         {
1068                                                                 // set up
1069                                                                 float team_color;
1070                                                                 float save = client.team_forced;
1071                                                                 client.team_forced = 0;
1072
1073                                                                 // find the team to move the player to
1074                                                                 team_color = ColourToNumber(destination);
1075                                                                 if(team_color == client.team) // already on the destination team
1076                                                                 {
1077                                                                         // keep the forcing undone
1078                                                                         print("Player ", ftos(GetFilteredNumber(t)), " (", client.netname, ") is already on the ", ColoredTeamName(client.team), (targets ? ", skipping to next player.\n" : ".\n"));
1079                                                                         continue;
1080                                                                 }
1081                                                                 else if(team_color == 0)  // auto team
1082                                                                 {
1083                                                                         team_color = NumberToTeamNumber(FindSmallestTeam(client, FALSE));
1084                                                                 }
1085                                                                 else
1086                                                                 {
1087                                                                         CheckAllowedTeams(client);
1088                                                                 }
1089                                                                 client.team_forced = save;
1090
1091                                                                 // Check to see if the destination team is even available
1092                                                                 switch(team_color)
1093                                                                 {
1094                                                                         case COLOR_TEAM1: if(c1 == -1) { print("Sorry, can't move player to red team if it doesn't exist.\n"); return; } break;
1095                                                                         case COLOR_TEAM2: if(c2 == -1) { print("Sorry, can't move player to blue team if it doesn't exist.\n"); return; } break;
1096                                                                         case COLOR_TEAM3: if(c3 == -1) { print("Sorry, can't move player to yellow team if it doesn't exist.\n"); return; } break;
1097                                                                         case COLOR_TEAM4: if(c4 == -1) { print("Sorry, can't move player to pink team if it doesn't exist.\n"); return; } break;
1098
1099                                                                         default: print("Sorry, can't move player here if team ", destination, " doesn't exist.\n"); return;
1100                                                                 }
1101
1102                                                                 // If so, lets continue and finally move the player
1103                                                                 client.team_forced = 0;
1104                                                                 MoveToTeam(client, team_color, 6, stof(notify));
1105                                                                 successful = strcat(successful, (successful ? ", " : ""), client.netname);
1106                                                                 print("Player ", ftos(GetFilteredNumber(t)), " (", client.netname, ") has been moved to the ", ColoredTeamName(team_color), ".\n");
1107                                                                 continue;
1108                                                         }
1109                                                         else
1110                                                         {
1111                                                                 print("Can't change teams when currently not playing a team game.\n");
1112                                                                 return;
1113                                                         }
1114                                                 }
1115                                                 else
1116                                                 {
1117                                                         print("Can't change teams if the player isn't in the game.\n"); // well technically we could, but should we allow that? :P
1118                                                         return;
1119                                                 }
1120                                         }
1121                                 }
1122
1123                                 if(successful)
1124                                         print("Successfully moved players ", successful, " to destination ", destination, ".\n");
1125                                 else
1126                                         print("No players given (", original_targets, ") are able to move.\n");
1127
1128                                 return; // still correct parameters so return to avoid usage print
1129                         }
1130                 }
1131
1132                 default:
1133                         print("Incorrect parameters for ^2moveplayer^7\n");
1134                 case GC_REQUEST_USAGE:
1135                 {
1136                         print("\nUsage:^3 sv_cmd moveplayer clientnumbers destination [notify]\n");
1137                         print("  'clientnumbers' is a list (separated by commas) of player entity ID's\n");
1138                         print("  'destination' is what to send the player to, be it team or spectating\n");
1139                         print("  Full list of destinations here: \"spec, spectator, red, blue, yellow, pink, auto.\"\n");
1140                         print("  'notify' is whether or not to send messages notifying of the move. Detail below.\n");
1141                         print("    0 (00) automove centerprint, admin message; 1 (01) automove centerprint, no admin message\n");
1142                         print("    2 (10) no centerprint, admin message; 3 (11) no centerprint, no admin message\n");
1143                         print("Examples: moveplayer 1,3,5 red 3\n");
1144                         print("          moveplayer 2 spec \n");
1145                         print("See also: ^2allspec, shuffleteams^7\n");
1146                         return;
1147                 }
1148         }
1149 }
1150
1151 void GameCommand_nospectators(float request)
1152 {
1153         switch(request)
1154         {
1155                 case GC_REQUEST_COMMAND:
1156                 {
1157                         blockSpectators = 1;
1158                         entity plr;
1159                         FOR_EACH_CLIENT(plr) //give every spectator <g_maxplayers_spectator_blocktime> seconds time to become a player
1160                         {
1161                                 if(plr.classname == "spectator" || plr.classname == "observer")
1162                                 {
1163                                         plr.spectatortime = time;
1164                                         sprint(plr, strcat("^7You have to become a player within the next ", ftos(autocvar_g_maxplayers_spectator_blocktime), " seconds, otherwise you will be kicked, because spectators aren't allowed at this time!\n"));
1165                                 }
1166                         }
1167                         bprint(strcat("^7All spectators will be automatically kicked when not joining the game after ", ftos(autocvar_g_maxplayers_spectator_blocktime), " seconds!\n"));
1168                         return;
1169                 }
1170
1171                 default:
1172                 case GC_REQUEST_USAGE:
1173                 {
1174                         print("\nUsage:^3 sv_cmd nospectators\n");
1175                         print("  No arguments required.\n");
1176                         return;
1177                 }
1178         }
1179 }
1180
1181 void GameCommand_onslaught_updatelinks(float request) // UNTESTED // should this be here? Perhaps some mutatorhook call instead....
1182 {
1183         switch(request)
1184         {
1185                 case GC_REQUEST_COMMAND:
1186                 {
1187                         onslaught_updatelinks();
1188                         print("ONS links updated\n");
1189                         return;
1190                 }
1191
1192                 default:
1193                 case GC_REQUEST_USAGE:
1194                 {
1195                         print("\nUsage:^3 sv_cmd onslaught_updatelinks\n");
1196                         print("  No arguments required.\n");
1197                         return;
1198                 }
1199         }
1200 }
1201
1202 void GameCommand_playerdemo(float request, float argc) // UNTESTED // TODO: change the if statements for sub arguments to switches
1203 {
1204         switch(request)
1205         {
1206                 case GC_REQUEST_COMMAND:
1207                 {
1208                         entity client;
1209                         float i, n, entno;
1210                         string s;
1211
1212                         if(argv(1) == "read")
1213                         {
1214                                 // TODO: Create a general command for looking this up, save a lot of space everywhere in this file
1215                                 entno = stof(argv(2));
1216                                 if((entno < 1) | (entno > maxclients)) {
1217                                         print("Player ", argv(2), " doesn't exist\n");
1218                                         return;
1219                                 }
1220                                 client = edict_num(entno);
1221                                 if(clienttype(client) != CLIENTTYPE_BOT) {
1222                                         print("Player ", client.netname, " is not a bot\n");
1223                                         return;
1224                                 }
1225                                 self = client;
1226                                 playerdemo_open_read(argv(3));
1227                                 return;
1228                         }
1229                         else if(argv(1) == "write")
1230                         {
1231                                 entno = stof(argv(2));
1232                                 if((entno < 1) | (entno > maxclients)) {
1233                                         print("Player ", argv(2), " doesn't exist\n");
1234                                         return;
1235                                 }
1236                                 client = edict_num(entno);
1237                                 self = client;
1238                                 playerdemo_open_write(argv(3));
1239                                 return;
1240                         }
1241                         else if(argv(1) == "auto_read_and_write")
1242                         {
1243                                 s = argv(2);
1244                                 n = stof(argv(3));
1245                                 cvar_set("bot_number", ftos(n));
1246                                 localcmd("wait; wait; wait\n");
1247                                 for(i = 0; i < n; ++i)
1248                                         localcmd("sv_cmd playerdemo read ", ftos(i+2), " ", s, ftos(i+1), "\n");
1249                                 localcmd("sv_cmd playerdemo write 1 ", ftos(n+1), "\n");
1250                                 return;
1251                         }
1252                         else if(argv(1) == "auto_read")
1253                         {
1254                                 s = argv(2);
1255                                 n = stof(argv(3));
1256                                 cvar_set("bot_number", ftos(n));
1257                                 localcmd("wait; wait; wait\n");
1258                                 for(i = 0; i < n; ++i)
1259                                         localcmd("sv_cmd playerdemo read ", ftos(i+2), " ", s, ftos(i+1), "\n");
1260                                 return;
1261                         }
1262                         return;
1263                 }
1264
1265                 default:
1266                         print("Incorrect parameters for ^2radarmap^7\n");
1267                 case GC_REQUEST_USAGE:
1268                 {
1269                         print("\nUsage:^3 sv_cmd \n");
1270                         print("  FIXME: Arguments currently unknown\n");
1271                         return;
1272                 }
1273         }
1274 }
1275
1276 void GameCommand_printstats(float request)
1277 {
1278         switch(request)
1279         {
1280                 case GC_REQUEST_COMMAND:
1281                 {
1282                         DumpStats(FALSE);
1283                         print("stats dumped.\n");
1284                         return;
1285                 }
1286
1287                 default:
1288                 case GC_REQUEST_USAGE:
1289                 {
1290                         print("\nUsage:^3 sv_cmd printstats\n");
1291                         print("  No arguments required.\n");
1292                         return;
1293                 }
1294         }
1295 }
1296
1297 void GameCommand_radarmap(float request, float argc)
1298 {
1299         switch(request)
1300         {
1301                 case GC_REQUEST_COMMAND:
1302                 {
1303                         if(RadarMap_Make(argc))
1304                                 return;
1305                 }
1306
1307                 default:
1308                         print("Incorrect parameters for ^2radarmap^7\n");
1309                 case GC_REQUEST_USAGE:
1310                 {
1311                         print("\nUsage:^3 sv_cmd radarmap [--force] [--loop] [--quit] [--block | --trace | --sample | --lineblock] [--sharpen N] [--res W H] [--qual Q]\n");
1312                         print("  The quality factor Q is roughly proportional to the time taken.\n");
1313                         print("  trace supports no quality factor; its result should look like --block with infinite quality factor.\n");
1314                         return;
1315                 }
1316         }
1317 }
1318
1319 void GameCommand_rankings(float request) // this is OLD.... jeez.
1320 {
1321         switch(request)
1322         {
1323                 case GC_REQUEST_COMMAND:
1324                 {
1325                         strunzone(rankings_reply);
1326                         rankings_reply = strzone(getrankings());
1327                         print(rankings_reply);
1328                         return;
1329                 }
1330
1331                 default:
1332                 case GC_REQUEST_USAGE:
1333                 {
1334                         print("\nUsage:^3 sv_cmd rankings\n");
1335                         print("  No arguments required.\n");
1336                         return;
1337                 }
1338         }
1339 }
1340
1341 void GameCommand_records(float request)
1342 {
1343         switch(request)
1344         {
1345                 case GC_REQUEST_COMMAND:
1346                 {
1347                         float i;
1348
1349                         for (i = 0; i < 10; ++i)
1350                                 print(records_reply[i]);
1351
1352                         return;
1353                 }
1354
1355                 default:
1356                 case GC_REQUEST_USAGE:
1357                 {
1358                         print("\nUsage:^3 sv_cmd records\n");
1359                         print("  No arguments required.\n");
1360                         return;
1361                 }
1362         }
1363 }
1364
1365 void GameCommand_reducematchtime(float request)
1366 {
1367         switch(request)
1368         {
1369                 case GC_REQUEST_COMMAND:
1370                 {
1371                         changematchtime(autocvar_timelimit_decrement*-60, autocvar_timelimit_min*60, autocvar_timelimit_max*60);
1372                         return;
1373                 }
1374
1375                 default:
1376                 case GC_REQUEST_USAGE:
1377                 {
1378                         print("\nUsage:^3 sv_cmd reducematchtime\n");
1379                         print("  No arguments required.\n");
1380                         print("See also: ^2extendmatchtime^7\n");
1381                         return;
1382                 }
1383         }
1384 }
1385
1386 void GameCommand_setbots(float request, float argc)
1387 {
1388         switch(request)
1389         {
1390                 case GC_REQUEST_COMMAND:
1391                 {
1392                         if(argc >= 3 && argv(1) == "setbots")
1393                         {
1394                                 cvar_settemp("minplayers", "0");
1395                                 cvar_settemp("bot_number", argv(2));
1396                                 bot_fixcount();
1397                                 return;
1398                         }
1399                 }
1400
1401                 default:
1402                 case GC_REQUEST_USAGE:
1403                 {
1404                         print("\nUsage:^3 sv_cmd setbots botnumber\n");
1405                         print("  Where 'botnumber' is the amount of bots to set bot_number cvar to.\n");
1406                         print("See also: ^2bot_cmd^7\n");
1407                         return;
1408                 }
1409         }
1410 }
1411
1412 void GameCommand_shuffleteams(float request)
1413 {
1414         switch(request)
1415         {
1416                 case GC_REQUEST_COMMAND:
1417                 {
1418                         if(teamplay)
1419                         {
1420                                 entity tmp_player;
1421                                 float i, x, z, t_teams, t_players, random_number, team_color;
1422
1423                                 // count the total amount of players and total amount of teams
1424                                 FOR_EACH_PLAYER(tmp_player)
1425                                 {
1426                                         CheckAllowedTeams(tmp_player);
1427
1428                                         if(c1 >= 0) t_teams = max(1, t_teams);
1429                                         if(c2 >= 0) t_teams = max(2, t_teams);
1430                                         if(c3 >= 0) t_teams = max(3, t_teams);
1431                                         if(c4 >= 0) t_teams = max(4, t_teams);
1432
1433                                         ++t_players;
1434                                 }
1435
1436                                 // build a list of the players in a random order
1437                                 FOR_EACH_PLAYER(tmp_player)
1438                                 {
1439                                         for(;;)
1440                                         {
1441                                                 random_number = bound(1, floor(random() * maxclients) + 1, maxclients);
1442
1443                                                 if(shuffleteams_players[random_number])
1444                                                 {
1445                                                         continue; // a player is already assigned to this slot
1446                                                 }
1447                                                 else
1448                                                 {
1449                                                         shuffleteams_players[random_number] = num_for_edict(tmp_player);
1450                                                         break;
1451                                                 }
1452                                         }
1453                                 }
1454
1455                                 // finally, from the list made earlier, re-join the players in different order.
1456                                 for(i = 1; i <= t_teams; ++i)
1457                                 {
1458                                         // find out how many players to assign to this team
1459                                         x = (t_players / t_teams);
1460                                         x = ((i == 1) ? ceil(x) : floor(x));
1461
1462                                         team_color = NumberToTeamNumber(i);
1463
1464                                         // sort through the random list of players made earlier
1465                                         for(z = 1; z <= maxclients; ++z)
1466                                         {
1467                                                 if(shuffleteams_teams[i] >= x)
1468                                                         break; // move on to next team
1469
1470                                                 if not(shuffleteams_players[z])
1471                                                         continue; // not a player, move on to next random slot
1472
1473                                                 self = edict_num(shuffleteams_players[z]); // TODO: add sanity checks for this entity to make sure it's okay and not some error.
1474                                                 if(self.team != team_color)
1475                                                 {
1476                                                         MoveToTeam(self, team_color, 6, 0);
1477                                                         shuffleteams_players[z] = 0;
1478                                                         shuffleteams_teams[i] = shuffleteams_teams[i] + 1;
1479                                                 }
1480                                         }
1481                                 }
1482
1483                                 print("Successfully shuffled around all the players in the game.\n");
1484
1485                                 // clear the buffers now
1486                                 for (i=0; i<SHUFFLETEAMS_MAX_PLAYERS; ++i)
1487                                         shuffleteams_players[i] = 0;
1488
1489                                 for (i=0; i<SHUFFLETEAMS_MAX_TEAMS; ++i)
1490                                         shuffleteams_teams[i] = 0;
1491                         }
1492                         else
1493                         {
1494                                 print("Can't shuffle teams when currently not playing a team game.\n");
1495                         }
1496
1497                         return;
1498                 }
1499
1500                 default:
1501                 case GC_REQUEST_USAGE:
1502                 {
1503                         print("\nUsage:^3 sv_cmd shuffleteams\n");
1504                         print("  No arguments required.\n");
1505                         print("See also: ^2moveplayer, allspec^7\n");
1506                         return;
1507                 }
1508         }
1509 }
1510
1511 void GameCommand_stuffto(float request, float argc)
1512 {
1513         // This... is a fairly dangerous and powerful command... - It allows any arguments to be sent to a client via rcon.
1514         // Because of this, it is disabled by default and must be enabled by the server owner when doing compilation. That way,
1515         // we can be certain they understand the risks of it... So to enable, compile server with -DSTUFFTO_ENABLED argument.
1516
1517         #ifdef STUFFTO_ENABLED
1518         switch(request)
1519         {
1520                 case GC_REQUEST_COMMAND:
1521                 {
1522                         entity client;
1523                         float entno;
1524
1525                         if(argc == 3)
1526                         {
1527                                 entno = stof(argv(1));
1528                                 client = world;
1529                                 if(entno <= maxclients)
1530                                         client = edict_num(entno);
1531                                 if(client.flags & FL_CLIENT)
1532                                 {
1533                                         stuffcmd(client, strcat("\n", argv(2), "\n"));
1534                                         print(strcat("Command: \"", argv(2), "\" sent to ", client.netname, " (", argv(1) ,").\n"));
1535                                 }
1536                                 else
1537                                         print(strcat("Client (", argv(1) ,") not found.\n"));
1538
1539                                 return;
1540                         }
1541                 }
1542
1543                 default:
1544                         print("Incorrect parameters for ^2stuffto^7\n");
1545                 case GC_REQUEST_USAGE:
1546                 {
1547                         print("\nUsage:^3 sv_cmd stuffto clientnumber command\n");
1548                         print("  FIXME: Arguments currently unknown\n");
1549                         return;
1550                 }
1551         }
1552         #else
1553         if(request)
1554         {
1555                 print("stuffto command is not enabled on this server.\n");
1556                 return;
1557         }
1558         #endif
1559 }
1560
1561 void GameCommand_teamstatus(float request)
1562 {
1563         switch(request)
1564         {
1565                 case GC_REQUEST_COMMAND:
1566                 {
1567                         Score_NicePrint(world);
1568                         return;
1569                 }
1570
1571                 default:
1572                 case GC_REQUEST_USAGE:
1573                 {
1574                         print("\nUsage:^3 sv_cmd teamstatus\n");
1575                         print("  No arguments required.\n");
1576                         return;
1577                 }
1578         }
1579 }
1580
1581 void GameCommand_time(float request)
1582 {
1583         switch(request)
1584         {
1585                 case GC_REQUEST_COMMAND:
1586                 {
1587                         print("time = ", ftos(time), "\n");
1588                         print("frame start = ", ftos(gettime(GETTIME_FRAMESTART)), "\n");
1589                         print("realtime = ", ftos(gettime(GETTIME_REALTIME)), "\n");
1590                         print("hires = ", ftos(gettime(GETTIME_HIRES)), "\n");
1591                         print("uptime = ", ftos(gettime(GETTIME_UPTIME)), "\n");
1592                         print("localtime = ", strftime(TRUE, "%a %b %e %H:%M:%S %Z %Y"), "\n"); // FIXME: Why is strftime broken? is engine problem, I think.
1593                         print("gmtime = ", strftime(FALSE, "%a %b %e %H:%M:%S %Z %Y"), "\n");
1594                         return;
1595                 }
1596
1597                 default:
1598                 case GC_REQUEST_USAGE:
1599                 {
1600                         print("\nUsage:^3 sv_cmd time\n");
1601                         print("  No arguments required.\n");
1602                         return;
1603                 }
1604         }
1605 }
1606
1607 void GameCommand_trace(float request, float argc)
1608 {
1609         switch(request)
1610         {
1611                 case GC_REQUEST_COMMAND:
1612                 {
1613                         // TODO: Clean up all of these variables and merge the code below to use only a few
1614                         entity e;
1615                         vector org, delta, start, end, p, q, q0, pos, vv, dv;
1616                         float i, f, safe, unsafe, dq, dqf;
1617
1618                         switch(argv(1))
1619                         {
1620                                 case "debug":
1621                                         print("TEST CASE. If this returns the runaway loop counter error, possibly everything is oaky.\n");
1622                                         for(;;)
1623                                         {
1624                                                 org = world.mins;
1625                                                 delta = world.maxs - world.mins;
1626
1627                                                 start_x = org_x + random() * delta_x;
1628                                                 start_y = org_y + random() * delta_y;
1629                                                 start_z = org_z + random() * delta_z;
1630
1631                                                 end_x = org_x + random() * delta_x;
1632                                                 end_y = org_y + random() * delta_y;
1633                                                 end_z = org_z + random() * delta_z;
1634
1635                                                 start = stov(vtos(start));
1636                                                 end = stov(vtos(end));
1637
1638                                                 tracebox(start, PL_MIN, PL_MAX, end, MOVE_NOMONSTERS, world);
1639                                                 if(!trace_startsolid)
1640                                                 {
1641                                                         p = trace_endpos;
1642                                                         tracebox(p, PL_MIN, PL_MAX, p, MOVE_NOMONSTERS, world);
1643                                                         if(trace_startsolid || trace_fraction == 1)
1644                                                         {
1645                                                                 rint(42); // do an engine breakpoint on VM_rint so you can get the trace that errnoeously returns startsolid
1646                                                                 tracebox(start, PL_MIN, PL_MAX, end, MOVE_NOMONSTERS, world);
1647                                                                 tracebox(p, PL_MIN, PL_MAX, q, MOVE_NOMONSTERS, world);
1648
1649                                                                 if(trace_startsolid)
1650                                                                 {
1651                                                                         // how much do we need to back off?
1652                                                                         safe = 1;
1653                                                                         unsafe = 0;
1654                                                                         for(;;)
1655                                                                         {
1656                                                                                 pos = p * (1 - (safe + unsafe) * 0.5) + start * ((safe + unsafe) * 0.5);
1657                                                                                 tracebox(pos, PL_MIN, PL_MAX, pos, MOVE_NOMONSTERS, world);
1658                                                                                 if(trace_startsolid)
1659                                                                                 {
1660                                                                                         if((safe + unsafe) * 0.5 == unsafe)
1661                                                                                                 break;
1662                                                                                         unsafe = (safe + unsafe) * 0.5;
1663                                                                                 }
1664                                                                                 else
1665                                                                                 {
1666                                                                                         if((safe + unsafe) * 0.5 == safe)
1667                                                                                                 break;
1668                                                                                         safe = (safe + unsafe) * 0.5;
1669                                                                                 }
1670                                                                         }
1671
1672                                                                         print("safe distance to back off: ", ftos(safe * vlen(p - start)), "qu\n");
1673                                                                         print("unsafe distance to back off: ", ftos(unsafe * vlen(p - start)), "qu\n");
1674
1675                                                                         tracebox(p, PL_MIN + '0.1 0.1 0.1', PL_MAX - '0.1 0.1 0.1', p, MOVE_NOMONSTERS, world);
1676                                                                         if(trace_startsolid)
1677                                                                                 print("trace_endpos much in solid when tracing from ", vtos(start), " to ", vtos(end), " endpos ", vtos(p), "\n");
1678                                                                         else
1679                                                                                 print("trace_endpos just in solid when tracing from ", vtos(start), " to ", vtos(end), " endpos ", vtos(p), "\n");
1680                                                                         break;
1681                                                                 }
1682
1683                                                                 q0 = p;
1684                                                                 dq = 0;
1685                                                                 dqf = 1;
1686                                                                 for(;;)
1687                                                                 {
1688                                                                         q = p + normalize(end - p) * (dq + dqf);
1689                                                                         if(q == q0)
1690                                                                                 break;
1691                                                                         tracebox(p, PL_MIN, PL_MAX, q, MOVE_NOMONSTERS, world);
1692                                                                         if(trace_startsolid)
1693                                                                                 error("THIS ONE cannot happen");
1694                                                                         if(trace_fraction > 0)
1695                                                                                 dq += dqf * trace_fraction;
1696                                                                         dqf *= 0.5;
1697                                                                         q0 = q;
1698                                                                 }
1699                                                                 if(dq > 0)
1700                                                                 {
1701                                                                         print("trace_endpos still before solid when tracing from ", vtos(start), " to ", vtos(end), " endpos ", vtos(p), "\n");
1702                                                                         print("could go ", ftos(dq), " units further to ", vtos(q), "\n");
1703                                                                         break;
1704                                                                 }
1705                                                         }
1706                                                 }
1707                                         }
1708                                         return;
1709
1710                                 case "debug2":
1711                                         e = nextent(world);
1712                                         tracebox(e.origin + '0 0 32', e.mins, e.maxs, e.origin + '0 0 -1024', MOVE_NORMAL, e);
1713                                         vv = trace_endpos;
1714                                         if(trace_fraction == 1)
1715                                         {
1716                                                 print("not above ground, aborting\n");
1717                                                 return;
1718                                         }
1719                                         f = 0;
1720                                         for(i = 0; i < 100000; ++i)
1721                                         {
1722                                                 dv = randomvec();
1723                                                 if(dv_z > 0)
1724                                                         dv = -1 * dv;
1725                                                 tracebox(vv, e.mins, e.maxs, vv + dv, MOVE_NORMAL, e);
1726                                                 if(trace_startsolid)
1727                                                         print("bug 1\n");
1728                                                 if(trace_fraction == 1)
1729                                                 if(dv_z < f)
1730                                                 {
1731                                                         print("bug 2: ", ftos(dv_x), " ", ftos(dv_y), " ", ftos(dv_z));
1732                                                         print(" (", ftos(asin(dv_z / vlen(dv)) * 180 / M_PI), " degrees)\n");
1733                                                         f = dv_z;
1734                                                 }
1735                                         }
1736                                         print("highest possible dist: ", ftos(f), "\n");
1737                                         return;
1738
1739                                 case "walk":
1740                                         if(argc == 3)
1741                                         {
1742                                                 e = nextent(world);
1743                                                 if(tracewalk(e, stov(argv(1)), e.mins, e.maxs, stov(argv(2)), MOVE_NORMAL))
1744                                                         print("can walk\n");
1745                                                 else
1746                                                         print("cannot walk\n");
1747                                                 return;
1748                                         }
1749
1750                                 case "showline":
1751                                         if(argc == 3)
1752                                         {
1753                                                 vv = stov(argv(1));
1754                                                 dv = stov(argv(2));
1755                                                 traceline(vv, dv, MOVE_NORMAL, world);
1756                                                 trailparticles(world, particleeffectnum("TR_NEXUIZPLASMA"), vv, trace_endpos);
1757                                                 trailparticles(world, particleeffectnum("TR_CRYLINKPLASMA"), trace_endpos, dv);
1758                                                 return;
1759                                         }
1760                                 // no default case, just go straight to "invalid arguments"
1761                         }
1762                 }
1763
1764                 default:
1765                 case GC_REQUEST_USAGE:
1766                 {
1767                         print("\nUsage:^3 sv_cmd trace command [arguments]\n");
1768                         print("  FIXME: Arguments currently unknown\n");
1769                         return;
1770                 }
1771         }
1772 }
1773
1774 void GameCommand_unlockteams(float request)
1775 {
1776         switch(request)
1777         {
1778                 case GC_REQUEST_COMMAND:
1779                 {
1780                         if(teamplay)
1781                         {
1782                                 lockteams = 0;
1783                                 bprint("^1The teams are now unlocked.\n");
1784                         }
1785                         else
1786                                 bprint("That command can only be used in a team-based gamemode.\n");
1787                         return;
1788                 }
1789
1790                 default:
1791                 case GC_REQUEST_USAGE:
1792                 {
1793                         print("\nUsage:^3 sv_cmd unlockteams\n");
1794                         print("  No arguments required.\n");
1795                         print("See also: ^2lockteams^7\n");
1796                         return;
1797                 }
1798         }
1799 }
1800
1801 void GameCommand_warp(float request, float argc)
1802 {
1803         switch (request)
1804         {
1805                 case GC_REQUEST_COMMAND:
1806                 {
1807                         if(autocvar_g_campaign)
1808                         {
1809                                 if(argc >= 2)
1810                                 {
1811                                         CampaignLevelWarp(stof(argv(1)));
1812                                         print("Successfully warped to campaign level ", stof(argv(1)), ".\n");
1813                                 }
1814                                 else
1815                                 {
1816                                         CampaignLevelWarp(-1);
1817                                         print("Successfully warped to next campaign level.\n");
1818                                 }
1819                         }
1820                         else
1821                                 print("Not in campaign, can't level warp\n");
1822                         return;
1823                 }
1824
1825                 default:
1826                 case GC_REQUEST_USAGE:
1827                 {
1828                         print("\nUsage:^3 sv_cmd level\n");
1829                         print("  'level' is the level to change campaign mode to.\n");
1830                         return;
1831                 }
1832         }
1833 }
1834
1835 /* use this when creating a new command, making sure to place it in alphabetical order.
1836 void GameCommand_(float request)
1837 {
1838         switch(request)
1839         {
1840                 case GC_REQUEST_COMMAND:
1841                 {
1842
1843                         return;
1844                 }
1845
1846                 default:
1847                 case GC_REQUEST_USAGE:
1848                 {
1849                         print("\nUsage:^3 sv_cmd \n");
1850                         print("  No arguments required.\n");
1851                         return;
1852                 }
1853         }
1854 }
1855 */
1856
1857
1858 // ===========================
1859 //  Macro system for commands
1860 // ===========================
1861
1862 // For now, the list has to be split up due to the suckage called fteqcc which limits macros to only 1024 characters
1863 // Do not hard code aliases for these, instead create them in commands.cfg... also: keep in alphabetical order, please ;)
1864 #define SERVER_COMMANDS_1(request,arguments) \
1865         SERVER_COMMAND("adminmsg", GameCommand_adminmsg(request, arguments), "Send an admin message to a client directly") \
1866         SERVER_COMMAND("allready", GameCommand_allready(request), "Restart the server and reset the players") \
1867         SERVER_COMMAND("allspec", GameCommand_allspec(request, arguments), "Force all players to spectate") \
1868         SERVER_COMMAND("anticheat", GameCommand_anticheat(request, arguments), "Create an anticheat report for a client") \
1869         SERVER_COMMAND("bbox", GameCommand_bbox(request), "Print detailed information about world size") \
1870         SERVER_COMMAND("bot_cmd", GameCommand_bot_cmd(request, arguments), "Control and send commands to bots") \
1871         SERVER_COMMAND("cointoss", GameCommand_cointoss(request, arguments), "Flip a virtual coin and give random result") \
1872         SERVER_COMMAND("cvar_changes", GameCommand_cvar_changes(request), "Prints a list of all changed server cvars") \
1873         /* nothing */
1874
1875 #define SERVER_COMMANDS_2(request,arguments) \
1876         SERVER_COMMAND("cvar_purechanges", GameCommand_cvar_purechanges(request), "Prints a list of all changed gameplay cvars") \
1877         SERVER_COMMAND("database", GameCommand_database(request, arguments), "Extra controls of the serverprogs database") \
1878         SERVER_COMMAND("defer_clear", GameCommand_defer_clear(request, arguments), "Clear all queued defer commands for a specific client") \
1879         SERVER_COMMAND("defer_clear_all", GameCommand_defer_clear_all(request), "Clear all queued defer commands for all clients") \
1880         SERVER_COMMAND("delrec", GameCommand_delrec(request, arguments), "Delete race time record for a map") \
1881         SERVER_COMMAND("effectindexdump", GameCommand_effectindexdump(request), "Dump list of effects from code and effectinfo.txt") \
1882         SERVER_COMMAND("extendmatchtime", GameCommand_extendmatchtime(request), "Increase the timelimit value incrementally") \
1883                 /* nothing */
1884
1885 #define SERVER_COMMANDS_3(request,arguments) \
1886         SERVER_COMMAND("find", GameCommand_find(request, arguments), "Search through entities for matching classname") \
1887         SERVER_COMMAND("gametype", GameCommand_gametype(request, arguments), "Simple command to change the active gametype") \
1888         SERVER_COMMAND("gettaginfo", GameCommand_gettaginfo(request, arguments), "Get specific information about a weapon model") \
1889         SERVER_COMMAND("gotomap", GameCommand_gotomap(request, arguments), "Simple command to switch to another map") \
1890         SERVER_COMMAND("ladder", GameCommand_ladder(request), "Get information about top players if supported") \
1891         SERVER_COMMAND("lockteams", GameCommand_lockteams(request), "Disable the ability for players to switch or enter teams") \
1892         SERVER_COMMAND("make_mapinfo", GameCommand_make_mapinfo(request), "Automatically rebuild mapinfo files") \
1893         SERVER_COMMAND("modelbug", GameCommand_modelbug(request), "TODO foobar") \
1894         /* nothing */
1895
1896 #define SERVER_COMMANDS_4(request,arguments) \
1897         SERVER_COMMAND("moveplayer", GameCommand_moveplayer(request, arguments), "Change the team/status of a player") \
1898         SERVER_COMMAND("nospectators", GameCommand_nospectators(request), "Automatically remove spectators from a match") \
1899         SERVER_COMMAND("onslaught_updatelinks", GameCommand_onslaught_updatelinks(request), "Refresh link status for onslaught") \
1900         SERVER_COMMAND("playerdemo", GameCommand_playerdemo(request, arguments), "Control the ability to save demos of players") \
1901         SERVER_COMMAND("printstats", GameCommand_printstats(request), "TODO foobar") \
1902         SERVER_COMMAND("radarmap", GameCommand_radarmap(request, arguments), "Generate a radar image of the map") \
1903         SERVER_COMMAND("rankings", GameCommand_rankings(request), "Print information about rankings") \
1904         SERVER_COMMAND("records", GameCommand_records(request), "List top 10 records for the current map") \
1905         /* nothing */
1906
1907 #define SERVER_COMMANDS_5(request,arguments) \
1908         SERVER_COMMAND("reducematchtime", GameCommand_reducematchtime(request), "Decrease the timelimit value incrementally") \
1909         SERVER_COMMAND("setbots", GameCommand_setbots(request, arguments), "Adjust how many bots are in the match") \
1910         SERVER_COMMAND("shuffleteams", GameCommand_shuffleteams(request), "Randomly move players to different teams") \
1911         SERVER_COMMAND("stuffto", GameCommand_stuffto(request, arguments), "Send a command to be executed on a client") \
1912         SERVER_COMMAND("teamstatus", GameCommand_teamstatus(request), "Show information about player and team scores") \
1913         SERVER_COMMAND("time", GameCommand_time(request), "Print different formats/readouts of time") \
1914         SERVER_COMMAND("trace", GameCommand_trace(request, arguments), "Various debugging tools with tracing") \
1915         SERVER_COMMAND("unlockteams", GameCommand_unlockteams(request), "Enable the ability for players to switch or enter teams") \
1916         /* nothing */
1917
1918 #define SERVER_COMMANDS_6(request,arguments) \
1919         SERVER_COMMAND("warp", GameCommand_warp(request, arguments), "Choose different level in campaign") \
1920         /* nothing */
1921
1922 void GameCommand_macro_help()
1923 {
1924         #define SERVER_COMMAND(name,function,description) \
1925                 { print("  ^2", name, "^7: ", description, "\n"); }
1926
1927         SERVER_COMMANDS_1(0, 0)
1928         SERVER_COMMANDS_2(0, 0)
1929         SERVER_COMMANDS_3(0, 0)
1930         SERVER_COMMANDS_4(0, 0)
1931         SERVER_COMMANDS_5(0, 0)
1932         SERVER_COMMANDS_6(0, 0)
1933         #undef SERVER_COMMAND
1934
1935         return;
1936 }
1937
1938 float GameCommand_macro_command(float argc)
1939 {
1940         #define SERVER_COMMAND(name,function,description) \
1941                 { if(name == strtolower(argv(0))) { function; return TRUE; } }
1942
1943         SERVER_COMMANDS_1(GC_REQUEST_COMMAND, argc)
1944         SERVER_COMMANDS_2(GC_REQUEST_COMMAND, argc)
1945         SERVER_COMMANDS_3(GC_REQUEST_COMMAND, argc)
1946         SERVER_COMMANDS_4(GC_REQUEST_COMMAND, argc)
1947         SERVER_COMMANDS_5(GC_REQUEST_COMMAND, argc)
1948         SERVER_COMMANDS_6(GC_REQUEST_COMMAND, argc)
1949         #undef SERVER_COMMAND
1950
1951         return FALSE;
1952 }
1953
1954 float GameCommand_macro_usage(float argc)
1955 {
1956         #define SERVER_COMMAND(name,function,description) \
1957                 { if(name == strtolower(argv(1))) { function; return TRUE; } }
1958
1959         SERVER_COMMANDS_1(GC_REQUEST_USAGE, argc)
1960         SERVER_COMMANDS_2(GC_REQUEST_USAGE, argc)
1961         SERVER_COMMANDS_3(GC_REQUEST_USAGE, argc)
1962         SERVER_COMMANDS_4(GC_REQUEST_USAGE, argc)
1963         SERVER_COMMANDS_5(GC_REQUEST_USAGE, argc)
1964         SERVER_COMMANDS_6(GC_REQUEST_USAGE, argc)
1965         #undef SERVER_COMMAND
1966
1967         return FALSE;
1968 }
1969
1970
1971 // =========================================
1972 //  Main Function Called By Engine (sv_cmd)
1973 // =========================================
1974 // If this function exists, game code handles gamecommand instead of the engine code.
1975
1976 void GameCommand(string command)
1977 {
1978         float argc = tokenize_console(command);
1979
1980         if(strtolower(argv(0)) == "help")
1981         {
1982                 if(argc == 1)
1983                 {
1984                         print("\nUsage:^3 sv_cmd COMMAND...^7, where possible commands are:\n");
1985                         GameCommand_macro_help();
1986                         GameCommand_Vote("help", world);
1987                         GameCommand_Ban("help");
1988                         GameCommand_Generic("help");
1989                         print("For help about specific commands, type sv_cmd help COMMAND\n");
1990                         return;
1991                 }
1992                 else if(GameCommand_macro_usage(argc)) // Instead of trying to call a command, we're going to see detailed information about it
1993                 {
1994                         return;
1995                 }
1996         }
1997         else if(GameCommand_Vote(command, world))
1998         {
1999                 return; // handled by server/vote.qc
2000         }
2001         else if(GameCommand_Ban(command))
2002         {
2003                 return; // handled by server/ipban.qc
2004         }
2005         else if(GameCommand_Generic(command))
2006         {
2007                 return; // handled by common/gamecommand.qc
2008         }
2009         else if(GameCommand_macro_command(argc)) // continue as usual and scan for normal commands
2010         {
2011                 return; // handled by one of the above GameCommand_* functions
2012         }
2013
2014         // nothing above caught the command, must be invalid
2015         print("Invalid command. For a list of supported commands, try sv_cmd help.\n");
2016
2017         return;
2018 }