1 /******************************************************************************
3 * Module Name: dswload - Dispatcher namespace load callbacks
5 *****************************************************************************/
8 * Copyright (C) 2000 - 2012, 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.
46 #include <contrib/dev/acpica/compiler/aslcompiler.h>
47 #include <contrib/dev/acpica/include/amlcode.h>
48 #include <contrib/dev/acpica/include/acdispat.h>
49 #include <contrib/dev/acpica/include/acnamesp.h>
51 #include "aslcompiler.y.h"
53 #define _COMPONENT ACPI_COMPILER
54 ACPI_MODULE_NAME ("aslload")
56 /* Local prototypes */
60 ACPI_PARSE_OBJECT *Op,
61 ACPI_WALK_STATE *WalkState);
64 LdLoadResourceElements (
65 ACPI_PARSE_OBJECT *Op,
66 ACPI_WALK_STATE *WalkState);
70 ACPI_PARSE_OBJECT *Op,
76 ACPI_PARSE_OBJECT *Op,
81 LdCommonNamespaceEnd (
82 ACPI_PARSE_OBJECT *Op,
87 /*******************************************************************************
89 * FUNCTION: LdLoadNamespace
91 * PARAMETERS: RootOp - Root of the parse tree
95 * DESCRIPTION: Perform a walk of the parse tree that in turn loads all of the
96 * named ASL/AML objects into the namespace. The namespace is
97 * constructed in order to resolve named references and references
98 * to named fields within resource templates/descriptors.
100 ******************************************************************************/
104 ACPI_PARSE_OBJECT *RootOp)
106 ACPI_WALK_STATE *WalkState;
109 DbgPrint (ASL_DEBUG_OUTPUT, "\nCreating namespace\n\n");
111 /* Create a new walk state */
113 WalkState = AcpiDsCreateWalkState (0, NULL, NULL, NULL);
119 /* Walk the entire parse tree, first pass */
121 TrWalkParseTree (RootOp, ASL_WALK_VISIT_TWICE, LdNamespace1Begin,
122 LdCommonNamespaceEnd, WalkState);
124 /* Second pass to handle forward references */
126 TrWalkParseTree (RootOp, ASL_WALK_VISIT_TWICE, LdNamespace2Begin,
127 LdCommonNamespaceEnd, WalkState);
129 /* Dump the namespace if debug is enabled */
131 AcpiNsDumpTables (ACPI_NS_ALL, ACPI_UINT32_MAX);
136 /*******************************************************************************
138 * FUNCTION: LdLoadFieldElements
140 * PARAMETERS: Op - Parent node (Field)
141 * WalkState - Current walk state
145 * DESCRIPTION: Enter the named elements of the field (children of the parent)
146 * into the namespace.
148 ******************************************************************************/
151 LdLoadFieldElements (
152 ACPI_PARSE_OBJECT *Op,
153 ACPI_WALK_STATE *WalkState)
155 ACPI_PARSE_OBJECT *Child = NULL;
156 ACPI_NAMESPACE_NODE *Node;
160 /* Get the first named field element */
162 switch (Op->Asl.AmlOpcode)
164 case AML_BANK_FIELD_OP:
166 Child = UtGetArg (Op, 6);
169 case AML_INDEX_FIELD_OP:
171 Child = UtGetArg (Op, 5);
176 Child = UtGetArg (Op, 4);
180 /* No other opcodes should arrive here */
181 return (AE_BAD_PARAMETER);
184 /* Enter all elements into the namespace */
188 switch (Child->Asl.AmlOpcode)
190 case AML_INT_RESERVEDFIELD_OP:
191 case AML_INT_ACCESSFIELD_OP:
192 case AML_INT_CONNECTION_OP:
197 Status = AcpiNsLookup (WalkState->ScopeInfo,
198 Child->Asl.Value.String,
199 ACPI_TYPE_LOCAL_REGION_FIELD,
200 ACPI_IMODE_LOAD_PASS1,
201 ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
202 ACPI_NS_ERROR_IF_FOUND,
204 if (ACPI_FAILURE (Status))
206 if (Status != AE_ALREADY_EXISTS)
208 AslError (ASL_ERROR, ASL_MSG_CORE_EXCEPTION, Child,
209 Child->Asl.Value.String);
214 * The name already exists in this scope
215 * But continue processing the elements
217 AslError (ASL_ERROR, ASL_MSG_NAME_EXISTS, Child,
218 Child->Asl.Value.String);
222 Child->Asl.Node = Node;
228 Child = Child->Asl.Next;
235 /*******************************************************************************
237 * FUNCTION: LdLoadResourceElements
239 * PARAMETERS: Op - Parent node (Resource Descriptor)
240 * WalkState - Current walk state
244 * DESCRIPTION: Enter the named elements of the resource descriptor (children
245 * of the parent) into the namespace.
247 * NOTE: In the real AML namespace, these named elements never exist. But
248 * we simply use the namespace here as a symbol table so we can look
249 * them up as they are referenced.
251 ******************************************************************************/
254 LdLoadResourceElements (
255 ACPI_PARSE_OBJECT *Op,
256 ACPI_WALK_STATE *WalkState)
258 ACPI_PARSE_OBJECT *InitializerOp = NULL;
259 ACPI_NAMESPACE_NODE *Node;
264 * Enter the resource name into the namespace. Name must not already exist.
265 * This opens a scope, so later field names are guaranteed to be new/unique.
267 Status = AcpiNsLookup (WalkState->ScopeInfo, Op->Asl.Namepath,
268 ACPI_TYPE_LOCAL_RESOURCE, ACPI_IMODE_LOAD_PASS1,
269 ACPI_NS_NO_UPSEARCH | ACPI_NS_ERROR_IF_FOUND,
271 if (ACPI_FAILURE (Status))
273 if (Status == AE_ALREADY_EXISTS)
275 /* Actual node causing the error was saved in ParentMethod */
277 AslError (ASL_ERROR, ASL_MSG_NAME_EXISTS,
278 (ACPI_PARSE_OBJECT *) Op->Asl.ParentMethod, Op->Asl.Namepath);
284 Node->Value = (UINT32) Op->Asl.Value.Integer;
289 * Now enter the predefined fields, for easy lookup when referenced
292 InitializerOp = ASL_GET_CHILD_NODE (Op);
293 while (InitializerOp)
295 if (InitializerOp->Asl.ExternalName)
297 Status = AcpiNsLookup (WalkState->ScopeInfo,
298 InitializerOp->Asl.ExternalName,
299 ACPI_TYPE_LOCAL_RESOURCE_FIELD,
300 ACPI_IMODE_LOAD_PASS1,
301 ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE,
303 if (ACPI_FAILURE (Status))
309 * Store the field offset and length in the namespace node
310 * so it can be used when the field is referenced
312 Node->Value = InitializerOp->Asl.Value.Tag.BitOffset;
313 Node->Length = InitializerOp->Asl.Value.Tag.BitLength;
314 InitializerOp->Asl.Node = Node;
315 Node->Op = InitializerOp;
318 InitializerOp = ASL_GET_PEER_NODE (InitializerOp);
325 /*******************************************************************************
327 * FUNCTION: LdNamespace1Begin
329 * PARAMETERS: ASL_WALK_CALLBACK
333 * DESCRIPTION: Descending callback used during the parse tree walk. If this
334 * is a named AML opcode, enter into the namespace
336 ******************************************************************************/
340 ACPI_PARSE_OBJECT *Op,
344 ACPI_WALK_STATE *WalkState = (ACPI_WALK_STATE *) Context;
345 ACPI_NAMESPACE_NODE *Node;
347 ACPI_OBJECT_TYPE ObjectType;
348 ACPI_OBJECT_TYPE ActualObjectType = ACPI_TYPE_ANY;
350 UINT32 Flags = ACPI_NS_NO_UPSEARCH;
351 ACPI_PARSE_OBJECT *Arg;
353 BOOLEAN ForceNewScope = FALSE;
356 ACPI_FUNCTION_NAME (LdNamespace1Begin);
357 ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "Op %p [%s]\n",
358 Op, Op->Asl.ParseOpName));
362 * We are only interested in opcodes that have an associated name
363 * (or multiple names)
365 switch (Op->Asl.AmlOpcode)
367 case AML_BANK_FIELD_OP:
368 case AML_INDEX_FIELD_OP:
371 Status = LdLoadFieldElements (Op, WalkState);
376 /* All other opcodes go below */
380 /* Check if this object has already been installed in the namespace */
387 Path = Op->Asl.Namepath;
393 /* Map the raw opcode into an internal object type */
395 switch (Op->Asl.ParseOpcode)
399 Arg = Op->Asl.Child; /* Get the NameSeg/NameString node */
400 Arg = Arg->Asl.Next; /* First peer is the object to be associated with the name */
403 * If this name refers to a ResourceTemplate, we will need to open
404 * a new scope so that the resource subfield names can be entered into
405 * the namespace underneath this name
407 if (Op->Asl.CompileFlags & NODE_IS_RESOURCE_DESC)
409 ForceNewScope = TRUE;
412 /* Get the data type associated with the named object, not the name itself */
414 /* Log2 loop to convert from Btype (binary) to Etype (encoded) */
417 for (i = 1; i < Arg->Asl.AcpiBtype; i *= 2)
424 case PARSEOP_EXTERNAL:
427 * "External" simply enters a name and type into the namespace.
428 * We must be careful to not open a new scope, however, no matter
429 * what type the external name refers to (e.g., a method)
431 * first child is name, next child is ObjectType
433 ActualObjectType = (UINT8) Op->Asl.Child->Asl.Next->Asl.Value.Integer;
434 ObjectType = ACPI_TYPE_ANY;
437 * We will mark every new node along the path as "External". This
438 * allows some or all of the nodes to be created later in the ASL
439 * code. Handles cases like this:
441 * External (\_SB_.PCI0.ABCD, IntObj)
450 * Store (\_SB_.PCI0.ABCD, Local0)
453 Flags |= ACPI_NS_EXTERNAL;
456 case PARSEOP_DEFAULT_ARG:
458 if (Op->Asl.CompileFlags == NODE_IS_RESOURCE_DESC)
460 Status = LdLoadResourceElements (Op, WalkState);
461 return_ACPI_STATUS (Status);
464 ObjectType = AslMapNamedOpcodeToDataType (Op->Asl.AmlOpcode);
471 * The name referenced by Scope(Name) must already exist at this point.
472 * In other words, forward references for Scope() are not supported.
473 * The only real reason for this is that the MS interpreter cannot
474 * handle this case. Perhaps someday this case can go away.
476 Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ACPI_TYPE_ANY,
477 ACPI_IMODE_EXECUTE, ACPI_NS_SEARCH_PARENT,
479 if (ACPI_FAILURE (Status))
481 if (Status == AE_NOT_FOUND)
483 /* The name was not found, go ahead and create it */
485 Status = AcpiNsLookup (WalkState->ScopeInfo, Path,
486 ACPI_TYPE_LOCAL_SCOPE,
487 ACPI_IMODE_LOAD_PASS1, Flags,
491 * However, this is an error -- primarily because the MS
492 * interpreter can't handle a forward reference from the
495 AslError (ASL_ERROR, ASL_MSG_NOT_FOUND, Op,
496 Op->Asl.ExternalName);
497 AslError (ASL_ERROR, ASL_MSG_SCOPE_FWD_REF, Op,
498 Op->Asl.ExternalName);
502 AslCoreSubsystemError (Op, Status,
503 "Failure from namespace lookup", FALSE);
505 return_ACPI_STATUS (Status);
508 /* We found a node with this name, now check the type */
512 case ACPI_TYPE_LOCAL_SCOPE:
513 case ACPI_TYPE_DEVICE:
514 case ACPI_TYPE_POWER:
515 case ACPI_TYPE_PROCESSOR:
516 case ACPI_TYPE_THERMAL:
518 /* These are acceptable types - they all open a new scope */
521 case ACPI_TYPE_INTEGER:
522 case ACPI_TYPE_STRING:
523 case ACPI_TYPE_BUFFER:
526 * These types we will allow, but we will change the type.
527 * This enables some existing code of the form:
530 * Scope (DEB) { ... }
532 * Which is used to workaround the fact that the MS interpreter
533 * does not allow Scope() forward references.
535 sprintf (MsgBuffer, "%s [%s], changing type to [Scope]",
536 Op->Asl.ExternalName, AcpiUtGetTypeName (Node->Type));
537 AslError (ASL_REMARK, ASL_MSG_SCOPE_TYPE, Op, MsgBuffer);
539 /* Switch the type to scope, open the new scope */
541 Node->Type = ACPI_TYPE_LOCAL_SCOPE;
542 Status = AcpiDsScopeStackPush (Node, ACPI_TYPE_LOCAL_SCOPE,
544 if (ACPI_FAILURE (Status))
546 return_ACPI_STATUS (Status);
552 /* All other types are an error */
554 sprintf (MsgBuffer, "%s [%s]", Op->Asl.ExternalName,
555 AcpiUtGetTypeName (Node->Type));
556 AslError (ASL_ERROR, ASL_MSG_SCOPE_TYPE, Op, MsgBuffer);
559 * However, switch the type to be an actual scope so
560 * that compilation can continue without generating a whole
561 * cascade of additional errors. Open the new scope.
563 Node->Type = ACPI_TYPE_LOCAL_SCOPE;
564 Status = AcpiDsScopeStackPush (Node, ACPI_TYPE_LOCAL_SCOPE,
566 if (ACPI_FAILURE (Status))
568 return_ACPI_STATUS (Status);
579 ObjectType = AslMapNamedOpcodeToDataType (Op->Asl.AmlOpcode);
584 ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "Loading name: %s, (%s)\n",
585 Op->Asl.ExternalName, AcpiUtGetTypeName (ObjectType)));
587 /* The name must not already exist */
589 Flags |= ACPI_NS_ERROR_IF_FOUND;
592 * Enter the named type into the internal namespace. We enter the name
593 * as we go downward in the parse tree. Any necessary subobjects that
594 * involve arguments to the opcode must be created as we go back up the
597 Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ObjectType,
598 ACPI_IMODE_LOAD_PASS1, Flags, WalkState, &Node);
599 if (ACPI_FAILURE (Status))
601 if (Status == AE_ALREADY_EXISTS)
603 /* The name already exists in this scope */
605 if (Node->Type == ACPI_TYPE_LOCAL_SCOPE)
607 /* Allow multiple references to the same scope */
609 Node->Type = (UINT8) ObjectType;
612 else if ((Node->Flags & ANOBJ_IS_EXTERNAL) &&
613 (Op->Asl.ParseOpcode != PARSEOP_EXTERNAL))
616 * Allow one create on an object or segment that was
617 * previously declared External
619 Node->Flags &= ~ANOBJ_IS_EXTERNAL;
620 Node->Type = (UINT8) ObjectType;
622 /* Just retyped a node, probably will need to open a scope */
624 if (AcpiNsOpensScope (ObjectType))
626 Status = AcpiDsScopeStackPush (Node, ObjectType, WalkState);
627 if (ACPI_FAILURE (Status))
629 return_ACPI_STATUS (Status);
636 /* Valid error, object already exists */
638 AslError (ASL_ERROR, ASL_MSG_NAME_EXISTS, Op,
639 Op->Asl.ExternalName);
640 return_ACPI_STATUS (AE_OK);
645 AslCoreSubsystemError (Op, Status,
646 "Failure from namespace lookup", FALSE);
647 return_ACPI_STATUS (Status);
653 Status = AcpiDsScopeStackPush (Node, ObjectType, WalkState);
654 if (ACPI_FAILURE (Status))
656 return_ACPI_STATUS (Status);
662 * Point the parse node to the new namespace node, and point
663 * the Node back to the original Parse node
668 /* Set the actual data type if appropriate (EXTERNAL term only) */
670 if (ActualObjectType != ACPI_TYPE_ANY)
672 Node->Type = (UINT8) ActualObjectType;
673 Node->Value = ASL_EXTERNAL_METHOD;
676 if (Op->Asl.ParseOpcode == PARSEOP_METHOD)
679 * Get the method argument count from "Extra" and save
680 * it in the namespace node
682 Node->Value = (UINT32) Op->Asl.Extra;
685 return_ACPI_STATUS (Status);
689 /*******************************************************************************
691 * FUNCTION: LdNamespace2Begin
693 * PARAMETERS: ASL_WALK_CALLBACK
697 * DESCRIPTION: Descending callback used during the pass 2 parse tree walk.
698 * Second pass resolves some forward references.
701 * Currently only needs to handle the Alias operator.
702 * Could be used to allow forward references from the Scope() operator, but
703 * the MS interpreter does not allow this, so this compiler does not either.
705 ******************************************************************************/
709 ACPI_PARSE_OBJECT *Op,
713 ACPI_WALK_STATE *WalkState = (ACPI_WALK_STATE *) Context;
715 ACPI_NAMESPACE_NODE *Node;
716 ACPI_OBJECT_TYPE ObjectType;
717 BOOLEAN ForceNewScope = FALSE;
718 ACPI_PARSE_OBJECT *Arg;
720 ACPI_NAMESPACE_NODE *TargetNode;
723 ACPI_FUNCTION_NAME (LdNamespace2Begin);
724 ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "Op %p [%s]\n",
725 Op, Op->Asl.ParseOpName));
728 /* Ignore Ops with no namespace node */
736 /* Get the type to determine if we should push the scope */
738 if ((Op->Asl.ParseOpcode == PARSEOP_DEFAULT_ARG) &&
739 (Op->Asl.CompileFlags == NODE_IS_RESOURCE_DESC))
741 ObjectType = ACPI_TYPE_LOCAL_RESOURCE;
745 ObjectType = AslMapNamedOpcodeToDataType (Op->Asl.AmlOpcode);
748 /* Push scope for Resource Templates */
750 if (Op->Asl.ParseOpcode == PARSEOP_NAME)
752 if (Op->Asl.CompileFlags & NODE_IS_RESOURCE_DESC)
754 ForceNewScope = TRUE;
758 /* Push the scope stack */
760 if (ForceNewScope || AcpiNsOpensScope (ObjectType))
762 Status = AcpiDsScopeStackPush (Node, ObjectType, WalkState);
763 if (ACPI_FAILURE (Status))
765 return_ACPI_STATUS (Status);
769 if (Op->Asl.ParseOpcode == PARSEOP_ALIAS)
771 /* Complete the alias node by getting and saving the target node */
773 /* First child is the alias target */
777 /* Get the target pathname */
779 Path = Arg->Asl.Namepath;
782 Status = UtInternalizeName (Arg->Asl.ExternalName, &Path);
783 if (ACPI_FAILURE (Status))
789 /* Get the NS node associated with the target. It must exist. */
791 Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ACPI_TYPE_ANY,
792 ACPI_IMODE_EXECUTE, ACPI_NS_SEARCH_PARENT | ACPI_NS_DONT_OPEN_SCOPE,
793 WalkState, &TargetNode);
794 if (ACPI_FAILURE (Status))
796 if (Status == AE_NOT_FOUND)
798 AslError (ASL_ERROR, ASL_MSG_NOT_FOUND, Op,
799 Op->Asl.ExternalName);
802 * The name was not found, go ahead and create it.
803 * This prevents more errors later.
805 Status = AcpiNsLookup (WalkState->ScopeInfo, Path,
807 ACPI_IMODE_LOAD_PASS1, ACPI_NS_NO_UPSEARCH,
812 AslCoreSubsystemError (Op, Status,
813 "Failure from namespace lookup", FALSE);
817 /* Save the target node within the alias node */
819 Node->Object = ACPI_CAST_PTR (ACPI_OPERAND_OBJECT, TargetNode);
826 /*******************************************************************************
828 * FUNCTION: LdCommonNamespaceEnd
830 * PARAMETERS: ASL_WALK_CALLBACK
834 * DESCRIPTION: Ascending callback used during the loading of the namespace,
835 * We only need to worry about managing the scope stack here.
837 ******************************************************************************/
840 LdCommonNamespaceEnd (
841 ACPI_PARSE_OBJECT *Op,
845 ACPI_WALK_STATE *WalkState = (ACPI_WALK_STATE *) Context;
846 ACPI_OBJECT_TYPE ObjectType;
847 BOOLEAN ForceNewScope = FALSE;
850 ACPI_FUNCTION_NAME (LdCommonNamespaceEnd);
853 /* We are only interested in opcodes that have an associated name */
855 if (!Op->Asl.Namepath)
860 /* Get the type to determine if we should pop the scope */
862 if ((Op->Asl.ParseOpcode == PARSEOP_DEFAULT_ARG) &&
863 (Op->Asl.CompileFlags == NODE_IS_RESOURCE_DESC))
865 /* TBD: Merge into AcpiDsMapNamedOpcodeToDataType */
867 ObjectType = ACPI_TYPE_LOCAL_RESOURCE;
871 ObjectType = AslMapNamedOpcodeToDataType (Op->Asl.AmlOpcode);
874 /* Pop scope that was pushed for Resource Templates */
876 if (Op->Asl.ParseOpcode == PARSEOP_NAME)
878 if (Op->Asl.CompileFlags & NODE_IS_RESOURCE_DESC)
880 ForceNewScope = TRUE;
884 /* Pop the scope stack */
886 if (ForceNewScope || AcpiNsOpensScope (ObjectType))
888 ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
889 "(%s): Popping scope for Op [%s] %p\n",
890 AcpiUtGetTypeName (ObjectType), Op->Asl.ParseOpName, Op));
892 (void) AcpiDsScopeStackPop (WalkState);