2 Copyright (C) 1996-1997 Id Software, Inc.
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.
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.
13 See the GNU General Public License for more details.
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.
20 // cvar.c -- dynamic variable tracking
24 cvar_t *cvar_vars = NULL;
25 char *cvar_null_string = "";
32 cvar_t *Cvar_FindVar (const char *var_name)
36 for (var = cvar_vars;var;var = var->next)
37 if (!strcasecmp (var_name, var->name))
43 cvar_t *Cvar_FindVarAfter (const char *prev_var_name, int neededflags)
49 var = Cvar_FindVar (prev_var_name);
57 // search for the next cvar matching the needed flags
60 if ((var->flags & neededflags) || !neededflags)
72 float Cvar_VariableValue (const char *var_name)
76 var = Cvar_FindVar (var_name);
79 return atof (var->string);
88 const char *Cvar_VariableString (const char *var_name)
92 var = Cvar_FindVar (var_name);
94 return cvar_null_string;
101 Cvar_CompleteVariable
104 const char *Cvar_CompleteVariable (const char *partial)
109 len = strlen(partial);
115 for (cvar=cvar_vars ; cvar ; cvar=cvar->next)
116 if (!strncasecmp (partial,cvar->name, len))
124 CVar_CompleteCountPossible
126 New function for tab-completion system
128 Thanks to Fett erich@heintz.com
131 int Cvar_CompleteCountPossible (const char *partial)
138 len = strlen(partial);
143 // Loop through the cvars and count all possible matches
144 for (cvar = cvar_vars; cvar; cvar = cvar->next)
145 if (!strncasecmp(partial, cvar->name, len))
152 CVar_CompleteBuildList
154 New function for tab-completion system
156 Thanks to Fett erich@heintz.com
160 const char **Cvar_CompleteBuildList (const char *partial)
165 int sizeofbuf = (Cvar_CompleteCountPossible (partial) + 1) * sizeof (const char *);
168 len = strlen(partial);
169 buf = Mem_Alloc(tempmempool, sizeofbuf + sizeof (const char *));
170 // Loop through the alias list and print all matches
171 for (cvar = cvar_vars; cvar; cvar = cvar->next)
172 if (!strncasecmp(partial, cvar->name, len))
173 buf[bpos++] = cvar->name;
184 void Cvar_SetQuick_Internal (cvar_t *var, const char *value)
188 changed = strcmp(var->string, value);
189 // LordHavoc: don't reallocate when there is no change
193 // LordHavoc: don't reallocate when the buffer is the same size
194 if (!var->string || strlen(var->string) != strlen(value))
196 Z_Free (var->string); // free the old value string
198 var->string = Z_Malloc (strlen(value)+1);
200 strcpy (var->string, value);
201 var->value = atof (var->string);
202 var->integer = (int) var->value;
203 if ((var->flags & CVAR_NOTIFY) && changed && sv.active)
204 SV_BroadcastPrintf("\"%s\" changed to \"%s\"\n", var->name, var->string);
207 void Cvar_SetQuick (cvar_t *var, const char *value)
211 Con_Print("Cvar_SetQuick: var == NULL\n");
215 if (developer.integer)
216 Con_Printf("Cvar_SetQuick({\"%s\", \"%s\", %i}, \"%s\");\n", var->name, var->string, var->flags, value);
218 Cvar_SetQuick_Internal(var, value);
221 void Cvar_Set (const char *var_name, const char *value)
224 var = Cvar_FindVar (var_name);
227 Con_Printf("Cvar_Set: variable %s not found\n", var_name);
230 Cvar_SetQuick(var, value);
238 void Cvar_SetValueQuick(cvar_t *var, float value)
242 if ((float)((int)value) == value)
243 sprintf(val, "%i", (int)value);
245 sprintf(val, "%f", value);
246 Cvar_SetQuick(var, val);
249 void Cvar_SetValue(const char *var_name, float value)
253 if ((float)((int)value) == value)
254 sprintf(val, "%i", (int)value);
256 sprintf(val, "%f", value);
257 Cvar_Set(var_name, val);
262 Cvar_RegisterVariable
264 Adds a freestanding variable to the variable list.
267 void Cvar_RegisterVariable (cvar_t *variable)
269 cvar_t *cvar, *cvar2;
272 if (developer.integer)
273 Con_Printf("Cvar_RegisterVariable({\"%s\", \"%s\", %i});\n", variable->name, variable->string, variable->flags);
275 // first check to see if it has already been defined
276 cvar = Cvar_FindVar (variable->name);
279 if (cvar->flags & CVAR_ALLOCATED)
281 if (developer.integer)
282 Con_Printf("... replacing existing allocated cvar {\"%s\", \"%s\", %i}", cvar->name, cvar->string, cvar->flags);
283 // fixed variables replace allocated ones
284 // (because the engine directly accesses fixed variables)
285 // NOTE: this isn't actually used currently
286 // (all cvars are registered before config parsing)
287 variable->flags |= (cvar->flags & ~CVAR_ALLOCATED);
288 // cvar->string is now owned by variable instead
289 variable->string = cvar->string;
290 variable->value = atof (variable->string);
291 variable->integer = (int) variable->value;
292 // replace cvar with this one...
293 variable->next = cvar->next;
294 if (cvar_vars == cvar)
296 // head of the list is easy to change
297 cvar_vars = variable;
301 // otherwise find it somewhere in the list
302 for (cvar2 = cvar_vars;cvar2->next != cvar;cvar2 = cvar2->next);
303 if (cvar2->next == cvar)
304 cvar2->next = variable;
307 // get rid of old allocated cvar
308 // (but not the cvar->string, because we kept that)
313 Con_Printf("Can't register variable %s, already defined\n", variable->name);
317 // check for overlap with a command
318 if (Cmd_Exists (variable->name))
320 Con_Printf("Cvar_RegisterVariable: %s is a command\n", variable->name);
324 // copy the value off, because future sets will Z_Free it
325 oldstr = variable->string;
326 variable->string = Z_Malloc (strlen(variable->string)+1);
327 strcpy (variable->string, oldstr);
328 variable->value = atof (variable->string);
329 variable->integer = (int) variable->value;
331 // link the variable in
332 // alphanumerical order
333 for( cvar = NULL, cvar2 = cvar_vars ; cvar2 && strcmp( cvar2->name, variable->name ) < 0 ; cvar = cvar2, cvar2 = cvar->next )
336 cvar->next = variable;
338 cvar_vars = variable;
340 variable->next = cvar2;
347 Adds a newly allocated variable to the variable list or sets its value.
350 cvar_t *Cvar_Get (const char *name, const char *value, int flags)
354 if (developer.integer)
355 Con_Printf("Cvar_Get(\"%s\", \"%s\", %i);\n", name, value, flags);
357 // first check to see if it has already been defined
358 cvar = Cvar_FindVar (name);
361 cvar->flags |= flags;
362 Cvar_SetQuick_Internal (cvar, value);
366 // check for overlap with a command
367 if (Cmd_Exists (name))
369 Con_Printf("Cvar_Get: %s is a command\n", name);
373 // allocate a new cvar, cvar name, and cvar string
374 // FIXME: these never get Z_Free'd
375 cvar = Z_Malloc(sizeof(cvar_t));
376 cvar->flags = flags | CVAR_ALLOCATED;
377 cvar->name = Z_Malloc(strlen(name)+1);
378 strcpy(cvar->name, name);
379 cvar->string = Z_Malloc(strlen(value)+1);
380 strcpy(cvar->string, value);
381 cvar->value = atof (cvar->string);
382 cvar->integer = (int) cvar->value;
384 // link the variable in
385 cvar->next = cvar_vars;
395 Handles variable inspection and changing from the console
398 qboolean Cvar_Command (void)
403 v = Cvar_FindVar (Cmd_Argv(0));
407 // perform a variable print or set
410 Con_Printf("\"%s\" is \"%s\"\n", v->name, v->string);
414 Con_DPrint("Cvar_Command: ");
416 if (v->flags & CVAR_READONLY)
418 Con_Printf("%s is read-only\n", v->name);
421 Cvar_Set (v->name, Cmd_Argv(1));
430 Writes lines containing "set variable value" for all variables
431 with the archive flag set to true.
434 void Cvar_WriteVariables (qfile_t *f)
438 for (var = cvar_vars ; var ; var = var->next)
439 if (var->flags & CVAR_SAVE)
440 FS_Printf(f, "%s%s \"%s\"\n", var->flags & CVAR_ALLOCATED ? "seta " : "", var->name, var->string);
444 // Added by EvilTypeGuy eviltypeguy@qeradiant.com
445 // 2000-01-09 CvarList command By Matthias "Maddes" Buecher, http://www.inside3d.com/qip/
451 void Cvar_List_f (void)
459 partial = Cmd_Argv (1);
460 len = strlen(partial);
469 for (cvar = cvar_vars; cvar; cvar = cvar->next)
471 if (partial && strncasecmp (partial,cvar->name,len))
474 Con_Printf("%s is \"%s\"\n", cvar->name, cvar->string);
478 Con_Printf("%i cvar(s)", count);
480 Con_Printf(" beginning with \"%s\"", partial);
483 // 2000-01-09 CvarList command by Maddes
485 void Cvar_Set_f (void)
489 // make sure it's the right number of parameters
492 Con_Printf("Set: wrong number of parameters, usage: set <variablename> <value>\n");
496 // check if it's read-only
497 cvar = Cvar_FindVar(Cmd_Argv(1));
498 if (cvar && cvar->flags & CVAR_READONLY)
500 Con_Printf("Set: %s is read-only\n", cvar->name);
506 // all looks ok, create/modify the cvar
507 Cvar_Get(Cmd_Argv(1), Cmd_Argv(2), 0);
510 void Cvar_SetA_f (void)
514 // make sure it's the right number of parameters
517 Con_Printf("SetA: wrong number of parameters, usage: seta <variablename> <value>\n");
521 // check if it's read-only
522 cvar = Cvar_FindVar(Cmd_Argv(1));
523 if (cvar && cvar->flags & CVAR_READONLY)
525 Con_Printf("SetA: %s is read-only\n", cvar->name);
529 Con_DPrint("SetA: ");
531 // all looks ok, create/modify the cvar
532 Cvar_Get(Cmd_Argv(1), Cmd_Argv(2), CVAR_SAVE);