acpica/executer/exmisc.c

db2bae30SDana Myers/******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * Module Name: exmisc - ACPI AML (p-code) execution - specific opcodes
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 "acinterp.h"
db2bae30SDana Myers#include "amlcode.h"
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers#define _COMPONENT          ACPI_EXECUTER
db2bae30SDana Myers        ACPI_MODULE_NAME    ("exmisc")
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers/*******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * FUNCTION:    AcpiExGetObjectReference
db2bae30SDana Myers *
db2bae30SDana Myers * PARAMETERS:  ObjDesc             - Create a reference to this object
db2bae30SDana Myers *              ReturnDesc          - Where to store the reference
db2bae30SDana Myers *              WalkState           - Current state
db2bae30SDana Myers *
db2bae30SDana Myers * RETURN:      Status
db2bae30SDana Myers *
db2bae30SDana Myers * DESCRIPTION: Obtain and return a "reference" to the target object
db2bae30SDana Myers *              Common code for the RefOfOp and the CondRefOfOp.
db2bae30SDana Myers *
db2bae30SDana Myers ******************************************************************************/
db2bae30SDana Myers
db2bae30SDana MyersACPI_STATUS
db2bae30SDana MyersAcpiExGetObjectReference (
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     *ObjDesc,
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     **ReturnDesc,
db2bae30SDana Myers    ACPI_WALK_STATE         *WalkState)
db2bae30SDana Myers{
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     *ReferenceObj;
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     *ReferencedObj;
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    ACPI_FUNCTION_TRACE_PTR (ExGetObjectReference, ObjDesc);
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    *ReturnDesc = NULL;
db2bae30SDana Myers
db2bae30SDana Myers    switch (ACPI_GET_DESCRIPTOR_TYPE (ObjDesc))
db2bae30SDana Myers    {
db2bae30SDana Myers    case ACPI_DESC_TYPE_OPERAND:
db2bae30SDana Myers
aa2aa9a6SDana Myers        if (ObjDesc->Common.Type != ACPI_TYPE_LOCAL_REFERENCE)
db2bae30SDana Myers        {
db2bae30SDana Myers            return_ACPI_STATUS (AE_AML_OPERAND_TYPE);
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /*
db2bae30SDana Myers         * Must be a reference to a Local or Arg
db2bae30SDana Myers         */
db2bae30SDana Myers        switch (ObjDesc->Reference.Class)
db2bae30SDana Myers        {
db2bae30SDana Myers        case ACPI_REFCLASS_LOCAL:
db2bae30SDana Myers        case ACPI_REFCLASS_ARG:
db2bae30SDana Myers        case ACPI_REFCLASS_DEBUG:
db2bae30SDana Myers
db2bae30SDana Myers            /* The referenced object is the pseudo-node for the local/arg */
db2bae30SDana Myers
db2bae30SDana Myers            ReferencedObj = ObjDesc->Reference.Object;
db2bae30SDana Myers            break;
db2bae30SDana Myers
db2bae30SDana Myers        default:
db2bae30SDana Myers
*385cc6b4SJerry Jelinek            ACPI_ERROR ((AE_INFO, "Invalid Reference Class 0x%2.2X",
db2bae30SDana Myers                ObjDesc->Reference.Class));
*385cc6b4SJerry Jelinek            return_ACPI_STATUS (AE_AML_OPERAND_TYPE);
db2bae30SDana Myers        }
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    case ACPI_DESC_TYPE_NAMED:
db2bae30SDana Myers        /*
db2bae30SDana Myers         * A named reference that has already been resolved to a Node
db2bae30SDana Myers         */
db2bae30SDana Myers        ReferencedObj = ObjDesc;
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    default:
db2bae30SDana Myers
26f3cdf0SGordon Ross        ACPI_ERROR ((AE_INFO, "Invalid descriptor type 0x%X",
db2bae30SDana Myers            ACPI_GET_DESCRIPTOR_TYPE (ObjDesc)));
db2bae30SDana Myers        return_ACPI_STATUS (AE_TYPE);
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    /* Create a new reference object */
db2bae30SDana Myers
db2bae30SDana Myers    ReferenceObj = AcpiUtCreateInternalObject (ACPI_TYPE_LOCAL_REFERENCE);
db2bae30SDana Myers    if (!ReferenceObj)
db2bae30SDana Myers    {
db2bae30SDana Myers        return_ACPI_STATUS (AE_NO_MEMORY);
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    ReferenceObj->Reference.Class = ACPI_REFCLASS_REFOF;
db2bae30SDana Myers    ReferenceObj->Reference.Object = ReferencedObj;
db2bae30SDana Myers    *ReturnDesc = ReferenceObj;
db2bae30SDana Myers
db2bae30SDana Myers    ACPI_DEBUG_PRINT ((ACPI_DB_EXEC,
db2bae30SDana Myers        "Object %p Type [%s], returning Reference %p\n",
db2bae30SDana Myers        ObjDesc, AcpiUtGetObjectTypeName (ObjDesc), *ReturnDesc));
db2bae30SDana Myers
db2bae30SDana Myers    return_ACPI_STATUS (AE_OK);
db2bae30SDana Myers}
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers/*******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * FUNCTION:    AcpiExDoMathOp
db2bae30SDana Myers *
db2bae30SDana Myers * PARAMETERS:  Opcode              - AML opcode
db2bae30SDana Myers *              Integer0            - Integer operand #0
db2bae30SDana Myers *              Integer1            - Integer operand #1
db2bae30SDana Myers *
db2bae30SDana Myers * RETURN:      Integer result of the operation
db2bae30SDana Myers *
db2bae30SDana Myers * DESCRIPTION: Execute a math AML opcode. The purpose of having all of the
db2bae30SDana Myers *              math functions here is to prevent a lot of pointer dereferencing
db2bae30SDana Myers *              to obtain the operands.
db2bae30SDana Myers *
db2bae30SDana Myers ******************************************************************************/
db2bae30SDana Myers
26f3cdf0SGordon RossUINT64
db2bae30SDana MyersAcpiExDoMathOp (
db2bae30SDana Myers    UINT16                  Opcode,
26f3cdf0SGordon Ross    UINT64                  Integer0,
26f3cdf0SGordon Ross    UINT64                  Integer1)
db2bae30SDana Myers{
db2bae30SDana Myers
db2bae30SDana Myers    ACPI_FUNCTION_ENTRY ();
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    switch (Opcode)
db2bae30SDana Myers    {
db2bae30SDana Myers    case AML_ADD_OP:                /* Add (Integer0, Integer1, Result) */
db2bae30SDana Myers
db2bae30SDana Myers        return (Integer0 + Integer1);
db2bae30SDana Myers
db2bae30SDana Myers    case AML_BIT_AND_OP:            /* And (Integer0, Integer1, Result) */
db2bae30SDana Myers
db2bae30SDana Myers        return (Integer0 & Integer1);
db2bae30SDana Myers
db2bae30SDana Myers    case AML_BIT_NAND_OP:           /* NAnd (Integer0, Integer1, Result) */
db2bae30SDana Myers
db2bae30SDana Myers        return (~(Integer0 & Integer1));
db2bae30SDana Myers
db2bae30SDana Myers    case AML_BIT_OR_OP:             /* Or (Integer0, Integer1, Result) */
db2bae30SDana Myers
db2bae30SDana Myers        return (Integer0 | Integer1);
db2bae30SDana Myers
db2bae30SDana Myers    case AML_BIT_NOR_OP:            /* NOr (Integer0, Integer1, Result) */
db2bae30SDana Myers
db2bae30SDana Myers        return (~(Integer0 | Integer1));
db2bae30SDana Myers
db2bae30SDana Myers    case AML_BIT_XOR_OP:            /* XOr (Integer0, Integer1, Result) */
db2bae30SDana Myers
db2bae30SDana Myers        return (Integer0 ^ Integer1);
db2bae30SDana Myers
db2bae30SDana Myers    case AML_MULTIPLY_OP:           /* Multiply (Integer0, Integer1, Result) */
db2bae30SDana Myers
db2bae30SDana Myers        return (Integer0 * Integer1);
db2bae30SDana Myers
db2bae30SDana Myers    case AML_SHIFT_LEFT_OP:         /* ShiftLeft (Operand, ShiftCount, Result)*/
db2bae30SDana Myers
db2bae30SDana Myers        /*
db2bae30SDana Myers         * We need to check if the shiftcount is larger than the integer bit
db2bae30SDana Myers         * width since the behavior of this is not well-defined in the C language.
db2bae30SDana Myers         */
db2bae30SDana Myers        if (Integer1 >= AcpiGbl_IntegerBitWidth)
db2bae30SDana Myers        {
db2bae30SDana Myers            return (0);
db2bae30SDana Myers        }
db2bae30SDana Myers        return (Integer0 << Integer1);
db2bae30SDana Myers
db2bae30SDana Myers    case AML_SHIFT_RIGHT_OP:        /* ShiftRight (Operand, ShiftCount, Result) */
db2bae30SDana Myers
db2bae30SDana Myers        /*
db2bae30SDana Myers         * We need to check if the shiftcount is larger than the integer bit
db2bae30SDana Myers         * width since the behavior of this is not well-defined in the C language.
db2bae30SDana Myers         */
db2bae30SDana Myers        if (Integer1 >= AcpiGbl_IntegerBitWidth)
db2bae30SDana Myers        {
db2bae30SDana Myers            return (0);
db2bae30SDana Myers        }
db2bae30SDana Myers        return (Integer0 >> Integer1);
db2bae30SDana Myers
db2bae30SDana Myers    case AML_SUBTRACT_OP:           /* Subtract (Integer0, Integer1, Result) */
db2bae30SDana Myers
db2bae30SDana Myers        return (Integer0 - Integer1);
db2bae30SDana Myers
db2bae30SDana Myers    default:
db2bae30SDana Myers
db2bae30SDana Myers        return (0);
db2bae30SDana Myers    }
db2bae30SDana Myers}
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers/*******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * FUNCTION:    AcpiExDoLogicalNumericOp
db2bae30SDana Myers *
db2bae30SDana Myers * PARAMETERS:  Opcode              - AML opcode
db2bae30SDana Myers *              Integer0            - Integer operand #0
db2bae30SDana Myers *              Integer1            - Integer operand #1
db2bae30SDana Myers *              LogicalResult       - TRUE/FALSE result of the operation
db2bae30SDana Myers *
db2bae30SDana Myers * RETURN:      Status
db2bae30SDana Myers *
db2bae30SDana Myers * DESCRIPTION: Execute a logical "Numeric" AML opcode. For these Numeric
db2bae30SDana Myers *              operators (LAnd and LOr), both operands must be integers.
db2bae30SDana Myers *
db2bae30SDana Myers *              Note: cleanest machine code seems to be produced by the code
db2bae30SDana Myers *              below, rather than using statements of the form:
db2bae30SDana Myers *                  Result = (Integer0 && Integer1);
db2bae30SDana Myers *
db2bae30SDana Myers ******************************************************************************/
db2bae30SDana Myers
db2bae30SDana MyersACPI_STATUS
db2bae30SDana MyersAcpiExDoLogicalNumericOp (
db2bae30SDana Myers    UINT16                  Opcode,
26f3cdf0SGordon Ross    UINT64                  Integer0,
26f3cdf0SGordon Ross    UINT64                  Integer1,
db2bae30SDana Myers    BOOLEAN                 *LogicalResult)
db2bae30SDana Myers{
db2bae30SDana Myers    ACPI_STATUS             Status = AE_OK;
db2bae30SDana Myers    BOOLEAN                 LocalResult = FALSE;
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    ACPI_FUNCTION_TRACE (ExDoLogicalNumericOp);
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    switch (Opcode)
db2bae30SDana Myers    {
db2bae30SDana Myers    case AML_LAND_OP:               /* LAnd (Integer0, Integer1) */
db2bae30SDana Myers
db2bae30SDana Myers        if (Integer0 && Integer1)
db2bae30SDana Myers        {
db2bae30SDana Myers            LocalResult = TRUE;
db2bae30SDana Myers        }
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    case AML_LOR_OP:                /* LOr (Integer0, Integer1) */
db2bae30SDana Myers
db2bae30SDana Myers        if (Integer0 || Integer1)
db2bae30SDana Myers        {
db2bae30SDana Myers            LocalResult = TRUE;
db2bae30SDana Myers        }
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    default:
*385cc6b4SJerry Jelinek
db2bae30SDana Myers        Status = AE_AML_INTERNAL;
db2bae30SDana Myers        break;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /* Return the logical result and status */
db2bae30SDana Myers
db2bae30SDana Myers    *LogicalResult = LocalResult;
db2bae30SDana Myers    return_ACPI_STATUS (Status);
db2bae30SDana Myers}
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers/*******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * FUNCTION:    AcpiExDoLogicalOp
db2bae30SDana Myers *
db2bae30SDana Myers * PARAMETERS:  Opcode              - AML opcode
db2bae30SDana Myers *              Operand0            - operand #0
db2bae30SDana Myers *              Operand1            - operand #1
db2bae30SDana Myers *              LogicalResult       - TRUE/FALSE result of the operation
db2bae30SDana Myers *
db2bae30SDana Myers * RETURN:      Status
db2bae30SDana Myers *
db2bae30SDana Myers * DESCRIPTION: Execute a logical AML opcode. The purpose of having all of the
db2bae30SDana Myers *              functions here is to prevent a lot of pointer dereferencing
db2bae30SDana Myers *              to obtain the operands and to simplify the generation of the
db2bae30SDana Myers *              logical value. For the Numeric operators (LAnd and LOr), both
db2bae30SDana Myers *              operands must be integers. For the other logical operators,
db2bae30SDana Myers *              operands can be any combination of Integer/String/Buffer. The
db2bae30SDana Myers *              first operand determines the type to which the second operand
db2bae30SDana Myers *              will be converted.
db2bae30SDana Myers *
db2bae30SDana Myers *              Note: cleanest machine code seems to be produced by the code
db2bae30SDana Myers *              below, rather than using statements of the form:
db2bae30SDana Myers *                  Result = (Operand0 == Operand1);
db2bae30SDana Myers *
db2bae30SDana Myers ******************************************************************************/
db2bae30SDana Myers
db2bae30SDana MyersACPI_STATUS
db2bae30SDana MyersAcpiExDoLogicalOp (
db2bae30SDana Myers    UINT16                  Opcode,
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     *Operand0,
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     *Operand1,
db2bae30SDana Myers    BOOLEAN                 *LogicalResult)
db2bae30SDana Myers{
db2bae30SDana Myers    ACPI_OPERAND_OBJECT     *LocalOperand1 = Operand1;
26f3cdf0SGordon Ross    UINT64                  Integer0;
26f3cdf0SGordon Ross    UINT64                  Integer1;
db2bae30SDana Myers    UINT32                  Length0;
db2bae30SDana Myers    UINT32                  Length1;
db2bae30SDana Myers    ACPI_STATUS             Status = AE_OK;
db2bae30SDana Myers    BOOLEAN                 LocalResult = FALSE;
db2bae30SDana Myers    int                     Compare;
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    ACPI_FUNCTION_TRACE (ExDoLogicalOp);
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    /*
db2bae30SDana Myers     * Convert the second operand if necessary. The first operand
db2bae30SDana Myers     * determines the type of the second operand, (See the Data Types
db2bae30SDana Myers     * section of the ACPI 3.0+ specification.)  Both object types are
db2bae30SDana Myers     * guaranteed to be either Integer/String/Buffer by the operand
db2bae30SDana Myers     * resolution mechanism.
db2bae30SDana Myers     */
aa2aa9a6SDana Myers    switch (Operand0->Common.Type)
db2bae30SDana Myers    {
db2bae30SDana Myers    case ACPI_TYPE_INTEGER:
*385cc6b4SJerry Jelinek
db2bae30SDana Myers        Status = AcpiExConvertToInteger (Operand1, &LocalOperand1, 16);
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    case ACPI_TYPE_STRING:
*385cc6b4SJerry Jelinek
*385cc6b4SJerry Jelinek        Status = AcpiExConvertToString (
*385cc6b4SJerry Jelinek            Operand1, &LocalOperand1, ACPI_IMPLICIT_CONVERT_HEX);
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    case ACPI_TYPE_BUFFER:
*385cc6b4SJerry Jelinek
db2bae30SDana Myers        Status = AcpiExConvertToBuffer (Operand1, &LocalOperand1);
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    default:
*385cc6b4SJerry Jelinek
db2bae30SDana Myers        Status = AE_AML_INTERNAL;
db2bae30SDana Myers        break;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    if (ACPI_FAILURE (Status))
db2bae30SDana Myers    {
db2bae30SDana Myers        goto Cleanup;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /*
db2bae30SDana Myers     * Two cases: 1) Both Integers, 2) Both Strings or Buffers
db2bae30SDana Myers     */
aa2aa9a6SDana Myers    if (Operand0->Common.Type == ACPI_TYPE_INTEGER)
db2bae30SDana Myers    {
db2bae30SDana Myers        /*
db2bae30SDana Myers         * 1) Both operands are of type integer
db2bae30SDana Myers         *    Note: LocalOperand1 may have changed above
db2bae30SDana Myers         */
db2bae30SDana Myers        Integer0 = Operand0->Integer.Value;
db2bae30SDana Myers        Integer1 = LocalOperand1->Integer.Value;
db2bae30SDana Myers
db2bae30SDana Myers        switch (Opcode)
db2bae30SDana Myers        {
db2bae30SDana Myers        case AML_LEQUAL_OP:             /* LEqual (Operand0, Operand1) */
db2bae30SDana Myers
db2bae30SDana Myers            if (Integer0 == Integer1)
db2bae30SDana Myers            {
db2bae30SDana Myers                LocalResult = TRUE;
db2bae30SDana Myers            }
db2bae30SDana Myers            break;
db2bae30SDana Myers
db2bae30SDana Myers        case AML_LGREATER_OP:           /* LGreater (Operand0, Operand1) */
db2bae30SDana Myers
db2bae30SDana Myers            if (Integer0 > Integer1)
db2bae30SDana Myers            {
db2bae30SDana Myers                LocalResult = TRUE;
db2bae30SDana Myers            }
db2bae30SDana Myers            break;
db2bae30SDana Myers
db2bae30SDana Myers        case AML_LLESS_OP:              /* LLess (Operand0, Operand1) */
db2bae30SDana Myers
db2bae30SDana Myers            if (Integer0 < Integer1)
db2bae30SDana Myers            {
db2bae30SDana Myers                LocalResult = TRUE;
db2bae30SDana Myers            }
db2bae30SDana Myers            break;
db2bae30SDana Myers
db2bae30SDana Myers        default:
*385cc6b4SJerry Jelinek
db2bae30SDana Myers            Status = AE_AML_INTERNAL;
db2bae30SDana Myers            break;
db2bae30SDana Myers        }
db2bae30SDana Myers    }
db2bae30SDana Myers    else
db2bae30SDana Myers    {
db2bae30SDana Myers        /*
db2bae30SDana Myers         * 2) Both operands are Strings or both are Buffers
db2bae30SDana Myers         *    Note: Code below takes advantage of common Buffer/String
db2bae30SDana Myers         *          object fields. LocalOperand1 may have changed above. Use
db2bae30SDana Myers         *          memcmp to handle nulls in buffers.
db2bae30SDana Myers         */
db2bae30SDana Myers        Length0 = Operand0->Buffer.Length;
db2bae30SDana Myers        Length1 = LocalOperand1->Buffer.Length;
db2bae30SDana Myers
db2bae30SDana Myers        /* Lexicographic compare: compare the data bytes */
db2bae30SDana Myers
*385cc6b4SJerry Jelinek        Compare = memcmp (Operand0->Buffer.Pointer,
db2bae30SDana Myers            LocalOperand1->Buffer.Pointer,
db2bae30SDana Myers            (Length0 > Length1) ? Length1 : Length0);
db2bae30SDana Myers
db2bae30SDana Myers        switch (Opcode)
db2bae30SDana Myers        {
db2bae30SDana Myers        case AML_LEQUAL_OP:             /* LEqual (Operand0, Operand1) */
db2bae30SDana Myers
db2bae30SDana Myers            /* Length and all bytes must be equal */
db2bae30SDana Myers
db2bae30SDana Myers            if ((Length0 == Length1) &&
db2bae30SDana Myers                (Compare == 0))
db2bae30SDana Myers            {
db2bae30SDana Myers                /* Length and all bytes match ==> TRUE */
db2bae30SDana Myers
db2bae30SDana Myers                LocalResult = TRUE;
db2bae30SDana Myers            }
db2bae30SDana Myers            break;
db2bae30SDana Myers
db2bae30SDana Myers        case AML_LGREATER_OP:           /* LGreater (Operand0, Operand1) */
db2bae30SDana Myers
db2bae30SDana Myers            if (Compare > 0)
db2bae30SDana Myers            {
db2bae30SDana Myers                LocalResult = TRUE;
db2bae30SDana Myers                goto Cleanup;   /* TRUE */
db2bae30SDana Myers            }
db2bae30SDana Myers            if (Compare < 0)
db2bae30SDana Myers            {
db2bae30SDana Myers                goto Cleanup;   /* FALSE */
db2bae30SDana Myers            }
db2bae30SDana Myers
db2bae30SDana Myers            /* Bytes match (to shortest length), compare lengths */
db2bae30SDana Myers
db2bae30SDana Myers            if (Length0 > Length1)
db2bae30SDana Myers            {
db2bae30SDana Myers                LocalResult = TRUE;
db2bae30SDana Myers            }
db2bae30SDana Myers            break;
db2bae30SDana Myers
db2bae30SDana Myers        case AML_LLESS_OP:              /* LLess (Operand0, Operand1) */
db2bae30SDana Myers
db2bae30SDana Myers            if (Compare > 0)
db2bae30SDana Myers            {
db2bae30SDana Myers                goto Cleanup;   /* FALSE */
db2bae30SDana Myers            }
db2bae30SDana Myers            if (Compare < 0)
db2bae30SDana Myers            {
db2bae30SDana Myers                LocalResult = TRUE;
db2bae30SDana Myers                goto Cleanup;   /* TRUE */
db2bae30SDana Myers            }
db2bae30SDana Myers
db2bae30SDana Myers            /* Bytes match (to shortest length), compare lengths */
db2bae30SDana Myers
db2bae30SDana Myers            if (Length0 < Length1)
db2bae30SDana Myers            {
db2bae30SDana Myers                LocalResult = TRUE;
db2bae30SDana Myers            }
db2bae30SDana Myers            break;
db2bae30SDana Myers
db2bae30SDana Myers        default:
*385cc6b4SJerry Jelinek
db2bae30SDana Myers            Status = AE_AML_INTERNAL;
db2bae30SDana Myers            break;
db2bae30SDana Myers        }
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana MyersCleanup:
db2bae30SDana Myers
db2bae30SDana Myers    /* New object was created if implicit conversion performed - delete */
db2bae30SDana Myers
db2bae30SDana Myers    if (LocalOperand1 != Operand1)
db2bae30SDana Myers    {
db2bae30SDana Myers        AcpiUtRemoveReference (LocalOperand1);
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /* Return the logical result and status */
db2bae30SDana Myers
db2bae30SDana Myers    *LogicalResult = LocalResult;
db2bae30SDana Myers    return_ACPI_STATUS (Status);
db2bae30SDana Myers}