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