mirror of
https://github.com/reactos/reactos.git
synced 2024-09-20 01:31:34 +00:00
c501d8112c
svn path=/branches/aicom-network-fixes/; revision=34994
547 lines
13 KiB
C
547 lines
13 KiB
C
/*******************************************************************************
|
|
*
|
|
* Module Name: nsaccess - Top-level functions for accessing ACPI namespace
|
|
* $Revision: 1.1 $
|
|
*
|
|
******************************************************************************/
|
|
|
|
/*
|
|
* Copyright (C) 2000, 2001 R. Byron Moore
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
|
|
#include <acpi.h>
|
|
|
|
#define _COMPONENT ACPI_NAMESPACE
|
|
MODULE_NAME ("nsaccess")
|
|
|
|
|
|
/*******************************************************************************
|
|
*
|
|
* FUNCTION: Acpi_ns_root_initialize
|
|
*
|
|
* PARAMETERS: None
|
|
*
|
|
* RETURN: Status
|
|
*
|
|
* DESCRIPTION: Allocate and initialize the default root named objects
|
|
*
|
|
* MUTEX: Locks namespace for entire execution
|
|
*
|
|
******************************************************************************/
|
|
|
|
ACPI_STATUS
|
|
acpi_ns_root_initialize (void)
|
|
{
|
|
ACPI_STATUS status = AE_OK;
|
|
PREDEFINED_NAMES *init_val = NULL;
|
|
ACPI_NAMESPACE_NODE *new_node;
|
|
ACPI_OPERAND_OBJECT *obj_desc;
|
|
|
|
|
|
acpi_cm_acquire_mutex (ACPI_MTX_NAMESPACE);
|
|
|
|
/*
|
|
* The global root ptr is initially NULL, so a non-NULL value indicates
|
|
* that Acpi_ns_root_initialize() has already been called; just return.
|
|
*/
|
|
|
|
if (acpi_gbl_root_node) {
|
|
status = AE_OK;
|
|
goto unlock_and_exit;
|
|
}
|
|
|
|
|
|
/*
|
|
* Tell the rest of the subsystem that the root is initialized
|
|
* (This is OK because the namespace is locked)
|
|
*/
|
|
|
|
acpi_gbl_root_node = &acpi_gbl_root_node_struct;
|
|
|
|
|
|
/* Enter the pre-defined names in the name table */
|
|
|
|
for (init_val = acpi_gbl_pre_defined_names; init_val->name; init_val++) {
|
|
status = acpi_ns_lookup (NULL, init_val->name,
|
|
(OBJECT_TYPE_INTERNAL) init_val->type,
|
|
IMODE_LOAD_PASS2, NS_NO_UPSEARCH,
|
|
NULL, &new_node);
|
|
|
|
|
|
/*
|
|
* Name entered successfully.
|
|
* If entry in Pre_defined_names[] specifies an
|
|
* initial value, create the initial value.
|
|
*/
|
|
|
|
if (init_val->val) {
|
|
/*
|
|
* Entry requests an initial value, allocate a
|
|
* descriptor for it.
|
|
*/
|
|
|
|
obj_desc = acpi_cm_create_internal_object (
|
|
(OBJECT_TYPE_INTERNAL) init_val->type);
|
|
|
|
if (!obj_desc) {
|
|
status = AE_NO_MEMORY;
|
|
goto unlock_and_exit;
|
|
}
|
|
|
|
/*
|
|
* Convert value string from table entry to
|
|
* internal representation. Only types actually
|
|
* used for initial values are implemented here.
|
|
*/
|
|
|
|
switch (init_val->type) {
|
|
|
|
case ACPI_TYPE_INTEGER:
|
|
|
|
obj_desc->integer.value =
|
|
(ACPI_INTEGER) STRTOUL (init_val->val, NULL, 10);
|
|
break;
|
|
|
|
|
|
case ACPI_TYPE_STRING:
|
|
|
|
obj_desc->string.length = STRLEN (init_val->val);
|
|
|
|
/*
|
|
* Allocate a buffer for the string. All
|
|
* String.Pointers must be allocated buffers!
|
|
* (makes deletion simpler)
|
|
*/
|
|
obj_desc->string.pointer = acpi_cm_allocate (
|
|
(obj_desc->string.length + 1));
|
|
if (!obj_desc->string.pointer) {
|
|
acpi_cm_remove_reference (obj_desc);
|
|
status = AE_NO_MEMORY;
|
|
goto unlock_and_exit;
|
|
}
|
|
|
|
STRCPY (obj_desc->string.pointer, init_val->val);
|
|
break;
|
|
|
|
|
|
case ACPI_TYPE_MUTEX:
|
|
|
|
obj_desc->mutex.sync_level =
|
|
(u16) STRTOUL (init_val->val, NULL, 10);
|
|
|
|
if (STRCMP (init_val->name, "_GL_") == 0) {
|
|
/*
|
|
* Create a counting semaphore for the
|
|
* global lock
|
|
*/
|
|
status = acpi_os_create_semaphore (ACPI_NO_UNIT_LIMIT,
|
|
1, &obj_desc->mutex.semaphore);
|
|
|
|
if (ACPI_FAILURE (status)) {
|
|
goto unlock_and_exit;
|
|
}
|
|
/*
|
|
* We just created the mutex for the
|
|
* global lock, save it
|
|
*/
|
|
|
|
acpi_gbl_global_lock_semaphore = obj_desc->mutex.semaphore;
|
|
}
|
|
|
|
else {
|
|
/* Create a mutex */
|
|
|
|
status = acpi_os_create_semaphore (1, 1,
|
|
&obj_desc->mutex.semaphore);
|
|
|
|
if (ACPI_FAILURE (status)) {
|
|
goto unlock_and_exit;
|
|
}
|
|
}
|
|
break;
|
|
|
|
|
|
default:
|
|
REPORT_ERROR (("Unsupported initial type value %X\n",
|
|
init_val->type));
|
|
acpi_cm_remove_reference (obj_desc);
|
|
obj_desc = NULL;
|
|
continue;
|
|
}
|
|
|
|
/* Store pointer to value descriptor in the Node */
|
|
|
|
acpi_ns_attach_object (new_node, obj_desc, obj_desc->common.type);
|
|
}
|
|
}
|
|
|
|
|
|
unlock_and_exit:
|
|
acpi_cm_release_mutex (ACPI_MTX_NAMESPACE);
|
|
return (status);
|
|
}
|
|
|
|
|
|
/*******************************************************************************
|
|
*
|
|
* FUNCTION: Acpi_ns_lookup
|
|
*
|
|
* PARAMETERS: Prefix_node - Search scope if name is not fully qualified
|
|
* Pathname - Search pathname, in internal format
|
|
* (as represented in the AML stream)
|
|
* Type - Type associated with name
|
|
* Interpreter_mode - IMODE_LOAD_PASS2 => add name if not found
|
|
* Flags - Flags describing the search restrictions
|
|
* Walk_state - Current state of the walk
|
|
* Return_node - Where the Node is placed (if found
|
|
* or created successfully)
|
|
*
|
|
* RETURN: Status
|
|
*
|
|
* DESCRIPTION: Find or enter the passed name in the name space.
|
|
* Log an error if name not found in Exec mode.
|
|
*
|
|
* MUTEX: Assumes namespace is locked.
|
|
*
|
|
******************************************************************************/
|
|
|
|
ACPI_STATUS
|
|
acpi_ns_lookup (
|
|
ACPI_GENERIC_STATE *scope_info,
|
|
NATIVE_CHAR *pathname,
|
|
OBJECT_TYPE_INTERNAL type,
|
|
OPERATING_MODE interpreter_mode,
|
|
u32 flags,
|
|
ACPI_WALK_STATE *walk_state,
|
|
ACPI_NAMESPACE_NODE **return_node)
|
|
{
|
|
ACPI_STATUS status;
|
|
ACPI_NAMESPACE_NODE *prefix_node;
|
|
ACPI_NAMESPACE_NODE *current_node = NULL;
|
|
ACPI_NAMESPACE_NODE *scope_to_push = NULL;
|
|
ACPI_NAMESPACE_NODE *this_node = NULL;
|
|
u32 num_segments;
|
|
ACPI_NAME simple_name;
|
|
u8 null_name_path = FALSE;
|
|
OBJECT_TYPE_INTERNAL type_to_check_for;
|
|
OBJECT_TYPE_INTERNAL this_search_type;
|
|
u32 local_flags = flags & ~NS_ERROR_IF_FOUND;
|
|
|
|
|
|
if (!return_node) {
|
|
return (AE_BAD_PARAMETER);
|
|
}
|
|
|
|
|
|
acpi_gbl_ns_lookup_count++;
|
|
|
|
*return_node = ENTRY_NOT_FOUND;
|
|
|
|
|
|
if (!acpi_gbl_root_node) {
|
|
return (AE_NO_NAMESPACE);
|
|
}
|
|
|
|
/*
|
|
* Get the prefix scope.
|
|
* A null scope means use the root scope
|
|
*/
|
|
|
|
if ((!scope_info) ||
|
|
(!scope_info->scope.node)) {
|
|
prefix_node = acpi_gbl_root_node;
|
|
}
|
|
else {
|
|
prefix_node = scope_info->scope.node;
|
|
}
|
|
|
|
|
|
/*
|
|
* This check is explicitly split provide relax the Type_to_check_for
|
|
* conditions for Bank_field_defn. Originally, both Bank_field_defn and
|
|
* Def_field_defn caused Type_to_check_for to be set to ACPI_TYPE_REGION,
|
|
* but the Bank_field_defn may also check for a Field definition as well
|
|
* as an Operation_region.
|
|
*/
|
|
|
|
if (INTERNAL_TYPE_DEF_FIELD_DEFN == type) {
|
|
/* Def_field_defn defines fields in a Region */
|
|
|
|
type_to_check_for = ACPI_TYPE_REGION;
|
|
}
|
|
|
|
else if (INTERNAL_TYPE_BANK_FIELD_DEFN == type) {
|
|
/* Bank_field_defn defines data fields in a Field Object */
|
|
|
|
type_to_check_for = ACPI_TYPE_ANY;
|
|
}
|
|
|
|
else {
|
|
type_to_check_for = type;
|
|
}
|
|
|
|
|
|
/* TBD: [Restructure] - Move the pathname stuff into a new procedure */
|
|
|
|
/* Examine the name pointer */
|
|
|
|
if (!pathname) {
|
|
/* 8-12-98 ASL Grammar Update supports null Name_path */
|
|
|
|
null_name_path = TRUE;
|
|
num_segments = 0;
|
|
this_node = acpi_gbl_root_node;
|
|
|
|
}
|
|
|
|
else {
|
|
/*
|
|
* Valid name pointer (Internal name format)
|
|
*
|
|
* Check for prefixes. As represented in the AML stream, a
|
|
* Pathname consists of an optional scope prefix followed by
|
|
* a segment part.
|
|
*
|
|
* If present, the scope prefix is either a Root_prefix (in
|
|
* which case the name is fully qualified), or zero or more
|
|
* Parent_prefixes (in which case the name's scope is relative
|
|
* to the current scope).
|
|
*
|
|
* The segment part consists of either:
|
|
* - A single 4-byte name segment, or
|
|
* - A Dual_name_prefix followed by two 4-byte name segments, or
|
|
* - A Multi_name_prefix_op, followed by a byte indicating the
|
|
* number of segments and the segments themselves.
|
|
*/
|
|
|
|
if (*pathname == AML_ROOT_PREFIX) {
|
|
/* Pathname is fully qualified, look in root name table */
|
|
|
|
current_node = acpi_gbl_root_node;
|
|
|
|
/* point to segment part */
|
|
|
|
pathname++;
|
|
|
|
/* Direct reference to root, "\" */
|
|
|
|
if (!(*pathname)) {
|
|
this_node = acpi_gbl_root_node;
|
|
goto check_for_new_scope_and_exit;
|
|
}
|
|
}
|
|
|
|
else {
|
|
/* Pathname is relative to current scope, start there */
|
|
|
|
current_node = prefix_node;
|
|
|
|
/*
|
|
* Handle up-prefix (carat). More than one prefix
|
|
* is supported
|
|
*/
|
|
|
|
while (*pathname == AML_PARENT_PREFIX) {
|
|
/* Point to segment part or next Parent_prefix */
|
|
|
|
pathname++;
|
|
|
|
/* Backup to the parent's scope */
|
|
|
|
this_node = acpi_ns_get_parent_object (current_node);
|
|
if (!this_node) {
|
|
/* Current scope has no parent scope */
|
|
|
|
REPORT_ERROR (
|
|
("Too many parent prefixes (^) - reached root\n"));
|
|
return (AE_NOT_FOUND);
|
|
}
|
|
|
|
current_node = this_node;
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
* Examine the name prefix opcode, if any,
|
|
* to determine the number of segments
|
|
*/
|
|
|
|
if (*pathname == AML_DUAL_NAME_PREFIX) {
|
|
num_segments = 2;
|
|
|
|
/* point to first segment */
|
|
|
|
pathname++;
|
|
|
|
}
|
|
|
|
else if (*pathname == AML_MULTI_NAME_PREFIX_OP) {
|
|
num_segments = (u32)* (u8 *) ++pathname;
|
|
|
|
/* point to first segment */
|
|
|
|
pathname++;
|
|
|
|
}
|
|
|
|
else {
|
|
/*
|
|
* No Dual or Multi prefix, hence there is only one
|
|
* segment and Pathname is already pointing to it.
|
|
*/
|
|
num_segments = 1;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
/*
|
|
* Search namespace for each segment of the name.
|
|
* Loop through and verify/add each name segment.
|
|
*/
|
|
|
|
|
|
while (num_segments-- && current_node) {
|
|
/*
|
|
* Search for the current name segment under the current
|
|
* named object. The Type is significant only at the last (topmost)
|
|
* level. (We don't care about the types along the path, only
|
|
* the type of the final target object.)
|
|
*/
|
|
this_search_type = ACPI_TYPE_ANY;
|
|
if (!num_segments) {
|
|
this_search_type = type;
|
|
local_flags = flags;
|
|
}
|
|
|
|
/* Pluck one ACPI name from the front of the pathname */
|
|
|
|
MOVE_UNALIGNED32_TO_32 (&simple_name, pathname);
|
|
|
|
/* Try to find the ACPI name */
|
|
|
|
status = acpi_ns_search_and_enter (simple_name, walk_state,
|
|
current_node, interpreter_mode,
|
|
this_search_type, local_flags,
|
|
&this_node);
|
|
|
|
if (ACPI_FAILURE (status)) {
|
|
if (status == AE_NOT_FOUND) {
|
|
/* Name not found in ACPI namespace */
|
|
|
|
}
|
|
|
|
return (status);
|
|
}
|
|
|
|
|
|
/*
|
|
* If 1) This is the last segment (Num_segments == 0)
|
|
* 2) and looking for a specific type
|
|
* (Not checking for TYPE_ANY)
|
|
* 3) Which is not an alias
|
|
* 4) which is not a local type (TYPE_DEF_ANY)
|
|
* 5) which is not a local type (TYPE_SCOPE)
|
|
* 6) which is not a local type (TYPE_INDEX_FIELD_DEFN)
|
|
* 7) and type of object is known (not TYPE_ANY)
|
|
* 8) and object does not match request
|
|
*
|
|
* Then we have a type mismatch. Just warn and ignore it.
|
|
*/
|
|
if ((num_segments == 0) &&
|
|
(type_to_check_for != ACPI_TYPE_ANY) &&
|
|
(type_to_check_for != INTERNAL_TYPE_ALIAS) &&
|
|
(type_to_check_for != INTERNAL_TYPE_DEF_ANY) &&
|
|
(type_to_check_for != INTERNAL_TYPE_SCOPE) &&
|
|
(type_to_check_for != INTERNAL_TYPE_INDEX_FIELD_DEFN) &&
|
|
(this_node->type != ACPI_TYPE_ANY) &&
|
|
(this_node->type != type_to_check_for)) {
|
|
/* Complain about a type mismatch */
|
|
|
|
REPORT_WARNING (
|
|
("Ns_lookup: %4.4s, type %X, checking for type %X\n",
|
|
&simple_name, this_node->type, type_to_check_for));
|
|
}
|
|
|
|
/*
|
|
* If this is the last name segment and we are not looking for a
|
|
* specific type, but the type of found object is known, use that type
|
|
* to see if it opens a scope.
|
|
*/
|
|
|
|
if ((0 == num_segments) && (ACPI_TYPE_ANY == type)) {
|
|
type = this_node->type;
|
|
}
|
|
|
|
if ((num_segments || acpi_ns_opens_scope (type)) &&
|
|
(this_node->child == NULL)) {
|
|
/*
|
|
* More segments or the type implies enclosed scope,
|
|
* and the next scope has not been allocated.
|
|
*/
|
|
|
|
}
|
|
|
|
current_node = this_node;
|
|
|
|
/* point to next name segment */
|
|
|
|
pathname += ACPI_NAME_SIZE;
|
|
}
|
|
|
|
|
|
/*
|
|
* Always check if we need to open a new scope
|
|
*/
|
|
|
|
check_for_new_scope_and_exit:
|
|
|
|
if (!(flags & NS_DONT_OPEN_SCOPE) && (walk_state)) {
|
|
/*
|
|
* If entry is a type which opens a scope,
|
|
* push the new scope on the scope stack.
|
|
*/
|
|
|
|
if (acpi_ns_opens_scope (type_to_check_for)) {
|
|
/* 8-12-98 ASL Grammar Update supports null Name_path */
|
|
|
|
if (null_name_path) {
|
|
/* TBD: [Investigate] - is this the correct thing to do? */
|
|
|
|
scope_to_push = NULL;
|
|
}
|
|
else {
|
|
scope_to_push = this_node;
|
|
}
|
|
|
|
status = acpi_ds_scope_stack_push (scope_to_push, type,
|
|
walk_state);
|
|
if (ACPI_FAILURE (status)) {
|
|
return (status);
|
|
}
|
|
|
|
}
|
|
}
|
|
|
|
*return_node = this_node;
|
|
return (AE_OK);
|
|
}
|
|
|