prexpress.c revision 1.1.1.15 1 1.1 christos /******************************************************************************
2 1.1 christos *
3 1.1 christos * Module Name: prexpress - Preprocessor #if expression support
4 1.1 christos *
5 1.1 christos *****************************************************************************/
6 1.1 christos
7 1.1.1.14 christos /******************************************************************************
8 1.1.1.14 christos *
9 1.1.1.14 christos * 1. Copyright Notice
10 1.1.1.14 christos *
11 1.1.1.15 christos * Some or all of this work - Copyright (c) 1999 - 2025, Intel Corp.
12 1.1 christos * All rights reserved.
13 1.1 christos *
14 1.1.1.14 christos * 2. License
15 1.1.1.14 christos *
16 1.1.1.14 christos * 2.1. This is your license from Intel Corp. under its intellectual property
17 1.1.1.14 christos * rights. You may have additional license terms from the party that provided
18 1.1.1.14 christos * you this software, covering your right to use that party's intellectual
19 1.1.1.14 christos * property rights.
20 1.1.1.14 christos *
21 1.1.1.14 christos * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
22 1.1.1.14 christos * copy of the source code appearing in this file ("Covered Code") an
23 1.1.1.14 christos * irrevocable, perpetual, worldwide license under Intel's copyrights in the
24 1.1.1.14 christos * base code distributed originally by Intel ("Original Intel Code") to copy,
25 1.1.1.14 christos * make derivatives, distribute, use and display any portion of the Covered
26 1.1.1.14 christos * Code in any form, with the right to sublicense such rights; and
27 1.1.1.14 christos *
28 1.1.1.14 christos * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
29 1.1.1.14 christos * license (with the right to sublicense), under only those claims of Intel
30 1.1.1.14 christos * patents that are infringed by the Original Intel Code, to make, use, sell,
31 1.1.1.14 christos * offer to sell, and import the Covered Code and derivative works thereof
32 1.1.1.14 christos * solely to the minimum extent necessary to exercise the above copyright
33 1.1.1.14 christos * license, and in no event shall the patent license extend to any additions
34 1.1.1.14 christos * to or modifications of the Original Intel Code. No other license or right
35 1.1.1.14 christos * is granted directly or by implication, estoppel or otherwise;
36 1.1.1.14 christos *
37 1.1.1.14 christos * The above copyright and patent license is granted only if the following
38 1.1.1.14 christos * conditions are met:
39 1.1.1.14 christos *
40 1.1.1.14 christos * 3. Conditions
41 1.1.1.14 christos *
42 1.1.1.14 christos * 3.1. Redistribution of Source with Rights to Further Distribute Source.
43 1.1.1.14 christos * Redistribution of source code of any substantial portion of the Covered
44 1.1.1.14 christos * Code or modification with rights to further distribute source must include
45 1.1.1.14 christos * the above Copyright Notice, the above License, this list of Conditions,
46 1.1.1.14 christos * and the following Disclaimer and Export Compliance provision. In addition,
47 1.1.1.14 christos * Licensee must cause all Covered Code to which Licensee contributes to
48 1.1.1.14 christos * contain a file documenting the changes Licensee made to create that Covered
49 1.1.1.14 christos * Code and the date of any change. Licensee must include in that file the
50 1.1.1.14 christos * documentation of any changes made by any predecessor Licensee. Licensee
51 1.1.1.14 christos * must include a prominent statement that the modification is derived,
52 1.1.1.14 christos * directly or indirectly, from Original Intel Code.
53 1.1.1.14 christos *
54 1.1.1.14 christos * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
55 1.1.1.14 christos * Redistribution of source code of any substantial portion of the Covered
56 1.1.1.14 christos * Code or modification without rights to further distribute source must
57 1.1.1.14 christos * include the following Disclaimer and Export Compliance provision in the
58 1.1.1.14 christos * documentation and/or other materials provided with distribution. In
59 1.1.1.14 christos * addition, Licensee may not authorize further sublicense of source of any
60 1.1.1.14 christos * portion of the Covered Code, and must include terms to the effect that the
61 1.1.1.14 christos * license from Licensee to its licensee is limited to the intellectual
62 1.1.1.14 christos * property embodied in the software Licensee provides to its licensee, and
63 1.1.1.14 christos * not to intellectual property embodied in modifications its licensee may
64 1.1.1.14 christos * make.
65 1.1.1.14 christos *
66 1.1.1.14 christos * 3.3. Redistribution of Executable. Redistribution in executable form of any
67 1.1.1.14 christos * substantial portion of the Covered Code or modification must reproduce the
68 1.1.1.14 christos * above Copyright Notice, and the following Disclaimer and Export Compliance
69 1.1.1.14 christos * provision in the documentation and/or other materials provided with the
70 1.1.1.14 christos * distribution.
71 1.1.1.14 christos *
72 1.1.1.14 christos * 3.4. Intel retains all right, title, and interest in and to the Original
73 1.1.1.14 christos * Intel Code.
74 1.1.1.14 christos *
75 1.1.1.14 christos * 3.5. Neither the name Intel nor any other trademark owned or controlled by
76 1.1.1.14 christos * Intel shall be used in advertising or otherwise to promote the sale, use or
77 1.1.1.14 christos * other dealings in products derived from or relating to the Covered Code
78 1.1.1.14 christos * without prior written authorization from Intel.
79 1.1.1.14 christos *
80 1.1.1.14 christos * 4. Disclaimer and Export Compliance
81 1.1.1.14 christos *
82 1.1.1.14 christos * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
83 1.1.1.14 christos * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
84 1.1.1.14 christos * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
85 1.1.1.14 christos * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
86 1.1.1.14 christos * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
87 1.1.1.14 christos * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
88 1.1.1.14 christos * PARTICULAR PURPOSE.
89 1.1.1.14 christos *
90 1.1.1.14 christos * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
91 1.1.1.14 christos * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
92 1.1.1.14 christos * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
93 1.1.1.14 christos * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
94 1.1.1.14 christos * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
95 1.1.1.14 christos * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
96 1.1.1.14 christos * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
97 1.1.1.14 christos * LIMITED REMEDY.
98 1.1.1.14 christos *
99 1.1.1.14 christos * 4.3. Licensee shall not export, either directly or indirectly, any of this
100 1.1.1.14 christos * software or system incorporating such software without first obtaining any
101 1.1.1.14 christos * required license or other approval from the U. S. Department of Commerce or
102 1.1.1.14 christos * any other agency or department of the United States Government. In the
103 1.1.1.14 christos * event Licensee exports any such software from the United States or
104 1.1.1.14 christos * re-exports any such software from a foreign destination, Licensee shall
105 1.1.1.14 christos * ensure that the distribution and export/re-export of the software is in
106 1.1.1.14 christos * compliance with all laws, regulations, orders, or other restrictions of the
107 1.1.1.14 christos * U.S. Export Administration Regulations. Licensee agrees that neither it nor
108 1.1.1.14 christos * any of its subsidiaries will export/re-export any technical data, process,
109 1.1.1.14 christos * software, or service, directly or indirectly, to any country for which the
110 1.1.1.14 christos * United States government or any agency thereof requires an export license,
111 1.1.1.14 christos * other governmental approval, or letter of assurance, without first obtaining
112 1.1.1.14 christos * such license, approval or letter.
113 1.1.1.14 christos *
114 1.1.1.14 christos *****************************************************************************
115 1.1.1.14 christos *
116 1.1.1.14 christos * Alternatively, you may choose to be licensed under the terms of the
117 1.1.1.14 christos * following license:
118 1.1.1.14 christos *
119 1.1 christos * Redistribution and use in source and binary forms, with or without
120 1.1 christos * modification, are permitted provided that the following conditions
121 1.1 christos * are met:
122 1.1 christos * 1. Redistributions of source code must retain the above copyright
123 1.1 christos * notice, this list of conditions, and the following disclaimer,
124 1.1 christos * without modification.
125 1.1 christos * 2. Redistributions in binary form must reproduce at minimum a disclaimer
126 1.1 christos * substantially similar to the "NO WARRANTY" disclaimer below
127 1.1 christos * ("Disclaimer") and any redistribution must be conditioned upon
128 1.1 christos * including a substantially similar Disclaimer requirement for further
129 1.1 christos * binary redistribution.
130 1.1 christos * 3. Neither the names of the above-listed copyright holders nor the names
131 1.1 christos * of any contributors may be used to endorse or promote products derived
132 1.1 christos * from this software without specific prior written permission.
133 1.1 christos *
134 1.1 christos * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
135 1.1 christos * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
136 1.1.1.11 christos * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
137 1.1 christos * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
138 1.1.1.14 christos * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
139 1.1.1.14 christos * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
140 1.1.1.14 christos * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
141 1.1.1.14 christos * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
142 1.1.1.14 christos * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
143 1.1.1.14 christos * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
144 1.1.1.14 christos * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
145 1.1.1.14 christos *
146 1.1.1.14 christos * Alternatively, you may choose to be licensed under the terms of the
147 1.1.1.14 christos * GNU General Public License ("GPL") version 2 as published by the Free
148 1.1.1.14 christos * Software Foundation.
149 1.1.1.14 christos *
150 1.1.1.14 christos *****************************************************************************/
151 1.1 christos
152 1.1 christos #include "aslcompiler.h"
153 1.1 christos
154 1.1 christos #define _COMPONENT ASL_PREPROCESSOR
155 1.1 christos ACPI_MODULE_NAME ("prexpress")
156 1.1 christos
157 1.1 christos /* Local prototypes */
158 1.1 christos
159 1.1 christos static char *
160 1.1 christos PrExpandMacros (
161 1.1 christos char *Line);
162 1.1 christos
163 1.1 christos
164 1.1 christos #ifdef _UNDER_DEVELOPMENT
165 1.1 christos /******************************************************************************
166 1.1 christos *
167 1.1 christos * FUNCTION: PrUnTokenize
168 1.1 christos *
169 1.1 christos * PARAMETERS: Buffer - Token Buffer
170 1.1 christos * Next - "Next" buffer from GetNextToken
171 1.1 christos *
172 1.1 christos * RETURN: None
173 1.1 christos *
174 1.1 christos * DESCRIPTION: Un-tokenized the current token buffer. The implementation is
175 1.1 christos * to simply set the null inserted by GetNextToken to a blank.
176 1.1 christos * If Next is NULL, there were no tokens found in the Buffer,
177 1.1 christos * so there is nothing to do.
178 1.1 christos *
179 1.1 christos *****************************************************************************/
180 1.1 christos
181 1.1 christos static void
182 1.1 christos PrUnTokenize (
183 1.1 christos char *Buffer,
184 1.1 christos char *Next)
185 1.1 christos {
186 1.1 christos UINT32 Length = strlen (Buffer);
187 1.1 christos
188 1.1 christos
189 1.1 christos if (!Next)
190 1.1 christos {
191 1.1 christos return;
192 1.1 christos }
193 1.1.1.4 christos
194 1.1 christos if (Buffer[Length] != '\n')
195 1.1 christos {
196 1.1 christos Buffer[strlen(Buffer)] = ' ';
197 1.1 christos }
198 1.1 christos }
199 1.1 christos #endif
200 1.1 christos
201 1.1 christos
202 1.1 christos /******************************************************************************
203 1.1 christos *
204 1.1 christos * FUNCTION: PrExpandMacros
205 1.1 christos *
206 1.1 christos * PARAMETERS: Line - Pointer into the current line
207 1.1 christos *
208 1.1 christos * RETURN: Updated pointer into the current line
209 1.1 christos *
210 1.1 christos * DESCRIPTION: Expand any macros found in the current line buffer.
211 1.1 christos *
212 1.1 christos *****************************************************************************/
213 1.1 christos
214 1.1 christos static char *
215 1.1 christos PrExpandMacros (
216 1.1 christos char *Line)
217 1.1 christos {
218 1.1 christos char *Token;
219 1.1 christos char *ReplaceString;
220 1.1 christos PR_DEFINE_INFO *DefineInfo;
221 1.1 christos ACPI_SIZE TokenOffset;
222 1.1 christos char *Next;
223 1.1 christos int OffsetAdjust;
224 1.1 christos
225 1.1 christos
226 1.1.1.8 christos strcpy (AslGbl_ExpressionTokenBuffer, AslGbl_CurrentLineBuffer);
227 1.1.1.8 christos Token = PrGetNextToken (AslGbl_ExpressionTokenBuffer, PR_EXPR_SEPARATORS, &Next);
228 1.1 christos OffsetAdjust = 0;
229 1.1 christos
230 1.1 christos while (Token)
231 1.1 christos {
232 1.1 christos DefineInfo = PrMatchDefine (Token);
233 1.1 christos if (DefineInfo)
234 1.1 christos {
235 1.1 christos if (DefineInfo->Body)
236 1.1 christos {
237 1.1 christos /* This is a macro. TBD: Is this allowed? */
238 1.1 christos
239 1.1 christos DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID
240 1.1 christos "Matched Macro: %s->%s\n",
241 1.1.1.8 christos AslGbl_CurrentLineNumber, DefineInfo->Identifier,
242 1.1 christos DefineInfo->Replacement);
243 1.1 christos
244 1.1.1.8 christos PrDoMacroInvocation (AslGbl_ExpressionTokenBuffer, Token,
245 1.1 christos DefineInfo, &Next);
246 1.1 christos }
247 1.1 christos else
248 1.1 christos {
249 1.1 christos ReplaceString = DefineInfo->Replacement;
250 1.1 christos
251 1.1 christos /* Replace the name in the original line buffer */
252 1.1 christos
253 1.1.1.8 christos TokenOffset = Token - AslGbl_ExpressionTokenBuffer + OffsetAdjust;
254 1.1 christos PrReplaceData (
255 1.1.1.8 christos &AslGbl_CurrentLineBuffer[TokenOffset], strlen (Token),
256 1.1 christos ReplaceString, strlen (ReplaceString));
257 1.1 christos
258 1.1 christos /* Adjust for length difference between old and new name length */
259 1.1 christos
260 1.1 christos OffsetAdjust += strlen (ReplaceString) - strlen (Token);
261 1.1 christos
262 1.1 christos DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID
263 1.1 christos "Matched #define within expression: %s->%s\n",
264 1.1.1.8 christos AslGbl_CurrentLineNumber, Token,
265 1.1 christos *ReplaceString ? ReplaceString : "(NULL STRING)");
266 1.1 christos }
267 1.1 christos }
268 1.1 christos
269 1.1 christos Token = PrGetNextToken (NULL, PR_EXPR_SEPARATORS, &Next);
270 1.1 christos }
271 1.1 christos
272 1.1 christos return (Line);
273 1.1 christos }
274 1.1 christos
275 1.1 christos
276 1.1 christos /******************************************************************************
277 1.1 christos *
278 1.1 christos * FUNCTION: PrIsDefined
279 1.1 christos *
280 1.1 christos * PARAMETERS: Identifier - Name to be resolved
281 1.1 christos *
282 1.1 christos * RETURN: 64-bit boolean integer value
283 1.1 christos *
284 1.1 christos * DESCRIPTION: Returns TRUE if the name is defined, FALSE otherwise (0).
285 1.1 christos *
286 1.1 christos *****************************************************************************/
287 1.1 christos
288 1.1 christos UINT64
289 1.1 christos PrIsDefined (
290 1.1 christos char *Identifier)
291 1.1 christos {
292 1.1 christos UINT64 Value;
293 1.1 christos PR_DEFINE_INFO *DefineInfo;
294 1.1 christos
295 1.1 christos
296 1.1 christos DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID
297 1.1.1.8 christos "**** Is defined?: %s\n", AslGbl_CurrentLineNumber, Identifier);
298 1.1 christos
299 1.1 christos Value = 0; /* Default is "Not defined" -- FALSE */
300 1.1 christos
301 1.1 christos DefineInfo = PrMatchDefine (Identifier);
302 1.1 christos if (DefineInfo)
303 1.1 christos {
304 1.1 christos Value = ACPI_UINT64_MAX; /* TRUE */
305 1.1 christos }
306 1.1 christos
307 1.1 christos DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID
308 1.1 christos "[#if defined %s] resolved to: %8.8X%8.8X\n",
309 1.1.1.8 christos AslGbl_CurrentLineNumber, Identifier, ACPI_FORMAT_UINT64 (Value));
310 1.1 christos
311 1.1 christos return (Value);
312 1.1 christos }
313 1.1 christos
314 1.1 christos
315 1.1 christos /******************************************************************************
316 1.1 christos *
317 1.1 christos * FUNCTION: PrResolveDefine
318 1.1 christos *
319 1.1 christos * PARAMETERS: Identifier - Name to be resolved
320 1.1 christos *
321 1.1 christos * RETURN: A 64-bit boolean integer value
322 1.1 christos *
323 1.1 christos * DESCRIPTION: Returns TRUE if the name is defined, FALSE otherwise (0).
324 1.1 christos *
325 1.1 christos *****************************************************************************/
326 1.1 christos
327 1.1 christos UINT64
328 1.1 christos PrResolveDefine (
329 1.1 christos char *Identifier)
330 1.1 christos {
331 1.1 christos UINT64 Value;
332 1.1 christos PR_DEFINE_INFO *DefineInfo;
333 1.1 christos
334 1.1 christos
335 1.1 christos DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID
336 1.1.1.8 christos "**** Resolve #define: %s\n", AslGbl_CurrentLineNumber, Identifier);
337 1.1 christos
338 1.1 christos Value = 0; /* Default is "Not defined" -- FALSE */
339 1.1 christos
340 1.1 christos DefineInfo = PrMatchDefine (Identifier);
341 1.1 christos if (DefineInfo)
342 1.1 christos {
343 1.1 christos Value = ACPI_UINT64_MAX; /* TRUE */
344 1.1 christos }
345 1.1 christos
346 1.1 christos DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID
347 1.1 christos "[#if defined %s] resolved to: %8.8X%8.8X\n",
348 1.1.1.8 christos AslGbl_CurrentLineNumber, Identifier, ACPI_FORMAT_UINT64 (Value));
349 1.1 christos
350 1.1 christos return (Value);
351 1.1 christos }
352 1.1 christos
353 1.1 christos
354 1.1 christos /******************************************************************************
355 1.1 christos *
356 1.1 christos * FUNCTION: PrResolveIntegerExpression
357 1.1 christos *
358 1.1 christos * PARAMETERS: Line - Pointer to integer expression
359 1.1 christos * ReturnValue - Where the resolved 64-bit integer is
360 1.1 christos * returned.
361 1.1 christos *
362 1.1 christos * RETURN: Status
363 1.1 christos *
364 1.1 christos * DESCRIPTION: Resolve an integer expression to a single value. Supports
365 1.1 christos * both integer constants and labels.
366 1.1 christos *
367 1.1 christos *****************************************************************************/
368 1.1 christos
369 1.1 christos ACPI_STATUS
370 1.1 christos PrResolveIntegerExpression (
371 1.1 christos char *Line,
372 1.1 christos UINT64 *ReturnValue)
373 1.1 christos {
374 1.1 christos UINT64 Result;
375 1.1 christos char *ExpandedLine;
376 1.1 christos
377 1.1 christos
378 1.1 christos DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID
379 1.1.1.8 christos "**** Resolve #if: %s\n", AslGbl_CurrentLineNumber, Line);
380 1.1 christos
381 1.1 christos /* Expand all macros within the expression first */
382 1.1 christos
383 1.1 christos ExpandedLine = PrExpandMacros (Line);
384 1.1 christos
385 1.1 christos /* Now we can evaluate the expression */
386 1.1 christos
387 1.1 christos Result = PrEvaluateExpression (ExpandedLine);
388 1.1 christos DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID
389 1.1 christos "**** Expression Resolved to: %8.8X%8.8X\n",
390 1.1.1.8 christos AslGbl_CurrentLineNumber, ACPI_FORMAT_UINT64 (Result));
391 1.1 christos
392 1.1 christos *ReturnValue = Result;
393 1.1 christos return (AE_OK);
394 1.1 christos
395 1.1 christos #if 0
396 1.1 christos InvalidExpression:
397 1.1 christos
398 1.1 christos ACPI_FREE (EvalBuffer);
399 1.1 christos PrError (ASL_ERROR, ASL_MSG_INVALID_EXPRESSION, 0);
400 1.1 christos return (AE_ERROR);
401 1.1 christos
402 1.1 christos
403 1.1 christos NormalExit:
404 1.1 christos
405 1.1 christos DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID
406 1.1 christos "**** Expression Resolved to: %8.8X%8.8X\n",
407 1.1.1.8 christos AslGbl_CurrentLineNumber, ACPI_FORMAT_UINT64 (Value1));
408 1.1 christos
409 1.1 christos *ReturnValue = Value1;
410 1.1 christos return (AE_OK);
411 1.1 christos #endif
412 1.1 christos }
413