ACPICA: Update debug output routines for data structure changes
[sfrench/cifs-2.6.git] / 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
63 acpi_ex_dump_object(union acpi_operand_object *obj_desc,
64                     struct acpi_exdump_info *info);
65
66 static void acpi_ex_dump_reference_obj(union acpi_operand_object *obj_desc);
67
68 static void
69 acpi_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
81 static 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
86 static 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
93 static 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
101 static 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
109 static 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
118 static 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
123 static 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
134 static 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
143 static 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
153 static 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
165 static 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
177 static 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
186 static 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
193 static 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
199 static 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
208 static 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
217 static 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
227 static 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
238 static 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
246 static 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
254 static 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
269 static 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
279 static 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
324 static void
325 acpi_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
447 void 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 (!
455                 ((ACPI_LV_EXEC & acpi_dbg_level)
456                  && (_COMPONENT & acpi_dbg_layer))) {
457                 return;
458         }
459
460         if (!obj_desc) {
461
462                 /* This could be a null element of a package */
463
464                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Null Object Descriptor\n"));
465                 return;
466         }
467
468         if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) == ACPI_DESC_TYPE_NAMED) {
469                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "%p Namespace Node: ",
470                                   obj_desc));
471                 ACPI_DUMP_ENTRY(obj_desc, ACPI_LV_EXEC);
472                 return;
473         }
474
475         if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) != ACPI_DESC_TYPE_OPERAND) {
476                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
477                                   "%p is not a node or operand object: [%s]\n",
478                                   obj_desc,
479                                   acpi_ut_get_descriptor_name(obj_desc)));
480                 ACPI_DUMP_BUFFER(obj_desc, sizeof(union acpi_operand_object));
481                 return;
482         }
483
484         /* obj_desc is a valid object */
485
486         if (depth > 0) {
487                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "%*s[%u] %p ",
488                                   depth, " ", depth, obj_desc));
489         } else {
490                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "%p ", obj_desc));
491         }
492
493         /* Decode object type */
494
495         switch (ACPI_GET_OBJECT_TYPE(obj_desc)) {
496         case ACPI_TYPE_LOCAL_REFERENCE:
497
498                 switch (obj_desc->reference.opcode) {
499                 case AML_DEBUG_OP:
500
501                         acpi_os_printf("Reference: Debug\n");
502                         break;
503
504                 case AML_NAME_OP:
505
506                         ACPI_DUMP_PATHNAME(obj_desc->reference.object,
507                                            "Reference: Name: ", ACPI_LV_INFO,
508                                            _COMPONENT);
509                         ACPI_DUMP_ENTRY(obj_desc->reference.object,
510                                         ACPI_LV_INFO);
511                         break;
512
513                 case AML_INDEX_OP:
514
515                         acpi_os_printf("Reference: Index %p\n",
516                                        obj_desc->reference.object);
517                         break;
518
519                 case AML_REF_OF_OP:
520
521                         acpi_os_printf("Reference: (RefOf) %p\n",
522                                        obj_desc->reference.object);
523                         break;
524
525                 case AML_ARG_OP:
526
527                         acpi_os_printf("Reference: Arg%d",
528                                        obj_desc->reference.offset);
529
530                         if (ACPI_GET_OBJECT_TYPE(obj_desc) == ACPI_TYPE_INTEGER) {
531
532                                 /* Value is an Integer */
533
534                                 acpi_os_printf(" value is [%8.8X%8.8x]",
535                                                ACPI_FORMAT_UINT64(obj_desc->
536                                                                   integer.
537                                                                   value));
538                         }
539
540                         acpi_os_printf("\n");
541                         break;
542
543                 case AML_LOCAL_OP:
544
545                         acpi_os_printf("Reference: Local%d",
546                                        obj_desc->reference.offset);
547
548                         if (ACPI_GET_OBJECT_TYPE(obj_desc) == ACPI_TYPE_INTEGER) {
549
550                                 /* Value is an Integer */
551
552                                 acpi_os_printf(" value is [%8.8X%8.8x]",
553                                                ACPI_FORMAT_UINT64(obj_desc->
554                                                                   integer.
555                                                                   value));
556                         }
557
558                         acpi_os_printf("\n");
559                         break;
560
561                 case AML_INT_NAMEPATH_OP:
562
563                         acpi_os_printf("Reference.Node->Name %X\n",
564                                        obj_desc->reference.node->name.integer);
565                         break;
566
567                 default:
568
569                         /* Unknown opcode */
570
571                         acpi_os_printf("Unknown Reference opcode=%X\n",
572                                        obj_desc->reference.opcode);
573                         break;
574
575                 }
576                 break;
577
578         case ACPI_TYPE_BUFFER:
579
580                 acpi_os_printf("Buffer len %X @ %p\n",
581                                obj_desc->buffer.length,
582                                obj_desc->buffer.pointer);
583
584                 length = obj_desc->buffer.length;
585                 if (length > 64) {
586                         length = 64;
587                 }
588
589                 /* Debug only -- dump the buffer contents */
590
591                 if (obj_desc->buffer.pointer) {
592                         acpi_os_printf("Buffer Contents: ");
593
594                         for (index = 0; index < length; index++) {
595                                 acpi_os_printf(" %02x",
596                                                obj_desc->buffer.pointer[index]);
597                         }
598                         acpi_os_printf("\n");
599                 }
600                 break;
601
602         case ACPI_TYPE_INTEGER:
603
604                 acpi_os_printf("Integer %8.8X%8.8X\n",
605                                ACPI_FORMAT_UINT64(obj_desc->integer.value));
606                 break;
607
608         case ACPI_TYPE_PACKAGE:
609
610                 acpi_os_printf("Package [Len %X] ElementArray %p\n",
611                                obj_desc->package.count,
612                                obj_desc->package.elements);
613
614                 /*
615                  * If elements exist, package element pointer is valid,
616                  * and debug_level exceeds 1, dump package's elements.
617                  */
618                 if (obj_desc->package.count &&
619                     obj_desc->package.elements && acpi_dbg_level > 1) {
620                         for (index = 0; index < obj_desc->package.count;
621                              index++) {
622                                 acpi_ex_dump_operand(obj_desc->package.
623                                                      elements[index],
624                                                      depth + 1);
625                         }
626                 }
627                 break;
628
629         case ACPI_TYPE_REGION:
630
631                 acpi_os_printf("Region %s (%X)",
632                                acpi_ut_get_region_name(obj_desc->region.
633                                                        space_id),
634                                obj_desc->region.space_id);
635
636                 /*
637                  * If the address and length have not been evaluated,
638                  * don't print them.
639                  */
640                 if (!(obj_desc->region.flags & AOPOBJ_DATA_VALID)) {
641                         acpi_os_printf("\n");
642                 } else {
643                         acpi_os_printf(" base %8.8X%8.8X Length %X\n",
644                                        ACPI_FORMAT_UINT64(obj_desc->region.
645                                                           address),
646                                        obj_desc->region.length);
647                 }
648                 break;
649
650         case ACPI_TYPE_STRING:
651
652                 acpi_os_printf("String length %X @ %p ",
653                                obj_desc->string.length,
654                                obj_desc->string.pointer);
655
656                 acpi_ut_print_string(obj_desc->string.pointer, ACPI_UINT8_MAX);
657                 acpi_os_printf("\n");
658                 break;
659
660         case ACPI_TYPE_LOCAL_BANK_FIELD:
661
662                 acpi_os_printf("BankField\n");
663                 break;
664
665         case ACPI_TYPE_LOCAL_REGION_FIELD:
666
667                 acpi_os_printf
668                     ("RegionField: Bits=%X AccWidth=%X Lock=%X Update=%X at byte=%X bit=%X of below:\n",
669                      obj_desc->field.bit_length,
670                      obj_desc->field.access_byte_width,
671                      obj_desc->field.field_flags & AML_FIELD_LOCK_RULE_MASK,
672                      obj_desc->field.field_flags & AML_FIELD_UPDATE_RULE_MASK,
673                      obj_desc->field.base_byte_offset,
674                      obj_desc->field.start_field_bit_offset);
675
676                 acpi_ex_dump_operand(obj_desc->field.region_obj, depth + 1);
677                 break;
678
679         case ACPI_TYPE_LOCAL_INDEX_FIELD:
680
681                 acpi_os_printf("IndexField\n");
682                 break;
683
684         case ACPI_TYPE_BUFFER_FIELD:
685
686                 acpi_os_printf("BufferField: %X bits at byte %X bit %X of\n",
687                                obj_desc->buffer_field.bit_length,
688                                obj_desc->buffer_field.base_byte_offset,
689                                obj_desc->buffer_field.start_field_bit_offset);
690
691                 if (!obj_desc->buffer_field.buffer_obj) {
692                         ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "*NULL*\n"));
693                 } else
694                     if (ACPI_GET_OBJECT_TYPE(obj_desc->buffer_field.buffer_obj)
695                         != ACPI_TYPE_BUFFER) {
696                         acpi_os_printf("*not a Buffer*\n");
697                 } else {
698                         acpi_ex_dump_operand(obj_desc->buffer_field.buffer_obj,
699                                              depth + 1);
700                 }
701                 break;
702
703         case ACPI_TYPE_EVENT:
704
705                 acpi_os_printf("Event\n");
706                 break;
707
708         case ACPI_TYPE_METHOD:
709
710                 acpi_os_printf("Method(%X) @ %p:%X\n",
711                                obj_desc->method.param_count,
712                                obj_desc->method.aml_start,
713                                obj_desc->method.aml_length);
714                 break;
715
716         case ACPI_TYPE_MUTEX:
717
718                 acpi_os_printf("Mutex\n");
719                 break;
720
721         case ACPI_TYPE_DEVICE:
722
723                 acpi_os_printf("Device\n");
724                 break;
725
726         case ACPI_TYPE_POWER:
727
728                 acpi_os_printf("Power\n");
729                 break;
730
731         case ACPI_TYPE_PROCESSOR:
732
733                 acpi_os_printf("Processor\n");
734                 break;
735
736         case ACPI_TYPE_THERMAL:
737
738                 acpi_os_printf("Thermal\n");
739                 break;
740
741         default:
742                 /* Unknown Type */
743
744                 acpi_os_printf("Unknown Type %X\n",
745                                ACPI_GET_OBJECT_TYPE(obj_desc));
746                 break;
747         }
748
749         return;
750 }
751
752 /*******************************************************************************
753  *
754  * FUNCTION:    acpi_ex_dump_operands
755  *
756  * PARAMETERS:  Operands            - Operand list
757  *              interpreter_mode    - Load or Exec
758  *              Ident               - Identification
759  *              num_levels          - # of stack entries to dump above line
760  *              Note                - Output notation
761  *              module_name         - Caller's module name
762  *              line_number         - Caller's invocation line number
763  *
764  * DESCRIPTION: Dump the object stack
765  *
766  ******************************************************************************/
767
768 void
769 acpi_ex_dump_operands(union acpi_operand_object **operands,
770                       acpi_interpreter_mode interpreter_mode,
771                       char *ident,
772                       u32 num_levels,
773                       char *note, char *module_name, u32 line_number)
774 {
775         acpi_native_uint i;
776
777         ACPI_FUNCTION_NAME(ex_dump_operands);
778
779         if (!ident) {
780                 ident = "?";
781         }
782
783         if (!note) {
784                 note = "?";
785         }
786
787         ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
788                           "************* Operand Stack Contents (Opcode [%s], %d Operands)\n",
789                           ident, num_levels));
790
791         if (num_levels == 0) {
792                 num_levels = 1;
793         }
794
795         /* Dump the operand stack starting at the top */
796
797         for (i = 0; num_levels > 0; i--, num_levels--) {
798                 acpi_ex_dump_operand(operands[i], 0);
799         }
800
801         ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
802                           "************* Operand Stack dump from %s(%d), %s\n",
803                           module_name, line_number, note));
804         return;
805 }
806
807 /*******************************************************************************
808  *
809  * FUNCTION:    acpi_ex_out* functions
810  *
811  * PARAMETERS:  Title               - Descriptive text
812  *              Value               - Value to be displayed
813  *
814  * DESCRIPTION: Object dump output formatting functions.  These functions
815  *              reduce the number of format strings required and keeps them
816  *              all in one place for easy modification.
817  *
818  ******************************************************************************/
819
820 static void acpi_ex_out_string(char *title, char *value)
821 {
822         acpi_os_printf("%20s : %s\n", title, value);
823 }
824
825 static void acpi_ex_out_pointer(char *title, void *value)
826 {
827         acpi_os_printf("%20s : %p\n", title, value);
828 }
829
830 /*******************************************************************************
831  *
832  * FUNCTION:    acpi_ex_dump_namespace_node
833  *
834  * PARAMETERS:  Node                - Descriptor to dump
835  *              Flags               - Force display if TRUE
836  *
837  * DESCRIPTION: Dumps the members of the given.Node
838  *
839  ******************************************************************************/
840
841 void acpi_ex_dump_namespace_node(struct acpi_namespace_node *node, u32 flags)
842 {
843
844         ACPI_FUNCTION_ENTRY();
845
846         if (!flags) {
847                 if (!
848                     ((ACPI_LV_OBJECTS & acpi_dbg_level)
849                      && (_COMPONENT & acpi_dbg_layer))) {
850                         return;
851                 }
852         }
853
854         acpi_os_printf("%20s : %4.4s\n", "Name", acpi_ut_get_node_name(node));
855         acpi_ex_out_string("Type", acpi_ut_get_type_name(node->type));
856         acpi_ex_out_pointer("Attached Object",
857                             acpi_ns_get_attached_object(node));
858         acpi_ex_out_pointer("Parent", acpi_ns_get_parent_node(node));
859
860         acpi_ex_dump_object(ACPI_CAST_PTR(union acpi_operand_object, node),
861                             acpi_ex_dump_node);
862 }
863
864 /*******************************************************************************
865  *
866  * FUNCTION:    acpi_ex_dump_reference_obj
867  *
868  * PARAMETERS:  Object              - Descriptor to dump
869  *
870  * DESCRIPTION: Dumps a reference object
871  *
872  ******************************************************************************/
873
874 static void acpi_ex_dump_reference_obj(union acpi_operand_object *obj_desc)
875 {
876         struct acpi_buffer ret_buf;
877         acpi_status status;
878
879         ret_buf.length = ACPI_ALLOCATE_LOCAL_BUFFER;
880
881         if (obj_desc->reference.opcode == AML_INT_NAMEPATH_OP) {
882                 acpi_os_printf("Named Object %p ", obj_desc->reference.node);
883
884                 status =
885                     acpi_ns_handle_to_pathname(obj_desc->reference.node,
886                                                &ret_buf);
887                 if (ACPI_FAILURE(status)) {
888                         acpi_os_printf("Could not convert name to pathname\n");
889                 } else {
890                         acpi_os_printf("%s\n", (char *)ret_buf.pointer);
891                         ACPI_FREE(ret_buf.pointer);
892                 }
893         } else if (obj_desc->reference.object) {
894                 acpi_os_printf("\nReferenced Object: %p\n",
895                                obj_desc->reference.object);
896         }
897 }
898
899 /*******************************************************************************
900  *
901  * FUNCTION:    acpi_ex_dump_package_obj
902  *
903  * PARAMETERS:  obj_desc            - Descriptor to dump
904  *              Level               - Indentation Level
905  *              Index               - Package index for this object
906  *
907  * DESCRIPTION: Dumps the elements of the package
908  *
909  ******************************************************************************/
910
911 static void
912 acpi_ex_dump_package_obj(union acpi_operand_object *obj_desc,
913                          u32 level, u32 index)
914 {
915         u32 i;
916
917         /* Indentation and index output */
918
919         if (level > 0) {
920                 for (i = 0; i < level; i++) {
921                         acpi_os_printf(" ");
922                 }
923
924                 acpi_os_printf("[%.2d] ", index);
925         }
926
927         acpi_os_printf("%p ", obj_desc);
928
929         /* Null package elements are allowed */
930
931         if (!obj_desc) {
932                 acpi_os_printf("[Null Object]\n");
933                 return;
934         }
935
936         /* Packages may only contain a few object types */
937
938         switch (ACPI_GET_OBJECT_TYPE(obj_desc)) {
939         case ACPI_TYPE_INTEGER:
940
941                 acpi_os_printf("[Integer] = %8.8X%8.8X\n",
942                                ACPI_FORMAT_UINT64(obj_desc->integer.value));
943                 break;
944
945         case ACPI_TYPE_STRING:
946
947                 acpi_os_printf("[String] Value: ");
948                 for (i = 0; i < obj_desc->string.length; i++) {
949                         acpi_os_printf("%c", obj_desc->string.pointer[i]);
950                 }
951                 acpi_os_printf("\n");
952                 break;
953
954         case ACPI_TYPE_BUFFER:
955
956                 acpi_os_printf("[Buffer] Length %.2X = ",
957                                obj_desc->buffer.length);
958                 if (obj_desc->buffer.length) {
959                         acpi_ut_dump_buffer(ACPI_CAST_PTR
960                                             (u8, obj_desc->buffer.pointer),
961                                             obj_desc->buffer.length,
962                                             DB_DWORD_DISPLAY, _COMPONENT);
963                 } else {
964                         acpi_os_printf("\n");
965                 }
966                 break;
967
968         case ACPI_TYPE_PACKAGE:
969
970                 acpi_os_printf("[Package] Contains %d Elements:\n",
971                                obj_desc->package.count);
972
973                 for (i = 0; i < obj_desc->package.count; i++) {
974                         acpi_ex_dump_package_obj(obj_desc->package.elements[i],
975                                                  level + 1, i);
976                 }
977                 break;
978
979         case ACPI_TYPE_LOCAL_REFERENCE:
980
981                 acpi_os_printf("[Object Reference] ");
982                 acpi_ex_dump_reference_obj(obj_desc);
983                 break;
984
985         default:
986
987                 acpi_os_printf("[Unknown Type] %X\n",
988                                ACPI_GET_OBJECT_TYPE(obj_desc));
989                 break;
990         }
991 }
992
993 /*******************************************************************************
994  *
995  * FUNCTION:    acpi_ex_dump_object_descriptor
996  *
997  * PARAMETERS:  obj_desc            - Descriptor to dump
998  *              Flags               - Force display if TRUE
999  *
1000  * DESCRIPTION: Dumps the members of the object descriptor given.
1001  *
1002  ******************************************************************************/
1003
1004 void
1005 acpi_ex_dump_object_descriptor(union acpi_operand_object *obj_desc, u32 flags)
1006 {
1007         ACPI_FUNCTION_TRACE(ex_dump_object_descriptor);
1008
1009         if (!obj_desc) {
1010                 return_VOID;
1011         }
1012
1013         if (!flags) {
1014                 if (!
1015                     ((ACPI_LV_OBJECTS & acpi_dbg_level)
1016                      && (_COMPONENT & acpi_dbg_layer))) {
1017                         return_VOID;
1018                 }
1019         }
1020
1021         if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) == ACPI_DESC_TYPE_NAMED) {
1022                 acpi_ex_dump_namespace_node((struct acpi_namespace_node *)
1023                                             obj_desc, flags);
1024
1025                 acpi_os_printf("\nAttached Object (%p):\n",
1026                                ((struct acpi_namespace_node *)obj_desc)->
1027                                object);
1028
1029                 acpi_ex_dump_object_descriptor(((struct acpi_namespace_node *)
1030                                                 obj_desc)->object, flags);
1031                 return_VOID;
1032         }
1033
1034         if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) != ACPI_DESC_TYPE_OPERAND) {
1035                 acpi_os_printf
1036                     ("ExDumpObjectDescriptor: %p is not an ACPI operand object: [%s]\n",
1037                      obj_desc, acpi_ut_get_descriptor_name(obj_desc));
1038                 return_VOID;
1039         }
1040
1041         if (obj_desc->common.type > ACPI_TYPE_NS_NODE_MAX) {
1042                 return_VOID;
1043         }
1044
1045         /* Common Fields */
1046
1047         acpi_ex_dump_object(obj_desc, acpi_ex_dump_common);
1048
1049         /* Object-specific fields */
1050
1051         acpi_ex_dump_object(obj_desc, acpi_ex_dump_info[obj_desc->common.type]);
1052         return_VOID;
1053 }
1054
1055 #endif