d/freebsd-dev
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
926328c406
freebsd-dev/sys/contrib/dev/acpica/excreate.c
Mike Smith 926328c406 Initial import of the Intel-maintained ACPI Component Architecture. This 
is Intel's reference implementation of the core operating-system ACPI
support.  (This import is on the vendor branch.)
2000-10-28 05:01:06 +00:00

1217 lines
33 KiB
C
Raw Blame History

/******************************************************************************
*
* 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);
}
Reference in New Issue View Git Blame Copy Permalink