f8b874c129320555684fedf4381fbc81a4b46fc8
[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 = qmalloc(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         
176         Z_Free (var->string);   // free the old value string
177         
178         var->string = Z_Malloc (strlen(value)+1);
179         strcpy (var->string, value);
180         var->value = atof (var->string);
181         if (var->server && changed)
182         {
183                 if (sv.active)
184                         SV_BroadcastPrintf ("\"%s\" changed to \"%s\"\n", var->name, var->string);
185         }
186 }
187
188 /*
189 ============
190 Cvar_SetValue
191 ============
192 */
193 void Cvar_SetValue (char *var_name, float value)
194 {
195         char    val[32];
196         
197         // LordHavoc: changed from %f to %g to use shortest representation
198         sprintf (val, "%g",value);
199         Cvar_Set (var_name, val);
200 }
201
202
203 /*
204 ============
205 Cvar_RegisterVariable
206
207 Adds a freestanding variable to the variable list.
208 ============
209 */
210 void Cvar_RegisterVariable (cvar_t *variable)
211 {
212         char    *oldstr;
213         
214 // first check to see if it has already been defined
215         if (Cvar_FindVar (variable->name))
216         {
217                 Con_Printf ("Can't register variable %s, already defined\n", variable->name);
218                 return;
219         }
220         
221 // check for overlap with a command
222         if (Cmd_Exists (variable->name))
223         {
224                 Con_Printf ("Cvar_RegisterVariable: %s is a command\n", variable->name);
225                 return;
226         }
227                 
228 // copy the value off, because future sets will Z_Free it
229         oldstr = variable->string;
230         variable->string = Z_Malloc (strlen(variable->string)+1);       
231         strcpy (variable->string, oldstr);
232         variable->value = atof (variable->string);
233         
234 // link the variable in
235         variable->next = cvar_vars;
236         cvar_vars = variable;
237 }
238
239 /*
240 ============
241 Cvar_Command
242
243 Handles variable inspection and changing from the console
244 ============
245 */
246 qboolean        Cvar_Command (void)
247 {
248         cvar_t                  *v;
249
250 // check variables
251         v = Cvar_FindVar (Cmd_Argv(0));
252         if (!v)
253                 return false;
254                 
255 // perform a variable print or set
256         if (Cmd_Argc() == 1)
257         {
258                 Con_Printf ("\"%s\" is \"%s\"\n", v->name, v->string);
259                 return true;
260         }
261
262         Cvar_Set (v->name, Cmd_Argv(1));
263         return true;
264 }
265
266
267 /*
268 ============
269 Cvar_WriteVariables
270
271 Writes lines containing "set variable value" for all variables
272 with the archive flag set to true.
273 ============
274 */
275 void Cvar_WriteVariables (QFile *f)
276 {
277         cvar_t  *var;
278         
279         for (var = cvar_vars ; var ; var = var->next)
280                 if (var->archive)
281                         Qprintf (f, "%s \"%s\"\n", var->name, var->string);
282 }
283
284
285 // Added by EvilTypeGuy eviltypeguy@qeradiant.com
286 // 2000-01-09 CvarList command By Matthias "Maddes" Buecher, http://www.inside3d.com/qip/
287 /*
288 =========
289 Cvar_List
290 =========
291 */
292 void Cvar_List_f (void)
293 {
294         cvar_t  *cvar;
295         char    *partial;
296         int             len;
297         int             count;
298
299         if (Cmd_Argc() > 1) {
300                 partial = Cmd_Argv (1);
301                 len = strlen(partial);
302         } else {
303                 partial = NULL;
304                 len = 0;
305         }
306
307         count = 0;
308         for (cvar = cvar_vars; cvar; cvar = cvar->next) {
309                 if (partial && strncmp (partial,cvar->name,len))
310                         continue;
311
312                 Con_Printf ("%s is \"%s\"\n", cvar->name, cvar->string);
313                 count++;
314         }
315
316         Con_Printf ("%i cvar(s)", count);
317         if (partial)
318                 Con_Printf (" beginning with \"%s\"", partial);
319         Con_Printf ("\n");
320 }
321 // 2000-01-09 CvarList command by Maddes