xref: /openbmc/linux/drivers/acpi/acpica/exresolv.c (revision 550987be)
1 /******************************************************************************
2  *
3  * Module Name: exresolv - AML Interpreter object resolution
4  *
5  *****************************************************************************/
6 
7 /*
8  * Copyright (C) 2000 - 2018, 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 "amlcode.h"
47 #include "acdispat.h"
48 #include "acinterp.h"
49 #include "acnamesp.h"
50 
51 #define _COMPONENT          ACPI_EXECUTER
52 ACPI_MODULE_NAME("exresolv")
53 
54 /* Local prototypes */
55 static acpi_status
56 acpi_ex_resolve_object_to_value(union acpi_operand_object **stack_ptr,
57 				struct acpi_walk_state *walk_state);
58 
59 /*******************************************************************************
60  *
61  * FUNCTION:    acpi_ex_resolve_to_value
62  *
63  * PARAMETERS:  **stack_ptr         - Points to entry on obj_stack, which can
64  *                                    be either an (union acpi_operand_object *)
65  *                                    or an acpi_handle.
66  *              walk_state          - Current method state
67  *
68  * RETURN:      Status
69  *
70  * DESCRIPTION: Convert Reference objects to values
71  *
72  ******************************************************************************/
73 
74 acpi_status
75 acpi_ex_resolve_to_value(union acpi_operand_object **stack_ptr,
76 			 struct acpi_walk_state *walk_state)
77 {
78 	acpi_status status;
79 
80 	ACPI_FUNCTION_TRACE_PTR(ex_resolve_to_value, stack_ptr);
81 
82 	if (!stack_ptr || !*stack_ptr) {
83 		ACPI_ERROR((AE_INFO, "Internal - null pointer"));
84 		return_ACPI_STATUS(AE_AML_NO_OPERAND);
85 	}
86 
87 	/*
88 	 * The entity pointed to by the stack_ptr can be either
89 	 * 1) A valid union acpi_operand_object, or
90 	 * 2) A struct acpi_namespace_node (named_obj)
91 	 */
92 	if (ACPI_GET_DESCRIPTOR_TYPE(*stack_ptr) == ACPI_DESC_TYPE_OPERAND) {
93 		status = acpi_ex_resolve_object_to_value(stack_ptr, walk_state);
94 		if (ACPI_FAILURE(status)) {
95 			return_ACPI_STATUS(status);
96 		}
97 
98 		if (!*stack_ptr) {
99 			ACPI_ERROR((AE_INFO, "Internal - null pointer"));
100 			return_ACPI_STATUS(AE_AML_NO_OPERAND);
101 		}
102 	}
103 
104 	/*
105 	 * Object on the stack may have changed if acpi_ex_resolve_object_to_value()
106 	 * was called (i.e., we can't use an _else_ here.)
107 	 */
108 	if (ACPI_GET_DESCRIPTOR_TYPE(*stack_ptr) == ACPI_DESC_TYPE_NAMED) {
109 		status =
110 		    acpi_ex_resolve_node_to_value(ACPI_CAST_INDIRECT_PTR
111 						  (struct acpi_namespace_node,
112 						   stack_ptr), walk_state);
113 		if (ACPI_FAILURE(status)) {
114 			return_ACPI_STATUS(status);
115 		}
116 	}
117 
118 	ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Resolved object %p\n", *stack_ptr));
119 	return_ACPI_STATUS(AE_OK);
120 }
121 
122 /*******************************************************************************
123  *
124  * FUNCTION:    acpi_ex_resolve_object_to_value
125  *
126  * PARAMETERS:  stack_ptr       - Pointer to an internal object
127  *              walk_state      - Current method state
128  *
129  * RETURN:      Status
130  *
131  * DESCRIPTION: Retrieve the value from an internal object. The Reference type
132  *              uses the associated AML opcode to determine the value.
133  *
134  ******************************************************************************/
135 
136 static acpi_status
137 acpi_ex_resolve_object_to_value(union acpi_operand_object **stack_ptr,
138 				struct acpi_walk_state *walk_state)
139 {
140 	acpi_status status = AE_OK;
141 	union acpi_operand_object *stack_desc;
142 	union acpi_operand_object *obj_desc = NULL;
143 	u8 ref_type;
144 
145 	ACPI_FUNCTION_TRACE(ex_resolve_object_to_value);
146 
147 	stack_desc = *stack_ptr;
148 
149 	/* This is an object of type union acpi_operand_object */
150 
151 	switch (stack_desc->common.type) {
152 	case ACPI_TYPE_LOCAL_REFERENCE:
153 
154 		ref_type = stack_desc->reference.class;
155 
156 		switch (ref_type) {
157 		case ACPI_REFCLASS_LOCAL:
158 		case ACPI_REFCLASS_ARG:
159 			/*
160 			 * Get the local from the method's state info
161 			 * Note: this increments the local's object reference count
162 			 */
163 			status = acpi_ds_method_data_get_value(ref_type,
164 							       stack_desc->
165 							       reference.value,
166 							       walk_state,
167 							       &obj_desc);
168 			if (ACPI_FAILURE(status)) {
169 				return_ACPI_STATUS(status);
170 			}
171 
172 			ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
173 					  "[Arg/Local %X] ValueObj is %p\n",
174 					  stack_desc->reference.value,
175 					  obj_desc));
176 
177 			/*
178 			 * Now we can delete the original Reference Object and
179 			 * replace it with the resolved value
180 			 */
181 			acpi_ut_remove_reference(stack_desc);
182 			*stack_ptr = obj_desc;
183 			break;
184 
185 		case ACPI_REFCLASS_INDEX:
186 
187 			switch (stack_desc->reference.target_type) {
188 			case ACPI_TYPE_BUFFER_FIELD:
189 
190 				/* Just return - do not dereference */
191 				break;
192 
193 			case ACPI_TYPE_PACKAGE:
194 
195 				/* If method call or copy_object - do not dereference */
196 
197 				if ((walk_state->opcode ==
198 				     AML_INT_METHODCALL_OP)
199 				    || (walk_state->opcode ==
200 					AML_COPY_OBJECT_OP)) {
201 					break;
202 				}
203 
204 				/* Otherwise, dereference the package_index to a package element */
205 
206 				obj_desc = *stack_desc->reference.where;
207 				if (obj_desc) {
208 					/*
209 					 * Valid object descriptor, copy pointer to return value
210 					 * (i.e., dereference the package index)
211 					 * Delete the ref object, increment the returned object
212 					 */
213 					acpi_ut_add_reference(obj_desc);
214 					*stack_ptr = obj_desc;
215 				} else {
216 					/*
217 					 * A NULL object descriptor means an uninitialized element of
218 					 * the package, can't dereference it
219 					 */
220 					ACPI_ERROR((AE_INFO,
221 						    "Attempt to dereference an Index to "
222 						    "NULL package element Idx=%p",
223 						    stack_desc));
224 					status = AE_AML_UNINITIALIZED_ELEMENT;
225 				}
226 				break;
227 
228 			default:
229 
230 				/* Invalid reference object */
231 
232 				ACPI_ERROR((AE_INFO,
233 					    "Unknown TargetType 0x%X in Index/Reference object %p",
234 					    stack_desc->reference.target_type,
235 					    stack_desc));
236 				status = AE_AML_INTERNAL;
237 				break;
238 			}
239 			break;
240 
241 		case ACPI_REFCLASS_REFOF:
242 		case ACPI_REFCLASS_DEBUG:
243 		case ACPI_REFCLASS_TABLE:
244 
245 			/* Just leave the object as-is, do not dereference */
246 
247 			break;
248 
249 		case ACPI_REFCLASS_NAME:	/* Reference to a named object */
250 
251 			/* Dereference the name */
252 
253 			if ((stack_desc->reference.node->type ==
254 			     ACPI_TYPE_DEVICE)
255 			    || (stack_desc->reference.node->type ==
256 				ACPI_TYPE_THERMAL)) {
257 
258 				/* These node types do not have 'real' subobjects */
259 
260 				*stack_ptr = (void *)stack_desc->reference.node;
261 			} else {
262 				/* Get the object pointed to by the namespace node */
263 
264 				*stack_ptr =
265 				    (stack_desc->reference.node)->object;
266 				acpi_ut_add_reference(*stack_ptr);
267 			}
268 
269 			acpi_ut_remove_reference(stack_desc);
270 			break;
271 
272 		default:
273 
274 			ACPI_ERROR((AE_INFO,
275 				    "Unknown Reference type 0x%X in %p",
276 				    ref_type, stack_desc));
277 			status = AE_AML_INTERNAL;
278 			break;
279 		}
280 		break;
281 
282 	case ACPI_TYPE_BUFFER:
283 
284 		status = acpi_ds_get_buffer_arguments(stack_desc);
285 		break;
286 
287 	case ACPI_TYPE_PACKAGE:
288 
289 		status = acpi_ds_get_package_arguments(stack_desc);
290 		break;
291 
292 	case ACPI_TYPE_BUFFER_FIELD:
293 	case ACPI_TYPE_LOCAL_REGION_FIELD:
294 	case ACPI_TYPE_LOCAL_BANK_FIELD:
295 	case ACPI_TYPE_LOCAL_INDEX_FIELD:
296 
297 		ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
298 				  "FieldRead SourceDesc=%p Type=%X\n",
299 				  stack_desc, stack_desc->common.type));
300 
301 		status =
302 		    acpi_ex_read_data_from_field(walk_state, stack_desc,
303 						 &obj_desc);
304 
305 		/* Remove a reference to the original operand, then override */
306 
307 		acpi_ut_remove_reference(*stack_ptr);
308 		*stack_ptr = (void *)obj_desc;
309 		break;
310 
311 	default:
312 
313 		break;
314 	}
315 
316 	return_ACPI_STATUS(status);
317 }
318 
319 /*******************************************************************************
320  *
321  * FUNCTION:    acpi_ex_resolve_multiple
322  *
323  * PARAMETERS:  walk_state          - Current state (contains AML opcode)
324  *              operand             - Starting point for resolution
325  *              return_type         - Where the object type is returned
326  *              return_desc         - Where the resolved object is returned
327  *
328  * RETURN:      Status
329  *
330  * DESCRIPTION: Return the base object and type. Traverse a reference list if
331  *              necessary to get to the base object.
332  *
333  ******************************************************************************/
334 
335 acpi_status
336 acpi_ex_resolve_multiple(struct acpi_walk_state *walk_state,
337 			 union acpi_operand_object *operand,
338 			 acpi_object_type *return_type,
339 			 union acpi_operand_object **return_desc)
340 {
341 	union acpi_operand_object *obj_desc = ACPI_CAST_PTR(void, operand);
342 	struct acpi_namespace_node *node =
343 	    ACPI_CAST_PTR(struct acpi_namespace_node, operand);
344 	acpi_object_type type;
345 	acpi_status status;
346 
347 	ACPI_FUNCTION_TRACE(acpi_ex_resolve_multiple);
348 
349 	/* Operand can be either a namespace node or an operand descriptor */
350 
351 	switch (ACPI_GET_DESCRIPTOR_TYPE(obj_desc)) {
352 	case ACPI_DESC_TYPE_OPERAND:
353 
354 		type = obj_desc->common.type;
355 		break;
356 
357 	case ACPI_DESC_TYPE_NAMED:
358 
359 		type = ((struct acpi_namespace_node *)obj_desc)->type;
360 		obj_desc = acpi_ns_get_attached_object(node);
361 
362 		/* If we had an Alias node, use the attached object for type info */
363 
364 		if (type == ACPI_TYPE_LOCAL_ALIAS) {
365 			type = ((struct acpi_namespace_node *)obj_desc)->type;
366 			obj_desc = acpi_ns_get_attached_object((struct
367 								acpi_namespace_node
368 								*)obj_desc);
369 		}
370 
371 		switch (type) {
372 		case ACPI_TYPE_DEVICE:
373 		case ACPI_TYPE_THERMAL:
374 
375 			/* These types have no attached subobject */
376 			break;
377 
378 		default:
379 
380 			/* All other types require a subobject */
381 
382 			if (!obj_desc) {
383 				ACPI_ERROR((AE_INFO,
384 					    "[%4.4s] Node is unresolved or uninitialized",
385 					    acpi_ut_get_node_name(node)));
386 				return_ACPI_STATUS(AE_AML_UNINITIALIZED_NODE);
387 			}
388 			break;
389 		}
390 		break;
391 
392 	default:
393 		return_ACPI_STATUS(AE_AML_OPERAND_TYPE);
394 	}
395 
396 	/* If type is anything other than a reference, we are done */
397 
398 	if (type != ACPI_TYPE_LOCAL_REFERENCE) {
399 		goto exit;
400 	}
401 
402 	/*
403 	 * For reference objects created via the ref_of, Index, or Load/load_table
404 	 * operators, we need to get to the base object (as per the ACPI
405 	 * specification of the object_type and size_of operators). This means
406 	 * traversing the list of possibly many nested references.
407 	 */
408 	while (obj_desc->common.type == ACPI_TYPE_LOCAL_REFERENCE) {
409 		switch (obj_desc->reference.class) {
410 		case ACPI_REFCLASS_REFOF:
411 		case ACPI_REFCLASS_NAME:
412 
413 			/* Dereference the reference pointer */
414 
415 			if (obj_desc->reference.class == ACPI_REFCLASS_REFOF) {
416 				node = obj_desc->reference.object;
417 			} else {	/* AML_INT_NAMEPATH_OP */
418 
419 				node = obj_desc->reference.node;
420 			}
421 
422 			/* All "References" point to a NS node */
423 
424 			if (ACPI_GET_DESCRIPTOR_TYPE(node) !=
425 			    ACPI_DESC_TYPE_NAMED) {
426 				ACPI_ERROR((AE_INFO,
427 					    "Not a namespace node %p [%s]",
428 					    node,
429 					    acpi_ut_get_descriptor_name(node)));
430 				return_ACPI_STATUS(AE_AML_INTERNAL);
431 			}
432 
433 			/* Get the attached object */
434 
435 			obj_desc = acpi_ns_get_attached_object(node);
436 			if (!obj_desc) {
437 
438 				/* No object, use the NS node type */
439 
440 				type = acpi_ns_get_type(node);
441 				goto exit;
442 			}
443 
444 			/* Check for circular references */
445 
446 			if (obj_desc == operand) {
447 				return_ACPI_STATUS(AE_AML_CIRCULAR_REFERENCE);
448 			}
449 			break;
450 
451 		case ACPI_REFCLASS_INDEX:
452 
453 			/* Get the type of this reference (index into another object) */
454 
455 			type = obj_desc->reference.target_type;
456 			if (type != ACPI_TYPE_PACKAGE) {
457 				goto exit;
458 			}
459 
460 			/*
461 			 * The main object is a package, we want to get the type
462 			 * of the individual package element that is referenced by
463 			 * the index.
464 			 *
465 			 * This could of course in turn be another reference object.
466 			 */
467 			obj_desc = *(obj_desc->reference.where);
468 			if (!obj_desc) {
469 
470 				/* NULL package elements are allowed */
471 
472 				type = 0;	/* Uninitialized */
473 				goto exit;
474 			}
475 			break;
476 
477 		case ACPI_REFCLASS_TABLE:
478 
479 			type = ACPI_TYPE_DDB_HANDLE;
480 			goto exit;
481 
482 		case ACPI_REFCLASS_LOCAL:
483 		case ACPI_REFCLASS_ARG:
484 
485 			if (return_desc) {
486 				status =
487 				    acpi_ds_method_data_get_value(obj_desc->
488 								  reference.
489 								  class,
490 								  obj_desc->
491 								  reference.
492 								  value,
493 								  walk_state,
494 								  &obj_desc);
495 				if (ACPI_FAILURE(status)) {
496 					return_ACPI_STATUS(status);
497 				}
498 				acpi_ut_remove_reference(obj_desc);
499 			} else {
500 				status =
501 				    acpi_ds_method_data_get_node(obj_desc->
502 								 reference.
503 								 class,
504 								 obj_desc->
505 								 reference.
506 								 value,
507 								 walk_state,
508 								 &node);
509 				if (ACPI_FAILURE(status)) {
510 					return_ACPI_STATUS(status);
511 				}
512 
513 				obj_desc = acpi_ns_get_attached_object(node);
514 				if (!obj_desc) {
515 					type = ACPI_TYPE_ANY;
516 					goto exit;
517 				}
518 			}
519 			break;
520 
521 		case ACPI_REFCLASS_DEBUG:
522 
523 			/* The Debug Object is of type "DebugObject" */
524 
525 			type = ACPI_TYPE_DEBUG_OBJECT;
526 			goto exit;
527 
528 		default:
529 
530 			ACPI_ERROR((AE_INFO,
531 				    "Unknown Reference Class 0x%2.2X",
532 				    obj_desc->reference.class));
533 			return_ACPI_STATUS(AE_AML_INTERNAL);
534 		}
535 	}
536 
537 	/*
538 	 * Now we are guaranteed to have an object that has not been created
539 	 * via the ref_of or Index operators.
540 	 */
541 	type = obj_desc->common.type;
542 
543 exit:
544 	/* Convert internal types to external types */
545 
546 	switch (type) {
547 	case ACPI_TYPE_LOCAL_REGION_FIELD:
548 	case ACPI_TYPE_LOCAL_BANK_FIELD:
549 	case ACPI_TYPE_LOCAL_INDEX_FIELD:
550 
551 		type = ACPI_TYPE_FIELD_UNIT;
552 		break;
553 
554 	case ACPI_TYPE_LOCAL_SCOPE:
555 
556 		/* Per ACPI Specification, Scope is untyped */
557 
558 		type = ACPI_TYPE_ANY;
559 		break;
560 
561 	default:
562 
563 		/* No change to Type required */
564 
565 		break;
566 	}
567 
568 	*return_type = type;
569 	if (return_desc) {
570 		*return_desc = obj_desc;
571 	}
572 	return_ACPI_STATUS(AE_OK);
573 }
574