drivers/acpi/executer/exdump.c

   1 /******************************************************************************
   2  *
   3  * Module Name: exdump - Interpreter debug output routines
   4  *
   5  *****************************************************************************/
   6
   7 /*
   8  * Copyright (C) 2000 - 2008, Intel Corp.
   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 (!((ACPI_LV_EXEC & acpi_dbg_level)
 455                   && (_COMPONENT & acpi_dbg_layer))) {
 456                 return;
 457         }
 458
 459         if (!obj_desc) {
 460
 461                 /* This could be a null element of a package */
 462
 463                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Null Object Descriptor\n"));
 464                 return;
 465         }
 466
 467         if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) == ACPI_DESC_TYPE_NAMED) {
 468                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "%p Namespace Node: ",
 469                                   obj_desc));
 470                 ACPI_DUMP_ENTRY(obj_desc, ACPI_LV_EXEC);
 471                 return;
 472         }
 473
 474         if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) != ACPI_DESC_TYPE_OPERAND) {
 475                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
 476                                   "%p is not a node or operand object: [%s]\n",
 477                                   obj_desc,
 478                                   acpi_ut_get_descriptor_name(obj_desc)));
 479                 ACPI_DUMP_BUFFER(obj_desc, sizeof(union acpi_operand_object));
 480                 return;
 481         }
 482
 483         /* obj_desc is a valid object */
 484
 485         if (depth > 0) {
 486                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "%*s[%u] %p ",
 487                                   depth, " ", depth, obj_desc));
 488         } else {
 489                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "%p ", obj_desc));
 490         }
 491
 492         /* Decode object type */
 493
 494         switch (ACPI_GET_OBJECT_TYPE(obj_desc)) {
 495         case ACPI_TYPE_LOCAL_REFERENCE:
 496
 497                 switch (obj_desc->reference.opcode) {
 498                 case AML_DEBUG_OP:
 499
 500                         acpi_os_printf("Reference: Debug\n");
 501                         break;
 502
 503                 case AML_INDEX_OP:
 504
 505                         acpi_os_printf("Reference: Index %p\n",
 506                                        obj_desc->reference.object);
 507                         break;
 508
 509                 case AML_LOAD_OP:
 510
 511                         acpi_os_printf("Reference: [DdbHandle] TableIndex %p\n",
 512                                        obj_desc->reference.object);
 513                         break;
 514
 515                 case AML_REF_OF_OP:
 516
 517                         acpi_os_printf("Reference: (RefOf) %p [%s]\n",
 518                                        obj_desc->reference.object,
 519                                        acpi_ut_get_type_name(((union
 520                                                                acpi_operand_object
 521                                                                *)obj_desc->
 522                                                               reference.
 523                                                               object)->common.
 524                                                              type));
 525                         break;
 526
 527                 case AML_ARG_OP:
 528
 529                         acpi_os_printf("Reference: Arg%d",
 530                                        obj_desc->reference.offset);
 531
 532                         if (ACPI_GET_OBJECT_TYPE(obj_desc) == ACPI_TYPE_INTEGER) {
 533
 534                                 /* Value is an Integer */
 535
 536                                 acpi_os_printf(" value is [%8.8X%8.8x]",
 537                                                ACPI_FORMAT_UINT64(obj_desc->
 538                                                                   integer.
 539                                                                   value));
 540                         }
 541
 542                         acpi_os_printf("\n");
 543                         break;
 544
 545                 case AML_LOCAL_OP:
 546
 547                         acpi_os_printf("Reference: Local%d",
 548                                        obj_desc->reference.offset);
 549
 550                         if (ACPI_GET_OBJECT_TYPE(obj_desc) == ACPI_TYPE_INTEGER) {
 551
 552                                 /* Value is an Integer */
 553
 554                                 acpi_os_printf(" value is [%8.8X%8.8x]",
 555                                                ACPI_FORMAT_UINT64(obj_desc->
 556                                                                   integer.
 557                                                                   value));
 558                         }
 559
 560                         acpi_os_printf("\n");
 561                         break;
 562
 563                 case AML_INT_NAMEPATH_OP:
 564
 565                         acpi_os_printf("Reference: Namepath %X [%4.4s]\n",
 566                                        obj_desc->reference.node->name.integer,
 567                                        obj_desc->reference.node->name.ascii);
 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] ElementArray %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_NATIVE_UINT(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("BankField\n");
 666                 break;
 667
 668         case ACPI_TYPE_LOCAL_REGION_FIELD:
 669
 670                 acpi_os_printf
 671                     ("RegionField: Bits=%X AccWidth=%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("IndexField\n");
 685                 break;
 686
 687         case ACPI_TYPE_BUFFER_FIELD:
 688
 689                 acpi_os_printf("BufferField: %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 /*******************************************************************************
 834  *
 835  * FUNCTION:    acpi_ex_dump_namespace_node
 836  *
 837  * PARAMETERS:  Node                - Descriptor to dump
 838  *              Flags               - Force display if TRUE
 839  *
 840  * DESCRIPTION: Dumps the members of the given.Node
 841  *
 842  ******************************************************************************/
 843
 844 void acpi_ex_dump_namespace_node(struct acpi_namespace_node *node, u32 flags)
 845 {
 846
 847         ACPI_FUNCTION_ENTRY();
 848
 849         if (!flags) {
 850                 if (!((ACPI_LV_OBJECTS & acpi_dbg_level)
 851                       && (_COMPONENT & acpi_dbg_layer))) {
 852                         return;
 853                 }
 854         }
 855
 856         acpi_os_printf("%20s : %4.4s\n", "Name", acpi_ut_get_node_name(node));
 857         acpi_ex_out_string("Type", acpi_ut_get_type_name(node->type));
 858         acpi_ex_out_pointer("Attached Object",
 859                             acpi_ns_get_attached_object(node));
 860         acpi_ex_out_pointer("Parent", acpi_ns_get_parent_node(node));
 861
 862         acpi_ex_dump_object(ACPI_CAST_PTR(union acpi_operand_object, node),
 863                             acpi_ex_dump_node);
 864 }
 865
 866 /*******************************************************************************
 867  *
 868  * FUNCTION:    acpi_ex_dump_reference_obj
 869  *
 870  * PARAMETERS:  Object              - Descriptor to dump
 871  *
 872  * DESCRIPTION: Dumps a reference object
 873  *
 874  ******************************************************************************/
 875
 876 static void acpi_ex_dump_reference_obj(union acpi_operand_object *obj_desc)
 877 {
 878         struct acpi_buffer ret_buf;
 879         acpi_status status;
 880
 881         ret_buf.length = ACPI_ALLOCATE_LOCAL_BUFFER;
 882
 883         if (obj_desc->reference.opcode == AML_INT_NAMEPATH_OP) {
 884                 acpi_os_printf(" Named Object %p ", obj_desc->reference.node);
 885
 886                 status =
 887                     acpi_ns_handle_to_pathname(obj_desc->reference.node,
 888                                                &ret_buf);
 889                 if (ACPI_FAILURE(status)) {
 890                         acpi_os_printf(" Could not convert name to pathname\n");
 891                 } else {
 892                         acpi_os_printf("%s\n", (char *)ret_buf.pointer);
 893                         ACPI_FREE(ret_buf.pointer);
 894                 }
 895         } else if (obj_desc->reference.object) {
 896                 if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) ==
 897                     ACPI_DESC_TYPE_OPERAND) {
 898                         acpi_os_printf(" Target: %p",
 899                                        obj_desc->reference.object);
 900                         if (obj_desc->reference.opcode == AML_LOAD_OP) {
 901                                 /*
 902                                  * For DDBHandle reference,
 903                                  * obj_desc->Reference.Object is the table index
 904                                  */
 905                                 acpi_os_printf(" [DDBHandle]\n");
 906                         } else {
 907                                 acpi_os_printf(" [%s]\n",
 908                                                acpi_ut_get_type_name(((union
 909                                                                        acpi_operand_object
 910                                                                        *)
 911                                                                       obj_desc->
 912                                                                       reference.
 913                                                                       object)->
 914                                                                      common.
 915                                                                      type));
 916                         }
 917                 } else {
 918                         acpi_os_printf(" Target: %p\n",
 919                                        obj_desc->reference.object);
 920                 }
 921         }
 922 }
 923
 924 /*******************************************************************************
 925  *
 926  * FUNCTION:    acpi_ex_dump_package_obj
 927  *
 928  * PARAMETERS:  obj_desc            - Descriptor to dump
 929  *              Level               - Indentation Level
 930  *              Index               - Package index for this object
 931  *
 932  * DESCRIPTION: Dumps the elements of the package
 933  *
 934  ******************************************************************************/
 935
 936 static void
 937 acpi_ex_dump_package_obj(union acpi_operand_object *obj_desc,
 938                          u32 level, u32 index)
 939 {
 940         u32 i;
 941
 942         /* Indentation and index output */
 943
 944         if (level > 0) {
 945                 for (i = 0; i < level; i++) {
 946                         acpi_os_printf(" ");
 947                 }
 948
 949                 acpi_os_printf("[%.2d] ", index);
 950         }
 951
 952         acpi_os_printf("%p ", obj_desc);
 953
 954         /* Null package elements are allowed */
 955
 956         if (!obj_desc) {
 957                 acpi_os_printf("[Null Object]\n");
 958                 return;
 959         }
 960
 961         /* Packages may only contain a few object types */
 962
 963         switch (ACPI_GET_OBJECT_TYPE(obj_desc)) {
 964         case ACPI_TYPE_INTEGER:
 965
 966                 acpi_os_printf("[Integer] = %8.8X%8.8X\n",
 967                                ACPI_FORMAT_UINT64(obj_desc->integer.value));
 968                 break;
 969
 970         case ACPI_TYPE_STRING:
 971
 972                 acpi_os_printf("[String] Value: ");
 973                 for (i = 0; i < obj_desc->string.length; i++) {
 974                         acpi_os_printf("%c", obj_desc->string.pointer[i]);
 975                 }
 976                 acpi_os_printf("\n");
 977                 break;
 978
 979         case ACPI_TYPE_BUFFER:
 980
 981                 acpi_os_printf("[Buffer] Length %.2X = ",
 982                                obj_desc->buffer.length);
 983                 if (obj_desc->buffer.length) {
 984                         acpi_ut_dump_buffer(ACPI_CAST_PTR
 985                                             (u8, obj_desc->buffer.pointer),
 986                                             obj_desc->buffer.length,
 987                                             DB_DWORD_DISPLAY, _COMPONENT);
 988                 } else {
 989                         acpi_os_printf("\n");
 990                 }
 991                 break;
 992
 993         case ACPI_TYPE_PACKAGE:
 994
 995                 acpi_os_printf("[Package] Contains %d Elements:\n",
 996                                obj_desc->package.count);
 997
 998                 for (i = 0; i < obj_desc->package.count; i++) {
 999                         acpi_ex_dump_package_obj(obj_desc->package.elements[i],
1000                                                  level + 1, i);
1001                 }
1002                 break;
1003
1004         case ACPI_TYPE_LOCAL_REFERENCE:
1005
1006                 acpi_os_printf("[Object Reference] %s",
1007                                (acpi_ps_get_opcode_info
1008                                 (obj_desc->reference.opcode))->name);
1009                 acpi_ex_dump_reference_obj(obj_desc);
1010                 break;
1011
1012         default:
1013
1014                 acpi_os_printf("[Unknown Type] %X\n",
1015                                ACPI_GET_OBJECT_TYPE(obj_desc));
1016                 break;
1017         }
1018 }
1019
1020 /*******************************************************************************
1021  *
1022  * FUNCTION:    acpi_ex_dump_object_descriptor
1023  *
1024  * PARAMETERS:  obj_desc            - Descriptor to dump
1025  *              Flags               - Force display if TRUE
1026  *
1027  * DESCRIPTION: Dumps the members of the object descriptor given.
1028  *
1029  ******************************************************************************/
1030
1031 void
1032 acpi_ex_dump_object_descriptor(union acpi_operand_object *obj_desc, u32 flags)
1033 {
1034         ACPI_FUNCTION_TRACE(ex_dump_object_descriptor);
1035
1036         if (!obj_desc) {
1037                 return_VOID;
1038         }
1039
1040         if (!flags) {
1041                 if (!((ACPI_LV_OBJECTS & acpi_dbg_level)
1042                       && (_COMPONENT & acpi_dbg_layer))) {
1043                         return_VOID;
1044                 }
1045         }
1046
1047         if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) == ACPI_DESC_TYPE_NAMED) {
1048                 acpi_ex_dump_namespace_node((struct acpi_namespace_node *)
1049                                             obj_desc, flags);
1050
1051                 acpi_os_printf("\nAttached Object (%p):\n",
1052                                ((struct acpi_namespace_node *)obj_desc)->
1053                                object);
1054
1055                 acpi_ex_dump_object_descriptor(((struct acpi_namespace_node *)
1056                                                 obj_desc)->object, flags);
1057                 return_VOID;
1058         }
1059
1060         if (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) != ACPI_DESC_TYPE_OPERAND) {
1061                 acpi_os_printf
1062                     ("ExDumpObjectDescriptor: %p is not an ACPI operand object: [%s]\n",
1063                      obj_desc, acpi_ut_get_descriptor_name(obj_desc));
1064                 return_VOID;
1065         }
1066
1067         if (obj_desc->common.type > ACPI_TYPE_NS_NODE_MAX) {
1068                 return_VOID;
1069         }
1070
1071         /* Common Fields */
1072
1073         acpi_ex_dump_object(obj_desc, acpi_ex_dump_common);
1074
1075         /* Object-specific fields */
1076
1077         acpi_ex_dump_object(obj_desc, acpi_ex_dump_info[obj_desc->common.type]);
1078         return_VOID;
1079 }
1080
1081 #endif