mirror of
https://github.com/acpica/acpica/
synced 2025-03-01 20:01:33 +03:00
AML Interpreter
date 99.04.08.21.40.00; author rmoore1; state Exp;
This commit is contained in:
aystarik
parent
72cfc60dc7
commit
678634a23d
@ -1,462 +1,601 @@
|
||||
|
||||
/******************************************************************************
|
||||
*
|
||||
* Module Name: exutils - interpreter/scanner utilities
|
||||
* $Revision: 1.106 $
|
||||
*
|
||||
*****************************************************************************/
|
||||
|
||||
/******************************************************************************
|
||||
*
|
||||
* 1. Copyright Notice
|
||||
*
|
||||
* Some or all of this work - Copyright (c) 1999 - 2002, 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 __EXUTILS_C__
|
||||
|
||||
/*
|
||||
* DEFINE_AML_GLOBALS is tested in amlcode.h
|
||||
* to determine whether certain global names should be "defined" or only
|
||||
* "declared" in the current compilation. This enhances maintainability
|
||||
* by enabling a single header file to embody all knowledge of the names
|
||||
* in question.
|
||||
*
|
||||
* Exactly one module of any executable should #define DEFINE_GLOBALS
|
||||
* before #including the header files which use this convention. The
|
||||
* names in question will be defined and initialized in that module,
|
||||
* and declared as extern in all other modules which #include those
|
||||
* header files.
|
||||
*/
|
||||
|
||||
#define DEFINE_AML_GLOBALS
|
||||
|
||||
#include "acpi.h"
|
||||
#include "acinterp.h"
|
||||
#include "amlcode.h"
|
||||
#include "acevents.h"
|
||||
|
||||
#define _COMPONENT ACPI_EXECUTER
|
||||
ACPI_MODULE_NAME ("exutils")
|
||||
/*__________________________________________________________________________
|
||||
|
|
||||
| Copyright (C) Intel Corporation 1994-1998
|
||||
|
|
||||
| All rights reserved. No part of this program or publication may be
|
||||
| reproduced, transmitted, transcribed, stored in a retrieval system, or
|
||||
| translated into any language or computer language, in any form or by any
|
||||
| means, electronic, mechanical, magnetic, optical, chemical, manual, or
|
||||
| otherwise, without the prior written permission of Intel Corporation.
|
||||
|__________________________________________________________________________
|
||||
|
|
||||
| ModuleName: isutils - interpreter/scanner utilities
|
||||
|__________________________________________________________________________
|
||||
*/
|
||||
|
||||
|
||||
#ifndef ACPI_NO_METHOD_EXECUTION
|
||||
#define __ISEXPRS_C__
|
||||
|
||||
/*******************************************************************************
|
||||
*
|
||||
* FUNCTION: AcpiExEnterInterpreter
|
||||
*
|
||||
* PARAMETERS: None
|
||||
*
|
||||
* DESCRIPTION: Enter the interpreter execution region. Failure to enter
|
||||
* the interpreter region is a fatal system error
|
||||
*
|
||||
******************************************************************************/
|
||||
#include <acpi.h>
|
||||
#include <interpreter.h>
|
||||
#include <amlcode.h>
|
||||
#include <namespace.h>
|
||||
#include <string.h>
|
||||
|
||||
ACPI_STATUS
|
||||
AcpiExEnterInterpreter (void)
|
||||
#define _THIS_MODULE "isutils.c"
|
||||
#define _COMPONENT INTERPRETER
|
||||
|
||||
|
||||
static ST_KEY_DESC_TABLE KDT[] = {
|
||||
{"0000", '1', "DigitsNeeded: impossible base", "DigitsNeeded: impossible base"},
|
||||
{NULL, 'I', NULL, NULL}
|
||||
};
|
||||
|
||||
|
||||
|
||||
/*****************************************************************************
|
||||
*
|
||||
* FUNCTION: SetWhy
|
||||
*
|
||||
* PARAMETERS:
|
||||
*
|
||||
* DESCRIPTION:
|
||||
*
|
||||
****************************************************************************/
|
||||
|
||||
|
||||
void SetWhy (char *Function, char *Case, char *Description)
|
||||
{
|
||||
ACPI_STATUS Status;
|
||||
|
||||
ACPI_FUNCTION_TRACE ("ExEnterInterpreter");
|
||||
|
||||
|
||||
Status = AcpiUtAcquireMutex (ACPI_MTX_EXECUTE);
|
||||
if (ACPI_FAILURE (Status))
|
||||
if (Function)
|
||||
{
|
||||
ACPI_REPORT_ERROR (("Could not acquire interpreter mutex\n"));
|
||||
sprintf (WhyBuf, "%s: ", Function);
|
||||
}
|
||||
|
||||
return_ACPI_STATUS (Status);
|
||||
if (Case)
|
||||
{
|
||||
strcat (WhyBuf, Case);
|
||||
strcat (WhyBuf, ": ");
|
||||
}
|
||||
|
||||
if (Description)
|
||||
{
|
||||
strcat (WhyBuf, Description);
|
||||
}
|
||||
|
||||
if (WhyFail)
|
||||
{ /* WhyFail specifies failure, append it to WhyBuf */
|
||||
|
||||
strcat (WhyBuf, " [");
|
||||
strcat (WhyBuf, WhyFail);
|
||||
strcat (WhyBuf, "]");
|
||||
WhyFail = NULL;
|
||||
}
|
||||
|
||||
Why = WhyBuf;
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************************
|
||||
/*****************************************************************************
|
||||
*
|
||||
* FUNCTION: AmlAppendBlockOwner
|
||||
*
|
||||
* FUNCTION: AcpiExExitInterpreter
|
||||
* PARAMETERS: void *Owner
|
||||
*
|
||||
* PARAMETERS: None
|
||||
* DESCRIPTION: Append block-owner data from bu_plumr to WhyBuf.
|
||||
*
|
||||
* DESCRIPTION: Exit the interpreter execution region
|
||||
*
|
||||
* Cases where the interpreter is unlocked:
|
||||
* 1) Completion of the execution of a control method
|
||||
* 2) Method blocked on a Sleep() AML opcode
|
||||
* 3) Method blocked on an Acquire() AML opcode
|
||||
* 4) Method blocked on a Wait() AML opcode
|
||||
* 5) Method blocked to acquire the global lock
|
||||
* 6) Method blocked to execute a serialized control method that is
|
||||
* already executing
|
||||
* 7) About to invoke a user-installed opregion handler
|
||||
*
|
||||
******************************************************************************/
|
||||
****************************************************************************/
|
||||
|
||||
void
|
||||
AcpiExExitInterpreter (void)
|
||||
AmlAppendBlockOwner (void *Owner)
|
||||
{
|
||||
ACPI_STATUS Status;
|
||||
|
||||
|
||||
ACPI_FUNCTION_TRACE ("ExExitInterpreter");
|
||||
|
||||
|
||||
Status = AcpiUtReleaseMutex (ACPI_MTX_EXECUTE);
|
||||
if (ACPI_FAILURE (Status))
|
||||
#ifdef PLUMBER
|
||||
if (Why != WhyBuf)
|
||||
{
|
||||
ACPI_REPORT_ERROR (("Could not release interpreter mutex\n"));
|
||||
/* Copy message to WhyBuf */
|
||||
|
||||
strcpy (WhyBuf, Why);
|
||||
Why = WhyBuf;
|
||||
}
|
||||
|
||||
return_VOID;
|
||||
#if 1
|
||||
vPlumber ("internal type mismatch", 3);
|
||||
#endif
|
||||
|
||||
sprintf (&WhyBuf[strlen (WhyBuf)], " %s", pcIdentifyOwner(Owner));
|
||||
|
||||
#endif /* PLUMBER */
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************************
|
||||
|
||||
/*****************************************************************************
|
||||
*
|
||||
* FUNCTION: AmlAppendOperandDiag
|
||||
*
|
||||
* FUNCTION: AcpiExTruncateFor32bitTable
|
||||
* PARAMETERS: char * FileName Name of source file
|
||||
* INT32 LineNum Line Number in file
|
||||
* UINT16 OpCode OpCode being executed
|
||||
* INT32 NumOperands Number of operands PrepStack tried to check
|
||||
*
|
||||
* PARAMETERS: ObjDesc - Object to be truncated
|
||||
* DESCRIPTION: Append diagnostic information about operands to WhyBuf
|
||||
* This function is intended to be called after PrepStack
|
||||
* has returned S_ERROR.
|
||||
*
|
||||
* RETURN: none
|
||||
*
|
||||
* DESCRIPTION: Truncate a number to 32-bits if the currently executing method
|
||||
* belongs to a 32-bit ACPI table.
|
||||
*
|
||||
******************************************************************************/
|
||||
****************************************************************************/
|
||||
|
||||
void
|
||||
AcpiExTruncateFor32bitTable (
|
||||
ACPI_OPERAND_OBJECT *ObjDesc)
|
||||
AmlAppendOperandDiag(char *FileName, INT32 LineNum, UINT16 OpCode, INT32 NumOperands)
|
||||
{
|
||||
meth Method;
|
||||
|
||||
ACPI_FUNCTION_ENTRY ();
|
||||
|
||||
if (Why != WhyBuf)
|
||||
{
|
||||
/* Copy message to WhyBuf */
|
||||
|
||||
strcpy (WhyBuf, Why);
|
||||
Why = WhyBuf;
|
||||
}
|
||||
|
||||
GetCurrentLoc (&Method);
|
||||
|
||||
sprintf (&WhyBuf[strlen (WhyBuf)], " [%s:%d, opcode = %s AML offset %04x]",
|
||||
FileName, LineNum,
|
||||
(OpCode > UCHAR_MAX)
|
||||
? LongOps[OpCode & 0x00ff]
|
||||
: ShortOps[OpCode],
|
||||
Method.Offset);
|
||||
|
||||
if (GetDebugLevel () > 0)
|
||||
{
|
||||
/* !!!!!!!!!Clean this stuff up !!! */
|
||||
|
||||
/* INT32 iTraceWas = Trace; */
|
||||
|
||||
/* Turn on TraceExec to enable output from DumpStack() */
|
||||
|
||||
/* Trace |= TraceExec; OBSOLETE !! */
|
||||
|
||||
DUMP_STACK (Exec,
|
||||
(OpCode > UCHAR_MAX)
|
||||
? LongOps[OpCode & 0x00ff]
|
||||
: ShortOps[OpCode],
|
||||
NumOperands,
|
||||
"after PrepStack failed");
|
||||
|
||||
/* Trace = iTraceWas; */
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
/*****************************************************************************
|
||||
*
|
||||
* FUNCTION: AmlBufSeq
|
||||
*
|
||||
* RETURN: The next buffer descriptor sequence number
|
||||
*
|
||||
* DESCRIPTION: Provide a unique sequence number for each Buffer descriptor
|
||||
* allocated during the interpreter's existence. These numbers
|
||||
* are used to relate FieldUnit descriptors to the Buffers
|
||||
* within which the fields are defined.
|
||||
*
|
||||
****************************************************************************/
|
||||
|
||||
UINT32
|
||||
AmlBufSeq (void)
|
||||
{
|
||||
static UINT32 BufSeq = (UINT32) 0; /* Counts allocated Buffer descriptors */
|
||||
|
||||
|
||||
return ++BufSeq;
|
||||
}
|
||||
|
||||
|
||||
/*****************************************************************************
|
||||
*
|
||||
* FUNCTION: DeleteObject
|
||||
*
|
||||
* PARAMETERS: OBJECT_DESCRIPTOR **ObjDesc Descriptor to be deleted
|
||||
*
|
||||
* DESCRIPTION: If the passed descriptor pointer does not point into the
|
||||
* AML block and is not an NsHandle, free the descriptor.
|
||||
*
|
||||
* Note that the parameter is the address of the descriptor
|
||||
* pointer, so that the descriptor pointer can be set to NULL
|
||||
* after the descriptor is freed.
|
||||
*
|
||||
****************************************************************************/
|
||||
|
||||
VOID
|
||||
DeleteObject (OBJECT_DESCRIPTOR **ObjDesc)
|
||||
{
|
||||
FUNCTION_TRACE ("DeleteObject");
|
||||
|
||||
|
||||
DEBUG_PRINT (ACPI_INFO, ("DeleteObject: %x\n", *ObjDesc));
|
||||
|
||||
|
||||
/*
|
||||
* Object must be a valid number and we must be executing
|
||||
* a control method
|
||||
* Be very careful about what we delete
|
||||
*/
|
||||
if ((!ObjDesc) ||
|
||||
(ACPI_GET_OBJECT_TYPE (ObjDesc) != ACPI_TYPE_INTEGER))
|
||||
|
||||
/*
|
||||
* XXX: This is not the best solution!
|
||||
* XXX: And may not work in all cases!!
|
||||
*/
|
||||
|
||||
|
||||
if ((OBJECT_DESCRIPTOR **) 0 != ObjDesc &&
|
||||
(OBJECT_DESCRIPTOR *) 0 != *ObjDesc &&
|
||||
!IsInPCodeBlock ((UINT8 *) *ObjDesc) &&
|
||||
!IsNsHandle (*ObjDesc) &&
|
||||
!IsMethodValue (*ObjDesc) &&
|
||||
!IsNsValue (*ObjDesc))
|
||||
{
|
||||
|
||||
DEBUG_PRINT (ACPI_INFO, ("DeleteObject: Actually deleting %x\n", *ObjDesc));
|
||||
|
||||
OsdFree (*ObjDesc);
|
||||
|
||||
DEBUG_PRINT (ACPI_INFO, ("DeleteObject: Successfully deleted %x\n", *ObjDesc));
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
|
||||
#ifdef PLUMBER
|
||||
/****************************************************************************
|
||||
*
|
||||
* FUNCTION: AmlMarkPackage
|
||||
*
|
||||
* PARAMETERS: OBJECT_DESCRIPTOR *ObjDesc Descriptor of package to be marked
|
||||
*
|
||||
* DESCRIPTION: "Mark" all storage belonging to a package, including
|
||||
* contained packages.
|
||||
*
|
||||
***************************************************************************/
|
||||
|
||||
void
|
||||
AmlMarkPackage (OBJECT_DESCRIPTOR *ObjDesc)
|
||||
{
|
||||
UINT16 Count;
|
||||
|
||||
|
||||
FUNCTION_TRACE ("AmlMarkPackage");
|
||||
|
||||
|
||||
if (ObjDesc)
|
||||
{
|
||||
/* ObjDesc valid */
|
||||
|
||||
if (ObjDesc->Package.PackageElems)
|
||||
{
|
||||
/* ObjDesc->Package.PackageElems valid */
|
||||
|
||||
OBJECT_DESCRIPTOR **Elems = ObjDesc->Package.PackageElems;
|
||||
|
||||
for (Count = ObjDesc->Package.PkgCount; Count; --Count)
|
||||
{
|
||||
if ((*Elems) && (Package == (*Elems)->ValType))
|
||||
{
|
||||
AmlMarkPackage (*Elems);
|
||||
}
|
||||
|
||||
++Elems;
|
||||
}
|
||||
|
||||
MarkBlock (ObjDesc->Package.PackageElems);
|
||||
}
|
||||
|
||||
MarkBlock (ObjDesc);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/****************************************************************************
|
||||
*
|
||||
* FUNCTION: AmlMarkObject
|
||||
*
|
||||
* PARAMETERS: OBJECT_DESCRIPTOR *ObjDesc Descriptor of object to be marked
|
||||
*
|
||||
* DESCRIPTION: "Mark" all storage belonging to an object
|
||||
*
|
||||
***************************************************************************/
|
||||
|
||||
void
|
||||
AmlMarkObject (OBJECT_DESCRIPTOR *ObjDesc)
|
||||
{
|
||||
FUNCTION_TRACE ("AmlMarkObject");
|
||||
|
||||
|
||||
if (ObjDesc)
|
||||
{
|
||||
/* ObjDesc valid */
|
||||
|
||||
MarkBlock(ObjDesc);
|
||||
|
||||
switch (ObjDesc->ValType)
|
||||
{
|
||||
case String:
|
||||
|
||||
/* Avoid marking value if it is in the AML stream */
|
||||
|
||||
if (!iIsInPCodeBlock (ObjDesc->String.String))
|
||||
{
|
||||
MarkBlock (ObjDesc->String.String);
|
||||
}
|
||||
break;
|
||||
|
||||
case Buffer:
|
||||
|
||||
/* Avoid marking value if it is in the AML stream */
|
||||
|
||||
if (!iIsInPCodeBlock (ObjDesc->Buffer.Buffer))
|
||||
{
|
||||
MarkBlock (ObjDesc->Buffer.Buffer);
|
||||
}
|
||||
break;
|
||||
|
||||
case Package:
|
||||
AmlMarkPackage (ObjDesc);
|
||||
break;
|
||||
|
||||
case BankField:
|
||||
if (ObjDesc->BankField.Container)
|
||||
{
|
||||
AmlMarkObject (ObjDesc->BankField.Container);
|
||||
}
|
||||
break;
|
||||
|
||||
case DefField:
|
||||
if (ObjDesc->Field.Container)
|
||||
{
|
||||
AmlMarkObject (ObjDesc->Field.Container);
|
||||
}
|
||||
break;
|
||||
|
||||
case FieldUnit:
|
||||
if (ObjDesc->FieldUnit.Container)
|
||||
{
|
||||
AmlMarkObject (ObjDesc->FieldUnit.Container);
|
||||
}
|
||||
break;
|
||||
|
||||
|
||||
case Lvalue:
|
||||
|
||||
/* XXX - ? mark something if ObjDesc->Lvalue.OpCode == IndexOp ? */
|
||||
break;
|
||||
|
||||
default:
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*****************************************************************************
|
||||
*
|
||||
* FUNCTION: MarkObjectStack
|
||||
*
|
||||
* PARAMETERS: INT32 *Count Count of objects marked
|
||||
*
|
||||
* DESCRIPTION: Mark blocks occupied by currently-active objects on stack
|
||||
*
|
||||
****************************************************************************/
|
||||
|
||||
void
|
||||
MarkObjectStack (INT32 *Count)
|
||||
{
|
||||
INT32 Index;
|
||||
|
||||
|
||||
FUNCTION_TRACE ("MarkObjectStack");
|
||||
|
||||
|
||||
for (Index = 0; Index <= ObjStackTop; ++Index)
|
||||
{
|
||||
/* For each entry on the stack */
|
||||
|
||||
if (ObjStack[Index] &&
|
||||
!IsNsHandle (ObjStack[Index]))
|
||||
{
|
||||
/* Mark value's storage */
|
||||
|
||||
if (Count)
|
||||
{
|
||||
++*Count;
|
||||
}
|
||||
|
||||
AmlMarkObject (ObjStack[Index]);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
#endif /* PLUMBER */
|
||||
|
||||
/******************************************************************************
|
||||
*
|
||||
* FUNCTION: DigitsNeeded
|
||||
*
|
||||
* PARAMETERS: INT32 val value to be represented
|
||||
* INT32 base base of representation
|
||||
*
|
||||
* RETURN: the number of digits needed to represent val in base
|
||||
*
|
||||
*****************************************************************************/
|
||||
|
||||
INT32
|
||||
DigitsNeeded (INT32 val, INT32 base)
|
||||
{
|
||||
INT32 NumDigits = 0;
|
||||
|
||||
|
||||
FUNCTION_TRACE ("DigitsNeeded");
|
||||
|
||||
|
||||
if (base < 1)
|
||||
{
|
||||
/* impossible base */
|
||||
|
||||
REPORT_ERROR (&KDT[0]);
|
||||
}
|
||||
|
||||
else
|
||||
{
|
||||
for (NumDigits = 1 + (val < 0) ; val /= base ; ++NumDigits)
|
||||
{ ; }
|
||||
}
|
||||
|
||||
return NumDigits;
|
||||
}
|
||||
|
||||
|
||||
/******************************************************************************
|
||||
*
|
||||
* FUNCTION: LineSet
|
||||
*
|
||||
* PARAMETERS: INT32 NumBytes number of bytes needing to be printed
|
||||
* 0 => force a new line next time n != 0
|
||||
* OpMode LoadExecMode Load or Exec (used in PRINT_L_D expansion)
|
||||
*
|
||||
* DESCRIPTION: Ensure that there is enough room on the current output line
|
||||
* to print at least n characters; start a new line if needed.
|
||||
* This function is also responsible for printing the offset
|
||||
* within the AML block at the start of each line, and for
|
||||
* indenting the AML according to its block structure while
|
||||
* keeping the offset column vertical.
|
||||
*
|
||||
*****************************************************************************/
|
||||
|
||||
/* Used for keeping track of disassembly listing */
|
||||
|
||||
#define AML_MAX_INDENT 80
|
||||
|
||||
static INT32 LinePos = 0;
|
||||
static INT32 RightMargin = 74;
|
||||
static INT32 LeftMargin = 0;
|
||||
static char LeftMarginChars[AML_MAX_INDENT + 1] = "\0";
|
||||
|
||||
|
||||
VOID
|
||||
LineSet (INT32 NumBytes, OpMode LoadExecMode)
|
||||
{
|
||||
/* Offset in AML block of 1st byte in this line */
|
||||
|
||||
static ptrdiff_t LineOffset;
|
||||
static INT32 NewLineRequested = 1;
|
||||
static INT32 FirstLineNotDoneYet = 1;
|
||||
|
||||
|
||||
FUNCTION_TRACE ("LineSet");
|
||||
|
||||
|
||||
if ((Load1 == LoadExecMode) && (GetDebugLevel() < 1))
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
if (AcpiGbl_IntegerByteWidth == 4)
|
||||
if (0 == NumBytes)
|
||||
{
|
||||
/*
|
||||
* We are running a method that exists in a 32-bit ACPI table.
|
||||
* Truncate the value to 32 bits by zeroing out the upper 32-bit field
|
||||
*/
|
||||
ObjDesc->Integer.Value &= (ACPI_INTEGER) ACPI_UINT32_MAX;
|
||||
NewLineRequested = 1;
|
||||
LineOffset = (INT32) (PCode - PCodeBase);
|
||||
}
|
||||
|
||||
else if (NewLineRequested || LinePos + NumBytes > RightMargin)
|
||||
{
|
||||
/* Need a new line */
|
||||
|
||||
if (FirstLineNotDoneYet || LinePos > LeftMargin)
|
||||
{
|
||||
if (NewLineRequested)
|
||||
{
|
||||
|
||||
/* See DESCRIPTION of Indent() re LeftMarginChars[] */
|
||||
|
||||
if (FirstLineNotDoneYet)
|
||||
{
|
||||
DEBUG_PRINT (TRACE_LOAD,
|
||||
("%04x %s\n", LineOffset, LeftMarginChars));
|
||||
FirstLineNotDoneYet = 0;
|
||||
}
|
||||
|
||||
else
|
||||
{
|
||||
DEBUG_PRINT (TRACE_LOAD,
|
||||
("%04x %s\n", LineOffset, LeftMarginChars));
|
||||
}
|
||||
}
|
||||
|
||||
else
|
||||
{
|
||||
DEBUG_PRINT (TRACE_LOAD,
|
||||
(" %s\n", LeftMarginChars));
|
||||
}
|
||||
|
||||
LinePos = LeftMargin;
|
||||
}
|
||||
|
||||
NewLineRequested = 0;
|
||||
}
|
||||
|
||||
LinePos += NumBytes;
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************************
|
||||
/******************************************************************************
|
||||
*
|
||||
* FUNCTION: Indent
|
||||
*
|
||||
* FUNCTION: AcpiExAcquireGlobalLock
|
||||
* PARAMETERS: INT32 NumChars Number of character positions to move the indent
|
||||
*
|
||||
* PARAMETERS: FieldFlags - Flags with Lock rule:
|
||||
* AlwaysLock or NeverLock
|
||||
* DESCRIPTION: Maintains LeftMargin position, and corresponding
|
||||
* LeftMarginChars string (of spaces) which is printed
|
||||
* following each line's offset field
|
||||
*
|
||||
* RETURN: TRUE/FALSE indicating whether the lock was actually acquired
|
||||
*
|
||||
* DESCRIPTION: Obtain the global lock and keep track of this fact via two
|
||||
* methods. A global variable keeps the state of the lock, and
|
||||
* the state is returned to the caller.
|
||||
*
|
||||
******************************************************************************/
|
||||
*****************************************************************************/
|
||||
|
||||
BOOLEAN
|
||||
AcpiExAcquireGlobalLock (
|
||||
UINT32 FieldFlags)
|
||||
VOID
|
||||
Indent (INT32 NumChars)
|
||||
{
|
||||
BOOLEAN Locked = FALSE;
|
||||
ACPI_STATUS Status;
|
||||
FUNCTION_TRACE ("Indent");
|
||||
|
||||
|
||||
ACPI_FUNCTION_TRACE ("ExAcquireGlobalLock");
|
||||
|
||||
|
||||
/* Only attempt lock if the AlwaysLock bit is set */
|
||||
|
||||
if (FieldFlags & AML_FIELD_LOCK_RULE_MASK)
|
||||
if (NumChars < 0)
|
||||
{
|
||||
/* We should attempt to get the lock, wait forever */
|
||||
/* DEBUG_PRINT (ACPI_INFO, ("out(%d) \n", -n)); */
|
||||
|
||||
Status = AcpiEvAcquireGlobalLock (ACPI_WAIT_FOREVER);
|
||||
if (ACPI_SUCCESS (Status))
|
||||
LeftMargin += NumChars; /* Reduces LeftMargin, since n < 0 */
|
||||
if (LeftMargin < 0)
|
||||
{
|
||||
Locked = TRUE;
|
||||
LeftMargin = 0;
|
||||
}
|
||||
else
|
||||
}
|
||||
else
|
||||
{
|
||||
/* DEBUG_PRINT (ACPI_INFO, ("in(%d) \n", n)); */
|
||||
|
||||
while (NumChars)
|
||||
{
|
||||
ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, "Could not acquire Global Lock, %s\n",
|
||||
AcpiFormatException (Status)));
|
||||
if (LeftMargin < AML_MAX_INDENT)
|
||||
{
|
||||
LeftMarginChars[LeftMargin] = ' ';
|
||||
}
|
||||
|
||||
LeftMargin++;
|
||||
NumChars--;
|
||||
}
|
||||
}
|
||||
|
||||
return_VALUE (Locked);
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************************
|
||||
*
|
||||
* FUNCTION: AcpiExReleaseGlobalLock
|
||||
*
|
||||
* PARAMETERS: LockedByMe - Return value from corresponding call to
|
||||
* AcquireGlobalLock.
|
||||
*
|
||||
* RETURN: Status
|
||||
*
|
||||
* DESCRIPTION: Release the global lock if it is locked.
|
||||
*
|
||||
******************************************************************************/
|
||||
|
||||
void
|
||||
AcpiExReleaseGlobalLock (
|
||||
BOOLEAN LockedByMe)
|
||||
{
|
||||
ACPI_STATUS Status;
|
||||
|
||||
|
||||
ACPI_FUNCTION_TRACE ("ExReleaseGlobalLock");
|
||||
|
||||
|
||||
/* Only attempt unlock if the caller locked it */
|
||||
|
||||
if (LockedByMe)
|
||||
if (LeftMargin < AML_MAX_INDENT + 1)
|
||||
{
|
||||
/* OK, now release the lock */
|
||||
|
||||
Status = AcpiEvReleaseGlobalLock ();
|
||||
if (ACPI_FAILURE (Status))
|
||||
{
|
||||
/* Report the error, but there isn't much else we can do */
|
||||
|
||||
ACPI_REPORT_ERROR (("Could not release ACPI Global Lock, %s\n",
|
||||
AcpiFormatException (Status)));
|
||||
}
|
||||
LeftMarginChars[LeftMargin] = '\0';
|
||||
}
|
||||
|
||||
return_VOID;
|
||||
LINE_SET (0, Load);
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************************
|
||||
*
|
||||
* FUNCTION: AcpiExDigitsNeeded
|
||||
*
|
||||
* PARAMETERS: Value - Value to be represented
|
||||
* Base - Base of representation
|
||||
*
|
||||
* RETURN: the number of digits needed to represent Value in Base
|
||||
*
|
||||
******************************************************************************/
|
||||
|
||||
UINT32
|
||||
AcpiExDigitsNeeded (
|
||||
ACPI_INTEGER Value,
|
||||
UINT32 Base)
|
||||
{
|
||||
UINT32 NumDigits;
|
||||
ACPI_INTEGER CurrentValue;
|
||||
ACPI_INTEGER Quotient;
|
||||
|
||||
|
||||
ACPI_FUNCTION_TRACE ("ExDigitsNeeded");
|
||||
|
||||
|
||||
/*
|
||||
* ACPI_INTEGER is unsigned, so we don't worry about a '-'
|
||||
*/
|
||||
CurrentValue = Value;
|
||||
NumDigits = 0;
|
||||
|
||||
while (CurrentValue)
|
||||
{
|
||||
(void) AcpiUtShortDivide (&CurrentValue, Base, &Quotient, NULL);
|
||||
NumDigits++;
|
||||
CurrentValue = Quotient;
|
||||
}
|
||||
|
||||
return_VALUE (NumDigits);
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************************
|
||||
*
|
||||
* FUNCTION: AcpiExEisaIdToString
|
||||
*
|
||||
* PARAMETERS: NumericId - EISA ID to be converted
|
||||
* OutString - Where to put the converted string (8 bytes)
|
||||
*
|
||||
* DESCRIPTION: Convert a numeric EISA ID to string representation
|
||||
*
|
||||
******************************************************************************/
|
||||
|
||||
void
|
||||
AcpiExEisaIdToString (
|
||||
UINT32 NumericId,
|
||||
NATIVE_CHAR *OutString)
|
||||
{
|
||||
UINT32 EisaId;
|
||||
|
||||
|
||||
ACPI_FUNCTION_ENTRY ();
|
||||
|
||||
|
||||
/* Swap ID to big-endian to get contiguous bits */
|
||||
|
||||
EisaId = AcpiUtDwordByteSwap (NumericId);
|
||||
|
||||
OutString[0] = (char) ('@' + (((unsigned long) EisaId >> 26) & 0x1f));
|
||||
OutString[1] = (char) ('@' + ((EisaId >> 21) & 0x1f));
|
||||
OutString[2] = (char) ('@' + ((EisaId >> 16) & 0x1f));
|
||||
OutString[3] = AcpiUtHexToAsciiChar ((ACPI_INTEGER) EisaId, 12);
|
||||
OutString[4] = AcpiUtHexToAsciiChar ((ACPI_INTEGER) EisaId, 8);
|
||||
OutString[5] = AcpiUtHexToAsciiChar ((ACPI_INTEGER) EisaId, 4);
|
||||
OutString[6] = AcpiUtHexToAsciiChar ((ACPI_INTEGER) EisaId, 0);
|
||||
OutString[7] = 0;
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************************
|
||||
*
|
||||
* FUNCTION: AcpiExUnsignedIntegerToString
|
||||
*
|
||||
* PARAMETERS: Value - Value to be converted
|
||||
* OutString - Where to put the converted string (8 bytes)
|
||||
*
|
||||
* RETURN: Convert a number to string representation
|
||||
*
|
||||
******************************************************************************/
|
||||
|
||||
void
|
||||
AcpiExUnsignedIntegerToString (
|
||||
ACPI_INTEGER Value,
|
||||
NATIVE_CHAR *OutString)
|
||||
{
|
||||
UINT32 Count;
|
||||
UINT32 DigitsNeeded;
|
||||
UINT32 Remainder;
|
||||
ACPI_INTEGER Quotient;
|
||||
|
||||
|
||||
ACPI_FUNCTION_ENTRY ();
|
||||
|
||||
|
||||
DigitsNeeded = AcpiExDigitsNeeded (Value, 10);
|
||||
OutString[DigitsNeeded] = 0;
|
||||
|
||||
for (Count = DigitsNeeded; Count > 0; Count--)
|
||||
{
|
||||
(void) AcpiUtShortDivide (&Value, 10, &Quotient, &Remainder);
|
||||
OutString[Count-1] = (NATIVE_CHAR) ('0' + Remainder);\
|
||||
Value = Quotient;
|
||||
}
|
||||
}
|
||||
|
||||
#endif
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user