]> git.xonotic.org Git - xonotic/darkplaces.git/blob - cl_cmd.c
Make `name` be a command or virtual cvar on a game-specific basis
[xonotic/darkplaces.git] / 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, "_cl_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_Name_f
222
223 The logic from div0-stable's Host_Name_f() is now in SV_Name_f().
224 ==================
225 */
226 static void CL_Name_f(cmd_state_t *cmd)
227 {
228         char *newNameSource;
229
230         if (Cmd_Argc(cmd) == 1)
231         {
232                 Con_Printf("name: \"%s^7\"\n", cl_name.string);
233                 return;
234         }
235
236         // in the single-arg case any enclosing quotes shall be stripped
237         newNameSource = (char *)(Cmd_Argc(cmd) == 2 ? Cmd_Argv(cmd, 1) : Cmd_Args(cmd));
238
239         if (strlen(newNameSource) >= MAX_SCOREBOARDNAME) // may as well truncate before networking
240                 newNameSource[MAX_SCOREBOARDNAME - 1] = '\0'; // this is fine (cbuf stores length)
241
242         Cvar_SetQuick(&cl_name, newNameSource);
243 }
244
245 /*
246 ==================
247 CL_Color_f
248 ==================
249 */
250 cvar_t cl_color = {CF_CLIENT | CF_ARCHIVE, "_cl_color", "0", "internal storage cvar for current player colors (changed by color command)"};
251
252 // HACK: Ignore the callbacks so this two-to-three way synchronization doesn't cause an infinite loop.
253 static void CL_Color_c(cvar_t *var)
254 {
255         char vabuf[1024];
256         void (*callback_save)(cvar_t *);
257
258         callback_save = cl_topcolor.callback;
259         cl_topcolor.callback = NULL;
260         Cvar_SetQuick(&cl_topcolor, va(vabuf, sizeof(vabuf), "%i", ((var->integer >> 4) & 15)));
261         cl_topcolor.callback = callback_save;
262
263         callback_save = cl_bottomcolor.callback;
264         cl_bottomcolor.callback = NULL;
265         Cvar_SetQuick(&cl_bottomcolor, va(vabuf, sizeof(vabuf), "%i", (var->integer & 15)));
266         cl_bottomcolor.callback = callback_save;
267 }
268
269 static void CL_Topcolor_c(cvar_t *var)
270 {
271         char vabuf[1024];
272         void (*callback_save)(cvar_t *);
273
274         callback_save = cl_color.callback;
275         cl_color.callback = NULL;
276         Cvar_SetQuick(&cl_color, va(vabuf, sizeof(vabuf), "%i", var->integer*16 + cl_bottomcolor.integer));
277         cl_color.callback = callback_save;
278 }
279
280 static void CL_Bottomcolor_c(cvar_t *var)
281 {
282         char vabuf[1024];
283         void (*callback_save)(cvar_t *);
284
285         callback_save = cl_color.callback;
286         cl_color.callback = NULL;
287         Cvar_SetQuick(&cl_color, va(vabuf, sizeof(vabuf), "%i", cl_topcolor.integer*16 + var->integer));
288         cl_color.callback = callback_save;
289 }
290
291 static void CL_Color_f(cmd_state_t *cmd)
292 {
293         int top, bottom;
294
295         if (Cmd_Argc(cmd) == 1)
296         {
297                 if (cmd->source == src_local)
298                 {
299                         Con_Printf("\"color\" is \"%i %i\"\n", cl_topcolor.integer, cl_bottomcolor.integer);
300                         Con_Print("color <0-15> [0-15]\n");
301                 }
302                 return;
303         }
304
305         if (Cmd_Argc(cmd) == 2)
306                 top = bottom = atoi(Cmd_Argv(cmd, 1));
307         else
308         {
309                 top = atoi(Cmd_Argv(cmd, 1));
310                 bottom = atoi(Cmd_Argv(cmd, 2));
311         }
312         /*
313          * This is just a convenient way to change topcolor and bottomcolor
314          * We can't change cl_color from here directly because topcolor and
315          * bottomcolor may be changed separately and do not call this function.
316          * So it has to be changed when the userinfo strings are updated, which
317          * happens twice here. Perhaps find a cleaner way?
318          */
319
320         top = top >= 0 ? top : cl_topcolor.integer;
321         bottom = bottom >= 0 ? bottom : cl_bottomcolor.integer;
322
323         top &= 15;
324         bottom &= 15;
325
326         // LadyHavoc: allowing skin colormaps 14 and 15 by commenting this out
327         //if (top > 13)
328         //      top = 13;
329         //if (bottom > 13)
330         //      bottom = 13;
331
332         if (cmd->source == src_local)
333         {
334                 Cvar_SetValueQuick(&cl_topcolor, top);
335                 Cvar_SetValueQuick(&cl_bottomcolor, bottom);
336                 return;
337         }
338 }
339
340 /*
341 ====================
342 CL_User_f
343
344 user <name or userid>
345
346 Dump userdata / masterdata for a user
347 ====================
348 */
349 static void CL_User_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
350 {
351         int             uid;
352         int             i;
353
354         if (Cmd_Argc(cmd) != 2)
355         {
356                 Con_Printf ("Usage: user <username / userid>\n");
357                 return;
358         }
359
360         uid = atoi(Cmd_Argv(cmd, 1));
361
362         for (i = 0;i < cl.maxclients;i++)
363         {
364                 if (!cl.scores[i].name[0])
365                         continue;
366                 if (cl.scores[i].qw_userid == uid || !strcasecmp(cl.scores[i].name, Cmd_Argv(cmd, 1)))
367                 {
368                         InfoString_Print(cl.scores[i].qw_userinfo);
369                         return;
370                 }
371         }
372         Con_Printf ("User not in server.\n");
373 }
374
375 /*
376 ====================
377 CL_Users_f
378
379 Dump userids for all current players
380 ====================
381 */
382 static void CL_Users_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
383 {
384         int             i;
385         int             c;
386
387         c = 0;
388         Con_Printf ("userid frags name\n");
389         Con_Printf ("------ ----- ----\n");
390         for (i = 0;i < cl.maxclients;i++)
391         {
392                 if (cl.scores[i].name[0])
393                 {
394                         Con_Printf ("%6i %4i %s\n", cl.scores[i].qw_userid, cl.scores[i].frags, cl.scores[i].name);
395                         c++;
396                 }
397         }
398
399         Con_Printf ("%i total users\n", c);
400 }
401
402 /*
403 ====================
404 CL_Packet_f
405
406 packet <destination> <contents>
407
408 Contents allows \n escape character
409 ====================
410 */
411 static void CL_Packet_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
412 {
413         char send[2048];
414         int i, l;
415         const char *in;
416         char *out;
417         lhnetaddress_t address;
418         lhnetsocket_t *mysocket;
419
420         if (Cmd_Argc(cmd) != 3)
421         {
422                 Con_Printf ("packet <destination> <contents>\n");
423                 return;
424         }
425
426         if (!LHNETADDRESS_FromString (&address, Cmd_Argv(cmd, 1), sv_netport.integer))
427         {
428                 Con_Printf ("Bad address\n");
429                 return;
430         }
431
432         in = Cmd_Argv(cmd, 2);
433         out = send+4;
434         send[0] = send[1] = send[2] = send[3] = -1;
435
436         l = (int)strlen (in);
437         for (i=0 ; i<l ; i++)
438         {
439                 if (out >= send + sizeof(send) - 1)
440                         break;
441                 if (in[i] == '\\' && in[i+1] == 'n')
442                 {
443                         *out++ = '\n';
444                         i++;
445                 }
446                 else if (in[i] == '\\' && in[i+1] == '0')
447                 {
448                         *out++ = '\0';
449                         i++;
450                 }
451                 else if (in[i] == '\\' && in[i+1] == 't')
452                 {
453                         *out++ = '\t';
454                         i++;
455                 }
456                 else if (in[i] == '\\' && in[i+1] == 'r')
457                 {
458                         *out++ = '\r';
459                         i++;
460                 }
461                 else if (in[i] == '\\' && in[i+1] == '"')
462                 {
463                         *out++ = '\"';
464                         i++;
465                 }
466                 else
467                         *out++ = in[i];
468         }
469
470         mysocket = NetConn_ChooseClientSocketForAddress(&address);
471         if (!mysocket)
472                 mysocket = NetConn_ChooseServerSocketForAddress(&address);
473         if (mysocket)
474                 NetConn_Write(mysocket, send, out - send, &address);
475 }
476
477 /*
478 =====================
479 CL_PQRcon_f
480
481 ProQuake rcon support
482 =====================
483 */
484 static void CL_PQRcon_f(cmd_state_t *cmd)
485 {
486         int n;
487         const char *e;
488         lhnetsocket_t *mysocket;
489
490         if (Cmd_Argc(cmd) == 1)
491         {
492                 Con_Printf("%s: Usage: %s command\n", Cmd_Argv(cmd, 0), Cmd_Argv(cmd, 0));
493                 return;
494         }
495
496         if (!rcon_password.string || !rcon_password.string[0] || rcon_secure.integer > 0)
497         {
498                 Con_Printf ("You must set rcon_password before issuing an pqrcon command, and rcon_secure must be 0.\n");
499                 return;
500         }
501
502         e = strchr(rcon_password.string, ' ');
503         n = e ? e-rcon_password.string : (int)strlen(rcon_password.string);
504
505         if (cls.netcon)
506                 cls.rcon_address = cls.netcon->peeraddress;
507         else
508         {
509                 if (!rcon_address.string[0])
510                 {
511                         Con_Printf ("You must either be connected, or set the rcon_address cvar to issue rcon commands\n");
512                         return;
513                 }
514                 LHNETADDRESS_FromString(&cls.rcon_address, rcon_address.string, sv_netport.integer);
515         }
516         mysocket = NetConn_ChooseClientSocketForAddress(&cls.rcon_address);
517         if (mysocket)
518         {
519                 sizebuf_t buf;
520                 unsigned char bufdata[64];
521                 buf.data = bufdata;
522                 SZ_Clear(&buf);
523                 MSG_WriteLong(&buf, 0);
524                 MSG_WriteByte(&buf, CCREQ_RCON);
525                 SZ_Write(&buf, (const unsigned char*)rcon_password.string, n);
526                 MSG_WriteByte(&buf, 0); // terminate the (possibly partial) string
527                 MSG_WriteString(&buf, Cmd_Args(cmd));
528                 StoreBigLong(buf.data, NETFLAG_CTL | (buf.cursize & NETFLAG_LENGTH_MASK));
529                 NetConn_Write(mysocket, buf.data, buf.cursize, &cls.rcon_address);
530                 SZ_Clear(&buf);
531         }
532 }
533
534 /*
535 =====================
536 CL_Rcon_f
537
538   Send the rest of the command line over as
539   an unconnected command.
540 =====================
541 */
542 static void CL_Rcon_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
543 {
544         int i, n;
545         const char *e;
546         lhnetsocket_t *mysocket;
547
548         if (Cmd_Argc(cmd) == 1)
549         {
550                 Con_Printf("%s: Usage: %s command\n", Cmd_Argv(cmd, 0), Cmd_Argv(cmd, 0));
551                 return;
552         }
553
554         if (!rcon_password.string || !rcon_password.string[0])
555         {
556                 Con_Printf ("You must set rcon_password before issuing an rcon command.\n");
557                 return;
558         }
559
560         e = strchr(rcon_password.string, ' ');
561         n = e ? e-rcon_password.string : (int)strlen(rcon_password.string);
562
563         if (cls.netcon)
564                 cls.rcon_address = cls.netcon->peeraddress;
565         else
566         {
567                 if (!rcon_address.string[0])
568                 {
569                         Con_Printf ("You must either be connected, or set the rcon_address cvar to issue rcon commands\n");
570                         return;
571                 }
572                 LHNETADDRESS_FromString(&cls.rcon_address, rcon_address.string, sv_netport.integer);
573         }
574         mysocket = NetConn_ChooseClientSocketForAddress(&cls.rcon_address);
575         if (mysocket && Cmd_Args(cmd)[0])
576         {
577                 // simply put together the rcon packet and send it
578                 if(Cmd_Argv(cmd, 0)[0] == 's' || rcon_secure.integer > 1)
579                 {
580                         if(cls.rcon_commands[cls.rcon_ringpos][0])
581                         {
582                                 char s[128];
583                                 LHNETADDRESS_ToString(&cls.rcon_addresses[cls.rcon_ringpos], s, sizeof(s), true);
584                                 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]);
585                                 cls.rcon_commands[cls.rcon_ringpos][0] = 0;
586                                 --cls.rcon_trying;
587                         }
588                         for (i = 0;i < MAX_RCONS;i++)
589                                 if(cls.rcon_commands[i][0])
590                                         if (!LHNETADDRESS_Compare(&cls.rcon_address, &cls.rcon_addresses[i]))
591                                                 break;
592                         ++cls.rcon_trying;
593                         if(i >= MAX_RCONS)
594                                 NetConn_WriteString(mysocket, "\377\377\377\377getchallenge", &cls.rcon_address); // otherwise we'll request the challenge later
595                         strlcpy(cls.rcon_commands[cls.rcon_ringpos], Cmd_Args(cmd), sizeof(cls.rcon_commands[cls.rcon_ringpos]));
596                         cls.rcon_addresses[cls.rcon_ringpos] = cls.rcon_address;
597                         cls.rcon_timeout[cls.rcon_ringpos] = host.realtime + rcon_secure_challengetimeout.value;
598                         cls.rcon_ringpos = (cls.rcon_ringpos + 1) % MAX_RCONS;
599                 }
600                 else if(rcon_secure.integer > 0)
601                 {
602                         char buf[1500];
603                         char argbuf[1500];
604                         dpsnprintf(argbuf, sizeof(argbuf), "%ld.%06d %s", (long) time(NULL), (int) (rand() % 1000000), Cmd_Args(cmd));
605                         memcpy(buf, "\377\377\377\377srcon HMAC-MD4 TIME ", 24);
606                         if(HMAC_MDFOUR_16BYTES((unsigned char *) (buf + 24), (unsigned char *) argbuf, (int)strlen(argbuf), (unsigned char *) rcon_password.string, n))
607                         {
608                                 buf[40] = ' ';
609                                 strlcpy(buf + 41, argbuf, sizeof(buf) - 41);
610                                 NetConn_Write(mysocket, buf, 41 + (int)strlen(buf + 41), &cls.rcon_address);
611                         }
612                 }
613                 else
614                 {
615                         char buf[1500];
616                         memcpy(buf, "\377\377\377\377", 4);
617                         dpsnprintf(buf+4, sizeof(buf)-4, "rcon %.*s %s",  n, rcon_password.string, Cmd_Args(cmd));
618                         NetConn_WriteString(mysocket, buf, &cls.rcon_address);
619                 }
620         }
621 }
622
623 /*
624 ==================
625 CL_FullServerinfo_f
626
627 Sent by server when serverinfo changes
628 ==================
629 */
630 // TODO: shouldn't this be a cvar instead?
631 static void CL_FullServerinfo_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
632 {
633         char temp[512];
634         if (Cmd_Argc(cmd) != 2)
635         {
636                 Con_Printf ("usage: fullserverinfo <complete info string>\n");
637                 return;
638         }
639
640         strlcpy (cl.qw_serverinfo, Cmd_Argv(cmd, 1), sizeof(cl.qw_serverinfo));
641         InfoString_GetValue(cl.qw_serverinfo, "teamplay", temp, sizeof(temp));
642         cl.qw_teamplay = atoi(temp);
643 }
644
645 /*
646 ==================
647 CL_FullInfo_f
648
649 Allow clients to change userinfo
650 ==================
651 Casey was here :)
652 */
653 static void CL_FullInfo_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
654 {
655         char key[512];
656         char value[512];
657         const char *s;
658
659         if (Cmd_Argc(cmd) != 2)
660         {
661                 Con_Printf ("fullinfo <complete info string>\n");
662                 return;
663         }
664
665         s = Cmd_Argv(cmd, 1);
666         if (*s == '\\')
667                 s++;
668         while (*s)
669         {
670                 size_t len = strcspn(s, "\\");
671                 if (len >= sizeof(key)) {
672                         len = sizeof(key) - 1;
673                 }
674                 strlcpy(key, s, len + 1);
675                 s += len;
676                 if (!*s)
677                 {
678                         Con_Printf ("MISSING VALUE\n");
679                         return;
680                 }
681                 ++s; // Skip over backslash.
682
683                 len = strcspn(s, "\\");
684                 if (len >= sizeof(value)) {
685                         len = sizeof(value) - 1;
686                 }
687                 strlcpy(value, s, len + 1);
688
689                 CL_SetInfo(key, value, false, false, false, false);
690
691                 s += len;
692                 if (!*s)
693                 {
694                         break;
695                 }
696                 ++s; // Skip over backslash.
697         }
698 }
699
700 /*
701 ==================
702 CL_SetInfo_f
703
704 Allow clients to change userinfo
705 ==================
706 */
707 static void CL_SetInfo_f(cmd_state_t *cmd) // credit: taken from QuakeWorld
708 {
709         if (Cmd_Argc(cmd) == 1)
710         {
711                 InfoString_Print(cls.userinfo);
712                 return;
713         }
714         if (Cmd_Argc(cmd) != 3)
715         {
716                 Con_Printf ("usage: setinfo [ <key> <value> ]\n");
717                 return;
718         }
719         CL_SetInfo(Cmd_Argv(cmd, 1), Cmd_Argv(cmd, 2), true, false, false, false);
720 }
721
722 static void CL_PingPLReport_f(cmd_state_t *cmd)
723 {
724         char *errbyte;
725         int i;
726         int l = Cmd_Argc(cmd);
727         if (l > cl.maxclients)
728                 l = cl.maxclients;
729         for (i = 0;i < l;i++)
730         {
731                 cl.scores[i].qw_ping = atoi(Cmd_Argv(cmd, 1+i*2));
732                 cl.scores[i].qw_packetloss = strtol(Cmd_Argv(cmd, 1+i*2+1), &errbyte, 0);
733                 if(errbyte && *errbyte == ',')
734                         cl.scores[i].qw_movementloss = atoi(errbyte + 1);
735                 else
736                         cl.scores[i].qw_movementloss = 0;
737         }
738 }
739
740 void CL_InitCommands(void)
741 {
742         dpsnprintf(cls.userinfo, sizeof(cls.userinfo), "\\name\\player\\team\\none\\topcolor\\0\\bottomcolor\\0\\rate\\10000\\msg\\1\\noaim\\1\\*ver\\dp");
743
744         /* In Quake `name` is a command that concatenates its arguments (quotes unnecessary)
745          * which is expected in most DP-based games.
746          * In QuakeWorld it's a cvar which requires quotes if spaces are used.
747          */
748         Cvar_RegisterVariable(&cl_name);
749         if ((0)) // TODO: if (gamemode == GAME_QUAKEWORLD)
750                 Cvar_RegisterVirtual(&cl_name, "name");
751         else
752                 Cmd_AddCommand(CF_CLIENT, "name", CL_Name_f, "change your player name");
753
754         Cvar_RegisterVariable(&cl_rate);
755         Cvar_RegisterVirtual(&cl_rate, "_cl_rate");
756         Cvar_RegisterVariable(&cl_rate_burstsize);
757         Cvar_RegisterVirtual(&cl_rate_burstsize, "_cl_rate_burstsize");
758         Cvar_RegisterVariable(&cl_pmodel);
759         Cvar_RegisterVirtual(&cl_pmodel, "_cl_pmodel");
760         Cvar_RegisterVariable(&cl_color);
761         Cvar_RegisterCallback(&cl_color, CL_Color_c);
762         Cvar_RegisterVariable(&cl_topcolor);
763         Cvar_RegisterCallback(&cl_topcolor, CL_Topcolor_c);
764         Cvar_RegisterVariable(&cl_bottomcolor);
765         Cvar_RegisterCallback(&cl_bottomcolor, CL_Bottomcolor_c);
766         Cvar_RegisterVariable(&r_fixtrans_auto);
767         Cvar_RegisterVariable(&cl_team);
768         Cvar_RegisterVariable(&cl_skin);
769         Cvar_RegisterVariable(&cl_noaim);       
770
771         Cmd_AddCommand(CF_CLIENT | CF_CLIENT_FROM_SERVER, "cmd", CL_ForwardToServer_f, "send a console commandline to the server (used by some mods)");
772         Cmd_AddCommand(CF_CLIENT, "color", CL_Color_f, "change your player shirt and pants colors");
773         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");
774         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");
775         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)");
776         Cmd_AddCommand(CF_SHARED, "user", CL_User_f, "prints additional information about a player number or name on the scoreboard");
777         Cmd_AddCommand(CF_SHARED, "users", CL_Users_f, "prints additional information about all players on the scoreboard");
778         Cmd_AddCommand(CF_CLIENT, "packet", CL_Packet_f, "send a packet to the specified address:port containing a text string");
779         Cmd_AddCommand(CF_CLIENT, "fullinfo", CL_FullInfo_f, "allows client to modify their userinfo");
780         Cmd_AddCommand(CF_CLIENT, "setinfo", CL_SetInfo_f, "modifies your userinfo");
781         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)");
782         host.hook.CL_SendCvar = CL_SendCvar_f;
783
784         // commands that are only sent by server to client for execution
785         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)");
786         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");
787 }