dtio.c revision 1.1.1.2 1 1.1 jruoho /******************************************************************************
2 1.1 jruoho *
3 1.1 jruoho * Module Name: dtio.c - File I/O support for data table compiler
4 1.1 jruoho *
5 1.1 jruoho *****************************************************************************/
6 1.1 jruoho
7 1.1.1.2 jruoho /*
8 1.1.1.2 jruoho * Copyright (C) 2000 - 2011, Intel Corp.
9 1.1 jruoho * All rights reserved.
10 1.1 jruoho *
11 1.1.1.2 jruoho * Redistribution and use in source and binary forms, with or without
12 1.1.1.2 jruoho * modification, are permitted provided that the following conditions
13 1.1.1.2 jruoho * are met:
14 1.1.1.2 jruoho * 1. Redistributions of source code must retain the above copyright
15 1.1.1.2 jruoho * notice, this list of conditions, and the following disclaimer,
16 1.1.1.2 jruoho * without modification.
17 1.1.1.2 jruoho * 2. Redistributions in binary form must reproduce at minimum a disclaimer
18 1.1.1.2 jruoho * substantially similar to the "NO WARRANTY" disclaimer below
19 1.1.1.2 jruoho * ("Disclaimer") and any redistribution must be conditioned upon
20 1.1.1.2 jruoho * including a substantially similar Disclaimer requirement for further
21 1.1.1.2 jruoho * binary redistribution.
22 1.1.1.2 jruoho * 3. Neither the names of the above-listed copyright holders nor the names
23 1.1.1.2 jruoho * of any contributors may be used to endorse or promote products derived
24 1.1.1.2 jruoho * from this software without specific prior written permission.
25 1.1.1.2 jruoho *
26 1.1.1.2 jruoho * Alternatively, this software may be distributed under the terms of the
27 1.1.1.2 jruoho * GNU General Public License ("GPL") version 2 as published by the Free
28 1.1.1.2 jruoho * Software Foundation.
29 1.1.1.2 jruoho *
30 1.1.1.2 jruoho * NO WARRANTY
31 1.1.1.2 jruoho * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
32 1.1.1.2 jruoho * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
33 1.1.1.2 jruoho * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
34 1.1.1.2 jruoho * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
35 1.1.1.2 jruoho * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
36 1.1.1.2 jruoho * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
37 1.1.1.2 jruoho * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
38 1.1.1.2 jruoho * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
39 1.1.1.2 jruoho * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
40 1.1.1.2 jruoho * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
41 1.1.1.2 jruoho * POSSIBILITY OF SUCH DAMAGES.
42 1.1.1.2 jruoho */
43 1.1 jruoho
44 1.1 jruoho #define __DTIO_C__
45 1.1 jruoho
46 1.1 jruoho #include "aslcompiler.h"
47 1.1 jruoho #include "dtcompiler.h"
48 1.1 jruoho
49 1.1 jruoho #define _COMPONENT DT_COMPILER
50 1.1 jruoho ACPI_MODULE_NAME ("dtio")
51 1.1 jruoho
52 1.1 jruoho
53 1.1.1.2 jruoho /* Local prototypes */
54 1.1 jruoho
55 1.1.1.2 jruoho static char *
56 1.1.1.2 jruoho DtTrim (
57 1.1.1.2 jruoho char *String);
58 1.1 jruoho
59 1.1.1.2 jruoho static void
60 1.1.1.2 jruoho DtLinkField (
61 1.1.1.2 jruoho DT_FIELD *Field);
62 1.1 jruoho
63 1.1.1.2 jruoho static ACPI_STATUS
64 1.1.1.2 jruoho DtParseLine (
65 1.1.1.2 jruoho char *LineBuffer,
66 1.1.1.2 jruoho UINT32 Line,
67 1.1.1.2 jruoho UINT32 Offset);
68 1.1 jruoho
69 1.1.1.2 jruoho UINT32
70 1.1.1.2 jruoho DtGetNextLine (
71 1.1.1.2 jruoho FILE *Handle);
72 1.1.1.2 jruoho
73 1.1.1.2 jruoho static void
74 1.1.1.2 jruoho DtWriteBinary (
75 1.1.1.2 jruoho DT_SUBTABLE *Subtable,
76 1.1.1.2 jruoho void *Context,
77 1.1.1.2 jruoho void *ReturnValue);
78 1.1.1.2 jruoho
79 1.1.1.2 jruoho static void
80 1.1.1.2 jruoho DtDumpBuffer (
81 1.1.1.2 jruoho UINT32 FileId,
82 1.1.1.2 jruoho UINT8 *Buffer,
83 1.1.1.2 jruoho UINT32 Offset,
84 1.1.1.2 jruoho UINT32 Length);
85 1.1.1.2 jruoho
86 1.1.1.2 jruoho
87 1.1.1.2 jruoho /* States for DtGetNextLine */
88 1.1.1.2 jruoho
89 1.1.1.2 jruoho #define DT_NORMAL_TEXT 0
90 1.1.1.2 jruoho #define DT_START_QUOTED_STRING 1
91 1.1.1.2 jruoho #define DT_START_COMMENT 2
92 1.1.1.2 jruoho #define DT_SLASH_ASTERISK_COMMENT 3
93 1.1.1.2 jruoho #define DT_SLASH_SLASH_COMMENT 4
94 1.1.1.2 jruoho #define DT_END_COMMENT 5
95 1.1.1.2 jruoho
96 1.1.1.2 jruoho static UINT32 Gbl_NextLineOffset;
97 1.1 jruoho
98 1.1 jruoho
99 1.1 jruoho /******************************************************************************
100 1.1 jruoho *
101 1.1 jruoho * FUNCTION: DtTrim
102 1.1 jruoho *
103 1.1 jruoho * PARAMETERS: String - Current source code line to trim
104 1.1 jruoho *
105 1.1 jruoho * RETURN: Trimmed line. Must be freed by caller.
106 1.1 jruoho *
107 1.1 jruoho * DESCRIPTION: Trim left and right spaces
108 1.1 jruoho *
109 1.1 jruoho *****************************************************************************/
110 1.1 jruoho
111 1.1 jruoho static char *
112 1.1 jruoho DtTrim (
113 1.1 jruoho char *String)
114 1.1 jruoho {
115 1.1 jruoho char *Start;
116 1.1 jruoho char *End;
117 1.1 jruoho char *ReturnString;
118 1.1 jruoho ACPI_SIZE Length;
119 1.1 jruoho
120 1.1 jruoho
121 1.1 jruoho /* Skip lines that start with a space */
122 1.1 jruoho
123 1.1 jruoho if (!ACPI_STRCMP (String, " "))
124 1.1 jruoho {
125 1.1 jruoho ReturnString = UtLocalCalloc (1);
126 1.1 jruoho return (ReturnString);
127 1.1 jruoho }
128 1.1 jruoho
129 1.1 jruoho /* Setup pointers to start and end of input string */
130 1.1 jruoho
131 1.1 jruoho Start = String;
132 1.1 jruoho End = String + ACPI_STRLEN (String) - 1;
133 1.1 jruoho
134 1.1 jruoho /* Find first non-whitespace character */
135 1.1 jruoho
136 1.1 jruoho while ((Start <= End) && ((*Start == ' ') || (*Start == '\t')))
137 1.1 jruoho {
138 1.1 jruoho Start++;
139 1.1 jruoho }
140 1.1 jruoho
141 1.1 jruoho /* Find last non-space character */
142 1.1 jruoho
143 1.1 jruoho while (End >= Start)
144 1.1 jruoho {
145 1.1 jruoho if (*End == '\r' || *End == '\n')
146 1.1 jruoho {
147 1.1 jruoho End--;
148 1.1 jruoho continue;
149 1.1 jruoho }
150 1.1 jruoho
151 1.1 jruoho if (*End != ' ')
152 1.1 jruoho {
153 1.1 jruoho break;
154 1.1 jruoho }
155 1.1 jruoho
156 1.1 jruoho End--;
157 1.1 jruoho }
158 1.1 jruoho
159 1.1 jruoho /* Remove any quotes around the string */
160 1.1 jruoho
161 1.1 jruoho if (*Start == '\"')
162 1.1 jruoho {
163 1.1 jruoho Start++;
164 1.1 jruoho }
165 1.1 jruoho if (*End == '\"')
166 1.1 jruoho {
167 1.1 jruoho End--;
168 1.1 jruoho }
169 1.1 jruoho
170 1.1 jruoho /* Create the trimmed return string */
171 1.1 jruoho
172 1.1 jruoho Length = ACPI_PTR_DIFF (End, Start) + 1;
173 1.1 jruoho ReturnString = UtLocalCalloc (Length + 1);
174 1.1 jruoho if (ACPI_STRLEN (Start))
175 1.1 jruoho {
176 1.1 jruoho ACPI_STRNCPY (ReturnString, Start, Length);
177 1.1 jruoho }
178 1.1 jruoho
179 1.1 jruoho ReturnString[Length] = 0;
180 1.1 jruoho return (ReturnString);
181 1.1 jruoho }
182 1.1 jruoho
183 1.1 jruoho
184 1.1 jruoho /******************************************************************************
185 1.1 jruoho *
186 1.1 jruoho * FUNCTION: DtLinkField
187 1.1 jruoho *
188 1.1 jruoho * PARAMETERS: Field - New field object to link
189 1.1 jruoho *
190 1.1 jruoho * RETURN: None
191 1.1 jruoho *
192 1.1 jruoho * DESCRIPTION: Link one field name and value to the list
193 1.1 jruoho *
194 1.1 jruoho *****************************************************************************/
195 1.1 jruoho
196 1.1 jruoho static void
197 1.1 jruoho DtLinkField (
198 1.1 jruoho DT_FIELD *Field)
199 1.1 jruoho {
200 1.1 jruoho DT_FIELD *Prev;
201 1.1 jruoho DT_FIELD *Next;
202 1.1 jruoho
203 1.1 jruoho
204 1.1 jruoho Prev = Next = Gbl_FieldList;
205 1.1 jruoho
206 1.1 jruoho while (Next)
207 1.1 jruoho {
208 1.1 jruoho Prev = Next;
209 1.1 jruoho Next = Next->Next;
210 1.1 jruoho }
211 1.1 jruoho
212 1.1 jruoho if (Prev)
213 1.1 jruoho {
214 1.1 jruoho Prev->Next = Field;
215 1.1 jruoho }
216 1.1 jruoho else
217 1.1 jruoho {
218 1.1 jruoho Gbl_FieldList = Field;
219 1.1 jruoho }
220 1.1 jruoho }
221 1.1 jruoho
222 1.1 jruoho
223 1.1 jruoho /******************************************************************************
224 1.1 jruoho *
225 1.1 jruoho * FUNCTION: DtParseLine
226 1.1 jruoho *
227 1.1 jruoho * PARAMETERS: LineBuffer - Current source code line
228 1.1 jruoho * Line - Current line number in the source
229 1.1 jruoho * Offset - Current byte offset of the line
230 1.1 jruoho *
231 1.1.1.2 jruoho * RETURN: Status
232 1.1 jruoho *
233 1.1 jruoho * DESCRIPTION: Parse one source line
234 1.1 jruoho *
235 1.1 jruoho *****************************************************************************/
236 1.1 jruoho
237 1.1.1.2 jruoho static ACPI_STATUS
238 1.1 jruoho DtParseLine (
239 1.1 jruoho char *LineBuffer,
240 1.1 jruoho UINT32 Line,
241 1.1 jruoho UINT32 Offset)
242 1.1 jruoho {
243 1.1 jruoho char *Start;
244 1.1 jruoho char *End;
245 1.1 jruoho char *TmpName;
246 1.1 jruoho char *TmpValue;
247 1.1 jruoho char *Name;
248 1.1 jruoho char *Value;
249 1.1 jruoho char *Colon;
250 1.1 jruoho UINT32 Length;
251 1.1 jruoho DT_FIELD *Field;
252 1.1 jruoho UINT32 Column;
253 1.1 jruoho UINT32 NameColumn;
254 1.1 jruoho
255 1.1 jruoho
256 1.1.1.2 jruoho if (!LineBuffer)
257 1.1 jruoho {
258 1.1.1.2 jruoho return (AE_OK);
259 1.1.1.2 jruoho }
260 1.1.1.2 jruoho
261 1.1.1.2 jruoho /* All lines after "Raw Table Data" are ingored */
262 1.1.1.2 jruoho
263 1.1.1.2 jruoho if (strstr (LineBuffer, ACPI_RAW_TABLE_DATA_HEADER))
264 1.1.1.2 jruoho {
265 1.1.1.2 jruoho return (AE_NOT_FOUND);
266 1.1 jruoho }
267 1.1 jruoho
268 1.1 jruoho Colon = strchr (LineBuffer, ':');
269 1.1.1.2 jruoho if (!Colon)
270 1.1 jruoho {
271 1.1.1.2 jruoho return (AE_OK);
272 1.1 jruoho }
273 1.1 jruoho
274 1.1 jruoho Start = LineBuffer;
275 1.1 jruoho End = Colon;
276 1.1 jruoho
277 1.1 jruoho while (Start < Colon)
278 1.1 jruoho {
279 1.1 jruoho if (*Start == ' ')
280 1.1 jruoho {
281 1.1 jruoho Start++;
282 1.1 jruoho continue;
283 1.1 jruoho }
284 1.1 jruoho
285 1.1 jruoho /* Found left bracket, go to the right bracket */
286 1.1 jruoho
287 1.1 jruoho if (*Start == '[')
288 1.1 jruoho {
289 1.1 jruoho while (Start < Colon && *Start != ']')
290 1.1 jruoho {
291 1.1 jruoho Start++;
292 1.1 jruoho }
293 1.1 jruoho
294 1.1 jruoho if (Start == Colon)
295 1.1 jruoho {
296 1.1 jruoho break;
297 1.1 jruoho }
298 1.1 jruoho
299 1.1 jruoho Start++;
300 1.1 jruoho continue;
301 1.1 jruoho }
302 1.1 jruoho
303 1.1 jruoho break;
304 1.1 jruoho }
305 1.1 jruoho
306 1.1 jruoho /*
307 1.1 jruoho * There are two column values. One for the field name,
308 1.1 jruoho * and one for the field value.
309 1.1 jruoho */
310 1.1 jruoho Column = ACPI_PTR_DIFF (Colon, LineBuffer) + 3;
311 1.1 jruoho NameColumn = ACPI_PTR_DIFF (Start, LineBuffer) + 1;
312 1.1 jruoho
313 1.1 jruoho Length = ACPI_PTR_DIFF (End, Start);
314 1.1 jruoho
315 1.1 jruoho TmpName = UtLocalCalloc (Length + 1);
316 1.1 jruoho ACPI_STRNCPY (TmpName, Start, Length);
317 1.1 jruoho Name = DtTrim (TmpName);
318 1.1 jruoho ACPI_FREE (TmpName);
319 1.1 jruoho
320 1.1 jruoho Start = End = (Colon + 1);
321 1.1 jruoho
322 1.1 jruoho while (*End)
323 1.1 jruoho {
324 1.1 jruoho /* Found left quotation, go to the right quotation and break */
325 1.1 jruoho
326 1.1 jruoho if (*End == '"')
327 1.1 jruoho {
328 1.1 jruoho End++;
329 1.1.1.2 jruoho while (*End && (*End != '"'))
330 1.1 jruoho {
331 1.1 jruoho End++;
332 1.1 jruoho }
333 1.1 jruoho
334 1.1 jruoho End++;
335 1.1 jruoho break;
336 1.1 jruoho }
337 1.1 jruoho
338 1.1.1.2 jruoho /*
339 1.1.1.2 jruoho * Special "comment" fields at line end, ignore them.
340 1.1.1.2 jruoho * Note: normal slash-slash and slash-asterisk comments are
341 1.1.1.2 jruoho * stripped already by the DtGetNextLine parser.
342 1.1.1.2 jruoho *
343 1.1.1.2 jruoho * TBD: Perhaps DtGetNextLine should parse the following type
344 1.1.1.2 jruoho * of comments also.
345 1.1.1.2 jruoho */
346 1.1 jruoho if (*End == '(' ||
347 1.1.1.2 jruoho *End == '<')
348 1.1 jruoho {
349 1.1 jruoho break;
350 1.1 jruoho }
351 1.1 jruoho
352 1.1 jruoho End++;
353 1.1 jruoho }
354 1.1 jruoho
355 1.1 jruoho Length = ACPI_PTR_DIFF (End, Start);
356 1.1 jruoho TmpValue = UtLocalCalloc (Length + 1);
357 1.1 jruoho ACPI_STRNCPY (TmpValue, Start, Length);
358 1.1 jruoho Value = DtTrim (TmpValue);
359 1.1 jruoho ACPI_FREE (TmpValue);
360 1.1 jruoho
361 1.1 jruoho if (Name && Value)
362 1.1 jruoho {
363 1.1 jruoho Field = UtLocalCalloc (sizeof (DT_FIELD));
364 1.1 jruoho Field->Name = Name;
365 1.1 jruoho Field->Value = Value;
366 1.1 jruoho Field->Line = Line;
367 1.1 jruoho Field->ByteOffset = Offset;
368 1.1 jruoho Field->NameColumn = NameColumn;
369 1.1 jruoho Field->Column = Column;
370 1.1 jruoho
371 1.1 jruoho DtLinkField (Field);
372 1.1 jruoho }
373 1.1.1.2 jruoho
374 1.1.1.2 jruoho return (AE_OK);
375 1.1.1.2 jruoho }
376 1.1.1.2 jruoho
377 1.1.1.2 jruoho
378 1.1.1.2 jruoho /******************************************************************************
379 1.1.1.2 jruoho *
380 1.1.1.2 jruoho * FUNCTION: DtGetNextLine
381 1.1.1.2 jruoho *
382 1.1.1.2 jruoho * PARAMETERS: Handle - Open file handle for the source file
383 1.1.1.2 jruoho *
384 1.1.1.2 jruoho * RETURN: Filled line buffer and offset of start-of-line (zero on EOF)
385 1.1.1.2 jruoho *
386 1.1.1.2 jruoho * DESCRIPTION: Get the next valid source line. Removes all comments.
387 1.1.1.2 jruoho * Ignores empty lines.
388 1.1.1.2 jruoho *
389 1.1.1.2 jruoho * Handles both slash-asterisk and slash-slash comments.
390 1.1.1.2 jruoho * Also, quoted strings, but no escapes within.
391 1.1.1.2 jruoho *
392 1.1.1.2 jruoho * Line is returned in Gbl_CurrentLineBuffer.
393 1.1.1.2 jruoho * Line number in original file is returned in Gbl_CurrentLineNumber.
394 1.1.1.2 jruoho *
395 1.1.1.2 jruoho *****************************************************************************/
396 1.1.1.2 jruoho
397 1.1.1.2 jruoho UINT32
398 1.1.1.2 jruoho DtGetNextLine (
399 1.1.1.2 jruoho FILE *Handle)
400 1.1.1.2 jruoho {
401 1.1.1.2 jruoho UINT32 State = DT_NORMAL_TEXT;
402 1.1.1.2 jruoho UINT32 CurrentLineOffset;
403 1.1.1.2 jruoho UINT32 i;
404 1.1.1.2 jruoho char c;
405 1.1.1.2 jruoho
406 1.1.1.2 jruoho
407 1.1.1.2 jruoho for (i = 0; i < ASL_LINE_BUFFER_SIZE;)
408 1.1.1.2 jruoho {
409 1.1.1.2 jruoho c = (char) getc (Handle);
410 1.1.1.2 jruoho if (c == EOF)
411 1.1.1.2 jruoho {
412 1.1.1.2 jruoho switch (State)
413 1.1.1.2 jruoho {
414 1.1.1.2 jruoho case DT_START_QUOTED_STRING:
415 1.1.1.2 jruoho case DT_SLASH_ASTERISK_COMMENT:
416 1.1.1.2 jruoho case DT_SLASH_SLASH_COMMENT:
417 1.1.1.2 jruoho
418 1.1.1.2 jruoho AcpiOsPrintf ("**** EOF within comment/string %u\n", State);
419 1.1.1.2 jruoho break;
420 1.1.1.2 jruoho
421 1.1.1.2 jruoho default:
422 1.1.1.2 jruoho break;
423 1.1.1.2 jruoho }
424 1.1.1.2 jruoho
425 1.1.1.2 jruoho return (0);
426 1.1.1.2 jruoho }
427 1.1.1.2 jruoho
428 1.1.1.2 jruoho switch (State)
429 1.1.1.2 jruoho {
430 1.1.1.2 jruoho case DT_NORMAL_TEXT:
431 1.1.1.2 jruoho
432 1.1.1.2 jruoho /* Normal text, insert char into line buffer */
433 1.1.1.2 jruoho
434 1.1.1.2 jruoho Gbl_CurrentLineBuffer[i] = c;
435 1.1.1.2 jruoho switch (c)
436 1.1.1.2 jruoho {
437 1.1.1.2 jruoho case '/':
438 1.1.1.2 jruoho State = DT_START_COMMENT;
439 1.1.1.2 jruoho break;
440 1.1.1.2 jruoho
441 1.1.1.2 jruoho case '"':
442 1.1.1.2 jruoho State = DT_START_QUOTED_STRING;
443 1.1.1.2 jruoho i++;
444 1.1.1.2 jruoho break;
445 1.1.1.2 jruoho
446 1.1.1.2 jruoho case '\n':
447 1.1.1.2 jruoho CurrentLineOffset = Gbl_NextLineOffset;
448 1.1.1.2 jruoho Gbl_NextLineOffset = (UINT32) ftell (Handle);
449 1.1.1.2 jruoho Gbl_CurrentLineNumber++;
450 1.1.1.2 jruoho
451 1.1.1.2 jruoho /* Exit if line is complete. Ignore blank lines */
452 1.1.1.2 jruoho
453 1.1.1.2 jruoho if (i != 0)
454 1.1.1.2 jruoho {
455 1.1.1.2 jruoho Gbl_CurrentLineBuffer[i+1] = 0; /* Terminate line */
456 1.1.1.2 jruoho return (CurrentLineOffset);
457 1.1.1.2 jruoho }
458 1.1.1.2 jruoho break;
459 1.1.1.2 jruoho
460 1.1.1.2 jruoho default:
461 1.1.1.2 jruoho i++;
462 1.1.1.2 jruoho break;
463 1.1.1.2 jruoho }
464 1.1.1.2 jruoho break;
465 1.1.1.2 jruoho
466 1.1.1.2 jruoho case DT_START_QUOTED_STRING:
467 1.1.1.2 jruoho
468 1.1.1.2 jruoho /* Insert raw chars until end of quoted string */
469 1.1.1.2 jruoho
470 1.1.1.2 jruoho Gbl_CurrentLineBuffer[i] = c;
471 1.1.1.2 jruoho i++;
472 1.1.1.2 jruoho
473 1.1.1.2 jruoho if (c == '"')
474 1.1.1.2 jruoho {
475 1.1.1.2 jruoho State = DT_NORMAL_TEXT;
476 1.1.1.2 jruoho }
477 1.1.1.2 jruoho break;
478 1.1.1.2 jruoho
479 1.1.1.2 jruoho case DT_START_COMMENT:
480 1.1.1.2 jruoho
481 1.1.1.2 jruoho /* Open comment if this character is an asterisk or slash */
482 1.1.1.2 jruoho
483 1.1.1.2 jruoho switch (c)
484 1.1.1.2 jruoho {
485 1.1.1.2 jruoho case '*':
486 1.1.1.2 jruoho State = DT_SLASH_ASTERISK_COMMENT;
487 1.1.1.2 jruoho break;
488 1.1.1.2 jruoho
489 1.1.1.2 jruoho case '/':
490 1.1.1.2 jruoho State = DT_SLASH_SLASH_COMMENT;
491 1.1.1.2 jruoho break;
492 1.1.1.2 jruoho
493 1.1.1.2 jruoho default: /* Not a comment */
494 1.1.1.2 jruoho i++; /* Save the preceeding slash */
495 1.1.1.2 jruoho Gbl_CurrentLineBuffer[i] = c;
496 1.1.1.2 jruoho i++;
497 1.1.1.2 jruoho State = DT_NORMAL_TEXT;
498 1.1.1.2 jruoho break;
499 1.1.1.2 jruoho }
500 1.1.1.2 jruoho break;
501 1.1.1.2 jruoho
502 1.1.1.2 jruoho case DT_SLASH_ASTERISK_COMMENT:
503 1.1.1.2 jruoho
504 1.1.1.2 jruoho /* Ignore chars until an asterisk-slash is found */
505 1.1.1.2 jruoho
506 1.1.1.2 jruoho switch (c)
507 1.1.1.2 jruoho {
508 1.1.1.2 jruoho case '\n':
509 1.1.1.2 jruoho Gbl_NextLineOffset = (UINT32) ftell (Handle);
510 1.1.1.2 jruoho Gbl_CurrentLineNumber++;
511 1.1.1.2 jruoho break;
512 1.1.1.2 jruoho
513 1.1.1.2 jruoho case '*':
514 1.1.1.2 jruoho State = DT_END_COMMENT;
515 1.1.1.2 jruoho break;
516 1.1.1.2 jruoho
517 1.1.1.2 jruoho default:
518 1.1.1.2 jruoho break;
519 1.1.1.2 jruoho }
520 1.1.1.2 jruoho break;
521 1.1.1.2 jruoho
522 1.1.1.2 jruoho case DT_SLASH_SLASH_COMMENT:
523 1.1.1.2 jruoho
524 1.1.1.2 jruoho /* Ignore chars until end-of-line */
525 1.1.1.2 jruoho
526 1.1.1.2 jruoho if (c == '\n')
527 1.1.1.2 jruoho {
528 1.1.1.2 jruoho /* We will exit via the NORMAL_TEXT path */
529 1.1.1.2 jruoho
530 1.1.1.2 jruoho ungetc (c, Handle);
531 1.1.1.2 jruoho State = DT_NORMAL_TEXT;
532 1.1.1.2 jruoho }
533 1.1.1.2 jruoho break;
534 1.1.1.2 jruoho
535 1.1.1.2 jruoho case DT_END_COMMENT:
536 1.1.1.2 jruoho
537 1.1.1.2 jruoho /* End comment if this char is a slash */
538 1.1.1.2 jruoho
539 1.1.1.2 jruoho switch (c)
540 1.1.1.2 jruoho {
541 1.1.1.2 jruoho case '/':
542 1.1.1.2 jruoho State = DT_NORMAL_TEXT;
543 1.1.1.2 jruoho break;
544 1.1.1.2 jruoho
545 1.1.1.2 jruoho case '\n':
546 1.1.1.2 jruoho CurrentLineOffset = Gbl_NextLineOffset;
547 1.1.1.2 jruoho Gbl_NextLineOffset = (UINT32) ftell (Handle);
548 1.1.1.2 jruoho Gbl_CurrentLineNumber++;
549 1.1.1.2 jruoho break;
550 1.1.1.2 jruoho
551 1.1.1.2 jruoho case '*':
552 1.1.1.2 jruoho /* Consume all adjacent asterisks */
553 1.1.1.2 jruoho break;
554 1.1.1.2 jruoho
555 1.1.1.2 jruoho default:
556 1.1.1.2 jruoho State = DT_SLASH_ASTERISK_COMMENT;
557 1.1.1.2 jruoho break;
558 1.1.1.2 jruoho }
559 1.1.1.2 jruoho break;
560 1.1.1.2 jruoho
561 1.1.1.2 jruoho default:
562 1.1.1.2 jruoho DtFatal (ASL_MSG_COMPILER_INTERNAL, NULL, "Unknown input state");
563 1.1.1.2 jruoho return (0);
564 1.1.1.2 jruoho }
565 1.1.1.2 jruoho }
566 1.1.1.2 jruoho
567 1.1.1.2 jruoho printf ("ERROR - Input line is too long (max %u)\n", ASL_LINE_BUFFER_SIZE);
568 1.1.1.2 jruoho return (0);
569 1.1 jruoho }
570 1.1 jruoho
571 1.1 jruoho
572 1.1 jruoho /******************************************************************************
573 1.1 jruoho *
574 1.1 jruoho * FUNCTION: DtScanFile
575 1.1 jruoho *
576 1.1 jruoho * PARAMETERS: Handle - Open file handle for the source file
577 1.1 jruoho *
578 1.1 jruoho * RETURN: Pointer to start of the constructed parse tree.
579 1.1 jruoho *
580 1.1.1.2 jruoho * DESCRIPTION: Scan source file, link all field names and values
581 1.1 jruoho * to the global parse tree: Gbl_FieldList
582 1.1 jruoho *
583 1.1 jruoho *****************************************************************************/
584 1.1 jruoho
585 1.1 jruoho DT_FIELD *
586 1.1 jruoho DtScanFile (
587 1.1 jruoho FILE *Handle)
588 1.1 jruoho {
589 1.1.1.2 jruoho ACPI_STATUS Status;
590 1.1.1.2 jruoho UINT32 Offset;
591 1.1.1.2 jruoho
592 1.1.1.2 jruoho
593 1.1.1.2 jruoho ACPI_FUNCTION_NAME (DtScanFile);
594 1.1 jruoho
595 1.1 jruoho
596 1.1 jruoho /* Get the file size */
597 1.1 jruoho
598 1.1 jruoho Gbl_InputByteCount = DtGetFileSize (Handle);
599 1.1 jruoho
600 1.1.1.2 jruoho Gbl_CurrentLineNumber = 0;
601 1.1.1.2 jruoho Gbl_CurrentLineOffset = 0;
602 1.1.1.2 jruoho Gbl_NextLineOffset = 0;
603 1.1.1.2 jruoho
604 1.1 jruoho /* Scan line-by-line */
605 1.1 jruoho
606 1.1.1.2 jruoho while ((Offset = DtGetNextLine (Handle)))
607 1.1 jruoho {
608 1.1.1.2 jruoho ACPI_DEBUG_PRINT ((ACPI_DB_PARSE, "Line %2.2u/%4.4X - %s",
609 1.1.1.2 jruoho Gbl_CurrentLineNumber, Offset, Gbl_CurrentLineBuffer));
610 1.1 jruoho
611 1.1.1.2 jruoho Status = DtParseLine (Gbl_CurrentLineBuffer, Gbl_CurrentLineNumber, Offset);
612 1.1.1.2 jruoho if (Status == AE_NOT_FOUND)
613 1.1.1.2 jruoho {
614 1.1.1.2 jruoho break;
615 1.1.1.2 jruoho }
616 1.1 jruoho }
617 1.1 jruoho
618 1.1 jruoho return (Gbl_FieldList);
619 1.1 jruoho }
620 1.1 jruoho
621 1.1 jruoho
622 1.1 jruoho /*
623 1.1 jruoho * Output functions
624 1.1 jruoho */
625 1.1 jruoho
626 1.1 jruoho /******************************************************************************
627 1.1 jruoho *
628 1.1 jruoho * FUNCTION: DtWriteBinary
629 1.1 jruoho *
630 1.1 jruoho * PARAMETERS: DT_WALK_CALLBACK
631 1.1 jruoho *
632 1.1 jruoho * RETURN: Status
633 1.1 jruoho *
634 1.1 jruoho * DESCRIPTION: Write one subtable of a binary ACPI table
635 1.1 jruoho *
636 1.1 jruoho *****************************************************************************/
637 1.1 jruoho
638 1.1 jruoho static void
639 1.1 jruoho DtWriteBinary (
640 1.1 jruoho DT_SUBTABLE *Subtable,
641 1.1 jruoho void *Context,
642 1.1 jruoho void *ReturnValue)
643 1.1 jruoho {
644 1.1 jruoho
645 1.1 jruoho FlWriteFile (ASL_FILE_AML_OUTPUT, Subtable->Buffer, Subtable->Length);
646 1.1 jruoho }
647 1.1 jruoho
648 1.1 jruoho
649 1.1 jruoho /******************************************************************************
650 1.1 jruoho *
651 1.1 jruoho * FUNCTION: DtOutputBinary
652 1.1 jruoho *
653 1.1 jruoho * PARAMETERS:
654 1.1 jruoho *
655 1.1 jruoho * RETURN: Status
656 1.1 jruoho *
657 1.1 jruoho * DESCRIPTION: Write entire binary ACPI table (result of compilation)
658 1.1 jruoho *
659 1.1 jruoho *****************************************************************************/
660 1.1 jruoho
661 1.1 jruoho void
662 1.1 jruoho DtOutputBinary (
663 1.1 jruoho DT_SUBTABLE *RootTable)
664 1.1 jruoho {
665 1.1 jruoho
666 1.1 jruoho if (!RootTable)
667 1.1 jruoho {
668 1.1 jruoho return;
669 1.1 jruoho }
670 1.1 jruoho
671 1.1 jruoho /* Walk the entire parse tree, emitting the binary data */
672 1.1 jruoho
673 1.1 jruoho DtWalkTableTree (RootTable, DtWriteBinary, NULL, NULL);
674 1.1 jruoho Gbl_TableLength = DtGetFileSize (Gbl_Files[ASL_FILE_AML_OUTPUT].Handle);
675 1.1 jruoho }
676 1.1.1.2 jruoho
677 1.1.1.2 jruoho
678 1.1.1.2 jruoho /*
679 1.1.1.2 jruoho * Listing support
680 1.1.1.2 jruoho */
681 1.1.1.2 jruoho
682 1.1.1.2 jruoho /******************************************************************************
683 1.1.1.2 jruoho *
684 1.1.1.2 jruoho * FUNCTION: DtDumpBuffer
685 1.1.1.2 jruoho *
686 1.1.1.2 jruoho * PARAMETERS: FileID - Where to write buffer data
687 1.1.1.2 jruoho * Buffer - Buffer to dump
688 1.1.1.2 jruoho * Offset - Offset in current table
689 1.1.1.2 jruoho * Length - Buffer Length
690 1.1.1.2 jruoho *
691 1.1.1.2 jruoho * RETURN: None
692 1.1.1.2 jruoho *
693 1.1.1.2 jruoho * DESCRIPTION: Another copy of DumpBuffer routine (unfortunately).
694 1.1.1.2 jruoho *
695 1.1.1.2 jruoho * TBD: merge dump buffer routines
696 1.1.1.2 jruoho *
697 1.1.1.2 jruoho *****************************************************************************/
698 1.1.1.2 jruoho
699 1.1.1.2 jruoho static void
700 1.1.1.2 jruoho DtDumpBuffer (
701 1.1.1.2 jruoho UINT32 FileId,
702 1.1.1.2 jruoho UINT8 *Buffer,
703 1.1.1.2 jruoho UINT32 Offset,
704 1.1.1.2 jruoho UINT32 Length)
705 1.1.1.2 jruoho {
706 1.1.1.2 jruoho UINT32 i;
707 1.1.1.2 jruoho UINT32 j;
708 1.1.1.2 jruoho UINT8 BufChar;
709 1.1.1.2 jruoho
710 1.1.1.2 jruoho
711 1.1.1.2 jruoho FlPrintFile (FileId, "Output: [%3.3Xh %4.4d% 3d] ",
712 1.1.1.2 jruoho Offset, Offset, Length);
713 1.1.1.2 jruoho
714 1.1.1.2 jruoho i = 0;
715 1.1.1.2 jruoho while (i < Length)
716 1.1.1.2 jruoho {
717 1.1.1.2 jruoho if (i >= 16)
718 1.1.1.2 jruoho {
719 1.1.1.2 jruoho FlPrintFile (FileId, "%23s", "");
720 1.1.1.2 jruoho }
721 1.1.1.2 jruoho
722 1.1.1.2 jruoho /* Print 16 hex chars */
723 1.1.1.2 jruoho
724 1.1.1.2 jruoho for (j = 0; j < 16;)
725 1.1.1.2 jruoho {
726 1.1.1.2 jruoho if (i + j >= Length)
727 1.1.1.2 jruoho {
728 1.1.1.2 jruoho /* Dump fill spaces */
729 1.1.1.2 jruoho
730 1.1.1.2 jruoho FlPrintFile (FileId, " ");
731 1.1.1.2 jruoho j++;
732 1.1.1.2 jruoho continue;
733 1.1.1.2 jruoho }
734 1.1.1.2 jruoho
735 1.1.1.2 jruoho FlPrintFile (FileId, "%02X ", Buffer[i+j]);
736 1.1.1.2 jruoho j++;
737 1.1.1.2 jruoho }
738 1.1.1.2 jruoho
739 1.1.1.2 jruoho FlPrintFile (FileId, " ");
740 1.1.1.2 jruoho for (j = 0; j < 16; j++)
741 1.1.1.2 jruoho {
742 1.1.1.2 jruoho if (i + j >= Length)
743 1.1.1.2 jruoho {
744 1.1.1.2 jruoho FlPrintFile (FileId, "\n\n");
745 1.1.1.2 jruoho return;
746 1.1.1.2 jruoho }
747 1.1.1.2 jruoho
748 1.1.1.2 jruoho BufChar = Buffer[(ACPI_SIZE) i + j];
749 1.1.1.2 jruoho if (ACPI_IS_PRINT (BufChar))
750 1.1.1.2 jruoho {
751 1.1.1.2 jruoho FlPrintFile (FileId, "%c", BufChar);
752 1.1.1.2 jruoho }
753 1.1.1.2 jruoho else
754 1.1.1.2 jruoho {
755 1.1.1.2 jruoho FlPrintFile (FileId, ".");
756 1.1.1.2 jruoho }
757 1.1.1.2 jruoho }
758 1.1.1.2 jruoho
759 1.1.1.2 jruoho /* Done with that line. */
760 1.1.1.2 jruoho
761 1.1.1.2 jruoho FlPrintFile (FileId, "\n");
762 1.1.1.2 jruoho i += 16;
763 1.1.1.2 jruoho }
764 1.1.1.2 jruoho
765 1.1.1.2 jruoho FlPrintFile (FileId, "\n\n");
766 1.1.1.2 jruoho }
767 1.1.1.2 jruoho
768 1.1.1.2 jruoho
769 1.1.1.2 jruoho /******************************************************************************
770 1.1.1.2 jruoho *
771 1.1.1.2 jruoho * FUNCTION: DtWriteFieldToListing
772 1.1.1.2 jruoho *
773 1.1.1.2 jruoho * PARAMETERS: Buffer - Contains the compiled data
774 1.1.1.2 jruoho * Field - Field node for the input line
775 1.1.1.2 jruoho * Length - Length of the output data
776 1.1.1.2 jruoho *
777 1.1.1.2 jruoho * RETURN: None
778 1.1.1.2 jruoho *
779 1.1.1.2 jruoho * DESCRIPTION: Write one field to the listing file (if listing is enabled).
780 1.1.1.2 jruoho *
781 1.1.1.2 jruoho *****************************************************************************/
782 1.1.1.2 jruoho
783 1.1.1.2 jruoho void
784 1.1.1.2 jruoho DtWriteFieldToListing (
785 1.1.1.2 jruoho UINT8 *Buffer,
786 1.1.1.2 jruoho DT_FIELD *Field,
787 1.1.1.2 jruoho UINT32 Length)
788 1.1.1.2 jruoho {
789 1.1.1.2 jruoho UINT8 FileByte;
790 1.1.1.2 jruoho
791 1.1.1.2 jruoho
792 1.1.1.2 jruoho if (!Gbl_ListingFlag || !Field)
793 1.1.1.2 jruoho {
794 1.1.1.2 jruoho return;
795 1.1.1.2 jruoho }
796 1.1.1.2 jruoho
797 1.1.1.2 jruoho /* Dump the original source line */
798 1.1.1.2 jruoho
799 1.1.1.2 jruoho FlPrintFile (ASL_FILE_LISTING_OUTPUT, "Input: ");
800 1.1.1.2 jruoho FlSeekFile (ASL_FILE_INPUT, Field->ByteOffset);
801 1.1.1.2 jruoho
802 1.1.1.2 jruoho while (FlReadFile (ASL_FILE_INPUT, &FileByte, 1) == AE_OK)
803 1.1.1.2 jruoho {
804 1.1.1.2 jruoho FlWriteFile (ASL_FILE_LISTING_OUTPUT, &FileByte, 1);
805 1.1.1.2 jruoho if (FileByte == '\n')
806 1.1.1.2 jruoho {
807 1.1.1.2 jruoho break;
808 1.1.1.2 jruoho }
809 1.1.1.2 jruoho }
810 1.1.1.2 jruoho
811 1.1.1.2 jruoho /* Dump the line as parsed and represented internally */
812 1.1.1.2 jruoho
813 1.1.1.2 jruoho FlPrintFile (ASL_FILE_LISTING_OUTPUT, "Parsed: %*s : %s\n",
814 1.1.1.2 jruoho Field->Column-4, Field->Name, Field->Value);
815 1.1.1.2 jruoho
816 1.1.1.2 jruoho /* Dump the hex data that will be output for this field */
817 1.1.1.2 jruoho
818 1.1.1.2 jruoho DtDumpBuffer (ASL_FILE_LISTING_OUTPUT, Buffer, Field->TableOffset, Length);
819 1.1.1.2 jruoho }
820 1.1.1.2 jruoho
821 1.1.1.2 jruoho
822 1.1.1.2 jruoho /******************************************************************************
823 1.1.1.2 jruoho *
824 1.1.1.2 jruoho * FUNCTION: DtWriteTableToListing
825 1.1.1.2 jruoho *
826 1.1.1.2 jruoho * PARAMETERS: None
827 1.1.1.2 jruoho *
828 1.1.1.2 jruoho * RETURN: None
829 1.1.1.2 jruoho *
830 1.1.1.2 jruoho * DESCRIPTION: Write the entire compiled table to the listing file
831 1.1.1.2 jruoho * in hex format
832 1.1.1.2 jruoho *
833 1.1.1.2 jruoho *****************************************************************************/
834 1.1.1.2 jruoho
835 1.1.1.2 jruoho void
836 1.1.1.2 jruoho DtWriteTableToListing (
837 1.1.1.2 jruoho void)
838 1.1.1.2 jruoho {
839 1.1.1.2 jruoho UINT8 *Buffer;
840 1.1.1.2 jruoho
841 1.1.1.2 jruoho
842 1.1.1.2 jruoho if (!Gbl_ListingFlag)
843 1.1.1.2 jruoho {
844 1.1.1.2 jruoho return;
845 1.1.1.2 jruoho }
846 1.1.1.2 jruoho
847 1.1.1.2 jruoho /* Read the entire table from the output file */
848 1.1.1.2 jruoho
849 1.1.1.2 jruoho Buffer = UtLocalCalloc (Gbl_TableLength);
850 1.1.1.2 jruoho FlSeekFile (ASL_FILE_AML_OUTPUT, 0);
851 1.1.1.2 jruoho FlReadFile (ASL_FILE_AML_OUTPUT, Buffer, Gbl_TableLength);
852 1.1.1.2 jruoho
853 1.1.1.2 jruoho /* Dump the raw table data */
854 1.1.1.2 jruoho
855 1.1.1.2 jruoho AcpiOsRedirectOutput (Gbl_Files[ASL_FILE_LISTING_OUTPUT].Handle);
856 1.1.1.2 jruoho
857 1.1.1.2 jruoho AcpiOsPrintf ("\n%s: Length %d (0x%X)\n\n",
858 1.1.1.2 jruoho ACPI_RAW_TABLE_DATA_HEADER, Gbl_TableLength, Gbl_TableLength);
859 1.1.1.2 jruoho AcpiUtDumpBuffer2 (Buffer, Gbl_TableLength, DB_BYTE_DISPLAY);
860 1.1.1.2 jruoho
861 1.1.1.2 jruoho AcpiOsRedirectOutput (stdout);
862 1.1.1.2 jruoho }
863