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