989 lines
27 KiB
C
989 lines
27 KiB
C
|
/******************************************************************************
|
||
|
*
|
||
|
* Module Name: utalloc - local cache and memory allocation routines
|
||
|
*
|
||
|
*****************************************************************************/
|
||
|
|
||
|
/*
|
||
|
* Copyright (C) 2000 - 2005, R. Byron Moore
|
||
|
* All rights reserved.
|
||
|
*
|
||
|
* Redistribution and use in source and binary forms, with or without
|
||
|
* modification, are permitted provided that the following conditions
|
||
|
* are met:
|
||
|
* 1. Redistributions of source code must retain the above copyright
|
||
|
* notice, this list of conditions, and the following disclaimer,
|
||
|
* without modification.
|
||
|
* 2. Redistributions in binary form must reproduce at minimum a disclaimer
|
||
|
* substantially similar to the "NO WARRANTY" disclaimer below
|
||
|
* ("Disclaimer") and any redistribution must be conditioned upon
|
||
|
* including a substantially similar Disclaimer requirement for further
|
||
|
* binary redistribution.
|
||
|
* 3. Neither the names of the above-listed copyright holders nor the names
|
||
|
* of any contributors may be used to endorse or promote products derived
|
||
|
* from this software without specific prior written permission.
|
||
|
*
|
||
|
* Alternatively, this software may be distributed under the terms of the
|
||
|
* GNU General Public License ("GPL") version 2 as published by the Free
|
||
|
* Software Foundation.
|
||
|
*
|
||
|
* NO WARRANTY
|
||
|
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||
|
* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
||
|
* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
|
||
|
* A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
|
||
|
* HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
||
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
||
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
||
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
|
||
|
* STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
|
||
|
* IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
||
|
* POSSIBILITY OF SUCH DAMAGES.
|
||
|
*/
|
||
|
|
||
|
|
||
|
#include <acpi/acpi.h>
|
||
|
|
||
|
#define _COMPONENT ACPI_UTILITIES
|
||
|
ACPI_MODULE_NAME ("utalloc")
|
||
|
|
||
|
|
||
|
/******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_release_to_cache
|
||
|
*
|
||
|
* PARAMETERS: list_id - Memory list/cache ID
|
||
|
* Object - The object to be released
|
||
|
*
|
||
|
* RETURN: None
|
||
|
*
|
||
|
* DESCRIPTION: Release an object to the specified cache. If cache is full,
|
||
|
* the object is deleted.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
void
|
||
|
acpi_ut_release_to_cache (
|
||
|
u32 list_id,
|
||
|
void *object)
|
||
|
{
|
||
|
struct acpi_memory_list *cache_info;
|
||
|
|
||
|
|
||
|
ACPI_FUNCTION_ENTRY ();
|
||
|
|
||
|
|
||
|
cache_info = &acpi_gbl_memory_lists[list_id];
|
||
|
|
||
|
#ifdef ACPI_ENABLE_OBJECT_CACHE
|
||
|
|
||
|
/* If walk cache is full, just free this wallkstate object */
|
||
|
|
||
|
if (cache_info->cache_depth >= cache_info->max_cache_depth) {
|
||
|
ACPI_MEM_FREE (object);
|
||
|
ACPI_MEM_TRACKING (cache_info->total_freed++);
|
||
|
}
|
||
|
|
||
|
/* Otherwise put this object back into the cache */
|
||
|
|
||
|
else {
|
||
|
if (ACPI_FAILURE (acpi_ut_acquire_mutex (ACPI_MTX_CACHES))) {
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
/* Mark the object as cached */
|
||
|
|
||
|
ACPI_MEMSET (object, 0xCA, cache_info->object_size);
|
||
|
ACPI_SET_DESCRIPTOR_TYPE (object, ACPI_DESC_TYPE_CACHED);
|
||
|
|
||
|
/* Put the object at the head of the cache list */
|
||
|
|
||
|
* (ACPI_CAST_INDIRECT_PTR (char, &(((char *) object)[cache_info->link_offset]))) = cache_info->list_head;
|
||
|
cache_info->list_head = object;
|
||
|
cache_info->cache_depth++;
|
||
|
|
||
|
(void) acpi_ut_release_mutex (ACPI_MTX_CACHES);
|
||
|
}
|
||
|
|
||
|
#else
|
||
|
|
||
|
/* Object cache is disabled; just free the object */
|
||
|
|
||
|
ACPI_MEM_FREE (object);
|
||
|
ACPI_MEM_TRACKING (cache_info->total_freed++);
|
||
|
#endif
|
||
|
}
|
||
|
|
||
|
|
||
|
/******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_acquire_from_cache
|
||
|
*
|
||
|
* PARAMETERS: list_id - Memory list ID
|
||
|
*
|
||
|
* RETURN: A requested object. NULL if the object could not be
|
||
|
* allocated.
|
||
|
*
|
||
|
* DESCRIPTION: Get an object from the specified cache. If cache is empty,
|
||
|
* the object is allocated.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
void *
|
||
|
acpi_ut_acquire_from_cache (
|
||
|
u32 list_id)
|
||
|
{
|
||
|
struct acpi_memory_list *cache_info;
|
||
|
void *object;
|
||
|
|
||
|
|
||
|
ACPI_FUNCTION_NAME ("ut_acquire_from_cache");
|
||
|
|
||
|
|
||
|
cache_info = &acpi_gbl_memory_lists[list_id];
|
||
|
|
||
|
#ifdef ACPI_ENABLE_OBJECT_CACHE
|
||
|
|
||
|
if (ACPI_FAILURE (acpi_ut_acquire_mutex (ACPI_MTX_CACHES))) {
|
||
|
return (NULL);
|
||
|
}
|
||
|
|
||
|
ACPI_MEM_TRACKING (cache_info->cache_requests++);
|
||
|
|
||
|
/* Check the cache first */
|
||
|
|
||
|
if (cache_info->list_head) {
|
||
|
/* There is an object available, use it */
|
||
|
|
||
|
object = cache_info->list_head;
|
||
|
cache_info->list_head = *(ACPI_CAST_INDIRECT_PTR (char, &(((char *) object)[cache_info->link_offset])));
|
||
|
|
||
|
ACPI_MEM_TRACKING (cache_info->cache_hits++);
|
||
|
cache_info->cache_depth--;
|
||
|
|
||
|
#ifdef ACPI_DBG_TRACK_ALLOCATIONS
|
||
|
ACPI_DEBUG_PRINT ((ACPI_DB_EXEC, "Object %p from %s\n",
|
||
|
object, acpi_gbl_memory_lists[list_id].list_name));
|
||
|
#endif
|
||
|
|
||
|
if (ACPI_FAILURE (acpi_ut_release_mutex (ACPI_MTX_CACHES))) {
|
||
|
return (NULL);
|
||
|
}
|
||
|
|
||
|
/* Clear (zero) the previously used Object */
|
||
|
|
||
|
ACPI_MEMSET (object, 0, cache_info->object_size);
|
||
|
}
|
||
|
|
||
|
else {
|
||
|
/* The cache is empty, create a new object */
|
||
|
|
||
|
/* Avoid deadlock with ACPI_MEM_CALLOCATE */
|
||
|
|
||
|
if (ACPI_FAILURE (acpi_ut_release_mutex (ACPI_MTX_CACHES))) {
|
||
|
return (NULL);
|
||
|
}
|
||
|
|
||
|
object = ACPI_MEM_CALLOCATE (cache_info->object_size);
|
||
|
ACPI_MEM_TRACKING (cache_info->total_allocated++);
|
||
|
}
|
||
|
|
||
|
#else
|
||
|
|
||
|
/* Object cache is disabled; just allocate the object */
|
||
|
|
||
|
object = ACPI_MEM_CALLOCATE (cache_info->object_size);
|
||
|
ACPI_MEM_TRACKING (cache_info->total_allocated++);
|
||
|
#endif
|
||
|
|
||
|
return (object);
|
||
|
}
|
||
|
|
||
|
|
||
|
#ifdef ACPI_ENABLE_OBJECT_CACHE
|
||
|
/******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_delete_generic_cache
|
||
|
*
|
||
|
* PARAMETERS: list_id - Memory list ID
|
||
|
*
|
||
|
* RETURN: None
|
||
|
*
|
||
|
* DESCRIPTION: Free all objects within the requested cache.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
void
|
||
|
acpi_ut_delete_generic_cache (
|
||
|
u32 list_id)
|
||
|
{
|
||
|
struct acpi_memory_list *cache_info;
|
||
|
char *next;
|
||
|
|
||
|
|
||
|
ACPI_FUNCTION_ENTRY ();
|
||
|
|
||
|
|
||
|
cache_info = &acpi_gbl_memory_lists[list_id];
|
||
|
while (cache_info->list_head) {
|
||
|
/* Delete one cached state object */
|
||
|
|
||
|
next = *(ACPI_CAST_INDIRECT_PTR (char, &(((char *) cache_info->list_head)[cache_info->link_offset])));
|
||
|
ACPI_MEM_FREE (cache_info->list_head);
|
||
|
|
||
|
cache_info->list_head = next;
|
||
|
cache_info->cache_depth--;
|
||
|
}
|
||
|
}
|
||
|
#endif
|
||
|
|
||
|
|
||
|
/*******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_validate_buffer
|
||
|
*
|
||
|
* PARAMETERS: Buffer - Buffer descriptor to be validated
|
||
|
*
|
||
|
* RETURN: Status
|
||
|
*
|
||
|
* DESCRIPTION: Perform parameter validation checks on an struct acpi_buffer
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
acpi_status
|
||
|
acpi_ut_validate_buffer (
|
||
|
struct acpi_buffer *buffer)
|
||
|
{
|
||
|
|
||
|
/* Obviously, the structure pointer must be valid */
|
||
|
|
||
|
if (!buffer) {
|
||
|
return (AE_BAD_PARAMETER);
|
||
|
}
|
||
|
|
||
|
/* Special semantics for the length */
|
||
|
|
||
|
if ((buffer->length == ACPI_NO_BUFFER) ||
|
||
|
(buffer->length == ACPI_ALLOCATE_BUFFER) ||
|
||
|
(buffer->length == ACPI_ALLOCATE_LOCAL_BUFFER)) {
|
||
|
return (AE_OK);
|
||
|
}
|
||
|
|
||
|
/* Length is valid, the buffer pointer must be also */
|
||
|
|
||
|
if (!buffer->pointer) {
|
||
|
return (AE_BAD_PARAMETER);
|
||
|
}
|
||
|
|
||
|
return (AE_OK);
|
||
|
}
|
||
|
|
||
|
|
||
|
/*******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_initialize_buffer
|
||
|
*
|
||
|
* PARAMETERS: Buffer - Buffer to be validated
|
||
|
* required_length - Length needed
|
||
|
*
|
||
|
* RETURN: Status
|
||
|
*
|
||
|
* DESCRIPTION: Validate that the buffer is of the required length or
|
||
|
* allocate a new buffer. Returned buffer is always zeroed.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
acpi_status
|
||
|
acpi_ut_initialize_buffer (
|
||
|
struct acpi_buffer *buffer,
|
||
|
acpi_size required_length)
|
||
|
{
|
||
|
acpi_status status = AE_OK;
|
||
|
|
||
|
|
||
|
switch (buffer->length) {
|
||
|
case ACPI_NO_BUFFER:
|
||
|
|
||
|
/* Set the exception and returned the required length */
|
||
|
|
||
|
status = AE_BUFFER_OVERFLOW;
|
||
|
break;
|
||
|
|
||
|
|
||
|
case ACPI_ALLOCATE_BUFFER:
|
||
|
|
||
|
/* Allocate a new buffer */
|
||
|
|
||
|
buffer->pointer = acpi_os_allocate (required_length);
|
||
|
if (!buffer->pointer) {
|
||
|
return (AE_NO_MEMORY);
|
||
|
}
|
||
|
|
||
|
/* Clear the buffer */
|
||
|
|
||
|
ACPI_MEMSET (buffer->pointer, 0, required_length);
|
||
|
break;
|
||
|
|
||
|
|
||
|
case ACPI_ALLOCATE_LOCAL_BUFFER:
|
||
|
|
||
|
/* Allocate a new buffer with local interface to allow tracking */
|
||
|
|
||
|
buffer->pointer = ACPI_MEM_CALLOCATE (required_length);
|
||
|
if (!buffer->pointer) {
|
||
|
return (AE_NO_MEMORY);
|
||
|
}
|
||
|
break;
|
||
|
|
||
|
|
||
|
default:
|
||
|
|
||
|
/* Existing buffer: Validate the size of the buffer */
|
||
|
|
||
|
if (buffer->length < required_length) {
|
||
|
status = AE_BUFFER_OVERFLOW;
|
||
|
break;
|
||
|
}
|
||
|
|
||
|
/* Clear the buffer */
|
||
|
|
||
|
ACPI_MEMSET (buffer->pointer, 0, required_length);
|
||
|
break;
|
||
|
}
|
||
|
|
||
|
buffer->length = required_length;
|
||
|
return (status);
|
||
|
}
|
||
|
|
||
|
|
||
|
/*******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_allocate
|
||
|
*
|
||
|
* PARAMETERS: Size - Size of the allocation
|
||
|
* Component - Component type of caller
|
||
|
* Module - Source file name of caller
|
||
|
* Line - Line number of caller
|
||
|
*
|
||
|
* RETURN: Address of the allocated memory on success, NULL on failure.
|
||
|
*
|
||
|
* DESCRIPTION: The subsystem's equivalent of malloc.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
void *
|
||
|
acpi_ut_allocate (
|
||
|
acpi_size size,
|
||
|
u32 component,
|
||
|
char *module,
|
||
|
u32 line)
|
||
|
{
|
||
|
void *allocation;
|
||
|
|
||
|
|
||
|
ACPI_FUNCTION_TRACE_U32 ("ut_allocate", size);
|
||
|
|
||
|
|
||
|
/* Check for an inadvertent size of zero bytes */
|
||
|
|
||
|
if (!size) {
|
||
|
_ACPI_REPORT_ERROR (module, line, component,
|
||
|
("ut_allocate: Attempt to allocate zero bytes\n"));
|
||
|
size = 1;
|
||
|
}
|
||
|
|
||
|
allocation = acpi_os_allocate (size);
|
||
|
if (!allocation) {
|
||
|
/* Report allocation error */
|
||
|
|
||
|
_ACPI_REPORT_ERROR (module, line, component,
|
||
|
("ut_allocate: Could not allocate size %X\n", (u32) size));
|
||
|
|
||
|
return_PTR (NULL);
|
||
|
}
|
||
|
|
||
|
return_PTR (allocation);
|
||
|
}
|
||
|
|
||
|
|
||
|
/*******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_callocate
|
||
|
*
|
||
|
* PARAMETERS: Size - Size of the allocation
|
||
|
* Component - Component type of caller
|
||
|
* Module - Source file name of caller
|
||
|
* Line - Line number of caller
|
||
|
*
|
||
|
* RETURN: Address of the allocated memory on success, NULL on failure.
|
||
|
*
|
||
|
* DESCRIPTION: Subsystem equivalent of calloc.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
void *
|
||
|
acpi_ut_callocate (
|
||
|
acpi_size size,
|
||
|
u32 component,
|
||
|
char *module,
|
||
|
u32 line)
|
||
|
{
|
||
|
void *allocation;
|
||
|
|
||
|
|
||
|
ACPI_FUNCTION_TRACE_U32 ("ut_callocate", size);
|
||
|
|
||
|
|
||
|
/* Check for an inadvertent size of zero bytes */
|
||
|
|
||
|
if (!size) {
|
||
|
_ACPI_REPORT_ERROR (module, line, component,
|
||
|
("ut_callocate: Attempt to allocate zero bytes\n"));
|
||
|
return_PTR (NULL);
|
||
|
}
|
||
|
|
||
|
allocation = acpi_os_allocate (size);
|
||
|
if (!allocation) {
|
||
|
/* Report allocation error */
|
||
|
|
||
|
_ACPI_REPORT_ERROR (module, line, component,
|
||
|
("ut_callocate: Could not allocate size %X\n", (u32) size));
|
||
|
return_PTR (NULL);
|
||
|
}
|
||
|
|
||
|
/* Clear the memory block */
|
||
|
|
||
|
ACPI_MEMSET (allocation, 0, size);
|
||
|
return_PTR (allocation);
|
||
|
}
|
||
|
|
||
|
|
||
|
#ifdef ACPI_DBG_TRACK_ALLOCATIONS
|
||
|
/*
|
||
|
* These procedures are used for tracking memory leaks in the subsystem, and
|
||
|
* they get compiled out when the ACPI_DBG_TRACK_ALLOCATIONS is not set.
|
||
|
*
|
||
|
* Each memory allocation is tracked via a doubly linked list. Each
|
||
|
* element contains the caller's component, module name, function name, and
|
||
|
* line number. acpi_ut_allocate and acpi_ut_callocate call
|
||
|
* acpi_ut_track_allocation to add an element to the list; deletion
|
||
|
* occurs in the body of acpi_ut_free.
|
||
|
*/
|
||
|
|
||
|
|
||
|
/*******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_allocate_and_track
|
||
|
*
|
||
|
* PARAMETERS: Size - Size of the allocation
|
||
|
* Component - Component type of caller
|
||
|
* Module - Source file name of caller
|
||
|
* Line - Line number of caller
|
||
|
*
|
||
|
* RETURN: Address of the allocated memory on success, NULL on failure.
|
||
|
*
|
||
|
* DESCRIPTION: The subsystem's equivalent of malloc.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
void *
|
||
|
acpi_ut_allocate_and_track (
|
||
|
acpi_size size,
|
||
|
u32 component,
|
||
|
char *module,
|
||
|
u32 line)
|
||
|
{
|
||
|
struct acpi_debug_mem_block *allocation;
|
||
|
acpi_status status;
|
||
|
|
||
|
|
||
|
allocation = acpi_ut_allocate (size + sizeof (struct acpi_debug_mem_header), component,
|
||
|
module, line);
|
||
|
if (!allocation) {
|
||
|
return (NULL);
|
||
|
}
|
||
|
|
||
|
status = acpi_ut_track_allocation (ACPI_MEM_LIST_GLOBAL, allocation, size,
|
||
|
ACPI_MEM_MALLOC, component, module, line);
|
||
|
if (ACPI_FAILURE (status)) {
|
||
|
acpi_os_free (allocation);
|
||
|
return (NULL);
|
||
|
}
|
||
|
|
||
|
acpi_gbl_memory_lists[ACPI_MEM_LIST_GLOBAL].total_allocated++;
|
||
|
acpi_gbl_memory_lists[ACPI_MEM_LIST_GLOBAL].current_total_size += (u32) size;
|
||
|
|
||
|
return ((void *) &allocation->user_space);
|
||
|
}
|
||
|
|
||
|
|
||
|
/*******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_callocate_and_track
|
||
|
*
|
||
|
* PARAMETERS: Size - Size of the allocation
|
||
|
* Component - Component type of caller
|
||
|
* Module - Source file name of caller
|
||
|
* Line - Line number of caller
|
||
|
*
|
||
|
* RETURN: Address of the allocated memory on success, NULL on failure.
|
||
|
*
|
||
|
* DESCRIPTION: Subsystem equivalent of calloc.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
void *
|
||
|
acpi_ut_callocate_and_track (
|
||
|
acpi_size size,
|
||
|
u32 component,
|
||
|
char *module,
|
||
|
u32 line)
|
||
|
{
|
||
|
struct acpi_debug_mem_block *allocation;
|
||
|
acpi_status status;
|
||
|
|
||
|
|
||
|
allocation = acpi_ut_callocate (size + sizeof (struct acpi_debug_mem_header), component,
|
||
|
module, line);
|
||
|
if (!allocation) {
|
||
|
/* Report allocation error */
|
||
|
|
||
|
_ACPI_REPORT_ERROR (module, line, component,
|
||
|
("ut_callocate: Could not allocate size %X\n", (u32) size));
|
||
|
return (NULL);
|
||
|
}
|
||
|
|
||
|
status = acpi_ut_track_allocation (ACPI_MEM_LIST_GLOBAL, allocation, size,
|
||
|
ACPI_MEM_CALLOC, component, module, line);
|
||
|
if (ACPI_FAILURE (status)) {
|
||
|
acpi_os_free (allocation);
|
||
|
return (NULL);
|
||
|
}
|
||
|
|
||
|
acpi_gbl_memory_lists[ACPI_MEM_LIST_GLOBAL].total_allocated++;
|
||
|
acpi_gbl_memory_lists[ACPI_MEM_LIST_GLOBAL].current_total_size += (u32) size;
|
||
|
|
||
|
return ((void *) &allocation->user_space);
|
||
|
}
|
||
|
|
||
|
|
||
|
/*******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_free_and_track
|
||
|
*
|
||
|
* PARAMETERS: Allocation - Address of the memory to deallocate
|
||
|
* Component - Component type of caller
|
||
|
* Module - Source file name of caller
|
||
|
* Line - Line number of caller
|
||
|
*
|
||
|
* RETURN: None
|
||
|
*
|
||
|
* DESCRIPTION: Frees the memory at Allocation
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
void
|
||
|
acpi_ut_free_and_track (
|
||
|
void *allocation,
|
||
|
u32 component,
|
||
|
char *module,
|
||
|
u32 line)
|
||
|
{
|
||
|
struct acpi_debug_mem_block *debug_block;
|
||
|
acpi_status status;
|
||
|
|
||
|
|
||
|
ACPI_FUNCTION_TRACE_PTR ("ut_free", allocation);
|
||
|
|
||
|
|
||
|
if (NULL == allocation) {
|
||
|
_ACPI_REPORT_ERROR (module, line, component,
|
||
|
("acpi_ut_free: Attempt to delete a NULL address\n"));
|
||
|
|
||
|
return_VOID;
|
||
|
}
|
||
|
|
||
|
debug_block = ACPI_CAST_PTR (struct acpi_debug_mem_block,
|
||
|
(((char *) allocation) - sizeof (struct acpi_debug_mem_header)));
|
||
|
|
||
|
acpi_gbl_memory_lists[ACPI_MEM_LIST_GLOBAL].total_freed++;
|
||
|
acpi_gbl_memory_lists[ACPI_MEM_LIST_GLOBAL].current_total_size -= debug_block->size;
|
||
|
|
||
|
status = acpi_ut_remove_allocation (ACPI_MEM_LIST_GLOBAL, debug_block,
|
||
|
component, module, line);
|
||
|
if (ACPI_FAILURE (status)) {
|
||
|
ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, "Could not free memory, %s\n",
|
||
|
acpi_format_exception (status)));
|
||
|
}
|
||
|
|
||
|
acpi_os_free (debug_block);
|
||
|
|
||
|
ACPI_DEBUG_PRINT ((ACPI_DB_ALLOCATIONS, "%p freed\n", allocation));
|
||
|
|
||
|
return_VOID;
|
||
|
}
|
||
|
|
||
|
|
||
|
/*******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_find_allocation
|
||
|
*
|
||
|
* PARAMETERS: list_id - Memory list to search
|
||
|
* Allocation - Address of allocated memory
|
||
|
*
|
||
|
* RETURN: A list element if found; NULL otherwise.
|
||
|
*
|
||
|
* DESCRIPTION: Searches for an element in the global allocation tracking list.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
struct acpi_debug_mem_block *
|
||
|
acpi_ut_find_allocation (
|
||
|
u32 list_id,
|
||
|
void *allocation)
|
||
|
{
|
||
|
struct acpi_debug_mem_block *element;
|
||
|
|
||
|
|
||
|
ACPI_FUNCTION_ENTRY ();
|
||
|
|
||
|
|
||
|
if (list_id > ACPI_MEM_LIST_MAX) {
|
||
|
return (NULL);
|
||
|
}
|
||
|
|
||
|
element = acpi_gbl_memory_lists[list_id].list_head;
|
||
|
|
||
|
/* Search for the address. */
|
||
|
|
||
|
while (element) {
|
||
|
if (element == allocation) {
|
||
|
return (element);
|
||
|
}
|
||
|
|
||
|
element = element->next;
|
||
|
}
|
||
|
|
||
|
return (NULL);
|
||
|
}
|
||
|
|
||
|
|
||
|
/*******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_track_allocation
|
||
|
*
|
||
|
* PARAMETERS: list_id - Memory list to search
|
||
|
* Allocation - Address of allocated memory
|
||
|
* Size - Size of the allocation
|
||
|
* alloc_type - MEM_MALLOC or MEM_CALLOC
|
||
|
* Component - Component type of caller
|
||
|
* Module - Source file name of caller
|
||
|
* Line - Line number of caller
|
||
|
*
|
||
|
* RETURN: None.
|
||
|
*
|
||
|
* DESCRIPTION: Inserts an element into the global allocation tracking list.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
acpi_status
|
||
|
acpi_ut_track_allocation (
|
||
|
u32 list_id,
|
||
|
struct acpi_debug_mem_block *allocation,
|
||
|
acpi_size size,
|
||
|
u8 alloc_type,
|
||
|
u32 component,
|
||
|
char *module,
|
||
|
u32 line)
|
||
|
{
|
||
|
struct acpi_memory_list *mem_list;
|
||
|
struct acpi_debug_mem_block *element;
|
||
|
acpi_status status = AE_OK;
|
||
|
|
||
|
|
||
|
ACPI_FUNCTION_TRACE_PTR ("ut_track_allocation", allocation);
|
||
|
|
||
|
|
||
|
if (list_id > ACPI_MEM_LIST_MAX) {
|
||
|
return_ACPI_STATUS (AE_BAD_PARAMETER);
|
||
|
}
|
||
|
|
||
|
mem_list = &acpi_gbl_memory_lists[list_id];
|
||
|
status = acpi_ut_acquire_mutex (ACPI_MTX_MEMORY);
|
||
|
if (ACPI_FAILURE (status)) {
|
||
|
return_ACPI_STATUS (status);
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Search list for this address to make sure it is not already on the list.
|
||
|
* This will catch several kinds of problems.
|
||
|
*/
|
||
|
|
||
|
element = acpi_ut_find_allocation (list_id, allocation);
|
||
|
if (element) {
|
||
|
ACPI_REPORT_ERROR (("ut_track_allocation: Allocation already present in list! (%p)\n",
|
||
|
allocation));
|
||
|
|
||
|
ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, "Element %p Address %p\n", element, allocation));
|
||
|
|
||
|
goto unlock_and_exit;
|
||
|
}
|
||
|
|
||
|
/* Fill in the instance data. */
|
||
|
|
||
|
allocation->size = (u32) size;
|
||
|
allocation->alloc_type = alloc_type;
|
||
|
allocation->component = component;
|
||
|
allocation->line = line;
|
||
|
|
||
|
ACPI_STRNCPY (allocation->module, module, ACPI_MAX_MODULE_NAME);
|
||
|
allocation->module[ACPI_MAX_MODULE_NAME-1] = 0;
|
||
|
|
||
|
/* Insert at list head */
|
||
|
|
||
|
if (mem_list->list_head) {
|
||
|
((struct acpi_debug_mem_block *)(mem_list->list_head))->previous = allocation;
|
||
|
}
|
||
|
|
||
|
allocation->next = mem_list->list_head;
|
||
|
allocation->previous = NULL;
|
||
|
|
||
|
mem_list->list_head = allocation;
|
||
|
|
||
|
|
||
|
unlock_and_exit:
|
||
|
status = acpi_ut_release_mutex (ACPI_MTX_MEMORY);
|
||
|
return_ACPI_STATUS (status);
|
||
|
}
|
||
|
|
||
|
|
||
|
/*******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_remove_allocation
|
||
|
*
|
||
|
* PARAMETERS: list_id - Memory list to search
|
||
|
* Allocation - Address of allocated memory
|
||
|
* Component - Component type of caller
|
||
|
* Module - Source file name of caller
|
||
|
* Line - Line number of caller
|
||
|
*
|
||
|
* RETURN:
|
||
|
*
|
||
|
* DESCRIPTION: Deletes an element from the global allocation tracking list.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
acpi_status
|
||
|
acpi_ut_remove_allocation (
|
||
|
u32 list_id,
|
||
|
struct acpi_debug_mem_block *allocation,
|
||
|
u32 component,
|
||
|
char *module,
|
||
|
u32 line)
|
||
|
{
|
||
|
struct acpi_memory_list *mem_list;
|
||
|
acpi_status status;
|
||
|
|
||
|
|
||
|
ACPI_FUNCTION_TRACE ("ut_remove_allocation");
|
||
|
|
||
|
|
||
|
if (list_id > ACPI_MEM_LIST_MAX) {
|
||
|
return_ACPI_STATUS (AE_BAD_PARAMETER);
|
||
|
}
|
||
|
|
||
|
mem_list = &acpi_gbl_memory_lists[list_id];
|
||
|
if (NULL == mem_list->list_head) {
|
||
|
/* No allocations! */
|
||
|
|
||
|
_ACPI_REPORT_ERROR (module, line, component,
|
||
|
("ut_remove_allocation: Empty allocation list, nothing to free!\n"));
|
||
|
|
||
|
return_ACPI_STATUS (AE_OK);
|
||
|
}
|
||
|
|
||
|
status = acpi_ut_acquire_mutex (ACPI_MTX_MEMORY);
|
||
|
if (ACPI_FAILURE (status)) {
|
||
|
return_ACPI_STATUS (status);
|
||
|
}
|
||
|
|
||
|
/* Unlink */
|
||
|
|
||
|
if (allocation->previous) {
|
||
|
(allocation->previous)->next = allocation->next;
|
||
|
}
|
||
|
else {
|
||
|
mem_list->list_head = allocation->next;
|
||
|
}
|
||
|
|
||
|
if (allocation->next) {
|
||
|
(allocation->next)->previous = allocation->previous;
|
||
|
}
|
||
|
|
||
|
/* Mark the segment as deleted */
|
||
|
|
||
|
ACPI_MEMSET (&allocation->user_space, 0xEA, allocation->size);
|
||
|
|
||
|
ACPI_DEBUG_PRINT ((ACPI_DB_ALLOCATIONS, "Freeing size 0%X\n", allocation->size));
|
||
|
|
||
|
status = acpi_ut_release_mutex (ACPI_MTX_MEMORY);
|
||
|
return_ACPI_STATUS (status);
|
||
|
}
|
||
|
|
||
|
|
||
|
/*******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_dump_allocation_info
|
||
|
*
|
||
|
* PARAMETERS:
|
||
|
*
|
||
|
* RETURN: None
|
||
|
*
|
||
|
* DESCRIPTION: Print some info about the outstanding allocations.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
#ifdef ACPI_FUTURE_USAGE
|
||
|
void
|
||
|
acpi_ut_dump_allocation_info (
|
||
|
void)
|
||
|
{
|
||
|
/*
|
||
|
struct acpi_memory_list *mem_list;
|
||
|
*/
|
||
|
|
||
|
ACPI_FUNCTION_TRACE ("ut_dump_allocation_info");
|
||
|
|
||
|
/*
|
||
|
ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES,
|
||
|
("%30s: %4d (%3d Kb)\n", "Current allocations",
|
||
|
mem_list->current_count,
|
||
|
ROUND_UP_TO_1K (mem_list->current_size)));
|
||
|
|
||
|
ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES,
|
||
|
("%30s: %4d (%3d Kb)\n", "Max concurrent allocations",
|
||
|
mem_list->max_concurrent_count,
|
||
|
ROUND_UP_TO_1K (mem_list->max_concurrent_size)));
|
||
|
|
||
|
|
||
|
ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES,
|
||
|
("%30s: %4d (%3d Kb)\n", "Total (all) internal objects",
|
||
|
running_object_count,
|
||
|
ROUND_UP_TO_1K (running_object_size)));
|
||
|
|
||
|
ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES,
|
||
|
("%30s: %4d (%3d Kb)\n", "Total (all) allocations",
|
||
|
running_alloc_count,
|
||
|
ROUND_UP_TO_1K (running_alloc_size)));
|
||
|
|
||
|
|
||
|
ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES,
|
||
|
("%30s: %4d (%3d Kb)\n", "Current Nodes",
|
||
|
acpi_gbl_current_node_count,
|
||
|
ROUND_UP_TO_1K (acpi_gbl_current_node_size)));
|
||
|
|
||
|
ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES,
|
||
|
("%30s: %4d (%3d Kb)\n", "Max Nodes",
|
||
|
acpi_gbl_max_concurrent_node_count,
|
||
|
ROUND_UP_TO_1K ((acpi_gbl_max_concurrent_node_count * sizeof (struct acpi_namespace_node)))));
|
||
|
*/
|
||
|
return_VOID;
|
||
|
}
|
||
|
#endif /* ACPI_FUTURE_USAGE */
|
||
|
|
||
|
|
||
|
/*******************************************************************************
|
||
|
*
|
||
|
* FUNCTION: acpi_ut_dump_allocations
|
||
|
*
|
||
|
* PARAMETERS: Component - Component(s) to dump info for.
|
||
|
* Module - Module to dump info for. NULL means all.
|
||
|
*
|
||
|
* RETURN: None
|
||
|
*
|
||
|
* DESCRIPTION: Print a list of all outstanding allocations.
|
||
|
*
|
||
|
******************************************************************************/
|
||
|
|
||
|
void
|
||
|
acpi_ut_dump_allocations (
|
||
|
u32 component,
|
||
|
char *module)
|
||
|
{
|
||
|
struct acpi_debug_mem_block *element;
|
||
|
union acpi_descriptor *descriptor;
|
||
|
u32 num_outstanding = 0;
|
||
|
|
||
|
|
||
|
ACPI_FUNCTION_TRACE ("ut_dump_allocations");
|
||
|
|
||
|
|
||
|
/*
|
||
|
* Walk the allocation list.
|
||
|
*/
|
||
|
if (ACPI_FAILURE (acpi_ut_acquire_mutex (ACPI_MTX_MEMORY))) {
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
element = acpi_gbl_memory_lists[0].list_head;
|
||
|
while (element) {
|
||
|
if ((element->component & component) &&
|
||
|
((module == NULL) || (0 == ACPI_STRCMP (module, element->module)))) {
|
||
|
/* Ignore allocated objects that are in a cache */
|
||
|
|
||
|
descriptor = ACPI_CAST_PTR (union acpi_descriptor, &element->user_space);
|
||
|
if (descriptor->descriptor_id != ACPI_DESC_TYPE_CACHED) {
|
||
|
acpi_os_printf ("%p Len %04X %9.9s-%d [%s] ",
|
||
|
descriptor, element->size, element->module,
|
||
|
element->line, acpi_ut_get_descriptor_name (descriptor));
|
||
|
|
||
|
/* Most of the elements will be Operand objects. */
|
||
|
|
||
|
switch (ACPI_GET_DESCRIPTOR_TYPE (descriptor)) {
|
||
|
case ACPI_DESC_TYPE_OPERAND:
|
||
|
acpi_os_printf ("%12.12s R%hd",
|
||
|
acpi_ut_get_type_name (descriptor->object.common.type),
|
||
|
descriptor->object.common.reference_count);
|
||
|
break;
|
||
|
|
||
|
case ACPI_DESC_TYPE_PARSER:
|
||
|
acpi_os_printf ("aml_opcode %04hX",
|
||
|
descriptor->op.asl.aml_opcode);
|
||
|
break;
|
||
|
|
||
|
case ACPI_DESC_TYPE_NAMED:
|
||
|
acpi_os_printf ("%4.4s",
|
||
|
acpi_ut_get_node_name (&descriptor->node));
|
||
|
break;
|
||
|
|
||
|
default:
|
||
|
break;
|
||
|
}
|
||
|
|
||
|
acpi_os_printf ( "\n");
|
||
|
num_outstanding++;
|
||
|
}
|
||
|
}
|
||
|
element = element->next;
|
||
|
}
|
||
|
|
||
|
(void) acpi_ut_release_mutex (ACPI_MTX_MEMORY);
|
||
|
|
||
|
/* Print summary */
|
||
|
|
||
|
if (!num_outstanding) {
|
||
|
ACPI_DEBUG_PRINT ((ACPI_DB_ERROR,
|
||
|
"No outstanding allocations.\n"));
|
||
|
}
|
||
|
else {
|
||
|
ACPI_DEBUG_PRINT ((ACPI_DB_ERROR,
|
||
|
"%d(%X) Outstanding allocations\n",
|
||
|
num_outstanding, num_outstanding));
|
||
|
}
|
||
|
|
||
|
return_VOID;
|
||
|
}
|
||
|
|
||
|
|
||
|
#endif /* #ifdef ACPI_DBG_TRACK_ALLOCATIONS */
|
||
|
|