1 /******************************************************************************
3 * Module Name: asloperands - AML operand processing
5 *****************************************************************************/
8 * Copyright (C) 2000 - 2016, Intel Corp.
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
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.
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.
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 MERCHANTIBILITY 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.
44 #include <contrib/dev/acpica/compiler/aslcompiler.h>
45 #include "aslcompiler.y.h"
46 #include <contrib/dev/acpica/include/amlcode.h>
48 #define _COMPONENT ACPI_COMPILER
49 ACPI_MODULE_NAME ("asloperands")
51 /* Local prototypes */
55 ACPI_PARSE_OBJECT *Op);
59 ACPI_PARSE_OBJECT *Op);
63 ACPI_PARSE_OBJECT *Op);
66 OpnDoDefinitionBlock (
67 ACPI_PARSE_OBJECT *Op);
71 ACPI_PARSE_OBJECT *FieldOp,
72 ACPI_PARSE_OBJECT *Op);
76 ACPI_PARSE_OBJECT *Op);
80 ACPI_PARSE_OBJECT *Op);
84 ACPI_PARSE_OBJECT *Op);
88 ACPI_PARSE_OBJECT *Op);
92 ACPI_PARSE_OBJECT *Op);
96 ACPI_PARSE_OBJECT *Op);
99 /*******************************************************************************
101 * FUNCTION: OpnDoMutex
103 * PARAMETERS: Op - The parent parse node
107 * DESCRIPTION: Construct the operands for the MUTEX ASL keyword.
109 ******************************************************************************/
113 ACPI_PARSE_OBJECT *Op)
115 ACPI_PARSE_OBJECT *Next;
118 Next = Op->Asl.Child;
119 Next = Next->Asl.Next;
121 if (Next->Asl.Value.Integer > 15)
123 AslError (ASL_ERROR, ASL_MSG_SYNC_LEVEL, Next, NULL);
129 /*******************************************************************************
131 * FUNCTION: OpnDoMethod
133 * PARAMETERS: Op - The parent parse node
137 * DESCRIPTION: Construct the operands for the METHOD ASL keyword.
139 ******************************************************************************/
143 ACPI_PARSE_OBJECT *Op)
145 ACPI_PARSE_OBJECT *Next;
147 /* Optional arguments for this opcode with defaults */
150 UINT8 Serialized = 0;
151 UINT8 Concurrency = 0;
155 /* Opcode and package length first */
158 Next = Op->Asl.Child;
162 Next = Next->Asl.Next;
163 if (Next->Asl.ParseOpcode != PARSEOP_DEFAULT_ARG)
165 NumArgs = (UINT8) Next->Asl.Value.Integer;
166 Next->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
169 /* Serialized Flag */
171 Next = Next->Asl.Next;
172 if (Next->Asl.ParseOpcode != PARSEOP_DEFAULT_ARG)
174 Serialized = (UINT8) Next->Asl.Value.Integer;
175 Next->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
178 /* Concurrency value (valid values are 0-15) */
180 Next = Next->Asl.Next;
181 if (Next->Asl.ParseOpcode != PARSEOP_DEFAULT_ARG)
183 /* This is a ByteConstExpr, so eval the constant now */
185 OpcAmlConstantWalk (Next, 0, NULL);
187 if (Next->Asl.Value.Integer > 15)
189 AslError (ASL_ERROR, ASL_MSG_SYNC_LEVEL, Next, NULL);
192 Concurrency = (UINT8) Next->Asl.Value.Integer;
195 /* Put the bits in their proper places */
197 MethodFlags = (UINT8)
199 ((Serialized & 0x1) << 3) |
200 ((Concurrency & 0xF) << 4));
202 /* Use the last node for the combined flags byte */
204 Next->Asl.Value.Integer = MethodFlags;
205 Next->Asl.AmlOpcode = AML_RAW_DATA_BYTE;
206 Next->Asl.AmlLength = 1;
207 Next->Asl.ParseOpcode = PARSEOP_RAW_DATA;
209 /* Save the arg count in the first node */
211 Op->Asl.Extra = NumArgs;
215 /*******************************************************************************
217 * FUNCTION: OpnDoFieldCommon
219 * PARAMETERS: FieldOp - Node for an ASL field
220 * Op - The parent parse node
224 * DESCRIPTION: Construct the AML operands for the various field keywords,
225 * FIELD, BANKFIELD, INDEXFIELD
227 ******************************************************************************/
231 ACPI_PARSE_OBJECT *FieldOp,
232 ACPI_PARSE_OBJECT *Op)
234 ACPI_PARSE_OBJECT *Next;
235 ACPI_PARSE_OBJECT *PkgLengthNode;
236 UINT32 CurrentBitOffset;
242 UINT32 MinimumLength;
245 /* AccessType -- not optional, so no need to check for DEFAULT_ARG */
247 AccessType = (UINT8) Op->Asl.Value.Integer;
248 Op->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
250 /* Set the access type in the parent (field) node for use later */
252 FieldOp->Asl.Value.Integer = AccessType;
254 /* LockRule -- not optional, so no need to check for DEFAULT_ARG */
257 LockRule = (UINT8) Next->Asl.Value.Integer;
258 Next->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
260 /* UpdateRule -- not optional, so no need to check for DEFAULT_ARG */
262 Next = Next->Asl.Next;
263 UpdateRule = (UINT8) Next->Asl.Value.Integer;
266 * Generate the flags byte. The various fields are already
267 * in the right bit position via translation from the
268 * keywords by the parser.
270 FieldFlags = (UINT8) (AccessType | LockRule | UpdateRule);
272 /* Use the previous node to be the FieldFlags node */
274 /* Set the node to RAW_DATA */
276 Next->Asl.Value.Integer = FieldFlags;
277 Next->Asl.AmlOpcode = AML_RAW_DATA_BYTE;
278 Next->Asl.AmlLength = 1;
279 Next->Asl.ParseOpcode = PARSEOP_RAW_DATA;
281 /* Process the FieldUnitList */
283 Next = Next->Asl.Next;
284 CurrentBitOffset = 0;
288 /* Save the offset of this field unit */
290 Next->Asl.ExtraValue = CurrentBitOffset;
292 switch (Next->Asl.ParseOpcode)
294 case PARSEOP_ACCESSAS:
296 PkgLengthNode = Next->Asl.Child;
297 AccessType = (UINT8) PkgLengthNode->Asl.Value.Integer;
299 /* Nothing additional to do */
304 /* New offset into the field */
306 PkgLengthNode = Next->Asl.Child;
307 NewBitOffset = ((UINT32) PkgLengthNode->Asl.Value.Integer) * 8;
310 * Examine the specified offset in relation to the
311 * current offset counter.
313 if (NewBitOffset < CurrentBitOffset)
316 * Not allowed to specify a backwards offset!
317 * Issue error and ignore this node.
319 AslError (ASL_ERROR, ASL_MSG_BACKWARDS_OFFSET, PkgLengthNode,
321 Next->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
322 PkgLengthNode->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
324 else if (NewBitOffset == CurrentBitOffset)
327 * Offset is redundant; we don't need to output an
328 * offset opcode. Just set these nodes to default
330 Next->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
331 PkgLengthNode->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
336 * Valid new offset - set the value to be inserted into the AML
337 * and update the offset counter.
339 PkgLengthNode->Asl.Value.Integer =
340 NewBitOffset - CurrentBitOffset;
341 CurrentBitOffset = NewBitOffset;
345 case PARSEOP_NAMESEG:
346 case PARSEOP_RESERVED_BYTES:
348 /* Named or reserved field entry */
350 PkgLengthNode = Next->Asl.Child;
351 NewBitOffset = (UINT32) PkgLengthNode->Asl.Value.Integer;
352 CurrentBitOffset += NewBitOffset;
354 if ((NewBitOffset == 0) &&
355 (Next->Asl.ParseOpcode == PARSEOP_RESERVED_BYTES))
358 * Unnamed field with a bit length of zero. We can
359 * safely just ignore this. However, we will not ignore
360 * a named field of zero length, we don't want to just
363 Next->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
364 PkgLengthNode->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
368 /* Save the current AccessAs value for error checking later */
372 case AML_FIELD_ACCESS_ANY:
373 case AML_FIELD_ACCESS_BYTE:
374 case AML_FIELD_ACCESS_BUFFER:
380 case AML_FIELD_ACCESS_WORD:
384 case AML_FIELD_ACCESS_DWORD:
388 case AML_FIELD_ACCESS_QWORD:
393 PkgLengthNode->Asl.ExtraValue = MinimumLength;
398 /* All supported field opcodes must appear above */
403 /* Move on to next entry in the field list */
405 Next = Next->Asl.Next;
410 /*******************************************************************************
412 * FUNCTION: OpnDoField
414 * PARAMETERS: Op - The parent parse node
418 * DESCRIPTION: Construct the AML operands for the FIELD ASL keyword
420 ******************************************************************************/
424 ACPI_PARSE_OBJECT *Op)
426 ACPI_PARSE_OBJECT *Next;
429 /* Opcode is parent node */
430 /* First child is field name */
432 Next = Op->Asl.Child;
434 /* Second child is the AccessType */
436 OpnDoFieldCommon (Op, Next->Asl.Next);
440 /*******************************************************************************
442 * FUNCTION: OpnDoIndexField
444 * PARAMETERS: Op - The parent parse node
448 * DESCRIPTION: Construct the AML operands for the INDEXFIELD ASL keyword
450 ******************************************************************************/
454 ACPI_PARSE_OBJECT *Op)
456 ACPI_PARSE_OBJECT *Next;
459 /* Opcode is parent node */
460 /* First child is the index name */
462 Next = Op->Asl.Child;
464 /* Second child is the data name */
466 Next = Next->Asl.Next;
468 /* Third child is the AccessType */
470 OpnDoFieldCommon (Op, Next->Asl.Next);
474 /*******************************************************************************
476 * FUNCTION: OpnDoBankField
478 * PARAMETERS: Op - The parent parse node
482 * DESCRIPTION: Construct the AML operands for the BANKFIELD ASL keyword
484 ******************************************************************************/
488 ACPI_PARSE_OBJECT *Op)
490 ACPI_PARSE_OBJECT *Next;
493 /* Opcode is parent node */
494 /* First child is the region name */
496 Next = Op->Asl.Child;
498 /* Second child is the bank name */
500 Next = Next->Asl.Next;
502 /* Third child is the bank value */
504 Next = Next->Asl.Next;
506 /* Fourth child is the AccessType */
508 OpnDoFieldCommon (Op, Next->Asl.Next);
512 /*******************************************************************************
514 * FUNCTION: OpnDoRegion
516 * PARAMETERS: Op - The parent parse node
520 * DESCRIPTION: Tries to get the length of the region. Can only do this at
521 * compile time if the length is a constant.
523 ******************************************************************************/
527 ACPI_PARSE_OBJECT *Op)
529 ACPI_PARSE_OBJECT *Next;
532 /* Opcode is parent node */
533 /* First child is the region name */
535 Next = Op->Asl.Child;
537 /* Second child is the space ID*/
539 Next = Next->Asl.Next;
541 /* Third child is the region offset */
543 Next = Next->Asl.Next;
545 /* Fourth child is the region length */
547 Next = Next->Asl.Next;
548 if (Next->Asl.ParseOpcode == PARSEOP_INTEGER)
550 Op->Asl.Value.Integer = Next->Asl.Value.Integer;
554 Op->Asl.Value.Integer = ACPI_UINT64_MAX;
559 /*******************************************************************************
561 * FUNCTION: OpnDoBuffer
563 * PARAMETERS: Op - The parent parse node
567 * DESCRIPTION: Construct the AML operands for the BUFFER ASL keyword. We
568 * build a single raw byte buffer from the initialization nodes,
569 * each parse node contains a buffer byte.
571 ******************************************************************************/
575 ACPI_PARSE_OBJECT *Op)
577 ACPI_PARSE_OBJECT *InitializerOp;
578 ACPI_PARSE_OBJECT *BufferLengthOp;
580 /* Optional arguments for this opcode with defaults */
582 UINT32 BufferLength = 0;
585 /* Opcode and package length first */
586 /* Buffer Length is next, followed by the initializer list */
588 BufferLengthOp = Op->Asl.Child;
589 InitializerOp = BufferLengthOp->Asl.Next;
592 * If the BufferLength is not an INTEGER or was not specified in the ASL
593 * (DEFAULT_ARG), it is a TermArg that is
594 * evaluated at run-time, and we are therefore finished.
596 if ((BufferLengthOp->Asl.ParseOpcode != PARSEOP_INTEGER) &&
597 (BufferLengthOp->Asl.ParseOpcode != PARSEOP_DEFAULT_ARG))
603 * We want to count the number of items in the initializer list, because if
604 * it is larger than the buffer length, we will define the buffer size
605 * to be the size of the initializer list (as per the ACPI Specification)
607 switch (InitializerOp->Asl.ParseOpcode)
609 case PARSEOP_INTEGER:
610 case PARSEOP_BYTECONST:
611 case PARSEOP_WORDCONST:
612 case PARSEOP_DWORDCONST:
614 /* The peer list contains the byte list (if any...) */
616 while (InitializerOp)
618 /* For buffers, this is a list of raw bytes */
620 InitializerOp->Asl.AmlOpcode = AML_RAW_DATA_BYTE;
621 InitializerOp->Asl.AmlLength = 1;
622 InitializerOp->Asl.ParseOpcode = PARSEOP_RAW_DATA;
625 InitializerOp = ASL_GET_PEER_NODE (InitializerOp);
629 case PARSEOP_STRING_LITERAL:
632 * Only one initializer, the string. Buffer must be big enough to hold
633 * the string plus the null termination byte
635 BufferLength = strlen (InitializerOp->Asl.Value.String) + 1;
637 InitializerOp->Asl.AmlOpcode = AML_RAW_DATA_BUFFER;
638 InitializerOp->Asl.AmlLength = BufferLength;
639 InitializerOp->Asl.ParseOpcode = PARSEOP_RAW_DATA;
642 case PARSEOP_RAW_DATA:
644 /* Buffer nodes are already initialized (e.g. Unicode operator) */
647 case PARSEOP_DEFAULT_ARG:
652 AslError (ASL_ERROR, ASL_MSG_INVALID_OPERAND, InitializerOp,
653 "Unknown buffer initializer opcode");
654 printf ("Unknown buffer initializer opcode [%s]\n",
655 UtGetOpName (InitializerOp->Asl.ParseOpcode));
659 /* Check if initializer list is longer than the buffer length */
661 if (BufferLengthOp->Asl.Value.Integer > BufferLength)
663 BufferLength = (UINT32) BufferLengthOp->Asl.Value.Integer;
668 /* No length AND no items -- issue notice */
670 AslError (ASL_REMARK, ASL_MSG_BUFFER_LENGTH, BufferLengthOp, NULL);
672 /* But go ahead and put the buffer length of zero into the AML */
676 * Just set the buffer size node to be the buffer length, regardless
677 * of whether it was previously an integer or a default_arg placeholder
679 BufferLengthOp->Asl.ParseOpcode = PARSEOP_INTEGER;
680 BufferLengthOp->Asl.AmlOpcode = AML_DWORD_OP;
681 BufferLengthOp->Asl.Value.Integer = BufferLength;
683 (void) OpcSetOptimalIntegerSize (BufferLengthOp);
685 /* Remaining nodes are handled via the tree walk */
689 /*******************************************************************************
691 * FUNCTION: OpnDoPackage
693 * PARAMETERS: Op - The parent parse node
697 * DESCRIPTION: Construct the AML operands for the PACKAGE ASL keyword. NOTE:
698 * can only be called after constants have been folded, to ensure
699 * that the PackageLength operand has been fully reduced.
701 ******************************************************************************/
705 ACPI_PARSE_OBJECT *Op)
707 ACPI_PARSE_OBJECT *InitializerOp;
708 ACPI_PARSE_OBJECT *PackageLengthOp;
709 UINT32 PackageLength = 0;
712 /* Opcode and package length first, followed by the initializer list */
714 PackageLengthOp = Op->Asl.Child;
715 InitializerOp = PackageLengthOp->Asl.Next;
717 /* Count the number of items in the initializer list */
719 if (InitializerOp->Asl.ParseOpcode != PARSEOP_DEFAULT_ARG)
721 /* The peer list contains the byte list (if any...) */
723 while (InitializerOp)
726 InitializerOp = InitializerOp->Asl.Next;
730 /* If package length is a constant, compare to the initializer list */
732 if ((PackageLengthOp->Asl.ParseOpcode == PARSEOP_INTEGER) ||
733 (PackageLengthOp->Asl.ParseOpcode == PARSEOP_QWORDCONST))
735 if (PackageLengthOp->Asl.Value.Integer > PackageLength)
738 * Allow package length to be longer than the initializer
739 * list -- but if the length of initializer list is nonzero,
740 * issue a message since this is probably a coding error,
741 * even though technically legal.
743 if (PackageLength > 0)
745 AslError (ASL_REMARK, ASL_MSG_LIST_LENGTH_SHORT,
746 PackageLengthOp, NULL);
749 PackageLength = (UINT32) PackageLengthOp->Asl.Value.Integer;
751 else if (PackageLengthOp->Asl.Value.Integer < PackageLength)
754 * The package length is smaller than the length of the
755 * initializer list. This is an error as per the ACPI spec.
757 AslError (ASL_ERROR, ASL_MSG_LIST_LENGTH_LONG,
758 PackageLengthOp, NULL);
762 if (PackageLengthOp->Asl.ParseOpcode == PARSEOP_DEFAULT_ARG)
765 * This is the case if the PackageLength was left empty - Package()
766 * The package length becomes the length of the initializer list
768 Op->Asl.Child->Asl.ParseOpcode = PARSEOP_INTEGER;
769 Op->Asl.Child->Asl.Value.Integer = PackageLength;
771 /* Set the AML opcode */
773 (void) OpcSetOptimalIntegerSize (Op->Asl.Child);
776 /* If not a variable-length package, check for a zero package length */
778 if ((PackageLengthOp->Asl.ParseOpcode == PARSEOP_INTEGER) ||
779 (PackageLengthOp->Asl.ParseOpcode == PARSEOP_QWORDCONST) ||
780 (PackageLengthOp->Asl.ParseOpcode == PARSEOP_ZERO) ||
781 (PackageLengthOp->Asl.ParseOpcode == PARSEOP_DEFAULT_ARG))
785 /* No length AND no initializer list -- issue a remark */
787 AslError (ASL_REMARK, ASL_MSG_PACKAGE_LENGTH,
788 PackageLengthOp, NULL);
790 /* But go ahead and put the buffer length of zero into the AML */
795 * If the PackageLength is a constant <= 255, we can change the
796 * AML opcode from VarPackage to a simple (ACPI 1.0) Package opcode.
798 if (((Op->Asl.Child->Asl.ParseOpcode == PARSEOP_INTEGER) &&
799 (Op->Asl.Child->Asl.Value.Integer <= 255)) ||
800 (Op->Asl.Child->Asl.ParseOpcode == PARSEOP_ONE) ||
801 (Op->Asl.Child->Asl.ParseOpcode == PARSEOP_ONES)||
802 (Op->Asl.Child->Asl.ParseOpcode == PARSEOP_ZERO))
804 Op->Asl.AmlOpcode = AML_PACKAGE_OP;
805 Op->Asl.ParseOpcode = PARSEOP_PACKAGE;
808 * Just set the package size node to be the package length, regardless
809 * of whether it was previously an integer or a default_arg placeholder
811 PackageLengthOp->Asl.AmlOpcode = AML_RAW_DATA_BYTE;
812 PackageLengthOp->Asl.AmlLength = 1;
813 PackageLengthOp->Asl.ParseOpcode = PARSEOP_RAW_DATA;
814 PackageLengthOp->Asl.Value.Integer = PackageLength;
817 /* Remaining nodes are handled via the tree walk */
821 /*******************************************************************************
823 * FUNCTION: OpnDoLoadTable
825 * PARAMETERS: Op - The parent parse node
829 * DESCRIPTION: Construct the AML operands for the LOADTABLE ASL keyword.
831 ******************************************************************************/
835 ACPI_PARSE_OBJECT *Op)
837 ACPI_PARSE_OBJECT *Next;
840 /* Opcode is parent node */
841 /* First child is the table signature */
843 Next = Op->Asl.Child;
845 /* Second child is the OEM ID*/
847 Next = Next->Asl.Next;
849 /* Third child is the OEM table ID */
851 Next = Next->Asl.Next;
853 /* Fourth child is the RootPath string */
855 Next = Next->Asl.Next;
856 if (Next->Asl.ParseOpcode == PARSEOP_ZERO)
858 Next->Asl.ParseOpcode = PARSEOP_STRING_LITERAL;
859 Next->Asl.Value.String = "\\";
860 Next->Asl.AmlLength = 2;
861 OpcGenerateAmlOpcode (Next);
864 #ifdef ASL_FUTURE_IMPLEMENTATION
866 /* TBD: NOT IMPLEMENTED */
867 /* Fifth child is the [optional] ParameterPathString */
868 /* Sixth child is the [optional] ParameterData */
870 Next = Next->Asl.Next;
871 if (Next->Asl.ParseOpcode == DEFAULT_ARG)
873 Next->Asl.AmlLength = 1;
874 Next->Asl.ParseOpcode = ZERO;
875 OpcGenerateAmlOpcode (Next);
879 Next = Next->Asl.Next;
880 if (Next->Asl.ParseOpcode == DEFAULT_ARG)
882 Next->Asl.AmlLength = 1;
883 Next->Asl.ParseOpcode = ZERO;
884 OpcGenerateAmlOpcode (Next);
890 /*******************************************************************************
892 * FUNCTION: OpnDoDefinitionBlock
894 * PARAMETERS: Op - The parent parse node
898 * DESCRIPTION: Construct the AML operands for the DEFINITIONBLOCK ASL keyword
900 ******************************************************************************/
903 OpnDoDefinitionBlock (
904 ACPI_PARSE_OBJECT *Op)
906 ACPI_PARSE_OBJECT *Child;
913 * These nodes get stuffed into the table header. They are special
914 * cased when the table is written to the output file.
916 * Mark all of these nodes as non-usable so they won't get output
920 /* Get AML filename. Use it if non-null */
922 Child = Op->Asl.Child;
923 if (Child->Asl.Value.Buffer &&
924 *Child->Asl.Value.Buffer &&
925 (Gbl_UseDefaultAmlFilename))
928 * We will use the AML filename that is embedded in the source file
929 * for the output filename.
931 Filename = UtStringCacheCalloc (strlen (Gbl_DirectoryPath) +
932 strlen ((char *) Child->Asl.Value.Buffer) + 1);
934 /* Prepend the current directory path */
936 strcpy (Filename, Gbl_DirectoryPath);
937 strcat (Filename, (char *) Child->Asl.Value.Buffer);
939 Gbl_OutputFilenamePrefix = Filename;
940 UtConvertBackslashes (Gbl_OutputFilenamePrefix);
943 Child->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
947 Child = Child->Asl.Next;
948 Child->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
949 if (Child->Asl.Value.String)
951 Gbl_TableSignature = Child->Asl.Value.String;
952 if (strlen (Gbl_TableSignature) != ACPI_NAME_SIZE)
954 AslError (ASL_ERROR, ASL_MSG_TABLE_SIGNATURE, Child,
955 "Length is not exactly 4");
958 for (i = 0; i < ACPI_NAME_SIZE; i++)
960 if (!isalnum ((int) Gbl_TableSignature[i]))
962 AslError (ASL_ERROR, ASL_MSG_TABLE_SIGNATURE, Child,
963 "Contains non-alphanumeric characters");
970 Child = Child->Asl.Next;
971 Child->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
973 * We used the revision to set the integer width earlier
978 Child = Child->Asl.Next;
979 Child->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
983 Child = Child->Asl.Next;
984 Child->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
985 if (Child->Asl.Value.String)
987 Length = strlen (Child->Asl.Value.String);
988 Gbl_TableId = UtStringCacheCalloc (Length + 1);
989 strcpy (Gbl_TableId, Child->Asl.Value.String);
992 * Convert anything non-alphanumeric to an underscore. This
993 * allows us to use the TableID to generate unique C symbols.
995 for (i = 0; i < Length; i++)
997 if (!isalnum ((int) Gbl_TableId[i]))
999 Gbl_TableId[i] = '_';
1006 Child = Child->Asl.Next;
1007 Child->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
1011 /*******************************************************************************
1013 * FUNCTION: UtGetArg
1015 * PARAMETERS: Op - Get an argument for this op
1016 * Argn - Nth argument to get
1018 * RETURN: The argument (as an Op object). NULL if argument does not exist
1020 * DESCRIPTION: Get the specified op's argument (peer)
1022 ******************************************************************************/
1026 ACPI_PARSE_OBJECT *Op,
1029 ACPI_PARSE_OBJECT *Arg = NULL;
1032 /* Get the requested argument object */
1034 Arg = Op->Asl.Child;
1038 Arg = Arg->Asl.Next;
1045 /*******************************************************************************
1047 * FUNCTION: OpnAttachNameToNode
1049 * PARAMETERS: Op - The parent parse node
1053 * DESCRIPTION: For the named ASL/AML operators, get the actual name from the
1054 * argument list and attach it to the parent node so that we
1055 * can get to it quickly later.
1057 ******************************************************************************/
1060 OpnAttachNameToNode (
1061 ACPI_PARSE_OBJECT *Op)
1063 ACPI_PARSE_OBJECT *Child = NULL;
1066 switch (Op->Asl.AmlOpcode)
1068 case AML_DATA_REGION_OP:
1071 case AML_EXTERNAL_OP:
1075 case AML_POWER_RES_OP:
1076 case AML_PROCESSOR_OP:
1077 case AML_THERMAL_ZONE_OP:
1081 Child = UtGetArg (Op, 0);
1086 Child = UtGetArg (Op, 1);
1089 case AML_CREATE_BIT_FIELD_OP:
1090 case AML_CREATE_BYTE_FIELD_OP:
1091 case AML_CREATE_WORD_FIELD_OP:
1092 case AML_CREATE_DWORD_FIELD_OP:
1093 case AML_CREATE_QWORD_FIELD_OP:
1095 Child = UtGetArg (Op, 2);
1098 case AML_CREATE_FIELD_OP:
1100 Child = UtGetArg (Op, 3);
1103 case AML_BANK_FIELD_OP:
1104 case AML_INDEX_FIELD_OP:
1116 UtAttachNamepathToOwner (Op, Child);
1121 /*******************************************************************************
1123 * FUNCTION: OpnGenerateAmlOperands
1125 * PARAMETERS: Op - The parent parse node
1129 * DESCRIPTION: Prepare nodes to be output as AML data and operands. The more
1130 * complex AML opcodes require processing of the child nodes
1131 * (arguments/operands).
1133 ******************************************************************************/
1136 OpnGenerateAmlOperands (
1137 ACPI_PARSE_OBJECT *Op)
1141 if (Op->Asl.AmlOpcode == AML_RAW_DATA_BYTE)
1146 switch (Op->Asl.ParseOpcode)
1148 case PARSEOP_DEFINITION_BLOCK:
1150 OpnDoDefinitionBlock (Op);
1153 case PARSEOP_METHOD:
1168 case PARSEOP_INDEXFIELD:
1170 OpnDoIndexField (Op);
1173 case PARSEOP_BANKFIELD:
1175 OpnDoBankField (Op);
1178 case PARSEOP_BUFFER:
1183 case PARSEOP_LOADTABLE:
1185 OpnDoLoadTable (Op);
1188 case PARSEOP_OPERATIONREGION:
1193 case PARSEOP_RESOURCETEMPLATE:
1195 RsDoResourceTemplate (Op);
1198 case PARSEOP_NAMESEG:
1199 case PARSEOP_NAMESTRING:
1200 case PARSEOP_METHODCALL:
1201 case PARSEOP_STRING_LITERAL:
1209 OpnAttachNameToNode (Op);