Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /****************************************************************************** |
2 | * | |
3 | * Module Name: utalloc - local cache and memory allocation routines | |
4 | * | |
5 | *****************************************************************************/ | |
6 | ||
7 | /* | |
8 | * Copyright (C) 2000 - 2005, R. Byron Moore | |
9 | * All rights reserved. | |
10 | * | |
11 | * Redistribution and use in source and binary forms, with or without | |
12 | * modification, are permitted provided that the following conditions | |
13 | * are met: | |
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. | |
25 | * | |
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. | |
29 | * | |
30 | * NO WARRANTY | |
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. | |
42 | */ | |
43 | ||
44 | ||
45 | #include <acpi/acpi.h> | |
46 | ||
47 | #define _COMPONENT ACPI_UTILITIES | |
48 | ACPI_MODULE_NAME ("utalloc") | |
49 | ||
50 | ||
51 | /****************************************************************************** | |
52 | * | |
53 | * FUNCTION: acpi_ut_release_to_cache | |
54 | * | |
55 | * PARAMETERS: list_id - Memory list/cache ID | |
56 | * Object - The object to be released | |
57 | * | |
58 | * RETURN: None | |
59 | * | |
60 | * DESCRIPTION: Release an object to the specified cache. If cache is full, | |
61 | * the object is deleted. | |
62 | * | |
63 | ******************************************************************************/ | |
64 | ||
65 | void | |
66 | acpi_ut_release_to_cache ( | |
67 | u32 list_id, | |
68 | void *object) | |
69 | { | |
70 | struct acpi_memory_list *cache_info; | |
71 | ||
72 | ||
73 | ACPI_FUNCTION_ENTRY (); | |
74 | ||
75 | ||
76 | cache_info = &acpi_gbl_memory_lists[list_id]; | |
77 | ||
78 | #ifdef ACPI_ENABLE_OBJECT_CACHE | |
79 | ||
80 | /* If walk cache is full, just free this wallkstate object */ | |
81 | ||
82 | if (cache_info->cache_depth >= cache_info->max_cache_depth) { | |
83 | ACPI_MEM_FREE (object); | |
84 | ACPI_MEM_TRACKING (cache_info->total_freed++); | |
85 | } | |
86 | ||
87 | /* Otherwise put this object back into the cache */ | |
88 | ||
89 | else { | |
90 | if (ACPI_FAILURE (acpi_ut_acquire_mutex (ACPI_MTX_CACHES))) { | |
91 | return; | |
92 | } | |
93 | ||
94 | /* Mark the object as cached */ | |
95 | ||
96 | ACPI_MEMSET (object, 0xCA, cache_info->object_size); | |
97 | ACPI_SET_DESCRIPTOR_TYPE (object, ACPI_DESC_TYPE_CACHED); | |
98 | ||
99 | /* Put the object at the head of the cache list */ | |
100 | ||
101 | * (ACPI_CAST_INDIRECT_PTR (char, &(((char *) object)[cache_info->link_offset]))) = cache_info->list_head; | |
102 | cache_info->list_head = object; | |
103 | cache_info->cache_depth++; | |
104 | ||
105 | (void) acpi_ut_release_mutex (ACPI_MTX_CACHES); | |
106 | } | |
107 | ||
108 | #else | |
109 | ||
110 | /* Object cache is disabled; just free the object */ | |
111 | ||
112 | ACPI_MEM_FREE (object); | |
113 | ACPI_MEM_TRACKING (cache_info->total_freed++); | |
114 | #endif | |
115 | } | |
116 | ||
117 | ||
118 | /****************************************************************************** | |
119 | * | |
120 | * FUNCTION: acpi_ut_acquire_from_cache | |
121 | * | |
122 | * PARAMETERS: list_id - Memory list ID | |
123 | * | |
124 | * RETURN: A requested object. NULL if the object could not be | |
125 | * allocated. | |
126 | * | |
127 | * DESCRIPTION: Get an object from the specified cache. If cache is empty, | |
128 | * the object is allocated. | |
129 | * | |
130 | ******************************************************************************/ | |
131 | ||
132 | void * | |
133 | acpi_ut_acquire_from_cache ( | |
134 | u32 list_id) | |
135 | { | |
136 | struct acpi_memory_list *cache_info; | |
137 | void *object; | |
138 | ||
139 | ||
140 | ACPI_FUNCTION_NAME ("ut_acquire_from_cache"); | |
141 | ||
142 | ||
143 | cache_info = &acpi_gbl_memory_lists[list_id]; | |
144 | ||
145 | #ifdef ACPI_ENABLE_OBJECT_CACHE | |
146 | ||
147 | if (ACPI_FAILURE (acpi_ut_acquire_mutex (ACPI_MTX_CACHES))) { | |
148 | return (NULL); | |
149 | } | |
150 | ||
151 | ACPI_MEM_TRACKING (cache_info->cache_requests++); | |
152 | ||
153 | /* Check the cache first */ | |
154 | ||
155 | if (cache_info->list_head) { | |
156 | /* There is an object available, use it */ | |
157 | ||
158 | object = cache_info->list_head; | |
159 | cache_info->list_head = *(ACPI_CAST_INDIRECT_PTR (char, &(((char *) object)[cache_info->link_offset]))); | |
160 | ||
161 | ACPI_MEM_TRACKING (cache_info->cache_hits++); | |
162 | cache_info->cache_depth--; | |
163 | ||
164 | #ifdef ACPI_DBG_TRACK_ALLOCATIONS | |
165 | ACPI_DEBUG_PRINT ((ACPI_DB_EXEC, "Object %p from %s\n", | |
166 | object, acpi_gbl_memory_lists[list_id].list_name)); | |
167 | #endif | |
168 | ||
169 | if (ACPI_FAILURE (acpi_ut_release_mutex (ACPI_MTX_CACHES))) { | |
170 | return (NULL); | |
171 | } | |
172 | ||
173 | /* Clear (zero) the previously used Object */ | |
174 | ||
175 | ACPI_MEMSET (object, 0, cache_info->object_size); | |
176 | } | |
177 | ||
178 | else { | |
179 | /* The cache is empty, create a new object */ | |
180 | ||
181 | /* Avoid deadlock with ACPI_MEM_CALLOCATE */ | |
182 | ||
183 | if (ACPI_FAILURE (acpi_ut_release_mutex (ACPI_MTX_CACHES))) { | |
184 | return (NULL); | |
185 | } | |
186 | ||
187 | object = ACPI_MEM_CALLOCATE (cache_info->object_size); | |
188 | ACPI_MEM_TRACKING (cache_info->total_allocated++); | |
189 | } | |
190 | ||
191 | #else | |
192 | ||
193 | /* Object cache is disabled; just allocate the object */ | |
194 | ||
195 | object = ACPI_MEM_CALLOCATE (cache_info->object_size); | |
196 | ACPI_MEM_TRACKING (cache_info->total_allocated++); | |
197 | #endif | |
198 | ||
199 | return (object); | |
200 | } | |
201 | ||
202 | ||
203 | #ifdef ACPI_ENABLE_OBJECT_CACHE | |
204 | /****************************************************************************** | |
205 | * | |
206 | * FUNCTION: acpi_ut_delete_generic_cache | |
207 | * | |
208 | * PARAMETERS: list_id - Memory list ID | |
209 | * | |
210 | * RETURN: None | |
211 | * | |
212 | * DESCRIPTION: Free all objects within the requested cache. | |
213 | * | |
214 | ******************************************************************************/ | |
215 | ||
216 | void | |
217 | acpi_ut_delete_generic_cache ( | |
218 | u32 list_id) | |
219 | { | |
220 | struct acpi_memory_list *cache_info; | |
221 | char *next; | |
222 | ||
223 | ||
224 | ACPI_FUNCTION_ENTRY (); | |
225 | ||
226 | ||
227 | cache_info = &acpi_gbl_memory_lists[list_id]; | |
228 | while (cache_info->list_head) { | |
229 | /* Delete one cached state object */ | |
230 | ||
231 | next = *(ACPI_CAST_INDIRECT_PTR (char, &(((char *) cache_info->list_head)[cache_info->link_offset]))); | |
232 | ACPI_MEM_FREE (cache_info->list_head); | |
233 | ||
234 | cache_info->list_head = next; | |
235 | cache_info->cache_depth--; | |
236 | } | |
237 | } | |
238 | #endif | |
239 | ||
240 | ||
241 | /******************************************************************************* | |
242 | * | |
243 | * FUNCTION: acpi_ut_validate_buffer | |
244 | * | |
245 | * PARAMETERS: Buffer - Buffer descriptor to be validated | |
246 | * | |
247 | * RETURN: Status | |
248 | * | |
249 | * DESCRIPTION: Perform parameter validation checks on an struct acpi_buffer | |
250 | * | |
251 | ******************************************************************************/ | |
252 | ||
253 | acpi_status | |
254 | acpi_ut_validate_buffer ( | |
255 | struct acpi_buffer *buffer) | |
256 | { | |
257 | ||
258 | /* Obviously, the structure pointer must be valid */ | |
259 | ||
260 | if (!buffer) { | |
261 | return (AE_BAD_PARAMETER); | |
262 | } | |
263 | ||
264 | /* Special semantics for the length */ | |
265 | ||
266 | if ((buffer->length == ACPI_NO_BUFFER) || | |
267 | (buffer->length == ACPI_ALLOCATE_BUFFER) || | |
268 | (buffer->length == ACPI_ALLOCATE_LOCAL_BUFFER)) { | |
269 | return (AE_OK); | |
270 | } | |
271 | ||
272 | /* Length is valid, the buffer pointer must be also */ | |
273 | ||
274 | if (!buffer->pointer) { | |
275 | return (AE_BAD_PARAMETER); | |
276 | } | |
277 | ||
278 | return (AE_OK); | |
279 | } | |
280 | ||
281 | ||
282 | /******************************************************************************* | |
283 | * | |
284 | * FUNCTION: acpi_ut_initialize_buffer | |
285 | * | |
286 | * PARAMETERS: Buffer - Buffer to be validated | |
287 | * required_length - Length needed | |
288 | * | |
289 | * RETURN: Status | |
290 | * | |
291 | * DESCRIPTION: Validate that the buffer is of the required length or | |
292 | * allocate a new buffer. Returned buffer is always zeroed. | |
293 | * | |
294 | ******************************************************************************/ | |
295 | ||
296 | acpi_status | |
297 | acpi_ut_initialize_buffer ( | |
298 | struct acpi_buffer *buffer, | |
299 | acpi_size required_length) | |
300 | { | |
301 | acpi_status status = AE_OK; | |
302 | ||
303 | ||
304 | switch (buffer->length) { | |
305 | case ACPI_NO_BUFFER: | |
306 | ||
307 | /* Set the exception and returned the required length */ | |
308 | ||
309 | status = AE_BUFFER_OVERFLOW; | |
310 | break; | |
311 | ||
312 | ||
313 | case ACPI_ALLOCATE_BUFFER: | |
314 | ||
315 | /* Allocate a new buffer */ | |
316 | ||
317 | buffer->pointer = acpi_os_allocate (required_length); | |
318 | if (!buffer->pointer) { | |
319 | return (AE_NO_MEMORY); | |
320 | } | |
321 | ||
322 | /* Clear the buffer */ | |
323 | ||
324 | ACPI_MEMSET (buffer->pointer, 0, required_length); | |
325 | break; | |
326 | ||
327 | ||
328 | case ACPI_ALLOCATE_LOCAL_BUFFER: | |
329 | ||
330 | /* Allocate a new buffer with local interface to allow tracking */ | |
331 | ||
332 | buffer->pointer = ACPI_MEM_CALLOCATE (required_length); | |
333 | if (!buffer->pointer) { | |
334 | return (AE_NO_MEMORY); | |
335 | } | |
336 | break; | |
337 | ||
338 | ||
339 | default: | |
340 | ||
341 | /* Existing buffer: Validate the size of the buffer */ | |
342 | ||
343 | if (buffer->length < required_length) { | |
344 | status = AE_BUFFER_OVERFLOW; | |
345 | break; | |
346 | } | |
347 | ||
348 | /* Clear the buffer */ | |
349 | ||
350 | ACPI_MEMSET (buffer->pointer, 0, required_length); | |
351 | break; | |
352 | } | |
353 | ||
354 | buffer->length = required_length; | |
355 | return (status); | |
356 | } | |
357 | ||
358 | ||
359 | /******************************************************************************* | |
360 | * | |
361 | * FUNCTION: acpi_ut_allocate | |
362 | * | |
363 | * PARAMETERS: Size - Size of the allocation | |
364 | * Component - Component type of caller | |
365 | * Module - Source file name of caller | |
366 | * Line - Line number of caller | |
367 | * | |
368 | * RETURN: Address of the allocated memory on success, NULL on failure. | |
369 | * | |
370 | * DESCRIPTION: The subsystem's equivalent of malloc. | |
371 | * | |
372 | ******************************************************************************/ | |
373 | ||
374 | void * | |
375 | acpi_ut_allocate ( | |
376 | acpi_size size, | |
377 | u32 component, | |
378 | char *module, | |
379 | u32 line) | |
380 | { | |
381 | void *allocation; | |
382 | ||
383 | ||
384 | ACPI_FUNCTION_TRACE_U32 ("ut_allocate", size); | |
385 | ||
386 | ||
387 | /* Check for an inadvertent size of zero bytes */ | |
388 | ||
389 | if (!size) { | |
390 | _ACPI_REPORT_ERROR (module, line, component, | |
391 | ("ut_allocate: Attempt to allocate zero bytes\n")); | |
392 | size = 1; | |
393 | } | |
394 | ||
395 | allocation = acpi_os_allocate (size); | |
396 | if (!allocation) { | |
397 | /* Report allocation error */ | |
398 | ||
399 | _ACPI_REPORT_ERROR (module, line, component, | |
400 | ("ut_allocate: Could not allocate size %X\n", (u32) size)); | |
401 | ||
402 | return_PTR (NULL); | |
403 | } | |
404 | ||
405 | return_PTR (allocation); | |
406 | } | |
407 | ||
408 | ||
409 | /******************************************************************************* | |
410 | * | |
411 | * FUNCTION: acpi_ut_callocate | |
412 | * | |
413 | * PARAMETERS: Size - Size of the allocation | |
414 | * Component - Component type of caller | |
415 | * Module - Source file name of caller | |
416 | * Line - Line number of caller | |
417 | * | |
418 | * RETURN: Address of the allocated memory on success, NULL on failure. | |
419 | * | |
420 | * DESCRIPTION: Subsystem equivalent of calloc. | |
421 | * | |
422 | ******************************************************************************/ | |
423 | ||
424 | void * | |
425 | acpi_ut_callocate ( | |
426 | acpi_size size, | |
427 | u32 component, | |
428 | char *module, | |
429 | u32 line) | |
430 | { | |
431 | void *allocation; | |
432 | ||
433 | ||
434 | ACPI_FUNCTION_TRACE_U32 ("ut_callocate", size); | |
435 | ||
436 | ||
437 | /* Check for an inadvertent size of zero bytes */ | |
438 | ||
439 | if (!size) { | |
440 | _ACPI_REPORT_ERROR (module, line, component, | |
441 | ("ut_callocate: Attempt to allocate zero bytes\n")); | |
442 | return_PTR (NULL); | |
443 | } | |
444 | ||
445 | allocation = acpi_os_allocate (size); | |
446 | if (!allocation) { | |
447 | /* Report allocation error */ | |
448 | ||
449 | _ACPI_REPORT_ERROR (module, line, component, | |
450 | ("ut_callocate: Could not allocate size %X\n", (u32) size)); | |
451 | return_PTR (NULL); | |
452 | } | |
453 | ||
454 | /* Clear the memory block */ | |
455 | ||
456 | ACPI_MEMSET (allocation, 0, size); | |
457 | return_PTR (allocation); | |
458 | } | |
459 | ||
460 | ||
461 | #ifdef ACPI_DBG_TRACK_ALLOCATIONS | |
462 | /* | |
463 | * These procedures are used for tracking memory leaks in the subsystem, and | |
464 | * they get compiled out when the ACPI_DBG_TRACK_ALLOCATIONS is not set. | |
465 | * | |
466 | * Each memory allocation is tracked via a doubly linked list. Each | |
467 | * element contains the caller's component, module name, function name, and | |
468 | * line number. acpi_ut_allocate and acpi_ut_callocate call | |
469 | * acpi_ut_track_allocation to add an element to the list; deletion | |
470 | * occurs in the body of acpi_ut_free. | |
471 | */ | |
472 | ||
473 | ||
474 | /******************************************************************************* | |
475 | * | |
476 | * FUNCTION: acpi_ut_allocate_and_track | |
477 | * | |
478 | * PARAMETERS: Size - Size of the allocation | |
479 | * Component - Component type of caller | |
480 | * Module - Source file name of caller | |
481 | * Line - Line number of caller | |
482 | * | |
483 | * RETURN: Address of the allocated memory on success, NULL on failure. | |
484 | * | |
485 | * DESCRIPTION: The subsystem's equivalent of malloc. | |
486 | * | |
487 | ******************************************************************************/ | |
488 | ||
489 | void * | |
490 | acpi_ut_allocate_and_track ( | |
491 | acpi_size size, | |
492 | u32 component, | |
493 | char *module, | |
494 | u32 line) | |
495 | { | |
496 | struct acpi_debug_mem_block *allocation; | |
497 | acpi_status status; | |
498 | ||
499 | ||
500 | allocation = acpi_ut_allocate (size + sizeof (struct acpi_debug_mem_header), component, | |
501 | module, line); | |
502 | if (!allocation) { | |
503 | return (NULL); | |
504 | } | |
505 | ||
506 | status = acpi_ut_track_allocation (ACPI_MEM_LIST_GLOBAL, allocation, size, | |
507 | ACPI_MEM_MALLOC, component, module, line); | |
508 | if (ACPI_FAILURE (status)) { | |
509 | acpi_os_free (allocation); | |
510 | return (NULL); | |
511 | } | |
512 | ||
513 | acpi_gbl_memory_lists[ACPI_MEM_LIST_GLOBAL].total_allocated++; | |
514 | acpi_gbl_memory_lists[ACPI_MEM_LIST_GLOBAL].current_total_size += (u32) size; | |
515 | ||
516 | return ((void *) &allocation->user_space); | |
517 | } | |
518 | ||
519 | ||
520 | /******************************************************************************* | |
521 | * | |
522 | * FUNCTION: acpi_ut_callocate_and_track | |
523 | * | |
524 | * PARAMETERS: Size - Size of the allocation | |
525 | * Component - Component type of caller | |
526 | * Module - Source file name of caller | |
527 | * Line - Line number of caller | |
528 | * | |
529 | * RETURN: Address of the allocated memory on success, NULL on failure. | |
530 | * | |
531 | * DESCRIPTION: Subsystem equivalent of calloc. | |
532 | * | |
533 | ******************************************************************************/ | |
534 | ||
535 | void * | |
536 | acpi_ut_callocate_and_track ( | |
537 | acpi_size size, | |
538 | u32 component, | |
539 | char *module, | |
540 | u32 line) | |
541 | { | |
542 | struct acpi_debug_mem_block *allocation; | |
543 | acpi_status status; | |
544 | ||
545 | ||
546 | allocation = acpi_ut_callocate (size + sizeof (struct acpi_debug_mem_header), component, | |
547 | module, line); | |
548 | if (!allocation) { | |
549 | /* Report allocation error */ | |
550 | ||
551 | _ACPI_REPORT_ERROR (module, line, component, | |
552 | ("ut_callocate: Could not allocate size %X\n", (u32) size)); | |
553 | return (NULL); | |
554 | } | |
555 | ||
556 | status = acpi_ut_track_allocation (ACPI_MEM_LIST_GLOBAL, allocation, size, | |
557 | ACPI_MEM_CALLOC, component, module, line); | |
558 | if (ACPI_FAILURE (status)) { | |
559 | acpi_os_free (allocation); | |
560 | return (NULL); | |
561 | } | |
562 | ||
563 | acpi_gbl_memory_lists[ACPI_MEM_LIST_GLOBAL].total_allocated++; | |
564 | acpi_gbl_memory_lists[ACPI_MEM_LIST_GLOBAL].current_total_size += (u32) size; | |
565 | ||
566 | return ((void *) &allocation->user_space); | |
567 | } | |
568 | ||
569 | ||
570 | /******************************************************************************* | |
571 | * | |
572 | * FUNCTION: acpi_ut_free_and_track | |
573 | * | |
574 | * PARAMETERS: Allocation - Address of the memory to deallocate | |
575 | * Component - Component type of caller | |
576 | * Module - Source file name of caller | |
577 | * Line - Line number of caller | |
578 | * | |
579 | * RETURN: None | |
580 | * | |
581 | * DESCRIPTION: Frees the memory at Allocation | |
582 | * | |
583 | ******************************************************************************/ | |
584 | ||
585 | void | |
586 | acpi_ut_free_and_track ( | |
587 | void *allocation, | |
588 | u32 component, | |
589 | char *module, | |
590 | u32 line) | |
591 | { | |
592 | struct acpi_debug_mem_block *debug_block; | |
593 | acpi_status status; | |
594 | ||
595 | ||
596 | ACPI_FUNCTION_TRACE_PTR ("ut_free", allocation); | |
597 | ||
598 | ||
599 | if (NULL == allocation) { | |
600 | _ACPI_REPORT_ERROR (module, line, component, | |
601 | ("acpi_ut_free: Attempt to delete a NULL address\n")); | |
602 | ||
603 | return_VOID; | |
604 | } | |
605 | ||
606 | debug_block = ACPI_CAST_PTR (struct acpi_debug_mem_block, | |
607 | (((char *) allocation) - sizeof (struct acpi_debug_mem_header))); | |
608 | ||
609 | acpi_gbl_memory_lists[ACPI_MEM_LIST_GLOBAL].total_freed++; | |
610 | acpi_gbl_memory_lists[ACPI_MEM_LIST_GLOBAL].current_total_size -= debug_block->size; | |
611 | ||
612 | status = acpi_ut_remove_allocation (ACPI_MEM_LIST_GLOBAL, debug_block, | |
613 | component, module, line); | |
614 | if (ACPI_FAILURE (status)) { | |
615 | ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, "Could not free memory, %s\n", | |
616 | acpi_format_exception (status))); | |
617 | } | |
618 | ||
619 | acpi_os_free (debug_block); | |
620 | ||
621 | ACPI_DEBUG_PRINT ((ACPI_DB_ALLOCATIONS, "%p freed\n", allocation)); | |
622 | ||
623 | return_VOID; | |
624 | } | |
625 | ||
626 | ||
627 | /******************************************************************************* | |
628 | * | |
629 | * FUNCTION: acpi_ut_find_allocation | |
630 | * | |
631 | * PARAMETERS: list_id - Memory list to search | |
632 | * Allocation - Address of allocated memory | |
633 | * | |
634 | * RETURN: A list element if found; NULL otherwise. | |
635 | * | |
636 | * DESCRIPTION: Searches for an element in the global allocation tracking list. | |
637 | * | |
638 | ******************************************************************************/ | |
639 | ||
640 | struct acpi_debug_mem_block * | |
641 | acpi_ut_find_allocation ( | |
642 | u32 list_id, | |
643 | void *allocation) | |
644 | { | |
645 | struct acpi_debug_mem_block *element; | |
646 | ||
647 | ||
648 | ACPI_FUNCTION_ENTRY (); | |
649 | ||
650 | ||
651 | if (list_id > ACPI_MEM_LIST_MAX) { | |
652 | return (NULL); | |
653 | } | |
654 | ||
655 | element = acpi_gbl_memory_lists[list_id].list_head; | |
656 | ||
657 | /* Search for the address. */ | |
658 | ||
659 | while (element) { | |
660 | if (element == allocation) { | |
661 | return (element); | |
662 | } | |
663 | ||
664 | element = element->next; | |
665 | } | |
666 | ||
667 | return (NULL); | |
668 | } | |
669 | ||
670 | ||
671 | /******************************************************************************* | |
672 | * | |
673 | * FUNCTION: acpi_ut_track_allocation | |
674 | * | |
675 | * PARAMETERS: list_id - Memory list to search | |
676 | * Allocation - Address of allocated memory | |
677 | * Size - Size of the allocation | |
678 | * alloc_type - MEM_MALLOC or MEM_CALLOC | |
679 | * Component - Component type of caller | |
680 | * Module - Source file name of caller | |
681 | * Line - Line number of caller | |
682 | * | |
683 | * RETURN: None. | |
684 | * | |
685 | * DESCRIPTION: Inserts an element into the global allocation tracking list. | |
686 | * | |
687 | ******************************************************************************/ | |
688 | ||
689 | acpi_status | |
690 | acpi_ut_track_allocation ( | |
691 | u32 list_id, | |
692 | struct acpi_debug_mem_block *allocation, | |
693 | acpi_size size, | |
694 | u8 alloc_type, | |
695 | u32 component, | |
696 | char *module, | |
697 | u32 line) | |
698 | { | |
699 | struct acpi_memory_list *mem_list; | |
700 | struct acpi_debug_mem_block *element; | |
701 | acpi_status status = AE_OK; | |
702 | ||
703 | ||
704 | ACPI_FUNCTION_TRACE_PTR ("ut_track_allocation", allocation); | |
705 | ||
706 | ||
707 | if (list_id > ACPI_MEM_LIST_MAX) { | |
708 | return_ACPI_STATUS (AE_BAD_PARAMETER); | |
709 | } | |
710 | ||
711 | mem_list = &acpi_gbl_memory_lists[list_id]; | |
712 | status = acpi_ut_acquire_mutex (ACPI_MTX_MEMORY); | |
713 | if (ACPI_FAILURE (status)) { | |
714 | return_ACPI_STATUS (status); | |
715 | } | |
716 | ||
717 | /* | |
718 | * Search list for this address to make sure it is not already on the list. | |
719 | * This will catch several kinds of problems. | |
720 | */ | |
721 | ||
722 | element = acpi_ut_find_allocation (list_id, allocation); | |
723 | if (element) { | |
724 | ACPI_REPORT_ERROR (("ut_track_allocation: Allocation already present in list! (%p)\n", | |
725 | allocation)); | |
726 | ||
727 | ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, "Element %p Address %p\n", element, allocation)); | |
728 | ||
729 | goto unlock_and_exit; | |
730 | } | |
731 | ||
732 | /* Fill in the instance data. */ | |
733 | ||
734 | allocation->size = (u32) size; | |
735 | allocation->alloc_type = alloc_type; | |
736 | allocation->component = component; | |
737 | allocation->line = line; | |
738 | ||
739 | ACPI_STRNCPY (allocation->module, module, ACPI_MAX_MODULE_NAME); | |
740 | allocation->module[ACPI_MAX_MODULE_NAME-1] = 0; | |
741 | ||
742 | /* Insert at list head */ | |
743 | ||
744 | if (mem_list->list_head) { | |
745 | ((struct acpi_debug_mem_block *)(mem_list->list_head))->previous = allocation; | |
746 | } | |
747 | ||
748 | allocation->next = mem_list->list_head; | |
749 | allocation->previous = NULL; | |
750 | ||
751 | mem_list->list_head = allocation; | |
752 | ||
753 | ||
754 | unlock_and_exit: | |
755 | status = acpi_ut_release_mutex (ACPI_MTX_MEMORY); | |
756 | return_ACPI_STATUS (status); | |
757 | } | |
758 | ||
759 | ||
760 | /******************************************************************************* | |
761 | * | |
762 | * FUNCTION: acpi_ut_remove_allocation | |
763 | * | |
764 | * PARAMETERS: list_id - Memory list to search | |
765 | * Allocation - Address of allocated memory | |
766 | * Component - Component type of caller | |
767 | * Module - Source file name of caller | |
768 | * Line - Line number of caller | |
769 | * | |
770 | * RETURN: | |
771 | * | |
772 | * DESCRIPTION: Deletes an element from the global allocation tracking list. | |
773 | * | |
774 | ******************************************************************************/ | |
775 | ||
776 | acpi_status | |
777 | acpi_ut_remove_allocation ( | |
778 | u32 list_id, | |
779 | struct acpi_debug_mem_block *allocation, | |
780 | u32 component, | |
781 | char *module, | |
782 | u32 line) | |
783 | { | |
784 | struct acpi_memory_list *mem_list; | |
785 | acpi_status status; | |
786 | ||
787 | ||
788 | ACPI_FUNCTION_TRACE ("ut_remove_allocation"); | |
789 | ||
790 | ||
791 | if (list_id > ACPI_MEM_LIST_MAX) { | |
792 | return_ACPI_STATUS (AE_BAD_PARAMETER); | |
793 | } | |
794 | ||
795 | mem_list = &acpi_gbl_memory_lists[list_id]; | |
796 | if (NULL == mem_list->list_head) { | |
797 | /* No allocations! */ | |
798 | ||
799 | _ACPI_REPORT_ERROR (module, line, component, | |
800 | ("ut_remove_allocation: Empty allocation list, nothing to free!\n")); | |
801 | ||
802 | return_ACPI_STATUS (AE_OK); | |
803 | } | |
804 | ||
805 | status = acpi_ut_acquire_mutex (ACPI_MTX_MEMORY); | |
806 | if (ACPI_FAILURE (status)) { | |
807 | return_ACPI_STATUS (status); | |
808 | } | |
809 | ||
810 | /* Unlink */ | |
811 | ||
812 | if (allocation->previous) { | |
813 | (allocation->previous)->next = allocation->next; | |
814 | } | |
815 | else { | |
816 | mem_list->list_head = allocation->next; | |
817 | } | |
818 | ||
819 | if (allocation->next) { | |
820 | (allocation->next)->previous = allocation->previous; | |
821 | } | |
822 | ||
823 | /* Mark the segment as deleted */ | |
824 | ||
825 | ACPI_MEMSET (&allocation->user_space, 0xEA, allocation->size); | |
826 | ||
827 | ACPI_DEBUG_PRINT ((ACPI_DB_ALLOCATIONS, "Freeing size 0%X\n", allocation->size)); | |
828 | ||
829 | status = acpi_ut_release_mutex (ACPI_MTX_MEMORY); | |
830 | return_ACPI_STATUS (status); | |
831 | } | |
832 | ||
833 | ||
834 | /******************************************************************************* | |
835 | * | |
836 | * FUNCTION: acpi_ut_dump_allocation_info | |
837 | * | |
838 | * PARAMETERS: | |
839 | * | |
840 | * RETURN: None | |
841 | * | |
842 | * DESCRIPTION: Print some info about the outstanding allocations. | |
843 | * | |
844 | ******************************************************************************/ | |
845 | #ifdef ACPI_FUTURE_USAGE | |
846 | void | |
847 | acpi_ut_dump_allocation_info ( | |
848 | void) | |
849 | { | |
850 | /* | |
851 | struct acpi_memory_list *mem_list; | |
852 | */ | |
853 | ||
854 | ACPI_FUNCTION_TRACE ("ut_dump_allocation_info"); | |
855 | ||
856 | /* | |
857 | ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES, | |
858 | ("%30s: %4d (%3d Kb)\n", "Current allocations", | |
859 | mem_list->current_count, | |
860 | ROUND_UP_TO_1K (mem_list->current_size))); | |
861 | ||
862 | ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES, | |
863 | ("%30s: %4d (%3d Kb)\n", "Max concurrent allocations", | |
864 | mem_list->max_concurrent_count, | |
865 | ROUND_UP_TO_1K (mem_list->max_concurrent_size))); | |
866 | ||
867 | ||
868 | ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES, | |
869 | ("%30s: %4d (%3d Kb)\n", "Total (all) internal objects", | |
870 | running_object_count, | |
871 | ROUND_UP_TO_1K (running_object_size))); | |
872 | ||
873 | ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES, | |
874 | ("%30s: %4d (%3d Kb)\n", "Total (all) allocations", | |
875 | running_alloc_count, | |
876 | ROUND_UP_TO_1K (running_alloc_size))); | |
877 | ||
878 | ||
879 | ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES, | |
880 | ("%30s: %4d (%3d Kb)\n", "Current Nodes", | |
881 | acpi_gbl_current_node_count, | |
882 | ROUND_UP_TO_1K (acpi_gbl_current_node_size))); | |
883 | ||
884 | ACPI_DEBUG_PRINT (TRACE_ALLOCATIONS | TRACE_TABLES, | |
885 | ("%30s: %4d (%3d Kb)\n", "Max Nodes", | |
886 | acpi_gbl_max_concurrent_node_count, | |
887 | ROUND_UP_TO_1K ((acpi_gbl_max_concurrent_node_count * sizeof (struct acpi_namespace_node))))); | |
888 | */ | |
889 | return_VOID; | |
890 | } | |
891 | #endif /* ACPI_FUTURE_USAGE */ | |
892 | ||
893 | ||
894 | /******************************************************************************* | |
895 | * | |
896 | * FUNCTION: acpi_ut_dump_allocations | |
897 | * | |
898 | * PARAMETERS: Component - Component(s) to dump info for. | |
899 | * Module - Module to dump info for. NULL means all. | |
900 | * | |
901 | * RETURN: None | |
902 | * | |
903 | * DESCRIPTION: Print a list of all outstanding allocations. | |
904 | * | |
905 | ******************************************************************************/ | |
906 | ||
907 | void | |
908 | acpi_ut_dump_allocations ( | |
909 | u32 component, | |
910 | char *module) | |
911 | { | |
912 | struct acpi_debug_mem_block *element; | |
913 | union acpi_descriptor *descriptor; | |
914 | u32 num_outstanding = 0; | |
915 | ||
916 | ||
917 | ACPI_FUNCTION_TRACE ("ut_dump_allocations"); | |
918 | ||
919 | ||
920 | /* | |
921 | * Walk the allocation list. | |
922 | */ | |
923 | if (ACPI_FAILURE (acpi_ut_acquire_mutex (ACPI_MTX_MEMORY))) { | |
924 | return; | |
925 | } | |
926 | ||
927 | element = acpi_gbl_memory_lists[0].list_head; | |
928 | while (element) { | |
929 | if ((element->component & component) && | |
930 | ((module == NULL) || (0 == ACPI_STRCMP (module, element->module)))) { | |
931 | /* Ignore allocated objects that are in a cache */ | |
932 | ||
933 | descriptor = ACPI_CAST_PTR (union acpi_descriptor, &element->user_space); | |
934 | if (descriptor->descriptor_id != ACPI_DESC_TYPE_CACHED) { | |
935 | acpi_os_printf ("%p Len %04X %9.9s-%d [%s] ", | |
936 | descriptor, element->size, element->module, | |
937 | element->line, acpi_ut_get_descriptor_name (descriptor)); | |
938 | ||
939 | /* Most of the elements will be Operand objects. */ | |
940 | ||
941 | switch (ACPI_GET_DESCRIPTOR_TYPE (descriptor)) { | |
942 | case ACPI_DESC_TYPE_OPERAND: | |
943 | acpi_os_printf ("%12.12s R%hd", | |
944 | acpi_ut_get_type_name (descriptor->object.common.type), | |
945 | descriptor->object.common.reference_count); | |
946 | break; | |
947 | ||
948 | case ACPI_DESC_TYPE_PARSER: | |
949 | acpi_os_printf ("aml_opcode %04hX", | |
950 | descriptor->op.asl.aml_opcode); | |
951 | break; | |
952 | ||
953 | case ACPI_DESC_TYPE_NAMED: | |
954 | acpi_os_printf ("%4.4s", | |
955 | acpi_ut_get_node_name (&descriptor->node)); | |
956 | break; | |
957 | ||
958 | default: | |
959 | break; | |
960 | } | |
961 | ||
962 | acpi_os_printf ( "\n"); | |
963 | num_outstanding++; | |
964 | } | |
965 | } | |
966 | element = element->next; | |
967 | } | |
968 | ||
969 | (void) acpi_ut_release_mutex (ACPI_MTX_MEMORY); | |
970 | ||
971 | /* Print summary */ | |
972 | ||
973 | if (!num_outstanding) { | |
974 | ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, | |
975 | "No outstanding allocations.\n")); | |
976 | } | |
977 | else { | |
978 | ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, | |
979 | "%d(%X) Outstanding allocations\n", | |
980 | num_outstanding, num_outstanding)); | |
981 | } | |
982 | ||
983 | return_VOID; | |
984 | } | |
985 | ||
986 | ||
987 | #endif /* #ifdef ACPI_DBG_TRACK_ALLOCATIONS */ | |
988 |