1/******************************************************************************
2 *
3 * Module Name: dswexec - Dispatcher method execution callbacks;
4 *                        dispatch to interpreter.
5 *
6 *****************************************************************************/
7
8/******************************************************************************
9 *
10 * 1. Copyright Notice
11 *
12 * Some or all of this work - Copyright (c) 1999 - 2018, Intel Corp.
13 * All rights reserved.
14 *
15 * 2. License
16 *
17 * 2.1. This is your license from Intel Corp. under its intellectual property
18 * rights. You may have additional license terms from the party that provided
19 * you this software, covering your right to use that party's intellectual
20 * property rights.
21 *
22 * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
23 * copy of the source code appearing in this file ("Covered Code") an
24 * irrevocable, perpetual, worldwide license under Intel's copyrights in the
25 * base code distributed originally by Intel ("Original Intel Code") to copy,
26 * make derivatives, distribute, use and display any portion of the Covered
27 * Code in any form, with the right to sublicense such rights; and
28 *
29 * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
30 * license (with the right to sublicense), under only those claims of Intel
31 * patents that are infringed by the Original Intel Code, to make, use, sell,
32 * offer to sell, and import the Covered Code and derivative works thereof
33 * solely to the minimum extent necessary to exercise the above copyright
34 * license, and in no event shall the patent license extend to any additions
35 * to or modifications of the Original Intel Code. No other license or right
36 * is granted directly or by implication, estoppel or otherwise;
37 *
38 * The above copyright and patent license is granted only if the following
39 * conditions are met:
40 *
41 * 3. Conditions
42 *
43 * 3.1. Redistribution of Source with Rights to Further Distribute Source.
44 * Redistribution of source code of any substantial portion of the Covered
45 * Code or modification with rights to further distribute source must include
46 * the above Copyright Notice, the above License, this list of Conditions,
47 * and the following Disclaimer and Export Compliance provision. In addition,
48 * Licensee must cause all Covered Code to which Licensee contributes to
49 * contain a file documenting the changes Licensee made to create that Covered
50 * Code and the date of any change. Licensee must include in that file the
51 * documentation of any changes made by any predecessor Licensee. Licensee
52 * must include a prominent statement that the modification is derived,
53 * directly or indirectly, from Original Intel Code.
54 *
55 * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
56 * Redistribution of source code of any substantial portion of the Covered
57 * Code or modification without rights to further distribute source must
58 * include the following Disclaimer and Export Compliance provision in the
59 * documentation and/or other materials provided with distribution. In
60 * addition, Licensee may not authorize further sublicense of source of any
61 * portion of the Covered Code, and must include terms to the effect that the
62 * license from Licensee to its licensee is limited to the intellectual
63 * property embodied in the software Licensee provides to its licensee, and
64 * not to intellectual property embodied in modifications its licensee may
65 * make.
66 *
67 * 3.3. Redistribution of Executable. Redistribution in executable form of any
68 * substantial portion of the Covered Code or modification must reproduce the
69 * above Copyright Notice, and the following Disclaimer and Export Compliance
70 * provision in the documentation and/or other materials provided with the
71 * distribution.
72 *
73 * 3.4. Intel retains all right, title, and interest in and to the Original
74 * Intel Code.
75 *
76 * 3.5. Neither the name Intel nor any other trademark owned or controlled by
77 * Intel shall be used in advertising or otherwise to promote the sale, use or
78 * other dealings in products derived from or relating to the Covered Code
79 * without prior written authorization from Intel.
80 *
81 * 4. Disclaimer and Export Compliance
82 *
83 * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
84 * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
85 * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
86 * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
87 * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
88 * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
89 * PARTICULAR PURPOSE.
90 *
91 * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
92 * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
93 * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
94 * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
95 * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
96 * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
97 * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
98 * LIMITED REMEDY.
99 *
100 * 4.3. Licensee shall not export, either directly or indirectly, any of this
101 * software or system incorporating such software without first obtaining any
102 * required license or other approval from the U. S. Department of Commerce or
103 * any other agency or department of the United States Government. In the
104 * event Licensee exports any such software from the United States or
105 * re-exports any such software from a foreign destination, Licensee shall
106 * ensure that the distribution and export/re-export of the software is in
107 * compliance with all laws, regulations, orders, or other restrictions of the
108 * U.S. Export Administration Regulations. Licensee agrees that neither it nor
109 * any of its subsidiaries will export/re-export any technical data, process,
110 * software, or service, directly or indirectly, to any country for which the
111 * United States government or any agency thereof requires an export license,
112 * other governmental approval, or letter of assurance, without first obtaining
113 * such license, approval or letter.
114 *
115 *****************************************************************************
116 *
117 * Alternatively, you may choose to be licensed under the terms of the
118 * following license:
119 *
120 * Redistribution and use in source and binary forms, with or without
121 * modification, are permitted provided that the following conditions
122 * are met:
123 * 1. Redistributions of source code must retain the above copyright
124 *    notice, this list of conditions, and the following disclaimer,
125 *    without modification.
126 * 2. Redistributions in binary form must reproduce at minimum a disclaimer
127 *    substantially similar to the "NO WARRANTY" disclaimer below
128 *    ("Disclaimer") and any redistribution must be conditioned upon
129 *    including a substantially similar Disclaimer requirement for further
130 *    binary redistribution.
131 * 3. Neither the names of the above-listed copyright holders nor the names
132 *    of any contributors may be used to endorse or promote products derived
133 *    from this software without specific prior written permission.
134 *
135 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
136 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
137 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
138 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
139 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
140 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
141 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
142 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
143 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
144 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
145 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
146 *
147 * Alternatively, you may choose to be licensed under the terms of the
148 * GNU General Public License ("GPL") version 2 as published by the Free
149 * Software Foundation.
150 *
151 *****************************************************************************/
152
153#include "acpi.h"
154#include "accommon.h"
155#include "acparser.h"
156#include "amlcode.h"
157#include "acdispat.h"
158#include "acinterp.h"
159#include "acnamesp.h"
160#include "acdebug.h"
161
162
163#define _COMPONENT          ACPI_DISPATCHER
164        ACPI_MODULE_NAME    ("dswexec")
165
166/*
167 * Dispatch table for opcode classes
168 */
169static ACPI_EXECUTE_OP      AcpiGbl_OpTypeDispatch [] =
170{
171    AcpiExOpcode_0A_0T_1R,
172    AcpiExOpcode_1A_0T_0R,
173    AcpiExOpcode_1A_0T_1R,
174    AcpiExOpcode_1A_1T_0R,
175    AcpiExOpcode_1A_1T_1R,
176    AcpiExOpcode_2A_0T_0R,
177    AcpiExOpcode_2A_0T_1R,
178    AcpiExOpcode_2A_1T_1R,
179    AcpiExOpcode_2A_2T_1R,
180    AcpiExOpcode_3A_0T_0R,
181    AcpiExOpcode_3A_1T_1R,
182    AcpiExOpcode_6A_0T_1R
183};
184
185
186/*****************************************************************************
187 *
188 * FUNCTION:    AcpiDsGetPredicateValue
189 *
190 * PARAMETERS:  WalkState       - Current state of the parse tree walk
191 *              ResultObj       - if non-zero, pop result from result stack
192 *
193 * RETURN:      Status
194 *
195 * DESCRIPTION: Get the result of a predicate evaluation
196 *
197 ****************************************************************************/
198
199ACPI_STATUS
200AcpiDsGetPredicateValue (
201    ACPI_WALK_STATE         *WalkState,
202    ACPI_OPERAND_OBJECT     *ResultObj)
203{
204    ACPI_STATUS             Status = AE_OK;
205    ACPI_OPERAND_OBJECT     *ObjDesc;
206    ACPI_OPERAND_OBJECT     *LocalObjDesc = NULL;
207
208
209    ACPI_FUNCTION_TRACE_PTR (DsGetPredicateValue, WalkState);
210
211
212    WalkState->ControlState->Common.State = 0;
213
214    if (ResultObj)
215    {
216        Status = AcpiDsResultPop (&ObjDesc, WalkState);
217        if (ACPI_FAILURE (Status))
218        {
219            ACPI_EXCEPTION ((AE_INFO, Status,
220                "Could not get result from predicate evaluation"));
221
222            return_ACPI_STATUS (Status);
223        }
224    }
225    else
226    {
227        Status = AcpiDsCreateOperand (WalkState, WalkState->Op, 0);
228        if (ACPI_FAILURE (Status))
229        {
230            return_ACPI_STATUS (Status);
231        }
232
233        Status = AcpiExResolveToValue (&WalkState->Operands [0], WalkState);
234        if (ACPI_FAILURE (Status))
235        {
236            return_ACPI_STATUS (Status);
237        }
238
239        ObjDesc = WalkState->Operands [0];
240    }
241
242    if (!ObjDesc)
243    {
244        ACPI_ERROR ((AE_INFO,
245            "No predicate ObjDesc=%p State=%p",
246            ObjDesc, WalkState));
247
248        return_ACPI_STATUS (AE_AML_NO_OPERAND);
249    }
250
251    /*
252     * Result of predicate evaluation must be an Integer
253     * object. Implicitly convert the argument if necessary.
254     */
255    Status = AcpiExConvertToInteger (ObjDesc, &LocalObjDesc,
256        ACPI_IMPLICIT_CONVERSION);
257    if (ACPI_FAILURE (Status))
258    {
259        goto Cleanup;
260    }
261
262    if (LocalObjDesc->Common.Type != ACPI_TYPE_INTEGER)
263    {
264        ACPI_ERROR ((AE_INFO,
265            "Bad predicate (not an integer) ObjDesc=%p State=%p Type=0x%X",
266            ObjDesc, WalkState, ObjDesc->Common.Type));
267
268        Status = AE_AML_OPERAND_TYPE;
269        goto Cleanup;
270    }
271
272    /* Truncate the predicate to 32-bits if necessary */
273
274    (void) AcpiExTruncateFor32bitTable (LocalObjDesc);
275
276    /*
277     * Save the result of the predicate evaluation on
278     * the control stack
279     */
280    if (LocalObjDesc->Integer.Value)
281    {
282        WalkState->ControlState->Common.Value = TRUE;
283    }
284    else
285    {
286        /*
287         * Predicate is FALSE, we will just toss the
288         * rest of the package
289         */
290        WalkState->ControlState->Common.Value = FALSE;
291        Status = AE_CTRL_FALSE;
292    }
293
294    /* Predicate can be used for an implicit return value */
295
296    (void) AcpiDsDoImplicitReturn (LocalObjDesc, WalkState, TRUE);
297
298
299Cleanup:
300
301    ACPI_DEBUG_PRINT ((ACPI_DB_EXEC,
302        "Completed a predicate eval=%X Op=%p\n",
303        WalkState->ControlState->Common.Value, WalkState->Op));
304
305    /* Break to debugger to display result */
306
307    AcpiDbDisplayResultObject (LocalObjDesc, WalkState);
308
309    /*
310     * Delete the predicate result object (we know that
311     * we don't need it anymore)
312     */
313    if (LocalObjDesc != ObjDesc)
314    {
315        AcpiUtRemoveReference (LocalObjDesc);
316    }
317    AcpiUtRemoveReference (ObjDesc);
318
319    WalkState->ControlState->Common.State = ACPI_CONTROL_NORMAL;
320    return_ACPI_STATUS (Status);
321}
322
323
324/*****************************************************************************
325 *
326 * FUNCTION:    AcpiDsExecBeginOp
327 *
328 * PARAMETERS:  WalkState       - Current state of the parse tree walk
329 *              OutOp           - Where to return op if a new one is created
330 *
331 * RETURN:      Status
332 *
333 * DESCRIPTION: Descending callback used during the execution of control
334 *              methods. This is where most operators and operands are
335 *              dispatched to the interpreter.
336 *
337 ****************************************************************************/
338
339ACPI_STATUS
340AcpiDsExecBeginOp (
341    ACPI_WALK_STATE         *WalkState,
342    ACPI_PARSE_OBJECT       **OutOp)
343{
344    ACPI_PARSE_OBJECT       *Op;
345    ACPI_STATUS             Status = AE_OK;
346    UINT32                  OpcodeClass;
347
348
349    ACPI_FUNCTION_TRACE_PTR (DsExecBeginOp, WalkState);
350
351
352    Op = WalkState->Op;
353    if (!Op)
354    {
355        Status = AcpiDsLoad2BeginOp (WalkState, OutOp);
356        if (ACPI_FAILURE (Status))
357        {
358            goto ErrorExit;
359        }
360
361        Op = *OutOp;
362        WalkState->Op = Op;
363        WalkState->Opcode = Op->Common.AmlOpcode;
364        WalkState->OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
365
366        if (AcpiNsOpensScope (WalkState->OpInfo->ObjectType))
367        {
368            ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
369                "(%s) Popping scope for Op %p\n",
370                AcpiUtGetTypeName (WalkState->OpInfo->ObjectType), Op));
371
372            Status = AcpiDsScopeStackPop (WalkState);
373            if (ACPI_FAILURE (Status))
374            {
375                goto ErrorExit;
376            }
377        }
378    }
379
380    if (Op == WalkState->Origin)
381    {
382        if (OutOp)
383        {
384            *OutOp = Op;
385        }
386
387        return_ACPI_STATUS (AE_OK);
388    }
389
390    /*
391     * If the previous opcode was a conditional, this opcode
392     * must be the beginning of the associated predicate.
393     * Save this knowledge in the current scope descriptor
394     */
395    if ((WalkState->ControlState) &&
396        (WalkState->ControlState->Common.State ==
397            ACPI_CONTROL_CONDITIONAL_EXECUTING))
398    {
399        ACPI_DEBUG_PRINT ((ACPI_DB_EXEC,
400            "Exec predicate Op=%p State=%p\n",
401            Op, WalkState));
402
403        WalkState->ControlState->Common.State =
404            ACPI_CONTROL_PREDICATE_EXECUTING;
405
406        /* Save start of predicate */
407
408        WalkState->ControlState->Control.PredicateOp = Op;
409    }
410
411
412    OpcodeClass = WalkState->OpInfo->Class;
413
414    /* We want to send namepaths to the load code */
415
416    if (Op->Common.AmlOpcode == AML_INT_NAMEPATH_OP)
417    {
418        OpcodeClass = AML_CLASS_NAMED_OBJECT;
419    }
420
421    /*
422     * Handle the opcode based upon the opcode type
423     */
424    switch (OpcodeClass)
425    {
426    case AML_CLASS_CONTROL:
427
428        Status = AcpiDsExecBeginControlOp (WalkState, Op);
429        break;
430
431    case AML_CLASS_NAMED_OBJECT:
432
433        if (WalkState->WalkType & ACPI_WALK_METHOD)
434        {
435            /*
436             * Found a named object declaration during method execution;
437             * we must enter this object into the namespace. The created
438             * object is temporary and will be deleted upon completion of
439             * the execution of this method.
440             *
441             * Note 10/2010: Except for the Scope() op. This opcode does
442             * not actually create a new object, it refers to an existing
443             * object. However, for Scope(), we want to indeed open a
444             * new scope.
445             */
446            if (Op->Common.AmlOpcode != AML_SCOPE_OP)
447            {
448                Status = AcpiDsLoad2BeginOp (WalkState, NULL);
449            }
450            else
451            {
452                Status = AcpiDsScopeStackPush (
453                    Op->Named.Node, Op->Named.Node->Type, WalkState);
454                if (ACPI_FAILURE (Status))
455                {
456                    return_ACPI_STATUS (Status);
457                }
458            }
459        }
460        break;
461
462    case AML_CLASS_EXECUTE:
463    case AML_CLASS_CREATE:
464
465        break;
466
467    default:
468
469        break;
470    }
471
472    /* Nothing to do here during method execution */
473
474    return_ACPI_STATUS (Status);
475
476
477ErrorExit:
478    Status = AcpiDsMethodError (Status, WalkState);
479    return_ACPI_STATUS (Status);
480}
481
482
483/*****************************************************************************
484 *
485 * FUNCTION:    AcpiDsExecEndOp
486 *
487 * PARAMETERS:  WalkState       - Current state of the parse tree walk
488 *
489 * RETURN:      Status
490 *
491 * DESCRIPTION: Ascending callback used during the execution of control
492 *              methods. The only thing we really need to do here is to
493 *              notice the beginning of IF, ELSE, and WHILE blocks.
494 *
495 ****************************************************************************/
496
497ACPI_STATUS
498AcpiDsExecEndOp (
499    ACPI_WALK_STATE         *WalkState)
500{
501    ACPI_PARSE_OBJECT       *Op;
502    ACPI_STATUS             Status = AE_OK;
503    UINT32                  OpType;
504    UINT32                  OpClass;
505    ACPI_PARSE_OBJECT       *NextOp;
506    ACPI_PARSE_OBJECT       *FirstArg;
507
508
509    ACPI_FUNCTION_TRACE_PTR (DsExecEndOp, WalkState);
510
511
512    Op = WalkState->Op;
513    OpType = WalkState->OpInfo->Type;
514    OpClass = WalkState->OpInfo->Class;
515
516    if (OpClass == AML_CLASS_UNKNOWN)
517    {
518        ACPI_ERROR ((AE_INFO, "Unknown opcode 0x%X", Op->Common.AmlOpcode));
519        return_ACPI_STATUS (AE_NOT_IMPLEMENTED);
520    }
521
522    FirstArg = Op->Common.Value.Arg;
523
524    /* Init the walk state */
525
526    WalkState->NumOperands = 0;
527    WalkState->OperandIndex = 0;
528    WalkState->ReturnDesc = NULL;
529    WalkState->ResultObj = NULL;
530
531    /* Call debugger for single step support (DEBUG build only) */
532
533    Status = AcpiDbSingleStep (WalkState, Op, OpClass);
534    if (ACPI_FAILURE (Status))
535    {
536        return_ACPI_STATUS (Status);
537    }
538
539    /* Decode the Opcode Class */
540
541    switch (OpClass)
542    {
543    case AML_CLASS_ARGUMENT:    /* Constants, literals, etc. */
544
545        if (WalkState->Opcode == AML_INT_NAMEPATH_OP)
546        {
547            Status = AcpiDsEvaluateNamePath (WalkState);
548            if (ACPI_FAILURE (Status))
549            {
550                goto Cleanup;
551            }
552        }
553        break;
554
555    case AML_CLASS_EXECUTE:     /* Most operators with arguments */
556
557        /* Build resolved operand stack */
558
559        Status = AcpiDsCreateOperands (WalkState, FirstArg);
560        if (ACPI_FAILURE (Status))
561        {
562            goto Cleanup;
563        }
564
565        /*
566         * All opcodes require operand resolution, with the only exceptions
567         * being the ObjectType and SizeOf operators.
568         */
569        if (!(WalkState->OpInfo->Flags & AML_NO_OPERAND_RESOLVE))
570        {
571            /* Resolve all operands */
572
573            Status = AcpiExResolveOperands (WalkState->Opcode,
574                &(WalkState->Operands [WalkState->NumOperands -1]),
575                WalkState);
576        }
577
578        if (ACPI_SUCCESS (Status))
579        {
580            /*
581             * Dispatch the request to the appropriate interpreter handler
582             * routine. There is one routine per opcode "type" based upon the
583             * number of opcode arguments and return type.
584             */
585            Status = AcpiGbl_OpTypeDispatch[OpType] (WalkState);
586        }
587        else
588        {
589            /*
590             * Treat constructs of the form "Store(LocalX,LocalX)" as noops when the
591             * Local is uninitialized.
592             */
593            if  ((Status == AE_AML_UNINITIALIZED_LOCAL) &&
594                (WalkState->Opcode == AML_STORE_OP) &&
595                (WalkState->Operands[0]->Common.Type == ACPI_TYPE_LOCAL_REFERENCE) &&
596                (WalkState->Operands[1]->Common.Type == ACPI_TYPE_LOCAL_REFERENCE) &&
597                (WalkState->Operands[0]->Reference.Class ==
598                 WalkState->Operands[1]->Reference.Class) &&
599                (WalkState->Operands[0]->Reference.Value ==
600                 WalkState->Operands[1]->Reference.Value))
601            {
602                Status = AE_OK;
603            }
604            else
605            {
606                ACPI_EXCEPTION ((AE_INFO, Status,
607                    "While resolving operands for [%s]",
608                    AcpiPsGetOpcodeName (WalkState->Opcode)));
609            }
610        }
611
612        /* Always delete the argument objects and clear the operand stack */
613
614        AcpiDsClearOperands (WalkState);
615
616        /*
617         * If a result object was returned from above, push it on the
618         * current result stack
619         */
620        if (ACPI_SUCCESS (Status) &&
621            WalkState->ResultObj)
622        {
623            Status = AcpiDsResultPush (WalkState->ResultObj, WalkState);
624        }
625        break;
626
627    default:
628
629        switch (OpType)
630        {
631        case AML_TYPE_CONTROL:    /* Type 1 opcode, IF/ELSE/WHILE/NOOP */
632
633            /* 1 Operand, 0 ExternalResult, 0 InternalResult */
634
635            Status = AcpiDsExecEndControlOp (WalkState, Op);
636
637            break;
638
639        case AML_TYPE_METHOD_CALL:
640            /*
641             * If the method is referenced from within a package
642             * declaration, it is not a invocation of the method, just
643             * a reference to it.
644             */
645            if ((Op->Asl.Parent) &&
646               ((Op->Asl.Parent->Asl.AmlOpcode == AML_PACKAGE_OP) ||
647                (Op->Asl.Parent->Asl.AmlOpcode == AML_VARIABLE_PACKAGE_OP)))
648            {
649                ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
650                    "Method Reference in a Package, Op=%p\n", Op));
651
652                Op->Common.Node = (ACPI_NAMESPACE_NODE *)
653                    Op->Asl.Value.Arg->Asl.Node;
654                AcpiUtAddReference (Op->Asl.Value.Arg->Asl.Node->Object);
655                return_ACPI_STATUS (AE_OK);
656            }
657
658            ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
659                "Method invocation, Op=%p\n", Op));
660
661            /*
662             * (AML_METHODCALL) Op->Asl.Value.Arg->Asl.Node contains
663             * the method Node pointer
664             */
665            /* NextOp points to the op that holds the method name */
666
667            NextOp = FirstArg;
668
669            /* NextOp points to first argument op */
670
671            NextOp = NextOp->Common.Next;
672
673            /*
674             * Get the method's arguments and put them on the operand stack
675             */
676            Status = AcpiDsCreateOperands (WalkState, NextOp);
677            if (ACPI_FAILURE (Status))
678            {
679                break;
680            }
681
682            /*
683             * Since the operands will be passed to another control method,
684             * we must resolve all local references here (Local variables,
685             * arguments to *this* method, etc.)
686             */
687            Status = AcpiDsResolveOperands (WalkState);
688            if (ACPI_FAILURE (Status))
689            {
690                /* On error, clear all resolved operands */
691
692                AcpiDsClearOperands (WalkState);
693                break;
694            }
695
696            /*
697             * Tell the walk loop to preempt this running method and
698             * execute the new method
699             */
700            Status = AE_CTRL_TRANSFER;
701
702            /*
703             * Return now; we don't want to disturb anything,
704             * especially the operand count!
705             */
706            return_ACPI_STATUS (Status);
707
708        case AML_TYPE_CREATE_FIELD:
709
710            ACPI_DEBUG_PRINT ((ACPI_DB_EXEC,
711                "Executing CreateField Buffer/Index Op=%p\n", Op));
712
713            Status = AcpiDsLoad2EndOp (WalkState);
714            if (ACPI_FAILURE (Status))
715            {
716                break;
717            }
718
719            Status = AcpiDsEvalBufferFieldOperands (WalkState, Op);
720            break;
721
722
723        case AML_TYPE_CREATE_OBJECT:
724
725            ACPI_DEBUG_PRINT ((ACPI_DB_EXEC,
726                "Executing CreateObject (Buffer/Package) Op=%p Child=%p ParentOpcode=%4.4X\n",
727                Op, Op->Named.Value.Arg, Op->Common.Parent->Common.AmlOpcode));
728
729            switch (Op->Common.Parent->Common.AmlOpcode)
730            {
731            case AML_NAME_OP:
732                /*
733                 * Put the Node on the object stack (Contains the ACPI Name
734                 * of this object)
735                 */
736                WalkState->Operands[0] = (void *)
737                    Op->Common.Parent->Common.Node;
738                WalkState->NumOperands = 1;
739
740                Status = AcpiDsCreateNode (WalkState,
741                    Op->Common.Parent->Common.Node, Op->Common.Parent);
742                if (ACPI_FAILURE (Status))
743                {
744                    break;
745                }
746
747                /* Fall through */
748                /*lint -fallthrough */
749
750            case AML_INT_EVAL_SUBTREE_OP:
751
752                Status = AcpiDsEvalDataObjectOperands (WalkState, Op,
753                    AcpiNsGetAttachedObject (Op->Common.Parent->Common.Node));
754                break;
755
756            default:
757
758                Status = AcpiDsEvalDataObjectOperands (WalkState, Op, NULL);
759                break;
760            }
761
762            /*
763             * If a result object was returned from above, push it on the
764             * current result stack
765             */
766            if (WalkState->ResultObj)
767            {
768                Status = AcpiDsResultPush (WalkState->ResultObj, WalkState);
769            }
770            break;
771
772        case AML_TYPE_NAMED_FIELD:
773        case AML_TYPE_NAMED_COMPLEX:
774        case AML_TYPE_NAMED_SIMPLE:
775        case AML_TYPE_NAMED_NO_OBJ:
776
777            Status = AcpiDsLoad2EndOp (WalkState);
778            if (ACPI_FAILURE (Status))
779            {
780                break;
781            }
782
783            if (Op->Common.AmlOpcode == AML_REGION_OP)
784            {
785                ACPI_DEBUG_PRINT ((ACPI_DB_EXEC,
786                    "Executing OpRegion Address/Length Op=%p\n", Op));
787
788                Status = AcpiDsEvalRegionOperands (WalkState, Op);
789                if (ACPI_FAILURE (Status))
790                {
791                    break;
792                }
793            }
794            else if (Op->Common.AmlOpcode == AML_DATA_REGION_OP)
795            {
796                ACPI_DEBUG_PRINT ((ACPI_DB_EXEC,
797                    "Executing DataTableRegion Strings Op=%p\n", Op));
798
799                Status = AcpiDsEvalTableRegionOperands (WalkState, Op);
800                if (ACPI_FAILURE (Status))
801                {
802                    break;
803                }
804            }
805            else if (Op->Common.AmlOpcode == AML_BANK_FIELD_OP)
806            {
807                ACPI_DEBUG_PRINT ((ACPI_DB_EXEC,
808                    "Executing BankField Op=%p\n", Op));
809
810                Status = AcpiDsEvalBankFieldOperands (WalkState, Op);
811                if (ACPI_FAILURE (Status))
812                {
813                    break;
814                }
815            }
816            break;
817
818        case AML_TYPE_UNDEFINED:
819
820            ACPI_ERROR ((AE_INFO,
821                "Undefined opcode type Op=%p", Op));
822            return_ACPI_STATUS (AE_NOT_IMPLEMENTED);
823
824        case AML_TYPE_BOGUS:
825
826            ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
827                "Internal opcode=%X type Op=%p\n",
828                WalkState->Opcode, Op));
829            break;
830
831        default:
832
833            ACPI_ERROR ((AE_INFO,
834                "Unimplemented opcode, class=0x%X "
835                "type=0x%X Opcode=0x%X Op=%p",
836                OpClass, OpType, Op->Common.AmlOpcode, Op));
837
838            Status = AE_NOT_IMPLEMENTED;
839            break;
840        }
841    }
842
843    /*
844     * ACPI 2.0 support for 64-bit integers: Truncate numeric
845     * result value if we are executing from a 32-bit ACPI table
846     */
847    (void) AcpiExTruncateFor32bitTable (WalkState->ResultObj);
848
849    /*
850     * Check if we just completed the evaluation of a
851     * conditional predicate
852     */
853    if ((ACPI_SUCCESS (Status)) &&
854        (WalkState->ControlState) &&
855        (WalkState->ControlState->Common.State ==
856            ACPI_CONTROL_PREDICATE_EXECUTING) &&
857        (WalkState->ControlState->Control.PredicateOp == Op))
858    {
859        Status = AcpiDsGetPredicateValue (WalkState, WalkState->ResultObj);
860        WalkState->ResultObj = NULL;
861    }
862
863
864Cleanup:
865
866    if (WalkState->ResultObj)
867    {
868        /* Break to debugger to display result */
869
870        AcpiDbDisplayResultObject (WalkState->ResultObj,WalkState);
871
872        /*
873         * Delete the result op if and only if:
874         * Parent will not use the result -- such as any
875         * non-nested type2 op in a method (parent will be method)
876         */
877        AcpiDsDeleteResultIfNotUsed (Op, WalkState->ResultObj, WalkState);
878    }
879
880#ifdef _UNDER_DEVELOPMENT
881
882    if (WalkState->ParserState.Aml == WalkState->ParserState.AmlEnd)
883    {
884        AcpiDbMethodEnd (WalkState);
885    }
886#endif
887
888    /* Invoke exception handler on error */
889
890    if (ACPI_FAILURE (Status))
891    {
892        Status = AcpiDsMethodError (Status, WalkState);
893    }
894
895    /* Always clear the object stack */
896
897    WalkState->NumOperands = 0;
898    return_ACPI_STATUS (Status);
899}
900