diff options
Diffstat (limited to 'sys/contrib/dev/acpica/Subsystem/Interpreter/amcreate.c')
| -rw-r--r-- | sys/contrib/dev/acpica/Subsystem/Interpreter/amcreate.c | 1216 |
1 files changed, 1216 insertions, 0 deletions
diff --git a/sys/contrib/dev/acpica/Subsystem/Interpreter/amcreate.c b/sys/contrib/dev/acpica/Subsystem/Interpreter/amcreate.c new file mode 100644 index 0000000..e1c93d9 --- /dev/null +++ b/sys/contrib/dev/acpica/Subsystem/Interpreter/amcreate.c @@ -0,0 +1,1216 @@ +/****************************************************************************** + * + * Module Name: amcreate - Named object creation + * $Revision: 48 $ + * + *****************************************************************************/ + +/****************************************************************************** + * + * 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 __AMCREATE_C__ + +#include "acpi.h" +#include "acparser.h" +#include "acinterp.h" +#include "amlcode.h" +#include "acnamesp.h" +#include "acevents.h" +#include "acdispat.h" + + +#define _COMPONENT INTERPRETER + MODULE_NAME ("amcreate") + + +/******************************************************************************* + * + * FUNCTION: AcpiAmlExecCreateField + * + * PARAMETERS: Opcode - The opcode to be executed + * Operands - List of operands for the opcode + * + * RETURN: Status + * + * DESCRIPTION: Execute CreateField operators: CreateBitFieldOp, + * CreateByteFieldOp, CreateWordFieldOp, CreateDWordFieldOp, + * CreateFieldOp (which define fields in buffers) + * + * ALLOCATION: Deletes CreateFieldOp's count operand descriptor + * + * + * ACPI SPECIFICATION REFERENCES: + * DefCreateBitField := CreateBitFieldOp SrcBuf BitIdx NameString + * DefCreateByteField := CreateByteFieldOp SrcBuf ByteIdx NameString + * DefCreateDWordField := CreateDWordFieldOp SrcBuf ByteIdx NameString + * DefCreateField := CreateFieldOp SrcBuf BitIdx NumBits NameString + * DefCreateWordField := CreateWordFieldOp SrcBuf ByteIdx NameString + * BitIndex := TermArg=>Integer + * ByteIndex := TermArg=>Integer + * NumBits := TermArg=>Integer + * SourceBuff := TermArg=>Buffer + * + ******************************************************************************/ + + +ACPI_STATUS +AcpiAmlExecCreateField ( + UINT8 *AmlPtr, + UINT32 AmlLength, + ACPI_NAMESPACE_NODE *Node, + ACPI_WALK_STATE *WalkState) +{ + ACPI_STATUS Status; + ACPI_OPERAND_OBJECT *ObjDesc; + ACPI_OPERAND_OBJECT *TmpDesc; + + + FUNCTION_TRACE ("AmlExecCreateField"); + + + /* Create the region descriptor */ + + ObjDesc = AcpiCmCreateInternalObject (ACPI_TYPE_FIELD_UNIT); + if (!ObjDesc) + { + Status = AE_NO_MEMORY; + goto Cleanup; + } + + /* Construct the field object */ + + ObjDesc->FieldUnit.Access = (UINT8) ACCESS_ANY_ACC; + ObjDesc->FieldUnit.LockRule = (UINT8) GLOCK_NEVER_LOCK; + ObjDesc->FieldUnit.UpdateRule = (UINT8) UPDATE_PRESERVE; + + /* + * Allocate a method object for this field unit + */ + + ObjDesc->FieldUnit.Extra = AcpiCmCreateInternalObject ( + INTERNAL_TYPE_EXTRA); + if (!ObjDesc->FieldUnit.Extra) + { + Status = AE_NO_MEMORY; + goto Cleanup; + } + + /* + * Remember location in AML stream of the field unit + * opcode and operands -- since the buffer and index + * operands must be evaluated. + */ + + ObjDesc->FieldUnit.Extra->Extra.Pcode = AmlPtr; + ObjDesc->FieldUnit.Extra->Extra.PcodeLength = AmlLength; + ObjDesc->FieldUnit.Node = Node; + + +/* + Status = AcpiNsAttachObject (Node, ObjDesc, + (UINT8) ACPI_TYPE_FIELD_UNIT); + + if (ACPI_FAILURE (Status)) + { + goto Cleanup; + } +*/ + + /* + * This operation is supposed to cause the destination Name to refer + * to the defined FieldUnit -- it must not store the constructed + * FieldUnit object (or its current value) in some location that the + * Name may already be pointing to. So, if the Name currently contains + * a reference which would cause AcpiAmlExecStore() to perform an indirect + * store rather than setting the value of the Name itself, clobber that + * reference before calling AcpiAmlExecStore(). + */ + + /* Type of Name's existing value */ + + switch (AcpiNsGetType (Node)) + { + + case ACPI_TYPE_FIELD_UNIT: + + case INTERNAL_TYPE_ALIAS: + case INTERNAL_TYPE_BANK_FIELD: + case INTERNAL_TYPE_DEF_FIELD: + case INTERNAL_TYPE_INDEX_FIELD: + + TmpDesc = AcpiNsGetAttachedObject (Node); + if (TmpDesc) + { + /* + * There is an existing object here; delete it and zero out the + * object field within the Node + */ + + DUMP_PATHNAME (Node, + "AmlExecCreateField: Removing Current Reference", + TRACE_BFIELD, _COMPONENT); + + DUMP_ENTRY (Node, TRACE_BFIELD); + DUMP_STACK_ENTRY (TmpDesc); + + AcpiCmRemoveReference (TmpDesc); + AcpiNsAttachObject ((ACPI_NAMESPACE_NODE *) Node, NULL, + ACPI_TYPE_ANY); + } + + /* Set the type to ANY (or the store below will fail) */ + + ((ACPI_NAMESPACE_NODE *) Node)->Type = ACPI_TYPE_ANY; + + break; + + + default: + + break; + } + + + /* Store constructed field descriptor in result location */ + + Status = AcpiAmlExecStore (ObjDesc, (ACPI_OPERAND_OBJECT *) Node, WalkState); + + /* + * If the field descriptor was not physically stored (or if a failure + * above), we must delete it + */ + if (ObjDesc->Common.ReferenceCount <= 1) + { + AcpiCmRemoveReference (ObjDesc); + } + + + return_ACPI_STATUS (AE_OK); + + +Cleanup: + + /* Delete region object and method subobject */ + + if (ObjDesc) + { + /* Remove deletes both objects! */ + + AcpiCmRemoveReference (ObjDesc); + ObjDesc = NULL; + } + + return_ACPI_STATUS (Status); +} + + +ACPI_STATUS +AcpiAmlExecCreateField_original ( + UINT16 Opcode, + ACPI_WALK_STATE *WalkState) +{ + ACPI_OPERAND_OBJECT *ResDesc = NULL; + ACPI_OPERAND_OBJECT *CntDesc = NULL; + ACPI_OPERAND_OBJECT *OffDesc = NULL; + ACPI_OPERAND_OBJECT *SrcDesc = NULL; + ACPI_OPERAND_OBJECT *FieldDesc; + ACPI_OPERAND_OBJECT *ObjDesc; + OBJECT_TYPE_INTERNAL ResType; + ACPI_STATUS Status; + UINT32 NumOperands = 3; + UINT32 Offset; + UINT32 BitOffset; + UINT16 BitCount; + UINT8 TypeFound; + + + FUNCTION_TRACE ("AmlExecCreateField"); + + + /* Resolve the operands */ + + Status = AcpiAmlResolveOperands (Opcode, WALK_OPERANDS, WalkState); + DUMP_OPERANDS (WALK_OPERANDS, IMODE_EXECUTE, AcpiPsGetOpcodeName (Opcode), + NumOperands, "after AcpiAmlResolveOperands"); + + + /* Get the operands */ + + Status |= AcpiDsObjStackPopObject (&ResDesc, WalkState); + if (AML_CREATE_FIELD_OP == Opcode) + { + NumOperands = 4; + Status |= AcpiDsObjStackPopObject (&CntDesc, WalkState); + } + + Status |= AcpiDsObjStackPopObject (&OffDesc, WalkState); + Status |= AcpiDsObjStackPopObject (&SrcDesc, WalkState); + + if (ACPI_FAILURE (Status)) + { + /* Invalid parameters on object stack */ + + DEBUG_PRINT (ACPI_ERROR, + ("ExecCreateField/%s: bad operand(s) (0x%X)\n", + AcpiPsGetOpcodeName (Opcode), Status)); + + goto Cleanup; + } + + + Offset = (UINT32) OffDesc->Number.Value; + + + /* + * If ResDesc is a Name, it will be a direct name pointer after + * AcpiAmlResolveOperands() + */ + + if (!VALID_DESCRIPTOR_TYPE (ResDesc, ACPI_DESC_TYPE_NAMED)) + { + DEBUG_PRINT (ACPI_ERROR, + ("AmlExecCreateField (%s): destination must be a Node\n", + AcpiPsGetOpcodeName (Opcode))); + + Status = AE_AML_OPERAND_TYPE; + goto Cleanup; + } + + + /* + * Setup the Bit offsets and counts, according to the opcode + */ + + switch (Opcode) + { + + /* DefCreateBitField */ + + case AML_BIT_FIELD_OP: + + /* Offset is in bits, Field is a bit */ + + BitOffset = Offset; + BitCount = 1; + break; + + + /* DefCreateByteField */ + + case AML_BYTE_FIELD_OP: + + /* Offset is in bytes, field is a byte */ + + BitOffset = 8 * Offset; + BitCount = 8; + break; + + + /* DefCreateWordField */ + + case AML_WORD_FIELD_OP: + + /* Offset is in bytes, field is a word */ + + BitOffset = 8 * Offset; + BitCount = 16; + break; + + + /* DefCreateDWordField */ + + case AML_DWORD_FIELD_OP: + + /* Offset is in bytes, field is a dword */ + + BitOffset = 8 * Offset; + BitCount = 32; + break; + + + /* DefCreateField */ + + case AML_CREATE_FIELD_OP: + + /* Offset is in bits, count is in bits */ + + BitOffset = Offset; + BitCount = (UINT16) CntDesc->Number.Value; + break; + + + default: + + DEBUG_PRINT (ACPI_ERROR, + ("AmlExecCreateField: Internal error - unknown field creation opcode %02x\n", + Opcode)); + Status = AE_AML_BAD_OPCODE; + goto Cleanup; + } + + + /* + * Setup field according to the object type + */ + + switch (SrcDesc->Common.Type) + { + + /* SourceBuff := TermArg=>Buffer */ + + case ACPI_TYPE_BUFFER: + + if (BitOffset + (UINT32) BitCount > + (8 * (UINT32) SrcDesc->Buffer.Length)) + { + DEBUG_PRINT (ACPI_ERROR, + ("AmlExecCreateField: Field exceeds Buffer %d > %d\n", + BitOffset + (UINT32) BitCount, + 8 * (UINT32) SrcDesc->Buffer.Length)); + Status = AE_AML_BUFFER_LIMIT; + goto Cleanup; + } + + + /* Allocate an object for the field */ + + FieldDesc = AcpiCmCreateInternalObject (ACPI_TYPE_FIELD_UNIT); + if (!FieldDesc) + { + Status = AE_NO_MEMORY; + goto Cleanup; + } + + /* Construct the field object */ + + FieldDesc->FieldUnit.Access = (UINT8) ACCESS_ANY_ACC; + FieldDesc->FieldUnit.LockRule = (UINT8) GLOCK_NEVER_LOCK; + FieldDesc->FieldUnit.UpdateRule = (UINT8) UPDATE_PRESERVE; + FieldDesc->FieldUnit.Length = BitCount; + FieldDesc->FieldUnit.BitOffset = (UINT8) (BitOffset % 8); + FieldDesc->FieldUnit.Offset = DIV_8 (BitOffset); + FieldDesc->FieldUnit.Container = SrcDesc; + + /* An additional reference for SrcDesc */ + + AcpiCmAddReference (SrcDesc); + + break; + + + /* Improper object type */ + + default: + + TypeFound = SrcDesc->Common.Type; + + if ((TypeFound > (UINT8) INTERNAL_TYPE_REFERENCE) || + !AcpiCmValidObjectType (TypeFound)) + { + DEBUG_PRINT (ACPI_ERROR, + ("AmlExecCreateField: Tried to create field in invalid object type - 0x%X\n", + TypeFound)); + } + + else + { + DEBUG_PRINT (ACPI_ERROR, + ("AmlExecCreateField: Tried to create field in improper object type - %s\n", + AcpiCmGetTypeName (TypeFound))); + } + + Status = AE_AML_OPERAND_TYPE; + goto Cleanup; + } + + + if (AML_CREATE_FIELD_OP == Opcode) + { + /* Delete object descriptor unique to CreateField */ + + AcpiCmRemoveReference (CntDesc); + CntDesc = NULL; + } + + /* + * This operation is supposed to cause the destination Name to refer + * to the defined FieldUnit -- it must not store the constructed + * FieldUnit object (or its current value) in some location that the + * Name may already be pointing to. So, if the Name currently contains + * a reference which would cause AcpiAmlExecStore() to perform an indirect + * store rather than setting the value of the Name itself, clobber that + * reference before calling AcpiAmlExecStore(). + */ + + ResType = AcpiNsGetType (ResDesc); + + /* Type of Name's existing value */ + + switch (ResType) + { + + case ACPI_TYPE_FIELD_UNIT: + + case INTERNAL_TYPE_ALIAS: + case INTERNAL_TYPE_BANK_FIELD: + case INTERNAL_TYPE_DEF_FIELD: + case INTERNAL_TYPE_INDEX_FIELD: + + ObjDesc = AcpiNsGetAttachedObject (ResDesc); + if (ObjDesc) + { + /* + * There is an existing object here; delete it and zero out the + * object field within the Node + */ + + DUMP_PATHNAME (ResDesc, + "AmlExecCreateField: Removing Current Reference", + TRACE_BFIELD, _COMPONENT); + + DUMP_ENTRY (ResDesc, TRACE_BFIELD); + DUMP_STACK_ENTRY (ObjDesc); + + AcpiCmRemoveReference (ObjDesc); + AcpiNsAttachObject ((ACPI_NAMESPACE_NODE *) ResDesc, NULL, + ACPI_TYPE_ANY); + } + + /* Set the type to ANY (or the store below will fail) */ + + ((ACPI_NAMESPACE_NODE *) ResDesc)->Type = ACPI_TYPE_ANY; + + break; + + + default: + + break; + } + + + /* Store constructed field descriptor in result location */ + + Status = AcpiAmlExecStore (FieldDesc, ResDesc, WalkState); + + /* + * If the field descriptor was not physically stored (or if a failure + * above), we must delete it + */ + if (FieldDesc->Common.ReferenceCount <= 1) + { + AcpiCmRemoveReference (FieldDesc); + } + + +Cleanup: + + /* Always delete the operands */ + + AcpiCmRemoveReference (OffDesc); + AcpiCmRemoveReference (SrcDesc); + + if (AML_CREATE_FIELD_OP == Opcode) + { + AcpiCmRemoveReference (CntDesc); + } + + /* On failure, delete the result descriptor */ + + if (ACPI_FAILURE (Status)) + { + AcpiCmRemoveReference (ResDesc); /* Result descriptor */ + } + + return_ACPI_STATUS (Status); +} + + +/***************************************************************************** + * + * FUNCTION: AcpiAmlExecCreateAlias + * + * PARAMETERS: Operands - List of operands for the opcode + * + * RETURN: Status + * + * DESCRIPTION: Create a new named alias + * + ****************************************************************************/ + +ACPI_STATUS +AcpiAmlExecCreateAlias ( + ACPI_WALK_STATE *WalkState) +{ + ACPI_NAMESPACE_NODE *SourceNode; + ACPI_NAMESPACE_NODE *AliasNode; + ACPI_STATUS Status; + + + FUNCTION_TRACE ("AmlExecCreateAlias"); + + + /* Get the source/alias operands (both NTEs) */ + + Status = AcpiDsObjStackPopObject ((ACPI_OPERAND_OBJECT **) &SourceNode, + WalkState); + if (ACPI_FAILURE (Status)) + { + return_ACPI_STATUS (Status); + } + + /* + * Don't pop it, it gets removed in the calling routine + */ + + AliasNode = AcpiDsObjStackGetValue (0, WalkState); + + /* Add an additional reference to the object */ + + AcpiCmAddReference (SourceNode->Object); + + /* + * Attach the original source Node to the new Alias Node. + */ + Status = AcpiNsAttachObject (AliasNode, SourceNode->Object, + SourceNode->Type); + + + /* + * The new alias assumes the type of the source, but it points + * to the same object. The reference count of the object has two + * additional references to prevent deletion out from under either the + * source or the alias Node + */ + + /* Since both operands are NTEs, we don't need to delete them */ + + return_ACPI_STATUS (Status); +} + + +/***************************************************************************** + * + * FUNCTION: AcpiAmlExecCreateEvent + * + * PARAMETERS: None + * + * RETURN: Status + * + * DESCRIPTION: Create a new event object + * + ****************************************************************************/ + +ACPI_STATUS +AcpiAmlExecCreateEvent ( + ACPI_WALK_STATE *WalkState) +{ + ACPI_STATUS Status; + ACPI_OPERAND_OBJECT *ObjDesc; + + + FUNCTION_TRACE ("AmlExecCreateEvent"); + + + BREAKPOINT3; + + ObjDesc = AcpiCmCreateInternalObject (ACPI_TYPE_EVENT); + if (!ObjDesc) + { + Status = AE_NO_MEMORY; + goto Cleanup; + } + + /* Create the actual OS semaphore */ + + /* TBD: [Investigate] should be created with 0 or 1 units? */ + + Status = AcpiOsCreateSemaphore (ACPI_NO_UNIT_LIMIT, 1, + &ObjDesc->Event.Semaphore); + if (ACPI_FAILURE (Status)) + { + AcpiCmRemoveReference (ObjDesc); + goto Cleanup; + } + + /* Attach object to the Node */ + + Status = AcpiNsAttachObject (AcpiDsObjStackGetValue (0, WalkState), + ObjDesc, (UINT8) ACPI_TYPE_EVENT); + if (ACPI_FAILURE (Status)) + { + AcpiOsDeleteSemaphore (ObjDesc->Event.Semaphore); + AcpiCmRemoveReference (ObjDesc); + goto Cleanup; + } + + +Cleanup: + + return_ACPI_STATUS (Status); +} + + +/***************************************************************************** + * + * FUNCTION: AcpiAmlExecCreateMutex + * + * PARAMETERS: InterpreterMode - Current running mode (load1/Load2/Exec) + * Operands - List of operands for the opcode + * + * RETURN: Status + * + * DESCRIPTION: Create a new mutex object + * + ****************************************************************************/ + +ACPI_STATUS +AcpiAmlExecCreateMutex ( + ACPI_WALK_STATE *WalkState) +{ + ACPI_STATUS Status = AE_OK; + ACPI_OPERAND_OBJECT *SyncDesc; + ACPI_OPERAND_OBJECT *ObjDesc; + + + FUNCTION_TRACE_PTR ("AmlExecCreateMutex", WALK_OPERANDS); + + + /* Get the operand */ + + Status = AcpiDsObjStackPopObject (&SyncDesc, WalkState); + if (ACPI_FAILURE (Status)) + { + return_ACPI_STATUS (Status); + } + + /* Attempt to allocate a new object */ + + ObjDesc = AcpiCmCreateInternalObject (ACPI_TYPE_MUTEX); + if (!ObjDesc) + { + Status = AE_NO_MEMORY; + goto Cleanup; + } + + /* Create the actual OS semaphore */ + + Status = AcpiOsCreateSemaphore (1, 1, &ObjDesc->Mutex.Semaphore); + if (ACPI_FAILURE (Status)) + { + AcpiCmRemoveReference (ObjDesc); + goto Cleanup; + } + + ObjDesc->Mutex.SyncLevel = (UINT8) SyncDesc->Number.Value; + + /* ObjDesc was on the stack top, and the name is below it */ + + Status = AcpiNsAttachObject (AcpiDsObjStackGetValue (0, WalkState), + ObjDesc, (UINT8) ACPI_TYPE_MUTEX); + if (ACPI_FAILURE (Status)) + { + AcpiOsDeleteSemaphore (ObjDesc->Mutex.Semaphore); + AcpiCmRemoveReference (ObjDesc); + goto Cleanup; + } + + +Cleanup: + + /* Always delete the operand */ + + AcpiCmRemoveReference (SyncDesc); + + return_ACPI_STATUS (Status); +} + + +/***************************************************************************** + * + * FUNCTION: AcpiAmlExecCreateRegion + * + * PARAMETERS: AmlPtr - Pointer to the region declaration AML + * AmlLength - Max length of the declaration AML + * Operands - List of operands for the opcode + * InterpreterMode - Load1/Load2/Execute + * + * RETURN: Status + * + * DESCRIPTION: Create a new operation region object + * + ****************************************************************************/ + +ACPI_STATUS +AcpiAmlExecCreateRegion ( + UINT8 *AmlPtr, + UINT32 AmlLength, + UINT32 RegionSpace, + ACPI_WALK_STATE *WalkState) +{ + ACPI_STATUS Status; + ACPI_OPERAND_OBJECT *ObjDesc; + ACPI_NAMESPACE_NODE *Node; + + + FUNCTION_TRACE ("AmlExecCreateRegion"); + + + if (RegionSpace >= NUM_REGION_TYPES) + { + /* TBD: [Future] In ACPI 2.0, valid region space + * includes types 0-6 (Adding CMOS and PCIBARTarget). + * Also, types 0x80-0xff are defined as "OEM Region + * Space handler" + * + * Should this return an error, or should we just keep + * going? How do we handle the OEM region handlers? + */ + REPORT_WARNING (("Invalid AddressSpace type %X\n", RegionSpace)); + } + + DEBUG_PRINT (TRACE_LOAD, ("AmlDoNode: Region Type [%s]\n", + AcpiGbl_RegionTypes[RegionSpace])); + + + /* Get the Node from the object stack */ + + Node = (ACPI_NAMESPACE_NODE *) AcpiDsObjStackGetValue (0, WalkState); + + /* Create the region descriptor */ + + ObjDesc = AcpiCmCreateInternalObject (ACPI_TYPE_REGION); + if (!ObjDesc) + { + Status = AE_NO_MEMORY; + goto Cleanup; + } + + /* + * Allocate a method object for this region. + */ + + ObjDesc->Region.Extra = AcpiCmCreateInternalObject ( + INTERNAL_TYPE_EXTRA); + if (!ObjDesc->Region.Extra) + { + Status = AE_NO_MEMORY; + goto Cleanup; + } + + /* + * Remember location in AML stream of address & length + * operands since they need to be evaluated at run time. + */ + + ObjDesc->Region.Extra->Extra.Pcode = AmlPtr; + ObjDesc->Region.Extra->Extra.PcodeLength = AmlLength; + + /* Init the region from the operands */ + + ObjDesc->Region.SpaceId = (UINT8) RegionSpace; + ObjDesc->Region.Address = 0; + ObjDesc->Region.Length = 0; + + + /* Install the new region object in the parent Node */ + + ObjDesc->Region.Node = Node; + + Status = AcpiNsAttachObject (Node, ObjDesc, + (UINT8) ACPI_TYPE_REGION); + + if (ACPI_FAILURE (Status)) + { + goto Cleanup; + } + + /* + * If we have a valid region, initialize it + * Namespace is NOT locked at this point. + */ + + Status = AcpiEvInitializeRegion (ObjDesc, FALSE); + + if (ACPI_FAILURE (Status)) + { + /* + * If AE_NOT_EXIST is returned, it is not fatal + * because many regions get created before a handler + * is installed for said region. + */ + if (AE_NOT_EXIST == Status) + { + Status = AE_OK; + } + } + +Cleanup: + + if (ACPI_FAILURE (Status)) + { + /* Delete region object and method subobject */ + + if (ObjDesc) + { + /* Remove deletes both objects! */ + + AcpiCmRemoveReference (ObjDesc); + ObjDesc = NULL; + } + } + + return_ACPI_STATUS (Status); +} + + +/***************************************************************************** + * + * FUNCTION: AcpiAmlExecCreateProcessor + * + * PARAMETERS: Op - Op containing the Processor definition and + * args + * ProcessorNTE - Node for the containing Node + * + * RETURN: Status + * + * DESCRIPTION: Create a new processor object and populate the fields + * + ****************************************************************************/ + +ACPI_STATUS +AcpiAmlExecCreateProcessor ( + ACPI_PARSE_OBJECT *Op, + ACPI_HANDLE ProcessorNTE) +{ + ACPI_STATUS Status; + ACPI_PARSE_OBJECT *Arg; + ACPI_OPERAND_OBJECT *ObjDesc; + + + FUNCTION_TRACE_PTR ("AmlExecCreateProcessor", Op); + + + ObjDesc = AcpiCmCreateInternalObject (ACPI_TYPE_PROCESSOR); + if (!ObjDesc) + { + Status = AE_NO_MEMORY; + return_ACPI_STATUS (Status); + } + + /* Install the new processor object in the parent Node */ + + Status = AcpiNsAttachObject (ProcessorNTE, ObjDesc, + (UINT8) ACPI_TYPE_PROCESSOR); + if (ACPI_FAILURE (Status)) + { + return_ACPI_STATUS(Status); + } + + Arg = Op->Value.Arg; + + /* check existence */ + + if (!Arg) + { + Status = AE_AML_NO_OPERAND; + return_ACPI_STATUS (Status); + } + + /* First arg is the Processor ID */ + + ObjDesc->Processor.ProcId = (UINT8) Arg->Value.Integer; + + /* Move to next arg and check existence */ + + Arg = Arg->Next; + if (!Arg) + { + Status = AE_AML_NO_OPERAND; + return_ACPI_STATUS (Status); + } + + /* Second arg is the PBlock Address */ + + ObjDesc->Processor.Address = (ACPI_IO_ADDRESS) Arg->Value.Integer; + + /* Move to next arg and check existence */ + + Arg = Arg->Next; + if (!Arg) + { + Status = AE_AML_NO_OPERAND; + return_ACPI_STATUS (Status); + } + + /* Third arg is the PBlock Length */ + + ObjDesc->Processor.Length = (UINT8) Arg->Value.Integer; + + return_ACPI_STATUS (AE_OK); +} + + +/***************************************************************************** + * + * FUNCTION: AcpiAmlExecCreatePowerResource + * + * PARAMETERS: Op - Op containing the PowerResource definition + * and args + * PowerResNTE - Node for the containing Node + * + * RETURN: Status + * + * DESCRIPTION: Create a new PowerResource object and populate the fields + * + ****************************************************************************/ + +ACPI_STATUS +AcpiAmlExecCreatePowerResource ( + ACPI_PARSE_OBJECT *Op, + ACPI_HANDLE PowerResNTE) +{ + ACPI_STATUS Status; + ACPI_PARSE_OBJECT *Arg; + ACPI_OPERAND_OBJECT *ObjDesc; + + + FUNCTION_TRACE_PTR ("AmlExecCreatePowerResource", Op); + + + ObjDesc = AcpiCmCreateInternalObject (ACPI_TYPE_POWER); + if (!ObjDesc) + { + Status = AE_NO_MEMORY; + return_ACPI_STATUS (Status); + } + + /* Install the new power resource object in the parent Node */ + + Status = AcpiNsAttachObject (PowerResNTE, ObjDesc, + (UINT8) ACPI_TYPE_POWER); + if (ACPI_FAILURE (Status)) + { + return_ACPI_STATUS(Status); + } + + Arg = Op->Value.Arg; + + /* check existence */ + + if (!Arg) + { + Status = AE_AML_NO_OPERAND; + return_ACPI_STATUS (Status); + } + + /* First arg is the SystemLevel */ + + ObjDesc->PowerResource.SystemLevel = (UINT8) Arg->Value.Integer; + + /* Move to next arg and check existence */ + + Arg = Arg->Next; + if (!Arg) + { + Status = AE_AML_NO_OPERAND; + return_ACPI_STATUS (Status); + } + + /* Second arg is the PBlock Address */ + + ObjDesc->PowerResource.ResourceOrder = (UINT16) Arg->Value.Integer; + + return_ACPI_STATUS (AE_OK); +} + + +/***************************************************************************** + * + * FUNCTION: AcpiAmlExecCreateMethod + * + * PARAMETERS: AmlPtr - First byte of the method's AML + * AmlLength - AML byte count for this method + * MethodFlags - AML method flag byte + * Method - Method Node + * + * RETURN: Status + * + * DESCRIPTION: Create a new method object + * + ****************************************************************************/ + +ACPI_STATUS +AcpiAmlExecCreateMethod ( + UINT8 *AmlPtr, + UINT32 AmlLength, + UINT32 MethodFlags, + ACPI_HANDLE Method) +{ + ACPI_OPERAND_OBJECT *ObjDesc; + ACPI_STATUS Status; + + + FUNCTION_TRACE_PTR ("AmlExecCreateMethod", Method); + + + /* Create a new method object */ + + ObjDesc = AcpiCmCreateInternalObject (ACPI_TYPE_METHOD); + if (!ObjDesc) + { + return_ACPI_STATUS (AE_NO_MEMORY); + } + + /* Get the method's AML pointer/length from the Op */ + + ObjDesc->Method.Pcode = AmlPtr; + ObjDesc->Method.PcodeLength = AmlLength; + + /* + * First argument is the Method Flags (contains parameter count for the + * method) + */ + + ObjDesc->Method.MethodFlags = (UINT8) MethodFlags; + ObjDesc->Method.ParamCount = (UINT8) (MethodFlags & + METHOD_FLAGS_ARG_COUNT); + + /* + * Get the concurrency count. If required, a semaphore will be + * created for this method when it is parsed. + * + * TBD: [Future] for APCI 2.0, there will be a SyncLevel value, not + * just a flag + * Concurrency = SyncLevel + 1;. + */ + + if (MethodFlags & METHOD_FLAGS_SERIALIZED) + { + ObjDesc->Method.Concurrency = 1; + } + + else + { + ObjDesc->Method.Concurrency = INFINITE_CONCURRENCY; + } + + /* Attach the new object to the method Node */ + + Status = AcpiNsAttachObject (Method, ObjDesc, (UINT8) ACPI_TYPE_METHOD); + if (ACPI_FAILURE (Status)) + { + AcpiCmDeleteObjectDesc (ObjDesc); + } + + return_ACPI_STATUS (Status); +} + + |
