s390/ptrace: get rid of long longs in psw_bits
[linux/fpc-iii.git] / drivers / acpi / acpica / dsopcode.c
blob81d7b9863e3213855790536b41b550a48e727375
1 /******************************************************************************
3 * Module Name: dsopcode - Dispatcher support for regions and fields
5 *****************************************************************************/
7 /*
8 * Copyright (C) 2000 - 2015, Intel Corp.
9 * All rights reserved.
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.
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.
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.
44 #include <acpi/acpi.h>
45 #include "accommon.h"
46 #include "acparser.h"
47 #include "amlcode.h"
48 #include "acdispat.h"
49 #include "acinterp.h"
50 #include "acnamesp.h"
51 #include "acevents.h"
52 #include "actables.h"
54 #define _COMPONENT ACPI_DISPATCHER
55 ACPI_MODULE_NAME("dsopcode")
57 /* Local prototypes */
58 static acpi_status
59 acpi_ds_init_buffer_field(u16 aml_opcode,
60 union acpi_operand_object *obj_desc,
61 union acpi_operand_object *buffer_desc,
62 union acpi_operand_object *offset_desc,
63 union acpi_operand_object *length_desc,
64 union acpi_operand_object *result_desc);
66 /*******************************************************************************
68 * FUNCTION: acpi_ds_initialize_region
70 * PARAMETERS: obj_handle - Region namespace node
72 * RETURN: Status
74 * DESCRIPTION: Front end to ev_initialize_region
76 ******************************************************************************/
78 acpi_status acpi_ds_initialize_region(acpi_handle obj_handle)
80 union acpi_operand_object *obj_desc;
81 acpi_status status;
83 obj_desc = acpi_ns_get_attached_object(obj_handle);
85 /* Namespace is NOT locked */
87 status = acpi_ev_initialize_region(obj_desc, FALSE);
88 return (status);
91 /*******************************************************************************
93 * FUNCTION: acpi_ds_init_buffer_field
95 * PARAMETERS: aml_opcode - create_xxx_field
96 * obj_desc - buffer_field object
97 * buffer_desc - Host Buffer
98 * offset_desc - Offset into buffer
99 * length_desc - Length of field (CREATE_FIELD_OP only)
100 * result_desc - Where to store the result
102 * RETURN: Status
104 * DESCRIPTION: Perform actual initialization of a buffer field
106 ******************************************************************************/
108 static acpi_status
109 acpi_ds_init_buffer_field(u16 aml_opcode,
110 union acpi_operand_object *obj_desc,
111 union acpi_operand_object *buffer_desc,
112 union acpi_operand_object *offset_desc,
113 union acpi_operand_object *length_desc,
114 union acpi_operand_object *result_desc)
116 u32 offset;
117 u32 bit_offset;
118 u32 bit_count;
119 u8 field_flags;
120 acpi_status status;
122 ACPI_FUNCTION_TRACE_PTR(ds_init_buffer_field, obj_desc);
124 /* Host object must be a Buffer */
126 if (buffer_desc->common.type != ACPI_TYPE_BUFFER) {
127 ACPI_ERROR((AE_INFO,
128 "Target of Create Field is not a Buffer object - %s",
129 acpi_ut_get_object_type_name(buffer_desc)));
131 status = AE_AML_OPERAND_TYPE;
132 goto cleanup;
136 * The last parameter to all of these opcodes (result_desc) started
137 * out as a name_string, and should therefore now be a NS node
138 * after resolution in acpi_ex_resolve_operands().
140 if (ACPI_GET_DESCRIPTOR_TYPE(result_desc) != ACPI_DESC_TYPE_NAMED) {
141 ACPI_ERROR((AE_INFO,
142 "(%s) destination not a NS Node [%s]",
143 acpi_ps_get_opcode_name(aml_opcode),
144 acpi_ut_get_descriptor_name(result_desc)));
146 status = AE_AML_OPERAND_TYPE;
147 goto cleanup;
150 offset = (u32) offset_desc->integer.value;
153 * Setup the Bit offsets and counts, according to the opcode
155 switch (aml_opcode) {
156 case AML_CREATE_FIELD_OP:
158 /* Offset is in bits, count is in bits */
160 field_flags = AML_FIELD_ACCESS_BYTE;
161 bit_offset = offset;
162 bit_count = (u32) length_desc->integer.value;
164 /* Must have a valid (>0) bit count */
166 if (bit_count == 0) {
167 ACPI_ERROR((AE_INFO,
168 "Attempt to CreateField of length zero"));
169 status = AE_AML_OPERAND_VALUE;
170 goto cleanup;
172 break;
174 case AML_CREATE_BIT_FIELD_OP:
176 /* Offset is in bits, Field is one bit */
178 bit_offset = offset;
179 bit_count = 1;
180 field_flags = AML_FIELD_ACCESS_BYTE;
181 break;
183 case AML_CREATE_BYTE_FIELD_OP:
185 /* Offset is in bytes, field is one byte */
187 bit_offset = 8 * offset;
188 bit_count = 8;
189 field_flags = AML_FIELD_ACCESS_BYTE;
190 break;
192 case AML_CREATE_WORD_FIELD_OP:
194 /* Offset is in bytes, field is one word */
196 bit_offset = 8 * offset;
197 bit_count = 16;
198 field_flags = AML_FIELD_ACCESS_WORD;
199 break;
201 case AML_CREATE_DWORD_FIELD_OP:
203 /* Offset is in bytes, field is one dword */
205 bit_offset = 8 * offset;
206 bit_count = 32;
207 field_flags = AML_FIELD_ACCESS_DWORD;
208 break;
210 case AML_CREATE_QWORD_FIELD_OP:
212 /* Offset is in bytes, field is one qword */
214 bit_offset = 8 * offset;
215 bit_count = 64;
216 field_flags = AML_FIELD_ACCESS_QWORD;
217 break;
219 default:
221 ACPI_ERROR((AE_INFO,
222 "Unknown field creation opcode 0x%02X",
223 aml_opcode));
224 status = AE_AML_BAD_OPCODE;
225 goto cleanup;
228 /* Entire field must fit within the current length of the buffer */
230 if ((bit_offset + bit_count) > (8 * (u32) buffer_desc->buffer.length)) {
231 ACPI_ERROR((AE_INFO,
232 "Field [%4.4s] at %u exceeds Buffer [%4.4s] size %u (bits)",
233 acpi_ut_get_node_name(result_desc),
234 bit_offset + bit_count,
235 acpi_ut_get_node_name(buffer_desc->buffer.node),
236 8 * (u32) buffer_desc->buffer.length));
237 status = AE_AML_BUFFER_LIMIT;
238 goto cleanup;
242 * Initialize areas of the field object that are common to all fields
243 * For field_flags, use LOCK_RULE = 0 (NO_LOCK),
244 * UPDATE_RULE = 0 (UPDATE_PRESERVE)
246 status = acpi_ex_prep_common_field_object(obj_desc, field_flags, 0,
247 bit_offset, bit_count);
248 if (ACPI_FAILURE(status)) {
249 goto cleanup;
252 obj_desc->buffer_field.buffer_obj = buffer_desc;
254 /* Reference count for buffer_desc inherits obj_desc count */
256 buffer_desc->common.reference_count = (u16)
257 (buffer_desc->common.reference_count +
258 obj_desc->common.reference_count);
260 cleanup:
262 /* Always delete the operands */
264 acpi_ut_remove_reference(offset_desc);
265 acpi_ut_remove_reference(buffer_desc);
267 if (aml_opcode == AML_CREATE_FIELD_OP) {
268 acpi_ut_remove_reference(length_desc);
271 /* On failure, delete the result descriptor */
273 if (ACPI_FAILURE(status)) {
274 acpi_ut_remove_reference(result_desc); /* Result descriptor */
275 } else {
276 /* Now the address and length are valid for this buffer_field */
278 obj_desc->buffer_field.flags |= AOPOBJ_DATA_VALID;
281 return_ACPI_STATUS(status);
284 /*******************************************************************************
286 * FUNCTION: acpi_ds_eval_buffer_field_operands
288 * PARAMETERS: walk_state - Current walk
289 * op - A valid buffer_field Op object
291 * RETURN: Status
293 * DESCRIPTION: Get buffer_field Buffer and Index
294 * Called from acpi_ds_exec_end_op during buffer_field parse tree walk
296 ******************************************************************************/
298 acpi_status
299 acpi_ds_eval_buffer_field_operands(struct acpi_walk_state *walk_state,
300 union acpi_parse_object *op)
302 acpi_status status;
303 union acpi_operand_object *obj_desc;
304 struct acpi_namespace_node *node;
305 union acpi_parse_object *next_op;
307 ACPI_FUNCTION_TRACE_PTR(ds_eval_buffer_field_operands, op);
310 * This is where we evaluate the address and length fields of the
311 * create_xxx_field declaration
313 node = op->common.node;
315 /* next_op points to the op that holds the Buffer */
317 next_op = op->common.value.arg;
319 /* Evaluate/create the address and length operands */
321 status = acpi_ds_create_operands(walk_state, next_op);
322 if (ACPI_FAILURE(status)) {
323 return_ACPI_STATUS(status);
326 obj_desc = acpi_ns_get_attached_object(node);
327 if (!obj_desc) {
328 return_ACPI_STATUS(AE_NOT_EXIST);
331 /* Resolve the operands */
333 status = acpi_ex_resolve_operands(op->common.aml_opcode,
334 ACPI_WALK_OPERANDS, walk_state);
335 if (ACPI_FAILURE(status)) {
336 ACPI_ERROR((AE_INFO, "(%s) bad operand(s), status 0x%X",
337 acpi_ps_get_opcode_name(op->common.aml_opcode),
338 status));
340 return_ACPI_STATUS(status);
343 /* Initialize the Buffer Field */
345 if (op->common.aml_opcode == AML_CREATE_FIELD_OP) {
347 /* NOTE: Slightly different operands for this opcode */
349 status =
350 acpi_ds_init_buffer_field(op->common.aml_opcode, obj_desc,
351 walk_state->operands[0],
352 walk_state->operands[1],
353 walk_state->operands[2],
354 walk_state->operands[3]);
355 } else {
356 /* All other, create_xxx_field opcodes */
358 status =
359 acpi_ds_init_buffer_field(op->common.aml_opcode, obj_desc,
360 walk_state->operands[0],
361 walk_state->operands[1], NULL,
362 walk_state->operands[2]);
365 return_ACPI_STATUS(status);
368 /*******************************************************************************
370 * FUNCTION: acpi_ds_eval_region_operands
372 * PARAMETERS: walk_state - Current walk
373 * op - A valid region Op object
375 * RETURN: Status
377 * DESCRIPTION: Get region address and length
378 * Called from acpi_ds_exec_end_op during op_region parse tree walk
380 ******************************************************************************/
382 acpi_status
383 acpi_ds_eval_region_operands(struct acpi_walk_state *walk_state,
384 union acpi_parse_object *op)
386 acpi_status status;
387 union acpi_operand_object *obj_desc;
388 union acpi_operand_object *operand_desc;
389 struct acpi_namespace_node *node;
390 union acpi_parse_object *next_op;
392 ACPI_FUNCTION_TRACE_PTR(ds_eval_region_operands, op);
395 * This is where we evaluate the address and length fields of the
396 * op_region declaration
398 node = op->common.node;
400 /* next_op points to the op that holds the space_ID */
402 next_op = op->common.value.arg;
404 /* next_op points to address op */
406 next_op = next_op->common.next;
408 /* Evaluate/create the address and length operands */
410 status = acpi_ds_create_operands(walk_state, next_op);
411 if (ACPI_FAILURE(status)) {
412 return_ACPI_STATUS(status);
415 /* Resolve the length and address operands to numbers */
417 status = acpi_ex_resolve_operands(op->common.aml_opcode,
418 ACPI_WALK_OPERANDS, walk_state);
419 if (ACPI_FAILURE(status)) {
420 return_ACPI_STATUS(status);
423 obj_desc = acpi_ns_get_attached_object(node);
424 if (!obj_desc) {
425 return_ACPI_STATUS(AE_NOT_EXIST);
429 * Get the length operand and save it
430 * (at Top of stack)
432 operand_desc = walk_state->operands[walk_state->num_operands - 1];
434 obj_desc->region.length = (u32) operand_desc->integer.value;
435 acpi_ut_remove_reference(operand_desc);
438 * Get the address and save it
439 * (at top of stack - 1)
441 operand_desc = walk_state->operands[walk_state->num_operands - 2];
443 obj_desc->region.address = (acpi_physical_address)
444 operand_desc->integer.value;
445 acpi_ut_remove_reference(operand_desc);
447 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "RgnObj %p Addr %8.8X%8.8X Len %X\n",
448 obj_desc,
449 ACPI_FORMAT_UINT64(obj_desc->region.address),
450 obj_desc->region.length));
452 /* Now the address and length are valid for this opregion */
454 obj_desc->region.flags |= AOPOBJ_DATA_VALID;
456 return_ACPI_STATUS(status);
459 /*******************************************************************************
461 * FUNCTION: acpi_ds_eval_table_region_operands
463 * PARAMETERS: walk_state - Current walk
464 * op - A valid region Op object
466 * RETURN: Status
468 * DESCRIPTION: Get region address and length.
469 * Called from acpi_ds_exec_end_op during data_table_region parse
470 * tree walk.
472 ******************************************************************************/
474 acpi_status
475 acpi_ds_eval_table_region_operands(struct acpi_walk_state *walk_state,
476 union acpi_parse_object *op)
478 acpi_status status;
479 union acpi_operand_object *obj_desc;
480 union acpi_operand_object **operand;
481 struct acpi_namespace_node *node;
482 union acpi_parse_object *next_op;
483 struct acpi_table_header *table;
484 u32 table_index;
486 ACPI_FUNCTION_TRACE_PTR(ds_eval_table_region_operands, op);
489 * This is where we evaluate the Signature string, oem_id string,
490 * and oem_table_id string of the Data Table Region declaration
492 node = op->common.node;
494 /* next_op points to Signature string op */
496 next_op = op->common.value.arg;
499 * Evaluate/create the Signature string, oem_id string,
500 * and oem_table_id string operands
502 status = acpi_ds_create_operands(walk_state, next_op);
503 if (ACPI_FAILURE(status)) {
504 return_ACPI_STATUS(status);
507 operand = &walk_state->operands[0];
510 * Resolve the Signature string, oem_id string,
511 * and oem_table_id string operands
513 status = acpi_ex_resolve_operands(op->common.aml_opcode,
514 ACPI_WALK_OPERANDS, walk_state);
515 if (ACPI_FAILURE(status)) {
516 goto cleanup;
519 /* Find the ACPI table */
521 status = acpi_tb_find_table(operand[0]->string.pointer,
522 operand[1]->string.pointer,
523 operand[2]->string.pointer, &table_index);
524 if (ACPI_FAILURE(status)) {
525 if (status == AE_NOT_FOUND) {
526 ACPI_ERROR((AE_INFO,
527 "ACPI Table [%4.4s] OEM:(%s, %s) not found in RSDT/XSDT",
528 operand[0]->string.pointer,
529 operand[1]->string.pointer,
530 operand[2]->string.pointer));
532 goto cleanup;
535 status = acpi_get_table_by_index(table_index, &table);
536 if (ACPI_FAILURE(status)) {
537 goto cleanup;
540 obj_desc = acpi_ns_get_attached_object(node);
541 if (!obj_desc) {
542 status = AE_NOT_EXIST;
543 goto cleanup;
546 obj_desc->region.address = ACPI_PTR_TO_PHYSADDR(table);
547 obj_desc->region.length = table->length;
549 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "RgnObj %p Addr %8.8X%8.8X Len %X\n",
550 obj_desc,
551 ACPI_FORMAT_UINT64(obj_desc->region.address),
552 obj_desc->region.length));
554 /* Now the address and length are valid for this opregion */
556 obj_desc->region.flags |= AOPOBJ_DATA_VALID;
558 cleanup:
559 acpi_ut_remove_reference(operand[0]);
560 acpi_ut_remove_reference(operand[1]);
561 acpi_ut_remove_reference(operand[2]);
563 return_ACPI_STATUS(status);
566 /*******************************************************************************
568 * FUNCTION: acpi_ds_eval_data_object_operands
570 * PARAMETERS: walk_state - Current walk
571 * op - A valid data_object Op object
572 * obj_desc - data_object
574 * RETURN: Status
576 * DESCRIPTION: Get the operands and complete the following data object types:
577 * Buffer, Package.
579 ******************************************************************************/
581 acpi_status
582 acpi_ds_eval_data_object_operands(struct acpi_walk_state *walk_state,
583 union acpi_parse_object *op,
584 union acpi_operand_object *obj_desc)
586 acpi_status status;
587 union acpi_operand_object *arg_desc;
588 u32 length;
590 ACPI_FUNCTION_TRACE(ds_eval_data_object_operands);
592 /* The first operand (for all of these data objects) is the length */
595 * Set proper index into operand stack for acpi_ds_obj_stack_push
596 * invoked inside acpi_ds_create_operand.
598 walk_state->operand_index = walk_state->num_operands;
600 status = acpi_ds_create_operand(walk_state, op->common.value.arg, 1);
601 if (ACPI_FAILURE(status)) {
602 return_ACPI_STATUS(status);
605 status = acpi_ex_resolve_operands(walk_state->opcode,
606 &(walk_state->
607 operands[walk_state->num_operands -
608 1]), walk_state);
609 if (ACPI_FAILURE(status)) {
610 return_ACPI_STATUS(status);
613 /* Extract length operand */
615 arg_desc = walk_state->operands[walk_state->num_operands - 1];
616 length = (u32) arg_desc->integer.value;
618 /* Cleanup for length operand */
620 status = acpi_ds_obj_stack_pop(1, walk_state);
621 if (ACPI_FAILURE(status)) {
622 return_ACPI_STATUS(status);
625 acpi_ut_remove_reference(arg_desc);
628 * Create the actual data object
630 switch (op->common.aml_opcode) {
631 case AML_BUFFER_OP:
633 status =
634 acpi_ds_build_internal_buffer_obj(walk_state, op, length,
635 &obj_desc);
636 break;
638 case AML_PACKAGE_OP:
639 case AML_VAR_PACKAGE_OP:
641 status =
642 acpi_ds_build_internal_package_obj(walk_state, op, length,
643 &obj_desc);
644 break;
646 default:
648 return_ACPI_STATUS(AE_AML_BAD_OPCODE);
651 if (ACPI_SUCCESS(status)) {
653 * Return the object in the walk_state, unless the parent is a package -
654 * in this case, the return object will be stored in the parse tree
655 * for the package.
657 if ((!op->common.parent) ||
658 ((op->common.parent->common.aml_opcode != AML_PACKAGE_OP) &&
659 (op->common.parent->common.aml_opcode !=
660 AML_VAR_PACKAGE_OP)
661 && (op->common.parent->common.aml_opcode !=
662 AML_NAME_OP))) {
663 walk_state->result_obj = obj_desc;
667 return_ACPI_STATUS(status);
670 /*******************************************************************************
672 * FUNCTION: acpi_ds_eval_bank_field_operands
674 * PARAMETERS: walk_state - Current walk
675 * op - A valid bank_field Op object
677 * RETURN: Status
679 * DESCRIPTION: Get bank_field bank_value
680 * Called from acpi_ds_exec_end_op during bank_field parse tree walk
682 ******************************************************************************/
684 acpi_status
685 acpi_ds_eval_bank_field_operands(struct acpi_walk_state *walk_state,
686 union acpi_parse_object *op)
688 acpi_status status;
689 union acpi_operand_object *obj_desc;
690 union acpi_operand_object *operand_desc;
691 struct acpi_namespace_node *node;
692 union acpi_parse_object *next_op;
693 union acpi_parse_object *arg;
695 ACPI_FUNCTION_TRACE_PTR(ds_eval_bank_field_operands, op);
698 * This is where we evaluate the bank_value field of the
699 * bank_field declaration
702 /* next_op points to the op that holds the Region */
704 next_op = op->common.value.arg;
706 /* next_op points to the op that holds the Bank Register */
708 next_op = next_op->common.next;
710 /* next_op points to the op that holds the Bank Value */
712 next_op = next_op->common.next;
715 * Set proper index into operand stack for acpi_ds_obj_stack_push
716 * invoked inside acpi_ds_create_operand.
718 * We use walk_state->Operands[0] to store the evaluated bank_value
720 walk_state->operand_index = 0;
722 status = acpi_ds_create_operand(walk_state, next_op, 0);
723 if (ACPI_FAILURE(status)) {
724 return_ACPI_STATUS(status);
727 status = acpi_ex_resolve_to_value(&walk_state->operands[0], walk_state);
728 if (ACPI_FAILURE(status)) {
729 return_ACPI_STATUS(status);
732 ACPI_DUMP_OPERANDS(ACPI_WALK_OPERANDS,
733 acpi_ps_get_opcode_name(op->common.aml_opcode), 1);
735 * Get the bank_value operand and save it
736 * (at Top of stack)
738 operand_desc = walk_state->operands[0];
740 /* Arg points to the start Bank Field */
742 arg = acpi_ps_get_arg(op, 4);
743 while (arg) {
745 /* Ignore OFFSET and ACCESSAS terms here */
747 if (arg->common.aml_opcode == AML_INT_NAMEDFIELD_OP) {
748 node = arg->common.node;
750 obj_desc = acpi_ns_get_attached_object(node);
751 if (!obj_desc) {
752 return_ACPI_STATUS(AE_NOT_EXIST);
755 obj_desc->bank_field.value =
756 (u32) operand_desc->integer.value;
759 /* Move to next field in the list */
761 arg = arg->common.next;
764 acpi_ut_remove_reference(operand_desc);
765 return_ACPI_STATUS(status);