diff options
Diffstat (limited to 'sys/contrib/dev/acpica/exstoren.c')
| -rw-r--r-- | sys/contrib/dev/acpica/exstoren.c | 718 |
1 files changed, 0 insertions, 718 deletions
diff --git a/sys/contrib/dev/acpica/exstoren.c b/sys/contrib/dev/acpica/exstoren.c deleted file mode 100644 index e9736b67f2c91..0000000000000 --- a/sys/contrib/dev/acpica/exstoren.c +++ /dev/null @@ -1,718 +0,0 @@ - -/****************************************************************************** - * - * Module Name: amstoren - AML Interpreter object store support, - * Store to Node (namespace object) - * $Revision: 23 $ - * - *****************************************************************************/ - -/****************************************************************************** - * - * 1. Copyright Notice - * - * Some or all of this work - Copyright (c) 1999, Intel Corp. All rights - * reserved. - * - * 2. License - * - * 2.1. This is your license from Intel Corp. under its intellectual property - * rights. You may have additional license terms from the party that provided - * you this software, covering your right to use that party's intellectual - * property rights. - * - * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a - * copy of the source code appearing in this file ("Covered Code") an - * irrevocable, perpetual, worldwide license under Intel's copyrights in the - * base code distributed originally by Intel ("Original Intel Code") to copy, - * make derivatives, distribute, use and display any portion of the Covered - * Code in any form, with the right to sublicense such rights; and - * - * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent - * license (with the right to sublicense), under only those claims of Intel - * patents that are infringed by the Original Intel Code, to make, use, sell, - * offer to sell, and import the Covered Code and derivative works thereof - * solely to the minimum extent necessary to exercise the above copyright - * license, and in no event shall the patent license extend to any additions - * to or modifications of the Original Intel Code. No other license or right - * is granted directly or by implication, estoppel or otherwise; - * - * The above copyright and patent license is granted only if the following - * conditions are met: - * - * 3. Conditions - * - * 3.1. Redistribution of Source with Rights to Further Distribute Source. - * Redistribution of source code of any substantial portion of the Covered - * Code or modification with rights to further distribute source must include - * the above Copyright Notice, the above License, this list of Conditions, - * and the following Disclaimer and Export Compliance provision. In addition, - * Licensee must cause all Covered Code to which Licensee contributes to - * contain a file documenting the changes Licensee made to create that Covered - * Code and the date of any change. Licensee must include in that file the - * documentation of any changes made by any predecessor Licensee. Licensee - * must include a prominent statement that the modification is derived, - * directly or indirectly, from Original Intel Code. - * - * 3.2. Redistribution of Source with no Rights to Further Distribute Source. - * Redistribution of source code of any substantial portion of the Covered - * Code or modification without rights to further distribute source must - * include the following Disclaimer and Export Compliance provision in the - * documentation and/or other materials provided with distribution. In - * addition, Licensee may not authorize further sublicense of source of any - * portion of the Covered Code, and must include terms to the effect that the - * license from Licensee to its licensee is limited to the intellectual - * property embodied in the software Licensee provides to its licensee, and - * not to intellectual property embodied in modifications its licensee may - * make. - * - * 3.3. Redistribution of Executable. Redistribution in executable form of any - * substantial portion of the Covered Code or modification must reproduce the - * above Copyright Notice, and the following Disclaimer and Export Compliance - * provision in the documentation and/or other materials provided with the - * distribution. - * - * 3.4. Intel retains all right, title, and interest in and to the Original - * Intel Code. - * - * 3.5. Neither the name Intel nor any other trademark owned or controlled by - * Intel shall be used in advertising or otherwise to promote the sale, use or - * other dealings in products derived from or relating to the Covered Code - * without prior written authorization from Intel. - * - * 4. Disclaimer and Export Compliance - * - * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED - * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE - * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE, - * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY - * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY - * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A - * PARTICULAR PURPOSE. - * - * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES - * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR - * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT, - * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY - * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL - * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS - * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY - * LIMITED REMEDY. - * - * 4.3. Licensee shall not export, either directly or indirectly, any of this - * software or system incorporating such software without first obtaining any - * required license or other approval from the U. S. Department of Commerce or - * any other agency or department of the United States Government. In the - * event Licensee exports any such software from the United States or - * re-exports any such software from a foreign destination, Licensee shall - * ensure that the distribution and export/re-export of the software is in - * compliance with all laws, regulations, orders, or other restrictions of the - * U.S. Export Administration Regulations. Licensee agrees that neither it nor - * any of its subsidiaries will export/re-export any technical data, process, - * software, or service, directly or indirectly, to any country for which the - * United States government or any agency thereof requires an export license, - * other governmental approval, or letter of assurance, without first obtaining - * such license, approval or letter. - * - *****************************************************************************/ - -#define __AMSTOREN_C__ - -#include "acpi.h" -#include "acparser.h" -#include "acdispat.h" -#include "acinterp.h" -#include "amlcode.h" -#include "acnamesp.h" -#include "actables.h" - - -#define _COMPONENT INTERPRETER - MODULE_NAME ("amstoren") - - -/******************************************************************************* - * - * FUNCTION: AcpiAmlStoreObjectToNode - * - * PARAMETERS: *ValDesc - Value to be stored - * *Node - Named object to recieve the value - * - * RETURN: Status - * - * DESCRIPTION: Store the object to the named object. - * - * The Assignment of an object to a named object is handled here - * The val passed in will replace the current value (if any) - * with the input value. - * - * When storing into an object the data is converted to the - * target object type then stored in the object. This means - * that the target object type (for an initialized target) will - * not be changed by a store operation. - * - * NOTE: the global lock is acquired early. This will result - * in the global lock being held a bit longer. Also, if the - * function fails during set up we may get the lock when we - * don't really need it. I don't think we care. - * - ******************************************************************************/ - -ACPI_STATUS -AcpiAmlStoreObjectToNode ( - ACPI_OPERAND_OBJECT *ValDesc, - ACPI_NAMESPACE_NODE *Node, - ACPI_WALK_STATE *WalkState) -{ - ACPI_STATUS Status = AE_OK; - UINT8 *Buffer = NULL; - UINT32 Length = 0; - UINT32 Mask; - UINT32 NewValue; - BOOLEAN Locked = FALSE; - UINT8 *Location=NULL; - ACPI_OPERAND_OBJECT *DestDesc; - OBJECT_TYPE_INTERNAL DestinationType = ACPI_TYPE_ANY; - - - FUNCTION_TRACE ("AmlStoreObjectToNte"); - - DEBUG_PRINT (ACPI_INFO, - ("entered AcpiAmlStoreObjectToNode: NamedObj=%p, Obj=%p\n", - Node, ValDesc)); - - /* - * Assuming the parameters are valid!!! - */ - ACPI_ASSERT((Node) && (ValDesc)); - - DestinationType = AcpiNsGetType (Node); - - DEBUG_PRINT (ACPI_INFO, ("AmlStoreObjectToNte: Storing %s into %s\n", - AcpiCmGetTypeName (ValDesc->Common.Type), - AcpiCmGetTypeName (DestinationType))); - - /* - * First ensure we have a value that can be stored in the target - */ - switch (DestinationType) - { - /* Type of Name's existing value */ - - case INTERNAL_TYPE_ALIAS: - - /* - * Aliases are resolved by AcpiAmlPrepOperands - */ - - DEBUG_PRINT (ACPI_WARN, - ("AmlStoreObjectToNte: Store into Alias - should never happen\n")); - Status = AE_AML_INTERNAL; - break; - - - case INTERNAL_TYPE_BANK_FIELD: - case INTERNAL_TYPE_INDEX_FIELD: - case ACPI_TYPE_FIELD_UNIT: - case ACPI_TYPE_NUMBER: - - /* - * These cases all require only number values or values that - * can be converted to numbers. - * - * If value is not a Number, try to resolve it to one. - */ - - if (ValDesc->Common.Type != ACPI_TYPE_NUMBER) - { - /* - * Initially not a number, convert - */ - Status = AcpiAmlResolveToValue (&ValDesc, WalkState); - if (ACPI_SUCCESS (Status) && - (ValDesc->Common.Type != ACPI_TYPE_NUMBER)) - { - /* - * Conversion successful but still not a number - */ - DEBUG_PRINT (ACPI_ERROR, - ("AmlStoreObjectToNte: Value assigned to %s must be Number, not %s\n", - AcpiCmGetTypeName (DestinationType), - AcpiCmGetTypeName (ValDesc->Common.Type))); - Status = AE_AML_OPERAND_TYPE; - } - } - - break; - - case ACPI_TYPE_STRING: - case ACPI_TYPE_BUFFER: - case INTERNAL_TYPE_DEF_FIELD: - - /* - * Storing into a Field in a region or into a buffer or into - * a string all is essentially the same. - * - * If value is not a valid type, try to resolve it to one. - */ - - if ((ValDesc->Common.Type != ACPI_TYPE_NUMBER) && - (ValDesc->Common.Type != ACPI_TYPE_BUFFER) && - (ValDesc->Common.Type != ACPI_TYPE_STRING)) - { - /* - * Initially not a valid type, convert - */ - Status = AcpiAmlResolveToValue (&ValDesc, WalkState); - if (ACPI_SUCCESS (Status) && - (ValDesc->Common.Type != ACPI_TYPE_NUMBER) && - (ValDesc->Common.Type != ACPI_TYPE_BUFFER) && - (ValDesc->Common.Type != ACPI_TYPE_STRING)) - { - /* - * Conversion successful but still not a valid type - */ - DEBUG_PRINT (ACPI_ERROR, - ("AmlStoreObjectToNte: Assign wrong type %s to %s (must be type Num/Str/Buf)\n", - AcpiCmGetTypeName (ValDesc->Common.Type), - AcpiCmGetTypeName (DestinationType))); - Status = AE_AML_OPERAND_TYPE; - } - } - break; - - - case ACPI_TYPE_PACKAGE: - - /* - * TBD: [Unhandled] Not real sure what to do here - */ - Status = AE_NOT_IMPLEMENTED; - break; - - - default: - - /* - * All other types than Alias and the various Fields come here. - * Store ValDesc as the new value of the Name, and set - * the Name's type to that of the value being stored in it. - * ValDesc reference count is incremented by AttachObject. - */ - - Status = AcpiNsAttachObject (Node, ValDesc, ValDesc->Common.Type); - - DEBUG_PRINT (ACPI_INFO, - ("AmlStoreObjectToNte: Store %s into %s via Attach\n", - AcpiCmGetTypeName (ValDesc->Common.Type), - AcpiCmGetTypeName (DestinationType))); - - goto CleanUpAndBailOut; - break; - } - - /* Exit now if failure above */ - - if (ACPI_FAILURE (Status)) - { - goto CleanUpAndBailOut; - } - - /* - * Get descriptor for object attached to Node - */ - DestDesc = AcpiNsGetAttachedObject (Node); - if (!DestDesc) - { - /* - * There is no existing object attached to this Node - */ - DEBUG_PRINT (ACPI_ERROR, - ("AmlStoreObjectToNte: Internal error - no destination object for %4.4s type %d\n", - &Node->Name, DestinationType)); - Status = AE_AML_INTERNAL; - goto CleanUpAndBailOut; - } - - /* - * Make sure the destination Object is the same as the Node - */ - if (DestDesc->Common.Type != (UINT8) DestinationType) - { - DEBUG_PRINT (ACPI_ERROR, - ("AmlStoreObjectToNte: Internal error - Name %4.4s type %d does not match value-type %d at %p\n", - &Node->Name, AcpiNsGetType (Node), - DestDesc->Common.Type, DestDesc)); - Status = AE_AML_INTERNAL; - goto CleanUpAndBailOut; - } - - /* - * AcpiEverything is ready to execute now, We have - * a value we can handle, just perform the update - */ - - switch (DestinationType) - { - /* Type of Name's existing value */ - - case INTERNAL_TYPE_BANK_FIELD: - - /* - * Get the global lock if needed - */ - Locked = AcpiAmlAcquireGlobalLock (DestDesc->BankField.LockRule); - - /* - * Set Bank value to select proper Bank - * Perform the update (Set Bank Select) - */ - - Status = AcpiAmlAccessNamedField (ACPI_WRITE, - DestDesc->BankField.BankSelect, - &DestDesc->BankField.Value, - sizeof (DestDesc->BankField.Value)); - if (ACPI_SUCCESS (Status)) - { - /* Set bank select successful, set data value */ - - Status = AcpiAmlAccessNamedField (ACPI_WRITE, - DestDesc->BankField.BankSelect, - &ValDesc->BankField.Value, - sizeof (ValDesc->BankField.Value)); - } - - break; - - - case INTERNAL_TYPE_DEF_FIELD: - - /* - * Get the global lock if needed - */ - Locked = AcpiAmlAcquireGlobalLock (ValDesc->Field.LockRule); - - /* - * Perform the update - */ - - switch (ValDesc->Common.Type) - { - case ACPI_TYPE_NUMBER: - Buffer = (UINT8 *) &ValDesc->Number.Value; - Length = sizeof (ValDesc->Number.Value); - break; - - case ACPI_TYPE_BUFFER: - Buffer = (UINT8 *) ValDesc->Buffer.Pointer; - Length = ValDesc->Buffer.Length; - break; - - case ACPI_TYPE_STRING: - Buffer = (UINT8 *) ValDesc->String.Pointer; - Length = ValDesc->String.Length; - break; - } - - Status = AcpiAmlAccessNamedField (ACPI_WRITE, - Node, Buffer, Length); - - break; /* Global Lock released below */ - - - case ACPI_TYPE_STRING: - - /* - * Perform the update - */ - - switch (ValDesc->Common.Type) - { - case ACPI_TYPE_NUMBER: - Buffer = (UINT8 *) &ValDesc->Number.Value; - Length = sizeof (ValDesc->Number.Value); - break; - - case ACPI_TYPE_BUFFER: - Buffer = (UINT8 *) ValDesc->Buffer.Pointer; - Length = ValDesc->Buffer.Length; - break; - - case ACPI_TYPE_STRING: - Buffer = (UINT8 *) ValDesc->String.Pointer; - Length = ValDesc->String.Length; - break; - } - - /* - * Setting a string value replaces the old string - */ - - if (Length < DestDesc->String.Length) - { - /* - * Zero fill, not willing to do pointer arithmetic for - * archetecture independance. Just clear the whole thing - */ - MEMSET(DestDesc->String.Pointer, 0, DestDesc->String.Length); - MEMCPY(DestDesc->String.Pointer, Buffer, Length); - } - else - { - /* - * Free the current buffer, then allocate a buffer - * large enough to hold the value - */ - if ( DestDesc->String.Pointer && - !AcpiTbSystemTablePointer (DestDesc->String.Pointer)) - { - /* - * Only free if not a pointer into the DSDT - */ - - AcpiCmFree(DestDesc->String.Pointer); - } - - DestDesc->String.Pointer = AcpiCmAllocate (Length + 1); - DestDesc->String.Length = Length; - - if (!DestDesc->String.Pointer) - { - Status = AE_NO_MEMORY; - goto CleanUpAndBailOut; - } - - MEMCPY(DestDesc->String.Pointer, Buffer, Length); - } - break; - - - case ACPI_TYPE_BUFFER: - - /* - * Perform the update to the buffer - */ - - switch (ValDesc->Common.Type) - { - case ACPI_TYPE_NUMBER: - Buffer = (UINT8 *) &ValDesc->Number.Value; - Length = sizeof (ValDesc->Number.Value); - break; - - case ACPI_TYPE_BUFFER: - Buffer = (UINT8 *) ValDesc->Buffer.Pointer; - Length = ValDesc->Buffer.Length; - break; - - case ACPI_TYPE_STRING: - Buffer = (UINT8 *) ValDesc->String.Pointer; - Length = ValDesc->String.Length; - break; - } - - /* - * Buffer is a static allocation, - * only place what will fit in the buffer. - */ - if (Length <= DestDesc->Buffer.Length) - { - /* - * Zero fill first, not willing to do pointer arithmetic for - * archetecture independence. Just clear the whole thing - */ - MEMSET(DestDesc->Buffer.Pointer, 0, DestDesc->Buffer.Length); - MEMCPY(DestDesc->Buffer.Pointer, Buffer, Length); - } - else - { - /* - * truncate, copy only what will fit - */ - MEMCPY(DestDesc->Buffer.Pointer, Buffer, DestDesc->Buffer.Length); - DEBUG_PRINT (ACPI_INFO, - ("AmlStoreObjectToNte: Truncating src buffer from %d to %d\n", - Length, DestDesc->Buffer.Length)); - } - break; - - - case INTERNAL_TYPE_INDEX_FIELD: - - /* - * Get the global lock if needed - */ - Locked = AcpiAmlAcquireGlobalLock (DestDesc->IndexField.LockRule); - - /* - * Set Index value to select proper Data register - * perform the update (Set index) - */ - - Status = AcpiAmlAccessNamedField (ACPI_WRITE, - DestDesc->IndexField.Index, - &DestDesc->IndexField.Value, - sizeof (DestDesc->IndexField.Value)); - - DEBUG_PRINT (ACPI_INFO, - ("AmlStoreObjectToNte: IndexField: set index returned %s\n", - AcpiCmFormatException (Status))); - - if (ACPI_SUCCESS (Status)) - { - /* set index successful, next set Data value */ - - Status = AcpiAmlAccessNamedField (ACPI_WRITE, - DestDesc->IndexField.Data, - &ValDesc->Number.Value, - sizeof (ValDesc->Number.Value)); - DEBUG_PRINT (ACPI_INFO, - ("AmlStoreObjectToNte: IndexField: set data returned %s\n", - AcpiCmFormatException (Status))); - } - break; - - - case ACPI_TYPE_FIELD_UNIT: - - - /* - * If the Field Buffer and Index have not been previously evaluated, - * evaluate them and save the results. - */ - if (!(DestDesc->Common.Flags & AOPOBJ_DATA_VALID)) - { - Status = AcpiDsGetFieldUnitArguments (DestDesc); - if (ACPI_FAILURE (Status)) - { - return_ACPI_STATUS (Status); - } - } - - if ((!DestDesc->FieldUnit.Container || - ACPI_TYPE_BUFFER != DestDesc->FieldUnit.Container->Common.Type)) - { - DUMP_PATHNAME (Node, - "AmlStoreObjectToNte: FieldUnit: Bad container in ", - ACPI_ERROR, _COMPONENT); - DUMP_ENTRY (Node, ACPI_ERROR); - DEBUG_PRINT (ACPI_ERROR, - ("Container: %p", DestDesc->FieldUnit.Container)); - - if (DestDesc->FieldUnit.Container) - { - DEBUG_PRINT_RAW (ACPI_ERROR, (" Type %d", - DestDesc->FieldUnit.Container->Common.Type)); - } - DEBUG_PRINT_RAW (ACPI_ERROR, ("\n")); - - Status = AE_AML_INTERNAL; - goto CleanUpAndBailOut; - } - - /* - * Get the global lock if needed - */ - Locked = AcpiAmlAcquireGlobalLock (DestDesc->FieldUnit.LockRule); - - /* - * TBD: [Unhandled] REMOVE this limitation - * Make sure the operation is within the limits of our implementation - * this is not a Spec limitation!! - */ - if (DestDesc->FieldUnit.Length + DestDesc->FieldUnit.BitOffset > 32) - { - DEBUG_PRINT (ACPI_ERROR, - ("AmlStoreObjectToNte: FieldUnit: Implementation limitation - Field exceeds UINT32\n")); - Status = AE_NOT_IMPLEMENTED; - goto CleanUpAndBailOut; - } - - /* Field location is (base of buffer) + (byte offset) */ - - Location = DestDesc->FieldUnit.Container->Buffer.Pointer - + DestDesc->FieldUnit.Offset; - - /* - * Construct Mask with 1 bits where the field is, - * 0 bits elsewhere - */ - Mask = ((UINT32) 1 << DestDesc->FieldUnit.Length) - ((UINT32)1 - << DestDesc->FieldUnit.BitOffset); - - DEBUG_PRINT (TRACE_EXEC, - ("** Store %lx in buffer %p byte %ld bit %d width %d addr %p mask %08lx\n", - ValDesc->Number.Value, - DestDesc->FieldUnit.Container->Buffer.Pointer, - DestDesc->FieldUnit.Offset, DestDesc->FieldUnit.BitOffset, - DestDesc->FieldUnit.Length,Location, Mask)); - - /* Zero out the field in the buffer */ - - MOVE_UNALIGNED32_TO_32 (&NewValue, Location); - NewValue &= ~Mask; - - /* - * Shift and mask the new value into position, - * and or it into the buffer. - */ - NewValue |= (ValDesc->Number.Value << DestDesc->FieldUnit.BitOffset) & - Mask; - - /* Store back the value */ - - MOVE_UNALIGNED32_TO_32 (Location, &NewValue); - - DEBUG_PRINT (TRACE_EXEC, ("New Field value %08lx\n", NewValue)); - break; - - - case ACPI_TYPE_NUMBER: - - - DestDesc->Number.Value = ValDesc->Number.Value; - - /* Truncate value if we are executing from a 32-bit ACPI table */ - - AcpiAmlTruncateFor32bitTable (DestDesc, WalkState); - break; - - - case ACPI_TYPE_PACKAGE: - - /* - * TBD: [Unhandled] Not real sure what to do here - */ - Status = AE_NOT_IMPLEMENTED; - break; - - - default: - - /* - * All other types than Alias and the various Fields come here. - * Store ValDesc as the new value of the Name, and set - * the Name's type to that of the value being stored in it. - * ValDesc reference count is incremented by AttachObject. - */ - - DEBUG_PRINT (ACPI_WARN, - ("AmlStoreObjectToNte: Store into %s not implemented\n", - AcpiCmGetTypeName (AcpiNsGetType (Node)))); - - Status = AE_NOT_IMPLEMENTED; - break; - } - - -CleanUpAndBailOut: - - /* - * Release global lock if we acquired it earlier - */ - AcpiAmlReleaseGlobalLock (Locked); - - return_ACPI_STATUS (Status); -} - - |