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