1 /******************************************************************************
2 *
3 * Module Name: aslxref - Namespace cross-reference
4 *
5 *****************************************************************************/
6
7 /******************************************************************************
8 *
9 * 1. Copyright Notice
10 *
11 * Some or all of this work - Copyright (c) 1999 - 2026, 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 <contrib/dev/acpica/compiler/aslcompiler.h>
153 #include "aslcompiler.y.h"
154 #include <contrib/dev/acpica/include/acparser.h>
155 #include <contrib/dev/acpica/include/amlcode.h>
156 #include <contrib/dev/acpica/include/acnamesp.h>
157 #include <contrib/dev/acpica/include/acdispat.h>
158
159
160 #define _COMPONENT ACPI_COMPILER
161 ACPI_MODULE_NAME ("aslxref")
162
163 /* Local prototypes */
164
165 static ACPI_STATUS
166 XfNamespaceLocateBegin (
167 ACPI_PARSE_OBJECT *Op,
168 UINT32 Level,
169 void *Context);
170
171 static ACPI_STATUS
172 XfNamespaceLocateEnd (
173 ACPI_PARSE_OBJECT *Op,
174 UINT32 Level,
175 void *Context);
176
177 static BOOLEAN
178 XfValidateCrossReference (
179 ACPI_PARSE_OBJECT *Op,
180 const ACPI_OPCODE_INFO *OpInfo,
181 ACPI_NAMESPACE_NODE *Node);
182
183 static BOOLEAN
184 XfObjectExists (
185 char *Name);
186
187 static ACPI_STATUS
188 XfCompareOneNamespaceObject (
189 ACPI_HANDLE ObjHandle,
190 UINT32 Level,
191 void *Context,
192 void **ReturnValue);
193
194 static void
195 XfCheckFieldRange (
196 ACPI_PARSE_OBJECT *Op,
197 UINT32 RegionBitLength,
198 UINT32 FieldBitOffset,
199 UINT32 FieldBitLength,
200 UINT32 AccessBitWidth);
201
202 static BOOLEAN
203 XfFindCondRefOfName (
204 ACPI_NAMESPACE_NODE *Node,
205 ACPI_PARSE_OBJECT *Op);
206
207 static BOOLEAN
208 XfRefIsGuardedByIfCondRefOf (
209 ACPI_NAMESPACE_NODE *Node,
210 ACPI_PARSE_OBJECT *Op);
211
212
213 /*******************************************************************************
214 *
215 * FUNCTION: XfCrossReferenceNamespace
216 *
217 * PARAMETERS: None
218 *
219 * RETURN: Status
220 *
221 * DESCRIPTION: Perform a cross reference check of the parse tree against the
222 * namespace. Every named referenced within the parse tree
223 * should be get resolved with a namespace lookup. If not, the
224 * original reference in the ASL code is invalid -- i.e., refers
225 * to a non-existent object.
226 *
227 * NOTE: The ASL "External" operator causes the name to be inserted into the
228 * namespace so that references to the external name will be resolved
229 * correctly here.
230 *
231 ******************************************************************************/
232
233 ACPI_STATUS
XfCrossReferenceNamespace(void)234 XfCrossReferenceNamespace (
235 void)
236 {
237 ACPI_WALK_STATE *WalkState;
238
239
240 /*
241 * Create a new walk state for use when looking up names
242 * within the namespace (Passed as context to the callbacks)
243 */
244 WalkState = AcpiDsCreateWalkState (0, NULL, NULL, NULL);
245 if (!WalkState)
246 {
247 return (AE_NO_MEMORY);
248 }
249
250 /* Walk the entire parse tree */
251
252 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_TWICE,
253 XfNamespaceLocateBegin, XfNamespaceLocateEnd, WalkState);
254
255 ACPI_FREE (WalkState);
256 return (AE_OK);
257 }
258
259
260 /*******************************************************************************
261 *
262 * FUNCTION: XfObjectExists
263 *
264 * PARAMETERS: Name - 4 char ACPI name
265 *
266 * RETURN: TRUE if name exists in namespace
267 *
268 * DESCRIPTION: Walk the namespace to find an object
269 *
270 ******************************************************************************/
271
272 static BOOLEAN
XfObjectExists(char * Name)273 XfObjectExists (
274 char *Name)
275 {
276 ACPI_STATUS Status;
277
278
279 /* Walk entire namespace from the supplied root */
280
281 Status = AcpiNsWalkNamespace (ACPI_TYPE_ANY, ACPI_ROOT_OBJECT,
282 ACPI_UINT32_MAX, FALSE, XfCompareOneNamespaceObject, NULL,
283 Name, NULL);
284 if (Status == AE_CTRL_TRUE)
285 {
286 /* At least one instance of the name was found */
287
288 return (TRUE);
289 }
290
291 return (FALSE);
292 }
293
294
295 /*******************************************************************************
296 *
297 * FUNCTION: XfCompareOneNamespaceObject
298 *
299 * PARAMETERS: ACPI_WALK_CALLBACK
300 *
301 * RETURN: Status
302 *
303 * DESCRIPTION: Compare name of one object.
304 *
305 ******************************************************************************/
306
307 static ACPI_STATUS
XfCompareOneNamespaceObject(ACPI_HANDLE ObjHandle,UINT32 Level,void * Context,void ** ReturnValue)308 XfCompareOneNamespaceObject (
309 ACPI_HANDLE ObjHandle,
310 UINT32 Level,
311 void *Context,
312 void **ReturnValue)
313 {
314 ACPI_NAMESPACE_NODE *Node = (ACPI_NAMESPACE_NODE *) ObjHandle;
315
316
317 /* Simply check the name */
318
319 if (*((UINT32 *) (Context)) == Node->Name.Integer)
320 {
321 /* Abort walk if we found one instance */
322
323 return (AE_CTRL_TRUE);
324 }
325
326 return (AE_OK);
327 }
328
329
330 /*******************************************************************************
331 *
332 * FUNCTION: XfCheckFieldRange
333 *
334 * PARAMETERS: RegionBitLength - Length of entire parent region
335 * FieldBitOffset - Start of the field unit (within region)
336 * FieldBitLength - Entire length of field unit
337 * AccessBitWidth - Access width of the field unit
338 *
339 * RETURN: None
340 *
341 * DESCRIPTION: Check one field unit to make sure it fits in the parent
342 * op region.
343 *
344 * Note: AccessBitWidth must be either 8,16,32, or 64
345 *
346 ******************************************************************************/
347
348 static void
XfCheckFieldRange(ACPI_PARSE_OBJECT * Op,UINT32 RegionBitLength,UINT32 FieldBitOffset,UINT32 FieldBitLength,UINT32 AccessBitWidth)349 XfCheckFieldRange (
350 ACPI_PARSE_OBJECT *Op,
351 UINT32 RegionBitLength,
352 UINT32 FieldBitOffset,
353 UINT32 FieldBitLength,
354 UINT32 AccessBitWidth)
355 {
356 UINT32 FieldEndBitOffset;
357
358
359 /*
360 * Check each field unit against the region size. The entire
361 * field unit (start offset plus length) must fit within the
362 * region.
363 */
364 FieldEndBitOffset = FieldBitOffset + FieldBitLength;
365
366 if (FieldEndBitOffset > RegionBitLength)
367 {
368 /* Field definition itself is beyond the end-of-region */
369
370 AslError (ASL_ERROR, ASL_MSG_FIELD_UNIT_OFFSET, Op, NULL);
371 return;
372 }
373
374 /*
375 * Now check that the field plus AccessWidth doesn't go beyond
376 * the end-of-region. Assumes AccessBitWidth is a power of 2
377 */
378 FieldEndBitOffset = ACPI_ROUND_UP (FieldEndBitOffset, AccessBitWidth);
379
380 if (FieldEndBitOffset > RegionBitLength)
381 {
382 /* Field definition combined with the access is beyond EOR */
383
384 AslError (ASL_ERROR, ASL_MSG_FIELD_UNIT_ACCESS_WIDTH, Op, NULL);
385 }
386 }
387
388
389 /*******************************************************************************
390 *
391 * FUNCTION: XfNamespaceLocateBegin
392 *
393 * PARAMETERS: ASL_WALK_CALLBACK
394 *
395 * RETURN: Status
396 *
397 * DESCRIPTION: Descending callback used during cross-reference. For named
398 * object references, attempt to locate the name in the
399 * namespace.
400 *
401 * NOTE: ASL references to named fields within resource descriptors are
402 * resolved to integer values here. Therefore, this step is an
403 * important part of the code generation. We don't know that the
404 * name refers to a resource descriptor until now.
405 *
406 ******************************************************************************/
407
408 static ACPI_STATUS
XfNamespaceLocateBegin(ACPI_PARSE_OBJECT * Op,UINT32 Level,void * Context)409 XfNamespaceLocateBegin (
410 ACPI_PARSE_OBJECT *Op,
411 UINT32 Level,
412 void *Context)
413 {
414 ACPI_WALK_STATE *WalkState = (ACPI_WALK_STATE *) Context;
415 ACPI_NAMESPACE_NODE *Node;
416 ACPI_STATUS Status;
417 ACPI_OBJECT_TYPE ObjectType;
418 char *Path;
419 UINT8 PassedArgs;
420 ACPI_PARSE_OBJECT *NextOp;
421 ACPI_PARSE_OBJECT *OwningOp;
422 ACPI_PARSE_OBJECT *SpaceIdOp;
423 UINT32 MinimumLength;
424 UINT32 Offset;
425 UINT32 FieldBitLength;
426 UINT32 TagBitLength;
427 UINT8 Message = 0;
428 const ACPI_OPCODE_INFO *OpInfo;
429 UINT32 Flags;
430 ASL_METHOD_LOCAL *MethodLocals = NULL;
431 ASL_METHOD_LOCAL *MethodArgs = NULL;
432 int RegisterNumber;
433 UINT32 i;
434 ACPI_NAMESPACE_NODE *DeclarationParentMethod;
435 ACPI_PARSE_OBJECT *ReferenceParentMethod;
436 char *ExternalPath;
437
438
439 ACPI_FUNCTION_TRACE_PTR (XfNamespaceLocateBegin, Op);
440
441
442 if ((Op->Asl.AmlOpcode == AML_METHOD_OP) && Op->Asl.Node)
443 {
444 Node = Op->Asl.Node;
445
446 /* Support for method LocalX/ArgX analysis */
447
448 if (!Node->MethodLocals)
449 {
450 /* Create local/arg info blocks */
451
452 MethodLocals = UtLocalCalloc (
453 sizeof (ASL_METHOD_LOCAL) * ACPI_METHOD_NUM_LOCALS);
454 Node->MethodLocals = MethodLocals;
455
456 MethodArgs = UtLocalCalloc (
457 sizeof (ASL_METHOD_LOCAL) * ACPI_METHOD_NUM_ARGS);
458 Node->MethodArgs = MethodArgs;
459
460 /*
461 * Get the method argument count
462 * First, get the name node
463 */
464 NextOp = Op->Asl.Child;
465
466 /* Get the NumArguments node */
467
468 NextOp = NextOp->Asl.Next;
469 Node->ArgCount = (UINT8)
470 (((UINT8) NextOp->Asl.Value.Integer) & 0x07);
471
472 /* We will track all possible ArgXs */
473
474 for (i = 0; i < ACPI_METHOD_NUM_ARGS; i++)
475 {
476 if (i < Node->ArgCount)
477 {
478 /* Real Args are always "initialized" */
479
480 MethodArgs[i].Flags = ASL_ARG_INITIALIZED;
481 }
482 else
483 {
484 /* Other ArgXs can be used as locals */
485
486 MethodArgs[i].Flags = ASL_ARG_IS_LOCAL;
487 }
488
489 MethodArgs[i].Op = Op;
490 }
491 }
492 }
493
494 /*
495 * If this node is the actual declaration of a name
496 * [such as the XXXX name in "Method (XXXX)"],
497 * we are not interested in it here. We only care about names that are
498 * references to other objects within the namespace and the parent objects
499 * of name declarations
500 */
501 if (Op->Asl.CompileFlags & OP_IS_NAME_DECLARATION)
502 {
503 return_ACPI_STATUS (AE_OK);
504 }
505
506 OpInfo = AcpiPsGetOpcodeInfo (Op->Asl.AmlOpcode);
507
508 /* Check method LocalX variables */
509
510 if (OpInfo->Type == AML_TYPE_LOCAL_VARIABLE)
511 {
512 /* Find parent method Op */
513
514 NextOp = UtGetParentMethodOp (Op);
515 if (!NextOp)
516 {
517 return_ACPI_STATUS (AE_OK);
518 }
519
520 /* Get method node */
521
522 Node = NextOp->Asl.Node;
523
524 RegisterNumber = Op->Asl.AmlOpcode & 0x0007; /* 0x60 through 0x67 */
525 MethodLocals = Node->MethodLocals;
526
527 if (Op->Asl.CompileFlags & OP_IS_TARGET)
528 {
529 /* Local is being initialized */
530
531 MethodLocals[RegisterNumber].Flags |= ASL_LOCAL_INITIALIZED;
532 MethodLocals[RegisterNumber].Op = Op;
533
534 return_ACPI_STATUS (AE_OK);
535 }
536
537 /* Mark this Local as referenced */
538
539 MethodLocals[RegisterNumber].Flags |= ASL_LOCAL_REFERENCED;
540 MethodLocals[RegisterNumber].Op = Op;
541
542 return_ACPI_STATUS (AE_OK);
543 }
544
545 /* Check method ArgX variables */
546
547 if (OpInfo->Type == AML_TYPE_METHOD_ARGUMENT)
548 {
549 /* Find parent method Op */
550
551 NextOp = UtGetParentMethodOp (Op);
552 if (!NextOp)
553 {
554 return_ACPI_STATUS (AE_OK);
555 }
556
557 /* Get method node */
558
559 Node = NextOp->Asl.Node;
560
561 /* Malformed tree: parent method has no namespace node */
562 if (!Node)
563 {
564 return_ACPI_STATUS (AE_OK);
565 }
566
567 /* Get Arg # */
568
569 RegisterNumber = Op->Asl.AmlOpcode - AML_ARG0; /* 0x68 through 0x6F */
570 MethodArgs = Node->MethodArgs;
571
572 /* Gracefully handle malformed trees where method args were not set up */
573 if (!MethodArgs)
574 {
575 return_ACPI_STATUS (AE_OK);
576 }
577
578 /* Mark this Arg as referenced */
579
580 MethodArgs[RegisterNumber].Flags |= ASL_ARG_REFERENCED;
581 MethodArgs[RegisterNumber].Op = Op;
582
583 if (Op->Asl.CompileFlags & OP_IS_TARGET)
584 {
585 /* Arg is being initialized */
586
587 MethodArgs[RegisterNumber].Flags |= ASL_ARG_INITIALIZED;
588 }
589
590 return_ACPI_STATUS (AE_OK);
591 }
592
593 /*
594 * After method ArgX and LocalX, we are only interested in opcodes
595 * that have an associated name
596 */
597 if ((!(OpInfo->Flags & AML_NAMED)) &&
598 (!(OpInfo->Flags & AML_CREATE)) &&
599 (Op->Asl.ParseOpcode != PARSEOP_NAMESTRING) &&
600 (Op->Asl.ParseOpcode != PARSEOP_NAMESEG) &&
601 (Op->Asl.ParseOpcode != PARSEOP_METHODCALL) &&
602 (Op->Asl.ParseOpcode != PARSEOP_EXTERNAL))
603 {
604 return_ACPI_STATUS (AE_OK);
605 }
606
607 /*
608 * We must enable the "search-to-root" for single NameSegs, but
609 * we have to be very careful about opening up scopes
610 */
611 Flags = ACPI_NS_SEARCH_PARENT;
612 if ((Op->Asl.ParseOpcode == PARSEOP_NAMESTRING) ||
613 (Op->Asl.ParseOpcode == PARSEOP_NAMESEG) ||
614 (Op->Asl.ParseOpcode == PARSEOP_METHODCALL) ||
615 (Op->Asl.ParseOpcode == PARSEOP_EXTERNAL) ||
616 (Op->Asl.ParseOpcode == PARSEOP_CONDREFOF))
617 {
618 /*
619 * These are name references, do not push the scope stack
620 * for them.
621 */
622 Flags |= ACPI_NS_DONT_OPEN_SCOPE;
623 }
624
625 /* Get the NamePath from the appropriate place */
626
627 if (OpInfo->Flags & AML_NAMED)
628 {
629 /* For nearly all NAMED operators, the name reference is the first child */
630
631 Path = Op->Asl.Child->Asl.Value.String;
632 if (Op->Asl.AmlOpcode == AML_ALIAS_OP)
633 {
634 /*
635 * ALIAS is the only oddball opcode, the name declaration
636 * (alias name) is the second operand
637 */
638 Path = Op->Asl.Child->Asl.Next->Asl.Value.String;
639 }
640 }
641 else if (OpInfo->Flags & AML_CREATE)
642 {
643 /* Name must appear as the last parameter */
644
645 NextOp = Op->Asl.Child;
646 while (!(NextOp->Asl.CompileFlags & OP_IS_NAME_DECLARATION))
647 {
648 NextOp = NextOp->Asl.Next;
649 }
650
651 Path = NextOp->Asl.Value.String;
652 }
653 else
654 {
655 Path = Op->Asl.Value.String;
656 }
657
658 ObjectType = AslMapNamedOpcodeToDataType (Op->Asl.AmlOpcode);
659 ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
660 "Type=%s\n", AcpiUtGetTypeName (ObjectType)));
661
662 /*
663 * Lookup the name in the namespace. Name must exist at this point, or it
664 * is an invalid reference.
665 *
666 * The namespace is also used as a lookup table for references to resource
667 * descriptors and the fields within them.
668 */
669 AslGbl_NsLookupCount++;
670
671 Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ObjectType,
672 ACPI_IMODE_EXECUTE, Flags, WalkState, &Node);
673 if (ACPI_FAILURE (Status))
674 {
675 if (Status == AE_NOT_FOUND)
676 {
677 /*
678 * We didn't find the name reference by path -- we can qualify this
679 * a little better before we print an error message
680 */
681
682 if ((Op->Asl.Parent) &&
683 (Op->Asl.Parent->Asl.ParseOpcode == PARSEOP_CONDREFOF))
684 {
685 /*
686 * One special case: CondRefOf operator - if the name doesn't
687 * exist at this point, it means that there's no actual or
688 * external declaration. If the name is not found, just ignore
689 * it, the point of the operator is to determine if the name
690 * exists at runtime. We wanted to see if this named object
691 * exists to facilitate analysis to allow protected usage of
692 * undeclared externals.
693 */
694 return_ACPI_STATUS (AE_OK);
695 }
696 else if (strlen (Path) == ACPI_NAMESEG_SIZE)
697 {
698 /* A simple, one-segment ACPI name */
699
700 if (XfObjectExists (Path))
701 {
702 /*
703 * There exists such a name, but we couldn't get to it
704 * from this scope
705 */
706 AslError (ASL_ERROR, ASL_MSG_NOT_REACHABLE, Op,
707 Op->Asl.ExternalName);
708 }
709 else
710 {
711 /* The name doesn't exist, period */
712
713 AslError (ASL_ERROR, ASL_MSG_NOT_EXIST,
714 Op, Op->Asl.ExternalName);
715 }
716 }
717 else
718 {
719 /* The NamePath contains multiple NameSegs */
720
721 if ((OpInfo->Flags & AML_CREATE) ||
722 (OpInfo->ObjectType == ACPI_TYPE_LOCAL_ALIAS))
723 {
724 /*
725 * The new name is the last parameter. For the
726 * CreateXXXXField and Alias operators
727 */
728 NextOp = Op->Asl.Child;
729 while (!(NextOp->Asl.CompileFlags & OP_IS_NAME_DECLARATION))
730 {
731 NextOp = NextOp->Asl.Next;
732 }
733
734 AslError (ASL_ERROR, ASL_MSG_PREFIX_NOT_EXIST, NextOp,
735 NextOp->Asl.ExternalName);
736 }
737 else if (OpInfo->Flags & AML_NAMED)
738 {
739 /* The new name is the first parameter */
740
741 AslError (ASL_ERROR, ASL_MSG_PREFIX_NOT_EXIST, Op,
742 Op->Asl.ExternalName);
743 }
744 else if (Path[0] == AML_ROOT_PREFIX)
745 {
746 /* Full namepath from root, the object does not exist */
747
748 AslError (ASL_ERROR, ASL_MSG_NOT_EXIST, Op,
749 Op->Asl.ExternalName);
750 }
751 else
752 {
753 /*
754 * Generic "not found" error. Cannot determine whether it
755 * doesn't exist or just can't be reached. However, we
756 * can differentiate between a NameSeg vs. NamePath.
757 */
758 if (strlen (Op->Asl.ExternalName) == ACPI_NAMESEG_SIZE)
759 {
760 AslError (ASL_ERROR, ASL_MSG_NOT_FOUND, Op,
761 Op->Asl.ExternalName);
762 }
763 else
764 {
765 AslError (ASL_ERROR, ASL_MSG_NAMEPATH_NOT_EXIST, Op,
766 Op->Asl.ExternalName);
767 }
768 }
769 }
770
771 Status = AE_OK;
772 }
773
774 return_ACPI_STATUS (Status);
775 }
776
777 /* Check for an attempt to access an object in another method */
778
779 if (!XfValidateCrossReference (Op, OpInfo, Node))
780 {
781 AslError (ASL_ERROR, ASL_MSG_TEMPORARY_OBJECT, Op,
782 Op->Asl.ExternalName);
783 return_ACPI_STATUS (Status);
784 }
785
786 /* Object was found above, check for an illegal forward reference */
787
788 if (Op->Asl.CompileFlags & OP_NOT_FOUND_DURING_LOAD)
789 {
790 /*
791 * During the load phase, this Op was flagged as a possible
792 * illegal forward reference. In other words, Op is a name path or
793 * name segment that refers to a named object declared after the
794 * reference. In this scinario, Node refers to the actual declaration
795 * and Op is a parse node that references the named object.
796 *
797 * Note:
798 *
799 * Object references inside of control methods are allowed to
800 * refer to objects declared outside of control methods.
801 *
802 * If the declaration and reference are both contained inside of the
803 * same method or outside of any method, this is a forward reference
804 * and should be reported as a compiler error.
805 */
806 DeclarationParentMethod = UtGetParentMethodNode (Node);
807 ReferenceParentMethod = UtGetParentMethodOp (Op);
808
809 /* case 1: declaration and reference are both outside of method */
810
811 if (!ReferenceParentMethod && !DeclarationParentMethod)
812 {
813 AslError (ASL_ERROR, ASL_MSG_ILLEGAL_FORWARD_REF, Op,
814 Op->Asl.ExternalName);
815 }
816
817 /* case 2: declaration and reference are both inside of the same method */
818
819 else if (ReferenceParentMethod && DeclarationParentMethod &&
820 ReferenceParentMethod == DeclarationParentMethod->Op)
821 {
822 AslError (ASL_ERROR, ASL_MSG_ILLEGAL_FORWARD_REF, Op,
823 Op->Asl.ExternalName);
824 }
825 }
826
827 /* Check for a reference vs. name declaration */
828
829 if (!(OpInfo->Flags & AML_NAMED) &&
830 !(OpInfo->Flags & AML_CREATE))
831 {
832 /* This node has been referenced, mark it for reference check */
833
834 Node->Flags |= ANOBJ_IS_REFERENCED;
835 }
836
837 /*
838 * Attempt to optimize the NamePath
839 *
840 * One special case: CondRefOf operator - not all AML interpreter
841 * implementations expect optimized namepaths as a parameter to this
842 * operator. They require relative name paths with prefix operators or
843 * namepaths starting with the root scope.
844 *
845 * Other AML interpreter implementations do not perform the namespace
846 * search that starts at the current scope and recursively searching the
847 * parent scope until the root scope. The lack of search is only known to
848 * occur for the namestring parameter for the CondRefOf operator.
849 */
850 if ((Op->Asl.Parent) &&
851 (Op->Asl.Parent->Asl.ParseOpcode != PARSEOP_CONDREFOF))
852 {
853 OptOptimizeNamePath (Op, OpInfo->Flags, WalkState, Path, Node);
854 }
855
856 /*
857 * 1) Dereference an alias (A name reference that is an alias)
858 * Aliases are not nested, the alias always points to the final object
859 */
860 if ((Op->Asl.ParseOpcode != PARSEOP_ALIAS) &&
861 (Node->Type == ACPI_TYPE_LOCAL_ALIAS))
862 {
863 /* This node points back to the original PARSEOP_ALIAS */
864
865 NextOp = Node->Op;
866
867 /* The first child is the alias target op */
868
869 NextOp = NextOp->Asl.Child;
870
871 /* That in turn points back to original target alias node */
872
873 if (NextOp->Asl.Node)
874 {
875 Node = NextOp->Asl.Node;
876 }
877
878 /* Else - forward reference to alias, will be resolved later */
879 }
880
881 /* 2) Check for a reference to a resource descriptor */
882
883 if ((Node->Type == ACPI_TYPE_LOCAL_RESOURCE_FIELD) ||
884 (Node->Type == ACPI_TYPE_LOCAL_RESOURCE))
885 {
886 /*
887 * This was a reference to a field within a resource descriptor.
888 * Extract the associated field offset (either a bit or byte
889 * offset depending on the field type) and change the named
890 * reference into an integer for AML code generation
891 */
892 Offset = Node->Value;
893 TagBitLength = Node->Length;
894
895 /*
896 * If a field is being created, generate the length (in bits) of
897 * the field. Note: Opcodes other than CreateXxxField and Index
898 * can come through here. For other opcodes, we just need to
899 * convert the resource tag reference to an integer offset.
900 */
901 switch (Op->Asl.Parent->Asl.AmlOpcode)
902 {
903 case AML_CREATE_FIELD_OP: /* Variable "Length" field, in bits */
904 /*
905 * We know the length operand is an integer constant because
906 * we know that it contains a reference to a resource
907 * descriptor tag.
908 */
909 FieldBitLength = (UINT32) Op->Asl.Next->Asl.Value.Integer;
910 break;
911
912 case AML_CREATE_BIT_FIELD_OP:
913
914 FieldBitLength = 1;
915 break;
916
917 case AML_CREATE_BYTE_FIELD_OP:
918 case AML_INDEX_OP:
919
920 FieldBitLength = 8;
921 break;
922
923 case AML_CREATE_WORD_FIELD_OP:
924
925 FieldBitLength = 16;
926 break;
927
928 case AML_CREATE_DWORD_FIELD_OP:
929
930 FieldBitLength = 32;
931 break;
932
933 case AML_CREATE_QWORD_FIELD_OP:
934
935 FieldBitLength = 64;
936 break;
937
938 default:
939
940 FieldBitLength = 0;
941 break;
942 }
943
944 /* Check the field length against the length of the resource tag */
945
946 if (FieldBitLength)
947 {
948 if (TagBitLength < FieldBitLength)
949 {
950 Message = ASL_MSG_TAG_SMALLER;
951 }
952 else if (TagBitLength > FieldBitLength)
953 {
954 Message = ASL_MSG_TAG_LARGER;
955 }
956
957 if (Message)
958 {
959 sprintf (AslGbl_MsgBuffer,
960 "Size mismatch, Tag: %u bit%s, Field: %u bit%s",
961 TagBitLength, (TagBitLength > 1) ? "s" : "",
962 FieldBitLength, (FieldBitLength > 1) ? "s" : "");
963
964 AslError (ASL_WARNING, Message, Op, AslGbl_MsgBuffer);
965 }
966 }
967
968 /* Convert the BitOffset to a ByteOffset for certain opcodes */
969
970 switch (Op->Asl.Parent->Asl.AmlOpcode)
971 {
972 case AML_CREATE_BYTE_FIELD_OP:
973 case AML_CREATE_WORD_FIELD_OP:
974 case AML_CREATE_DWORD_FIELD_OP:
975 case AML_CREATE_QWORD_FIELD_OP:
976 case AML_INDEX_OP:
977
978 Offset = ACPI_DIV_8 (Offset);
979 break;
980
981 default:
982
983 break;
984 }
985
986 /* Now convert this node to an integer whose value is the field offset */
987
988 Op->Asl.AmlLength = 0;
989 Op->Asl.ParseOpcode = PARSEOP_INTEGER;
990 Op->Asl.Value.Integer = (UINT64) Offset;
991 Op->Asl.CompileFlags |= OP_IS_RESOURCE_FIELD;
992
993 OpcGenerateAmlOpcode (Op);
994 }
995
996 /* 3) Check for a method invocation */
997
998 else if ((((Op->Asl.ParseOpcode == PARSEOP_NAMESTRING) || (Op->Asl.ParseOpcode == PARSEOP_NAMESEG)) &&
999 (Node->Type == ACPI_TYPE_METHOD) &&
1000 (Op->Asl.Parent) &&
1001 (Op->Asl.Parent->Asl.ParseOpcode != PARSEOP_METHOD)) ||
1002
1003 (Op->Asl.ParseOpcode == PARSEOP_METHODCALL))
1004 {
1005 /*
1006 * A reference to a method within one of these opcodes is not an
1007 * invocation of the method, it is simply a reference to the method.
1008 *
1009 * September 2016: Removed DeRefOf from this list
1010 * July 2020: Added Alias to this list
1011 */
1012 if ((Op->Asl.Parent) &&
1013 ((Op->Asl.Parent->Asl.ParseOpcode == PARSEOP_REFOF) ||
1014 (Op->Asl.Parent->Asl.ParseOpcode == PARSEOP_PACKAGE) ||
1015 (Op->Asl.Parent->Asl.ParseOpcode == PARSEOP_VAR_PACKAGE)||
1016 (Op->Asl.Parent->Asl.ParseOpcode == PARSEOP_OBJECTTYPE) ||
1017 (Op->Asl.Parent->Asl.ParseOpcode == PARSEOP_ALIAS)))
1018 {
1019 return_ACPI_STATUS (AE_OK);
1020 }
1021
1022 /*
1023 * There are two types of method invocation:
1024 * 1) Invocation with arguments -- the parser recognizes this
1025 * as a METHODCALL.
1026 * 2) Invocation with no arguments --the parser cannot determine that
1027 * this is a method invocation, therefore we have to figure it out
1028 * here.
1029 */
1030 if (Node->Type != ACPI_TYPE_METHOD)
1031 {
1032 sprintf (AslGbl_MsgBuffer, "%s is a %s",
1033 Op->Asl.ExternalName, AcpiUtGetTypeName (Node->Type));
1034
1035 AslError (ASL_ERROR, ASL_MSG_NOT_METHOD, Op, AslGbl_MsgBuffer);
1036 return_ACPI_STATUS (AE_OK);
1037 }
1038
1039 /* Save the method node in the caller's op */
1040
1041 Op->Asl.Node = Node;
1042 if (Op->Asl.Parent->Asl.ParseOpcode == PARSEOP_CONDREFOF)
1043 {
1044 return_ACPI_STATUS (AE_OK);
1045 }
1046
1047 /*
1048 * This is a method invocation, with or without arguments.
1049 * Count the number of arguments, each appears as a child
1050 * under the parent node
1051 */
1052 Op->Asl.ParseOpcode = PARSEOP_METHODCALL;
1053 UtSetParseOpName (Op);
1054
1055 PassedArgs = 0;
1056 NextOp = Op->Asl.Child;
1057
1058 while (NextOp)
1059 {
1060 PassedArgs++;
1061 NextOp = NextOp->Asl.Next;
1062 }
1063
1064 if (Node->Value != ASL_EXTERNAL_METHOD_UNKNOWN_PARAMS &&
1065 Op->Asl.Parent->Asl.ParseOpcode != PARSEOP_EXTERNAL)
1066 {
1067 /*
1068 * Check the parsed arguments with the number expected by the
1069 * method declaration itself
1070 */
1071 if (PassedArgs != Node->Value)
1072 {
1073 if (Node->Flags & ANOBJ_IS_EXTERNAL)
1074 {
1075 sprintf (AslGbl_MsgBuffer,
1076 "according to previous use, %s requires %u",
1077 Op->Asl.ExternalName, Node->Value);
1078 }
1079 else
1080 {
1081 sprintf (AslGbl_MsgBuffer, "%s requires %u", Op->Asl.ExternalName,
1082 Node->Value);
1083 }
1084
1085 if (PassedArgs < Node->Value)
1086 {
1087 AslError (ASL_ERROR, ASL_MSG_ARG_COUNT_LO, Op, AslGbl_MsgBuffer);
1088 }
1089 else
1090 {
1091 AslError (ASL_ERROR, ASL_MSG_ARG_COUNT_HI, Op, AslGbl_MsgBuffer);
1092 }
1093 }
1094 }
1095
1096 /*
1097 * At this point, a method call to an external method has been
1098 * detected. As of 11/19/2019, iASL does not support parameter counts
1099 * for methods declared as external. Therefore, save the parameter
1100 * count of the first method call and use this count check other
1101 * method calls to ensure that the methods are being called with the
1102 * same amount of parameters.
1103 */
1104 else if (Node->Type == ACPI_TYPE_METHOD &&
1105 (Node->Flags & ANOBJ_IS_EXTERNAL) &&
1106 Node->Value == ASL_EXTERNAL_METHOD_UNKNOWN_PARAMS &&
1107 Op->Asl.Parent->Asl.ParseOpcode != PARSEOP_EXTERNAL)
1108 {
1109 Node->Value = PassedArgs;
1110 }
1111 }
1112
1113 /* 4) Check for an ASL Field definition */
1114
1115 else if ((Op->Asl.Parent) &&
1116 ((Op->Asl.Parent->Asl.ParseOpcode == PARSEOP_FIELD) ||
1117 (Op->Asl.Parent->Asl.ParseOpcode == PARSEOP_BANKFIELD)))
1118 {
1119 /*
1120 * Offset checking for fields. If the parent operation region has a
1121 * constant length (known at compile time), we can check fields
1122 * defined in that region against the region length. This will catch
1123 * fields and field units that cannot possibly fit within the region.
1124 *
1125 * Note: Index fields do not directly reference an operation region,
1126 * thus they are not included in this check.
1127 */
1128 if (Op == Op->Asl.Parent->Asl.Child)
1129 {
1130 /*
1131 * This is the first child of the field node, which is
1132 * the name of the region. Get the parse node for the
1133 * region -- which contains the length of the region.
1134 */
1135 OwningOp = Node->Op;
1136 Op->Asl.Parent->Asl.ExtraValue =
1137 ACPI_MUL_8 ((UINT32) OwningOp->Asl.Value.Integer);
1138
1139 /* Examine the field access width */
1140
1141 switch ((UINT8) Op->Asl.Parent->Asl.Value.Integer)
1142 {
1143 case AML_FIELD_ACCESS_ANY:
1144 case AML_FIELD_ACCESS_BYTE:
1145 case AML_FIELD_ACCESS_BUFFER:
1146 default:
1147
1148 MinimumLength = 1;
1149 break;
1150
1151 case AML_FIELD_ACCESS_WORD:
1152
1153 MinimumLength = 2;
1154 break;
1155
1156 case AML_FIELD_ACCESS_DWORD:
1157
1158 MinimumLength = 4;
1159 break;
1160
1161 case AML_FIELD_ACCESS_QWORD:
1162
1163 MinimumLength = 8;
1164 break;
1165 }
1166
1167 /*
1168 * Is the region at least as big as the access width?
1169 * Note: DataTableRegions have 0 length
1170 */
1171 if (((UINT32) OwningOp->Asl.Value.Integer) &&
1172 ((UINT32) OwningOp->Asl.Value.Integer < MinimumLength))
1173 {
1174 AslError (ASL_ERROR, ASL_MSG_FIELD_ACCESS_WIDTH, Op, NULL);
1175 }
1176
1177 /*
1178 * Check EC/CMOS/SMBUS fields to make sure that the correct
1179 * access type is used (BYTE for EC/CMOS, BUFFER for SMBUS)
1180 */
1181 SpaceIdOp = OwningOp->Asl.Child->Asl.Next;
1182 switch ((UINT32) SpaceIdOp->Asl.Value.Integer)
1183 {
1184 case ACPI_ADR_SPACE_EC:
1185 case ACPI_ADR_SPACE_CMOS:
1186 case ACPI_ADR_SPACE_GPIO:
1187
1188 if ((UINT8) Op->Asl.Parent->Asl.Value.Integer !=
1189 AML_FIELD_ACCESS_BYTE)
1190 {
1191 AslError (ASL_ERROR, ASL_MSG_REGION_BYTE_ACCESS, Op, NULL);
1192 }
1193 break;
1194
1195 case ACPI_ADR_SPACE_SMBUS:
1196 case ACPI_ADR_SPACE_IPMI:
1197 case ACPI_ADR_SPACE_GSBUS:
1198
1199 if ((UINT8) Op->Asl.Parent->Asl.Value.Integer !=
1200 AML_FIELD_ACCESS_BUFFER)
1201 {
1202 AslError (ASL_ERROR, ASL_MSG_REGION_BUFFER_ACCESS, Op, NULL);
1203 }
1204 break;
1205
1206 default:
1207
1208 /* Nothing to do for other address spaces */
1209
1210 break;
1211 }
1212 }
1213 else
1214 {
1215 /*
1216 * This is one element of the field list. Check to make sure
1217 * that it does not go beyond the end of the parent operation region.
1218 *
1219 * In the code below:
1220 * Op->Asl.Parent->Asl.ExtraValue - Region Length (bits)
1221 * Op->Asl.ExtraValue - Field start offset (bits)
1222 * Op->Asl.Child->Asl.Value.Integer32 - Field length (bits)
1223 * Op->Asl.Child->Asl.ExtraValue - Field access width (bits)
1224 */
1225 if (Op->Asl.Parent->Asl.ExtraValue && Op->Asl.Child)
1226 {
1227 XfCheckFieldRange (Op,
1228 Op->Asl.Parent->Asl.ExtraValue,
1229 Op->Asl.ExtraValue,
1230 (UINT32) Op->Asl.Child->Asl.Value.Integer,
1231 Op->Asl.Child->Asl.ExtraValue);
1232 }
1233 }
1234 }
1235
1236 /*
1237 * 5) Check for external resolution
1238 *
1239 * By this point, everything should be loaded in the namespace. If a
1240 * namespace lookup results in a namespace node that is an external, it
1241 * means that this named object was not defined in the input ASL. This
1242 * causes issues because there are plenty of incidents where developers
1243 * use the external keyword to suppress compiler errors about undefined
1244 * objects. Note: this only applies when compiling multiple definition
1245 * blocks.
1246 *
1247 * Do not check for external resolution in the following cases:
1248 *
1249 * case 1) External (ABCD)
1250 *
1251 * This declares ABCD as an external so there is no requirement for
1252 * ABCD to be loaded in the namespace when analyzing the actual
1253 * External() statement.
1254 *
1255 * case 2) CondRefOf (ABCD)
1256 *
1257 * This operator will query the ACPI namespace on the existence of
1258 * ABCD. If ABCD does not exist, this operator will return a 0
1259 * without incurring AML runtime errors. Therefore, ABCD is allowed
1260 * to not exist when analyzing the CondRefOf operator.
1261 *
1262 * case 3) External (ABCD)
1263 * if (CondRefOf (ABCD))
1264 * {
1265 * Store (0, ABCD)
1266 * }
1267 *
1268 * In this case, ABCD is accessed only if it exists due to the if
1269 * statement so there is no need to flag the ABCD nested in the
1270 * store operator.
1271 */
1272 if (AslGbl_ParseTreeRoot->Asl.Child && AslGbl_ParseTreeRoot->Asl.Child->Asl.Next &&
1273 (Node->Flags & ANOBJ_IS_EXTERNAL) &&
1274 Op->Asl.Parent->Asl.ParseOpcode != PARSEOP_EXTERNAL &&
1275 Op->Asl.ParseOpcode != PARSEOP_EXTERNAL &&
1276 Op->Asl.Parent->Asl.ParseOpcode != PARSEOP_CONDREFOF &&
1277 !XfRefIsGuardedByIfCondRefOf (Node, Op))
1278 {
1279 ExternalPath = AcpiNsGetNormalizedPathname (Node, TRUE);
1280 sprintf (AslGbl_MsgBuffer, "full path of external object: %s",
1281 ExternalPath);
1282 AslDualParseOpError (ASL_ERROR, ASL_MSG_UNDEFINED_EXTERNAL, Op, NULL,
1283 ASL_MSG_EXTERNAL_FOUND_HERE, Node->Op, AslGbl_MsgBuffer);
1284 if (ExternalPath)
1285 {
1286 ACPI_FREE (ExternalPath);
1287 }
1288 }
1289
1290 /* 5) Check for a connection object */
1291 #if 0
1292 else if (Op->Asl.Parent->Asl.ParseOpcode == PARSEOP_CONNECTION)
1293 {
1294 return_ACPI_STATUS (Status);
1295 }
1296 #endif
1297
1298 Op->Asl.Node = Node;
1299 return_ACPI_STATUS (Status);
1300 }
1301
1302
1303 /*******************************************************************************
1304 *
1305 * FUNCTION: XfRefIsGuardedByIfCondRefOf
1306 *
1307 * PARAMETERS: Node - Named object reference node
1308 * Op - Named object reference parse node
1309 *
1310 * RETURN: BOOLEAN
1311 *
1312 * DESCRIPTION: returns true if Op checked inside if (CondRefOf (...))
1313 * refers to Node.
1314 *
1315 ******************************************************************************/
1316
1317 static BOOLEAN
XfRefIsGuardedByIfCondRefOf(ACPI_NAMESPACE_NODE * Node,ACPI_PARSE_OBJECT * Op)1318 XfRefIsGuardedByIfCondRefOf (
1319 ACPI_NAMESPACE_NODE *Node,
1320 ACPI_PARSE_OBJECT *Op)
1321 {
1322 ACPI_PARSE_OBJECT *Parent = Op->Asl.Parent;
1323
1324
1325 while (Parent)
1326 {
1327 if (Parent->Asl.ParseOpcode == PARSEOP_IF &&
1328 XfFindCondRefOfName (Node, Parent->Asl.Child))
1329 {
1330 return (TRUE);
1331 }
1332
1333 Parent = Parent->Asl.Parent;
1334 }
1335
1336 return (FALSE);
1337 }
1338
1339
1340 /*******************************************************************************
1341 *
1342 * FUNCTION: XfRefIsGuardedByIfCondRefOf
1343 *
1344 * PARAMETERS: Node - Named object reference node
1345 * Op - Named object reference parse node
1346 *
1347 * RETURN: BOOLEAN
1348 *
1349 * DESCRIPTION: returns true if Op checked inside if (CondRefOf (...))
1350 * refers to Node.
1351 *
1352 ******************************************************************************/
1353
1354 static BOOLEAN
XfFindCondRefOfName(ACPI_NAMESPACE_NODE * Node,ACPI_PARSE_OBJECT * Op)1355 XfFindCondRefOfName (
1356 ACPI_NAMESPACE_NODE *Node,
1357 ACPI_PARSE_OBJECT *Op)
1358 {
1359 BOOLEAN CondRefOfFound = FALSE;
1360
1361
1362 if (!Op)
1363 {
1364 return (FALSE);
1365 }
1366
1367 switch (Op->Asl.ParseOpcode)
1368 {
1369 case PARSEOP_CONDREFOF:
1370
1371 return (Op->Asl.Child->Common.Node == Node);
1372 break;
1373
1374 case PARSEOP_LAND:
1375
1376 CondRefOfFound = XfFindCondRefOfName (Node, Op->Asl.Child);
1377 if (CondRefOfFound)
1378 {
1379 return (TRUE);
1380 }
1381
1382 return (XfFindCondRefOfName (Node, Op->Asl.Child->Asl.Next));
1383 break;
1384
1385 default:
1386
1387 return (FALSE);
1388 break;
1389 }
1390 }
1391
1392
1393 /*******************************************************************************
1394 *
1395 * FUNCTION: XfNamespaceLocateEnd
1396 *
1397 * PARAMETERS: ASL_WALK_CALLBACK
1398 *
1399 * RETURN: Status
1400 *
1401 * DESCRIPTION: Ascending callback used during cross reference. We only
1402 * need to worry about scope management here.
1403 *
1404 ******************************************************************************/
1405
1406 static ACPI_STATUS
XfNamespaceLocateEnd(ACPI_PARSE_OBJECT * Op,UINT32 Level,void * Context)1407 XfNamespaceLocateEnd (
1408 ACPI_PARSE_OBJECT *Op,
1409 UINT32 Level,
1410 void *Context)
1411 {
1412 ACPI_WALK_STATE *WalkState = (ACPI_WALK_STATE *) Context;
1413 const ACPI_OPCODE_INFO *OpInfo;
1414
1415
1416 ACPI_FUNCTION_TRACE (XfNamespaceLocateEnd);
1417
1418
1419 /* We are only interested in opcodes that have an associated name */
1420
1421 OpInfo = AcpiPsGetOpcodeInfo (Op->Asl.AmlOpcode);
1422 if (!(OpInfo->Flags & AML_NAMED))
1423 {
1424 return_ACPI_STATUS (AE_OK);
1425 }
1426
1427 /* Not interested in name references, we did not open a scope for them */
1428
1429 if ((Op->Asl.ParseOpcode == PARSEOP_NAMESTRING) ||
1430 (Op->Asl.ParseOpcode == PARSEOP_NAMESEG) ||
1431 (Op->Asl.ParseOpcode == PARSEOP_METHODCALL) ||
1432 (Op->Asl.ParseOpcode == PARSEOP_EXTERNAL))
1433 {
1434 return_ACPI_STATUS (AE_OK);
1435 }
1436
1437 /* Pop the scope stack if necessary */
1438
1439 if (AcpiNsOpensScope (AslMapNamedOpcodeToDataType (Op->Asl.AmlOpcode)))
1440 {
1441
1442 ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
1443 "%s: Popping scope for Op %p\n",
1444 AcpiUtGetTypeName (OpInfo->ObjectType), Op));
1445
1446 (void) AcpiDsScopeStackPop (WalkState);
1447 }
1448
1449 return_ACPI_STATUS (AE_OK);
1450 }
1451
1452
1453 /*******************************************************************************
1454 *
1455 * FUNCTION: XfValidateCrossReference
1456 *
1457 * PARAMETERS: Op - Parse Op that references the object
1458 * OpInfo - Parse Op info struct
1459 * Node - Node for the referenced object
1460 *
1461 * RETURN: TRUE if the reference is legal, FALSE otherwise
1462 *
1463 * DESCRIPTION: Determine if a reference to another object is allowed.
1464 *
1465 * EXAMPLE:
1466 * Method (A) {Name (INT1, 1)} Declaration of object INT1
1467 * Method (B) (Store (2, \A.INT1)} Illegal reference to object INT1
1468 * (INT1 is temporary, valid only during
1469 * execution of A)
1470 *
1471 * NOTES:
1472 * A null pointer returned by either UtGetParentMethodOp or
1473 * UtGetParentMethodNode indicates that the parameter object is not
1474 * within a control method.
1475 *
1476 * Five cases are handled: Case(Op, Node)
1477 * 1) Case(0,0): Op is not within a method, Node is not --> OK
1478 * 2) Case(0,1): Op is not within a method, but Node is --> Illegal
1479 * 3) Case(1,0): Op is within a method, Node is not --> OK
1480 * 4) Case(1,1): Both are within the same method --> OK
1481 * 5) Case(1,1): Both are in methods, but not same method --> Illegal
1482 *
1483 ******************************************************************************/
1484
1485 static BOOLEAN
XfValidateCrossReference(ACPI_PARSE_OBJECT * Op,const ACPI_OPCODE_INFO * OpInfo,ACPI_NAMESPACE_NODE * Node)1486 XfValidateCrossReference (
1487 ACPI_PARSE_OBJECT *Op,
1488 const ACPI_OPCODE_INFO *OpInfo,
1489 ACPI_NAMESPACE_NODE *Node)
1490 {
1491 ACPI_PARSE_OBJECT *ReferencingMethodOp;
1492 ACPI_NAMESPACE_NODE *ReferencedMethodNode;
1493
1494
1495 /* Ignore actual named (and related) object declarations */
1496
1497 if (OpInfo->Flags & (AML_NAMED | AML_CREATE | AML_DEFER | AML_HAS_ARGS))
1498 {
1499 return (TRUE);
1500 }
1501
1502 /*
1503 * 1) Search upwards in parse tree for owner of the referencing object
1504 * 2) Search upwards in namespace to find the owner of the referenced object
1505 */
1506 ReferencingMethodOp = UtGetParentMethodOp (Op);
1507 ReferencedMethodNode = UtGetParentMethodNode (Node);
1508
1509 if (!ReferencingMethodOp && !ReferencedMethodNode)
1510 {
1511 /*
1512 * 1) Case (0,0): Both Op and Node are not within methods
1513 * --> OK
1514 */
1515 return (TRUE);
1516 }
1517
1518 if (!ReferencingMethodOp && ReferencedMethodNode)
1519 {
1520 /*
1521 * 2) Case (0,1): Op is not in a method, but Node is within a
1522 * method --> illegal
1523 */
1524 return (FALSE);
1525 }
1526 else if (ReferencingMethodOp && !ReferencedMethodNode)
1527 {
1528 /*
1529 * 3) Case (1,0): Op is within a method, but Node is not
1530 * --> OK
1531 */
1532 return (TRUE);
1533 }
1534 else if (ReferencingMethodOp->Asl.Node == ReferencedMethodNode)
1535 {
1536 /*
1537 * 4) Case (1,1): Both Op and Node are within the same method
1538 * --> OK
1539 */
1540 return (TRUE);
1541 }
1542 else
1543 {
1544 /*
1545 * 5) Case (1,1), Op and Node are in different methods
1546 * --> Illegal
1547 */
1548 return (FALSE);
1549 }
1550 }
1551