aslcompiler.l revision 1.1.1.2.2.2 1 1.1.1.2.2.2 bouyer
2 1.1.1.2.2.2 bouyer %{
3 1.1.1.2.2.2 bouyer /******************************************************************************
4 1.1.1.2.2.2 bouyer *
5 1.1.1.2.2.2 bouyer * Module Name: aslcompiler.l - Flex input file
6 1.1.1.2.2.2 bouyer *
7 1.1.1.2.2.2 bouyer *****************************************************************************/
8 1.1.1.2.2.2 bouyer
9 1.1.1.2.2.2 bouyer /*
10 1.1.1.2.2.2 bouyer * Copyright (C) 2000 - 2011, Intel Corp.
11 1.1.1.2.2.2 bouyer * All rights reserved.
12 1.1.1.2.2.2 bouyer *
13 1.1.1.2.2.2 bouyer * Redistribution and use in source and binary forms, with or without
14 1.1.1.2.2.2 bouyer * modification, are permitted provided that the following conditions
15 1.1.1.2.2.2 bouyer * are met:
16 1.1.1.2.2.2 bouyer * 1. Redistributions of source code must retain the above copyright
17 1.1.1.2.2.2 bouyer * notice, this list of conditions, and the following disclaimer,
18 1.1.1.2.2.2 bouyer * without modification.
19 1.1.1.2.2.2 bouyer * 2. Redistributions in binary form must reproduce at minimum a disclaimer
20 1.1.1.2.2.2 bouyer * substantially similar to the "NO WARRANTY" disclaimer below
21 1.1.1.2.2.2 bouyer * ("Disclaimer") and any redistribution must be conditioned upon
22 1.1.1.2.2.2 bouyer * including a substantially similar Disclaimer requirement for further
23 1.1.1.2.2.2 bouyer * binary redistribution.
24 1.1.1.2.2.2 bouyer * 3. Neither the names of the above-listed copyright holders nor the names
25 1.1.1.2.2.2 bouyer * of any contributors may be used to endorse or promote products derived
26 1.1.1.2.2.2 bouyer * from this software without specific prior written permission.
27 1.1.1.2.2.2 bouyer *
28 1.1.1.2.2.2 bouyer * Alternatively, this software may be distributed under the terms of the
29 1.1.1.2.2.2 bouyer * GNU General Public License ("GPL") version 2 as published by the Free
30 1.1.1.2.2.2 bouyer * Software Foundation.
31 1.1.1.2.2.2 bouyer *
32 1.1.1.2.2.2 bouyer * NO WARRANTY
33 1.1.1.2.2.2 bouyer * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
34 1.1.1.2.2.2 bouyer * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
35 1.1.1.2.2.2 bouyer * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
36 1.1.1.2.2.2 bouyer * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
37 1.1.1.2.2.2 bouyer * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
38 1.1.1.2.2.2 bouyer * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
39 1.1.1.2.2.2 bouyer * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
40 1.1.1.2.2.2 bouyer * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
41 1.1.1.2.2.2 bouyer * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
42 1.1.1.2.2.2 bouyer * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
43 1.1.1.2.2.2 bouyer * POSSIBILITY OF SUCH DAMAGES.
44 1.1.1.2.2.2 bouyer */
45 1.1.1.2.2.2 bouyer
46 1.1.1.2.2.2 bouyer #include "aslcompiler.h"
47 1.1.1.2.2.2 bouyer #include "aslcompiler.y.h"
48 1.1.1.2.2.2 bouyer
49 1.1.1.2.2.2 bouyer #include <stdlib.h>
50 1.1.1.2.2.2 bouyer #include <string.h>
51 1.1.1.2.2.2 bouyer YYSTYPE AslCompilerlval;
52 1.1.1.2.2.2 bouyer
53 1.1.1.2.2.2 bouyer /*
54 1.1.1.2.2.2 bouyer * Generation: Use the following command line:
55 1.1.1.2.2.2 bouyer *
56 1.1.1.2.2.2 bouyer * flex.exe -PAslCompiler -i -o$(InputPath).c $(InputPath)
57 1.1.1.2.2.2 bouyer *
58 1.1.1.2.2.2 bouyer * -i: Scanner must be case-insensitive
59 1.1.1.2.2.2 bouyer */
60 1.1.1.2.2.2 bouyer
61 1.1.1.2.2.2 bouyer #define _COMPONENT ACPI_COMPILER
62 1.1.1.2.2.2 bouyer ACPI_MODULE_NAME ("aslscan")
63 1.1.1.2.2.2 bouyer char
64 1.1.1.2.2.2 bouyer comment (void);
65 1.1.1.2.2.2 bouyer char
66 1.1.1.2.2.2 bouyer comment2 (void);
67 1.1.1.2.2.2 bouyer void
68 1.1.1.2.2.2 bouyer count (int type);
69 1.1.1.2.2.2 bouyer char
70 1.1.1.2.2.2 bouyer literal (void);
71 1.1.1.2.2.2 bouyer void
72 1.1.1.2.2.2 bouyer copy (void);
73 1.1.1.2.2.2 bouyer
74 1.1.1.2.2.2 bouyer /*! [Begin] no source code translation */
75 1.1.1.2.2.2 bouyer
76 1.1.1.2.2.2 bouyer %}
77 1.1.1.2.2.2 bouyer
78 1.1.1.2.2.2 bouyer
79 1.1.1.2.2.2 bouyer LeadNameChar [A-Za-z_]
80 1.1.1.2.2.2 bouyer DigitChar [0-9]
81 1.1.1.2.2.2 bouyer HexDigitChar [A-Fa-f0-9]
82 1.1.1.2.2.2 bouyer RootChar [\\]
83 1.1.1.2.2.2 bouyer Nothing []
84 1.1.1.2.2.2 bouyer
85 1.1.1.2.2.2 bouyer NameChar [A-Za-z_0-9]
86 1.1.1.2.2.2 bouyer NameSeg1 {LeadNameChar}{NameChar}
87 1.1.1.2.2.2 bouyer NameSeg2 {LeadNameChar}{NameChar}{NameChar}
88 1.1.1.2.2.2 bouyer NameSeg3 {LeadNameChar}{NameChar}{NameChar}{NameChar}
89 1.1.1.2.2.2 bouyer NameSeg {LeadNameChar}|{NameSeg1}|{NameSeg2}|{NameSeg3}
90 1.1.1.2.2.2 bouyer
91 1.1.1.2.2.2 bouyer NameString {RootChar}|{RootChar}{NamePath}|[\^]+{NamePath}|{NonEmptyNamePath}
92 1.1.1.2.2.2 bouyer NamePath {NonEmptyNamePath}?
93 1.1.1.2.2.2 bouyer NonEmptyNamePath {NameSeg}{NamePathTail}*
94 1.1.1.2.2.2 bouyer NamePathTail [.]{NameSeg}
95 1.1.1.2.2.2 bouyer
96 1.1.1.2.2.2 bouyer %%
97 1.1.1.2.2.2 bouyer
98 1.1.1.2.2.2 bouyer [ ] { count (0); }
99 1.1.1.2.2.2 bouyer [\n] { count (0); } /* Handle files with both LF and CR/LF */
100 1.1.1.2.2.2 bouyer [\r] { count (0); } /* termination on both Unix and Windows */
101 1.1.1.2.2.2 bouyer [ \t] { count (0); }
102 1.1.1.2.2.2 bouyer
103 1.1.1.2.2.2 bouyer
104 1.1.1.2.2.2 bouyer "/*" { if (!comment ()) yyterminate (); }
105 1.1.1.2.2.2 bouyer "//" { if (!comment2 ()) yyterminate (); }
106 1.1.1.2.2.2 bouyer
107 1.1.1.2.2.2 bouyer "\"" { if (literal ()) return (PARSEOP_STRING_LITERAL); else yyterminate (); }
108 1.1.1.2.2.2 bouyer
109 1.1.1.2.2.2 bouyer
110 1.1.1.2.2.2 bouyer 0[xX]{HexDigitChar}+ |
111 1.1.1.2.2.2 bouyer {DigitChar}+ { AslCompilerlval.i = UtDoConstant ((char *) AslCompilertext);
112 1.1.1.2.2.2 bouyer count (1); return (PARSEOP_INTEGER); }
113 1.1.1.2.2.2 bouyer
114 1.1.1.2.2.2 bouyer "Include" { count (1); return (PARSEOP_INCLUDE); }
115 1.1.1.2.2.2 bouyer "#include" { count (1); return (PARSEOP_INCLUDE_CSTYLE); }
116 1.1.1.2.2.2 bouyer "#line" { count (1); return (PARSEOP_LINE_CSTYLE); }
117 1.1.1.2.2.2 bouyer "External" { count (1); return (PARSEOP_EXTERNAL); }
118 1.1.1.2.2.2 bouyer
119 1.1.1.2.2.2 bouyer
120 1.1.1.2.2.2 bouyer "Ones" { count (1); return (PARSEOP_ONES); }
121 1.1.1.2.2.2 bouyer "One" { count (1); return (PARSEOP_ONE); }
122 1.1.1.2.2.2 bouyer "Zero" { count (1); return (PARSEOP_ZERO); }
123 1.1.1.2.2.2 bouyer "Revision" { count (1); return (PARSEOP_REVISION); }
124 1.1.1.2.2.2 bouyer
125 1.1.1.2.2.2 bouyer "Offset" { count (1); return (PARSEOP_OFFSET); }
126 1.1.1.2.2.2 bouyer "AccessAs" { count (1); return (PARSEOP_ACCESSAS); }
127 1.1.1.2.2.2 bouyer "BankField" { count (2); return (PARSEOP_BANKFIELD); }
128 1.1.1.2.2.2 bouyer "CreateBitField" { count (2); return (PARSEOP_CREATEBITFIELD); }
129 1.1.1.2.2.2 bouyer "CreateByteField" { count (2); return (PARSEOP_CREATEBYTEFIELD); }
130 1.1.1.2.2.2 bouyer "CreateDWordField" { count (2); return (PARSEOP_CREATEDWORDFIELD); }
131 1.1.1.2.2.2 bouyer "CreateField" { count (2); return (PARSEOP_CREATEFIELD); }
132 1.1.1.2.2.2 bouyer "CreateQWordField" { count (2); return (PARSEOP_CREATEQWORDFIELD); }
133 1.1.1.2.2.2 bouyer "CreateWordField" { count (2); return (PARSEOP_CREATEWORDFIELD); }
134 1.1.1.2.2.2 bouyer "DataTableRegion" { count (2); return (PARSEOP_DATATABLEREGION); }
135 1.1.1.2.2.2 bouyer "Device" { count (2); return (PARSEOP_DEVICE); }
136 1.1.1.2.2.2 bouyer "Event" { count (2); return (PARSEOP_EVENT); }
137 1.1.1.2.2.2 bouyer "Field" { count (2); return (PARSEOP_FIELD); }
138 1.1.1.2.2.2 bouyer "Function" { count (2); return (PARSEOP_FUNCTION); }
139 1.1.1.2.2.2 bouyer "IndexField" { count (2); return (PARSEOP_INDEXFIELD); }
140 1.1.1.2.2.2 bouyer "Method" { count (2); return (PARSEOP_METHOD); }
141 1.1.1.2.2.2 bouyer "Mutex" { count (2); return (PARSEOP_MUTEX); }
142 1.1.1.2.2.2 bouyer "OperationRegion" { count (2); return (PARSEOP_OPERATIONREGION); }
143 1.1.1.2.2.2 bouyer "PowerResource" { count (2); return (PARSEOP_POWERRESOURCE); }
144 1.1.1.2.2.2 bouyer "Processor" { count (2); return (PARSEOP_PROCESSOR); }
145 1.1.1.2.2.2 bouyer "ThermalZone" { count (2); return (PARSEOP_THERMALZONE); }
146 1.1.1.2.2.2 bouyer "Alias" { count (2); return (PARSEOP_ALIAS); }
147 1.1.1.2.2.2 bouyer "Name" { count (2); return (PARSEOP_NAME); }
148 1.1.1.2.2.2 bouyer "Scope" { count (2); return (PARSEOP_SCOPE); }
149 1.1.1.2.2.2 bouyer "Break" { count (3); return (PARSEOP_BREAK); }
150 1.1.1.2.2.2 bouyer "BreakPoint" { count (3); return (PARSEOP_BREAKPOINT); }
151 1.1.1.2.2.2 bouyer "Continue" { count (3); return (PARSEOP_CONTINUE); }
152 1.1.1.2.2.2 bouyer "Fatal" { count (3); return (PARSEOP_FATAL); }
153 1.1.1.2.2.2 bouyer "If" { count (3); return (PARSEOP_IF); }
154 1.1.1.2.2.2 bouyer "Else" { count (3); return (PARSEOP_ELSE); }
155 1.1.1.2.2.2 bouyer "ElseIf" { count (3); return (PARSEOP_ELSEIF); }
156 1.1.1.2.2.2 bouyer "Load" { count (3); return (PARSEOP_LOAD); }
157 1.1.1.2.2.2 bouyer "Noop" { count (3); return (PARSEOP_NOOP); }
158 1.1.1.2.2.2 bouyer "Notify" { count (3); return (PARSEOP_NOTIFY); }
159 1.1.1.2.2.2 bouyer "Release" { count (3); return (PARSEOP_RELEASE); }
160 1.1.1.2.2.2 bouyer "Reset" { count (3); return (PARSEOP_RESET); }
161 1.1.1.2.2.2 bouyer "Return" { count (3); return (PARSEOP_RETURN); }
162 1.1.1.2.2.2 bouyer "Signal" { count (3); return (PARSEOP_SIGNAL); }
163 1.1.1.2.2.2 bouyer "Sleep" { count (3); return (PARSEOP_SLEEP); }
164 1.1.1.2.2.2 bouyer "Stall" { count (3); return (PARSEOP_STALL); }
165 1.1.1.2.2.2 bouyer "Switch" { count (3); return (PARSEOP_SWITCH); }
166 1.1.1.2.2.2 bouyer "Case" { count (3); return (PARSEOP_CASE); }
167 1.1.1.2.2.2 bouyer "Default" { count (3); return (PARSEOP_DEFAULT); }
168 1.1.1.2.2.2 bouyer "Unload" { count (3); return (PARSEOP_UNLOAD); }
169 1.1.1.2.2.2 bouyer "While" { count (3); return (PARSEOP_WHILE); }
170 1.1.1.2.2.2 bouyer
171 1.1.1.2.2.2 bouyer "Acquire" { count (3); return (PARSEOP_ACQUIRE); }
172 1.1.1.2.2.2 bouyer "Add" { count (3); return (PARSEOP_ADD); }
173 1.1.1.2.2.2 bouyer "And" { count (3); return (PARSEOP_AND); }
174 1.1.1.2.2.2 bouyer "Concatenate" { count (3); return (PARSEOP_CONCATENATE); }
175 1.1.1.2.2.2 bouyer "ConcatenateResTemplate" { count (3); return (PARSEOP_CONCATENATERESTEMPLATE); }
176 1.1.1.2.2.2 bouyer "CondRefOf" { count (3); return (PARSEOP_CONDREFOF); }
177 1.1.1.2.2.2 bouyer "CopyObject" { count (3); return (PARSEOP_COPYOBJECT); }
178 1.1.1.2.2.2 bouyer "Decrement" { count (3); return (PARSEOP_DECREMENT); }
179 1.1.1.2.2.2 bouyer "DeRefOf" { count (3); return (PARSEOP_DEREFOF); }
180 1.1.1.2.2.2 bouyer "Divide" { count (3); return (PARSEOP_DIVIDE); }
181 1.1.1.2.2.2 bouyer "FindSetLeftBit" { count (3); return (PARSEOP_FINDSETLEFTBIT); }
182 1.1.1.2.2.2 bouyer "FindSetRightBit" { count (3); return (PARSEOP_FINDSETRIGHTBIT); }
183 1.1.1.2.2.2 bouyer "FromBCD" { count (3); return (PARSEOP_FROMBCD); }
184 1.1.1.2.2.2 bouyer "Increment" { count (3); return (PARSEOP_INCREMENT); }
185 1.1.1.2.2.2 bouyer "Index" { count (3); return (PARSEOP_INDEX); }
186 1.1.1.2.2.2 bouyer "LAnd" { count (3); return (PARSEOP_LAND); }
187 1.1.1.2.2.2 bouyer "LEqual" { count (3); return (PARSEOP_LEQUAL); }
188 1.1.1.2.2.2 bouyer "LGreater" { count (3); return (PARSEOP_LGREATER); }
189 1.1.1.2.2.2 bouyer "LGreaterEqual" { count (3); return (PARSEOP_LGREATEREQUAL); }
190 1.1.1.2.2.2 bouyer "LLess" { count (3); return (PARSEOP_LLESS); }
191 1.1.1.2.2.2 bouyer "LLessEqual" { count (3); return (PARSEOP_LLESSEQUAL); }
192 1.1.1.2.2.2 bouyer "LNot" { count (3); return (PARSEOP_LNOT); }
193 1.1.1.2.2.2 bouyer "LNotEqual" { count (3); return (PARSEOP_LNOTEQUAL); }
194 1.1.1.2.2.2 bouyer "LoadTable" { count (3); return (PARSEOP_LOADTABLE); }
195 1.1.1.2.2.2 bouyer "LOr" { count (3); return (PARSEOP_LOR); }
196 1.1.1.2.2.2 bouyer "Match" { count (3); return (PARSEOP_MATCH); }
197 1.1.1.2.2.2 bouyer "Mid" { count (3); return (PARSEOP_MID); }
198 1.1.1.2.2.2 bouyer "Mod" { count (3); return (PARSEOP_MOD); }
199 1.1.1.2.2.2 bouyer "Multiply" { count (3); return (PARSEOP_MULTIPLY); }
200 1.1.1.2.2.2 bouyer "NAnd" { count (3); return (PARSEOP_NAND); }
201 1.1.1.2.2.2 bouyer "NOr" { count (3); return (PARSEOP_NOR); }
202 1.1.1.2.2.2 bouyer "Not" { count (3); return (PARSEOP_NOT); }
203 1.1.1.2.2.2 bouyer "ObjectType" { count (3); return (PARSEOP_OBJECTTYPE); }
204 1.1.1.2.2.2 bouyer "Or" { count (3); return (PARSEOP_OR); }
205 1.1.1.2.2.2 bouyer "RefOf" { count (3); return (PARSEOP_REFOF); }
206 1.1.1.2.2.2 bouyer "ShiftLeft" { count (3); return (PARSEOP_SHIFTLEFT); }
207 1.1.1.2.2.2 bouyer "ShiftRight" { count (3); return (PARSEOP_SHIFTRIGHT); }
208 1.1.1.2.2.2 bouyer "SizeOf" { count (3); return (PARSEOP_SIZEOF); }
209 1.1.1.2.2.2 bouyer "Store" { count (3); return (PARSEOP_STORE); }
210 1.1.1.2.2.2 bouyer "Subtract" { count (3); return (PARSEOP_SUBTRACT); }
211 1.1.1.2.2.2 bouyer "Timer" { count (3); return (PARSEOP_TIMER); }
212 1.1.1.2.2.2 bouyer "ToBCD" { count (3); return (PARSEOP_TOBCD); }
213 1.1.1.2.2.2 bouyer "ToBuffer" { count (3); return (PARSEOP_TOBUFFER); }
214 1.1.1.2.2.2 bouyer "ToDecimalString" { count (3); return (PARSEOP_TODECIMALSTRING); }
215 1.1.1.2.2.2 bouyer "ToHexString" { count (3); return (PARSEOP_TOHEXSTRING); }
216 1.1.1.2.2.2 bouyer "ToInteger" { count (3); return (PARSEOP_TOINTEGER); }
217 1.1.1.2.2.2 bouyer "ToString" { count (3); return (PARSEOP_TOSTRING); }
218 1.1.1.2.2.2 bouyer "Wait" { count (3); return (PARSEOP_WAIT); }
219 1.1.1.2.2.2 bouyer "XOr" { count (3); return (PARSEOP_XOR); }
220 1.1.1.2.2.2 bouyer
221 1.1.1.2.2.2 bouyer "Arg0" { count (1); return (PARSEOP_ARG0); }
222 1.1.1.2.2.2 bouyer "Arg1" { count (1); return (PARSEOP_ARG1); }
223 1.1.1.2.2.2 bouyer "Arg2" { count (1); return (PARSEOP_ARG2); }
224 1.1.1.2.2.2 bouyer "Arg3" { count (1); return (PARSEOP_ARG3); }
225 1.1.1.2.2.2 bouyer "Arg4" { count (1); return (PARSEOP_ARG4); }
226 1.1.1.2.2.2 bouyer "Arg5" { count (1); return (PARSEOP_ARG5); }
227 1.1.1.2.2.2 bouyer "Arg6" { count (1); return (PARSEOP_ARG6); }
228 1.1.1.2.2.2 bouyer
229 1.1.1.2.2.2 bouyer "Local0" { count (1); return (PARSEOP_LOCAL0); }
230 1.1.1.2.2.2 bouyer "Local1" { count (1); return (PARSEOP_LOCAL1); }
231 1.1.1.2.2.2 bouyer "Local2" { count (1); return (PARSEOP_LOCAL2); }
232 1.1.1.2.2.2 bouyer "Local3" { count (1); return (PARSEOP_LOCAL3); }
233 1.1.1.2.2.2 bouyer "Local4" { count (1); return (PARSEOP_LOCAL4); }
234 1.1.1.2.2.2 bouyer "Local5" { count (1); return (PARSEOP_LOCAL5); }
235 1.1.1.2.2.2 bouyer "Local6" { count (1); return (PARSEOP_LOCAL6); }
236 1.1.1.2.2.2 bouyer "Local7" { count (1); return (PARSEOP_LOCAL7); }
237 1.1.1.2.2.2 bouyer
238 1.1.1.2.2.2 bouyer "Debug" { count (1); return (PARSEOP_DEBUG); }
239 1.1.1.2.2.2 bouyer
240 1.1.1.2.2.2 bouyer "DefinitionBlock" { count (1); return (PARSEOP_DEFINITIONBLOCK); }
241 1.1.1.2.2.2 bouyer "Buffer" { count (1); return (PARSEOP_BUFFER); }
242 1.1.1.2.2.2 bouyer "Package" { count (1); return (PARSEOP_PACKAGE); }
243 1.1.1.2.2.2 bouyer
244 1.1.1.2.2.2 bouyer "EISAID" { count (1); return (PARSEOP_EISAID); }
245 1.1.1.2.2.2 bouyer "ResourceTemplate" { count (1); return (PARSEOP_RESOURCETEMPLATE); }
246 1.1.1.2.2.2 bouyer "ToUUID" { count (1); return (PARSEOP_TOUUID); }
247 1.1.1.2.2.2 bouyer "Unicode" { count (1); return (PARSEOP_UNICODE); }
248 1.1.1.2.2.2 bouyer "DMA" { count (1); return (PARSEOP_DMA); }
249 1.1.1.2.2.2 bouyer "DWordIO" { count (1); return (PARSEOP_DWORDIO); }
250 1.1.1.2.2.2 bouyer "DWordMemory" { count (1); return (PARSEOP_DWORDMEMORY); }
251 1.1.1.2.2.2 bouyer "DWordSpace" { count (1); return (PARSEOP_DWORDSPACE); }
252 1.1.1.2.2.2 bouyer "EndDependentFn" { count (1); return (PARSEOP_ENDDEPENDENTFN); }
253 1.1.1.2.2.2 bouyer "ExtendedIO" { count (1); return (PARSEOP_EXTENDEDIO); }
254 1.1.1.2.2.2 bouyer "ExtendedMemory" { count (1); return (PARSEOP_EXTENDEDMEMORY); }
255 1.1.1.2.2.2 bouyer "ExtendedSpace" { count (1); return (PARSEOP_EXTENDEDSPACE); }
256 1.1.1.2.2.2 bouyer "FixedIO" { count (1); return (PARSEOP_FIXEDIO); }
257 1.1.1.2.2.2 bouyer "Interrupt" { count (1); return (PARSEOP_INTERRUPT); }
258 1.1.1.2.2.2 bouyer "IO" { count (1); return (PARSEOP_IO); }
259 1.1.1.2.2.2 bouyer "IRQNoFlags" { count (1); return (PARSEOP_IRQNOFLAGS); }
260 1.1.1.2.2.2 bouyer "IRQ" { count (1); return (PARSEOP_IRQ); }
261 1.1.1.2.2.2 bouyer "Memory24" { count (1); return (PARSEOP_MEMORY24); }
262 1.1.1.2.2.2 bouyer "Memory32Fixed" { count (1); return (PARSEOP_MEMORY32FIXED); }
263 1.1.1.2.2.2 bouyer "Memory32" { count (1); return (PARSEOP_MEMORY32); }
264 1.1.1.2.2.2 bouyer "QWordIO" { count (1); return (PARSEOP_QWORDIO); }
265 1.1.1.2.2.2 bouyer "QWordMemory" { count (1); return (PARSEOP_QWORDMEMORY); }
266 1.1.1.2.2.2 bouyer "QWordSpace" { count (1); return (PARSEOP_QWORDSPACE); }
267 1.1.1.2.2.2 bouyer "Register" { count (1); return (PARSEOP_REGISTER); }
268 1.1.1.2.2.2 bouyer "StartDependentFn" { count (1); return (PARSEOP_STARTDEPENDENTFN); }
269 1.1.1.2.2.2 bouyer "StartDependentFnNoPri" { count (1); return (PARSEOP_STARTDEPENDENTFN_NOPRI); }
270 1.1.1.2.2.2 bouyer "VendorLong" { count (1); return (PARSEOP_VENDORLONG); }
271 1.1.1.2.2.2 bouyer "VendorShort" { count (1); return (PARSEOP_VENDORSHORT); }
272 1.1.1.2.2.2 bouyer "WordBusNumber" { count (1); return (PARSEOP_WORDBUSNUMBER); }
273 1.1.1.2.2.2 bouyer "WordIO" { count (1); return (PARSEOP_WORDIO); }
274 1.1.1.2.2.2 bouyer "WordSpace" { count (1); return (PARSEOP_WORDSPACE); }
275 1.1.1.2.2.2 bouyer
276 1.1.1.2.2.2 bouyer "UnknownObj" { count (0); return (PARSEOP_OBJECTTYPE_UNK); }
277 1.1.1.2.2.2 bouyer "IntObj" { count (0); return (PARSEOP_OBJECTTYPE_INT); }
278 1.1.1.2.2.2 bouyer "StrObj" { count (0); return (PARSEOP_OBJECTTYPE_STR); }
279 1.1.1.2.2.2 bouyer "BuffObj" { count (0); return (PARSEOP_OBJECTTYPE_BUF); }
280 1.1.1.2.2.2 bouyer "PkgObj" { count (0); return (PARSEOP_OBJECTTYPE_PKG); }
281 1.1.1.2.2.2 bouyer "FieldUnitObj" { count (0); return (PARSEOP_OBJECTTYPE_FLD); }
282 1.1.1.2.2.2 bouyer "DeviceObj" { count (0); return (PARSEOP_OBJECTTYPE_DEV); }
283 1.1.1.2.2.2 bouyer "EventObj" { count (0); return (PARSEOP_OBJECTTYPE_EVT); }
284 1.1.1.2.2.2 bouyer "MethodObj" { count (0); return (PARSEOP_OBJECTTYPE_MTH); }
285 1.1.1.2.2.2 bouyer "MutexObj" { count (0); return (PARSEOP_OBJECTTYPE_MTX); }
286 1.1.1.2.2.2 bouyer "OpRegionObj" { count (0); return (PARSEOP_OBJECTTYPE_OPR); }
287 1.1.1.2.2.2 bouyer "PowerResObj" { count (0); return (PARSEOP_OBJECTTYPE_POW); }
288 1.1.1.2.2.2 bouyer "ProcessorObj" { count (0); return (PARSEOP_OBJECTTYPE_PRO); }
289 1.1.1.2.2.2 bouyer "ThermalZoneObj" { count (0); return (PARSEOP_OBJECTTYPE_THZ); }
290 1.1.1.2.2.2 bouyer "BuffFieldObj" { count (0); return (PARSEOP_OBJECTTYPE_BFF); }
291 1.1.1.2.2.2 bouyer "DDBHandleObj" { count (0); return (PARSEOP_OBJECTTYPE_DDB); }
292 1.1.1.2.2.2 bouyer
293 1.1.1.2.2.2 bouyer "AnyAcc" { count (0); return (PARSEOP_ACCESSTYPE_ANY); }
294 1.1.1.2.2.2 bouyer "ByteAcc" { count (0); return (PARSEOP_ACCESSTYPE_BYTE); }
295 1.1.1.2.2.2 bouyer "WordAcc" { count (0); return (PARSEOP_ACCESSTYPE_WORD); }
296 1.1.1.2.2.2 bouyer "DWordAcc" { count (0); return (PARSEOP_ACCESSTYPE_DWORD); }
297 1.1.1.2.2.2 bouyer "QWordAcc" { count (0); return (PARSEOP_ACCESSTYPE_QWORD); }
298 1.1.1.2.2.2 bouyer "BufferAcc" { count (0); return (PARSEOP_ACCESSTYPE_BUF); }
299 1.1.1.2.2.2 bouyer
300 1.1.1.2.2.2 bouyer "Lock" { count (0); return (PARSEOP_LOCKRULE_LOCK); }
301 1.1.1.2.2.2 bouyer "NoLock" { count (0); return (PARSEOP_LOCKRULE_NOLOCK); }
302 1.1.1.2.2.2 bouyer
303 1.1.1.2.2.2 bouyer "Preserve" { count (0); return (PARSEOP_UPDATERULE_PRESERVE); }
304 1.1.1.2.2.2 bouyer "WriteAsOnes" { count (0); return (PARSEOP_UPDATERULE_ONES); }
305 1.1.1.2.2.2 bouyer "WriteAsZeros" { count (0); return (PARSEOP_UPDATERULE_ZEROS); }
306 1.1.1.2.2.2 bouyer
307 1.1.1.2.2.2 bouyer "Serialized" { count (0); return (PARSEOP_SERIALIZERULE_SERIAL); }
308 1.1.1.2.2.2 bouyer "NotSerialized" { count (0); return (PARSEOP_SERIALIZERULE_NOTSERIAL); }
309 1.1.1.2.2.2 bouyer
310 1.1.1.2.2.2 bouyer "SystemIO" { count (0); return (PARSEOP_REGIONSPACE_IO); }
311 1.1.1.2.2.2 bouyer "SystemMemory" { count (0); return (PARSEOP_REGIONSPACE_MEM); }
312 1.1.1.2.2.2 bouyer "PCI_Config" { count (0); return (PARSEOP_REGIONSPACE_PCI); }
313 1.1.1.2.2.2 bouyer "EmbeddedControl" { count (0); return (PARSEOP_REGIONSPACE_EC); }
314 1.1.1.2.2.2 bouyer "SMBus" { count (0); return (PARSEOP_REGIONSPACE_SMBUS); }
315 1.1.1.2.2.2 bouyer "SystemCMOS" { count (0); return (PARSEOP_REGIONSPACE_CMOS); }
316 1.1.1.2.2.2 bouyer "PciBarTarget" { count (0); return (PARSEOP_REGIONSPACE_PCIBAR); }
317 1.1.1.2.2.2 bouyer "IPMI" { count (0); return (PARSEOP_REGIONSPACE_IPMI); }
318 1.1.1.2.2.2 bouyer
319 1.1.1.2.2.2 bouyer "FFixedHW" { count (0); return (PARSEOP_ADDRESSSPACE_FFIXEDHW); }
320 1.1.1.2.2.2 bouyer
321 1.1.1.2.2.2 bouyer "SMBQuick" { count (0); return (PARSEOP_ACCESSATTRIB_QUICK); }
322 1.1.1.2.2.2 bouyer "SMBSendReceive" { count (0); return (PARSEOP_ACCESSATTRIB_SND_RCV); }
323 1.1.1.2.2.2 bouyer "SMBByte" { count (0); return (PARSEOP_ACCESSATTRIB_BYTE); }
324 1.1.1.2.2.2 bouyer "SMBWord" { count (0); return (PARSEOP_ACCESSATTRIB_WORD); }
325 1.1.1.2.2.2 bouyer "SMBBlock" { count (0); return (PARSEOP_ACCESSATTRIB_BLOCK); }
326 1.1.1.2.2.2 bouyer "SMBProcessCall" { count (0); return (PARSEOP_ACCESSATTRIB_WORD_CALL); }
327 1.1.1.2.2.2 bouyer "SMBBlockProcessCall" { count (0); return (PARSEOP_ACCESSATTRIB_BLOCK_CALL); }
328 1.1.1.2.2.2 bouyer
329 1.1.1.2.2.2 bouyer "MTR" { count (0); return (PARSEOP_MATCHTYPE_MTR); }
330 1.1.1.2.2.2 bouyer "MEQ" { count (0); return (PARSEOP_MATCHTYPE_MEQ); }
331 1.1.1.2.2.2 bouyer "MLE" { count (0); return (PARSEOP_MATCHTYPE_MLE); }
332 1.1.1.2.2.2 bouyer "MLT" { count (0); return (PARSEOP_MATCHTYPE_MLT); }
333 1.1.1.2.2.2 bouyer "MGE" { count (0); return (PARSEOP_MATCHTYPE_MGE); }
334 1.1.1.2.2.2 bouyer "MGT" { count (0); return (PARSEOP_MATCHTYPE_MGT); }
335 1.1.1.2.2.2 bouyer
336 1.1.1.2.2.2 bouyer "Compatibility" { count (0); return (PARSEOP_DMATYPE_COMPATIBILITY); }
337 1.1.1.2.2.2 bouyer "TypeA" { count (0); return (PARSEOP_DMATYPE_A); }
338 1.1.1.2.2.2 bouyer "TypeB" { count (0); return (PARSEOP_DMATYPE_B); }
339 1.1.1.2.2.2 bouyer "TypeF" { count (0); return (PARSEOP_DMATYPE_F); }
340 1.1.1.2.2.2 bouyer
341 1.1.1.2.2.2 bouyer "BusMaster" { count (0); return (PARSEOP_BUSMASTERTYPE_MASTER); }
342 1.1.1.2.2.2 bouyer "NotBusMaster" { count (0); return (PARSEOP_BUSMASTERTYPE_NOTMASTER); }
343 1.1.1.2.2.2 bouyer
344 1.1.1.2.2.2 bouyer "Transfer8" { count (0); return (PARSEOP_XFERTYPE_8); }
345 1.1.1.2.2.2 bouyer "Transfer8_16" { count (0); return (PARSEOP_XFERTYPE_8_16); }
346 1.1.1.2.2.2 bouyer "Transfer16" { count (0); return (PARSEOP_XFERTYPE_16); }
347 1.1.1.2.2.2 bouyer
348 1.1.1.2.2.2 bouyer "ResourceConsumer" { count (0); return (PARSEOP_RESOURCETYPE_CONSUMER); }
349 1.1.1.2.2.2 bouyer "ResourceProducer" { count (0); return (PARSEOP_RESOURCETYPE_PRODUCER); }
350 1.1.1.2.2.2 bouyer
351 1.1.1.2.2.2 bouyer "MinFixed" { count (0); return (PARSEOP_MINTYPE_FIXED); }
352 1.1.1.2.2.2 bouyer "MinNotFixed" { count (0); return (PARSEOP_MINTYPE_NOTFIXED); }
353 1.1.1.2.2.2 bouyer
354 1.1.1.2.2.2 bouyer "MaxFixed" { count (0); return (PARSEOP_MAXTYPE_FIXED); }
355 1.1.1.2.2.2 bouyer "MaxNotFixed" { count (0); return (PARSEOP_MAXTYPE_NOTFIXED); }
356 1.1.1.2.2.2 bouyer
357 1.1.1.2.2.2 bouyer "PosDecode" { count (0); return (PARSEOP_DECODETYPE_POS); }
358 1.1.1.2.2.2 bouyer "SubDecode" { count (0); return (PARSEOP_DECODETYPE_SUB); }
359 1.1.1.2.2.2 bouyer
360 1.1.1.2.2.2 bouyer "ISAOnlyRanges" { count (0); return (PARSEOP_RANGETYPE_ISAONLY); }
361 1.1.1.2.2.2 bouyer "NonISAOnlyRanges" { count (0); return (PARSEOP_RANGETYPE_NONISAONLY); }
362 1.1.1.2.2.2 bouyer "EntireRange" { count (0); return (PARSEOP_RANGETYPE_ENTIRE); }
363 1.1.1.2.2.2 bouyer
364 1.1.1.2.2.2 bouyer "Cacheable" { count (0); return (PARSEOP_MEMTYPE_CACHEABLE); }
365 1.1.1.2.2.2 bouyer "WriteCombining" { count (0); return (PARSEOP_MEMTYPE_WRITECOMBINING); }
366 1.1.1.2.2.2 bouyer "Prefetchable" { count (0); return (PARSEOP_MEMTYPE_PREFETCHABLE); }
367 1.1.1.2.2.2 bouyer "NonCacheable" { count (0); return (PARSEOP_MEMTYPE_NONCACHEABLE); }
368 1.1.1.2.2.2 bouyer
369 1.1.1.2.2.2 bouyer "ReadWrite" { count (0); return (PARSEOP_READWRITETYPE_BOTH); }
370 1.1.1.2.2.2 bouyer "ReadOnly" { count (0); return (PARSEOP_READWRITETYPE_READONLY); }
371 1.1.1.2.2.2 bouyer
372 1.1.1.2.2.2 bouyer "Edge" { count (0); return (PARSEOP_INTTYPE_EDGE); }
373 1.1.1.2.2.2 bouyer "Level" { count (0); return (PARSEOP_INTTYPE_LEVEL); }
374 1.1.1.2.2.2 bouyer
375 1.1.1.2.2.2 bouyer "ActiveHigh" { count (0); return (PARSEOP_INTLEVEL_ACTIVEHIGH); }
376 1.1.1.2.2.2 bouyer "ActiveLow" { count (0); return (PARSEOP_INTLEVEL_ACTIVELOW); }
377 1.1.1.2.2.2 bouyer
378 1.1.1.2.2.2 bouyer "Shared" { count (0); return (PARSEOP_SHARETYPE_SHARED); }
379 1.1.1.2.2.2 bouyer "Exclusive" { count (0); return (PARSEOP_SHARETYPE_EXCLUSIVE); }
380 1.1.1.2.2.2 bouyer
381 1.1.1.2.2.2 bouyer "Decode10" { count (0); return (PARSEOP_IODECODETYPE_10); }
382 1.1.1.2.2.2 bouyer "Decode16" { count (0); return (PARSEOP_IODECODETYPE_16); }
383 1.1.1.2.2.2 bouyer
384 1.1.1.2.2.2 bouyer "TypeTranslation" { count (0); return (PARSEOP_TYPE_TRANSLATION); }
385 1.1.1.2.2.2 bouyer "TypeStatic" { count (0); return (PARSEOP_TYPE_STATIC); }
386 1.1.1.2.2.2 bouyer
387 1.1.1.2.2.2 bouyer "SparseTranslation" { count (0); return (PARSEOP_TRANSLATIONTYPE_SPARSE); }
388 1.1.1.2.2.2 bouyer "DenseTranslation" { count (0); return (PARSEOP_TRANSLATIONTYPE_DENSE); }
389 1.1.1.2.2.2 bouyer
390 1.1.1.2.2.2 bouyer "AddressRangeMemory" { count (0); return (PARSEOP_ADDRESSTYPE_MEMORY); }
391 1.1.1.2.2.2 bouyer "AddressRangeReserved" { count (0); return (PARSEOP_ADDRESSTYPE_RESERVED); }
392 1.1.1.2.2.2 bouyer "AddressRangeNVS" { count (0); return (PARSEOP_ADDRESSTYPE_NVS); }
393 1.1.1.2.2.2 bouyer "AddressRangeACPI" { count (0); return (PARSEOP_ADDRESSTYPE_ACPI); }
394 1.1.1.2.2.2 bouyer
395 1.1.1.2.2.2 bouyer "__DATE__" { count (0); return (PARSEOP___DATE__); }
396 1.1.1.2.2.2 bouyer "__FILE__" { count (0); return (PARSEOP___FILE__); }
397 1.1.1.2.2.2 bouyer "__LINE__" { count (0); return (PARSEOP___LINE__); }
398 1.1.1.2.2.2 bouyer
399 1.1.1.2.2.2 bouyer "{" { count (0); return('{'); }
400 1.1.1.2.2.2 bouyer "}" { count (0); return('}'); }
401 1.1.1.2.2.2 bouyer "," { count (0); return(','); }
402 1.1.1.2.2.2 bouyer "(" { count (0); return('('); }
403 1.1.1.2.2.2 bouyer ")" { count (0); return(')'); }
404 1.1.1.2.2.2 bouyer
405 1.1.1.2.2.2 bouyer
406 1.1.1.2.2.2 bouyer {NameSeg} { char *s;
407 1.1.1.2.2.2 bouyer count (0);
408 1.1.1.2.2.2 bouyer s=malloc (ACPI_NAME_SIZE + 1);
409 1.1.1.2.2.2 bouyer if (strcmp (AslCompilertext, "\\"))
410 1.1.1.2.2.2 bouyer {
411 1.1.1.2.2.2 bouyer strcpy (s, "____");
412 1.1.1.2.2.2 bouyer AcpiUtStrupr (AslCompilertext);
413 1.1.1.2.2.2 bouyer }
414 1.1.1.2.2.2 bouyer memcpy (s, AslCompilertext, strlen (AslCompilertext));
415 1.1.1.2.2.2 bouyer AslCompilerlval.s = s;
416 1.1.1.2.2.2 bouyer DbgPrint (ASL_PARSE_OUTPUT, "NameSeg: %s\n", s);
417 1.1.1.2.2.2 bouyer return (PARSEOP_NAMESEG); }
418 1.1.1.2.2.2 bouyer
419 1.1.1.2.2.2 bouyer {NameString} { char *s;
420 1.1.1.2.2.2 bouyer count (0);
421 1.1.1.2.2.2 bouyer s=malloc (strlen (AslCompilertext)+1);
422 1.1.1.2.2.2 bouyer AcpiUtStrupr (AslCompilertext);
423 1.1.1.2.2.2 bouyer strcpy (s, AslCompilertext);
424 1.1.1.2.2.2 bouyer s[strlen (AslCompilertext)] = 0;
425 1.1.1.2.2.2 bouyer AslCompilerlval.s = s;
426 1.1.1.2.2.2 bouyer DbgPrint (ASL_PARSE_OUTPUT, "NameString: %s\n", s);
427 1.1.1.2.2.2 bouyer return (PARSEOP_NAMESTRING); }
428 1.1.1.2.2.2 bouyer
429 1.1.1.2.2.2 bouyer "*" |
430 1.1.1.2.2.2 bouyer "/" { count (1);
431 1.1.1.2.2.2 bouyer AslCompilererror ("Parse error, expecting ASL keyword or name");}
432 1.1.1.2.2.2 bouyer
433 1.1.1.2.2.2 bouyer . { count (1);
434 1.1.1.2.2.2 bouyer sprintf (MsgBuffer,
435 1.1.1.2.2.2 bouyer "Invalid character (0x%2.2X), expecting ASL keyword or name",
436 1.1.1.2.2.2 bouyer *AslCompilertext);
437 1.1.1.2.2.2 bouyer AslCompilererror (MsgBuffer);}
438 1.1.1.2.2.2 bouyer
439 1.1.1.2.2.2 bouyer <<EOF>> { if (AslPopInputFileStack ())
440 1.1.1.2.2.2 bouyer yyterminate();
441 1.1.1.2.2.2 bouyer else
442 1.1.1.2.2.2 bouyer return (PARSEOP_INCLUDE_END);};
443 1.1.1.2.2.2 bouyer
444 1.1.1.2.2.2 bouyer %%
445 1.1.1.2.2.2 bouyer
446 1.1.1.2.2.2 bouyer /*! [End] no source code translation !*/
447 1.1.1.2.2.2 bouyer
448 1.1.1.2.2.2 bouyer typedef struct asl_file_node
449 1.1.1.2.2.2 bouyer {
450 1.1.1.2.2.2 bouyer FILE *File;
451 1.1.1.2.2.2 bouyer UINT32 CurrentLineNumber;
452 1.1.1.2.2.2 bouyer YY_BUFFER_STATE State;
453 1.1.1.2.2.2 bouyer char *Filename;
454 1.1.1.2.2.2 bouyer struct asl_file_node *Next;
455 1.1.1.2.2.2 bouyer
456 1.1.1.2.2.2 bouyer } ASL_FILE_NODE;
457 1.1.1.2.2.2 bouyer
458 1.1.1.2.2.2 bouyer ASL_FILE_NODE *InputStack = NULL;
459 1.1.1.2.2.2 bouyer
460 1.1.1.2.2.2 bouyer
461 1.1.1.2.2.2 bouyer /*******************************************************************************
462 1.1.1.2.2.2 bouyer *
463 1.1.1.2.2.2 bouyer * FUNCTION: AslPopInputFileStack
464 1.1.1.2.2.2 bouyer *
465 1.1.1.2.2.2 bouyer * PARAMETERS: None
466 1.1.1.2.2.2 bouyer *
467 1.1.1.2.2.2 bouyer * RETURN: 0 if a node was popped, -1 otherwise
468 1.1.1.2.2.2 bouyer *
469 1.1.1.2.2.2 bouyer * DESCRIPTION: Pop the top of the input file stack and point the parser to
470 1.1.1.2.2.2 bouyer * the saved parse buffer contained in the fnode. Also, set the
471 1.1.1.2.2.2 bouyer * global line counters to the saved values. This function is
472 1.1.1.2.2.2 bouyer * called when an include file reaches EOF.
473 1.1.1.2.2.2 bouyer *
474 1.1.1.2.2.2 bouyer ******************************************************************************/
475 1.1.1.2.2.2 bouyer
476 1.1.1.2.2.2 bouyer int
477 1.1.1.2.2.2 bouyer AslPopInputFileStack (
478 1.1.1.2.2.2 bouyer void)
479 1.1.1.2.2.2 bouyer {
480 1.1.1.2.2.2 bouyer ASL_FILE_NODE *Fnode;
481 1.1.1.2.2.2 bouyer FILE *InputFile = NULL;
482 1.1.1.2.2.2 bouyer
483 1.1.1.2.2.2 bouyer
484 1.1.1.2.2.2 bouyer Fnode = InputStack;
485 1.1.1.2.2.2 bouyer DbgPrint (ASL_PARSE_OUTPUT, "\nPop InputFile Stack, Fnode %p\n\n", Fnode);
486 1.1.1.2.2.2 bouyer
487 1.1.1.2.2.2 bouyer
488 1.1.1.2.2.2 bouyer if (!Fnode)
489 1.1.1.2.2.2 bouyer {
490 1.1.1.2.2.2 bouyer return -1;
491 1.1.1.2.2.2 bouyer }
492 1.1.1.2.2.2 bouyer
493 1.1.1.2.2.2 bouyer /* Close the current include file */
494 1.1.1.2.2.2 bouyer
495 1.1.1.2.2.2 bouyer fclose (yyin);
496 1.1.1.2.2.2 bouyer
497 1.1.1.2.2.2 bouyer /* Update the top-of-stack */
498 1.1.1.2.2.2 bouyer
499 1.1.1.2.2.2 bouyer InputStack = Fnode->Next;
500 1.1.1.2.2.2 bouyer InputFile = Fnode->File;
501 1.1.1.2.2.2 bouyer
502 1.1.1.2.2.2 bouyer /* Reset global line counter and filename */
503 1.1.1.2.2.2 bouyer
504 1.1.1.2.2.2 bouyer Gbl_Files[ASL_FILE_INPUT].Filename = Fnode->Filename;
505 1.1.1.2.2.2 bouyer Gbl_CurrentLineNumber = Fnode->CurrentLineNumber;
506 1.1.1.2.2.2 bouyer
507 1.1.1.2.2.2 bouyer /* Point the parser to the popped file */
508 1.1.1.2.2.2 bouyer
509 1.1.1.2.2.2 bouyer yy_delete_buffer (YY_CURRENT_BUFFER);
510 1.1.1.2.2.2 bouyer yy_switch_to_buffer (Fnode->State);
511 1.1.1.2.2.2 bouyer
512 1.1.1.2.2.2 bouyer /* All done with this node */
513 1.1.1.2.2.2 bouyer
514 1.1.1.2.2.2 bouyer ACPI_FREE (Fnode);
515 1.1.1.2.2.2 bouyer return 0;
516 1.1.1.2.2.2 bouyer }
517 1.1.1.2.2.2 bouyer
518 1.1.1.2.2.2 bouyer
519 1.1.1.2.2.2 bouyer /*******************************************************************************
520 1.1.1.2.2.2 bouyer *
521 1.1.1.2.2.2 bouyer * FUNCTION: AslPushInputFileStack
522 1.1.1.2.2.2 bouyer *
523 1.1.1.2.2.2 bouyer * PARAMETERS: InputFile - Open file pointer
524 1.1.1.2.2.2 bouyer * Filename - Name of the file
525 1.1.1.2.2.2 bouyer *
526 1.1.1.2.2.2 bouyer * RETURN: None
527 1.1.1.2.2.2 bouyer *
528 1.1.1.2.2.2 bouyer * DESCRIPTION: Push the InputFile onto the file stack, and point the parser
529 1.1.1.2.2.2 bouyer * to this file. Called when an include file is successfully
530 1.1.1.2.2.2 bouyer * opened.
531 1.1.1.2.2.2 bouyer *
532 1.1.1.2.2.2 bouyer ******************************************************************************/
533 1.1.1.2.2.2 bouyer
534 1.1.1.2.2.2 bouyer void
535 1.1.1.2.2.2 bouyer AslPushInputFileStack (
536 1.1.1.2.2.2 bouyer FILE *InputFile,
537 1.1.1.2.2.2 bouyer char *Filename)
538 1.1.1.2.2.2 bouyer {
539 1.1.1.2.2.2 bouyer ASL_FILE_NODE *Fnode;
540 1.1.1.2.2.2 bouyer YY_BUFFER_STATE State;
541 1.1.1.2.2.2 bouyer
542 1.1.1.2.2.2 bouyer
543 1.1.1.2.2.2 bouyer /* Save the current state in an Fnode */
544 1.1.1.2.2.2 bouyer
545 1.1.1.2.2.2 bouyer Fnode = UtLocalCalloc (sizeof (ASL_FILE_NODE));
546 1.1.1.2.2.2 bouyer
547 1.1.1.2.2.2 bouyer Fnode->File = yyin;
548 1.1.1.2.2.2 bouyer Fnode->Next = InputStack;
549 1.1.1.2.2.2 bouyer Fnode->State = YY_CURRENT_BUFFER;
550 1.1.1.2.2.2 bouyer Fnode->CurrentLineNumber = Gbl_CurrentLineNumber;
551 1.1.1.2.2.2 bouyer Fnode->Filename = Gbl_Files[ASL_FILE_INPUT].Filename;
552 1.1.1.2.2.2 bouyer
553 1.1.1.2.2.2 bouyer /* Push it on the stack */
554 1.1.1.2.2.2 bouyer
555 1.1.1.2.2.2 bouyer InputStack = Fnode;
556 1.1.1.2.2.2 bouyer
557 1.1.1.2.2.2 bouyer /* Point the parser to this file */
558 1.1.1.2.2.2 bouyer
559 1.1.1.2.2.2 bouyer State = yy_create_buffer (InputFile, YY_BUF_SIZE);
560 1.1.1.2.2.2 bouyer yy_switch_to_buffer (State);
561 1.1.1.2.2.2 bouyer
562 1.1.1.2.2.2 bouyer DbgPrint (ASL_PARSE_OUTPUT, "\nPush InputFile Stack, returning %p\n\n", InputFile);
563 1.1.1.2.2.2 bouyer
564 1.1.1.2.2.2 bouyer /* Reset the global line count and filename */
565 1.1.1.2.2.2 bouyer
566 1.1.1.2.2.2 bouyer Gbl_Files[ASL_FILE_INPUT].Filename = Filename;
567 1.1.1.2.2.2 bouyer Gbl_CurrentLineNumber = 1;
568 1.1.1.2.2.2 bouyer yyin = InputFile;
569 1.1.1.2.2.2 bouyer }
570 1.1.1.2.2.2 bouyer
571 1.1.1.2.2.2 bouyer
572 1.1.1.2.2.2 bouyer /*******************************************************************************
573 1.1.1.2.2.2 bouyer *
574 1.1.1.2.2.2 bouyer * FUNCTION: ResetCurrentLineBuffer
575 1.1.1.2.2.2 bouyer *
576 1.1.1.2.2.2 bouyer * PARAMETERS: None
577 1.1.1.2.2.2 bouyer *
578 1.1.1.2.2.2 bouyer * RETURN: None
579 1.1.1.2.2.2 bouyer *
580 1.1.1.2.2.2 bouyer * DESCRIPTION: Reset the Line Buffer to zero, increment global line numbers.
581 1.1.1.2.2.2 bouyer *
582 1.1.1.2.2.2 bouyer ******************************************************************************/
583 1.1.1.2.2.2 bouyer
584 1.1.1.2.2.2 bouyer void
585 1.1.1.2.2.2 bouyer ResetCurrentLineBuffer (
586 1.1.1.2.2.2 bouyer void)
587 1.1.1.2.2.2 bouyer {
588 1.1.1.2.2.2 bouyer
589 1.1.1.2.2.2 bouyer if (Gbl_Files[ASL_FILE_SOURCE_OUTPUT].Handle)
590 1.1.1.2.2.2 bouyer {
591 1.1.1.2.2.2 bouyer FlWriteFile (ASL_FILE_SOURCE_OUTPUT, Gbl_CurrentLineBuffer,
592 1.1.1.2.2.2 bouyer Gbl_LineBufPtr - Gbl_CurrentLineBuffer);
593 1.1.1.2.2.2 bouyer }
594 1.1.1.2.2.2 bouyer
595 1.1.1.2.2.2 bouyer Gbl_CurrentLineOffset += Gbl_CurrentColumn;
596 1.1.1.2.2.2 bouyer Gbl_CurrentColumn = 0;
597 1.1.1.2.2.2 bouyer
598 1.1.1.2.2.2 bouyer Gbl_CurrentLineNumber++;
599 1.1.1.2.2.2 bouyer Gbl_LogicalLineNumber++;
600 1.1.1.2.2.2 bouyer Gbl_LineBufPtr = Gbl_CurrentLineBuffer;
601 1.1.1.2.2.2 bouyer }
602 1.1.1.2.2.2 bouyer
603 1.1.1.2.2.2 bouyer
604 1.1.1.2.2.2 bouyer /*******************************************************************************
605 1.1.1.2.2.2 bouyer *
606 1.1.1.2.2.2 bouyer * FUNCTION: InsertLineBuffer
607 1.1.1.2.2.2 bouyer *
608 1.1.1.2.2.2 bouyer * PARAMETERS: SourceChar - One char from the input ASL source file
609 1.1.1.2.2.2 bouyer *
610 1.1.1.2.2.2 bouyer * RETURN: None
611 1.1.1.2.2.2 bouyer *
612 1.1.1.2.2.2 bouyer * DESCRIPTION: Put one character of the source file into the temp line buffer
613 1.1.1.2.2.2 bouyer *
614 1.1.1.2.2.2 bouyer ******************************************************************************/
615 1.1.1.2.2.2 bouyer
616 1.1.1.2.2.2 bouyer #define ASL_SPACES_PER_TAB 4
617 1.1.1.2.2.2 bouyer
618 1.1.1.2.2.2 bouyer void
619 1.1.1.2.2.2 bouyer InsertLineBuffer (
620 1.1.1.2.2.2 bouyer int SourceChar)
621 1.1.1.2.2.2 bouyer {
622 1.1.1.2.2.2 bouyer UINT32 i;
623 1.1.1.2.2.2 bouyer UINT32 Count = 1;
624 1.1.1.2.2.2 bouyer
625 1.1.1.2.2.2 bouyer
626 1.1.1.2.2.2 bouyer if (SourceChar == EOF)
627 1.1.1.2.2.2 bouyer {
628 1.1.1.2.2.2 bouyer return;
629 1.1.1.2.2.2 bouyer }
630 1.1.1.2.2.2 bouyer
631 1.1.1.2.2.2 bouyer Gbl_InputByteCount++;
632 1.1.1.2.2.2 bouyer
633 1.1.1.2.2.2 bouyer /* Handle tabs. Convert to spaces */
634 1.1.1.2.2.2 bouyer
635 1.1.1.2.2.2 bouyer if (SourceChar == '\t')
636 1.1.1.2.2.2 bouyer {
637 1.1.1.2.2.2 bouyer SourceChar = ' ';
638 1.1.1.2.2.2 bouyer Count = ASL_SPACES_PER_TAB -
639 1.1.1.2.2.2 bouyer (Gbl_CurrentColumn & (ASL_SPACES_PER_TAB-1));
640 1.1.1.2.2.2 bouyer }
641 1.1.1.2.2.2 bouyer
642 1.1.1.2.2.2 bouyer
643 1.1.1.2.2.2 bouyer for (i = 0; i < Count; i++)
644 1.1.1.2.2.2 bouyer {
645 1.1.1.2.2.2 bouyer Gbl_CurrentColumn++;
646 1.1.1.2.2.2 bouyer
647 1.1.1.2.2.2 bouyer /* Insert the character into the line buffer */
648 1.1.1.2.2.2 bouyer
649 1.1.1.2.2.2 bouyer *Gbl_LineBufPtr = (UINT8) SourceChar;
650 1.1.1.2.2.2 bouyer Gbl_LineBufPtr++;
651 1.1.1.2.2.2 bouyer
652 1.1.1.2.2.2 bouyer if (Gbl_LineBufPtr > (Gbl_CurrentLineBuffer + (ASL_LINE_BUFFER_SIZE - 1)))
653 1.1.1.2.2.2 bouyer {
654 1.1.1.2.2.2 bouyer #if 0
655 1.1.1.2.2.2 bouyer /*
656 1.1.1.2.2.2 bouyer * Warning if we have split a long source line.
657 1.1.1.2.2.2 bouyer * <Probably overkill>
658 1.1.1.2.2.2 bouyer */
659 1.1.1.2.2.2 bouyer sprintf (MsgBuffer, "Max %u", ASL_LINE_BUFFER_SIZE);
660 1.1.1.2.2.2 bouyer AslCommonError (ASL_WARNING, ASL_MSG_LONG_LINE,
661 1.1.1.2.2.2 bouyer Gbl_CurrentLineNumber, Gbl_LogicalLineNumber,
662 1.1.1.2.2.2 bouyer Gbl_CurrentLineOffset, Gbl_CurrentColumn,
663 1.1.1.2.2.2 bouyer Gbl_Files[ASL_FILE_INPUT].Filename, MsgBuffer);
664 1.1.1.2.2.2 bouyer #endif
665 1.1.1.2.2.2 bouyer
666 1.1.1.2.2.2 bouyer ResetCurrentLineBuffer ();
667 1.1.1.2.2.2 bouyer }
668 1.1.1.2.2.2 bouyer else if (SourceChar == '\n')
669 1.1.1.2.2.2 bouyer {
670 1.1.1.2.2.2 bouyer /* End of line */
671 1.1.1.2.2.2 bouyer
672 1.1.1.2.2.2 bouyer ResetCurrentLineBuffer ();
673 1.1.1.2.2.2 bouyer }
674 1.1.1.2.2.2 bouyer }
675 1.1.1.2.2.2 bouyer }
676 1.1.1.2.2.2 bouyer
677 1.1.1.2.2.2 bouyer
678 1.1.1.2.2.2 bouyer /*******************************************************************************
679 1.1.1.2.2.2 bouyer *
680 1.1.1.2.2.2 bouyer * FUNCTION: count
681 1.1.1.2.2.2 bouyer *
682 1.1.1.2.2.2 bouyer * PARAMETERS: yytext - Contains the matched keyword.
683 1.1.1.2.2.2 bouyer * Type - Keyword/Character type:
684 1.1.1.2.2.2 bouyer * 0 = anything except a keyword
685 1.1.1.2.2.2 bouyer * 1 = pseudo-keywords
686 1.1.1.2.2.2 bouyer * 2 = non-executable ASL keywords
687 1.1.1.2.2.2 bouyer * 3 = executable ASL keywords
688 1.1.1.2.2.2 bouyer *
689 1.1.1.2.2.2 bouyer * RETURN: None
690 1.1.1.2.2.2 bouyer *
691 1.1.1.2.2.2 bouyer * DESCRIPTION: Count keywords and put them into the line buffer
692 1.1.1.2.2.2 bouyer *
693 1.1.1.2.2.2 bouyer ******************************************************************************/
694 1.1.1.2.2.2 bouyer
695 1.1.1.2.2.2 bouyer void
696 1.1.1.2.2.2 bouyer count (
697 1.1.1.2.2.2 bouyer int Type)
698 1.1.1.2.2.2 bouyer {
699 1.1.1.2.2.2 bouyer int i;
700 1.1.1.2.2.2 bouyer
701 1.1.1.2.2.2 bouyer
702 1.1.1.2.2.2 bouyer switch (Type)
703 1.1.1.2.2.2 bouyer {
704 1.1.1.2.2.2 bouyer case 2:
705 1.1.1.2.2.2 bouyer TotalKeywords++;
706 1.1.1.2.2.2 bouyer TotalNamedObjects++;
707 1.1.1.2.2.2 bouyer break;
708 1.1.1.2.2.2 bouyer
709 1.1.1.2.2.2 bouyer case 3:
710 1.1.1.2.2.2 bouyer TotalKeywords++;
711 1.1.1.2.2.2 bouyer TotalExecutableOpcodes++;
712 1.1.1.2.2.2 bouyer break;
713 1.1.1.2.2.2 bouyer }
714 1.1.1.2.2.2 bouyer
715 1.1.1.2.2.2 bouyer for (i = 0; (yytext[i] != 0) && (yytext[i] != EOF); i++)
716 1.1.1.2.2.2 bouyer {
717 1.1.1.2.2.2 bouyer InsertLineBuffer (yytext[i]);
718 1.1.1.2.2.2 bouyer *Gbl_LineBufPtr = 0;
719 1.1.1.2.2.2 bouyer }
720 1.1.1.2.2.2 bouyer }
721 1.1.1.2.2.2 bouyer
722 1.1.1.2.2.2 bouyer
723 1.1.1.2.2.2 bouyer /*******************************************************************************
724 1.1.1.2.2.2 bouyer *
725 1.1.1.2.2.2 bouyer * FUNCTION: comment
726 1.1.1.2.2.2 bouyer *
727 1.1.1.2.2.2 bouyer * PARAMETERS: none
728 1.1.1.2.2.2 bouyer *
729 1.1.1.2.2.2 bouyer * RETURN: none
730 1.1.1.2.2.2 bouyer *
731 1.1.1.2.2.2 bouyer * DESCRIPTION: Process a standard comment.
732 1.1.1.2.2.2 bouyer *
733 1.1.1.2.2.2 bouyer ******************************************************************************/
734 1.1.1.2.2.2 bouyer
735 1.1.1.2.2.2 bouyer char
736 1.1.1.2.2.2 bouyer comment (void)
737 1.1.1.2.2.2 bouyer {
738 1.1.1.2.2.2 bouyer char c;
739 1.1.1.2.2.2 bouyer char c1 = 0;
740 1.1.1.2.2.2 bouyer
741 1.1.1.2.2.2 bouyer
742 1.1.1.2.2.2 bouyer InsertLineBuffer ('/');
743 1.1.1.2.2.2 bouyer InsertLineBuffer ('*');
744 1.1.1.2.2.2 bouyer
745 1.1.1.2.2.2 bouyer loop:
746 1.1.1.2.2.2 bouyer
747 1.1.1.2.2.2 bouyer /* Eat chars until end-of-comment */
748 1.1.1.2.2.2 bouyer
749 1.1.1.2.2.2 bouyer while ((c = (char) input()) != '*' && c != EOF)
750 1.1.1.2.2.2 bouyer {
751 1.1.1.2.2.2 bouyer InsertLineBuffer (c);
752 1.1.1.2.2.2 bouyer c1 = c;
753 1.1.1.2.2.2 bouyer }
754 1.1.1.2.2.2 bouyer
755 1.1.1.2.2.2 bouyer if (c == EOF)
756 1.1.1.2.2.2 bouyer {
757 1.1.1.2.2.2 bouyer goto EarlyEOF;
758 1.1.1.2.2.2 bouyer }
759 1.1.1.2.2.2 bouyer
760 1.1.1.2.2.2 bouyer /*
761 1.1.1.2.2.2 bouyer * Check for nested comment -- can help catch cases where a previous
762 1.1.1.2.2.2 bouyer * comment was accidently left unterminated
763 1.1.1.2.2.2 bouyer */
764 1.1.1.2.2.2 bouyer if ((c1 == '/') && (c == '*'))
765 1.1.1.2.2.2 bouyer {
766 1.1.1.2.2.2 bouyer AslCommonError (ASL_WARNING, ASL_MSG_NESTED_COMMENT,
767 1.1.1.2.2.2 bouyer Gbl_CurrentLineNumber, Gbl_LogicalLineNumber,
768 1.1.1.2.2.2 bouyer Gbl_InputByteCount, Gbl_CurrentColumn,
769 1.1.1.2.2.2 bouyer Gbl_Files[ASL_FILE_INPUT].Filename, NULL);
770 1.1.1.2.2.2 bouyer }
771 1.1.1.2.2.2 bouyer
772 1.1.1.2.2.2 bouyer /* Comment is closed only if the NEXT character is a slash */
773 1.1.1.2.2.2 bouyer
774 1.1.1.2.2.2 bouyer InsertLineBuffer (c);
775 1.1.1.2.2.2 bouyer
776 1.1.1.2.2.2 bouyer if ((c1 = (char) input()) != '/' && c1 != EOF)
777 1.1.1.2.2.2 bouyer {
778 1.1.1.2.2.2 bouyer unput(c1);
779 1.1.1.2.2.2 bouyer goto loop;
780 1.1.1.2.2.2 bouyer }
781 1.1.1.2.2.2 bouyer
782 1.1.1.2.2.2 bouyer if (c1 == EOF)
783 1.1.1.2.2.2 bouyer {
784 1.1.1.2.2.2 bouyer goto EarlyEOF;
785 1.1.1.2.2.2 bouyer }
786 1.1.1.2.2.2 bouyer
787 1.1.1.2.2.2 bouyer InsertLineBuffer (c1);
788 1.1.1.2.2.2 bouyer return TRUE;
789 1.1.1.2.2.2 bouyer
790 1.1.1.2.2.2 bouyer
791 1.1.1.2.2.2 bouyer EarlyEOF:
792 1.1.1.2.2.2 bouyer /*
793 1.1.1.2.2.2 bouyer * Premature End-Of-File
794 1.1.1.2.2.2 bouyer */
795 1.1.1.2.2.2 bouyer AslCommonError (ASL_ERROR, ASL_MSG_EARLY_EOF,
796 1.1.1.2.2.2 bouyer Gbl_CurrentLineNumber, Gbl_LogicalLineNumber,
797 1.1.1.2.2.2 bouyer Gbl_CurrentLineOffset, Gbl_CurrentColumn,
798 1.1.1.2.2.2 bouyer Gbl_Files[ASL_FILE_INPUT].Filename, NULL);
799 1.1.1.2.2.2 bouyer return (FALSE);
800 1.1.1.2.2.2 bouyer }
801 1.1.1.2.2.2 bouyer
802 1.1.1.2.2.2 bouyer
803 1.1.1.2.2.2 bouyer /*******************************************************************************
804 1.1.1.2.2.2 bouyer *
805 1.1.1.2.2.2 bouyer * FUNCTION: comment
806 1.1.1.2.2.2 bouyer *
807 1.1.1.2.2.2 bouyer * PARAMETERS: none
808 1.1.1.2.2.2 bouyer *
809 1.1.1.2.2.2 bouyer * RETURN: none
810 1.1.1.2.2.2 bouyer *
811 1.1.1.2.2.2 bouyer * DESCRIPTION: Process a new "//" comment.
812 1.1.1.2.2.2 bouyer *
813 1.1.1.2.2.2 bouyer ******************************************************************************/
814 1.1.1.2.2.2 bouyer
815 1.1.1.2.2.2 bouyer char
816 1.1.1.2.2.2 bouyer comment2 (void)
817 1.1.1.2.2.2 bouyer {
818 1.1.1.2.2.2 bouyer char c;
819 1.1.1.2.2.2 bouyer
820 1.1.1.2.2.2 bouyer
821 1.1.1.2.2.2 bouyer InsertLineBuffer ('/');
822 1.1.1.2.2.2 bouyer InsertLineBuffer ('/');
823 1.1.1.2.2.2 bouyer
824 1.1.1.2.2.2 bouyer while ((c = (char) input()) != '\n' && c != EOF)
825 1.1.1.2.2.2 bouyer {
826 1.1.1.2.2.2 bouyer InsertLineBuffer (c);
827 1.1.1.2.2.2 bouyer }
828 1.1.1.2.2.2 bouyer
829 1.1.1.2.2.2 bouyer if (c == EOF)
830 1.1.1.2.2.2 bouyer {
831 1.1.1.2.2.2 bouyer /* End of file is OK, change to newline. Let parser detect EOF later */
832 1.1.1.2.2.2 bouyer
833 1.1.1.2.2.2 bouyer c = '\n';
834 1.1.1.2.2.2 bouyer }
835 1.1.1.2.2.2 bouyer
836 1.1.1.2.2.2 bouyer InsertLineBuffer (c);
837 1.1.1.2.2.2 bouyer return (TRUE);
838 1.1.1.2.2.2 bouyer }
839 1.1.1.2.2.2 bouyer
840 1.1.1.2.2.2 bouyer
841 1.1.1.2.2.2 bouyer /*******************************************************************************
842 1.1.1.2.2.2 bouyer *
843 1.1.1.2.2.2 bouyer * FUNCTION: literal
844 1.1.1.2.2.2 bouyer *
845 1.1.1.2.2.2 bouyer * PARAMETERS: none
846 1.1.1.2.2.2 bouyer *
847 1.1.1.2.2.2 bouyer * RETURN: none
848 1.1.1.2.2.2 bouyer *
849 1.1.1.2.2.2 bouyer * DESCRIPTION: Process a string literal (surrounded by quotes)
850 1.1.1.2.2.2 bouyer *
851 1.1.1.2.2.2 bouyer ******************************************************************************/
852 1.1.1.2.2.2 bouyer
853 1.1.1.2.2.2 bouyer #define ASL_NORMAL_CHAR 0
854 1.1.1.2.2.2 bouyer #define ASL_ESCAPE_SEQUENCE 1
855 1.1.1.2.2.2 bouyer #define ASL_OCTAL_CONSTANT 2
856 1.1.1.2.2.2 bouyer #define ASL_HEX_CONSTANT 3
857 1.1.1.2.2.2 bouyer
858 1.1.1.2.2.2 bouyer char
859 1.1.1.2.2.2 bouyer literal (void)
860 1.1.1.2.2.2 bouyer {
861 1.1.1.2.2.2 bouyer char *StringBuffer = MsgBuffer;
862 1.1.1.2.2.2 bouyer char *EndBuffer = MsgBuffer + ASL_MSG_BUFFER_SIZE;
863 1.1.1.2.2.2 bouyer char *CleanString;
864 1.1.1.2.2.2 bouyer char StringChar;
865 1.1.1.2.2.2 bouyer UINT32 State = ASL_NORMAL_CHAR;
866 1.1.1.2.2.2 bouyer UINT32 i = 0;
867 1.1.1.2.2.2 bouyer UINT8 Digit;
868 1.1.1.2.2.2 bouyer char ConvertBuffer[4];
869 1.1.1.2.2.2 bouyer
870 1.1.1.2.2.2 bouyer
871 1.1.1.2.2.2 bouyer /*
872 1.1.1.2.2.2 bouyer * Eat chars until end-of-literal.
873 1.1.1.2.2.2 bouyer * NOTE: Put back the original surrounding quotes into the
874 1.1.1.2.2.2 bouyer * source line buffer.
875 1.1.1.2.2.2 bouyer */
876 1.1.1.2.2.2 bouyer InsertLineBuffer ('\"');
877 1.1.1.2.2.2 bouyer while ((StringChar = (char) input()) != EOF)
878 1.1.1.2.2.2 bouyer {
879 1.1.1.2.2.2 bouyer InsertLineBuffer (StringChar);
880 1.1.1.2.2.2 bouyer
881 1.1.1.2.2.2 bouyer DoCharacter:
882 1.1.1.2.2.2 bouyer
883 1.1.1.2.2.2 bouyer switch (State)
884 1.1.1.2.2.2 bouyer {
885 1.1.1.2.2.2 bouyer case ASL_NORMAL_CHAR:
886 1.1.1.2.2.2 bouyer
887 1.1.1.2.2.2 bouyer switch (StringChar)
888 1.1.1.2.2.2 bouyer {
889 1.1.1.2.2.2 bouyer case '\\':
890 1.1.1.2.2.2 bouyer /*
891 1.1.1.2.2.2 bouyer * Special handling for backslash-escape sequence. We will
892 1.1.1.2.2.2 bouyer * toss the backslash and translate the escape char(s).
893 1.1.1.2.2.2 bouyer */
894 1.1.1.2.2.2 bouyer State = ASL_ESCAPE_SEQUENCE;
895 1.1.1.2.2.2 bouyer continue;
896 1.1.1.2.2.2 bouyer
897 1.1.1.2.2.2 bouyer case '\"':
898 1.1.1.2.2.2 bouyer
899 1.1.1.2.2.2 bouyer /* String terminator */
900 1.1.1.2.2.2 bouyer
901 1.1.1.2.2.2 bouyer goto CompletedString;
902 1.1.1.2.2.2 bouyer }
903 1.1.1.2.2.2 bouyer break;
904 1.1.1.2.2.2 bouyer
905 1.1.1.2.2.2 bouyer
906 1.1.1.2.2.2 bouyer case ASL_ESCAPE_SEQUENCE:
907 1.1.1.2.2.2 bouyer
908 1.1.1.2.2.2 bouyer State = ASL_NORMAL_CHAR;
909 1.1.1.2.2.2 bouyer switch (StringChar)
910 1.1.1.2.2.2 bouyer {
911 1.1.1.2.2.2 bouyer case 'a':
912 1.1.1.2.2.2 bouyer StringChar = 0x07; /* BELL */
913 1.1.1.2.2.2 bouyer break;
914 1.1.1.2.2.2 bouyer
915 1.1.1.2.2.2 bouyer case 'b':
916 1.1.1.2.2.2 bouyer StringChar = 0x08; /* BACKSPACE */
917 1.1.1.2.2.2 bouyer break;
918 1.1.1.2.2.2 bouyer
919 1.1.1.2.2.2 bouyer case 'f':
920 1.1.1.2.2.2 bouyer StringChar = 0x0C; /* FORMFEED */
921 1.1.1.2.2.2 bouyer break;
922 1.1.1.2.2.2 bouyer
923 1.1.1.2.2.2 bouyer case 'n':
924 1.1.1.2.2.2 bouyer StringChar = 0x0A; /* LINEFEED */
925 1.1.1.2.2.2 bouyer break;
926 1.1.1.2.2.2 bouyer
927 1.1.1.2.2.2 bouyer case 'r':
928 1.1.1.2.2.2 bouyer StringChar = 0x0D; /* CARRIAGE RETURN*/
929 1.1.1.2.2.2 bouyer break;
930 1.1.1.2.2.2 bouyer
931 1.1.1.2.2.2 bouyer case 't':
932 1.1.1.2.2.2 bouyer StringChar = 0x09; /* HORIZONTAL TAB */
933 1.1.1.2.2.2 bouyer break;
934 1.1.1.2.2.2 bouyer
935 1.1.1.2.2.2 bouyer case 'v':
936 1.1.1.2.2.2 bouyer StringChar = 0x0B; /* VERTICAL TAB */
937 1.1.1.2.2.2 bouyer break;
938 1.1.1.2.2.2 bouyer
939 1.1.1.2.2.2 bouyer case 'x':
940 1.1.1.2.2.2 bouyer State = ASL_HEX_CONSTANT;
941 1.1.1.2.2.2 bouyer i = 0;
942 1.1.1.2.2.2 bouyer continue;
943 1.1.1.2.2.2 bouyer
944 1.1.1.2.2.2 bouyer case '\'': /* Single Quote */
945 1.1.1.2.2.2 bouyer case '\"': /* Double Quote */
946 1.1.1.2.2.2 bouyer case '\\': /* Backslash */
947 1.1.1.2.2.2 bouyer break;
948 1.1.1.2.2.2 bouyer
949 1.1.1.2.2.2 bouyer default:
950 1.1.1.2.2.2 bouyer
951 1.1.1.2.2.2 bouyer /* Check for an octal digit (0-7) */
952 1.1.1.2.2.2 bouyer
953 1.1.1.2.2.2 bouyer if (ACPI_IS_OCTAL_DIGIT (StringChar))
954 1.1.1.2.2.2 bouyer {
955 1.1.1.2.2.2 bouyer State = ASL_OCTAL_CONSTANT;
956 1.1.1.2.2.2 bouyer ConvertBuffer[0] = StringChar;
957 1.1.1.2.2.2 bouyer i = 1;
958 1.1.1.2.2.2 bouyer continue;
959 1.1.1.2.2.2 bouyer }
960 1.1.1.2.2.2 bouyer
961 1.1.1.2.2.2 bouyer /* Unknown escape sequence issue warning, but use the character */
962 1.1.1.2.2.2 bouyer
963 1.1.1.2.2.2 bouyer AslCommonError (ASL_WARNING, ASL_MSG_INVALID_ESCAPE,
964 1.1.1.2.2.2 bouyer Gbl_CurrentLineNumber, Gbl_LogicalLineNumber,
965 1.1.1.2.2.2 bouyer Gbl_CurrentLineOffset, Gbl_CurrentColumn,
966 1.1.1.2.2.2 bouyer Gbl_Files[ASL_FILE_INPUT].Filename, NULL);
967 1.1.1.2.2.2 bouyer break;
968 1.1.1.2.2.2 bouyer }
969 1.1.1.2.2.2 bouyer break;
970 1.1.1.2.2.2 bouyer
971 1.1.1.2.2.2 bouyer
972 1.1.1.2.2.2 bouyer case ASL_OCTAL_CONSTANT:
973 1.1.1.2.2.2 bouyer
974 1.1.1.2.2.2 bouyer /* Up to three octal digits allowed */
975 1.1.1.2.2.2 bouyer
976 1.1.1.2.2.2 bouyer if (!ACPI_IS_OCTAL_DIGIT (StringChar) ||
977 1.1.1.2.2.2 bouyer (i > 2))
978 1.1.1.2.2.2 bouyer {
979 1.1.1.2.2.2 bouyer /*
980 1.1.1.2.2.2 bouyer * Reached end of the constant. Convert the assembled ASCII
981 1.1.1.2.2.2 bouyer * string and resume processing of the next character
982 1.1.1.2.2.2 bouyer */
983 1.1.1.2.2.2 bouyer ConvertBuffer[i] = 0;
984 1.1.1.2.2.2 bouyer Digit = (UINT8) ACPI_STRTOUL (ConvertBuffer, NULL, 8);
985 1.1.1.2.2.2 bouyer
986 1.1.1.2.2.2 bouyer /* Check for NULL or non-ascii character (ignore if so) */
987 1.1.1.2.2.2 bouyer
988 1.1.1.2.2.2 bouyer if ((Digit == 0) || (Digit > ACPI_ASCII_MAX))
989 1.1.1.2.2.2 bouyer {
990 1.1.1.2.2.2 bouyer AslCommonError (ASL_WARNING, ASL_MSG_INVALID_STRING,
991 1.1.1.2.2.2 bouyer Gbl_CurrentLineNumber, Gbl_LogicalLineNumber,
992 1.1.1.2.2.2 bouyer Gbl_CurrentLineOffset, Gbl_CurrentColumn,
993 1.1.1.2.2.2 bouyer Gbl_Files[ASL_FILE_INPUT].Filename, NULL);
994 1.1.1.2.2.2 bouyer }
995 1.1.1.2.2.2 bouyer else
996 1.1.1.2.2.2 bouyer {
997 1.1.1.2.2.2 bouyer *StringBuffer = (char) Digit;
998 1.1.1.2.2.2 bouyer StringBuffer++;
999 1.1.1.2.2.2 bouyer if (StringBuffer >= EndBuffer)
1000 1.1.1.2.2.2 bouyer {
1001 1.1.1.2.2.2 bouyer goto BufferOverflow;
1002 1.1.1.2.2.2 bouyer }
1003 1.1.1.2.2.2 bouyer }
1004 1.1.1.2.2.2 bouyer
1005 1.1.1.2.2.2 bouyer State = ASL_NORMAL_CHAR;
1006 1.1.1.2.2.2 bouyer goto DoCharacter;
1007 1.1.1.2.2.2 bouyer break;
1008 1.1.1.2.2.2 bouyer }
1009 1.1.1.2.2.2 bouyer
1010 1.1.1.2.2.2 bouyer /* Append another digit of the constant */
1011 1.1.1.2.2.2 bouyer
1012 1.1.1.2.2.2 bouyer ConvertBuffer[i] = StringChar;
1013 1.1.1.2.2.2 bouyer i++;
1014 1.1.1.2.2.2 bouyer continue;
1015 1.1.1.2.2.2 bouyer
1016 1.1.1.2.2.2 bouyer
1017 1.1.1.2.2.2 bouyer case ASL_HEX_CONSTANT:
1018 1.1.1.2.2.2 bouyer
1019 1.1.1.2.2.2 bouyer /* Up to two hex digits allowed */
1020 1.1.1.2.2.2 bouyer
1021 1.1.1.2.2.2 bouyer if (!ACPI_IS_XDIGIT (StringChar) ||
1022 1.1.1.2.2.2 bouyer (i > 1))
1023 1.1.1.2.2.2 bouyer {
1024 1.1.1.2.2.2 bouyer /*
1025 1.1.1.2.2.2 bouyer * Reached end of the constant. Convert the assembled ASCII
1026 1.1.1.2.2.2 bouyer * string and resume processing of the next character
1027 1.1.1.2.2.2 bouyer */
1028 1.1.1.2.2.2 bouyer ConvertBuffer[i] = 0;
1029 1.1.1.2.2.2 bouyer Digit = (UINT8) ACPI_STRTOUL (ConvertBuffer, NULL, 16);
1030 1.1.1.2.2.2 bouyer
1031 1.1.1.2.2.2 bouyer /* Check for NULL or non-ascii character (ignore if so) */
1032 1.1.1.2.2.2 bouyer
1033 1.1.1.2.2.2 bouyer if ((Digit == 0) || (Digit > ACPI_ASCII_MAX))
1034 1.1.1.2.2.2 bouyer {
1035 1.1.1.2.2.2 bouyer AslCommonError (ASL_WARNING, ASL_MSG_INVALID_STRING,
1036 1.1.1.2.2.2 bouyer Gbl_CurrentLineNumber, Gbl_LogicalLineNumber,
1037 1.1.1.2.2.2 bouyer Gbl_CurrentLineOffset, Gbl_CurrentColumn,
1038 1.1.1.2.2.2 bouyer Gbl_Files[ASL_FILE_INPUT].Filename, NULL);
1039 1.1.1.2.2.2 bouyer }
1040 1.1.1.2.2.2 bouyer else
1041 1.1.1.2.2.2 bouyer {
1042 1.1.1.2.2.2 bouyer *StringBuffer = (char) Digit;
1043 1.1.1.2.2.2 bouyer StringBuffer++;
1044 1.1.1.2.2.2 bouyer if (StringBuffer >= EndBuffer)
1045 1.1.1.2.2.2 bouyer {
1046 1.1.1.2.2.2 bouyer goto BufferOverflow;
1047 1.1.1.2.2.2 bouyer }
1048 1.1.1.2.2.2 bouyer }
1049 1.1.1.2.2.2 bouyer
1050 1.1.1.2.2.2 bouyer State = ASL_NORMAL_CHAR;
1051 1.1.1.2.2.2 bouyer goto DoCharacter;
1052 1.1.1.2.2.2 bouyer break;
1053 1.1.1.2.2.2 bouyer }
1054 1.1.1.2.2.2 bouyer
1055 1.1.1.2.2.2 bouyer /* Append another digit of the constant */
1056 1.1.1.2.2.2 bouyer
1057 1.1.1.2.2.2 bouyer ConvertBuffer[i] = StringChar;
1058 1.1.1.2.2.2 bouyer i++;
1059 1.1.1.2.2.2 bouyer continue;
1060 1.1.1.2.2.2 bouyer }
1061 1.1.1.2.2.2 bouyer
1062 1.1.1.2.2.2 bouyer /* Save the finished character */
1063 1.1.1.2.2.2 bouyer
1064 1.1.1.2.2.2 bouyer *StringBuffer = StringChar;
1065 1.1.1.2.2.2 bouyer StringBuffer++;
1066 1.1.1.2.2.2 bouyer if (StringBuffer >= EndBuffer)
1067 1.1.1.2.2.2 bouyer {
1068 1.1.1.2.2.2 bouyer goto BufferOverflow;
1069 1.1.1.2.2.2 bouyer }
1070 1.1.1.2.2.2 bouyer }
1071 1.1.1.2.2.2 bouyer
1072 1.1.1.2.2.2 bouyer /*
1073 1.1.1.2.2.2 bouyer * Premature End-Of-File
1074 1.1.1.2.2.2 bouyer */
1075 1.1.1.2.2.2 bouyer AslCommonError (ASL_ERROR, ASL_MSG_EARLY_EOF,
1076 1.1.1.2.2.2 bouyer Gbl_CurrentLineNumber, Gbl_LogicalLineNumber,
1077 1.1.1.2.2.2 bouyer Gbl_CurrentLineOffset, Gbl_CurrentColumn,
1078 1.1.1.2.2.2 bouyer Gbl_Files[ASL_FILE_INPUT].Filename, NULL);
1079 1.1.1.2.2.2 bouyer return (FALSE);
1080 1.1.1.2.2.2 bouyer
1081 1.1.1.2.2.2 bouyer
1082 1.1.1.2.2.2 bouyer CompletedString:
1083 1.1.1.2.2.2 bouyer /*
1084 1.1.1.2.2.2 bouyer * Null terminate the input string and copy string to a new buffer
1085 1.1.1.2.2.2 bouyer */
1086 1.1.1.2.2.2 bouyer *StringBuffer = 0;
1087 1.1.1.2.2.2 bouyer
1088 1.1.1.2.2.2 bouyer CleanString = UtGetStringBuffer (strlen (MsgBuffer) + 1);
1089 1.1.1.2.2.2 bouyer if (!CleanString)
1090 1.1.1.2.2.2 bouyer {
1091 1.1.1.2.2.2 bouyer AslCommonError (ASL_ERROR, ASL_MSG_MEMORY_ALLOCATION,
1092 1.1.1.2.2.2 bouyer Gbl_CurrentLineNumber, Gbl_LogicalLineNumber,
1093 1.1.1.2.2.2 bouyer Gbl_CurrentLineOffset, Gbl_CurrentColumn,
1094 1.1.1.2.2.2 bouyer Gbl_Files[ASL_FILE_INPUT].Filename, NULL);
1095 1.1.1.2.2.2 bouyer return (FALSE);
1096 1.1.1.2.2.2 bouyer }
1097 1.1.1.2.2.2 bouyer
1098 1.1.1.2.2.2 bouyer ACPI_STRCPY (CleanString, MsgBuffer);
1099 1.1.1.2.2.2 bouyer AslCompilerlval.s = CleanString;
1100 1.1.1.2.2.2 bouyer return (TRUE);
1101 1.1.1.2.2.2 bouyer
1102 1.1.1.2.2.2 bouyer
1103 1.1.1.2.2.2 bouyer BufferOverflow:
1104 1.1.1.2.2.2 bouyer
1105 1.1.1.2.2.2 bouyer /* Literal was too long */
1106 1.1.1.2.2.2 bouyer
1107 1.1.1.2.2.2 bouyer AslCommonError (ASL_ERROR, ASL_MSG_STRING_LENGTH,
1108 1.1.1.2.2.2 bouyer Gbl_CurrentLineNumber, Gbl_LogicalLineNumber,
1109 1.1.1.2.2.2 bouyer Gbl_CurrentLineOffset, Gbl_CurrentColumn,
1110 1.1.1.2.2.2 bouyer Gbl_Files[ASL_FILE_INPUT].Filename, "Max length 4096");
1111 1.1.1.2.2.2 bouyer return (FALSE);
1112 1.1.1.2.2.2 bouyer }
1113 1.1.1.2.2.2 bouyer
1114 1.1.1.2.2.2 bouyer
1115