acpica/executer/exoparg2.c

db2bae30SDana Myers/******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * Module Name: exoparg2 - AML execution - opcodes with 2 arguments
db2bae30SDana Myers *
db2bae30SDana Myers *****************************************************************************/
db2bae30SDana Myers
26f3cdf0SGordon Ross/*
*385cc6b4SJerry Jelinek * Copyright (C) 2000 - 2016, Intel Corp.
db2bae30SDana Myers * All rights reserved.
db2bae30SDana Myers *
26f3cdf0SGordon Ross * Redistribution and use in source and binary forms, with or without
26f3cdf0SGordon Ross * modification, are permitted provided that the following conditions
26f3cdf0SGordon Ross * are met:
26f3cdf0SGordon Ross * 1. Redistributions of source code must retain the above copyright
26f3cdf0SGordon Ross *    notice, this list of conditions, and the following disclaimer,
26f3cdf0SGordon Ross *    without modification.
26f3cdf0SGordon Ross * 2. Redistributions in binary form must reproduce at minimum a disclaimer
26f3cdf0SGordon Ross *    substantially similar to the "NO WARRANTY" disclaimer below
26f3cdf0SGordon Ross *    ("Disclaimer") and any redistribution must be conditioned upon
26f3cdf0SGordon Ross *    including a substantially similar Disclaimer requirement for further
26f3cdf0SGordon Ross *    binary redistribution.
26f3cdf0SGordon Ross * 3. Neither the names of the above-listed copyright holders nor the names
26f3cdf0SGordon Ross *    of any contributors may be used to endorse or promote products derived
26f3cdf0SGordon Ross *    from this software without specific prior written permission.
db2bae30SDana Myers *
26f3cdf0SGordon Ross * Alternatively, this software may be distributed under the terms of the
26f3cdf0SGordon Ross * GNU General Public License ("GPL") version 2 as published by the Free
26f3cdf0SGordon Ross * Software Foundation.
db2bae30SDana Myers *
26f3cdf0SGordon Ross * NO WARRANTY
26f3cdf0SGordon Ross * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
26f3cdf0SGordon Ross * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
26f3cdf0SGordon Ross * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
26f3cdf0SGordon Ross * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
26f3cdf0SGordon Ross * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26f3cdf0SGordon Ross * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26f3cdf0SGordon Ross * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26f3cdf0SGordon Ross * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
26f3cdf0SGordon Ross * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
26f3cdf0SGordon Ross * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26f3cdf0SGordon Ross * POSSIBILITY OF SUCH DAMAGES.
26f3cdf0SGordon Ross */
db2bae30SDana Myers
db2bae30SDana Myers#include "acpi.h"
aa2aa9a6SDana Myers#include "accommon.h"
db2bae30SDana Myers#include "acparser.h"
db2bae30SDana Myers#include "acinterp.h"
db2bae30SDana Myers#include "acevents.h"
db2bae30SDana Myers#include "amlcode.h"
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers#define _COMPONENT          ACPI_EXECUTER
db2bae30SDana Myers        ACPI_MODULE_NAME    ("exoparg2")
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers/*!
db2bae30SDana Myers * Naming convention for AML interpreter execution routines.
db2bae30SDana Myers *
db2bae30SDana Myers * The routines that begin execution of AML opcodes are named with a common
db2bae30SDana Myers * convention based upon the number of arguments, the number of target operands,
db2bae30SDana Myers * and whether or not a value is returned:
db2bae30SDana Myers *
db2bae30SDana Myers *      AcpiExOpcode_xA_yT_zR
db2bae30SDana Myers *
db2bae30SDana Myers * Where:
db2bae30SDana Myers *
db2bae30SDana Myers * xA - ARGUMENTS:    The number of arguments (input operands) that are
db2bae30SDana Myers *                    required for this opcode type (1 through 6 args).
db2bae30SDana Myers * yT - TARGETS:      The number of targets (output operands) that are required
db2bae30SDana Myers *                    for this opcode type (0, 1, or 2 targets).
db2bae30SDana Myers * zR - RETURN VALUE: Indicates whether this opcode type returns a value
db2bae30SDana Myers *                    as the function return (0 or 1).
db2bae30SDana Myers *
db2bae30SDana Myers * The AcpiExOpcode* functions are called via the Dispatcher component with
db2bae30SDana Myers * fully resolved operands.
db2bae30SDana Myers!*/
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers/*******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * FUNCTION:    AcpiExOpcode_2A_0T_0R
db2bae30SDana Myers *
db2bae30SDana Myers * PARAMETERS:  WalkState           - Current walk state
db2bae30SDana Myers *
db2bae30SDana Myers * RETURN:      Status
db2bae30SDana Myers *
db2bae30SDana Myers * DESCRIPTION: Execute opcode with two arguments, no target, and no return
db2bae30SDana Myers *              value.
db2bae30SDana Myers *
db2bae30SDana Myers * ALLOCATION:  Deletes both operands
db2bae30SDana Myers *
db2bae30SDana Myers ******************************************************************************/
db2bae30SDana Myers
db2bae30SDana MyersACPI_STATUS
db2bae30SDana MyersAcpiExOpcode_2A_0T_0R (
db2bae30SDana Myers    ACPI_WALK_STATE         *WalkState)
db2bae30SDana Myers{
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     **Operand = &WalkState->Operands[0];
db2bae30SDana Myers    ACPI_NAMESPACE_NODE     *Node;
db2bae30SDana Myers    UINT32                  Value;
db2bae30SDana Myers    ACPI_STATUS             Status = AE_OK;
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    ACPI_FUNCTION_TRACE_STR (ExOpcode_2A_0T_0R,
db2bae30SDana Myers            AcpiPsGetOpcodeName (WalkState->Opcode));
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    /* Examine the opcode */
db2bae30SDana Myers
db2bae30SDana Myers    switch (WalkState->Opcode)
db2bae30SDana Myers    {
db2bae30SDana Myers    case AML_NOTIFY_OP:         /* Notify (NotifyObject, NotifyValue) */
db2bae30SDana Myers
db2bae30SDana Myers        /* The first operand is a namespace node */
db2bae30SDana Myers
db2bae30SDana Myers        Node = (ACPI_NAMESPACE_NODE *) Operand[0];
db2bae30SDana Myers
db2bae30SDana Myers        /* Second value is the notify value */
db2bae30SDana Myers
db2bae30SDana Myers        Value = (UINT32) Operand[1]->Integer.Value;
db2bae30SDana Myers
db2bae30SDana Myers        /* Are notifies allowed on this object? */
db2bae30SDana Myers
db2bae30SDana Myers        if (!AcpiEvIsNotifyObject (Node))
db2bae30SDana Myers        {
db2bae30SDana Myers            ACPI_ERROR ((AE_INFO,
db2bae30SDana Myers                "Unexpected notify object type [%s]",
db2bae30SDana Myers                AcpiUtGetTypeName (Node->Type)));
db2bae30SDana Myers
db2bae30SDana Myers            Status = AE_AML_OPERAND_TYPE;
db2bae30SDana Myers            break;
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /*
db2bae30SDana Myers         * Dispatch the notify to the appropriate handler
db2bae30SDana Myers         * NOTE: the request is queued for execution after this method
db2bae30SDana Myers         * completes. The notify handlers are NOT invoked synchronously
db2bae30SDana Myers         * from this thread -- because handlers may in turn run other
db2bae30SDana Myers         * control methods.
db2bae30SDana Myers         */
db2bae30SDana Myers        Status = AcpiEvQueueNotifyRequest (Node, Value);
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    default:
db2bae30SDana Myers
26f3cdf0SGordon Ross        ACPI_ERROR ((AE_INFO, "Unknown AML opcode 0x%X",
db2bae30SDana Myers            WalkState->Opcode));
db2bae30SDana Myers        Status = AE_AML_BAD_OPCODE;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    return_ACPI_STATUS (Status);
db2bae30SDana Myers}
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers/*******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * FUNCTION:    AcpiExOpcode_2A_2T_1R
db2bae30SDana Myers *
db2bae30SDana Myers * PARAMETERS:  WalkState           - Current walk state
db2bae30SDana Myers *
db2bae30SDana Myers * RETURN:      Status
db2bae30SDana Myers *
db2bae30SDana Myers * DESCRIPTION: Execute a dyadic operator (2 operands) with 2 output targets
db2bae30SDana Myers *              and one implicit return value.
db2bae30SDana Myers *
db2bae30SDana Myers ******************************************************************************/
db2bae30SDana Myers
db2bae30SDana MyersACPI_STATUS
db2bae30SDana MyersAcpiExOpcode_2A_2T_1R (
db2bae30SDana Myers    ACPI_WALK_STATE         *WalkState)
db2bae30SDana Myers{
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     **Operand = &WalkState->Operands[0];
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     *ReturnDesc1 = NULL;
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     *ReturnDesc2 = NULL;
db2bae30SDana Myers    ACPI_STATUS             Status;
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    ACPI_FUNCTION_TRACE_STR (ExOpcode_2A_2T_1R,
db2bae30SDana Myers        AcpiPsGetOpcodeName (WalkState->Opcode));
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    /* Execute the opcode */
db2bae30SDana Myers
db2bae30SDana Myers    switch (WalkState->Opcode)
db2bae30SDana Myers    {
db2bae30SDana Myers    case AML_DIVIDE_OP:
db2bae30SDana Myers
db2bae30SDana Myers        /* Divide (Dividend, Divisor, RemainderResult QuotientResult) */
db2bae30SDana Myers
db2bae30SDana Myers        ReturnDesc1 = AcpiUtCreateInternalObject (ACPI_TYPE_INTEGER);
db2bae30SDana Myers        if (!ReturnDesc1)
db2bae30SDana Myers        {
db2bae30SDana Myers            Status = AE_NO_MEMORY;
db2bae30SDana Myers            goto Cleanup;
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        ReturnDesc2 = AcpiUtCreateInternalObject (ACPI_TYPE_INTEGER);
db2bae30SDana Myers        if (!ReturnDesc2)
db2bae30SDana Myers        {
db2bae30SDana Myers            Status = AE_NO_MEMORY;
db2bae30SDana Myers            goto Cleanup;
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /* Quotient to ReturnDesc1, remainder to ReturnDesc2 */
db2bae30SDana Myers
*385cc6b4SJerry Jelinek        Status = AcpiUtDivide (
*385cc6b4SJerry Jelinek            Operand[0]->Integer.Value,
db2bae30SDana Myers            Operand[1]->Integer.Value,
db2bae30SDana Myers            &ReturnDesc1->Integer.Value,
db2bae30SDana Myers            &ReturnDesc2->Integer.Value);
db2bae30SDana Myers        if (ACPI_FAILURE (Status))
db2bae30SDana Myers        {
db2bae30SDana Myers            goto Cleanup;
db2bae30SDana Myers        }
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    default:
db2bae30SDana Myers
26f3cdf0SGordon Ross        ACPI_ERROR ((AE_INFO, "Unknown AML opcode 0x%X",
db2bae30SDana Myers            WalkState->Opcode));
*385cc6b4SJerry Jelinek
db2bae30SDana Myers        Status = AE_AML_BAD_OPCODE;
db2bae30SDana Myers        goto Cleanup;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /* Store the results to the target reference operands */
db2bae30SDana Myers
db2bae30SDana Myers    Status = AcpiExStore (ReturnDesc2, Operand[2], WalkState);
db2bae30SDana Myers    if (ACPI_FAILURE (Status))
db2bae30SDana Myers    {
db2bae30SDana Myers        goto Cleanup;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    Status = AcpiExStore (ReturnDesc1, Operand[3], WalkState);
db2bae30SDana Myers    if (ACPI_FAILURE (Status))
db2bae30SDana Myers    {
db2bae30SDana Myers        goto Cleanup;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana MyersCleanup:
db2bae30SDana Myers    /*
db2bae30SDana Myers     * Since the remainder is not returned indirectly, remove a reference to
db2bae30SDana Myers     * it. Only the quotient is returned indirectly.
db2bae30SDana Myers     */
db2bae30SDana Myers    AcpiUtRemoveReference (ReturnDesc2);
db2bae30SDana Myers
db2bae30SDana Myers    if (ACPI_FAILURE (Status))
db2bae30SDana Myers    {
db2bae30SDana Myers        /* Delete the return object */
db2bae30SDana Myers
db2bae30SDana Myers        AcpiUtRemoveReference (ReturnDesc1);
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /* Save return object (the remainder) on success */
db2bae30SDana Myers
db2bae30SDana Myers    else
db2bae30SDana Myers    {
db2bae30SDana Myers        WalkState->ResultObj = ReturnDesc1;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    return_ACPI_STATUS (Status);
db2bae30SDana Myers}
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers/*******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * FUNCTION:    AcpiExOpcode_2A_1T_1R
db2bae30SDana Myers *
db2bae30SDana Myers * PARAMETERS:  WalkState           - Current walk state
db2bae30SDana Myers *
db2bae30SDana Myers * RETURN:      Status
db2bae30SDana Myers *
db2bae30SDana Myers * DESCRIPTION: Execute opcode with two arguments, one target, and a return
db2bae30SDana Myers *              value.
db2bae30SDana Myers *
db2bae30SDana Myers ******************************************************************************/
db2bae30SDana Myers
db2bae30SDana MyersACPI_STATUS
db2bae30SDana MyersAcpiExOpcode_2A_1T_1R (
db2bae30SDana Myers    ACPI_WALK_STATE         *WalkState)
db2bae30SDana Myers{
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     **Operand = &WalkState->Operands[0];
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     *ReturnDesc = NULL;
26f3cdf0SGordon Ross    UINT64                  Index;
db2bae30SDana Myers    ACPI_STATUS             Status = AE_OK;
*385cc6b4SJerry Jelinek    ACPI_SIZE               Length = 0;
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    ACPI_FUNCTION_TRACE_STR (ExOpcode_2A_1T_1R,
db2bae30SDana Myers        AcpiPsGetOpcodeName (WalkState->Opcode));
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    /* Execute the opcode */
db2bae30SDana Myers
db2bae30SDana Myers    if (WalkState->OpInfo->Flags & AML_MATH)
db2bae30SDana Myers    {
db2bae30SDana Myers        /* All simple math opcodes (add, etc.) */
db2bae30SDana Myers
db2bae30SDana Myers        ReturnDesc = AcpiUtCreateInternalObject (ACPI_TYPE_INTEGER);
db2bae30SDana Myers        if (!ReturnDesc)
db2bae30SDana Myers        {
db2bae30SDana Myers            Status = AE_NO_MEMORY;
db2bae30SDana Myers            goto Cleanup;
db2bae30SDana Myers        }
db2bae30SDana Myers
*385cc6b4SJerry Jelinek        ReturnDesc->Integer.Value = AcpiExDoMathOp (
*385cc6b4SJerry Jelinek            WalkState->Opcode,
db2bae30SDana Myers            Operand[0]->Integer.Value,
db2bae30SDana Myers            Operand[1]->Integer.Value);
db2bae30SDana Myers        goto StoreResultToTarget;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    switch (WalkState->Opcode)
db2bae30SDana Myers    {
db2bae30SDana Myers    case AML_MOD_OP: /* Mod (Dividend, Divisor, RemainderResult (ACPI 2.0) */
db2bae30SDana Myers
db2bae30SDana Myers        ReturnDesc = AcpiUtCreateInternalObject (ACPI_TYPE_INTEGER);
db2bae30SDana Myers        if (!ReturnDesc)
db2bae30SDana Myers        {
db2bae30SDana Myers            Status = AE_NO_MEMORY;
db2bae30SDana Myers            goto Cleanup;
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /* ReturnDesc will contain the remainder */
db2bae30SDana Myers
*385cc6b4SJerry Jelinek        Status = AcpiUtDivide (
*385cc6b4SJerry Jelinek            Operand[0]->Integer.Value,
db2bae30SDana Myers            Operand[1]->Integer.Value,
db2bae30SDana Myers            NULL,
db2bae30SDana Myers            &ReturnDesc->Integer.Value);
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    case AML_CONCAT_OP: /* Concatenate (Data1, Data2, Result) */
db2bae30SDana Myers
*385cc6b4SJerry Jelinek        Status = AcpiExDoConcatenate (
*385cc6b4SJerry Jelinek            Operand[0], Operand[1], &ReturnDesc, WalkState);
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    case AML_TO_STRING_OP: /* ToString (Buffer, Length, Result) (ACPI 2.0) */
db2bae30SDana Myers        /*
db2bae30SDana Myers         * Input object is guaranteed to be a buffer at this point (it may have
db2bae30SDana Myers         * been converted.)  Copy the raw buffer data to a new object of
db2bae30SDana Myers         * type String.
db2bae30SDana Myers         */
db2bae30SDana Myers
db2bae30SDana Myers        /*
db2bae30SDana Myers         * Get the length of the new string. It is the smallest of:
db2bae30SDana Myers         * 1) Length of the input buffer
db2bae30SDana Myers         * 2) Max length as specified in the ToString operator
db2bae30SDana Myers         * 3) Length of input buffer up to a zero byte (null terminator)
db2bae30SDana Myers         *
db2bae30SDana Myers         * NOTE: A length of zero is ok, and will create a zero-length, null
db2bae30SDana Myers         *       terminated string.
db2bae30SDana Myers         */
db2bae30SDana Myers        while ((Length < Operand[0]->Buffer.Length) &&
db2bae30SDana Myers               (Length < Operand[1]->Integer.Value) &&
db2bae30SDana Myers               (Operand[0]->Buffer.Pointer[Length]))
db2bae30SDana Myers        {
db2bae30SDana Myers            Length++;
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /* Allocate a new string object */
db2bae30SDana Myers
db2bae30SDana Myers        ReturnDesc = AcpiUtCreateStringObject (Length);
db2bae30SDana Myers        if (!ReturnDesc)
db2bae30SDana Myers        {
db2bae30SDana Myers            Status = AE_NO_MEMORY;
db2bae30SDana Myers            goto Cleanup;
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /*
db2bae30SDana Myers         * Copy the raw buffer data with no transform.
db2bae30SDana Myers         * (NULL terminated already)
db2bae30SDana Myers         */
*385cc6b4SJerry Jelinek        memcpy (ReturnDesc->String.Pointer,
db2bae30SDana Myers            Operand[0]->Buffer.Pointer, Length);
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    case AML_CONCAT_RES_OP:
db2bae30SDana Myers
db2bae30SDana Myers        /* ConcatenateResTemplate (Buffer, Buffer, Result) (ACPI 2.0) */
db2bae30SDana Myers
*385cc6b4SJerry Jelinek        Status = AcpiExConcatTemplate (
*385cc6b4SJerry Jelinek            Operand[0], Operand[1], &ReturnDesc, WalkState);
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    case AML_INDEX_OP:              /* Index (Source Index Result) */
db2bae30SDana Myers
db2bae30SDana Myers        /* Create the internal return object */
db2bae30SDana Myers
db2bae30SDana Myers        ReturnDesc = AcpiUtCreateInternalObject (ACPI_TYPE_LOCAL_REFERENCE);
db2bae30SDana Myers        if (!ReturnDesc)
db2bae30SDana Myers        {
db2bae30SDana Myers            Status = AE_NO_MEMORY;
db2bae30SDana Myers            goto Cleanup;
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /* Initialize the Index reference object */
db2bae30SDana Myers
db2bae30SDana Myers        Index = Operand[1]->Integer.Value;
db2bae30SDana Myers        ReturnDesc->Reference.Value = (UINT32) Index;
db2bae30SDana Myers        ReturnDesc->Reference.Class = ACPI_REFCLASS_INDEX;
db2bae30SDana Myers
db2bae30SDana Myers        /*
db2bae30SDana Myers         * At this point, the Source operand is a String, Buffer, or Package.
db2bae30SDana Myers         * Verify that the index is within range.
db2bae30SDana Myers         */
aa2aa9a6SDana Myers        switch ((Operand[0])->Common.Type)
db2bae30SDana Myers        {
db2bae30SDana Myers        case ACPI_TYPE_STRING:
db2bae30SDana Myers
db2bae30SDana Myers            if (Index >= Operand[0]->String.Length)
db2bae30SDana Myers            {
*385cc6b4SJerry Jelinek                Length = Operand[0]->String.Length;
db2bae30SDana Myers                Status = AE_AML_STRING_LIMIT;
db2bae30SDana Myers            }
db2bae30SDana Myers
db2bae30SDana Myers            ReturnDesc->Reference.TargetType = ACPI_TYPE_BUFFER_FIELD;
*385cc6b4SJerry Jelinek            ReturnDesc->Reference.IndexPointer =
*385cc6b4SJerry Jelinek                &(Operand[0]->Buffer.Pointer [Index]);
db2bae30SDana Myers            break;
db2bae30SDana Myers
db2bae30SDana Myers        case ACPI_TYPE_BUFFER:
db2bae30SDana Myers
db2bae30SDana Myers            if (Index >= Operand[0]->Buffer.Length)
db2bae30SDana Myers            {
*385cc6b4SJerry Jelinek                Length = Operand[0]->Buffer.Length;
db2bae30SDana Myers                Status = AE_AML_BUFFER_LIMIT;
db2bae30SDana Myers            }
db2bae30SDana Myers
db2bae30SDana Myers            ReturnDesc->Reference.TargetType = ACPI_TYPE_BUFFER_FIELD;
*385cc6b4SJerry Jelinek            ReturnDesc->Reference.IndexPointer =
*385cc6b4SJerry Jelinek                &(Operand[0]->Buffer.Pointer [Index]);
db2bae30SDana Myers            break;
db2bae30SDana Myers
db2bae30SDana Myers        case ACPI_TYPE_PACKAGE:
db2bae30SDana Myers
db2bae30SDana Myers            if (Index >= Operand[0]->Package.Count)
db2bae30SDana Myers            {
*385cc6b4SJerry Jelinek                Length = Operand[0]->Package.Count;
db2bae30SDana Myers                Status = AE_AML_PACKAGE_LIMIT;
db2bae30SDana Myers            }
db2bae30SDana Myers
db2bae30SDana Myers            ReturnDesc->Reference.TargetType = ACPI_TYPE_PACKAGE;
*385cc6b4SJerry Jelinek            ReturnDesc->Reference.Where =
*385cc6b4SJerry Jelinek                &Operand[0]->Package.Elements [Index];
db2bae30SDana Myers            break;
db2bae30SDana Myers
db2bae30SDana Myers        default:
db2bae30SDana Myers
db2bae30SDana Myers            Status = AE_AML_INTERNAL;
db2bae30SDana Myers            goto Cleanup;
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /* Failure means that the Index was beyond the end of the object */
db2bae30SDana Myers
db2bae30SDana Myers        if (ACPI_FAILURE (Status))
db2bae30SDana Myers        {
db2bae30SDana Myers            ACPI_EXCEPTION ((AE_INFO, Status,
*385cc6b4SJerry Jelinek                "Index (0x%X%8.8X) is beyond end of object (length 0x%X)",
*385cc6b4SJerry Jelinek                ACPI_FORMAT_UINT64 (Index), (UINT32) Length));
db2bae30SDana Myers            goto Cleanup;
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /*
db2bae30SDana Myers         * Save the target object and add a reference to it for the life
db2bae30SDana Myers         * of the index
db2bae30SDana Myers         */
db2bae30SDana Myers        ReturnDesc->Reference.Object = Operand[0];
db2bae30SDana Myers        AcpiUtAddReference (Operand[0]);
db2bae30SDana Myers
db2bae30SDana Myers        /* Store the reference to the Target */
db2bae30SDana Myers
db2bae30SDana Myers        Status = AcpiExStore (ReturnDesc, Operand[2], WalkState);
db2bae30SDana Myers
db2bae30SDana Myers        /* Return the reference */
db2bae30SDana Myers
db2bae30SDana Myers        WalkState->ResultObj = ReturnDesc;
db2bae30SDana Myers        goto Cleanup;
db2bae30SDana Myers
db2bae30SDana Myers    default:
db2bae30SDana Myers
26f3cdf0SGordon Ross        ACPI_ERROR ((AE_INFO, "Unknown AML opcode 0x%X",
db2bae30SDana Myers            WalkState->Opcode));
db2bae30SDana Myers        Status = AE_AML_BAD_OPCODE;
db2bae30SDana Myers        break;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana MyersStoreResultToTarget:
db2bae30SDana Myers
db2bae30SDana Myers    if (ACPI_SUCCESS (Status))
db2bae30SDana Myers    {
db2bae30SDana Myers        /*
db2bae30SDana Myers         * Store the result of the operation (which is now in ReturnDesc) into
db2bae30SDana Myers         * the Target descriptor.
db2bae30SDana Myers         */
db2bae30SDana Myers        Status = AcpiExStore (ReturnDesc, Operand[2], WalkState);
db2bae30SDana Myers        if (ACPI_FAILURE (Status))
db2bae30SDana Myers        {
db2bae30SDana Myers            goto Cleanup;
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        if (!WalkState->ResultObj)
db2bae30SDana Myers        {
db2bae30SDana Myers            WalkState->ResultObj = ReturnDesc;
db2bae30SDana Myers        }
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana MyersCleanup:
db2bae30SDana Myers
db2bae30SDana Myers    /* Delete return object on error */
db2bae30SDana Myers
db2bae30SDana Myers    if (ACPI_FAILURE (Status))
db2bae30SDana Myers    {
db2bae30SDana Myers        AcpiUtRemoveReference (ReturnDesc);
db2bae30SDana Myers        WalkState->ResultObj = NULL;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    return_ACPI_STATUS (Status);
db2bae30SDana Myers}
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers/*******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * FUNCTION:    AcpiExOpcode_2A_0T_1R
db2bae30SDana Myers *
db2bae30SDana Myers * PARAMETERS:  WalkState           - Current walk state
db2bae30SDana Myers *
db2bae30SDana Myers * RETURN:      Status
db2bae30SDana Myers *
db2bae30SDana Myers * DESCRIPTION: Execute opcode with 2 arguments, no target, and a return value
db2bae30SDana Myers *
db2bae30SDana Myers ******************************************************************************/
db2bae30SDana Myers
db2bae30SDana MyersACPI_STATUS
db2bae30SDana MyersAcpiExOpcode_2A_0T_1R (
db2bae30SDana Myers    ACPI_WALK_STATE         *WalkState)
db2bae30SDana Myers{
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     **Operand = &WalkState->Operands[0];
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     *ReturnDesc = NULL;
db2bae30SDana Myers    ACPI_STATUS             Status = AE_OK;
db2bae30SDana Myers    BOOLEAN                 LogicalResult = FALSE;
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    ACPI_FUNCTION_TRACE_STR (ExOpcode_2A_0T_1R,
db2bae30SDana Myers        AcpiPsGetOpcodeName (WalkState->Opcode));
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    /* Create the internal return object */
db2bae30SDana Myers
db2bae30SDana Myers    ReturnDesc = AcpiUtCreateInternalObject (ACPI_TYPE_INTEGER);
db2bae30SDana Myers    if (!ReturnDesc)
db2bae30SDana Myers    {
db2bae30SDana Myers        Status = AE_NO_MEMORY;
db2bae30SDana Myers        goto Cleanup;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /* Execute the Opcode */
db2bae30SDana Myers
db2bae30SDana Myers    if (WalkState->OpInfo->Flags & AML_LOGICAL_NUMERIC)
db2bae30SDana Myers    {
db2bae30SDana Myers        /* LogicalOp  (Operand0, Operand1) */
db2bae30SDana Myers
db2bae30SDana Myers        Status = AcpiExDoLogicalNumericOp (WalkState->Opcode,
db2bae30SDana Myers            Operand[0]->Integer.Value, Operand[1]->Integer.Value,
db2bae30SDana Myers            &LogicalResult);
db2bae30SDana Myers        goto StoreLogicalResult;
db2bae30SDana Myers    }
db2bae30SDana Myers    else if (WalkState->OpInfo->Flags & AML_LOGICAL)
db2bae30SDana Myers    {
db2bae30SDana Myers        /* LogicalOp  (Operand0, Operand1) */
db2bae30SDana Myers
db2bae30SDana Myers        Status = AcpiExDoLogicalOp (WalkState->Opcode, Operand[0],
db2bae30SDana Myers            Operand[1], &LogicalResult);
db2bae30SDana Myers        goto StoreLogicalResult;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    switch (WalkState->Opcode)
db2bae30SDana Myers    {
db2bae30SDana Myers    case AML_ACQUIRE_OP:            /* Acquire (MutexObject, Timeout) */
db2bae30SDana Myers
db2bae30SDana Myers        Status = AcpiExAcquireMutex (Operand[1], Operand[0], WalkState);
db2bae30SDana Myers        if (Status == AE_TIME)
db2bae30SDana Myers        {
db2bae30SDana Myers            LogicalResult = TRUE;       /* TRUE = Acquire timed out */
db2bae30SDana Myers            Status = AE_OK;
db2bae30SDana Myers        }
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    case AML_WAIT_OP:               /* Wait (EventObject, Timeout) */
db2bae30SDana Myers
db2bae30SDana Myers        Status = AcpiExSystemWaitEvent (Operand[1], Operand[0]);
db2bae30SDana Myers        if (Status == AE_TIME)
db2bae30SDana Myers        {
db2bae30SDana Myers            LogicalResult = TRUE;       /* TRUE, Wait timed out */
db2bae30SDana Myers            Status = AE_OK;
db2bae30SDana Myers        }
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    default:
db2bae30SDana Myers
26f3cdf0SGordon Ross        ACPI_ERROR ((AE_INFO, "Unknown AML opcode 0x%X",
db2bae30SDana Myers            WalkState->Opcode));
*385cc6b4SJerry Jelinek
db2bae30SDana Myers        Status = AE_AML_BAD_OPCODE;
db2bae30SDana Myers        goto Cleanup;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana MyersStoreLogicalResult:
db2bae30SDana Myers    /*
db2bae30SDana Myers     * Set return value to according to LogicalResult. logical TRUE (all ones)
db2bae30SDana Myers     * Default is FALSE (zero)
db2bae30SDana Myers     */
db2bae30SDana Myers    if (LogicalResult)
db2bae30SDana Myers    {
26f3cdf0SGordon Ross        ReturnDesc->Integer.Value = ACPI_UINT64_MAX;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana MyersCleanup:
db2bae30SDana Myers
db2bae30SDana Myers    /* Delete return object on error */
db2bae30SDana Myers
db2bae30SDana Myers    if (ACPI_FAILURE (Status))
db2bae30SDana Myers    {
db2bae30SDana Myers        AcpiUtRemoveReference (ReturnDesc);
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /* Save return object on success */
db2bae30SDana Myers
db2bae30SDana Myers    else
db2bae30SDana Myers    {
db2bae30SDana Myers        WalkState->ResultObj = ReturnDesc;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    return_ACPI_STATUS (Status);
db2bae30SDana Myers}