drivers/acpi/acpica/dbutils.c

   1 /*******************************************************************************
   2  *
   3  * Module Name: dbutils - AML debugger utilities
   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 "acnamesp.h"
  47 #include "acdebug.h"
  48
  49 #define _COMPONENT          ACPI_CA_DEBUGGER
  50 ACPI_MODULE_NAME("dbutils")
  51
  52 /* Local prototypes */
  53 #ifdef ACPI_OBSOLETE_FUNCTIONS
  54 acpi_status acpi_db_second_pass_parse(union acpi_parse_object *root);
  55
  56 void acpi_db_dump_buffer(u32 address);
  57 #endif
  58
  59 static char *gbl_hex_to_ascii = "0123456789ABCDEF";
  60
  61 /*******************************************************************************
  62  *
  63  * FUNCTION:    acpi_db_match_argument
  64  *
  65  * PARAMETERS:  user_argument           - User command line
  66  *              arguments               - Array of commands to match against
  67  *
  68  * RETURN:      Index into command array or ACPI_TYPE_NOT_FOUND if not found
  69  *
  70  * DESCRIPTION: Search command array for a command match
  71  *
  72  ******************************************************************************/
  73
  74 acpi_object_type
  75 acpi_db_match_argument(char *user_argument,
  76                        struct acpi_db_argument_info *arguments)
  77 {
  78         u32 i;
  79
  80         if (!user_argument || user_argument[0] == 0) {
  81                 return (ACPI_TYPE_NOT_FOUND);
  82         }
  83
  84         for (i = 0; arguments[i].name; i++) {
  85                 if (strstr(arguments[i].name, user_argument) ==
  86                     arguments[i].name) {
  87                         return (i);
  88                 }
  89         }
  90
  91         /* Argument not recognized */
  92
  93         return (ACPI_TYPE_NOT_FOUND);
  94 }
  95
  96 /*******************************************************************************
  97  *
  98  * FUNCTION:    acpi_db_set_output_destination
  99  *
 100  * PARAMETERS:  output_flags        - Current flags word
 101  *
 102  * RETURN:      None
 103  *
 104  * DESCRIPTION: Set the current destination for debugger output. Also sets
 105  *              the debug output level accordingly.
 106  *
 107  ******************************************************************************/
 108
 109 void acpi_db_set_output_destination(u32 output_flags)
 110 {
 111
 112         acpi_gbl_db_output_flags = (u8)output_flags;
 113
 114         if ((output_flags & ACPI_DB_REDIRECTABLE_OUTPUT) &&
 115             acpi_gbl_db_output_to_file) {
 116                 acpi_dbg_level = acpi_gbl_db_debug_level;
 117         } else {
 118                 acpi_dbg_level = acpi_gbl_db_console_debug_level;
 119         }
 120 }
 121
 122 /*******************************************************************************
 123  *
 124  * FUNCTION:    acpi_db_dump_external_object
 125  *
 126  * PARAMETERS:  obj_desc        - External ACPI object to dump
 127  *              level           - Nesting level.
 128  *
 129  * RETURN:      None
 130  *
 131  * DESCRIPTION: Dump the contents of an ACPI external object
 132  *
 133  ******************************************************************************/
 134
 135 void acpi_db_dump_external_object(union acpi_object *obj_desc, u32 level)
 136 {
 137         u32 i;
 138
 139         if (!obj_desc) {
 140                 acpi_os_printf("[Null Object]\n");
 141                 return;
 142         }
 143
 144         for (i = 0; i < level; i++) {
 145                 acpi_os_printf(" ");
 146         }
 147
 148         switch (obj_desc->type) {
 149         case ACPI_TYPE_ANY:
 150
 151                 acpi_os_printf("[Null Object] (Type=0)\n");
 152                 break;
 153
 154         case ACPI_TYPE_INTEGER:
 155
 156                 acpi_os_printf("[Integer] = %8.8X%8.8X\n",
 157                                ACPI_FORMAT_UINT64(obj_desc->integer.value));
 158                 break;
 159
 160         case ACPI_TYPE_STRING:
 161
 162                 acpi_os_printf("[String] Length %.2X = ",
 163                                obj_desc->string.length);
 164                 acpi_ut_print_string(obj_desc->string.pointer, ACPI_UINT8_MAX);
 165                 acpi_os_printf("\n");
 166                 break;
 167
 168         case ACPI_TYPE_BUFFER:
 169
 170                 acpi_os_printf("[Buffer] Length %.2X = ",
 171                                obj_desc->buffer.length);
 172                 if (obj_desc->buffer.length) {
 173                         if (obj_desc->buffer.length > 16) {
 174                                 acpi_os_printf("\n");
 175                         }
 176                         acpi_ut_debug_dump_buffer(ACPI_CAST_PTR
 177                                                   (u8,
 178                                                    obj_desc->buffer.pointer),
 179                                                   obj_desc->buffer.length,
 180                                                   DB_BYTE_DISPLAY, _COMPONENT);
 181                 } else {
 182                         acpi_os_printf("\n");
 183                 }
 184                 break;
 185
 186         case ACPI_TYPE_PACKAGE:
 187
 188                 acpi_os_printf("[Package] Contains %u Elements:\n",
 189                                obj_desc->package.count);
 190
 191                 for (i = 0; i < obj_desc->package.count; i++) {
 192                         acpi_db_dump_external_object(&obj_desc->package.
 193                                                      elements[i], level + 1);
 194                 }
 195                 break;
 196
 197         case ACPI_TYPE_LOCAL_REFERENCE:
 198
 199                 acpi_os_printf("[Object Reference] = ");
 200                 acpi_db_display_internal_object(obj_desc->reference.handle,
 201                                                 NULL);
 202                 break;
 203
 204         case ACPI_TYPE_PROCESSOR:
 205
 206                 acpi_os_printf("[Processor]\n");
 207                 break;
 208
 209         case ACPI_TYPE_POWER:
 210
 211                 acpi_os_printf("[Power Resource]\n");
 212                 break;
 213
 214         default:
 215
 216                 acpi_os_printf("[Unknown Type] %X\n", obj_desc->type);
 217                 break;
 218         }
 219 }
 220
 221 /*******************************************************************************
 222  *
 223  * FUNCTION:    acpi_db_prep_namestring
 224  *
 225  * PARAMETERS:  name            - String to prepare
 226  *
 227  * RETURN:      None
 228  *
 229  * DESCRIPTION: Translate all forward slashes and dots to backslashes.
 230  *
 231  ******************************************************************************/
 232
 233 void acpi_db_prep_namestring(char *name)
 234 {
 235
 236         if (!name) {
 237                 return;
 238         }
 239
 240         acpi_ut_strupr(name);
 241
 242         /* Convert a leading forward slash to a backslash */
 243
 244         if (*name == '/') {
 245                 *name = '\\';
 246         }
 247
 248         /* Ignore a leading backslash, this is the root prefix */
 249
 250         if (ACPI_IS_ROOT_PREFIX(*name)) {
 251                 name++;
 252         }
 253
 254         /* Convert all slash path separators to dots */
 255
 256         while (*name) {
 257                 if ((*name == '/') || (*name == '\\')) {
 258                         *name = '.';
 259                 }
 260
 261                 name++;
 262         }
 263 }
 264
 265 /*******************************************************************************
 266  *
 267  * FUNCTION:    acpi_db_local_ns_lookup
 268  *
 269  * PARAMETERS:  name            - Name to lookup
 270  *
 271  * RETURN:      Pointer to a namespace node, null on failure
 272  *
 273  * DESCRIPTION: Lookup a name in the ACPI namespace
 274  *
 275  * Note: Currently begins search from the root. Could be enhanced to use
 276  * the current prefix (scope) node as the search beginning point.
 277  *
 278  ******************************************************************************/
 279
 280 struct acpi_namespace_node *acpi_db_local_ns_lookup(char *name)
 281 {
 282         char *internal_path;
 283         acpi_status status;
 284         struct acpi_namespace_node *node = NULL;
 285
 286         acpi_db_prep_namestring(name);
 287
 288         /* Build an internal namestring */
 289
 290         status = acpi_ns_internalize_name(name, &internal_path);
 291         if (ACPI_FAILURE(status)) {
 292                 acpi_os_printf("Invalid namestring: %s\n", name);
 293                 return (NULL);
 294         }
 295
 296         /*
 297          * Lookup the name.
 298          * (Uses root node as the search starting point)
 299          */
 300         status = acpi_ns_lookup(NULL, internal_path, ACPI_TYPE_ANY,
 301                                 ACPI_IMODE_EXECUTE,
 302                                 ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE,
 303                                 NULL, &node);
 304         if (ACPI_FAILURE(status)) {
 305                 acpi_os_printf("Could not locate name: %s, %s\n",
 306                                name, acpi_format_exception(status));
 307         }
 308
 309         ACPI_FREE(internal_path);
 310         return (node);
 311 }
 312
 313 /*******************************************************************************
 314  *
 315  * FUNCTION:    acpi_db_uint32_to_hex_string
 316  *
 317  * PARAMETERS:  value           - The value to be converted to string
 318  *              buffer          - Buffer for result (not less than 11 bytes)
 319  *
 320  * RETURN:      None
 321  *
 322  * DESCRIPTION: Convert the unsigned 32-bit value to the hexadecimal image
 323  *
 324  * NOTE: It is the caller's responsibility to ensure that the length of buffer
 325  *       is sufficient.
 326  *
 327  ******************************************************************************/
 328
 329 void acpi_db_uint32_to_hex_string(u32 value, char *buffer)
 330 {
 331         int i;
 332
 333         if (value == 0) {
 334                 strcpy(buffer, "0");
 335                 return;
 336         }
 337
 338         buffer[8] = '\0';
 339
 340         for (i = 7; i >= 0; i--) {
 341                 buffer[i] = gbl_hex_to_ascii[value & 0x0F];
 342                 value = value >> 4;
 343         }
 344 }
 345
 346 #ifdef ACPI_OBSOLETE_FUNCTIONS
 347 /*******************************************************************************
 348  *
 349  * FUNCTION:    acpi_db_second_pass_parse
 350  *
 351  * PARAMETERS:  root            - Root of the parse tree
 352  *
 353  * RETURN:      Status
 354  *
 355  * DESCRIPTION: Second pass parse of the ACPI tables. We need to wait until
 356  *              second pass to parse the control methods
 357  *
 358  ******************************************************************************/
 359
 360 acpi_status acpi_db_second_pass_parse(union acpi_parse_object *root)
 361 {
 362         union acpi_parse_object *op = root;
 363         union acpi_parse_object *method;
 364         union acpi_parse_object *search_op;
 365         union acpi_parse_object *start_op;
 366         acpi_status status = AE_OK;
 367         u32 base_aml_offset;
 368         struct acpi_walk_state *walk_state;
 369
 370         ACPI_FUNCTION_ENTRY();
 371
 372         acpi_os_printf("Pass two parse ....\n");
 373
 374         while (op) {
 375                 if (op->common.aml_opcode == AML_METHOD_OP) {
 376                         method = op;
 377
 378                         /* Create a new walk state for the parse */
 379
 380                         walk_state =
 381                             acpi_ds_create_walk_state(0, NULL, NULL, NULL);
 382                         if (!walk_state) {
 383                                 return (AE_NO_MEMORY);
 384                         }
 385
 386                         /* Init the Walk State */
 387
 388                         walk_state->parser_state.aml =
 389                             walk_state->parser_state.aml_start =
 390                             method->named.data;
 391                         walk_state->parser_state.aml_end =
 392                             walk_state->parser_state.pkg_end =
 393                             method->named.data + method->named.length;
 394                         walk_state->parser_state.start_scope = op;
 395
 396                         walk_state->descending_callback =
 397                             acpi_ds_load1_begin_op;
 398                         walk_state->ascending_callback = acpi_ds_load1_end_op;
 399
 400                         /* Perform the AML parse */
 401
 402                         status = acpi_ps_parse_aml(walk_state);
 403
 404                         base_aml_offset =
 405                             (method->common.value.arg)->common.aml_offset + 1;
 406                         start_op = (method->common.value.arg)->common.next;
 407                         search_op = start_op;
 408
 409                         while (search_op) {
 410                                 search_op->common.aml_offset += base_aml_offset;
 411                                 search_op =
 412                                     acpi_ps_get_depth_next(start_op, search_op);
 413                         }
 414                 }
 415
 416                 if (op->common.aml_opcode == AML_REGION_OP) {
 417
 418                         /* TBD: [Investigate] this isn't quite the right thing to do! */
 419                         /*
 420                          *
 421                          * Method = (ACPI_DEFERRED_OP *) Op;
 422                          * Status = acpi_ps_parse_aml (Op, Method->Body, Method->body_length);
 423                          */
 424                 }
 425
 426                 if (ACPI_FAILURE(status)) {
 427                         break;
 428                 }
 429
 430                 op = acpi_ps_get_depth_next(root, op);
 431         }
 432
 433         return (status);
 434 }
 435
 436 /*******************************************************************************
 437  *
 438  * FUNCTION:    acpi_db_dump_buffer
 439  *
 440  * PARAMETERS:  address             - Pointer to the buffer
 441  *
 442  * RETURN:      None
 443  *
 444  * DESCRIPTION: Print a portion of a buffer
 445  *
 446  ******************************************************************************/
 447
 448 void acpi_db_dump_buffer(u32 address)
 449 {
 450
 451         acpi_os_printf("\nLocation %X:\n", address);
 452
 453         acpi_dbg_level |= ACPI_LV_TABLES;
 454         acpi_ut_debug_dump_buffer(ACPI_TO_POINTER(address), 64, DB_BYTE_DISPLAY,
 455                                   ACPI_UINT32_MAX);
 456 }
 457 #endif