Home | History | Annotate | Line # | Download | only in parser
psloop.c revision 1.1.1.18.6.1
      1           1.1    jruoho /******************************************************************************
      2           1.1    jruoho  *
      3           1.1    jruoho  * Module Name: psloop - Main AML parse loop
      4           1.1    jruoho  *
      5           1.1    jruoho  *****************************************************************************/
      6           1.1    jruoho 
      7  1.1.1.18.6.1  perseant /******************************************************************************
      8  1.1.1.18.6.1  perseant  *
      9  1.1.1.18.6.1  perseant  * 1. Copyright Notice
     10  1.1.1.18.6.1  perseant  *
     11  1.1.1.18.6.1  perseant  * Some or all of this work - Copyright (c) 1999 - 2024, Intel Corp.
     12           1.1    jruoho  * All rights reserved.
     13           1.1    jruoho  *
     14  1.1.1.18.6.1  perseant  * 2. License
     15  1.1.1.18.6.1  perseant  *
     16  1.1.1.18.6.1  perseant  * 2.1. This is your license from Intel Corp. under its intellectual property
     17  1.1.1.18.6.1  perseant  * rights. You may have additional license terms from the party that provided
     18  1.1.1.18.6.1  perseant  * you this software, covering your right to use that party's intellectual
     19  1.1.1.18.6.1  perseant  * property rights.
     20  1.1.1.18.6.1  perseant  *
     21  1.1.1.18.6.1  perseant  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
     22  1.1.1.18.6.1  perseant  * copy of the source code appearing in this file ("Covered Code") an
     23  1.1.1.18.6.1  perseant  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
     24  1.1.1.18.6.1  perseant  * base code distributed originally by Intel ("Original Intel Code") to copy,
     25  1.1.1.18.6.1  perseant  * make derivatives, distribute, use and display any portion of the Covered
     26  1.1.1.18.6.1  perseant  * Code in any form, with the right to sublicense such rights; and
     27  1.1.1.18.6.1  perseant  *
     28  1.1.1.18.6.1  perseant  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
     29  1.1.1.18.6.1  perseant  * license (with the right to sublicense), under only those claims of Intel
     30  1.1.1.18.6.1  perseant  * patents that are infringed by the Original Intel Code, to make, use, sell,
     31  1.1.1.18.6.1  perseant  * offer to sell, and import the Covered Code and derivative works thereof
     32  1.1.1.18.6.1  perseant  * solely to the minimum extent necessary to exercise the above copyright
     33  1.1.1.18.6.1  perseant  * license, and in no event shall the patent license extend to any additions
     34  1.1.1.18.6.1  perseant  * to or modifications of the Original Intel Code. No other license or right
     35  1.1.1.18.6.1  perseant  * is granted directly or by implication, estoppel or otherwise;
     36  1.1.1.18.6.1  perseant  *
     37  1.1.1.18.6.1  perseant  * The above copyright and patent license is granted only if the following
     38  1.1.1.18.6.1  perseant  * conditions are met:
     39  1.1.1.18.6.1  perseant  *
     40  1.1.1.18.6.1  perseant  * 3. Conditions
     41  1.1.1.18.6.1  perseant  *
     42  1.1.1.18.6.1  perseant  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
     43  1.1.1.18.6.1  perseant  * Redistribution of source code of any substantial portion of the Covered
     44  1.1.1.18.6.1  perseant  * Code or modification with rights to further distribute source must include
     45  1.1.1.18.6.1  perseant  * the above Copyright Notice, the above License, this list of Conditions,
     46  1.1.1.18.6.1  perseant  * and the following Disclaimer and Export Compliance provision. In addition,
     47  1.1.1.18.6.1  perseant  * Licensee must cause all Covered Code to which Licensee contributes to
     48  1.1.1.18.6.1  perseant  * contain a file documenting the changes Licensee made to create that Covered
     49  1.1.1.18.6.1  perseant  * Code and the date of any change. Licensee must include in that file the
     50  1.1.1.18.6.1  perseant  * documentation of any changes made by any predecessor Licensee. Licensee
     51  1.1.1.18.6.1  perseant  * must include a prominent statement that the modification is derived,
     52  1.1.1.18.6.1  perseant  * directly or indirectly, from Original Intel Code.
     53  1.1.1.18.6.1  perseant  *
     54  1.1.1.18.6.1  perseant  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
     55  1.1.1.18.6.1  perseant  * Redistribution of source code of any substantial portion of the Covered
     56  1.1.1.18.6.1  perseant  * Code or modification without rights to further distribute source must
     57  1.1.1.18.6.1  perseant  * include the following Disclaimer and Export Compliance provision in the
     58  1.1.1.18.6.1  perseant  * documentation and/or other materials provided with distribution. In
     59  1.1.1.18.6.1  perseant  * addition, Licensee may not authorize further sublicense of source of any
     60  1.1.1.18.6.1  perseant  * portion of the Covered Code, and must include terms to the effect that the
     61  1.1.1.18.6.1  perseant  * license from Licensee to its licensee is limited to the intellectual
     62  1.1.1.18.6.1  perseant  * property embodied in the software Licensee provides to its licensee, and
     63  1.1.1.18.6.1  perseant  * not to intellectual property embodied in modifications its licensee may
     64  1.1.1.18.6.1  perseant  * make.
     65  1.1.1.18.6.1  perseant  *
     66  1.1.1.18.6.1  perseant  * 3.3. Redistribution of Executable. Redistribution in executable form of any
     67  1.1.1.18.6.1  perseant  * substantial portion of the Covered Code or modification must reproduce the
     68  1.1.1.18.6.1  perseant  * above Copyright Notice, and the following Disclaimer and Export Compliance
     69  1.1.1.18.6.1  perseant  * provision in the documentation and/or other materials provided with the
     70  1.1.1.18.6.1  perseant  * distribution.
     71  1.1.1.18.6.1  perseant  *
     72  1.1.1.18.6.1  perseant  * 3.4. Intel retains all right, title, and interest in and to the Original
     73  1.1.1.18.6.1  perseant  * Intel Code.
     74  1.1.1.18.6.1  perseant  *
     75  1.1.1.18.6.1  perseant  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
     76  1.1.1.18.6.1  perseant  * Intel shall be used in advertising or otherwise to promote the sale, use or
     77  1.1.1.18.6.1  perseant  * other dealings in products derived from or relating to the Covered Code
     78  1.1.1.18.6.1  perseant  * without prior written authorization from Intel.
     79  1.1.1.18.6.1  perseant  *
     80  1.1.1.18.6.1  perseant  * 4. Disclaimer and Export Compliance
     81  1.1.1.18.6.1  perseant  *
     82  1.1.1.18.6.1  perseant  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
     83  1.1.1.18.6.1  perseant  * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
     84  1.1.1.18.6.1  perseant  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
     85  1.1.1.18.6.1  perseant  * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
     86  1.1.1.18.6.1  perseant  * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
     87  1.1.1.18.6.1  perseant  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
     88  1.1.1.18.6.1  perseant  * PARTICULAR PURPOSE.
     89  1.1.1.18.6.1  perseant  *
     90  1.1.1.18.6.1  perseant  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
     91  1.1.1.18.6.1  perseant  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
     92  1.1.1.18.6.1  perseant  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
     93  1.1.1.18.6.1  perseant  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
     94  1.1.1.18.6.1  perseant  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
     95  1.1.1.18.6.1  perseant  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
     96  1.1.1.18.6.1  perseant  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
     97  1.1.1.18.6.1  perseant  * LIMITED REMEDY.
     98  1.1.1.18.6.1  perseant  *
     99  1.1.1.18.6.1  perseant  * 4.3. Licensee shall not export, either directly or indirectly, any of this
    100  1.1.1.18.6.1  perseant  * software or system incorporating such software without first obtaining any
    101  1.1.1.18.6.1  perseant  * required license or other approval from the U. S. Department of Commerce or
    102  1.1.1.18.6.1  perseant  * any other agency or department of the United States Government. In the
    103  1.1.1.18.6.1  perseant  * event Licensee exports any such software from the United States or
    104  1.1.1.18.6.1  perseant  * re-exports any such software from a foreign destination, Licensee shall
    105  1.1.1.18.6.1  perseant  * ensure that the distribution and export/re-export of the software is in
    106  1.1.1.18.6.1  perseant  * compliance with all laws, regulations, orders, or other restrictions of the
    107  1.1.1.18.6.1  perseant  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
    108  1.1.1.18.6.1  perseant  * any of its subsidiaries will export/re-export any technical data, process,
    109  1.1.1.18.6.1  perseant  * software, or service, directly or indirectly, to any country for which the
    110  1.1.1.18.6.1  perseant  * United States government or any agency thereof requires an export license,
    111  1.1.1.18.6.1  perseant  * other governmental approval, or letter of assurance, without first obtaining
    112  1.1.1.18.6.1  perseant  * such license, approval or letter.
    113  1.1.1.18.6.1  perseant  *
    114  1.1.1.18.6.1  perseant  *****************************************************************************
    115  1.1.1.18.6.1  perseant  *
    116  1.1.1.18.6.1  perseant  * Alternatively, you may choose to be licensed under the terms of the
    117  1.1.1.18.6.1  perseant  * following license:
    118  1.1.1.18.6.1  perseant  *
    119       1.1.1.2    jruoho  * Redistribution and use in source and binary forms, with or without
    120       1.1.1.2    jruoho  * modification, are permitted provided that the following conditions
    121       1.1.1.2    jruoho  * are met:
    122       1.1.1.2    jruoho  * 1. Redistributions of source code must retain the above copyright
    123       1.1.1.2    jruoho  *    notice, this list of conditions, and the following disclaimer,
    124       1.1.1.2    jruoho  *    without modification.
    125       1.1.1.2    jruoho  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
    126       1.1.1.2    jruoho  *    substantially similar to the "NO WARRANTY" disclaimer below
    127       1.1.1.2    jruoho  *    ("Disclaimer") and any redistribution must be conditioned upon
    128       1.1.1.2    jruoho  *    including a substantially similar Disclaimer requirement for further
    129       1.1.1.2    jruoho  *    binary redistribution.
    130       1.1.1.2    jruoho  * 3. Neither the names of the above-listed copyright holders nor the names
    131       1.1.1.2    jruoho  *    of any contributors may be used to endorse or promote products derived
    132       1.1.1.2    jruoho  *    from this software without specific prior written permission.
    133       1.1.1.2    jruoho  *
    134       1.1.1.2    jruoho  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
    135       1.1.1.2    jruoho  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
    136      1.1.1.16  christos  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
    137       1.1.1.2    jruoho  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
    138  1.1.1.18.6.1  perseant  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
    139  1.1.1.18.6.1  perseant  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
    140  1.1.1.18.6.1  perseant  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
    141  1.1.1.18.6.1  perseant  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
    142  1.1.1.18.6.1  perseant  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
    143  1.1.1.18.6.1  perseant  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
    144  1.1.1.18.6.1  perseant  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
    145  1.1.1.18.6.1  perseant  *
    146  1.1.1.18.6.1  perseant  * Alternatively, you may choose to be licensed under the terms of the
    147  1.1.1.18.6.1  perseant  * GNU General Public License ("GPL") version 2 as published by the Free
    148  1.1.1.18.6.1  perseant  * Software Foundation.
    149  1.1.1.18.6.1  perseant  *
    150  1.1.1.18.6.1  perseant  *****************************************************************************/
    151           1.1    jruoho 
    152           1.1    jruoho /*
    153           1.1    jruoho  * Parse the AML and build an operation tree as most interpreters, (such as
    154           1.1    jruoho  * Perl) do. Parsing is done by hand rather than with a YACC generated parser
    155           1.1    jruoho  * to tightly constrain stack and dynamic memory usage. Parsing is kept
    156           1.1    jruoho  * flexible and the code fairly compact by parsing based on a list of AML
    157           1.1    jruoho  * opcode templates in AmlOpInfo[].
    158           1.1    jruoho  */
    159           1.1    jruoho 
    160           1.1    jruoho #include "acpi.h"
    161           1.1    jruoho #include "accommon.h"
    162       1.1.1.6  christos #include "acinterp.h"
    163           1.1    jruoho #include "acparser.h"
    164           1.1    jruoho #include "acdispat.h"
    165           1.1    jruoho #include "amlcode.h"
    166       1.1.1.9  christos #include "acconvert.h"
    167      1.1.1.12  christos #include "acnamesp.h"
    168           1.1    jruoho 
    169           1.1    jruoho #define _COMPONENT          ACPI_PARSER
    170           1.1    jruoho         ACPI_MODULE_NAME    ("psloop")
    171           1.1    jruoho 
    172           1.1    jruoho 
    173           1.1    jruoho /* Local prototypes */
    174           1.1    jruoho 
    175           1.1    jruoho static ACPI_STATUS
    176           1.1    jruoho AcpiPsGetArguments (
    177           1.1    jruoho     ACPI_WALK_STATE         *WalkState,
    178           1.1    jruoho     UINT8                   *AmlOpStart,
    179           1.1    jruoho     ACPI_PARSE_OBJECT       *Op);
    180           1.1    jruoho 
    181           1.1    jruoho 
    182           1.1    jruoho /*******************************************************************************
    183           1.1    jruoho  *
    184           1.1    jruoho  * FUNCTION:    AcpiPsGetArguments
    185           1.1    jruoho  *
    186           1.1    jruoho  * PARAMETERS:  WalkState           - Current state
    187           1.1    jruoho  *              AmlOpStart          - Op start in AML
    188           1.1    jruoho  *              Op                  - Current Op
    189           1.1    jruoho  *
    190           1.1    jruoho  * RETURN:      Status
    191           1.1    jruoho  *
    192           1.1    jruoho  * DESCRIPTION: Get arguments for passed Op.
    193           1.1    jruoho  *
    194           1.1    jruoho  ******************************************************************************/
    195           1.1    jruoho 
    196           1.1    jruoho static ACPI_STATUS
    197           1.1    jruoho AcpiPsGetArguments (
    198           1.1    jruoho     ACPI_WALK_STATE         *WalkState,
    199           1.1    jruoho     UINT8                   *AmlOpStart,
    200           1.1    jruoho     ACPI_PARSE_OBJECT       *Op)
    201           1.1    jruoho {
    202           1.1    jruoho     ACPI_STATUS             Status = AE_OK;
    203           1.1    jruoho     ACPI_PARSE_OBJECT       *Arg = NULL;
    204           1.1    jruoho 
    205           1.1    jruoho 
    206           1.1    jruoho     ACPI_FUNCTION_TRACE_PTR (PsGetArguments, WalkState);
    207           1.1    jruoho 
    208           1.1    jruoho 
    209       1.1.1.8  christos     ACPI_DEBUG_PRINT ((ACPI_DB_PARSE,
    210       1.1.1.8  christos         "Get arguments for opcode [%s]\n", Op->Common.AmlOpName));
    211       1.1.1.8  christos 
    212           1.1    jruoho     switch (Op->Common.AmlOpcode)
    213           1.1    jruoho     {
    214           1.1    jruoho     case AML_BYTE_OP:       /* AML_BYTEDATA_ARG */
    215           1.1    jruoho     case AML_WORD_OP:       /* AML_WORDDATA_ARG */
    216           1.1    jruoho     case AML_DWORD_OP:      /* AML_DWORDATA_ARG */
    217           1.1    jruoho     case AML_QWORD_OP:      /* AML_QWORDATA_ARG */
    218           1.1    jruoho     case AML_STRING_OP:     /* AML_ASCIICHARLIST_ARG */
    219           1.1    jruoho 
    220           1.1    jruoho         /* Fill in constant or string argument directly */
    221           1.1    jruoho 
    222           1.1    jruoho         AcpiPsGetNextSimpleArg (&(WalkState->ParserState),
    223           1.1    jruoho             GET_CURRENT_ARG_TYPE (WalkState->ArgTypes), Op);
    224           1.1    jruoho         break;
    225           1.1    jruoho 
    226           1.1    jruoho     case AML_INT_NAMEPATH_OP:   /* AML_NAMESTRING_ARG */
    227           1.1    jruoho 
    228       1.1.1.7  christos         Status = AcpiPsGetNextNamepath (WalkState,
    229       1.1.1.7  christos             &(WalkState->ParserState), Op, ACPI_POSSIBLE_METHOD_CALL);
    230           1.1    jruoho         if (ACPI_FAILURE (Status))
    231           1.1    jruoho         {
    232           1.1    jruoho             return_ACPI_STATUS (Status);
    233           1.1    jruoho         }
    234           1.1    jruoho 
    235           1.1    jruoho         WalkState->ArgTypes = 0;
    236           1.1    jruoho         break;
    237           1.1    jruoho 
    238           1.1    jruoho     default:
    239           1.1    jruoho         /*
    240           1.1    jruoho          * Op is not a constant or string, append each argument to the Op
    241           1.1    jruoho          */
    242       1.1.1.7  christos         while (GET_CURRENT_ARG_TYPE (WalkState->ArgTypes) &&
    243       1.1.1.7  christos             !WalkState->ArgCount)
    244           1.1    jruoho         {
    245       1.1.1.6  christos             WalkState->Aml = WalkState->ParserState.Aml;
    246           1.1    jruoho 
    247       1.1.1.9  christos             switch (Op->Common.AmlOpcode)
    248       1.1.1.9  christos             {
    249       1.1.1.9  christos             case AML_METHOD_OP:
    250       1.1.1.9  christos             case AML_BUFFER_OP:
    251       1.1.1.9  christos             case AML_PACKAGE_OP:
    252       1.1.1.9  christos             case AML_VARIABLE_PACKAGE_OP:
    253       1.1.1.9  christos             case AML_WHILE_OP:
    254       1.1.1.9  christos 
    255       1.1.1.9  christos                 break;
    256       1.1.1.9  christos 
    257       1.1.1.9  christos             default:
    258       1.1.1.9  christos 
    259       1.1.1.9  christos                 ASL_CV_CAPTURE_COMMENTS (WalkState);
    260       1.1.1.9  christos                 break;
    261       1.1.1.9  christos             }
    262       1.1.1.9  christos 
    263           1.1    jruoho             Status = AcpiPsGetNextArg (WalkState, &(WalkState->ParserState),
    264       1.1.1.7  christos                 GET_CURRENT_ARG_TYPE (WalkState->ArgTypes), &Arg);
    265           1.1    jruoho             if (ACPI_FAILURE (Status))
    266           1.1    jruoho             {
    267           1.1    jruoho                 return_ACPI_STATUS (Status);
    268           1.1    jruoho             }
    269           1.1    jruoho 
    270           1.1    jruoho             if (Arg)
    271           1.1    jruoho             {
    272           1.1    jruoho                 AcpiPsAppendArg (Op, Arg);
    273           1.1    jruoho             }
    274           1.1    jruoho 
    275           1.1    jruoho             INCREMENT_ARG_LIST (WalkState->ArgTypes);
    276           1.1    jruoho         }
    277           1.1    jruoho 
    278      1.1.1.10  christos         ACPI_DEBUG_PRINT ((ACPI_DB_PARSE,
    279      1.1.1.11  christos             "Final argument count: %8.8X pass %u\n",
    280      1.1.1.10  christos             WalkState->ArgCount, WalkState->PassNumber));
    281           1.1    jruoho 
    282           1.1    jruoho         /* Special processing for certain opcodes */
    283           1.1    jruoho 
    284           1.1    jruoho         switch (Op->Common.AmlOpcode)
    285           1.1    jruoho         {
    286           1.1    jruoho         case AML_METHOD_OP:
    287           1.1    jruoho             /*
    288           1.1    jruoho              * Skip parsing of control method because we don't have enough
    289           1.1    jruoho              * info in the first pass to parse it correctly.
    290           1.1    jruoho              *
    291           1.1    jruoho              * Save the length and address of the body
    292           1.1    jruoho              */
    293           1.1    jruoho             Op->Named.Data = WalkState->ParserState.Aml;
    294           1.1    jruoho             Op->Named.Length = (UINT32)
    295           1.1    jruoho                 (WalkState->ParserState.PkgEnd - WalkState->ParserState.Aml);
    296           1.1    jruoho 
    297           1.1    jruoho             /* Skip body of method */
    298           1.1    jruoho 
    299           1.1    jruoho             WalkState->ParserState.Aml = WalkState->ParserState.PkgEnd;
    300           1.1    jruoho             WalkState->ArgCount = 0;
    301           1.1    jruoho             break;
    302           1.1    jruoho 
    303           1.1    jruoho         case AML_BUFFER_OP:
    304           1.1    jruoho         case AML_PACKAGE_OP:
    305       1.1.1.9  christos         case AML_VARIABLE_PACKAGE_OP:
    306           1.1    jruoho 
    307           1.1    jruoho             if ((Op->Common.Parent) &&
    308           1.1    jruoho                 (Op->Common.Parent->Common.AmlOpcode == AML_NAME_OP) &&
    309           1.1    jruoho                 (WalkState->PassNumber <= ACPI_IMODE_LOAD_PASS2))
    310           1.1    jruoho             {
    311      1.1.1.10  christos                 ACPI_DEBUG_PRINT ((ACPI_DB_PARSE,
    312      1.1.1.10  christos                     "Setup Package/Buffer: Pass %u, AML Ptr: %p\n",
    313      1.1.1.10  christos                     WalkState->PassNumber, AmlOpStart));
    314      1.1.1.10  christos 
    315           1.1    jruoho                 /*
    316           1.1    jruoho                  * Skip parsing of Buffers and Packages because we don't have
    317           1.1    jruoho                  * enough info in the first pass to parse them correctly.
    318           1.1    jruoho                  */
    319           1.1    jruoho                 Op->Named.Data = AmlOpStart;
    320           1.1    jruoho                 Op->Named.Length = (UINT32)
    321           1.1    jruoho                     (WalkState->ParserState.PkgEnd - AmlOpStart);
    322           1.1    jruoho 
    323           1.1    jruoho                 /* Skip body */
    324           1.1    jruoho 
    325           1.1    jruoho                 WalkState->ParserState.Aml = WalkState->ParserState.PkgEnd;
    326           1.1    jruoho                 WalkState->ArgCount = 0;
    327           1.1    jruoho             }
    328           1.1    jruoho             break;
    329           1.1    jruoho 
    330           1.1    jruoho         case AML_WHILE_OP:
    331           1.1    jruoho 
    332           1.1    jruoho             if (WalkState->ControlState)
    333           1.1    jruoho             {
    334           1.1    jruoho                 WalkState->ControlState->Control.PackageEnd =
    335           1.1    jruoho                     WalkState->ParserState.PkgEnd;
    336           1.1    jruoho             }
    337           1.1    jruoho             break;
    338           1.1    jruoho 
    339           1.1    jruoho         default:
    340           1.1    jruoho 
    341           1.1    jruoho             /* No action for all other opcodes */
    342       1.1.1.3  christos 
    343           1.1    jruoho             break;
    344           1.1    jruoho         }
    345           1.1    jruoho 
    346           1.1    jruoho         break;
    347           1.1    jruoho     }
    348           1.1    jruoho 
    349           1.1    jruoho     return_ACPI_STATUS (AE_OK);
    350           1.1    jruoho }
    351           1.1    jruoho 
    352           1.1    jruoho 
    353           1.1    jruoho /*******************************************************************************
    354           1.1    jruoho  *
    355           1.1    jruoho  * FUNCTION:    AcpiPsParseLoop
    356           1.1    jruoho  *
    357           1.1    jruoho  * PARAMETERS:  WalkState           - Current state
    358           1.1    jruoho  *
    359           1.1    jruoho  * RETURN:      Status
    360           1.1    jruoho  *
    361           1.1    jruoho  * DESCRIPTION: Parse AML (pointed to by the current parser state) and return
    362           1.1    jruoho  *              a tree of ops.
    363           1.1    jruoho  *
    364           1.1    jruoho  ******************************************************************************/
    365           1.1    jruoho 
    366           1.1    jruoho ACPI_STATUS
    367           1.1    jruoho AcpiPsParseLoop (
    368           1.1    jruoho     ACPI_WALK_STATE         *WalkState)
    369           1.1    jruoho {
    370           1.1    jruoho     ACPI_STATUS             Status = AE_OK;
    371           1.1    jruoho     ACPI_PARSE_OBJECT       *Op = NULL;     /* current op */
    372           1.1    jruoho     ACPI_PARSE_STATE        *ParserState;
    373           1.1    jruoho     UINT8                   *AmlOpStart = NULL;
    374      1.1.1.13  christos     UINT8                   OpcodeLength;
    375           1.1    jruoho 
    376           1.1    jruoho 
    377           1.1    jruoho     ACPI_FUNCTION_TRACE_PTR (PsParseLoop, WalkState);
    378           1.1    jruoho 
    379           1.1    jruoho 
    380           1.1    jruoho     if (WalkState->DescendingCallback == NULL)
    381           1.1    jruoho     {
    382           1.1    jruoho         return_ACPI_STATUS (AE_BAD_PARAMETER);
    383           1.1    jruoho     }
    384           1.1    jruoho 
    385           1.1    jruoho     ParserState = &WalkState->ParserState;
    386           1.1    jruoho     WalkState->ArgTypes = 0;
    387           1.1    jruoho 
    388      1.1.1.13  christos #ifndef ACPI_CONSTANT_EVAL_ONLY
    389           1.1    jruoho 
    390           1.1    jruoho     if (WalkState->WalkType & ACPI_WALK_METHOD_RESTART)
    391           1.1    jruoho     {
    392           1.1    jruoho         /* We are restarting a preempted control method */
    393           1.1    jruoho 
    394           1.1    jruoho         if (AcpiPsHasCompletedScope (ParserState))
    395           1.1    jruoho         {
    396           1.1    jruoho             /*
    397           1.1    jruoho              * We must check if a predicate to an IF or WHILE statement
    398           1.1    jruoho              * was just completed
    399           1.1    jruoho              */
    400           1.1    jruoho             if ((ParserState->Scope->ParseScope.Op) &&
    401           1.1    jruoho                ((ParserState->Scope->ParseScope.Op->Common.AmlOpcode == AML_IF_OP) ||
    402           1.1    jruoho                 (ParserState->Scope->ParseScope.Op->Common.AmlOpcode == AML_WHILE_OP)) &&
    403           1.1    jruoho                 (WalkState->ControlState) &&
    404           1.1    jruoho                 (WalkState->ControlState->Common.State ==
    405           1.1    jruoho                     ACPI_CONTROL_PREDICATE_EXECUTING))
    406           1.1    jruoho             {
    407           1.1    jruoho                 /*
    408           1.1    jruoho                  * A predicate was just completed, get the value of the
    409           1.1    jruoho                  * predicate and branch based on that value
    410           1.1    jruoho                  */
    411           1.1    jruoho                 WalkState->Op = NULL;
    412           1.1    jruoho                 Status = AcpiDsGetPredicateValue (WalkState, ACPI_TO_POINTER (TRUE));
    413      1.1.1.16  christos                 if (ACPI_FAILURE (Status) && !ACPI_CNTL_EXCEPTION (Status))
    414           1.1    jruoho                 {
    415           1.1    jruoho                     if (Status == AE_AML_NO_RETURN_VALUE)
    416           1.1    jruoho                     {
    417           1.1    jruoho                         ACPI_EXCEPTION ((AE_INFO, Status,
    418           1.1    jruoho                             "Invoked method did not return a value"));
    419           1.1    jruoho                     }
    420           1.1    jruoho 
    421           1.1    jruoho                     ACPI_EXCEPTION ((AE_INFO, Status, "GetPredicate Failed"));
    422           1.1    jruoho                     return_ACPI_STATUS (Status);
    423           1.1    jruoho                 }
    424           1.1    jruoho 
    425           1.1    jruoho                 Status = AcpiPsNextParseState (WalkState, Op, Status);
    426           1.1    jruoho             }
    427           1.1    jruoho 
    428           1.1    jruoho             AcpiPsPopScope (ParserState, &Op,
    429           1.1    jruoho                 &WalkState->ArgTypes, &WalkState->ArgCount);
    430           1.1    jruoho             ACPI_DEBUG_PRINT ((ACPI_DB_PARSE, "Popped scope, Op=%p\n", Op));
    431           1.1    jruoho         }
    432           1.1    jruoho         else if (WalkState->PrevOp)
    433           1.1    jruoho         {
    434           1.1    jruoho             /* We were in the middle of an op */
    435           1.1    jruoho 
    436           1.1    jruoho             Op = WalkState->PrevOp;
    437           1.1    jruoho             WalkState->ArgTypes = WalkState->PrevArgTypes;
    438           1.1    jruoho         }
    439           1.1    jruoho     }
    440           1.1    jruoho #endif
    441           1.1    jruoho 
    442           1.1    jruoho     /* Iterative parsing loop, while there is more AML to process: */
    443           1.1    jruoho 
    444           1.1    jruoho     while ((ParserState->Aml < ParserState->AmlEnd) || (Op))
    445           1.1    jruoho     {
    446       1.1.1.9  christos         ASL_CV_CAPTURE_COMMENTS (WalkState);
    447       1.1.1.9  christos 
    448           1.1    jruoho         AmlOpStart = ParserState->Aml;
    449           1.1    jruoho         if (!Op)
    450           1.1    jruoho         {
    451           1.1    jruoho             Status = AcpiPsCreateOp (WalkState, AmlOpStart, &Op);
    452           1.1    jruoho             if (ACPI_FAILURE (Status))
    453           1.1    jruoho             {
    454      1.1.1.12  christos                 /*
    455      1.1.1.12  christos                  * ACPI_PARSE_MODULE_LEVEL means that we are loading a table by
    456      1.1.1.12  christos                  * executing it as a control method. However, if we encounter
    457      1.1.1.12  christos                  * an error while loading the table, we need to keep trying to
    458      1.1.1.12  christos                  * load the table rather than aborting the table load. Set the
    459      1.1.1.12  christos                  * status to AE_OK to proceed with the table load.
    460      1.1.1.12  christos                  */
    461      1.1.1.12  christos                 if ((WalkState->ParseFlags & ACPI_PARSE_MODULE_LEVEL) &&
    462      1.1.1.13  christos                     ((Status == AE_ALREADY_EXISTS) || (Status == AE_NOT_FOUND)))
    463      1.1.1.12  christos                 {
    464      1.1.1.12  christos                     Status = AE_OK;
    465      1.1.1.12  christos                 }
    466           1.1    jruoho                 if (Status == AE_CTRL_PARSE_CONTINUE)
    467           1.1    jruoho                 {
    468           1.1    jruoho                     continue;
    469           1.1    jruoho                 }
    470           1.1    jruoho 
    471           1.1    jruoho                 if (Status == AE_CTRL_PARSE_PENDING)
    472           1.1    jruoho                 {
    473           1.1    jruoho                     Status = AE_OK;
    474           1.1    jruoho                 }
    475           1.1    jruoho 
    476       1.1.1.4  christos                 if (Status == AE_CTRL_TERMINATE)
    477       1.1.1.4  christos                 {
    478       1.1.1.4  christos                     return_ACPI_STATUS (Status);
    479       1.1.1.4  christos                 }
    480       1.1.1.4  christos 
    481           1.1    jruoho                 Status = AcpiPsCompleteOp (WalkState, &Op, Status);
    482           1.1    jruoho                 if (ACPI_FAILURE (Status))
    483           1.1    jruoho                 {
    484           1.1    jruoho                     return_ACPI_STATUS (Status);
    485           1.1    jruoho                 }
    486      1.1.1.12  christos                 if (AcpiNsOpensScope (
    487      1.1.1.12  christos                     AcpiPsGetOpcodeInfo (WalkState->Opcode)->ObjectType))
    488      1.1.1.12  christos                 {
    489      1.1.1.12  christos                     /*
    490      1.1.1.12  christos                      * If the scope/device op fails to parse, skip the body of
    491      1.1.1.12  christos                      * the scope op because the parse failure indicates that
    492      1.1.1.12  christos                      * the device may not exist.
    493      1.1.1.12  christos                      */
    494      1.1.1.13  christos                     ACPI_INFO (("Skipping parse of AML opcode: %s (0x%4.4X)",
    495      1.1.1.13  christos                         AcpiPsGetOpcodeName (WalkState->Opcode), WalkState->Opcode));
    496      1.1.1.13  christos 
    497      1.1.1.13  christos                     /*
    498      1.1.1.13  christos                      * Determine the opcode length before skipping the opcode.
    499      1.1.1.13  christos                      * An opcode can be 1 byte or 2 bytes in length.
    500      1.1.1.13  christos                      */
    501      1.1.1.13  christos                     OpcodeLength = 1;
    502      1.1.1.13  christos                     if ((WalkState->Opcode & 0xFF00) == AML_EXTENDED_OPCODE)
    503      1.1.1.13  christos                     {
    504      1.1.1.13  christos                         OpcodeLength = 2;
    505      1.1.1.13  christos                     }
    506      1.1.1.13  christos                     WalkState->ParserState.Aml = WalkState->Aml + OpcodeLength;
    507      1.1.1.13  christos 
    508      1.1.1.12  christos                     WalkState->ParserState.Aml =
    509      1.1.1.12  christos                         AcpiPsGetNextPackageEnd(&WalkState->ParserState);
    510      1.1.1.12  christos                     WalkState->Aml = WalkState->ParserState.Aml;
    511      1.1.1.12  christos                 }
    512           1.1    jruoho 
    513           1.1    jruoho                 continue;
    514           1.1    jruoho             }
    515           1.1    jruoho 
    516       1.1.1.6  christos             AcpiExStartTraceOpcode (Op, WalkState);
    517           1.1    jruoho         }
    518           1.1    jruoho 
    519           1.1    jruoho         /*
    520           1.1    jruoho          * Start ArgCount at zero because we don't know if there are
    521           1.1    jruoho          * any args yet
    522           1.1    jruoho          */
    523       1.1.1.9  christos         WalkState->ArgCount = 0;
    524       1.1.1.9  christos 
    525       1.1.1.9  christos         switch (Op->Common.AmlOpcode)
    526       1.1.1.9  christos         {
    527       1.1.1.9  christos         case AML_BYTE_OP:
    528       1.1.1.9  christos         case AML_WORD_OP:
    529       1.1.1.9  christos         case AML_DWORD_OP:
    530       1.1.1.9  christos         case AML_QWORD_OP:
    531       1.1.1.9  christos 
    532       1.1.1.9  christos             break;
    533       1.1.1.9  christos 
    534       1.1.1.9  christos         default:
    535       1.1.1.9  christos 
    536       1.1.1.9  christos             ASL_CV_CAPTURE_COMMENTS (WalkState);
    537       1.1.1.9  christos             break;
    538       1.1.1.9  christos         }
    539           1.1    jruoho 
    540           1.1    jruoho         /* Are there any arguments that must be processed? */
    541           1.1    jruoho 
    542           1.1    jruoho         if (WalkState->ArgTypes)
    543           1.1    jruoho         {
    544           1.1    jruoho             /* Get arguments */
    545           1.1    jruoho 
    546           1.1    jruoho             Status = AcpiPsGetArguments (WalkState, AmlOpStart, Op);
    547           1.1    jruoho             if (ACPI_FAILURE (Status))
    548           1.1    jruoho             {
    549           1.1    jruoho                 Status = AcpiPsCompleteOp (WalkState, &Op, Status);
    550           1.1    jruoho                 if (ACPI_FAILURE (Status))
    551           1.1    jruoho                 {
    552           1.1    jruoho                     return_ACPI_STATUS (Status);
    553           1.1    jruoho                 }
    554      1.1.1.12  christos                 if ((WalkState->ControlState) &&
    555      1.1.1.12  christos                     ((WalkState->ControlState->Control.Opcode == AML_IF_OP) ||
    556      1.1.1.12  christos                     (WalkState->ControlState->Control.Opcode == AML_WHILE_OP)))
    557      1.1.1.12  christos                 {
    558      1.1.1.12  christos                     /*
    559      1.1.1.12  christos                      * If the if/while op fails to parse, we will skip parsing
    560      1.1.1.12  christos                      * the body of the op.
    561      1.1.1.12  christos                      */
    562      1.1.1.12  christos                     ParserState->Aml =
    563      1.1.1.12  christos                         WalkState->ControlState->Control.AmlPredicateStart + 1;
    564      1.1.1.12  christos                     ParserState->Aml =
    565      1.1.1.12  christos                         AcpiPsGetNextPackageEnd (ParserState);
    566      1.1.1.12  christos                     WalkState->Aml = ParserState->Aml;
    567           1.1    jruoho 
    568      1.1.1.12  christos                     ACPI_ERROR ((AE_INFO, "Skipping While/If block"));
    569      1.1.1.12  christos                     if (*WalkState->Aml == AML_ELSE_OP)
    570      1.1.1.12  christos                     {
    571      1.1.1.12  christos                         ACPI_ERROR ((AE_INFO, "Skipping Else block"));
    572      1.1.1.12  christos                         WalkState->ParserState.Aml = WalkState->Aml + 1;
    573      1.1.1.12  christos                         WalkState->ParserState.Aml =
    574      1.1.1.12  christos                             AcpiPsGetNextPackageEnd (ParserState);
    575      1.1.1.12  christos                         WalkState->Aml = ParserState->Aml;
    576      1.1.1.12  christos                     }
    577      1.1.1.12  christos                     ACPI_FREE(AcpiUtPopGenericState (&WalkState->ControlState));
    578      1.1.1.12  christos                 }
    579      1.1.1.12  christos                 Op = NULL;
    580           1.1    jruoho                 continue;
    581           1.1    jruoho             }
    582           1.1    jruoho         }
    583           1.1    jruoho 
    584           1.1    jruoho         /* Check for arguments that need to be processed */
    585           1.1    jruoho 
    586      1.1.1.10  christos         ACPI_DEBUG_PRINT ((ACPI_DB_PARSE,
    587      1.1.1.11  christos             "Parseloop: argument count: %8.8X\n", WalkState->ArgCount));
    588      1.1.1.10  christos 
    589           1.1    jruoho         if (WalkState->ArgCount)
    590           1.1    jruoho         {
    591           1.1    jruoho             /*
    592           1.1    jruoho              * There are arguments (complex ones), push Op and
    593           1.1    jruoho              * prepare for argument
    594           1.1    jruoho              */
    595           1.1    jruoho             Status = AcpiPsPushScope (ParserState, Op,
    596       1.1.1.7  christos                 WalkState->ArgTypes, WalkState->ArgCount);
    597           1.1    jruoho             if (ACPI_FAILURE (Status))
    598           1.1    jruoho             {
    599           1.1    jruoho                 Status = AcpiPsCompleteOp (WalkState, &Op, Status);
    600           1.1    jruoho                 if (ACPI_FAILURE (Status))
    601           1.1    jruoho                 {
    602           1.1    jruoho                     return_ACPI_STATUS (Status);
    603           1.1    jruoho                 }
    604           1.1    jruoho 
    605           1.1    jruoho                 continue;
    606           1.1    jruoho             }
    607           1.1    jruoho 
    608           1.1    jruoho             Op = NULL;
    609           1.1    jruoho             continue;
    610           1.1    jruoho         }
    611           1.1    jruoho 
    612           1.1    jruoho         /*
    613           1.1    jruoho          * All arguments have been processed -- Op is complete,
    614           1.1    jruoho          * prepare for next
    615           1.1    jruoho          */
    616           1.1    jruoho         WalkState->OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
    617           1.1    jruoho         if (WalkState->OpInfo->Flags & AML_NAMED)
    618           1.1    jruoho         {
    619           1.1    jruoho             if (Op->Common.AmlOpcode == AML_REGION_OP ||
    620           1.1    jruoho                 Op->Common.AmlOpcode == AML_DATA_REGION_OP)
    621           1.1    jruoho             {
    622           1.1    jruoho                 /*
    623           1.1    jruoho                  * Skip parsing of control method or opregion body,
    624           1.1    jruoho                  * because we don't have enough info in the first pass
    625           1.1    jruoho                  * to parse them correctly.
    626           1.1    jruoho                  *
    627           1.1    jruoho                  * Completed parsing an OpRegion declaration, we now
    628           1.1    jruoho                  * know the length.
    629           1.1    jruoho                  */
    630           1.1    jruoho                 Op->Named.Length = (UINT32) (ParserState->Aml - Op->Named.Data);
    631           1.1    jruoho             }
    632           1.1    jruoho         }
    633           1.1    jruoho 
    634           1.1    jruoho         if (WalkState->OpInfo->Flags & AML_CREATE)
    635           1.1    jruoho         {
    636           1.1    jruoho             /*
    637           1.1    jruoho              * Backup to beginning of CreateXXXfield declaration (1 for
    638           1.1    jruoho              * Opcode)
    639           1.1    jruoho              *
    640           1.1    jruoho              * BodyLength is unknown until we parse the body
    641           1.1    jruoho              */
    642           1.1    jruoho             Op->Named.Length = (UINT32) (ParserState->Aml - Op->Named.Data);
    643           1.1    jruoho         }
    644           1.1    jruoho 
    645           1.1    jruoho         if (Op->Common.AmlOpcode == AML_BANK_FIELD_OP)
    646           1.1    jruoho         {
    647           1.1    jruoho             /*
    648           1.1    jruoho              * Backup to beginning of BankField declaration
    649           1.1    jruoho              *
    650           1.1    jruoho              * BodyLength is unknown until we parse the body
    651           1.1    jruoho              */
    652           1.1    jruoho             Op->Named.Length = (UINT32) (ParserState->Aml - Op->Named.Data);
    653           1.1    jruoho         }
    654           1.1    jruoho 
    655           1.1    jruoho         /* This op complete, notify the dispatcher */
    656           1.1    jruoho 
    657           1.1    jruoho         if (WalkState->AscendingCallback != NULL)
    658           1.1    jruoho         {
    659           1.1    jruoho             WalkState->Op = Op;
    660           1.1    jruoho             WalkState->Opcode = Op->Common.AmlOpcode;
    661           1.1    jruoho 
    662           1.1    jruoho             Status = WalkState->AscendingCallback (WalkState);
    663           1.1    jruoho             Status = AcpiPsNextParseState (WalkState, Op, Status);
    664           1.1    jruoho             if (Status == AE_CTRL_PENDING)
    665           1.1    jruoho             {
    666           1.1    jruoho                 Status = AE_OK;
    667           1.1    jruoho             }
    668      1.1.1.12  christos             else if ((WalkState->ParseFlags & ACPI_PARSE_MODULE_LEVEL) &&
    669      1.1.1.12  christos                 (ACPI_AML_EXCEPTION(Status) || Status == AE_ALREADY_EXISTS ||
    670      1.1.1.12  christos                 Status == AE_NOT_FOUND))
    671      1.1.1.12  christos             {
    672      1.1.1.12  christos                 /*
    673      1.1.1.12  christos                  * ACPI_PARSE_MODULE_LEVEL flag means that we are currently
    674      1.1.1.12  christos                  * loading a table by executing it as a control method.
    675      1.1.1.12  christos                  * However, if we encounter an error while loading the table,
    676      1.1.1.12  christos                  * we need to keep trying to load the table rather than
    677      1.1.1.12  christos                  * aborting the table load (setting the status to AE_OK
    678      1.1.1.12  christos                  * continues the table load). If we get a failure at this
    679      1.1.1.12  christos                  * point, it means that the dispatcher got an error while
    680      1.1.1.12  christos                  * trying to execute the Op.
    681      1.1.1.12  christos                  */
    682      1.1.1.12  christos                 Status = AE_OK;
    683      1.1.1.12  christos             }
    684           1.1    jruoho         }
    685           1.1    jruoho 
    686           1.1    jruoho         Status = AcpiPsCompleteOp (WalkState, &Op, Status);
    687           1.1    jruoho         if (ACPI_FAILURE (Status))
    688           1.1    jruoho         {
    689           1.1    jruoho             return_ACPI_STATUS (Status);
    690           1.1    jruoho         }
    691           1.1    jruoho 
    692           1.1    jruoho     } /* while ParserState->Aml */
    693           1.1    jruoho 
    694           1.1    jruoho     Status = AcpiPsCompleteFinalOp (WalkState, Op, Status);
    695           1.1    jruoho     return_ACPI_STATUS (Status);
    696           1.1    jruoho }
    697