diff options
Diffstat (limited to 'drivers/acpi/acpica/dsobject.c')
| -rw-r--r-- | drivers/acpi/acpica/dsobject.c | 813 |
1 files changed, 813 insertions, 0 deletions
diff --git a/drivers/acpi/acpica/dsobject.c b/drivers/acpi/acpica/dsobject.c new file mode 100644 index 00000000000..15c628e6aa0 --- /dev/null +++ b/drivers/acpi/acpica/dsobject.c | |||
| @@ -0,0 +1,813 @@ | |||
| 1 | /****************************************************************************** | ||
| 2 | * | ||
| 3 | * Module Name: dsobject - Dispatcher object management routines | ||
| 4 | * | ||
| 5 | *****************************************************************************/ | ||
| 6 | |||
| 7 | /* | ||
| 8 | * Copyright (C) 2000 - 2008, Intel Corp. | ||
| 9 | * All rights reserved. | ||
| 10 | * | ||
| 11 | * Redistribution and use in source and binary forms, with or without | ||
| 12 | * modification, are permitted provided that the following conditions | ||
| 13 | * are met: | ||
| 14 | * 1. Redistributions of source code must retain the above copyright | ||
| 15 | * notice, this list of conditions, and the following disclaimer, | ||
| 16 | * without modification. | ||
| 17 | * 2. Redistributions in binary form must reproduce at minimum a disclaimer | ||
| 18 | * substantially similar to the "NO WARRANTY" disclaimer below | ||
| 19 | * ("Disclaimer") and any redistribution must be conditioned upon | ||
| 20 | * including a substantially similar Disclaimer requirement for further | ||
| 21 | * binary redistribution. | ||
| 22 | * 3. Neither the names of the above-listed copyright holders nor the names | ||
| 23 | * of any contributors may be used to endorse or promote products derived | ||
| 24 | * from this software without specific prior written permission. | ||
| 25 | * | ||
| 26 | * Alternatively, this software may be distributed under the terms of the | ||
| 27 | * GNU General Public License ("GPL") version 2 as published by the Free | ||
| 28 | * Software Foundation. | ||
| 29 | * | ||
| 30 | * NO WARRANTY | ||
| 31 | * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS | ||
| 32 | * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT | ||
| 33 | * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR | ||
| 34 | * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT | ||
| 35 | * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | ||
| 36 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | ||
| 37 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
| 38 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | ||
| 39 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING | ||
| 40 | * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | ||
| 41 | * POSSIBILITY OF SUCH DAMAGES. | ||
| 42 | */ | ||
| 43 | |||
| 44 | #include <acpi/acpi.h> | ||
| 45 | #include "accommon.h" | ||
| 46 | #include "acparser.h" | ||
| 47 | #include "amlcode.h" | ||
| 48 | #include "acdispat.h" | ||
| 49 | #include "acnamesp.h" | ||
| 50 | #include "acinterp.h" | ||
| 51 | |||
| 52 | #define _COMPONENT ACPI_DISPATCHER | ||
| 53 | ACPI_MODULE_NAME("dsobject") | ||
| 54 | |||
| 55 | /* Local prototypes */ | ||
| 56 | static acpi_status | ||
| 57 | acpi_ds_build_internal_object(struct acpi_walk_state *walk_state, | ||
| 58 | union acpi_parse_object *op, | ||
| 59 | union acpi_operand_object **obj_desc_ptr); | ||
| 60 | |||
| 61 | #ifndef ACPI_NO_METHOD_EXECUTION | ||
| 62 | /******************************************************************************* | ||
| 63 | * | ||
| 64 | * FUNCTION: acpi_ds_build_internal_object | ||
| 65 | * | ||
| 66 | * PARAMETERS: walk_state - Current walk state | ||
| 67 | * Op - Parser object to be translated | ||
| 68 | * obj_desc_ptr - Where the ACPI internal object is returned | ||
| 69 | * | ||
| 70 | * RETURN: Status | ||
| 71 | * | ||
| 72 | * DESCRIPTION: Translate a parser Op object to the equivalent namespace object | ||
| 73 | * Simple objects are any objects other than a package object! | ||
| 74 | * | ||
| 75 | ******************************************************************************/ | ||
| 76 | |||
| 77 | static acpi_status | ||
| 78 | acpi_ds_build_internal_object(struct acpi_walk_state *walk_state, | ||
| 79 | union acpi_parse_object *op, | ||
| 80 | union acpi_operand_object **obj_desc_ptr) | ||
| 81 | { | ||
| 82 | union acpi_operand_object *obj_desc; | ||
| 83 | acpi_status status; | ||
| 84 | |||
| 85 | ACPI_FUNCTION_TRACE(ds_build_internal_object); | ||
| 86 | |||
| 87 | *obj_desc_ptr = NULL; | ||
| 88 | if (op->common.aml_opcode == AML_INT_NAMEPATH_OP) { | ||
| 89 | /* | ||
| 90 | * This is a named object reference. If this name was | ||
| 91 | * previously looked up in the namespace, it was stored in this op. | ||
| 92 | * Otherwise, go ahead and look it up now | ||
| 93 | */ | ||
| 94 | if (!op->common.node) { | ||
| 95 | status = acpi_ns_lookup(walk_state->scope_info, | ||
| 96 | op->common.value.string, | ||
| 97 | ACPI_TYPE_ANY, | ||
| 98 | ACPI_IMODE_EXECUTE, | ||
| 99 | ACPI_NS_SEARCH_PARENT | | ||
| 100 | ACPI_NS_DONT_OPEN_SCOPE, NULL, | ||
| 101 | ACPI_CAST_INDIRECT_PTR(struct | ||
| 102 | acpi_namespace_node, | ||
| 103 | &(op-> | ||
| 104 | common. | ||
| 105 | node))); | ||
| 106 | if (ACPI_FAILURE(status)) { | ||
| 107 | |||
| 108 | /* Check if we are resolving a named reference within a package */ | ||
| 109 | |||
| 110 | if ((status == AE_NOT_FOUND) | ||
| 111 | && (acpi_gbl_enable_interpreter_slack) | ||
| 112 | && | ||
| 113 | ((op->common.parent->common.aml_opcode == | ||
| 114 | AML_PACKAGE_OP) | ||
| 115 | || (op->common.parent->common.aml_opcode == | ||
| 116 | AML_VAR_PACKAGE_OP))) { | ||
| 117 | /* | ||
| 118 | * We didn't find the target and we are populating elements | ||
| 119 | * of a package - ignore if slack enabled. Some ASL code | ||
| 120 | * contains dangling invalid references in packages and | ||
| 121 | * expects that no exception will be issued. Leave the | ||
| 122 | * element as a null element. It cannot be used, but it | ||
| 123 | * can be overwritten by subsequent ASL code - this is | ||
| 124 | * typically the case. | ||
| 125 | */ | ||
| 126 | ACPI_DEBUG_PRINT((ACPI_DB_INFO, | ||
| 127 | "Ignoring unresolved reference in package [%4.4s]\n", | ||
| 128 | walk_state-> | ||
| 129 | scope_info->scope. | ||
| 130 | node->name.ascii)); | ||
| 131 | |||
| 132 | return_ACPI_STATUS(AE_OK); | ||
| 133 | } else { | ||
| 134 | ACPI_ERROR_NAMESPACE(op->common.value. | ||
| 135 | string, status); | ||
| 136 | } | ||
| 137 | |||
| 138 | return_ACPI_STATUS(status); | ||
| 139 | } | ||
| 140 | } | ||
| 141 | |||
| 142 | /* Special object resolution for elements of a package */ | ||
| 143 | |||
| 144 | if ((op->common.parent->common.aml_opcode == AML_PACKAGE_OP) || | ||
| 145 | (op->common.parent->common.aml_opcode == | ||
| 146 | AML_VAR_PACKAGE_OP)) { | ||
| 147 | /* | ||
| 148 | * Attempt to resolve the node to a value before we insert it into | ||
| 149 | * the package. If this is a reference to a common data type, | ||
| 150 | * resolve it immediately. According to the ACPI spec, package | ||
| 151 | * elements can only be "data objects" or method references. | ||
| 152 | * Attempt to resolve to an Integer, Buffer, String or Package. | ||
| 153 | * If cannot, return the named reference (for things like Devices, | ||
| 154 | * Methods, etc.) Buffer Fields and Fields will resolve to simple | ||
| 155 | * objects (int/buf/str/pkg). | ||
| 156 | * | ||
| 157 | * NOTE: References to things like Devices, Methods, Mutexes, etc. | ||
| 158 | * will remain as named references. This behavior is not described | ||
| 159 | * in the ACPI spec, but it appears to be an oversight. | ||
| 160 | */ | ||
| 161 | obj_desc = | ||
| 162 | ACPI_CAST_PTR(union acpi_operand_object, | ||
| 163 | op->common.node); | ||
| 164 | |||
| 165 | status = | ||
| 166 | acpi_ex_resolve_node_to_value(ACPI_CAST_INDIRECT_PTR | ||
| 167 | (struct | ||
| 168 | acpi_namespace_node, | ||
| 169 | &obj_desc), | ||
| 170 | walk_state); | ||
| 171 | if (ACPI_FAILURE(status)) { | ||
| 172 | return_ACPI_STATUS(status); | ||
| 173 | } | ||
| 174 | |||
| 175 | switch (op->common.node->type) { | ||
| 176 | /* | ||
| 177 | * For these types, we need the actual node, not the subobject. | ||
| 178 | * However, the subobject did not get an extra reference count above. | ||
| 179 | * | ||
| 180 | * TBD: should ex_resolve_node_to_value be changed to fix this? | ||
| 181 | */ | ||
| 182 | case ACPI_TYPE_DEVICE: | ||
| 183 | case ACPI_TYPE_THERMAL: | ||
| 184 | |||
| 185 | acpi_ut_add_reference(op->common.node->object); | ||
| 186 | |||
| 187 | /*lint -fallthrough */ | ||
| 188 | /* | ||
| 189 | * For these types, we need the actual node, not the subobject. | ||
| 190 | * The subobject got an extra reference count in ex_resolve_node_to_value. | ||
| 191 | */ | ||
| 192 | case ACPI_TYPE_MUTEX: | ||
| 193 | case ACPI_TYPE_METHOD: | ||
| 194 | case ACPI_TYPE_POWER: | ||
| 195 | case ACPI_TYPE_PROCESSOR: | ||
| 196 | case ACPI_TYPE_EVENT: | ||
| 197 | case ACPI_TYPE_REGION: | ||
| 198 | |||
| 199 | /* We will create a reference object for these types below */ | ||
| 200 | break; | ||
| 201 | |||
| 202 | default: | ||
| 203 | /* | ||
| 204 | * All other types - the node was resolved to an actual | ||
| 205 | * object, we are done. | ||
| 206 | */ | ||
| 207 | goto exit; | ||
| 208 | } | ||
| 209 | } | ||
| 210 | } | ||
| 211 | |||
| 212 | /* Create and init a new internal ACPI object */ | ||
| 213 | |||
| 214 | obj_desc = acpi_ut_create_internal_object((acpi_ps_get_opcode_info | ||
| 215 | (op->common.aml_opcode))-> | ||
| 216 | object_type); | ||
| 217 | if (!obj_desc) { | ||
| 218 | return_ACPI_STATUS(AE_NO_MEMORY); | ||
| 219 | } | ||
| 220 | |||
| 221 | status = | ||
| 222 | acpi_ds_init_object_from_op(walk_state, op, op->common.aml_opcode, | ||
| 223 | &obj_desc); | ||
| 224 | if (ACPI_FAILURE(status)) { | ||
| 225 | acpi_ut_remove_reference(obj_desc); | ||
| 226 | return_ACPI_STATUS(status); | ||
| 227 | } | ||
| 228 | |||
| 229 | exit: | ||
| 230 | *obj_desc_ptr = obj_desc; | ||
| 231 | return_ACPI_STATUS(status); | ||
| 232 | } | ||
| 233 | |||
| 234 | /******************************************************************************* | ||
| 235 | * | ||
| 236 | * FUNCTION: acpi_ds_build_internal_buffer_obj | ||
| 237 | * | ||
| 238 | * PARAMETERS: walk_state - Current walk state | ||
| 239 | * Op - Parser object to be translated | ||
| 240 | * buffer_length - Length of the buffer | ||
| 241 | * obj_desc_ptr - Where the ACPI internal object is returned | ||
| 242 | * | ||
| 243 | * RETURN: Status | ||
| 244 | * | ||
| 245 | * DESCRIPTION: Translate a parser Op package object to the equivalent | ||
| 246 | * namespace object | ||
| 247 | * | ||
| 248 | ******************************************************************************/ | ||
| 249 | |||
| 250 | acpi_status | ||
| 251 | acpi_ds_build_internal_buffer_obj(struct acpi_walk_state *walk_state, | ||
| 252 | union acpi_parse_object *op, | ||
| 253 | u32 buffer_length, | ||
| 254 | union acpi_operand_object **obj_desc_ptr) | ||
| 255 | { | ||
| 256 | union acpi_parse_object *arg; | ||
| 257 | union acpi_operand_object *obj_desc; | ||
| 258 | union acpi_parse_object *byte_list; | ||
| 259 | u32 byte_list_length = 0; | ||
| 260 | |||
| 261 | ACPI_FUNCTION_TRACE(ds_build_internal_buffer_obj); | ||
| 262 | |||
| 263 | /* | ||
| 264 | * If we are evaluating a Named buffer object "Name (xxxx, Buffer)". | ||
| 265 | * The buffer object already exists (from the NS node), otherwise it must | ||
| 266 | * be created. | ||
| 267 | */ | ||
| 268 | obj_desc = *obj_desc_ptr; | ||
| 269 | if (!obj_desc) { | ||
| 270 | |||
| 271 | /* Create a new buffer object */ | ||
| 272 | |||
| 273 | obj_desc = acpi_ut_create_internal_object(ACPI_TYPE_BUFFER); | ||
| 274 | *obj_desc_ptr = obj_desc; | ||
| 275 | if (!obj_desc) { | ||
| 276 | return_ACPI_STATUS(AE_NO_MEMORY); | ||
| 277 | } | ||
| 278 | } | ||
| 279 | |||
| 280 | /* | ||
| 281 | * Second arg is the buffer data (optional) byte_list can be either | ||
| 282 | * individual bytes or a string initializer. In either case, a | ||
| 283 | * byte_list appears in the AML. | ||
| 284 | */ | ||
| 285 | arg = op->common.value.arg; /* skip first arg */ | ||
| 286 | |||
| 287 | byte_list = arg->named.next; | ||
| 288 | if (byte_list) { | ||
| 289 | if (byte_list->common.aml_opcode != AML_INT_BYTELIST_OP) { | ||
| 290 | ACPI_ERROR((AE_INFO, | ||
| 291 | "Expecting bytelist, got AML opcode %X in op %p", | ||
| 292 | byte_list->common.aml_opcode, byte_list)); | ||
| 293 | |||
| 294 | acpi_ut_remove_reference(obj_desc); | ||
| 295 | return (AE_TYPE); | ||
| 296 | } | ||
| 297 | |||
| 298 | byte_list_length = (u32) byte_list->common.value.integer; | ||
| 299 | } | ||
| 300 | |||
| 301 | /* | ||
| 302 | * The buffer length (number of bytes) will be the larger of: | ||
| 303 | * 1) The specified buffer length and | ||
| 304 | * 2) The length of the initializer byte list | ||
| 305 | */ | ||
| 306 | obj_desc->buffer.length = buffer_length; | ||
| 307 | if (byte_list_length > buffer_length) { | ||
| 308 | obj_desc->buffer.length = byte_list_length; | ||
| 309 | } | ||
| 310 | |||
| 311 | /* Allocate the buffer */ | ||
| 312 | |||
| 313 | if (obj_desc->buffer.length == 0) { | ||
| 314 | obj_desc->buffer.pointer = NULL; | ||
| 315 | ACPI_DEBUG_PRINT((ACPI_DB_EXEC, | ||
| 316 | "Buffer defined with zero length in AML, creating\n")); | ||
| 317 | } else { | ||
| 318 | obj_desc->buffer.pointer = | ||
| 319 | ACPI_ALLOCATE_ZEROED(obj_desc->buffer.length); | ||
| 320 | if (!obj_desc->buffer.pointer) { | ||
| 321 | acpi_ut_delete_object_desc(obj_desc); | ||
| 322 | return_ACPI_STATUS(AE_NO_MEMORY); | ||
| 323 | } | ||
| 324 | |||
| 325 | /* Initialize buffer from the byte_list (if present) */ | ||
| 326 | |||
| 327 | if (byte_list) { | ||
| 328 | ACPI_MEMCPY(obj_desc->buffer.pointer, | ||
| 329 | byte_list->named.data, byte_list_length); | ||
| 330 | } | ||
| 331 | } | ||
| 332 | |||
| 333 | obj_desc->buffer.flags |= AOPOBJ_DATA_VALID; | ||
| 334 | op->common.node = ACPI_CAST_PTR(struct acpi_namespace_node, obj_desc); | ||
| 335 | return_ACPI_STATUS(AE_OK); | ||
| 336 | } | ||
| 337 | |||
| 338 | /******************************************************************************* | ||
| 339 | * | ||
| 340 | * FUNCTION: acpi_ds_build_internal_package_obj | ||
| 341 | * | ||
| 342 | * PARAMETERS: walk_state - Current walk state | ||
| 343 | * Op - Parser object to be translated | ||
| 344 | * element_count - Number of elements in the package - this is | ||
| 345 | * the num_elements argument to Package() | ||
| 346 | * obj_desc_ptr - Where the ACPI internal object is returned | ||
| 347 | * | ||
| 348 | * RETURN: Status | ||
| 349 | * | ||
| 350 | * DESCRIPTION: Translate a parser Op package object to the equivalent | ||
| 351 | * namespace object | ||
| 352 | * | ||
| 353 | * NOTE: The number of elements in the package will be always be the num_elements | ||
| 354 | * count, regardless of the number of elements in the package list. If | ||
| 355 | * num_elements is smaller, only that many package list elements are used. | ||
| 356 | * if num_elements is larger, the Package object is padded out with | ||
| 357 | * objects of type Uninitialized (as per ACPI spec.) | ||
| 358 | * | ||
| 359 | * Even though the ASL compilers do not allow num_elements to be smaller | ||
| 360 | * than the Package list length (for the fixed length package opcode), some | ||
| 361 | * BIOS code modifies the AML on the fly to adjust the num_elements, and | ||
| 362 | * this code compensates for that. This also provides compatibility with | ||
| 363 | * other AML interpreters. | ||
| 364 | * | ||
| 365 | ******************************************************************************/ | ||
| 366 | |||
| 367 | acpi_status | ||
| 368 | acpi_ds_build_internal_package_obj(struct acpi_walk_state *walk_state, | ||
| 369 | union acpi_parse_object *op, | ||
| 370 | u32 element_count, | ||
| 371 | union acpi_operand_object **obj_desc_ptr) | ||
| 372 | { | ||
| 373 | union acpi_parse_object *arg; | ||
| 374 | union acpi_parse_object *parent; | ||
| 375 | union acpi_operand_object *obj_desc = NULL; | ||
| 376 | acpi_status status = AE_OK; | ||
| 377 | unsigned i; | ||
| 378 | u16 index; | ||
| 379 | u16 reference_count; | ||
| 380 | |||
| 381 | ACPI_FUNCTION_TRACE(ds_build_internal_package_obj); | ||
| 382 | |||
| 383 | /* Find the parent of a possibly nested package */ | ||
| 384 | |||
| 385 | parent = op->common.parent; | ||
| 386 | while ((parent->common.aml_opcode == AML_PACKAGE_OP) || | ||
| 387 | (parent->common.aml_opcode == AML_VAR_PACKAGE_OP)) { | ||
| 388 | parent = parent->common.parent; | ||
| 389 | } | ||
| 390 | |||
| 391 | /* | ||
| 392 | * If we are evaluating a Named package object "Name (xxxx, Package)", | ||
| 393 | * the package object already exists, otherwise it must be created. | ||
| 394 | */ | ||
| 395 | obj_desc = *obj_desc_ptr; | ||
| 396 | if (!obj_desc) { | ||
| 397 | obj_desc = acpi_ut_create_internal_object(ACPI_TYPE_PACKAGE); | ||
| 398 | *obj_desc_ptr = obj_desc; | ||
| 399 | if (!obj_desc) { | ||
| 400 | return_ACPI_STATUS(AE_NO_MEMORY); | ||
| 401 | } | ||
| 402 | |||
| 403 | obj_desc->package.node = parent->common.node; | ||
| 404 | } | ||
| 405 | |||
| 406 | /* | ||
| 407 | * Allocate the element array (array of pointers to the individual | ||
| 408 | * objects) based on the num_elements parameter. Add an extra pointer slot | ||
| 409 | * so that the list is always null terminated. | ||
| 410 | */ | ||
| 411 | obj_desc->package.elements = ACPI_ALLOCATE_ZEROED(((acpi_size) | ||
| 412 | element_count + | ||
| 413 | 1) * sizeof(void *)); | ||
| 414 | |||
| 415 | if (!obj_desc->package.elements) { | ||
| 416 | acpi_ut_delete_object_desc(obj_desc); | ||
| 417 | return_ACPI_STATUS(AE_NO_MEMORY); | ||
| 418 | } | ||
| 419 | |||
| 420 | obj_desc->package.count = element_count; | ||
| 421 | |||
| 422 | /* | ||
| 423 | * Initialize the elements of the package, up to the num_elements count. | ||
| 424 | * Package is automatically padded with uninitialized (NULL) elements | ||
| 425 | * if num_elements is greater than the package list length. Likewise, | ||
| 426 | * Package is truncated if num_elements is less than the list length. | ||
| 427 | */ | ||
| 428 | arg = op->common.value.arg; | ||
| 429 | arg = arg->common.next; | ||
| 430 | for (i = 0; arg && (i < element_count); i++) { | ||
| 431 | if (arg->common.aml_opcode == AML_INT_RETURN_VALUE_OP) { | ||
| 432 | if (arg->common.node->type == ACPI_TYPE_METHOD) { | ||
| 433 | /* | ||
| 434 | * A method reference "looks" to the parser to be a method | ||
| 435 | * invocation, so we special case it here | ||
| 436 | */ | ||
| 437 | arg->common.aml_opcode = AML_INT_NAMEPATH_OP; | ||
| 438 | status = | ||
| 439 | acpi_ds_build_internal_object(walk_state, | ||
| 440 | arg, | ||
| 441 | &obj_desc-> | ||
| 442 | package. | ||
| 443 | elements[i]); | ||
| 444 | } else { | ||
| 445 | /* This package element is already built, just get it */ | ||
| 446 | |||
| 447 | obj_desc->package.elements[i] = | ||
| 448 | ACPI_CAST_PTR(union acpi_operand_object, | ||
| 449 | arg->common.node); | ||
| 450 | } | ||
| 451 | } else { | ||
| 452 | status = acpi_ds_build_internal_object(walk_state, arg, | ||
| 453 | &obj_desc-> | ||
| 454 | package. | ||
| 455 | elements[i]); | ||
| 456 | } | ||
| 457 | |||
| 458 | if (*obj_desc_ptr) { | ||
| 459 | |||
| 460 | /* Existing package, get existing reference count */ | ||
| 461 | |||
| 462 | reference_count = | ||
| 463 | (*obj_desc_ptr)->common.reference_count; | ||
| 464 | if (reference_count > 1) { | ||
| 465 | |||
| 466 | /* Make new element ref count match original ref count */ | ||
| 467 | |||
| 468 | for (index = 0; index < (reference_count - 1); | ||
| 469 | index++) { | ||
| 470 | acpi_ut_add_reference((obj_desc-> | ||
| 471 | package. | ||
| 472 | elements[i])); | ||
| 473 | } | ||
| 474 | } | ||
| 475 | } | ||
| 476 | |||
| 477 | arg = arg->common.next; | ||
| 478 | } | ||
| 479 | |||
| 480 | /* Check for match between num_elements and actual length of package_list */ | ||
| 481 | |||
| 482 | if (arg) { | ||
| 483 | /* | ||
| 484 | * num_elements was exhausted, but there are remaining elements in the | ||
| 485 | * package_list. | ||
| 486 | * | ||
| 487 | * Note: technically, this is an error, from ACPI spec: "It is an error | ||
| 488 | * for NumElements to be less than the number of elements in the | ||
| 489 | * PackageList". However, for now, we just print an error message and | ||
| 490 | * no exception is returned. | ||
| 491 | */ | ||
| 492 | while (arg) { | ||
| 493 | |||
| 494 | /* Find out how many elements there really are */ | ||
| 495 | |||
| 496 | i++; | ||
| 497 | arg = arg->common.next; | ||
| 498 | } | ||
| 499 | |||
| 500 | ACPI_WARNING((AE_INFO, | ||
| 501 | "Package List length (%X) larger than NumElements count (%X), truncated\n", | ||
| 502 | i, element_count)); | ||
| 503 | } else if (i < element_count) { | ||
| 504 | /* | ||
| 505 | * Arg list (elements) was exhausted, but we did not reach num_elements count. | ||
| 506 | * Note: this is not an error, the package is padded out with NULLs. | ||
| 507 | */ | ||
| 508 | ACPI_DEBUG_PRINT((ACPI_DB_INFO, | ||
| 509 | "Package List length (%X) smaller than NumElements count (%X), padded with null elements\n", | ||
| 510 | i, element_count)); | ||
| 511 | } | ||
| 512 | |||
| 513 | obj_desc->package.flags |= AOPOBJ_DATA_VALID; | ||
| 514 | op->common.node = ACPI_CAST_PTR(struct acpi_namespace_node, obj_desc); | ||
| 515 | return_ACPI_STATUS(status); | ||
| 516 | } | ||
| 517 | |||
| 518 | /******************************************************************************* | ||
| 519 | * | ||
| 520 | * FUNCTION: acpi_ds_create_node | ||
| 521 | * | ||
| 522 | * PARAMETERS: walk_state - Current walk state | ||
| 523 | * Node - NS Node to be initialized | ||
| 524 | * Op - Parser object to be translated | ||
| 525 | * | ||
| 526 | * RETURN: Status | ||
| 527 | * | ||
| 528 | * DESCRIPTION: Create the object to be associated with a namespace node | ||
| 529 | * | ||
| 530 | ******************************************************************************/ | ||
| 531 | |||
| 532 | acpi_status | ||
| 533 | acpi_ds_create_node(struct acpi_walk_state *walk_state, | ||
| 534 | struct acpi_namespace_node *node, | ||
| 535 | union acpi_parse_object *op) | ||
| 536 | { | ||
| 537 | acpi_status status; | ||
| 538 | union acpi_operand_object *obj_desc; | ||
| 539 | |||
| 540 | ACPI_FUNCTION_TRACE_PTR(ds_create_node, op); | ||
| 541 | |||
| 542 | /* | ||
| 543 | * Because of the execution pass through the non-control-method | ||
| 544 | * parts of the table, we can arrive here twice. Only init | ||
| 545 | * the named object node the first time through | ||
| 546 | */ | ||
| 547 | if (acpi_ns_get_attached_object(node)) { | ||
| 548 | return_ACPI_STATUS(AE_OK); | ||
| 549 | } | ||
| 550 | |||
| 551 | if (!op->common.value.arg) { | ||
| 552 | |||
| 553 | /* No arguments, there is nothing to do */ | ||
| 554 | |||
| 555 | return_ACPI_STATUS(AE_OK); | ||
| 556 | } | ||
| 557 | |||
| 558 | /* Build an internal object for the argument(s) */ | ||
| 559 | |||
| 560 | status = acpi_ds_build_internal_object(walk_state, op->common.value.arg, | ||
| 561 | &obj_desc); | ||
| 562 | if (ACPI_FAILURE(status)) { | ||
| 563 | return_ACPI_STATUS(status); | ||
| 564 | } | ||
| 565 | |||
| 566 | /* Re-type the object according to its argument */ | ||
| 567 | |||
| 568 | node->type = ACPI_GET_OBJECT_TYPE(obj_desc); | ||
| 569 | |||
| 570 | /* Attach obj to node */ | ||
| 571 | |||
| 572 | status = acpi_ns_attach_object(node, obj_desc, node->type); | ||
| 573 | |||
| 574 | /* Remove local reference to the object */ | ||
| 575 | |||
| 576 | acpi_ut_remove_reference(obj_desc); | ||
| 577 | return_ACPI_STATUS(status); | ||
| 578 | } | ||
| 579 | |||
| 580 | #endif /* ACPI_NO_METHOD_EXECUTION */ | ||
| 581 | |||
| 582 | /******************************************************************************* | ||
| 583 | * | ||
| 584 | * FUNCTION: acpi_ds_init_object_from_op | ||
| 585 | * | ||
| 586 | * PARAMETERS: walk_state - Current walk state | ||
| 587 | * Op - Parser op used to init the internal object | ||
| 588 | * Opcode - AML opcode associated with the object | ||
| 589 | * ret_obj_desc - Namespace object to be initialized | ||
| 590 | * | ||
| 591 | * RETURN: Status | ||
| 592 | * | ||
| 593 | * DESCRIPTION: Initialize a namespace object from a parser Op and its | ||
| 594 | * associated arguments. The namespace object is a more compact | ||
| 595 | * representation of the Op and its arguments. | ||
| 596 | * | ||
| 597 | ******************************************************************************/ | ||
| 598 | |||
| 599 | acpi_status | ||
| 600 | acpi_ds_init_object_from_op(struct acpi_walk_state *walk_state, | ||
| 601 | union acpi_parse_object *op, | ||
| 602 | u16 opcode, | ||
| 603 | union acpi_operand_object **ret_obj_desc) | ||
| 604 | { | ||
| 605 | const struct acpi_opcode_info *op_info; | ||
| 606 | union acpi_operand_object *obj_desc; | ||
| 607 | acpi_status status = AE_OK; | ||
| 608 | |||
| 609 | ACPI_FUNCTION_TRACE(ds_init_object_from_op); | ||
| 610 | |||
| 611 | obj_desc = *ret_obj_desc; | ||
| 612 | op_info = acpi_ps_get_opcode_info(opcode); | ||
| 613 | if (op_info->class == AML_CLASS_UNKNOWN) { | ||
| 614 | |||
| 615 | /* Unknown opcode */ | ||
| 616 | |||
| 617 | return_ACPI_STATUS(AE_TYPE); | ||
| 618 | } | ||
| 619 | |||
| 620 | /* Perform per-object initialization */ | ||
| 621 | |||
| 622 | switch (ACPI_GET_OBJECT_TYPE(obj_desc)) { | ||
| 623 | case ACPI_TYPE_BUFFER: | ||
| 624 | |||
| 625 | /* | ||
| 626 | * Defer evaluation of Buffer term_arg operand | ||
| 627 | */ | ||
| 628 | obj_desc->buffer.node = | ||
| 629 | ACPI_CAST_PTR(struct acpi_namespace_node, | ||
| 630 | walk_state->operands[0]); | ||
| 631 | obj_desc->buffer.aml_start = op->named.data; | ||
| 632 | obj_desc->buffer.aml_length = op->named.length; | ||
| 633 | break; | ||
| 634 | |||
| 635 | case ACPI_TYPE_PACKAGE: | ||
| 636 | |||
| 637 | /* | ||
| 638 | * Defer evaluation of Package term_arg operand | ||
| 639 | */ | ||
| 640 | obj_desc->package.node = | ||
| 641 | ACPI_CAST_PTR(struct acpi_namespace_node, | ||
| 642 | walk_state->operands[0]); | ||
| 643 | obj_desc->package.aml_start = op->named.data; | ||
| 644 | obj_desc->package.aml_length = op->named.length; | ||
| 645 | break; | ||
| 646 | |||
| 647 | case ACPI_TYPE_INTEGER: | ||
| 648 | |||
| 649 | switch (op_info->type) { | ||
| 650 | case AML_TYPE_CONSTANT: | ||
| 651 | /* | ||
| 652 | * Resolve AML Constants here - AND ONLY HERE! | ||
| 653 | * All constants are integers. | ||
| 654 | * We mark the integer with a flag that indicates that it started | ||
| 655 | * life as a constant -- so that stores to constants will perform | ||
| 656 | * as expected (noop). zero_op is used as a placeholder for optional | ||
| 657 | * target operands. | ||
| 658 | */ | ||
| 659 | obj_desc->common.flags = AOPOBJ_AML_CONSTANT; | ||
| 660 | |||
| 661 | switch (opcode) { | ||
| 662 | case AML_ZERO_OP: | ||
| 663 | |||
| 664 | obj_desc->integer.value = 0; | ||
| 665 | break; | ||
| 666 | |||
| 667 | case AML_ONE_OP: | ||
| 668 | |||
| 669 | obj_desc->integer.value = 1; | ||
| 670 | break; | ||
| 671 | |||
| 672 | case AML_ONES_OP: | ||
| 673 | |||
| 674 | obj_desc->integer.value = ACPI_INTEGER_MAX; | ||
| 675 | |||
| 676 | /* Truncate value if we are executing from a 32-bit ACPI table */ | ||
| 677 | |||
| 678 | #ifndef ACPI_NO_METHOD_EXECUTION | ||
| 679 | acpi_ex_truncate_for32bit_table(obj_desc); | ||
| 680 | #endif | ||
| 681 | break; | ||
| 682 | |||
| 683 | case AML_REVISION_OP: | ||
| 684 | |||
| 685 | obj_desc->integer.value = ACPI_CA_VERSION; | ||
| 686 | break; | ||
| 687 | |||
| 688 | default: | ||
| 689 | |||
| 690 | ACPI_ERROR((AE_INFO, | ||
| 691 | "Unknown constant opcode %X", | ||
| 692 | opcode)); | ||
| 693 | status = AE_AML_OPERAND_TYPE; | ||
| 694 | break; | ||
| 695 | } | ||
| 696 | break; | ||
| 697 | |||
| 698 | case AML_TYPE_LITERAL: | ||
| 699 | |||
| 700 | obj_desc->integer.value = op->common.value.integer; | ||
| 701 | #ifndef ACPI_NO_METHOD_EXECUTION | ||
| 702 | acpi_ex_truncate_for32bit_table(obj_desc); | ||
| 703 | #endif | ||
| 704 | break; | ||
| 705 | |||
| 706 | default: | ||
| 707 | ACPI_ERROR((AE_INFO, "Unknown Integer type %X", | ||
| 708 | op_info->type)); | ||
| 709 | status = AE_AML_OPERAND_TYPE; | ||
| 710 | break; | ||
| 711 | } | ||
| 712 | break; | ||
| 713 | |||
| 714 | case ACPI_TYPE_STRING: | ||
| 715 | |||
| 716 | obj_desc->string.pointer = op->common.value.string; | ||
| 717 | obj_desc->string.length = | ||
| 718 | (u32) ACPI_STRLEN(op->common.value.string); | ||
| 719 | |||
| 720 | /* | ||
| 721 | * The string is contained in the ACPI table, don't ever try | ||
| 722 | * to delete it | ||
| 723 | */ | ||
| 724 | obj_desc->common.flags |= AOPOBJ_STATIC_POINTER; | ||
| 725 | break; | ||
| 726 | |||
| 727 | case ACPI_TYPE_METHOD: | ||
| 728 | break; | ||
| 729 | |||
| 730 | case ACPI_TYPE_LOCAL_REFERENCE: | ||
| 731 | |||
| 732 | switch (op_info->type) { | ||
| 733 | case AML_TYPE_LOCAL_VARIABLE: | ||
| 734 | |||
| 735 | /* Local ID (0-7) is (AML opcode - base AML_LOCAL_OP) */ | ||
| 736 | |||
| 737 | obj_desc->reference.value = opcode - AML_LOCAL_OP; | ||
| 738 | obj_desc->reference.class = ACPI_REFCLASS_LOCAL; | ||
| 739 | |||
| 740 | #ifndef ACPI_NO_METHOD_EXECUTION | ||
| 741 | status = | ||
| 742 | acpi_ds_method_data_get_node(ACPI_REFCLASS_LOCAL, | ||
| 743 | obj_desc->reference. | ||
| 744 | value, walk_state, | ||
| 745 | ACPI_CAST_INDIRECT_PTR | ||
| 746 | (struct | ||
| 747 | acpi_namespace_node, | ||
| 748 | &obj_desc->reference. | ||
| 749 | object)); | ||
| 750 | #endif | ||
| 751 | break; | ||
| 752 | |||
| 753 | case AML_TYPE_METHOD_ARGUMENT: | ||
| 754 | |||
| 755 | /* Arg ID (0-6) is (AML opcode - base AML_ARG_OP) */ | ||
| 756 | |||
| 757 | obj_desc->reference.value = opcode - AML_ARG_OP; | ||
| 758 | obj_desc->reference.class = ACPI_REFCLASS_ARG; | ||
| 759 | |||
| 760 | #ifndef ACPI_NO_METHOD_EXECUTION | ||
| 761 | status = acpi_ds_method_data_get_node(ACPI_REFCLASS_ARG, | ||
| 762 | obj_desc-> | ||
| 763 | reference.value, | ||
| 764 | walk_state, | ||
| 765 | ACPI_CAST_INDIRECT_PTR | ||
| 766 | (struct | ||
| 767 | acpi_namespace_node, | ||
| 768 | &obj_desc-> | ||
| 769 | reference. | ||
| 770 | object)); | ||
| 771 | #endif | ||
| 772 | break; | ||
| 773 | |||
| 774 | default: /* Object name or Debug object */ | ||
| 775 | |||
| 776 | switch (op->common.aml_opcode) { | ||
| 777 | case AML_INT_NAMEPATH_OP: | ||
| 778 | |||
| 779 | /* Node was saved in Op */ | ||
| 780 | |||
| 781 | obj_desc->reference.node = op->common.node; | ||
| 782 | obj_desc->reference.object = | ||
| 783 | op->common.node->object; | ||
| 784 | obj_desc->reference.class = ACPI_REFCLASS_NAME; | ||
| 785 | break; | ||
| 786 | |||
| 787 | case AML_DEBUG_OP: | ||
| 788 | |||
| 789 | obj_desc->reference.class = ACPI_REFCLASS_DEBUG; | ||
| 790 | break; | ||
| 791 | |||
| 792 | default: | ||
| 793 | |||
| 794 | ACPI_ERROR((AE_INFO, | ||
| 795 | "Unimplemented reference type for AML opcode: %4.4X", | ||
| 796 | opcode)); | ||
| 797 | return_ACPI_STATUS(AE_AML_OPERAND_TYPE); | ||
| 798 | } | ||
| 799 | break; | ||
| 800 | } | ||
| 801 | break; | ||
| 802 | |||
| 803 | default: | ||
| 804 | |||
| 805 | ACPI_ERROR((AE_INFO, "Unimplemented data type: %X", | ||
| 806 | ACPI_GET_OBJECT_TYPE(obj_desc))); | ||
| 807 | |||
| 808 | status = AE_AML_OPERAND_TYPE; | ||
| 809 | break; | ||
| 810 | } | ||
| 811 | |||
| 812 | return_ACPI_STATUS(status); | ||
| 813 | } | ||
