1a159c266SJung-uk Kim /******************************************************************************* 2a159c266SJung-uk Kim * 3a159c266SJung-uk Kim * Module Name: dsutils - Dispatcher utilities 4a159c266SJung-uk Kim * 5a159c266SJung-uk Kim ******************************************************************************/ 6a159c266SJung-uk Kim 70d84335fSJung-uk Kim /****************************************************************************** 80d84335fSJung-uk Kim * 90d84335fSJung-uk Kim * 1. Copyright Notice 100d84335fSJung-uk Kim * 11804fe266SJung-uk Kim * Some or all of this work - Copyright (c) 1999 - 2024, Intel Corp. 12a159c266SJung-uk Kim * All rights reserved. 13a159c266SJung-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 * 119a159c266SJung-uk Kim * Redistribution and use in source and binary forms, with or without 120a159c266SJung-uk Kim * modification, are permitted provided that the following conditions 121a159c266SJung-uk Kim * are met: 122a159c266SJung-uk Kim * 1. Redistributions of source code must retain the above copyright 123a159c266SJung-uk Kim * notice, this list of conditions, and the following disclaimer, 124a159c266SJung-uk Kim * without modification. 125a159c266SJung-uk Kim * 2. Redistributions in binary form must reproduce at minimum a disclaimer 126a159c266SJung-uk Kim * substantially similar to the "NO WARRANTY" disclaimer below 127a159c266SJung-uk Kim * ("Disclaimer") and any redistribution must be conditioned upon 128a159c266SJung-uk Kim * including a substantially similar Disclaimer requirement for further 129a159c266SJung-uk Kim * binary redistribution. 130a159c266SJung-uk Kim * 3. Neither the names of the above-listed copyright holders nor the names 131a159c266SJung-uk Kim * of any contributors may be used to endorse or promote products derived 132a159c266SJung-uk Kim * from this software without specific prior written permission. 133a159c266SJung-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 147a159c266SJung-uk Kim * GNU General Public License ("GPL") version 2 as published by the Free 148a159c266SJung-uk Kim * Software Foundation. 149a159c266SJung-uk Kim * 1500d84335fSJung-uk Kim *****************************************************************************/ 151a159c266SJung-uk Kim 152a159c266SJung-uk Kim #include <contrib/dev/acpica/include/acpi.h> 153a159c266SJung-uk Kim #include <contrib/dev/acpica/include/accommon.h> 154a159c266SJung-uk Kim #include <contrib/dev/acpica/include/acparser.h> 155a159c266SJung-uk Kim #include <contrib/dev/acpica/include/amlcode.h> 156a159c266SJung-uk Kim #include <contrib/dev/acpica/include/acdispat.h> 157a159c266SJung-uk Kim #include <contrib/dev/acpica/include/acinterp.h> 158a159c266SJung-uk Kim #include <contrib/dev/acpica/include/acnamesp.h> 159a159c266SJung-uk Kim #include <contrib/dev/acpica/include/acdebug.h> 160a159c266SJung-uk Kim 161a159c266SJung-uk Kim #define _COMPONENT ACPI_DISPATCHER 162a159c266SJung-uk Kim ACPI_MODULE_NAME ("dsutils") 163a159c266SJung-uk Kim 164a159c266SJung-uk Kim 165a159c266SJung-uk Kim /******************************************************************************* 166a159c266SJung-uk Kim * 167a159c266SJung-uk Kim * FUNCTION: AcpiDsClearImplicitReturn 168a159c266SJung-uk Kim * 169a159c266SJung-uk Kim * PARAMETERS: WalkState - Current State 170a159c266SJung-uk Kim * 171a159c266SJung-uk Kim * RETURN: None. 172a159c266SJung-uk Kim * 173a159c266SJung-uk Kim * DESCRIPTION: Clear and remove a reference on an implicit return value. Used 174a159c266SJung-uk Kim * to delete "stale" return values (if enabled, the return value 175a159c266SJung-uk Kim * from every operator is saved at least momentarily, in case the 176a159c266SJung-uk Kim * parent method exits.) 177a159c266SJung-uk Kim * 178a159c266SJung-uk Kim ******************************************************************************/ 179a159c266SJung-uk Kim 180a159c266SJung-uk Kim void 181a159c266SJung-uk Kim AcpiDsClearImplicitReturn ( 182a159c266SJung-uk Kim ACPI_WALK_STATE *WalkState) 183a159c266SJung-uk Kim { 184a159c266SJung-uk Kim ACPI_FUNCTION_NAME (DsClearImplicitReturn); 185a159c266SJung-uk Kim 186a159c266SJung-uk Kim 187a159c266SJung-uk Kim /* 188a159c266SJung-uk Kim * Slack must be enabled for this feature 189a159c266SJung-uk Kim */ 190a159c266SJung-uk Kim if (!AcpiGbl_EnableInterpreterSlack) 191a159c266SJung-uk Kim { 192a159c266SJung-uk Kim return; 193a159c266SJung-uk Kim } 194a159c266SJung-uk Kim 195a159c266SJung-uk Kim if (WalkState->ImplicitReturnObj) 196a159c266SJung-uk Kim { 197a159c266SJung-uk Kim /* 198a159c266SJung-uk Kim * Delete any "stale" implicit return. However, in 199a159c266SJung-uk Kim * complex statements, the implicit return value can be 200a159c266SJung-uk Kim * bubbled up several levels. 201a159c266SJung-uk Kim */ 202a159c266SJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, 203a159c266SJung-uk Kim "Removing reference on stale implicit return obj %p\n", 204a159c266SJung-uk Kim WalkState->ImplicitReturnObj)); 205a159c266SJung-uk Kim 206a159c266SJung-uk Kim AcpiUtRemoveReference (WalkState->ImplicitReturnObj); 207a159c266SJung-uk Kim WalkState->ImplicitReturnObj = NULL; 208a159c266SJung-uk Kim } 209a159c266SJung-uk Kim } 210a159c266SJung-uk Kim 211a159c266SJung-uk Kim 212a159c266SJung-uk Kim /******************************************************************************* 213a159c266SJung-uk Kim * 214a159c266SJung-uk Kim * FUNCTION: AcpiDsDoImplicitReturn 215a159c266SJung-uk Kim * 216a159c266SJung-uk Kim * PARAMETERS: ReturnDesc - The return value 217a159c266SJung-uk Kim * WalkState - Current State 218a159c266SJung-uk Kim * AddReference - True if a reference should be added to the 219a159c266SJung-uk Kim * return object 220a159c266SJung-uk Kim * 221a159c266SJung-uk Kim * RETURN: TRUE if implicit return enabled, FALSE otherwise 222a159c266SJung-uk Kim * 223a159c266SJung-uk Kim * DESCRIPTION: Implements the optional "implicit return". We save the result 224a159c266SJung-uk Kim * of every ASL operator and control method invocation in case the 225a159c266SJung-uk Kim * parent method exit. Before storing a new return value, we 226a159c266SJung-uk Kim * delete the previous return value. 227a159c266SJung-uk Kim * 228a159c266SJung-uk Kim ******************************************************************************/ 229a159c266SJung-uk Kim 230a159c266SJung-uk Kim BOOLEAN 231a159c266SJung-uk Kim AcpiDsDoImplicitReturn ( 232a159c266SJung-uk Kim ACPI_OPERAND_OBJECT *ReturnDesc, 233a159c266SJung-uk Kim ACPI_WALK_STATE *WalkState, 234a159c266SJung-uk Kim BOOLEAN AddReference) 235a159c266SJung-uk Kim { 236a159c266SJung-uk Kim ACPI_FUNCTION_NAME (DsDoImplicitReturn); 237a159c266SJung-uk Kim 238a159c266SJung-uk Kim 239a159c266SJung-uk Kim /* 240a159c266SJung-uk Kim * Slack must be enabled for this feature, and we must 241a159c266SJung-uk Kim * have a valid return object 242a159c266SJung-uk Kim */ 243a159c266SJung-uk Kim if ((!AcpiGbl_EnableInterpreterSlack) || 244a159c266SJung-uk Kim (!ReturnDesc)) 245a159c266SJung-uk Kim { 246a159c266SJung-uk Kim return (FALSE); 247a159c266SJung-uk Kim } 248a159c266SJung-uk Kim 249a159c266SJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, 250a159c266SJung-uk Kim "Result %p will be implicitly returned; Prev=%p\n", 251a159c266SJung-uk Kim ReturnDesc, 252a159c266SJung-uk Kim WalkState->ImplicitReturnObj)); 253a159c266SJung-uk Kim 254a159c266SJung-uk Kim /* 255a159c266SJung-uk Kim * Delete any "stale" implicit return value first. However, in 256a159c266SJung-uk Kim * complex statements, the implicit return value can be 257a159c266SJung-uk Kim * bubbled up several levels, so we don't clear the value if it 258a159c266SJung-uk Kim * is the same as the ReturnDesc. 259a159c266SJung-uk Kim */ 260a159c266SJung-uk Kim if (WalkState->ImplicitReturnObj) 261a159c266SJung-uk Kim { 262a159c266SJung-uk Kim if (WalkState->ImplicitReturnObj == ReturnDesc) 263a159c266SJung-uk Kim { 264a159c266SJung-uk Kim return (TRUE); 265a159c266SJung-uk Kim } 266a159c266SJung-uk Kim AcpiDsClearImplicitReturn (WalkState); 267a159c266SJung-uk Kim } 268a159c266SJung-uk Kim 269a159c266SJung-uk Kim /* Save the implicit return value, add a reference if requested */ 270a159c266SJung-uk Kim 271a159c266SJung-uk Kim WalkState->ImplicitReturnObj = ReturnDesc; 272a159c266SJung-uk Kim if (AddReference) 273a159c266SJung-uk Kim { 274a159c266SJung-uk Kim AcpiUtAddReference (ReturnDesc); 275a159c266SJung-uk Kim } 276a159c266SJung-uk Kim 277a159c266SJung-uk Kim return (TRUE); 278a159c266SJung-uk Kim } 279a159c266SJung-uk Kim 280a159c266SJung-uk Kim 281a159c266SJung-uk Kim /******************************************************************************* 282a159c266SJung-uk Kim * 283a159c266SJung-uk Kim * FUNCTION: AcpiDsIsResultUsed 284a159c266SJung-uk Kim * 285a159c266SJung-uk Kim * PARAMETERS: Op - Current Op 286a159c266SJung-uk Kim * WalkState - Current State 287a159c266SJung-uk Kim * 288a159c266SJung-uk Kim * RETURN: TRUE if result is used, FALSE otherwise 289a159c266SJung-uk Kim * 290a159c266SJung-uk Kim * DESCRIPTION: Check if a result object will be used by the parent 291a159c266SJung-uk Kim * 292a159c266SJung-uk Kim ******************************************************************************/ 293a159c266SJung-uk Kim 294a159c266SJung-uk Kim BOOLEAN 295a159c266SJung-uk Kim AcpiDsIsResultUsed ( 296a159c266SJung-uk Kim ACPI_PARSE_OBJECT *Op, 297a159c266SJung-uk Kim ACPI_WALK_STATE *WalkState) 298a159c266SJung-uk Kim { 299a159c266SJung-uk Kim const ACPI_OPCODE_INFO *ParentInfo; 300a159c266SJung-uk Kim 301a159c266SJung-uk Kim ACPI_FUNCTION_TRACE_PTR (DsIsResultUsed, Op); 302a159c266SJung-uk Kim 303a159c266SJung-uk Kim 304a159c266SJung-uk Kim /* Must have both an Op and a Result Object */ 305a159c266SJung-uk Kim 306a159c266SJung-uk Kim if (!Op) 307a159c266SJung-uk Kim { 308a159c266SJung-uk Kim ACPI_ERROR ((AE_INFO, "Null Op")); 3099c48c75eSJung-uk Kim return_UINT8 (TRUE); 310a159c266SJung-uk Kim } 311a159c266SJung-uk Kim 312a159c266SJung-uk Kim /* 313a159c266SJung-uk Kim * We know that this operator is not a 314a159c266SJung-uk Kim * Return() operator (would not come here.) The following code is the 315a159c266SJung-uk Kim * optional support for a so-called "implicit return". Some AML code 316a159c266SJung-uk Kim * assumes that the last value of the method is "implicitly" returned 317a159c266SJung-uk Kim * to the caller. Just save the last result as the return value. 318a159c266SJung-uk Kim * NOTE: this is optional because the ASL language does not actually 319a159c266SJung-uk Kim * support this behavior. 320a159c266SJung-uk Kim */ 321a159c266SJung-uk Kim (void) AcpiDsDoImplicitReturn (WalkState->ResultObj, WalkState, TRUE); 322a159c266SJung-uk Kim 323a159c266SJung-uk Kim /* 324a159c266SJung-uk Kim * Now determine if the parent will use the result 325a159c266SJung-uk Kim * 326a159c266SJung-uk Kim * If there is no parent, or the parent is a ScopeOp, we are executing 327a159c266SJung-uk Kim * at the method level. An executing method typically has no parent, 328a159c266SJung-uk Kim * since each method is parsed separately. A method invoked externally 329a159c266SJung-uk Kim * via ExecuteControlMethod has a ScopeOp as the parent. 330a159c266SJung-uk Kim */ 331a159c266SJung-uk Kim if ((!Op->Common.Parent) || 332a159c266SJung-uk Kim (Op->Common.Parent->Common.AmlOpcode == AML_SCOPE_OP)) 333a159c266SJung-uk Kim { 334a159c266SJung-uk Kim /* No parent, the return value cannot possibly be used */ 335a159c266SJung-uk Kim 336a159c266SJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, 337a159c266SJung-uk Kim "At Method level, result of [%s] not used\n", 338a159c266SJung-uk Kim AcpiPsGetOpcodeName (Op->Common.AmlOpcode))); 3399c48c75eSJung-uk Kim return_UINT8 (FALSE); 340a159c266SJung-uk Kim } 341a159c266SJung-uk Kim 342a159c266SJung-uk Kim /* Get info on the parent. The RootOp is AML_SCOPE */ 343a159c266SJung-uk Kim 344a159c266SJung-uk Kim ParentInfo = AcpiPsGetOpcodeInfo (Op->Common.Parent->Common.AmlOpcode); 345a159c266SJung-uk Kim if (ParentInfo->Class == AML_CLASS_UNKNOWN) 346a159c266SJung-uk Kim { 347a159c266SJung-uk Kim ACPI_ERROR ((AE_INFO, 348a159c266SJung-uk Kim "Unknown parent opcode Op=%p", Op)); 3499c48c75eSJung-uk Kim return_UINT8 (FALSE); 350a159c266SJung-uk Kim } 351a159c266SJung-uk Kim 352a159c266SJung-uk Kim /* 353a159c266SJung-uk Kim * Decide what to do with the result based on the parent. If 354a159c266SJung-uk Kim * the parent opcode will not use the result, delete the object. 355a159c266SJung-uk Kim * Otherwise leave it as is, it will be deleted when it is used 356a159c266SJung-uk Kim * as an operand later. 357a159c266SJung-uk Kim */ 358a159c266SJung-uk Kim switch (ParentInfo->Class) 359a159c266SJung-uk Kim { 360a159c266SJung-uk Kim case AML_CLASS_CONTROL: 361a159c266SJung-uk Kim 362a159c266SJung-uk Kim switch (Op->Common.Parent->Common.AmlOpcode) 363a159c266SJung-uk Kim { 364a159c266SJung-uk Kim case AML_RETURN_OP: 365a159c266SJung-uk Kim 366a159c266SJung-uk Kim /* Never delete the return value associated with a return opcode */ 367a159c266SJung-uk Kim 368a159c266SJung-uk Kim goto ResultUsed; 369a159c266SJung-uk Kim 370a159c266SJung-uk Kim case AML_IF_OP: 371a159c266SJung-uk Kim case AML_WHILE_OP: 372a159c266SJung-uk Kim /* 373a159c266SJung-uk Kim * If we are executing the predicate AND this is the predicate op, 374a159c266SJung-uk Kim * we will use the return value 375a159c266SJung-uk Kim */ 376f8146b88SJung-uk Kim if ((WalkState->ControlState->Common.State == 377f8146b88SJung-uk Kim ACPI_CONTROL_PREDICATE_EXECUTING) && 378a159c266SJung-uk Kim (WalkState->ControlState->Control.PredicateOp == Op)) 379a159c266SJung-uk Kim { 380a159c266SJung-uk Kim goto ResultUsed; 381a159c266SJung-uk Kim } 382a159c266SJung-uk Kim break; 383a159c266SJung-uk Kim 384a159c266SJung-uk Kim default: 385a9d8d09cSJung-uk Kim 386a159c266SJung-uk Kim /* Ignore other control opcodes */ 387a9d8d09cSJung-uk Kim 388a159c266SJung-uk Kim break; 389a159c266SJung-uk Kim } 390a159c266SJung-uk Kim 391a159c266SJung-uk Kim /* The general control opcode returns no result */ 392a159c266SJung-uk Kim 393a159c266SJung-uk Kim goto ResultNotUsed; 394a159c266SJung-uk Kim 395a159c266SJung-uk Kim case AML_CLASS_CREATE: 396a159c266SJung-uk Kim /* 397a159c266SJung-uk Kim * These opcodes allow TermArg(s) as operands and therefore 398a159c266SJung-uk Kim * the operands can be method calls. The result is used. 399a159c266SJung-uk Kim */ 400a159c266SJung-uk Kim goto ResultUsed; 401a159c266SJung-uk Kim 402a159c266SJung-uk Kim case AML_CLASS_NAMED_OBJECT: 403a159c266SJung-uk Kim 404a159c266SJung-uk Kim if ((Op->Common.Parent->Common.AmlOpcode == AML_REGION_OP) || 405a159c266SJung-uk Kim (Op->Common.Parent->Common.AmlOpcode == AML_DATA_REGION_OP) || 406a159c266SJung-uk Kim (Op->Common.Parent->Common.AmlOpcode == AML_PACKAGE_OP) || 407a159c266SJung-uk Kim (Op->Common.Parent->Common.AmlOpcode == AML_BUFFER_OP) || 4080d84335fSJung-uk Kim (Op->Common.Parent->Common.AmlOpcode == AML_VARIABLE_PACKAGE_OP) || 409a159c266SJung-uk Kim (Op->Common.Parent->Common.AmlOpcode == AML_INT_EVAL_SUBTREE_OP) || 410a159c266SJung-uk Kim (Op->Common.Parent->Common.AmlOpcode == AML_BANK_FIELD_OP)) 411a159c266SJung-uk Kim { 412a159c266SJung-uk Kim /* 413a159c266SJung-uk Kim * These opcodes allow TermArg(s) as operands and therefore 414a159c266SJung-uk Kim * the operands can be method calls. The result is used. 415a159c266SJung-uk Kim */ 416a159c266SJung-uk Kim goto ResultUsed; 417a159c266SJung-uk Kim } 418a159c266SJung-uk Kim 419a159c266SJung-uk Kim goto ResultNotUsed; 420a159c266SJung-uk Kim 421a159c266SJung-uk Kim default: 422a159c266SJung-uk Kim /* 423a159c266SJung-uk Kim * In all other cases. the parent will actually use the return 424a159c266SJung-uk Kim * object, so keep it. 425a159c266SJung-uk Kim */ 426a159c266SJung-uk Kim goto ResultUsed; 427a159c266SJung-uk Kim } 428a159c266SJung-uk Kim 429a159c266SJung-uk Kim 430a159c266SJung-uk Kim ResultUsed: 431a159c266SJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, 432a159c266SJung-uk Kim "Result of [%s] used by Parent [%s] Op=%p\n", 433a159c266SJung-uk Kim AcpiPsGetOpcodeName (Op->Common.AmlOpcode), 434a159c266SJung-uk Kim AcpiPsGetOpcodeName (Op->Common.Parent->Common.AmlOpcode), Op)); 435a159c266SJung-uk Kim 4369c48c75eSJung-uk Kim return_UINT8 (TRUE); 437a159c266SJung-uk Kim 438a159c266SJung-uk Kim 439a159c266SJung-uk Kim ResultNotUsed: 440a159c266SJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, 441a159c266SJung-uk Kim "Result of [%s] not used by Parent [%s] Op=%p\n", 442a159c266SJung-uk Kim AcpiPsGetOpcodeName (Op->Common.AmlOpcode), 443a159c266SJung-uk Kim AcpiPsGetOpcodeName (Op->Common.Parent->Common.AmlOpcode), Op)); 444a159c266SJung-uk Kim 4459c48c75eSJung-uk Kim return_UINT8 (FALSE); 446a159c266SJung-uk Kim } 447a159c266SJung-uk Kim 448a159c266SJung-uk Kim 449a159c266SJung-uk Kim /******************************************************************************* 450a159c266SJung-uk Kim * 451a159c266SJung-uk Kim * FUNCTION: AcpiDsDeleteResultIfNotUsed 452a159c266SJung-uk Kim * 453a159c266SJung-uk Kim * PARAMETERS: Op - Current parse Op 454a159c266SJung-uk Kim * ResultObj - Result of the operation 455a159c266SJung-uk Kim * WalkState - Current state 456a159c266SJung-uk Kim * 457a159c266SJung-uk Kim * RETURN: Status 458a159c266SJung-uk Kim * 459a159c266SJung-uk Kim * DESCRIPTION: Used after interpretation of an opcode. If there is an internal 460a159c266SJung-uk Kim * result descriptor, check if the parent opcode will actually use 461a159c266SJung-uk Kim * this result. If not, delete the result now so that it will 462a159c266SJung-uk Kim * not become orphaned. 463a159c266SJung-uk Kim * 464a159c266SJung-uk Kim ******************************************************************************/ 465a159c266SJung-uk Kim 466a159c266SJung-uk Kim void 467a159c266SJung-uk Kim AcpiDsDeleteResultIfNotUsed ( 468a159c266SJung-uk Kim ACPI_PARSE_OBJECT *Op, 469a159c266SJung-uk Kim ACPI_OPERAND_OBJECT *ResultObj, 470a159c266SJung-uk Kim ACPI_WALK_STATE *WalkState) 471a159c266SJung-uk Kim { 472a159c266SJung-uk Kim ACPI_OPERAND_OBJECT *ObjDesc; 473a159c266SJung-uk Kim ACPI_STATUS Status; 474a159c266SJung-uk Kim 475a159c266SJung-uk Kim 476a159c266SJung-uk Kim ACPI_FUNCTION_TRACE_PTR (DsDeleteResultIfNotUsed, ResultObj); 477a159c266SJung-uk Kim 478a159c266SJung-uk Kim 479a159c266SJung-uk Kim if (!Op) 480a159c266SJung-uk Kim { 481a159c266SJung-uk Kim ACPI_ERROR ((AE_INFO, "Null Op")); 482a159c266SJung-uk Kim return_VOID; 483a159c266SJung-uk Kim } 484a159c266SJung-uk Kim 485a159c266SJung-uk Kim if (!ResultObj) 486a159c266SJung-uk Kim { 487a159c266SJung-uk Kim return_VOID; 488a159c266SJung-uk Kim } 489a159c266SJung-uk Kim 490a159c266SJung-uk Kim if (!AcpiDsIsResultUsed (Op, WalkState)) 491a159c266SJung-uk Kim { 492a159c266SJung-uk Kim /* Must pop the result stack (ObjDesc should be equal to ResultObj) */ 493a159c266SJung-uk Kim 494a159c266SJung-uk Kim Status = AcpiDsResultPop (&ObjDesc, WalkState); 495a159c266SJung-uk Kim if (ACPI_SUCCESS (Status)) 496a159c266SJung-uk Kim { 497a159c266SJung-uk Kim AcpiUtRemoveReference (ResultObj); 498a159c266SJung-uk Kim } 499a159c266SJung-uk Kim } 500a159c266SJung-uk Kim 501a159c266SJung-uk Kim return_VOID; 502a159c266SJung-uk Kim } 503a159c266SJung-uk Kim 504a159c266SJung-uk Kim 505a159c266SJung-uk Kim /******************************************************************************* 506a159c266SJung-uk Kim * 507a159c266SJung-uk Kim * FUNCTION: AcpiDsResolveOperands 508a159c266SJung-uk Kim * 509a159c266SJung-uk Kim * PARAMETERS: WalkState - Current walk state with operands on stack 510a159c266SJung-uk Kim * 511a159c266SJung-uk Kim * RETURN: Status 512a159c266SJung-uk Kim * 513a159c266SJung-uk Kim * DESCRIPTION: Resolve all operands to their values. Used to prepare 514a159c266SJung-uk Kim * arguments to a control method invocation (a call from one 515a159c266SJung-uk Kim * method to another.) 516a159c266SJung-uk Kim * 517a159c266SJung-uk Kim ******************************************************************************/ 518a159c266SJung-uk Kim 519a159c266SJung-uk Kim ACPI_STATUS 520a159c266SJung-uk Kim AcpiDsResolveOperands ( 521a159c266SJung-uk Kim ACPI_WALK_STATE *WalkState) 522a159c266SJung-uk Kim { 523a159c266SJung-uk Kim UINT32 i; 524a159c266SJung-uk Kim ACPI_STATUS Status = AE_OK; 525a159c266SJung-uk Kim 526a159c266SJung-uk Kim 527a159c266SJung-uk Kim ACPI_FUNCTION_TRACE_PTR (DsResolveOperands, WalkState); 528a159c266SJung-uk Kim 529a159c266SJung-uk Kim 530a159c266SJung-uk Kim /* 531a159c266SJung-uk Kim * Attempt to resolve each of the valid operands 532a159c266SJung-uk Kim * Method arguments are passed by reference, not by value. This means 533a159c266SJung-uk Kim * that the actual objects are passed, not copies of the objects. 534a159c266SJung-uk Kim */ 535a159c266SJung-uk Kim for (i = 0; i < WalkState->NumOperands; i++) 536a159c266SJung-uk Kim { 537a159c266SJung-uk Kim Status = AcpiExResolveToValue (&WalkState->Operands[i], WalkState); 538a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 539a159c266SJung-uk Kim { 540a159c266SJung-uk Kim break; 541a159c266SJung-uk Kim } 542a159c266SJung-uk Kim } 543a159c266SJung-uk Kim 544a159c266SJung-uk Kim return_ACPI_STATUS (Status); 545a159c266SJung-uk Kim } 546a159c266SJung-uk Kim 547a159c266SJung-uk Kim 548a159c266SJung-uk Kim /******************************************************************************* 549a159c266SJung-uk Kim * 550a159c266SJung-uk Kim * FUNCTION: AcpiDsClearOperands 551a159c266SJung-uk Kim * 552a159c266SJung-uk Kim * PARAMETERS: WalkState - Current walk state with operands on stack 553a159c266SJung-uk Kim * 554a159c266SJung-uk Kim * RETURN: None 555a159c266SJung-uk Kim * 556a159c266SJung-uk Kim * DESCRIPTION: Clear all operands on the current walk state operand stack. 557a159c266SJung-uk Kim * 558a159c266SJung-uk Kim ******************************************************************************/ 559a159c266SJung-uk Kim 560a159c266SJung-uk Kim void 561a159c266SJung-uk Kim AcpiDsClearOperands ( 562a159c266SJung-uk Kim ACPI_WALK_STATE *WalkState) 563a159c266SJung-uk Kim { 564a159c266SJung-uk Kim UINT32 i; 565a159c266SJung-uk Kim 566a159c266SJung-uk Kim 567a159c266SJung-uk Kim ACPI_FUNCTION_TRACE_PTR (DsClearOperands, WalkState); 568a159c266SJung-uk Kim 569a159c266SJung-uk Kim 570a159c266SJung-uk Kim /* Remove a reference on each operand on the stack */ 571a159c266SJung-uk Kim 572a159c266SJung-uk Kim for (i = 0; i < WalkState->NumOperands; i++) 573a159c266SJung-uk Kim { 574a159c266SJung-uk Kim /* 575a159c266SJung-uk Kim * Remove a reference to all operands, including both 576a159c266SJung-uk Kim * "Arguments" and "Targets". 577a159c266SJung-uk Kim */ 578a159c266SJung-uk Kim AcpiUtRemoveReference (WalkState->Operands[i]); 579a159c266SJung-uk Kim WalkState->Operands[i] = NULL; 580a159c266SJung-uk Kim } 581a159c266SJung-uk Kim 582a159c266SJung-uk Kim WalkState->NumOperands = 0; 583a159c266SJung-uk Kim return_VOID; 584a159c266SJung-uk Kim } 585a159c266SJung-uk Kim 586a159c266SJung-uk Kim 587a159c266SJung-uk Kim /******************************************************************************* 588a159c266SJung-uk Kim * 589a159c266SJung-uk Kim * FUNCTION: AcpiDsCreateOperand 590a159c266SJung-uk Kim * 591a159c266SJung-uk Kim * PARAMETERS: WalkState - Current walk state 592a159c266SJung-uk Kim * Arg - Parse object for the argument 593a159c266SJung-uk Kim * ArgIndex - Which argument (zero based) 594a159c266SJung-uk Kim * 595a159c266SJung-uk Kim * RETURN: Status 596a159c266SJung-uk Kim * 597a159c266SJung-uk Kim * DESCRIPTION: Translate a parse tree object that is an argument to an AML 598a159c266SJung-uk Kim * opcode to the equivalent interpreter object. This may include 599a159c266SJung-uk Kim * looking up a name or entering a new name into the internal 600a159c266SJung-uk Kim * namespace. 601a159c266SJung-uk Kim * 602a159c266SJung-uk Kim ******************************************************************************/ 603a159c266SJung-uk Kim 604a159c266SJung-uk Kim ACPI_STATUS 605a159c266SJung-uk Kim AcpiDsCreateOperand ( 606a159c266SJung-uk Kim ACPI_WALK_STATE *WalkState, 607a159c266SJung-uk Kim ACPI_PARSE_OBJECT *Arg, 608a159c266SJung-uk Kim UINT32 ArgIndex) 609a159c266SJung-uk Kim { 610a159c266SJung-uk Kim ACPI_STATUS Status = AE_OK; 611a159c266SJung-uk Kim char *NameString; 612a159c266SJung-uk Kim UINT32 NameLength; 613a159c266SJung-uk Kim ACPI_OPERAND_OBJECT *ObjDesc; 614a159c266SJung-uk Kim ACPI_PARSE_OBJECT *ParentOp; 615a159c266SJung-uk Kim UINT16 Opcode; 616a159c266SJung-uk Kim ACPI_INTERPRETER_MODE InterpreterMode; 617a159c266SJung-uk Kim const ACPI_OPCODE_INFO *OpInfo; 618a159c266SJung-uk Kim 619a159c266SJung-uk Kim 620a159c266SJung-uk Kim ACPI_FUNCTION_TRACE_PTR (DsCreateOperand, Arg); 621a159c266SJung-uk Kim 622a159c266SJung-uk Kim 623a159c266SJung-uk Kim /* A valid name must be looked up in the namespace */ 624a159c266SJung-uk Kim 625a159c266SJung-uk Kim if ((Arg->Common.AmlOpcode == AML_INT_NAMEPATH_OP) && 626a159c266SJung-uk Kim (Arg->Common.Value.String) && 627a159c266SJung-uk Kim !(Arg->Common.Flags & ACPI_PARSEOP_IN_STACK)) 628a159c266SJung-uk Kim { 629a159c266SJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "Getting a name: Arg=%p\n", Arg)); 630a159c266SJung-uk Kim 631a159c266SJung-uk Kim /* Get the entire name string from the AML stream */ 632a159c266SJung-uk Kim 633f8146b88SJung-uk Kim Status = AcpiExGetNameString (ACPI_TYPE_ANY, 634f8146b88SJung-uk Kim Arg->Common.Value.Buffer, &NameString, &NameLength); 635a159c266SJung-uk Kim 636a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 637a159c266SJung-uk Kim { 638a159c266SJung-uk Kim return_ACPI_STATUS (Status); 639a159c266SJung-uk Kim } 640a159c266SJung-uk Kim 641a159c266SJung-uk Kim /* All prefixes have been handled, and the name is in NameString */ 642a159c266SJung-uk Kim 643a159c266SJung-uk Kim /* 644a159c266SJung-uk Kim * Special handling for BufferField declarations. This is a deferred 645a159c266SJung-uk Kim * opcode that unfortunately defines the field name as the last 646a159c266SJung-uk Kim * parameter instead of the first. We get here when we are performing 647a159c266SJung-uk Kim * the deferred execution, so the actual name of the field is already 648a159c266SJung-uk Kim * in the namespace. We don't want to attempt to look it up again 649a159c266SJung-uk Kim * because we may be executing in a different scope than where the 650a159c266SJung-uk Kim * actual opcode exists. 651a159c266SJung-uk Kim */ 652a159c266SJung-uk Kim if ((WalkState->DeferredNode) && 653a159c266SJung-uk Kim (WalkState->DeferredNode->Type == ACPI_TYPE_BUFFER_FIELD) && 654f8146b88SJung-uk Kim (ArgIndex == (UINT32) 655f8146b88SJung-uk Kim ((WalkState->Opcode == AML_CREATE_FIELD_OP) ? 3 : 2))) 656a159c266SJung-uk Kim { 657a159c266SJung-uk Kim ObjDesc = ACPI_CAST_PTR ( 658a159c266SJung-uk Kim ACPI_OPERAND_OBJECT, WalkState->DeferredNode); 659a159c266SJung-uk Kim Status = AE_OK; 660a159c266SJung-uk Kim } 661a159c266SJung-uk Kim else /* All other opcodes */ 662a159c266SJung-uk Kim { 663a159c266SJung-uk Kim /* 664a159c266SJung-uk Kim * Differentiate between a namespace "create" operation 665a159c266SJung-uk Kim * versus a "lookup" operation (IMODE_LOAD_PASS2 vs. 666a159c266SJung-uk Kim * IMODE_EXECUTE) in order to support the creation of 667a159c266SJung-uk Kim * namespace objects during the execution of control methods. 668a159c266SJung-uk Kim */ 669a159c266SJung-uk Kim ParentOp = Arg->Common.Parent; 670a159c266SJung-uk Kim OpInfo = AcpiPsGetOpcodeInfo (ParentOp->Common.AmlOpcode); 671f8146b88SJung-uk Kim 672a159c266SJung-uk Kim if ((OpInfo->Flags & AML_NSNODE) && 673a159c266SJung-uk Kim (ParentOp->Common.AmlOpcode != AML_INT_METHODCALL_OP) && 674a159c266SJung-uk Kim (ParentOp->Common.AmlOpcode != AML_REGION_OP) && 675a159c266SJung-uk Kim (ParentOp->Common.AmlOpcode != AML_INT_NAMEPATH_OP)) 676a159c266SJung-uk Kim { 677a159c266SJung-uk Kim /* Enter name into namespace if not found */ 678a159c266SJung-uk Kim 679a159c266SJung-uk Kim InterpreterMode = ACPI_IMODE_LOAD_PASS2; 680a159c266SJung-uk Kim } 681a159c266SJung-uk Kim else 682a159c266SJung-uk Kim { 683a159c266SJung-uk Kim /* Return a failure if name not found */ 684a159c266SJung-uk Kim 685a159c266SJung-uk Kim InterpreterMode = ACPI_IMODE_EXECUTE; 686a159c266SJung-uk Kim } 687a159c266SJung-uk Kim 688a159c266SJung-uk Kim Status = AcpiNsLookup (WalkState->ScopeInfo, NameString, 689a159c266SJung-uk Kim ACPI_TYPE_ANY, InterpreterMode, 690f8146b88SJung-uk Kim ACPI_NS_SEARCH_PARENT | ACPI_NS_DONT_OPEN_SCOPE, WalkState, 691a159c266SJung-uk Kim ACPI_CAST_INDIRECT_PTR (ACPI_NAMESPACE_NODE, &ObjDesc)); 692a159c266SJung-uk Kim /* 693a159c266SJung-uk Kim * The only case where we pass through (ignore) a NOT_FOUND 694a159c266SJung-uk Kim * error is for the CondRefOf opcode. 695a159c266SJung-uk Kim */ 696a159c266SJung-uk Kim if (Status == AE_NOT_FOUND) 697a159c266SJung-uk Kim { 6980d84335fSJung-uk Kim if (ParentOp->Common.AmlOpcode == AML_CONDITIONAL_REF_OF_OP) 699a159c266SJung-uk Kim { 700a159c266SJung-uk Kim /* 701a159c266SJung-uk Kim * For the Conditional Reference op, it's OK if 702a159c266SJung-uk Kim * the name is not found; We just need a way to 703a159c266SJung-uk Kim * indicate this to the interpreter, set the 704a159c266SJung-uk Kim * object to the root 705a159c266SJung-uk Kim */ 706a159c266SJung-uk Kim ObjDesc = ACPI_CAST_PTR ( 707a159c266SJung-uk Kim ACPI_OPERAND_OBJECT, AcpiGbl_RootNode); 708a159c266SJung-uk Kim Status = AE_OK; 709a159c266SJung-uk Kim } 7107cf3e94aSJung-uk Kim else if (ParentOp->Common.AmlOpcode == AML_EXTERNAL_OP) 7117cf3e94aSJung-uk Kim { 7123920312eSJung-uk Kim /* 7133920312eSJung-uk Kim * This opcode should never appear here. It is used only 7143920312eSJung-uk Kim * by AML disassemblers and is surrounded by an If(0) 7153920312eSJung-uk Kim * by the ASL compiler. 7163920312eSJung-uk Kim * 7173920312eSJung-uk Kim * Therefore, if we see it here, it is a serious error. 7183920312eSJung-uk Kim */ 7193920312eSJung-uk Kim Status = AE_AML_BAD_OPCODE; 7207cf3e94aSJung-uk Kim } 721a159c266SJung-uk Kim else 722a159c266SJung-uk Kim { 723a159c266SJung-uk Kim /* 724a159c266SJung-uk Kim * We just plain didn't find it -- which is a 725a159c266SJung-uk Kim * very serious error at this point 726a159c266SJung-uk Kim */ 727a159c266SJung-uk Kim Status = AE_AML_NAME_NOT_FOUND; 728a159c266SJung-uk Kim } 729a159c266SJung-uk Kim } 730a159c266SJung-uk Kim 731a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 732a159c266SJung-uk Kim { 733b7b7e711SJung-uk Kim ACPI_ERROR_NAMESPACE (WalkState->ScopeInfo, 734b7b7e711SJung-uk Kim NameString, Status); 735a159c266SJung-uk Kim } 736a159c266SJung-uk Kim } 737a159c266SJung-uk Kim 738a159c266SJung-uk Kim /* Free the namestring created above */ 739a159c266SJung-uk Kim 740a159c266SJung-uk Kim ACPI_FREE (NameString); 741a159c266SJung-uk Kim 742a159c266SJung-uk Kim /* Check status from the lookup */ 743a159c266SJung-uk Kim 744a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 745a159c266SJung-uk Kim { 746a159c266SJung-uk Kim return_ACPI_STATUS (Status); 747a159c266SJung-uk Kim } 748a159c266SJung-uk Kim 749a159c266SJung-uk Kim /* Put the resulting object onto the current object stack */ 750a159c266SJung-uk Kim 751a159c266SJung-uk Kim Status = AcpiDsObjStackPush (ObjDesc, WalkState); 752a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 753a159c266SJung-uk Kim { 754a159c266SJung-uk Kim return_ACPI_STATUS (Status); 755a159c266SJung-uk Kim } 756f8146b88SJung-uk Kim 757f8146b88SJung-uk Kim AcpiDbDisplayArgumentObject (ObjDesc, WalkState); 758a159c266SJung-uk Kim } 759a159c266SJung-uk Kim else 760a159c266SJung-uk Kim { 761a159c266SJung-uk Kim /* Check for null name case */ 762a159c266SJung-uk Kim 763a159c266SJung-uk Kim if ((Arg->Common.AmlOpcode == AML_INT_NAMEPATH_OP) && 764a159c266SJung-uk Kim !(Arg->Common.Flags & ACPI_PARSEOP_IN_STACK)) 765a159c266SJung-uk Kim { 766a159c266SJung-uk Kim /* 767a159c266SJung-uk Kim * If the name is null, this means that this is an 768a159c266SJung-uk Kim * optional result parameter that was not specified 769a159c266SJung-uk Kim * in the original ASL. Create a Zero Constant for a 770a159c266SJung-uk Kim * placeholder. (Store to a constant is a Noop.) 771a159c266SJung-uk Kim */ 772a159c266SJung-uk Kim Opcode = AML_ZERO_OP; /* Has no arguments! */ 773a159c266SJung-uk Kim 774a159c266SJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, 775a159c266SJung-uk Kim "Null namepath: Arg=%p\n", Arg)); 776a159c266SJung-uk Kim } 777a159c266SJung-uk Kim else 778a159c266SJung-uk Kim { 779a159c266SJung-uk Kim Opcode = Arg->Common.AmlOpcode; 780a159c266SJung-uk Kim } 781a159c266SJung-uk Kim 782a159c266SJung-uk Kim /* Get the object type of the argument */ 783a159c266SJung-uk Kim 784a159c266SJung-uk Kim OpInfo = AcpiPsGetOpcodeInfo (Opcode); 785a159c266SJung-uk Kim if (OpInfo->ObjectType == ACPI_TYPE_INVALID) 786a159c266SJung-uk Kim { 787a159c266SJung-uk Kim return_ACPI_STATUS (AE_NOT_IMPLEMENTED); 788a159c266SJung-uk Kim } 789a159c266SJung-uk Kim 790f8146b88SJung-uk Kim if ((OpInfo->Flags & AML_HAS_RETVAL) || 791f8146b88SJung-uk Kim (Arg->Common.Flags & ACPI_PARSEOP_IN_STACK)) 792a159c266SJung-uk Kim { 793a159c266SJung-uk Kim /* 794a159c266SJung-uk Kim * Use value that was already previously returned 795a159c266SJung-uk Kim * by the evaluation of this argument 796a159c266SJung-uk Kim */ 797a159c266SJung-uk Kim Status = AcpiDsResultPop (&ObjDesc, WalkState); 798a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 799a159c266SJung-uk Kim { 800a159c266SJung-uk Kim /* 801a159c266SJung-uk Kim * Only error is underflow, and this indicates 802a159c266SJung-uk Kim * a missing or null operand! 803a159c266SJung-uk Kim */ 804a159c266SJung-uk Kim ACPI_EXCEPTION ((AE_INFO, Status, 805a159c266SJung-uk Kim "Missing or null operand")); 806a159c266SJung-uk Kim return_ACPI_STATUS (Status); 807a159c266SJung-uk Kim } 808a159c266SJung-uk Kim } 809a159c266SJung-uk Kim else 810a159c266SJung-uk Kim { 811a159c266SJung-uk Kim /* Create an ACPI_INTERNAL_OBJECT for the argument */ 812a159c266SJung-uk Kim 813a159c266SJung-uk Kim ObjDesc = AcpiUtCreateInternalObject (OpInfo->ObjectType); 814a159c266SJung-uk Kim if (!ObjDesc) 815a159c266SJung-uk Kim { 816a159c266SJung-uk Kim return_ACPI_STATUS (AE_NO_MEMORY); 817a159c266SJung-uk Kim } 818a159c266SJung-uk Kim 819a159c266SJung-uk Kim /* Initialize the new object */ 820a159c266SJung-uk Kim 821a159c266SJung-uk Kim Status = AcpiDsInitObjectFromOp ( 822a159c266SJung-uk Kim WalkState, Arg, Opcode, &ObjDesc); 823a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 824a159c266SJung-uk Kim { 825a159c266SJung-uk Kim AcpiUtDeleteObjectDesc (ObjDesc); 826a159c266SJung-uk Kim return_ACPI_STATUS (Status); 827a159c266SJung-uk Kim } 828a159c266SJung-uk Kim } 829a159c266SJung-uk Kim 830a159c266SJung-uk Kim /* Put the operand object on the object stack */ 831a159c266SJung-uk Kim 832a159c266SJung-uk Kim Status = AcpiDsObjStackPush (ObjDesc, WalkState); 833a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 834a159c266SJung-uk Kim { 835a159c266SJung-uk Kim return_ACPI_STATUS (Status); 836a159c266SJung-uk Kim } 837a159c266SJung-uk Kim 838f8146b88SJung-uk Kim AcpiDbDisplayArgumentObject (ObjDesc, WalkState); 839a159c266SJung-uk Kim } 840a159c266SJung-uk Kim 841a159c266SJung-uk Kim return_ACPI_STATUS (AE_OK); 842a159c266SJung-uk Kim } 843a159c266SJung-uk Kim 844a159c266SJung-uk Kim 845a159c266SJung-uk Kim /******************************************************************************* 846a159c266SJung-uk Kim * 847a159c266SJung-uk Kim * FUNCTION: AcpiDsCreateOperands 848a159c266SJung-uk Kim * 849a159c266SJung-uk Kim * PARAMETERS: WalkState - Current state 850a159c266SJung-uk Kim * FirstArg - First argument of a parser argument tree 851a159c266SJung-uk Kim * 852a159c266SJung-uk Kim * RETURN: Status 853a159c266SJung-uk Kim * 854a159c266SJung-uk Kim * DESCRIPTION: Convert an operator's arguments from a parse tree format to 855a159c266SJung-uk Kim * namespace objects and place those argument object on the object 856a159c266SJung-uk Kim * stack in preparation for evaluation by the interpreter. 857a159c266SJung-uk Kim * 858a159c266SJung-uk Kim ******************************************************************************/ 859a159c266SJung-uk Kim 860a159c266SJung-uk Kim ACPI_STATUS 861a159c266SJung-uk Kim AcpiDsCreateOperands ( 862a159c266SJung-uk Kim ACPI_WALK_STATE *WalkState, 863a159c266SJung-uk Kim ACPI_PARSE_OBJECT *FirstArg) 864a159c266SJung-uk Kim { 865a159c266SJung-uk Kim ACPI_STATUS Status = AE_OK; 866a159c266SJung-uk Kim ACPI_PARSE_OBJECT *Arg; 867a159c266SJung-uk Kim ACPI_PARSE_OBJECT *Arguments[ACPI_OBJ_NUM_OPERANDS]; 868a159c266SJung-uk Kim UINT32 ArgCount = 0; 869a159c266SJung-uk Kim UINT32 Index = WalkState->NumOperands; 870*62e841ccSJung-uk Kim UINT32 PrevNumOperands = WalkState->NumOperands; 871*62e841ccSJung-uk Kim UINT32 NewNumOperands; 872a159c266SJung-uk Kim UINT32 i; 873a159c266SJung-uk Kim 874a159c266SJung-uk Kim 875a159c266SJung-uk Kim ACPI_FUNCTION_TRACE_PTR (DsCreateOperands, FirstArg); 876a159c266SJung-uk Kim 877a159c266SJung-uk Kim 878a159c266SJung-uk Kim /* Get all arguments in the list */ 879a159c266SJung-uk Kim 880a159c266SJung-uk Kim Arg = FirstArg; 881a159c266SJung-uk Kim while (Arg) 882a159c266SJung-uk Kim { 883a159c266SJung-uk Kim if (Index >= ACPI_OBJ_NUM_OPERANDS) 884a159c266SJung-uk Kim { 885a159c266SJung-uk Kim return_ACPI_STATUS (AE_BAD_DATA); 886a159c266SJung-uk Kim } 887a159c266SJung-uk Kim 888a159c266SJung-uk Kim Arguments[Index] = Arg; 889a159c266SJung-uk Kim WalkState->Operands [Index] = NULL; 890a159c266SJung-uk Kim 891a159c266SJung-uk Kim /* Move on to next argument, if any */ 892a159c266SJung-uk Kim 893a159c266SJung-uk Kim Arg = Arg->Common.Next; 894a159c266SJung-uk Kim ArgCount++; 895a159c266SJung-uk Kim Index++; 896a159c266SJung-uk Kim } 897a159c266SJung-uk Kim 898313a0c13SJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, 899313a0c13SJung-uk Kim "NumOperands %d, ArgCount %d, Index %d\n", 900313a0c13SJung-uk Kim WalkState->NumOperands, ArgCount, Index)); 901313a0c13SJung-uk Kim 902313a0c13SJung-uk Kim /* Create the interpreter arguments, in reverse order */ 903313a0c13SJung-uk Kim 904*62e841ccSJung-uk Kim NewNumOperands = Index; 905a159c266SJung-uk Kim Index--; 906a159c266SJung-uk Kim for (i = 0; i < ArgCount; i++) 907a159c266SJung-uk Kim { 908a159c266SJung-uk Kim Arg = Arguments[Index]; 909a159c266SJung-uk Kim WalkState->OperandIndex = (UINT8) Index; 910a159c266SJung-uk Kim 911a159c266SJung-uk Kim Status = AcpiDsCreateOperand (WalkState, Arg, Index); 912a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 913a159c266SJung-uk Kim { 914a159c266SJung-uk Kim goto Cleanup; 915a159c266SJung-uk Kim } 916a159c266SJung-uk Kim 917313a0c13SJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, 918313a0c13SJung-uk Kim "Created Arg #%u (%p) %u args total\n", 919313a0c13SJung-uk Kim Index, Arg, ArgCount)); 920a159c266SJung-uk Kim Index--; 921a159c266SJung-uk Kim } 922a159c266SJung-uk Kim 923a159c266SJung-uk Kim return_ACPI_STATUS (Status); 924a159c266SJung-uk Kim 925a159c266SJung-uk Kim 926a159c266SJung-uk Kim Cleanup: 927a159c266SJung-uk Kim /* 928a159c266SJung-uk Kim * We must undo everything done above; meaning that we must 929a159c266SJung-uk Kim * pop everything off of the operand stack and delete those 930a159c266SJung-uk Kim * objects 931a159c266SJung-uk Kim */ 932*62e841ccSJung-uk Kim WalkState->NumOperands = (UINT8) (i); 933*62e841ccSJung-uk Kim AcpiDsObjStackPopAndDelete (NewNumOperands, WalkState); 934*62e841ccSJung-uk Kim 935*62e841ccSJung-uk Kim /* Restore operand count */ 936*62e841ccSJung-uk Kim WalkState->NumOperands = (UINT8) (PrevNumOperands); 937a159c266SJung-uk Kim 938a159c266SJung-uk Kim ACPI_EXCEPTION ((AE_INFO, Status, "While creating Arg %u", Index)); 939a159c266SJung-uk Kim return_ACPI_STATUS (Status); 940a159c266SJung-uk Kim } 941a159c266SJung-uk Kim 942a159c266SJung-uk Kim 943a159c266SJung-uk Kim /***************************************************************************** 944a159c266SJung-uk Kim * 945a159c266SJung-uk Kim * FUNCTION: AcpiDsEvaluateNamePath 946a159c266SJung-uk Kim * 947a159c266SJung-uk Kim * PARAMETERS: WalkState - Current state of the parse tree walk, 948a159c266SJung-uk Kim * the opcode of current operation should be 949a159c266SJung-uk Kim * AML_INT_NAMEPATH_OP 950a159c266SJung-uk Kim * 951a159c266SJung-uk Kim * RETURN: Status 952a159c266SJung-uk Kim * 953a159c266SJung-uk Kim * DESCRIPTION: Translate the -NamePath- parse tree object to the equivalent 954a159c266SJung-uk Kim * interpreter object, convert it to value, if needed, duplicate 955a159c266SJung-uk Kim * it, if needed, and push it onto the current result stack. 956a159c266SJung-uk Kim * 957a159c266SJung-uk Kim ****************************************************************************/ 958a159c266SJung-uk Kim 959a159c266SJung-uk Kim ACPI_STATUS 960a159c266SJung-uk Kim AcpiDsEvaluateNamePath ( 961a159c266SJung-uk Kim ACPI_WALK_STATE *WalkState) 962a159c266SJung-uk Kim { 963a159c266SJung-uk Kim ACPI_STATUS Status = AE_OK; 964a159c266SJung-uk Kim ACPI_PARSE_OBJECT *Op = WalkState->Op; 965a159c266SJung-uk Kim ACPI_OPERAND_OBJECT **Operand = &WalkState->Operands[0]; 966a159c266SJung-uk Kim ACPI_OPERAND_OBJECT *NewObjDesc; 967a159c266SJung-uk Kim UINT8 Type; 968a159c266SJung-uk Kim 969a159c266SJung-uk Kim 970a159c266SJung-uk Kim ACPI_FUNCTION_TRACE_PTR (DsEvaluateNamePath, WalkState); 971a159c266SJung-uk Kim 972a159c266SJung-uk Kim 973a159c266SJung-uk Kim if (!Op->Common.Parent) 974a159c266SJung-uk Kim { 975a159c266SJung-uk Kim /* This happens after certain exception processing */ 976a159c266SJung-uk Kim 977a159c266SJung-uk Kim goto Exit; 978a159c266SJung-uk Kim } 979a159c266SJung-uk Kim 980a159c266SJung-uk Kim if ((Op->Common.Parent->Common.AmlOpcode == AML_PACKAGE_OP) || 9810d84335fSJung-uk Kim (Op->Common.Parent->Common.AmlOpcode == AML_VARIABLE_PACKAGE_OP) || 982a159c266SJung-uk Kim (Op->Common.Parent->Common.AmlOpcode == AML_REF_OF_OP)) 983a159c266SJung-uk Kim { 984a159c266SJung-uk Kim /* TBD: Should we specify this feature as a bit of OpInfo->Flags of these opcodes? */ 985a159c266SJung-uk Kim 986a159c266SJung-uk Kim goto Exit; 987a159c266SJung-uk Kim } 988a159c266SJung-uk Kim 989a159c266SJung-uk Kim Status = AcpiDsCreateOperand (WalkState, Op, 0); 990a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 991a159c266SJung-uk Kim { 992a159c266SJung-uk Kim goto Exit; 993a159c266SJung-uk Kim } 994a159c266SJung-uk Kim 995a159c266SJung-uk Kim if (Op->Common.Flags & ACPI_PARSEOP_TARGET) 996a159c266SJung-uk Kim { 997a159c266SJung-uk Kim NewObjDesc = *Operand; 998a159c266SJung-uk Kim goto PushResult; 999a159c266SJung-uk Kim } 1000a159c266SJung-uk Kim 1001a159c266SJung-uk Kim Type = (*Operand)->Common.Type; 1002a159c266SJung-uk Kim 1003a159c266SJung-uk Kim Status = AcpiExResolveToValue (Operand, WalkState); 1004a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 1005a159c266SJung-uk Kim { 1006a159c266SJung-uk Kim goto Exit; 1007a159c266SJung-uk Kim } 1008a159c266SJung-uk Kim 1009a159c266SJung-uk Kim if (Type == ACPI_TYPE_INTEGER) 1010a159c266SJung-uk Kim { 1011a159c266SJung-uk Kim /* It was incremented by AcpiExResolveToValue */ 1012a159c266SJung-uk Kim 1013a159c266SJung-uk Kim AcpiUtRemoveReference (*Operand); 1014a159c266SJung-uk Kim 1015f8146b88SJung-uk Kim Status = AcpiUtCopyIobjectToIobject ( 1016f8146b88SJung-uk Kim *Operand, &NewObjDesc, WalkState); 1017a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 1018a159c266SJung-uk Kim { 1019a159c266SJung-uk Kim goto Exit; 1020a159c266SJung-uk Kim } 1021a159c266SJung-uk Kim } 1022a159c266SJung-uk Kim else 1023a159c266SJung-uk Kim { 1024a159c266SJung-uk Kim /* 1025a159c266SJung-uk Kim * The object either was anew created or is 1026a159c266SJung-uk Kim * a Namespace node - don't decrement it. 1027a159c266SJung-uk Kim */ 1028a159c266SJung-uk Kim NewObjDesc = *Operand; 1029a159c266SJung-uk Kim } 1030a159c266SJung-uk Kim 1031a159c266SJung-uk Kim /* Cleanup for name-path operand */ 1032a159c266SJung-uk Kim 1033a159c266SJung-uk Kim Status = AcpiDsObjStackPop (1, WalkState); 1034a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 1035a159c266SJung-uk Kim { 1036a159c266SJung-uk Kim WalkState->ResultObj = NewObjDesc; 1037a159c266SJung-uk Kim goto Exit; 1038a159c266SJung-uk Kim } 1039a159c266SJung-uk Kim 1040a159c266SJung-uk Kim PushResult: 1041a159c266SJung-uk Kim 1042a159c266SJung-uk Kim WalkState->ResultObj = NewObjDesc; 1043a159c266SJung-uk Kim 1044a159c266SJung-uk Kim Status = AcpiDsResultPush (WalkState->ResultObj, WalkState); 1045a159c266SJung-uk Kim if (ACPI_SUCCESS (Status)) 1046a159c266SJung-uk Kim { 1047a159c266SJung-uk Kim /* Force to take it from stack */ 1048a159c266SJung-uk Kim 1049a159c266SJung-uk Kim Op->Common.Flags |= ACPI_PARSEOP_IN_STACK; 1050a159c266SJung-uk Kim } 1051a159c266SJung-uk Kim 1052a159c266SJung-uk Kim Exit: 1053a159c266SJung-uk Kim 1054a159c266SJung-uk Kim return_ACPI_STATUS (Status); 1055a159c266SJung-uk Kim } 1056