xref: /illumos-gate/usr/src/cmd/acpi/iasl/aslload.c (revision 35786f68)
1 /******************************************************************************
2  *
3  * Module Name: dswload - Dispatcher namespace load callbacks
4  *
5  *****************************************************************************/
6 
7 /******************************************************************************
8  *
9  * 1. Copyright Notice
10  *
11  * Some or all of this work - Copyright (c) 1999 - 2018, Intel Corp.
12  * All rights reserved.
13  *
14  * 2. License
15  *
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
19  * property rights.
20  *
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
27  *
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;
36  *
37  * The above copyright and patent license is granted only if the following
38  * conditions are met:
39  *
40  * 3. Conditions
41  *
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.
53  *
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
64  * make.
65  *
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
70  * distribution.
71  *
72  * 3.4. Intel retains all right, title, and interest in and to the Original
73  * Intel Code.
74  *
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.
79  *
80  * 4. Disclaimer and Export Compliance
81  *
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
88  * PARTICULAR PURPOSE.
89  *
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
97  * LIMITED REMEDY.
98  *
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.
113  *
114  *****************************************************************************
115  *
116  * Alternatively, you may choose to be licensed under the terms of the
117  * following license:
118  *
119  * Redistribution and use in source and binary forms, with or without
120  * modification, are permitted provided that the following conditions
121  * are met:
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.
133  *
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.
145  *
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.
149  *
150  *****************************************************************************/
151 
152 #include "aslcompiler.h"
153 #include "amlcode.h"
154 #include "acdispat.h"
155 #include "acnamesp.h"
156 #include "acparser.h"
157 #include "aslcompiler.y.h"
158 
159 
160 #define _COMPONENT          ACPI_COMPILER
161         ACPI_MODULE_NAME    ("aslload")
162 
163 /* Local prototypes */
164 
165 static ACPI_STATUS
166 LdLoadFieldElements (
167     ACPI_PARSE_OBJECT       *Op,
168     ACPI_WALK_STATE         *WalkState);
169 
170 static ACPI_STATUS
171 LdLoadResourceElements (
172     ACPI_PARSE_OBJECT       *Op,
173     ACPI_WALK_STATE         *WalkState);
174 
175 static ACPI_STATUS
176 LdNamespace1Begin (
177     ACPI_PARSE_OBJECT       *Op,
178     UINT32                  Level,
179     void                    *Context);
180 
181 static ACPI_STATUS
182 LdNamespace2Begin (
183     ACPI_PARSE_OBJECT       *Op,
184     UINT32                  Level,
185     void                    *Context);
186 
187 static ACPI_STATUS
188 LdCommonNamespaceEnd (
189     ACPI_PARSE_OBJECT       *Op,
190     UINT32                  Level,
191     void                    *Context);
192 
193 
194 /*******************************************************************************
195  *
196  * FUNCTION:    LdLoadNamespace
197  *
198  * PARAMETERS:  RootOp      - Root of the parse tree
199  *
200  * RETURN:      Status
201  *
202  * DESCRIPTION: Perform a walk of the parse tree that in turn loads all of the
203  *              named ASL/AML objects into the namespace. The namespace is
204  *              constructed in order to resolve named references and references
205  *              to named fields within resource templates/descriptors.
206  *
207  ******************************************************************************/
208 
209 ACPI_STATUS
LdLoadNamespace(ACPI_PARSE_OBJECT * RootOp)210 LdLoadNamespace (
211     ACPI_PARSE_OBJECT       *RootOp)
212 {
213     ACPI_WALK_STATE         *WalkState;
214 
215 
216     /* Create a new walk state */
217 
218     WalkState = AcpiDsCreateWalkState (0, NULL, NULL, NULL);
219     if (!WalkState)
220     {
221         return (AE_NO_MEMORY);
222     }
223 
224     /* Walk the entire parse tree, first pass */
225 
226     TrWalkParseTree (RootOp, ASL_WALK_VISIT_TWICE, LdNamespace1Begin,
227         LdCommonNamespaceEnd, WalkState);
228 
229     /* Second pass to handle forward references */
230 
231     TrWalkParseTree (RootOp, ASL_WALK_VISIT_TWICE, LdNamespace2Begin,
232         LdCommonNamespaceEnd, WalkState);
233 
234     /* Dump the namespace if debug is enabled */
235 
236     if (AcpiDbgLevel & ACPI_LV_TABLES)
237     {
238         AcpiNsDumpTables (ACPI_NS_ALL, ACPI_UINT32_MAX);
239     }
240 
241     ACPI_FREE (WalkState);
242     return (AE_OK);
243 }
244 
245 
246 /*******************************************************************************
247  *
248  * FUNCTION:    LdLoadFieldElements
249  *
250  * PARAMETERS:  Op              - Parent node (Field)
251  *              WalkState       - Current walk state
252  *
253  * RETURN:      Status
254  *
255  * DESCRIPTION: Enter the named elements of the field (children of the parent)
256  *              into the namespace.
257  *
258  ******************************************************************************/
259 
260 static ACPI_STATUS
LdLoadFieldElements(ACPI_PARSE_OBJECT * Op,ACPI_WALK_STATE * WalkState)261 LdLoadFieldElements (
262     ACPI_PARSE_OBJECT       *Op,
263     ACPI_WALK_STATE         *WalkState)
264 {
265     ACPI_PARSE_OBJECT       *Child = NULL;
266     ACPI_NAMESPACE_NODE     *Node;
267     ACPI_STATUS             Status;
268 
269 
270     /* Get the first named field element */
271 
272     switch (Op->Asl.AmlOpcode)
273     {
274     case AML_BANK_FIELD_OP:
275 
276         Child = UtGetArg (Op, 6);
277         break;
278 
279     case AML_INDEX_FIELD_OP:
280 
281         Child = UtGetArg (Op, 5);
282         break;
283 
284     case AML_FIELD_OP:
285 
286         Child = UtGetArg (Op, 4);
287         break;
288 
289     default:
290 
291         /* No other opcodes should arrive here */
292 
293         return (AE_BAD_PARAMETER);
294     }
295 
296     /* Enter all elements into the namespace */
297 
298     while (Child)
299     {
300         switch (Child->Asl.AmlOpcode)
301         {
302         case AML_INT_RESERVEDFIELD_OP:
303         case AML_INT_ACCESSFIELD_OP:
304         case AML_INT_CONNECTION_OP:
305             break;
306 
307         default:
308 
309             Status = AcpiNsLookup (WalkState->ScopeInfo,
310                 Child->Asl.Value.String,
311                 ACPI_TYPE_LOCAL_REGION_FIELD,
312                 ACPI_IMODE_LOAD_PASS1,
313                 ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
314                     ACPI_NS_ERROR_IF_FOUND, NULL, &Node);
315             if (ACPI_FAILURE (Status))
316             {
317                 if (Status != AE_ALREADY_EXISTS)
318                 {
319                     AslError (ASL_ERROR, ASL_MSG_CORE_EXCEPTION, Child,
320                         Child->Asl.Value.String);
321                     return (Status);
322                 }
323                 else if (Status == AE_ALREADY_EXISTS &&
324                     (Node->Flags & ANOBJ_IS_EXTERNAL))
325                 {
326                     Node->Type = (UINT8) ACPI_TYPE_LOCAL_REGION_FIELD;
327                 }
328                 else
329                 {
330                     /*
331                      * The name already exists in this scope
332                      * But continue processing the elements
333                      */
334                     AslDualParseOpError (ASL_WARNING, ASL_MSG_EXTERN_COLLISION, Child,
335                         Child->Asl.Value.String, ASL_MSG_EXTERN_FOUND_HERE, Node->Op,
336                         Node->Op->Asl.ExternalName);
337                 }
338             }
339             else
340             {
341                 Child->Asl.Node = Node;
342                 Node->Op = Child;
343             }
344             break;
345         }
346 
347         Child = Child->Asl.Next;
348     }
349 
350     return (AE_OK);
351 }
352 
353 
354 /*******************************************************************************
355  *
356  * FUNCTION:    LdLoadResourceElements
357  *
358  * PARAMETERS:  Op              - Parent node (Resource Descriptor)
359  *              WalkState       - Current walk state
360  *
361  * RETURN:      Status
362  *
363  * DESCRIPTION: Enter the named elements of the resource descriptor (children
364  *              of the parent) into the namespace.
365  *
366  * NOTE: In the real AML namespace, these named elements never exist. But
367  *       we simply use the namespace here as a symbol table so we can look
368  *       them up as they are referenced.
369  *
370  ******************************************************************************/
371 
372 static ACPI_STATUS
LdLoadResourceElements(ACPI_PARSE_OBJECT * Op,ACPI_WALK_STATE * WalkState)373 LdLoadResourceElements (
374     ACPI_PARSE_OBJECT       *Op,
375     ACPI_WALK_STATE         *WalkState)
376 {
377     ACPI_PARSE_OBJECT       *InitializerOp = NULL;
378     ACPI_NAMESPACE_NODE     *Node;
379     ACPI_STATUS             Status;
380 
381 
382     /*
383      * Enter the resource name into the namespace. Name must not already exist.
384      * This opens a scope, so later field names are guaranteed to be new/unique.
385      */
386     Status = AcpiNsLookup (WalkState->ScopeInfo, Op->Asl.Namepath,
387         ACPI_TYPE_LOCAL_RESOURCE, ACPI_IMODE_LOAD_PASS1,
388         ACPI_NS_NO_UPSEARCH | ACPI_NS_ERROR_IF_FOUND,
389         WalkState, &Node);
390     if (ACPI_FAILURE (Status))
391     {
392         if (Status == AE_ALREADY_EXISTS)
393         {
394             /* Actual node causing the error was saved in ParentMethod */
395 
396             AslDualParseOpError (ASL_ERROR, ASL_MSG_NAME_EXISTS,
397                 (ACPI_PARSE_OBJECT *) Op->Asl.ParentMethod,
398                 Op->Asl.Namepath, ASL_MSG_FOUND_HERE, Node->Op,
399                 Node->Op->Asl.ExternalName);
400             return (AE_OK);
401         }
402         return (Status);
403     }
404 
405     Node->Value = (UINT32) Op->Asl.Value.Integer;
406     Node->Op = Op;
407     Op->Asl.Node = Node;
408 
409     /*
410      * Now enter the predefined fields, for easy lookup when referenced
411      * by the source ASL
412      */
413     InitializerOp = ASL_GET_CHILD_NODE (Op);
414     while (InitializerOp)
415     {
416         if (InitializerOp->Asl.ExternalName)
417         {
418             Status = AcpiNsLookup (WalkState->ScopeInfo,
419                 InitializerOp->Asl.ExternalName,
420                 ACPI_TYPE_LOCAL_RESOURCE_FIELD,
421                 ACPI_IMODE_LOAD_PASS1,
422                 ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE,
423                 NULL, &Node);
424             if (ACPI_FAILURE (Status))
425             {
426                 return (Status);
427             }
428 
429             /*
430              * Store the field offset and length in the namespace node
431              * so it can be used when the field is referenced
432              */
433             Node->Value = InitializerOp->Asl.Value.Tag.BitOffset;
434             Node->Length = InitializerOp->Asl.Value.Tag.BitLength;
435             InitializerOp->Asl.Node = Node;
436             Node->Op = InitializerOp;
437         }
438 
439         InitializerOp = ASL_GET_PEER_NODE (InitializerOp);
440     }
441 
442     return (AE_OK);
443 }
444 
445 
446 /*******************************************************************************
447  *
448  * FUNCTION:    LdNamespace1Begin
449  *
450  * PARAMETERS:  ASL_WALK_CALLBACK
451  *
452  * RETURN:      Status
453  *
454  * DESCRIPTION: Descending callback used during the parse tree walk. If this
455  *              is a named AML opcode, enter into the namespace
456  *
457  ******************************************************************************/
458 
459 static ACPI_STATUS
LdNamespace1Begin(ACPI_PARSE_OBJECT * Op,UINT32 Level,void * Context)460 LdNamespace1Begin (
461     ACPI_PARSE_OBJECT       *Op,
462     UINT32                  Level,
463     void                    *Context)
464 {
465     ACPI_WALK_STATE         *WalkState = (ACPI_WALK_STATE *) Context;
466     ACPI_NAMESPACE_NODE     *Node;
467     ACPI_PARSE_OBJECT       *MethodOp;
468     ACPI_STATUS             Status;
469     ACPI_OBJECT_TYPE        ObjectType;
470     ACPI_OBJECT_TYPE        ActualObjectType = ACPI_TYPE_ANY;
471     char                    *Path;
472     UINT32                  Flags = ACPI_NS_NO_UPSEARCH;
473     ACPI_PARSE_OBJECT       *Arg;
474     UINT32                  i;
475     BOOLEAN                 ForceNewScope = FALSE;
476     const ACPI_OPCODE_INFO  *OpInfo;
477     ACPI_PARSE_OBJECT       *ParentOp;
478 
479 
480     ACPI_FUNCTION_NAME (LdNamespace1Begin);
481 
482 
483     ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "Op %p [%s]\n",
484         Op, Op->Asl.ParseOpName));
485 
486     /*
487      * We are only interested in opcodes that have an associated name
488      * (or multiple names)
489      */
490     switch (Op->Asl.AmlOpcode)
491     {
492     case AML_BANK_FIELD_OP:
493     case AML_INDEX_FIELD_OP:
494     case AML_FIELD_OP:
495 
496         Status = LdLoadFieldElements (Op, WalkState);
497         return (Status);
498 
499     case AML_INT_CONNECTION_OP:
500 
501 
502         if (Op->Asl.Child->Asl.AmlOpcode != AML_INT_NAMEPATH_OP)
503         {
504             break;
505         }
506         Arg = Op->Asl.Child;
507 
508         Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Asl.ExternalName,
509             ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE, ACPI_NS_SEARCH_PARENT,
510             WalkState, &Node);
511         if (ACPI_FAILURE (Status))
512         {
513             break;
514         }
515 
516         if (Node->Type == ACPI_TYPE_BUFFER)
517         {
518             Arg->Asl.Node = Node;
519 
520             Arg = Node->Op->Asl.Child;  /* Get namepath */
521             Arg = Arg->Asl.Next;        /* Get actual buffer */
522             Arg = Arg->Asl.Child;       /* Buffer length */
523             Arg = Arg->Asl.Next;        /* RAW_DATA buffer */
524         }
525         break;
526 
527     default:
528 
529         /* All other opcodes go below */
530 
531         break;
532     }
533 
534     /* Check if this object has already been installed in the namespace */
535 
536     if (Op->Asl.Node)
537     {
538         return (AE_OK);
539     }
540 
541     /* Check for a possible illegal forward reference */
542 
543     if ((Op->Asl.ParseOpcode == PARSEOP_NAMESEG) ||
544         (Op->Asl.ParseOpcode == PARSEOP_NAMESTRING))
545     {
546         /*
547          * Op->Asl.Namepath will be NULL for these opcodes.
548          * These opcodes are guaranteed to have a parent.
549          * Examine the parent opcode.
550          */
551         Status = AE_OK;
552         ParentOp = Op->Asl.Parent;
553         OpInfo = AcpiPsGetOpcodeInfo (ParentOp->Asl.AmlOpcode);
554 
555         /*
556          * Exclude all operators that actually declare a new name:
557          *      Name (ABCD, 1) -> Ignore (AML_CLASS_NAMED_OBJECT)
558          * We only want references to named objects:
559          *      Store (2, WXYZ) -> Attempt to resolve the name
560          */
561         if (OpInfo->Class == AML_CLASS_NAMED_OBJECT)
562         {
563             return (AE_OK);
564         }
565 
566         /*
567          * Check if the referenced object exists at this point during
568          * the load:
569          * 1) If it exists, then this cannot be a forward reference.
570          * 2) If it does not exist, it could be a forward reference or
571          * it truly does not exist (and no external declaration).
572          */
573         Status = AcpiNsLookup (WalkState->ScopeInfo,
574             Op->Asl.Value.Name, ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
575             ACPI_NS_SEARCH_PARENT | ACPI_NS_DONT_OPEN_SCOPE,
576             WalkState, &Node);
577         if (Status == AE_NOT_FOUND)
578         {
579             /*
580              * This is either a foward reference or the object truly
581              * does not exist. The two cases can only be differentiated
582              * during the cross-reference stage later. Mark the Op/Name
583              * as not-found for now to indicate the need for further
584              * processing.
585              *
586              * Special case: Allow forward references from elements of
587              * Package objects. This provides compatibility with other
588              * ACPI implementations. To correctly implement this, the
589              * ACPICA table load defers package resolution until the entire
590              * namespace has been loaded.
591              */
592             if ((ParentOp->Asl.ParseOpcode != PARSEOP_PACKAGE) &&
593                 (ParentOp->Asl.ParseOpcode != PARSEOP_VAR_PACKAGE))
594             {
595                 Op->Asl.CompileFlags |= OP_NOT_FOUND_DURING_LOAD;
596             }
597 
598             return (AE_OK);
599         }
600 
601         return (Status);
602     }
603 
604     Path = Op->Asl.Namepath;
605     if (!Path)
606     {
607         return (AE_OK);
608     }
609 
610     /* Map the raw opcode into an internal object type */
611 
612     switch (Op->Asl.ParseOpcode)
613     {
614     case PARSEOP_NAME:
615 
616         Arg = Op->Asl.Child;  /* Get the NameSeg/NameString node */
617         Arg = Arg->Asl.Next;  /* First peer is the object to be associated with the name */
618 
619         /*
620          * If this name refers to a ResourceTemplate, we will need to open
621          * a new scope so that the resource subfield names can be entered into
622          * the namespace underneath this name
623          */
624         if (Op->Asl.CompileFlags & OP_IS_RESOURCE_DESC)
625         {
626             ForceNewScope = TRUE;
627         }
628 
629         /* Get the data type associated with the named object, not the name itself */
630 
631         /* Log2 loop to convert from Btype (binary) to Etype (encoded) */
632 
633         ObjectType = 1;
634         for (i = 1; i < Arg->Asl.AcpiBtype; i *= 2)
635         {
636             ObjectType++;
637         }
638         break;
639 
640     case PARSEOP_EXTERNAL:
641         /*
642          * "External" simply enters a name and type into the namespace.
643          * We must be careful to not open a new scope, however, no matter
644          * what type the external name refers to (e.g., a method)
645          *
646          * first child is name, next child is ObjectType
647          */
648         ActualObjectType = (UINT8) Op->Asl.Child->Asl.Next->Asl.Value.Integer;
649         ObjectType = ACPI_TYPE_ANY;
650 
651         /*
652          * We will mark every new node along the path as "External". This
653          * allows some or all of the nodes to be created later in the ASL
654          * code. Handles cases like this:
655          *
656          *   External (\_SB_.PCI0.ABCD, IntObj)
657          *   Scope (_SB_)
658          *   {
659          *       Device (PCI0)
660          *       {
661          *       }
662          *   }
663          *   Method (X)
664          *   {
665          *       Store (\_SB_.PCI0.ABCD, Local0)
666          *   }
667          */
668         Flags |= ACPI_NS_EXTERNAL;
669         break;
670 
671     case PARSEOP_DEFAULT_ARG:
672 
673         if (Op->Asl.CompileFlags == OP_IS_RESOURCE_DESC)
674         {
675             Status = LdLoadResourceElements (Op, WalkState);
676             return_ACPI_STATUS (Status);
677         }
678 
679         ObjectType = AslMapNamedOpcodeToDataType (Op->Asl.AmlOpcode);
680         break;
681 
682     case PARSEOP_SCOPE:
683         /*
684          * The name referenced by Scope(Name) must already exist at this point.
685          * In other words, forward references for Scope() are not supported.
686          * The only real reason for this is that the MS interpreter cannot
687          * handle this case. Perhaps someday this case can go away.
688          */
689         Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ACPI_TYPE_ANY,
690             ACPI_IMODE_EXECUTE, ACPI_NS_SEARCH_PARENT,
691             WalkState, &(Node));
692         if (ACPI_FAILURE (Status))
693         {
694             if (Status == AE_NOT_FOUND)
695             {
696                 /* The name was not found, go ahead and create it */
697 
698                 Status = AcpiNsLookup (WalkState->ScopeInfo, Path,
699                     ACPI_TYPE_LOCAL_SCOPE,
700                     ACPI_IMODE_LOAD_PASS1, Flags,
701                     WalkState, &(Node));
702                 if (ACPI_FAILURE (Status))
703                 {
704                     return_ACPI_STATUS (Status);
705                 }
706 
707                 /*
708                  * However, this is an error -- primarily because the MS
709                  * interpreter can't handle a forward reference from the
710                  * Scope() operator.
711                  */
712                 AslError (ASL_ERROR, ASL_MSG_NOT_FOUND, Op,
713                     Op->Asl.ExternalName);
714                 AslError (ASL_ERROR, ASL_MSG_SCOPE_FWD_REF, Op,
715                     Op->Asl.ExternalName);
716                 goto FinishNode;
717             }
718 
719             AslCoreSubsystemError (Op, Status,
720                 "Failure from namespace lookup", FALSE);
721 
722             return_ACPI_STATUS (Status);
723         }
724         else /* Status AE_OK */
725         {
726             /*
727              * Do not allow references to external scopes from the DSDT.
728              * This is because the DSDT is always loaded first, and the
729              * external reference cannot be resolved -- causing a runtime
730              * error because Scope() must be resolved immediately.
731              * 10/2015.
732              */
733             if ((Node->Flags & ANOBJ_IS_EXTERNAL) &&
734                 (ACPI_COMPARE_NAME (Gbl_TableSignature, "DSDT")))
735             {
736                 /* However, allowed if the reference is within a method */
737 
738                 MethodOp = Op->Asl.Parent;
739                 while (MethodOp &&
740                       (MethodOp->Asl.ParseOpcode != PARSEOP_METHOD))
741                 {
742                     MethodOp = MethodOp->Asl.Parent;
743                 }
744 
745                 if (!MethodOp)
746                 {
747                     /* Not in a control method, error */
748 
749                     AslError (ASL_ERROR, ASL_MSG_CROSS_TABLE_SCOPE, Op, NULL);
750                 }
751             }
752         }
753 
754         /* We found a node with this name, now check the type */
755 
756         switch (Node->Type)
757         {
758         case ACPI_TYPE_LOCAL_SCOPE:
759         case ACPI_TYPE_DEVICE:
760         case ACPI_TYPE_POWER:
761         case ACPI_TYPE_PROCESSOR:
762         case ACPI_TYPE_THERMAL:
763 
764             /* These are acceptable types - they all open a new scope */
765             break;
766 
767         case ACPI_TYPE_INTEGER:
768         case ACPI_TYPE_STRING:
769         case ACPI_TYPE_BUFFER:
770             /*
771              * These types we will allow, but we will change the type.
772              * This enables some existing code of the form:
773              *
774              *  Name (DEB, 0)
775              *  Scope (DEB) { ... }
776              *
777              * Which is used to workaround the fact that the MS interpreter
778              * does not allow Scope() forward references.
779              */
780             sprintf (MsgBuffer, "%s [%s], changing type to [Scope]",
781                 Op->Asl.ExternalName, AcpiUtGetTypeName (Node->Type));
782             AslError (ASL_REMARK, ASL_MSG_SCOPE_TYPE, Op, MsgBuffer);
783 
784             /* Switch the type to scope, open the new scope */
785 
786             Node->Type = ACPI_TYPE_LOCAL_SCOPE;
787             Status = AcpiDsScopeStackPush (Node, ACPI_TYPE_LOCAL_SCOPE,
788                 WalkState);
789             if (ACPI_FAILURE (Status))
790             {
791                 return_ACPI_STATUS (Status);
792             }
793             break;
794 
795         default:
796 
797             /* All other types are an error */
798 
799             sprintf (MsgBuffer, "%s [%s]", Op->Asl.ExternalName,
800                 AcpiUtGetTypeName (Node->Type));
801             AslError (ASL_ERROR, ASL_MSG_SCOPE_TYPE, Op, MsgBuffer);
802 
803             /*
804              * However, switch the type to be an actual scope so
805              * that compilation can continue without generating a whole
806              * cascade of additional errors. Open the new scope.
807              */
808             Node->Type = ACPI_TYPE_LOCAL_SCOPE;
809             Status = AcpiDsScopeStackPush (Node, ACPI_TYPE_LOCAL_SCOPE,
810                 WalkState);
811             if (ACPI_FAILURE (Status))
812             {
813                 return_ACPI_STATUS (Status);
814             }
815             break;
816         }
817 
818         Status = AE_OK;
819         goto FinishNode;
820 
821     default:
822 
823         ObjectType = AslMapNamedOpcodeToDataType (Op->Asl.AmlOpcode);
824         break;
825     }
826 
827 
828     ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "Loading name: %s, (%s)\n",
829         Op->Asl.ExternalName, AcpiUtGetTypeName (ObjectType)));
830 
831     /* The name must not already exist */
832 
833     Flags |= ACPI_NS_ERROR_IF_FOUND;
834 
835     /*
836      * Enter the named type into the internal namespace. We enter the name
837      * as we go downward in the parse tree. Any necessary subobjects that
838      * involve arguments to the opcode must be created as we go back up the
839      * parse tree later.
840      */
841     Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ObjectType,
842         ACPI_IMODE_LOAD_PASS1, Flags, WalkState, &Node);
843     if (ACPI_FAILURE (Status))
844     {
845         if (Status == AE_ALREADY_EXISTS)
846         {
847             /* The name already exists in this scope */
848 
849             if (Node->Type == ACPI_TYPE_LOCAL_SCOPE)
850             {
851                 /* Allow multiple references to the same scope */
852 
853                 Node->Type = (UINT8) ObjectType;
854                 Status = AE_OK;
855             }
856             else if ((Node->Flags & ANOBJ_IS_EXTERNAL) &&
857                      (Op->Asl.ParseOpcode != PARSEOP_EXTERNAL))
858             {
859                 /*
860                  * Allow one create on an object or segment that was
861                  * previously declared External
862                  */
863                 Node->Flags &= ~ANOBJ_IS_EXTERNAL;
864                 Node->Type = (UINT8) ObjectType;
865 
866                 /* Just retyped a node, probably will need to open a scope */
867 
868                 if (AcpiNsOpensScope (ObjectType))
869                 {
870                     Status = AcpiDsScopeStackPush (Node, ObjectType, WalkState);
871                     if (ACPI_FAILURE (Status))
872                     {
873                         return_ACPI_STATUS (Status);
874                     }
875                 }
876 
877                 Status = AE_OK;
878             }
879             else if (!(Node->Flags & ANOBJ_IS_EXTERNAL) &&
880                      (Op->Asl.ParseOpcode == PARSEOP_EXTERNAL))
881             {
882                 /*
883                  * Allow externals in same scope as the definition of the
884                  * actual object. Similar to C. Allows multiple definition
885                  * blocks that refer to each other in the same file.
886                  */
887                 Status = AE_OK;
888             }
889             else if ((Node->Flags & ANOBJ_IS_EXTERNAL) &&
890                      (Op->Asl.ParseOpcode == PARSEOP_EXTERNAL) &&
891                      (ObjectType == ACPI_TYPE_ANY))
892             {
893                 /* Allow update of externals of unknown type. */
894 
895                 if (AcpiNsOpensScope (ActualObjectType))
896                 {
897                     Node->Type = (UINT8) ActualObjectType;
898                     Status = AE_OK;
899                 }
900                 else
901                 {
902                     sprintf (MsgBuffer, "%s [%s]", Op->Asl.ExternalName,
903                         AcpiUtGetTypeName (Node->Type));
904                     AslError (ASL_ERROR, ASL_MSG_SCOPE_TYPE, Op, MsgBuffer);
905                     return_ACPI_STATUS (AE_OK);
906                 }
907             }
908             else
909             {
910                 /* Valid error, object already exists */
911 
912                 AslDualParseOpError (ASL_ERROR, ASL_MSG_NAME_EXISTS, Op,
913                     Op->Asl.ExternalName, ASL_MSG_FOUND_HERE, Node->Op,
914                     Node->Op->Asl.ExternalName);
915                 return_ACPI_STATUS (AE_OK);
916             }
917         }
918         else
919         {
920             AslCoreSubsystemError (Op, Status,
921                 "Failure from namespace lookup", FALSE);
922             return_ACPI_STATUS (Status);
923         }
924     }
925 
926     if (ForceNewScope)
927     {
928         Status = AcpiDsScopeStackPush (Node, ObjectType, WalkState);
929         if (ACPI_FAILURE (Status))
930         {
931             return_ACPI_STATUS (Status);
932         }
933     }
934 
935 FinishNode:
936     /*
937      * Point the parse node to the new namespace node, and point
938      * the Node back to the original Parse node
939      */
940     Op->Asl.Node = Node;
941     Node->Op = Op;
942 
943     /* Set the actual data type if appropriate (EXTERNAL term only) */
944 
945     if (ActualObjectType != ACPI_TYPE_ANY)
946     {
947         Node->Type = (UINT8) ActualObjectType;
948         Node->Value = ASL_EXTERNAL_METHOD;
949     }
950 
951     if (Op->Asl.ParseOpcode == PARSEOP_METHOD)
952     {
953         /*
954          * Get the method argument count from "Extra" and save
955          * it in the namespace node
956          */
957         Node->Value = (UINT32) Op->Asl.Extra;
958     }
959 
960     return_ACPI_STATUS (Status);
961 }
962 
963 
964 /*******************************************************************************
965  *
966  * FUNCTION:    LdNamespace2Begin
967  *
968  * PARAMETERS:  ASL_WALK_CALLBACK
969  *
970  * RETURN:      Status
971  *
972  * DESCRIPTION: Descending callback used during the pass 2 parse tree walk.
973  *              Second pass resolves some forward references.
974  *
975  * Notes:
976  * Currently only needs to handle the Alias operator.
977  * Could be used to allow forward references from the Scope() operator, but
978  * the MS interpreter does not allow this, so this compiler does not either.
979  *
980  ******************************************************************************/
981 
982 static ACPI_STATUS
LdNamespace2Begin(ACPI_PARSE_OBJECT * Op,UINT32 Level,void * Context)983 LdNamespace2Begin (
984     ACPI_PARSE_OBJECT       *Op,
985     UINT32                  Level,
986     void                    *Context)
987 {
988     ACPI_WALK_STATE         *WalkState = (ACPI_WALK_STATE *) Context;
989     ACPI_STATUS             Status;
990     ACPI_NAMESPACE_NODE     *Node;
991     ACPI_OBJECT_TYPE        ObjectType;
992     BOOLEAN                 ForceNewScope = FALSE;
993     ACPI_PARSE_OBJECT       *Arg;
994     char                    *Path;
995     ACPI_NAMESPACE_NODE     *TargetNode;
996 
997 
998     ACPI_FUNCTION_NAME (LdNamespace2Begin);
999     ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "Op %p [%s]\n",
1000         Op, Op->Asl.ParseOpName));
1001 
1002 
1003     /* Ignore Ops with no namespace node */
1004 
1005     Node = Op->Asl.Node;
1006     if (!Node)
1007     {
1008         return (AE_OK);
1009     }
1010 
1011     /* Get the type to determine if we should push the scope */
1012 
1013     if ((Op->Asl.ParseOpcode == PARSEOP_DEFAULT_ARG) &&
1014         (Op->Asl.CompileFlags == OP_IS_RESOURCE_DESC))
1015     {
1016         ObjectType = ACPI_TYPE_LOCAL_RESOURCE;
1017     }
1018     else
1019     {
1020         ObjectType = AslMapNamedOpcodeToDataType (Op->Asl.AmlOpcode);
1021     }
1022 
1023     /* Push scope for Resource Templates */
1024 
1025     if (Op->Asl.ParseOpcode == PARSEOP_NAME)
1026     {
1027         if (Op->Asl.CompileFlags & OP_IS_RESOURCE_DESC)
1028         {
1029             ForceNewScope = TRUE;
1030         }
1031     }
1032 
1033     /* Push the scope stack */
1034 
1035     if (ForceNewScope || AcpiNsOpensScope (ObjectType))
1036     {
1037         Status = AcpiDsScopeStackPush (Node, ObjectType, WalkState);
1038         if (ACPI_FAILURE (Status))
1039         {
1040             return_ACPI_STATUS (Status);
1041         }
1042     }
1043 
1044     if (Op->Asl.ParseOpcode == PARSEOP_ALIAS)
1045     {
1046         /* Complete the alias node by getting and saving the target node */
1047 
1048         /* First child is the alias target */
1049 
1050         Arg = Op->Asl.Child;
1051 
1052         /* Get the target pathname */
1053 
1054         Path = Arg->Asl.Namepath;
1055         if (!Path)
1056         {
1057             Status = UtInternalizeName (Arg->Asl.ExternalName, &Path);
1058             if (ACPI_FAILURE (Status))
1059             {
1060                 return (Status);
1061             }
1062         }
1063 
1064         /* Get the NS node associated with the target. It must exist. */
1065 
1066         Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ACPI_TYPE_ANY,
1067             ACPI_IMODE_EXECUTE, ACPI_NS_SEARCH_PARENT | ACPI_NS_DONT_OPEN_SCOPE,
1068             WalkState, &TargetNode);
1069         if (ACPI_FAILURE (Status))
1070         {
1071             if (Status == AE_NOT_FOUND)
1072             {
1073                 AslError (ASL_ERROR, ASL_MSG_NOT_FOUND, Op,
1074                     Op->Asl.ExternalName);
1075 
1076                 /*
1077                  * The name was not found, go ahead and create it.
1078                  * This prevents more errors later.
1079                  */
1080                 Status = AcpiNsLookup (WalkState->ScopeInfo, Path,
1081                     ACPI_TYPE_ANY,
1082                     ACPI_IMODE_LOAD_PASS1, ACPI_NS_NO_UPSEARCH,
1083                     WalkState, &(Node));
1084                 return (AE_OK);
1085             }
1086 
1087             AslCoreSubsystemError (Op, Status,
1088                 "Failure from namespace lookup", FALSE);
1089             return (AE_OK);
1090         }
1091 
1092         /* Save the target node within the alias node */
1093 
1094         Node->Object = ACPI_CAST_PTR (ACPI_OPERAND_OBJECT, TargetNode);
1095     }
1096 
1097     return (AE_OK);
1098 }
1099 
1100 
1101 /*******************************************************************************
1102  *
1103  * FUNCTION:    LdCommonNamespaceEnd
1104  *
1105  * PARAMETERS:  ASL_WALK_CALLBACK
1106  *
1107  * RETURN:      Status
1108  *
1109  * DESCRIPTION: Ascending callback used during the loading of the namespace,
1110  *              We only need to worry about managing the scope stack here.
1111  *
1112  ******************************************************************************/
1113 
1114 static ACPI_STATUS
LdCommonNamespaceEnd(ACPI_PARSE_OBJECT * Op,UINT32 Level,void * Context)1115 LdCommonNamespaceEnd (
1116     ACPI_PARSE_OBJECT       *Op,
1117     UINT32                  Level,
1118     void                    *Context)
1119 {
1120     ACPI_WALK_STATE         *WalkState = (ACPI_WALK_STATE *) Context;
1121     ACPI_OBJECT_TYPE        ObjectType;
1122     BOOLEAN                 ForceNewScope = FALSE;
1123 
1124 
1125     ACPI_FUNCTION_NAME (LdCommonNamespaceEnd);
1126 
1127 
1128     /* We are only interested in opcodes that have an associated name */
1129 
1130     if (!Op->Asl.Namepath)
1131     {
1132         return (AE_OK);
1133     }
1134 
1135     /* Get the type to determine if we should pop the scope */
1136 
1137     if ((Op->Asl.ParseOpcode == PARSEOP_DEFAULT_ARG) &&
1138         (Op->Asl.CompileFlags == OP_IS_RESOURCE_DESC))
1139     {
1140         /* TBD: Merge into AcpiDsMapNamedOpcodeToDataType */
1141 
1142         ObjectType = ACPI_TYPE_LOCAL_RESOURCE;
1143     }
1144     else
1145     {
1146         ObjectType = AslMapNamedOpcodeToDataType (Op->Asl.AmlOpcode);
1147     }
1148 
1149     /* Pop scope that was pushed for Resource Templates */
1150 
1151     if (Op->Asl.ParseOpcode == PARSEOP_NAME)
1152     {
1153         if (Op->Asl.CompileFlags & OP_IS_RESOURCE_DESC)
1154         {
1155             ForceNewScope = TRUE;
1156         }
1157     }
1158 
1159     /* Pop the scope stack */
1160 
1161     if (ForceNewScope || AcpiNsOpensScope (ObjectType))
1162     {
1163         ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
1164             "(%s): Popping scope for Op [%s] %p\n",
1165             AcpiUtGetTypeName (ObjectType), Op->Asl.ParseOpName, Op));
1166 
1167         (void) AcpiDsScopeStackPop (WalkState);
1168     }
1169 
1170     return (AE_OK);
1171 }
1172