1/******************************************************************************
2 *
3 * Module Name: exdump - Interpreter debug output routines
4 *
5 *****************************************************************************/
6
7/*
8 * Copyright (C) 2000 - 2007, 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#include <acpi/acpi.h>
45#include <acpi/acinterp.h>
46#include <acpi/amlcode.h>
47#include <acpi/acnamesp.h>
48#include <acpi/acparser.h>
49
50#define _COMPONENT          ACPI_EXECUTER
51ACPI_MODULE_NAME("exdump")
52
53/*
54 * The following routines are used for debug output only
55 */
56#if defined(ACPI_DEBUG_OUTPUT) || defined(ACPI_DEBUGGER)
57/* Local prototypes */
58static void acpi_ex_out_string(char *title, char *value);
59
60static void acpi_ex_out_pointer(char *title, void *value);
61
62static void
63acpi_ex_dump_object(union acpi_operand_object *obj_desc,
64		    struct acpi_exdump_info *info);
65
66static void acpi_ex_dump_reference_obj(union acpi_operand_object *obj_desc);
67
68static void
69acpi_ex_dump_package_obj(union acpi_operand_object *obj_desc,
70			 u32 level, u32 index);
71
72/*******************************************************************************
73 *
74 * Object Descriptor info tables
75 *
76 * Note: The first table entry must be an INIT opcode and must contain
77 * the table length (number of table entries)
78 *
79 ******************************************************************************/
80
81static struct acpi_exdump_info acpi_ex_dump_integer[2] = {
82	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_integer), NULL},
83	{ACPI_EXD_UINT64, ACPI_EXD_OFFSET(integer.value), "Value"}
84};
85
86static struct acpi_exdump_info acpi_ex_dump_string[4] = {
87	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_string), NULL},
88	{ACPI_EXD_UINT32, ACPI_EXD_OFFSET(string.length), "Length"},
89	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(string.pointer), "Pointer"},
90	{ACPI_EXD_STRING, 0, NULL}
91};
92
93static struct acpi_exdump_info acpi_ex_dump_buffer[5] = {
94	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_buffer), NULL},
95	{ACPI_EXD_UINT32, ACPI_EXD_OFFSET(buffer.length), "Length"},
96	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(buffer.pointer), "Pointer"},
97	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(buffer.node), "Parent Node"},
98	{ACPI_EXD_BUFFER, 0, NULL}
99};
100
101static struct acpi_exdump_info acpi_ex_dump_package[5] = {
102	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_package), NULL},
103	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(package.flags), "Flags"},
104	{ACPI_EXD_UINT32, ACPI_EXD_OFFSET(package.count), "Elements"},
105	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(package.elements), "Element List"},
106	{ACPI_EXD_PACKAGE, 0, NULL}
107};
108
109static struct acpi_exdump_info acpi_ex_dump_device[4] = {
110	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_device), NULL},
111	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(device.handler), "Handler"},
112	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(device.system_notify),
113	 "System Notify"},
114	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(device.device_notify),
115	 "Device Notify"}
116};
117
118static struct acpi_exdump_info acpi_ex_dump_event[2] = {
119	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_event), NULL},
120	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(event.os_semaphore), "OsSemaphore"}
121};
122
123static struct acpi_exdump_info acpi_ex_dump_method[8] = {
124	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_method), NULL},
125	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(method.param_count), "ParamCount"},
126	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(method.sync_level), "Sync Level"},
127	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(method.mutex), "Mutex"},
128	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(method.owner_id), "Owner Id"},
129	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(method.thread_count), "Thread Count"},
130	{ACPI_EXD_UINT32, ACPI_EXD_OFFSET(method.aml_length), "Aml Length"},
131	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(method.aml_start), "Aml Start"}
132};
133
134static struct acpi_exdump_info acpi_ex_dump_mutex[5] = {
135	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_mutex), NULL},
136	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(mutex.sync_level), "Sync Level"},
137	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(mutex.owner_thread), "Owner Thread"},
138	{ACPI_EXD_UINT16, ACPI_EXD_OFFSET(mutex.acquisition_depth),
139	 "Acquire Depth"},
140	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(mutex.os_mutex), "OsMutex"}
141};
142
143static struct acpi_exdump_info acpi_ex_dump_region[7] = {
144	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_region), NULL},
145	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(region.space_id), "Space Id"},
146	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(region.flags), "Flags"},
147	{ACPI_EXD_ADDRESS, ACPI_EXD_OFFSET(region.address), "Address"},
148	{ACPI_EXD_UINT32, ACPI_EXD_OFFSET(region.length), "Length"},
149	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(region.handler), "Handler"},
150	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(region.next), "Next"}
151};
152
153static struct acpi_exdump_info acpi_ex_dump_power[5] = {
154	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_power), NULL},
155	{ACPI_EXD_UINT32, ACPI_EXD_OFFSET(power_resource.system_level),
156	 "System Level"},
157	{ACPI_EXD_UINT32, ACPI_EXD_OFFSET(power_resource.resource_order),
158	 "Resource Order"},
159	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(power_resource.system_notify),
160	 "System Notify"},
161	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(power_resource.device_notify),
162	 "Device Notify"}
163};
164
165static struct acpi_exdump_info acpi_ex_dump_processor[7] = {
166	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_processor), NULL},
167	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(processor.proc_id), "Processor ID"},
168	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(processor.length), "Length"},
169	{ACPI_EXD_ADDRESS, ACPI_EXD_OFFSET(processor.address), "Address"},
170	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(processor.system_notify),
171	 "System Notify"},
172	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(processor.device_notify),
173	 "Device Notify"},
174	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(processor.handler), "Handler"}
175};
176
177static struct acpi_exdump_info acpi_ex_dump_thermal[4] = {
178	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_thermal), NULL},
179	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(thermal_zone.system_notify),
180	 "System Notify"},
181	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(thermal_zone.device_notify),
182	 "Device Notify"},
183	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(thermal_zone.handler), "Handler"}
184};
185
186static struct acpi_exdump_info acpi_ex_dump_buffer_field[3] = {
187	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_buffer_field), NULL},
188	{ACPI_EXD_FIELD, 0, NULL},
189	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(buffer_field.buffer_obj),
190	 "Buffer Object"}
191};
192
193static struct acpi_exdump_info acpi_ex_dump_region_field[3] = {
194	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_region_field), NULL},
195	{ACPI_EXD_FIELD, 0, NULL},
196	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(field.region_obj), "Region Object"}
197};
198
199static struct acpi_exdump_info acpi_ex_dump_bank_field[5] = {
200	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_bank_field), NULL},
201	{ACPI_EXD_FIELD, 0, NULL},
202	{ACPI_EXD_UINT32, ACPI_EXD_OFFSET(bank_field.value), "Value"},
203	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(bank_field.region_obj),
204	 "Region Object"},
205	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(bank_field.bank_obj), "Bank Object"}
206};
207
208static struct acpi_exdump_info acpi_ex_dump_index_field[5] = {
209	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_bank_field), NULL},
210	{ACPI_EXD_FIELD, 0, NULL},
211	{ACPI_EXD_UINT32, ACPI_EXD_OFFSET(index_field.value), "Value"},
212	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(index_field.index_obj),
213	 "Index Object"},
214	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(index_field.data_obj), "Data Object"}
215};
216
217static struct acpi_exdump_info acpi_ex_dump_reference[7] = {
218	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_reference), NULL},
219	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(reference.target_type), "Target Type"},
220	{ACPI_EXD_UINT32, ACPI_EXD_OFFSET(reference.offset), "Offset"},
221	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(reference.object), "Object Desc"},
222	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(reference.node), "Node"},
223	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(reference.where), "Where"},
224	{ACPI_EXD_REFERENCE, 0, NULL}
225};
226
227static struct acpi_exdump_info acpi_ex_dump_address_handler[6] = {
228	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_address_handler),
229	 NULL},
230	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(address_space.space_id), "Space Id"},
231	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(address_space.next), "Next"},
232	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(address_space.region_list),
233	 "Region List"},
234	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(address_space.node), "Node"},
235	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(address_space.context), "Context"}
236};
237
238static struct acpi_exdump_info acpi_ex_dump_notify[3] = {
239	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_notify), NULL},
240	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(notify.node), "Node"},
241	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(notify.context), "Context"}
242};
243
244/* Miscellaneous tables */
245
246static struct acpi_exdump_info acpi_ex_dump_common[4] = {
247	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_common), NULL},
248	{ACPI_EXD_TYPE, 0, NULL},
249	{ACPI_EXD_UINT16, ACPI_EXD_OFFSET(common.reference_count),
250	 "Reference Count"},
251	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(common.flags), "Flags"}
252};
253
254static struct acpi_exdump_info acpi_ex_dump_field_common[7] = {
255	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_field_common), NULL},
256	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(common_field.field_flags),
257	 "Field Flags"},
258	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(common_field.access_byte_width),
259	 "Access Byte Width"},
260	{ACPI_EXD_UINT32, ACPI_EXD_OFFSET(common_field.bit_length),
261	 "Bit Length"},
262	{ACPI_EXD_UINT8, ACPI_EXD_OFFSET(common_field.start_field_bit_offset),
263	 "Field Bit Offset"},
264	{ACPI_EXD_UINT32, ACPI_EXD_OFFSET(common_field.base_byte_offset),
265	 "Base Byte Offset"},
266	{ACPI_EXD_POINTER, ACPI_EXD_OFFSET(common_field.node), "Parent Node"}
267};
268
269static struct acpi_exdump_info acpi_ex_dump_node[5] = {
270	{ACPI_EXD_INIT, ACPI_EXD_TABLE_SIZE(acpi_ex_dump_node), NULL},
271	{ACPI_EXD_UINT8, ACPI_EXD_NSOFFSET(flags), "Flags"},
272	{ACPI_EXD_UINT8, ACPI_EXD_NSOFFSET(owner_id), "Owner Id"},
273	{ACPI_EXD_POINTER, ACPI_EXD_NSOFFSET(child), "Child List"},
274	{ACPI_EXD_POINTER, ACPI_EXD_NSOFFSET(peer), "Next Peer"}
275};
276
277/* Dispatch table, indexed by object type */
278
279static struct acpi_exdump_info *acpi_ex_dump_info[] = {
280	NULL,
281	acpi_ex_dump_integer,
282	acpi_ex_dump_string,
283	acpi_ex_dump_buffer,
284	acpi_ex_dump_package,
285	NULL,
286	acpi_ex_dump_device,
287	acpi_ex_dump_event,
288	acpi_ex_dump_method,
289	acpi_ex_dump_mutex,
290	acpi_ex_dump_region,
291	acpi_ex_dump_power,
292	acpi_ex_dump_processor,
293	acpi_ex_dump_thermal,
294	acpi_ex_dump_buffer_field,
295	NULL,
296	NULL,
297	acpi_ex_dump_region_field,
298	acpi_ex_dump_bank_field,
299	acpi_ex_dump_index_field,
300	acpi_ex_dump_reference,
301	NULL,
302	NULL,
303	acpi_ex_dump_notify,
304	acpi_ex_dump_address_handler,
305	NULL,
306	NULL,
307	NULL
308};
309
310/*******************************************************************************
311 *
312 * FUNCTION:    acpi_ex_dump_object
313 *
314 * PARAMETERS:  obj_desc            - Descriptor to dump
315 *              Info                - Info table corresponding to this object
316 *                                    type
317 *
318 * RETURN:      None
319 *
320 * DESCRIPTION: Walk the info table for this object
321 *
322 ******************************************************************************/
323
324static void
325acpi_ex_dump_object(union acpi_operand_object *obj_desc,
326		    struct acpi_exdump_info *info)
327{
328	u8 *target;
329	char *name;
330	u8 count;
331
332	if (!info) {
333		acpi_os_printf
334		    ("ExDumpObject: Display not implemented for object type %s\n",
335		     acpi_ut_get_object_type_name(obj_desc));
336		return;
337	}
338
339	/* First table entry must contain the table length (# of table entries) */
340
341	count = info->offset;
342
343	while (count) {
344		target = ACPI_ADD_PTR(u8, obj_desc, info->offset);
345		name = info->name;
346
347		switch (info->opcode) {
348		case ACPI_EXD_INIT:
349			break;
350
351		case ACPI_EXD_TYPE:
352			acpi_ex_out_string("Type",
353					   acpi_ut_get_object_type_name
354					   (obj_desc));
355			break;
356
357		case ACPI_EXD_UINT8:
358
359			acpi_os_printf("%20s : %2.2X\n", name, *target);
360			break;
361
362		case ACPI_EXD_UINT16:
363
364			acpi_os_printf("%20s : %4.4X\n", name,
365				       ACPI_GET16(target));
366			break;
367
368		case ACPI_EXD_UINT32:
369
370			acpi_os_printf("%20s : %8.8X\n", name,
371				       ACPI_GET32(target));
372			break;
373
374		case ACPI_EXD_UINT64:
375
376			acpi_os_printf("%20s : %8.8X%8.8X\n", "Value",
377				       ACPI_FORMAT_UINT64(ACPI_GET64(target)));
378			break;
379
380		case ACPI_EXD_POINTER:
381		case ACPI_EXD_ADDRESS:
382
383			acpi_ex_out_pointer(name,
384					    *ACPI_CAST_PTR(void *, target));
385			break;
386
387		case ACPI_EXD_STRING:
388
389			acpi_ut_print_string(obj_desc->string.pointer,
390					     ACPI_UINT8_MAX);
391			acpi_os_printf("\n");
392			break;
393
394		case ACPI_EXD_BUFFER:
395
396			ACPI_DUMP_BUFFER(obj_desc->buffer.pointer,
397					 obj_desc->buffer.length);
398			break;
399
400		case ACPI_EXD_PACKAGE:
401
402			/* Dump the package contents */
403
404			acpi_os_printf("\nPackage Contents:\n");
405			acpi_ex_dump_package_obj(obj_desc, 0, 0);
406			break;
407
408		case ACPI_EXD_FIELD:
409
410			acpi_ex_dump_object(obj_desc,
411					    acpi_ex_dump_field_common);
412			break;
413
414		case ACPI_EXD_REFERENCE:
415
416			acpi_ex_out_string("Opcode",
417					   (acpi_ps_get_opcode_info
418					    (obj_desc->reference.opcode))->
419					   name);
420			acpi_ex_dump_reference_obj(obj_desc);
421			break;
422
423		default:
424			acpi_os_printf("**** Invalid table opcode [%X] ****\n",
425				       info->opcode);
426			return;
427		}
428
429		info++;
430		count--;
431	}
432}
433
434/*******************************************************************************
435 *
436 * FUNCTION:    acpi_ex_dump_operand
437 *
438 * PARAMETERS:  *obj_desc       - Pointer to entry to be dumped
439 *              Depth           - Current nesting depth
440 *
441 * RETURN:      None
442 *
443 * DESCRIPTION: Dump an operand object
444 *
445 ******************************************************************************/
446
447void acpi_ex_dump_operand(union acpi_operand_object *obj_desc, u32 depth)
448{
449	u32 length;
450	u32 index;
451
452	ACPI_FUNCTION_NAME(ex_dump_operand)
453
454	    if (!((ACPI_LV_EXEC & acpi_dbg_level)
455		  && (_COMPONENT & acpi_dbg_layer))) {
456		return;
457	}
458
459	if (!obj_desc) {
460
461		/* This could be a null element of a package */
462
463		ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Null Object Descriptor\n"));
464		return;
465	}
466
467	if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) == ACPI_DESC_TYPE_NAMED) {
468		ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "%p Namespace Node: ",
469				  obj_desc));
470		ACPI_DUMP_ENTRY(obj_desc, ACPI_LV_EXEC);
471		return;
472	}
473
474	if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) != ACPI_DESC_TYPE_OPERAND) {
475		ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
476				  "%p is not a node or operand object: [%s]\n",
477				  obj_desc,
478				  acpi_ut_get_descriptor_name(obj_desc)));
479		ACPI_DUMP_BUFFER(obj_desc, sizeof(union acpi_operand_object));
480		return;
481	}
482
483	/* obj_desc is a valid object */
484
485	if (depth > 0) {
486		ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "%*s[%u] %p ",
487				  depth, " ", depth, obj_desc));
488	} else {
489		ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "%p ", obj_desc));
490	}
491
492	/* Decode object type */
493
494	switch (ACPI_GET_OBJECT_TYPE(obj_desc)) {
495	case ACPI_TYPE_LOCAL_REFERENCE:
496
497		switch (obj_desc->reference.opcode) {
498		case AML_DEBUG_OP:
499
500			acpi_os_printf("Reference: Debug\n");
501			break;
502
503		case AML_NAME_OP:
504
505			ACPI_DUMP_PATHNAME(obj_desc->reference.object,
506					   "Reference: Name: ", ACPI_LV_INFO,
507					   _COMPONENT);
508			ACPI_DUMP_ENTRY(obj_desc->reference.object,
509					ACPI_LV_INFO);
510			break;
511
512		case AML_INDEX_OP:
513
514			acpi_os_printf("Reference: Index %p\n",
515				       obj_desc->reference.object);
516			break;
517
518		case AML_REF_OF_OP:
519
520			acpi_os_printf("Reference: (RefOf) %p\n",
521				       obj_desc->reference.object);
522			break;
523
524		case AML_ARG_OP:
525
526			acpi_os_printf("Reference: Arg%d",
527				       obj_desc->reference.offset);
528
529			if (ACPI_GET_OBJECT_TYPE(obj_desc) == ACPI_TYPE_INTEGER) {
530
531				/* Value is an Integer */
532
533				acpi_os_printf(" value is [%8.8X%8.8x]",
534					       ACPI_FORMAT_UINT64(obj_desc->
535								  integer.
536								  value));
537			}
538
539			acpi_os_printf("\n");
540			break;
541
542		case AML_LOCAL_OP:
543
544			acpi_os_printf("Reference: Local%d",
545				       obj_desc->reference.offset);
546
547			if (ACPI_GET_OBJECT_TYPE(obj_desc) == ACPI_TYPE_INTEGER) {
548
549				/* Value is an Integer */
550
551				acpi_os_printf(" value is [%8.8X%8.8x]",
552					       ACPI_FORMAT_UINT64(obj_desc->
553								  integer.
554								  value));
555			}
556
557			acpi_os_printf("\n");
558			break;
559
560		case AML_INT_NAMEPATH_OP:
561
562			acpi_os_printf("Reference.Node->Name %X\n",
563				       obj_desc->reference.node->name.integer);
564			break;
565
566		default:
567
568			/* Unknown opcode */
569
570			acpi_os_printf("Unknown Reference opcode=%X\n",
571				       obj_desc->reference.opcode);
572			break;
573
574		}
575		break;
576
577	case ACPI_TYPE_BUFFER:
578
579		acpi_os_printf("Buffer len %X @ %p\n",
580			       obj_desc->buffer.length,
581			       obj_desc->buffer.pointer);
582
583		length = obj_desc->buffer.length;
584		if (length > 64) {
585			length = 64;
586		}
587
588		/* Debug only -- dump the buffer contents */
589
590		if (obj_desc->buffer.pointer) {
591			acpi_os_printf("Buffer Contents: ");
592
593			for (index = 0; index < length; index++) {
594				acpi_os_printf(" %02x",
595					       obj_desc->buffer.pointer[index]);
596			}
597			acpi_os_printf("\n");
598		}
599		break;
600
601	case ACPI_TYPE_INTEGER:
602
603		acpi_os_printf("Integer %8.8X%8.8X\n",
604			       ACPI_FORMAT_UINT64(obj_desc->integer.value));
605		break;
606
607	case ACPI_TYPE_PACKAGE:
608
609		acpi_os_printf("Package [Len %X] ElementArray %p\n",
610			       obj_desc->package.count,
611			       obj_desc->package.elements);
612
613		/*
614		 * If elements exist, package element pointer is valid,
615		 * and debug_level exceeds 1, dump package's elements.
616		 */
617		if (obj_desc->package.count &&
618		    obj_desc->package.elements && acpi_dbg_level > 1) {
619			for (index = 0; index < obj_desc->package.count;
620			     index++) {
621				acpi_ex_dump_operand(obj_desc->package.
622						     elements[index],
623						     depth + 1);
624			}
625		}
626		break;
627
628	case ACPI_TYPE_REGION:
629
630		acpi_os_printf("Region %s (%X)",
631			       acpi_ut_get_region_name(obj_desc->region.
632						       space_id),
633			       obj_desc->region.space_id);
634
635		/*
636		 * If the address and length have not been evaluated,
637		 * don't print them.
638		 */
639		if (!(obj_desc->region.flags & AOPOBJ_DATA_VALID)) {
640			acpi_os_printf("\n");
641		} else {
642			acpi_os_printf(" base %8.8X%8.8X Length %X\n",
643				       ACPI_FORMAT_UINT64(obj_desc->region.
644							  address),
645				       obj_desc->region.length);
646		}
647		break;
648
649	case ACPI_TYPE_STRING:
650
651		acpi_os_printf("String length %X @ %p ",
652			       obj_desc->string.length,
653			       obj_desc->string.pointer);
654
655		acpi_ut_print_string(obj_desc->string.pointer, ACPI_UINT8_MAX);
656		acpi_os_printf("\n");
657		break;
658
659	case ACPI_TYPE_LOCAL_BANK_FIELD:
660
661		acpi_os_printf("BankField\n");
662		break;
663
664	case ACPI_TYPE_LOCAL_REGION_FIELD:
665
666		acpi_os_printf
667		    ("RegionField: Bits=%X AccWidth=%X Lock=%X Update=%X at byte=%X bit=%X of below:\n",
668		     obj_desc->field.bit_length,
669		     obj_desc->field.access_byte_width,
670		     obj_desc->field.field_flags & AML_FIELD_LOCK_RULE_MASK,
671		     obj_desc->field.field_flags & AML_FIELD_UPDATE_RULE_MASK,
672		     obj_desc->field.base_byte_offset,
673		     obj_desc->field.start_field_bit_offset);
674
675		acpi_ex_dump_operand(obj_desc->field.region_obj, depth + 1);
676		break;
677
678	case ACPI_TYPE_LOCAL_INDEX_FIELD:
679
680		acpi_os_printf("IndexField\n");
681		break;
682
683	case ACPI_TYPE_BUFFER_FIELD:
684
685		acpi_os_printf("BufferField: %X bits at byte %X bit %X of\n",
686			       obj_desc->buffer_field.bit_length,
687			       obj_desc->buffer_field.base_byte_offset,
688			       obj_desc->buffer_field.start_field_bit_offset);
689
690		if (!obj_desc->buffer_field.buffer_obj) {
691			ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "*NULL*\n"));
692		} else
693		    if (ACPI_GET_OBJECT_TYPE(obj_desc->buffer_field.buffer_obj)
694			!= ACPI_TYPE_BUFFER) {
695			acpi_os_printf("*not a Buffer*\n");
696		} else {
697			acpi_ex_dump_operand(obj_desc->buffer_field.buffer_obj,
698					     depth + 1);
699		}
700		break;
701
702	case ACPI_TYPE_EVENT:
703
704		acpi_os_printf("Event\n");
705		break;
706
707	case ACPI_TYPE_METHOD:
708
709		acpi_os_printf("Method(%X) @ %p:%X\n",
710			       obj_desc->method.param_count,
711			       obj_desc->method.aml_start,
712			       obj_desc->method.aml_length);
713		break;
714
715	case ACPI_TYPE_MUTEX:
716
717		acpi_os_printf("Mutex\n");
718		break;
719
720	case ACPI_TYPE_DEVICE:
721
722		acpi_os_printf("Device\n");
723		break;
724
725	case ACPI_TYPE_POWER:
726
727		acpi_os_printf("Power\n");
728		break;
729
730	case ACPI_TYPE_PROCESSOR:
731
732		acpi_os_printf("Processor\n");
733		break;
734
735	case ACPI_TYPE_THERMAL:
736
737		acpi_os_printf("Thermal\n");
738		break;
739
740	default:
741		/* Unknown Type */
742
743		acpi_os_printf("Unknown Type %X\n",
744			       ACPI_GET_OBJECT_TYPE(obj_desc));
745		break;
746	}
747
748	return;
749}
750
751/*******************************************************************************
752 *
753 * FUNCTION:    acpi_ex_dump_operands
754 *
755 * PARAMETERS:  Operands            - Operand list
756 *              interpreter_mode    - Load or Exec
757 *              Ident               - Identification
758 *              num_levels          - # of stack entries to dump above line
759 *              Note                - Output notation
760 *              module_name         - Caller's module name
761 *              line_number         - Caller's invocation line number
762 *
763 * DESCRIPTION: Dump the object stack
764 *
765 ******************************************************************************/
766
767void
768acpi_ex_dump_operands(union acpi_operand_object **operands,
769		      acpi_interpreter_mode interpreter_mode,
770		      char *ident,
771		      u32 num_levels,
772		      char *note, char *module_name, u32 line_number)
773{
774	acpi_native_uint i;
775
776	ACPI_FUNCTION_NAME(ex_dump_operands);
777
778	if (!ident) {
779		ident = "?";
780	}
781
782	if (!note) {
783		note = "?";
784	}
785
786	ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
787			  "************* Operand Stack Contents (Opcode [%s], %d Operands)\n",
788			  ident, num_levels));
789
790	if (num_levels == 0) {
791		num_levels = 1;
792	}
793
794	/* Dump the operand stack starting at the top */
795
796	for (i = 0; num_levels > 0; i--, num_levels--) {
797		acpi_ex_dump_operand(operands[i], 0);
798	}
799
800	ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
801			  "************* Operand Stack dump from %s(%d), %s\n",
802			  module_name, line_number, note));
803	return;
804}
805
806/*******************************************************************************
807 *
808 * FUNCTION:    acpi_ex_out* functions
809 *
810 * PARAMETERS:  Title               - Descriptive text
811 *              Value               - Value to be displayed
812 *
813 * DESCRIPTION: Object dump output formatting functions.  These functions
814 *              reduce the number of format strings required and keeps them
815 *              all in one place for easy modification.
816 *
817 ******************************************************************************/
818
819static void acpi_ex_out_string(char *title, char *value)
820{
821	acpi_os_printf("%20s : %s\n", title, value);
822}
823
824static void acpi_ex_out_pointer(char *title, void *value)
825{
826	acpi_os_printf("%20s : %p\n", title, value);
827}
828
829/*******************************************************************************
830 *
831 * FUNCTION:    acpi_ex_dump_namespace_node
832 *
833 * PARAMETERS:  Node                - Descriptor to dump
834 *              Flags               - Force display if TRUE
835 *
836 * DESCRIPTION: Dumps the members of the given.Node
837 *
838 ******************************************************************************/
839
840void acpi_ex_dump_namespace_node(struct acpi_namespace_node *node, u32 flags)
841{
842
843	ACPI_FUNCTION_ENTRY();
844
845	if (!flags) {
846		if (!((ACPI_LV_OBJECTS & acpi_dbg_level)
847		      && (_COMPONENT & acpi_dbg_layer))) {
848			return;
849		}
850	}
851
852	acpi_os_printf("%20s : %4.4s\n", "Name", acpi_ut_get_node_name(node));
853	acpi_ex_out_string("Type", acpi_ut_get_type_name(node->type));
854	acpi_ex_out_pointer("Attached Object",
855			    acpi_ns_get_attached_object(node));
856	acpi_ex_out_pointer("Parent", acpi_ns_get_parent_node(node));
857
858	acpi_ex_dump_object(ACPI_CAST_PTR(union acpi_operand_object, node),
859			    acpi_ex_dump_node);
860}
861
862/*******************************************************************************
863 *
864 * FUNCTION:    acpi_ex_dump_reference_obj
865 *
866 * PARAMETERS:  Object              - Descriptor to dump
867 *
868 * DESCRIPTION: Dumps a reference object
869 *
870 ******************************************************************************/
871
872static void acpi_ex_dump_reference_obj(union acpi_operand_object *obj_desc)
873{
874	struct acpi_buffer ret_buf;
875	acpi_status status;
876
877	ret_buf.length = ACPI_ALLOCATE_LOCAL_BUFFER;
878
879	if (obj_desc->reference.opcode == AML_INT_NAMEPATH_OP) {
880		acpi_os_printf("Named Object %p ", obj_desc->reference.node);
881
882		status =
883		    acpi_ns_handle_to_pathname(obj_desc->reference.node,
884					       &ret_buf);
885		if (ACPI_FAILURE(status)) {
886			acpi_os_printf("Could not convert name to pathname\n");
887		} else {
888			acpi_os_printf("%s\n", (char *)ret_buf.pointer);
889			ACPI_FREE(ret_buf.pointer);
890		}
891	} else if (obj_desc->reference.object) {
892		acpi_os_printf("\nReferenced Object: %p\n",
893			       obj_desc->reference.object);
894	}
895}
896
897/*******************************************************************************
898 *
899 * FUNCTION:    acpi_ex_dump_package_obj
900 *
901 * PARAMETERS:  obj_desc            - Descriptor to dump
902 *              Level               - Indentation Level
903 *              Index               - Package index for this object
904 *
905 * DESCRIPTION: Dumps the elements of the package
906 *
907 ******************************************************************************/
908
909static void
910acpi_ex_dump_package_obj(union acpi_operand_object *obj_desc,
911			 u32 level, u32 index)
912{
913	u32 i;
914
915	/* Indentation and index output */
916
917	if (level > 0) {
918		for (i = 0; i < level; i++) {
919			acpi_os_printf(" ");
920		}
921
922		acpi_os_printf("[%.2d] ", index);
923	}
924
925	acpi_os_printf("%p ", obj_desc);
926
927	/* Null package elements are allowed */
928
929	if (!obj_desc) {
930		acpi_os_printf("[Null Object]\n");
931		return;
932	}
933
934	/* Packages may only contain a few object types */
935
936	switch (ACPI_GET_OBJECT_TYPE(obj_desc)) {
937	case ACPI_TYPE_INTEGER:
938
939		acpi_os_printf("[Integer] = %8.8X%8.8X\n",
940			       ACPI_FORMAT_UINT64(obj_desc->integer.value));
941		break;
942
943	case ACPI_TYPE_STRING:
944
945		acpi_os_printf("[String] Value: ");
946		for (i = 0; i < obj_desc->string.length; i++) {
947			acpi_os_printf("%c", obj_desc->string.pointer[i]);
948		}
949		acpi_os_printf("\n");
950		break;
951
952	case ACPI_TYPE_BUFFER:
953
954		acpi_os_printf("[Buffer] Length %.2X = ",
955			       obj_desc->buffer.length);
956		if (obj_desc->buffer.length) {
957			acpi_ut_dump_buffer(ACPI_CAST_PTR
958					    (u8, obj_desc->buffer.pointer),
959					    obj_desc->buffer.length,
960					    DB_DWORD_DISPLAY, _COMPONENT);
961		} else {
962			acpi_os_printf("\n");
963		}
964		break;
965
966	case ACPI_TYPE_PACKAGE:
967
968		acpi_os_printf("[Package] Contains %d Elements:\n",
969			       obj_desc->package.count);
970
971		for (i = 0; i < obj_desc->package.count; i++) {
972			acpi_ex_dump_package_obj(obj_desc->package.elements[i],
973						 level + 1, i);
974		}
975		break;
976
977	case ACPI_TYPE_LOCAL_REFERENCE:
978
979		acpi_os_printf("[Object Reference] ");
980		acpi_ex_dump_reference_obj(obj_desc);
981		break;
982
983	default:
984
985		acpi_os_printf("[Unknown Type] %X\n",
986			       ACPI_GET_OBJECT_TYPE(obj_desc));
987		break;
988	}
989}
990
991/*******************************************************************************
992 *
993 * FUNCTION:    acpi_ex_dump_object_descriptor
994 *
995 * PARAMETERS:  obj_desc            - Descriptor to dump
996 *              Flags               - Force display if TRUE
997 *
998 * DESCRIPTION: Dumps the members of the object descriptor given.
999 *
1000 ******************************************************************************/
1001
1002void
1003acpi_ex_dump_object_descriptor(union acpi_operand_object *obj_desc, u32 flags)
1004{
1005	ACPI_FUNCTION_TRACE(ex_dump_object_descriptor);
1006
1007	if (!obj_desc) {
1008		return_VOID;
1009	}
1010
1011	if (!flags) {
1012		if (!((ACPI_LV_OBJECTS & acpi_dbg_level)
1013		      && (_COMPONENT & acpi_dbg_layer))) {
1014			return_VOID;
1015		}
1016	}
1017
1018	if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) == ACPI_DESC_TYPE_NAMED) {
1019		acpi_ex_dump_namespace_node((struct acpi_namespace_node *)
1020					    obj_desc, flags);
1021
1022		acpi_os_printf("\nAttached Object (%p):\n",
1023			       ((struct acpi_namespace_node *)obj_desc)->
1024			       object);
1025
1026		acpi_ex_dump_object_descriptor(((struct acpi_namespace_node *)
1027						obj_desc)->object, flags);
1028		return_VOID;
1029	}
1030
1031	if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) != ACPI_DESC_TYPE_OPERAND) {
1032		acpi_os_printf
1033		    ("ExDumpObjectDescriptor: %p is not an ACPI operand object: [%s]\n",
1034		     obj_desc, acpi_ut_get_descriptor_name(obj_desc));
1035		return_VOID;
1036	}
1037
1038	if (obj_desc->common.type > ACPI_TYPE_NS_NODE_MAX) {
1039		return_VOID;
1040	}
1041
1042	/* Common Fields */
1043
1044	acpi_ex_dump_object(obj_desc, acpi_ex_dump_common);
1045
1046	/* Object-specific fields */
1047
1048	acpi_ex_dump_object(obj_desc, acpi_ex_dump_info[obj_desc->common.type]);
1049	return_VOID;
1050}
1051
1052#endif
1053