aslopcodes.c revision 1.1 1 1.1 jruoho
2 1.1 jruoho /******************************************************************************
3 1.1 jruoho *
4 1.1 jruoho * Module Name: aslopcode - AML opcode generation
5 1.1 jruoho *
6 1.1 jruoho *****************************************************************************/
7 1.1 jruoho
8 1.1 jruoho /******************************************************************************
9 1.1 jruoho *
10 1.1 jruoho * 1. Copyright Notice
11 1.1 jruoho *
12 1.1 jruoho * Some or all of this work - Copyright (c) 1999 - 2010, Intel Corp.
13 1.1 jruoho * All rights reserved.
14 1.1 jruoho *
15 1.1 jruoho * 2. License
16 1.1 jruoho *
17 1.1 jruoho * 2.1. This is your license from Intel Corp. under its intellectual property
18 1.1 jruoho * rights. You may have additional license terms from the party that provided
19 1.1 jruoho * you this software, covering your right to use that party's intellectual
20 1.1 jruoho * property rights.
21 1.1 jruoho *
22 1.1 jruoho * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
23 1.1 jruoho * copy of the source code appearing in this file ("Covered Code") an
24 1.1 jruoho * irrevocable, perpetual, worldwide license under Intel's copyrights in the
25 1.1 jruoho * base code distributed originally by Intel ("Original Intel Code") to copy,
26 1.1 jruoho * make derivatives, distribute, use and display any portion of the Covered
27 1.1 jruoho * Code in any form, with the right to sublicense such rights; and
28 1.1 jruoho *
29 1.1 jruoho * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
30 1.1 jruoho * license (with the right to sublicense), under only those claims of Intel
31 1.1 jruoho * patents that are infringed by the Original Intel Code, to make, use, sell,
32 1.1 jruoho * offer to sell, and import the Covered Code and derivative works thereof
33 1.1 jruoho * solely to the minimum extent necessary to exercise the above copyright
34 1.1 jruoho * license, and in no event shall the patent license extend to any additions
35 1.1 jruoho * to or modifications of the Original Intel Code. No other license or right
36 1.1 jruoho * is granted directly or by implication, estoppel or otherwise;
37 1.1 jruoho *
38 1.1 jruoho * The above copyright and patent license is granted only if the following
39 1.1 jruoho * conditions are met:
40 1.1 jruoho *
41 1.1 jruoho * 3. Conditions
42 1.1 jruoho *
43 1.1 jruoho * 3.1. Redistribution of Source with Rights to Further Distribute Source.
44 1.1 jruoho * Redistribution of source code of any substantial portion of the Covered
45 1.1 jruoho * Code or modification with rights to further distribute source must include
46 1.1 jruoho * the above Copyright Notice, the above License, this list of Conditions,
47 1.1 jruoho * and the following Disclaimer and Export Compliance provision. In addition,
48 1.1 jruoho * Licensee must cause all Covered Code to which Licensee contributes to
49 1.1 jruoho * contain a file documenting the changes Licensee made to create that Covered
50 1.1 jruoho * Code and the date of any change. Licensee must include in that file the
51 1.1 jruoho * documentation of any changes made by any predecessor Licensee. Licensee
52 1.1 jruoho * must include a prominent statement that the modification is derived,
53 1.1 jruoho * directly or indirectly, from Original Intel Code.
54 1.1 jruoho *
55 1.1 jruoho * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
56 1.1 jruoho * Redistribution of source code of any substantial portion of the Covered
57 1.1 jruoho * Code or modification without rights to further distribute source must
58 1.1 jruoho * include the following Disclaimer and Export Compliance provision in the
59 1.1 jruoho * documentation and/or other materials provided with distribution. In
60 1.1 jruoho * addition, Licensee may not authorize further sublicense of source of any
61 1.1 jruoho * portion of the Covered Code, and must include terms to the effect that the
62 1.1 jruoho * license from Licensee to its licensee is limited to the intellectual
63 1.1 jruoho * property embodied in the software Licensee provides to its licensee, and
64 1.1 jruoho * not to intellectual property embodied in modifications its licensee may
65 1.1 jruoho * make.
66 1.1 jruoho *
67 1.1 jruoho * 3.3. Redistribution of Executable. Redistribution in executable form of any
68 1.1 jruoho * substantial portion of the Covered Code or modification must reproduce the
69 1.1 jruoho * above Copyright Notice, and the following Disclaimer and Export Compliance
70 1.1 jruoho * provision in the documentation and/or other materials provided with the
71 1.1 jruoho * distribution.
72 1.1 jruoho *
73 1.1 jruoho * 3.4. Intel retains all right, title, and interest in and to the Original
74 1.1 jruoho * Intel Code.
75 1.1 jruoho *
76 1.1 jruoho * 3.5. Neither the name Intel nor any other trademark owned or controlled by
77 1.1 jruoho * Intel shall be used in advertising or otherwise to promote the sale, use or
78 1.1 jruoho * other dealings in products derived from or relating to the Covered Code
79 1.1 jruoho * without prior written authorization from Intel.
80 1.1 jruoho *
81 1.1 jruoho * 4. Disclaimer and Export Compliance
82 1.1 jruoho *
83 1.1 jruoho * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
84 1.1 jruoho * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
85 1.1 jruoho * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
86 1.1 jruoho * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
87 1.1 jruoho * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
88 1.1 jruoho * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
89 1.1 jruoho * PARTICULAR PURPOSE.
90 1.1 jruoho *
91 1.1 jruoho * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
92 1.1 jruoho * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
93 1.1 jruoho * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
94 1.1 jruoho * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
95 1.1 jruoho * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
96 1.1 jruoho * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
97 1.1 jruoho * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
98 1.1 jruoho * LIMITED REMEDY.
99 1.1 jruoho *
100 1.1 jruoho * 4.3. Licensee shall not export, either directly or indirectly, any of this
101 1.1 jruoho * software or system incorporating such software without first obtaining any
102 1.1 jruoho * required license or other approval from the U. S. Department of Commerce or
103 1.1 jruoho * any other agency or department of the United States Government. In the
104 1.1 jruoho * event Licensee exports any such software from the United States or
105 1.1 jruoho * re-exports any such software from a foreign destination, Licensee shall
106 1.1 jruoho * ensure that the distribution and export/re-export of the software is in
107 1.1 jruoho * compliance with all laws, regulations, orders, or other restrictions of the
108 1.1 jruoho * U.S. Export Administration Regulations. Licensee agrees that neither it nor
109 1.1 jruoho * any of its subsidiaries will export/re-export any technical data, process,
110 1.1 jruoho * software, or service, directly or indirectly, to any country for which the
111 1.1 jruoho * United States government or any agency thereof requires an export license,
112 1.1 jruoho * other governmental approval, or letter of assurance, without first obtaining
113 1.1 jruoho * such license, approval or letter.
114 1.1 jruoho *
115 1.1 jruoho *****************************************************************************/
116 1.1 jruoho
117 1.1 jruoho
118 1.1 jruoho #include "aslcompiler.h"
119 1.1 jruoho #include "aslcompiler.y.h"
120 1.1 jruoho #include "amlcode.h"
121 1.1 jruoho
122 1.1 jruoho #define _COMPONENT ACPI_COMPILER
123 1.1 jruoho ACPI_MODULE_NAME ("aslopcodes")
124 1.1 jruoho
125 1.1 jruoho
126 1.1 jruoho /* UUID support */
127 1.1 jruoho
128 1.1 jruoho static UINT8 OpcMapToUUID[16] =
129 1.1 jruoho {
130 1.1 jruoho 6,4,2,0,11,9,16,14,19,21,24,26,28,30,32,34
131 1.1 jruoho };
132 1.1 jruoho
133 1.1 jruoho /* Local prototypes */
134 1.1 jruoho
135 1.1 jruoho static void
136 1.1 jruoho OpcDoAccessAs (
137 1.1 jruoho ACPI_PARSE_OBJECT *Op);
138 1.1 jruoho
139 1.1 jruoho static void
140 1.1 jruoho OpcDoUnicode (
141 1.1 jruoho ACPI_PARSE_OBJECT *Op);
142 1.1 jruoho
143 1.1 jruoho static void
144 1.1 jruoho OpcDoEisaId (
145 1.1 jruoho ACPI_PARSE_OBJECT *Op);
146 1.1 jruoho
147 1.1 jruoho static void
148 1.1 jruoho OpcDoUuId (
149 1.1 jruoho ACPI_PARSE_OBJECT *Op);
150 1.1 jruoho
151 1.1 jruoho
152 1.1 jruoho /*******************************************************************************
153 1.1 jruoho *
154 1.1 jruoho * FUNCTION: OpcAmlOpcodeUpdateWalk
155 1.1 jruoho *
156 1.1 jruoho * PARAMETERS: ASL_WALK_CALLBACK
157 1.1 jruoho *
158 1.1 jruoho * RETURN: Status
159 1.1 jruoho *
160 1.1 jruoho * DESCRIPTION: Opcode update walk, ascending callback
161 1.1 jruoho *
162 1.1 jruoho ******************************************************************************/
163 1.1 jruoho
164 1.1 jruoho ACPI_STATUS
165 1.1 jruoho OpcAmlOpcodeUpdateWalk (
166 1.1 jruoho ACPI_PARSE_OBJECT *Op,
167 1.1 jruoho UINT32 Level,
168 1.1 jruoho void *Context)
169 1.1 jruoho {
170 1.1 jruoho
171 1.1 jruoho /*
172 1.1 jruoho * Handle the Package() case where the actual opcode cannot be determined
173 1.1 jruoho * until the PackageLength operand has been folded and minimized.
174 1.1 jruoho * (PackageOp versus VarPackageOp)
175 1.1 jruoho *
176 1.1 jruoho * This is (as of ACPI 3.0) the only case where the AML opcode can change
177 1.1 jruoho * based upon the value of a parameter.
178 1.1 jruoho *
179 1.1 jruoho * The parser always inserts a VarPackage opcode, which can possibly be
180 1.1 jruoho * optimized to a Package opcode.
181 1.1 jruoho */
182 1.1 jruoho if (Op->Asl.ParseOpcode == PARSEOP_VAR_PACKAGE)
183 1.1 jruoho {
184 1.1 jruoho OpnDoPackage (Op);
185 1.1 jruoho }
186 1.1 jruoho
187 1.1 jruoho return (AE_OK);
188 1.1 jruoho }
189 1.1 jruoho
190 1.1 jruoho
191 1.1 jruoho /*******************************************************************************
192 1.1 jruoho *
193 1.1 jruoho * FUNCTION: OpcAmlOpcodeWalk
194 1.1 jruoho *
195 1.1 jruoho * PARAMETERS: ASL_WALK_CALLBACK
196 1.1 jruoho *
197 1.1 jruoho * RETURN: Status
198 1.1 jruoho *
199 1.1 jruoho * DESCRIPTION: Parse tree walk to generate both the AML opcodes and the AML
200 1.1 jruoho * operands.
201 1.1 jruoho *
202 1.1 jruoho ******************************************************************************/
203 1.1 jruoho
204 1.1 jruoho ACPI_STATUS
205 1.1 jruoho OpcAmlOpcodeWalk (
206 1.1 jruoho ACPI_PARSE_OBJECT *Op,
207 1.1 jruoho UINT32 Level,
208 1.1 jruoho void *Context)
209 1.1 jruoho {
210 1.1 jruoho
211 1.1 jruoho TotalParseNodes++;
212 1.1 jruoho
213 1.1 jruoho OpcGenerateAmlOpcode (Op);
214 1.1 jruoho OpnGenerateAmlOperands (Op);
215 1.1 jruoho return (AE_OK);
216 1.1 jruoho }
217 1.1 jruoho
218 1.1 jruoho
219 1.1 jruoho /*******************************************************************************
220 1.1 jruoho *
221 1.1 jruoho * FUNCTION: OpcGetIntegerWidth
222 1.1 jruoho *
223 1.1 jruoho * PARAMETERS: Op - DEFINITION BLOCK op
224 1.1 jruoho *
225 1.1 jruoho * RETURN: none
226 1.1 jruoho *
227 1.1 jruoho * DESCRIPTION: Extract integer width from the table revision
228 1.1 jruoho *
229 1.1 jruoho ******************************************************************************/
230 1.1 jruoho
231 1.1 jruoho void
232 1.1 jruoho OpcGetIntegerWidth (
233 1.1 jruoho ACPI_PARSE_OBJECT *Op)
234 1.1 jruoho {
235 1.1 jruoho ACPI_PARSE_OBJECT *Child;
236 1.1 jruoho
237 1.1 jruoho
238 1.1 jruoho if (!Op)
239 1.1 jruoho {
240 1.1 jruoho return;
241 1.1 jruoho }
242 1.1 jruoho
243 1.1 jruoho if (Gbl_RevisionOverride)
244 1.1 jruoho {
245 1.1 jruoho AcpiUtSetIntegerWidth (Gbl_RevisionOverride);
246 1.1 jruoho }
247 1.1 jruoho else
248 1.1 jruoho {
249 1.1 jruoho Child = Op->Asl.Child;
250 1.1 jruoho Child = Child->Asl.Next;
251 1.1 jruoho Child = Child->Asl.Next;
252 1.1 jruoho
253 1.1 jruoho /* Use the revision to set the integer width */
254 1.1 jruoho
255 1.1 jruoho AcpiUtSetIntegerWidth ((UINT8) Child->Asl.Value.Integer);
256 1.1 jruoho }
257 1.1 jruoho }
258 1.1 jruoho
259 1.1 jruoho
260 1.1 jruoho /*******************************************************************************
261 1.1 jruoho *
262 1.1 jruoho * FUNCTION: OpcSetOptimalIntegerSize
263 1.1 jruoho *
264 1.1 jruoho * PARAMETERS: Op - A parse tree node
265 1.1 jruoho *
266 1.1 jruoho * RETURN: Integer width, in bytes. Also sets the node AML opcode to the
267 1.1 jruoho * optimal integer AML prefix opcode.
268 1.1 jruoho *
269 1.1 jruoho * DESCRIPTION: Determine the optimal AML encoding of an integer. All leading
270 1.1 jruoho * zeros can be truncated to squeeze the integer into the
271 1.1 jruoho * minimal number of AML bytes.
272 1.1 jruoho *
273 1.1 jruoho ******************************************************************************/
274 1.1 jruoho
275 1.1 jruoho UINT32
276 1.1 jruoho OpcSetOptimalIntegerSize (
277 1.1 jruoho ACPI_PARSE_OBJECT *Op)
278 1.1 jruoho {
279 1.1 jruoho
280 1.1 jruoho #if 0
281 1.1 jruoho /*
282 1.1 jruoho * TBD: - we don't want to optimize integers in the block header, but the
283 1.1 jruoho * code below does not work correctly.
284 1.1 jruoho */
285 1.1 jruoho if (Op->Asl.Parent &&
286 1.1 jruoho Op->Asl.Parent->Asl.Parent &&
287 1.1 jruoho (Op->Asl.Parent->Asl.Parent->Asl.ParseOpcode == PARSEOP_DEFINITIONBLOCK))
288 1.1 jruoho {
289 1.1 jruoho return 0;
290 1.1 jruoho }
291 1.1 jruoho #endif
292 1.1 jruoho
293 1.1 jruoho /*
294 1.1 jruoho * Check for the special AML integers first - Zero, One, Ones.
295 1.1 jruoho * These are single-byte opcodes that are the smallest possible
296 1.1 jruoho * representation of an integer.
297 1.1 jruoho *
298 1.1 jruoho * This optimization is optional.
299 1.1 jruoho */
300 1.1 jruoho if (Gbl_IntegerOptimizationFlag)
301 1.1 jruoho {
302 1.1 jruoho switch (Op->Asl.Value.Integer)
303 1.1 jruoho {
304 1.1 jruoho case 0:
305 1.1 jruoho
306 1.1 jruoho Op->Asl.AmlOpcode = AML_ZERO_OP;
307 1.1 jruoho AslError (ASL_OPTIMIZATION, ASL_MSG_INTEGER_OPTIMIZATION,
308 1.1 jruoho Op, "Zero");
309 1.1 jruoho return 1;
310 1.1 jruoho
311 1.1 jruoho case 1:
312 1.1 jruoho
313 1.1 jruoho Op->Asl.AmlOpcode = AML_ONE_OP;
314 1.1 jruoho AslError (ASL_OPTIMIZATION, ASL_MSG_INTEGER_OPTIMIZATION,
315 1.1 jruoho Op, "One");
316 1.1 jruoho return 1;
317 1.1 jruoho
318 1.1 jruoho case ACPI_UINT32_MAX:
319 1.1 jruoho
320 1.1 jruoho /* Check for table integer width (32 or 64) */
321 1.1 jruoho
322 1.1 jruoho if (AcpiGbl_IntegerByteWidth == 4)
323 1.1 jruoho {
324 1.1 jruoho Op->Asl.AmlOpcode = AML_ONES_OP;
325 1.1 jruoho AslError (ASL_OPTIMIZATION, ASL_MSG_INTEGER_OPTIMIZATION,
326 1.1 jruoho Op, "Ones");
327 1.1 jruoho return 1;
328 1.1 jruoho }
329 1.1 jruoho break;
330 1.1 jruoho
331 1.1 jruoho case ACPI_UINT64_MAX:
332 1.1 jruoho
333 1.1 jruoho /* Check for table integer width (32 or 64) */
334 1.1 jruoho
335 1.1 jruoho if (AcpiGbl_IntegerByteWidth == 8)
336 1.1 jruoho {
337 1.1 jruoho Op->Asl.AmlOpcode = AML_ONES_OP;
338 1.1 jruoho AslError (ASL_OPTIMIZATION, ASL_MSG_INTEGER_OPTIMIZATION,
339 1.1 jruoho Op, "Ones");
340 1.1 jruoho return 1;
341 1.1 jruoho }
342 1.1 jruoho break;
343 1.1 jruoho
344 1.1 jruoho default:
345 1.1 jruoho break;
346 1.1 jruoho }
347 1.1 jruoho }
348 1.1 jruoho
349 1.1 jruoho /* Find the best fit using the various AML integer prefixes */
350 1.1 jruoho
351 1.1 jruoho if (Op->Asl.Value.Integer <= ACPI_UINT8_MAX)
352 1.1 jruoho {
353 1.1 jruoho Op->Asl.AmlOpcode = AML_BYTE_OP;
354 1.1 jruoho return 1;
355 1.1 jruoho }
356 1.1 jruoho if (Op->Asl.Value.Integer <= ACPI_UINT16_MAX)
357 1.1 jruoho {
358 1.1 jruoho Op->Asl.AmlOpcode = AML_WORD_OP;
359 1.1 jruoho return 2;
360 1.1 jruoho }
361 1.1 jruoho if (Op->Asl.Value.Integer <= ACPI_UINT32_MAX)
362 1.1 jruoho {
363 1.1 jruoho Op->Asl.AmlOpcode = AML_DWORD_OP;
364 1.1 jruoho return 4;
365 1.1 jruoho }
366 1.1 jruoho else
367 1.1 jruoho {
368 1.1 jruoho if (AcpiGbl_IntegerByteWidth == 4)
369 1.1 jruoho {
370 1.1 jruoho AslError (ASL_WARNING, ASL_MSG_INTEGER_LENGTH,
371 1.1 jruoho Op, NULL);
372 1.1 jruoho
373 1.1 jruoho if (!Gbl_IgnoreErrors)
374 1.1 jruoho {
375 1.1 jruoho /* Truncate the integer to 32-bit */
376 1.1 jruoho Op->Asl.AmlOpcode = AML_DWORD_OP;
377 1.1 jruoho return 4;
378 1.1 jruoho }
379 1.1 jruoho }
380 1.1 jruoho
381 1.1 jruoho Op->Asl.AmlOpcode = AML_QWORD_OP;
382 1.1 jruoho return 8;
383 1.1 jruoho }
384 1.1 jruoho }
385 1.1 jruoho
386 1.1 jruoho
387 1.1 jruoho /*******************************************************************************
388 1.1 jruoho *
389 1.1 jruoho * FUNCTION: OpcDoAccessAs
390 1.1 jruoho *
391 1.1 jruoho * PARAMETERS: Op - Parse node
392 1.1 jruoho *
393 1.1 jruoho * RETURN: None
394 1.1 jruoho *
395 1.1 jruoho * DESCRIPTION: Implement the ACCESS_AS ASL keyword.
396 1.1 jruoho *
397 1.1 jruoho ******************************************************************************/
398 1.1 jruoho
399 1.1 jruoho static void
400 1.1 jruoho OpcDoAccessAs (
401 1.1 jruoho ACPI_PARSE_OBJECT *Op)
402 1.1 jruoho {
403 1.1 jruoho ACPI_PARSE_OBJECT *Next;
404 1.1 jruoho
405 1.1 jruoho
406 1.1 jruoho Op->Asl.AmlOpcodeLength = 1;
407 1.1 jruoho Next = Op->Asl.Child;
408 1.1 jruoho
409 1.1 jruoho /* First child is the access type */
410 1.1 jruoho
411 1.1 jruoho Next->Asl.AmlOpcode = AML_RAW_DATA_BYTE;
412 1.1 jruoho Next->Asl.ParseOpcode = PARSEOP_RAW_DATA;
413 1.1 jruoho
414 1.1 jruoho /* Second child is the optional access attribute */
415 1.1 jruoho
416 1.1 jruoho Next = Next->Asl.Next;
417 1.1 jruoho if (Next->Asl.ParseOpcode == PARSEOP_DEFAULT_ARG)
418 1.1 jruoho {
419 1.1 jruoho Next->Asl.Value.Integer = 0;
420 1.1 jruoho }
421 1.1 jruoho Next->Asl.AmlOpcode = AML_RAW_DATA_BYTE;
422 1.1 jruoho Next->Asl.ParseOpcode = PARSEOP_RAW_DATA;
423 1.1 jruoho }
424 1.1 jruoho
425 1.1 jruoho
426 1.1 jruoho /*******************************************************************************
427 1.1 jruoho *
428 1.1 jruoho * FUNCTION: OpcDoUnicode
429 1.1 jruoho *
430 1.1 jruoho * PARAMETERS: Op - Parse node
431 1.1 jruoho *
432 1.1 jruoho * RETURN: None
433 1.1 jruoho *
434 1.1 jruoho * DESCRIPTION: Implement the UNICODE ASL "macro". Convert the input string
435 1.1 jruoho * to a unicode buffer. There is no Unicode AML opcode.
436 1.1 jruoho *
437 1.1 jruoho * Note: The Unicode string is 16 bits per character, no leading signature,
438 1.1 jruoho * with a 16-bit terminating NULL.
439 1.1 jruoho *
440 1.1 jruoho ******************************************************************************/
441 1.1 jruoho
442 1.1 jruoho static void
443 1.1 jruoho OpcDoUnicode (
444 1.1 jruoho ACPI_PARSE_OBJECT *Op)
445 1.1 jruoho {
446 1.1 jruoho ACPI_PARSE_OBJECT *InitializerOp;
447 1.1 jruoho UINT32 Length;
448 1.1 jruoho UINT32 Count;
449 1.1 jruoho UINT32 i;
450 1.1 jruoho UINT8 *AsciiString;
451 1.1 jruoho UINT16 *UnicodeString;
452 1.1 jruoho ACPI_PARSE_OBJECT *BufferLengthOp;
453 1.1 jruoho
454 1.1 jruoho
455 1.1 jruoho /* Change op into a buffer object */
456 1.1 jruoho
457 1.1 jruoho Op->Asl.CompileFlags &= ~NODE_COMPILE_TIME_CONST;
458 1.1 jruoho Op->Asl.ParseOpcode = PARSEOP_BUFFER;
459 1.1 jruoho UtSetParseOpName (Op);
460 1.1 jruoho
461 1.1 jruoho /* Buffer Length is first, followed by the string */
462 1.1 jruoho
463 1.1 jruoho BufferLengthOp = Op->Asl.Child;
464 1.1 jruoho InitializerOp = BufferLengthOp->Asl.Next;
465 1.1 jruoho
466 1.1 jruoho AsciiString = (UINT8 *) InitializerOp->Asl.Value.String;
467 1.1 jruoho
468 1.1 jruoho /* Create a new buffer for the Unicode string */
469 1.1 jruoho
470 1.1 jruoho Count = strlen (InitializerOp->Asl.Value.String) + 1;
471 1.1 jruoho Length = Count * sizeof (UINT16);
472 1.1 jruoho UnicodeString = UtLocalCalloc (Length);
473 1.1 jruoho
474 1.1 jruoho /* Convert to Unicode string (including null terminator) */
475 1.1 jruoho
476 1.1 jruoho for (i = 0; i < Count; i++)
477 1.1 jruoho {
478 1.1 jruoho UnicodeString[i] = (UINT16) AsciiString[i];
479 1.1 jruoho }
480 1.1 jruoho
481 1.1 jruoho /*
482 1.1 jruoho * Just set the buffer size node to be the buffer length, regardless
483 1.1 jruoho * of whether it was previously an integer or a default_arg placeholder
484 1.1 jruoho */
485 1.1 jruoho BufferLengthOp->Asl.ParseOpcode = PARSEOP_INTEGER;
486 1.1 jruoho BufferLengthOp->Asl.AmlOpcode = AML_DWORD_OP;
487 1.1 jruoho BufferLengthOp->Asl.Value.Integer = Length;
488 1.1 jruoho UtSetParseOpName (BufferLengthOp);
489 1.1 jruoho
490 1.1 jruoho (void) OpcSetOptimalIntegerSize (BufferLengthOp);
491 1.1 jruoho
492 1.1 jruoho /* The Unicode string is a raw data buffer */
493 1.1 jruoho
494 1.1 jruoho InitializerOp->Asl.Value.Buffer = (UINT8 *) UnicodeString;
495 1.1 jruoho InitializerOp->Asl.AmlOpcode = AML_RAW_DATA_BUFFER;
496 1.1 jruoho InitializerOp->Asl.AmlLength = Length;
497 1.1 jruoho InitializerOp->Asl.ParseOpcode = PARSEOP_RAW_DATA;
498 1.1 jruoho InitializerOp->Asl.Child = NULL;
499 1.1 jruoho UtSetParseOpName (InitializerOp);
500 1.1 jruoho }
501 1.1 jruoho
502 1.1 jruoho
503 1.1 jruoho /*******************************************************************************
504 1.1 jruoho *
505 1.1 jruoho * FUNCTION: OpcDoEisaId
506 1.1 jruoho *
507 1.1 jruoho * PARAMETERS: Op - Parse node
508 1.1 jruoho *
509 1.1 jruoho * RETURN: None
510 1.1 jruoho *
511 1.1 jruoho * DESCRIPTION: Convert a string EISA ID to numeric representation. See the
512 1.1 jruoho * Pnp BIOS Specification for details. Here is an excerpt:
513 1.1 jruoho *
514 1.1 jruoho * A seven character ASCII representation of the product
515 1.1 jruoho * identifier compressed into a 32-bit identifier. The seven
516 1.1 jruoho * character ID consists of a three character manufacturer code,
517 1.1 jruoho * a three character hexadecimal product identifier, and a one
518 1.1 jruoho * character hexadecimal revision number. The manufacturer code
519 1.1 jruoho * is a 3 uppercase character code that is compressed into 3 5-bit
520 1.1 jruoho * values as follows:
521 1.1 jruoho * 1) Find hex ASCII value for each letter
522 1.1 jruoho * 2) Subtract 40h from each ASCII value
523 1.1 jruoho * 3) Retain 5 least signficant bits for each letter by
524 1.1 jruoho * discarding upper 3 bits because they are always 0.
525 1.1 jruoho * 4) Compressed code = concatenate 0 and the 3 5-bit values
526 1.1 jruoho *
527 1.1 jruoho * The format of the compressed product identifier is as follows:
528 1.1 jruoho * Byte 0: Bit 7 - Reserved (0)
529 1.1 jruoho * Bits 6-2: - 1st character of compressed mfg code
530 1.1 jruoho * Bits 1-0 - Upper 2 bits of 2nd character of mfg code
531 1.1 jruoho * Byte 1: Bits 7-5 - Lower 3 bits of 2nd character of mfg code
532 1.1 jruoho * Bits 4-0 - 3rd character of mfg code
533 1.1 jruoho * Byte 2: Bits 7-4 - 1st hex digit of product number
534 1.1 jruoho * Bits 3-0 - 2nd hex digit of product number
535 1.1 jruoho * Byte 3: Bits 7-4 - 3st hex digit of product number
536 1.1 jruoho * Bits 3-0 - Hex digit of the revision number
537 1.1 jruoho *
538 1.1 jruoho ******************************************************************************/
539 1.1 jruoho
540 1.1 jruoho static void
541 1.1 jruoho OpcDoEisaId (
542 1.1 jruoho ACPI_PARSE_OBJECT *Op)
543 1.1 jruoho {
544 1.1 jruoho UINT32 EisaId = 0;
545 1.1 jruoho UINT32 BigEndianId;
546 1.1 jruoho char *InString;
547 1.1 jruoho ACPI_STATUS Status = AE_OK;
548 1.1 jruoho UINT32 i;
549 1.1 jruoho
550 1.1 jruoho
551 1.1 jruoho InString = (char *) Op->Asl.Value.String;
552 1.1 jruoho
553 1.1 jruoho /*
554 1.1 jruoho * The EISAID string must be exactly 7 characters and of the form
555 1.1 jruoho * "UUUXXXX" -- 3 uppercase letters and 4 hex digits (e.g., "PNP0001")
556 1.1 jruoho */
557 1.1 jruoho if (ACPI_STRLEN (InString) != 7)
558 1.1 jruoho {
559 1.1 jruoho Status = AE_BAD_PARAMETER;
560 1.1 jruoho }
561 1.1 jruoho else
562 1.1 jruoho {
563 1.1 jruoho /* Check all 7 characters for correct format */
564 1.1 jruoho
565 1.1 jruoho for (i = 0; i < 7; i++)
566 1.1 jruoho {
567 1.1 jruoho /* First 3 characters must be uppercase letters */
568 1.1 jruoho
569 1.1 jruoho if (i < 3)
570 1.1 jruoho {
571 1.1 jruoho if (!isupper ((int) InString[i]))
572 1.1 jruoho {
573 1.1 jruoho Status = AE_BAD_PARAMETER;
574 1.1 jruoho }
575 1.1 jruoho }
576 1.1 jruoho
577 1.1 jruoho /* Last 4 characters must be hex digits */
578 1.1 jruoho
579 1.1 jruoho else if (!isxdigit ((int) InString[i]))
580 1.1 jruoho {
581 1.1 jruoho Status = AE_BAD_PARAMETER;
582 1.1 jruoho }
583 1.1 jruoho }
584 1.1 jruoho }
585 1.1 jruoho
586 1.1 jruoho if (ACPI_FAILURE (Status))
587 1.1 jruoho {
588 1.1 jruoho AslError (ASL_ERROR, ASL_MSG_INVALID_EISAID, Op, Op->Asl.Value.String);
589 1.1 jruoho }
590 1.1 jruoho else
591 1.1 jruoho {
592 1.1 jruoho /* Create ID big-endian first (bits are contiguous) */
593 1.1 jruoho
594 1.1 jruoho BigEndianId =
595 1.1 jruoho (UINT32) (InString[0] - 0x40) << 26 |
596 1.1 jruoho (UINT32) (InString[1] - 0x40) << 21 |
597 1.1 jruoho (UINT32) (InString[2] - 0x40) << 16 |
598 1.1 jruoho
599 1.1 jruoho (UtHexCharToValue (InString[3])) << 12 |
600 1.1 jruoho (UtHexCharToValue (InString[4])) << 8 |
601 1.1 jruoho (UtHexCharToValue (InString[5])) << 4 |
602 1.1 jruoho UtHexCharToValue (InString[6]);
603 1.1 jruoho
604 1.1 jruoho /* Swap to little-endian to get final ID (see function header) */
605 1.1 jruoho
606 1.1 jruoho EisaId = AcpiUtDwordByteSwap (BigEndianId);
607 1.1 jruoho }
608 1.1 jruoho
609 1.1 jruoho /*
610 1.1 jruoho * Morph the Op into an integer, regardless of whether there
611 1.1 jruoho * was an error in the EISAID string
612 1.1 jruoho */
613 1.1 jruoho Op->Asl.Value.Integer = EisaId;
614 1.1 jruoho
615 1.1 jruoho Op->Asl.CompileFlags &= ~NODE_COMPILE_TIME_CONST;
616 1.1 jruoho Op->Asl.ParseOpcode = PARSEOP_INTEGER;
617 1.1 jruoho (void) OpcSetOptimalIntegerSize (Op);
618 1.1 jruoho
619 1.1 jruoho /* Op is now an integer */
620 1.1 jruoho
621 1.1 jruoho UtSetParseOpName (Op);
622 1.1 jruoho }
623 1.1 jruoho
624 1.1 jruoho
625 1.1 jruoho /*******************************************************************************
626 1.1 jruoho *
627 1.1 jruoho * FUNCTION: OpcDoUiId
628 1.1 jruoho *
629 1.1 jruoho * PARAMETERS: Op - Parse node
630 1.1 jruoho *
631 1.1 jruoho * RETURN: None
632 1.1 jruoho *
633 1.1 jruoho * DESCRIPTION: Convert UUID string to 16-byte buffer
634 1.1 jruoho *
635 1.1 jruoho ******************************************************************************/
636 1.1 jruoho
637 1.1 jruoho static void
638 1.1 jruoho OpcDoUuId (
639 1.1 jruoho ACPI_PARSE_OBJECT *Op)
640 1.1 jruoho {
641 1.1 jruoho char *InString;
642 1.1 jruoho char *Buffer;
643 1.1 jruoho ACPI_STATUS Status = AE_OK;
644 1.1 jruoho UINT32 i;
645 1.1 jruoho ACPI_PARSE_OBJECT *NewOp;
646 1.1 jruoho
647 1.1 jruoho
648 1.1 jruoho InString = (char *) Op->Asl.Value.String;
649 1.1 jruoho
650 1.1 jruoho if (ACPI_STRLEN (InString) != 36)
651 1.1 jruoho {
652 1.1 jruoho Status = AE_BAD_PARAMETER;
653 1.1 jruoho }
654 1.1 jruoho else
655 1.1 jruoho {
656 1.1 jruoho /* Check all 36 characters for correct format */
657 1.1 jruoho
658 1.1 jruoho for (i = 0; i < 36; i++)
659 1.1 jruoho {
660 1.1 jruoho if ((i == 8) || (i == 13) || (i == 18) || (i == 23))
661 1.1 jruoho {
662 1.1 jruoho if (InString[i] != '-')
663 1.1 jruoho {
664 1.1 jruoho Status = AE_BAD_PARAMETER;
665 1.1 jruoho }
666 1.1 jruoho }
667 1.1 jruoho else
668 1.1 jruoho {
669 1.1 jruoho if (!isxdigit ((int) InString[i]))
670 1.1 jruoho {
671 1.1 jruoho Status = AE_BAD_PARAMETER;
672 1.1 jruoho }
673 1.1 jruoho }
674 1.1 jruoho }
675 1.1 jruoho }
676 1.1 jruoho
677 1.1 jruoho Buffer = UtLocalCalloc (16);
678 1.1 jruoho
679 1.1 jruoho if (ACPI_FAILURE (Status))
680 1.1 jruoho {
681 1.1 jruoho AslError (ASL_ERROR, ASL_MSG_INVALID_UUID, Op, Op->Asl.Value.String);
682 1.1 jruoho }
683 1.1 jruoho else for (i = 0; i < 16; i++)
684 1.1 jruoho {
685 1.1 jruoho Buffer[i] = (char) (UtHexCharToValue (InString[OpcMapToUUID[i]]) << 4);
686 1.1 jruoho Buffer[i] |= (char) UtHexCharToValue (InString[OpcMapToUUID[i] + 1]);
687 1.1 jruoho }
688 1.1 jruoho
689 1.1 jruoho /* Change Op to a Buffer */
690 1.1 jruoho
691 1.1 jruoho Op->Asl.ParseOpcode = PARSEOP_BUFFER;
692 1.1 jruoho Op->Common.AmlOpcode = AML_BUFFER_OP;
693 1.1 jruoho
694 1.1 jruoho /* Disable further optimization */
695 1.1 jruoho
696 1.1 jruoho Op->Asl.CompileFlags &= ~NODE_COMPILE_TIME_CONST;
697 1.1 jruoho UtSetParseOpName (Op);
698 1.1 jruoho
699 1.1 jruoho /* Child node is the buffer length */
700 1.1 jruoho
701 1.1 jruoho NewOp = TrAllocateNode (PARSEOP_INTEGER);
702 1.1 jruoho
703 1.1 jruoho NewOp->Asl.AmlOpcode = AML_BYTE_OP;
704 1.1 jruoho NewOp->Asl.Value.Integer = 16;
705 1.1 jruoho NewOp->Asl.Parent = Op;
706 1.1 jruoho
707 1.1 jruoho Op->Asl.Child = NewOp;
708 1.1 jruoho Op = NewOp;
709 1.1 jruoho
710 1.1 jruoho /* Peer to the child is the raw buffer data */
711 1.1 jruoho
712 1.1 jruoho NewOp = TrAllocateNode (PARSEOP_RAW_DATA);
713 1.1 jruoho NewOp->Asl.AmlOpcode = AML_RAW_DATA_BUFFER;
714 1.1 jruoho NewOp->Asl.AmlLength = 16;
715 1.1 jruoho NewOp->Asl.Value.String = (char *) Buffer;
716 1.1 jruoho NewOp->Asl.Parent = Op->Asl.Parent;
717 1.1 jruoho
718 1.1 jruoho Op->Asl.Next = NewOp;
719 1.1 jruoho }
720 1.1 jruoho
721 1.1 jruoho
722 1.1 jruoho /*******************************************************************************
723 1.1 jruoho *
724 1.1 jruoho * FUNCTION: OpcGenerateAmlOpcode
725 1.1 jruoho *
726 1.1 jruoho * PARAMETERS: Op - Parse node
727 1.1 jruoho *
728 1.1 jruoho * RETURN: None
729 1.1 jruoho *
730 1.1 jruoho * DESCRIPTION: Generate the AML opcode associated with the node and its
731 1.1 jruoho * parse (lex/flex) keyword opcode. Essentially implements
732 1.1 jruoho * a mapping between the parse opcodes and the actual AML opcodes.
733 1.1 jruoho *
734 1.1 jruoho ******************************************************************************/
735 1.1 jruoho
736 1.1 jruoho void
737 1.1 jruoho OpcGenerateAmlOpcode (
738 1.1 jruoho ACPI_PARSE_OBJECT *Op)
739 1.1 jruoho {
740 1.1 jruoho
741 1.1 jruoho UINT16 Index;
742 1.1 jruoho
743 1.1 jruoho
744 1.1 jruoho Index = (UINT16) (Op->Asl.ParseOpcode - ASL_PARSE_OPCODE_BASE);
745 1.1 jruoho
746 1.1 jruoho Op->Asl.AmlOpcode = AslKeywordMapping[Index].AmlOpcode;
747 1.1 jruoho Op->Asl.AcpiBtype = AslKeywordMapping[Index].AcpiBtype;
748 1.1 jruoho Op->Asl.CompileFlags |= AslKeywordMapping[Index].Flags;
749 1.1 jruoho
750 1.1 jruoho if (!Op->Asl.Value.Integer)
751 1.1 jruoho {
752 1.1 jruoho Op->Asl.Value.Integer = AslKeywordMapping[Index].Value;
753 1.1 jruoho }
754 1.1 jruoho
755 1.1 jruoho /* Special handling for some opcodes */
756 1.1 jruoho
757 1.1 jruoho switch (Op->Asl.ParseOpcode)
758 1.1 jruoho {
759 1.1 jruoho case PARSEOP_INTEGER:
760 1.1 jruoho /*
761 1.1 jruoho * Set the opcode based on the size of the integer
762 1.1 jruoho */
763 1.1 jruoho (void) OpcSetOptimalIntegerSize (Op);
764 1.1 jruoho break;
765 1.1 jruoho
766 1.1 jruoho case PARSEOP_OFFSET:
767 1.1 jruoho
768 1.1 jruoho Op->Asl.AmlOpcodeLength = 1;
769 1.1 jruoho break;
770 1.1 jruoho
771 1.1 jruoho case PARSEOP_ACCESSAS:
772 1.1 jruoho
773 1.1 jruoho OpcDoAccessAs (Op);
774 1.1 jruoho break;
775 1.1 jruoho
776 1.1 jruoho case PARSEOP_EISAID:
777 1.1 jruoho
778 1.1 jruoho OpcDoEisaId (Op);
779 1.1 jruoho break;
780 1.1 jruoho
781 1.1 jruoho case PARSEOP_TOUUID:
782 1.1 jruoho
783 1.1 jruoho OpcDoUuId (Op);
784 1.1 jruoho break;
785 1.1 jruoho
786 1.1 jruoho case PARSEOP_UNICODE:
787 1.1 jruoho
788 1.1 jruoho OpcDoUnicode (Op);
789 1.1 jruoho break;
790 1.1 jruoho
791 1.1 jruoho case PARSEOP_INCLUDE:
792 1.1 jruoho
793 1.1 jruoho Op->Asl.Child->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
794 1.1 jruoho Gbl_HasIncludeFiles = TRUE;
795 1.1 jruoho break;
796 1.1 jruoho
797 1.1 jruoho case PARSEOP_EXTERNAL:
798 1.1 jruoho
799 1.1 jruoho Op->Asl.Child->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
800 1.1 jruoho Op->Asl.Child->Asl.Next->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
801 1.1 jruoho break;
802 1.1 jruoho
803 1.1 jruoho default:
804 1.1 jruoho /* Nothing to do for other opcodes */
805 1.1 jruoho break;
806 1.1 jruoho }
807 1.1 jruoho
808 1.1 jruoho return;
809 1.1 jruoho }
810 1.1 jruoho
811 1.1 jruoho
812