xref: /openbmc/linux/drivers/acpi/acpica/dswload.c (revision 2f8be0e5)
1 // SPDX-License-Identifier: BSD-3-Clause OR GPL-2.0
2 /******************************************************************************
3  *
4  * Module Name: dswload - Dispatcher first pass namespace load callbacks
5  *
6  * Copyright (C) 2000 - 2020, 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 #ifdef ACPI_ASL_COMPILER
18 #include "acdisasm.h"
19 #endif
20 
21 #define _COMPONENT          ACPI_DISPATCHER
22 ACPI_MODULE_NAME("dswload")
23 
24 /*******************************************************************************
25  *
26  * FUNCTION:    acpi_ds_init_callbacks
27  *
28  * PARAMETERS:  walk_state      - Current state of the parse tree walk
29  *              pass_number     - 1, 2, or 3
30  *
31  * RETURN:      Status
32  *
33  * DESCRIPTION: Init walk state callbacks
34  *
35  ******************************************************************************/
36 acpi_status
37 acpi_ds_init_callbacks(struct acpi_walk_state *walk_state, u32 pass_number)
38 {
39 
40 	switch (pass_number) {
41 	case 0:
42 
43 		/* Parse only - caller will setup callbacks */
44 
45 		walk_state->parse_flags = ACPI_PARSE_LOAD_PASS1 |
46 		    ACPI_PARSE_DELETE_TREE | ACPI_PARSE_DISASSEMBLE;
47 		walk_state->descending_callback = NULL;
48 		walk_state->ascending_callback = NULL;
49 		break;
50 
51 	case 1:
52 
53 		/* Load pass 1 */
54 
55 		walk_state->parse_flags = ACPI_PARSE_LOAD_PASS1 |
56 		    ACPI_PARSE_DELETE_TREE;
57 		walk_state->descending_callback = acpi_ds_load1_begin_op;
58 		walk_state->ascending_callback = acpi_ds_load1_end_op;
59 		break;
60 
61 	case 2:
62 
63 		/* Load pass 2 */
64 
65 		walk_state->parse_flags = ACPI_PARSE_LOAD_PASS1 |
66 		    ACPI_PARSE_DELETE_TREE;
67 		walk_state->descending_callback = acpi_ds_load2_begin_op;
68 		walk_state->ascending_callback = acpi_ds_load2_end_op;
69 		break;
70 
71 	case 3:
72 
73 		/* Execution pass */
74 
75 		walk_state->parse_flags |= ACPI_PARSE_EXECUTE |
76 		    ACPI_PARSE_DELETE_TREE;
77 		walk_state->descending_callback = acpi_ds_exec_begin_op;
78 		walk_state->ascending_callback = acpi_ds_exec_end_op;
79 		break;
80 
81 	default:
82 
83 		return (AE_BAD_PARAMETER);
84 	}
85 
86 	return (AE_OK);
87 }
88 
89 /*******************************************************************************
90  *
91  * FUNCTION:    acpi_ds_load1_begin_op
92  *
93  * PARAMETERS:  walk_state      - Current state of the parse tree walk
94  *              out_op          - Where to return op if a new one is created
95  *
96  * RETURN:      Status
97  *
98  * DESCRIPTION: Descending callback used during the loading of ACPI tables.
99  *
100  ******************************************************************************/
101 
102 acpi_status
103 acpi_ds_load1_begin_op(struct acpi_walk_state *walk_state,
104 		       union acpi_parse_object **out_op)
105 {
106 	union acpi_parse_object *op;
107 	struct acpi_namespace_node *node;
108 	acpi_status status;
109 	acpi_object_type object_type;
110 	char *path;
111 	u32 flags;
112 
113 	ACPI_FUNCTION_TRACE_PTR(ds_load1_begin_op, walk_state->op);
114 
115 	op = walk_state->op;
116 	ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH, "Op=%p State=%p\n", op,
117 			  walk_state));
118 
119 	/* We are only interested in opcodes that have an associated name */
120 
121 	if (op) {
122 		if (!(walk_state->op_info->flags & AML_NAMED)) {
123 			*out_op = op;
124 			return_ACPI_STATUS(AE_OK);
125 		}
126 
127 		/* Check if this object has already been installed in the namespace */
128 
129 		if (op->common.node) {
130 			*out_op = op;
131 			return_ACPI_STATUS(AE_OK);
132 		}
133 	}
134 
135 	path = acpi_ps_get_next_namestring(&walk_state->parser_state);
136 
137 	/* Map the raw opcode into an internal object type */
138 
139 	object_type = walk_state->op_info->object_type;
140 
141 	ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
142 			  "State=%p Op=%p [%s]\n", walk_state, op,
143 			  acpi_ut_get_type_name(object_type)));
144 
145 	switch (walk_state->opcode) {
146 	case AML_SCOPE_OP:
147 		/*
148 		 * The target name of the Scope() operator must exist at this point so
149 		 * that we can actually open the scope to enter new names underneath it.
150 		 * Allow search-to-root for single namesegs.
151 		 */
152 		status =
153 		    acpi_ns_lookup(walk_state->scope_info, path, object_type,
154 				   ACPI_IMODE_EXECUTE, ACPI_NS_SEARCH_PARENT,
155 				   walk_state, &(node));
156 #ifdef ACPI_ASL_COMPILER
157 		if (status == AE_NOT_FOUND) {
158 			/*
159 			 * Table disassembly:
160 			 * Target of Scope() not found. Generate an External for it, and
161 			 * insert the name into the namespace.
162 			 */
163 			acpi_dm_add_op_to_external_list(op, path,
164 							ACPI_TYPE_DEVICE, 0, 0);
165 			status =
166 			    acpi_ns_lookup(walk_state->scope_info, path,
167 					   object_type, ACPI_IMODE_LOAD_PASS1,
168 					   ACPI_NS_SEARCH_PARENT, walk_state,
169 					   &node);
170 		}
171 #endif
172 		if (ACPI_FAILURE(status)) {
173 			ACPI_ERROR_NAMESPACE(walk_state->scope_info, path,
174 					     status);
175 			return_ACPI_STATUS(status);
176 		}
177 
178 		/*
179 		 * Check to make sure that the target is
180 		 * one of the opcodes that actually opens a scope
181 		 */
182 		switch (node->type) {
183 		case ACPI_TYPE_ANY:
184 		case ACPI_TYPE_LOCAL_SCOPE:	/* Scope  */
185 		case ACPI_TYPE_DEVICE:
186 		case ACPI_TYPE_POWER:
187 		case ACPI_TYPE_PROCESSOR:
188 		case ACPI_TYPE_THERMAL:
189 
190 			/* These are acceptable types */
191 			break;
192 
193 		case ACPI_TYPE_INTEGER:
194 		case ACPI_TYPE_STRING:
195 		case ACPI_TYPE_BUFFER:
196 			/*
197 			 * These types we will allow, but we will change the type.
198 			 * This enables some existing code of the form:
199 			 *
200 			 *  Name (DEB, 0)
201 			 *  Scope (DEB) { ... }
202 			 *
203 			 * Note: silently change the type here. On the second pass,
204 			 * we will report a warning
205 			 */
206 			ACPI_DEBUG_PRINT((ACPI_DB_INFO,
207 					  "Type override - [%4.4s] had invalid type (%s) "
208 					  "for Scope operator, changed to type ANY\n",
209 					  acpi_ut_get_node_name(node),
210 					  acpi_ut_get_type_name(node->type)));
211 
212 			node->type = ACPI_TYPE_ANY;
213 			walk_state->scope_info->common.value = ACPI_TYPE_ANY;
214 			break;
215 
216 		case ACPI_TYPE_METHOD:
217 			/*
218 			 * Allow scope change to root during execution of module-level
219 			 * code. Root is typed METHOD during this time.
220 			 */
221 			if ((node == acpi_gbl_root_node) &&
222 			    (walk_state->
223 			     parse_flags & ACPI_PARSE_MODULE_LEVEL)) {
224 				break;
225 			}
226 
227 			/*lint -fallthrough */
228 
229 		default:
230 
231 			/* All other types are an error */
232 
233 			ACPI_ERROR((AE_INFO,
234 				    "Invalid type (%s) for target of "
235 				    "Scope operator [%4.4s] (Cannot override)",
236 				    acpi_ut_get_type_name(node->type),
237 				    acpi_ut_get_node_name(node)));
238 
239 			return_ACPI_STATUS(AE_AML_OPERAND_TYPE);
240 		}
241 		break;
242 
243 	default:
244 		/*
245 		 * For all other named opcodes, we will enter the name into
246 		 * the namespace.
247 		 *
248 		 * Setup the search flags.
249 		 * Since we are entering a name into the namespace, we do not want to
250 		 * enable the search-to-root upsearch.
251 		 *
252 		 * There are only two conditions where it is acceptable that the name
253 		 * already exists:
254 		 *    1) the Scope() operator can reopen a scoping object that was
255 		 *       previously defined (Scope, Method, Device, etc.)
256 		 *    2) Whenever we are parsing a deferred opcode (op_region, Buffer,
257 		 *       buffer_field, or Package), the name of the object is already
258 		 *       in the namespace.
259 		 */
260 		if (walk_state->deferred_node) {
261 
262 			/* This name is already in the namespace, get the node */
263 
264 			node = walk_state->deferred_node;
265 			status = AE_OK;
266 			break;
267 		}
268 
269 		/*
270 		 * If we are executing a method, do not create any namespace objects
271 		 * during the load phase, only during execution.
272 		 */
273 		if (walk_state->method_node) {
274 			node = NULL;
275 			status = AE_OK;
276 			break;
277 		}
278 
279 		flags = ACPI_NS_NO_UPSEARCH;
280 		if ((walk_state->opcode != AML_SCOPE_OP) &&
281 		    (!(walk_state->parse_flags & ACPI_PARSE_DEFERRED_OP))) {
282 			if (walk_state->namespace_override) {
283 				flags |= ACPI_NS_OVERRIDE_IF_FOUND;
284 				ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
285 						  "[%s] Override allowed\n",
286 						  acpi_ut_get_type_name
287 						  (object_type)));
288 			} else {
289 				flags |= ACPI_NS_ERROR_IF_FOUND;
290 				ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
291 						  "[%s] Cannot already exist\n",
292 						  acpi_ut_get_type_name
293 						  (object_type)));
294 			}
295 		} else {
296 			ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
297 					  "[%s] Both Find or Create allowed\n",
298 					  acpi_ut_get_type_name(object_type)));
299 		}
300 
301 		/*
302 		 * Enter the named type into the internal namespace. We enter the name
303 		 * as we go downward in the parse tree. Any necessary subobjects that
304 		 * involve arguments to the opcode must be created as we go back up the
305 		 * parse tree later.
306 		 */
307 		status =
308 		    acpi_ns_lookup(walk_state->scope_info, path, object_type,
309 				   ACPI_IMODE_LOAD_PASS1, flags, walk_state,
310 				   &node);
311 		if (ACPI_FAILURE(status)) {
312 			if (status == AE_ALREADY_EXISTS) {
313 
314 				/* The name already exists in this scope */
315 
316 				if (node->flags & ANOBJ_IS_EXTERNAL) {
317 					/*
318 					 * Allow one create on an object or segment that was
319 					 * previously declared External
320 					 */
321 					node->flags &= ~ANOBJ_IS_EXTERNAL;
322 					node->type = (u8) object_type;
323 
324 					/* Just retyped a node, probably will need to open a scope */
325 
326 					if (acpi_ns_opens_scope(object_type)) {
327 						status =
328 						    acpi_ds_scope_stack_push
329 						    (node, object_type,
330 						     walk_state);
331 						if (ACPI_FAILURE(status)) {
332 							return_ACPI_STATUS
333 							    (status);
334 						}
335 					}
336 
337 					status = AE_OK;
338 				}
339 			}
340 
341 			if (ACPI_FAILURE(status)) {
342 				ACPI_ERROR_NAMESPACE(walk_state->scope_info,
343 						     path, status);
344 				return_ACPI_STATUS(status);
345 			}
346 		}
347 		break;
348 	}
349 
350 	/* Common exit */
351 
352 	if (!op) {
353 
354 		/* Create a new op */
355 
356 		op = acpi_ps_alloc_op(walk_state->opcode, walk_state->aml);
357 		if (!op) {
358 			return_ACPI_STATUS(AE_NO_MEMORY);
359 		}
360 	}
361 
362 	/* Initialize the op */
363 
364 #ifdef ACPI_CONSTANT_EVAL_ONLY
365 	op->named.path = path;
366 #endif
367 
368 	if (node) {
369 		/*
370 		 * Put the Node in the "op" object that the parser uses, so we
371 		 * can get it again quickly when this scope is closed
372 		 */
373 		op->common.node = node;
374 		op->named.name = node->name.integer;
375 	}
376 
377 	acpi_ps_append_arg(acpi_ps_get_parent_scope(&walk_state->parser_state),
378 			   op);
379 	*out_op = op;
380 	return_ACPI_STATUS(status);
381 }
382 
383 /*******************************************************************************
384  *
385  * FUNCTION:    acpi_ds_load1_end_op
386  *
387  * PARAMETERS:  walk_state      - Current state of the parse tree walk
388  *
389  * RETURN:      Status
390  *
391  * DESCRIPTION: Ascending callback used during the loading of the namespace,
392  *              both control methods and everything else.
393  *
394  ******************************************************************************/
395 
396 acpi_status acpi_ds_load1_end_op(struct acpi_walk_state *walk_state)
397 {
398 	union acpi_parse_object *op;
399 	acpi_object_type object_type;
400 	acpi_status status = AE_OK;
401 #ifdef ACPI_ASL_COMPILER
402 	u8 param_count;
403 #endif
404 
405 	ACPI_FUNCTION_TRACE(ds_load1_end_op);
406 
407 	op = walk_state->op;
408 	ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH, "Op=%p State=%p\n", op,
409 			  walk_state));
410 
411 	/*
412 	 * Disassembler: handle create field operators here.
413 	 *
414 	 * create_buffer_field is a deferred op that is typically processed in load
415 	 * pass 2. However, disassembly of control method contents walk the parse
416 	 * tree with ACPI_PARSE_LOAD_PASS1 and AML_CREATE operators are processed
417 	 * in a later walk. This is a problem when there is a control method that
418 	 * has the same name as the AML_CREATE object. In this case, any use of the
419 	 * name segment will be detected as a method call rather than a reference
420 	 * to a buffer field.
421 	 *
422 	 * This earlier creation during disassembly solves this issue by inserting
423 	 * the named object in the ACPI namespace so that references to this name
424 	 * would be a name string rather than a method call.
425 	 */
426 	if ((walk_state->parse_flags & ACPI_PARSE_DISASSEMBLE) &&
427 	    (walk_state->op_info->flags & AML_CREATE)) {
428 		status = acpi_ds_create_buffer_field(op, walk_state);
429 		return_ACPI_STATUS(status);
430 	}
431 
432 	/* We are only interested in opcodes that have an associated name */
433 
434 	if (!(walk_state->op_info->flags & (AML_NAMED | AML_FIELD))) {
435 		return_ACPI_STATUS(AE_OK);
436 	}
437 
438 	/* Get the object type to determine if we should pop the scope */
439 
440 	object_type = walk_state->op_info->object_type;
441 
442 	if (walk_state->op_info->flags & AML_FIELD) {
443 		/*
444 		 * If we are executing a method, do not create any namespace objects
445 		 * during the load phase, only during execution.
446 		 */
447 		if (!walk_state->method_node) {
448 			if (walk_state->opcode == AML_FIELD_OP ||
449 			    walk_state->opcode == AML_BANK_FIELD_OP ||
450 			    walk_state->opcode == AML_INDEX_FIELD_OP) {
451 				status =
452 				    acpi_ds_init_field_objects(op, walk_state);
453 			}
454 		}
455 		return_ACPI_STATUS(status);
456 	}
457 
458 	/*
459 	 * If we are executing a method, do not create any namespace objects
460 	 * during the load phase, only during execution.
461 	 */
462 	if (!walk_state->method_node) {
463 		if (op->common.aml_opcode == AML_REGION_OP) {
464 			status =
465 			    acpi_ex_create_region(op->named.data,
466 						  op->named.length,
467 						  (acpi_adr_space_type)
468 						  ((op->common.value.arg)->
469 						   common.value.integer),
470 						  walk_state);
471 			if (ACPI_FAILURE(status)) {
472 				return_ACPI_STATUS(status);
473 			}
474 		} else if (op->common.aml_opcode == AML_DATA_REGION_OP) {
475 			status =
476 			    acpi_ex_create_region(op->named.data,
477 						  op->named.length,
478 						  ACPI_ADR_SPACE_DATA_TABLE,
479 						  walk_state);
480 			if (ACPI_FAILURE(status)) {
481 				return_ACPI_STATUS(status);
482 			}
483 		}
484 	}
485 
486 	if (op->common.aml_opcode == AML_NAME_OP) {
487 
488 		/* For Name opcode, get the object type from the argument */
489 
490 		if (op->common.value.arg) {
491 			object_type = (acpi_ps_get_opcode_info((op->common.
492 								value.arg)->
493 							       common.
494 							       aml_opcode))->
495 			    object_type;
496 
497 			/* Set node type if we have a namespace node */
498 
499 			if (op->common.node) {
500 				op->common.node->type = (u8) object_type;
501 			}
502 		}
503 	}
504 #ifdef ACPI_ASL_COMPILER
505 	/*
506 	 * For external opcode, get the object type from the argument and
507 	 * get the parameter count from the argument's next.
508 	 */
509 	if (acpi_gbl_disasm_flag &&
510 	    op->common.node && op->common.aml_opcode == AML_EXTERNAL_OP) {
511 		/*
512 		 * Note, if this external is not a method
513 		 * Op->Common.Value.Arg->Common.Next->Common.Value.Integer == 0
514 		 * Therefore, param_count will be 0.
515 		 */
516 		param_count =
517 		    (u8)op->common.value.arg->common.next->common.value.integer;
518 		object_type = (u8)op->common.value.arg->common.value.integer;
519 		op->common.node->flags |= ANOBJ_IS_EXTERNAL;
520 		op->common.node->type = (u8)object_type;
521 
522 		acpi_dm_create_subobject_for_external((u8)object_type,
523 						      &op->common.node,
524 						      param_count);
525 
526 		/*
527 		 * Add the external to the external list because we may be
528 		 * emitting code based off of the items within the external list.
529 		 */
530 		acpi_dm_add_op_to_external_list(op, op->named.path,
531 						(u8)object_type, param_count,
532 						ACPI_EXT_ORIGIN_FROM_OPCODE |
533 						ACPI_EXT_RESOLVED_REFERENCE);
534 	}
535 #endif
536 
537 	/*
538 	 * If we are executing a method, do not create any namespace objects
539 	 * during the load phase, only during execution.
540 	 */
541 	if (!walk_state->method_node) {
542 		if (op->common.aml_opcode == AML_METHOD_OP) {
543 			/*
544 			 * method_op pkg_length name_string method_flags term_list
545 			 *
546 			 * Note: We must create the method node/object pair as soon as we
547 			 * see the method declaration. This allows later pass1 parsing
548 			 * of invocations of the method (need to know the number of
549 			 * arguments.)
550 			 */
551 			ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
552 					  "LOADING-Method: State=%p Op=%p NamedObj=%p\n",
553 					  walk_state, op, op->named.node));
554 
555 			if (!acpi_ns_get_attached_object(op->named.node)) {
556 				walk_state->operands[0] =
557 				    ACPI_CAST_PTR(void, op->named.node);
558 				walk_state->num_operands = 1;
559 
560 				status =
561 				    acpi_ds_create_operands(walk_state,
562 							    op->common.value.
563 							    arg);
564 				if (ACPI_SUCCESS(status)) {
565 					status =
566 					    acpi_ex_create_method(op->named.
567 								  data,
568 								  op->named.
569 								  length,
570 								  walk_state);
571 				}
572 
573 				walk_state->operands[0] = NULL;
574 				walk_state->num_operands = 0;
575 
576 				if (ACPI_FAILURE(status)) {
577 					return_ACPI_STATUS(status);
578 				}
579 			}
580 		}
581 	}
582 
583 	/* Pop the scope stack (only if loading a table) */
584 
585 	if (!walk_state->method_node &&
586 	    op->common.aml_opcode != AML_EXTERNAL_OP &&
587 	    acpi_ns_opens_scope(object_type)) {
588 		ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
589 				  "(%s): Popping scope for Op %p\n",
590 				  acpi_ut_get_type_name(object_type), op));
591 
592 		status = acpi_ds_scope_stack_pop(walk_state);
593 	}
594 
595 	return_ACPI_STATUS(status);
596 }
597