1efcc2a30SJung-uk Kim /****************************************************************************** 2efcc2a30SJung-uk Kim * 3efcc2a30SJung-uk Kim * Module Name: aslmethod.c - Control method analysis walk 4efcc2a30SJung-uk Kim * 5efcc2a30SJung-uk Kim *****************************************************************************/ 6efcc2a30SJung-uk Kim 70d84335fSJung-uk Kim /****************************************************************************** 80d84335fSJung-uk Kim * 90d84335fSJung-uk Kim * 1. Copyright Notice 100d84335fSJung-uk Kim * 11f425b8beSJung-uk Kim * Some or all of this work - Copyright (c) 1999 - 2020, Intel Corp. 12efcc2a30SJung-uk Kim * All rights reserved. 13efcc2a30SJung-uk Kim * 140d84335fSJung-uk Kim * 2. License 150d84335fSJung-uk Kim * 160d84335fSJung-uk Kim * 2.1. This is your license from Intel Corp. under its intellectual property 170d84335fSJung-uk Kim * rights. You may have additional license terms from the party that provided 180d84335fSJung-uk Kim * you this software, covering your right to use that party's intellectual 190d84335fSJung-uk Kim * property rights. 200d84335fSJung-uk Kim * 210d84335fSJung-uk Kim * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a 220d84335fSJung-uk Kim * copy of the source code appearing in this file ("Covered Code") an 230d84335fSJung-uk Kim * irrevocable, perpetual, worldwide license under Intel's copyrights in the 240d84335fSJung-uk Kim * base code distributed originally by Intel ("Original Intel Code") to copy, 250d84335fSJung-uk Kim * make derivatives, distribute, use and display any portion of the Covered 260d84335fSJung-uk Kim * Code in any form, with the right to sublicense such rights; and 270d84335fSJung-uk Kim * 280d84335fSJung-uk Kim * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent 290d84335fSJung-uk Kim * license (with the right to sublicense), under only those claims of Intel 300d84335fSJung-uk Kim * patents that are infringed by the Original Intel Code, to make, use, sell, 310d84335fSJung-uk Kim * offer to sell, and import the Covered Code and derivative works thereof 320d84335fSJung-uk Kim * solely to the minimum extent necessary to exercise the above copyright 330d84335fSJung-uk Kim * license, and in no event shall the patent license extend to any additions 340d84335fSJung-uk Kim * to or modifications of the Original Intel Code. No other license or right 350d84335fSJung-uk Kim * is granted directly or by implication, estoppel or otherwise; 360d84335fSJung-uk Kim * 370d84335fSJung-uk Kim * The above copyright and patent license is granted only if the following 380d84335fSJung-uk Kim * conditions are met: 390d84335fSJung-uk Kim * 400d84335fSJung-uk Kim * 3. Conditions 410d84335fSJung-uk Kim * 420d84335fSJung-uk Kim * 3.1. Redistribution of Source with Rights to Further Distribute Source. 430d84335fSJung-uk Kim * Redistribution of source code of any substantial portion of the Covered 440d84335fSJung-uk Kim * Code or modification with rights to further distribute source must include 450d84335fSJung-uk Kim * the above Copyright Notice, the above License, this list of Conditions, 460d84335fSJung-uk Kim * and the following Disclaimer and Export Compliance provision. In addition, 470d84335fSJung-uk Kim * Licensee must cause all Covered Code to which Licensee contributes to 480d84335fSJung-uk Kim * contain a file documenting the changes Licensee made to create that Covered 490d84335fSJung-uk Kim * Code and the date of any change. Licensee must include in that file the 500d84335fSJung-uk Kim * documentation of any changes made by any predecessor Licensee. Licensee 510d84335fSJung-uk Kim * must include a prominent statement that the modification is derived, 520d84335fSJung-uk Kim * directly or indirectly, from Original Intel Code. 530d84335fSJung-uk Kim * 540d84335fSJung-uk Kim * 3.2. Redistribution of Source with no Rights to Further Distribute Source. 550d84335fSJung-uk Kim * Redistribution of source code of any substantial portion of the Covered 560d84335fSJung-uk Kim * Code or modification without rights to further distribute source must 570d84335fSJung-uk Kim * include the following Disclaimer and Export Compliance provision in the 580d84335fSJung-uk Kim * documentation and/or other materials provided with distribution. In 590d84335fSJung-uk Kim * addition, Licensee may not authorize further sublicense of source of any 600d84335fSJung-uk Kim * portion of the Covered Code, and must include terms to the effect that the 610d84335fSJung-uk Kim * license from Licensee to its licensee is limited to the intellectual 620d84335fSJung-uk Kim * property embodied in the software Licensee provides to its licensee, and 630d84335fSJung-uk Kim * not to intellectual property embodied in modifications its licensee may 640d84335fSJung-uk Kim * make. 650d84335fSJung-uk Kim * 660d84335fSJung-uk Kim * 3.3. Redistribution of Executable. Redistribution in executable form of any 670d84335fSJung-uk Kim * substantial portion of the Covered Code or modification must reproduce the 680d84335fSJung-uk Kim * above Copyright Notice, and the following Disclaimer and Export Compliance 690d84335fSJung-uk Kim * provision in the documentation and/or other materials provided with the 700d84335fSJung-uk Kim * distribution. 710d84335fSJung-uk Kim * 720d84335fSJung-uk Kim * 3.4. Intel retains all right, title, and interest in and to the Original 730d84335fSJung-uk Kim * Intel Code. 740d84335fSJung-uk Kim * 750d84335fSJung-uk Kim * 3.5. Neither the name Intel nor any other trademark owned or controlled by 760d84335fSJung-uk Kim * Intel shall be used in advertising or otherwise to promote the sale, use or 770d84335fSJung-uk Kim * other dealings in products derived from or relating to the Covered Code 780d84335fSJung-uk Kim * without prior written authorization from Intel. 790d84335fSJung-uk Kim * 800d84335fSJung-uk Kim * 4. Disclaimer and Export Compliance 810d84335fSJung-uk Kim * 820d84335fSJung-uk Kim * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED 830d84335fSJung-uk Kim * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE 840d84335fSJung-uk Kim * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE, 850d84335fSJung-uk Kim * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY 860d84335fSJung-uk Kim * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY 870d84335fSJung-uk Kim * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A 880d84335fSJung-uk Kim * PARTICULAR PURPOSE. 890d84335fSJung-uk Kim * 900d84335fSJung-uk Kim * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES 910d84335fSJung-uk Kim * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR 920d84335fSJung-uk Kim * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT, 930d84335fSJung-uk Kim * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY 940d84335fSJung-uk Kim * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL 950d84335fSJung-uk Kim * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS 960d84335fSJung-uk Kim * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY 970d84335fSJung-uk Kim * LIMITED REMEDY. 980d84335fSJung-uk Kim * 990d84335fSJung-uk Kim * 4.3. Licensee shall not export, either directly or indirectly, any of this 1000d84335fSJung-uk Kim * software or system incorporating such software without first obtaining any 1010d84335fSJung-uk Kim * required license or other approval from the U. S. Department of Commerce or 1020d84335fSJung-uk Kim * any other agency or department of the United States Government. In the 1030d84335fSJung-uk Kim * event Licensee exports any such software from the United States or 1040d84335fSJung-uk Kim * re-exports any such software from a foreign destination, Licensee shall 1050d84335fSJung-uk Kim * ensure that the distribution and export/re-export of the software is in 1060d84335fSJung-uk Kim * compliance with all laws, regulations, orders, or other restrictions of the 1070d84335fSJung-uk Kim * U.S. Export Administration Regulations. Licensee agrees that neither it nor 1080d84335fSJung-uk Kim * any of its subsidiaries will export/re-export any technical data, process, 1090d84335fSJung-uk Kim * software, or service, directly or indirectly, to any country for which the 1100d84335fSJung-uk Kim * United States government or any agency thereof requires an export license, 1110d84335fSJung-uk Kim * other governmental approval, or letter of assurance, without first obtaining 1120d84335fSJung-uk Kim * such license, approval or letter. 1130d84335fSJung-uk Kim * 1140d84335fSJung-uk Kim ***************************************************************************** 1150d84335fSJung-uk Kim * 1160d84335fSJung-uk Kim * Alternatively, you may choose to be licensed under the terms of the 1170d84335fSJung-uk Kim * following license: 1180d84335fSJung-uk Kim * 119efcc2a30SJung-uk Kim * Redistribution and use in source and binary forms, with or without 120efcc2a30SJung-uk Kim * modification, are permitted provided that the following conditions 121efcc2a30SJung-uk Kim * are met: 122efcc2a30SJung-uk Kim * 1. Redistributions of source code must retain the above copyright 123efcc2a30SJung-uk Kim * notice, this list of conditions, and the following disclaimer, 124efcc2a30SJung-uk Kim * without modification. 125efcc2a30SJung-uk Kim * 2. Redistributions in binary form must reproduce at minimum a disclaimer 126efcc2a30SJung-uk Kim * substantially similar to the "NO WARRANTY" disclaimer below 127efcc2a30SJung-uk Kim * ("Disclaimer") and any redistribution must be conditioned upon 128efcc2a30SJung-uk Kim * including a substantially similar Disclaimer requirement for further 129efcc2a30SJung-uk Kim * binary redistribution. 130efcc2a30SJung-uk Kim * 3. Neither the names of the above-listed copyright holders nor the names 131efcc2a30SJung-uk Kim * of any contributors may be used to endorse or promote products derived 132efcc2a30SJung-uk Kim * from this software without specific prior written permission. 133efcc2a30SJung-uk Kim * 1340d84335fSJung-uk Kim * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 1350d84335fSJung-uk Kim * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 1360d84335fSJung-uk Kim * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR 1370d84335fSJung-uk Kim * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 1380d84335fSJung-uk Kim * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 1390d84335fSJung-uk Kim * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT 1400d84335fSJung-uk Kim * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 1410d84335fSJung-uk Kim * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 1420d84335fSJung-uk Kim * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 1430d84335fSJung-uk Kim * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 1440d84335fSJung-uk Kim * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 1450d84335fSJung-uk Kim * 1460d84335fSJung-uk Kim * Alternatively, you may choose to be licensed under the terms of the 147efcc2a30SJung-uk Kim * GNU General Public License ("GPL") version 2 as published by the Free 148efcc2a30SJung-uk Kim * Software Foundation. 149efcc2a30SJung-uk Kim * 1500d84335fSJung-uk Kim *****************************************************************************/ 151efcc2a30SJung-uk Kim 152efcc2a30SJung-uk Kim #include <contrib/dev/acpica/compiler/aslcompiler.h> 153efcc2a30SJung-uk Kim #include "aslcompiler.y.h" 154ec0234b4SJung-uk Kim #include <contrib/dev/acpica/include/acnamesp.h> 155a9d8d09cSJung-uk Kim #include <contrib/dev/acpica/include/acparser.h> 156a9d8d09cSJung-uk Kim #include <contrib/dev/acpica/include/amlcode.h> 157efcc2a30SJung-uk Kim 158efcc2a30SJung-uk Kim 159efcc2a30SJung-uk Kim #define _COMPONENT ACPI_COMPILER 160efcc2a30SJung-uk Kim ACPI_MODULE_NAME ("aslmethod") 161efcc2a30SJung-uk Kim 162efcc2a30SJung-uk Kim 163a9d8d09cSJung-uk Kim /* Local prototypes */ 164a9d8d09cSJung-uk Kim 165f8146b88SJung-uk Kim static void 166a9d8d09cSJung-uk Kim MtCheckNamedObjectInMethod ( 167a9d8d09cSJung-uk Kim ACPI_PARSE_OBJECT *Op, 168a9d8d09cSJung-uk Kim ASL_METHOD_INFO *MethodInfo); 169a9d8d09cSJung-uk Kim 170ec0234b4SJung-uk Kim static void 171ec0234b4SJung-uk Kim MtCheckStaticOperationRegionInMethod ( 172ec0234b4SJung-uk Kim ACPI_PARSE_OBJECT *Op); 173ec0234b4SJung-uk Kim 174a9d8d09cSJung-uk Kim 175efcc2a30SJung-uk Kim /******************************************************************************* 176efcc2a30SJung-uk Kim * 177efcc2a30SJung-uk Kim * FUNCTION: MtMethodAnalysisWalkBegin 178efcc2a30SJung-uk Kim * 179efcc2a30SJung-uk Kim * PARAMETERS: ASL_WALK_CALLBACK 180efcc2a30SJung-uk Kim * 181efcc2a30SJung-uk Kim * RETURN: Status 182efcc2a30SJung-uk Kim * 183efcc2a30SJung-uk Kim * DESCRIPTION: Descending callback for the analysis walk. Check methods for: 184efcc2a30SJung-uk Kim * 1) Initialized local variables 185efcc2a30SJung-uk Kim * 2) Valid arguments 186efcc2a30SJung-uk Kim * 3) Return types 187efcc2a30SJung-uk Kim * 188efcc2a30SJung-uk Kim ******************************************************************************/ 189efcc2a30SJung-uk Kim 190efcc2a30SJung-uk Kim ACPI_STATUS 191efcc2a30SJung-uk Kim MtMethodAnalysisWalkBegin ( 192efcc2a30SJung-uk Kim ACPI_PARSE_OBJECT *Op, 193efcc2a30SJung-uk Kim UINT32 Level, 194efcc2a30SJung-uk Kim void *Context) 195efcc2a30SJung-uk Kim { 196efcc2a30SJung-uk Kim ASL_ANALYSIS_WALK_INFO *WalkInfo = (ASL_ANALYSIS_WALK_INFO *) Context; 197efcc2a30SJung-uk Kim ASL_METHOD_INFO *MethodInfo = WalkInfo->MethodStack; 198efcc2a30SJung-uk Kim ACPI_PARSE_OBJECT *Next; 199efcc2a30SJung-uk Kim UINT32 RegisterNumber; 200efcc2a30SJung-uk Kim UINT32 i; 201efcc2a30SJung-uk Kim char LocalName[] = "Local0"; 202efcc2a30SJung-uk Kim char ArgName[] = "Arg0"; 203efcc2a30SJung-uk Kim ACPI_PARSE_OBJECT *ArgNode; 204efcc2a30SJung-uk Kim ACPI_PARSE_OBJECT *NextType; 205efcc2a30SJung-uk Kim UINT8 ActualArgs = 0; 206a009b7dcSJung-uk Kim BOOLEAN HidExists; 207a009b7dcSJung-uk Kim BOOLEAN AdrExists; 208efcc2a30SJung-uk Kim 209efcc2a30SJung-uk Kim 210f8146b88SJung-uk Kim /* Build cross-reference output file if requested */ 211f8146b88SJung-uk Kim 2126f1f1a63SJung-uk Kim if (AslGbl_CrossReferenceOutput) 213f8146b88SJung-uk Kim { 214f8146b88SJung-uk Kim OtXrefWalkPart1 (Op, Level, MethodInfo); 215f8146b88SJung-uk Kim } 216f8146b88SJung-uk Kim 217efcc2a30SJung-uk Kim switch (Op->Asl.ParseOpcode) 218efcc2a30SJung-uk Kim { 219efcc2a30SJung-uk Kim case PARSEOP_METHOD: 220efcc2a30SJung-uk Kim 2216f1f1a63SJung-uk Kim AslGbl_TotalMethods++; 222efcc2a30SJung-uk Kim 223efcc2a30SJung-uk Kim /* Create and init method info */ 224efcc2a30SJung-uk Kim 225efcc2a30SJung-uk Kim MethodInfo = UtLocalCalloc (sizeof (ASL_METHOD_INFO)); 226efcc2a30SJung-uk Kim MethodInfo->Next = WalkInfo->MethodStack; 227efcc2a30SJung-uk Kim MethodInfo->Op = Op; 228efcc2a30SJung-uk Kim 229efcc2a30SJung-uk Kim WalkInfo->MethodStack = MethodInfo; 230efcc2a30SJung-uk Kim 231313a0c13SJung-uk Kim /* 232313a0c13SJung-uk Kim * Special handling for _PSx methods. Dependency rules (same scope): 233313a0c13SJung-uk Kim * 234313a0c13SJung-uk Kim * 1) _PS0 - One of these must exist: _PS1, _PS2, _PS3 235313a0c13SJung-uk Kim * 2) _PS1/_PS2/_PS3: A _PS0 must exist 236313a0c13SJung-uk Kim */ 237278f0de6SJung-uk Kim if (ACPI_COMPARE_NAMESEG (METHOD_NAME__PS0, Op->Asl.NameSeg)) 238313a0c13SJung-uk Kim { 239313a0c13SJung-uk Kim /* For _PS0, one of _PS1/_PS2/_PS3 must exist */ 240313a0c13SJung-uk Kim 241313a0c13SJung-uk Kim if ((!ApFindNameInScope (METHOD_NAME__PS1, Op)) && 242313a0c13SJung-uk Kim (!ApFindNameInScope (METHOD_NAME__PS2, Op)) && 243313a0c13SJung-uk Kim (!ApFindNameInScope (METHOD_NAME__PS3, Op))) 244313a0c13SJung-uk Kim { 245313a0c13SJung-uk Kim AslError (ASL_WARNING, ASL_MSG_MISSING_DEPENDENCY, Op, 246313a0c13SJung-uk Kim "_PS0 requires one of _PS1/_PS2/_PS3 in same scope"); 247313a0c13SJung-uk Kim } 248313a0c13SJung-uk Kim } 249313a0c13SJung-uk Kim else if ( 250278f0de6SJung-uk Kim ACPI_COMPARE_NAMESEG (METHOD_NAME__PS1, Op->Asl.NameSeg) || 251278f0de6SJung-uk Kim ACPI_COMPARE_NAMESEG (METHOD_NAME__PS2, Op->Asl.NameSeg) || 252278f0de6SJung-uk Kim ACPI_COMPARE_NAMESEG (METHOD_NAME__PS3, Op->Asl.NameSeg)) 253313a0c13SJung-uk Kim { 254313a0c13SJung-uk Kim /* For _PS1/_PS2/_PS3, a _PS0 must exist */ 255313a0c13SJung-uk Kim 256313a0c13SJung-uk Kim if (!ApFindNameInScope (METHOD_NAME__PS0, Op)) 257313a0c13SJung-uk Kim { 2586f1f1a63SJung-uk Kim sprintf (AslGbl_MsgBuffer, 259313a0c13SJung-uk Kim "%4.4s requires _PS0 in same scope", Op->Asl.NameSeg); 260313a0c13SJung-uk Kim 261313a0c13SJung-uk Kim AslError (ASL_WARNING, ASL_MSG_MISSING_DEPENDENCY, Op, 2626f1f1a63SJung-uk Kim AslGbl_MsgBuffer); 263313a0c13SJung-uk Kim } 264313a0c13SJung-uk Kim } 265313a0c13SJung-uk Kim 266313a0c13SJung-uk Kim /* Get the name node */ 267efcc2a30SJung-uk Kim 268efcc2a30SJung-uk Kim Next = Op->Asl.Child; 269efcc2a30SJung-uk Kim 270efcc2a30SJung-uk Kim /* Get the NumArguments node */ 271efcc2a30SJung-uk Kim 272efcc2a30SJung-uk Kim Next = Next->Asl.Next; 273efcc2a30SJung-uk Kim MethodInfo->NumArguments = (UINT8) 274efcc2a30SJung-uk Kim (((UINT8) Next->Asl.Value.Integer) & 0x07); 275efcc2a30SJung-uk Kim 276efcc2a30SJung-uk Kim /* Get the SerializeRule and SyncLevel nodes, ignored here */ 277efcc2a30SJung-uk Kim 278efcc2a30SJung-uk Kim Next = Next->Asl.Next; 279a9d8d09cSJung-uk Kim MethodInfo->ShouldBeSerialized = (UINT8) Next->Asl.Value.Integer; 280a9d8d09cSJung-uk Kim 281efcc2a30SJung-uk Kim Next = Next->Asl.Next; 282efcc2a30SJung-uk Kim ArgNode = Next; 283efcc2a30SJung-uk Kim 284efcc2a30SJung-uk Kim /* Get the ReturnType node */ 285efcc2a30SJung-uk Kim 286efcc2a30SJung-uk Kim Next = Next->Asl.Next; 287efcc2a30SJung-uk Kim 288efcc2a30SJung-uk Kim NextType = Next->Asl.Child; 289efcc2a30SJung-uk Kim 290ec0234b4SJung-uk Kim MethodInfo->ValidReturnTypes = MtProcessTypeOp (NextType); 291efcc2a30SJung-uk Kim 292efcc2a30SJung-uk Kim /* Get the ParameterType node */ 293efcc2a30SJung-uk Kim 294efcc2a30SJung-uk Kim Next = Next->Asl.Next; 295efcc2a30SJung-uk Kim 296efcc2a30SJung-uk Kim NextType = Next->Asl.Child; 297ec0234b4SJung-uk Kim if (!NextType) 298efcc2a30SJung-uk Kim { 299ec0234b4SJung-uk Kim /* 300ec0234b4SJung-uk Kim * The optional parameter types list was omitted at the source 301ec0234b4SJung-uk Kim * level. Use the Argument count parameter instead. 302ec0234b4SJung-uk Kim */ 303ec0234b4SJung-uk Kim ActualArgs = MethodInfo->NumArguments; 304efcc2a30SJung-uk Kim } 305efcc2a30SJung-uk Kim else 306efcc2a30SJung-uk Kim { 307ec0234b4SJung-uk Kim ActualArgs = MtProcessParameterTypeList (NextType, 308ec0234b4SJung-uk Kim MethodInfo->ValidArgTypes); 309efcc2a30SJung-uk Kim } 310efcc2a30SJung-uk Kim 311efcc2a30SJung-uk Kim if ((MethodInfo->NumArguments) && 312efcc2a30SJung-uk Kim (MethodInfo->NumArguments != ActualArgs)) 313efcc2a30SJung-uk Kim { 314ec0234b4SJung-uk Kim sprintf (AslGbl_MsgBuffer, 315ec0234b4SJung-uk Kim "Length = %u", ActualArgs); 316ec0234b4SJung-uk Kim AslError (ASL_ERROR, ASL_MSG_ARG_COUNT_MISMATCH, 317ec0234b4SJung-uk Kim Op->Asl.Child->Asl.Next, AslGbl_MsgBuffer); 318efcc2a30SJung-uk Kim } 319efcc2a30SJung-uk Kim 320efcc2a30SJung-uk Kim /* Allow numarguments == 0 for Function() */ 321efcc2a30SJung-uk Kim 322efcc2a30SJung-uk Kim if ((!MethodInfo->NumArguments) && (ActualArgs)) 323efcc2a30SJung-uk Kim { 324efcc2a30SJung-uk Kim MethodInfo->NumArguments = ActualArgs; 325efcc2a30SJung-uk Kim ArgNode->Asl.Value.Integer |= ActualArgs; 326efcc2a30SJung-uk Kim } 327efcc2a30SJung-uk Kim 328efcc2a30SJung-uk Kim /* 329efcc2a30SJung-uk Kim * Actual arguments are initialized at method entry. 330efcc2a30SJung-uk Kim * All other ArgX "registers" can be used as locals, so we 331efcc2a30SJung-uk Kim * track their initialization. 332efcc2a30SJung-uk Kim */ 333efcc2a30SJung-uk Kim for (i = 0; i < MethodInfo->NumArguments; i++) 334efcc2a30SJung-uk Kim { 335efcc2a30SJung-uk Kim MethodInfo->ArgInitialized[i] = TRUE; 336efcc2a30SJung-uk Kim } 337efcc2a30SJung-uk Kim break; 338efcc2a30SJung-uk Kim 339efcc2a30SJung-uk Kim case PARSEOP_METHODCALL: 340efcc2a30SJung-uk Kim 34167d9aa44SJung-uk Kim /* Check for a recursive method call */ 34267d9aa44SJung-uk Kim 343efcc2a30SJung-uk Kim if (MethodInfo && 344efcc2a30SJung-uk Kim (Op->Asl.Node == MethodInfo->Op->Asl.Node)) 345efcc2a30SJung-uk Kim { 34667d9aa44SJung-uk Kim if (MethodInfo->CreatesNamedObjects) 34767d9aa44SJung-uk Kim { 34867d9aa44SJung-uk Kim /* 34967d9aa44SJung-uk Kim * This is an error, as it will fail at runtime on all ACPI 35067d9aa44SJung-uk Kim * implementations. Any named object declarations will be 35167d9aa44SJung-uk Kim * executed twice, causing failure the second time. Note, 35267d9aa44SJung-uk Kim * this is independent of whether the method is declared 35367d9aa44SJung-uk Kim * Serialized, because the same thread is attempting to 35467d9aa44SJung-uk Kim * reenter the method, and this will always succeed. 35567d9aa44SJung-uk Kim */ 35667d9aa44SJung-uk Kim AslDualParseOpError (ASL_ERROR, ASL_MSG_ILLEGAL_RECURSION, Op, 35767d9aa44SJung-uk Kim Op->Asl.Value.String, ASL_MSG_FOUND_HERE, MethodInfo->Op, 35867d9aa44SJung-uk Kim MethodInfo->Op->Asl.ExternalName); 35967d9aa44SJung-uk Kim } 36067d9aa44SJung-uk Kim else 36167d9aa44SJung-uk Kim { 36267d9aa44SJung-uk Kim /* Method does not create objects, issue a remark */ 36367d9aa44SJung-uk Kim 364efcc2a30SJung-uk Kim AslError (ASL_REMARK, ASL_MSG_RECURSION, Op, Op->Asl.ExternalName); 365efcc2a30SJung-uk Kim } 36667d9aa44SJung-uk Kim } 367efcc2a30SJung-uk Kim break; 368efcc2a30SJung-uk Kim 369efcc2a30SJung-uk Kim case PARSEOP_LOCAL0: 370efcc2a30SJung-uk Kim case PARSEOP_LOCAL1: 371efcc2a30SJung-uk Kim case PARSEOP_LOCAL2: 372efcc2a30SJung-uk Kim case PARSEOP_LOCAL3: 373efcc2a30SJung-uk Kim case PARSEOP_LOCAL4: 374efcc2a30SJung-uk Kim case PARSEOP_LOCAL5: 375efcc2a30SJung-uk Kim case PARSEOP_LOCAL6: 376efcc2a30SJung-uk Kim case PARSEOP_LOCAL7: 377efcc2a30SJung-uk Kim 378efcc2a30SJung-uk Kim if (!MethodInfo) 379efcc2a30SJung-uk Kim { 380efcc2a30SJung-uk Kim /* 381efcc2a30SJung-uk Kim * Local was used outside a control method, or there was an error 382efcc2a30SJung-uk Kim * in the method declaration. 383efcc2a30SJung-uk Kim */ 384f8146b88SJung-uk Kim AslError (ASL_REMARK, ASL_MSG_LOCAL_OUTSIDE_METHOD, 385f8146b88SJung-uk Kim Op, Op->Asl.ExternalName); 386efcc2a30SJung-uk Kim return (AE_ERROR); 387efcc2a30SJung-uk Kim } 388efcc2a30SJung-uk Kim 389fe0f0bbbSJung-uk Kim RegisterNumber = (Op->Asl.AmlOpcode & 0x0007); 390efcc2a30SJung-uk Kim 391efcc2a30SJung-uk Kim /* 392efcc2a30SJung-uk Kim * If the local is being used as a target, mark the local 393efcc2a30SJung-uk Kim * initialized 394efcc2a30SJung-uk Kim */ 3955f9b24faSJung-uk Kim if (Op->Asl.CompileFlags & OP_IS_TARGET) 396efcc2a30SJung-uk Kim { 397efcc2a30SJung-uk Kim MethodInfo->LocalInitialized[RegisterNumber] = TRUE; 398efcc2a30SJung-uk Kim } 399efcc2a30SJung-uk Kim 400efcc2a30SJung-uk Kim /* 401efcc2a30SJung-uk Kim * Otherwise, this is a reference, check if the local 402efcc2a30SJung-uk Kim * has been previously initialized. 403efcc2a30SJung-uk Kim * 404efcc2a30SJung-uk Kim * The only operator that accepts an uninitialized value is ObjectType() 405efcc2a30SJung-uk Kim */ 406efcc2a30SJung-uk Kim else if ((!MethodInfo->LocalInitialized[RegisterNumber]) && 407efcc2a30SJung-uk Kim (Op->Asl.Parent->Asl.ParseOpcode != PARSEOP_OBJECTTYPE)) 408efcc2a30SJung-uk Kim { 409efcc2a30SJung-uk Kim LocalName[strlen (LocalName) -1] = (char) (RegisterNumber + 0x30); 410efcc2a30SJung-uk Kim AslError (ASL_ERROR, ASL_MSG_LOCAL_INIT, Op, LocalName); 411efcc2a30SJung-uk Kim } 412efcc2a30SJung-uk Kim break; 413efcc2a30SJung-uk Kim 414efcc2a30SJung-uk Kim case PARSEOP_ARG0: 415efcc2a30SJung-uk Kim case PARSEOP_ARG1: 416efcc2a30SJung-uk Kim case PARSEOP_ARG2: 417efcc2a30SJung-uk Kim case PARSEOP_ARG3: 418efcc2a30SJung-uk Kim case PARSEOP_ARG4: 419efcc2a30SJung-uk Kim case PARSEOP_ARG5: 420efcc2a30SJung-uk Kim case PARSEOP_ARG6: 421efcc2a30SJung-uk Kim 422efcc2a30SJung-uk Kim if (!MethodInfo) 423efcc2a30SJung-uk Kim { 424efcc2a30SJung-uk Kim /* 425efcc2a30SJung-uk Kim * Arg was used outside a control method, or there was an error 426efcc2a30SJung-uk Kim * in the method declaration. 427efcc2a30SJung-uk Kim */ 428f8146b88SJung-uk Kim AslError (ASL_REMARK, ASL_MSG_LOCAL_OUTSIDE_METHOD, 429f8146b88SJung-uk Kim Op, Op->Asl.ExternalName); 430efcc2a30SJung-uk Kim return (AE_ERROR); 431efcc2a30SJung-uk Kim } 432efcc2a30SJung-uk Kim 433efcc2a30SJung-uk Kim RegisterNumber = (Op->Asl.AmlOpcode & 0x000F) - 8; 434efcc2a30SJung-uk Kim ArgName[strlen (ArgName) -1] = (char) (RegisterNumber + 0x30); 435efcc2a30SJung-uk Kim 436efcc2a30SJung-uk Kim /* 437efcc2a30SJung-uk Kim * If the Arg is being used as a target, mark the local 438efcc2a30SJung-uk Kim * initialized 439efcc2a30SJung-uk Kim */ 4405f9b24faSJung-uk Kim if (Op->Asl.CompileFlags & OP_IS_TARGET) 441efcc2a30SJung-uk Kim { 442efcc2a30SJung-uk Kim MethodInfo->ArgInitialized[RegisterNumber] = TRUE; 443efcc2a30SJung-uk Kim } 444efcc2a30SJung-uk Kim 445efcc2a30SJung-uk Kim /* 446efcc2a30SJung-uk Kim * Otherwise, this is a reference, check if the Arg 447efcc2a30SJung-uk Kim * has been previously initialized. 448efcc2a30SJung-uk Kim * 449efcc2a30SJung-uk Kim * The only operator that accepts an uninitialized value is ObjectType() 450efcc2a30SJung-uk Kim */ 451efcc2a30SJung-uk Kim else if ((!MethodInfo->ArgInitialized[RegisterNumber]) && 452efcc2a30SJung-uk Kim (Op->Asl.Parent->Asl.ParseOpcode != PARSEOP_OBJECTTYPE)) 453efcc2a30SJung-uk Kim { 454efcc2a30SJung-uk Kim AslError (ASL_ERROR, ASL_MSG_ARG_INIT, Op, ArgName); 455efcc2a30SJung-uk Kim } 456efcc2a30SJung-uk Kim 457efcc2a30SJung-uk Kim /* Flag this arg if it is not a "real" argument to the method */ 458efcc2a30SJung-uk Kim 459efcc2a30SJung-uk Kim if (RegisterNumber >= MethodInfo->NumArguments) 460efcc2a30SJung-uk Kim { 461efcc2a30SJung-uk Kim AslError (ASL_REMARK, ASL_MSG_NOT_PARAMETER, Op, ArgName); 462efcc2a30SJung-uk Kim } 463efcc2a30SJung-uk Kim break; 464efcc2a30SJung-uk Kim 465efcc2a30SJung-uk Kim case PARSEOP_RETURN: 466efcc2a30SJung-uk Kim 467efcc2a30SJung-uk Kim if (!MethodInfo) 468efcc2a30SJung-uk Kim { 469efcc2a30SJung-uk Kim /* 470efcc2a30SJung-uk Kim * Probably was an error in the method declaration, 471efcc2a30SJung-uk Kim * no additional error here 472efcc2a30SJung-uk Kim */ 473efcc2a30SJung-uk Kim ACPI_WARNING ((AE_INFO, "%p, No parent method", Op)); 474efcc2a30SJung-uk Kim return (AE_ERROR); 475efcc2a30SJung-uk Kim } 476efcc2a30SJung-uk Kim 477efcc2a30SJung-uk Kim /* 478efcc2a30SJung-uk Kim * A child indicates a possible return value. A simple Return or 4795f9b24faSJung-uk Kim * Return() is marked with OP_IS_NULL_RETURN by the parser so 480efcc2a30SJung-uk Kim * that it is not counted as a "real" return-with-value, although 481efcc2a30SJung-uk Kim * the AML code that is actually emitted is Return(0). The AML 482efcc2a30SJung-uk Kim * definition of Return has a required parameter, so we are 483efcc2a30SJung-uk Kim * forced to convert a null return to Return(0). 484efcc2a30SJung-uk Kim */ 485efcc2a30SJung-uk Kim if ((Op->Asl.Child) && 486efcc2a30SJung-uk Kim (Op->Asl.Child->Asl.ParseOpcode != PARSEOP_DEFAULT_ARG) && 4875f9b24faSJung-uk Kim (!(Op->Asl.Child->Asl.CompileFlags & OP_IS_NULL_RETURN))) 488efcc2a30SJung-uk Kim { 489efcc2a30SJung-uk Kim MethodInfo->NumReturnWithValue++; 490efcc2a30SJung-uk Kim } 491efcc2a30SJung-uk Kim else 492efcc2a30SJung-uk Kim { 493efcc2a30SJung-uk Kim MethodInfo->NumReturnNoValue++; 494efcc2a30SJung-uk Kim } 495efcc2a30SJung-uk Kim break; 496efcc2a30SJung-uk Kim 497efcc2a30SJung-uk Kim case PARSEOP_BREAK: 498efcc2a30SJung-uk Kim case PARSEOP_CONTINUE: 499efcc2a30SJung-uk Kim 500efcc2a30SJung-uk Kim Next = Op->Asl.Parent; 501efcc2a30SJung-uk Kim while (Next) 502efcc2a30SJung-uk Kim { 503efcc2a30SJung-uk Kim if (Next->Asl.ParseOpcode == PARSEOP_WHILE) 504efcc2a30SJung-uk Kim { 505efcc2a30SJung-uk Kim break; 506efcc2a30SJung-uk Kim } 507efcc2a30SJung-uk Kim Next = Next->Asl.Parent; 508efcc2a30SJung-uk Kim } 509efcc2a30SJung-uk Kim 510efcc2a30SJung-uk Kim if (!Next) 511efcc2a30SJung-uk Kim { 512efcc2a30SJung-uk Kim AslError (ASL_ERROR, ASL_MSG_NO_WHILE, Op, NULL); 513efcc2a30SJung-uk Kim } 514efcc2a30SJung-uk Kim break; 515efcc2a30SJung-uk Kim 516efcc2a30SJung-uk Kim case PARSEOP_STALL: 517efcc2a30SJung-uk Kim 518efcc2a30SJung-uk Kim /* We can range check if the argument is an integer */ 519efcc2a30SJung-uk Kim 520efcc2a30SJung-uk Kim if ((Op->Asl.Child->Asl.ParseOpcode == PARSEOP_INTEGER) && 521efcc2a30SJung-uk Kim (Op->Asl.Child->Asl.Value.Integer > ACPI_UINT8_MAX)) 522efcc2a30SJung-uk Kim { 523efcc2a30SJung-uk Kim AslError (ASL_ERROR, ASL_MSG_INVALID_TIME, Op, NULL); 524efcc2a30SJung-uk Kim } 525efcc2a30SJung-uk Kim break; 526efcc2a30SJung-uk Kim 527efcc2a30SJung-uk Kim case PARSEOP_DEVICE: 528313a0c13SJung-uk Kim 529a009b7dcSJung-uk Kim /* Check usage of _HID and _ADR objects */ 530a009b7dcSJung-uk Kim 531a009b7dcSJung-uk Kim HidExists = ApFindNameInDeviceTree (METHOD_NAME__HID, Op); 532a009b7dcSJung-uk Kim AdrExists = ApFindNameInDeviceTree (METHOD_NAME__ADR, Op); 533a009b7dcSJung-uk Kim 534a009b7dcSJung-uk Kim if (!HidExists && !AdrExists) 535313a0c13SJung-uk Kim { 536313a0c13SJung-uk Kim AslError (ASL_WARNING, ASL_MSG_MISSING_DEPENDENCY, Op, 537313a0c13SJung-uk Kim "Device object requires a _HID or _ADR in same scope"); 538313a0c13SJung-uk Kim } 539a009b7dcSJung-uk Kim else if (HidExists && AdrExists) 540a009b7dcSJung-uk Kim { 541a009b7dcSJung-uk Kim /* 542a009b7dcSJung-uk Kim * According to the ACPI spec, "A device object must contain 543a009b7dcSJung-uk Kim * either an _HID object or an _ADR object, but should not contain 544a009b7dcSJung-uk Kim * both". 545a009b7dcSJung-uk Kim */ 546a009b7dcSJung-uk Kim AslError (ASL_WARNING, ASL_MSG_MULTIPLE_TYPES, Op, 547a009b7dcSJung-uk Kim "Device object requires either a _HID or _ADR, but not both"); 548a009b7dcSJung-uk Kim } 549313a0c13SJung-uk Kim break; 550313a0c13SJung-uk Kim 551efcc2a30SJung-uk Kim case PARSEOP_EVENT: 552efcc2a30SJung-uk Kim case PARSEOP_MUTEX: 553efcc2a30SJung-uk Kim case PARSEOP_OPERATIONREGION: 554efcc2a30SJung-uk Kim case PARSEOP_POWERRESOURCE: 555efcc2a30SJung-uk Kim case PARSEOP_PROCESSOR: 556efcc2a30SJung-uk Kim case PARSEOP_THERMALZONE: 557efcc2a30SJung-uk Kim 558efcc2a30SJung-uk Kim /* 559efcc2a30SJung-uk Kim * The first operand is a name to be created in the namespace. 560efcc2a30SJung-uk Kim * Check against the reserved list. 561efcc2a30SJung-uk Kim */ 562efcc2a30SJung-uk Kim i = ApCheckForPredefinedName (Op, Op->Asl.NameSeg); 563efcc2a30SJung-uk Kim if (i < ACPI_VALID_RESERVED_NAME_MAX) 564efcc2a30SJung-uk Kim { 565f8146b88SJung-uk Kim AslError (ASL_ERROR, ASL_MSG_RESERVED_USE, 566f8146b88SJung-uk Kim Op, Op->Asl.ExternalName); 567efcc2a30SJung-uk Kim } 568ec0234b4SJung-uk Kim 569ec0234b4SJung-uk Kim MtCheckStaticOperationRegionInMethod (Op); 570efcc2a30SJung-uk Kim break; 571efcc2a30SJung-uk Kim 572efcc2a30SJung-uk Kim case PARSEOP_NAME: 573efcc2a30SJung-uk Kim 574efcc2a30SJung-uk Kim /* Typecheck any predefined names statically defined with Name() */ 575efcc2a30SJung-uk Kim 576efcc2a30SJung-uk Kim ApCheckForPredefinedObject (Op, Op->Asl.NameSeg); 577efcc2a30SJung-uk Kim 578efcc2a30SJung-uk Kim /* Special typechecking for _HID */ 579efcc2a30SJung-uk Kim 580f9a6772eSJung-uk Kim if (ACPI_COMPARE_NAMESEG (METHOD_NAME__HID, Op->Asl.NameSeg)) 581efcc2a30SJung-uk Kim { 582efcc2a30SJung-uk Kim Next = Op->Asl.Child->Asl.Next; 583efcc2a30SJung-uk Kim AnCheckId (Next, ASL_TYPE_HID); 584efcc2a30SJung-uk Kim } 585efcc2a30SJung-uk Kim 586efcc2a30SJung-uk Kim /* Special typechecking for _CID */ 587efcc2a30SJung-uk Kim 588f9a6772eSJung-uk Kim else if (ACPI_COMPARE_NAMESEG (METHOD_NAME__CID, Op->Asl.NameSeg)) 589efcc2a30SJung-uk Kim { 590efcc2a30SJung-uk Kim Next = Op->Asl.Child->Asl.Next; 591efcc2a30SJung-uk Kim 592efcc2a30SJung-uk Kim if ((Next->Asl.ParseOpcode == PARSEOP_PACKAGE) || 593efcc2a30SJung-uk Kim (Next->Asl.ParseOpcode == PARSEOP_VAR_PACKAGE)) 594efcc2a30SJung-uk Kim { 595efcc2a30SJung-uk Kim Next = Next->Asl.Child; 596efcc2a30SJung-uk Kim while (Next) 597efcc2a30SJung-uk Kim { 598efcc2a30SJung-uk Kim AnCheckId (Next, ASL_TYPE_CID); 599efcc2a30SJung-uk Kim Next = Next->Asl.Next; 600efcc2a30SJung-uk Kim } 601efcc2a30SJung-uk Kim } 602efcc2a30SJung-uk Kim else 603efcc2a30SJung-uk Kim { 604efcc2a30SJung-uk Kim AnCheckId (Next, ASL_TYPE_CID); 605efcc2a30SJung-uk Kim } 606efcc2a30SJung-uk Kim } 607313a0c13SJung-uk Kim 608efcc2a30SJung-uk Kim break; 609efcc2a30SJung-uk Kim 610efcc2a30SJung-uk Kim default: 611a9d8d09cSJung-uk Kim 612efcc2a30SJung-uk Kim break; 613efcc2a30SJung-uk Kim } 614efcc2a30SJung-uk Kim 615a9d8d09cSJung-uk Kim /* Check for named object creation within a non-serialized method */ 616a9d8d09cSJung-uk Kim 617a9d8d09cSJung-uk Kim MtCheckNamedObjectInMethod (Op, MethodInfo); 618efcc2a30SJung-uk Kim return (AE_OK); 619efcc2a30SJung-uk Kim } 620efcc2a30SJung-uk Kim 621efcc2a30SJung-uk Kim 622efcc2a30SJung-uk Kim /******************************************************************************* 623efcc2a30SJung-uk Kim * 624ec0234b4SJung-uk Kim * FUNCTION: MtProcessTypeOp 625ec0234b4SJung-uk Kim * 626ec0234b4SJung-uk Kim * PARAMETERS: Op - Op representing a btype 627ec0234b4SJung-uk Kim * 628ec0234b4SJung-uk Kim * RETURN: Btype represented by Op 629ec0234b4SJung-uk Kim * 630ec0234b4SJung-uk Kim * DESCRIPTION: Process a parse object that represents single parameter type or 631ec0234b4SJung-uk Kim * a return type in method, function, and external declarations. 632ec0234b4SJung-uk Kim * 633ec0234b4SJung-uk Kim ******************************************************************************/ 634ec0234b4SJung-uk Kim 635ec0234b4SJung-uk Kim UINT32 636ec0234b4SJung-uk Kim MtProcessTypeOp ( 637ec0234b4SJung-uk Kim ACPI_PARSE_OBJECT *TypeOp) 638ec0234b4SJung-uk Kim { 639ec0234b4SJung-uk Kim UINT32 Btype = ACPI_BTYPE_ANY; 640ec0234b4SJung-uk Kim 641ec0234b4SJung-uk Kim 642ec0234b4SJung-uk Kim while (TypeOp) 643ec0234b4SJung-uk Kim { 644ec0234b4SJung-uk Kim Btype |= AnMapObjTypeToBtype (TypeOp); 645ec0234b4SJung-uk Kim TypeOp->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG; 646ec0234b4SJung-uk Kim TypeOp = TypeOp->Asl.Next; 647ec0234b4SJung-uk Kim } 648ec0234b4SJung-uk Kim 649ec0234b4SJung-uk Kim return (Btype); 650ec0234b4SJung-uk Kim } 651ec0234b4SJung-uk Kim 652ec0234b4SJung-uk Kim 653ec0234b4SJung-uk Kim /******************************************************************************* 654ec0234b4SJung-uk Kim * 655ec0234b4SJung-uk Kim * FUNCTION: MtProcessParameterTypeList 656ec0234b4SJung-uk Kim * 657ec0234b4SJung-uk Kim * PARAMETERS: Op - Op representing a btype 658ec0234b4SJung-uk Kim * 659ec0234b4SJung-uk Kim * RETURN: Btype represented by Op 660ec0234b4SJung-uk Kim * 661ec0234b4SJung-uk Kim * DESCRIPTION: Process a parse object that represents a parameter type list in 662ec0234b4SJung-uk Kim * method, function, and external declarations. 663ec0234b4SJung-uk Kim * 664ec0234b4SJung-uk Kim ******************************************************************************/ 665ec0234b4SJung-uk Kim 666ec0234b4SJung-uk Kim UINT8 667ec0234b4SJung-uk Kim MtProcessParameterTypeList ( 668ec0234b4SJung-uk Kim ACPI_PARSE_OBJECT *ParamTypeOp, 669ec0234b4SJung-uk Kim UINT32 *TypeList) 670ec0234b4SJung-uk Kim { 671ec0234b4SJung-uk Kim UINT8 ParameterCount = 0; 672ec0234b4SJung-uk Kim 673ec0234b4SJung-uk Kim 674ec0234b4SJung-uk Kim while (ParamTypeOp) 675ec0234b4SJung-uk Kim { 676ec0234b4SJung-uk Kim TypeList[ParameterCount] = 677ec0234b4SJung-uk Kim MtProcessTypeOp (ParamTypeOp->Asl.Child); 678ec0234b4SJung-uk Kim 679ec0234b4SJung-uk Kim ParameterCount++; 680ec0234b4SJung-uk Kim ParamTypeOp = ParamTypeOp->Asl.Next; 681ec0234b4SJung-uk Kim } 682ec0234b4SJung-uk Kim 683ec0234b4SJung-uk Kim return (ParameterCount); 684ec0234b4SJung-uk Kim } 685ec0234b4SJung-uk Kim 686ec0234b4SJung-uk Kim 687ec0234b4SJung-uk Kim /******************************************************************************* 688ec0234b4SJung-uk Kim * 689a9d8d09cSJung-uk Kim * FUNCTION: MtCheckNamedObjectInMethod 690a9d8d09cSJung-uk Kim * 691a9d8d09cSJung-uk Kim * PARAMETERS: Op - Current parser op 692a9d8d09cSJung-uk Kim * MethodInfo - Info for method being parsed 693a9d8d09cSJung-uk Kim * 694a9d8d09cSJung-uk Kim * RETURN: None 695a9d8d09cSJung-uk Kim * 696a9d8d09cSJung-uk Kim * DESCRIPTION: Detect if a non-serialized method is creating a named object, 697a9d8d09cSJung-uk Kim * which could possibly cause problems if two threads execute 698a9d8d09cSJung-uk Kim * the method concurrently. Emit a remark in this case. 699a9d8d09cSJung-uk Kim * 700a9d8d09cSJung-uk Kim ******************************************************************************/ 701a9d8d09cSJung-uk Kim 702f8146b88SJung-uk Kim static void 703a9d8d09cSJung-uk Kim MtCheckNamedObjectInMethod ( 704a9d8d09cSJung-uk Kim ACPI_PARSE_OBJECT *Op, 705a9d8d09cSJung-uk Kim ASL_METHOD_INFO *MethodInfo) 706a9d8d09cSJung-uk Kim { 707a9d8d09cSJung-uk Kim const ACPI_OPCODE_INFO *OpInfo; 708ec0234b4SJung-uk Kim char *ExternalPath; 709a9d8d09cSJung-uk Kim 710a9d8d09cSJung-uk Kim 711f8146b88SJung-uk Kim /* We don't care about actual method declarations or scopes */ 712a9d8d09cSJung-uk Kim 713f8146b88SJung-uk Kim if ((Op->Asl.AmlOpcode == AML_METHOD_OP) || 714f8146b88SJung-uk Kim (Op->Asl.AmlOpcode == AML_SCOPE_OP)) 715a9d8d09cSJung-uk Kim { 716a9d8d09cSJung-uk Kim return; 717a9d8d09cSJung-uk Kim } 718a9d8d09cSJung-uk Kim 71967d9aa44SJung-uk Kim /* Determine if we are creating a named object within a method */ 72067d9aa44SJung-uk Kim 72167d9aa44SJung-uk Kim if (!MethodInfo) 72267d9aa44SJung-uk Kim { 72367d9aa44SJung-uk Kim return; 72467d9aa44SJung-uk Kim } 725a9d8d09cSJung-uk Kim 726a9d8d09cSJung-uk Kim OpInfo = AcpiPsGetOpcodeInfo (Op->Asl.AmlOpcode); 727a9d8d09cSJung-uk Kim if (OpInfo->Class == AML_CLASS_NAMED_OBJECT) 728a9d8d09cSJung-uk Kim { 729a9d8d09cSJung-uk Kim /* 73067d9aa44SJung-uk Kim * 1) Mark the method as a method that creates named objects. 73167d9aa44SJung-uk Kim * 732ec0234b4SJung-uk Kim * 2) Issue a remark indicating the inefficiency of creating named 733ec0234b4SJung-uk Kim * objects within a method (Except for compiler-emitted temporary 734ec0234b4SJung-uk Kim * variables). 735ec0234b4SJung-uk Kim * 736ec0234b4SJung-uk Kim * 3) If the method is non-serialized, emit a remark that the method 73767d9aa44SJung-uk Kim * should be serialized. 738a9d8d09cSJung-uk Kim * 739a9d8d09cSJung-uk Kim * Reason: If a thread blocks within the method for any reason, and 74067d9aa44SJung-uk Kim * another thread enters the method, the method will fail because 74167d9aa44SJung-uk Kim * an attempt will be made to create the same object twice. 742a9d8d09cSJung-uk Kim */ 743ec0234b4SJung-uk Kim ExternalPath = AcpiNsGetNormalizedPathname (MethodInfo->Op->Asl.Node, TRUE); 744ec0234b4SJung-uk Kim 745ec0234b4SJung-uk Kim /* No error for compiler temp variables (name starts with "_T_") */ 746ec0234b4SJung-uk Kim 747ec0234b4SJung-uk Kim if ((Op->Asl.NameSeg[0] != '_') && 748ec0234b4SJung-uk Kim (Op->Asl.NameSeg[1] != 'T') && 749ec0234b4SJung-uk Kim (Op->Asl.NameSeg[2] != '_')) 750ec0234b4SJung-uk Kim { 751ec0234b4SJung-uk Kim AslError (ASL_REMARK, ASL_MSG_NAMED_OBJECT_CREATION, Op, 752ec0234b4SJung-uk Kim ExternalPath); 753ec0234b4SJung-uk Kim } 754ec0234b4SJung-uk Kim 75567d9aa44SJung-uk Kim MethodInfo->CreatesNamedObjects = TRUE; 75667d9aa44SJung-uk Kim if (!MethodInfo->ShouldBeSerialized) 757a9d8d09cSJung-uk Kim { 758a9d8d09cSJung-uk Kim AslError (ASL_REMARK, ASL_MSG_SERIALIZED_REQUIRED, MethodInfo->Op, 759ec0234b4SJung-uk Kim ExternalPath); 760a9d8d09cSJung-uk Kim 761a9d8d09cSJung-uk Kim /* Emit message only ONCE per method */ 762a9d8d09cSJung-uk Kim 763a9d8d09cSJung-uk Kim MethodInfo->ShouldBeSerialized = TRUE; 764a9d8d09cSJung-uk Kim } 765ec0234b4SJung-uk Kim 766ec0234b4SJung-uk Kim if (ExternalPath) 767ec0234b4SJung-uk Kim { 768ec0234b4SJung-uk Kim ACPI_FREE (ExternalPath); 769a9d8d09cSJung-uk Kim } 770a9d8d09cSJung-uk Kim } 771ec0234b4SJung-uk Kim } 772ec0234b4SJung-uk Kim 773ec0234b4SJung-uk Kim 774ec0234b4SJung-uk Kim /******************************************************************************* 775ec0234b4SJung-uk Kim * 776ec0234b4SJung-uk Kim * FUNCTION: MtCheckStaticOperationRegionInMethod 777ec0234b4SJung-uk Kim * 778ec0234b4SJung-uk Kim * PARAMETERS: Op - Current parser op 779ec0234b4SJung-uk Kim * 780ec0234b4SJung-uk Kim * RETURN: None 781ec0234b4SJung-uk Kim * 782ec0234b4SJung-uk Kim * DESCRIPTION: Warns if an Operation Region with static address or length 783ec0234b4SJung-uk Kim * is declared inside a control method 784ec0234b4SJung-uk Kim * 785ec0234b4SJung-uk Kim ******************************************************************************/ 786ec0234b4SJung-uk Kim 787ec0234b4SJung-uk Kim static void 788ec0234b4SJung-uk Kim MtCheckStaticOperationRegionInMethod( 789ec0234b4SJung-uk Kim ACPI_PARSE_OBJECT* Op) 790ec0234b4SJung-uk Kim { 791ec0234b4SJung-uk Kim ACPI_PARSE_OBJECT* AddressOp; 792ec0234b4SJung-uk Kim ACPI_PARSE_OBJECT* LengthOp; 793ec0234b4SJung-uk Kim 794ec0234b4SJung-uk Kim 795ec0234b4SJung-uk Kim if (Op->Asl.ParseOpcode != PARSEOP_OPERATIONREGION) 796ec0234b4SJung-uk Kim { 797ec0234b4SJung-uk Kim return; 798ec0234b4SJung-uk Kim } 799ec0234b4SJung-uk Kim 800ec0234b4SJung-uk Kim /* 801ec0234b4SJung-uk Kim * OperationRegion should have 4 arguments defined. At this point, we 802ec0234b4SJung-uk Kim * assume that the parse tree is well-formed. 803ec0234b4SJung-uk Kim */ 804ec0234b4SJung-uk Kim AddressOp = Op->Asl.Child->Asl.Next->Asl.Next; 805ec0234b4SJung-uk Kim LengthOp = Op->Asl.Child->Asl.Next->Asl.Next->Asl.Next; 806ec0234b4SJung-uk Kim 807ec0234b4SJung-uk Kim if (UtGetParentMethodOp (Op) && 808ec0234b4SJung-uk Kim AddressOp->Asl.ParseOpcode == PARSEOP_INTEGER && 809ec0234b4SJung-uk Kim LengthOp->Asl.ParseOpcode == PARSEOP_INTEGER) 810ec0234b4SJung-uk Kim { 811ec0234b4SJung-uk Kim /* 812ec0234b4SJung-uk Kim * At this point, a static operation region declared inside of a 813ec0234b4SJung-uk Kim * control method has been found. Throw a warning because this is 814ec0234b4SJung-uk Kim * highly inefficient. 815ec0234b4SJung-uk Kim */ 816ec0234b4SJung-uk Kim AslError(ASL_WARNING, ASL_MSG_STATIC_OPREGION_IN_METHOD, Op, NULL); 817ec0234b4SJung-uk Kim } 818ec0234b4SJung-uk Kim 819ec0234b4SJung-uk Kim return; 820ec0234b4SJung-uk Kim } 821a9d8d09cSJung-uk Kim 822a9d8d09cSJung-uk Kim 823a9d8d09cSJung-uk Kim /******************************************************************************* 824a9d8d09cSJung-uk Kim * 825efcc2a30SJung-uk Kim * FUNCTION: MtMethodAnalysisWalkEnd 826efcc2a30SJung-uk Kim * 827efcc2a30SJung-uk Kim * PARAMETERS: ASL_WALK_CALLBACK 828efcc2a30SJung-uk Kim * 829efcc2a30SJung-uk Kim * RETURN: Status 830efcc2a30SJung-uk Kim * 831efcc2a30SJung-uk Kim * DESCRIPTION: Ascending callback for analysis walk. Complete method 832efcc2a30SJung-uk Kim * return analysis. 833efcc2a30SJung-uk Kim * 834efcc2a30SJung-uk Kim ******************************************************************************/ 835efcc2a30SJung-uk Kim 836efcc2a30SJung-uk Kim ACPI_STATUS 837efcc2a30SJung-uk Kim MtMethodAnalysisWalkEnd ( 838efcc2a30SJung-uk Kim ACPI_PARSE_OBJECT *Op, 839efcc2a30SJung-uk Kim UINT32 Level, 840efcc2a30SJung-uk Kim void *Context) 841efcc2a30SJung-uk Kim { 842efcc2a30SJung-uk Kim ASL_ANALYSIS_WALK_INFO *WalkInfo = (ASL_ANALYSIS_WALK_INFO *) Context; 843efcc2a30SJung-uk Kim ASL_METHOD_INFO *MethodInfo = WalkInfo->MethodStack; 844ec0234b4SJung-uk Kim char *ExternalPath; 845efcc2a30SJung-uk Kim 846efcc2a30SJung-uk Kim 847efcc2a30SJung-uk Kim switch (Op->Asl.ParseOpcode) 848efcc2a30SJung-uk Kim { 849efcc2a30SJung-uk Kim case PARSEOP_METHOD: 850efcc2a30SJung-uk Kim case PARSEOP_RETURN: 851a9d8d09cSJung-uk Kim 852efcc2a30SJung-uk Kim if (!MethodInfo) 853efcc2a30SJung-uk Kim { 854efcc2a30SJung-uk Kim printf ("No method info for method! [%s]\n", Op->Asl.Namepath); 855efcc2a30SJung-uk Kim AslError (ASL_ERROR, ASL_MSG_COMPILER_INTERNAL, Op, 856efcc2a30SJung-uk Kim "No method info for this method"); 857efcc2a30SJung-uk Kim 858efcc2a30SJung-uk Kim CmCleanupAndExit (); 859efcc2a30SJung-uk Kim return (AE_AML_INTERNAL); 860efcc2a30SJung-uk Kim } 861efcc2a30SJung-uk Kim break; 862efcc2a30SJung-uk Kim 863efcc2a30SJung-uk Kim default: 864a9d8d09cSJung-uk Kim 865efcc2a30SJung-uk Kim break; 866efcc2a30SJung-uk Kim } 867efcc2a30SJung-uk Kim 868efcc2a30SJung-uk Kim switch (Op->Asl.ParseOpcode) 869efcc2a30SJung-uk Kim { 870efcc2a30SJung-uk Kim case PARSEOP_METHOD: 871efcc2a30SJung-uk Kim 872efcc2a30SJung-uk Kim WalkInfo->MethodStack = MethodInfo->Next; 873efcc2a30SJung-uk Kim 874efcc2a30SJung-uk Kim /* 875efcc2a30SJung-uk Kim * Check if there is no return statement at the end of the 876efcc2a30SJung-uk Kim * method AND we can actually get there -- i.e., the execution 877efcc2a30SJung-uk Kim * of the method can possibly terminate without a return statement. 878efcc2a30SJung-uk Kim */ 879efcc2a30SJung-uk Kim if ((!AnLastStatementIsReturn (Op)) && 8805f9b24faSJung-uk Kim (!(Op->Asl.CompileFlags & OP_HAS_NO_EXIT))) 881efcc2a30SJung-uk Kim { 882efcc2a30SJung-uk Kim /* 883efcc2a30SJung-uk Kim * No return statement, and execution can possibly exit 884efcc2a30SJung-uk Kim * via this path. This is equivalent to Return () 885efcc2a30SJung-uk Kim */ 886efcc2a30SJung-uk Kim MethodInfo->NumReturnNoValue++; 887efcc2a30SJung-uk Kim } 888efcc2a30SJung-uk Kim 889efcc2a30SJung-uk Kim /* 890efcc2a30SJung-uk Kim * Check for case where some return statements have a return value 891efcc2a30SJung-uk Kim * and some do not. Exit without a return statement is a return with 892efcc2a30SJung-uk Kim * no value 893efcc2a30SJung-uk Kim */ 894efcc2a30SJung-uk Kim if (MethodInfo->NumReturnNoValue && 895efcc2a30SJung-uk Kim MethodInfo->NumReturnWithValue) 896efcc2a30SJung-uk Kim { 897ec0234b4SJung-uk Kim ExternalPath = AcpiNsGetNormalizedPathname (Op->Asl.Node, TRUE); 898ec0234b4SJung-uk Kim 899efcc2a30SJung-uk Kim AslError (ASL_WARNING, ASL_MSG_RETURN_TYPES, Op, 900ec0234b4SJung-uk Kim ExternalPath); 901ec0234b4SJung-uk Kim 902ec0234b4SJung-uk Kim if (ExternalPath) 903ec0234b4SJung-uk Kim { 904ec0234b4SJung-uk Kim ACPI_FREE (ExternalPath); 905ec0234b4SJung-uk Kim } 906efcc2a30SJung-uk Kim } 907efcc2a30SJung-uk Kim 908efcc2a30SJung-uk Kim /* 909efcc2a30SJung-uk Kim * If there are any RETURN() statements with no value, or there is a 910efcc2a30SJung-uk Kim * control path that allows the method to exit without a return value, 911efcc2a30SJung-uk Kim * we mark the method as a method that does not return a value. This 912efcc2a30SJung-uk Kim * knowledge can be used to check method invocations that expect a 913efcc2a30SJung-uk Kim * returned value. 914efcc2a30SJung-uk Kim */ 915efcc2a30SJung-uk Kim if (MethodInfo->NumReturnNoValue) 916efcc2a30SJung-uk Kim { 917efcc2a30SJung-uk Kim if (MethodInfo->NumReturnWithValue) 918efcc2a30SJung-uk Kim { 9195f9b24faSJung-uk Kim Op->Asl.CompileFlags |= OP_METHOD_SOME_NO_RETVAL; 920efcc2a30SJung-uk Kim } 921efcc2a30SJung-uk Kim else 922efcc2a30SJung-uk Kim { 9235f9b24faSJung-uk Kim Op->Asl.CompileFlags |= OP_METHOD_NO_RETVAL; 924efcc2a30SJung-uk Kim } 925efcc2a30SJung-uk Kim } 926efcc2a30SJung-uk Kim 927efcc2a30SJung-uk Kim /* 928efcc2a30SJung-uk Kim * Check predefined method names for correct return behavior 929efcc2a30SJung-uk Kim * and correct number of arguments. Also, some special checks 930efcc2a30SJung-uk Kim * For GPE and _REG methods. 931efcc2a30SJung-uk Kim */ 932efcc2a30SJung-uk Kim if (ApCheckForPredefinedMethod (Op, MethodInfo)) 933efcc2a30SJung-uk Kim { 934efcc2a30SJung-uk Kim /* Special check for two names like _L01 and _E01 in same scope */ 935efcc2a30SJung-uk Kim 936efcc2a30SJung-uk Kim ApCheckForGpeNameConflict (Op); 937efcc2a30SJung-uk Kim 938efcc2a30SJung-uk Kim /* 939efcc2a30SJung-uk Kim * Special check for _REG: Must have an operation region definition 940efcc2a30SJung-uk Kim * within the same scope! 941efcc2a30SJung-uk Kim */ 942efcc2a30SJung-uk Kim ApCheckRegMethod (Op); 943efcc2a30SJung-uk Kim } 944efcc2a30SJung-uk Kim 945efcc2a30SJung-uk Kim ACPI_FREE (MethodInfo); 946efcc2a30SJung-uk Kim break; 947efcc2a30SJung-uk Kim 948efcc2a30SJung-uk Kim case PARSEOP_NAME: 949efcc2a30SJung-uk Kim 950efcc2a30SJung-uk Kim /* Special check for two names like _L01 and _E01 in same scope */ 951efcc2a30SJung-uk Kim 952efcc2a30SJung-uk Kim ApCheckForGpeNameConflict (Op); 953efcc2a30SJung-uk Kim break; 954efcc2a30SJung-uk Kim 955efcc2a30SJung-uk Kim case PARSEOP_RETURN: 956efcc2a30SJung-uk Kim 957efcc2a30SJung-uk Kim /* 958efcc2a30SJung-uk Kim * If the parent is a predefined method name, attempt to typecheck 959efcc2a30SJung-uk Kim * the return value. Only static types can be validated. 960efcc2a30SJung-uk Kim */ 961efcc2a30SJung-uk Kim ApCheckPredefinedReturnValue (Op, MethodInfo); 962efcc2a30SJung-uk Kim 963efcc2a30SJung-uk Kim /* 964efcc2a30SJung-uk Kim * The parent block does not "exit" and continue execution -- the 965efcc2a30SJung-uk Kim * method is terminated here with the Return() statement. 966efcc2a30SJung-uk Kim */ 9675f9b24faSJung-uk Kim Op->Asl.Parent->Asl.CompileFlags |= OP_HAS_NO_EXIT; 968efcc2a30SJung-uk Kim 969efcc2a30SJung-uk Kim /* Used in the "typing" pass later */ 970efcc2a30SJung-uk Kim 971efcc2a30SJung-uk Kim Op->Asl.ParentMethod = MethodInfo->Op; 972efcc2a30SJung-uk Kim 973efcc2a30SJung-uk Kim /* 974efcc2a30SJung-uk Kim * If there is a peer node after the return statement, then this 975efcc2a30SJung-uk Kim * node is unreachable code -- i.e., it won't be executed because of 976efcc2a30SJung-uk Kim * the preceding Return() statement. 977efcc2a30SJung-uk Kim */ 978efcc2a30SJung-uk Kim if (Op->Asl.Next) 979efcc2a30SJung-uk Kim { 980f8146b88SJung-uk Kim AslError (ASL_WARNING, ASL_MSG_UNREACHABLE_CODE, 981f8146b88SJung-uk Kim Op->Asl.Next, NULL); 982efcc2a30SJung-uk Kim } 983efcc2a30SJung-uk Kim break; 984efcc2a30SJung-uk Kim 985efcc2a30SJung-uk Kim case PARSEOP_IF: 986efcc2a30SJung-uk Kim 9875f9b24faSJung-uk Kim if ((Op->Asl.CompileFlags & OP_HAS_NO_EXIT) && 988efcc2a30SJung-uk Kim (Op->Asl.Next) && 989efcc2a30SJung-uk Kim (Op->Asl.Next->Asl.ParseOpcode == PARSEOP_ELSE)) 990efcc2a30SJung-uk Kim { 991efcc2a30SJung-uk Kim /* 992efcc2a30SJung-uk Kim * This IF has a corresponding ELSE. The IF block has no exit, 993efcc2a30SJung-uk Kim * (it contains an unconditional Return) 994efcc2a30SJung-uk Kim * mark the ELSE block to remember this fact. 995efcc2a30SJung-uk Kim */ 9965f9b24faSJung-uk Kim Op->Asl.Next->Asl.CompileFlags |= OP_IF_HAS_NO_EXIT; 997efcc2a30SJung-uk Kim } 998efcc2a30SJung-uk Kim break; 999efcc2a30SJung-uk Kim 1000efcc2a30SJung-uk Kim case PARSEOP_ELSE: 1001efcc2a30SJung-uk Kim 10025f9b24faSJung-uk Kim if ((Op->Asl.CompileFlags & OP_HAS_NO_EXIT) && 10035f9b24faSJung-uk Kim (Op->Asl.CompileFlags & OP_IF_HAS_NO_EXIT)) 1004efcc2a30SJung-uk Kim { 1005efcc2a30SJung-uk Kim /* 1006efcc2a30SJung-uk Kim * This ELSE block has no exit and the corresponding IF block 1007efcc2a30SJung-uk Kim * has no exit either. Therefore, the parent node has no exit. 1008efcc2a30SJung-uk Kim */ 10095f9b24faSJung-uk Kim Op->Asl.Parent->Asl.CompileFlags |= OP_HAS_NO_EXIT; 1010efcc2a30SJung-uk Kim } 1011efcc2a30SJung-uk Kim break; 1012efcc2a30SJung-uk Kim 1013efcc2a30SJung-uk Kim 1014efcc2a30SJung-uk Kim default: 1015efcc2a30SJung-uk Kim 10165f9b24faSJung-uk Kim if ((Op->Asl.CompileFlags & OP_HAS_NO_EXIT) && 1017efcc2a30SJung-uk Kim (Op->Asl.Parent)) 1018efcc2a30SJung-uk Kim { 1019efcc2a30SJung-uk Kim /* If this node has no exit, then the parent has no exit either */ 1020efcc2a30SJung-uk Kim 10215f9b24faSJung-uk Kim Op->Asl.Parent->Asl.CompileFlags |= OP_HAS_NO_EXIT; 1022efcc2a30SJung-uk Kim } 1023efcc2a30SJung-uk Kim break; 1024efcc2a30SJung-uk Kim } 1025efcc2a30SJung-uk Kim 1026efcc2a30SJung-uk Kim return (AE_OK); 1027efcc2a30SJung-uk Kim } 1028