1 /******************************************************************************
2 *
3 * Module Name: aslopcode - AML opcode generation
4 *
5 *****************************************************************************/
6
7 /*
8 * Copyright (C) 2000 - 2022, Intel Corp.
9 * All rights reserved.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions, and the following disclaimer,
16 * without modification.
17 * 2. Redistributions in binary form must reproduce at minimum a disclaimer
18 * substantially similar to the "NO WARRANTY" disclaimer below
19 * ("Disclaimer") and any redistribution must be conditioned upon
20 * including a substantially similar Disclaimer requirement for further
21 * binary redistribution.
22 * 3. Neither the names of the above-listed copyright holders nor the names
23 * of any contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * Alternatively, this software may be distributed under the terms of the
27 * GNU General Public License ("GPL") version 2 as published by the Free
28 * Software Foundation.
29 *
30 * NO WARRANTY
31 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
32 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
33 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
34 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
35 * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
36 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
37 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
38 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
39 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
40 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
41 * POSSIBILITY OF SUCH DAMAGES.
42 */
43
44 #include "aslcompiler.h"
45 #include "aslcompiler.y.h"
46 #include "amlcode.h"
47
48 #define _COMPONENT ACPI_COMPILER
49 ACPI_MODULE_NAME ("aslopcodes")
50
51
52 /* Local prototypes */
53
54 static void
55 OpcDoAccessAs (
56 ACPI_PARSE_OBJECT *Op);
57
58 static void
59 OpcDoConnection (
60 ACPI_PARSE_OBJECT *Op);
61
62 static void
63 OpcDoUnicode (
64 ACPI_PARSE_OBJECT *Op);
65
66 static void
67 OpcDoEisaId (
68 ACPI_PARSE_OBJECT *Op);
69
70 static void
71 OpcDoUuId (
72 ACPI_PARSE_OBJECT *Op);
73
74
75 /*******************************************************************************
76 *
77 * FUNCTION: OpcAmlOpcodeUpdateWalk
78 *
79 * PARAMETERS: ASL_WALK_CALLBACK
80 *
81 * RETURN: Status
82 *
83 * DESCRIPTION: Opcode update walk, ascending callback
84 *
85 ******************************************************************************/
86
87 ACPI_STATUS
OpcAmlOpcodeUpdateWalk(ACPI_PARSE_OBJECT * Op,UINT32 Level,void * Context)88 OpcAmlOpcodeUpdateWalk (
89 ACPI_PARSE_OBJECT *Op,
90 UINT32 Level,
91 void *Context)
92 {
93
94 /*
95 * Handle the Package() case where the actual opcode cannot be determined
96 * until the PackageLength operand has been folded and minimized.
97 * (PackageOp versus VarPackageOp)
98 *
99 * This is (as of ACPI 3.0) the only case where the AML opcode can change
100 * based upon the value of a parameter.
101 *
102 * The parser always inserts a VarPackage opcode, which can possibly be
103 * optimized to a Package opcode.
104 */
105 if (Op->Asl.ParseOpcode == PARSEOP_VAR_PACKAGE)
106 {
107 OpnDoPackage (Op);
108 }
109
110 return (AE_OK);
111 }
112
113
114 /*******************************************************************************
115 *
116 * FUNCTION: OpcAmlOpcodeWalk
117 *
118 * PARAMETERS: ASL_WALK_CALLBACK
119 *
120 * RETURN: Status
121 *
122 * DESCRIPTION: Parse tree walk to generate both the AML opcodes and the AML
123 * operands.
124 *
125 ******************************************************************************/
126
127 ACPI_STATUS
OpcAmlOpcodeWalk(ACPI_PARSE_OBJECT * Op,UINT32 Level,void * Context)128 OpcAmlOpcodeWalk (
129 ACPI_PARSE_OBJECT *Op,
130 UINT32 Level,
131 void *Context)
132 {
133
134 AslGbl_TotalParseNodes++;
135
136 OpcGenerateAmlOpcode (Op);
137 OpnGenerateAmlOperands (Op);
138 return (AE_OK);
139 }
140
141
142 /*******************************************************************************
143 *
144 * FUNCTION: OpcGetIntegerWidth
145 *
146 * PARAMETERS: Op - DEFINITION BLOCK op
147 *
148 * RETURN: none
149 *
150 * DESCRIPTION: Extract integer width from the table revision
151 *
152 ******************************************************************************/
153
154 void
OpcGetIntegerWidth(ACPI_PARSE_OBJECT * Op)155 OpcGetIntegerWidth (
156 ACPI_PARSE_OBJECT *Op)
157 {
158 ACPI_PARSE_OBJECT *Child;
159
160
161 if (!Op)
162 {
163 return;
164 }
165
166 if (AslGbl_RevisionOverride)
167 {
168 AcpiUtSetIntegerWidth (AslGbl_RevisionOverride);
169 }
170 else
171 {
172 Child = Op->Asl.Child;
173 Child = Child->Asl.Next;
174 Child = Child->Asl.Next;
175
176 /* Use the revision to set the integer width */
177
178 AcpiUtSetIntegerWidth ((UINT8) Child->Asl.Value.Integer);
179 }
180 }
181
182
183 /*******************************************************************************
184 *
185 * FUNCTION: OpcSetOptimalIntegerSize
186 *
187 * PARAMETERS: Op - A parse tree node
188 *
189 * RETURN: Integer width, in bytes. Also sets the node AML opcode to the
190 * optimal integer AML prefix opcode.
191 *
192 * DESCRIPTION: Determine the optimal AML encoding of an integer. All leading
193 * zeros can be truncated to squeeze the integer into the
194 * minimal number of AML bytes.
195 *
196 ******************************************************************************/
197
198 UINT32
OpcSetOptimalIntegerSize(ACPI_PARSE_OBJECT * Op)199 OpcSetOptimalIntegerSize (
200 ACPI_PARSE_OBJECT *Op)
201 {
202
203 #if 0
204 /*
205 * TBD: - we don't want to optimize integers in the block header, but the
206 * code below does not work correctly.
207 */
208 if (Op->Asl.Parent &&
209 Op->Asl.Parent->Asl.Parent &&
210 (Op->Asl.Parent->Asl.Parent->Asl.ParseOpcode == PARSEOP_DEFINITION_BLOCK))
211 {
212 return (0);
213 }
214 #endif
215
216 /*
217 * Check for the special AML integers first - Zero, One, Ones.
218 * These are single-byte opcodes that are the smallest possible
219 * representation of an integer.
220 *
221 * This optimization is optional.
222 */
223 if (AslGbl_IntegerOptimizationFlag)
224 {
225 switch (Op->Asl.Value.Integer)
226 {
227 case 0:
228
229 Op->Asl.AmlOpcode = AML_ZERO_OP;
230 AslError (ASL_OPTIMIZATION, ASL_MSG_INTEGER_OPTIMIZATION,
231 Op, "Zero");
232 return (1);
233
234 case 1:
235
236 Op->Asl.AmlOpcode = AML_ONE_OP;
237 AslError (ASL_OPTIMIZATION, ASL_MSG_INTEGER_OPTIMIZATION,
238 Op, "One");
239 return (1);
240
241 case ACPI_UINT32_MAX:
242
243 /* Check for table integer width (32 or 64) */
244
245 if (AcpiGbl_IntegerByteWidth == 4)
246 {
247 Op->Asl.AmlOpcode = AML_ONES_OP;
248 AslError (ASL_OPTIMIZATION, ASL_MSG_INTEGER_OPTIMIZATION,
249 Op, "Ones");
250 return (1);
251 }
252 break;
253
254 case ACPI_UINT64_MAX:
255
256 /* Check for table integer width (32 or 64) */
257
258 if (AcpiGbl_IntegerByteWidth == 8)
259 {
260 Op->Asl.AmlOpcode = AML_ONES_OP;
261 AslError (ASL_OPTIMIZATION, ASL_MSG_INTEGER_OPTIMIZATION,
262 Op, "Ones");
263 return (1);
264 }
265 break;
266
267 default:
268
269 break;
270 }
271 }
272
273 /* Find the best fit using the various AML integer prefixes */
274
275 if (Op->Asl.Value.Integer <= ACPI_UINT8_MAX)
276 {
277 Op->Asl.AmlOpcode = AML_BYTE_OP;
278 return (1);
279 }
280
281 if (Op->Asl.Value.Integer <= ACPI_UINT16_MAX)
282 {
283 Op->Asl.AmlOpcode = AML_WORD_OP;
284 return (2);
285 }
286
287 if (Op->Asl.Value.Integer <= ACPI_UINT32_MAX)
288 {
289 Op->Asl.AmlOpcode = AML_DWORD_OP;
290 return (4);
291 }
292 else /* 64-bit integer */
293 {
294 if (AcpiGbl_IntegerByteWidth == 4)
295 {
296 AslError (ASL_WARNING, ASL_MSG_INTEGER_LENGTH,
297 Op, NULL);
298
299 if (!AslGbl_IgnoreErrors)
300 {
301 /* Truncate the integer to 32-bit */
302
303 Op->Asl.Value.Integer &= ACPI_UINT32_MAX;
304
305 /* Now set the optimal integer size */
306
307 return (OpcSetOptimalIntegerSize (Op));
308 }
309 }
310
311 Op->Asl.AmlOpcode = AML_QWORD_OP;
312 return (8);
313 }
314 }
315
316
317 /*******************************************************************************
318 *
319 * FUNCTION: OpcDoAccessAs
320 *
321 * PARAMETERS: Op - Parse node
322 *
323 * RETURN: None
324 *
325 * DESCRIPTION: Implement the ACCESS_AS ASL keyword.
326 *
327 ******************************************************************************/
328
329 static void
OpcDoAccessAs(ACPI_PARSE_OBJECT * Op)330 OpcDoAccessAs (
331 ACPI_PARSE_OBJECT *Op)
332 {
333 ACPI_PARSE_OBJECT *TypeOp;
334 ACPI_PARSE_OBJECT *AttribOp;
335 ACPI_PARSE_OBJECT *LengthOp;
336 UINT8 Attribute;
337
338
339 Op->Asl.AmlOpcodeLength = 1;
340 TypeOp = Op->Asl.Child;
341
342 /* First child is the access type */
343
344 TypeOp->Asl.AmlOpcode = AML_RAW_DATA_BYTE;
345 TypeOp->Asl.ParseOpcode = PARSEOP_RAW_DATA;
346
347 /* Second child is the optional access attribute */
348
349 AttribOp = TypeOp->Asl.Next;
350 if (AttribOp->Asl.ParseOpcode == PARSEOP_DEFAULT_ARG)
351 {
352 AttribOp->Asl.Value.Integer = 0;
353 }
354
355 AttribOp->Asl.AmlOpcode = AML_RAW_DATA_BYTE;
356 AttribOp->Asl.ParseOpcode = PARSEOP_RAW_DATA;
357
358 /* Only a few AccessAttributes support AccessLength */
359
360 Attribute = (UINT8) AttribOp->Asl.Value.Integer;
361 if ((Attribute != AML_FIELD_ATTRIB_BYTES) &&
362 (Attribute != AML_FIELD_ATTRIB_RAW_BYTES) &&
363 (Attribute != AML_FIELD_ATTRIB_RAW_PROCESS_BYTES))
364 {
365 return;
366 }
367
368 Op->Asl.AmlOpcode = AML_FIELD_EXT_ACCESS_OP;
369
370 /*
371 * Child of Attributes is the AccessLength (required for Multibyte,
372 * RawBytes, RawProcess.)
373 */
374 LengthOp = AttribOp->Asl.Child;
375 if (!LengthOp)
376 {
377 return;
378 }
379
380 /* TBD: probably can remove */
381
382 if (LengthOp->Asl.ParseOpcode == PARSEOP_DEFAULT_ARG)
383 {
384 LengthOp->Asl.Value.Integer = 16;
385 }
386
387 LengthOp->Asl.AmlOpcode = AML_RAW_DATA_BYTE;
388 LengthOp->Asl.ParseOpcode = PARSEOP_RAW_DATA;
389 }
390
391
392 /*******************************************************************************
393 *
394 * FUNCTION: OpcDoConnection
395 *
396 * PARAMETERS: Op - Parse node
397 *
398 * RETURN: None
399 *
400 * DESCRIPTION: Implement the Connection ASL keyword.
401 *
402 ******************************************************************************/
403
404 static void
OpcDoConnection(ACPI_PARSE_OBJECT * Op)405 OpcDoConnection (
406 ACPI_PARSE_OBJECT *Op)
407 {
408 ASL_RESOURCE_NODE *Rnode;
409 ACPI_PARSE_OBJECT *BufferOp;
410 ACPI_PARSE_OBJECT *BufferLengthOp;
411 ACPI_PARSE_OBJECT *BufferDataOp;
412 ASL_RESOURCE_INFO Info;
413 UINT8 State;
414
415
416 Op->Asl.AmlOpcodeLength = 1;
417
418 if (Op->Asl.Child->Asl.AmlOpcode == AML_INT_NAMEPATH_OP)
419 {
420 return;
421 }
422
423 BufferOp = Op->Asl.Child;
424 BufferLengthOp = BufferOp->Asl.Child;
425 BufferDataOp = BufferLengthOp->Asl.Next;
426
427 Info.DescriptorTypeOp = BufferDataOp->Asl.Next;
428 Info.CurrentByteOffset = 0;
429 State = ACPI_RSTATE_NORMAL;
430 Rnode = RsDoOneResourceDescriptor (&Info, &State);
431 if (!Rnode)
432 {
433 return; /* error */
434 }
435
436 /*
437 * Transform the nodes into the following
438 *
439 * Op -> AML_BUFFER_OP
440 * First Child -> BufferLength
441 * Second Child -> Descriptor Buffer (raw byte data)
442 */
443 BufferOp->Asl.ParseOpcode = PARSEOP_BUFFER;
444 BufferOp->Asl.AmlOpcode = AML_BUFFER_OP;
445 BufferOp->Asl.CompileFlags = OP_AML_PACKAGE | OP_IS_RESOURCE_DESC;
446 UtSetParseOpName (BufferOp);
447
448 BufferLengthOp->Asl.ParseOpcode = PARSEOP_INTEGER;
449 BufferLengthOp->Asl.Value.Integer = Rnode->BufferLength;
450 (void) OpcSetOptimalIntegerSize (BufferLengthOp);
451 UtSetParseOpName (BufferLengthOp);
452
453 BufferDataOp->Asl.ParseOpcode = PARSEOP_RAW_DATA;
454 BufferDataOp->Asl.AmlOpcode = AML_RAW_DATA_CHAIN;
455 BufferDataOp->Asl.AmlOpcodeLength = 0;
456 BufferDataOp->Asl.AmlLength = Rnode->BufferLength;
457 BufferDataOp->Asl.Value.Buffer = (UINT8 *) Rnode;
458 UtSetParseOpName (BufferDataOp);
459 }
460
461
462 /*******************************************************************************
463 *
464 * FUNCTION: OpcDoUnicode
465 *
466 * PARAMETERS: Op - Parse node
467 *
468 * RETURN: None
469 *
470 * DESCRIPTION: Implement the UNICODE ASL "macro". Convert the input string
471 * to a unicode buffer. There is no Unicode AML opcode.
472 *
473 * Note: The Unicode string is 16 bits per character, no leading signature,
474 * with a 16-bit terminating NULL.
475 *
476 ******************************************************************************/
477
478 static void
OpcDoUnicode(ACPI_PARSE_OBJECT * Op)479 OpcDoUnicode (
480 ACPI_PARSE_OBJECT *Op)
481 {
482 ACPI_PARSE_OBJECT *InitializerOp;
483 UINT32 Length;
484 UINT32 Count;
485 UINT32 i;
486 UINT8 *AsciiString;
487 UINT16 *UnicodeString;
488 ACPI_PARSE_OBJECT *BufferLengthOp;
489
490
491 /* Change op into a buffer object */
492
493 Op->Asl.CompileFlags &= ~OP_COMPILE_TIME_CONST;
494 Op->Asl.ParseOpcode = PARSEOP_BUFFER;
495 UtSetParseOpName (Op);
496
497 /* Buffer Length is first, followed by the string */
498
499 BufferLengthOp = Op->Asl.Child;
500 InitializerOp = BufferLengthOp->Asl.Next;
501
502 AsciiString = (UINT8 *) InitializerOp->Asl.Value.String;
503
504 /* Create a new buffer for the Unicode string */
505
506 Count = strlen (InitializerOp->Asl.Value.String) + 1;
507 Length = Count * sizeof (UINT16);
508 UnicodeString = UtLocalCalloc (Length);
509
510 /* Convert to Unicode string (including null terminator) */
511
512 for (i = 0; i < Count; i++)
513 {
514 UnicodeString[i] = (UINT16) AsciiString[i];
515 }
516
517 /*
518 * Just set the buffer size node to be the buffer length, regardless
519 * of whether it was previously an integer or a default_arg placeholder
520 */
521 BufferLengthOp->Asl.ParseOpcode = PARSEOP_INTEGER;
522 BufferLengthOp->Asl.AmlOpcode = AML_DWORD_OP;
523 BufferLengthOp->Asl.Value.Integer = Length;
524 UtSetParseOpName (BufferLengthOp);
525
526 (void) OpcSetOptimalIntegerSize (BufferLengthOp);
527
528 /* The Unicode string is a raw data buffer */
529
530 InitializerOp->Asl.Value.Buffer = (UINT8 *) UnicodeString;
531 InitializerOp->Asl.AmlOpcode = AML_RAW_DATA_BUFFER;
532 InitializerOp->Asl.AmlLength = Length;
533 InitializerOp->Asl.ParseOpcode = PARSEOP_RAW_DATA;
534 InitializerOp->Asl.Child = NULL;
535 UtSetParseOpName (InitializerOp);
536 }
537
538
539 /*******************************************************************************
540 *
541 * FUNCTION: OpcDoEisaId
542 *
543 * PARAMETERS: Op - Parse node
544 *
545 * RETURN: None
546 *
547 * DESCRIPTION: Convert a string EISA ID to numeric representation. See the
548 * Pnp BIOS Specification for details. Here is an excerpt:
549 *
550 * A seven character ASCII representation of the product
551 * identifier compressed into a 32-bit identifier. The seven
552 * character ID consists of a three character manufacturer code,
553 * a three character hexadecimal product identifier, and a one
554 * character hexadecimal revision number. The manufacturer code
555 * is a 3 uppercase character code that is compressed into 3 5-bit
556 * values as follows:
557 * 1) Find hex ASCII value for each letter
558 * 2) Subtract 40h from each ASCII value
559 * 3) Retain 5 least significant bits for each letter by
560 * discarding upper 3 bits because they are always 0.
561 * 4) Compressed code = concatenate 0 and the 3 5-bit values
562 *
563 * The format of the compressed product identifier is as follows:
564 * Byte 0: Bit 7 - Reserved (0)
565 * Bits 6-2: - 1st character of compressed mfg code
566 * Bits 1-0 - Upper 2 bits of 2nd character of mfg code
567 * Byte 1: Bits 7-5 - Lower 3 bits of 2nd character of mfg code
568 * Bits 4-0 - 3rd character of mfg code
569 * Byte 2: Bits 7-4 - 1st hex digit of product number
570 * Bits 3-0 - 2nd hex digit of product number
571 * Byte 3: Bits 7-4 - 3rd hex digit of product number
572 * Bits 3-0 - Hex digit of the revision number
573 *
574 ******************************************************************************/
575
576 static void
OpcDoEisaId(ACPI_PARSE_OBJECT * Op)577 OpcDoEisaId (
578 ACPI_PARSE_OBJECT *Op)
579 {
580 UINT32 EisaId = 0;
581 UINT32 BigEndianId;
582 char *InString;
583 ACPI_STATUS Status = AE_OK;
584 UINT32 i;
585
586
587 InString = (char *) Op->Asl.Value.String;
588
589 /*
590 * The EISAID string must be exactly 7 characters and of the form
591 * "UUUXXXX" -- 3 uppercase letters and 4 hex digits (e.g., "PNP0001")
592 */
593 if (strlen (InString) != 7)
594 {
595 Status = AE_BAD_PARAMETER;
596 }
597 else
598 {
599 /* Check all 7 characters for correct format */
600
601 for (i = 0; i < 7; i++)
602 {
603 /* First 3 characters must be uppercase letters */
604
605 if (i < 3)
606 {
607 if (!isupper ((int) InString[i]))
608 {
609 Status = AE_BAD_PARAMETER;
610 }
611 }
612
613 /* Last 4 characters must be hex digits */
614
615 else if (!isxdigit ((int) InString[i]))
616 {
617 Status = AE_BAD_PARAMETER;
618 }
619 }
620 }
621
622 if (ACPI_FAILURE (Status))
623 {
624 AslError (ASL_ERROR, ASL_MSG_INVALID_EISAID, Op, Op->Asl.Value.String);
625 }
626 else
627 {
628 /* Create ID big-endian first (bits are contiguous) */
629
630 BigEndianId =
631 (UINT32) ((UINT8) (InString[0] - 0x40)) << 26 |
632 (UINT32) ((UINT8) (InString[1] - 0x40)) << 21 |
633 (UINT32) ((UINT8) (InString[2] - 0x40)) << 16 |
634
635 (AcpiUtAsciiCharToHex (InString[3])) << 12 |
636 (AcpiUtAsciiCharToHex (InString[4])) << 8 |
637 (AcpiUtAsciiCharToHex (InString[5])) << 4 |
638 AcpiUtAsciiCharToHex (InString[6]);
639
640 /* Swap to little-endian to get final ID (see function header) */
641
642 EisaId = AcpiUtDwordByteSwap (BigEndianId);
643 }
644
645 /*
646 * Morph the Op into an integer, regardless of whether there
647 * was an error in the EISAID string
648 */
649 Op->Asl.Value.Integer = EisaId;
650
651 Op->Asl.CompileFlags &= ~OP_COMPILE_TIME_CONST;
652 Op->Asl.ParseOpcode = PARSEOP_INTEGER;
653 (void) OpcSetOptimalIntegerSize (Op);
654
655 /* Op is now an integer */
656
657 UtSetParseOpName (Op);
658 }
659
660
661 /*******************************************************************************
662 *
663 * FUNCTION: OpcDoUuId
664 *
665 * PARAMETERS: Op - Parse node
666 *
667 * RETURN: None
668 *
669 * DESCRIPTION: Convert UUID string to 16-byte buffer
670 *
671 ******************************************************************************/
672
673 static void
OpcDoUuId(ACPI_PARSE_OBJECT * Op)674 OpcDoUuId (
675 ACPI_PARSE_OBJECT *Op)
676 {
677 char *InString;
678 UINT8 *Buffer;
679 ACPI_STATUS Status = AE_OK;
680 ACPI_PARSE_OBJECT *NewOp;
681
682
683 InString = ACPI_CAST_PTR (char, Op->Asl.Value.String);
684 Buffer = UtLocalCalloc (16);
685
686 Status = AuValidateUuid (InString);
687 if (ACPI_FAILURE (Status))
688 {
689 AslError (ASL_ERROR, ASL_MSG_INVALID_UUID, Op, Op->Asl.Value.String);
690 }
691 else
692 {
693 /* Convert UUID string to a buffer, check for a known UUID */
694
695 AcpiUtConvertStringToUuid (InString, Buffer);
696 if (!AcpiAhMatchUuid (Buffer))
697 {
698 AslError (ASL_REMARK, ASL_MSG_UUID_NOT_FOUND, Op, NULL);
699 }
700 }
701
702 /* Change Op to a Buffer */
703
704 Op->Asl.ParseOpcode = PARSEOP_BUFFER;
705 Op->Common.AmlOpcode = AML_BUFFER_OP;
706
707 /* Disable further optimization */
708
709 Op->Asl.CompileFlags &= ~OP_COMPILE_TIME_CONST;
710 UtSetParseOpName (Op);
711
712 /* Child node is the buffer length */
713
714 NewOp = TrAllocateOp (PARSEOP_INTEGER);
715
716 NewOp->Asl.AmlOpcode = AML_BYTE_OP;
717 NewOp->Asl.Value.Integer = 16;
718 NewOp->Asl.Parent = Op;
719
720 Op->Asl.Child = NewOp;
721 Op = NewOp;
722
723 /* Peer to the child is the raw buffer data */
724
725 NewOp = TrAllocateOp (PARSEOP_RAW_DATA);
726 NewOp->Asl.AmlOpcode = AML_RAW_DATA_BUFFER;
727 NewOp->Asl.AmlLength = 16;
728 NewOp->Asl.Value.String = ACPI_CAST_PTR (char, Buffer);
729 NewOp->Asl.Parent = Op->Asl.Parent;
730
731 Op->Asl.Next = NewOp;
732 }
733
734
735 /*******************************************************************************
736 *
737 * FUNCTION: OpcGenerateAmlOpcode
738 *
739 * PARAMETERS: Op - Parse node
740 *
741 * RETURN: None
742 *
743 * DESCRIPTION: Generate the AML opcode associated with the node and its
744 * parse (lex/flex) keyword opcode. Essentially implements
745 * a mapping between the parse opcodes and the actual AML opcodes.
746 *
747 ******************************************************************************/
748
749 void
OpcGenerateAmlOpcode(ACPI_PARSE_OBJECT * Op)750 OpcGenerateAmlOpcode (
751 ACPI_PARSE_OBJECT *Op)
752 {
753 UINT16 Index;
754
755
756 Index = (UINT16) (Op->Asl.ParseOpcode - ASL_PARSE_OPCODE_BASE);
757
758 Op->Asl.AmlOpcode = AslKeywordMapping[Index].AmlOpcode;
759 Op->Asl.AcpiBtype = AslKeywordMapping[Index].AcpiBtype;
760 Op->Asl.CompileFlags |= AslKeywordMapping[Index].Flags;
761
762 if (!Op->Asl.Value.Integer)
763 {
764 Op->Asl.Value.Integer = AslKeywordMapping[Index].Value;
765 }
766
767 /* Special handling for some opcodes */
768
769 switch (Op->Asl.ParseOpcode)
770 {
771 case PARSEOP_INTEGER:
772 /*
773 * Set the opcode based on the size of the integer
774 */
775 (void) OpcSetOptimalIntegerSize (Op);
776 break;
777
778 case PARSEOP_OFFSET:
779
780 Op->Asl.AmlOpcodeLength = 1;
781 break;
782
783 case PARSEOP_ACCESSAS:
784
785 OpcDoAccessAs (Op);
786 break;
787
788 case PARSEOP_CONNECTION:
789
790 OpcDoConnection (Op);
791 break;
792
793 case PARSEOP_EISAID:
794
795 OpcDoEisaId (Op);
796 break;
797
798 case PARSEOP_PRINTF:
799
800 OpcDoPrintf (Op);
801 break;
802
803 case PARSEOP_FPRINTF:
804
805 OpcDoFprintf (Op);
806 break;
807
808 case PARSEOP_TOPLD:
809
810 OpcDoPld (Op);
811 break;
812
813 case PARSEOP_TOUUID:
814
815 OpcDoUuId (Op);
816 break;
817
818 case PARSEOP_UNICODE:
819
820 OpcDoUnicode (Op);
821 break;
822
823 case PARSEOP_INCLUDE:
824
825 AslGbl_HasIncludeFiles = TRUE;
826 break;
827
828 case PARSEOP_TIMER:
829
830 if (AcpiGbl_IntegerBitWidth == 32)
831 {
832 AslError (ASL_REMARK, ASL_MSG_TRUNCATION, Op, NULL);
833 }
834 break;
835
836 default:
837
838 /* Nothing to do for other opcodes */
839
840 break;
841 }
842
843 return;
844 }
845