1 /******************************************************************************
3 * Module Name: uttrack - Memory allocation tracking routines (debug only)
5 *****************************************************************************/
8 * Copyright (C) 2000 - 2016, Intel Corp.
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions, and the following disclaimer,
16 * without modification.
17 * 2. Redistributions in binary form must reproduce at minimum a disclaimer
18 * substantially similar to the "NO WARRANTY" disclaimer below
19 * ("Disclaimer") and any redistribution must be conditioned upon
20 * including a substantially similar Disclaimer requirement for further
21 * binary redistribution.
22 * 3. Neither the names of the above-listed copyright holders nor the names
23 * of any contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
26 * Alternatively, this software may be distributed under the terms of the
27 * GNU General Public License ("GPL") version 2 as published by the Free
28 * Software Foundation.
31 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
32 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
33 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
34 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
35 * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
36 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
37 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
38 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
39 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
40 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
41 * POSSIBILITY OF SUCH DAMAGES.
45 * These procedures are used for tracking memory leaks in the subsystem, and
46 * they get compiled out when the ACPI_DBG_TRACK_ALLOCATIONS is not set.
48 * Each memory allocation is tracked via a doubly linked list. Each
49 * element contains the caller's component, module name, function name, and
50 * line number. acpi_ut_allocate and acpi_ut_allocate_zeroed call
51 * acpi_ut_track_allocation to add an element to the list; deletion
52 * occurs in the body of acpi_ut_free.
55 #include <acpi/acpi.h>
58 #ifdef ACPI_DBG_TRACK_ALLOCATIONS
60 #define _COMPONENT ACPI_UTILITIES
61 ACPI_MODULE_NAME("uttrack")
63 /* Local prototypes */
64 static struct acpi_debug_mem_block
*acpi_ut_find_allocation(struct
69 acpi_ut_track_allocation(struct acpi_debug_mem_block
*address
,
72 u32 component
, const char *module
, u32 line
);
75 acpi_ut_remove_allocation(struct acpi_debug_mem_block
*address
,
76 u32 component
, const char *module
, u32 line
);
78 /*******************************************************************************
80 * FUNCTION: acpi_ut_create_list
82 * PARAMETERS: cache_name - Ascii name for the cache
83 * object_size - Size of each cached object
84 * return_cache - Where the new cache object is returned
88 * DESCRIPTION: Create a local memory list for tracking purposed
90 ******************************************************************************/
93 acpi_ut_create_list(const char *list_name
,
94 u16 object_size
, struct acpi_memory_list
**return_cache
)
96 struct acpi_memory_list
*cache
;
98 cache
= acpi_os_allocate_zeroed(sizeof(struct acpi_memory_list
));
100 return (AE_NO_MEMORY
);
103 cache
->list_name
= list_name
;
104 cache
->object_size
= object_size
;
106 *return_cache
= cache
;
110 /*******************************************************************************
112 * FUNCTION: acpi_ut_allocate_and_track
114 * PARAMETERS: size - Size of the allocation
115 * component - Component type of caller
116 * module - Source file name of caller
117 * line - Line number of caller
119 * RETURN: Address of the allocated memory on success, NULL on failure.
121 * DESCRIPTION: The subsystem's equivalent of malloc.
123 ******************************************************************************/
125 void *acpi_ut_allocate_and_track(acpi_size size
,
126 u32 component
, const char *module
, u32 line
)
128 struct acpi_debug_mem_block
*allocation
;
131 /* Check for an inadvertent size of zero bytes */
134 ACPI_WARNING((module
, line
,
135 "Attempt to allocate zero bytes, allocating 1 byte"));
140 acpi_os_allocate(size
+ sizeof(struct acpi_debug_mem_header
));
143 /* Report allocation error */
145 ACPI_WARNING((module
, line
,
146 "Could not allocate size %u", (u32
)size
));
152 acpi_ut_track_allocation(allocation
, size
, ACPI_MEM_MALLOC
,
153 component
, module
, line
);
154 if (ACPI_FAILURE(status
)) {
155 acpi_os_free(allocation
);
159 acpi_gbl_global_list
->total_allocated
++;
160 acpi_gbl_global_list
->total_size
+= (u32
)size
;
161 acpi_gbl_global_list
->current_total_size
+= (u32
)size
;
163 if (acpi_gbl_global_list
->current_total_size
>
164 acpi_gbl_global_list
->max_occupied
) {
165 acpi_gbl_global_list
->max_occupied
=
166 acpi_gbl_global_list
->current_total_size
;
169 return ((void *)&allocation
->user_space
);
172 /*******************************************************************************
174 * FUNCTION: acpi_ut_allocate_zeroed_and_track
176 * PARAMETERS: size - Size of the allocation
177 * component - Component type of caller
178 * module - Source file name of caller
179 * line - Line number of caller
181 * RETURN: Address of the allocated memory on success, NULL on failure.
183 * DESCRIPTION: Subsystem equivalent of calloc.
185 ******************************************************************************/
187 void *acpi_ut_allocate_zeroed_and_track(acpi_size size
,
189 const char *module
, u32 line
)
191 struct acpi_debug_mem_block
*allocation
;
194 /* Check for an inadvertent size of zero bytes */
197 ACPI_WARNING((module
, line
,
198 "Attempt to allocate zero bytes, allocating 1 byte"));
203 acpi_os_allocate_zeroed(size
+
204 sizeof(struct acpi_debug_mem_header
));
207 /* Report allocation error */
209 ACPI_ERROR((module
, line
,
210 "Could not allocate size %u", (u32
)size
));
214 status
= acpi_ut_track_allocation(allocation
, size
,
215 ACPI_MEM_CALLOC
, component
, module
,
217 if (ACPI_FAILURE(status
)) {
218 acpi_os_free(allocation
);
222 acpi_gbl_global_list
->total_allocated
++;
223 acpi_gbl_global_list
->total_size
+= (u32
)size
;
224 acpi_gbl_global_list
->current_total_size
+= (u32
)size
;
226 if (acpi_gbl_global_list
->current_total_size
>
227 acpi_gbl_global_list
->max_occupied
) {
228 acpi_gbl_global_list
->max_occupied
=
229 acpi_gbl_global_list
->current_total_size
;
232 return ((void *)&allocation
->user_space
);
235 /*******************************************************************************
237 * FUNCTION: acpi_ut_free_and_track
239 * PARAMETERS: allocation - Address of the memory to deallocate
240 * component - Component type of caller
241 * module - Source file name of caller
242 * line - Line number of caller
246 * DESCRIPTION: Frees the memory at Allocation
248 ******************************************************************************/
251 acpi_ut_free_and_track(void *allocation
,
252 u32 component
, const char *module
, u32 line
)
254 struct acpi_debug_mem_block
*debug_block
;
257 ACPI_FUNCTION_TRACE_PTR(ut_free
, allocation
);
259 if (NULL
== allocation
) {
260 ACPI_ERROR((module
, line
, "Attempt to delete a NULL address"));
265 debug_block
= ACPI_CAST_PTR(struct acpi_debug_mem_block
,
266 (((char *)allocation
) -
267 sizeof(struct acpi_debug_mem_header
)));
269 acpi_gbl_global_list
->total_freed
++;
270 acpi_gbl_global_list
->current_total_size
-= debug_block
->size
;
273 acpi_ut_remove_allocation(debug_block
, component
, module
, line
);
274 if (ACPI_FAILURE(status
)) {
275 ACPI_EXCEPTION((AE_INFO
, status
, "Could not free memory"));
278 acpi_os_free(debug_block
);
279 ACPI_DEBUG_PRINT((ACPI_DB_ALLOCATIONS
, "%p freed (block %p)\n",
280 allocation
, debug_block
));
284 /*******************************************************************************
286 * FUNCTION: acpi_ut_find_allocation
288 * PARAMETERS: allocation - Address of allocated memory
290 * RETURN: Three cases:
291 * 1) List is empty, NULL is returned.
292 * 2) Element was found. Returns Allocation parameter.
293 * 3) Element was not found. Returns position where it should be
294 * inserted into the list.
296 * DESCRIPTION: Searches for an element in the global allocation tracking list.
297 * If the element is not found, returns the location within the
298 * list where the element should be inserted.
300 * Note: The list is ordered by larger-to-smaller addresses.
302 * This global list is used to detect memory leaks in ACPICA as
303 * well as other issues such as an attempt to release the same
304 * internal object more than once. Although expensive as far
305 * as cpu time, this list is much more helpful for finding these
306 * types of issues than using memory leak detectors outside of
309 ******************************************************************************/
311 static struct acpi_debug_mem_block
*acpi_ut_find_allocation(struct
315 struct acpi_debug_mem_block
*element
;
317 element
= acpi_gbl_global_list
->list_head
;
323 * Search for the address.
325 * Note: List is ordered by larger-to-smaller addresses, on the
326 * assumption that a new allocation usually has a larger address
327 * than previous allocations.
329 while (element
> allocation
) {
331 /* Check for end-of-list */
333 if (!element
->next
) {
337 element
= element
->next
;
340 if (element
== allocation
) {
344 return (element
->previous
);
347 /*******************************************************************************
349 * FUNCTION: acpi_ut_track_allocation
351 * PARAMETERS: allocation - Address of allocated memory
352 * size - Size of the allocation
353 * alloc_type - MEM_MALLOC or MEM_CALLOC
354 * component - Component type of caller
355 * module - Source file name of caller
356 * line - Line number of caller
360 * DESCRIPTION: Inserts an element into the global allocation tracking list.
362 ******************************************************************************/
365 acpi_ut_track_allocation(struct acpi_debug_mem_block
*allocation
,
368 u32 component
, const char *module
, u32 line
)
370 struct acpi_memory_list
*mem_list
;
371 struct acpi_debug_mem_block
*element
;
372 acpi_status status
= AE_OK
;
374 ACPI_FUNCTION_TRACE_PTR(ut_track_allocation
, allocation
);
376 if (acpi_gbl_disable_mem_tracking
) {
377 return_ACPI_STATUS(AE_OK
);
380 mem_list
= acpi_gbl_global_list
;
381 status
= acpi_ut_acquire_mutex(ACPI_MTX_MEMORY
);
382 if (ACPI_FAILURE(status
)) {
383 return_ACPI_STATUS(status
);
387 * Search the global list for this address to make sure it is not
388 * already present. This will catch several kinds of problems.
390 element
= acpi_ut_find_allocation(allocation
);
391 if (element
== allocation
) {
393 "UtTrackAllocation: Allocation (%p) already present in global list!",
395 goto unlock_and_exit
;
398 /* Fill in the instance data */
400 allocation
->size
= (u32
)size
;
401 allocation
->alloc_type
= alloc_type
;
402 allocation
->component
= component
;
403 allocation
->line
= line
;
405 strncpy(allocation
->module
, module
, ACPI_MAX_MODULE_NAME
);
406 allocation
->module
[ACPI_MAX_MODULE_NAME
- 1] = 0;
410 /* Insert at list head */
412 if (mem_list
->list_head
) {
413 ((struct acpi_debug_mem_block
*)(mem_list
->list_head
))->
414 previous
= allocation
;
417 allocation
->next
= mem_list
->list_head
;
418 allocation
->previous
= NULL
;
420 mem_list
->list_head
= allocation
;
422 /* Insert after element */
424 allocation
->next
= element
->next
;
425 allocation
->previous
= element
;
428 (element
->next
)->previous
= allocation
;
431 element
->next
= allocation
;
435 status
= acpi_ut_release_mutex(ACPI_MTX_MEMORY
);
436 return_ACPI_STATUS(status
);
439 /*******************************************************************************
441 * FUNCTION: acpi_ut_remove_allocation
443 * PARAMETERS: allocation - Address of allocated memory
444 * component - Component type of caller
445 * module - Source file name of caller
446 * line - Line number of caller
450 * DESCRIPTION: Deletes an element from the global allocation tracking list.
452 ******************************************************************************/
455 acpi_ut_remove_allocation(struct acpi_debug_mem_block
*allocation
,
456 u32 component
, const char *module
, u32 line
)
458 struct acpi_memory_list
*mem_list
;
461 ACPI_FUNCTION_NAME(ut_remove_allocation
);
463 if (acpi_gbl_disable_mem_tracking
) {
467 mem_list
= acpi_gbl_global_list
;
468 if (NULL
== mem_list
->list_head
) {
470 /* No allocations! */
472 ACPI_ERROR((module
, line
,
473 "Empty allocation list, nothing to free!"));
478 status
= acpi_ut_acquire_mutex(ACPI_MTX_MEMORY
);
479 if (ACPI_FAILURE(status
)) {
485 if (allocation
->previous
) {
486 (allocation
->previous
)->next
= allocation
->next
;
488 mem_list
->list_head
= allocation
->next
;
491 if (allocation
->next
) {
492 (allocation
->next
)->previous
= allocation
->previous
;
495 ACPI_DEBUG_PRINT((ACPI_DB_ALLOCATIONS
, "Freeing %p, size 0%X\n",
496 &allocation
->user_space
, allocation
->size
));
498 /* Mark the segment as deleted */
500 memset(&allocation
->user_space
, 0xEA, allocation
->size
);
502 status
= acpi_ut_release_mutex(ACPI_MTX_MEMORY
);
506 /*******************************************************************************
508 * FUNCTION: acpi_ut_dump_allocation_info
514 * DESCRIPTION: Print some info about the outstanding allocations.
516 ******************************************************************************/
518 void acpi_ut_dump_allocation_info(void)
521 struct acpi_memory_list *mem_list;
524 ACPI_FUNCTION_TRACE(ut_dump_allocation_info
);
527 ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES,
528 ("%30s: %4d (%3d Kb)\n", "Current allocations",
529 mem_list->current_count,
530 ROUND_UP_TO_1K (mem_list->current_size)));
532 ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES,
533 ("%30s: %4d (%3d Kb)\n", "Max concurrent allocations",
534 mem_list->max_concurrent_count,
535 ROUND_UP_TO_1K (mem_list->max_concurrent_size)));
537 ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES,
538 ("%30s: %4d (%3d Kb)\n", "Total (all) internal objects",
539 running_object_count,
540 ROUND_UP_TO_1K (running_object_size)));
542 ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES,
543 ("%30s: %4d (%3d Kb)\n", "Total (all) allocations",
545 ROUND_UP_TO_1K (running_alloc_size)));
547 ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES,
548 ("%30s: %4d (%3d Kb)\n", "Current Nodes",
549 acpi_gbl_current_node_count,
550 ROUND_UP_TO_1K (acpi_gbl_current_node_size)));
552 ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES,
553 ("%30s: %4d (%3d Kb)\n", "Max Nodes",
554 acpi_gbl_max_concurrent_node_count,
555 ROUND_UP_TO_1K ((acpi_gbl_max_concurrent_node_count *
556 sizeof (struct acpi_namespace_node)))));
561 /*******************************************************************************
563 * FUNCTION: acpi_ut_dump_allocations
565 * PARAMETERS: component - Component(s) to dump info for.
566 * module - Module to dump info for. NULL means all.
570 * DESCRIPTION: Print a list of all outstanding allocations.
572 ******************************************************************************/
574 void acpi_ut_dump_allocations(u32 component
, const char *module
)
576 struct acpi_debug_mem_block
*element
;
577 union acpi_descriptor
*descriptor
;
578 u32 num_outstanding
= 0;
581 ACPI_FUNCTION_TRACE(ut_dump_allocations
);
583 if (acpi_gbl_disable_mem_tracking
) {
588 * Walk the allocation list.
590 if (ACPI_FAILURE(acpi_ut_acquire_mutex(ACPI_MTX_MEMORY
))) {
594 element
= acpi_gbl_global_list
->list_head
;
596 if ((element
->component
& component
) &&
598 || (0 == strcmp(module
, element
->module
)))) {
600 ACPI_CAST_PTR(union acpi_descriptor
,
601 &element
->user_space
);
604 sizeof(struct acpi_common_descriptor
)) {
605 acpi_os_printf("%p Length 0x%04X %9.9s-%u "
606 "[Not a Descriptor - too small]\n",
607 descriptor
, element
->size
,
608 element
->module
, element
->line
);
610 /* Ignore allocated objects that are in a cache */
612 if (ACPI_GET_DESCRIPTOR_TYPE(descriptor
) !=
613 ACPI_DESC_TYPE_CACHED
) {
615 ("%p Length 0x%04X %9.9s-%u [%s] ",
616 descriptor
, element
->size
,
617 element
->module
, element
->line
,
618 acpi_ut_get_descriptor_name
621 /* Validate the descriptor type using Type field and length */
623 descriptor_type
= 0; /* Not a valid descriptor type */
625 switch (ACPI_GET_DESCRIPTOR_TYPE
627 case ACPI_DESC_TYPE_OPERAND
:
631 acpi_operand_object
))
634 ACPI_DESC_TYPE_OPERAND
;
638 case ACPI_DESC_TYPE_PARSER
:
642 acpi_parse_object
)) {
644 ACPI_DESC_TYPE_PARSER
;
648 case ACPI_DESC_TYPE_NAMED
:
652 acpi_namespace_node
))
655 ACPI_DESC_TYPE_NAMED
;
664 /* Display additional info for the major descriptor types */
666 switch (descriptor_type
) {
667 case ACPI_DESC_TYPE_OPERAND
:
670 ("%12.12s RefCount 0x%04X\n",
671 acpi_ut_get_type_name
672 (descriptor
->object
.common
.
674 descriptor
->object
.common
.
678 case ACPI_DESC_TYPE_PARSER
:
681 ("AmlOpcode 0x%04hX\n",
686 case ACPI_DESC_TYPE_NAMED
:
688 acpi_os_printf("%4.4s\n",
689 acpi_ut_get_node_name
696 acpi_os_printf("\n");
705 element
= element
->next
;
708 (void)acpi_ut_release_mutex(ACPI_MTX_MEMORY
);
712 if (!num_outstanding
) {
713 ACPI_INFO(("No outstanding allocations"));
715 ACPI_ERROR((AE_INFO
, "%u(0x%X) Outstanding allocations",
716 num_outstanding
, num_outstanding
));
722 #endif /* ACPI_DBG_TRACK_ALLOCATIONS */