got rid of buildnumber.c and buildnum program, now uses builddate.c (touched each...
[xonotic/darkplaces.git] / 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 cvar_t  *cvar_vars;
25 char    *cvar_null_string = "";
26
27 /*
28 ============
29 Cvar_FindVar
30 ============
31 */
32 cvar_t *Cvar_FindVar (char *var_name)
33 {
34         cvar_t  *var;
35
36         for (var=cvar_vars ; var ; var=var->next)
37                 if (!strcmp (var_name, var->name))
38                         return var;
39
40         return NULL;
41 }
42
43 /*
44 ============
45 Cvar_VariableValue
46 ============
47 */
48 float   Cvar_VariableValue (char *var_name)
49 {
50         cvar_t  *var;
51
52         var = Cvar_FindVar (var_name);
53         if (!var)
54                 return 0;
55         return atof (var->string);
56 }
57
58
59 /*
60 ============
61 Cvar_VariableString
62 ============
63 */
64 char *Cvar_VariableString (char *var_name)
65 {
66         cvar_t *var;
67
68         var = Cvar_FindVar (var_name);
69         if (!var)
70                 return cvar_null_string;
71         return var->string;
72 }
73
74
75 /*
76 ============
77 Cvar_CompleteVariable
78 ============
79 */
80 char *Cvar_CompleteVariable (char *partial)
81 {
82         cvar_t          *cvar;
83         int                     len;
84
85         len = strlen(partial);
86
87         if (!len)
88                 return NULL;
89
90 // check functions
91         for (cvar=cvar_vars ; cvar ; cvar=cvar->next)
92                 if (!strncmp (partial,cvar->name, len))
93                         return cvar->name;
94
95         return NULL;
96 }
97
98
99 /*
100         CVar_CompleteCountPossible
101
102         New function for tab-completion system
103         Added by EvilTypeGuy
104         Thanks to Fett erich@heintz.com
105
106 */
107 int
108 Cvar_CompleteCountPossible (char *partial)
109 {
110         cvar_t  *cvar;
111         int             len;
112         int             h;
113
114         h = 0;
115         len = strlen(partial);
116
117         if (!len)
118                 return  0;
119
120         // Loop through the cvars and count all possible matches
121         for (cvar = cvar_vars; cvar; cvar = cvar->next)
122                 if (!strncasecmp(partial, cvar->name, len))
123                         h++;
124
125         return h;
126 }
127
128 /*
129         CVar_CompleteBuildList
130
131         New function for tab-completion system
132         Added by EvilTypeGuy
133         Thanks to Fett erich@heintz.com
134         Thanks to taniwha
135
136 */
137 char    **
138 Cvar_CompleteBuildList (char *partial)
139 {
140         cvar_t  *cvar;
141         int             len = 0;
142         int             bpos = 0;
143         int             sizeofbuf = (Cvar_CompleteCountPossible (partial) + 1) * sizeof (char *);
144         char    **buf;
145
146         len = strlen(partial);
147         buf = Mem_Alloc(tempmempool, sizeofbuf + sizeof (char *));
148         // Loop through the alias list and print all matches
149         for (cvar = cvar_vars; cvar; cvar = cvar->next)
150                 if (!strncasecmp(partial, cvar->name, len))
151                         buf[bpos++] = cvar->name;
152
153         buf[bpos] = NULL;
154         return buf;
155 }
156
157 /*
158 ============
159 Cvar_Set
160 ============
161 */
162 void Cvar_Set (char *var_name, char *value)
163 {
164         cvar_t  *var;
165         qboolean changed;
166
167         var = Cvar_FindVar (var_name);
168         if (!var)
169         {       // there is an error in C code if this happens
170                 Con_Printf ("Cvar_Set: variable %s not found\n", var_name);
171                 return;
172         }
173
174         changed = strcmp(var->string, value);
175         // LordHavoc: don't reallocate when there is no change
176         if (!changed)
177                 return;
178
179         // LordHavoc: don't reallocate when the buffer is the same size
180         if (!var->string || strlen(var->string) != strlen(value))
181         {
182                 Z_Free (var->string);   // free the old value string
183
184                 var->string = Z_Malloc (strlen(value)+1);
185         }
186         strcpy (var->string, value);
187         var->value = atof (var->string);
188         var->integer = (int) var->value;
189         if ((var->flags & CVAR_NOTIFY) && changed)
190         {
191                 if (sv.active)
192                         SV_BroadcastPrintf ("\"%s\" changed to \"%s\"\n", var->name, var->string);
193         }
194 }
195
196 /*
197 ============
198 Cvar_SetValue
199 ============
200 */
201 void Cvar_SetValue (char *var_name, float value)
202 {
203         char    val[32];
204
205         // LordHavoc: changed from %f to %g to use shortest representation
206         sprintf (val, "%g",value);
207         Cvar_Set (var_name, val);
208 }
209
210 /*
211 ============
212 Cvar_RegisterVariable
213
214 Adds a freestanding variable to the variable list.
215 ============
216 */
217 void Cvar_RegisterVariable (cvar_t *variable)
218 {
219         char    *oldstr;
220
221 // first check to see if it has already been defined
222         if (Cvar_FindVar (variable->name))
223         {
224                 Con_Printf ("Can't register variable %s, already defined\n", variable->name);
225                 return;
226         }
227
228 // check for overlap with a command
229         if (Cmd_Exists (variable->name))
230         {
231                 Con_Printf ("Cvar_RegisterVariable: %s is a command\n", variable->name);
232                 return;
233         }
234
235 // copy the value off, because future sets will Z_Free it
236         oldstr = variable->string;
237         variable->string = Z_Malloc (strlen(variable->string)+1);
238         strcpy (variable->string, oldstr);
239         variable->value = atof (variable->string);
240         variable->integer = (int) variable->value;
241
242 // link the variable in
243         variable->next = cvar_vars;
244         cvar_vars = variable;
245 }
246
247 /*
248 ============
249 Cvar_Command
250
251 Handles variable inspection and changing from the console
252 ============
253 */
254 qboolean        Cvar_Command (void)
255 {
256         cvar_t                  *v;
257
258 // check variables
259         v = Cvar_FindVar (Cmd_Argv(0));
260         if (!v)
261                 return false;
262
263 // perform a variable print or set
264         if (Cmd_Argc() == 1)
265         {
266                 Con_Printf ("\"%s\" is \"%s\"\n", v->name, v->string);
267                 return true;
268         }
269
270         Cvar_Set (v->name, Cmd_Argv(1));
271         return true;
272 }
273
274
275 /*
276 ============
277 Cvar_WriteVariables
278
279 Writes lines containing "set variable value" for all variables
280 with the archive flag set to true.
281 ============
282 */
283 void Cvar_WriteVariables (QFile *f)
284 {
285         cvar_t  *var;
286
287         for (var = cvar_vars ; var ; var = var->next)
288                 if (var->flags & CVAR_SAVE)
289                         Qprintf (f, "%s \"%s\"\n", var->name, var->string);
290 }
291
292
293 // Added by EvilTypeGuy eviltypeguy@qeradiant.com
294 // 2000-01-09 CvarList command By Matthias "Maddes" Buecher, http://www.inside3d.com/qip/
295 /*
296 =========
297 Cvar_List
298 =========
299 */
300 void Cvar_List_f (void)
301 {
302         cvar_t  *cvar;
303         char    *partial;
304         int             len;
305         int             count;
306
307         if (Cmd_Argc() > 1) {
308                 partial = Cmd_Argv (1);
309                 len = strlen(partial);
310         } else {
311                 partial = NULL;
312                 len = 0;
313         }
314
315         count = 0;
316         for (cvar = cvar_vars; cvar; cvar = cvar->next) {
317                 if (partial && strncmp (partial,cvar->name,len))
318                         continue;
319
320                 Con_Printf ("%s is \"%s\"\n", cvar->name, cvar->string);
321                 count++;
322         }
323
324         Con_Printf ("%i cvar(s)", count);
325         if (partial)
326                 Con_Printf (" beginning with \"%s\"", partial);
327         Con_Printf ("\n");
328 }
329 // 2000-01-09 CvarList command by Maddes