patch-2.4.6 linux/drivers/acpi/executer/exdyadic.c
Next file: linux/drivers/acpi/executer/exfield.c
Previous file: linux/drivers/acpi/executer/exdump.c
Back to the patch index
Back to the overall index
- Lines: 875
- Date:
Wed Jun 20 17:47:40 2001
- Orig file:
v2.4.5/linux/drivers/acpi/executer/exdyadic.c
- Orig date:
Wed Dec 31 16:00:00 1969
diff -u --recursive --new-file v2.4.5/linux/drivers/acpi/executer/exdyadic.c linux/drivers/acpi/executer/exdyadic.c
@@ -0,0 +1,874 @@
+/******************************************************************************
+ *
+ * Module Name: exdyadic - ACPI AML (p-code) execution for dyadic operators
+ * $Revision: 77 $
+ *
+ *****************************************************************************/
+
+/*
+ * Copyright (C) 2000, 2001 R. Byron Moore
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ */
+
+
+#include "acpi.h"
+#include "acparser.h"
+#include "acnamesp.h"
+#include "acinterp.h"
+#include "acevents.h"
+#include "amlcode.h"
+#include "acdispat.h"
+
+
+#define _COMPONENT ACPI_EXECUTER
+ MODULE_NAME ("exdyadic")
+
+
+/*******************************************************************************
+ *
+ * FUNCTION: Acpi_ex_do_concatenate
+ *
+ * PARAMETERS: *Obj_desc - Object to be converted. Must be an
+ * Integer, Buffer, or String
+ *
+ * RETURN: Status
+ *
+ * DESCRIPTION: Concatenate two objects OF THE SAME TYPE.
+ *
+ ******************************************************************************/
+
+ACPI_STATUS
+acpi_ex_do_concatenate (
+ ACPI_OPERAND_OBJECT *obj_desc,
+ ACPI_OPERAND_OBJECT *obj_desc2,
+ ACPI_OPERAND_OBJECT **actual_ret_desc,
+ ACPI_WALK_STATE *walk_state)
+{
+ ACPI_STATUS status;
+ u32 i;
+ ACPI_INTEGER this_integer;
+ ACPI_OPERAND_OBJECT *ret_desc;
+ NATIVE_CHAR *new_buf;
+ u32 integer_size = sizeof (ACPI_INTEGER);
+
+
+ /*
+ * There are three cases to handle:
+ * 1) Two Integers concatenated to produce a buffer
+ * 2) Two Strings concatenated to produce a string
+ * 3) Two Buffers concatenated to produce a buffer
+ */
+ switch (obj_desc->common.type) {
+ case ACPI_TYPE_INTEGER:
+
+ /* Handle both ACPI 1.0 and ACPI 2.0 Integer widths */
+
+ if (walk_state->method_node->flags & ANOBJ_DATA_WIDTH_32) {
+ /*
+ * We are running a method that exists in a 32-bit ACPI table.
+ * Truncate the value to 32 bits by zeroing out the upper
+ * 32-bit field
+ */
+ integer_size = sizeof (u32);
+ }
+
+ /* Result of two integers is a buffer */
+
+ ret_desc = acpi_ut_create_internal_object (ACPI_TYPE_BUFFER);
+ if (!ret_desc) {
+ return (AE_NO_MEMORY);
+ }
+
+ /* Need enough space for two integers */
+
+ ret_desc->buffer.length = integer_size * 2;
+ new_buf = acpi_ut_callocate (ret_desc->buffer.length);
+ if (!new_buf) {
+ REPORT_ERROR
+ (("Ex_do_concatenate: Buffer allocation failure\n"));
+ status = AE_NO_MEMORY;
+ goto cleanup;
+ }
+
+ ret_desc->buffer.pointer = (u8 *) new_buf;
+
+ /* Convert the first integer */
+
+ this_integer = obj_desc->integer.value;
+ for (i = 0; i < integer_size; i++) {
+ new_buf[i] = (u8) this_integer;
+ this_integer >>= 8;
+ }
+
+ /* Convert the second integer */
+
+ this_integer = obj_desc2->integer.value;
+ for (; i < (integer_size * 2); i++) {
+ new_buf[i] = (u8) this_integer;
+ this_integer >>= 8;
+ }
+
+ break;
+
+
+ case ACPI_TYPE_STRING:
+
+ ret_desc = acpi_ut_create_internal_object (ACPI_TYPE_STRING);
+ if (!ret_desc) {
+ return (AE_NO_MEMORY);
+ }
+
+ /* Operand1 is string */
+
+ new_buf = acpi_ut_allocate (obj_desc->string.length +
+ obj_desc2->string.length + 1);
+ if (!new_buf) {
+ REPORT_ERROR
+ (("Ex_do_concatenate: String allocation failure\n"));
+ status = AE_NO_MEMORY;
+ goto cleanup;
+ }
+
+ STRCPY (new_buf, obj_desc->string.pointer);
+ STRCPY (new_buf + obj_desc->string.length,
+ obj_desc2->string.pointer);
+
+ /* Point the return object to the new string */
+
+ ret_desc->string.pointer = new_buf;
+ ret_desc->string.length = obj_desc->string.length +=
+ obj_desc2->string.length;
+ break;
+
+
+ case ACPI_TYPE_BUFFER:
+
+ /* Operand1 is a buffer */
+
+ ret_desc = acpi_ut_create_internal_object (ACPI_TYPE_BUFFER);
+ if (!ret_desc) {
+ return (AE_NO_MEMORY);
+ }
+
+ new_buf = acpi_ut_allocate (obj_desc->buffer.length +
+ obj_desc2->buffer.length);
+ if (!new_buf) {
+ REPORT_ERROR
+ (("Ex_do_concatenate: Buffer allocation failure\n"));
+ status = AE_NO_MEMORY;
+ goto cleanup;
+ }
+
+ MEMCPY (new_buf, obj_desc->buffer.pointer,
+ obj_desc->buffer.length);
+ MEMCPY (new_buf + obj_desc->buffer.length, obj_desc2->buffer.pointer,
+ obj_desc2->buffer.length);
+
+ /*
+ * Point the return object to the new buffer
+ */
+
+ ret_desc->buffer.pointer = (u8 *) new_buf;
+ ret_desc->buffer.length = obj_desc->buffer.length +
+ obj_desc2->buffer.length;
+ break;
+
+ default:
+ status = AE_AML_INTERNAL;
+ ret_desc = NULL;
+ }
+
+
+ *actual_ret_desc = ret_desc;
+ return (AE_OK);
+
+
+cleanup:
+
+ acpi_ut_remove_reference (ret_desc);
+ return (status);
+}
+
+
+/*******************************************************************************
+ *
+ * FUNCTION: Acpi_ex_dyadic1
+ *
+ * PARAMETERS: Opcode - The opcode to be executed
+ *
+ * RETURN: Status
+ *
+ * DESCRIPTION: Execute Type 1 dyadic operator with numeric operands:
+ * Notify_op
+ *
+ * ALLOCATION: Deletes both operands
+ *
+ ******************************************************************************/
+
+ACPI_STATUS
+acpi_ex_dyadic1 (
+ u16 opcode,
+ ACPI_WALK_STATE *walk_state)
+{
+ ACPI_OPERAND_OBJECT *obj_desc = NULL;
+ ACPI_OPERAND_OBJECT *val_desc = NULL;
+ ACPI_NAMESPACE_NODE *node;
+ ACPI_STATUS status = AE_OK;
+
+
+ /* Resolve all operands */
+
+ status = acpi_ex_resolve_operands (opcode, WALK_OPERANDS, walk_state);
+ /* Get the operands */
+
+ status |= acpi_ds_obj_stack_pop_object (&val_desc, walk_state);
+ status |= acpi_ds_obj_stack_pop_object (&obj_desc, walk_state);
+ if (ACPI_FAILURE (status)) {
+ /* Invalid parameters on object stack */
+
+ goto cleanup;
+ }
+
+
+ /* Examine the opcode */
+
+ switch (opcode) {
+
+ /* Def_notify := Notify_op Notify_object Notify_value */
+
+ case AML_NOTIFY_OP:
+
+ /* The Obj_desc is actually an Node */
+
+ node = (ACPI_NAMESPACE_NODE *) obj_desc;
+ obj_desc = NULL;
+
+ /* Object must be a device or thermal zone */
+
+ if (node && val_desc) {
+ switch (node->type) {
+ case ACPI_TYPE_DEVICE:
+ case ACPI_TYPE_THERMAL:
+
+ /*
+ * Dispatch the notify to the appropriate handler
+ * NOTE: the request is queued for execution after this method
+ * completes. The notify handlers are NOT invoked synchronously
+ * from this thread -- because handlers may in turn run other
+ * control methods.
+ */
+
+ status = acpi_ev_queue_notify_request (node,
+ (u32) val_desc->integer.value);
+ break;
+
+ default:
+ status = AE_AML_OPERAND_TYPE;
+ break;
+ }
+ }
+ break;
+
+ default:
+
+ REPORT_ERROR (("Acpi_ex_dyadic1: Unknown dyadic opcode %X\n", opcode));
+ status = AE_AML_BAD_OPCODE;
+ }
+
+
+cleanup:
+
+ /* Always delete both operands */
+
+ acpi_ut_remove_reference (val_desc);
+ acpi_ut_remove_reference (obj_desc);
+
+
+ return (status);
+}
+
+
+/*******************************************************************************
+ *
+ * FUNCTION: Acpi_ex_dyadic2_r
+ *
+ * PARAMETERS: Opcode - The opcode to be executed
+ *
+ * RETURN: Status
+ *
+ * DESCRIPTION: Execute Type 2 dyadic operator with numeric operands and
+ * one or two result operands.
+ *
+ * ALLOCATION: Deletes one operand descriptor -- other remains on stack
+ *
+ ******************************************************************************/
+
+ACPI_STATUS
+acpi_ex_dyadic2_r (
+ u16 opcode,
+ ACPI_WALK_STATE *walk_state,
+ ACPI_OPERAND_OBJECT **return_desc)
+{
+ ACPI_OPERAND_OBJECT *obj_desc = NULL;
+ ACPI_OPERAND_OBJECT *obj_desc2 = NULL;
+ ACPI_OPERAND_OBJECT *res_desc = NULL;
+ ACPI_OPERAND_OBJECT *res_desc2 = NULL;
+ ACPI_OPERAND_OBJECT *ret_desc = NULL;
+ ACPI_OPERAND_OBJECT *ret_desc2 = NULL;
+ ACPI_STATUS status = AE_OK;
+ u32 num_operands = 3;
+
+
+ /* Resolve all operands */
+
+ status = acpi_ex_resolve_operands (opcode, WALK_OPERANDS, walk_state);
+ /* Get all operands */
+
+ if (AML_DIVIDE_OP == opcode) {
+ num_operands = 4;
+ status |= acpi_ds_obj_stack_pop_object (&res_desc2, walk_state);
+ }
+
+ status |= acpi_ds_obj_stack_pop_object (&res_desc, walk_state);
+ status |= acpi_ds_obj_stack_pop_object (&obj_desc2, walk_state);
+ status |= acpi_ds_obj_stack_pop_object (&obj_desc, walk_state);
+ if (ACPI_FAILURE (status)) {
+ goto cleanup;
+ }
+
+
+ /* Create an internal return object if necessary */
+
+ switch (opcode) {
+ case AML_ADD_OP:
+ case AML_BIT_AND_OP:
+ case AML_BIT_NAND_OP:
+ case AML_BIT_OR_OP:
+ case AML_BIT_NOR_OP:
+ case AML_BIT_XOR_OP:
+ case AML_DIVIDE_OP:
+ case AML_MULTIPLY_OP:
+ case AML_SHIFT_LEFT_OP:
+ case AML_SHIFT_RIGHT_OP:
+ case AML_SUBTRACT_OP:
+
+ ret_desc = acpi_ut_create_internal_object (ACPI_TYPE_INTEGER);
+ if (!ret_desc) {
+ status = AE_NO_MEMORY;
+ goto cleanup;
+ }
+
+ break;
+ }
+
+
+ /*
+ * Execute the opcode
+ */
+
+ switch (opcode) {
+
+ /* Def_add := Add_op Operand1 Operand2 Result */
+
+ case AML_ADD_OP:
+
+ ret_desc->integer.value = obj_desc->integer.value +
+ obj_desc2->integer.value;
+ break;
+
+
+ /* Def_and := And_op Operand1 Operand2 Result */
+
+ case AML_BIT_AND_OP:
+
+ ret_desc->integer.value = obj_desc->integer.value &
+ obj_desc2->integer.value;
+ break;
+
+
+ /* Def_nAnd := NAnd_op Operand1 Operand2 Result */
+
+ case AML_BIT_NAND_OP:
+
+ ret_desc->integer.value = ~(obj_desc->integer.value &
+ obj_desc2->integer.value);
+ break;
+
+
+ /* Def_or := Or_op Operand1 Operand2 Result */
+
+ case AML_BIT_OR_OP:
+
+ ret_desc->integer.value = obj_desc->integer.value |
+ obj_desc2->integer.value;
+ break;
+
+
+ /* Def_nOr := NOr_op Operand1 Operand2 Result */
+
+ case AML_BIT_NOR_OP:
+
+ ret_desc->integer.value = ~(obj_desc->integer.value |
+ obj_desc2->integer.value);
+ break;
+
+
+ /* Def_xOr := XOr_op Operand1 Operand2 Result */
+
+ case AML_BIT_XOR_OP:
+
+ ret_desc->integer.value = obj_desc->integer.value ^
+ obj_desc2->integer.value;
+ break;
+
+
+ /* Def_divide := Divide_op Dividend Divisor Remainder Quotient */
+
+ case AML_DIVIDE_OP:
+
+ if (!obj_desc2->integer.value) {
+ REPORT_ERROR
+ (("Ex_dyadic2_r/Divide_op: Divide by zero\n"));
+
+ status = AE_AML_DIVIDE_BY_ZERO;
+ goto cleanup;
+ }
+
+ ret_desc2 = acpi_ut_create_internal_object (ACPI_TYPE_INTEGER);
+ if (!ret_desc2) {
+ status = AE_NO_MEMORY;
+ goto cleanup;
+ }
+
+ /* Remainder (modulo) */
+
+ ret_desc->integer.value = ACPI_MODULO (obj_desc->integer.value,
+ obj_desc2->integer.value);
+
+ /* Result (what we used to call the quotient) */
+
+ ret_desc2->integer.value = ACPI_DIVIDE (obj_desc->integer.value,
+ obj_desc2->integer.value);
+ break;
+
+
+ /* Def_multiply := Multiply_op Operand1 Operand2 Result */
+
+ case AML_MULTIPLY_OP:
+
+ ret_desc->integer.value = obj_desc->integer.value *
+ obj_desc2->integer.value;
+ break;
+
+
+ /* Def_shift_left := Shift_left_op Operand Shift_count Result */
+
+ case AML_SHIFT_LEFT_OP:
+
+ ret_desc->integer.value = obj_desc->integer.value <<
+ obj_desc2->integer.value;
+ break;
+
+
+ /* Def_shift_right := Shift_right_op Operand Shift_count Result */
+
+ case AML_SHIFT_RIGHT_OP:
+
+ ret_desc->integer.value = obj_desc->integer.value >>
+ obj_desc2->integer.value;
+ break;
+
+
+ /* Def_subtract := Subtract_op Operand1 Operand2 Result */
+
+ case AML_SUBTRACT_OP:
+
+ ret_desc->integer.value = obj_desc->integer.value -
+ obj_desc2->integer.value;
+ break;
+
+
+ /* Def_concat := Concat_op Data1 Data2 Result */
+
+ case AML_CONCAT_OP:
+
+
+ /*
+ * Convert the second operand if necessary. The first operand
+ * determines the type of the second operand, (See the Data Types
+ * section of the ACPI specification.) Both object types are
+ * guaranteed to be either Integer/String/Buffer by the operand
+ * resolution mechanism above.
+ */
+
+ switch (obj_desc->common.type) {
+ case ACPI_TYPE_INTEGER:
+ status = acpi_ex_convert_to_integer (&obj_desc2, walk_state);
+ break;
+
+ case ACPI_TYPE_STRING:
+ status = acpi_ex_convert_to_string (&obj_desc2, walk_state);
+ break;
+
+ case ACPI_TYPE_BUFFER:
+ status = acpi_ex_convert_to_buffer (&obj_desc2, walk_state);
+ break;
+
+ default:
+ status = AE_AML_INTERNAL;
+ }
+
+ if (ACPI_FAILURE (status)) {
+ goto cleanup;
+ }
+
+
+ /*
+ * Both operands are now known to be the same object type
+ * (Both are Integer, String, or Buffer), and we can now perform the
+ * concatenation.
+ */
+ status = acpi_ex_do_concatenate (obj_desc, obj_desc2, &ret_desc, walk_state);
+ if (ACPI_FAILURE (status)) {
+ goto cleanup;
+ }
+ break;
+
+
+ default:
+
+ REPORT_ERROR (("Acpi_ex_dyadic2_r: Unknown dyadic opcode %X\n",
+ opcode));
+ status = AE_AML_BAD_OPCODE;
+ goto cleanup;
+ }
+
+
+ /*
+ * Store the result of the operation (which is now in Obj_desc) into
+ * the result descriptor, or the location pointed to by the result
+ * descriptor (Res_desc).
+ */
+
+ status = acpi_ex_store (ret_desc, res_desc, walk_state);
+ if (ACPI_FAILURE (status)) {
+ goto cleanup;
+ }
+
+ if (AML_DIVIDE_OP == opcode) {
+ status = acpi_ex_store (ret_desc2, res_desc2, walk_state);
+
+ /*
+ * Since the remainder is not returned, remove a reference to
+ * the object we created earlier
+ */
+
+ acpi_ut_remove_reference (ret_desc2);
+ }
+
+
+cleanup:
+
+ /* Always delete the operands */
+
+ acpi_ut_remove_reference (obj_desc);
+ acpi_ut_remove_reference (obj_desc2);
+
+
+ /* Delete return object on error */
+
+ if (ACPI_FAILURE (status)) {
+ /* On failure, delete the result ops */
+
+ acpi_ut_remove_reference (res_desc);
+ acpi_ut_remove_reference (res_desc2);
+
+ if (ret_desc) {
+ /* And delete the internal return object */
+
+ acpi_ut_remove_reference (ret_desc);
+ ret_desc = NULL;
+ }
+ }
+
+ /* Set the return object and exit */
+
+ *return_desc = ret_desc;
+ return (status);
+}
+
+
+/*******************************************************************************
+ *
+ * FUNCTION: Acpi_ex_dyadic2_s
+ *
+ * PARAMETERS: Opcode - The opcode to be executed
+ *
+ * RETURN: Status
+ *
+ * DESCRIPTION: Execute Type 2 dyadic synchronization operator
+ *
+ * ALLOCATION: Deletes one operand descriptor -- other remains on stack
+ *
+ ******************************************************************************/
+
+ACPI_STATUS
+acpi_ex_dyadic2_s (
+ u16 opcode,
+ ACPI_WALK_STATE *walk_state,
+ ACPI_OPERAND_OBJECT **return_desc)
+{
+ ACPI_OPERAND_OBJECT *obj_desc;
+ ACPI_OPERAND_OBJECT *time_desc;
+ ACPI_OPERAND_OBJECT *ret_desc = NULL;
+ ACPI_STATUS status;
+
+
+ /* Resolve all operands */
+
+ status = acpi_ex_resolve_operands (opcode, WALK_OPERANDS, walk_state);
+ /* Get all operands */
+
+ status |= acpi_ds_obj_stack_pop_object (&time_desc, walk_state);
+ status |= acpi_ds_obj_stack_pop_object (&obj_desc, walk_state);
+ if (ACPI_FAILURE (status)) {
+ /* Invalid parameters on object stack */
+
+ goto cleanup;
+ }
+
+
+ /* Create the internal return object */
+
+ ret_desc = acpi_ut_create_internal_object (ACPI_TYPE_INTEGER);
+ if (!ret_desc) {
+ status = AE_NO_MEMORY;
+ goto cleanup;
+ }
+
+ /* Default return value is FALSE, operation did not time out */
+
+ ret_desc->integer.value = 0;
+
+
+ /* Examine the opcode */
+
+ switch (opcode) {
+
+ /* Def_acquire := Acquire_op Mutex_object Timeout */
+
+ case AML_ACQUIRE_OP:
+
+ status = acpi_ex_acquire_mutex (time_desc, obj_desc, walk_state);
+ break;
+
+
+ /* Def_wait := Wait_op Acpi_event_object Timeout */
+
+ case AML_WAIT_OP:
+
+ status = acpi_ex_system_wait_event (time_desc, obj_desc);
+ break;
+
+
+ default:
+
+ REPORT_ERROR (("Acpi_ex_dyadic2_s: Unknown dyadic synchronization opcode %X\n", opcode));
+ status = AE_AML_BAD_OPCODE;
+ goto cleanup;
+ }
+
+
+ /*
+ * Return a boolean indicating if operation timed out
+ * (TRUE) or not (FALSE)
+ */
+
+ if (status == AE_TIME) {
+ ret_desc->integer.value = ACPI_INTEGER_MAX; /* TRUE, op timed out */
+ status = AE_OK;
+ }
+
+
+cleanup:
+
+ /* Delete params */
+
+ acpi_ut_remove_reference (time_desc);
+ acpi_ut_remove_reference (obj_desc);
+
+ /* Delete return object on error */
+
+ if (ACPI_FAILURE (status) &&
+ (ret_desc)) {
+ acpi_ut_remove_reference (ret_desc);
+ ret_desc = NULL;
+ }
+
+
+ /* Set the return object and exit */
+
+ *return_desc = ret_desc;
+ return (status);
+}
+
+
+/*******************************************************************************
+ *
+ * FUNCTION: Acpi_ex_dyadic2
+ *
+ * PARAMETERS: Opcode - The opcode to be executed
+ *
+ * RETURN: Status
+ *
+ * DESCRIPTION: Execute Type 2 dyadic operator with numeric operands and
+ * no result operands
+ *
+ * ALLOCATION: Deletes one operand descriptor -- other remains on stack
+ * containing result value
+ *
+ ******************************************************************************/
+
+ACPI_STATUS
+acpi_ex_dyadic2 (
+ u16 opcode,
+ ACPI_WALK_STATE *walk_state,
+ ACPI_OPERAND_OBJECT **return_desc)
+{
+ ACPI_OPERAND_OBJECT *obj_desc;
+ ACPI_OPERAND_OBJECT *obj_desc2;
+ ACPI_OPERAND_OBJECT *ret_desc = NULL;
+ ACPI_STATUS status;
+ u8 lboolean;
+
+
+ /* Resolve all operands */
+
+ status = acpi_ex_resolve_operands (opcode, WALK_OPERANDS, walk_state);
+ /* Get all operands */
+
+ status |= acpi_ds_obj_stack_pop_object (&obj_desc2, walk_state);
+ status |= acpi_ds_obj_stack_pop_object (&obj_desc, walk_state);
+ if (ACPI_FAILURE (status)) {
+ /* Invalid parameters on object stack */
+
+ goto cleanup;
+ }
+
+
+ /* Create the internal return object */
+
+ ret_desc = acpi_ut_create_internal_object (ACPI_TYPE_INTEGER);
+ if (!ret_desc) {
+ status = AE_NO_MEMORY;
+ goto cleanup;
+ }
+
+ /*
+ * Execute the Opcode
+ */
+
+ lboolean = FALSE;
+ switch (opcode) {
+
+ /* Def_lAnd := LAnd_op Operand1 Operand2 */
+
+ case AML_LAND_OP:
+
+ lboolean = (u8) (obj_desc->integer.value &&
+ obj_desc2->integer.value);
+ break;
+
+
+ /* Def_lEqual := LEqual_op Operand1 Operand2 */
+
+ case AML_LEQUAL_OP:
+
+ lboolean = (u8) (obj_desc->integer.value ==
+ obj_desc2->integer.value);
+ break;
+
+
+ /* Def_lGreater := LGreater_op Operand1 Operand2 */
+
+ case AML_LGREATER_OP:
+
+ lboolean = (u8) (obj_desc->integer.value >
+ obj_desc2->integer.value);
+ break;
+
+
+ /* Def_lLess := LLess_op Operand1 Operand2 */
+
+ case AML_LLESS_OP:
+
+ lboolean = (u8) (obj_desc->integer.value <
+ obj_desc2->integer.value);
+ break;
+
+
+ /* Def_lOr := LOr_op Operand1 Operand2 */
+
+ case AML_LOR_OP:
+
+ lboolean = (u8) (obj_desc->integer.value ||
+ obj_desc2->integer.value);
+ break;
+
+
+ default:
+
+ REPORT_ERROR (("Acpi_ex_dyadic2: Unknown dyadic opcode %X\n", opcode));
+ status = AE_AML_BAD_OPCODE;
+ goto cleanup;
+ break;
+ }
+
+
+ /* Set return value to logical TRUE (all ones) or FALSE (zero) */
+
+ if (lboolean) {
+ ret_desc->integer.value = ACPI_INTEGER_MAX;
+ }
+ else {
+ ret_desc->integer.value = 0;
+ }
+
+
+cleanup:
+
+ /* Always delete operands */
+
+ acpi_ut_remove_reference (obj_desc);
+ acpi_ut_remove_reference (obj_desc2);
+
+
+ /* Delete return object on error */
+
+ if (ACPI_FAILURE (status) &&
+ (ret_desc)) {
+ acpi_ut_remove_reference (ret_desc);
+ ret_desc = NULL;
+ }
+
+
+ /* Set the return object and exit */
+
+ *return_desc = ret_desc;
+ return (status);
+}
+
+
FUNET's LINUX-ADM group, linux-adm@nic.funet.fi
TCL-scripts by Sam Shen (who was at: slshen@lbl.gov)