comparison: variables.cxx
variables.cxx
- changeset 71
- 11f23fabf8a6
- parent 70
- fc257920ac00
- child 72
- 03e4d9db3fd9
equal
deleted
inserted
replaced
| 70:fc257920ac00 | 71:11f23fabf8a6 |
|---|---|
| 1 /* | |
| 2 * botc source code | |
| 3 * Copyright (C) 2012 Santeri `Dusk` Piippo | |
| 4 * All rights reserved. | |
| 5 * | |
| 6 * Redistribution and use in source and binary forms, with or without | |
| 7 * modification, are permitted provided that the following conditions are met: | |
| 8 * | |
| 9 * 1. Redistributions of source code must retain the above copyright notice, | |
| 10 * this list of conditions and the following disclaimer. | |
| 11 * 2. Redistributions in binary form must reproduce the above copyright notice, | |
| 12 * this list of conditions and the following disclaimer in the documentation | |
| 13 * and/or other materials provided with the distribution. | |
| 14 * 3. Neither the name of the developer nor the names of its contributors may | |
| 15 * be used to endorse or promote products derived from this software without | |
| 16 * specific prior written permission. | |
| 17 * 4. Redistributions in any form must be accompanied by information on how to | |
| 18 * obtain complete source code for the software and any accompanying | |
| 19 * software that uses the software. The source code must either be included | |
| 20 * in the distribution or be available for no more than the cost of | |
| 21 * distribution plus a nominal fee, and must be freely redistributable | |
| 22 * under reasonable conditions. For an executable file, complete source | |
| 23 * code means the source code for all modules it contains. It does not | |
| 24 * include source code for modules or files that typically accompany the | |
| 25 * major components of the operating system on which the executable file | |
| 26 * runs. | |
| 27 * | |
| 28 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" | |
| 29 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
| 30 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | |
| 31 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE | |
| 32 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR | |
| 33 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF | |
| 34 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | |
| 35 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN | |
| 36 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | |
| 37 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | |
| 38 * POSSIBILITY OF SUCH DAMAGE. | |
| 39 */ | |
| 40 | |
| 41 #define __VARIABLES_CXX__ | |
| 42 #include <stdio.h> | |
| 43 #include <stdlib.h> | |
| 44 #include <string.h> | |
| 45 #include "common.h" | |
| 46 #include "array.h" | |
| 47 #include "bots.h" | |
| 48 #include "botcommands.h" | |
| 49 #include "objwriter.h" | |
| 50 #include "stringtable.h" | |
| 51 #include "variables.h" | |
| 52 #include "scriptreader.h" | |
| 53 | |
| 54 array<ScriptVar> g_GlobalVariables; | |
| 55 array<ScriptVar> g_LocalVariables; | |
| 56 | |
| 57 // ============================================================================ | |
| 58 // Tries to declare a new global-scope variable. Returns pointer | |
| 59 // to new global variable, NULL if declaration failed. | |
| 60 ScriptVar* DeclareGlobalVariable (ScriptReader* r, type_e type, str name) { | |
| 61 // Unfortunately the VM does not support string variables so yeah. | |
| 62 if (type == TYPE_STRING) | |
| 63 r->ParserError ("variables cannot be string\n"); | |
| 64 | |
| 65 // Check that the variable is valid | |
| 66 if (FindCommand (name)) | |
| 67 r->ParserError ("name of variable-to-be `%s` conflicts with that of a command", name.chars()); | |
| 68 | |
| 69 if (IsKeyword (name)) | |
| 70 r->ParserError ("name of variable-to-be `%s` is a keyword", name.chars()); | |
| 71 | |
| 72 if (g_GlobalVariables.size() >= MAX_SCRIPT_VARIABLES) | |
| 73 r->ParserError ("too many global variables!"); | |
| 74 | |
| 75 for (uint i = 0; i < g_GlobalVariables.size(); i++) | |
| 76 if (g_GlobalVariables[i].name == name) | |
| 77 r->ParserError ("attempted redeclaration of global variable `%s`", name.chars()); | |
| 78 | |
| 79 ScriptVar g; | |
| 80 g.index = g_GlobalVariables.size(); | |
| 81 g.name = name; | |
| 82 g.statename = ""; | |
| 83 g.value = 0; | |
| 84 g.type = type; | |
| 85 | |
| 86 g_GlobalVariables << g; | |
| 87 return &g_GlobalVariables[g.index]; | |
| 88 } | |
| 89 | |
| 90 // ============================================================================ | |
| 91 // Find a global variable by name | |
| 92 ScriptVar* FindGlobalVariable (str name) { | |
| 93 for (uint i = 0; i < g_GlobalVariables.size(); i++) { | |
| 94 ScriptVar* g = &g_GlobalVariables[i]; | |
| 95 if (g->name == name) | |
| 96 return g; | |
| 97 } | |
| 98 | |
| 99 return NULL; | |
| 100 } | |
| 101 | |
| 102 // ============================================================================ | |
| 103 // Count all declared global variables | |
| 104 uint CountGlobalVars () { | |
| 105 return g_GlobalVariables.size(); | |
| 106 } |
