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