1 // SPDX-License-Identifier: BSD-3-Clause OR GPL-2.0 2 /****************************************************************************** 3 * 4 * Module Name: dsopcode - Dispatcher support for regions and fields 5 * 6 * Copyright (C) 2000 - 2018, Intel Corp. 7 * 8 *****************************************************************************/ 9 10 #include <acpi/acpi.h> 11 #include "accommon.h" 12 #include "acparser.h" 13 #include "amlcode.h" 14 #include "acdispat.h" 15 #include "acinterp.h" 16 #include "acnamesp.h" 17 #include "acevents.h" 18 #include "actables.h" 19 20 #define _COMPONENT ACPI_DISPATCHER 21 ACPI_MODULE_NAME("dsopcode") 22 23 /* Local prototypes */ 24 static acpi_status 25 acpi_ds_init_buffer_field(u16 aml_opcode, 26 union acpi_operand_object *obj_desc, 27 union acpi_operand_object *buffer_desc, 28 union acpi_operand_object *offset_desc, 29 union acpi_operand_object *length_desc, 30 union acpi_operand_object *result_desc); 31 32 /******************************************************************************* 33 * 34 * FUNCTION: acpi_ds_initialize_region 35 * 36 * PARAMETERS: obj_handle - Region namespace node 37 * 38 * RETURN: Status 39 * 40 * DESCRIPTION: Front end to ev_initialize_region 41 * 42 ******************************************************************************/ 43 44 acpi_status acpi_ds_initialize_region(acpi_handle obj_handle) 45 { 46 union acpi_operand_object *obj_desc; 47 acpi_status status; 48 49 obj_desc = acpi_ns_get_attached_object(obj_handle); 50 51 /* Namespace is NOT locked */ 52 53 status = acpi_ev_initialize_region(obj_desc); 54 return (status); 55 } 56 57 /******************************************************************************* 58 * 59 * FUNCTION: acpi_ds_init_buffer_field 60 * 61 * PARAMETERS: aml_opcode - create_xxx_field 62 * obj_desc - buffer_field object 63 * buffer_desc - Host Buffer 64 * offset_desc - Offset into buffer 65 * length_desc - Length of field (CREATE_FIELD_OP only) 66 * result_desc - Where to store the result 67 * 68 * RETURN: Status 69 * 70 * DESCRIPTION: Perform actual initialization of a buffer field 71 * 72 ******************************************************************************/ 73 74 static acpi_status 75 acpi_ds_init_buffer_field(u16 aml_opcode, 76 union acpi_operand_object *obj_desc, 77 union acpi_operand_object *buffer_desc, 78 union acpi_operand_object *offset_desc, 79 union acpi_operand_object *length_desc, 80 union acpi_operand_object *result_desc) 81 { 82 u32 offset; 83 u32 bit_offset; 84 u32 bit_count; 85 u8 field_flags; 86 acpi_status status; 87 88 ACPI_FUNCTION_TRACE_PTR(ds_init_buffer_field, obj_desc); 89 90 /* Host object must be a Buffer */ 91 92 if (buffer_desc->common.type != ACPI_TYPE_BUFFER) { 93 ACPI_ERROR((AE_INFO, 94 "Target of Create Field is not a Buffer object - %s", 95 acpi_ut_get_object_type_name(buffer_desc))); 96 97 status = AE_AML_OPERAND_TYPE; 98 goto cleanup; 99 } 100 101 /* 102 * The last parameter to all of these opcodes (result_desc) started 103 * out as a name_string, and should therefore now be a NS node 104 * after resolution in acpi_ex_resolve_operands(). 105 */ 106 if (ACPI_GET_DESCRIPTOR_TYPE(result_desc) != ACPI_DESC_TYPE_NAMED) { 107 ACPI_ERROR((AE_INFO, 108 "(%s) destination not a NS Node [%s]", 109 acpi_ps_get_opcode_name(aml_opcode), 110 acpi_ut_get_descriptor_name(result_desc))); 111 112 status = AE_AML_OPERAND_TYPE; 113 goto cleanup; 114 } 115 116 offset = (u32) offset_desc->integer.value; 117 118 /* 119 * Setup the Bit offsets and counts, according to the opcode 120 */ 121 switch (aml_opcode) { 122 case AML_CREATE_FIELD_OP: 123 124 /* Offset is in bits, count is in bits */ 125 126 field_flags = AML_FIELD_ACCESS_BYTE; 127 bit_offset = offset; 128 bit_count = (u32) length_desc->integer.value; 129 130 /* Must have a valid (>0) bit count */ 131 132 if (bit_count == 0) { 133 ACPI_ERROR((AE_INFO, 134 "Attempt to CreateField of length zero")); 135 status = AE_AML_OPERAND_VALUE; 136 goto cleanup; 137 } 138 break; 139 140 case AML_CREATE_BIT_FIELD_OP: 141 142 /* Offset is in bits, Field is one bit */ 143 144 bit_offset = offset; 145 bit_count = 1; 146 field_flags = AML_FIELD_ACCESS_BYTE; 147 break; 148 149 case AML_CREATE_BYTE_FIELD_OP: 150 151 /* Offset is in bytes, field is one byte */ 152 153 bit_offset = 8 * offset; 154 bit_count = 8; 155 field_flags = AML_FIELD_ACCESS_BYTE; 156 break; 157 158 case AML_CREATE_WORD_FIELD_OP: 159 160 /* Offset is in bytes, field is one word */ 161 162 bit_offset = 8 * offset; 163 bit_count = 16; 164 field_flags = AML_FIELD_ACCESS_WORD; 165 break; 166 167 case AML_CREATE_DWORD_FIELD_OP: 168 169 /* Offset is in bytes, field is one dword */ 170 171 bit_offset = 8 * offset; 172 bit_count = 32; 173 field_flags = AML_FIELD_ACCESS_DWORD; 174 break; 175 176 case AML_CREATE_QWORD_FIELD_OP: 177 178 /* Offset is in bytes, field is one qword */ 179 180 bit_offset = 8 * offset; 181 bit_count = 64; 182 field_flags = AML_FIELD_ACCESS_QWORD; 183 break; 184 185 default: 186 187 ACPI_ERROR((AE_INFO, 188 "Unknown field creation opcode 0x%02X", 189 aml_opcode)); 190 status = AE_AML_BAD_OPCODE; 191 goto cleanup; 192 } 193 194 /* Entire field must fit within the current length of the buffer */ 195 196 if ((bit_offset + bit_count) > (8 * (u32)buffer_desc->buffer.length)) { 197 ACPI_ERROR((AE_INFO, 198 "Field [%4.4s] at bit offset/length %u/%u " 199 "exceeds size of target Buffer (%u bits)", 200 acpi_ut_get_node_name(result_desc), bit_offset, 201 bit_count, 8 * (u32)buffer_desc->buffer.length)); 202 status = AE_AML_BUFFER_LIMIT; 203 goto cleanup; 204 } 205 206 /* 207 * Initialize areas of the field object that are common to all fields 208 * For field_flags, use LOCK_RULE = 0 (NO_LOCK), 209 * UPDATE_RULE = 0 (UPDATE_PRESERVE) 210 */ 211 status = 212 acpi_ex_prep_common_field_object(obj_desc, field_flags, 0, 213 bit_offset, bit_count); 214 if (ACPI_FAILURE(status)) { 215 goto cleanup; 216 } 217 218 obj_desc->buffer_field.buffer_obj = buffer_desc; 219 220 /* Reference count for buffer_desc inherits obj_desc count */ 221 222 buffer_desc->common.reference_count = (u16) 223 (buffer_desc->common.reference_count + 224 obj_desc->common.reference_count); 225 226 cleanup: 227 228 /* Always delete the operands */ 229 230 acpi_ut_remove_reference(offset_desc); 231 acpi_ut_remove_reference(buffer_desc); 232 233 if (aml_opcode == AML_CREATE_FIELD_OP) { 234 acpi_ut_remove_reference(length_desc); 235 } 236 237 /* On failure, delete the result descriptor */ 238 239 if (ACPI_FAILURE(status)) { 240 acpi_ut_remove_reference(result_desc); /* Result descriptor */ 241 } else { 242 /* Now the address and length are valid for this buffer_field */ 243 244 obj_desc->buffer_field.flags |= AOPOBJ_DATA_VALID; 245 } 246 247 return_ACPI_STATUS(status); 248 } 249 250 /******************************************************************************* 251 * 252 * FUNCTION: acpi_ds_eval_buffer_field_operands 253 * 254 * PARAMETERS: walk_state - Current walk 255 * op - A valid buffer_field Op object 256 * 257 * RETURN: Status 258 * 259 * DESCRIPTION: Get buffer_field Buffer and Index 260 * Called from acpi_ds_exec_end_op during buffer_field parse tree walk 261 * 262 ******************************************************************************/ 263 264 acpi_status 265 acpi_ds_eval_buffer_field_operands(struct acpi_walk_state *walk_state, 266 union acpi_parse_object *op) 267 { 268 acpi_status status; 269 union acpi_operand_object *obj_desc; 270 struct acpi_namespace_node *node; 271 union acpi_parse_object *next_op; 272 273 ACPI_FUNCTION_TRACE_PTR(ds_eval_buffer_field_operands, op); 274 275 /* 276 * This is where we evaluate the address and length fields of the 277 * create_xxx_field declaration 278 */ 279 node = op->common.node; 280 281 /* next_op points to the op that holds the Buffer */ 282 283 next_op = op->common.value.arg; 284 285 /* Evaluate/create the address and length operands */ 286 287 status = acpi_ds_create_operands(walk_state, next_op); 288 if (ACPI_FAILURE(status)) { 289 return_ACPI_STATUS(status); 290 } 291 292 obj_desc = acpi_ns_get_attached_object(node); 293 if (!obj_desc) { 294 return_ACPI_STATUS(AE_NOT_EXIST); 295 } 296 297 /* Resolve the operands */ 298 299 status = 300 acpi_ex_resolve_operands(op->common.aml_opcode, ACPI_WALK_OPERANDS, 301 walk_state); 302 if (ACPI_FAILURE(status)) { 303 ACPI_ERROR((AE_INFO, "(%s) bad operand(s), status 0x%X", 304 acpi_ps_get_opcode_name(op->common.aml_opcode), 305 status)); 306 307 return_ACPI_STATUS(status); 308 } 309 310 /* Initialize the Buffer Field */ 311 312 if (op->common.aml_opcode == AML_CREATE_FIELD_OP) { 313 314 /* NOTE: Slightly different operands for this opcode */ 315 316 status = 317 acpi_ds_init_buffer_field(op->common.aml_opcode, obj_desc, 318 walk_state->operands[0], 319 walk_state->operands[1], 320 walk_state->operands[2], 321 walk_state->operands[3]); 322 } else { 323 /* All other, create_xxx_field opcodes */ 324 325 status = 326 acpi_ds_init_buffer_field(op->common.aml_opcode, obj_desc, 327 walk_state->operands[0], 328 walk_state->operands[1], NULL, 329 walk_state->operands[2]); 330 } 331 332 return_ACPI_STATUS(status); 333 } 334 335 /******************************************************************************* 336 * 337 * FUNCTION: acpi_ds_eval_region_operands 338 * 339 * PARAMETERS: walk_state - Current walk 340 * op - A valid region Op object 341 * 342 * RETURN: Status 343 * 344 * DESCRIPTION: Get region address and length 345 * Called from acpi_ds_exec_end_op during op_region parse tree walk 346 * 347 ******************************************************************************/ 348 349 acpi_status 350 acpi_ds_eval_region_operands(struct acpi_walk_state *walk_state, 351 union acpi_parse_object *op) 352 { 353 acpi_status status; 354 union acpi_operand_object *obj_desc; 355 union acpi_operand_object *operand_desc; 356 struct acpi_namespace_node *node; 357 union acpi_parse_object *next_op; 358 359 ACPI_FUNCTION_TRACE_PTR(ds_eval_region_operands, op); 360 361 /* 362 * This is where we evaluate the address and length fields of the 363 * op_region declaration 364 */ 365 node = op->common.node; 366 367 /* next_op points to the op that holds the space_ID */ 368 369 next_op = op->common.value.arg; 370 371 /* next_op points to address op */ 372 373 next_op = next_op->common.next; 374 375 /* Evaluate/create the address and length operands */ 376 377 status = acpi_ds_create_operands(walk_state, next_op); 378 if (ACPI_FAILURE(status)) { 379 return_ACPI_STATUS(status); 380 } 381 382 /* Resolve the length and address operands to numbers */ 383 384 status = 385 acpi_ex_resolve_operands(op->common.aml_opcode, ACPI_WALK_OPERANDS, 386 walk_state); 387 if (ACPI_FAILURE(status)) { 388 return_ACPI_STATUS(status); 389 } 390 391 obj_desc = acpi_ns_get_attached_object(node); 392 if (!obj_desc) { 393 return_ACPI_STATUS(AE_NOT_EXIST); 394 } 395 396 /* 397 * Get the length operand and save it 398 * (at Top of stack) 399 */ 400 operand_desc = walk_state->operands[walk_state->num_operands - 1]; 401 402 obj_desc->region.length = (u32) operand_desc->integer.value; 403 acpi_ut_remove_reference(operand_desc); 404 405 /* 406 * Get the address and save it 407 * (at top of stack - 1) 408 */ 409 operand_desc = walk_state->operands[walk_state->num_operands - 2]; 410 411 obj_desc->region.address = (acpi_physical_address) 412 operand_desc->integer.value; 413 acpi_ut_remove_reference(operand_desc); 414 415 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "RgnObj %p Addr %8.8X%8.8X Len %X\n", 416 obj_desc, 417 ACPI_FORMAT_UINT64(obj_desc->region.address), 418 obj_desc->region.length)); 419 420 status = acpi_ut_add_address_range(obj_desc->region.space_id, 421 obj_desc->region.address, 422 obj_desc->region.length, node); 423 424 /* Now the address and length are valid for this opregion */ 425 426 obj_desc->region.flags |= AOPOBJ_DATA_VALID; 427 return_ACPI_STATUS(status); 428 } 429 430 /******************************************************************************* 431 * 432 * FUNCTION: acpi_ds_eval_table_region_operands 433 * 434 * PARAMETERS: walk_state - Current walk 435 * op - A valid region Op object 436 * 437 * RETURN: Status 438 * 439 * DESCRIPTION: Get region address and length. 440 * Called from acpi_ds_exec_end_op during data_table_region parse 441 * tree walk. 442 * 443 ******************************************************************************/ 444 445 acpi_status 446 acpi_ds_eval_table_region_operands(struct acpi_walk_state *walk_state, 447 union acpi_parse_object *op) 448 { 449 acpi_status status; 450 union acpi_operand_object *obj_desc; 451 union acpi_operand_object **operand; 452 struct acpi_namespace_node *node; 453 union acpi_parse_object *next_op; 454 struct acpi_table_header *table; 455 u32 table_index; 456 457 ACPI_FUNCTION_TRACE_PTR(ds_eval_table_region_operands, op); 458 459 /* 460 * This is where we evaluate the Signature string, oem_id string, 461 * and oem_table_id string of the Data Table Region declaration 462 */ 463 node = op->common.node; 464 465 /* next_op points to Signature string op */ 466 467 next_op = op->common.value.arg; 468 469 /* 470 * Evaluate/create the Signature string, oem_id string, 471 * and oem_table_id string operands 472 */ 473 status = acpi_ds_create_operands(walk_state, next_op); 474 if (ACPI_FAILURE(status)) { 475 return_ACPI_STATUS(status); 476 } 477 478 operand = &walk_state->operands[0]; 479 480 /* 481 * Resolve the Signature string, oem_id string, 482 * and oem_table_id string operands 483 */ 484 status = 485 acpi_ex_resolve_operands(op->common.aml_opcode, ACPI_WALK_OPERANDS, 486 walk_state); 487 if (ACPI_FAILURE(status)) { 488 goto cleanup; 489 } 490 491 /* Find the ACPI table */ 492 493 status = acpi_tb_find_table(operand[0]->string.pointer, 494 operand[1]->string.pointer, 495 operand[2]->string.pointer, &table_index); 496 if (ACPI_FAILURE(status)) { 497 if (status == AE_NOT_FOUND) { 498 ACPI_ERROR((AE_INFO, 499 "ACPI Table [%4.4s] OEM:(%s, %s) not found in RSDT/XSDT", 500 operand[0]->string.pointer, 501 operand[1]->string.pointer, 502 operand[2]->string.pointer)); 503 } 504 goto cleanup; 505 } 506 507 status = acpi_get_table_by_index(table_index, &table); 508 if (ACPI_FAILURE(status)) { 509 goto cleanup; 510 } 511 512 obj_desc = acpi_ns_get_attached_object(node); 513 if (!obj_desc) { 514 status = AE_NOT_EXIST; 515 goto cleanup; 516 } 517 518 obj_desc->region.address = ACPI_PTR_TO_PHYSADDR(table); 519 obj_desc->region.length = table->length; 520 521 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "RgnObj %p Addr %8.8X%8.8X Len %X\n", 522 obj_desc, 523 ACPI_FORMAT_UINT64(obj_desc->region.address), 524 obj_desc->region.length)); 525 526 /* Now the address and length are valid for this opregion */ 527 528 obj_desc->region.flags |= AOPOBJ_DATA_VALID; 529 530 cleanup: 531 acpi_ut_remove_reference(operand[0]); 532 acpi_ut_remove_reference(operand[1]); 533 acpi_ut_remove_reference(operand[2]); 534 535 return_ACPI_STATUS(status); 536 } 537 538 /******************************************************************************* 539 * 540 * FUNCTION: acpi_ds_eval_data_object_operands 541 * 542 * PARAMETERS: walk_state - Current walk 543 * op - A valid data_object Op object 544 * obj_desc - data_object 545 * 546 * RETURN: Status 547 * 548 * DESCRIPTION: Get the operands and complete the following data object types: 549 * Buffer, Package. 550 * 551 ******************************************************************************/ 552 553 acpi_status 554 acpi_ds_eval_data_object_operands(struct acpi_walk_state *walk_state, 555 union acpi_parse_object *op, 556 union acpi_operand_object *obj_desc) 557 { 558 acpi_status status; 559 union acpi_operand_object *arg_desc; 560 u32 length; 561 562 ACPI_FUNCTION_TRACE(ds_eval_data_object_operands); 563 564 /* The first operand (for all of these data objects) is the length */ 565 566 /* 567 * Set proper index into operand stack for acpi_ds_obj_stack_push 568 * invoked inside acpi_ds_create_operand. 569 */ 570 walk_state->operand_index = walk_state->num_operands; 571 572 /* Ignore if child is not valid */ 573 574 if (!op->common.value.arg) { 575 ACPI_ERROR((AE_INFO, 576 "Missing child while evaluating opcode %4.4X, Op %p", 577 op->common.aml_opcode, op)); 578 return_ACPI_STATUS(AE_OK); 579 } 580 581 status = acpi_ds_create_operand(walk_state, op->common.value.arg, 1); 582 if (ACPI_FAILURE(status)) { 583 return_ACPI_STATUS(status); 584 } 585 586 status = acpi_ex_resolve_operands(walk_state->opcode, 587 &(walk_state-> 588 operands[walk_state->num_operands - 589 1]), walk_state); 590 if (ACPI_FAILURE(status)) { 591 return_ACPI_STATUS(status); 592 } 593 594 /* Extract length operand */ 595 596 arg_desc = walk_state->operands[walk_state->num_operands - 1]; 597 length = (u32) arg_desc->integer.value; 598 599 /* Cleanup for length operand */ 600 601 status = acpi_ds_obj_stack_pop(1, walk_state); 602 if (ACPI_FAILURE(status)) { 603 return_ACPI_STATUS(status); 604 } 605 606 acpi_ut_remove_reference(arg_desc); 607 608 /* 609 * Create the actual data object 610 */ 611 switch (op->common.aml_opcode) { 612 case AML_BUFFER_OP: 613 614 status = 615 acpi_ds_build_internal_buffer_obj(walk_state, op, length, 616 &obj_desc); 617 break; 618 619 case AML_PACKAGE_OP: 620 case AML_VARIABLE_PACKAGE_OP: 621 622 status = 623 acpi_ds_build_internal_package_obj(walk_state, op, length, 624 &obj_desc); 625 break; 626 627 default: 628 629 return_ACPI_STATUS(AE_AML_BAD_OPCODE); 630 } 631 632 if (ACPI_SUCCESS(status)) { 633 /* 634 * Return the object in the walk_state, unless the parent is a package - 635 * in this case, the return object will be stored in the parse tree 636 * for the package. 637 */ 638 if ((!op->common.parent) || 639 ((op->common.parent->common.aml_opcode != AML_PACKAGE_OP) && 640 (op->common.parent->common.aml_opcode != 641 AML_VARIABLE_PACKAGE_OP) 642 && (op->common.parent->common.aml_opcode != 643 AML_NAME_OP))) { 644 walk_state->result_obj = obj_desc; 645 } 646 } 647 648 return_ACPI_STATUS(status); 649 } 650 651 /******************************************************************************* 652 * 653 * FUNCTION: acpi_ds_eval_bank_field_operands 654 * 655 * PARAMETERS: walk_state - Current walk 656 * op - A valid bank_field Op object 657 * 658 * RETURN: Status 659 * 660 * DESCRIPTION: Get bank_field bank_value 661 * Called from acpi_ds_exec_end_op during bank_field parse tree walk 662 * 663 ******************************************************************************/ 664 665 acpi_status 666 acpi_ds_eval_bank_field_operands(struct acpi_walk_state *walk_state, 667 union acpi_parse_object *op) 668 { 669 acpi_status status; 670 union acpi_operand_object *obj_desc; 671 union acpi_operand_object *operand_desc; 672 struct acpi_namespace_node *node; 673 union acpi_parse_object *next_op; 674 union acpi_parse_object *arg; 675 676 ACPI_FUNCTION_TRACE_PTR(ds_eval_bank_field_operands, op); 677 678 /* 679 * This is where we evaluate the bank_value field of the 680 * bank_field declaration 681 */ 682 683 /* next_op points to the op that holds the Region */ 684 685 next_op = op->common.value.arg; 686 687 /* next_op points to the op that holds the Bank Register */ 688 689 next_op = next_op->common.next; 690 691 /* next_op points to the op that holds the Bank Value */ 692 693 next_op = next_op->common.next; 694 695 /* 696 * Set proper index into operand stack for acpi_ds_obj_stack_push 697 * invoked inside acpi_ds_create_operand. 698 * 699 * We use walk_state->Operands[0] to store the evaluated bank_value 700 */ 701 walk_state->operand_index = 0; 702 703 status = acpi_ds_create_operand(walk_state, next_op, 0); 704 if (ACPI_FAILURE(status)) { 705 return_ACPI_STATUS(status); 706 } 707 708 status = acpi_ex_resolve_to_value(&walk_state->operands[0], walk_state); 709 if (ACPI_FAILURE(status)) { 710 return_ACPI_STATUS(status); 711 } 712 713 ACPI_DUMP_OPERANDS(ACPI_WALK_OPERANDS, 714 acpi_ps_get_opcode_name(op->common.aml_opcode), 1); 715 /* 716 * Get the bank_value operand and save it 717 * (at Top of stack) 718 */ 719 operand_desc = walk_state->operands[0]; 720 721 /* Arg points to the start Bank Field */ 722 723 arg = acpi_ps_get_arg(op, 4); 724 while (arg) { 725 726 /* Ignore OFFSET and ACCESSAS terms here */ 727 728 if (arg->common.aml_opcode == AML_INT_NAMEDFIELD_OP) { 729 node = arg->common.node; 730 731 obj_desc = acpi_ns_get_attached_object(node); 732 if (!obj_desc) { 733 return_ACPI_STATUS(AE_NOT_EXIST); 734 } 735 736 obj_desc->bank_field.value = 737 (u32) operand_desc->integer.value; 738 } 739 740 /* Move to next field in the list */ 741 742 arg = arg->common.next; 743 } 744 745 acpi_ut_remove_reference(operand_desc); 746 return_ACPI_STATUS(status); 747 } 748