1 // SPDX-License-Identifier: BSD-3-Clause OR GPL-2.0
2 /******************************************************************************
4 * Module Name: dscontrol - Support for execution control opcodes -
7 * Copyright (C) 2000 - 2020, Intel Corp.
9 *****************************************************************************/
11 #include <acpi/acpi.h>
18 #define _COMPONENT ACPI_DISPATCHER
19 ACPI_MODULE_NAME("dscontrol")
21 /*******************************************************************************
23 * FUNCTION: acpi_ds_exec_begin_control_op
25 * PARAMETERS: walk_list - The list that owns the walk stack
30 * DESCRIPTION: Handles all control ops encountered during control method
33 ******************************************************************************/
35 acpi_ds_exec_begin_control_op(struct acpi_walk_state
*walk_state
,
36 union acpi_parse_object
*op
)
38 acpi_status status
= AE_OK
;
39 union acpi_generic_state
*control_state
;
41 ACPI_FUNCTION_NAME(ds_exec_begin_control_op
);
43 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH
, "Op=%p Opcode=%2.2X State=%p\n",
44 op
, op
->common
.aml_opcode
, walk_state
));
46 switch (op
->common
.aml_opcode
) {
49 * If this is an additional iteration of a while loop, continue.
50 * There is no need to allocate a new control state.
52 if (walk_state
->control_state
) {
53 if (walk_state
->control_state
->control
.
54 aml_predicate_start
==
55 (walk_state
->parser_state
.aml
- 1)) {
57 /* Reset the state to start-of-loop */
59 walk_state
->control_state
->common
.state
=
60 ACPI_CONTROL_CONDITIONAL_EXECUTING
;
65 /*lint -fallthrough */
69 * IF/WHILE: Create a new control state to manage these
70 * constructs. We need to manage these as a stack, in order
73 control_state
= acpi_ut_create_control_state();
75 status
= AE_NO_MEMORY
;
79 * Save a pointer to the predicate for multiple executions
82 control_state
->control
.aml_predicate_start
=
83 walk_state
->parser_state
.aml
- 1;
84 control_state
->control
.package_end
=
85 walk_state
->parser_state
.pkg_end
;
86 control_state
->control
.opcode
= op
->common
.aml_opcode
;
87 control_state
->control
.loop_timeout
= acpi_os_get_timer() +
88 ((u64
)acpi_gbl_max_loop_iterations
* ACPI_100NSEC_PER_SEC
);
90 /* Push the control state on this walk's control stack */
92 acpi_ut_push_generic_state(&walk_state
->control_state
,
98 /* Predicate is in the state object */
99 /* If predicate is true, the IF was executed, ignore ELSE part */
101 if (walk_state
->last_predicate
) {
102 status
= AE_CTRL_TRUE
;
119 /*******************************************************************************
121 * FUNCTION: acpi_ds_exec_end_control_op
123 * PARAMETERS: walk_list - The list that owns the walk stack
124 * op - The control Op
128 * DESCRIPTION: Handles all control ops encountered during control method
131 ******************************************************************************/
134 acpi_ds_exec_end_control_op(struct acpi_walk_state
*walk_state
,
135 union acpi_parse_object
*op
)
137 acpi_status status
= AE_OK
;
138 union acpi_generic_state
*control_state
;
140 ACPI_FUNCTION_NAME(ds_exec_end_control_op
);
142 switch (op
->common
.aml_opcode
) {
145 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH
, "[IF_OP] Op=%p\n", op
));
148 * Save the result of the predicate in case there is an
151 walk_state
->last_predicate
=
152 (u8
)walk_state
->control_state
->common
.value
;
155 * Pop the control state that was created at the start
156 * of the IF and free it
159 acpi_ut_pop_generic_state(&walk_state
->control_state
);
160 acpi_ut_delete_generic_state(control_state
);
169 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH
, "[WHILE_OP] Op=%p\n", op
));
171 control_state
= walk_state
->control_state
;
172 if (control_state
->common
.value
) {
174 /* Predicate was true, the body of the loop was just executed */
177 * This infinite loop detection mechanism allows the interpreter
178 * to escape possibly infinite loops. This can occur in poorly
179 * written AML when the hardware does not respond within a while
180 * loop and the loop does not implement a timeout.
182 if (ACPI_TIME_AFTER(acpi_os_get_timer(),
183 control_state
->control
.
185 status
= AE_AML_LOOP_TIMEOUT
;
190 * Go back and evaluate the predicate and maybe execute the loop
193 status
= AE_CTRL_PENDING
;
194 walk_state
->aml_last_while
=
195 control_state
->control
.aml_predicate_start
;
199 /* Predicate was false, terminate this while loop */
201 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH
,
202 "[WHILE_OP] termination! Op=%p\n", op
));
204 /* Pop this control state and free it */
207 acpi_ut_pop_generic_state(&walk_state
->control_state
);
208 acpi_ut_delete_generic_state(control_state
);
213 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH
,
214 "[RETURN_OP] Op=%p Arg=%p\n", op
,
215 op
->common
.value
.arg
));
218 * One optional operand -- the return value
219 * It can be either an immediate operand or a result that
220 * has been bubbled up the tree
222 if (op
->common
.value
.arg
) {
224 /* Since we have a real Return(), delete any implicit return */
226 acpi_ds_clear_implicit_return(walk_state
);
228 /* Return statement has an immediate operand */
231 acpi_ds_create_operands(walk_state
,
232 op
->common
.value
.arg
);
233 if (ACPI_FAILURE(status
)) {
238 * If value being returned is a Reference (such as
239 * an arg or local), resolve it now because it may
240 * cease to exist at the end of the method.
243 acpi_ex_resolve_to_value(&walk_state
->operands
[0],
245 if (ACPI_FAILURE(status
)) {
250 * Get the return value and save as the last result
251 * value. This is the only place where walk_state->return_desc
252 * is set to anything other than zero!
254 walk_state
->return_desc
= walk_state
->operands
[0];
255 } else if (walk_state
->result_count
) {
257 /* Since we have a real Return(), delete any implicit return */
259 acpi_ds_clear_implicit_return(walk_state
);
262 * The return value has come from a previous calculation.
264 * If value being returned is a Reference (such as
265 * an arg or local), resolve it now because it may
266 * cease to exist at the end of the method.
268 * Allow references created by the Index operator to return
271 if ((ACPI_GET_DESCRIPTOR_TYPE
272 (walk_state
->results
->results
.obj_desc
[0]) ==
273 ACPI_DESC_TYPE_OPERAND
)
274 && ((walk_state
->results
->results
.obj_desc
[0])->
275 common
.type
== ACPI_TYPE_LOCAL_REFERENCE
)
276 && ((walk_state
->results
->results
.obj_desc
[0])->
277 reference
.class != ACPI_REFCLASS_INDEX
)) {
279 acpi_ex_resolve_to_value(&walk_state
->
283 if (ACPI_FAILURE(status
)) {
288 walk_state
->return_desc
=
289 walk_state
->results
->results
.obj_desc
[0];
291 /* No return operand */
293 if (walk_state
->num_operands
) {
294 acpi_ut_remove_reference(walk_state
->
298 walk_state
->operands
[0] = NULL
;
299 walk_state
->num_operands
= 0;
300 walk_state
->return_desc
= NULL
;
303 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH
,
304 "Completed RETURN_OP State=%p, RetVal=%p\n",
305 walk_state
, walk_state
->return_desc
));
307 /* End the control method execution right now */
309 status
= AE_CTRL_TERMINATE
;
314 /* Just do nothing! */
318 case AML_BREAKPOINT_OP
:
320 acpi_db_signal_break_point(walk_state
);
322 /* Call to the OSL in case OS wants a piece of the action */
324 status
= acpi_os_signal(ACPI_SIGNAL_BREAKPOINT
,
325 "Executed AML Breakpoint opcode");
329 case AML_CONTINUE_OP
: /* ACPI 2.0 */
331 /* Pop and delete control states until we find a while */
333 while (walk_state
->control_state
&&
334 (walk_state
->control_state
->control
.opcode
!=
337 acpi_ut_pop_generic_state(&walk_state
->
339 acpi_ut_delete_generic_state(control_state
);
342 /* No while found? */
344 if (!walk_state
->control_state
) {
345 return (AE_AML_NO_WHILE
);
348 /* Was: walk_state->aml_last_while = walk_state->control_state->Control.aml_predicate_start; */
350 walk_state
->aml_last_while
=
351 walk_state
->control_state
->control
.package_end
;
353 /* Return status depending on opcode */
355 if (op
->common
.aml_opcode
== AML_BREAK_OP
) {
356 status
= AE_CTRL_BREAK
;
358 status
= AE_CTRL_CONTINUE
;
364 ACPI_ERROR((AE_INFO
, "Unknown control opcode=0x%X Op=%p",
365 op
->common
.aml_opcode
, op
));
367 status
= AE_AML_BAD_OPCODE
;