patch-2.4.0-test3 linux/drivers/acpi/interpreter/amresnte.c

• Lines: 556
• Date: Wed Jul 5 11:23:12 2000
• Orig file: v2.4.0-test2/linux/drivers/acpi/interpreter/amresnte.c
• Orig date: Wed Dec 31 16:00:00 1969

diff -u --recursive --new-file v2.4.0-test2/linux/drivers/acpi/interpreter/amresnte.c linux/drivers/acpi/interpreter/amresnte.c
@@ -0,0 +1,555 @@
+
+/******************************************************************************
+ *
+ * Module Name: amresnte - AML Interpreter object resolution
+ *
+ *****************************************************************************/
+
+/*
+ *  Copyright (C) 2000 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 "amlcode.h"
+#include "parser.h"
+#include "dispatch.h"
+#include "interp.h"
+#include "namesp.h"
+#include "tables.h"
+#include "events.h"
+
+
+#define _COMPONENT          INTERPRETER
+	 MODULE_NAME         ("amresnte");
+
+
+/*******************************************************************************
+ *
+ * FUNCTION:    Acpi_aml_resolve_entry_to_value
+ *
+ * PARAMETERS:  Stack_ptr       - Pointer to a location on a stack that contains
+ *                                a ptr to an NTE
+ *
+ * RETURN:      Status
+ *
+ * DESCRIPTION: Resolve a ACPI_NAMED_OBJECT(nte, A.K.A. a "direct name pointer")
+ *
+ * Note: for some of the data types, the pointer attached to the NTE can be
+ * either a pointer to an actual internal object or a pointer into the AML
+ * stream itself.  These types are currently:
+ *
+ *      ACPI_TYPE_NUMBER
+ *      ACPI_TYPE_STRING
+ *      ACPI_TYPE_BUFFER
+ *      ACPI_TYPE_MUTEX
+ *      ACPI_TYPE_PACKAGE
+ *
+ ******************************************************************************/
+
+ACPI_STATUS
+acpi_aml_resolve_entry_to_value (
+	ACPI_NAMED_OBJECT       **stack_ptr)
+{
+	ACPI_STATUS             status = AE_OK;
+	ACPI_OBJECT_INTERNAL    *val_desc = NULL;
+	ACPI_OBJECT_INTERNAL    *obj_desc = NULL;
+	ACPI_NAMED_OBJECT       *stack_entry;
+	u8                      *aml_pointer = NULL;
+	OBJECT_TYPE_INTERNAL    entry_type;
+	u8                      locked;
+	u8                      attached_aml_pointer = FALSE;
+	u8                      aml_opcode = 0;
+	u32                     temp_val;
+	OBJECT_TYPE_INTERNAL    object_type;
+
+
+	stack_entry = *stack_ptr;
+
+
+	/*
+	 * The stack pointer is a "Direct name ptr", and points to a
+	 * a ACPI_NAMED_OBJECT(nte).  Get the pointer that is attached to
+	 * the nte.
+	 */
+
+	val_desc    = acpi_ns_get_attached_object ((ACPI_HANDLE) stack_entry);
+	entry_type  = acpi_ns_get_type ((ACPI_HANDLE) stack_entry);
+
+	/*
+	 * The Val_desc attached to the NTE can be either:
+	 * 1) An internal ACPI object
+	 * 2) A pointer into the AML stream (into one of the ACPI system tables)
+	 */
+
+	if (acpi_tb_system_table_pointer (val_desc)) {
+		attached_aml_pointer = TRUE;
+		aml_opcode = *((u8 *) val_desc);
+		aml_pointer = ((u8 *) val_desc) + 1;
+
+	}
+
+
+	/*
+	 * Action is based on the type of the NTE, which indicates the type
+	 * of the attached object or pointer
+	 */
+	switch (entry_type)
+	{
+
+	case ACPI_TYPE_PACKAGE:
+
+		/*
+		 * Val_desc should point to either an ACPI_OBJECT_INTERNAL of
+		 * type Package, or an initialization in the AML stream.
+		 */
+		if (!val_desc) {
+			return (AE_AML_NO_OPERAND);
+		}
+
+
+		if (attached_aml_pointer) {
+			/*
+			 * This means that the package initialization is not parsed
+			 * -- should not happen
+			 */
+			return (AE_NOT_IMPLEMENTED);
+		}
+
+		/* Val_desc is an internal object in all cases by the time we get here */
+
+		if (!val_desc || (ACPI_TYPE_PACKAGE != val_desc->common.type)) {
+			return (AE_AML_OPERAND_TYPE);
+		}
+
+		/* Return an additional reference to the object */
+
+		obj_desc = val_desc;
+		acpi_cm_add_reference (obj_desc);
+		break;
+
+
+	case ACPI_TYPE_BUFFER:
+
+		if (!val_desc) {
+			return (AE_AML_NO_OPERAND);
+		}
+
+		if (attached_aml_pointer) {
+			/*
+			 * This means that the buffer initialization is not parsed
+			 * -- should not happen
+			 */
+			return (AE_NOT_IMPLEMENTED);
+		}
+
+		/* Val_desc is an internal object in all cases by the time we get here */
+
+		if (!val_desc || (ACPI_TYPE_BUFFER != val_desc->common.type)) {
+			return (AE_AML_OPERAND_TYPE);
+		}
+
+		/* Return an additional reference to the object */
+
+		obj_desc = val_desc;
+		acpi_cm_add_reference (obj_desc);
+
+		break;
+
+
+	case ACPI_TYPE_STRING:
+
+		if (attached_aml_pointer) {
+			/* Allocate a new string object */
+
+			obj_desc = acpi_cm_create_internal_object (ACPI_TYPE_STRING);
+			if (!obj_desc) {
+				return (AE_NO_MEMORY);
+			}
+
+			/* Init the internal object */
+
+			obj_desc->string.pointer = (char *) aml_pointer;
+			obj_desc->string.length = STRLEN (aml_pointer);
+		}
+
+		else {
+			if (ACPI_TYPE_STRING != val_desc->common.type) {
+				return (AE_AML_OPERAND_TYPE);
+			}
+
+			/* Return an additional reference to the object */
+
+			obj_desc = val_desc;
+			acpi_cm_add_reference (obj_desc);
+		}
+
+		break;
+
+
+	case ACPI_TYPE_NUMBER:
+
+		if (!val_desc) {
+			return (AE_AML_NO_OPERAND);
+		}
+
+
+		/*
+		 * An ACPI_TYPE_NUMBER can be either an object or an AML pointer
+		 */
+
+		if (attached_aml_pointer) {
+			/*
+			 * The attachment points into the AML stream, get the number from
+			 * there.  The actual number is based upon the AML opcode
+			 *
+			 * Note: Word_op and DWord_op will not work properly if the
+			 *       processor's endianness does not match the AML's.
+			 */
+
+			switch (aml_opcode)
+			{
+
+			case AML_ZERO_OP:
+
+				temp_val = 0;
+				break;
+
+
+			case AML_ONE_OP:
+
+				temp_val = 1;
+				break;
+
+
+			case AML_ONES_OP:
+
+				temp_val = 0xFFFFFFFF;
+				break;
+
+
+			case AML_BYTE_OP:
+
+				temp_val = (u32) ((u8 *) val_desc)[1];
+				break;
+
+
+			case AML_WORD_OP:
+
+				MOVE_UNALIGNED16_TO_32 (&temp_val, &((u8 *) val_desc)[1]);
+				break;
+
+
+			case AML_DWORD_OP:
+
+				MOVE_UNALIGNED32_TO_32 (&temp_val, &((u8 *) val_desc)[1]);
+				break;
+
+
+			default:
+
+				return (AE_AML_BAD_OPCODE);
+
+			} /* switch */
+
+
+			/* Create and initialize a new object */
+
+			obj_desc = acpi_cm_create_internal_object (ACPI_TYPE_NUMBER);
+			if (!obj_desc) {
+				return (AE_NO_MEMORY);
+			}
+
+			obj_desc->number.value = temp_val;
+		}
+
+		else {
+			/*
+			 * The NTE has an attached internal object, make sure that it's a
+			 * number
+			 */
+
+			if (ACPI_TYPE_NUMBER != val_desc->common.type) {
+				return (AE_AML_OPERAND_TYPE);
+			}
+
+			/* Return an additional reference to the object */
+
+			obj_desc = val_desc;
+			acpi_cm_add_reference (obj_desc);
+		}
+
+		break;
+
+
+	case INTERNAL_TYPE_DEF_FIELD:
+
+		/*
+		 * TBD: [Investigate] Is this the correct solution?
+		 *
+		 * This section was extended to convert to generic buffer if
+		 *  the return length is greater than 32 bits, but still allows
+		 *  for returning a type Number for smaller values because the
+		 *  caller can then apply arithmetic operators on those fields.
+		 *
+		 * XXX - Implementation limitation: Fields are implemented as type
+		 * XXX - Number, but they really are supposed to be type Buffer.
+		 * XXX - The two are interchangeable only for lengths <= 32 bits.
+		 */
+		if(val_desc->field.length > 32) {
+			object_type = ACPI_TYPE_BUFFER;
+		}
+		else {
+			object_type = ACPI_TYPE_NUMBER;
+		}
+
+		/*
+		 * Create the destination buffer object and the buffer space.
+		 */
+		obj_desc = acpi_cm_create_internal_object (object_type);
+		if (!obj_desc) {
+			return (AE_NO_MEMORY);
+		}
+
+		/*
+		 * Fill in the object specific details
+		 */
+		if (ACPI_TYPE_BUFFER == object_type) {
+			obj_desc->buffer.pointer = acpi_cm_callocate(val_desc->field.length);
+			if (!obj_desc->buffer.pointer) {
+				acpi_cm_remove_reference(obj_desc);
+				return (AE_NO_MEMORY);
+			}
+
+			obj_desc->buffer.length = val_desc->field.length;
+
+			status = acpi_aml_get_named_field_value ((ACPI_HANDLE) stack_entry,
+					  obj_desc->buffer.pointer, obj_desc->buffer.length);
+
+			if (AE_OK != status) {
+				return (status);
+			}
+		}
+		else {
+			status = acpi_aml_get_named_field_value ((ACPI_HANDLE) stack_entry,
+					  &temp_val, sizeof (temp_val));
+
+			if (AE_OK != status) {
+				return (status);
+			}
+
+			obj_desc->number.value = temp_val;
+		}
+
+
+		break;
+
+
+	case INTERNAL_TYPE_BANK_FIELD:
+
+		if (!val_desc) {
+			return (AE_AML_NO_OPERAND);
+		}
+
+		if (attached_aml_pointer) {
+			return (AE_AML_OPERAND_TYPE);
+		}
+
+		if (INTERNAL_TYPE_BANK_FIELD != val_desc->common.type) {
+			return (AE_AML_OPERAND_TYPE);
+		}
+
+
+		/* Get the global lock if needed */
+
+		obj_desc = (ACPI_OBJECT_INTERNAL *) *stack_ptr;
+		locked = acpi_aml_acquire_global_lock (obj_desc->field_unit.lock_rule);
+		{
+
+			/* Set Index value to select proper Data register */
+			/* perform the update */
+
+			status = acpi_aml_set_named_field_value (val_desc->bank_field.bank_select,
+					   &val_desc->bank_field.value,
+					   sizeof (val_desc->bank_field.value));
+		}
+		acpi_aml_release_global_lock (locked);
+
+
+		if (AE_OK != status) {
+			return (status);
+		}
+
+		/* Read Data value */
+
+		status = acpi_aml_get_named_field_value (
+				 (ACPI_HANDLE) val_desc->bank_field.container,
+				 &temp_val, sizeof (temp_val));
+		if (AE_OK != status) {
+			return (status);
+		}
+
+		obj_desc = acpi_cm_create_internal_object (ACPI_TYPE_NUMBER);
+		if (!obj_desc) {
+			return (AE_NO_MEMORY);
+		}
+
+		obj_desc->number.value = temp_val;
+		break;
+
+
+	case INTERNAL_TYPE_INDEX_FIELD:
+
+		if (!val_desc) {
+			return (AE_AML_NO_OPERAND);
+		}
+
+		if (attached_aml_pointer) {
+			return (AE_AML_OPERAND_TYPE);
+		}
+
+		if (INTERNAL_TYPE_INDEX_FIELD != val_desc->common.type) {
+			return (AE_AML_OPERAND_TYPE);
+		}
+
+
+		/* Set Index value to select proper Data register */
+		/* Get the global lock if needed */
+
+		obj_desc = (ACPI_OBJECT_INTERNAL *) *stack_ptr;
+		locked = acpi_aml_acquire_global_lock (obj_desc->field_unit.lock_rule);
+		{
+			/* Perform the update */
+
+			status = acpi_aml_set_named_field_value (val_desc->index_field.index,
+					   &val_desc->index_field.value,
+					   sizeof (val_desc->index_field.value));
+		}
+		acpi_aml_release_global_lock (locked);
+
+		if (AE_OK != status) {
+			return (status);
+		}
+
+		/* Read Data value */
+
+		status = acpi_aml_get_named_field_value (val_desc->index_field.data, &temp_val, sizeof (temp_val));
+		if (AE_OK != status) {
+			return (status);
+		}
+
+		obj_desc = acpi_cm_create_internal_object (ACPI_TYPE_NUMBER);
+		if (!obj_desc) {
+			return (AE_NO_MEMORY);
+		}
+
+		obj_desc->number.value = temp_val;
+		break;
+
+
+	case ACPI_TYPE_FIELD_UNIT:
+
+		if (!val_desc) {
+			return (AE_AML_NO_OPERAND);
+		}
+
+		if (attached_aml_pointer) {
+			return (AE_AML_OPERAND_TYPE);
+		}
+
+		if (val_desc->common.type != (u8) entry_type) {
+			return (AE_AML_OPERAND_TYPE);
+			break;
+		}
+
+		obj_desc = acpi_cm_create_internal_object (ACPI_TYPE_ANY);
+		if (!obj_desc) {
+			return (AE_NO_MEMORY);
+		}
+
+		if ((status = acpi_aml_get_field_unit_value (val_desc, obj_desc)) != AE_OK) {
+			acpi_cm_remove_reference (obj_desc);
+			return (status);
+		}
+
+		break;
+
+
+	/*
+	 * For these objects, just return the object attached to the NTE
+	 */
+
+	case ACPI_TYPE_MUTEX:
+	case ACPI_TYPE_METHOD:
+	case ACPI_TYPE_POWER:
+	case ACPI_TYPE_PROCESSOR:
+	case ACPI_TYPE_THERMAL:
+	case ACPI_TYPE_EVENT:
+	case ACPI_TYPE_REGION:
+
+
+		/* There must be an object attached to this NTE */
+
+		if (!val_desc) {
+			return (AE_AML_INTERNAL);
+		}
+
+		/* Return an additional reference to the object */
+
+		obj_desc = val_desc;
+		acpi_cm_add_reference (obj_desc);
+		break;
+
+
+	/* Devices rarely have an attached object, return the NTE */
+
+	case ACPI_TYPE_DEVICE:
+
+
+	/* Method locals and arguments have a pseudo-NTE, just return it */
+
+	case INTERNAL_TYPE_METHOD_ARGUMENT:
+	case INTERNAL_TYPE_METHOD_LOCAL_VAR:
+
+		return (AE_OK);
+		break;
+
+
+	/* TYPE_Any is untyped, and thus there is no object associated with it */
+
+	case ACPI_TYPE_ANY:
+
+		return (AE_AML_OPERAND_TYPE);  /* Cannot be AE_TYPE */
+
+
+	/* Default case is for unknown types */
+
+	default:
+
+		return (AE_AML_OPERAND_TYPE);
+
+	} /* switch (Entry_type) */
+
+
+	/* Put the object descriptor on the stack */
+
+	*stack_ptr = (void *) obj_desc;
+
+	return (status);
+}
+
+