cvar.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 // cvar.c -- dynamic variable tracking
  21
  22 #include "quakedef.h"
  23
  24 char *cvar_dummy_description = "custom cvar";
  25
  26 cvar_t *cvar_vars = NULL;
  27 cvar_t *cvar_hashtable[CVAR_HASHSIZE];
  28 char *cvar_null_string = "";
  29
  30 /*
  31 ============
  32 Cvar_FindVar
  33 ============
  34 */
  35 cvar_t *Cvar_FindVar (const char *var_name)
  36 {
  37         int hashindex;
  38         cvar_t *var;
  39
  40         // use hash lookup to minimize search time
  41         hashindex = CRC_Block((const unsigned char *)var_name, strlen(var_name));
  42         for (var = cvar_hashtable[hashindex];var;var = var->nextonhashchain)
  43                 if (!strcmp (var_name, var->name))
  44                         return var;
  45
  46         return NULL;
  47 }
  48
  49 cvar_t *Cvar_FindVarAfter (const char *prev_var_name, int neededflags)
  50 {
  51         cvar_t *var;
  52
  53         if (*prev_var_name)
  54         {
  55                 var = Cvar_FindVar (prev_var_name);
  56                 if (!var)
  57                         return NULL;
  58                 var = var->next;
  59         }
  60         else
  61                 var = cvar_vars;
  62
  63         // search for the next cvar matching the needed flags
  64         while (var)
  65         {
  66                 if ((var->flags & neededflags) || !neededflags)
  67                         break;
  68                 var = var->next;
  69         }
  70         return var;
  71 }
  72
  73 /*
  74 ============
  75 Cvar_VariableValue
  76 ============
  77 */
  78 float Cvar_VariableValue (const char *var_name)
  79 {
  80         cvar_t *var;
  81
  82         var = Cvar_FindVar (var_name);
  83         if (!var)
  84                 return 0;
  85         return atof (var->string);
  86 }
  87
  88
  89 /*
  90 ============
  91 Cvar_VariableString
  92 ============
  93 */
  94 const char *Cvar_VariableString (const char *var_name)
  95 {
  96         cvar_t *var;
  97
  98         var = Cvar_FindVar (var_name);
  99         if (!var)
 100                 return cvar_null_string;
 101         return var->string;
 102 }
 103
 104 /*
 105 ============
 106 Cvar_VariableDefString
 107 ============
 108 */
 109 const char *Cvar_VariableDefString (const char *var_name)
 110 {
 111         cvar_t *var;
 112
 113         var = Cvar_FindVar (var_name);
 114         if (!var)
 115                 return cvar_null_string;
 116         return var->defstring;
 117 }
 118
 119 /*
 120 ============
 121 Cvar_VariableDescription
 122 ============
 123 */
 124 const char *Cvar_VariableDescription (const char *var_name)
 125 {
 126         cvar_t *var;
 127
 128         var = Cvar_FindVar (var_name);
 129         if (!var)
 130                 return cvar_null_string;
 131         return var->description;
 132 }
 133
 134
 135 /*
 136 ============
 137 Cvar_CompleteVariable
 138 ============
 139 */
 140 const char *Cvar_CompleteVariable (const char *partial)
 141 {
 142         cvar_t          *cvar;
 143         size_t          len;
 144
 145         len = strlen(partial);
 146
 147         if (!len)
 148                 return NULL;
 149
 150 // check functions
 151         for (cvar=cvar_vars ; cvar ; cvar=cvar->next)
 152                 if (!strncasecmp (partial,cvar->name, len))
 153                         return cvar->name;
 154
 155         return NULL;
 156 }
 157
 158
 159 /*
 160         CVar_CompleteCountPossible
 161
 162         New function for tab-completion system
 163         Added by EvilTypeGuy
 164         Thanks to Fett erich@heintz.com
 165
 166 */
 167 int Cvar_CompleteCountPossible (const char *partial)
 168 {
 169         cvar_t  *cvar;
 170         size_t  len;
 171         int             h;
 172
 173         h = 0;
 174         len = strlen(partial);
 175
 176         if (!len)
 177                 return  0;
 178
 179         // Loop through the cvars and count all possible matches
 180         for (cvar = cvar_vars; cvar; cvar = cvar->next)
 181                 if (!strncasecmp(partial, cvar->name, len))
 182                         h++;
 183
 184         return h;
 185 }
 186
 187 /*
 188         CVar_CompleteBuildList
 189
 190         New function for tab-completion system
 191         Added by EvilTypeGuy
 192         Thanks to Fett erich@heintz.com
 193         Thanks to taniwha
 194
 195 */
 196 const char **Cvar_CompleteBuildList (const char *partial)
 197 {
 198         const cvar_t *cvar;
 199         size_t len = 0;
 200         size_t bpos = 0;
 201         size_t sizeofbuf = (Cvar_CompleteCountPossible (partial) + 1) * sizeof (const char *);
 202         const char **buf;
 203
 204         len = strlen(partial);
 205         buf = (const char **)Mem_Alloc(tempmempool, sizeofbuf + sizeof (const char *));
 206         // Loop through the alias list and print all matches
 207         for (cvar = cvar_vars; cvar; cvar = cvar->next)
 208                 if (!strncasecmp(partial, cvar->name, len))
 209                         buf[bpos++] = cvar->name;
 210
 211         buf[bpos] = NULL;
 212         return buf;
 213 }
 214
 215 // written by LordHavoc
 216 void Cvar_CompleteCvarPrint (const char *partial)
 217 {
 218         cvar_t *cvar;
 219         size_t len = strlen(partial);
 220         // Loop through the command list and print all matches
 221         for (cvar = cvar_vars; cvar; cvar = cvar->next)
 222                 if (!strncasecmp(partial, cvar->name, len))
 223                         Con_Printf ("^3%s^7 is \"%s\" [\"%s\"] %s\n", cvar->name, cvar->string, cvar->defstring, cvar->description);
 224 }
 225
 226
 227 /*
 228 ============
 229 Cvar_Set
 230 ============
 231 */
 232 void Cvar_SetQuick_Internal (cvar_t *var, const char *value)
 233 {
 234         qboolean changed;
 235         size_t valuelen;
 236
 237         changed = strcmp(var->string, value) != 0;
 238         // LordHavoc: don't reallocate when there is no change
 239         if (!changed)
 240                 return;
 241
 242         // LordHavoc: don't reallocate when the buffer is the same size
 243         valuelen = strlen(value);
 244         if (!var->string || strlen(var->string) != valuelen)
 245         {
 246                 Z_Free (var->string);   // free the old value string
 247
 248                 var->string = (char *)Z_Malloc (valuelen + 1);
 249         }
 250         memcpy (var->string, value, valuelen + 1);
 251         var->value = atof (var->string);
 252         var->integer = (int) var->value;
 253         if ((var->flags & CVAR_NOTIFY) && changed && sv.active)
 254                 SV_BroadcastPrintf("\"%s\" changed to \"%s\"\n", var->name, var->string);
 255 #if 0
 256         // TODO: add infostring support to the server?
 257         if ((var->flags & CVAR_SERVERINFO) && changed && sv.active)
 258         {
 259                 InfoString_SetValue(svs.serverinfo, sizeof(svs.serverinfo), var->name, var->string);
 260                 if (sv.active)
 261                 {
 262                         MSG_WriteByte (&sv.reliable_datagram, svc_serverinfostring);
 263                         MSG_WriteString (&sv.reliable_datagram, var->name);
 264                         MSG_WriteString (&sv.reliable_datagram, var->string);
 265                 }
 266         }
 267 #endif
 268         if ((var->flags & CVAR_USERINFO) && cls.state != ca_dedicated)
 269                 CL_SetInfo(var->name, var->string, true, false, false, false);
 270         else if ((var->flags & CVAR_NQUSERINFOHACK) && cls.state != ca_dedicated)
 271         {
 272                 // update the cls.userinfo to have proper values for the
 273                 // silly nq config variables.
 274                 //
 275                 // this is done when these variables are changed rather than at
 276                 // connect time because if the user or code checks the userinfo and it
 277                 // holds weird values it may cause confusion...
 278                 if (!strcmp(var->name, "_cl_color"))
 279                 {
 280                         int top = (var->integer >> 4) & 15, bottom = var->integer & 15;
 281                         CL_SetInfo("topcolor", va("%i", top), true, false, false, false);
 282                         CL_SetInfo("bottomcolor", va("%i", bottom), true, false, false, false);
 283                         if (cls.protocol != PROTOCOL_QUAKEWORLD && cls.netcon)
 284                         {
 285                                 MSG_WriteByte(&cls.netcon->message, clc_stringcmd);
 286                                 MSG_WriteString(&cls.netcon->message, va("color %i %i", top, bottom));
 287                         }
 288                 }
 289                 else if (!strcmp(var->name, "_cl_rate"))
 290                         CL_SetInfo("rate", va("%i", var->integer), true, false, false, false);
 291                 else if (!strcmp(var->name, "_cl_playerskin"))
 292                         CL_SetInfo("playerskin", var->string, true, false, false, false);
 293                 else if (!strcmp(var->name, "_cl_playermodel"))
 294                         CL_SetInfo("playermodel", var->string, true, false, false, false);
 295                 else if (!strcmp(var->name, "_cl_name"))
 296                         CL_SetInfo("name", var->string, true, false, false, false);
 297                 else if (!strcmp(var->name, "rcon_secure"))
 298                 {
 299                         // whenever rcon_secure is changed to 0, clear rcon_password for
 300                         // security reasons (prevents a send-rcon-password-as-plaintext
 301                         // attack based on NQ protocol session takeover and svc_stufftext)
 302                         if(var->integer <= 0)
 303                                 Cvar_Set("rcon_password", "");
 304                 }
 305                 else if (!strcmp(var->name, "net_slist_favorites"))
 306                         NetConn_UpdateFavorites();
 307         }
 308 }
 309
 310 void Cvar_SetQuick (cvar_t *var, const char *value)
 311 {
 312         if (var == NULL)
 313         {
 314                 Con_Print("Cvar_SetQuick: var == NULL\n");
 315                 return;
 316         }
 317
 318         if (developer.integer >= 100)
 319                 Con_Printf("Cvar_SetQuick({\"%s\", \"%s\", %i, \"%s\"}, \"%s\");\n", var->name, var->string, var->flags, var->defstring, value);
 320
 321         Cvar_SetQuick_Internal(var, value);
 322 }
 323
 324 void Cvar_Set (const char *var_name, const char *value)
 325 {
 326         cvar_t *var;
 327         var = Cvar_FindVar (var_name);
 328         if (var == NULL)
 329         {
 330                 Con_Printf("Cvar_Set: variable %s not found\n", var_name);
 331                 return;
 332         }
 333         Cvar_SetQuick(var, value);
 334 }
 335
 336 /*
 337 ============
 338 Cvar_SetValue
 339 ============
 340 */
 341 void Cvar_SetValueQuick(cvar_t *var, float value)
 342 {
 343         char val[MAX_INPUTLINE];
 344
 345         if ((float)((int)value) == value)
 346                 dpsnprintf(val, sizeof(val), "%i", (int)value);
 347         else
 348                 dpsnprintf(val, sizeof(val), "%f", value);
 349         Cvar_SetQuick(var, val);
 350 }
 351
 352 void Cvar_SetValue(const char *var_name, float value)
 353 {
 354         char val[MAX_INPUTLINE];
 355
 356         if ((float)((int)value) == value)
 357                 dpsnprintf(val, sizeof(val), "%i", (int)value);
 358         else
 359                 dpsnprintf(val, sizeof(val), "%f", value);
 360         Cvar_Set(var_name, val);
 361 }
 362
 363 /*
 364 ============
 365 Cvar_RegisterVariable
 366
 367 Adds a freestanding variable to the variable list.
 368 ============
 369 */
 370 void Cvar_RegisterVariable (cvar_t *variable)
 371 {
 372         int hashindex;
 373         cvar_t *current, *next, *cvar;
 374         char *oldstr;
 375         size_t alloclen;
 376
 377         if (developer.integer >= 100)
 378                 Con_Printf("Cvar_RegisterVariable({\"%s\", \"%s\", %i});\n", variable->name, variable->string, variable->flags);
 379
 380 // first check to see if it has already been defined
 381         cvar = Cvar_FindVar (variable->name);
 382         if (cvar)
 383         {
 384                 if (cvar->flags & CVAR_ALLOCATED)
 385                 {
 386                         if (developer.integer >= 100)
 387                                 Con_Printf("...  replacing existing allocated cvar {\"%s\", \"%s\", %i}\n", cvar->name, cvar->string, cvar->flags);
 388                         // fixed variables replace allocated ones
 389                         // (because the engine directly accesses fixed variables)
 390                         // NOTE: this isn't actually used currently
 391                         // (all cvars are registered before config parsing)
 392                         variable->flags |= (cvar->flags & ~CVAR_ALLOCATED);
 393                         // cvar->string is now owned by variable instead
 394                         variable->string = cvar->string;
 395                         variable->defstring = cvar->defstring;
 396                         variable->value = atof (variable->string);
 397                         variable->integer = (int) variable->value;
 398                         // replace cvar with this one...
 399                         variable->next = cvar->next;
 400                         if (cvar_vars == cvar)
 401                         {
 402                                 // head of the list is easy to change
 403                                 cvar_vars = variable;
 404                         }
 405                         else
 406                         {
 407                                 // otherwise find it somewhere in the list
 408                                 for (current = cvar_vars;current->next != cvar;current = current->next)
 409                                         ;
 410                                 current->next = variable;
 411                         }
 412
 413                         // get rid of old allocated cvar
 414                         // (but not cvar->string and cvar->defstring, because we kept those)
 415                         Z_Free(cvar->name);
 416                         Z_Free(cvar);
 417                 }
 418                 else
 419                         Con_Printf("Can't register variable %s, already defined\n", variable->name);
 420                 return;
 421         }
 422
 423 // check for overlap with a command
 424         if (Cmd_Exists (variable->name))
 425         {
 426                 Con_Printf("Cvar_RegisterVariable: %s is a command\n", variable->name);
 427                 return;
 428         }
 429
 430 // copy the value off, because future sets will Z_Free it
 431         oldstr = variable->string;
 432         alloclen = strlen(variable->string) + 1;
 433         variable->string = (char *)Z_Malloc (alloclen);
 434         memcpy (variable->string, oldstr, alloclen);
 435         variable->defstring = (char *)Z_Malloc (alloclen);
 436         memcpy (variable->defstring, oldstr, alloclen);
 437         variable->value = atof (variable->string);
 438         variable->integer = (int) variable->value;
 439
 440 // link the variable in
 441 // alphanumerical order
 442         for( current = NULL, next = cvar_vars ; next && strcmp( next->name, variable->name ) < 0 ; current = next, next = next->next )
 443                 ;
 444         if( current ) {
 445                 current->next = variable;
 446         } else {
 447                 cvar_vars = variable;
 448         }
 449         variable->next = next;
 450
 451         // link to head of list in this hash table index
 452         hashindex = CRC_Block((const unsigned char *)variable->name, strlen(variable->name));
 453         variable->nextonhashchain = cvar_hashtable[hashindex];
 454         cvar_hashtable[hashindex] = variable;
 455 }
 456
 457 /*
 458 ============
 459 Cvar_Get
 460
 461 Adds a newly allocated variable to the variable list or sets its value.
 462 ============
 463 */
 464 cvar_t *Cvar_Get (const char *name, const char *value, int flags, const char *newdescription)
 465 {
 466         int hashindex;
 467         cvar_t *current, *next, *cvar;
 468         size_t alloclen;
 469
 470         if (developer.integer >= 100)
 471                 Con_Printf("Cvar_Get(\"%s\", \"%s\", %i);\n", name, value, flags);
 472
 473 // first check to see if it has already been defined
 474         cvar = Cvar_FindVar (name);
 475         if (cvar)
 476         {
 477                 cvar->flags |= flags;
 478                 Cvar_SetQuick_Internal (cvar, value);
 479                 if(newdescription && (cvar->flags & CVAR_ALLOCATED))
 480                 {
 481                         if(cvar->description != cvar_dummy_description)
 482                                 Z_Free(cvar->description);
 483
 484                         if(*newdescription)
 485                         {
 486                                 alloclen = strlen(newdescription) + 1;
 487                                 cvar->description = (char *)Z_Malloc(alloclen);
 488                                 memcpy(cvar->description, newdescription, alloclen);
 489                         }
 490                         else
 491                                 cvar->description = cvar_dummy_description;
 492                 }
 493                 return cvar;
 494         }
 495
 496 // check for pure evil
 497         if (!*name)
 498         {
 499                 Con_Printf("Cvar_Get: invalid variable name\n");
 500                 return NULL;
 501         }
 502
 503 // check for overlap with a command
 504         if (Cmd_Exists (name))
 505         {
 506                 Con_Printf("Cvar_Get: %s is a command\n", name);
 507                 return NULL;
 508         }
 509
 510 // allocate a new cvar, cvar name, and cvar string
 511 // TODO: factorize the following code with the one at the end of Cvar_RegisterVariable()
 512 // FIXME: these never get Z_Free'd
 513         cvar = (cvar_t *)Z_Malloc(sizeof(cvar_t));
 514         cvar->flags = flags | CVAR_ALLOCATED;
 515         alloclen = strlen(name) + 1;
 516         cvar->name = (char *)Z_Malloc(alloclen);
 517         memcpy(cvar->name, name, alloclen);
 518         alloclen = strlen(value) + 1;
 519         cvar->string = (char *)Z_Malloc(alloclen);
 520         memcpy(cvar->string, value, alloclen);
 521         cvar->defstring = (char *)Z_Malloc(alloclen);
 522         memcpy(cvar->defstring, value, alloclen);
 523         cvar->value = atof (cvar->string);
 524         cvar->integer = (int) cvar->value;
 525
 526         if(newdescription && *newdescription)
 527         {
 528                 alloclen = strlen(newdescription) + 1;
 529                 cvar->description = (char *)Z_Malloc(alloclen);
 530                 memcpy(cvar->description, newdescription, alloclen);
 531         }
 532         else
 533                 cvar->description = cvar_dummy_description; // actually checked by VM_cvar_type
 534
 535 // link the variable in
 536 // alphanumerical order
 537         for( current = NULL, next = cvar_vars ; next && strcmp( next->name, cvar->name ) < 0 ; current = next, next = next->next )
 538                 ;
 539         if( current )
 540                 current->next = cvar;
 541         else
 542                 cvar_vars = cvar;
 543         cvar->next = next;
 544
 545         // link to head of list in this hash table index
 546         hashindex = CRC_Block((const unsigned char *)cvar->name, strlen(cvar->name));
 547         cvar->nextonhashchain = cvar_hashtable[hashindex];
 548         cvar_hashtable[hashindex] = cvar;
 549
 550         return cvar;
 551 }
 552
 553
 554 /*
 555 ============
 556 Cvar_Command
 557
 558 Handles variable inspection and changing from the console
 559 ============
 560 */
 561 qboolean        Cvar_Command (void)
 562 {
 563         cvar_t                  *v;
 564
 565 // check variables
 566         v = Cvar_FindVar (Cmd_Argv(0));
 567         if (!v)
 568                 return false;
 569
 570 // perform a variable print or set
 571         if (Cmd_Argc() == 1)
 572         {
 573                 Con_Printf("\"%s\" is \"%s\" [\"%s\"]\n", v->name, ((v->flags & CVAR_PRIVATE) ? "********"/*hunter2*/ : v->string), v->defstring);
 574                 return true;
 575         }
 576
 577         if (developer.integer >= 100)
 578                 Con_DPrint("Cvar_Command: ");
 579
 580         if (v->flags & CVAR_READONLY)
 581         {
 582                 Con_Printf("%s is read-only\n", v->name);
 583                 return true;
 584         }
 585         Cvar_Set (v->name, Cmd_Argv(1));
 586         if (developer.integer >= 100)
 587                 Con_DPrint("\n");
 588         return true;
 589 }
 590
 591
 592 void Cvar_UnlockDefaults (void)
 593 {
 594         cvar_t *var;
 595         // unlock the default values of all cvars
 596         for (var = cvar_vars ; var ; var = var->next)
 597                 var->flags &= ~CVAR_DEFAULTSET;
 598 }
 599
 600
 601 void Cvar_LockDefaults_f (void)
 602 {
 603         cvar_t *var;
 604         // lock in the default values of all cvars
 605         for (var = cvar_vars ; var ; var = var->next)
 606         {
 607                 if (!(var->flags & CVAR_DEFAULTSET))
 608                 {
 609                         size_t alloclen;
 610
 611                         //Con_Printf("locking cvar %s (%s -> %s)\n", var->name, var->string, var->defstring);
 612                         var->flags |= CVAR_DEFAULTSET;
 613                         Z_Free(var->defstring);
 614                         alloclen = strlen(var->string) + 1;
 615                         var->defstring = (char *)Z_Malloc(alloclen);
 616                         memcpy(var->defstring, var->string, alloclen);
 617                 }
 618         }
 619 }
 620
 621
 622 void Cvar_ResetToDefaults_All_f (void)
 623 {
 624         cvar_t *var;
 625         // restore the default values of all cvars
 626         for (var = cvar_vars ; var ; var = var->next)
 627                 if((var->flags & CVAR_NORESETTODEFAULTS) == 0)
 628                         Cvar_SetQuick(var, var->defstring);
 629 }
 630
 631
 632 void Cvar_ResetToDefaults_NoSaveOnly_f (void)
 633 {
 634         cvar_t *var;
 635         // restore the default values of all cvars
 636         for (var = cvar_vars ; var ; var = var->next)
 637                 if ((var->flags & (CVAR_NORESETTODEFAULTS | CVAR_SAVE)) == 0)
 638                         Cvar_SetQuick(var, var->defstring);
 639 }
 640
 641
 642 void Cvar_ResetToDefaults_SaveOnly_f (void)
 643 {
 644         cvar_t *var;
 645         // restore the default values of all cvars
 646         for (var = cvar_vars ; var ; var = var->next)
 647                 if ((var->flags & (CVAR_NORESETTODEFAULTS | CVAR_SAVE)) == CVAR_SAVE)
 648                         Cvar_SetQuick(var, var->defstring);
 649 }
 650
 651
 652 /*
 653 ============
 654 Cvar_WriteVariables
 655
 656 Writes lines containing "set variable value" for all variables
 657 with the archive flag set to true.
 658 ============
 659 */
 660 void Cvar_WriteVariables (qfile_t *f)
 661 {
 662         cvar_t  *var;
 663         char buf1[MAX_INPUTLINE], buf2[MAX_INPUTLINE];
 664
 665         // don't save cvars that match their default value
 666         for (var = cvar_vars ; var ; var = var->next)
 667                 if ((var->flags & CVAR_SAVE) && (strcmp(var->string, var->defstring) || (var->flags & CVAR_ALLOCATED)))
 668                 {
 669                         Cmd_QuoteString(buf1, sizeof(buf1), var->name, "\"\\$");
 670                         Cmd_QuoteString(buf2, sizeof(buf2), var->string, "\"\\$");
 671                         FS_Printf(f, "%s\"%s\" \"%s\"\n", var->flags & CVAR_ALLOCATED ? "seta " : "", buf1, buf2);
 672                 }
 673 }
 674
 675
 676 // Added by EvilTypeGuy eviltypeguy@qeradiant.com
 677 // 2000-01-09 CvarList command By Matthias "Maddes" Buecher, http://www.inside3d.com/qip/
 678 /*
 679 =========
 680 Cvar_List
 681 =========
 682 */
 683 void Cvar_List_f (void)
 684 {
 685         cvar_t *cvar;
 686         const char *partial;
 687         size_t len;
 688         int count;
 689         qboolean ispattern;
 690
 691         if (Cmd_Argc() > 1)
 692         {
 693                 partial = Cmd_Argv (1);
 694                 len = strlen(partial);
 695         }
 696         else
 697         {
 698                 partial = NULL;
 699                 len = 0;
 700         }
 701
 702         ispattern = partial && (strchr(partial, '*') || strchr(partial, '?'));
 703
 704         count = 0;
 705         for (cvar = cvar_vars; cvar; cvar = cvar->next)
 706         {
 707                 if (len && (ispattern ? !matchpattern_with_separator(cvar->name, partial, false, "", false) : strncmp (partial,cvar->name,len)))
 708                         continue;
 709
 710                 Con_Printf("%s is \"%s\" [\"%s\"] %s\n", cvar->name, ((cvar->flags & CVAR_PRIVATE) ? "********"/*hunter2*/ : cvar->string), cvar->defstring, cvar->description);
 711                 count++;
 712         }
 713
 714         if (len)
 715         {
 716                 if(ispattern)
 717                         Con_Printf("%i cvar%s matching \"%s\"\n", count, (count > 1) ? "s" : "", partial);
 718                 else
 719                         Con_Printf("%i cvar%s beginning with \"%s\"\n", count, (count > 1) ? "s" : "", partial);
 720         }
 721         else
 722                 Con_Printf("%i cvar(s)\n", count);
 723 }
 724 // 2000-01-09 CvarList command by Maddes
 725
 726 void Cvar_Set_f (void)
 727 {
 728         cvar_t *cvar;
 729
 730         // make sure it's the right number of parameters
 731         if (Cmd_Argc() < 3)
 732         {
 733                 Con_Printf("Set: wrong number of parameters, usage: set <variablename> <value> [<description>]\n");
 734                 return;
 735         }
 736
 737         // check if it's read-only
 738         cvar = Cvar_FindVar(Cmd_Argv(1));
 739         if (cvar && cvar->flags & CVAR_READONLY)
 740         {
 741                 Con_Printf("Set: %s is read-only\n", cvar->name);
 742                 return;
 743         }
 744
 745         if (developer.integer >= 100)
 746                 Con_DPrint("Set: ");
 747
 748         // all looks ok, create/modify the cvar
 749         Cvar_Get(Cmd_Argv(1), Cmd_Argv(2), 0, Cmd_Argc() > 3 ? Cmd_Argv(3) : NULL);
 750 }
 751
 752 void Cvar_SetA_f (void)
 753 {
 754         cvar_t *cvar;
 755
 756         // make sure it's the right number of parameters
 757         if (Cmd_Argc() < 3)
 758         {
 759                 Con_Printf("SetA: wrong number of parameters, usage: seta <variablename> <value> [<description>]\n");
 760                 return;
 761         }
 762
 763         // check if it's read-only
 764         cvar = Cvar_FindVar(Cmd_Argv(1));
 765         if (cvar && cvar->flags & CVAR_READONLY)
 766         {
 767                 Con_Printf("SetA: %s is read-only\n", cvar->name);
 768                 return;
 769         }
 770
 771         if (developer.integer >= 100)
 772                 Con_DPrint("SetA: ");
 773
 774         // all looks ok, create/modify the cvar
 775         Cvar_Get(Cmd_Argv(1), Cmd_Argv(2), CVAR_SAVE, Cmd_Argc() > 3 ? Cmd_Argv(3) : NULL);
 776 }
 777
 778 #ifdef FILLALLCVARSWITHRUBBISH
 779 void Cvar_FillAll_f()
 780 {
 781         char *buf, *p, *q;
 782         int n, i;
 783         cvar_t *var;
 784         qboolean verify;
 785         if(Cmd_Argc() != 2)
 786         {
 787                 Con_Printf("Usage: %s length to plant rubbish\n", Cmd_Argv(0));
 788                 Con_Printf("Usage: %s -length to verify that the rubbish is still there\n", Cmd_Argv(0));
 789                 return;
 790         }
 791         n = atoi(Cmd_Argv(1));
 792         verify = (n < 0);
 793         if(verify)
 794                 n = -n;
 795         buf = Z_Malloc(n + 1);
 796         buf[n] = 0;
 797         for(var = cvar_vars; var; var = var->next)
 798         {
 799                 for(i = 0, p = buf, q = var->name; i < n; ++i)
 800                 {
 801                         *p++ = *q++;
 802                         if(!*q)
 803                                 q = var->name;
 804                 }
 805                 if(verify && strcmp(var->string, buf))
 806                 {
 807                         Con_Printf("\n%s does not contain the right rubbish, either this is the first run or a possible overrun was detected, or something changed it intentionally; it DOES contain: %s\n", var->name, var->string);
 808                 }
 809                 Cvar_SetQuick(var, buf);
 810         }
 811         Z_Free(buf);
 812 }
 813 #endif /* FILLALLCVARSWITHRUBBISH */