Home | History | Annotate | Line # | Download | only in dispatcher
      1   1.1    jruoho /*******************************************************************************
      2   1.1    jruoho  *
      3   1.1    jruoho  * Module Name: dsutils - Dispatcher utilities
      4   1.1    jruoho  *
      5   1.1    jruoho  ******************************************************************************/
      6   1.1    jruoho 
      7  1.18  christos /******************************************************************************
      8  1.18  christos  *
      9  1.18  christos  * 1. Copyright Notice
     10  1.18  christos  *
     11  1.19  christos  * Some or all of this work - Copyright (c) 1999 - 2025, Intel Corp.
     12   1.1    jruoho  * All rights reserved.
     13   1.1    jruoho  *
     14  1.18  christos  * 2. License
     15  1.18  christos  *
     16  1.18  christos  * 2.1. This is your license from Intel Corp. under its intellectual property
     17  1.18  christos  * rights. You may have additional license terms from the party that provided
     18  1.18  christos  * you this software, covering your right to use that party's intellectual
     19  1.18  christos  * property rights.
     20  1.18  christos  *
     21  1.18  christos  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
     22  1.18  christos  * copy of the source code appearing in this file ("Covered Code") an
     23  1.18  christos  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
     24  1.18  christos  * base code distributed originally by Intel ("Original Intel Code") to copy,
     25  1.18  christos  * make derivatives, distribute, use and display any portion of the Covered
     26  1.18  christos  * Code in any form, with the right to sublicense such rights; and
     27  1.18  christos  *
     28  1.18  christos  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
     29  1.18  christos  * license (with the right to sublicense), under only those claims of Intel
     30  1.18  christos  * patents that are infringed by the Original Intel Code, to make, use, sell,
     31  1.18  christos  * offer to sell, and import the Covered Code and derivative works thereof
     32  1.18  christos  * solely to the minimum extent necessary to exercise the above copyright
     33  1.18  christos  * license, and in no event shall the patent license extend to any additions
     34  1.18  christos  * to or modifications of the Original Intel Code. No other license or right
     35  1.18  christos  * is granted directly or by implication, estoppel or otherwise;
     36  1.18  christos  *
     37  1.18  christos  * The above copyright and patent license is granted only if the following
     38  1.18  christos  * conditions are met:
     39  1.18  christos  *
     40  1.18  christos  * 3. Conditions
     41  1.18  christos  *
     42  1.18  christos  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
     43  1.18  christos  * Redistribution of source code of any substantial portion of the Covered
     44  1.18  christos  * Code or modification with rights to further distribute source must include
     45  1.18  christos  * the above Copyright Notice, the above License, this list of Conditions,
     46  1.18  christos  * and the following Disclaimer and Export Compliance provision. In addition,
     47  1.18  christos  * Licensee must cause all Covered Code to which Licensee contributes to
     48  1.18  christos  * contain a file documenting the changes Licensee made to create that Covered
     49  1.18  christos  * Code and the date of any change. Licensee must include in that file the
     50  1.18  christos  * documentation of any changes made by any predecessor Licensee. Licensee
     51  1.18  christos  * must include a prominent statement that the modification is derived,
     52  1.18  christos  * directly or indirectly, from Original Intel Code.
     53  1.18  christos  *
     54  1.18  christos  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
     55  1.18  christos  * Redistribution of source code of any substantial portion of the Covered
     56  1.18  christos  * Code or modification without rights to further distribute source must
     57  1.18  christos  * include the following Disclaimer and Export Compliance provision in the
     58  1.18  christos  * documentation and/or other materials provided with distribution. In
     59  1.18  christos  * addition, Licensee may not authorize further sublicense of source of any
     60  1.18  christos  * portion of the Covered Code, and must include terms to the effect that the
     61  1.18  christos  * license from Licensee to its licensee is limited to the intellectual
     62  1.18  christos  * property embodied in the software Licensee provides to its licensee, and
     63  1.18  christos  * not to intellectual property embodied in modifications its licensee may
     64  1.18  christos  * make.
     65  1.18  christos  *
     66  1.18  christos  * 3.3. Redistribution of Executable. Redistribution in executable form of any
     67  1.18  christos  * substantial portion of the Covered Code or modification must reproduce the
     68  1.18  christos  * above Copyright Notice, and the following Disclaimer and Export Compliance
     69  1.18  christos  * provision in the documentation and/or other materials provided with the
     70  1.18  christos  * distribution.
     71  1.18  christos  *
     72  1.18  christos  * 3.4. Intel retains all right, title, and interest in and to the Original
     73  1.18  christos  * Intel Code.
     74  1.18  christos  *
     75  1.18  christos  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
     76  1.18  christos  * Intel shall be used in advertising or otherwise to promote the sale, use or
     77  1.18  christos  * other dealings in products derived from or relating to the Covered Code
     78  1.18  christos  * without prior written authorization from Intel.
     79  1.18  christos  *
     80  1.18  christos  * 4. Disclaimer and Export Compliance
     81  1.18  christos  *
     82  1.18  christos  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
     83  1.18  christos  * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
     84  1.18  christos  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
     85  1.18  christos  * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
     86  1.18  christos  * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
     87  1.18  christos  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
     88  1.18  christos  * PARTICULAR PURPOSE.
     89  1.18  christos  *
     90  1.18  christos  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
     91  1.18  christos  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
     92  1.18  christos  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
     93  1.18  christos  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
     94  1.18  christos  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
     95  1.18  christos  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
     96  1.18  christos  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
     97  1.18  christos  * LIMITED REMEDY.
     98  1.18  christos  *
     99  1.18  christos  * 4.3. Licensee shall not export, either directly or indirectly, any of this
    100  1.18  christos  * software or system incorporating such software without first obtaining any
    101  1.18  christos  * required license or other approval from the U. S. Department of Commerce or
    102  1.18  christos  * any other agency or department of the United States Government. In the
    103  1.18  christos  * event Licensee exports any such software from the United States or
    104  1.18  christos  * re-exports any such software from a foreign destination, Licensee shall
    105  1.18  christos  * ensure that the distribution and export/re-export of the software is in
    106  1.18  christos  * compliance with all laws, regulations, orders, or other restrictions of the
    107  1.18  christos  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
    108  1.18  christos  * any of its subsidiaries will export/re-export any technical data, process,
    109  1.18  christos  * software, or service, directly or indirectly, to any country for which the
    110  1.18  christos  * United States government or any agency thereof requires an export license,
    111  1.18  christos  * other governmental approval, or letter of assurance, without first obtaining
    112  1.18  christos  * such license, approval or letter.
    113  1.18  christos  *
    114  1.18  christos  *****************************************************************************
    115  1.18  christos  *
    116  1.18  christos  * Alternatively, you may choose to be licensed under the terms of the
    117  1.18  christos  * following license:
    118  1.18  christos  *
    119   1.2  christos  * Redistribution and use in source and binary forms, with or without
    120   1.2  christos  * modification, are permitted provided that the following conditions
    121   1.2  christos  * are met:
    122   1.2  christos  * 1. Redistributions of source code must retain the above copyright
    123   1.2  christos  *    notice, this list of conditions, and the following disclaimer,
    124   1.2  christos  *    without modification.
    125   1.2  christos  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
    126   1.2  christos  *    substantially similar to the "NO WARRANTY" disclaimer below
    127   1.2  christos  *    ("Disclaimer") and any redistribution must be conditioned upon
    128   1.2  christos  *    including a substantially similar Disclaimer requirement for further
    129   1.2  christos  *    binary redistribution.
    130   1.2  christos  * 3. Neither the names of the above-listed copyright holders nor the names
    131   1.2  christos  *    of any contributors may be used to endorse or promote products derived
    132   1.2  christos  *    from this software without specific prior written permission.
    133   1.2  christos  *
    134   1.2  christos  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
    135   1.2  christos  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
    136  1.15  christos  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
    137   1.2  christos  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
    138  1.18  christos  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
    139  1.18  christos  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
    140  1.18  christos  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
    141  1.18  christos  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
    142  1.18  christos  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
    143  1.18  christos  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
    144  1.18  christos  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
    145  1.18  christos  *
    146  1.18  christos  * Alternatively, you may choose to be licensed under the terms of the
    147  1.18  christos  * GNU General Public License ("GPL") version 2 as published by the Free
    148  1.18  christos  * Software Foundation.
    149  1.18  christos  *
    150  1.18  christos  *****************************************************************************/
    151   1.1    jruoho 
    152   1.1    jruoho #include "acpi.h"
    153   1.1    jruoho #include "accommon.h"
    154   1.1    jruoho #include "acparser.h"
    155   1.1    jruoho #include "amlcode.h"
    156   1.1    jruoho #include "acdispat.h"
    157   1.1    jruoho #include "acinterp.h"
    158   1.1    jruoho #include "acnamesp.h"
    159   1.1    jruoho #include "acdebug.h"
    160   1.1    jruoho 
    161   1.1    jruoho #define _COMPONENT          ACPI_DISPATCHER
    162   1.1    jruoho         ACPI_MODULE_NAME    ("dsutils")
    163   1.1    jruoho 
    164   1.1    jruoho 
    165   1.1    jruoho /*******************************************************************************
    166   1.1    jruoho  *
    167   1.1    jruoho  * FUNCTION:    AcpiDsClearImplicitReturn
    168   1.1    jruoho  *
    169   1.1    jruoho  * PARAMETERS:  WalkState           - Current State
    170   1.1    jruoho  *
    171   1.1    jruoho  * RETURN:      None.
    172   1.1    jruoho  *
    173   1.2  christos  * DESCRIPTION: Clear and remove a reference on an implicit return value. Used
    174   1.1    jruoho  *              to delete "stale" return values (if enabled, the return value
    175   1.1    jruoho  *              from every operator is saved at least momentarily, in case the
    176   1.1    jruoho  *              parent method exits.)
    177   1.1    jruoho  *
    178   1.1    jruoho  ******************************************************************************/
    179   1.1    jruoho 
    180   1.1    jruoho void
    181   1.1    jruoho AcpiDsClearImplicitReturn (
    182   1.1    jruoho     ACPI_WALK_STATE         *WalkState)
    183   1.1    jruoho {
    184   1.1    jruoho     ACPI_FUNCTION_NAME (DsClearImplicitReturn);
    185   1.1    jruoho 
    186   1.1    jruoho 
    187   1.1    jruoho     /*
    188   1.1    jruoho      * Slack must be enabled for this feature
    189   1.1    jruoho      */
    190   1.1    jruoho     if (!AcpiGbl_EnableInterpreterSlack)
    191   1.1    jruoho     {
    192   1.1    jruoho         return;
    193   1.1    jruoho     }
    194   1.1    jruoho 
    195   1.1    jruoho     if (WalkState->ImplicitReturnObj)
    196   1.1    jruoho     {
    197   1.1    jruoho         /*
    198   1.1    jruoho          * Delete any "stale" implicit return. However, in
    199   1.1    jruoho          * complex statements, the implicit return value can be
    200   1.1    jruoho          * bubbled up several levels.
    201   1.1    jruoho          */
    202   1.1    jruoho         ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
    203   1.1    jruoho             "Removing reference on stale implicit return obj %p\n",
    204   1.1    jruoho             WalkState->ImplicitReturnObj));
    205   1.1    jruoho 
    206   1.1    jruoho         AcpiUtRemoveReference (WalkState->ImplicitReturnObj);
    207   1.1    jruoho         WalkState->ImplicitReturnObj = NULL;
    208   1.1    jruoho     }
    209   1.1    jruoho }
    210   1.1    jruoho 
    211   1.1    jruoho 
    212   1.1    jruoho /*******************************************************************************
    213   1.1    jruoho  *
    214   1.1    jruoho  * FUNCTION:    AcpiDsDoImplicitReturn
    215   1.1    jruoho  *
    216   1.1    jruoho  * PARAMETERS:  ReturnDesc          - The return value
    217   1.1    jruoho  *              WalkState           - Current State
    218   1.1    jruoho  *              AddReference        - True if a reference should be added to the
    219   1.1    jruoho  *                                    return object
    220   1.1    jruoho  *
    221   1.1    jruoho  * RETURN:      TRUE if implicit return enabled, FALSE otherwise
    222   1.1    jruoho  *
    223   1.1    jruoho  * DESCRIPTION: Implements the optional "implicit return".  We save the result
    224   1.1    jruoho  *              of every ASL operator and control method invocation in case the
    225   1.2  christos  *              parent method exit. Before storing a new return value, we
    226   1.1    jruoho  *              delete the previous return value.
    227   1.1    jruoho  *
    228   1.1    jruoho  ******************************************************************************/
    229   1.1    jruoho 
    230   1.1    jruoho BOOLEAN
    231   1.1    jruoho AcpiDsDoImplicitReturn (
    232   1.1    jruoho     ACPI_OPERAND_OBJECT     *ReturnDesc,
    233   1.1    jruoho     ACPI_WALK_STATE         *WalkState,
    234   1.1    jruoho     BOOLEAN                 AddReference)
    235   1.1    jruoho {
    236   1.1    jruoho     ACPI_FUNCTION_NAME (DsDoImplicitReturn);
    237   1.1    jruoho 
    238   1.1    jruoho 
    239   1.1    jruoho     /*
    240   1.1    jruoho      * Slack must be enabled for this feature, and we must
    241   1.1    jruoho      * have a valid return object
    242   1.1    jruoho      */
    243   1.1    jruoho     if ((!AcpiGbl_EnableInterpreterSlack) ||
    244   1.1    jruoho         (!ReturnDesc))
    245   1.1    jruoho     {
    246   1.1    jruoho         return (FALSE);
    247   1.1    jruoho     }
    248   1.1    jruoho 
    249   1.1    jruoho     ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
    250   1.5  christos         "Result %p will be implicitly returned; Prev=%p\n",
    251   1.5  christos         ReturnDesc,
    252   1.5  christos         WalkState->ImplicitReturnObj));
    253   1.1    jruoho 
    254   1.1    jruoho     /*
    255   1.1    jruoho      * Delete any "stale" implicit return value first. However, in
    256   1.1    jruoho      * complex statements, the implicit return value can be
    257   1.1    jruoho      * bubbled up several levels, so we don't clear the value if it
    258   1.1    jruoho      * is the same as the ReturnDesc.
    259   1.1    jruoho      */
    260   1.1    jruoho     if (WalkState->ImplicitReturnObj)
    261   1.1    jruoho     {
    262   1.1    jruoho         if (WalkState->ImplicitReturnObj == ReturnDesc)
    263   1.1    jruoho         {
    264   1.1    jruoho             return (TRUE);
    265   1.1    jruoho         }
    266   1.1    jruoho         AcpiDsClearImplicitReturn (WalkState);
    267   1.1    jruoho     }
    268   1.1    jruoho 
    269   1.1    jruoho     /* Save the implicit return value, add a reference if requested */
    270   1.1    jruoho 
    271   1.1    jruoho     WalkState->ImplicitReturnObj = ReturnDesc;
    272   1.1    jruoho     if (AddReference)
    273   1.1    jruoho     {
    274   1.1    jruoho         AcpiUtAddReference (ReturnDesc);
    275   1.1    jruoho     }
    276   1.1    jruoho 
    277   1.1    jruoho     return (TRUE);
    278   1.1    jruoho }
    279   1.1    jruoho 
    280   1.1    jruoho 
    281   1.1    jruoho /*******************************************************************************
    282   1.1    jruoho  *
    283   1.1    jruoho  * FUNCTION:    AcpiDsIsResultUsed
    284   1.1    jruoho  *
    285   1.1    jruoho  * PARAMETERS:  Op                  - Current Op
    286   1.1    jruoho  *              WalkState           - Current State
    287   1.1    jruoho  *
    288   1.1    jruoho  * RETURN:      TRUE if result is used, FALSE otherwise
    289   1.1    jruoho  *
    290   1.1    jruoho  * DESCRIPTION: Check if a result object will be used by the parent
    291   1.1    jruoho  *
    292   1.1    jruoho  ******************************************************************************/
    293   1.1    jruoho 
    294   1.1    jruoho BOOLEAN
    295   1.1    jruoho AcpiDsIsResultUsed (
    296   1.1    jruoho     ACPI_PARSE_OBJECT       *Op,
    297   1.1    jruoho     ACPI_WALK_STATE         *WalkState)
    298   1.1    jruoho {
    299   1.1    jruoho     const ACPI_OPCODE_INFO  *ParentInfo;
    300   1.1    jruoho 
    301   1.1    jruoho     ACPI_FUNCTION_TRACE_PTR (DsIsResultUsed, Op);
    302   1.1    jruoho 
    303   1.1    jruoho 
    304   1.1    jruoho     /* Must have both an Op and a Result Object */
    305   1.1    jruoho 
    306   1.1    jruoho     if (!Op)
    307   1.1    jruoho     {
    308   1.1    jruoho         ACPI_ERROR ((AE_INFO, "Null Op"));
    309   1.1    jruoho         return_UINT8 (TRUE);
    310   1.1    jruoho     }
    311   1.1    jruoho 
    312   1.1    jruoho     /*
    313   1.1    jruoho      * We know that this operator is not a
    314   1.1    jruoho      * Return() operator (would not come here.) The following code is the
    315   1.1    jruoho      * optional support for a so-called "implicit return". Some AML code
    316   1.1    jruoho      * assumes that the last value of the method is "implicitly" returned
    317   1.1    jruoho      * to the caller. Just save the last result as the return value.
    318   1.1    jruoho      * NOTE: this is optional because the ASL language does not actually
    319   1.1    jruoho      * support this behavior.
    320   1.1    jruoho      */
    321   1.1    jruoho     (void) AcpiDsDoImplicitReturn (WalkState->ResultObj, WalkState, TRUE);
    322   1.1    jruoho 
    323   1.1    jruoho     /*
    324   1.1    jruoho      * Now determine if the parent will use the result
    325   1.1    jruoho      *
    326   1.1    jruoho      * If there is no parent, or the parent is a ScopeOp, we are executing
    327   1.1    jruoho      * at the method level. An executing method typically has no parent,
    328   1.2  christos      * since each method is parsed separately. A method invoked externally
    329   1.1    jruoho      * via ExecuteControlMethod has a ScopeOp as the parent.
    330   1.1    jruoho      */
    331   1.1    jruoho     if ((!Op->Common.Parent) ||
    332   1.1    jruoho         (Op->Common.Parent->Common.AmlOpcode == AML_SCOPE_OP))
    333   1.1    jruoho     {
    334   1.1    jruoho         /* No parent, the return value cannot possibly be used */
    335   1.1    jruoho 
    336   1.1    jruoho         ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
    337   1.1    jruoho             "At Method level, result of [%s] not used\n",
    338   1.1    jruoho             AcpiPsGetOpcodeName (Op->Common.AmlOpcode)));
    339   1.1    jruoho         return_UINT8 (FALSE);
    340   1.1    jruoho     }
    341   1.1    jruoho 
    342   1.1    jruoho     /* Get info on the parent. The RootOp is AML_SCOPE */
    343   1.1    jruoho 
    344   1.1    jruoho     ParentInfo = AcpiPsGetOpcodeInfo (Op->Common.Parent->Common.AmlOpcode);
    345   1.1    jruoho     if (ParentInfo->Class == AML_CLASS_UNKNOWN)
    346   1.1    jruoho     {
    347   1.1    jruoho         ACPI_ERROR ((AE_INFO,
    348   1.1    jruoho             "Unknown parent opcode Op=%p", Op));
    349   1.1    jruoho         return_UINT8 (FALSE);
    350   1.1    jruoho     }
    351   1.1    jruoho 
    352   1.1    jruoho     /*
    353   1.2  christos      * Decide what to do with the result based on the parent. If
    354   1.1    jruoho      * the parent opcode will not use the result, delete the object.
    355   1.1    jruoho      * Otherwise leave it as is, it will be deleted when it is used
    356   1.1    jruoho      * as an operand later.
    357   1.1    jruoho      */
    358   1.1    jruoho     switch (ParentInfo->Class)
    359   1.1    jruoho     {
    360   1.1    jruoho     case AML_CLASS_CONTROL:
    361   1.1    jruoho 
    362   1.1    jruoho         switch (Op->Common.Parent->Common.AmlOpcode)
    363   1.1    jruoho         {
    364   1.1    jruoho         case AML_RETURN_OP:
    365   1.1    jruoho 
    366   1.1    jruoho             /* Never delete the return value associated with a return opcode */
    367   1.1    jruoho 
    368   1.1    jruoho             goto ResultUsed;
    369   1.1    jruoho 
    370   1.1    jruoho         case AML_IF_OP:
    371   1.1    jruoho         case AML_WHILE_OP:
    372   1.1    jruoho             /*
    373   1.1    jruoho              * If we are executing the predicate AND this is the predicate op,
    374   1.1    jruoho              * we will use the return value
    375   1.1    jruoho              */
    376   1.5  christos             if ((WalkState->ControlState->Common.State ==
    377   1.5  christos                     ACPI_CONTROL_PREDICATE_EXECUTING) &&
    378   1.1    jruoho                 (WalkState->ControlState->Control.PredicateOp == Op))
    379   1.1    jruoho             {
    380   1.1    jruoho                 goto ResultUsed;
    381   1.1    jruoho             }
    382   1.1    jruoho             break;
    383   1.1    jruoho 
    384   1.1    jruoho         default:
    385   1.2  christos 
    386   1.1    jruoho             /* Ignore other control opcodes */
    387   1.2  christos 
    388   1.1    jruoho             break;
    389   1.1    jruoho         }
    390   1.1    jruoho 
    391   1.1    jruoho         /* The general control opcode returns no result */
    392   1.1    jruoho 
    393   1.1    jruoho         goto ResultNotUsed;
    394   1.1    jruoho 
    395   1.1    jruoho     case AML_CLASS_CREATE:
    396   1.1    jruoho         /*
    397   1.1    jruoho          * These opcodes allow TermArg(s) as operands and therefore
    398   1.2  christos          * the operands can be method calls. The result is used.
    399   1.1    jruoho          */
    400   1.1    jruoho         goto ResultUsed;
    401   1.1    jruoho 
    402   1.1    jruoho     case AML_CLASS_NAMED_OBJECT:
    403   1.1    jruoho 
    404   1.1    jruoho         if ((Op->Common.Parent->Common.AmlOpcode == AML_REGION_OP)       ||
    405   1.1    jruoho             (Op->Common.Parent->Common.AmlOpcode == AML_DATA_REGION_OP)  ||
    406   1.1    jruoho             (Op->Common.Parent->Common.AmlOpcode == AML_PACKAGE_OP)      ||
    407   1.1    jruoho             (Op->Common.Parent->Common.AmlOpcode == AML_BUFFER_OP)       ||
    408   1.8  christos             (Op->Common.Parent->Common.AmlOpcode == AML_VARIABLE_PACKAGE_OP) ||
    409   1.1    jruoho             (Op->Common.Parent->Common.AmlOpcode == AML_INT_EVAL_SUBTREE_OP) ||
    410   1.1    jruoho             (Op->Common.Parent->Common.AmlOpcode == AML_BANK_FIELD_OP))
    411   1.1    jruoho         {
    412   1.1    jruoho             /*
    413   1.1    jruoho              * These opcodes allow TermArg(s) as operands and therefore
    414   1.2  christos              * the operands can be method calls. The result is used.
    415   1.1    jruoho              */
    416   1.1    jruoho             goto ResultUsed;
    417   1.1    jruoho         }
    418   1.1    jruoho 
    419   1.1    jruoho         goto ResultNotUsed;
    420   1.1    jruoho 
    421   1.1    jruoho     default:
    422   1.1    jruoho         /*
    423   1.1    jruoho          * In all other cases. the parent will actually use the return
    424   1.1    jruoho          * object, so keep it.
    425   1.1    jruoho          */
    426   1.1    jruoho         goto ResultUsed;
    427   1.1    jruoho     }
    428   1.1    jruoho 
    429   1.1    jruoho 
    430   1.1    jruoho ResultUsed:
    431   1.1    jruoho     ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
    432   1.1    jruoho         "Result of [%s] used by Parent [%s] Op=%p\n",
    433   1.1    jruoho         AcpiPsGetOpcodeName (Op->Common.AmlOpcode),
    434   1.1    jruoho         AcpiPsGetOpcodeName (Op->Common.Parent->Common.AmlOpcode), Op));
    435   1.1    jruoho 
    436   1.1    jruoho     return_UINT8 (TRUE);
    437   1.1    jruoho 
    438   1.1    jruoho 
    439   1.1    jruoho ResultNotUsed:
    440   1.1    jruoho     ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
    441   1.1    jruoho         "Result of [%s] not used by Parent [%s] Op=%p\n",
    442   1.1    jruoho         AcpiPsGetOpcodeName (Op->Common.AmlOpcode),
    443   1.1    jruoho         AcpiPsGetOpcodeName (Op->Common.Parent->Common.AmlOpcode), Op));
    444   1.1    jruoho 
    445   1.1    jruoho     return_UINT8 (FALSE);
    446   1.1    jruoho }
    447   1.1    jruoho 
    448   1.1    jruoho 
    449   1.1    jruoho /*******************************************************************************
    450   1.1    jruoho  *
    451   1.1    jruoho  * FUNCTION:    AcpiDsDeleteResultIfNotUsed
    452   1.1    jruoho  *
    453   1.1    jruoho  * PARAMETERS:  Op              - Current parse Op
    454   1.1    jruoho  *              ResultObj       - Result of the operation
    455   1.1    jruoho  *              WalkState       - Current state
    456   1.1    jruoho  *
    457   1.1    jruoho  * RETURN:      Status
    458   1.1    jruoho  *
    459   1.2  christos  * DESCRIPTION: Used after interpretation of an opcode. If there is an internal
    460   1.1    jruoho  *              result descriptor, check if the parent opcode will actually use
    461   1.2  christos  *              this result. If not, delete the result now so that it will
    462   1.1    jruoho  *              not become orphaned.
    463   1.1    jruoho  *
    464   1.1    jruoho  ******************************************************************************/
    465   1.1    jruoho 
    466   1.1    jruoho void
    467   1.1    jruoho AcpiDsDeleteResultIfNotUsed (
    468   1.1    jruoho     ACPI_PARSE_OBJECT       *Op,
    469   1.1    jruoho     ACPI_OPERAND_OBJECT     *ResultObj,
    470   1.1    jruoho     ACPI_WALK_STATE         *WalkState)
    471   1.1    jruoho {
    472   1.1    jruoho     ACPI_OPERAND_OBJECT     *ObjDesc;
    473   1.1    jruoho     ACPI_STATUS             Status;
    474   1.1    jruoho 
    475   1.1    jruoho 
    476   1.1    jruoho     ACPI_FUNCTION_TRACE_PTR (DsDeleteResultIfNotUsed, ResultObj);
    477   1.1    jruoho 
    478   1.1    jruoho 
    479   1.1    jruoho     if (!Op)
    480   1.1    jruoho     {
    481   1.1    jruoho         ACPI_ERROR ((AE_INFO, "Null Op"));
    482   1.1    jruoho         return_VOID;
    483   1.1    jruoho     }
    484   1.1    jruoho 
    485   1.1    jruoho     if (!ResultObj)
    486   1.1    jruoho     {
    487   1.1    jruoho         return_VOID;
    488   1.1    jruoho     }
    489   1.1    jruoho 
    490   1.1    jruoho     if (!AcpiDsIsResultUsed (Op, WalkState))
    491   1.1    jruoho     {
    492   1.1    jruoho         /* Must pop the result stack (ObjDesc should be equal to ResultObj) */
    493   1.1    jruoho 
    494   1.1    jruoho         Status = AcpiDsResultPop (&ObjDesc, WalkState);
    495   1.1    jruoho         if (ACPI_SUCCESS (Status))
    496   1.1    jruoho         {
    497   1.1    jruoho             AcpiUtRemoveReference (ResultObj);
    498   1.1    jruoho         }
    499   1.1    jruoho     }
    500   1.1    jruoho 
    501   1.1    jruoho     return_VOID;
    502   1.1    jruoho }
    503   1.1    jruoho 
    504   1.1    jruoho 
    505   1.1    jruoho /*******************************************************************************
    506   1.1    jruoho  *
    507   1.1    jruoho  * FUNCTION:    AcpiDsResolveOperands
    508   1.1    jruoho  *
    509   1.1    jruoho  * PARAMETERS:  WalkState           - Current walk state with operands on stack
    510   1.1    jruoho  *
    511   1.1    jruoho  * RETURN:      Status
    512   1.1    jruoho  *
    513   1.2  christos  * DESCRIPTION: Resolve all operands to their values. Used to prepare
    514   1.1    jruoho  *              arguments to a control method invocation (a call from one
    515   1.1    jruoho  *              method to another.)
    516   1.1    jruoho  *
    517   1.1    jruoho  ******************************************************************************/
    518   1.1    jruoho 
    519   1.1    jruoho ACPI_STATUS
    520   1.1    jruoho AcpiDsResolveOperands (
    521   1.1    jruoho     ACPI_WALK_STATE         *WalkState)
    522   1.1    jruoho {
    523   1.1    jruoho     UINT32                  i;
    524   1.1    jruoho     ACPI_STATUS             Status = AE_OK;
    525   1.1    jruoho 
    526   1.1    jruoho 
    527   1.1    jruoho     ACPI_FUNCTION_TRACE_PTR (DsResolveOperands, WalkState);
    528   1.1    jruoho 
    529   1.1    jruoho 
    530   1.1    jruoho     /*
    531   1.1    jruoho      * Attempt to resolve each of the valid operands
    532   1.2  christos      * Method arguments are passed by reference, not by value. This means
    533   1.1    jruoho      * that the actual objects are passed, not copies of the objects.
    534   1.1    jruoho      */
    535   1.1    jruoho     for (i = 0; i < WalkState->NumOperands; i++)
    536   1.1    jruoho     {
    537   1.1    jruoho         Status = AcpiExResolveToValue (&WalkState->Operands[i], WalkState);
    538   1.1    jruoho         if (ACPI_FAILURE (Status))
    539   1.1    jruoho         {
    540   1.1    jruoho             break;
    541   1.1    jruoho         }
    542   1.1    jruoho     }
    543   1.1    jruoho 
    544   1.1    jruoho     return_ACPI_STATUS (Status);
    545   1.1    jruoho }
    546   1.1    jruoho 
    547   1.1    jruoho 
    548   1.1    jruoho /*******************************************************************************
    549   1.1    jruoho  *
    550   1.1    jruoho  * FUNCTION:    AcpiDsClearOperands
    551   1.1    jruoho  *
    552   1.1    jruoho  * PARAMETERS:  WalkState           - Current walk state with operands on stack
    553   1.1    jruoho  *
    554   1.1    jruoho  * RETURN:      None
    555   1.1    jruoho  *
    556   1.1    jruoho  * DESCRIPTION: Clear all operands on the current walk state operand stack.
    557   1.1    jruoho  *
    558   1.1    jruoho  ******************************************************************************/
    559   1.1    jruoho 
    560   1.1    jruoho void
    561   1.1    jruoho AcpiDsClearOperands (
    562   1.1    jruoho     ACPI_WALK_STATE         *WalkState)
    563   1.1    jruoho {
    564   1.1    jruoho     UINT32                  i;
    565   1.1    jruoho 
    566   1.1    jruoho 
    567   1.1    jruoho     ACPI_FUNCTION_TRACE_PTR (DsClearOperands, WalkState);
    568   1.1    jruoho 
    569   1.1    jruoho 
    570   1.1    jruoho     /* Remove a reference on each operand on the stack */
    571   1.1    jruoho 
    572   1.1    jruoho     for (i = 0; i < WalkState->NumOperands; i++)
    573   1.1    jruoho     {
    574   1.1    jruoho         /*
    575   1.1    jruoho          * Remove a reference to all operands, including both
    576   1.1    jruoho          * "Arguments" and "Targets".
    577   1.1    jruoho          */
    578   1.1    jruoho         AcpiUtRemoveReference (WalkState->Operands[i]);
    579   1.1    jruoho         WalkState->Operands[i] = NULL;
    580   1.1    jruoho     }
    581   1.1    jruoho 
    582   1.1    jruoho     WalkState->NumOperands = 0;
    583   1.1    jruoho     return_VOID;
    584   1.1    jruoho }
    585   1.1    jruoho 
    586   1.1    jruoho 
    587   1.1    jruoho /*******************************************************************************
    588   1.1    jruoho  *
    589   1.1    jruoho  * FUNCTION:    AcpiDsCreateOperand
    590   1.1    jruoho  *
    591   1.1    jruoho  * PARAMETERS:  WalkState       - Current walk state
    592   1.1    jruoho  *              Arg             - Parse object for the argument
    593   1.1    jruoho  *              ArgIndex        - Which argument (zero based)
    594   1.1    jruoho  *
    595   1.1    jruoho  * RETURN:      Status
    596   1.1    jruoho  *
    597   1.1    jruoho  * DESCRIPTION: Translate a parse tree object that is an argument to an AML
    598   1.2  christos  *              opcode to the equivalent interpreter object. This may include
    599   1.1    jruoho  *              looking up a name or entering a new name into the internal
    600   1.1    jruoho  *              namespace.
    601   1.1    jruoho  *
    602   1.1    jruoho  ******************************************************************************/
    603   1.1    jruoho 
    604   1.1    jruoho ACPI_STATUS
    605   1.1    jruoho AcpiDsCreateOperand (
    606   1.1    jruoho     ACPI_WALK_STATE         *WalkState,
    607   1.1    jruoho     ACPI_PARSE_OBJECT       *Arg,
    608   1.1    jruoho     UINT32                  ArgIndex)
    609   1.1    jruoho {
    610   1.1    jruoho     ACPI_STATUS             Status = AE_OK;
    611   1.1    jruoho     char                    *NameString;
    612   1.1    jruoho     UINT32                  NameLength;
    613   1.1    jruoho     ACPI_OPERAND_OBJECT     *ObjDesc;
    614   1.1    jruoho     ACPI_PARSE_OBJECT       *ParentOp;
    615   1.1    jruoho     UINT16                  Opcode;
    616   1.1    jruoho     ACPI_INTERPRETER_MODE   InterpreterMode;
    617   1.1    jruoho     const ACPI_OPCODE_INFO  *OpInfo;
    618   1.1    jruoho 
    619   1.1    jruoho 
    620   1.1    jruoho     ACPI_FUNCTION_TRACE_PTR (DsCreateOperand, Arg);
    621   1.1    jruoho 
    622   1.1    jruoho 
    623   1.1    jruoho     /* A valid name must be looked up in the namespace */
    624   1.1    jruoho 
    625   1.1    jruoho     if ((Arg->Common.AmlOpcode == AML_INT_NAMEPATH_OP) &&
    626   1.1    jruoho         (Arg->Common.Value.String) &&
    627   1.1    jruoho         !(Arg->Common.Flags & ACPI_PARSEOP_IN_STACK))
    628   1.1    jruoho     {
    629   1.1    jruoho         ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "Getting a name: Arg=%p\n", Arg));
    630   1.1    jruoho 
    631   1.1    jruoho         /* Get the entire name string from the AML stream */
    632   1.1    jruoho 
    633   1.5  christos         Status = AcpiExGetNameString (ACPI_TYPE_ANY,
    634   1.5  christos             Arg->Common.Value.Buffer, &NameString, &NameLength);
    635   1.1    jruoho 
    636   1.1    jruoho         if (ACPI_FAILURE (Status))
    637   1.1    jruoho         {
    638   1.1    jruoho             return_ACPI_STATUS (Status);
    639   1.1    jruoho         }
    640   1.1    jruoho 
    641   1.1    jruoho         /* All prefixes have been handled, and the name is in NameString */
    642   1.1    jruoho 
    643   1.1    jruoho         /*
    644   1.2  christos          * Special handling for BufferField declarations. This is a deferred
    645   1.1    jruoho          * opcode that unfortunately defines the field name as the last
    646   1.2  christos          * parameter instead of the first. We get here when we are performing
    647   1.1    jruoho          * the deferred execution, so the actual name of the field is already
    648   1.2  christos          * in the namespace. We don't want to attempt to look it up again
    649   1.1    jruoho          * because we may be executing in a different scope than where the
    650   1.1    jruoho          * actual opcode exists.
    651   1.1    jruoho          */
    652   1.1    jruoho         if ((WalkState->DeferredNode) &&
    653   1.1    jruoho             (WalkState->DeferredNode->Type == ACPI_TYPE_BUFFER_FIELD) &&
    654   1.5  christos             (ArgIndex == (UINT32)
    655   1.5  christos                 ((WalkState->Opcode == AML_CREATE_FIELD_OP) ? 3 : 2)))
    656   1.1    jruoho         {
    657   1.1    jruoho             ObjDesc = ACPI_CAST_PTR (
    658   1.5  christos                 ACPI_OPERAND_OBJECT, WalkState->DeferredNode);
    659   1.1    jruoho             Status = AE_OK;
    660   1.1    jruoho         }
    661   1.1    jruoho         else    /* All other opcodes */
    662   1.1    jruoho         {
    663   1.1    jruoho             /*
    664   1.1    jruoho              * Differentiate between a namespace "create" operation
    665   1.1    jruoho              * versus a "lookup" operation (IMODE_LOAD_PASS2 vs.
    666   1.1    jruoho              * IMODE_EXECUTE) in order to support the creation of
    667   1.1    jruoho              * namespace objects during the execution of control methods.
    668   1.1    jruoho              */
    669   1.1    jruoho             ParentOp = Arg->Common.Parent;
    670   1.1    jruoho             OpInfo = AcpiPsGetOpcodeInfo (ParentOp->Common.AmlOpcode);
    671   1.5  christos 
    672   1.1    jruoho             if ((OpInfo->Flags & AML_NSNODE) &&
    673   1.1    jruoho                 (ParentOp->Common.AmlOpcode != AML_INT_METHODCALL_OP) &&
    674   1.1    jruoho                 (ParentOp->Common.AmlOpcode != AML_REGION_OP) &&
    675   1.1    jruoho                 (ParentOp->Common.AmlOpcode != AML_INT_NAMEPATH_OP))
    676   1.1    jruoho             {
    677   1.1    jruoho                 /* Enter name into namespace if not found */
    678   1.1    jruoho 
    679   1.1    jruoho                 InterpreterMode = ACPI_IMODE_LOAD_PASS2;
    680   1.1    jruoho             }
    681   1.1    jruoho             else
    682   1.1    jruoho             {
    683   1.1    jruoho                 /* Return a failure if name not found */
    684   1.1    jruoho 
    685   1.1    jruoho                 InterpreterMode = ACPI_IMODE_EXECUTE;
    686   1.1    jruoho             }
    687   1.1    jruoho 
    688   1.1    jruoho             Status = AcpiNsLookup (WalkState->ScopeInfo, NameString,
    689   1.5  christos                 ACPI_TYPE_ANY, InterpreterMode,
    690   1.5  christos                 ACPI_NS_SEARCH_PARENT | ACPI_NS_DONT_OPEN_SCOPE, WalkState,
    691   1.5  christos                 ACPI_CAST_INDIRECT_PTR (ACPI_NAMESPACE_NODE, &ObjDesc));
    692   1.1    jruoho             /*
    693   1.1    jruoho              * The only case where we pass through (ignore) a NOT_FOUND
    694   1.1    jruoho              * error is for the CondRefOf opcode.
    695   1.1    jruoho              */
    696   1.1    jruoho             if (Status == AE_NOT_FOUND)
    697   1.1    jruoho             {
    698   1.8  christos                 if (ParentOp->Common.AmlOpcode == AML_CONDITIONAL_REF_OF_OP)
    699   1.1    jruoho                 {
    700   1.1    jruoho                     /*
    701   1.1    jruoho                      * For the Conditional Reference op, it's OK if
    702   1.1    jruoho                      * the name is not found;  We just need a way to
    703   1.1    jruoho                      * indicate this to the interpreter, set the
    704   1.1    jruoho                      * object to the root
    705   1.1    jruoho                      */
    706   1.1    jruoho                     ObjDesc = ACPI_CAST_PTR (
    707   1.5  christos                         ACPI_OPERAND_OBJECT, AcpiGbl_RootNode);
    708   1.1    jruoho                     Status = AE_OK;
    709   1.1    jruoho                 }
    710   1.2  christos                 else if (ParentOp->Common.AmlOpcode == AML_EXTERNAL_OP)
    711   1.2  christos                 {
    712   1.6  christos                     /*
    713   1.6  christos                      * This opcode should never appear here. It is used only
    714   1.6  christos                      * by AML disassemblers and is surrounded by an If(0)
    715   1.6  christos                      * by the ASL compiler.
    716   1.6  christos                      *
    717   1.6  christos                      * Therefore, if we see it here, it is a serious error.
    718   1.6  christos                      */
    719   1.6  christos                     Status = AE_AML_BAD_OPCODE;
    720   1.3  christos                 }
    721   1.1    jruoho                 else
    722   1.1    jruoho                 {
    723   1.1    jruoho                     /*
    724   1.1    jruoho                      * We just plain didn't find it -- which is a
    725   1.1    jruoho                      * very serious error at this point
    726   1.1    jruoho                      */
    727   1.1    jruoho                     Status = AE_AML_NAME_NOT_FOUND;
    728   1.1    jruoho                 }
    729   1.1    jruoho             }
    730   1.1    jruoho 
    731   1.1    jruoho             if (ACPI_FAILURE (Status))
    732   1.1    jruoho             {
    733  1.10  christos                 ACPI_ERROR_NAMESPACE (WalkState->ScopeInfo,
    734  1.10  christos                     NameString, Status);
    735   1.1    jruoho             }
    736   1.1    jruoho         }
    737   1.1    jruoho 
    738   1.1    jruoho         /* Free the namestring created above */
    739   1.1    jruoho 
    740   1.1    jruoho         ACPI_FREE (NameString);
    741   1.1    jruoho 
    742   1.1    jruoho         /* Check status from the lookup */
    743   1.1    jruoho 
    744   1.1    jruoho         if (ACPI_FAILURE (Status))
    745   1.1    jruoho         {
    746   1.1    jruoho             return_ACPI_STATUS (Status);
    747   1.1    jruoho         }
    748   1.1    jruoho 
    749   1.1    jruoho         /* Put the resulting object onto the current object stack */
    750   1.1    jruoho 
    751   1.1    jruoho         Status = AcpiDsObjStackPush (ObjDesc, WalkState);
    752   1.1    jruoho         if (ACPI_FAILURE (Status))
    753   1.1    jruoho         {
    754   1.1    jruoho             return_ACPI_STATUS (Status);
    755   1.1    jruoho         }
    756   1.5  christos 
    757   1.5  christos         AcpiDbDisplayArgumentObject (ObjDesc, WalkState);
    758   1.1    jruoho     }
    759   1.1    jruoho     else
    760   1.1    jruoho     {
    761   1.1    jruoho         /* Check for null name case */
    762   1.1    jruoho 
    763   1.1    jruoho         if ((Arg->Common.AmlOpcode == AML_INT_NAMEPATH_OP) &&
    764   1.1    jruoho             !(Arg->Common.Flags & ACPI_PARSEOP_IN_STACK))
    765   1.1    jruoho         {
    766   1.1    jruoho             /*
    767   1.1    jruoho              * If the name is null, this means that this is an
    768   1.1    jruoho              * optional result parameter that was not specified
    769   1.2  christos              * in the original ASL. Create a Zero Constant for a
    770   1.2  christos              * placeholder. (Store to a constant is a Noop.)
    771   1.1    jruoho              */
    772   1.1    jruoho             Opcode = AML_ZERO_OP;       /* Has no arguments! */
    773   1.1    jruoho 
    774   1.1    jruoho             ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
    775   1.1    jruoho                 "Null namepath: Arg=%p\n", Arg));
    776   1.1    jruoho         }
    777   1.1    jruoho         else
    778   1.1    jruoho         {
    779   1.1    jruoho             Opcode = Arg->Common.AmlOpcode;
    780   1.1    jruoho         }
    781   1.1    jruoho 
    782   1.1    jruoho         /* Get the object type of the argument */
    783   1.1    jruoho 
    784   1.1    jruoho         OpInfo = AcpiPsGetOpcodeInfo (Opcode);
    785   1.1    jruoho         if (OpInfo->ObjectType == ACPI_TYPE_INVALID)
    786   1.1    jruoho         {
    787   1.1    jruoho             return_ACPI_STATUS (AE_NOT_IMPLEMENTED);
    788   1.1    jruoho         }
    789   1.1    jruoho 
    790   1.5  christos         if ((OpInfo->Flags & AML_HAS_RETVAL) ||
    791   1.5  christos             (Arg->Common.Flags & ACPI_PARSEOP_IN_STACK))
    792   1.1    jruoho         {
    793   1.1    jruoho             /*
    794   1.1    jruoho              * Use value that was already previously returned
    795   1.1    jruoho              * by the evaluation of this argument
    796   1.1    jruoho              */
    797   1.1    jruoho             Status = AcpiDsResultPop (&ObjDesc, WalkState);
    798   1.1    jruoho             if (ACPI_FAILURE (Status))
    799   1.1    jruoho             {
    800   1.1    jruoho                 /*
    801   1.1    jruoho                  * Only error is underflow, and this indicates
    802   1.1    jruoho                  * a missing or null operand!
    803   1.1    jruoho                  */
    804   1.1    jruoho                 ACPI_EXCEPTION ((AE_INFO, Status,
    805   1.1    jruoho                     "Missing or null operand"));
    806   1.1    jruoho                 return_ACPI_STATUS (Status);
    807   1.1    jruoho             }
    808   1.1    jruoho         }
    809   1.1    jruoho         else
    810   1.1    jruoho         {
    811   1.1    jruoho             /* Create an ACPI_INTERNAL_OBJECT for the argument */
    812   1.1    jruoho 
    813   1.1    jruoho             ObjDesc = AcpiUtCreateInternalObject (OpInfo->ObjectType);
    814   1.1    jruoho             if (!ObjDesc)
    815   1.1    jruoho             {
    816   1.1    jruoho                 return_ACPI_STATUS (AE_NO_MEMORY);
    817   1.1    jruoho             }
    818   1.1    jruoho 
    819   1.1    jruoho             /* Initialize the new object */
    820   1.1    jruoho 
    821   1.1    jruoho             Status = AcpiDsInitObjectFromOp (
    822   1.5  christos                 WalkState, Arg, Opcode, &ObjDesc);
    823   1.1    jruoho             if (ACPI_FAILURE (Status))
    824   1.1    jruoho             {
    825   1.1    jruoho                 AcpiUtDeleteObjectDesc (ObjDesc);
    826   1.1    jruoho                 return_ACPI_STATUS (Status);
    827   1.1    jruoho             }
    828   1.1    jruoho         }
    829   1.1    jruoho 
    830   1.1    jruoho         /* Put the operand object on the object stack */
    831   1.1    jruoho 
    832   1.1    jruoho         Status = AcpiDsObjStackPush (ObjDesc, WalkState);
    833   1.1    jruoho         if (ACPI_FAILURE (Status))
    834   1.1    jruoho         {
    835   1.1    jruoho             return_ACPI_STATUS (Status);
    836   1.1    jruoho         }
    837   1.1    jruoho 
    838   1.5  christos         AcpiDbDisplayArgumentObject (ObjDesc, WalkState);
    839   1.1    jruoho     }
    840   1.1    jruoho 
    841   1.1    jruoho     return_ACPI_STATUS (AE_OK);
    842   1.1    jruoho }
    843   1.1    jruoho 
    844   1.1    jruoho 
    845   1.1    jruoho /*******************************************************************************
    846   1.1    jruoho  *
    847   1.1    jruoho  * FUNCTION:    AcpiDsCreateOperands
    848   1.1    jruoho  *
    849   1.1    jruoho  * PARAMETERS:  WalkState           - Current state
    850   1.1    jruoho  *              FirstArg            - First argument of a parser argument tree
    851   1.1    jruoho  *
    852   1.1    jruoho  * RETURN:      Status
    853   1.1    jruoho  *
    854   1.1    jruoho  * DESCRIPTION: Convert an operator's arguments from a parse tree format to
    855   1.1    jruoho  *              namespace objects and place those argument object on the object
    856   1.1    jruoho  *              stack in preparation for evaluation by the interpreter.
    857   1.1    jruoho  *
    858   1.1    jruoho  ******************************************************************************/
    859   1.1    jruoho 
    860   1.1    jruoho ACPI_STATUS
    861   1.1    jruoho AcpiDsCreateOperands (
    862   1.1    jruoho     ACPI_WALK_STATE         *WalkState,
    863   1.1    jruoho     ACPI_PARSE_OBJECT       *FirstArg)
    864   1.1    jruoho {
    865   1.1    jruoho     ACPI_STATUS             Status = AE_OK;
    866   1.1    jruoho     ACPI_PARSE_OBJECT       *Arg;
    867   1.1    jruoho     ACPI_PARSE_OBJECT       *Arguments[ACPI_OBJ_NUM_OPERANDS];
    868   1.1    jruoho     UINT32                  ArgCount = 0;
    869   1.1    jruoho     UINT32                  Index = WalkState->NumOperands;
    870  1.18  christos     UINT32                  PrevNumOperands = WalkState->NumOperands;
    871  1.18  christos     UINT32                  NewNumOperands;
    872   1.1    jruoho     UINT32                  i;
    873   1.1    jruoho 
    874   1.1    jruoho 
    875   1.1    jruoho     ACPI_FUNCTION_TRACE_PTR (DsCreateOperands, FirstArg);
    876   1.1    jruoho 
    877   1.1    jruoho 
    878   1.1    jruoho     /* Get all arguments in the list */
    879   1.1    jruoho 
    880   1.1    jruoho     Arg = FirstArg;
    881   1.1    jruoho     while (Arg)
    882   1.1    jruoho     {
    883   1.1    jruoho         if (Index >= ACPI_OBJ_NUM_OPERANDS)
    884   1.1    jruoho         {
    885   1.1    jruoho             return_ACPI_STATUS (AE_BAD_DATA);
    886   1.1    jruoho         }
    887   1.1    jruoho 
    888   1.1    jruoho         Arguments[Index] = Arg;
    889   1.1    jruoho         WalkState->Operands [Index] = NULL;
    890   1.1    jruoho 
    891   1.1    jruoho         /* Move on to next argument, if any */
    892   1.1    jruoho 
    893   1.1    jruoho         Arg = Arg->Common.Next;
    894   1.1    jruoho         ArgCount++;
    895   1.1    jruoho         Index++;
    896   1.1    jruoho     }
    897   1.1    jruoho 
    898   1.2  christos     ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
    899   1.2  christos         "NumOperands %d, ArgCount %d, Index %d\n",
    900   1.2  christos         WalkState->NumOperands, ArgCount, Index));
    901   1.1    jruoho 
    902   1.2  christos     /* Create the interpreter arguments, in reverse order */
    903   1.1    jruoho 
    904  1.18  christos     NewNumOperands = Index;
    905   1.2  christos     Index--;
    906   1.1    jruoho     for (i = 0; i < ArgCount; i++)
    907   1.1    jruoho     {
    908   1.1    jruoho         Arg = Arguments[Index];
    909   1.1    jruoho         WalkState->OperandIndex = (UINT8) Index;
    910   1.1    jruoho 
    911   1.1    jruoho         Status = AcpiDsCreateOperand (WalkState, Arg, Index);
    912   1.1    jruoho         if (ACPI_FAILURE (Status))
    913   1.1    jruoho         {
    914   1.1    jruoho             goto Cleanup;
    915   1.1    jruoho         }
    916   1.1    jruoho 
    917   1.2  christos         ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
    918   1.2  christos             "Created Arg #%u (%p) %u args total\n",
    919   1.2  christos             Index, Arg, ArgCount));
    920   1.1    jruoho         Index--;
    921   1.1    jruoho     }
    922   1.1    jruoho 
    923   1.1    jruoho     return_ACPI_STATUS (Status);
    924   1.1    jruoho 
    925   1.1    jruoho 
    926   1.1    jruoho Cleanup:
    927   1.1    jruoho     /*
    928   1.1    jruoho      * We must undo everything done above; meaning that we must
    929   1.1    jruoho      * pop everything off of the operand stack and delete those
    930   1.1    jruoho      * objects
    931   1.1    jruoho      */
    932  1.18  christos     WalkState->NumOperands = (UINT8) (i);
    933  1.18  christos     AcpiDsObjStackPopAndDelete (NewNumOperands, WalkState);
    934  1.18  christos 
    935  1.18  christos     /* Restore operand count */
    936  1.18  christos     WalkState->NumOperands = (UINT8) (PrevNumOperands);
    937   1.1    jruoho 
    938   1.1    jruoho     ACPI_EXCEPTION ((AE_INFO, Status, "While creating Arg %u", Index));
    939   1.1    jruoho     return_ACPI_STATUS (Status);
    940   1.1    jruoho }
    941   1.1    jruoho 
    942   1.1    jruoho 
    943   1.1    jruoho /*****************************************************************************
    944   1.1    jruoho  *
    945   1.1    jruoho  * FUNCTION:    AcpiDsEvaluateNamePath
    946   1.1    jruoho  *
    947   1.1    jruoho  * PARAMETERS:  WalkState       - Current state of the parse tree walk,
    948   1.1    jruoho  *                                the opcode of current operation should be
    949   1.1    jruoho  *                                AML_INT_NAMEPATH_OP
    950   1.1    jruoho  *
    951   1.1    jruoho  * RETURN:      Status
    952   1.1    jruoho  *
    953   1.1    jruoho  * DESCRIPTION: Translate the -NamePath- parse tree object to the equivalent
    954   1.1    jruoho  *              interpreter object, convert it to value, if needed, duplicate
    955   1.1    jruoho  *              it, if needed, and push it onto the current result stack.
    956   1.1    jruoho  *
    957   1.1    jruoho  ****************************************************************************/
    958   1.1    jruoho 
    959   1.1    jruoho ACPI_STATUS
    960   1.1    jruoho AcpiDsEvaluateNamePath (
    961   1.1    jruoho     ACPI_WALK_STATE         *WalkState)
    962   1.1    jruoho {
    963   1.1    jruoho     ACPI_STATUS             Status = AE_OK;
    964   1.1    jruoho     ACPI_PARSE_OBJECT       *Op = WalkState->Op;
    965   1.1    jruoho     ACPI_OPERAND_OBJECT     **Operand = &WalkState->Operands[0];
    966   1.1    jruoho     ACPI_OPERAND_OBJECT     *NewObjDesc;
    967   1.1    jruoho     UINT8                   Type;
    968   1.1    jruoho 
    969   1.1    jruoho 
    970   1.1    jruoho     ACPI_FUNCTION_TRACE_PTR (DsEvaluateNamePath, WalkState);
    971   1.1    jruoho 
    972   1.1    jruoho 
    973   1.1    jruoho     if (!Op->Common.Parent)
    974   1.1    jruoho     {
    975   1.1    jruoho         /* This happens after certain exception processing */
    976   1.1    jruoho 
    977   1.1    jruoho         goto Exit;
    978   1.1    jruoho     }
    979   1.1    jruoho 
    980   1.1    jruoho     if ((Op->Common.Parent->Common.AmlOpcode == AML_PACKAGE_OP) ||
    981   1.8  christos         (Op->Common.Parent->Common.AmlOpcode == AML_VARIABLE_PACKAGE_OP) ||
    982   1.1    jruoho         (Op->Common.Parent->Common.AmlOpcode == AML_REF_OF_OP))
    983   1.1    jruoho     {
    984   1.1    jruoho         /* TBD: Should we specify this feature as a bit of OpInfo->Flags of these opcodes? */
    985   1.1    jruoho 
    986   1.1    jruoho         goto Exit;
    987   1.1    jruoho     }
    988   1.1    jruoho 
    989   1.1    jruoho     Status = AcpiDsCreateOperand (WalkState, Op, 0);
    990   1.1    jruoho     if (ACPI_FAILURE (Status))
    991   1.1    jruoho     {
    992   1.1    jruoho         goto Exit;
    993   1.1    jruoho     }
    994   1.1    jruoho 
    995   1.1    jruoho     if (Op->Common.Flags & ACPI_PARSEOP_TARGET)
    996   1.1    jruoho     {
    997   1.1    jruoho         NewObjDesc = *Operand;
    998   1.1    jruoho         goto PushResult;
    999   1.1    jruoho     }
   1000   1.1    jruoho 
   1001   1.1    jruoho     Type = (*Operand)->Common.Type;
   1002   1.1    jruoho 
   1003   1.1    jruoho     Status = AcpiExResolveToValue (Operand, WalkState);
   1004   1.1    jruoho     if (ACPI_FAILURE (Status))
   1005   1.1    jruoho     {
   1006   1.1    jruoho         goto Exit;
   1007   1.1    jruoho     }
   1008   1.1    jruoho 
   1009   1.1    jruoho     if (Type == ACPI_TYPE_INTEGER)
   1010   1.1    jruoho     {
   1011   1.1    jruoho         /* It was incremented by AcpiExResolveToValue */
   1012   1.1    jruoho 
   1013   1.1    jruoho         AcpiUtRemoveReference (*Operand);
   1014   1.1    jruoho 
   1015   1.5  christos         Status = AcpiUtCopyIobjectToIobject (
   1016   1.5  christos             *Operand, &NewObjDesc, WalkState);
   1017   1.1    jruoho         if (ACPI_FAILURE (Status))
   1018   1.1    jruoho         {
   1019   1.1    jruoho             goto Exit;
   1020   1.1    jruoho         }
   1021   1.1    jruoho     }
   1022   1.1    jruoho     else
   1023   1.1    jruoho     {
   1024   1.1    jruoho         /*
   1025   1.1    jruoho          * The object either was anew created or is
   1026   1.1    jruoho          * a Namespace node - don't decrement it.
   1027   1.1    jruoho          */
   1028   1.1    jruoho         NewObjDesc = *Operand;
   1029   1.1    jruoho     }
   1030   1.1    jruoho 
   1031   1.1    jruoho     /* Cleanup for name-path operand */
   1032   1.1    jruoho 
   1033   1.1    jruoho     Status = AcpiDsObjStackPop (1, WalkState);
   1034   1.1    jruoho     if (ACPI_FAILURE (Status))
   1035   1.1    jruoho     {
   1036   1.1    jruoho         WalkState->ResultObj = NewObjDesc;
   1037   1.1    jruoho         goto Exit;
   1038   1.1    jruoho     }
   1039   1.1    jruoho 
   1040   1.1    jruoho PushResult:
   1041   1.1    jruoho 
   1042   1.1    jruoho     WalkState->ResultObj = NewObjDesc;
   1043   1.1    jruoho 
   1044   1.1    jruoho     Status = AcpiDsResultPush (WalkState->ResultObj, WalkState);
   1045   1.1    jruoho     if (ACPI_SUCCESS (Status))
   1046   1.1    jruoho     {
   1047   1.1    jruoho         /* Force to take it from stack */
   1048   1.1    jruoho 
   1049   1.1    jruoho         Op->Common.Flags |= ACPI_PARSEOP_IN_STACK;
   1050   1.1    jruoho     }
   1051   1.1    jruoho 
   1052   1.1    jruoho Exit:
   1053   1.1    jruoho 
   1054   1.1    jruoho     return_ACPI_STATUS (Status);
   1055   1.1    jruoho }
   1056