drivers/acpi/executer/exdump.c

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