comparison: scriptreader.cxx
scriptreader.cxx
- changeset 0
- 8dce9696d62d
- child 1
- f0c61c204bc8
equal
deleted
inserted
replaced
| -1:000000000000 | 0:8dce9696d62d |
|---|---|
| 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 Skulltag Development Team nor the names of its | |
| 15 * contributors may be used to endorse or promote products derived from this | |
| 16 * software without 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 #include <stdio.h> | |
| 42 #include <stdlib.h> | |
| 43 #include "string.h" | |
| 44 #include "str.h" | |
| 45 #include "common.h" | |
| 46 #include "scriptreader.h" | |
| 47 | |
| 48 bool IsWhitespace (char c) { | |
| 49 // These characters are invisible, thus considered whitespace | |
| 50 if (c <= 32 || c == 127 || c == 255) | |
| 51 return true; | |
| 52 | |
| 53 return false; | |
| 54 } | |
| 55 | |
| 56 ScriptReader::ScriptReader (str path) { | |
| 57 fp = fopen (path, "r"); | |
| 58 CHECK_FILE (path, "reading"); | |
| 59 | |
| 60 curline = 1; | |
| 61 pos = 0; | |
| 62 token = ""; | |
| 63 } | |
| 64 | |
| 65 char ScriptReader::ReadChar () { | |
| 66 char* c = (char*)malloc (sizeof (char)); | |
| 67 if (!fread (c, sizeof (char), 1, fp)) | |
| 68 return 0; | |
| 69 | |
| 70 // If we just read a new line, increase current line number counter. | |
| 71 if (c[0] == '\n') | |
| 72 curline++; | |
| 73 | |
| 74 return c[0]; | |
| 75 } | |
| 76 | |
| 77 // true if was found, false if not. | |
| 78 bool ScriptReader::Next () { | |
| 79 str tmp = ""; | |
| 80 bool quote = false; | |
| 81 tokenquoted = false; | |
| 82 while (!feof (fp)) { | |
| 83 char c = ReadChar (); | |
| 84 | |
| 85 // Quotation mark. | |
| 86 if (c == '"') { | |
| 87 // End-quote ends the token. | |
| 88 if (quote) | |
| 89 break; | |
| 90 | |
| 91 tokenquoted = true; | |
| 92 quote = !quote; | |
| 93 continue; | |
| 94 } | |
| 95 | |
| 96 if (IsWhitespace (c) && !quote) { | |
| 97 // Don't break if we haven't gathered anything yet. | |
| 98 if (tmp.len()) | |
| 99 break; | |
| 100 } else { | |
| 101 tmp += c; | |
| 102 } | |
| 103 } | |
| 104 | |
| 105 // If we got nothing here, read failed. | |
| 106 if (!tmp.len()) { | |
| 107 token = ""; | |
| 108 return false; | |
| 109 } | |
| 110 | |
| 111 pos++; | |
| 112 token = tmp; | |
| 113 return true; | |
| 114 } | |
| 115 | |
| 116 // Returns the next token without advancing the cursor. | |
| 117 str ScriptReader::PeekNext () { | |
| 118 // Store current position | |
| 119 int cpos = ftell (fp); | |
| 120 | |
| 121 // Advance on the token. | |
| 122 if (!Next ()) | |
| 123 return ""; | |
| 124 | |
| 125 str tmp = token; | |
| 126 | |
| 127 // Restore position | |
| 128 fseek (fp, cpos, SEEK_SET); | |
| 129 pos--; | |
| 130 | |
| 131 return tmp; | |
| 132 } | |
| 133 | |
| 134 void ScriptReader::Seek (unsigned int n, int origin) { | |
| 135 switch (origin) { | |
| 136 case SEEK_SET: | |
| 137 fseek (fp, 0, SEEK_SET); | |
| 138 pos = 0; | |
| 139 break; | |
| 140 case SEEK_CUR: | |
| 141 break; | |
| 142 case SEEK_END: | |
| 143 printf ("ScriptReader::Seek: SEEK_END not yet supported.\n"); | |
| 144 break; | |
| 145 } | |
| 146 | |
| 147 for (unsigned int i = 0; i < n+1; i++) | |
| 148 Next(); | |
| 149 } | |
| 150 | |
| 151 void ScriptReader::MustNext (const char* c) { | |
| 152 if (!Next()) { | |
| 153 if (strlen (c)) | |
| 154 ParseError ("expected `%s`, reached end of file instead\n", c); | |
| 155 else | |
| 156 ParseError ("expected a token, reached end of file instead\n"); | |
| 157 } | |
| 158 | |
| 159 if (strlen (c) && token.compare (c) != 0) { | |
| 160 ParseError ("expected `%s`, got `%s` instead", c, token.chars()); | |
| 161 } | |
| 162 } | |
| 163 | |
| 164 void ScriptReader::ParseError (const char* message, ...) { | |
| 165 PERFORM_FORMAT (message, outmessage); | |
| 166 error ("Parse error on line %d:\n%s\n", curline, outmessage); | |
| 167 } |
