cl_cmd.c

   1 /*
   2 Copyright (C) 1996-1997 Id Software, Inc.
   3
   4 This program is free software; you can redistribute it and/or
   5 modify it under the terms of the GNU General Public License
   6 as published by the Free Software Foundation; either version 2
   7 of the License, or (at your option) any later version.
   8
   9 This program is distributed in the hope that it will be useful,
  10 but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  12
  13 See the GNU General Public License for more details.
  14
  15 You should have received a copy of the GNU General Public License
  16 along with this program; if not, write to the Free Software
  17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  18
  19 */
  20
  21 #include "quakedef.h"
  22
  23 // for secure rcon authentication
  24 #include "hmac.h"
  25 #include "mdfour.h"
  26 #include "image.h"
  27 #include <time.h>
  28
  29 #include "cl_collision.h"
  30
  31 /// User-visible names of these CF_USERINFO cvars must be matched in CL_SetInfo()!
  32 cvar_t cl_name = {CF_CLIENT | CF_ARCHIVE | CF_USERINFO, "_cl_name", "player", "player name"};
  33 cvar_t cl_rate = {CF_CLIENT | CF_ARCHIVE | CF_USERINFO, "rate", "20000", "connection speed"};
  34 cvar_t cl_rate_burstsize = {CF_CLIENT | CF_ARCHIVE | CF_USERINFO, "rate_burstsize", "1024", "rate control burst size"};
  35 cvar_t cl_topcolor = {CF_CLIENT | CF_ARCHIVE | CF_USERINFO, "topcolor", "0", "color of your shirt"};
  36 cvar_t cl_bottomcolor = {CF_CLIENT | CF_ARCHIVE | CF_USERINFO, "bottomcolor", "0", "color of your pants"};
  37 cvar_t cl_team = {CF_CLIENT | CF_USERINFO | CF_ARCHIVE, "team", "none", "QW team (4 character limit, example: blue)"};
  38 cvar_t cl_skin = {CF_CLIENT | CF_USERINFO | CF_ARCHIVE, "skin", "", "QW player skin name (example: base)"};
  39 cvar_t cl_noaim = {CF_CLIENT | CF_USERINFO | CF_ARCHIVE, "noaim", "1", "QW option to disable vertical autoaim"};
  40 cvar_t cl_pmodel = {CF_CLIENT | CF_USERINFO | CF_ARCHIVE, "pmodel", "0", "current player model number in nehahra"};
  41
  42 cvar_t r_fixtrans_auto = {CF_CLIENT, "r_fixtrans_auto", "0", "automatically fixtrans textures (when set to 2, it also saves the fixed versions to a fixtrans directory)"};
  43
  44 extern cvar_t rcon_secure;
  45 extern cvar_t rcon_secure_challengetimeout;
  46
  47 /*
  48 ===================
  49 CL_ForwardToServer
  50
  51 Sends an entire command string over to the server, unprocessed
  52 ===================
  53 */
  54 void CL_ForwardToServer (const char *s)
  55 {
  56         char temp[128];
  57         if (cls.state != ca_connected)
  58         {
  59                 Con_Printf("Can't \"%s\", not connected\n", s);
  60                 return;
  61         }
  62
  63         if (!cls.netcon)
  64                 return;
  65
  66         // LadyHavoc: thanks to Fuh for bringing the pure evil of SZ_Print to my
  67         // attention, it has been eradicated from here, its only (former) use in
  68         // all of darkplaces.
  69         if (cls.protocol == PROTOCOL_QUAKEWORLD)
  70                 MSG_WriteByte(&cls.netcon->message, qw_clc_stringcmd);
  71         else
  72                 MSG_WriteByte(&cls.netcon->message, clc_stringcmd);
  73         if ((!strncmp(s, "say ", 4) || !strncmp(s, "say_team ", 9)) && cl_locs_enable.integer)
  74         {
  75                 // say/say_team commands can replace % character codes with status info
  76                 while (*s)
  77                 {
  78                         if (*s == '%' && s[1])
  79                         {
  80                                 // handle proquake message macros
  81                                 temp[0] = 0;
  82                                 switch (s[1])
  83                                 {
  84                                 case 'l': // current location
  85                                         CL_Locs_FindLocationName(temp, sizeof(temp), cl.movement_origin);
  86                                         break;
  87                                 case 'h': // current health
  88                                         dpsnprintf(temp, sizeof(temp), "%i", cl.stats[STAT_HEALTH]);
  89                                         break;
  90                                 case 'a': // current armor
  91                                         dpsnprintf(temp, sizeof(temp), "%i", cl.stats[STAT_ARMOR]);
  92                                         break;
  93                                 case 'x': // current rockets
  94                                         dpsnprintf(temp, sizeof(temp), "%i", cl.stats[STAT_ROCKETS]);
  95                                         break;
  96                                 case 'c': // current cells
  97                                         dpsnprintf(temp, sizeof(temp), "%i", cl.stats[STAT_CELLS]);
  98                                         break;
  99                                 // silly proquake macros
 100                                 case 'd': // loc at last death
 101                                         CL_Locs_FindLocationName(temp, sizeof(temp), cl.lastdeathorigin);
 102                                         break;
 103                                 case 't': // current time
 104                                         dpsnprintf(temp, sizeof(temp), "%.0f:%.0f", floor(cl.time / 60), cl.time - floor(cl.time / 60) * 60);
 105                                         break;
 106                                 case 'r': // rocket launcher status ("I have RL", "I need rockets", "I need RL")
 107                                         if (!(cl.stats[STAT_ITEMS] & IT_ROCKET_LAUNCHER))
 108                                                 dpsnprintf(temp, sizeof(temp), "I need RL");
 109                                         else if (!cl.stats[STAT_ROCKETS])
 110                                                 dpsnprintf(temp, sizeof(temp), "I need rockets");
 111                                         else
 112                                                 dpsnprintf(temp, sizeof(temp), "I have RL");
 113                                         break;
 114                                 case 'p': // powerup status (outputs "quad" "pent" and "eyes" according to status)
 115                                         if (cl.stats[STAT_ITEMS] & IT_QUAD)
 116                                         {
 117                                                 if (temp[0])
 118                                                         dp_strlcat(temp, " ", sizeof(temp));
 119                                                 dp_strlcat(temp, "quad", sizeof(temp));
 120                                         }
 121                                         if (cl.stats[STAT_ITEMS] & IT_INVULNERABILITY)
 122                                         {
 123                                                 if (temp[0])
 124                                                         dp_strlcat(temp, " ", sizeof(temp));
 125                                                 dp_strlcat(temp, "pent", sizeof(temp));
 126                                         }
 127                                         if (cl.stats[STAT_ITEMS] & IT_INVISIBILITY)
 128                                         {
 129                                                 if (temp[0])
 130                                                         dp_strlcat(temp, " ", sizeof(temp));
 131                                                 dp_strlcat(temp, "eyes", sizeof(temp));
 132                                         }
 133                                         break;
 134                                 case 'w': // weapon status (outputs "SSG:NG:SNG:GL:RL:LG" with the text between : characters omitted if you lack the weapon)
 135                                         if (cl.stats[STAT_ITEMS] & IT_SUPER_SHOTGUN)
 136                                                 dp_strlcat(temp, "SSG", sizeof(temp));
 137                                         dp_strlcat(temp, ":", sizeof(temp));
 138                                         if (cl.stats[STAT_ITEMS] & IT_NAILGUN)
 139                                                 dp_strlcat(temp, "NG", sizeof(temp));
 140                                         dp_strlcat(temp, ":", sizeof(temp));
 141                                         if (cl.stats[STAT_ITEMS] & IT_SUPER_NAILGUN)
 142                                                 dp_strlcat(temp, "SNG", sizeof(temp));
 143                                         dp_strlcat(temp, ":", sizeof(temp));
 144                                         if (cl.stats[STAT_ITEMS] & IT_GRENADE_LAUNCHER)
 145                                                 dp_strlcat(temp, "GL", sizeof(temp));
 146                                         dp_strlcat(temp, ":", sizeof(temp));
 147                                         if (cl.stats[STAT_ITEMS] & IT_ROCKET_LAUNCHER)
 148                                                 dp_strlcat(temp, "RL", sizeof(temp));
 149                                         dp_strlcat(temp, ":", sizeof(temp));
 150                                         if (cl.stats[STAT_ITEMS] & IT_LIGHTNING)
 151                                                 dp_strlcat(temp, "LG", sizeof(temp));
 152                                         break;
 153                                 default:
 154                                         // not a recognized macro, print it as-is...
 155                                         temp[0] = s[0];
 156                                         temp[1] = s[1];
 157                                         temp[2] = 0;
 158                                         break;
 159                                 }
 160                                 // write the resulting text
 161                                 SZ_Write(&cls.netcon->message, (unsigned char *)temp, (int)strlen(temp));
 162                                 s += 2;
 163                                 continue;
 164                         }
 165                         MSG_WriteByte(&cls.netcon->message, *s);
 166                         s++;
 167                 }
 168                 MSG_WriteByte(&cls.netcon->message, 0);
 169         }
 170         else // any other command is passed on as-is
 171                 SZ_Write(&cls.netcon->message, (const unsigned char *)s, (int)strlen(s) + 1);
 172 }
 173
 174 void CL_ForwardToServer_f (cmd_state_t *cmd)
 175 {
 176         const char *s;
 177         char vabuf[MAX_INPUTLINE];
 178         size_t i;
 179         if (!strcasecmp(Cmd_Argv(cmd, 0), "cmd"))
 180         {
 181                 // we want to strip off "cmd", so just send the args
 182                 s = Cmd_Argc(cmd) > 1 ? Cmd_Args(cmd) : "";
 183         }
 184         else
 185         {
 186                 // we need to keep the command name, so send Cmd_Argv(cmd, 0), a space and then Cmd_Args(cmd)
 187                 i = dpsnprintf(vabuf, sizeof(vabuf), "%s", Cmd_Argv(cmd, 0));
 188                 if(Cmd_Argc(cmd) > 1)
 189                         // (i + 1) accounts for the added space
 190                         dpsnprintf(&vabuf[i], sizeof(vabuf) - (i + 1), " %s", Cmd_Args(cmd));
 191                 s = vabuf;
 192         }
 193         // don't send an empty forward message if the user tries "cmd" by itself
 194         if (!s || !*s)
 195                 return;
 196         CL_ForwardToServer(s);
 197 }
 198
 199 static void CL_SendCvar_f(cmd_state_t *cmd)
 200 {
 201         cvar_t  *c;
 202         const char *cvarname;
 203         char vabuf[1024];
 204
 205         if(Cmd_Argc(cmd) != 2)
 206                 return;
 207         cvarname = Cmd_Argv(cmd, 1);
 208         if (cls.state == ca_connected)
 209         {
 210                 c = Cvar_FindVar(&cvars_all, cvarname, CF_CLIENT | CF_SERVER);
 211                 // LadyHavoc: if there is no such cvar or if it is private, send a
 212                 // reply indicating that it has no value
 213                 if(!c || (c->flags & CF_PRIVATE))
 214                         CL_ForwardToServer(va(vabuf, sizeof(vabuf), "sentcvar %s", cvarname));
 215                 else
 216                         CL_ForwardToServer(va(vabuf, sizeof(vabuf), "sentcvar %s \"%s\"", c->name, c->string));
 217                 return;
 218         }
 219 }
 220
 221 /*
 222 ==================
 223 CL_Name_f
 224
 225 The logic from div0-stable's Host_Name_f() is now in SV_Name_f().
 226 ==================
 227 */
 228 static void CL_Name_f(cmd_state_t *cmd)
 229 {
 230         char *newNameSource;
 231
 232         if (Cmd_Argc(cmd) == 1)
 233         {
 234                 Con_Printf("name: \"%s^7\"\n", cl_name.string);
 235                 return;
 236         }
 237
 238         // in the single-arg case any enclosing quotes shall be stripped
 239         newNameSource = (char *)(Cmd_Argc(cmd) == 2 ? Cmd_Argv(cmd, 1) : Cmd_Args(cmd));
 240
 241         if (strlen(newNameSource) >= MAX_SCOREBOARDNAME) // may as well truncate before networking
 242                 newNameSource[MAX_SCOREBOARDNAME - 1] = '\0'; // this is fine (cbuf stores length)
 243
 244         Cvar_SetQuick(&cl_name, newNameSource);
 245 }
 246
 247 /*
 248 ==================
 249 CL_Color_f
 250 ==================
 251 */
 252 cvar_t cl_color = {CF_CLIENT | CF_ARCHIVE, "_cl_color", "0", "internal storage cvar for current player colors (changed by color command)"};
 253
 254 // HACK: Ignore the callbacks so this two-to-three way synchronization doesn't cause an infinite loop.
 255 static void CL_Color_c(cvar_t *var)
 256 {
 257         char vabuf[1024];
 258         void (*callback_save)(cvar_t *);
 259
 260         callback_save = cl_topcolor.callback;
 261         cl_topcolor.callback = NULL;
 262         Cvar_SetQuick(&cl_topcolor, va(vabuf, sizeof(vabuf), "%i", ((var->integer >> 4) & 15)));
 263         cl_topcolor.callback = callback_save;
 264
 265         callback_save = cl_bottomcolor.callback;
 266         cl_bottomcolor.callback = NULL;
 267         Cvar_SetQuick(&cl_bottomcolor, va(vabuf, sizeof(vabuf), "%i", (var->integer & 15)));
 268         cl_bottomcolor.callback = callback_save;
 269 }
 270
 271 static void CL_Topcolor_c(cvar_t *var)
 272 {
 273         char vabuf[1024];
 274         void (*callback_save)(cvar_t *);
 275
 276         callback_save = cl_color.callback;
 277         cl_color.callback = NULL;
 278         Cvar_SetQuick(&cl_color, va(vabuf, sizeof(vabuf), "%i", var->integer*16 + cl_bottomcolor.integer));
 279         cl_color.callback = callback_save;
 280 }
 281
 282 static void CL_Bottomcolor_c(cvar_t *var)
 283 {
 284         char vabuf[1024];
 285         void (*callback_save)(cvar_t *);
 286
 287         callback_save = cl_color.callback;
 288         cl_color.callback = NULL;
 289         Cvar_SetQuick(&cl_color, va(vabuf, sizeof(vabuf), "%i", cl_topcolor.integer*16 + var->integer));
 290         cl_color.callback = callback_save;
 291 }
 292
 293 static void CL_Color_f(cmd_state_t *cmd)
 294 {
 295         int top, bottom;
 296
 297         if (Cmd_Argc(cmd) == 1)
 298         {
 299                 if (cmd->source == src_local)
 300                 {
 301                         Con_Printf("\"color\" is \"%i %i\"\n", cl_topcolor.integer, cl_bottomcolor.integer);
 302                         Con_Print("color <0-15> [0-15]\n");
 303                 }
 304                 return;
 305         }
 306
 307         if (Cmd_Argc(cmd) == 2)
 308                 top = bottom = atoi(Cmd_Argv(cmd, 1));
 309         else
 310         {
 311                 top = atoi(Cmd_Argv(cmd, 1));
 312                 bottom = atoi(Cmd_Argv(cmd, 2));
 313         }
 314         /*
 315          * This is just a convenient way to change topcolor and bottomcolor
 316          * We can't change cl_color from here directly because topcolor and
 317          * bottomcolor may be changed separately and do not call this function.
 318          * So it has to be changed when the userinfo strings are updated, which
 319          * happens twice here. Perhaps find a cleaner way?
 320          */
 321
 322         top = top >= 0 ? top : cl_topcolor.integer;
 323         bottom = bottom >= 0 ? bottom : cl_bottomcolor.integer;
 324
 325         top &= 15;
 326         bottom &= 15;
 327
 328         // LadyHavoc: allowing skin colormaps 14 and 15 by commenting this out
 329         //if (top > 13)
 330         //      top = 13;
 331         //if (bottom > 13)
 332         //      bottom = 13;
 333
 334         if (cmd->source == src_local)
 335         {
 336                 Cvar_SetValueQuick(&cl_topcolor, top);
 337                 Cvar_SetValueQuick(&cl_bottomcolor, bottom);
 338                 return;
 339         }
 340 }
 341
 342 /*
 343 ====================
 344 CL_User_f
 345
 346 user <name or userid>
 347
 348 Dump userdata / masterdata for a user
 349 ====================
 350 */
 351 static void CL_User_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
 352 {
 353         int             uid;
 354         int             i;
 355
 356         if (Cmd_Argc(cmd) != 2)
 357         {
 358                 Con_Printf ("Usage: user <username / userid>\n");
 359                 return;
 360         }
 361
 362         uid = atoi(Cmd_Argv(cmd, 1));
 363
 364         for (i = 0;i < cl.maxclients;i++)
 365         {
 366                 if (!cl.scores[i].name[0])
 367                         continue;
 368                 if (cl.scores[i].qw_userid == uid || !strcasecmp(cl.scores[i].name, Cmd_Argv(cmd, 1)))
 369                 {
 370                         InfoString_Print(cl.scores[i].qw_userinfo);
 371                         return;
 372                 }
 373         }
 374         Con_Printf ("User not in server.\n");
 375 }
 376
 377 /*
 378 ====================
 379 CL_Users_f
 380
 381 Dump userids for all current players
 382 ====================
 383 */
 384 static void CL_Users_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
 385 {
 386         int             i;
 387         int             c;
 388
 389         c = 0;
 390         Con_Printf ("userid frags name\n");
 391         Con_Printf ("------ ----- ----\n");
 392         for (i = 0;i < cl.maxclients;i++)
 393         {
 394                 if (cl.scores[i].name[0])
 395                 {
 396                         Con_Printf ("%6i %4i %s\n", cl.scores[i].qw_userid, cl.scores[i].frags, cl.scores[i].name);
 397                         c++;
 398                 }
 399         }
 400
 401         Con_Printf ("%i total users\n", c);
 402 }
 403
 404 /*
 405 ====================
 406 CL_Packet_f
 407
 408 packet <destination> <contents>
 409
 410 Contents allows \n escape character
 411 ====================
 412 */
 413 static void CL_Packet_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
 414 {
 415         char send[2048];
 416         int i, l;
 417         const char *in;
 418         char *out;
 419         lhnetaddress_t address;
 420         lhnetsocket_t *mysocket;
 421
 422         if (Cmd_Argc(cmd) != 3)
 423         {
 424                 Con_Printf ("packet <destination> <contents>\n");
 425                 return;
 426         }
 427
 428         if (!LHNETADDRESS_FromString (&address, Cmd_Argv(cmd, 1), sv_netport.integer))
 429         {
 430                 Con_Printf ("Bad address\n");
 431                 return;
 432         }
 433
 434         in = Cmd_Argv(cmd, 2);
 435         out = send+4;
 436         send[0] = send[1] = send[2] = send[3] = -1;
 437
 438         l = (int)strlen (in);
 439         for (i=0 ; i<l ; i++)
 440         {
 441                 if (out >= send + sizeof(send) - 1)
 442                         break;
 443                 if (in[i] == '\\' && in[i+1] == 'n')
 444                 {
 445                         *out++ = '\n';
 446                         i++;
 447                 }
 448                 else if (in[i] == '\\' && in[i+1] == '0')
 449                 {
 450                         *out++ = '\0';
 451                         i++;
 452                 }
 453                 else if (in[i] == '\\' && in[i+1] == 't')
 454                 {
 455                         *out++ = '\t';
 456                         i++;
 457                 }
 458                 else if (in[i] == '\\' && in[i+1] == 'r')
 459                 {
 460                         *out++ = '\r';
 461                         i++;
 462                 }
 463                 else if (in[i] == '\\' && in[i+1] == '"')
 464                 {
 465                         *out++ = '\"';
 466                         i++;
 467                 }
 468                 else
 469                         *out++ = in[i];
 470         }
 471
 472         mysocket = NetConn_ChooseClientSocketForAddress(&address);
 473         if (!mysocket)
 474                 mysocket = NetConn_ChooseServerSocketForAddress(&address);
 475         if (mysocket)
 476                 NetConn_Write(mysocket, send, out - send, &address);
 477 }
 478
 479 /*
 480 =====================
 481 CL_PQRcon_f
 482
 483 ProQuake rcon support
 484 =====================
 485 */
 486 static void CL_PQRcon_f(cmd_state_t *cmd)
 487 {
 488         int n;
 489         const char *e;
 490         lhnetsocket_t *mysocket;
 491
 492         if (Cmd_Argc(cmd) == 1)
 493         {
 494                 Con_Printf("%s: Usage: %s command\n", Cmd_Argv(cmd, 0), Cmd_Argv(cmd, 0));
 495                 return;
 496         }
 497
 498         if (!rcon_password.string || !rcon_password.string[0] || rcon_secure.integer > 0)
 499         {
 500                 Con_Printf ("You must set rcon_password before issuing an pqrcon command, and rcon_secure must be 0.\n");
 501                 return;
 502         }
 503
 504         e = strchr(rcon_password.string, ' ');
 505         n = e ? e-rcon_password.string : (int)strlen(rcon_password.string);
 506
 507         if (cls.netcon)
 508                 cls.rcon_address = cls.netcon->peeraddress;
 509         else
 510         {
 511                 if (!rcon_address.string[0])
 512                 {
 513                         Con_Printf ("You must either be connected, or set the rcon_address cvar to issue rcon commands\n");
 514                         return;
 515                 }
 516                 LHNETADDRESS_FromString(&cls.rcon_address, rcon_address.string, sv_netport.integer);
 517         }
 518         mysocket = NetConn_ChooseClientSocketForAddress(&cls.rcon_address);
 519         if (mysocket)
 520         {
 521                 sizebuf_t buf;
 522                 unsigned char bufdata[64];
 523                 buf.data = bufdata;
 524                 SZ_Clear(&buf);
 525                 MSG_WriteLong(&buf, 0);
 526                 MSG_WriteByte(&buf, CCREQ_RCON);
 527                 SZ_Write(&buf, (const unsigned char*)rcon_password.string, n);
 528                 MSG_WriteByte(&buf, 0); // terminate the (possibly partial) string
 529                 MSG_WriteString(&buf, Cmd_Args(cmd));
 530                 StoreBigLong(buf.data, NETFLAG_CTL | (buf.cursize & NETFLAG_LENGTH_MASK));
 531                 NetConn_Write(mysocket, buf.data, buf.cursize, &cls.rcon_address);
 532                 SZ_Clear(&buf);
 533         }
 534 }
 535
 536 /*
 537 =====================
 538 CL_Rcon_f
 539
 540   Send the rest of the command line over as
 541   an unconnected command.
 542 =====================
 543 */
 544 static void CL_Rcon_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
 545 {
 546         int i, n;
 547         const char *e;
 548         lhnetsocket_t *mysocket;
 549
 550         if (Cmd_Argc(cmd) == 1)
 551         {
 552                 Con_Printf("%s: Usage: %s command\n", Cmd_Argv(cmd, 0), Cmd_Argv(cmd, 0));
 553                 return;
 554         }
 555
 556         if (!rcon_password.string || !rcon_password.string[0])
 557         {
 558                 Con_Printf ("You must set rcon_password before issuing an rcon command.\n");
 559                 return;
 560         }
 561
 562         e = strchr(rcon_password.string, ' ');
 563         n = e ? e-rcon_password.string : (int)strlen(rcon_password.string);
 564
 565         if (cls.netcon)
 566                 cls.rcon_address = cls.netcon->peeraddress;
 567         else
 568         {
 569                 if (!rcon_address.string[0])
 570                 {
 571                         Con_Printf ("You must either be connected, or set the rcon_address cvar to issue rcon commands\n");
 572                         return;
 573                 }
 574                 LHNETADDRESS_FromString(&cls.rcon_address, rcon_address.string, sv_netport.integer);
 575         }
 576         mysocket = NetConn_ChooseClientSocketForAddress(&cls.rcon_address);
 577         if (mysocket && Cmd_Args(cmd)[0])
 578         {
 579                 // simply put together the rcon packet and send it
 580                 if(Cmd_Argv(cmd, 0)[0] == 's' || rcon_secure.integer > 1)
 581                 {
 582                         if(cls.rcon_commands[cls.rcon_ringpos][0])
 583                         {
 584                                 char s[128];
 585                                 LHNETADDRESS_ToString(&cls.rcon_addresses[cls.rcon_ringpos], s, sizeof(s), true);
 586                                 Con_Printf("rcon to %s (for command %s) failed: too many buffered commands (possibly increase MAX_RCONS)\n", s, cls.rcon_commands[cls.rcon_ringpos]);
 587                                 cls.rcon_commands[cls.rcon_ringpos][0] = 0;
 588                                 --cls.rcon_trying;
 589                         }
 590                         for (i = 0;i < MAX_RCONS;i++)
 591                                 if(cls.rcon_commands[i][0])
 592                                         if (!LHNETADDRESS_Compare(&cls.rcon_address, &cls.rcon_addresses[i]))
 593                                                 break;
 594                         ++cls.rcon_trying;
 595                         if(i >= MAX_RCONS)
 596                                 NetConn_WriteString(mysocket, "\377\377\377\377getchallenge", &cls.rcon_address); // otherwise we'll request the challenge later
 597                         dp_strlcpy(cls.rcon_commands[cls.rcon_ringpos], Cmd_Args(cmd), sizeof(cls.rcon_commands[cls.rcon_ringpos]));
 598                         cls.rcon_addresses[cls.rcon_ringpos] = cls.rcon_address;
 599                         cls.rcon_timeout[cls.rcon_ringpos] = host.realtime + rcon_secure_challengetimeout.value;
 600                         cls.rcon_ringpos = (cls.rcon_ringpos + 1) % MAX_RCONS;
 601                 }
 602                 else if(rcon_secure.integer > 0)
 603                 {
 604                         char buf[1500];
 605                         char argbuf[1500];
 606                         dpsnprintf(argbuf, sizeof(argbuf), "%ld.%06d %s", (long) time(NULL), (int) (rand() % 1000000), Cmd_Args(cmd));
 607                         memcpy(buf, "\377\377\377\377srcon HMAC-MD4 TIME ", 24);
 608                         if(HMAC_MDFOUR_16BYTES((unsigned char *) (buf + 24), (unsigned char *) argbuf, (int)strlen(argbuf), (unsigned char *) rcon_password.string, n))
 609                         {
 610                                 buf[40] = ' ';
 611                                 dp_strlcpy(buf + 41, argbuf, sizeof(buf) - 41);
 612                                 NetConn_Write(mysocket, buf, 41 + (int)strlen(buf + 41), &cls.rcon_address);
 613                         }
 614                 }
 615                 else
 616                 {
 617                         char buf[1500];
 618                         memcpy(buf, "\377\377\377\377", 4);
 619                         dpsnprintf(buf+4, sizeof(buf)-4, "rcon %.*s %s",  n, rcon_password.string, Cmd_Args(cmd));
 620                         NetConn_WriteString(mysocket, buf, &cls.rcon_address);
 621                 }
 622         }
 623 }
 624
 625 /*
 626 ==================
 627 CL_FullServerinfo_f
 628
 629 Sent by server when serverinfo changes
 630 ==================
 631 */
 632 // TODO: shouldn't this be a cvar instead?
 633 static void CL_FullServerinfo_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
 634 {
 635         char temp[512];
 636         if (Cmd_Argc(cmd) != 2)
 637         {
 638                 Con_Printf ("usage: fullserverinfo <complete info string>\n");
 639                 return;
 640         }
 641
 642         dp_strlcpy (cl.qw_serverinfo, Cmd_Argv(cmd, 1), sizeof(cl.qw_serverinfo));
 643         InfoString_GetValue(cl.qw_serverinfo, "teamplay", temp, sizeof(temp));
 644         cl.qw_teamplay = atoi(temp);
 645 }
 646
 647 /*
 648 ==================
 649 CL_FullInfo_f
 650
 651 Allow clients to change userinfo
 652 ==================
 653 Casey was here :)
 654 */
 655 static void CL_FullInfo_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
 656 {
 657         char key[512];
 658         char value[512];
 659         const char *s;
 660
 661         if (Cmd_Argc(cmd) != 2)
 662         {
 663                 Con_Printf ("fullinfo <complete info string>\n");
 664                 return;
 665         }
 666
 667         s = Cmd_Argv(cmd, 1);
 668         if (*s == '\\')
 669                 s++;
 670         while (*s)
 671         {
 672                 size_t len = strcspn(s, "\\");
 673                 if (len >= sizeof(key)) {
 674                         len = sizeof(key) - 1;
 675                 }
 676                 dp_strlcpy(key, s, len + 1);
 677                 s += len;
 678                 if (!*s)
 679                 {
 680                         Con_Printf ("MISSING VALUE\n");
 681                         return;
 682                 }
 683                 ++s; // Skip over backslash.
 684
 685                 len = strcspn(s, "\\");
 686                 if (len >= sizeof(value)) {
 687                         len = sizeof(value) - 1;
 688                 }
 689                 dp_strlcpy(value, s, len + 1);
 690
 691                 CL_SetInfo(key, value, false, false, false, false);
 692
 693                 s += len;
 694                 if (!*s)
 695                 {
 696                         break;
 697                 }
 698                 ++s; // Skip over backslash.
 699         }
 700 }
 701
 702 /*
 703 ==================
 704 CL_SetInfo_f
 705
 706 Allow clients to change userinfo
 707 ==================
 708 */
 709 static void CL_SetInfo_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
 710 {
 711         if (Cmd_Argc(cmd) == 1)
 712         {
 713                 InfoString_Print(cls.userinfo);
 714                 return;
 715         }
 716         if (Cmd_Argc(cmd) != 3)
 717         {
 718                 Con_Printf ("usage: setinfo [ <key> <value> ]\n");
 719                 return;
 720         }
 721         CL_SetInfo(Cmd_Argv(cmd, 1), Cmd_Argv(cmd, 2), true, false, false, false);
 722 }
 723
 724 static void CL_PingPLReport_f(cmd_state_t *cmd)
 725 {
 726         char *errbyte;
 727         int i;
 728         int l = Cmd_Argc(cmd);
 729         if (l > cl.maxclients)
 730                 l = cl.maxclients;
 731         for (i = 0;i < l;i++)
 732         {
 733                 cl.scores[i].qw_ping = atoi(Cmd_Argv(cmd, 1+i*2));
 734                 cl.scores[i].qw_packetloss = strtol(Cmd_Argv(cmd, 1+i*2+1), &errbyte, 0);
 735                 if(errbyte && *errbyte == ',')
 736                         cl.scores[i].qw_movementloss = atoi(errbyte + 1);
 737                 else
 738                         cl.scores[i].qw_movementloss = 0;
 739         }
 740 }
 741
 742 void CL_InitCommands(void)
 743 {
 744         dpsnprintf(cls.userinfo, sizeof(cls.userinfo), "\\name\\player\\team\\none\\topcolor\\0\\bottomcolor\\0\\rate\\10000\\msg\\1\\noaim\\1\\*ver\\dp");
 745
 746         /* In Quake `name` is a command that concatenates its arguments (quotes unnecessary)
 747          * which is expected in most DP-based games.
 748          * In QuakeWorld it's a cvar which requires quotes if spaces are used.
 749          */
 750         Cvar_RegisterVariable(&cl_name);
 751         if ((0)) // TODO: if (gamemode == GAME_QUAKEWORLD)
 752                 Cvar_RegisterVirtual(&cl_name, "name");
 753         else
 754                 Cmd_AddCommand(CF_CLIENT, "name", CL_Name_f, "change your player name");
 755
 756         Cvar_RegisterVariable(&cl_rate);
 757         Cvar_RegisterVirtual(&cl_rate, "_cl_rate");
 758         Cvar_RegisterVariable(&cl_rate_burstsize);
 759         Cvar_RegisterVirtual(&cl_rate_burstsize, "_cl_rate_burstsize");
 760         Cvar_RegisterVariable(&cl_pmodel);
 761         Cvar_RegisterVirtual(&cl_pmodel, "_cl_pmodel");
 762         Cvar_RegisterVariable(&cl_color);
 763         Cvar_RegisterCallback(&cl_color, CL_Color_c);
 764         Cvar_RegisterVariable(&cl_topcolor);
 765         Cvar_RegisterCallback(&cl_topcolor, CL_Topcolor_c);
 766         Cvar_RegisterVariable(&cl_bottomcolor);
 767         Cvar_RegisterCallback(&cl_bottomcolor, CL_Bottomcolor_c);
 768         Cvar_RegisterVariable(&r_fixtrans_auto);
 769         Cvar_RegisterVariable(&cl_team);
 770         Cvar_RegisterVariable(&cl_skin);
 771         Cvar_RegisterVariable(&cl_noaim);
 772
 773         Cmd_AddCommand(CF_CLIENT | CF_CLIENT_FROM_SERVER, "cmd", CL_ForwardToServer_f, "send a console commandline to the server (used by some mods)");
 774         Cmd_AddCommand(CF_CLIENT, "color", CL_Color_f, "change your player shirt and pants colors");
 775         Cmd_AddCommand(CF_CLIENT, "rcon", CL_Rcon_f, "sends a command to the server console (if your rcon_password matches the server's rcon_password), or to the address specified by rcon_address when not connected (again rcon_password must match the server's); note: if rcon_secure is set, client and server clocks must be synced e.g. via NTP");
 776         Cmd_AddCommand(CF_CLIENT, "srcon", CL_Rcon_f, "sends a command to the server console (if your rcon_password matches the server's rcon_password), or to the address specified by rcon_address when not connected (again rcon_password must match the server's); this always works as if rcon_secure is set; note: client and server clocks must be synced e.g. via NTP");
 777         Cmd_AddCommand(CF_CLIENT, "pqrcon", CL_PQRcon_f, "sends a command to a proquake server console (if your rcon_password matches the server's rcon_password), or to the address specified by rcon_address when not connected (again rcon_password must match the server's)");
 778         Cmd_AddCommand(CF_SHARED, "user", CL_User_f, "prints additional information about a player number or name on the scoreboard");
 779         Cmd_AddCommand(CF_SHARED, "users", CL_Users_f, "prints additional information about all players on the scoreboard");
 780         Cmd_AddCommand(CF_CLIENT, "packet", CL_Packet_f, "send a packet to the specified address:port containing a text string");
 781         Cmd_AddCommand(CF_CLIENT, "fullinfo", CL_FullInfo_f, "allows client to modify their userinfo");
 782         Cmd_AddCommand(CF_CLIENT, "setinfo", CL_SetInfo_f, "modifies your userinfo");
 783         Cmd_AddCommand(CF_CLIENT, "fixtrans", Image_FixTransparentPixels_f, "change alpha-zero pixels in an image file to sensible values, and write out a new TGA (warning: SLOW)");
 784         host.hook.CL_SendCvar = CL_SendCvar_f;
 785
 786         // commands that are only sent by server to client for execution
 787         Cmd_AddCommand(CF_CLIENT_FROM_SERVER, "pingplreport", CL_PingPLReport_f, "command sent by server containing client ping and packet loss values for scoreboard, triggered by pings command from client (not used by QW servers)");
 788         Cmd_AddCommand(CF_CLIENT_FROM_SERVER, "fullserverinfo", CL_FullServerinfo_f, "internal use only, sent by server to client to update client's local copy of serverinfo string");
 789 }