drivers/acpi/acpica/dbcmds.c

   1 /*******************************************************************************
   2  *
   3  * Module Name: dbcmds - Miscellaneous debug commands and output routines
   4  *
   5  ******************************************************************************/
   6
   7 /*
   8  * Copyright (C) 2000 - 2015, 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 "accommon.h"
  46 #include "acevents.h"
  47 #include "acdebug.h"
  48 #include "acnamesp.h"
  49 #include "acresrc.h"
  50 #include "actables.h"
  51
  52 #define _COMPONENT          ACPI_CA_DEBUGGER
  53 ACPI_MODULE_NAME("dbcmds")
  54
  55 /* Local prototypes */
  56 static void
  57 acpi_dm_compare_aml_resources(u8 *aml1_buffer,
  58                               acpi_rsdesc_size aml1_buffer_length,
  59                               u8 *aml2_buffer,
  60                               acpi_rsdesc_size aml2_buffer_length);
  61
  62 static acpi_status
  63 acpi_dm_test_resource_conversion(struct acpi_namespace_node *node, char *name);
  64
  65 static acpi_status
  66 acpi_db_resource_callback(struct acpi_resource *resource, void *context);
  67
  68 static acpi_status
  69 acpi_db_device_resources(acpi_handle obj_handle,
  70                          u32 nesting_level, void *context, void **return_value);
  71
  72 static void acpi_db_do_one_sleep_state(u8 sleep_state);
  73
  74 static char *acpi_db_trace_method_name = NULL;
  75
  76 /*******************************************************************************
  77  *
  78  * FUNCTION:    acpi_db_convert_to_node
  79  *
  80  * PARAMETERS:  in_string           - String to convert
  81  *
  82  * RETURN:      Pointer to a NS node
  83  *
  84  * DESCRIPTION: Convert a string to a valid NS pointer. Handles numeric or
  85  *              alphanumeric strings.
  86  *
  87  ******************************************************************************/
  88
  89 struct acpi_namespace_node *acpi_db_convert_to_node(char *in_string)
  90 {
  91         struct acpi_namespace_node *node;
  92         acpi_size address;
  93
  94         if ((*in_string >= 0x30) && (*in_string <= 0x39)) {
  95
  96                 /* Numeric argument, convert */
  97
  98                 address = strtoul(in_string, NULL, 16);
  99                 node = ACPI_TO_POINTER(address);
 100                 if (!acpi_os_readable(node, sizeof(struct acpi_namespace_node))) {
 101                         acpi_os_printf("Address %p is invalid", node);
 102                         return (NULL);
 103                 }
 104
 105                 /* Make sure pointer is valid NS node */
 106
 107                 if (ACPI_GET_DESCRIPTOR_TYPE(node) != ACPI_DESC_TYPE_NAMED) {
 108                         acpi_os_printf
 109                             ("Address %p is not a valid namespace node [%s]\n",
 110                              node, acpi_ut_get_descriptor_name(node));
 111                         return (NULL);
 112                 }
 113         } else {
 114                 /*
 115                  * Alpha argument: The parameter is a name string that must be
 116                  * resolved to a Namespace object.
 117                  */
 118                 node = acpi_db_local_ns_lookup(in_string);
 119                 if (!node) {
 120                         acpi_os_printf
 121                             ("Could not find [%s] in namespace, defaulting to root node\n",
 122                              in_string);
 123                         node = acpi_gbl_root_node;
 124                 }
 125         }
 126
 127         return (node);
 128 }
 129
 130 /*******************************************************************************
 131  *
 132  * FUNCTION:    acpi_db_sleep
 133  *
 134  * PARAMETERS:  object_arg          - Desired sleep state (0-5). NULL means
 135  *                                    invoke all possible sleep states.
 136  *
 137  * RETURN:      Status
 138  *
 139  * DESCRIPTION: Simulate sleep/wake sequences
 140  *
 141  ******************************************************************************/
 142
 143 acpi_status acpi_db_sleep(char *object_arg)
 144 {
 145         u8 sleep_state;
 146         u32 i;
 147
 148         ACPI_FUNCTION_TRACE(acpi_db_sleep);
 149
 150         /* Null input (no arguments) means to invoke all sleep states */
 151
 152         if (!object_arg) {
 153                 acpi_os_printf("Invoking all possible sleep states, 0-%d\n",
 154                                ACPI_S_STATES_MAX);
 155
 156                 for (i = 0; i <= ACPI_S_STATES_MAX; i++) {
 157                         acpi_db_do_one_sleep_state((u8)i);
 158                 }
 159
 160                 return_ACPI_STATUS(AE_OK);
 161         }
 162
 163         /* Convert argument to binary and invoke the sleep state */
 164
 165         sleep_state = (u8)strtoul(object_arg, NULL, 0);
 166         acpi_db_do_one_sleep_state(sleep_state);
 167         return_ACPI_STATUS(AE_OK);
 168 }
 169
 170 /*******************************************************************************
 171  *
 172  * FUNCTION:    acpi_db_do_one_sleep_state
 173  *
 174  * PARAMETERS:  sleep_state         - Desired sleep state (0-5)
 175  *
 176  * RETURN:      None
 177  *
 178  * DESCRIPTION: Simulate a sleep/wake sequence
 179  *
 180  ******************************************************************************/
 181
 182 static void acpi_db_do_one_sleep_state(u8 sleep_state)
 183 {
 184         acpi_status status;
 185         u8 sleep_type_a;
 186         u8 sleep_type_b;
 187
 188         /* Validate parameter */
 189
 190         if (sleep_state > ACPI_S_STATES_MAX) {
 191                 acpi_os_printf("Sleep state %d out of range (%d max)\n",
 192                                sleep_state, ACPI_S_STATES_MAX);
 193                 return;
 194         }
 195
 196         acpi_os_printf("\n---- Invoking sleep state S%d (%s):\n",
 197                        sleep_state, acpi_gbl_sleep_state_names[sleep_state]);
 198
 199         /* Get the values for the sleep type registers (for display only) */
 200
 201         status =
 202             acpi_get_sleep_type_data(sleep_state, &sleep_type_a, &sleep_type_b);
 203         if (ACPI_FAILURE(status)) {
 204                 acpi_os_printf("Could not evaluate [%s] method, %s\n",
 205                                acpi_gbl_sleep_state_names[sleep_state],
 206                                acpi_format_exception(status));
 207                 return;
 208         }
 209
 210         acpi_os_printf
 211             ("Register values for sleep state S%d: Sleep-A: %.2X, Sleep-B: %.2X\n",
 212              sleep_state, sleep_type_a, sleep_type_b);
 213
 214         /* Invoke the various sleep/wake interfaces */
 215
 216         acpi_os_printf("**** Sleep: Prepare to sleep (S%d) ****\n",
 217                        sleep_state);
 218         status = acpi_enter_sleep_state_prep(sleep_state);
 219         if (ACPI_FAILURE(status)) {
 220                 goto error_exit;
 221         }
 222
 223         acpi_os_printf("**** Sleep: Going to sleep (S%d) ****\n", sleep_state);
 224         status = acpi_enter_sleep_state(sleep_state);
 225         if (ACPI_FAILURE(status)) {
 226                 goto error_exit;
 227         }
 228
 229         acpi_os_printf("**** Wake: Prepare to return from sleep (S%d) ****\n",
 230                        sleep_state);
 231         status = acpi_leave_sleep_state_prep(sleep_state);
 232         if (ACPI_FAILURE(status)) {
 233                 goto error_exit;
 234         }
 235
 236         acpi_os_printf("**** Wake: Return from sleep (S%d) ****\n",
 237                        sleep_state);
 238         status = acpi_leave_sleep_state(sleep_state);
 239         if (ACPI_FAILURE(status)) {
 240                 goto error_exit;
 241         }
 242
 243         return;
 244
 245 error_exit:
 246         ACPI_EXCEPTION((AE_INFO, status, "During invocation of sleep state S%d",
 247                         sleep_state));
 248 }
 249
 250 /*******************************************************************************
 251  *
 252  * FUNCTION:    acpi_db_display_locks
 253  *
 254  * PARAMETERS:  None
 255  *
 256  * RETURN:      None
 257  *
 258  * DESCRIPTION: Display information about internal mutexes.
 259  *
 260  ******************************************************************************/
 261
 262 void acpi_db_display_locks(void)
 263 {
 264         u32 i;
 265
 266         for (i = 0; i < ACPI_MAX_MUTEX; i++) {
 267                 acpi_os_printf("%26s : %s\n", acpi_ut_get_mutex_name(i),
 268                                acpi_gbl_mutex_info[i].thread_id ==
 269                                ACPI_MUTEX_NOT_ACQUIRED ? "Locked" : "Unlocked");
 270         }
 271 }
 272
 273 /*******************************************************************************
 274  *
 275  * FUNCTION:    acpi_db_display_table_info
 276  *
 277  * PARAMETERS:  table_arg           - Name of table to be displayed
 278  *
 279  * RETURN:      None
 280  *
 281  * DESCRIPTION: Display information about loaded tables. Current
 282  *              implementation displays all loaded tables.
 283  *
 284  ******************************************************************************/
 285
 286 void acpi_db_display_table_info(char *table_arg)
 287 {
 288         u32 i;
 289         struct acpi_table_desc *table_desc;
 290         acpi_status status;
 291
 292         /* Header */
 293
 294         acpi_os_printf("Idx ID  Status Type                    "
 295                        "TableHeader (Sig, Address, Length, Misc)\n");
 296
 297         /* Walk the entire root table list */
 298
 299         for (i = 0; i < acpi_gbl_root_table_list.current_table_count; i++) {
 300                 table_desc = &acpi_gbl_root_table_list.tables[i];
 301
 302                 /* Index and Table ID */
 303
 304                 acpi_os_printf("%3u %.2u ", i, table_desc->owner_id);
 305
 306                 /* Decode the table flags */
 307
 308                 if (!(table_desc->flags & ACPI_TABLE_IS_LOADED)) {
 309                         acpi_os_printf("NotLoaded ");
 310                 } else {
 311                         acpi_os_printf(" Loaded ");
 312                 }
 313
 314                 switch (table_desc->flags & ACPI_TABLE_ORIGIN_MASK) {
 315                 case ACPI_TABLE_ORIGIN_EXTERNAL_VIRTUAL:
 316
 317                         acpi_os_printf("External/virtual ");
 318                         break;
 319
 320                 case ACPI_TABLE_ORIGIN_INTERNAL_PHYSICAL:
 321
 322                         acpi_os_printf("Internal/physical ");
 323                         break;
 324
 325                 case ACPI_TABLE_ORIGIN_INTERNAL_VIRTUAL:
 326
 327                         acpi_os_printf("Internal/virtual ");
 328                         break;
 329
 330                 default:
 331
 332                         acpi_os_printf("INVALID TYPE    ");
 333                         break;
 334                 }
 335
 336                 /* Make sure that the table is mapped */
 337
 338                 status = acpi_tb_validate_table(table_desc);
 339                 if (ACPI_FAILURE(status)) {
 340                         return;
 341                 }
 342
 343                 /* Dump the table header */
 344
 345                 if (table_desc->pointer) {
 346                         acpi_tb_print_table_header(table_desc->address,
 347                                                    table_desc->pointer);
 348                 } else {
 349                         /* If the pointer is null, the table has been unloaded */
 350
 351                         ACPI_INFO((AE_INFO, "%4.4s - Table has been unloaded",
 352                                    table_desc->signature.ascii));
 353                 }
 354         }
 355 }
 356
 357 /*******************************************************************************
 358  *
 359  * FUNCTION:    acpi_db_unload_acpi_table
 360  *
 361  * PARAMETERS:  object_name         - Namespace pathname for an object that
 362  *                                    is owned by the table to be unloaded
 363  *
 364  * RETURN:      None
 365  *
 366  * DESCRIPTION: Unload an ACPI table, via any namespace node that is owned
 367  *              by the table.
 368  *
 369  ******************************************************************************/
 370
 371 void acpi_db_unload_acpi_table(char *object_name)
 372 {
 373         struct acpi_namespace_node *node;
 374         acpi_status status;
 375
 376         /* Translate name to an Named object */
 377
 378         node = acpi_db_convert_to_node(object_name);
 379         if (!node) {
 380                 return;
 381         }
 382
 383         status = acpi_unload_parent_table(ACPI_CAST_PTR(acpi_handle, node));
 384         if (ACPI_SUCCESS(status)) {
 385                 acpi_os_printf("Parent of [%s] (%p) unloaded and uninstalled\n",
 386                                object_name, node);
 387         } else {
 388                 acpi_os_printf("%s, while unloading parent table of [%s]\n",
 389                                acpi_format_exception(status), object_name);
 390         }
 391 }
 392
 393 /*******************************************************************************
 394  *
 395  * FUNCTION:    acpi_db_send_notify
 396  *
 397  * PARAMETERS:  name                - Name of ACPI object where to send notify
 398  *              value               - Value of the notify to send.
 399  *
 400  * RETURN:      None
 401  *
 402  * DESCRIPTION: Send an ACPI notification. The value specified is sent to the
 403  *              named object as an ACPI notify.
 404  *
 405  ******************************************************************************/
 406
 407 void acpi_db_send_notify(char *name, u32 value)
 408 {
 409         struct acpi_namespace_node *node;
 410         acpi_status status;
 411
 412         /* Translate name to an Named object */
 413
 414         node = acpi_db_convert_to_node(name);
 415         if (!node) {
 416                 return;
 417         }
 418
 419         /* Dispatch the notify if legal */
 420
 421         if (acpi_ev_is_notify_object(node)) {
 422                 status = acpi_ev_queue_notify_request(node, value);
 423                 if (ACPI_FAILURE(status)) {
 424                         acpi_os_printf("Could not queue notify\n");
 425                 }
 426         } else {
 427                 acpi_os_printf("Named object [%4.4s] Type %s, "
 428                                "must be Device/Thermal/Processor type\n",
 429                                acpi_ut_get_node_name(node),
 430                                acpi_ut_get_type_name(node->type));
 431         }
 432 }
 433
 434 /*******************************************************************************
 435  *
 436  * FUNCTION:    acpi_db_display_interfaces
 437  *
 438  * PARAMETERS:  action_arg          - Null, "install", or "remove"
 439  *              interface_name_arg  - Name for install/remove options
 440  *
 441  * RETURN:      None
 442  *
 443  * DESCRIPTION: Display or modify the global _OSI interface list
 444  *
 445  ******************************************************************************/
 446
 447 void acpi_db_display_interfaces(char *action_arg, char *interface_name_arg)
 448 {
 449         struct acpi_interface_info *next_interface;
 450         char *sub_string;
 451         acpi_status status;
 452
 453         /* If no arguments, just display current interface list */
 454
 455         if (!action_arg) {
 456                 (void)acpi_os_acquire_mutex(acpi_gbl_osi_mutex,
 457                                             ACPI_WAIT_FOREVER);
 458
 459                 next_interface = acpi_gbl_supported_interfaces;
 460                 while (next_interface) {
 461                         if (!(next_interface->flags & ACPI_OSI_INVALID)) {
 462                                 acpi_os_printf("%s\n", next_interface->name);
 463                         }
 464
 465                         next_interface = next_interface->next;
 466                 }
 467
 468                 acpi_os_release_mutex(acpi_gbl_osi_mutex);
 469                 return;
 470         }
 471
 472         /* If action_arg exists, so must interface_name_arg */
 473
 474         if (!interface_name_arg) {
 475                 acpi_os_printf("Missing Interface Name argument\n");
 476                 return;
 477         }
 478
 479         /* Uppercase the action for match below */
 480
 481         acpi_ut_strupr(action_arg);
 482
 483         /* install - install an interface */
 484
 485         sub_string = strstr("INSTALL", action_arg);
 486         if (sub_string) {
 487                 status = acpi_install_interface(interface_name_arg);
 488                 if (ACPI_FAILURE(status)) {
 489                         acpi_os_printf("%s, while installing \"%s\"\n",
 490                                        acpi_format_exception(status),
 491                                        interface_name_arg);
 492                 }
 493                 return;
 494         }
 495
 496         /* remove - remove an interface */
 497
 498         sub_string = strstr("REMOVE", action_arg);
 499         if (sub_string) {
 500                 status = acpi_remove_interface(interface_name_arg);
 501                 if (ACPI_FAILURE(status)) {
 502                         acpi_os_printf("%s, while removing \"%s\"\n",
 503                                        acpi_format_exception(status),
 504                                        interface_name_arg);
 505                 }
 506                 return;
 507         }
 508
 509         /* Invalid action_arg */
 510
 511         acpi_os_printf("Invalid action argument: %s\n", action_arg);
 512         return;
 513 }
 514
 515 /*******************************************************************************
 516  *
 517  * FUNCTION:    acpi_db_display_template
 518  *
 519  * PARAMETERS:  buffer_arg          - Buffer name or address
 520  *
 521  * RETURN:      None
 522  *
 523  * DESCRIPTION: Dump a buffer that contains a resource template
 524  *
 525  ******************************************************************************/
 526
 527 void acpi_db_display_template(char *buffer_arg)
 528 {
 529         struct acpi_namespace_node *node;
 530         acpi_status status;
 531         struct acpi_buffer return_buffer;
 532
 533         /* Translate buffer_arg to an Named object */
 534
 535         node = acpi_db_convert_to_node(buffer_arg);
 536         if (!node || (node == acpi_gbl_root_node)) {
 537                 acpi_os_printf("Invalid argument: %s\n", buffer_arg);
 538                 return;
 539         }
 540
 541         /* We must have a buffer object */
 542
 543         if (node->type != ACPI_TYPE_BUFFER) {
 544                 acpi_os_printf
 545                     ("Not a Buffer object, cannot be a template: %s\n",
 546                      buffer_arg);
 547                 return;
 548         }
 549
 550         return_buffer.length = ACPI_DEBUG_BUFFER_SIZE;
 551         return_buffer.pointer = acpi_gbl_db_buffer;
 552
 553         /* Attempt to convert the raw buffer to a resource list */
 554
 555         status = acpi_rs_create_resource_list(node->object, &return_buffer);
 556
 557         acpi_db_set_output_destination(ACPI_DB_REDIRECTABLE_OUTPUT);
 558         acpi_dbg_level |= ACPI_LV_RESOURCES;
 559
 560         if (ACPI_FAILURE(status)) {
 561                 acpi_os_printf
 562                     ("Could not convert Buffer to a resource list: %s, %s\n",
 563                      buffer_arg, acpi_format_exception(status));
 564                 goto dump_buffer;
 565         }
 566
 567         /* Now we can dump the resource list */
 568
 569         acpi_rs_dump_resource_list(ACPI_CAST_PTR(struct acpi_resource,
 570                                                  return_buffer.pointer));
 571
 572 dump_buffer:
 573         acpi_os_printf("\nRaw data buffer:\n");
 574         acpi_ut_debug_dump_buffer((u8 *)node->object->buffer.pointer,
 575                                   node->object->buffer.length,
 576                                   DB_BYTE_DISPLAY, ACPI_UINT32_MAX);
 577
 578         acpi_db_set_output_destination(ACPI_DB_CONSOLE_OUTPUT);
 579         return;
 580 }
 581
 582 /*******************************************************************************
 583  *
 584  * FUNCTION:    acpi_dm_compare_aml_resources
 585  *
 586  * PARAMETERS:  aml1_buffer         - Contains first resource list
 587  *              aml1_buffer_length  - Length of first resource list
 588  *              aml2_buffer         - Contains second resource list
 589  *              aml2_buffer_length  - Length of second resource list
 590  *
 591  * RETURN:      None
 592  *
 593  * DESCRIPTION: Compare two AML resource lists, descriptor by descriptor (in
 594  *              order to isolate a miscompare to an individual resource)
 595  *
 596  ******************************************************************************/
 597
 598 static void
 599 acpi_dm_compare_aml_resources(u8 *aml1_buffer,
 600                               acpi_rsdesc_size aml1_buffer_length,
 601                               u8 *aml2_buffer,
 602                               acpi_rsdesc_size aml2_buffer_length)
 603 {
 604         u8 *aml1;
 605         u8 *aml2;
 606         u8 *aml1_end;
 607         u8 *aml2_end;
 608         acpi_rsdesc_size aml1_length;
 609         acpi_rsdesc_size aml2_length;
 610         acpi_rsdesc_size offset = 0;
 611         u8 resource_type;
 612         u32 count = 0;
 613         u32 i;
 614
 615         /* Compare overall buffer sizes (may be different due to size rounding) */
 616
 617         if (aml1_buffer_length != aml2_buffer_length) {
 618                 acpi_os_printf("**** Buffer length mismatch in converted "
 619                                "AML: Original %X, New %X ****\n",
 620                                aml1_buffer_length, aml2_buffer_length);
 621         }
 622
 623         aml1 = aml1_buffer;
 624         aml2 = aml2_buffer;
 625         aml1_end = aml1_buffer + aml1_buffer_length;
 626         aml2_end = aml2_buffer + aml2_buffer_length;
 627
 628         /* Walk the descriptor lists, comparing each descriptor */
 629
 630         while ((aml1 < aml1_end) && (aml2 < aml2_end)) {
 631
 632                 /* Get the lengths of each descriptor */
 633
 634                 aml1_length = acpi_ut_get_descriptor_length(aml1);
 635                 aml2_length = acpi_ut_get_descriptor_length(aml2);
 636                 resource_type = acpi_ut_get_resource_type(aml1);
 637
 638                 /* Check for descriptor length match */
 639
 640                 if (aml1_length != aml2_length) {
 641                         acpi_os_printf
 642                             ("**** Length mismatch in descriptor [%.2X] type %2.2X, "
 643                              "Offset %8.8X Len1 %X, Len2 %X ****\n", count,
 644                              resource_type, offset, aml1_length, aml2_length);
 645                 }
 646
 647                 /* Check for descriptor byte match */
 648
 649                 else if (memcmp(aml1, aml2, aml1_length)) {
 650                         acpi_os_printf
 651                             ("**** Data mismatch in descriptor [%.2X] type %2.2X, "
 652                              "Offset %8.8X ****\n", count, resource_type,
 653                              offset);
 654
 655                         for (i = 0; i < aml1_length; i++) {
 656                                 if (aml1[i] != aml2[i]) {
 657                                         acpi_os_printf
 658                                             ("Mismatch at byte offset %.2X: is %2.2X, "
 659                                              "should be %2.2X\n", i, aml2[i],
 660                                              aml1[i]);
 661                                 }
 662                         }
 663                 }
 664
 665                 /* Exit on end_tag descriptor */
 666
 667                 if (resource_type == ACPI_RESOURCE_NAME_END_TAG) {
 668                         return;
 669                 }
 670
 671                 /* Point to next descriptor in each buffer */
 672
 673                 count++;
 674                 offset += aml1_length;
 675                 aml1 += aml1_length;
 676                 aml2 += aml2_length;
 677         }
 678 }
 679
 680 /*******************************************************************************
 681  *
 682  * FUNCTION:    acpi_dm_test_resource_conversion
 683  *
 684  * PARAMETERS:  node                - Parent device node
 685  *              name                - resource method name (_CRS)
 686  *
 687  * RETURN:      Status
 688  *
 689  * DESCRIPTION: Compare the original AML with a conversion of the AML to
 690  *              internal resource list, then back to AML.
 691  *
 692  ******************************************************************************/
 693
 694 static acpi_status
 695 acpi_dm_test_resource_conversion(struct acpi_namespace_node *node, char *name)
 696 {
 697         acpi_status status;
 698         struct acpi_buffer return_buffer;
 699         struct acpi_buffer resource_buffer;
 700         struct acpi_buffer new_aml;
 701         union acpi_object *original_aml;
 702
 703         acpi_os_printf("Resource Conversion Comparison:\n");
 704
 705         new_aml.length = ACPI_ALLOCATE_LOCAL_BUFFER;
 706         return_buffer.length = ACPI_ALLOCATE_LOCAL_BUFFER;
 707         resource_buffer.length = ACPI_ALLOCATE_LOCAL_BUFFER;
 708
 709         /* Get the original _CRS AML resource template */
 710
 711         status = acpi_evaluate_object(node, name, NULL, &return_buffer);
 712         if (ACPI_FAILURE(status)) {
 713                 acpi_os_printf("Could not obtain %s: %s\n",
 714                                name, acpi_format_exception(status));
 715                 return (status);
 716         }
 717
 718         /* Get the AML resource template, converted to internal resource structs */
 719
 720         status = acpi_get_current_resources(node, &resource_buffer);
 721         if (ACPI_FAILURE(status)) {
 722                 acpi_os_printf("AcpiGetCurrentResources failed: %s\n",
 723                                acpi_format_exception(status));
 724                 goto exit1;
 725         }
 726
 727         /* Convert internal resource list to external AML resource template */
 728
 729         status = acpi_rs_create_aml_resources(&resource_buffer, &new_aml);
 730         if (ACPI_FAILURE(status)) {
 731                 acpi_os_printf("AcpiRsCreateAmlResources failed: %s\n",
 732                                acpi_format_exception(status));
 733                 goto exit2;
 734         }
 735
 736         /* Compare original AML to the newly created AML resource list */
 737
 738         original_aml = return_buffer.pointer;
 739
 740         acpi_dm_compare_aml_resources(original_aml->buffer.pointer,
 741                                       (acpi_rsdesc_size) original_aml->buffer.
 742                                       length, new_aml.pointer,
 743                                       (acpi_rsdesc_size) new_aml.length);
 744
 745         /* Cleanup and exit */
 746
 747         ACPI_FREE(new_aml.pointer);
 748 exit2:
 749         ACPI_FREE(resource_buffer.pointer);
 750 exit1:
 751         ACPI_FREE(return_buffer.pointer);
 752         return (status);
 753 }
 754
 755 /*******************************************************************************
 756  *
 757  * FUNCTION:    acpi_db_resource_callback
 758  *
 759  * PARAMETERS:  acpi_walk_resource_callback
 760  *
 761  * RETURN:      Status
 762  *
 763  * DESCRIPTION: Simple callback to exercise acpi_walk_resources and
 764  *              acpi_walk_resource_buffer.
 765  *
 766  ******************************************************************************/
 767
 768 static acpi_status
 769 acpi_db_resource_callback(struct acpi_resource *resource, void *context)
 770 {
 771
 772         return (AE_OK);
 773 }
 774
 775 /*******************************************************************************
 776  *
 777  * FUNCTION:    acpi_db_device_resources
 778  *
 779  * PARAMETERS:  acpi_walk_callback
 780  *
 781  * RETURN:      Status
 782  *
 783  * DESCRIPTION: Display the _PRT/_CRS/_PRS resources for a device object.
 784  *
 785  ******************************************************************************/
 786
 787 static acpi_status
 788 acpi_db_device_resources(acpi_handle obj_handle,
 789                          u32 nesting_level, void *context, void **return_value)
 790 {
 791         struct acpi_namespace_node *node;
 792         struct acpi_namespace_node *prt_node = NULL;
 793         struct acpi_namespace_node *crs_node = NULL;
 794         struct acpi_namespace_node *prs_node = NULL;
 795         struct acpi_namespace_node *aei_node = NULL;
 796         char *parent_path;
 797         struct acpi_buffer return_buffer;
 798         acpi_status status;
 799
 800         node = ACPI_CAST_PTR(struct acpi_namespace_node, obj_handle);
 801         parent_path = acpi_ns_get_external_pathname(node);
 802         if (!parent_path) {
 803                 return (AE_NO_MEMORY);
 804         }
 805
 806         /* Get handles to the resource methods for this device */
 807
 808         (void)acpi_get_handle(node, METHOD_NAME__PRT,
 809                               ACPI_CAST_PTR(acpi_handle, &prt_node));
 810         (void)acpi_get_handle(node, METHOD_NAME__CRS,
 811                               ACPI_CAST_PTR(acpi_handle, &crs_node));
 812         (void)acpi_get_handle(node, METHOD_NAME__PRS,
 813                               ACPI_CAST_PTR(acpi_handle, &prs_node));
 814         (void)acpi_get_handle(node, METHOD_NAME__AEI,
 815                               ACPI_CAST_PTR(acpi_handle, &aei_node));
 816
 817         if (!prt_node && !crs_node && !prs_node && !aei_node) {
 818                 goto cleanup;   /* Nothing to do */
 819         }
 820
 821         acpi_os_printf("\nDevice: %s\n", parent_path);
 822
 823         /* Prepare for a return object of arbitrary size */
 824
 825         return_buffer.pointer = acpi_gbl_db_buffer;
 826         return_buffer.length = ACPI_DEBUG_BUFFER_SIZE;
 827
 828         /* _PRT */
 829
 830         if (prt_node) {
 831                 acpi_os_printf("Evaluating _PRT\n");
 832
 833                 status =
 834                     acpi_evaluate_object(prt_node, NULL, NULL, &return_buffer);
 835                 if (ACPI_FAILURE(status)) {
 836                         acpi_os_printf("Could not evaluate _PRT: %s\n",
 837                                        acpi_format_exception(status));
 838                         goto get_crs;
 839                 }
 840
 841                 return_buffer.pointer = acpi_gbl_db_buffer;
 842                 return_buffer.length = ACPI_DEBUG_BUFFER_SIZE;
 843
 844                 status = acpi_get_irq_routing_table(node, &return_buffer);
 845                 if (ACPI_FAILURE(status)) {
 846                         acpi_os_printf("GetIrqRoutingTable failed: %s\n",
 847                                        acpi_format_exception(status));
 848                         goto get_crs;
 849                 }
 850
 851                 acpi_rs_dump_irq_list(ACPI_CAST_PTR(u8, acpi_gbl_db_buffer));
 852         }
 853
 854         /* _CRS */
 855
 856 get_crs:
 857         if (crs_node) {
 858                 acpi_os_printf("Evaluating _CRS\n");
 859
 860                 return_buffer.pointer = acpi_gbl_db_buffer;
 861                 return_buffer.length = ACPI_DEBUG_BUFFER_SIZE;
 862
 863                 status =
 864                     acpi_evaluate_object(crs_node, NULL, NULL, &return_buffer);
 865                 if (ACPI_FAILURE(status)) {
 866                         acpi_os_printf("Could not evaluate _CRS: %s\n",
 867                                        acpi_format_exception(status));
 868                         goto get_prs;
 869                 }
 870
 871                 /* This code exercises the acpi_walk_resources interface */
 872
 873                 status = acpi_walk_resources(node, METHOD_NAME__CRS,
 874                                              acpi_db_resource_callback, NULL);
 875                 if (ACPI_FAILURE(status)) {
 876                         acpi_os_printf("AcpiWalkResources failed: %s\n",
 877                                        acpi_format_exception(status));
 878                         goto get_prs;
 879                 }
 880
 881                 /* Get the _CRS resource list (test ALLOCATE buffer) */
 882
 883                 return_buffer.pointer = NULL;
 884                 return_buffer.length = ACPI_ALLOCATE_LOCAL_BUFFER;
 885
 886                 status = acpi_get_current_resources(node, &return_buffer);
 887                 if (ACPI_FAILURE(status)) {
 888                         acpi_os_printf("AcpiGetCurrentResources failed: %s\n",
 889                                        acpi_format_exception(status));
 890                         goto get_prs;
 891                 }
 892
 893                 /* This code exercises the acpi_walk_resource_buffer interface */
 894
 895                 status = acpi_walk_resource_buffer(&return_buffer,
 896                                                    acpi_db_resource_callback,
 897                                                    NULL);
 898                 if (ACPI_FAILURE(status)) {
 899                         acpi_os_printf("AcpiWalkResourceBuffer failed: %s\n",
 900                                        acpi_format_exception(status));
 901                         goto end_crs;
 902                 }
 903
 904                 /* Dump the _CRS resource list */
 905
 906                 acpi_rs_dump_resource_list(ACPI_CAST_PTR(struct acpi_resource,
 907                                                          return_buffer.
 908                                                          pointer));
 909
 910                 /*
 911                  * Perform comparison of original AML to newly created AML. This
 912                  * tests both the AML->Resource conversion and the Resource->AML
 913                  * conversion.
 914                  */
 915                 (void)acpi_dm_test_resource_conversion(node, METHOD_NAME__CRS);
 916
 917                 /* Execute _SRS with the resource list */
 918
 919                 acpi_os_printf("Evaluating _SRS\n");
 920
 921                 status = acpi_set_current_resources(node, &return_buffer);
 922                 if (ACPI_FAILURE(status)) {
 923                         acpi_os_printf("AcpiSetCurrentResources failed: %s\n",
 924                                        acpi_format_exception(status));
 925                         goto end_crs;
 926                 }
 927
 928 end_crs:
 929                 ACPI_FREE(return_buffer.pointer);
 930         }
 931
 932         /* _PRS */
 933
 934 get_prs:
 935         if (prs_node) {
 936                 acpi_os_printf("Evaluating _PRS\n");
 937
 938                 return_buffer.pointer = acpi_gbl_db_buffer;
 939                 return_buffer.length = ACPI_DEBUG_BUFFER_SIZE;
 940
 941                 status =
 942                     acpi_evaluate_object(prs_node, NULL, NULL, &return_buffer);
 943                 if (ACPI_FAILURE(status)) {
 944                         acpi_os_printf("Could not evaluate _PRS: %s\n",
 945                                        acpi_format_exception(status));
 946                         goto get_aei;
 947                 }
 948
 949                 return_buffer.pointer = acpi_gbl_db_buffer;
 950                 return_buffer.length = ACPI_DEBUG_BUFFER_SIZE;
 951
 952                 status = acpi_get_possible_resources(node, &return_buffer);
 953                 if (ACPI_FAILURE(status)) {
 954                         acpi_os_printf("AcpiGetPossibleResources failed: %s\n",
 955                                        acpi_format_exception(status));
 956                         goto get_aei;
 957                 }
 958
 959                 acpi_rs_dump_resource_list(ACPI_CAST_PTR
 960                                            (struct acpi_resource,
 961                                             acpi_gbl_db_buffer));
 962         }
 963
 964         /* _AEI */
 965
 966 get_aei:
 967         if (aei_node) {
 968                 acpi_os_printf("Evaluating _AEI\n");
 969
 970                 return_buffer.pointer = acpi_gbl_db_buffer;
 971                 return_buffer.length = ACPI_DEBUG_BUFFER_SIZE;
 972
 973                 status =
 974                     acpi_evaluate_object(aei_node, NULL, NULL, &return_buffer);
 975                 if (ACPI_FAILURE(status)) {
 976                         acpi_os_printf("Could not evaluate _AEI: %s\n",
 977                                        acpi_format_exception(status));
 978                         goto cleanup;
 979                 }
 980
 981                 return_buffer.pointer = acpi_gbl_db_buffer;
 982                 return_buffer.length = ACPI_DEBUG_BUFFER_SIZE;
 983
 984                 status = acpi_get_event_resources(node, &return_buffer);
 985                 if (ACPI_FAILURE(status)) {
 986                         acpi_os_printf("AcpiGetEventResources failed: %s\n",
 987                                        acpi_format_exception(status));
 988                         goto cleanup;
 989                 }
 990
 991                 acpi_rs_dump_resource_list(ACPI_CAST_PTR
 992                                            (struct acpi_resource,
 993                                             acpi_gbl_db_buffer));
 994         }
 995
 996 cleanup:
 997         ACPI_FREE(parent_path);
 998         return (AE_OK);
 999 }
1000
1001 /*******************************************************************************
1002  *
1003  * FUNCTION:    acpi_db_display_resources
1004  *
1005  * PARAMETERS:  object_arg          - String object name or object pointer.
1006  *                                    NULL or "*" means "display resources for
1007  *                                    all devices"
1008  *
1009  * RETURN:      None
1010  *
1011  * DESCRIPTION: Display the resource objects associated with a device.
1012  *
1013  ******************************************************************************/
1014
1015 void acpi_db_display_resources(char *object_arg)
1016 {
1017         struct acpi_namespace_node *node;
1018
1019         acpi_db_set_output_destination(ACPI_DB_REDIRECTABLE_OUTPUT);
1020         acpi_dbg_level |= ACPI_LV_RESOURCES;
1021
1022         /* Asterisk means "display resources for all devices" */
1023
1024         if (!object_arg || (!strcmp(object_arg, "*"))) {
1025                 (void)acpi_walk_namespace(ACPI_TYPE_DEVICE, ACPI_ROOT_OBJECT,
1026                                           ACPI_UINT32_MAX,
1027                                           acpi_db_device_resources, NULL, NULL,
1028                                           NULL);
1029         } else {
1030                 /* Convert string to object pointer */
1031
1032                 node = acpi_db_convert_to_node(object_arg);
1033                 if (node) {
1034                         if (node->type != ACPI_TYPE_DEVICE) {
1035                                 acpi_os_printf
1036                                     ("%4.4s: Name is not a device object (%s)\n",
1037                                      node->name.ascii,
1038                                      acpi_ut_get_type_name(node->type));
1039                         } else {
1040                                 (void)acpi_db_device_resources(node, 0, NULL,
1041                                                                NULL);
1042                         }
1043                 }
1044         }
1045
1046         acpi_db_set_output_destination(ACPI_DB_CONSOLE_OUTPUT);
1047 }
1048
1049 #if (!ACPI_REDUCED_HARDWARE)
1050 /*******************************************************************************
1051  *
1052  * FUNCTION:    acpi_db_generate_gpe
1053  *
1054  * PARAMETERS:  gpe_arg             - Raw GPE number, ascii string
1055  *              block_arg           - GPE block number, ascii string
1056  *                                    0 or 1 for FADT GPE blocks
1057  *
1058  * RETURN:      None
1059  *
1060  * DESCRIPTION: Simulate firing of a GPE
1061  *
1062  ******************************************************************************/
1063
1064 void acpi_db_generate_gpe(char *gpe_arg, char *block_arg)
1065 {
1066         u32 block_number = 0;
1067         u32 gpe_number;
1068         struct acpi_gpe_event_info *gpe_event_info;
1069
1070         gpe_number = strtoul(gpe_arg, NULL, 0);
1071
1072         /*
1073          * If no block arg, or block arg == 0 or 1, use the FADT-defined
1074          * GPE blocks.
1075          */
1076         if (block_arg) {
1077                 block_number = strtoul(block_arg, NULL, 0);
1078                 if (block_number == 1) {
1079                         block_number = 0;
1080                 }
1081         }
1082
1083         gpe_event_info =
1084             acpi_ev_get_gpe_event_info(ACPI_TO_POINTER(block_number),
1085                                        gpe_number);
1086         if (!gpe_event_info) {
1087                 acpi_os_printf("Invalid GPE\n");
1088                 return;
1089         }
1090
1091         (void)acpi_ev_gpe_dispatch(NULL, gpe_event_info, gpe_number);
1092 }
1093
1094 /*******************************************************************************
1095  *
1096  * FUNCTION:    acpi_db_generate_sci
1097  *
1098  * PARAMETERS:  None
1099  *
1100  * RETURN:      None
1101  *
1102  * DESCRIPTION: Simulate an SCI -- just call the SCI dispatch.
1103  *
1104  ******************************************************************************/
1105
1106 void acpi_db_generate_sci(void)
1107 {
1108         acpi_ev_sci_dispatch();
1109 }
1110
1111 #endif                          /* !ACPI_REDUCED_HARDWARE */
1112
1113 /*******************************************************************************
1114  *
1115  * FUNCTION:    acpi_db_trace
1116  *
1117  * PARAMETERS:  enable_arg          - ENABLE/AML to enable tracer
1118  *                                    DISABLE to disable tracer
1119  *              method_arg          - Method to trace
1120  *              once_arg            - Whether trace once
1121  *
1122  * RETURN:      None
1123  *
1124  * DESCRIPTION: Control method tracing facility
1125  *
1126  ******************************************************************************/
1127
1128 void acpi_db_trace(char *enable_arg, char *method_arg, char *once_arg)
1129 {
1130         u32 debug_level = 0;
1131         u32 debug_layer = 0;
1132         u32 flags = 0;
1133
1134         if (enable_arg) {
1135                 acpi_ut_strupr(enable_arg);
1136         }
1137
1138         if (once_arg) {
1139                 acpi_ut_strupr(once_arg);
1140         }
1141
1142         if (method_arg) {
1143                 if (acpi_db_trace_method_name) {
1144                         ACPI_FREE(acpi_db_trace_method_name);
1145                         acpi_db_trace_method_name = NULL;
1146                 }
1147
1148                 acpi_db_trace_method_name =
1149                     ACPI_ALLOCATE(strlen(method_arg) + 1);
1150                 if (!acpi_db_trace_method_name) {
1151                         acpi_os_printf("Failed to allocate method name (%s)\n",
1152                                        method_arg);
1153                         return;
1154                 }
1155
1156                 strcpy(acpi_db_trace_method_name, method_arg);
1157         }
1158
1159         if (!strcmp(enable_arg, "ENABLE") ||
1160             !strcmp(enable_arg, "METHOD") || !strcmp(enable_arg, "OPCODE")) {
1161                 if (!strcmp(enable_arg, "ENABLE")) {
1162
1163                         /* Inherit current console settings */
1164
1165                         debug_level = acpi_gbl_db_console_debug_level;
1166                         debug_layer = acpi_dbg_layer;
1167                 } else {
1168                         /* Restrict console output to trace points only */
1169
1170                         debug_level = ACPI_LV_TRACE_POINT;
1171                         debug_layer = ACPI_EXECUTER;
1172                 }
1173
1174                 flags = ACPI_TRACE_ENABLED;
1175
1176                 if (!strcmp(enable_arg, "OPCODE")) {
1177                         flags |= ACPI_TRACE_OPCODE;
1178                 }
1179
1180                 if (once_arg && !strcmp(once_arg, "ONCE")) {
1181                         flags |= ACPI_TRACE_ONESHOT;
1182                 }
1183         }
1184
1185         (void)acpi_debug_trace(acpi_db_trace_method_name,
1186                                debug_level, debug_layer, flags);
1187 }