Home | History | Annotate | Line # | Download | only in debugger
      1   1.1    jruoho /*******************************************************************************
      2   1.1    jruoho  *
      3   1.1    jruoho  * Module Name: dbmethod - Debug commands for control methods
      4   1.1    jruoho  *
      5   1.1    jruoho  ******************************************************************************/
      6   1.1    jruoho 
      7  1.20  christos /******************************************************************************
      8  1.20  christos  *
      9  1.20  christos  * 1. Copyright Notice
     10  1.20  christos  *
     11  1.21  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.20  christos  * 2. License
     15  1.20  christos  *
     16  1.20  christos  * 2.1. This is your license from Intel Corp. under its intellectual property
     17  1.20  christos  * rights. You may have additional license terms from the party that provided
     18  1.20  christos  * you this software, covering your right to use that party's intellectual
     19  1.20  christos  * property rights.
     20  1.20  christos  *
     21  1.20  christos  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
     22  1.20  christos  * copy of the source code appearing in this file ("Covered Code") an
     23  1.20  christos  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
     24  1.20  christos  * base code distributed originally by Intel ("Original Intel Code") to copy,
     25  1.20  christos  * make derivatives, distribute, use and display any portion of the Covered
     26  1.20  christos  * Code in any form, with the right to sublicense such rights; and
     27  1.20  christos  *
     28  1.20  christos  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
     29  1.20  christos  * license (with the right to sublicense), under only those claims of Intel
     30  1.20  christos  * patents that are infringed by the Original Intel Code, to make, use, sell,
     31  1.20  christos  * offer to sell, and import the Covered Code and derivative works thereof
     32  1.20  christos  * solely to the minimum extent necessary to exercise the above copyright
     33  1.20  christos  * license, and in no event shall the patent license extend to any additions
     34  1.20  christos  * to or modifications of the Original Intel Code. No other license or right
     35  1.20  christos  * is granted directly or by implication, estoppel or otherwise;
     36  1.20  christos  *
     37  1.20  christos  * The above copyright and patent license is granted only if the following
     38  1.20  christos  * conditions are met:
     39  1.20  christos  *
     40  1.20  christos  * 3. Conditions
     41  1.20  christos  *
     42  1.20  christos  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
     43  1.20  christos  * Redistribution of source code of any substantial portion of the Covered
     44  1.20  christos  * Code or modification with rights to further distribute source must include
     45  1.20  christos  * the above Copyright Notice, the above License, this list of Conditions,
     46  1.20  christos  * and the following Disclaimer and Export Compliance provision. In addition,
     47  1.20  christos  * Licensee must cause all Covered Code to which Licensee contributes to
     48  1.20  christos  * contain a file documenting the changes Licensee made to create that Covered
     49  1.20  christos  * Code and the date of any change. Licensee must include in that file the
     50  1.20  christos  * documentation of any changes made by any predecessor Licensee. Licensee
     51  1.20  christos  * must include a prominent statement that the modification is derived,
     52  1.20  christos  * directly or indirectly, from Original Intel Code.
     53  1.20  christos  *
     54  1.20  christos  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
     55  1.20  christos  * Redistribution of source code of any substantial portion of the Covered
     56  1.20  christos  * Code or modification without rights to further distribute source must
     57  1.20  christos  * include the following Disclaimer and Export Compliance provision in the
     58  1.20  christos  * documentation and/or other materials provided with distribution. In
     59  1.20  christos  * addition, Licensee may not authorize further sublicense of source of any
     60  1.20  christos  * portion of the Covered Code, and must include terms to the effect that the
     61  1.20  christos  * license from Licensee to its licensee is limited to the intellectual
     62  1.20  christos  * property embodied in the software Licensee provides to its licensee, and
     63  1.20  christos  * not to intellectual property embodied in modifications its licensee may
     64  1.20  christos  * make.
     65  1.20  christos  *
     66  1.20  christos  * 3.3. Redistribution of Executable. Redistribution in executable form of any
     67  1.20  christos  * substantial portion of the Covered Code or modification must reproduce the
     68  1.20  christos  * above Copyright Notice, and the following Disclaimer and Export Compliance
     69  1.20  christos  * provision in the documentation and/or other materials provided with the
     70  1.20  christos  * distribution.
     71  1.20  christos  *
     72  1.20  christos  * 3.4. Intel retains all right, title, and interest in and to the Original
     73  1.20  christos  * Intel Code.
     74  1.20  christos  *
     75  1.20  christos  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
     76  1.20  christos  * Intel shall be used in advertising or otherwise to promote the sale, use or
     77  1.20  christos  * other dealings in products derived from or relating to the Covered Code
     78  1.20  christos  * without prior written authorization from Intel.
     79  1.20  christos  *
     80  1.20  christos  * 4. Disclaimer and Export Compliance
     81  1.20  christos  *
     82  1.20  christos  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
     83  1.20  christos  * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
     84  1.20  christos  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
     85  1.20  christos  * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
     86  1.20  christos  * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
     87  1.20  christos  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
     88  1.20  christos  * PARTICULAR PURPOSE.
     89  1.20  christos  *
     90  1.20  christos  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
     91  1.20  christos  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
     92  1.20  christos  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
     93  1.20  christos  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
     94  1.20  christos  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
     95  1.20  christos  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
     96  1.20  christos  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
     97  1.20  christos  * LIMITED REMEDY.
     98  1.20  christos  *
     99  1.20  christos  * 4.3. Licensee shall not export, either directly or indirectly, any of this
    100  1.20  christos  * software or system incorporating such software without first obtaining any
    101  1.20  christos  * required license or other approval from the U. S. Department of Commerce or
    102  1.20  christos  * any other agency or department of the United States Government. In the
    103  1.20  christos  * event Licensee exports any such software from the United States or
    104  1.20  christos  * re-exports any such software from a foreign destination, Licensee shall
    105  1.20  christos  * ensure that the distribution and export/re-export of the software is in
    106  1.20  christos  * compliance with all laws, regulations, orders, or other restrictions of the
    107  1.20  christos  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
    108  1.20  christos  * any of its subsidiaries will export/re-export any technical data, process,
    109  1.20  christos  * software, or service, directly or indirectly, to any country for which the
    110  1.20  christos  * United States government or any agency thereof requires an export license,
    111  1.20  christos  * other governmental approval, or letter of assurance, without first obtaining
    112  1.20  christos  * such license, approval or letter.
    113  1.20  christos  *
    114  1.20  christos  *****************************************************************************
    115  1.20  christos  *
    116  1.20  christos  * Alternatively, you may choose to be licensed under the terms of the
    117  1.20  christos  * following license:
    118  1.20  christos  *
    119   1.1    jruoho  * Redistribution and use in source and binary forms, with or without
    120   1.1    jruoho  * modification, are permitted provided that the following conditions
    121   1.1    jruoho  * are met:
    122   1.1    jruoho  * 1. Redistributions of source code must retain the above copyright
    123   1.1    jruoho  *    notice, this list of conditions, and the following disclaimer,
    124   1.1    jruoho  *    without modification.
    125   1.1    jruoho  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
    126   1.1    jruoho  *    substantially similar to the "NO WARRANTY" disclaimer below
    127   1.1    jruoho  *    ("Disclaimer") and any redistribution must be conditioned upon
    128   1.1    jruoho  *    including a substantially similar Disclaimer requirement for further
    129   1.1    jruoho  *    binary redistribution.
    130   1.1    jruoho  * 3. Neither the names of the above-listed copyright holders nor the names
    131   1.1    jruoho  *    of any contributors may be used to endorse or promote products derived
    132   1.1    jruoho  *    from this software without specific prior written permission.
    133   1.1    jruoho  *
    134   1.1    jruoho  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
    135   1.1    jruoho  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
    136  1.17  christos  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
    137   1.1    jruoho  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
    138  1.20  christos  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
    139  1.20  christos  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
    140  1.20  christos  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
    141  1.20  christos  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
    142  1.20  christos  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
    143  1.20  christos  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
    144  1.20  christos  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
    145  1.20  christos  *
    146  1.20  christos  * Alternatively, you may choose to be licensed under the terms of the
    147  1.20  christos  * GNU General Public License ("GPL") version 2 as published by the Free
    148  1.20  christos  * Software Foundation.
    149  1.20  christos  *
    150  1.20  christos  *****************************************************************************/
    151   1.1    jruoho 
    152   1.1    jruoho #include "acpi.h"
    153   1.1    jruoho #include "accommon.h"
    154   1.1    jruoho #include "acdispat.h"
    155   1.1    jruoho #include "acnamesp.h"
    156   1.1    jruoho #include "acdebug.h"
    157   1.1    jruoho #include "acparser.h"
    158   1.2  christos #include "acpredef.h"
    159   1.1    jruoho 
    160   1.1    jruoho 
    161   1.1    jruoho #define _COMPONENT          ACPI_CA_DEBUGGER
    162   1.1    jruoho         ACPI_MODULE_NAME    ("dbmethod")
    163   1.1    jruoho 
    164   1.7  christos /* Local prototypes */
    165   1.7  christos 
    166   1.7  christos static ACPI_STATUS
    167   1.7  christos AcpiDbWalkForExecute (
    168   1.7  christos     ACPI_HANDLE             ObjHandle,
    169   1.7  christos     UINT32                  NestingLevel,
    170   1.7  christos     void                    *Context,
    171   1.7  christos     void                    **ReturnValue);
    172   1.7  christos 
    173  1.16  christos static ACPI_STATUS
    174  1.16  christos AcpiDbEvaluateObject (
    175  1.16  christos     ACPI_NAMESPACE_NODE     *Node);
    176  1.16  christos 
    177   1.1    jruoho 
    178   1.1    jruoho /*******************************************************************************
    179   1.1    jruoho  *
    180   1.1    jruoho  * FUNCTION:    AcpiDbSetMethodBreakpoint
    181   1.1    jruoho  *
    182   1.1    jruoho  * PARAMETERS:  Location            - AML offset of breakpoint
    183   1.1    jruoho  *              WalkState           - Current walk info
    184   1.1    jruoho  *              Op                  - Current Op (from parse walk)
    185   1.1    jruoho  *
    186   1.1    jruoho  * RETURN:      None
    187   1.1    jruoho  *
    188   1.1    jruoho  * DESCRIPTION: Set a breakpoint in a control method at the specified
    189   1.1    jruoho  *              AML offset
    190   1.1    jruoho  *
    191   1.1    jruoho  ******************************************************************************/
    192   1.1    jruoho 
    193   1.1    jruoho void
    194   1.1    jruoho AcpiDbSetMethodBreakpoint (
    195   1.1    jruoho     char                    *Location,
    196   1.1    jruoho     ACPI_WALK_STATE         *WalkState,
    197   1.1    jruoho     ACPI_PARSE_OBJECT       *Op)
    198   1.1    jruoho {
    199   1.1    jruoho     UINT32                  Address;
    200   1.5  christos     UINT32                  AmlOffset;
    201   1.1    jruoho 
    202   1.1    jruoho 
    203   1.1    jruoho     if (!Op)
    204   1.1    jruoho     {
    205   1.1    jruoho         AcpiOsPrintf ("There is no method currently executing\n");
    206   1.1    jruoho         return;
    207   1.1    jruoho     }
    208   1.1    jruoho 
    209   1.1    jruoho     /* Get and verify the breakpoint address */
    210   1.1    jruoho 
    211   1.5  christos     Address = strtoul (Location, NULL, 16);
    212   1.5  christos     AmlOffset = (UINT32) ACPI_PTR_DIFF (Op->Common.Aml,
    213   1.6  christos         WalkState->ParserState.AmlStart);
    214   1.5  christos     if (Address <= AmlOffset)
    215   1.1    jruoho     {
    216   1.1    jruoho         AcpiOsPrintf ("Breakpoint %X is beyond current address %X\n",
    217   1.5  christos             Address, AmlOffset);
    218   1.1    jruoho     }
    219   1.1    jruoho 
    220   1.1    jruoho     /* Save breakpoint in current walk */
    221   1.1    jruoho 
    222   1.1    jruoho     WalkState->UserBreakpoint = Address;
    223   1.1    jruoho     AcpiOsPrintf ("Breakpoint set at AML offset %X\n", Address);
    224   1.1    jruoho }
    225   1.1    jruoho 
    226   1.1    jruoho 
    227   1.1    jruoho /*******************************************************************************
    228   1.1    jruoho  *
    229   1.1    jruoho  * FUNCTION:    AcpiDbSetMethodCallBreakpoint
    230   1.1    jruoho  *
    231   1.1    jruoho  * PARAMETERS:  Op                  - Current Op (from parse walk)
    232   1.1    jruoho  *
    233   1.1    jruoho  * RETURN:      None
    234   1.1    jruoho  *
    235   1.1    jruoho  * DESCRIPTION: Set a breakpoint in a control method at the specified
    236   1.1    jruoho  *              AML offset
    237   1.1    jruoho  *
    238   1.1    jruoho  ******************************************************************************/
    239   1.1    jruoho 
    240   1.1    jruoho void
    241   1.1    jruoho AcpiDbSetMethodCallBreakpoint (
    242   1.1    jruoho     ACPI_PARSE_OBJECT       *Op)
    243   1.1    jruoho {
    244   1.1    jruoho 
    245   1.1    jruoho 
    246   1.1    jruoho     if (!Op)
    247   1.1    jruoho     {
    248   1.1    jruoho         AcpiOsPrintf ("There is no method currently executing\n");
    249   1.1    jruoho         return;
    250   1.1    jruoho     }
    251   1.1    jruoho 
    252   1.1    jruoho     AcpiGbl_StepToNextCall = TRUE;
    253   1.1    jruoho }
    254   1.1    jruoho 
    255   1.1    jruoho 
    256   1.1    jruoho /*******************************************************************************
    257   1.1    jruoho  *
    258   1.1    jruoho  * FUNCTION:    AcpiDbSetMethodData
    259   1.1    jruoho  *
    260   1.1    jruoho  * PARAMETERS:  TypeArg         - L for local, A for argument
    261   1.1    jruoho  *              IndexArg        - which one
    262   1.1    jruoho  *              ValueArg        - Value to set.
    263   1.1    jruoho  *
    264   1.1    jruoho  * RETURN:      None
    265   1.1    jruoho  *
    266   1.1    jruoho  * DESCRIPTION: Set a local or argument for the running control method.
    267   1.1    jruoho  *              NOTE: only object supported is Number.
    268   1.1    jruoho  *
    269   1.1    jruoho  ******************************************************************************/
    270   1.1    jruoho 
    271   1.1    jruoho void
    272   1.1    jruoho AcpiDbSetMethodData (
    273   1.1    jruoho     char                    *TypeArg,
    274   1.1    jruoho     char                    *IndexArg,
    275   1.1    jruoho     char                    *ValueArg)
    276   1.1    jruoho {
    277   1.1    jruoho     char                    Type;
    278   1.1    jruoho     UINT32                  Index;
    279   1.1    jruoho     UINT32                  Value;
    280   1.1    jruoho     ACPI_WALK_STATE         *WalkState;
    281   1.1    jruoho     ACPI_OPERAND_OBJECT     *ObjDesc;
    282   1.1    jruoho     ACPI_STATUS             Status;
    283   1.1    jruoho     ACPI_NAMESPACE_NODE     *Node;
    284   1.1    jruoho 
    285   1.1    jruoho 
    286   1.1    jruoho     /* Validate TypeArg */
    287   1.1    jruoho 
    288   1.1    jruoho     AcpiUtStrupr (TypeArg);
    289   1.1    jruoho     Type = TypeArg[0];
    290   1.1    jruoho     if ((Type != 'L') &&
    291   1.1    jruoho         (Type != 'A') &&
    292   1.1    jruoho         (Type != 'N'))
    293   1.1    jruoho     {
    294   1.1    jruoho         AcpiOsPrintf ("Invalid SET operand: %s\n", TypeArg);
    295   1.1    jruoho         return;
    296   1.1    jruoho     }
    297   1.1    jruoho 
    298   1.5  christos     Value = strtoul (ValueArg, NULL, 16);
    299   1.1    jruoho 
    300   1.1    jruoho     if (Type == 'N')
    301   1.1    jruoho     {
    302   1.1    jruoho         Node = AcpiDbConvertToNode (IndexArg);
    303   1.3  christos         if (!Node)
    304   1.3  christos         {
    305   1.3  christos             return;
    306   1.3  christos         }
    307   1.3  christos 
    308   1.1    jruoho         if (Node->Type != ACPI_TYPE_INTEGER)
    309   1.1    jruoho         {
    310   1.1    jruoho             AcpiOsPrintf ("Can only set Integer nodes\n");
    311   1.1    jruoho             return;
    312   1.1    jruoho         }
    313   1.1    jruoho         ObjDesc = Node->Object;
    314   1.1    jruoho         ObjDesc->Integer.Value = Value;
    315   1.1    jruoho         return;
    316   1.1    jruoho     }
    317   1.1    jruoho 
    318   1.1    jruoho     /* Get the index and value */
    319   1.1    jruoho 
    320   1.5  christos     Index = strtoul (IndexArg, NULL, 16);
    321   1.1    jruoho 
    322   1.1    jruoho     WalkState = AcpiDsGetCurrentWalkState (AcpiGbl_CurrentWalkList);
    323   1.1    jruoho     if (!WalkState)
    324   1.1    jruoho     {
    325   1.1    jruoho         AcpiOsPrintf ("There is no method currently executing\n");
    326   1.1    jruoho         return;
    327   1.1    jruoho     }
    328   1.1    jruoho 
    329   1.1    jruoho     /* Create and initialize the new object */
    330   1.1    jruoho 
    331   1.1    jruoho     ObjDesc = AcpiUtCreateIntegerObject ((UINT64) Value);
    332   1.1    jruoho     if (!ObjDesc)
    333   1.1    jruoho     {
    334   1.1    jruoho         AcpiOsPrintf ("Could not create an internal object\n");
    335   1.1    jruoho         return;
    336   1.1    jruoho     }
    337   1.1    jruoho 
    338   1.1    jruoho     /* Store the new object into the target */
    339   1.1    jruoho 
    340   1.1    jruoho     switch (Type)
    341   1.1    jruoho     {
    342   1.1    jruoho     case 'A':
    343   1.1    jruoho 
    344   1.1    jruoho         /* Set a method argument */
    345   1.1    jruoho 
    346   1.1    jruoho         if (Index > ACPI_METHOD_MAX_ARG)
    347   1.1    jruoho         {
    348   1.6  christos             AcpiOsPrintf ("Arg%u - Invalid argument name\n",
    349   1.6  christos                 Index);
    350   1.1    jruoho             goto Cleanup;
    351   1.1    jruoho         }
    352   1.1    jruoho 
    353   1.6  christos         Status = AcpiDsStoreObjectToLocal (ACPI_REFCLASS_ARG,
    354   1.6  christos             Index, ObjDesc, WalkState);
    355   1.1    jruoho         if (ACPI_FAILURE (Status))
    356   1.1    jruoho         {
    357   1.1    jruoho             goto Cleanup;
    358   1.1    jruoho         }
    359   1.1    jruoho 
    360   1.1    jruoho         ObjDesc = WalkState->Arguments[Index].Object;
    361   1.1    jruoho 
    362   1.1    jruoho         AcpiOsPrintf ("Arg%u: ", Index);
    363   1.5  christos         AcpiDbDisplayInternalObject (ObjDesc, WalkState);
    364   1.1    jruoho         break;
    365   1.1    jruoho 
    366   1.1    jruoho     case 'L':
    367   1.1    jruoho 
    368   1.1    jruoho         /* Set a method local */
    369   1.1    jruoho 
    370   1.1    jruoho         if (Index > ACPI_METHOD_MAX_LOCAL)
    371   1.1    jruoho         {
    372   1.6  christos             AcpiOsPrintf ("Local%u - Invalid local variable name\n",
    373   1.6  christos                 Index);
    374   1.1    jruoho             goto Cleanup;
    375   1.1    jruoho         }
    376   1.1    jruoho 
    377   1.6  christos         Status = AcpiDsStoreObjectToLocal (ACPI_REFCLASS_LOCAL,
    378   1.6  christos             Index, ObjDesc, WalkState);
    379   1.1    jruoho         if (ACPI_FAILURE (Status))
    380   1.1    jruoho         {
    381   1.1    jruoho             goto Cleanup;
    382   1.1    jruoho         }
    383   1.1    jruoho 
    384   1.1    jruoho         ObjDesc = WalkState->LocalVariables[Index].Object;
    385   1.1    jruoho 
    386   1.1    jruoho         AcpiOsPrintf ("Local%u: ", Index);
    387   1.5  christos         AcpiDbDisplayInternalObject (ObjDesc, WalkState);
    388   1.1    jruoho         break;
    389   1.1    jruoho 
    390   1.1    jruoho     default:
    391   1.2  christos 
    392   1.1    jruoho         break;
    393   1.1    jruoho     }
    394   1.1    jruoho 
    395   1.1    jruoho Cleanup:
    396   1.1    jruoho     AcpiUtRemoveReference (ObjDesc);
    397   1.1    jruoho }
    398   1.1    jruoho 
    399   1.1    jruoho 
    400  1.11  christos #ifdef ACPI_DISASSEMBLER
    401   1.1    jruoho /*******************************************************************************
    402   1.1    jruoho  *
    403   1.1    jruoho  * FUNCTION:    AcpiDbDisassembleAml
    404   1.1    jruoho  *
    405   1.1    jruoho  * PARAMETERS:  Statements          - Number of statements to disassemble
    406   1.1    jruoho  *              Op                  - Current Op (from parse walk)
    407   1.1    jruoho  *
    408   1.1    jruoho  * RETURN:      None
    409   1.1    jruoho  *
    410   1.1    jruoho  * DESCRIPTION: Display disassembled AML (ASL) starting from Op for the number
    411   1.1    jruoho  *              of statements specified.
    412   1.1    jruoho  *
    413   1.1    jruoho  ******************************************************************************/
    414   1.1    jruoho 
    415   1.1    jruoho void
    416   1.1    jruoho AcpiDbDisassembleAml (
    417   1.1    jruoho     char                    *Statements,
    418   1.1    jruoho     ACPI_PARSE_OBJECT       *Op)
    419   1.1    jruoho {
    420   1.1    jruoho     UINT32                  NumStatements = 8;
    421   1.1    jruoho 
    422   1.1    jruoho 
    423   1.1    jruoho     if (!Op)
    424   1.1    jruoho     {
    425   1.1    jruoho         AcpiOsPrintf ("There is no method currently executing\n");
    426   1.1    jruoho         return;
    427   1.1    jruoho     }
    428   1.1    jruoho 
    429   1.1    jruoho     if (Statements)
    430   1.1    jruoho     {
    431   1.5  christos         NumStatements = strtoul (Statements, NULL, 0);
    432   1.1    jruoho     }
    433   1.1    jruoho 
    434   1.1    jruoho     AcpiDmDisassemble (NULL, Op, NumStatements);
    435   1.1    jruoho }
    436   1.1    jruoho 
    437   1.1    jruoho 
    438   1.1    jruoho /*******************************************************************************
    439   1.1    jruoho  *
    440   1.1    jruoho  * FUNCTION:    AcpiDbDisassembleMethod
    441   1.1    jruoho  *
    442   1.1    jruoho  * PARAMETERS:  Name            - Name of control method
    443   1.1    jruoho  *
    444   1.1    jruoho  * RETURN:      None
    445   1.1    jruoho  *
    446   1.1    jruoho  * DESCRIPTION: Display disassembled AML (ASL) starting from Op for the number
    447   1.1    jruoho  *              of statements specified.
    448   1.1    jruoho  *
    449   1.1    jruoho  ******************************************************************************/
    450   1.1    jruoho 
    451   1.1    jruoho ACPI_STATUS
    452   1.1    jruoho AcpiDbDisassembleMethod (
    453   1.1    jruoho     char                    *Name)
    454   1.1    jruoho {
    455   1.1    jruoho     ACPI_STATUS             Status;
    456   1.1    jruoho     ACPI_PARSE_OBJECT       *Op;
    457   1.1    jruoho     ACPI_WALK_STATE         *WalkState;
    458   1.1    jruoho     ACPI_OPERAND_OBJECT     *ObjDesc;
    459   1.1    jruoho     ACPI_NAMESPACE_NODE     *Method;
    460   1.1    jruoho 
    461   1.1    jruoho 
    462   1.1    jruoho     Method = AcpiDbConvertToNode (Name);
    463   1.1    jruoho     if (!Method)
    464   1.1    jruoho     {
    465   1.1    jruoho         return (AE_BAD_PARAMETER);
    466   1.1    jruoho     }
    467   1.1    jruoho 
    468   1.2  christos     if (Method->Type != ACPI_TYPE_METHOD)
    469   1.2  christos     {
    470   1.2  christos         ACPI_ERROR ((AE_INFO, "%s (%s): Object must be a control method",
    471   1.2  christos             Name, AcpiUtGetTypeName (Method->Type)));
    472   1.2  christos         return (AE_BAD_PARAMETER);
    473   1.2  christos     }
    474   1.2  christos 
    475   1.1    jruoho     ObjDesc = Method->Object;
    476   1.1    jruoho 
    477   1.5  christos     Op = AcpiPsCreateScopeOp (ObjDesc->Method.AmlStart);
    478   1.1    jruoho     if (!Op)
    479   1.1    jruoho     {
    480   1.1    jruoho         return (AE_NO_MEMORY);
    481   1.1    jruoho     }
    482   1.1    jruoho 
    483   1.1    jruoho     /* Create and initialize a new walk state */
    484   1.1    jruoho 
    485   1.1    jruoho     WalkState = AcpiDsCreateWalkState (0, Op, NULL, NULL);
    486   1.1    jruoho     if (!WalkState)
    487   1.1    jruoho     {
    488   1.1    jruoho         return (AE_NO_MEMORY);
    489   1.1    jruoho     }
    490   1.1    jruoho 
    491   1.1    jruoho     Status = AcpiDsInitAmlWalk (WalkState, Op, NULL,
    492   1.2  christos         ObjDesc->Method.AmlStart,
    493   1.2  christos         ObjDesc->Method.AmlLength, NULL, ACPI_IMODE_LOAD_PASS1);
    494   1.2  christos     if (ACPI_FAILURE (Status))
    495   1.2  christos     {
    496   1.2  christos         return (Status);
    497   1.2  christos     }
    498   1.2  christos 
    499   1.2  christos     Status = AcpiUtAllocateOwnerId (&ObjDesc->Method.OwnerId);
    500  1.13  christos     if (ACPI_FAILURE(Status))
    501  1.13  christos     {
    502  1.13  christos         return (Status);
    503  1.13  christos     }
    504  1.13  christos 
    505   1.2  christos     WalkState->OwnerId = ObjDesc->Method.OwnerId;
    506   1.2  christos 
    507   1.2  christos     /* Push start scope on scope stack and make it current */
    508   1.2  christos 
    509   1.2  christos     Status = AcpiDsScopeStackPush (Method,
    510   1.2  christos         Method->Type, WalkState);
    511   1.1    jruoho     if (ACPI_FAILURE (Status))
    512   1.1    jruoho     {
    513   1.1    jruoho         return (Status);
    514   1.1    jruoho     }
    515   1.1    jruoho 
    516   1.2  christos     /* Parse the entire method AML including deferred operators */
    517   1.1    jruoho 
    518   1.1    jruoho     WalkState->ParseFlags &= ~ACPI_PARSE_DELETE_TREE;
    519   1.1    jruoho     WalkState->ParseFlags |= ACPI_PARSE_DISASSEMBLE;
    520   1.2  christos 
    521   1.1    jruoho     Status = AcpiPsParseAml (WalkState);
    522  1.14  christos     if (ACPI_FAILURE(Status))
    523  1.14  christos     {
    524  1.14  christos         return (Status);
    525  1.14  christos     }
    526  1.14  christos 
    527   1.2  christos     (void) AcpiDmParseDeferredOps (Op);
    528   1.2  christos 
    529   1.2  christos     /* Now we can disassemble the method */
    530   1.1    jruoho 
    531   1.6  christos     AcpiGbl_DmOpt_Verbose = FALSE;
    532   1.1    jruoho     AcpiDmDisassemble (NULL, Op, 0);
    533   1.6  christos     AcpiGbl_DmOpt_Verbose = TRUE;
    534   1.2  christos 
    535   1.1    jruoho     AcpiPsDeleteParseTree (Op);
    536   1.2  christos 
    537   1.2  christos     /* Method cleanup */
    538   1.2  christos 
    539   1.2  christos     AcpiNsDeleteNamespaceSubtree (Method);
    540   1.2  christos     AcpiNsDeleteNamespaceByOwner (ObjDesc->Method.OwnerId);
    541   1.2  christos     AcpiUtReleaseOwnerId (&ObjDesc->Method.OwnerId);
    542   1.1    jruoho     return (AE_OK);
    543   1.1    jruoho }
    544  1.11  christos #endif
    545   1.7  christos 
    546   1.7  christos 
    547   1.7  christos /*******************************************************************************
    548   1.7  christos  *
    549  1.16  christos  * FUNCTION:    AcpiDbEvaluateObject
    550   1.7  christos  *
    551  1.16  christos  * PARAMETERS:  Node                - Namespace node for the object
    552   1.7  christos  *
    553   1.7  christos  * RETURN:      Status
    554   1.7  christos  *
    555  1.16  christos  * DESCRIPTION: Main execution function for the Evaluate/Execute/All debugger
    556  1.16  christos  *              commands.
    557   1.7  christos  *
    558   1.7  christos  ******************************************************************************/
    559   1.7  christos 
    560   1.7  christos static ACPI_STATUS
    561  1.16  christos AcpiDbEvaluateObject (
    562  1.16  christos     ACPI_NAMESPACE_NODE     *Node)
    563   1.7  christos {
    564   1.7  christos     char                    *Pathname;
    565   1.7  christos     UINT32                  i;
    566   1.7  christos     ACPI_DEVICE_INFO        *ObjInfo;
    567   1.7  christos     ACPI_OBJECT_LIST        ParamObjects;
    568   1.7  christos     ACPI_OBJECT             Params[ACPI_METHOD_NUM_ARGS];
    569  1.16  christos     ACPI_BUFFER             ReturnObj;
    570  1.16  christos     ACPI_STATUS             Status;
    571   1.7  christos 
    572   1.7  christos 
    573   1.7  christos     Pathname = AcpiNsGetExternalPathname (Node);
    574   1.7  christos     if (!Pathname)
    575   1.7  christos     {
    576   1.7  christos         return (AE_OK);
    577   1.7  christos     }
    578   1.7  christos 
    579   1.7  christos     /* Get the object info for number of method parameters */
    580   1.7  christos 
    581  1.16  christos     Status = AcpiGetObjectInfo (Node, &ObjInfo);
    582   1.7  christos     if (ACPI_FAILURE (Status))
    583   1.7  christos     {
    584   1.9  christos         ACPI_FREE (Pathname);
    585   1.7  christos         return (Status);
    586   1.7  christos     }
    587   1.7  christos 
    588   1.7  christos     ParamObjects.Pointer = NULL;
    589   1.7  christos     ParamObjects.Count   = 0;
    590   1.7  christos 
    591   1.7  christos     if (ObjInfo->Type == ACPI_TYPE_METHOD)
    592   1.7  christos     {
    593   1.7  christos         /* Setup default parameters */
    594   1.7  christos 
    595   1.7  christos         for (i = 0; i < ObjInfo->ParamCount; i++)
    596   1.7  christos         {
    597   1.7  christos             Params[i].Type           = ACPI_TYPE_INTEGER;
    598   1.7  christos             Params[i].Integer.Value  = 1;
    599   1.7  christos         }
    600   1.7  christos 
    601   1.7  christos         ParamObjects.Pointer     = Params;
    602   1.7  christos         ParamObjects.Count       = ObjInfo->ParamCount;
    603   1.7  christos     }
    604   1.7  christos 
    605   1.7  christos     ACPI_FREE (ObjInfo);
    606   1.7  christos     ReturnObj.Pointer = NULL;
    607   1.7  christos     ReturnObj.Length = ACPI_ALLOCATE_BUFFER;
    608   1.7  christos 
    609   1.7  christos     /* Do the actual method execution */
    610   1.7  christos 
    611   1.7  christos     AcpiGbl_MethodExecuting = TRUE;
    612   1.7  christos 
    613   1.7  christos     Status = AcpiEvaluateObject (Node, NULL, &ParamObjects, &ReturnObj);
    614  1.16  christos     AcpiGbl_MethodExecuting = FALSE;
    615   1.7  christos 
    616   1.7  christos     AcpiOsPrintf ("%-32s returned %s\n", Pathname, AcpiFormatException (Status));
    617  1.16  christos     if (ReturnObj.Length)
    618  1.16  christos     {
    619  1.16  christos         AcpiOsPrintf ("Evaluation of %s returned object %p, "
    620  1.16  christos             "external buffer length %X\n",
    621  1.16  christos             Pathname, ReturnObj.Pointer, (UINT32) ReturnObj.Length);
    622  1.16  christos 
    623  1.16  christos         AcpiDbDumpExternalObject (ReturnObj.Pointer, 1);
    624  1.16  christos         AcpiOsPrintf ("\n");
    625  1.16  christos     }
    626  1.16  christos 
    627   1.7  christos     ACPI_FREE (Pathname);
    628   1.7  christos 
    629   1.7  christos     /* Ignore status from method execution */
    630   1.7  christos 
    631  1.16  christos     return (AE_OK);
    632  1.16  christos 
    633  1.16  christos     /* Update count, check if we have executed enough methods */
    634  1.16  christos 
    635  1.16  christos }
    636  1.16  christos 
    637  1.16  christos /*******************************************************************************
    638  1.16  christos  *
    639  1.16  christos  * FUNCTION:    AcpiDbWalkForExecute
    640  1.16  christos  *
    641  1.16  christos  * PARAMETERS:  Callback from WalkNamespace
    642  1.16  christos  *
    643  1.16  christos  * RETURN:      Status
    644  1.16  christos  *
    645  1.16  christos  * DESCRIPTION: Batch execution function. Evaluates all "predefined" objects --
    646  1.16  christos  *              the nameseg begins with an underscore.
    647  1.16  christos  *
    648  1.16  christos  ******************************************************************************/
    649  1.16  christos 
    650  1.16  christos static ACPI_STATUS
    651  1.16  christos AcpiDbWalkForExecute (
    652  1.16  christos     ACPI_HANDLE             ObjHandle,
    653  1.16  christos     UINT32                  NestingLevel,
    654  1.16  christos     void                    *Context,
    655  1.16  christos     void                    **ReturnValue)
    656  1.16  christos {
    657  1.16  christos     ACPI_NAMESPACE_NODE     *Node = (ACPI_NAMESPACE_NODE *) ObjHandle;
    658  1.16  christos     ACPI_DB_EXECUTE_WALK    *Info = (ACPI_DB_EXECUTE_WALK *) Context;
    659  1.16  christos     ACPI_STATUS             Status;
    660  1.16  christos     const ACPI_PREDEFINED_INFO *Predefined;
    661  1.16  christos 
    662  1.16  christos 
    663  1.16  christos     Predefined = AcpiUtMatchPredefinedMethod (Node->Name.Ascii);
    664  1.16  christos     if (!Predefined)
    665  1.16  christos     {
    666  1.16  christos         return (AE_OK);
    667  1.16  christos     }
    668  1.16  christos 
    669  1.16  christos     if (Node->Type == ACPI_TYPE_LOCAL_SCOPE)
    670  1.16  christos     {
    671  1.16  christos         return (AE_OK);
    672  1.16  christos     }
    673  1.16  christos 
    674  1.16  christos     AcpiDbEvaluateObject (Node);
    675  1.16  christos 
    676  1.16  christos     /* Ignore status from object evaluation */
    677  1.16  christos 
    678   1.7  christos     Status = AE_OK;
    679   1.7  christos 
    680   1.7  christos     /* Update count, check if we have executed enough methods */
    681   1.7  christos 
    682   1.7  christos     Info->Count++;
    683   1.7  christos     if (Info->Count >= Info->MaxCount)
    684   1.7  christos     {
    685   1.7  christos         Status = AE_CTRL_TERMINATE;
    686   1.7  christos     }
    687   1.7  christos 
    688   1.7  christos     return (Status);
    689   1.7  christos }
    690   1.7  christos 
    691   1.7  christos 
    692   1.7  christos /*******************************************************************************
    693   1.7  christos  *
    694  1.16  christos  * FUNCTION:    AcpiDbWalkForExecuteAll
    695  1.16  christos  *
    696  1.16  christos  * PARAMETERS:  Callback from WalkNamespace
    697  1.16  christos  *
    698  1.16  christos  * RETURN:      Status
    699  1.16  christos  *
    700  1.16  christos  * DESCRIPTION: Batch execution function. Evaluates all objects whose path ends
    701  1.16  christos  *              with the nameseg "Info->NameSeg". Used for the "ALL" command.
    702  1.16  christos  *
    703  1.16  christos  ******************************************************************************/
    704  1.16  christos 
    705  1.16  christos static ACPI_STATUS
    706  1.16  christos AcpiDbWalkForExecuteAll (
    707  1.16  christos     ACPI_HANDLE             ObjHandle,
    708  1.16  christos     UINT32                  NestingLevel,
    709  1.16  christos     void                    *Context,
    710  1.16  christos     void                    **ReturnValue)
    711  1.16  christos {
    712  1.16  christos     ACPI_NAMESPACE_NODE     *Node = (ACPI_NAMESPACE_NODE *) ObjHandle;
    713  1.16  christos     ACPI_DB_EXECUTE_WALK    *Info = (ACPI_DB_EXECUTE_WALK *) Context;
    714  1.16  christos     ACPI_STATUS             Status;
    715  1.16  christos 
    716  1.16  christos 
    717  1.16  christos     if (!ACPI_COMPARE_NAMESEG (Node->Name.Ascii, Info->NameSeg))
    718  1.16  christos     {
    719  1.16  christos         return (AE_OK);
    720  1.16  christos     }
    721  1.16  christos 
    722  1.16  christos     if (Node->Type == ACPI_TYPE_LOCAL_SCOPE)
    723  1.16  christos     {
    724  1.16  christos         return (AE_OK);
    725  1.16  christos     }
    726  1.16  christos 
    727  1.16  christos     /* Now evaluate the input object (node) */
    728  1.16  christos 
    729  1.16  christos     AcpiDbEvaluateObject (Node);
    730  1.16  christos 
    731  1.16  christos     /* Ignore status from method execution */
    732  1.16  christos 
    733  1.16  christos     Status = AE_OK;
    734  1.16  christos 
    735  1.16  christos     /* Update count of executed methods/objects */
    736  1.16  christos 
    737  1.16  christos     Info->Count++;
    738  1.16  christos     return (Status);
    739  1.16  christos }
    740  1.16  christos 
    741  1.16  christos 
    742  1.16  christos /*******************************************************************************
    743  1.16  christos  *
    744   1.7  christos  * FUNCTION:    AcpiDbEvaluatePredefinedNames
    745   1.7  christos  *
    746   1.7  christos  * PARAMETERS:  None
    747   1.7  christos  *
    748   1.7  christos  * RETURN:      None
    749   1.7  christos  *
    750   1.7  christos  * DESCRIPTION: Namespace batch execution. Execute predefined names in the
    751   1.7  christos  *              namespace, up to the max count, if specified.
    752   1.7  christos  *
    753   1.7  christos  ******************************************************************************/
    754   1.7  christos 
    755   1.7  christos void
    756   1.7  christos AcpiDbEvaluatePredefinedNames (
    757   1.7  christos     void)
    758   1.7  christos {
    759   1.7  christos     ACPI_DB_EXECUTE_WALK    Info;
    760   1.7  christos 
    761   1.7  christos 
    762   1.7  christos     Info.Count = 0;
    763   1.7  christos     Info.MaxCount = ACPI_UINT32_MAX;
    764   1.7  christos 
    765   1.7  christos     /* Search all nodes in namespace */
    766   1.7  christos 
    767   1.7  christos     (void) AcpiWalkNamespace (ACPI_TYPE_ANY, ACPI_ROOT_OBJECT, ACPI_UINT32_MAX,
    768   1.7  christos                 AcpiDbWalkForExecute, NULL, (void *) &Info, NULL);
    769   1.7  christos 
    770   1.7  christos     AcpiOsPrintf ("Evaluated %u predefined names in the namespace\n", Info.Count);
    771   1.7  christos }
    772  1.16  christos 
    773  1.16  christos 
    774  1.16  christos /*******************************************************************************
    775  1.16  christos  *
    776  1.16  christos  * FUNCTION:    AcpiDbEvaluateAll
    777  1.16  christos  *
    778  1.16  christos  * PARAMETERS:  NoneAcpiGbl_DbMethodInfo
    779  1.16  christos  *
    780  1.16  christos  * RETURN:      None
    781  1.16  christos  *
    782  1.16  christos  * DESCRIPTION: Namespace batch execution. Implements the "ALL" command.
    783  1.16  christos  *              Execute all namepaths whose final nameseg matches the
    784  1.16  christos  *              input nameseg.
    785  1.16  christos  *
    786  1.16  christos  ******************************************************************************/
    787  1.16  christos 
    788  1.16  christos void
    789  1.16  christos AcpiDbEvaluateAll (
    790  1.16  christos     char                    *NameSeg)
    791  1.16  christos {
    792  1.16  christos     ACPI_DB_EXECUTE_WALK    Info;
    793  1.16  christos 
    794  1.16  christos 
    795  1.16  christos     Info.Count = 0;
    796  1.16  christos     Info.MaxCount = ACPI_UINT32_MAX;
    797  1.16  christos     ACPI_COPY_NAMESEG (Info.NameSeg, NameSeg);
    798  1.16  christos     Info.NameSeg[ACPI_NAMESEG_SIZE] = 0;
    799  1.16  christos 
    800  1.16  christos     /* Search all nodes in namespace */
    801  1.16  christos 
    802  1.16  christos     (void) AcpiWalkNamespace (ACPI_TYPE_ANY, ACPI_ROOT_OBJECT, ACPI_UINT32_MAX,
    803  1.16  christos                 AcpiDbWalkForExecuteAll, NULL, (void *) &Info, NULL);
    804  1.16  christos 
    805  1.16  christos     AcpiOsPrintf ("Evaluated %u names in the namespace\n", Info.Count);
    806  1.16  christos }
    807