qcsrc/server/gamecommand.qc

   1 string GotoMap(string m);
   2 void race_deleteTime(string map, float pos);
   3
   4 float FullTraceFraction(vector a, vector mi, vector ma, vector b)
   5 {
   6         vector c;
   7         float white, black;
   8
   9         white = 0.001;
  10         black = 0.001;
  11
  12         c = a;
  13
  14         float n, m;
  15         n = m = 0;
  16
  17         while(vlen(c - b) > 1)
  18         {
  19                 ++m;
  20
  21                 tracebox(c, mi, ma, b, MOVE_WORLDONLY, world);
  22                 ++n;
  23
  24                 if(!trace_startsolid)
  25                 {
  26                         black += vlen(trace_endpos - c);
  27                         c = trace_endpos;
  28                 }
  29
  30                 n += tracebox_inverted(c, mi, ma, b, MOVE_WORLDONLY, world);
  31
  32                 white += vlen(trace_endpos - c);
  33                 c = trace_endpos;
  34         }
  35
  36         if(n > 200)
  37                 dprint("HOLY SHIT! FullTraceFraction: ", ftos(n), " total traces, ", ftos(m), " iterations\n");
  38
  39         return white / (black + white);
  40 }
  41
  42 float RadarMapAtPoint_Trace(float x, float y, float w, float h, float zmin, float zsize, float q)
  43 {
  44         vector a, b, mi, ma;
  45
  46         mi = '0 0 0';
  47         ma = '1 0 0' * w + '0 1 0' * h;
  48         a = '1 0 0' * x + '0 1 0' * y + '0 0 1' * zmin;
  49         b = '1 0 0' * x + '0 1 0' * y + '0 0 1' * (zsize + zmin);
  50
  51         return FullTraceFraction(a, mi, ma, b);
  52 }
  53 float RadarMapAtPoint_LineBlock(float x, float y, float w, float h, float zmin, float zsize, float q)
  54 {
  55         vector o, mi, ma;
  56         float i, r;
  57         vector dz;
  58
  59         q = 256 * q - 1;
  60         // 256q-1 is the ideal sample count to map equal amount of sample values to one pixel value
  61
  62         mi = '0 0 0';
  63         dz = (zsize / q) * '0 0 1';
  64         ma = '1 0 0' * w + '0 1 0' * h + dz;
  65         o = '1 0 0' * x + '0 1 0' * y + '0 0 1' * zmin;
  66
  67         if(x < world.absmin_x - w)
  68                 return 0;
  69         if(y < world.absmin_y - h)
  70                 return 0;
  71         if(x > world.absmax_x)
  72                 return 0;
  73         if(y > world.absmax_y)
  74                 return 0;
  75
  76         r = 0;
  77         for(i = 0; i < q; ++i)
  78         {
  79                 vector v1, v2;
  80                 v1 = v2 = o + dz * i + mi;
  81                 v1_x += random() * (ma_x - mi_x);
  82                 v1_y += random() * (ma_y - mi_y);
  83                 v1_z += random() * (ma_z - mi_z);
  84                 v2_x += random() * (ma_x - mi_x);
  85                 v2_y += random() * (ma_y - mi_y);
  86                 v2_z += random() * (ma_z - mi_z);
  87                 traceline(v1, v2, MOVE_WORLDONLY, world);
  88                 if(trace_startsolid || trace_fraction < 1)
  89                         ++r;
  90         }
  91         return r / q;
  92 }
  93 float RadarMapAtPoint_Block(float x, float y, float w, float h, float zmin, float zsize, float q)
  94 {
  95         vector o, mi, ma;
  96         float i, r;
  97         vector dz;
  98
  99         q = 256 * q - 1;
 100         // 256q-1 is the ideal sample count to map equal amount of sample values to one pixel value
 101
 102         mi = '0 0 0';
 103         dz = (zsize / q) * '0 0 1';
 104         ma = '1 0 0' * w + '0 1 0' * h + dz;
 105         o = '1 0 0' * x + '0 1 0' * y + '0 0 1' * zmin;
 106
 107         if(x < world.absmin_x - w)
 108                 return 0;
 109         if(y < world.absmin_y - h)
 110                 return 0;
 111         if(x > world.absmax_x)
 112                 return 0;
 113         if(y > world.absmax_y)
 114                 return 0;
 115
 116         r = 0;
 117         for(i = 0; i < q; ++i)
 118         {
 119                 tracebox(o + dz * i, mi, ma, o + dz * i, MOVE_WORLDONLY, world);
 120                 if(trace_startsolid)
 121                         ++r;
 122         }
 123         return r / q;
 124 }
 125 float RadarMapAtPoint_Sample(float x, float y, float w, float h, float zmin, float zsize, float q)
 126 {
 127         vector a, b, mi, ma;
 128
 129         q *= 4; // choose q so it matches the regular algorithm in speed
 130
 131         q = 256 * q - 1;
 132         // 256q-1 is the ideal sample count to map equal amount of sample values to one pixel value
 133
 134         mi = '0 0 0';
 135         ma = '1 0 0' * w + '0 1 0' * h;
 136         a = '1 0 0' * x + '0 1 0' * y + '0 0 1' * zmin;
 137         b = '1 0 0' * w + '0 1 0' * h + '0 0 1' * zsize;
 138
 139         float c, i;
 140         c = 0;
 141
 142         for(i = 0; i < q; ++i)
 143         {
 144                 vector v;
 145                 v_x = a_x + random() * b_x;
 146                 v_y = a_y + random() * b_y;
 147                 v_z = a_z + random() * b_z;
 148                 traceline(v, v, MOVE_WORLDONLY, world);
 149                 if(trace_startsolid)
 150                         ++c;
 151         }
 152
 153         return c / q;
 154 }
 155
 156 // FF is contained twice, to map 256 to FF too
 157 // removes the need to bound()
 158 string doublehex = "000102030405060708090A0B0C0D0E0F101112131415161718191A1B1C1D1E1F202122232425262728292A2B2C2D2E2F303132333435363738393A3B3C3D3E3F404142434445464748494A4B4C4D4E4F505152535455565758595A5B5C5D5E5F606162636465666768696A6B6C6D6E6F707172737475767778797A7B7C7D7E7F808182838485868788898A8B8C8D8E8F909192939495969798999A9B9C9D9E9FA0A1A2A3A4A5A6A7A8A9AAABACADAEAFB0B1B2B3B4B5B6B7B8B9BABBBCBDBEBFC0C1C2C3C4C5C6C7C8C9CACBCCCDCECFD0D1D2D3D4D5D6D7D8D9DADBDCDDDEDFE0E1E2E3E4E5E6E7E8E9EAEBECEDEEEFF0F1F2F3F4F5F6F7F8F9FAFBFCFDFEFFFF";
 159
 160 float RADAR_WIDTH_MAX = 512;
 161 float RADAR_HEIGHT_MAX = 512;
 162 float sharpen_buffer[RADAR_WIDTH_MAX * 3];
 163
 164 void sharpen_set(float x, float v)
 165 {
 166         sharpen_buffer[x + 2 * RADAR_WIDTH_MAX] = v;
 167 }
 168
 169 float sharpen_getpixel(float x, float y)
 170 {
 171         if(x < 0)
 172                 return 0;
 173         if(x >= RADAR_WIDTH_MAX)
 174                 return 0;
 175         if(y < 0)
 176                 return 0;
 177         if(y > 2)
 178                 return 0;
 179         return sharpen_buffer[x + y * RADAR_WIDTH_MAX];
 180 }
 181
 182 float sharpen_get(float x, float a)
 183 {
 184         float sum;
 185         sum = sharpen_getpixel(x, 1);
 186         if(a == 0)
 187                 return sum;
 188         sum *= (8 + 1/a);
 189         sum -= sharpen_getpixel(x - 1, 0);
 190         sum -= sharpen_getpixel(x - 1, 1);
 191         sum -= sharpen_getpixel(x - 1, 2);
 192         sum -= sharpen_getpixel(x + 1, 0);
 193         sum -= sharpen_getpixel(x + 1, 1);
 194         sum -= sharpen_getpixel(x + 1, 2);
 195         sum -= sharpen_getpixel(x, 0);
 196         sum -= sharpen_getpixel(x, 2);
 197         return bound(0, sum * a, 1);
 198 }
 199
 200 void sharpen_shift(float w)
 201 {
 202         float i;
 203         for(i = 0; i < w; ++i)
 204         {
 205                 sharpen_buffer[i] = sharpen_buffer[i + RADAR_WIDTH_MAX];
 206                 sharpen_buffer[i + RADAR_WIDTH_MAX] = sharpen_buffer[i + 2 * RADAR_WIDTH_MAX];
 207                 sharpen_buffer[i + 2 * RADAR_WIDTH_MAX] = 0;
 208         }
 209 }
 210
 211 void sharpen_init(float w)
 212 {
 213         float i;
 214         for(i = 0; i < w; ++i)
 215         {
 216                 sharpen_buffer[i] = 0;
 217                 sharpen_buffer[i + RADAR_WIDTH_MAX] = 0;
 218                 sharpen_buffer[i + 2 * RADAR_WIDTH_MAX] = 0;
 219         }
 220 }
 221
 222 entity radarmapper;
 223 void RadarMap_Next()
 224 {
 225         if(radarmapper.count & 4)
 226         {
 227                 localcmd("quit\n");
 228         }
 229         else if(radarmapper.count & 2)
 230         {
 231                 localcmd(strcat("defer 1 \"sv_cmd radarmap --flags ", ftos(radarmapper.count), strcat(" --res ", ftos(radarmapper.size_x), " ", ftos(radarmapper.size_y), " --sharpen ", ftos(radarmapper.ltime), " --qual ", ftos(radarmapper.size_z)), "\"\n"));
 232                 GotoNextMap();
 233         }
 234         remove(radarmapper);
 235         radarmapper = world;
 236 }
 237
 238 // rough map entity
 239 //   cnt: current line
 240 //   size: pixel width/height
 241 //   maxs: cell width/height
 242 //   frame: counter
 243 void RadarMap_Think()
 244 {
 245         float i, x, l;
 246         string si;
 247
 248         if(self.frame == 0)
 249         {
 250                 // initialize
 251                 get_mi_min_max_texcoords(1);
 252                 self.mins = mi_picmin;
 253                 self.maxs_x = (mi_picmax_x - mi_picmin_x) / self.size_x;
 254                 self.maxs_y = (mi_picmax_y - mi_picmin_y) / self.size_y;
 255                 self.maxs_z = mi_max_z - mi_min_z;
 256                 print("Picture mins/maxs: ", ftos(self.maxs_x), " and ", ftos(self.maxs_y), " should match\n");
 257                 self.netname = strzone(strcat("gfx/", mi_shortname, "_radar.xpm"));
 258                 if(!(self.count & 1))
 259                 {
 260                         self.cnt = fopen(self.netname, FILE_READ);
 261                         if(self.cnt < 0)
 262                                 self.cnt = fopen(strcat("gfx/", mi_shortname, "_radar.tga"), FILE_READ);
 263                         if(self.cnt < 0)
 264                                 self.cnt = fopen(strcat("gfx/", mi_shortname, "_radar.png"), FILE_READ);
 265                         if(self.cnt < 0)
 266                                 self.cnt = fopen(strcat("gfx/", mi_shortname, "_radar.jpg"), FILE_READ);
 267                         if(self.cnt < 0)
 268                                 self.cnt = fopen(strcat("gfx/", mi_shortname, "_mini.tga"), FILE_READ);
 269                         if(self.cnt < 0)
 270                                 self.cnt = fopen(strcat("gfx/", mi_shortname, "_mini.png"), FILE_READ);
 271                         if(self.cnt < 0)
 272                                 self.cnt = fopen(strcat("gfx/", mi_shortname, "_mini.jpg"), FILE_READ);
 273                         if(self.cnt >= 0)
 274                         {
 275                                 fclose(self.cnt);
 276
 277                                 print(self.netname, " already exists, aborting (you may want to specify --force)\n");
 278                                 RadarMap_Next();
 279                                 return;
 280                         }
 281                 }
 282                 self.cnt = fopen(self.netname, FILE_WRITE);
 283                 if(self.cnt < 0)
 284                 {
 285                         print("Error writing ", self.netname, "\n");
 286                         remove(self);
 287                         radarmapper = world;
 288                         return;
 289                 }
 290                 print("Writing to ", self.netname, "...\n");
 291                 fputs(self.cnt, "/* XPM */\n");
 292                 fputs(self.cnt, "static char *RadarMap[] = {\n");
 293                 fputs(self.cnt, "/* columns rows colors chars-per-pixel */\n");
 294                 fputs(self.cnt, strcat("\"", ftos(self.size_x), " ", ftos(self.size_y), " 256 2\",\n"));
 295                 for(i = 0; i < 256; ++i)
 296                 {
 297                         si = substring(doublehex, i*2, 2);
 298                         fputs(self.cnt, strcat("\"", si, " c #", si, si, si, "\",\n"));
 299                 }
 300                 self.frame += 1;
 301                 self.nextthink = time;
 302                 sharpen_init(self.size_x);
 303         }
 304         else if(self.frame <= self.size_y)
 305         {
 306                 // fill the sharpen buffer with this line
 307                 sharpen_shift(self.size_x);
 308                 i = self.count & 24;
 309
 310                 switch(i)
 311                 {
 312                         case 0:
 313                         default:
 314                                 for(x = 0; x < self.size_x; ++x)
 315                                 {
 316                                         l = RadarMapAtPoint_Block(self.mins_x + x * self.maxs_x, self.mins_y + (self.size_y - self.frame) * self.maxs_y, self.maxs_x, self.maxs_y, self.mins_z, self.maxs_z, self.size_z);
 317                                         sharpen_set(x, l);
 318                                 }
 319                                 break;
 320                         case 8:
 321                                 for(x = 0; x < self.size_x; ++x)
 322                                 {
 323                                         l = RadarMapAtPoint_Trace(self.mins_x + x * self.maxs_x, self.mins_y + (self.size_y - self.frame) * self.maxs_y, self.maxs_x, self.maxs_y, self.mins_z, self.maxs_z, self.size_z);
 324                                         sharpen_set(x, l);
 325                                 }
 326                                 break;
 327                         case 16:
 328                                 for(x = 0; x < self.size_x; ++x)
 329                                 {
 330                                         l = RadarMapAtPoint_Sample(self.mins_x + x * self.maxs_x, self.mins_y + (self.size_y - self.frame) * self.maxs_y, self.maxs_x, self.maxs_y, self.mins_z, self.maxs_z, self.size_z);
 331                                         sharpen_set(x, l);
 332                                 }
 333                                 break;
 334                         case 24:
 335                                 for(x = 0; x < self.size_x; ++x)
 336                                 {
 337                                         l = RadarMapAtPoint_LineBlock(self.mins_x + x * self.maxs_x, self.mins_y + (self.size_y - self.frame) * self.maxs_y, self.maxs_x, self.maxs_y, self.mins_z, self.maxs_z, self.size_z);
 338                                         sharpen_set(x, l);
 339                                 }
 340                                 break;
 341                 }
 342
 343                 // do we have enough lines?
 344                 if(self.frame >= 2)
 345                 {
 346                         // write a pixel line
 347                         fputs(self.cnt, "\"");
 348                         for(x = 0; x < self.size_x; ++x)
 349                         {
 350                                 l = sharpen_get(x, self.ltime);
 351                                 fputs(self.cnt, substring(doublehex, 2 * floor(l * 256.0), 2));
 352                         }
 353                         if(self.frame == self.size_y)
 354                                 fputs(self.cnt, "\"\n");
 355                         else
 356                         {
 357                                 fputs(self.cnt, "\",\n");
 358                                 print(ftos(self.size_y - self.frame), " lines left\n");
 359                         }
 360                 }
 361
 362                 // is this the last line? then write back the missing line
 363                 if(self.frame == self.size_y)
 364                 {
 365                         sharpen_shift(self.size_x);
 366                         // write a pixel line
 367                         fputs(self.cnt, "\"");
 368                         for(x = 0; x < self.size_x; ++x)
 369                         {
 370                                 l = sharpen_get(x, self.ltime);
 371                                 fputs(self.cnt, substring(doublehex, 2 * floor(l * 256.0), 2));
 372                         }
 373                         if(self.frame == self.size_y)
 374                                 fputs(self.cnt, "\"\n");
 375                         else
 376                         {
 377                                 fputs(self.cnt, "\",\n");
 378                                 print(ftos(self.size_y - self.frame), " lines left\n");
 379                         }
 380                 }
 381
 382                 self.frame += 1;
 383                 self.nextthink = time;
 384         }
 385         else
 386         {
 387                 // close the file
 388                 fputs(self.cnt, "};\n");
 389                 fclose(self.cnt);
 390                 print("Finished. Please edit data/", self.netname, " with an image editing application and place it in the TGA format in the gfx folder.\n");
 391                 RadarMap_Next();
 392         }
 393 }
 394
 395 void RadarMap(float argc)
 396 {
 397         if(radarmapper)
 398                 return;
 399         float i;
 400         radarmapper = spawn();
 401         radarmapper.classname = "radarmapper";
 402         radarmapper.think = RadarMap_Think;
 403         radarmapper.nextthink = time;
 404         radarmapper.count = 8; // default to the --trace method, as it is faster now
 405         radarmapper.ltime = 1;
 406         radarmapper.size_x = 512;
 407         radarmapper.size_y = 512;
 408         radarmapper.size_z = 1;
 409
 410         for(i = 1; i < argc; ++i)
 411         {
 412                 if(argv(i) == "--force")
 413                         radarmapper.count |= 1;
 414                 else if(argv(i) == "--loop")
 415                         radarmapper.count |= 2;
 416                 else if(argv(i) == "--quit")
 417                         radarmapper.count |= 4;
 418                 else if(argv(i) == "--block")
 419                 {
 420                         radarmapper.count &~= 24;
 421                 }
 422                 else if(argv(i) == "--trace")
 423                 {
 424                         radarmapper.count &~= 24;
 425                         radarmapper.count |= 8;
 426                 }
 427                 else if(argv(i) == "--sample")
 428                 {
 429                         radarmapper.count &~= 24;
 430                         radarmapper.count |= 16;
 431                 }
 432                 else if(argv(i) == "--lineblock")
 433                 {
 434                         radarmapper.count |= 24;
 435                 }
 436                 else if(argv(i) == "--flags") // for the recursive call
 437                 {
 438                         ++i;
 439                         radarmapper.count = stof(argv(i));
 440                 }
 441                 else if(argv(i) == "--sharpen") // for the recursive call
 442                 {
 443                         ++i;
 444                         radarmapper.ltime = stof(argv(i));
 445                 }
 446                 else if(argv(i) == "--res") // resolution
 447                 {
 448                         ++i;
 449                         radarmapper.size_x = stof(argv(i));
 450                         ++i;
 451                         radarmapper.size_y = stof(argv(i));
 452                 }
 453                 else if(argv(i) == "--qual") // quality multiplier
 454                 {
 455                         ++i;
 456                         radarmapper.size_z = stof(argv(i));
 457                 }
 458                 else
 459                 {
 460                         remove(radarmapper);
 461                         radarmapper = world;
 462                         print("Usage: sv_cmd radarmap [--force] [--loop] [--quit] [--block | --trace | --sample | --lineblock] [--sharpen N] [--res W H] [--qual Q]\n");
 463                         print("The quality factor Q is roughly proportional to the time taken.\n");
 464                         print("--trace supports no quality factor; its result should look like --block with infinite quality factor.\n");
 465                         print("--block \n");
 466                         return;
 467                 }
 468         }
 469
 470         print("Radarmap entity spawned.\n");
 471 }
 472
 473 void make_mapinfo_Think()
 474 {
 475         if(MapInfo_FilterGametype(MAPINFO_TYPE_ALL, 0, 0, 0, 1))
 476         {
 477                 print("Done rebuiling mapinfos.\n");
 478                 MapInfo_FilterGametype(MapInfo_CurrentGametype(), MapInfo_CurrentFeatures(), MapInfo_RequiredFlags(), MapInfo_ForbiddenFlags(), 0);
 479                 remove(self);
 480         }
 481         else
 482         {
 483                 self.think = make_mapinfo_Think;
 484                 self.nextthink = time;
 485         }
 486 }
 487
 488 void changematchtime(float delta, float mi, float ma)
 489 {
 490         float cur;
 491         float new;
 492         float lim;
 493
 494         if(delta == 0)
 495                 return;
 496         if(autocvar_timelimit < 0)
 497                 return;
 498
 499         if(mi <= 10)
 500                 mi = 10; // at least ten sec in the future
 501         cur = time - game_starttime;
 502         if(cur > 0)
 503                 mi += cur; // from current time!
 504
 505         lim = autocvar_timelimit * 60;
 506
 507         if(delta > 0)
 508         {
 509                 if(lim == 0)
 510                         return; // cannot increase any further
 511                 else if(lim < ma)
 512                         new = min(ma, lim + delta);
 513                 else // already above maximum: FAIL
 514                         return;
 515         }
 516         else
 517         {
 518                 if(lim == 0) // infinite: try reducing to max, if we are allowed to
 519                         new = max(mi, ma);
 520                 else if(lim > mi) // above minimum: decrease
 521                         new = max(mi, lim + delta);
 522                 else // already below minimum: FAIL
 523                         return;
 524         }
 525
 526         cvar_set("timelimit", ftos(new / 60));
 527 }
 528
 529 float g_clientmodel_genericsendentity (entity to, float sf);
 530 void modelbug_make_svqc();
 531 void modelbug_make_csqc()
 532 {
 533         Net_LinkEntity(self, TRUE, 0, g_clientmodel_genericsendentity);
 534         self.think = modelbug_make_svqc;
 535         self.nextthink = time + 1;
 536         setorigin(self, self.origin - '0 0 8');
 537 }
 538 void modelbug_make_svqc()
 539 {
 540         self.SendEntity = func_null;
 541         self.think = modelbug_make_csqc;
 542         self.nextthink = time + 1;
 543         setorigin(self, self.origin + '0 0 8');
 544 }
 545
 546 void modelbug()
 547 {
 548         entity e;
 549         e = spawn();
 550         setorigin(e, nextent(world).origin);
 551         precache_model("models_portal.md3");
 552         setmodel(e, "models/portal.md3");
 553         e.think = modelbug_make_svqc;
 554         e.nextthink = time + 1;
 555 }
 556
 557 // ===================
 558 //  Command Functions
 559 // ===================
 560 #define GC_REQUEST_HELP 1
 561 #define GC_REQUEST_COMMAND 2
 562 #define GC_REQUEST_USAGE 3
 563
 564 void GameCommand_adminmsg(float request, string command)
 565 {
 566         entity client;
 567         float argc = tokenize_console(command);
 568         float entno = stof(argv(1));
 569         float n, i;
 570         string s;
 571
 572         switch(request)
 573         {
 574                 case GC_REQUEST_HELP:
 575                         print("  ^2adminmsg^7: Send an admin message to a client directly\n");
 576                         return;
 577
 578                 case GC_REQUEST_COMMAND:
 579                         if(argc >= 3 && argc <= 4) {
 580                                 if((entno < 0) | (entno > maxclients)) {
 581                                         print("Player ", argv(1), " doesn't exist\n");
 582                                         return;
 583                                 }
 584                                 n = 0;
 585                                 for(i = (entno ? entno : 1); i <= (entno ? entno : maxclients); ++i)
 586                                 {
 587                                         client = edict_num(i);
 588                                         if(client.flags & FL_CLIENT)
 589                                         {
 590                                                 if(argc == 4)
 591                                                 {
 592                                                         s = argv(2);
 593                                                         s = strreplace("\n", "", s);
 594                                                         s = strreplace("\\", "\\\\", s);
 595                                                         s = strreplace("$", "$$", s);
 596                                                         s = strreplace("\"", "\\\"", s);
 597                                                         stuffcmd(client, sprintf("\ninfobar %f \"%s\"\n", stof(argv(3)), s));
 598                                                 }
 599                                                 else
 600                                                 {
 601                                                         centerprint_atprio(client, CENTERPRIO_ADMIN, strcat("^3", admin_name(), ":\n\n^7", argv(2)));
 602                                                         sprint(client, strcat("\{1}\{13}^3", admin_name(), "^7: ", argv(2), "\n"));
 603                                                 }
 604                                                 dprint("Message sent to ", client.netname, "\n");
 605                                                 ++n;
 606                                         }
 607                                 }
 608                                 if(!n) { print("Client not found\n"); }
 609                                 return;
 610                         }
 611
 612                 default:
 613                         print("Incorrect parameters for \"adminmsg\"\n");
 614                 case GC_REQUEST_USAGE:
 615                         print("\nUsage: sv_cmd adminmsg clientnumber \"message\" [infobartime]\n");
 616                         print("  If infobartime is provided, the message will be sent to infobar.\n");
 617                         print("  Otherwise, it will just be sent as a centerprint message.\n");
 618                         print("Examples: adminmsg 4 \"this message will last for ten seconds\" 10\n");
 619                         print("          adminmsg 2 \"this message will be a centerprint\"\n");
 620                         return;
 621         }
 622 }
 623
 624 void GameCommand_allready(float request)
 625 {
 626         switch(request)
 627         {
 628                 case GC_REQUEST_HELP:
 629                         print("  ^2allready^7: Restart the server and reset the players\n");
 630                         return;
 631
 632                 case GC_REQUEST_COMMAND:
 633                         ReadyRestart();
 634                         return;
 635
 636                 default:
 637                 case GC_REQUEST_USAGE:
 638                         print("\nUsage: sv_cmd allready\n");
 639                         print("  No arguments required.\n");
 640                         return;
 641         }
 642 }
 643
 644 void GameCommand_allspec(float request) // todo: Add ability to provide a reason string
 645 {
 646         entity client;
 647         float i;
 648         switch(request)
 649         {
 650                 case GC_REQUEST_HELP:
 651                         print("  ^2allspec^7: Force all players to spectate\n");
 652                         return;
 653
 654                 case GC_REQUEST_COMMAND:
 655                         FOR_EACH_PLAYER(client)
 656                         {
 657                                 PutObserverInServer();
 658                                 ++i;
 659                         }
 660                         if(i) { bprint(strcat("Successfully forced all players to spectate (", ftos(i), ")\n")); } // should a message be added if no players were found?
 661                         return;
 662
 663                 default:
 664                 case GC_REQUEST_USAGE:
 665                         print("\nUsage: sv_cmd allspec\n");
 666                         print("  No arguments required.\n");
 667                         print("  See also: ^2^7\n"); // FIXME: movetoteam when done will go here
 668                         return;
 669         }
 670 }
 671
 672 void GameCommand_anticheat(float request, string command) // FIXME: player entity is never found
 673 {
 674         entity client;
 675         float argc = tokenize_console(command);
 676         float entno = stof(argv(1));
 677
 678         switch(request)
 679         {
 680                 case GC_REQUEST_HELP:
 681                         print("  ^2anticheat^7: Create an anticheat report for a client\n");
 682                         return;
 683
 684                 case GC_REQUEST_COMMAND:
 685                         if((entno < 1) | (entno > maxclients)) {
 686                                 print("Player ", argv(1), " doesn't exist\n");
 687                                 return;
 688                         }
 689                         client = edict_num(entno);
 690                         if(clienttype(client) != CLIENTTYPE_REAL && clienttype(client) != CLIENTTYPE_BOT) {
 691                                 print("Player ", client.netname, " is not active\n");
 692                                 return;
 693                         }
 694                         self = client;
 695                         anticheat_report();
 696                         return;
 697
 698                 default:
 699                         print("Incorrect parameters for \"anticheat\"\n");
 700                 case GC_REQUEST_USAGE:
 701                         print("\nUsage: sv_cmd anticheat clientnumber\n");
 702                         print("  where clientnumber is player entity number.\n");
 703                         return;
 704         }
 705 }
 706
 707 void GameCommand_bbox(float request)
 708 {
 709         switch(request)
 710         {
 711                 case GC_REQUEST_HELP:
 712                         print("  ^2bbox^7: Print detailed information about world size\n");
 713                         return;
 714
 715                 case GC_REQUEST_COMMAND:
 716                         print("Original size: ", ftos(world.absmin_x), " ", ftos(world.absmin_y), " ", ftos(world.absmin_z));
 717                         print(" ", ftos(world.absmax_x), " ", ftos(world.absmax_y), " ", ftos(world.absmax_z), "\n");
 718                         print("Currently set size: ", ftos(world.mins_x), " ", ftos(world.mins_y), " ", ftos(world.mins_z));
 719                         print(" ", ftos(world.maxs_x), " ", ftos(world.maxs_y), " ", ftos(world.maxs_z), "\n");
 720                         print("Solid bounding box size:");
 721
 722                         tracebox('1 0 0' * world.absmin_x,
 723                                                         '0 1 0' * world.absmin_y + '0 0 1' * world.absmin_z,
 724                                                         '0 1 0' * world.absmax_y + '0 0 1' * world.absmax_z,
 725                                                         '1 0 0' * world.absmax_x,
 726                                         MOVE_WORLDONLY,
 727                                         world);
 728                         if(trace_startsolid)
 729                                 print(" ", ftos(world.absmin_x));
 730                         else
 731                                 print(" ", ftos(trace_endpos_x));
 732
 733                         tracebox('0 1 0' * world.absmin_y,
 734                                                         '1 0 0' * world.absmin_x + '0 0 1' * world.absmin_z,
 735                                                         '1 0 0' * world.absmax_x + '0 0 1' * world.absmax_z,
 736                                                         '0 1 0' * world.absmax_y,
 737                                         MOVE_WORLDONLY,
 738                                         world);
 739                         if(trace_startsolid)
 740                                 print(" ", ftos(world.absmin_y));
 741                         else
 742                                 print(" ", ftos(trace_endpos_y));
 743
 744                         tracebox('0 0 1' * world.absmin_z,
 745                                                         '1 0 0' * world.absmin_x + '0 1 0' * world.absmin_y,
 746                                                         '1 0 0' * world.absmax_x + '0 1 0' * world.absmax_y,
 747                                                         '0 0 1' * world.absmax_z,
 748                                         MOVE_WORLDONLY,
 749                                         world);
 750                         if(trace_startsolid)
 751                                 print(" ", ftos(world.absmin_z));
 752                         else
 753                                 print(" ", ftos(trace_endpos_z));
 754
 755                         tracebox('1 0 0' * world.absmax_x,
 756                                                         '0 1 0' * world.absmin_y + '0 0 1' * world.absmin_z,
 757                                                         '0 1 0' * world.absmax_y + '0 0 1' * world.absmax_z,
 758                                                         '1 0 0' * world.absmin_x,
 759                                         MOVE_WORLDONLY,
 760                                         world);
 761                         if(trace_startsolid)
 762                                 print(" ", ftos(world.absmax_x));
 763                         else
 764                                 print(" ", ftos(trace_endpos_x));
 765
 766                         tracebox('0 1 0' * world.absmax_y,
 767                                                         '1 0 0' * world.absmin_x + '0 0 1' * world.absmin_z,
 768                                                         '1 0 0' * world.absmax_x + '0 0 1' * world.absmax_z,
 769                                                         '0 1 0' * world.absmin_y,
 770                                         MOVE_WORLDONLY,
 771                                         world);
 772                         if(trace_startsolid)
 773                                 print(" ", ftos(world.absmax_y));
 774                         else
 775                                 print(" ", ftos(trace_endpos_y));
 776
 777                         tracebox('0 0 1' * world.absmax_z,
 778                                                         '1 0 0' * world.absmin_x + '0 1 0' * world.absmin_y,
 779                                                         '1 0 0' * world.absmax_x + '0 1 0' * world.absmax_y,
 780                                                         '0 0 1' * world.absmin_z,
 781                                         MOVE_WORLDONLY,
 782                                         world);
 783                         if(trace_startsolid)
 784                                 print(" ", ftos(world.absmax_z));
 785                         else
 786                                 print(" ", ftos(trace_endpos_z));
 787
 788                         print("\n");
 789                         return;
 790
 791                 default:
 792                 case GC_REQUEST_USAGE:
 793                         print("\nUsage: sv_cmd bbox\n");
 794                         print("  No arguments required.\n");
 795                         print("  See also: ^2gettaginfo^7\n");
 796                         return;
 797         }
 798 }
 799
 800 void GameCommand_bot_cmd(float request, string command) // what a mess... old old code.
 801 {
 802         entity bot;
 803         float argc = tokenize_console(command);
 804
 805         switch(request)
 806         {
 807                 case GC_REQUEST_HELP:
 808                         print("  ^2bot_cmd^7: Control and send commands to bots\n");
 809                         return;
 810
 811                 case GC_REQUEST_COMMAND:
 812                         if(argv(1) == "reset")
 813                         {
 814                                 bot_resetqueues();
 815                                 return;
 816                         }
 817                         else if(argv(1) == "load" && argc == 3)
 818                         {
 819                                 float fh, i;
 820                                 string s;
 821                                 fh = fopen(argv(2), FILE_READ);
 822                                 if(fh < 0)
 823                                 {
 824                                         print("cannot open the file\n");
 825                                         return;
 826                                 }
 827
 828                                 i = 0;
 829                                 while((s = fgets(fh)))
 830                                 {
 831                                         argc = tokenize_console(s);
 832
 833                                         if(argc >= 3 && argv(0) == "sv_cmd" && argv(1) == "bot_cmd")
 834                                         {
 835                                                 // let's start at token 2 so we can skip sv_cmd bot_cmd
 836                                                 bot = find_bot_by_number(stof(argv(2)));
 837                                                 if(bot == world)
 838                                                         bot = find_bot_by_name(argv(2));
 839                                                 if(bot)
 840                                                         bot_queuecommand(bot, strcat(argv(3), " ", argv(4)));
 841                                         }
 842                                         else
 843                                                 localcmd(strcat(s, "\n"));
 844
 845                                         ++i;
 846                                 }
 847                                 print(ftos(i), " commands read\n");
 848                                 fclose(fh);
 849                                 return;
 850                         }
 851                         else if(argv(1) == "help")
 852                         {
 853                                 if(argv(2))
 854                                         bot_cmdhelp(argv(2));
 855                                 else
 856                                         bot_list_commands();
 857                                 return;
 858                         }
 859                         else if(argc >= 3) // this comes last
 860                         {
 861                                 bot = find_bot_by_number(stof(argv(1)));
 862                                 if(bot == world)
 863                                         bot = find_bot_by_name(argv(1));
 864                                 if(bot)
 865                                 {
 866                                         print(strcat("Command '", (argv(2), " ", argv(3)), "' sent to bot ", bot.netname, "\n"));
 867                                         bot_queuecommand(bot, strcat(argv(2), " ", argv(3)));
 868                                         return;
 869                                 }
 870                                 else
 871                                         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
 872                         }
 873
 874                 default:
 875                         print("Incorrect parameters for \"bot_cmd\"\n");
 876                 case GC_REQUEST_USAGE:
 877                         print("\nUsage: sv_cmd bot_cmd client command [argument]\n");
 878                         print("  'client' can be either the name or entity id of the bot\n");
 879                         print("  For full list of commands, see bot_cmd help [command].\n");
 880                         print("Examples: bot_cmd <id> cc \"say something\"\n");
 881                         print("          bot_cmd <id> presskey jump\n");
 882                         return;
 883         }
 884 }
 885
 886 void GameCommand_cointoss(float request) // todo: Perhaps add the ability to give your own arguments to pick between? (Like player names)
 887 {
 888         entity client;
 889         float choice = (random() > 0.5);
 890
 891         switch(request)
 892         {
 893                 case GC_REQUEST_HELP:
 894                         print("  ^2cointoss^7: Flip a virtual coin and give random result\n");
 895                         return;
 896
 897                 case GC_REQUEST_COMMAND:
 898                         FOR_EACH_CLIENT(client)
 899                                 centerprint(client, strcat("^3Throwing coin... Result: ", (choice ? "^1HEADS^3!\n" : "^4TAILS^3!\n")));
 900                         bprint(strcat("^3Throwing coin... Result: ", (choice ? "^1HEADS^3!\n" : "^4TAILS^3!\n")));
 901                         return;
 902
 903                 default:
 904                 case GC_REQUEST_USAGE:
 905                         print("\nUsage: sv_cmd cointoss\n");
 906                         print("  No arguments required.\n");
 907                         return;
 908         }
 909 }
 910
 911 void GameCommand_cvar_changes(float request)
 912 {
 913         switch(request)
 914         {
 915                 case GC_REQUEST_HELP:
 916                         print("  ^2cvar_changes^7: Prints a list of all changed server cvars\n");
 917                         return;
 918
 919                 case GC_REQUEST_COMMAND:
 920                         print(cvar_changes);
 921                         return;
 922
 923                 default:
 924                 case GC_REQUEST_USAGE:
 925                         print("\nUsage: sv_cmd \n");
 926                         print("  No arguments required.\n");
 927                         print("  See also: ^2cvar_purechanges^7\n");
 928                         return;
 929         }
 930 }
 931
 932 void GameCommand_cvar_purechanges(float request)
 933 {
 934         switch(request)
 935         {
 936                 case GC_REQUEST_HELP:
 937                         print("  ^2cvar_purechanges^7: Prints a list of all changed gameplay cvars\n");
 938                         return;
 939
 940                 case GC_REQUEST_COMMAND:
 941                         print(cvar_purechanges);
 942                         return;
 943
 944                 default:
 945                 case GC_REQUEST_USAGE:
 946                         print("\nUsage: sv_cmd cvar_purechanges\n");
 947                         print("  No arguments required.\n");
 948                         print("  See also: ^2cvar_changes^7\n");
 949                         return;
 950         }
 951 }
 952
 953 void GameCommand_database(float request, string command)
 954 {
 955         float argc = tokenize_console(command);
 956
 957         switch(request)
 958         {
 959                 case GC_REQUEST_HELP:
 960                         print("  ^2database^7: Extra controls of the serverprogs database\n");
 961                         return;
 962
 963                 case GC_REQUEST_COMMAND:
 964                         if(argc == 3)
 965                         {
 966                                 if(argv(1) == "save")
 967                                 {
 968                                         db_save(ServerProgsDB, argv(2));
 969                                         print(strcat("Copied serverprogs database to '", argv(2), "' in the data directory.\n"));
 970                                         return;
 971                                 }
 972                                 else if(argv(1) == "dump")
 973                                 {
 974                                         db_dump(ServerProgsDB, argv(2));
 975                                         print("DB dumped.\n"); // wtf does this do?
 976                                         return;
 977                                 }
 978                                 else if(argv(1) == "load")
 979                                 {
 980                                         db_close(ServerProgsDB);
 981                                         ServerProgsDB = db_load(argv(2));
 982                                         print(strcat("Loaded '", argv(2), "' as new serverprogs database.\n"));
 983                                         return;
 984                                 }
 985                         }
 986
 987                 default:
 988                         print("Incorrect parameters for \"database\"\n");
 989                 case GC_REQUEST_USAGE:
 990                         print("\nUsage: sv_cmd database action filename\n");
 991                         print("  Where action is the command to complete,\n");
 992                         print("  and filename is what it acts upon.\n");
 993                         print("  Full list of commands here: \"save, dump, load.\"\n");
 994                         return;
 995         }
 996 }
 997
 998 void GameCommand_defer_clear(float request, string command)
 999 {
1000         entity client;
1001         float argc = tokenize_console(command);
1002         float entno = stof(argv(1));
1003
1004         switch(request)
1005         {
1006                 case GC_REQUEST_HELP:
1007                         print("  ^2defer_clear^7: Clear all queued defer commands for client\n");
1008                         return;
1009
1010                 case GC_REQUEST_COMMAND:
1011                         if(argc == 2)
1012                         {
1013                                 // player_id is out of range
1014                                 if((entno < 1) | (entno > maxclients)) {
1015                                         print("Player ", argv(1), " doesn't exist\n");
1016                                         return;
1017                                 }
1018                                 client = edict_num(entno);
1019                                 if not(client.flags & FL_CLIENT) {
1020                                         print("Player ", argv(1), " doesn't exist\n");
1021                                         return;
1022                                 }
1023                                 if(clienttype(client) == CLIENTTYPE_BOT) {
1024                                         print("Player ", argv(1), " (", client.netname, ") is a bot\n");
1025                                         return;
1026                                 }
1027                                 stuffcmd(client, "defer clear\n");
1028                                 print("defer clear stuffed to ", argv(1), " (", client.netname, ")\n");
1029                                 return;
1030                         }
1031
1032                 default:
1033                         print("Incorrect parameters for \"defer_clear\"\n");
1034                 case GC_REQUEST_USAGE:
1035                         print("\nUsage: sv_cmd defer_clear clientnumber\n");
1036                         print("  where clientnumber is player entity number.\n");
1037                         print("  See also: ^2defer_clear_all^7\n");
1038                         return;
1039         }
1040 }
1041
1042 void GameCommand_defer_clear_all(float request)
1043 {
1044         entity client;
1045         float i;
1046
1047         switch(request)
1048         {
1049                 case GC_REQUEST_HELP:
1050                         print("  ^2defer_clear_all^7: Clear all queued defer commands for all clients\n");
1051                         return;
1052
1053                 case GC_REQUEST_COMMAND:
1054                         FOR_EACH_CLIENT(client)
1055                         {
1056                                 GameCommand_defer_clear(GC_REQUEST_COMMAND, strcat("defer_clear ", ftos(num_for_edict(client))));
1057                                 ++i;
1058                         }
1059                         if(i) { bprint(strcat("Successfully stuffed defer clear to all clients (", ftos(i), ")\n")); } // should a message be added if no players were found?
1060                         return;
1061
1062                 default:
1063                 case GC_REQUEST_USAGE:
1064                         print("\nUsage: sv_cmd defer_clear_all\n");
1065                         print("  No arguments required.\n");
1066                         print("  See also: ^2defer_clear^7\n");
1067                         return;
1068         }
1069 }
1070
1071 void GameCommand_delrec(float request, string command) // UNTESTED
1072 {
1073         float argc = tokenize_console(command);
1074
1075         switch(request)
1076         {
1077                 case GC_REQUEST_HELP:
1078                         print("  ^2delrec^7: Delete race time record for a map\n");
1079                         return;
1080
1081                 case GC_REQUEST_COMMAND:
1082                         if(argv(1))
1083                         {
1084                                 if(argv(2))
1085                                         race_deleteTime(argv(2), stof(argv(1)));
1086                                 else
1087                                         race_deleteTime(GetMapname(), stof(argv(1)));
1088                                 return;
1089                         }
1090
1091                 default:
1092                         print("Incorrect parameters for \"delrec\"\n");
1093                 case GC_REQUEST_USAGE:
1094                         print("\nUsage: sv_cmd delrec ranking [map]\n");
1095                         print("  ranking is which ranking level to clear up to, \n");
1096                         print("  it will clear all records up to nth place.\n");
1097                         print("  if map is not provided it will use current map.\n");
1098                         return;
1099         }
1100 }
1101
1102 void GameCommand_effectindexdump(float request)
1103 {
1104         float fh, d;
1105         string s;
1106
1107         switch(request)
1108         {
1109                 case GC_REQUEST_HELP:
1110                         print("  ^2effectindexdump^7: Dump list of effects from code and effectinfo.txt\n");
1111                         return;
1112
1113                 case GC_REQUEST_COMMAND:
1114                         d = db_create();
1115                         print("begin of effects list\n");
1116                         db_put(d, "TE_GUNSHOT", "1"); print("effect TE_GUNSHOT is ", ftos(particleeffectnum("TE_GUNSHOT")), "\n");
1117                         db_put(d, "TE_GUNSHOTQUAD", "1"); print("effect TE_GUNSHOTQUAD is ", ftos(particleeffectnum("TE_GUNSHOTQUAD")), "\n");
1118                         db_put(d, "TE_SPIKE", "1"); print("effect TE_SPIKE is ", ftos(particleeffectnum("TE_SPIKE")), "\n");
1119                         db_put(d, "TE_SPIKEQUAD", "1"); print("effect TE_SPIKEQUAD is ", ftos(particleeffectnum("TE_SPIKEQUAD")), "\n");
1120                         db_put(d, "TE_SUPERSPIKE", "1"); print("effect TE_SUPERSPIKE is ", ftos(particleeffectnum("TE_SUPERSPIKE")), "\n");
1121                         db_put(d, "TE_SUPERSPIKEQUAD", "1"); print("effect TE_SUPERSPIKEQUAD is ", ftos(particleeffectnum("TE_SUPERSPIKEQUAD")), "\n");
1122                         db_put(d, "TE_WIZSPIKE", "1"); print("effect TE_WIZSPIKE is ", ftos(particleeffectnum("TE_WIZSPIKE")), "\n");
1123                         db_put(d, "TE_KNIGHTSPIKE", "1"); print("effect TE_KNIGHTSPIKE is ", ftos(particleeffectnum("TE_KNIGHTSPIKE")), "\n");
1124                         db_put(d, "TE_EXPLOSION", "1"); print("effect TE_EXPLOSION is ", ftos(particleeffectnum("TE_EXPLOSION")), "\n");
1125                         db_put(d, "TE_EXPLOSIONQUAD", "1"); print("effect TE_EXPLOSIONQUAD is ", ftos(particleeffectnum("TE_EXPLOSIONQUAD")), "\n");
1126                         db_put(d, "TE_TAREXPLOSION", "1"); print("effect TE_TAREXPLOSION is ", ftos(particleeffectnum("TE_TAREXPLOSION")), "\n");
1127                         db_put(d, "TE_TELEPORT", "1"); print("effect TE_TELEPORT is ", ftos(particleeffectnum("TE_TELEPORT")), "\n");
1128                         db_put(d, "TE_LAVASPLASH", "1"); print("effect TE_LAVASPLASH is ", ftos(particleeffectnum("TE_LAVASPLASH")), "\n");
1129                         db_put(d, "TE_SMALLFLASH", "1"); print("effect TE_SMALLFLASH is ", ftos(particleeffectnum("TE_SMALLFLASH")), "\n");
1130                         db_put(d, "TE_FLAMEJET", "1"); print("effect TE_FLAMEJET is ", ftos(particleeffectnum("TE_FLAMEJET")), "\n");
1131                         db_put(d, "EF_FLAME", "1"); print("effect EF_FLAME is ", ftos(particleeffectnum("EF_FLAME")), "\n");
1132                         db_put(d, "TE_BLOOD", "1"); print("effect TE_BLOOD is ", ftos(particleeffectnum("TE_BLOOD")), "\n");
1133                         db_put(d, "TE_SPARK", "1"); print("effect TE_SPARK is ", ftos(particleeffectnum("TE_SPARK")), "\n");
1134                         db_put(d, "TE_PLASMABURN", "1"); print("effect TE_PLASMABURN is ", ftos(particleeffectnum("TE_PLASMABURN")), "\n");
1135                         db_put(d, "TE_TEI_G3", "1"); print("effect TE_TEI_G3 is ", ftos(particleeffectnum("TE_TEI_G3")), "\n");
1136                         db_put(d, "TE_TEI_SMOKE", "1"); print("effect TE_TEI_SMOKE is ", ftos(particleeffectnum("TE_TEI_SMOKE")), "\n");
1137                         db_put(d, "TE_TEI_BIGEXPLOSION", "1"); print("effect TE_TEI_BIGEXPLOSION is ", ftos(particleeffectnum("TE_TEI_BIGEXPLOSION")), "\n");
1138                         db_put(d, "TE_TEI_PLASMAHIT", "1"); print("effect TE_TEI_PLASMAHIT is ", ftos(particleeffectnum("TE_TEI_PLASMAHIT")), "\n");
1139                         db_put(d, "EF_STARDUST", "1"); print("effect EF_STARDUST is ", ftos(particleeffectnum("EF_STARDUST")), "\n");
1140                         db_put(d, "TR_ROCKET", "1"); print("effect TR_ROCKET is ", ftos(particleeffectnum("TR_ROCKET")), "\n");
1141                         db_put(d, "TR_GRENADE", "1"); print("effect TR_GRENADE is ", ftos(particleeffectnum("TR_GRENADE")), "\n");
1142                         db_put(d, "TR_BLOOD", "1"); print("effect TR_BLOOD is ", ftos(particleeffectnum("TR_BLOOD")), "\n");
1143                         db_put(d, "TR_WIZSPIKE", "1"); print("effect TR_WIZSPIKE is ", ftos(particleeffectnum("TR_WIZSPIKE")), "\n");
1144                         db_put(d, "TR_SLIGHTBLOOD", "1"); print("effect TR_SLIGHTBLOOD is ", ftos(particleeffectnum("TR_SLIGHTBLOOD")), "\n");
1145                         db_put(d, "TR_KNIGHTSPIKE", "1"); print("effect TR_KNIGHTSPIKE is ", ftos(particleeffectnum("TR_KNIGHTSPIKE")), "\n");
1146                         db_put(d, "TR_VORESPIKE", "1"); print("effect TR_VORESPIKE is ", ftos(particleeffectnum("TR_VORESPIKE")), "\n");
1147                         db_put(d, "TR_NEHAHRASMOKE", "1"); print("effect TR_NEHAHRASMOKE is ", ftos(particleeffectnum("TR_NEHAHRASMOKE")), "\n");
1148                         db_put(d, "TR_NEXUIZPLASMA", "1"); print("effect TR_NEXUIZPLASMA is ", ftos(particleeffectnum("TR_NEXUIZPLASMA")), "\n");
1149                         db_put(d, "TR_GLOWTRAIL", "1"); print("effect TR_GLOWTRAIL is ", ftos(particleeffectnum("TR_GLOWTRAIL")), "\n");
1150                         db_put(d, "TR_SEEKER", "1"); print("effect TR_SEEKER is ", ftos(particleeffectnum("TR_SEEKER")), "\n");
1151                         db_put(d, "SVC_PARTICLE", "1"); print("effect SVC_PARTICLE is ", ftos(particleeffectnum("SVC_PARTICLE")), "\n");
1152
1153                         fh = fopen("effectinfo.txt", FILE_READ);
1154                         while((s = fgets(fh)))
1155                         {
1156                                 tokenize(s); // tokenize_console would hit the loop counter :(
1157                                 if(argv(0) == "effect")
1158                                 {
1159                                         if(db_get(d, argv(1)) != "1")
1160                                         {
1161                                                 if(particleeffectnum(argv(1)) >= 0)
1162                                                         print("effect ", argv(1), " is ", ftos(particleeffectnum(argv(1))), "\n");
1163                                                 db_put(d, argv(1), "1");
1164                                         }
1165                                 }
1166                         }
1167                         print("end of effects list\n");
1168
1169                         db_close(d);
1170                         return;
1171
1172                 default:
1173                 case GC_REQUEST_USAGE:
1174                         print("\nUsage: sv_cmd effectindexdump\n");
1175                         print("  No arguments required.\n");
1176                         return;
1177         }
1178 }
1179
1180 void GameCommand_extendmatchtime(float request) // todo: Perhaps allows the user to send a specific time to extend it.
1181 {
1182         switch(request)
1183         {
1184                 case GC_REQUEST_HELP:
1185                         print("  ^2extendmatchtime^7: Increase the timelimit value incrementally\n");
1186                         return;
1187
1188                 case GC_REQUEST_COMMAND:
1189                         changematchtime(autocvar_timelimit_increment* 60, autocvar_timelimit_min*60, autocvar_timelimit_max*60);
1190                         return;
1191
1192                 default:
1193                 case GC_REQUEST_USAGE:
1194                         print("\nUsage: sv_cmd extendmatchtime\n");
1195                         print("  No arguments required.\n");
1196                         print("  See also: ^2reducematchtime^7\n");
1197                         return;
1198         }
1199 }
1200
1201 void GameCommand_find(float request, string command)
1202 {
1203         entity client;
1204         float argc = tokenize_console(command);
1205
1206         switch(request)
1207         {
1208                 case GC_REQUEST_HELP:
1209                         print("  ^2find^7: Search through entities for matching classname\n");
1210                         return;
1211
1212                 case GC_REQUEST_COMMAND:
1213                         for(client = world; (client = find(client, classname, argv(1))); )
1214                                 print(etos(client), "\n");
1215                         return;
1216
1217                 default:
1218                         print("Incorrect parameters for \"find\"\n");
1219                 case GC_REQUEST_USAGE:
1220                         print("\nUsage: sv_cmd find classname\n");
1221                         print("  Where classname is the classname to search for.\n");
1222                         return;
1223         }
1224 }
1225
1226 void GameCommand_gametype(float request, string command)
1227 {
1228         float argc = tokenize_console(command);
1229         string s = argv(1);
1230         float t = MapInfo_Type_FromString(s), tsave = MapInfo_CurrentGametype();
1231
1232         switch(request)
1233         {
1234                 case GC_REQUEST_HELP:
1235                         print("  ^2gametype^7: Simple command to change the active gametype\n");
1236                         return;
1237
1238                 case GC_REQUEST_COMMAND:
1239                         if(t)
1240                         {
1241                                 MapInfo_SwitchGameType(t);
1242                                 MapInfo_FilterGametype(MapInfo_CurrentGametype(), MapInfo_CurrentFeatures(), MapInfo_RequiredFlags(), MapInfo_ForbiddenFlags(), 0);
1243                                 if(MapInfo_count > 0)
1244                                         bprint("Game type successfully switched to ", s, "\n");
1245                                 else
1246                                 {
1247                                         bprint("Cannot use this game type: no map for it found\n");
1248                                         MapInfo_SwitchGameType(tsave);
1249                                         MapInfo_FilterGametype(MapInfo_CurrentGametype(), MapInfo_CurrentFeatures(), MapInfo_RequiredFlags(), MapInfo_ForbiddenFlags(), 0);
1250                                 }
1251                         }
1252                         else
1253                                 bprint("Game type switch to ", s, " failed: this type does not exist!\n");
1254                         return;
1255
1256                 default:
1257                         print("Incorrect parameters for \"gametype\"\n");
1258                 case GC_REQUEST_USAGE:
1259                         print("\nUsage: sv_cmd gametype mode\n");
1260                         print("  Where mode is the gametype mode to switch to.\n");
1261                         print("  See also: ^2gotomap^7\n");
1262                         return;
1263         }
1264 }
1265
1266 void GameCommand_gettaginfo(float request, string command) // UNTESTED // todo: finish usage description for it (but, must first learn this shit)
1267 {
1268         entity tmp_entity;
1269         float argc = tokenize_console(command), i;
1270         vector v;
1271         switch(request)
1272         {
1273                 case GC_REQUEST_HELP:
1274                         print("  ^2gettaginfo^7: Get specific information about a weapon model\n");
1275                         return;
1276
1277                 case GC_REQUEST_COMMAND:
1278                         if(argc >= 4)
1279                         {
1280                                 tmp_entity = spawn();
1281                                 if(argv(1) == "w")
1282                                         setmodel(tmp_entity, (nextent(world)).weaponentity.model);
1283                                 else
1284                                 {
1285                                         precache_model(argv(1));
1286                                         setmodel(tmp_entity, argv(1));
1287                                 }
1288                                 tmp_entity.frame = stof(argv(2));
1289                                 if(substring(argv(3), 0, 1) == "#")
1290                                         i = stof(substring(argv(3), 1, -1));
1291                                 else
1292                                         i = gettagindex(tmp_entity, argv(3));
1293                                 if(i)
1294                                 {
1295                                         v = gettaginfo(tmp_entity, i);
1296                                         print("model ", tmp_entity.model, " frame ", ftos(tmp_entity.frame), " tag ", gettaginfo_name);
1297                                         print(" index ", ftos(i), " parent ", ftos(gettaginfo_parent), "\n");
1298                                         print(" vector = ", ftos(v_x), " ", ftos(v_y), " ", ftos(v_z), "\n");
1299                                         print(" offset = ", ftos(gettaginfo_offset_x), " ", ftos(gettaginfo_offset_y), " ", ftos(gettaginfo_offset_z), "\n");
1300                                         print(" forward = ", ftos(gettaginfo_forward_x), " ", ftos(gettaginfo_forward_y), " ", ftos(gettaginfo_forward_z), "\n");
1301                                         print(" right = ", ftos(gettaginfo_right_x), " ", ftos(gettaginfo_right_y), " ", ftos(gettaginfo_right_z), "\n");
1302                                         print(" up = ", ftos(gettaginfo_up_x), " ", ftos(gettaginfo_up_y), " ", ftos(gettaginfo_up_z), "\n");
1303                                         if(argc >= 6)
1304                                         {
1305                                                 v_y = -v_y;
1306                                                 localcmd(strcat(argv(4), vtos(v), argv(5), "\n"));
1307                                         }
1308                                 }
1309                                 else
1310                                         print("bone not found\n");
1311
1312                                 remove(tmp_entity);
1313                                 return;
1314                         }
1315
1316                 default:
1317                         print("Incorrect parameters for \"gettaginfo\"\n");
1318                 case GC_REQUEST_USAGE:
1319                         print("\nUsage: sv_cmd gettaginfo\n");
1320                         print("  FIXME: Arguments currently unknown\n");
1321                         print("  See also: ^2bbox^7\n");
1322                         return;
1323         }
1324 }
1325
1326 void GameCommand_gotomap(float request, string command)
1327 {
1328         float argc = tokenize_console(command);
1329
1330         switch(request)
1331         {
1332                 case GC_REQUEST_HELP:
1333                         print("  ^2gotomap^7: Simple command to switch to another map\n");
1334                         return;
1335
1336                 case GC_REQUEST_COMMAND:
1337                         if(argc == 2)
1338                         {
1339                                 print(GotoMap(argv(1)), "\n");
1340                                 return;
1341                         }
1342
1343                 default:
1344                 case GC_REQUEST_USAGE:
1345                         print("\nUsage: sv_cmd gotomap map\n");
1346                         print("  Where map is the *.bsp file to change to.\n");
1347                         print("  See also: ^2gametype^7\n");
1348                         return;
1349         }
1350 }
1351
1352 void GameCommand_ladder(float request)
1353 {
1354         switch(request)
1355         {
1356                 case GC_REQUEST_HELP:
1357                         print("  ^2ladder^7: Get information about top players if supported\n");
1358                         return;
1359
1360                 case GC_REQUEST_COMMAND:
1361                         print(ladder_reply);
1362                         return;
1363
1364                 default:
1365                 case GC_REQUEST_USAGE:
1366                         print("\nUsage: sv_cmd ladder\n");
1367                         print("  No arguments required.\n");
1368                         return;
1369         }
1370 }
1371
1372 void GameCommand_lockteams(float request)
1373 {
1374         switch(request)
1375         {
1376                 case GC_REQUEST_HELP:
1377                         print("  ^2lockteams^7: Disable the ability for players to switch or enter teams\n");
1378                         return;
1379
1380                 case GC_REQUEST_COMMAND:
1381                         if(teamplay)
1382                         {
1383                                 lockteams = 1;
1384                                 bprint("^1The teams are now locked.\n");
1385                         }
1386                         else
1387                                 bprint("That command can only be used in a team-based gamemode.\n");
1388                         return;
1389
1390                 default:
1391                 case GC_REQUEST_USAGE:
1392                         print("\nUsage: sv_cmd lockteams\n");
1393                         print("  No arguments required.\n");
1394                         return;
1395         }
1396 }
1397
1398 void GameCommand(string command)
1399 {
1400         // ===== TODO list =====
1401
1402         // Finish adding the rest of the commands
1403
1404         // Add ifdef to stuffto so that is can only be used when the game code is compiled for it
1405         //(this way it's more obscure and harder to abuse on normal servers)
1406
1407         float search_request_type;
1408         float argc = tokenize_console(command);
1409
1410         if(argv(0) == "help")
1411         {
1412                 if(argc == 1)
1413                 {
1414                         print("\nUsage: sv_cmd COMMAND..., where possible commands are:\n");
1415                         GameCommand_adminmsg(GC_REQUEST_HELP, "");
1416                         GameCommand_allready(GC_REQUEST_HELP);
1417                         GameCommand_allspec(GC_REQUEST_HELP);
1418                         GameCommand_anticheat(GC_REQUEST_HELP, "");
1419                         GameCommand_bbox(GC_REQUEST_HELP);
1420                         GameCommand_bot_cmd(GC_REQUEST_HELP, "");
1421                         GameCommand_cointoss(GC_REQUEST_HELP);
1422                         GameCommand_cvar_changes(GC_REQUEST_HELP);
1423                         GameCommand_cvar_purechanges(GC_REQUEST_HELP);
1424                         GameCommand_database(GC_REQUEST_HELP, "");
1425                         GameCommand_defer_clear(GC_REQUEST_HELP, "");
1426                         GameCommand_defer_clear_all(GC_REQUEST_HELP);
1427                         GameCommand_delrec(GC_REQUEST_HELP, "");
1428                         GameCommand_effectindexdump(GC_REQUEST_HELP);
1429                         GameCommand_extendmatchtime(GC_REQUEST_HELP);
1430                         GameCommand_find(GC_REQUEST_HELP, "");
1431                         GameCommand_gametype(GC_REQUEST_HELP, "");
1432                         GameCommand_gettaginfo(GC_REQUEST_HELP, "");
1433                         GameCommand_gotomap(GC_REQUEST_HELP, "");
1434                         GameCommand_ladder(GC_REQUEST_HELP);
1435                         GameCommand_lockteams(GC_REQUEST_HELP);
1436                         print("  teamstatus\n");
1437                         print("  printstats\n");
1438                         print("  make_mapinfo\n");
1439                         print("  radarmap [--force] [--quit | --loop] [sharpness]\n");
1440                         print("  reducematchtime\n");
1441                         GameCommand_Vote("help", world);
1442                         GameCommand_Ban("help");
1443                         GameCommand_Generic("help");
1444                         print("For help about specific commands, type sv_cmd help COMMAND\n");
1445                         return;
1446                 }
1447                 else
1448                         search_request_type = GC_REQUEST_USAGE; // Instead of trying to call a command, we're going to see detailed information about it
1449         }
1450         else if(GameCommand_Vote(command, world))
1451         {
1452                 return; // handled by server/vote.qc
1453         }
1454         else if(GameCommand_Ban(command))
1455         {
1456                 return; // handled by server/ipban.qc
1457         }
1458         else if(GameCommand_Generic(command))
1459         {
1460                 return; // handled by common/gamecommand.qc
1461         }
1462         else
1463                 search_request_type = GC_REQUEST_COMMAND; // continue as usual and scan for normal commands
1464
1465         switch( ((argv(0) == "help") ? argv(1) : argv(0)) ) // if first argument is help, then search for the second argument. Else, search for first.
1466         {
1467                 case "adminmsg": GameCommand_adminmsg(search_request_type, command); break;
1468                 case "allready": GameCommand_allready(search_request_type); break;
1469                 case "allspec": GameCommand_allspec(search_request_type); break;
1470                 case "anticheat": GameCommand_anticheat(search_request_type, command); break;
1471                 case "bbox": GameCommand_bbox(search_request_type); break;
1472                 case "bot_cmd": GameCommand_bot_cmd(search_request_type, command); break;
1473                 case "cointoss": GameCommand_cointoss(search_request_type); break;
1474                 case "cvar_changes": GameCommand_cvar_changes(search_request_type); break;
1475                 case "cvar_purechanges": GameCommand_cvar_purechanges(search_request_type); break;
1476                 case "database": GameCommand_database(search_request_type, command); break;
1477                 case "defer_clear": GameCommand_defer_clear(search_request_type, command); break;
1478                 case "defer_clear_all": GameCommand_defer_clear_all(search_request_type); break;
1479                 case "delrec": GameCommand_delrec(search_request_type, command); break;
1480                 case "effectindexdump": GameCommand_effectindexdump(search_request_type); break;
1481                 case "extendmatchtime": GameCommand_extendmatchtime(search_request_type); break;
1482                 case "find": GameCommand_find(search_request_type, command); break;
1483                 case "gametype": GameCommand_gametype(search_request_type, command); break;
1484                 case "gettaginfo": GameCommand_gettaginfo(search_request_type, command); break;
1485                 case "gotomap": GameCommand_gotomap(search_request_type, command); break;
1486                 case "ladder": GameCommand_ladder(search_request_type); break;
1487                 case "lockteams": GameCommand_lockteams(search_request_type); break;
1488
1489                 default:
1490                         print("Invalid command. For a list of supported commands, try sv_cmd help.\n");
1491         }
1492 }
1493