1 /******************************************************************************
2 *
3 * Module Name: aslmethod.c - Control method analysis walk
4 *
5 *****************************************************************************/
6
7 /******************************************************************************
8 *
9 * 1. Copyright Notice
10 *
11 * Some or all of this work - Copyright (c) 1999 - 2020, 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/acnamesp.h>
155 #include <contrib/dev/acpica/include/acparser.h>
156 #include <contrib/dev/acpica/include/amlcode.h>
157
158
159 #define _COMPONENT ACPI_COMPILER
160 ACPI_MODULE_NAME ("aslmethod")
161
162
163 /* Local prototypes */
164
165 static void
166 MtCheckNamedObjectInMethod (
167 ACPI_PARSE_OBJECT *Op,
168 ASL_METHOD_INFO *MethodInfo);
169
170 static void
171 MtCheckStaticOperationRegionInMethod (
172 ACPI_PARSE_OBJECT *Op);
173
174
175 /*******************************************************************************
176 *
177 * FUNCTION: MtMethodAnalysisWalkBegin
178 *
179 * PARAMETERS: ASL_WALK_CALLBACK
180 *
181 * RETURN: Status
182 *
183 * DESCRIPTION: Descending callback for the analysis walk. Check methods for:
184 * 1) Initialized local variables
185 * 2) Valid arguments
186 * 3) Return types
187 *
188 ******************************************************************************/
189
190 ACPI_STATUS
MtMethodAnalysisWalkBegin(ACPI_PARSE_OBJECT * Op,UINT32 Level,void * Context)191 MtMethodAnalysisWalkBegin (
192 ACPI_PARSE_OBJECT *Op,
193 UINT32 Level,
194 void *Context)
195 {
196 ASL_ANALYSIS_WALK_INFO *WalkInfo = (ASL_ANALYSIS_WALK_INFO *) Context;
197 ASL_METHOD_INFO *MethodInfo = WalkInfo->MethodStack;
198 ACPI_PARSE_OBJECT *Next;
199 UINT32 RegisterNumber;
200 UINT32 i;
201 char LocalName[] = "Local0";
202 char ArgName[] = "Arg0";
203 ACPI_PARSE_OBJECT *ArgNode;
204 ACPI_PARSE_OBJECT *NextType;
205 UINT8 ActualArgs = 0;
206 BOOLEAN HidExists;
207 BOOLEAN AdrExists;
208
209
210 /* Build cross-reference output file if requested */
211
212 if (AslGbl_CrossReferenceOutput)
213 {
214 OtXrefWalkPart1 (Op, Level, MethodInfo);
215 }
216
217 switch (Op->Asl.ParseOpcode)
218 {
219 case PARSEOP_METHOD:
220
221 AslGbl_TotalMethods++;
222
223 /* Create and init method info */
224
225 MethodInfo = UtLocalCalloc (sizeof (ASL_METHOD_INFO));
226 MethodInfo->Next = WalkInfo->MethodStack;
227 MethodInfo->Op = Op;
228
229 WalkInfo->MethodStack = MethodInfo;
230
231 /*
232 * Special handling for _PSx methods. Dependency rules (same scope):
233 *
234 * 1) _PS0 - One of these must exist: _PS1, _PS2, _PS3
235 * 2) _PS1/_PS2/_PS3: A _PS0 must exist
236 */
237 if (ACPI_COMPARE_NAMESEG (METHOD_NAME__PS0, Op->Asl.NameSeg))
238 {
239 /* For _PS0, one of _PS1/_PS2/_PS3 must exist */
240
241 if ((!ApFindNameInScope (METHOD_NAME__PS1, Op)) &&
242 (!ApFindNameInScope (METHOD_NAME__PS2, Op)) &&
243 (!ApFindNameInScope (METHOD_NAME__PS3, Op)))
244 {
245 AslError (ASL_WARNING, ASL_MSG_MISSING_DEPENDENCY, Op,
246 "_PS0 requires one of _PS1/_PS2/_PS3 in same scope");
247 }
248 }
249 else if (
250 ACPI_COMPARE_NAMESEG (METHOD_NAME__PS1, Op->Asl.NameSeg) ||
251 ACPI_COMPARE_NAMESEG (METHOD_NAME__PS2, Op->Asl.NameSeg) ||
252 ACPI_COMPARE_NAMESEG (METHOD_NAME__PS3, Op->Asl.NameSeg))
253 {
254 /* For _PS1/_PS2/_PS3, a _PS0 must exist */
255
256 if (!ApFindNameInScope (METHOD_NAME__PS0, Op))
257 {
258 sprintf (AslGbl_MsgBuffer,
259 "%4.4s requires _PS0 in same scope", Op->Asl.NameSeg);
260
261 AslError (ASL_WARNING, ASL_MSG_MISSING_DEPENDENCY, Op,
262 AslGbl_MsgBuffer);
263 }
264 }
265
266 /* Get the name node */
267
268 Next = Op->Asl.Child;
269
270 /* Get the NumArguments node */
271
272 Next = Next->Asl.Next;
273 MethodInfo->NumArguments = (UINT8)
274 (((UINT8) Next->Asl.Value.Integer) & 0x07);
275
276 /* Get the SerializeRule and SyncLevel nodes, ignored here */
277
278 Next = Next->Asl.Next;
279 MethodInfo->ShouldBeSerialized = (UINT8) Next->Asl.Value.Integer;
280
281 Next = Next->Asl.Next;
282 ArgNode = Next;
283
284 /* Get the ReturnType node */
285
286 Next = Next->Asl.Next;
287
288 NextType = Next->Asl.Child;
289
290 MethodInfo->ValidReturnTypes = MtProcessTypeOp (NextType);
291
292 /* Get the ParameterType node */
293
294 Next = Next->Asl.Next;
295
296 NextType = Next->Asl.Child;
297 if (!NextType)
298 {
299 /*
300 * The optional parameter types list was omitted at the source
301 * level. Use the Argument count parameter instead.
302 */
303 ActualArgs = MethodInfo->NumArguments;
304 }
305 else
306 {
307 ActualArgs = MtProcessParameterTypeList (NextType,
308 MethodInfo->ValidArgTypes);
309 MethodInfo->NumArguments = ActualArgs;
310 ArgNode->Asl.Value.Integer |= ActualArgs;
311 }
312
313 if ((MethodInfo->NumArguments) &&
314 (MethodInfo->NumArguments != ActualArgs))
315 {
316 sprintf (AslGbl_MsgBuffer,
317 "Length = %u", ActualArgs);
318 AslError (ASL_ERROR, ASL_MSG_ARG_COUNT_MISMATCH,
319 Op->Asl.Child->Asl.Next, AslGbl_MsgBuffer);
320 }
321
322 /* Allow numarguments == 0 for Function() */
323
324 if ((!MethodInfo->NumArguments) && (ActualArgs))
325 {
326 MethodInfo->NumArguments = ActualArgs;
327 ArgNode->Asl.Value.Integer |= ActualArgs;
328 }
329
330 /*
331 * Actual arguments are initialized at method entry.
332 * All other ArgX "registers" can be used as locals, so we
333 * track their initialization.
334 */
335 for (i = 0; i < MethodInfo->NumArguments; i++)
336 {
337 MethodInfo->ArgInitialized[i] = TRUE;
338 }
339 break;
340
341 case PARSEOP_METHODCALL:
342
343 /* Check for a recursive method call */
344
345 if (MethodInfo &&
346 (Op->Asl.Node == MethodInfo->Op->Asl.Node))
347 {
348 if (MethodInfo->CreatesNamedObjects)
349 {
350 /*
351 * This is an error, as it will fail at runtime on all ACPI
352 * implementations. Any named object declarations will be
353 * executed twice, causing failure the second time. Note,
354 * this is independent of whether the method is declared
355 * Serialized, because the same thread is attempting to
356 * reenter the method, and this will always succeed.
357 */
358 AslDualParseOpError (ASL_ERROR, ASL_MSG_ILLEGAL_RECURSION, Op,
359 Op->Asl.Value.String, ASL_MSG_FOUND_HERE, MethodInfo->Op,
360 MethodInfo->Op->Asl.ExternalName);
361 }
362 else
363 {
364 /* Method does not create objects, issue a remark */
365
366 AslError (ASL_REMARK, ASL_MSG_RECURSION, Op, Op->Asl.ExternalName);
367 }
368 }
369 break;
370
371 case PARSEOP_LOCAL0:
372 case PARSEOP_LOCAL1:
373 case PARSEOP_LOCAL2:
374 case PARSEOP_LOCAL3:
375 case PARSEOP_LOCAL4:
376 case PARSEOP_LOCAL5:
377 case PARSEOP_LOCAL6:
378 case PARSEOP_LOCAL7:
379
380 if (!MethodInfo)
381 {
382 /*
383 * Local was used outside a control method, or there was an error
384 * in the method declaration.
385 */
386 AslError (ASL_REMARK, ASL_MSG_LOCAL_OUTSIDE_METHOD,
387 Op, Op->Asl.ExternalName);
388 return (AE_ERROR);
389 }
390
391 RegisterNumber = (Op->Asl.AmlOpcode & 0x0007);
392
393 /*
394 * If the local is being used as a target, mark the local
395 * initialized
396 */
397 if (Op->Asl.CompileFlags & OP_IS_TARGET)
398 {
399 MethodInfo->LocalInitialized[RegisterNumber] = TRUE;
400 }
401
402 /*
403 * Otherwise, this is a reference, check if the local
404 * has been previously initialized.
405 *
406 * The only operator that accepts an uninitialized value is ObjectType()
407 */
408 else if ((!MethodInfo->LocalInitialized[RegisterNumber]) &&
409 (Op->Asl.Parent->Asl.ParseOpcode != PARSEOP_OBJECTTYPE))
410 {
411 LocalName[strlen (LocalName) -1] = (char) (RegisterNumber + 0x30);
412 AslError (ASL_ERROR, ASL_MSG_LOCAL_INIT, Op, LocalName);
413 }
414 break;
415
416 case PARSEOP_ARG0:
417 case PARSEOP_ARG1:
418 case PARSEOP_ARG2:
419 case PARSEOP_ARG3:
420 case PARSEOP_ARG4:
421 case PARSEOP_ARG5:
422 case PARSEOP_ARG6:
423
424 if (!MethodInfo)
425 {
426 /*
427 * Arg was used outside a control method, or there was an error
428 * in the method declaration.
429 */
430 AslError (ASL_REMARK, ASL_MSG_LOCAL_OUTSIDE_METHOD,
431 Op, Op->Asl.ExternalName);
432 return (AE_ERROR);
433 }
434
435 RegisterNumber = (Op->Asl.AmlOpcode & 0x000F) - 8;
436 ArgName[strlen (ArgName) -1] = (char) (RegisterNumber + 0x30);
437
438 /*
439 * If the Arg is being used as a target, mark the local
440 * initialized
441 */
442 if (Op->Asl.CompileFlags & OP_IS_TARGET)
443 {
444 MethodInfo->ArgInitialized[RegisterNumber] = TRUE;
445 }
446
447 /*
448 * Otherwise, this is a reference, check if the Arg
449 * has been previously initialized.
450 *
451 * The only operator that accepts an uninitialized value is ObjectType()
452 */
453 else if ((!MethodInfo->ArgInitialized[RegisterNumber]) &&
454 (Op->Asl.Parent->Asl.ParseOpcode != PARSEOP_OBJECTTYPE))
455 {
456 AslError (ASL_ERROR, ASL_MSG_ARG_INIT, Op, ArgName);
457 }
458
459 /* Flag this arg if it is not a "real" argument to the method */
460
461 if (RegisterNumber >= MethodInfo->NumArguments)
462 {
463 AslError (ASL_REMARK, ASL_MSG_NOT_PARAMETER, Op, ArgName);
464 }
465 break;
466
467 case PARSEOP_RETURN:
468
469 if (!MethodInfo)
470 {
471 /*
472 * Probably was an error in the method declaration,
473 * no additional error here
474 */
475 ACPI_WARNING ((AE_INFO, "%p, No parent method", Op));
476 return (AE_ERROR);
477 }
478
479 /*
480 * A child indicates a possible return value. A simple Return or
481 * Return() is marked with OP_IS_NULL_RETURN by the parser so
482 * that it is not counted as a "real" return-with-value, although
483 * the AML code that is actually emitted is Return(0). The AML
484 * definition of Return has a required parameter, so we are
485 * forced to convert a null return to Return(0).
486 */
487 if ((Op->Asl.Child) &&
488 (Op->Asl.Child->Asl.ParseOpcode != PARSEOP_DEFAULT_ARG) &&
489 (!(Op->Asl.Child->Asl.CompileFlags & OP_IS_NULL_RETURN)))
490 {
491 MethodInfo->NumReturnWithValue++;
492 }
493 else
494 {
495 MethodInfo->NumReturnNoValue++;
496 }
497 break;
498
499 case PARSEOP_BREAK:
500 case PARSEOP_CONTINUE:
501
502 Next = Op->Asl.Parent;
503 while (Next)
504 {
505 if (Next->Asl.ParseOpcode == PARSEOP_WHILE)
506 {
507 break;
508 }
509 Next = Next->Asl.Parent;
510 }
511
512 if (!Next)
513 {
514 AslError (ASL_ERROR, ASL_MSG_NO_WHILE, Op, NULL);
515 }
516 break;
517
518 case PARSEOP_STALL:
519
520 /* We can range check if the argument is an integer */
521
522 if ((Op->Asl.Child->Asl.ParseOpcode == PARSEOP_INTEGER) &&
523 (Op->Asl.Child->Asl.Value.Integer > ACPI_UINT8_MAX))
524 {
525 AslError (ASL_ERROR, ASL_MSG_INVALID_TIME, Op, NULL);
526 }
527 break;
528
529 case PARSEOP_DEVICE:
530
531 /* Check usage of _HID and _ADR objects */
532
533 HidExists = ApFindNameInDeviceTree (METHOD_NAME__HID, Op);
534 AdrExists = ApFindNameInDeviceTree (METHOD_NAME__ADR, Op);
535
536 if (!HidExists && !AdrExists)
537 {
538 AslError (ASL_WARNING, ASL_MSG_MISSING_DEPENDENCY, Op,
539 "Device object requires a _HID or _ADR in same scope");
540 }
541 else if (HidExists && AdrExists)
542 {
543 /*
544 * According to the ACPI spec, "A device object must contain
545 * either an _HID object or an _ADR object, but should not contain
546 * both".
547 */
548 AslError (ASL_WARNING, ASL_MSG_MULTIPLE_TYPES, Op,
549 "Device object requires either a _HID or _ADR, but not both");
550 }
551 break;
552
553 case PARSEOP_EVENT:
554 case PARSEOP_MUTEX:
555 case PARSEOP_OPERATIONREGION:
556 case PARSEOP_POWERRESOURCE:
557 case PARSEOP_PROCESSOR:
558 case PARSEOP_THERMALZONE:
559
560 /*
561 * The first operand is a name to be created in the namespace.
562 * Check against the reserved list.
563 */
564 i = ApCheckForPredefinedName (Op, Op->Asl.NameSeg);
565 if (i < ACPI_VALID_RESERVED_NAME_MAX)
566 {
567 AslError (ASL_ERROR, ASL_MSG_RESERVED_USE,
568 Op, Op->Asl.ExternalName);
569 }
570
571 MtCheckStaticOperationRegionInMethod (Op);
572 break;
573
574 case PARSEOP_NAME:
575
576 /* Typecheck any predefined names statically defined with Name() */
577
578 ApCheckForPredefinedObject (Op, Op->Asl.NameSeg);
579
580 /* Special typechecking for _HID */
581
582 if (ACPI_COMPARE_NAMESEG (METHOD_NAME__HID, Op->Asl.NameSeg))
583 {
584 Next = Op->Asl.Child->Asl.Next;
585 AnCheckId (Next, ASL_TYPE_HID);
586 }
587
588 /* Special typechecking for _CID */
589
590 else if (ACPI_COMPARE_NAMESEG (METHOD_NAME__CID, Op->Asl.NameSeg))
591 {
592 Next = Op->Asl.Child->Asl.Next;
593
594 if ((Next->Asl.ParseOpcode == PARSEOP_PACKAGE) ||
595 (Next->Asl.ParseOpcode == PARSEOP_VAR_PACKAGE))
596 {
597 Next = Next->Asl.Child;
598 while (Next)
599 {
600 AnCheckId (Next, ASL_TYPE_CID);
601 Next = Next->Asl.Next;
602 }
603 }
604 else
605 {
606 AnCheckId (Next, ASL_TYPE_CID);
607 }
608 }
609
610 break;
611
612 default:
613
614 break;
615 }
616
617 /* Check for named object creation within a non-serialized method */
618
619 MtCheckNamedObjectInMethod (Op, MethodInfo);
620 return (AE_OK);
621 }
622
623
624 /*******************************************************************************
625 *
626 * FUNCTION: MtProcessTypeOp
627 *
628 * PARAMETERS: Op - Op representing a btype
629 *
630 * RETURN: Btype represented by Op
631 *
632 * DESCRIPTION: Process a parse object that represents single parameter type or
633 * a return type in method, function, and external declarations.
634 *
635 ******************************************************************************/
636
637 UINT32
MtProcessTypeOp(ACPI_PARSE_OBJECT * TypeOp)638 MtProcessTypeOp (
639 ACPI_PARSE_OBJECT *TypeOp)
640 {
641 UINT32 Btype = ACPI_BTYPE_ANY;
642
643
644 while (TypeOp)
645 {
646 Btype |= AnMapObjTypeToBtype (TypeOp);
647 TypeOp->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG;
648 TypeOp = TypeOp->Asl.Next;
649 }
650
651 return (Btype);
652 }
653
654
655 /*******************************************************************************
656 *
657 * FUNCTION: MtProcessParameterTypeList
658 *
659 * PARAMETERS: Op - Op representing a btype
660 *
661 * RETURN: Btype represented by Op
662 *
663 * DESCRIPTION: Process a parse object that represents a parameter type list in
664 * method, function, and external declarations.
665 *
666 ******************************************************************************/
667
668 UINT8
MtProcessParameterTypeList(ACPI_PARSE_OBJECT * ParamTypeOp,UINT32 * TypeList)669 MtProcessParameterTypeList (
670 ACPI_PARSE_OBJECT *ParamTypeOp,
671 UINT32 *TypeList)
672 {
673 UINT8 ParameterCount = 0;
674
675
676 if (ParamTypeOp && ParamTypeOp->Asl.ParseOpcode != PARSEOP_DEFAULT_ARG)
677 {
678 /* Special case for a single parameter without braces */
679
680 TypeList[ParameterCount] =
681 MtProcessTypeOp (ParamTypeOp);
682
683 return (1);
684 }
685
686 while (ParamTypeOp)
687 {
688 TypeList[ParameterCount] =
689 MtProcessTypeOp (ParamTypeOp->Asl.Child);
690
691 ParameterCount++;
692 ParamTypeOp = ParamTypeOp->Asl.Next;
693 }
694
695 return (ParameterCount);
696 }
697
698
699 /*******************************************************************************
700 *
701 * FUNCTION: MtCheckNamedObjectInMethod
702 *
703 * PARAMETERS: Op - Current parser op
704 * MethodInfo - Info for method being parsed
705 *
706 * RETURN: None
707 *
708 * DESCRIPTION: Detect if a non-serialized method is creating a named object,
709 * which could possibly cause problems if two threads execute
710 * the method concurrently. Emit a remark in this case.
711 *
712 ******************************************************************************/
713
714 static void
MtCheckNamedObjectInMethod(ACPI_PARSE_OBJECT * Op,ASL_METHOD_INFO * MethodInfo)715 MtCheckNamedObjectInMethod (
716 ACPI_PARSE_OBJECT *Op,
717 ASL_METHOD_INFO *MethodInfo)
718 {
719 const ACPI_OPCODE_INFO *OpInfo;
720 char *ExternalPath;
721
722
723 /* We don't care about actual method declarations or scopes */
724
725 if ((Op->Asl.AmlOpcode == AML_METHOD_OP) ||
726 (Op->Asl.AmlOpcode == AML_SCOPE_OP))
727 {
728 return;
729 }
730
731 /* Determine if we are creating a named object within a method */
732
733 if (!MethodInfo)
734 {
735 return;
736 }
737
738 OpInfo = AcpiPsGetOpcodeInfo (Op->Asl.AmlOpcode);
739 if ((OpInfo->Class == AML_CLASS_NAMED_OBJECT) && (Op->Asl.AmlOpcode != AML_FIELD_OP))
740 {
741 /*
742 * 1) Mark the method as a method that creates named objects.
743 *
744 * 2) Issue a remark indicating the inefficiency of creating named
745 * objects within a method (Except for compiler-emitted temporary
746 * variables).
747 *
748 * 3) If the method is non-serialized, emit a remark that the method
749 * should be serialized.
750 *
751 * Reason: If a thread blocks within the method for any reason, and
752 * another thread enters the method, the method will fail because
753 * an attempt will be made to create the same object twice.
754 *
755 * Note: The Field opcode is disallowed here because Field() does not
756 * create a new named object.
757 */
758 ExternalPath = AcpiNsGetNormalizedPathname (MethodInfo->Op->Asl.Node, TRUE);
759
760 /* No error for compiler temp variables (name starts with "_T_") */
761
762 if ((Op->Asl.NameSeg[0] != '_') &&
763 (Op->Asl.NameSeg[1] != 'T') &&
764 (Op->Asl.NameSeg[2] != '_'))
765 {
766 AslError (ASL_REMARK, ASL_MSG_NAMED_OBJECT_CREATION, Op,
767 ExternalPath);
768 }
769
770 MethodInfo->CreatesNamedObjects = TRUE;
771 if (!MethodInfo->ShouldBeSerialized)
772 {
773 AslError (ASL_REMARK, ASL_MSG_SERIALIZED_REQUIRED, MethodInfo->Op,
774 ExternalPath);
775
776 /* Emit message only ONCE per method */
777
778 MethodInfo->ShouldBeSerialized = TRUE;
779 }
780
781 if (ExternalPath)
782 {
783 ACPI_FREE (ExternalPath);
784 }
785 }
786 }
787
788
789 /*******************************************************************************
790 *
791 * FUNCTION: MtCheckStaticOperationRegionInMethod
792 *
793 * PARAMETERS: Op - Current parser op
794 *
795 * RETURN: None
796 *
797 * DESCRIPTION: Warns if an Operation Region with static address or length
798 * is declared inside a control method
799 *
800 ******************************************************************************/
801
802 static void
MtCheckStaticOperationRegionInMethod(ACPI_PARSE_OBJECT * Op)803 MtCheckStaticOperationRegionInMethod(
804 ACPI_PARSE_OBJECT* Op)
805 {
806 ACPI_PARSE_OBJECT* AddressOp;
807 ACPI_PARSE_OBJECT* LengthOp;
808
809
810 if (Op->Asl.ParseOpcode != PARSEOP_OPERATIONREGION)
811 {
812 return;
813 }
814
815 /*
816 * OperationRegion should have 4 arguments defined. At this point, we
817 * assume that the parse tree is well-formed.
818 */
819 AddressOp = Op->Asl.Child->Asl.Next->Asl.Next;
820 LengthOp = Op->Asl.Child->Asl.Next->Asl.Next->Asl.Next;
821
822 if (UtGetParentMethodOp (Op) &&
823 AddressOp->Asl.ParseOpcode == PARSEOP_INTEGER &&
824 LengthOp->Asl.ParseOpcode == PARSEOP_INTEGER)
825 {
826 /*
827 * At this point, a static operation region declared inside of a
828 * control method has been found. Throw a warning because this is
829 * highly inefficient.
830 */
831 AslError(ASL_WARNING, ASL_MSG_STATIC_OPREGION_IN_METHOD, Op, NULL);
832 }
833
834 return;
835 }
836
837
838 /*******************************************************************************
839 *
840 * FUNCTION: MtMethodAnalysisWalkEnd
841 *
842 * PARAMETERS: ASL_WALK_CALLBACK
843 *
844 * RETURN: Status
845 *
846 * DESCRIPTION: Ascending callback for analysis walk. Complete method
847 * return analysis.
848 *
849 ******************************************************************************/
850
851 ACPI_STATUS
MtMethodAnalysisWalkEnd(ACPI_PARSE_OBJECT * Op,UINT32 Level,void * Context)852 MtMethodAnalysisWalkEnd (
853 ACPI_PARSE_OBJECT *Op,
854 UINT32 Level,
855 void *Context)
856 {
857 ASL_ANALYSIS_WALK_INFO *WalkInfo = (ASL_ANALYSIS_WALK_INFO *) Context;
858 ASL_METHOD_INFO *MethodInfo = WalkInfo->MethodStack;
859 char *ExternalPath;
860
861
862 switch (Op->Asl.ParseOpcode)
863 {
864 case PARSEOP_METHOD:
865 case PARSEOP_RETURN:
866
867 if (!MethodInfo)
868 {
869 printf ("No method info for method! [%s]\n", Op->Asl.Namepath);
870 AslError (ASL_ERROR, ASL_MSG_COMPILER_INTERNAL, Op,
871 "No method info for this method");
872
873 CmCleanupAndExit ();
874 return (AE_AML_INTERNAL);
875 }
876 break;
877
878 default:
879
880 break;
881 }
882
883 switch (Op->Asl.ParseOpcode)
884 {
885 case PARSEOP_METHOD:
886
887 WalkInfo->MethodStack = MethodInfo->Next;
888
889 /*
890 * Check if there is no return statement at the end of the
891 * method AND we can actually get there -- i.e., the execution
892 * of the method can possibly terminate without a return statement.
893 */
894 if ((!AnLastStatementIsReturn (Op)) &&
895 (!(Op->Asl.CompileFlags & OP_HAS_NO_EXIT)))
896 {
897 /*
898 * No return statement, and execution can possibly exit
899 * via this path. This is equivalent to Return ()
900 */
901 MethodInfo->NumReturnNoValue++;
902 }
903
904 /*
905 * Check for case where some return statements have a return value
906 * and some do not. Exit without a return statement is a return with
907 * no value
908 */
909 if (MethodInfo->NumReturnNoValue &&
910 MethodInfo->NumReturnWithValue)
911 {
912 ExternalPath = AcpiNsGetNormalizedPathname (Op->Asl.Node, TRUE);
913
914 AslError (ASL_WARNING, ASL_MSG_RETURN_TYPES, Op,
915 ExternalPath);
916
917 if (ExternalPath)
918 {
919 ACPI_FREE (ExternalPath);
920 }
921 }
922
923 /*
924 * If there are any RETURN() statements with no value, or there is a
925 * control path that allows the method to exit without a return value,
926 * we mark the method as a method that does not return a value. This
927 * knowledge can be used to check method invocations that expect a
928 * returned value.
929 */
930 if (MethodInfo->NumReturnNoValue)
931 {
932 if (MethodInfo->NumReturnWithValue)
933 {
934 Op->Asl.CompileFlags |= OP_METHOD_SOME_NO_RETVAL;
935 }
936 else
937 {
938 Op->Asl.CompileFlags |= OP_METHOD_NO_RETVAL;
939 }
940 }
941
942 /*
943 * Check predefined method names for correct return behavior
944 * and correct number of arguments. Also, some special checks
945 * For GPE and _REG methods.
946 */
947 if (ApCheckForPredefinedMethod (Op, MethodInfo))
948 {
949 /* Special check for two names like _L01 and _E01 in same scope */
950
951 ApCheckForGpeNameConflict (Op);
952
953 /*
954 * Special check for _REG: Must have an operation region definition
955 * within the same scope!
956 */
957 ApCheckRegMethod (Op);
958 }
959
960 ACPI_FREE (MethodInfo);
961 break;
962
963 case PARSEOP_NAME:
964
965 /* Special check for two names like _L01 and _E01 in same scope */
966
967 ApCheckForGpeNameConflict (Op);
968 break;
969
970 case PARSEOP_RETURN:
971
972 /*
973 * If the parent is a predefined method name, attempt to typecheck
974 * the return value. Only static types can be validated.
975 */
976 ApCheckPredefinedReturnValue (Op, MethodInfo);
977
978 /*
979 * The parent block does not "exit" and continue execution -- the
980 * method is terminated here with the Return() statement.
981 */
982 Op->Asl.Parent->Asl.CompileFlags |= OP_HAS_NO_EXIT;
983
984 /* Used in the "typing" pass later */
985
986 Op->Asl.ParentMethod = MethodInfo->Op;
987
988 /*
989 * If there is a peer node after the return statement, then this
990 * node is unreachable code -- i.e., it won't be executed because of
991 * the preceding Return() statement.
992 */
993 if (Op->Asl.Next)
994 {
995 AslError (ASL_WARNING, ASL_MSG_UNREACHABLE_CODE,
996 Op->Asl.Next, NULL);
997 }
998 break;
999
1000 case PARSEOP_IF:
1001
1002 if ((Op->Asl.CompileFlags & OP_HAS_NO_EXIT) &&
1003 (Op->Asl.Next) &&
1004 (Op->Asl.Next->Asl.ParseOpcode == PARSEOP_ELSE))
1005 {
1006 /*
1007 * This IF has a corresponding ELSE. The IF block has no exit,
1008 * (it contains an unconditional Return)
1009 * mark the ELSE block to remember this fact.
1010 */
1011 Op->Asl.Next->Asl.CompileFlags |= OP_IF_HAS_NO_EXIT;
1012 }
1013 break;
1014
1015 case PARSEOP_ELSE:
1016
1017 if ((Op->Asl.CompileFlags & OP_HAS_NO_EXIT) &&
1018 (Op->Asl.CompileFlags & OP_IF_HAS_NO_EXIT))
1019 {
1020 /*
1021 * This ELSE block has no exit and the corresponding IF block
1022 * has no exit either. Therefore, the parent node has no exit.
1023 */
1024 Op->Asl.Parent->Asl.CompileFlags |= OP_HAS_NO_EXIT;
1025 }
1026 break;
1027
1028
1029 default:
1030
1031 if ((Op->Asl.CompileFlags & OP_HAS_NO_EXIT) &&
1032 (Op->Asl.Parent))
1033 {
1034 /* If this node has no exit, then the parent has no exit either */
1035
1036 Op->Asl.Parent->Asl.CompileFlags |= OP_HAS_NO_EXIT;
1037 }
1038 break;
1039 }
1040
1041 return (AE_OK);
1042 }
1043