1 /******************************************************************************
3 * Module Name: asloperands - AML operand processing
5 *****************************************************************************/
7 /******************************************************************************
11 * Some or all of this work - Copyright (c) 1999 - 2018, Intel Corp.
12 * All rights reserved.
16 * 2.1. This is your license from Intel Corp. under its intellectual property
17 * rights. You may have additional license terms from the party that provided
18 * you this software, covering your right to use that party's intellectual
21 * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
22 * copy of the source code appearing in this file ("Covered Code") an
23 * irrevocable, perpetual, worldwide license under Intel's copyrights in the
24 * base code distributed originally by Intel ("Original Intel Code") to copy,
25 * make derivatives, distribute, use and display any portion of the Covered
26 * Code in any form, with the right to sublicense such rights; and
28 * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
29 * license (with the right to sublicense), under only those claims of Intel
30 * patents that are infringed by the Original Intel Code, to make, use, sell,
31 * offer to sell, and import the Covered Code and derivative works thereof
32 * solely to the minimum extent necessary to exercise the above copyright
33 * license, and in no event shall the patent license extend to any additions
34 * to or modifications of the Original Intel Code. No other license or right
35 * is granted directly or by implication, estoppel or otherwise;
37 * The above copyright and patent license is granted only if the following
42 * 3.1. Redistribution of Source with Rights to Further Distribute Source.
43 * Redistribution of source code of any substantial portion of the Covered
44 * Code or modification with rights to further distribute source must include
45 * the above Copyright Notice, the above License, this list of Conditions,
46 * and the following Disclaimer and Export Compliance provision. In addition,
47 * Licensee must cause all Covered Code to which Licensee contributes to
48 * contain a file documenting the changes Licensee made to create that Covered
49 * Code and the date of any change. Licensee must include in that file the
50 * documentation of any changes made by any predecessor Licensee. Licensee
51 * must include a prominent statement that the modification is derived,
52 * directly or indirectly, from Original Intel Code.
54 * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
55 * Redistribution of source code of any substantial portion of the Covered
56 * Code or modification without rights to further distribute source must
57 * include the following Disclaimer and Export Compliance provision in the
58 * documentation and/or other materials provided with distribution. In
59 * addition, Licensee may not authorize further sublicense of source of any
60 * portion of the Covered Code, and must include terms to the effect that the
61 * license from Licensee to its licensee is limited to the intellectual
62 * property embodied in the software Licensee provides to its licensee, and
63 * not to intellectual property embodied in modifications its licensee may
66 * 3.3. Redistribution of Executable. Redistribution in executable form of any
67 * substantial portion of the Covered Code or modification must reproduce the
68 * above Copyright Notice, and the following Disclaimer and Export Compliance
69 * provision in the documentation and/or other materials provided with the
72 * 3.4. Intel retains all right, title, and interest in and to the Original
75 * 3.5. Neither the name Intel nor any other trademark owned or controlled by
76 * Intel shall be used in advertising or otherwise to promote the sale, use or
77 * other dealings in products derived from or relating to the Covered Code
78 * without prior written authorization from Intel.
80 * 4. Disclaimer and Export Compliance
82 * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
83 * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
84 * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
85 * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
86 * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
87 * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
90 * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
91 * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
92 * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
93 * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
94 * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
95 * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
96 * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
99 * 4.3. Licensee shall not export, either directly or indirectly, any of this
100 * software or system incorporating such software without first obtaining any
101 * required license or other approval from the U. S. Department of Commerce or
102 * any other agency or department of the United States Government. In the
103 * event Licensee exports any such software from the United States or
104 * re-exports any such software from a foreign destination, Licensee shall
105 * ensure that the distribution and export/re-export of the software is in
106 * compliance with all laws, regulations, orders, or other restrictions of the
107 * U.S. Export Administration Regulations. Licensee agrees that neither it nor
108 * any of its subsidiaries will export/re-export any technical data, process,
109 * software, or service, directly or indirectly, to any country for which the
110 * United States government or any agency thereof requires an export license,
111 * other governmental approval, or letter of assurance, without first obtaining
112 * such license, approval or letter.
114 *****************************************************************************
116 * Alternatively, you may choose to be licensed under the terms of the
119 * Redistribution and use in source and binary forms, with or without
120 * modification, are permitted provided that the following conditions
122 * 1. Redistributions of source code must retain the above copyright
123 * notice, this list of conditions, and the following disclaimer,
124 * without modification.
125 * 2. Redistributions in binary form must reproduce at minimum a disclaimer
126 * substantially similar to the "NO WARRANTY" disclaimer below
127 * ("Disclaimer") and any redistribution must be conditioned upon
128 * including a substantially similar Disclaimer requirement for further
129 * binary redistribution.
130 * 3. Neither the names of the above-listed copyright holders nor the names
131 * of any contributors may be used to endorse or promote products derived
132 * from this software without specific prior written permission.
134 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
135 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
136 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
137 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
138 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
139 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
140 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
141 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
142 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
143 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
144 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
146 * Alternatively, you may choose to be licensed under the terms of the
147 * GNU General Public License ("GPL") version 2 as published by the Free
148 * Software Foundation.
150 *****************************************************************************/
152 #include "aslcompiler.h"
153 #include "aslcompiler.y.h"
156 #define _COMPONENT ACPI_COMPILER
157 ACPI_MODULE_NAME ("asloperands")
159 /* Local prototypes */
163 ACPI_PARSE_OBJECT
*Op
);
167 ACPI_PARSE_OBJECT
*Op
);
171 ACPI_PARSE_OBJECT
*Op
);
174 OpnDoDefinitionBlock (
175 ACPI_PARSE_OBJECT
*Op
);
179 ACPI_PARSE_OBJECT
*FieldOp
,
180 ACPI_PARSE_OBJECT
*Op
);
184 ACPI_PARSE_OBJECT
*Op
);
188 ACPI_PARSE_OBJECT
*Op
);
192 ACPI_PARSE_OBJECT
*Op
);
196 ACPI_PARSE_OBJECT
*Op
);
200 ACPI_PARSE_OBJECT
*Op
);
203 OpnAttachNameToNode (
204 ACPI_PARSE_OBJECT
*Op
);
207 /*******************************************************************************
209 * FUNCTION: OpnDoMutex
211 * PARAMETERS: Op - The parent parse node
215 * DESCRIPTION: Construct the operands for the MUTEX ASL keyword.
217 ******************************************************************************/
221 ACPI_PARSE_OBJECT
*Op
)
223 ACPI_PARSE_OBJECT
*Next
;
226 Next
= Op
->Asl
.Child
;
227 Next
= Next
->Asl
.Next
;
229 if (Next
->Asl
.Value
.Integer
> 15)
231 AslError (ASL_ERROR
, ASL_MSG_SYNC_LEVEL
, Next
, NULL
);
237 /*******************************************************************************
239 * FUNCTION: OpnDoMethod
241 * PARAMETERS: Op - The parent parse node
245 * DESCRIPTION: Construct the operands for the METHOD ASL keyword.
247 ******************************************************************************/
251 ACPI_PARSE_OBJECT
*Op
)
253 ACPI_PARSE_OBJECT
*Next
;
255 /* Optional arguments for this opcode with defaults */
258 UINT8 Serialized
= 0;
259 UINT8 Concurrency
= 0;
263 /* Opcode and package length first */
266 Next
= Op
->Asl
.Child
;
270 Next
= Next
->Asl
.Next
;
271 if (Next
->Asl
.ParseOpcode
!= PARSEOP_DEFAULT_ARG
)
273 NumArgs
= (UINT8
) Next
->Asl
.Value
.Integer
;
274 Next
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
277 /* Serialized Flag */
279 Next
= Next
->Asl
.Next
;
280 if (Next
->Asl
.ParseOpcode
!= PARSEOP_DEFAULT_ARG
)
282 Serialized
= (UINT8
) Next
->Asl
.Value
.Integer
;
283 Next
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
286 /* Concurrency value (valid values are 0-15) */
288 Next
= Next
->Asl
.Next
;
289 if (Next
->Asl
.ParseOpcode
!= PARSEOP_DEFAULT_ARG
)
291 /* This is a ByteConstExpr, so eval the constant now */
293 OpcAmlConstantWalk (Next
, 0, NULL
);
295 if (Next
->Asl
.Value
.Integer
> 15)
297 AslError (ASL_ERROR
, ASL_MSG_SYNC_LEVEL
, Next
, NULL
);
300 Concurrency
= (UINT8
) Next
->Asl
.Value
.Integer
;
303 /* Put the bits in their proper places */
305 MethodFlags
= (UINT8
)
307 ((Serialized
& 0x1) << 3) |
308 ((Concurrency
& 0xF) << 4));
310 /* Use the last node for the combined flags byte */
312 Next
->Asl
.Value
.Integer
= MethodFlags
;
313 Next
->Asl
.AmlOpcode
= AML_RAW_DATA_BYTE
;
314 Next
->Asl
.AmlLength
= 1;
315 Next
->Asl
.ParseOpcode
= PARSEOP_RAW_DATA
;
317 /* Save the arg count in the first node */
319 Op
->Asl
.Extra
= NumArgs
;
323 /*******************************************************************************
325 * FUNCTION: OpnDoFieldCommon
327 * PARAMETERS: FieldOp - Node for an ASL field
328 * Op - The parent parse node
332 * DESCRIPTION: Construct the AML operands for the various field keywords,
333 * FIELD, BANKFIELD, INDEXFIELD
335 ******************************************************************************/
339 ACPI_PARSE_OBJECT
*FieldOp
,
340 ACPI_PARSE_OBJECT
*Op
)
342 ACPI_PARSE_OBJECT
*Next
;
343 ACPI_PARSE_OBJECT
*PkgLengthNode
;
344 UINT32 CurrentBitOffset
;
350 UINT32 MinimumLength
;
353 /* AccessType -- not optional, so no need to check for DEFAULT_ARG */
355 AccessType
= (UINT8
) Op
->Asl
.Value
.Integer
;
356 Op
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
358 /* Set the access type in the parent (field) node for use later */
360 FieldOp
->Asl
.Value
.Integer
= AccessType
;
362 /* LockRule -- not optional, so no need to check for DEFAULT_ARG */
365 LockRule
= (UINT8
) Next
->Asl
.Value
.Integer
;
366 Next
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
368 /* UpdateRule -- not optional, so no need to check for DEFAULT_ARG */
370 Next
= Next
->Asl
.Next
;
371 UpdateRule
= (UINT8
) Next
->Asl
.Value
.Integer
;
374 * Generate the flags byte. The various fields are already
375 * in the right bit position via translation from the
376 * keywords by the parser.
378 FieldFlags
= (UINT8
) (AccessType
| LockRule
| UpdateRule
);
380 /* Use the previous node to be the FieldFlags node */
382 /* Set the node to RAW_DATA */
384 Next
->Asl
.Value
.Integer
= FieldFlags
;
385 Next
->Asl
.AmlOpcode
= AML_RAW_DATA_BYTE
;
386 Next
->Asl
.AmlLength
= 1;
387 Next
->Asl
.ParseOpcode
= PARSEOP_RAW_DATA
;
389 /* Process the FieldUnitList */
391 Next
= Next
->Asl
.Next
;
392 CurrentBitOffset
= 0;
396 /* Save the offset of this field unit */
398 Next
->Asl
.ExtraValue
= CurrentBitOffset
;
400 switch (Next
->Asl
.ParseOpcode
)
402 case PARSEOP_ACCESSAS
:
404 PkgLengthNode
= Next
->Asl
.Child
;
405 AccessType
= (UINT8
) PkgLengthNode
->Asl
.Value
.Integer
;
407 /* Nothing additional to do */
412 /* New offset into the field */
414 PkgLengthNode
= Next
->Asl
.Child
;
415 NewBitOffset
= ((UINT32
) PkgLengthNode
->Asl
.Value
.Integer
) * 8;
418 * Examine the specified offset in relation to the
419 * current offset counter.
421 if (NewBitOffset
< CurrentBitOffset
)
424 * Not allowed to specify a backwards offset!
425 * Issue error and ignore this node.
427 AslError (ASL_ERROR
, ASL_MSG_BACKWARDS_OFFSET
, PkgLengthNode
,
429 Next
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
430 PkgLengthNode
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
432 else if ((NewBitOffset
== CurrentBitOffset
) && Gbl_OptimizeTrivialParseNodes
)
435 * Offset is redundant; we don't need to output an
436 * offset opcode. Just set these nodes to default
438 Next
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
439 PkgLengthNode
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
444 * Valid new offset - set the value to be inserted into the AML
445 * and update the offset counter.
447 PkgLengthNode
->Asl
.Value
.Integer
=
448 NewBitOffset
- CurrentBitOffset
;
449 CurrentBitOffset
= NewBitOffset
;
453 case PARSEOP_NAMESEG
:
454 case PARSEOP_RESERVED_BYTES
:
456 /* Named or reserved field entry */
458 PkgLengthNode
= Next
->Asl
.Child
;
459 NewBitOffset
= (UINT32
) PkgLengthNode
->Asl
.Value
.Integer
;
460 CurrentBitOffset
+= NewBitOffset
;
462 if ((NewBitOffset
== 0) &&
463 (Next
->Asl
.ParseOpcode
== PARSEOP_RESERVED_BYTES
) &&
464 Gbl_OptimizeTrivialParseNodes
)
467 * Unnamed field with a bit length of zero. We can
468 * safely just ignore this. However, we will not ignore
469 * a named field of zero length, we don't want to just
472 Next
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
473 PkgLengthNode
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
477 /* Save the current AccessAs value for error checking later */
481 case AML_FIELD_ACCESS_ANY
:
482 case AML_FIELD_ACCESS_BYTE
:
483 case AML_FIELD_ACCESS_BUFFER
:
489 case AML_FIELD_ACCESS_WORD
:
493 case AML_FIELD_ACCESS_DWORD
:
497 case AML_FIELD_ACCESS_QWORD
:
502 PkgLengthNode
->Asl
.ExtraValue
= MinimumLength
;
507 /* All supported field opcodes must appear above */
512 /* Move on to next entry in the field list */
514 Next
= Next
->Asl
.Next
;
519 /*******************************************************************************
521 * FUNCTION: OpnDoField
523 * PARAMETERS: Op - The parent parse node
527 * DESCRIPTION: Construct the AML operands for the FIELD ASL keyword
529 ******************************************************************************/
533 ACPI_PARSE_OBJECT
*Op
)
535 ACPI_PARSE_OBJECT
*Next
;
538 /* Opcode is parent node */
539 /* First child is field name */
541 Next
= Op
->Asl
.Child
;
543 /* Second child is the AccessType */
545 OpnDoFieldCommon (Op
, Next
->Asl
.Next
);
549 /*******************************************************************************
551 * FUNCTION: OpnDoIndexField
553 * PARAMETERS: Op - The parent parse node
557 * DESCRIPTION: Construct the AML operands for the INDEXFIELD ASL keyword
559 ******************************************************************************/
563 ACPI_PARSE_OBJECT
*Op
)
565 ACPI_PARSE_OBJECT
*Next
;
568 /* Opcode is parent node */
569 /* First child is the index name */
571 Next
= Op
->Asl
.Child
;
573 /* Second child is the data name */
575 Next
= Next
->Asl
.Next
;
577 /* Third child is the AccessType */
579 OpnDoFieldCommon (Op
, Next
->Asl
.Next
);
583 /*******************************************************************************
585 * FUNCTION: OpnDoBankField
587 * PARAMETERS: Op - The parent parse node
591 * DESCRIPTION: Construct the AML operands for the BANKFIELD ASL keyword
593 ******************************************************************************/
597 ACPI_PARSE_OBJECT
*Op
)
599 ACPI_PARSE_OBJECT
*Next
;
602 /* Opcode is parent node */
603 /* First child is the region name */
605 Next
= Op
->Asl
.Child
;
607 /* Second child is the bank name */
609 Next
= Next
->Asl
.Next
;
611 /* Third child is the bank value */
613 Next
= Next
->Asl
.Next
;
615 /* Fourth child is the AccessType */
617 OpnDoFieldCommon (Op
, Next
->Asl
.Next
);
621 /*******************************************************************************
623 * FUNCTION: OpnDoRegion
625 * PARAMETERS: Op - The parent parse node
629 * DESCRIPTION: Tries to get the length of the region. Can only do this at
630 * compile time if the length is a constant.
632 ******************************************************************************/
636 ACPI_PARSE_OBJECT
*Op
)
638 ACPI_PARSE_OBJECT
*Next
;
641 /* Opcode is parent node */
642 /* First child is the region name */
644 Next
= Op
->Asl
.Child
;
646 /* Second child is the space ID*/
648 Next
= Next
->Asl
.Next
;
650 /* Third child is the region offset */
652 Next
= Next
->Asl
.Next
;
654 /* Fourth child is the region length */
656 Next
= Next
->Asl
.Next
;
657 if (Next
->Asl
.ParseOpcode
== PARSEOP_INTEGER
)
659 Op
->Asl
.Value
.Integer
= Next
->Asl
.Value
.Integer
;
663 Op
->Asl
.Value
.Integer
= ACPI_UINT64_MAX
;
668 /*******************************************************************************
670 * FUNCTION: OpnDoBuffer
672 * PARAMETERS: Op - The parent parse node
676 * DESCRIPTION: Construct the AML operands for the BUFFER ASL keyword. We
677 * build a single raw byte buffer from the initialization nodes,
678 * each parse node contains a buffer byte.
680 ******************************************************************************/
684 ACPI_PARSE_OBJECT
*Op
)
686 ACPI_PARSE_OBJECT
*InitializerOp
;
687 ACPI_PARSE_OBJECT
*BufferLengthOp
;
689 /* Optional arguments for this opcode with defaults */
691 UINT32 BufferLength
= 0;
694 /* Opcode and package length first */
695 /* Buffer Length is next, followed by the initializer list */
697 BufferLengthOp
= Op
->Asl
.Child
;
698 InitializerOp
= BufferLengthOp
->Asl
.Next
;
701 * If the BufferLength is not an INTEGER or was not specified in the ASL
702 * (DEFAULT_ARG), it is a TermArg that is
703 * evaluated at run-time, and we are therefore finished.
705 if ((BufferLengthOp
->Asl
.ParseOpcode
!= PARSEOP_INTEGER
) &&
706 (BufferLengthOp
->Asl
.ParseOpcode
!= PARSEOP_DEFAULT_ARG
))
712 * We want to count the number of items in the initializer list, because if
713 * it is larger than the buffer length, we will define the buffer size
714 * to be the size of the initializer list (as per the ACPI Specification)
716 switch (InitializerOp
->Asl
.ParseOpcode
)
718 case PARSEOP_INTEGER
:
719 case PARSEOP_BYTECONST
:
720 case PARSEOP_WORDCONST
:
721 case PARSEOP_DWORDCONST
:
723 /* The peer list contains the byte list (if any...) */
725 while (InitializerOp
)
727 /* For buffers, this is a list of raw bytes */
729 InitializerOp
->Asl
.AmlOpcode
= AML_RAW_DATA_BYTE
;
730 InitializerOp
->Asl
.AmlLength
= 1;
731 InitializerOp
->Asl
.ParseOpcode
= PARSEOP_RAW_DATA
;
734 InitializerOp
= ASL_GET_PEER_NODE (InitializerOp
);
738 case PARSEOP_STRING_LITERAL
:
741 * Only one initializer, the string. Buffer must be big enough to hold
742 * the string plus the null termination byte
744 BufferLength
= strlen (InitializerOp
->Asl
.Value
.String
) + 1;
746 InitializerOp
->Asl
.AmlOpcode
= AML_RAW_DATA_BUFFER
;
747 InitializerOp
->Asl
.AmlLength
= BufferLength
;
748 InitializerOp
->Asl
.ParseOpcode
= PARSEOP_RAW_DATA
;
751 case PARSEOP_RAW_DATA
:
753 /* Buffer nodes are already initialized (e.g. Unicode operator) */
756 case PARSEOP_DEFAULT_ARG
:
761 AslError (ASL_ERROR
, ASL_MSG_INVALID_OPERAND
, InitializerOp
,
762 "Unknown buffer initializer opcode");
763 printf ("Unknown buffer initializer opcode [%s]\n",
764 UtGetOpName (InitializerOp
->Asl
.ParseOpcode
));
768 /* Check if initializer list is longer than the buffer length */
770 if (BufferLengthOp
->Asl
.Value
.Integer
> BufferLength
)
772 BufferLength
= (UINT32
) BufferLengthOp
->Asl
.Value
.Integer
;
777 /* No length AND no items -- issue notice */
779 AslError (ASL_REMARK
, ASL_MSG_BUFFER_LENGTH
, BufferLengthOp
, NULL
);
781 /* But go ahead and put the buffer length of zero into the AML */
785 * Just set the buffer size node to be the buffer length, regardless
786 * of whether it was previously an integer or a default_arg placeholder
788 BufferLengthOp
->Asl
.ParseOpcode
= PARSEOP_INTEGER
;
789 BufferLengthOp
->Asl
.AmlOpcode
= AML_DWORD_OP
;
790 BufferLengthOp
->Asl
.Value
.Integer
= BufferLength
;
792 (void) OpcSetOptimalIntegerSize (BufferLengthOp
);
794 /* Remaining nodes are handled via the tree walk */
798 /*******************************************************************************
800 * FUNCTION: OpnDoPackage
802 * PARAMETERS: Op - The parent parse node
806 * DESCRIPTION: Construct the AML operands for the PACKAGE ASL keyword. NOTE:
807 * can only be called after constants have been folded, to ensure
808 * that the PackageLength operand has been fully reduced.
810 ******************************************************************************/
814 ACPI_PARSE_OBJECT
*Op
)
816 ACPI_PARSE_OBJECT
*InitializerOp
;
817 ACPI_PARSE_OBJECT
*PackageLengthOp
;
818 UINT32 PackageLength
= 0;
821 /* Opcode and package length first, followed by the initializer list */
823 PackageLengthOp
= Op
->Asl
.Child
;
824 InitializerOp
= PackageLengthOp
->Asl
.Next
;
826 /* Count the number of items in the initializer list */
828 if (InitializerOp
->Asl
.ParseOpcode
!= PARSEOP_DEFAULT_ARG
)
830 /* The peer list contains the byte list (if any...) */
832 while (InitializerOp
)
835 InitializerOp
= InitializerOp
->Asl
.Next
;
839 /* If package length is a constant, compare to the initializer list */
841 if ((PackageLengthOp
->Asl
.ParseOpcode
== PARSEOP_INTEGER
) ||
842 (PackageLengthOp
->Asl
.ParseOpcode
== PARSEOP_QWORDCONST
))
844 if (PackageLengthOp
->Asl
.Value
.Integer
> PackageLength
)
847 * Allow package length to be longer than the initializer
848 * list -- but if the length of initializer list is nonzero,
849 * issue a message since this is probably a coding error,
850 * even though technically legal.
852 if (PackageLength
> 0)
854 AslError (ASL_REMARK
, ASL_MSG_LIST_LENGTH_SHORT
,
855 PackageLengthOp
, NULL
);
858 PackageLength
= (UINT32
) PackageLengthOp
->Asl
.Value
.Integer
;
860 else if (PackageLengthOp
->Asl
.Value
.Integer
< PackageLength
)
863 * The package length is smaller than the length of the
864 * initializer list. This is an error as per the ACPI spec.
866 AslError (ASL_ERROR
, ASL_MSG_LIST_LENGTH_LONG
,
867 PackageLengthOp
, NULL
);
871 if (PackageLengthOp
->Asl
.ParseOpcode
== PARSEOP_DEFAULT_ARG
)
874 * This is the case if the PackageLength was left empty - Package()
875 * The package length becomes the length of the initializer list
877 Op
->Asl
.Child
->Asl
.ParseOpcode
= PARSEOP_INTEGER
;
878 Op
->Asl
.Child
->Asl
.Value
.Integer
= PackageLength
;
880 /* Set the AML opcode */
882 (void) OpcSetOptimalIntegerSize (Op
->Asl
.Child
);
885 /* If not a variable-length package, check for a zero package length */
887 if ((PackageLengthOp
->Asl
.ParseOpcode
== PARSEOP_INTEGER
) ||
888 (PackageLengthOp
->Asl
.ParseOpcode
== PARSEOP_QWORDCONST
) ||
889 (PackageLengthOp
->Asl
.ParseOpcode
== PARSEOP_ZERO
) ||
890 (PackageLengthOp
->Asl
.ParseOpcode
== PARSEOP_DEFAULT_ARG
))
894 /* No length AND no initializer list -- issue a remark */
896 AslError (ASL_REMARK
, ASL_MSG_PACKAGE_LENGTH
,
897 PackageLengthOp
, NULL
);
899 /* But go ahead and put the buffer length of zero into the AML */
904 * If the PackageLength is a constant <= 255, we can change the
905 * AML opcode from VarPackage to a simple (ACPI 1.0) Package opcode.
907 if (((Op
->Asl
.Child
->Asl
.ParseOpcode
== PARSEOP_INTEGER
) &&
908 (Op
->Asl
.Child
->Asl
.Value
.Integer
<= 255)) ||
909 (Op
->Asl
.Child
->Asl
.ParseOpcode
== PARSEOP_ONE
) ||
910 (Op
->Asl
.Child
->Asl
.ParseOpcode
== PARSEOP_ONES
)||
911 (Op
->Asl
.Child
->Asl
.ParseOpcode
== PARSEOP_ZERO
))
913 Op
->Asl
.AmlOpcode
= AML_PACKAGE_OP
;
914 Op
->Asl
.ParseOpcode
= PARSEOP_PACKAGE
;
917 * Just set the package size node to be the package length, regardless
918 * of whether it was previously an integer or a default_arg placeholder
920 PackageLengthOp
->Asl
.AmlOpcode
= AML_RAW_DATA_BYTE
;
921 PackageLengthOp
->Asl
.AmlLength
= 1;
922 PackageLengthOp
->Asl
.ParseOpcode
= PARSEOP_RAW_DATA
;
923 PackageLengthOp
->Asl
.Value
.Integer
= PackageLength
;
926 /* Remaining nodes are handled via the tree walk */
930 /*******************************************************************************
932 * FUNCTION: OpnDoLoadTable
934 * PARAMETERS: Op - The parent parse node
938 * DESCRIPTION: Construct the AML operands for the LOADTABLE ASL keyword.
940 ******************************************************************************/
944 ACPI_PARSE_OBJECT
*Op
)
946 ACPI_PARSE_OBJECT
*Next
;
949 /* Opcode is parent node */
950 /* First child is the table signature */
952 Next
= Op
->Asl
.Child
;
954 /* Second child is the OEM ID*/
956 Next
= Next
->Asl
.Next
;
958 /* Third child is the OEM table ID */
960 Next
= Next
->Asl
.Next
;
962 /* Fourth child is the RootPath string */
964 Next
= Next
->Asl
.Next
;
965 if (Next
->Asl
.ParseOpcode
== PARSEOP_ZERO
)
967 Next
->Asl
.ParseOpcode
= PARSEOP_STRING_LITERAL
;
968 Next
->Asl
.Value
.String
= "\\";
969 Next
->Asl
.AmlLength
= 2;
970 OpcGenerateAmlOpcode (Next
);
973 #ifdef ASL_FUTURE_IMPLEMENTATION
975 /* TBD: NOT IMPLEMENTED */
976 /* Fifth child is the [optional] ParameterPathString */
977 /* Sixth child is the [optional] ParameterData */
979 Next
= Next
->Asl
.Next
;
980 if (Next
->Asl
.ParseOpcode
== DEFAULT_ARG
)
982 Next
->Asl
.AmlLength
= 1;
983 Next
->Asl
.ParseOpcode
= ZERO
;
984 OpcGenerateAmlOpcode (Next
);
988 Next
= Next
->Asl
.Next
;
989 if (Next
->Asl
.ParseOpcode
== DEFAULT_ARG
)
991 Next
->Asl
.AmlLength
= 1;
992 Next
->Asl
.ParseOpcode
= ZERO
;
993 OpcGenerateAmlOpcode (Next
);
999 /*******************************************************************************
1001 * FUNCTION: OpnDoDefinitionBlock
1003 * PARAMETERS: Op - The parent parse node
1007 * DESCRIPTION: Construct the AML operands for the DEFINITIONBLOCK ASL keyword
1009 ******************************************************************************/
1012 OpnDoDefinitionBlock (
1013 ACPI_PARSE_OBJECT
*Op
)
1015 ACPI_PARSE_OBJECT
*Child
;
1022 * These nodes get stuffed into the table header. They are special
1023 * cased when the table is written to the output file.
1025 * Mark all of these nodes as non-usable so they won't get output
1029 /* Get AML filename. Use it if non-null */
1031 Child
= Op
->Asl
.Child
;
1032 if (Child
->Asl
.Value
.Buffer
&&
1033 *Child
->Asl
.Value
.Buffer
&&
1034 (Gbl_UseDefaultAmlFilename
))
1037 * We will use the AML filename that is embedded in the source file
1038 * for the output filename.
1040 Filename
= UtLocalCacheCalloc (strlen (Gbl_DirectoryPath
) +
1041 strlen ((char *) Child
->Asl
.Value
.Buffer
) + 1);
1043 /* Prepend the current directory path */
1045 strcpy (Filename
, Gbl_DirectoryPath
);
1046 strcat (Filename
, (char *) Child
->Asl
.Value
.Buffer
);
1048 Gbl_OutputFilenamePrefix
= Filename
;
1049 UtConvertBackslashes (Gbl_OutputFilenamePrefix
);
1052 Child
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
1056 Child
= Child
->Asl
.Next
;
1057 Child
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
1058 if (Child
->Asl
.Value
.String
)
1060 Gbl_TableSignature
= Child
->Asl
.Value
.String
;
1061 if (strlen (Gbl_TableSignature
) != ACPI_NAME_SIZE
)
1063 AslError (ASL_ERROR
, ASL_MSG_TABLE_SIGNATURE
, Child
,
1064 "Length must be exactly 4 characters");
1067 for (i
= 0; i
< ACPI_NAME_SIZE
; i
++)
1069 if (!isalnum ((int) Gbl_TableSignature
[i
]))
1071 AslError (ASL_ERROR
, ASL_MSG_TABLE_SIGNATURE
, Child
,
1072 "Contains non-alphanumeric characters");
1079 Child
= Child
->Asl
.Next
;
1080 Child
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
1083 * We used the revision to set the integer width earlier
1088 Child
= Child
->Asl
.Next
;
1089 Child
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
1090 if (Child
->Asl
.Value
.String
&&
1091 strlen (Child
->Asl
.Value
.String
) > ACPI_OEM_ID_SIZE
)
1093 AslError (ASL_ERROR
, ASL_MSG_OEM_ID
, Child
,
1094 "Length cannot exceed 6 characters");
1099 Child
= Child
->Asl
.Next
;
1100 Child
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
1101 if (Child
->Asl
.Value
.String
)
1103 Length
= strlen (Child
->Asl
.Value
.String
);
1104 if (Length
> ACPI_OEM_TABLE_ID_SIZE
)
1106 AslError (ASL_ERROR
, ASL_MSG_OEM_TABLE_ID
, Child
,
1107 "Length cannot exceed 8 characters");
1110 Gbl_TableId
= UtLocalCacheCalloc (Length
+ 1);
1111 strcpy (Gbl_TableId
, Child
->Asl
.Value
.String
);
1114 * Convert anything non-alphanumeric to an underscore. This
1115 * allows us to use the TableID to generate unique C symbols.
1117 for (i
= 0; i
< Length
; i
++)
1119 if (!isalnum ((int) Gbl_TableId
[i
]))
1121 Gbl_TableId
[i
] = '_';
1128 Child
= Child
->Asl
.Next
;
1129 Child
->Asl
.ParseOpcode
= PARSEOP_DEFAULT_ARG
;
1133 /*******************************************************************************
1135 * FUNCTION: UtGetArg
1137 * PARAMETERS: Op - Get an argument for this op
1138 * Argn - Nth argument to get
1140 * RETURN: The argument (as an Op object). NULL if argument does not exist
1142 * DESCRIPTION: Get the specified op's argument (peer)
1144 ******************************************************************************/
1148 ACPI_PARSE_OBJECT
*Op
,
1151 ACPI_PARSE_OBJECT
*Arg
= NULL
;
1154 /* Get the requested argument object */
1156 Arg
= Op
->Asl
.Child
;
1160 Arg
= Arg
->Asl
.Next
;
1167 /*******************************************************************************
1169 * FUNCTION: OpnAttachNameToNode
1171 * PARAMETERS: Op - The parent parse node
1175 * DESCRIPTION: For the named ASL/AML operators, get the actual name from the
1176 * argument list and attach it to the parent node so that we
1177 * can get to it quickly later.
1179 ******************************************************************************/
1182 OpnAttachNameToNode (
1183 ACPI_PARSE_OBJECT
*Op
)
1185 ACPI_PARSE_OBJECT
*Child
= NULL
;
1188 switch (Op
->Asl
.AmlOpcode
)
1190 case AML_DATA_REGION_OP
:
1193 case AML_EXTERNAL_OP
:
1197 case AML_POWER_RESOURCE_OP
:
1198 case AML_PROCESSOR_OP
:
1199 case AML_THERMAL_ZONE_OP
:
1203 Child
= UtGetArg (Op
, 0);
1208 Child
= UtGetArg (Op
, 1);
1211 case AML_CREATE_BIT_FIELD_OP
:
1212 case AML_CREATE_BYTE_FIELD_OP
:
1213 case AML_CREATE_WORD_FIELD_OP
:
1214 case AML_CREATE_DWORD_FIELD_OP
:
1215 case AML_CREATE_QWORD_FIELD_OP
:
1217 Child
= UtGetArg (Op
, 2);
1220 case AML_CREATE_FIELD_OP
:
1222 Child
= UtGetArg (Op
, 3);
1225 case AML_BANK_FIELD_OP
:
1226 case AML_INDEX_FIELD_OP
:
1238 UtAttachNamepathToOwner (Op
, Child
);
1243 /*******************************************************************************
1245 * FUNCTION: OpnGenerateAmlOperands
1247 * PARAMETERS: Op - The parent parse node
1251 * DESCRIPTION: Prepare nodes to be output as AML data and operands. The more
1252 * complex AML opcodes require processing of the child nodes
1253 * (arguments/operands).
1255 ******************************************************************************/
1258 OpnGenerateAmlOperands (
1259 ACPI_PARSE_OBJECT
*Op
)
1263 if (Op
->Asl
.AmlOpcode
== AML_RAW_DATA_BYTE
)
1268 switch (Op
->Asl
.ParseOpcode
)
1270 case PARSEOP_DEFINITION_BLOCK
:
1272 OpnDoDefinitionBlock (Op
);
1275 case PARSEOP_METHOD
:
1290 case PARSEOP_INDEXFIELD
:
1292 OpnDoIndexField (Op
);
1295 case PARSEOP_BANKFIELD
:
1297 OpnDoBankField (Op
);
1300 case PARSEOP_BUFFER
:
1305 case PARSEOP_LOADTABLE
:
1307 OpnDoLoadTable (Op
);
1310 case PARSEOP_OPERATIONREGION
:
1315 case PARSEOP_RESOURCETEMPLATE
:
1317 RsDoResourceTemplate (Op
);
1320 case PARSEOP_NAMESEG
:
1321 case PARSEOP_NAMESTRING
:
1322 case PARSEOP_METHODCALL
:
1323 case PARSEOP_STRING_LITERAL
:
1331 OpnAttachNameToNode (Op
);