1a159c266SJung-uk Kim /****************************************************************************** 2a159c266SJung-uk Kim * 3a159c266SJung-uk Kim * Module Name: psloop - Main AML parse loop 4a159c266SJung-uk Kim * 5a159c266SJung-uk Kim *****************************************************************************/ 6a159c266SJung-uk Kim 70d84335fSJung-uk Kim /****************************************************************************** 80d84335fSJung-uk Kim * 90d84335fSJung-uk Kim * 1. Copyright Notice 100d84335fSJung-uk Kim * 11*804fe266SJung-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 /* 153a159c266SJung-uk Kim * Parse the AML and build an operation tree as most interpreters, (such as 154a159c266SJung-uk Kim * Perl) do. Parsing is done by hand rather than with a YACC generated parser 155a159c266SJung-uk Kim * to tightly constrain stack and dynamic memory usage. Parsing is kept 156a159c266SJung-uk Kim * flexible and the code fairly compact by parsing based on a list of AML 157a159c266SJung-uk Kim * opcode templates in AmlOpInfo[]. 158a159c266SJung-uk Kim */ 159a159c266SJung-uk Kim 160a159c266SJung-uk Kim #include <contrib/dev/acpica/include/acpi.h> 161a159c266SJung-uk Kim #include <contrib/dev/acpica/include/accommon.h> 162fe0f0bbbSJung-uk Kim #include <contrib/dev/acpica/include/acinterp.h> 163a159c266SJung-uk Kim #include <contrib/dev/acpica/include/acparser.h> 164a159c266SJung-uk Kim #include <contrib/dev/acpica/include/acdispat.h> 165a159c266SJung-uk Kim #include <contrib/dev/acpica/include/amlcode.h> 1660d84335fSJung-uk Kim #include <contrib/dev/acpica/include/acconvert.h> 16751f42badSJung-uk Kim #include <contrib/dev/acpica/include/acnamesp.h> 168a159c266SJung-uk Kim 169a159c266SJung-uk Kim #define _COMPONENT ACPI_PARSER 170a159c266SJung-uk Kim ACPI_MODULE_NAME ("psloop") 171a159c266SJung-uk Kim 172a159c266SJung-uk Kim 173a159c266SJung-uk Kim /* Local prototypes */ 174a159c266SJung-uk Kim 175a159c266SJung-uk Kim static ACPI_STATUS 176a159c266SJung-uk Kim AcpiPsGetArguments ( 177a159c266SJung-uk Kim ACPI_WALK_STATE *WalkState, 178a159c266SJung-uk Kim UINT8 *AmlOpStart, 179a159c266SJung-uk Kim ACPI_PARSE_OBJECT *Op); 180a159c266SJung-uk Kim 181a159c266SJung-uk Kim 182a159c266SJung-uk Kim /******************************************************************************* 183a159c266SJung-uk Kim * 184a159c266SJung-uk Kim * FUNCTION: AcpiPsGetArguments 185a159c266SJung-uk Kim * 186a159c266SJung-uk Kim * PARAMETERS: WalkState - Current state 187a159c266SJung-uk Kim * AmlOpStart - Op start in AML 188a159c266SJung-uk Kim * Op - Current Op 189a159c266SJung-uk Kim * 190a159c266SJung-uk Kim * RETURN: Status 191a159c266SJung-uk Kim * 192a159c266SJung-uk Kim * DESCRIPTION: Get arguments for passed Op. 193a159c266SJung-uk Kim * 194a159c266SJung-uk Kim ******************************************************************************/ 195a159c266SJung-uk Kim 196a159c266SJung-uk Kim static ACPI_STATUS 197a159c266SJung-uk Kim AcpiPsGetArguments ( 198a159c266SJung-uk Kim ACPI_WALK_STATE *WalkState, 199a159c266SJung-uk Kim UINT8 *AmlOpStart, 200a159c266SJung-uk Kim ACPI_PARSE_OBJECT *Op) 201a159c266SJung-uk Kim { 202a159c266SJung-uk Kim ACPI_STATUS Status = AE_OK; 203a159c266SJung-uk Kim ACPI_PARSE_OBJECT *Arg = NULL; 204a159c266SJung-uk Kim 205a159c266SJung-uk Kim 206a159c266SJung-uk Kim ACPI_FUNCTION_TRACE_PTR (PsGetArguments, WalkState); 207a159c266SJung-uk Kim 208a159c266SJung-uk Kim 2091cc50d6bSJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_PARSE, 2101cc50d6bSJung-uk Kim "Get arguments for opcode [%s]\n", Op->Common.AmlOpName)); 2111cc50d6bSJung-uk Kim 212a159c266SJung-uk Kim switch (Op->Common.AmlOpcode) 213a159c266SJung-uk Kim { 214a159c266SJung-uk Kim case AML_BYTE_OP: /* AML_BYTEDATA_ARG */ 215a159c266SJung-uk Kim case AML_WORD_OP: /* AML_WORDDATA_ARG */ 216a159c266SJung-uk Kim case AML_DWORD_OP: /* AML_DWORDATA_ARG */ 217a159c266SJung-uk Kim case AML_QWORD_OP: /* AML_QWORDATA_ARG */ 218a159c266SJung-uk Kim case AML_STRING_OP: /* AML_ASCIICHARLIST_ARG */ 219a159c266SJung-uk Kim 220a159c266SJung-uk Kim /* Fill in constant or string argument directly */ 221a159c266SJung-uk Kim 222a159c266SJung-uk Kim AcpiPsGetNextSimpleArg (&(WalkState->ParserState), 223a159c266SJung-uk Kim GET_CURRENT_ARG_TYPE (WalkState->ArgTypes), Op); 224a159c266SJung-uk Kim break; 225a159c266SJung-uk Kim 226a159c266SJung-uk Kim case AML_INT_NAMEPATH_OP: /* AML_NAMESTRING_ARG */ 227a159c266SJung-uk Kim 228f8146b88SJung-uk Kim Status = AcpiPsGetNextNamepath (WalkState, 229f8146b88SJung-uk Kim &(WalkState->ParserState), Op, ACPI_POSSIBLE_METHOD_CALL); 230a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 231a159c266SJung-uk Kim { 232a159c266SJung-uk Kim return_ACPI_STATUS (Status); 233a159c266SJung-uk Kim } 234a159c266SJung-uk Kim 235a159c266SJung-uk Kim WalkState->ArgTypes = 0; 236a159c266SJung-uk Kim break; 237a159c266SJung-uk Kim 238a159c266SJung-uk Kim default: 239a159c266SJung-uk Kim /* 240a159c266SJung-uk Kim * Op is not a constant or string, append each argument to the Op 241a159c266SJung-uk Kim */ 242f8146b88SJung-uk Kim while (GET_CURRENT_ARG_TYPE (WalkState->ArgTypes) && 243f8146b88SJung-uk Kim !WalkState->ArgCount) 244a159c266SJung-uk Kim { 245fe0f0bbbSJung-uk Kim WalkState->Aml = WalkState->ParserState.Aml; 246a159c266SJung-uk Kim 2470d84335fSJung-uk Kim switch (Op->Common.AmlOpcode) 2480d84335fSJung-uk Kim { 2490d84335fSJung-uk Kim case AML_METHOD_OP: 2500d84335fSJung-uk Kim case AML_BUFFER_OP: 2510d84335fSJung-uk Kim case AML_PACKAGE_OP: 2520d84335fSJung-uk Kim case AML_VARIABLE_PACKAGE_OP: 2530d84335fSJung-uk Kim case AML_WHILE_OP: 2540d84335fSJung-uk Kim 2550d84335fSJung-uk Kim break; 2560d84335fSJung-uk Kim 2570d84335fSJung-uk Kim default: 2580d84335fSJung-uk Kim 2590d84335fSJung-uk Kim ASL_CV_CAPTURE_COMMENTS (WalkState); 2600d84335fSJung-uk Kim break; 2610d84335fSJung-uk Kim } 2620d84335fSJung-uk Kim 263a159c266SJung-uk Kim Status = AcpiPsGetNextArg (WalkState, &(WalkState->ParserState), 264a159c266SJung-uk Kim GET_CURRENT_ARG_TYPE (WalkState->ArgTypes), &Arg); 265a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 266a159c266SJung-uk Kim { 267a159c266SJung-uk Kim return_ACPI_STATUS (Status); 268a159c266SJung-uk Kim } 269a159c266SJung-uk Kim 270a159c266SJung-uk Kim if (Arg) 271a159c266SJung-uk Kim { 272a159c266SJung-uk Kim AcpiPsAppendArg (Op, Arg); 273a159c266SJung-uk Kim } 274a159c266SJung-uk Kim 275a159c266SJung-uk Kim INCREMENT_ARG_LIST (WalkState->ArgTypes); 276a159c266SJung-uk Kim } 277a159c266SJung-uk Kim 2785f9b24faSJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_PARSE, 279ff879b07SJung-uk Kim "Final argument count: %8.8X pass %u\n", 2805f9b24faSJung-uk Kim WalkState->ArgCount, WalkState->PassNumber)); 281a159c266SJung-uk Kim 282a159c266SJung-uk Kim /* Special processing for certain opcodes */ 283a159c266SJung-uk Kim 284a159c266SJung-uk Kim switch (Op->Common.AmlOpcode) 285a159c266SJung-uk Kim { 286a159c266SJung-uk Kim case AML_METHOD_OP: 287a159c266SJung-uk Kim /* 288a159c266SJung-uk Kim * Skip parsing of control method because we don't have enough 289a159c266SJung-uk Kim * info in the first pass to parse it correctly. 290a159c266SJung-uk Kim * 291a159c266SJung-uk Kim * Save the length and address of the body 292a159c266SJung-uk Kim */ 293a159c266SJung-uk Kim Op->Named.Data = WalkState->ParserState.Aml; 294a159c266SJung-uk Kim Op->Named.Length = (UINT32) 295a159c266SJung-uk Kim (WalkState->ParserState.PkgEnd - WalkState->ParserState.Aml); 296a159c266SJung-uk Kim 297a159c266SJung-uk Kim /* Skip body of method */ 298a159c266SJung-uk Kim 299a159c266SJung-uk Kim WalkState->ParserState.Aml = WalkState->ParserState.PkgEnd; 300a159c266SJung-uk Kim WalkState->ArgCount = 0; 301a159c266SJung-uk Kim break; 302a159c266SJung-uk Kim 303a159c266SJung-uk Kim case AML_BUFFER_OP: 304a159c266SJung-uk Kim case AML_PACKAGE_OP: 3050d84335fSJung-uk Kim case AML_VARIABLE_PACKAGE_OP: 306a159c266SJung-uk Kim 307a159c266SJung-uk Kim if ((Op->Common.Parent) && 308a159c266SJung-uk Kim (Op->Common.Parent->Common.AmlOpcode == AML_NAME_OP) && 309a159c266SJung-uk Kim (WalkState->PassNumber <= ACPI_IMODE_LOAD_PASS2)) 310a159c266SJung-uk Kim { 3115f9b24faSJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_PARSE, 3125f9b24faSJung-uk Kim "Setup Package/Buffer: Pass %u, AML Ptr: %p\n", 3135f9b24faSJung-uk Kim WalkState->PassNumber, AmlOpStart)); 3145f9b24faSJung-uk Kim 315a159c266SJung-uk Kim /* 316a159c266SJung-uk Kim * Skip parsing of Buffers and Packages because we don't have 317a159c266SJung-uk Kim * enough info in the first pass to parse them correctly. 318a159c266SJung-uk Kim */ 319a159c266SJung-uk Kim Op->Named.Data = AmlOpStart; 320a159c266SJung-uk Kim Op->Named.Length = (UINT32) 321a159c266SJung-uk Kim (WalkState->ParserState.PkgEnd - AmlOpStart); 322a159c266SJung-uk Kim 323a159c266SJung-uk Kim /* Skip body */ 324a159c266SJung-uk Kim 325a159c266SJung-uk Kim WalkState->ParserState.Aml = WalkState->ParserState.PkgEnd; 326a159c266SJung-uk Kim WalkState->ArgCount = 0; 327a159c266SJung-uk Kim } 328a159c266SJung-uk Kim break; 329a159c266SJung-uk Kim 330a159c266SJung-uk Kim case AML_WHILE_OP: 331a159c266SJung-uk Kim 332a159c266SJung-uk Kim if (WalkState->ControlState) 333a159c266SJung-uk Kim { 334a159c266SJung-uk Kim WalkState->ControlState->Control.PackageEnd = 335a159c266SJung-uk Kim WalkState->ParserState.PkgEnd; 336a159c266SJung-uk Kim } 337a159c266SJung-uk Kim break; 338a159c266SJung-uk Kim 339a159c266SJung-uk Kim default: 340a159c266SJung-uk Kim 341a159c266SJung-uk Kim /* No action for all other opcodes */ 342a9d8d09cSJung-uk Kim 343a159c266SJung-uk Kim break; 344a159c266SJung-uk Kim } 345a159c266SJung-uk Kim 346a159c266SJung-uk Kim break; 347a159c266SJung-uk Kim } 348a159c266SJung-uk Kim 349a159c266SJung-uk Kim return_ACPI_STATUS (AE_OK); 350a159c266SJung-uk Kim } 351a159c266SJung-uk Kim 352a159c266SJung-uk Kim 353a159c266SJung-uk Kim /******************************************************************************* 354a159c266SJung-uk Kim * 355a159c266SJung-uk Kim * FUNCTION: AcpiPsParseLoop 356a159c266SJung-uk Kim * 357a159c266SJung-uk Kim * PARAMETERS: WalkState - Current state 358a159c266SJung-uk Kim * 359a159c266SJung-uk Kim * RETURN: Status 360a159c266SJung-uk Kim * 361a159c266SJung-uk Kim * DESCRIPTION: Parse AML (pointed to by the current parser state) and return 362a159c266SJung-uk Kim * a tree of ops. 363a159c266SJung-uk Kim * 364a159c266SJung-uk Kim ******************************************************************************/ 365a159c266SJung-uk Kim 366a159c266SJung-uk Kim ACPI_STATUS 367a159c266SJung-uk Kim AcpiPsParseLoop ( 368a159c266SJung-uk Kim ACPI_WALK_STATE *WalkState) 369a159c266SJung-uk Kim { 370a159c266SJung-uk Kim ACPI_STATUS Status = AE_OK; 371a159c266SJung-uk Kim ACPI_PARSE_OBJECT *Op = NULL; /* current op */ 372a159c266SJung-uk Kim ACPI_PARSE_STATE *ParserState; 373a159c266SJung-uk Kim UINT8 *AmlOpStart = NULL; 3744a38ee6dSJung-uk Kim UINT8 OpcodeLength; 375a159c266SJung-uk Kim 376a159c266SJung-uk Kim 377a159c266SJung-uk Kim ACPI_FUNCTION_TRACE_PTR (PsParseLoop, WalkState); 378a159c266SJung-uk Kim 379a159c266SJung-uk Kim 380a159c266SJung-uk Kim if (WalkState->DescendingCallback == NULL) 381a159c266SJung-uk Kim { 382a159c266SJung-uk Kim return_ACPI_STATUS (AE_BAD_PARAMETER); 383a159c266SJung-uk Kim } 384a159c266SJung-uk Kim 385a159c266SJung-uk Kim ParserState = &WalkState->ParserState; 386a159c266SJung-uk Kim WalkState->ArgTypes = 0; 387a159c266SJung-uk Kim 38890b566fdSJung-uk Kim #ifndef ACPI_CONSTANT_EVAL_ONLY 389a159c266SJung-uk Kim 390a159c266SJung-uk Kim if (WalkState->WalkType & ACPI_WALK_METHOD_RESTART) 391a159c266SJung-uk Kim { 392a159c266SJung-uk Kim /* We are restarting a preempted control method */ 393a159c266SJung-uk Kim 394a159c266SJung-uk Kim if (AcpiPsHasCompletedScope (ParserState)) 395a159c266SJung-uk Kim { 396a159c266SJung-uk Kim /* 397a159c266SJung-uk Kim * We must check if a predicate to an IF or WHILE statement 398a159c266SJung-uk Kim * was just completed 399a159c266SJung-uk Kim */ 400a159c266SJung-uk Kim if ((ParserState->Scope->ParseScope.Op) && 401a159c266SJung-uk Kim ((ParserState->Scope->ParseScope.Op->Common.AmlOpcode == AML_IF_OP) || 402a159c266SJung-uk Kim (ParserState->Scope->ParseScope.Op->Common.AmlOpcode == AML_WHILE_OP)) && 403a159c266SJung-uk Kim (WalkState->ControlState) && 404a159c266SJung-uk Kim (WalkState->ControlState->Common.State == 405a159c266SJung-uk Kim ACPI_CONTROL_PREDICATE_EXECUTING)) 406a159c266SJung-uk Kim { 407a159c266SJung-uk Kim /* 408a159c266SJung-uk Kim * A predicate was just completed, get the value of the 409a159c266SJung-uk Kim * predicate and branch based on that value 410a159c266SJung-uk Kim */ 411a159c266SJung-uk Kim WalkState->Op = NULL; 412a159c266SJung-uk Kim Status = AcpiDsGetPredicateValue (WalkState, ACPI_TO_POINTER (TRUE)); 413385fb5d9SJung-uk Kim if (ACPI_FAILURE (Status) && !ACPI_CNTL_EXCEPTION (Status)) 414a159c266SJung-uk Kim { 415a159c266SJung-uk Kim if (Status == AE_AML_NO_RETURN_VALUE) 416a159c266SJung-uk Kim { 417a159c266SJung-uk Kim ACPI_EXCEPTION ((AE_INFO, Status, 418a159c266SJung-uk Kim "Invoked method did not return a value")); 419a159c266SJung-uk Kim } 420a159c266SJung-uk Kim 421a159c266SJung-uk Kim ACPI_EXCEPTION ((AE_INFO, Status, "GetPredicate Failed")); 422a159c266SJung-uk Kim return_ACPI_STATUS (Status); 423a159c266SJung-uk Kim } 424a159c266SJung-uk Kim 425a159c266SJung-uk Kim Status = AcpiPsNextParseState (WalkState, Op, Status); 426a159c266SJung-uk Kim } 427a159c266SJung-uk Kim 428a159c266SJung-uk Kim AcpiPsPopScope (ParserState, &Op, 429a159c266SJung-uk Kim &WalkState->ArgTypes, &WalkState->ArgCount); 430a159c266SJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_PARSE, "Popped scope, Op=%p\n", Op)); 431a159c266SJung-uk Kim } 432a159c266SJung-uk Kim else if (WalkState->PrevOp) 433a159c266SJung-uk Kim { 434a159c266SJung-uk Kim /* We were in the middle of an op */ 435a159c266SJung-uk Kim 436a159c266SJung-uk Kim Op = WalkState->PrevOp; 437a159c266SJung-uk Kim WalkState->ArgTypes = WalkState->PrevArgTypes; 438a159c266SJung-uk Kim } 439a159c266SJung-uk Kim } 440a159c266SJung-uk Kim #endif 441a159c266SJung-uk Kim 442a159c266SJung-uk Kim /* Iterative parsing loop, while there is more AML to process: */ 443a159c266SJung-uk Kim 444a159c266SJung-uk Kim while ((ParserState->Aml < ParserState->AmlEnd) || (Op)) 445a159c266SJung-uk Kim { 4460d84335fSJung-uk Kim ASL_CV_CAPTURE_COMMENTS (WalkState); 4470d84335fSJung-uk Kim 448a159c266SJung-uk Kim AmlOpStart = ParserState->Aml; 449a159c266SJung-uk Kim if (!Op) 450a159c266SJung-uk Kim { 451a159c266SJung-uk Kim Status = AcpiPsCreateOp (WalkState, AmlOpStart, &Op); 452a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 453a159c266SJung-uk Kim { 45451f42badSJung-uk Kim /* 45551f42badSJung-uk Kim * ACPI_PARSE_MODULE_LEVEL means that we are loading a table by 45651f42badSJung-uk Kim * executing it as a control method. However, if we encounter 45751f42badSJung-uk Kim * an error while loading the table, we need to keep trying to 45851f42badSJung-uk Kim * load the table rather than aborting the table load. Set the 45951f42badSJung-uk Kim * status to AE_OK to proceed with the table load. 46051f42badSJung-uk Kim */ 46151f42badSJung-uk Kim if ((WalkState->ParseFlags & ACPI_PARSE_MODULE_LEVEL) && 4624a38ee6dSJung-uk Kim ((Status == AE_ALREADY_EXISTS) || (Status == AE_NOT_FOUND))) 46351f42badSJung-uk Kim { 46451f42badSJung-uk Kim Status = AE_OK; 46551f42badSJung-uk Kim } 466a159c266SJung-uk Kim if (Status == AE_CTRL_PARSE_CONTINUE) 467a159c266SJung-uk Kim { 468a159c266SJung-uk Kim continue; 469a159c266SJung-uk Kim } 470a159c266SJung-uk Kim 471a159c266SJung-uk Kim if (Status == AE_CTRL_PARSE_PENDING) 472a159c266SJung-uk Kim { 473a159c266SJung-uk Kim Status = AE_OK; 474a159c266SJung-uk Kim } 475a159c266SJung-uk Kim 476313a0c13SJung-uk Kim if (Status == AE_CTRL_TERMINATE) 477313a0c13SJung-uk Kim { 478313a0c13SJung-uk Kim return_ACPI_STATUS (Status); 479313a0c13SJung-uk Kim } 480313a0c13SJung-uk Kim 481a159c266SJung-uk Kim Status = AcpiPsCompleteOp (WalkState, &Op, Status); 482a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 483a159c266SJung-uk Kim { 484a159c266SJung-uk Kim return_ACPI_STATUS (Status); 485a159c266SJung-uk Kim } 48651f42badSJung-uk Kim if (AcpiNsOpensScope ( 48751f42badSJung-uk Kim AcpiPsGetOpcodeInfo (WalkState->Opcode)->ObjectType)) 4883d90091dSJung-uk Kim { 4893d90091dSJung-uk Kim /* 49051f42badSJung-uk Kim * If the scope/device op fails to parse, skip the body of 49151f42badSJung-uk Kim * the scope op because the parse failure indicates that 49251f42badSJung-uk Kim * the device may not exist. 4933d90091dSJung-uk Kim */ 4944a38ee6dSJung-uk Kim ACPI_INFO (("Skipping parse of AML opcode: %s (0x%4.4X)", 4954a38ee6dSJung-uk Kim AcpiPsGetOpcodeName (WalkState->Opcode), WalkState->Opcode)); 4964a38ee6dSJung-uk Kim 4974a38ee6dSJung-uk Kim /* 4984a38ee6dSJung-uk Kim * Determine the opcode length before skipping the opcode. 4994a38ee6dSJung-uk Kim * An opcode can be 1 byte or 2 bytes in length. 5004a38ee6dSJung-uk Kim */ 5014a38ee6dSJung-uk Kim OpcodeLength = 1; 5024a38ee6dSJung-uk Kim if ((WalkState->Opcode & 0xFF00) == AML_EXTENDED_OPCODE) 5034a38ee6dSJung-uk Kim { 5044a38ee6dSJung-uk Kim OpcodeLength = 2; 5054a38ee6dSJung-uk Kim } 5064a38ee6dSJung-uk Kim WalkState->ParserState.Aml = WalkState->Aml + OpcodeLength; 5074a38ee6dSJung-uk Kim 5083d90091dSJung-uk Kim WalkState->ParserState.Aml = 5093d90091dSJung-uk Kim AcpiPsGetNextPackageEnd(&WalkState->ParserState); 5103d90091dSJung-uk Kim WalkState->Aml = WalkState->ParserState.Aml; 5113d90091dSJung-uk Kim } 512a159c266SJung-uk Kim 513a159c266SJung-uk Kim continue; 514a159c266SJung-uk Kim } 515a159c266SJung-uk Kim 516fe0f0bbbSJung-uk Kim AcpiExStartTraceOpcode (Op, WalkState); 517a159c266SJung-uk Kim } 518a159c266SJung-uk Kim 519a159c266SJung-uk Kim /* 520a159c266SJung-uk Kim * Start ArgCount at zero because we don't know if there are 521a159c266SJung-uk Kim * any args yet 522a159c266SJung-uk Kim */ 523a159c266SJung-uk Kim WalkState->ArgCount = 0; 524a159c266SJung-uk Kim 5250d84335fSJung-uk Kim switch (Op->Common.AmlOpcode) 5260d84335fSJung-uk Kim { 5270d84335fSJung-uk Kim case AML_BYTE_OP: 5280d84335fSJung-uk Kim case AML_WORD_OP: 5290d84335fSJung-uk Kim case AML_DWORD_OP: 5300d84335fSJung-uk Kim case AML_QWORD_OP: 5310d84335fSJung-uk Kim 5320d84335fSJung-uk Kim break; 5330d84335fSJung-uk Kim 5340d84335fSJung-uk Kim default: 5350d84335fSJung-uk Kim 5360d84335fSJung-uk Kim ASL_CV_CAPTURE_COMMENTS (WalkState); 5370d84335fSJung-uk Kim break; 5380d84335fSJung-uk Kim } 5390d84335fSJung-uk Kim 540a159c266SJung-uk Kim /* Are there any arguments that must be processed? */ 541a159c266SJung-uk Kim 542a159c266SJung-uk Kim if (WalkState->ArgTypes) 543a159c266SJung-uk Kim { 544a159c266SJung-uk Kim /* Get arguments */ 545a159c266SJung-uk Kim 546a159c266SJung-uk Kim Status = AcpiPsGetArguments (WalkState, AmlOpStart, Op); 547a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 548a159c266SJung-uk Kim { 549a159c266SJung-uk Kim Status = AcpiPsCompleteOp (WalkState, &Op, Status); 550a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 551a159c266SJung-uk Kim { 552a159c266SJung-uk Kim return_ACPI_STATUS (Status); 553a159c266SJung-uk Kim } 5543d90091dSJung-uk Kim if ((WalkState->ControlState) && 5553d90091dSJung-uk Kim ((WalkState->ControlState->Control.Opcode == AML_IF_OP) || 5563d90091dSJung-uk Kim (WalkState->ControlState->Control.Opcode == AML_WHILE_OP))) 5573d90091dSJung-uk Kim { 5583d90091dSJung-uk Kim /* 5593d90091dSJung-uk Kim * If the if/while op fails to parse, we will skip parsing 5603d90091dSJung-uk Kim * the body of the op. 5613d90091dSJung-uk Kim */ 5623d90091dSJung-uk Kim ParserState->Aml = 5633d90091dSJung-uk Kim WalkState->ControlState->Control.AmlPredicateStart + 1; 5643d90091dSJung-uk Kim ParserState->Aml = 5653d90091dSJung-uk Kim AcpiPsGetNextPackageEnd (ParserState); 5663d90091dSJung-uk Kim WalkState->Aml = ParserState->Aml; 567a159c266SJung-uk Kim 5683d90091dSJung-uk Kim ACPI_ERROR ((AE_INFO, "Skipping While/If block")); 5693d90091dSJung-uk Kim if (*WalkState->Aml == AML_ELSE_OP) 5703d90091dSJung-uk Kim { 5713d90091dSJung-uk Kim ACPI_ERROR ((AE_INFO, "Skipping Else block")); 5723d90091dSJung-uk Kim WalkState->ParserState.Aml = WalkState->Aml + 1; 5733d90091dSJung-uk Kim WalkState->ParserState.Aml = 5743d90091dSJung-uk Kim AcpiPsGetNextPackageEnd (ParserState); 5753d90091dSJung-uk Kim WalkState->Aml = ParserState->Aml; 5763d90091dSJung-uk Kim } 5773d90091dSJung-uk Kim ACPI_FREE(AcpiUtPopGenericState (&WalkState->ControlState)); 5783d90091dSJung-uk Kim } 5793d90091dSJung-uk Kim Op = NULL; 580a159c266SJung-uk Kim continue; 581a159c266SJung-uk Kim } 582a159c266SJung-uk Kim } 583a159c266SJung-uk Kim 584a159c266SJung-uk Kim /* Check for arguments that need to be processed */ 585a159c266SJung-uk Kim 5865f9b24faSJung-uk Kim ACPI_DEBUG_PRINT ((ACPI_DB_PARSE, 587ff879b07SJung-uk Kim "Parseloop: argument count: %8.8X\n", WalkState->ArgCount)); 5885f9b24faSJung-uk Kim 589a159c266SJung-uk Kim if (WalkState->ArgCount) 590a159c266SJung-uk Kim { 591a159c266SJung-uk Kim /* 592a159c266SJung-uk Kim * There are arguments (complex ones), push Op and 593a159c266SJung-uk Kim * prepare for argument 594a159c266SJung-uk Kim */ 595a159c266SJung-uk Kim Status = AcpiPsPushScope (ParserState, Op, 596a159c266SJung-uk Kim WalkState->ArgTypes, WalkState->ArgCount); 597a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 598a159c266SJung-uk Kim { 599a159c266SJung-uk Kim Status = AcpiPsCompleteOp (WalkState, &Op, Status); 600a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 601a159c266SJung-uk Kim { 602a159c266SJung-uk Kim return_ACPI_STATUS (Status); 603a159c266SJung-uk Kim } 604a159c266SJung-uk Kim 605a159c266SJung-uk Kim continue; 606a159c266SJung-uk Kim } 607a159c266SJung-uk Kim 608a159c266SJung-uk Kim Op = NULL; 609a159c266SJung-uk Kim continue; 610a159c266SJung-uk Kim } 611a159c266SJung-uk Kim 612a159c266SJung-uk Kim /* 613a159c266SJung-uk Kim * All arguments have been processed -- Op is complete, 614a159c266SJung-uk Kim * prepare for next 615a159c266SJung-uk Kim */ 616a159c266SJung-uk Kim WalkState->OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode); 617a159c266SJung-uk Kim if (WalkState->OpInfo->Flags & AML_NAMED) 618a159c266SJung-uk Kim { 619a159c266SJung-uk Kim if (Op->Common.AmlOpcode == AML_REGION_OP || 620a159c266SJung-uk Kim Op->Common.AmlOpcode == AML_DATA_REGION_OP) 621a159c266SJung-uk Kim { 622a159c266SJung-uk Kim /* 623a159c266SJung-uk Kim * Skip parsing of control method or opregion body, 624a159c266SJung-uk Kim * because we don't have enough info in the first pass 625a159c266SJung-uk Kim * to parse them correctly. 626a159c266SJung-uk Kim * 627a159c266SJung-uk Kim * Completed parsing an OpRegion declaration, we now 628a159c266SJung-uk Kim * know the length. 629a159c266SJung-uk Kim */ 630a159c266SJung-uk Kim Op->Named.Length = (UINT32) (ParserState->Aml - Op->Named.Data); 631a159c266SJung-uk Kim } 632a159c266SJung-uk Kim } 633a159c266SJung-uk Kim 634a159c266SJung-uk Kim if (WalkState->OpInfo->Flags & AML_CREATE) 635a159c266SJung-uk Kim { 636a159c266SJung-uk Kim /* 637a159c266SJung-uk Kim * Backup to beginning of CreateXXXfield declaration (1 for 638a159c266SJung-uk Kim * Opcode) 639a159c266SJung-uk Kim * 640a159c266SJung-uk Kim * BodyLength is unknown until we parse the body 641a159c266SJung-uk Kim */ 642a159c266SJung-uk Kim Op->Named.Length = (UINT32) (ParserState->Aml - Op->Named.Data); 643a159c266SJung-uk Kim } 644a159c266SJung-uk Kim 645a159c266SJung-uk Kim if (Op->Common.AmlOpcode == AML_BANK_FIELD_OP) 646a159c266SJung-uk Kim { 647a159c266SJung-uk Kim /* 648a159c266SJung-uk Kim * Backup to beginning of BankField declaration 649a159c266SJung-uk Kim * 650a159c266SJung-uk Kim * BodyLength is unknown until we parse the body 651a159c266SJung-uk Kim */ 652a159c266SJung-uk Kim Op->Named.Length = (UINT32) (ParserState->Aml - Op->Named.Data); 653a159c266SJung-uk Kim } 654a159c266SJung-uk Kim 655a159c266SJung-uk Kim /* This op complete, notify the dispatcher */ 656a159c266SJung-uk Kim 657a159c266SJung-uk Kim if (WalkState->AscendingCallback != NULL) 658a159c266SJung-uk Kim { 659a159c266SJung-uk Kim WalkState->Op = Op; 660a159c266SJung-uk Kim WalkState->Opcode = Op->Common.AmlOpcode; 661a159c266SJung-uk Kim 662a159c266SJung-uk Kim Status = WalkState->AscendingCallback (WalkState); 663a159c266SJung-uk Kim Status = AcpiPsNextParseState (WalkState, Op, Status); 664a159c266SJung-uk Kim if (Status == AE_CTRL_PENDING) 665a159c266SJung-uk Kim { 666a159c266SJung-uk Kim Status = AE_OK; 667a159c266SJung-uk Kim } 66851f42badSJung-uk Kim else if ((WalkState->ParseFlags & ACPI_PARSE_MODULE_LEVEL) && 66951f42badSJung-uk Kim (ACPI_AML_EXCEPTION(Status) || Status == AE_ALREADY_EXISTS || 67051f42badSJung-uk Kim Status == AE_NOT_FOUND)) 67151f42badSJung-uk Kim { 67251f42badSJung-uk Kim /* 67351f42badSJung-uk Kim * ACPI_PARSE_MODULE_LEVEL flag means that we are currently 67451f42badSJung-uk Kim * loading a table by executing it as a control method. 67551f42badSJung-uk Kim * However, if we encounter an error while loading the table, 67651f42badSJung-uk Kim * we need to keep trying to load the table rather than 67751f42badSJung-uk Kim * aborting the table load (setting the status to AE_OK 67851f42badSJung-uk Kim * continues the table load). If we get a failure at this 67951f42badSJung-uk Kim * point, it means that the dispatcher got an error while 68051f42badSJung-uk Kim * trying to execute the Op. 68151f42badSJung-uk Kim */ 68251f42badSJung-uk Kim Status = AE_OK; 68351f42badSJung-uk Kim } 684a159c266SJung-uk Kim } 685a159c266SJung-uk Kim 686a159c266SJung-uk Kim Status = AcpiPsCompleteOp (WalkState, &Op, Status); 687a159c266SJung-uk Kim if (ACPI_FAILURE (Status)) 688a159c266SJung-uk Kim { 689a159c266SJung-uk Kim return_ACPI_STATUS (Status); 690a159c266SJung-uk Kim } 691a159c266SJung-uk Kim 692a159c266SJung-uk Kim } /* while ParserState->Aml */ 693a159c266SJung-uk Kim 694a159c266SJung-uk Kim Status = AcpiPsCompleteFinalOp (WalkState, Op, Status); 695a159c266SJung-uk Kim return_ACPI_STATUS (Status); 696a159c266SJung-uk Kim } 697