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