xref: /openbmc/linux/drivers/acpi/acpica/dswstate.c (revision 910499e1)
1 // SPDX-License-Identifier: BSD-3-Clause OR GPL-2.0
2 /******************************************************************************
3  *
4  * Module Name: dswstate - Dispatcher parse tree walk management routines
5  *
6  * Copyright (C) 2000 - 2021, Intel Corp.
7  *
8  *****************************************************************************/
9 
10 #include <acpi/acpi.h>
11 #include "accommon.h"
12 #include "acparser.h"
13 #include "acdispat.h"
14 #include "acnamesp.h"
15 
16 #define _COMPONENT          ACPI_DISPATCHER
17 ACPI_MODULE_NAME("dswstate")
18 
19   /* Local prototypes */
20 static acpi_status
21 acpi_ds_result_stack_push(struct acpi_walk_state *walk_state);
22 static acpi_status acpi_ds_result_stack_pop(struct acpi_walk_state *walk_state);
23 
24 /*******************************************************************************
25  *
26  * FUNCTION:    acpi_ds_result_pop
27  *
28  * PARAMETERS:  object              - Where to return the popped object
29  *              walk_state          - Current Walk state
30  *
31  * RETURN:      Status
32  *
33  * DESCRIPTION: Pop an object off the top of this walk's result stack
34  *
35  ******************************************************************************/
36 
37 acpi_status
38 acpi_ds_result_pop(union acpi_operand_object **object,
39 		   struct acpi_walk_state *walk_state)
40 {
41 	u32 index;
42 	union acpi_generic_state *state;
43 	acpi_status status;
44 
45 	ACPI_FUNCTION_NAME(ds_result_pop);
46 
47 	state = walk_state->results;
48 
49 	/* Incorrect state of result stack */
50 
51 	if (state && !walk_state->result_count) {
52 		ACPI_ERROR((AE_INFO, "No results on result stack"));
53 		return (AE_AML_INTERNAL);
54 	}
55 
56 	if (!state && walk_state->result_count) {
57 		ACPI_ERROR((AE_INFO, "No result state for result stack"));
58 		return (AE_AML_INTERNAL);
59 	}
60 
61 	/* Empty result stack */
62 
63 	if (!state) {
64 		ACPI_ERROR((AE_INFO, "Result stack is empty! State=%p",
65 			    walk_state));
66 		return (AE_AML_NO_RETURN_VALUE);
67 	}
68 
69 	/* Return object of the top element and clean that top element result stack */
70 
71 	walk_state->result_count--;
72 	index = (u32)walk_state->result_count % ACPI_RESULTS_FRAME_OBJ_NUM;
73 
74 	*object = state->results.obj_desc[index];
75 	if (!*object) {
76 		ACPI_ERROR((AE_INFO,
77 			    "No result objects on result stack, State=%p",
78 			    walk_state));
79 		return (AE_AML_NO_RETURN_VALUE);
80 	}
81 
82 	state->results.obj_desc[index] = NULL;
83 	if (index == 0) {
84 		status = acpi_ds_result_stack_pop(walk_state);
85 		if (ACPI_FAILURE(status)) {
86 			return (status);
87 		}
88 	}
89 
90 	ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
91 			  "Obj=%p [%s] Index=%X State=%p Num=%X\n", *object,
92 			  acpi_ut_get_object_type_name(*object),
93 			  index, walk_state, walk_state->result_count));
94 
95 	return (AE_OK);
96 }
97 
98 /*******************************************************************************
99  *
100  * FUNCTION:    acpi_ds_result_push
101  *
102  * PARAMETERS:  object              - Where to return the popped object
103  *              walk_state          - Current Walk state
104  *
105  * RETURN:      Status
106  *
107  * DESCRIPTION: Push an object onto the current result stack
108  *
109  ******************************************************************************/
110 
111 acpi_status
112 acpi_ds_result_push(union acpi_operand_object *object,
113 		    struct acpi_walk_state *walk_state)
114 {
115 	union acpi_generic_state *state;
116 	acpi_status status;
117 	u32 index;
118 
119 	ACPI_FUNCTION_NAME(ds_result_push);
120 
121 	if (walk_state->result_count > walk_state->result_size) {
122 		ACPI_ERROR((AE_INFO, "Result stack is full"));
123 		return (AE_AML_INTERNAL);
124 	} else if (walk_state->result_count == walk_state->result_size) {
125 
126 		/* Extend the result stack */
127 
128 		status = acpi_ds_result_stack_push(walk_state);
129 		if (ACPI_FAILURE(status)) {
130 			ACPI_ERROR((AE_INFO,
131 				    "Failed to extend the result stack"));
132 			return (status);
133 		}
134 	}
135 
136 	if (!(walk_state->result_count < walk_state->result_size)) {
137 		ACPI_ERROR((AE_INFO, "No free elements in result stack"));
138 		return (AE_AML_INTERNAL);
139 	}
140 
141 	state = walk_state->results;
142 	if (!state) {
143 		ACPI_ERROR((AE_INFO, "No result stack frame during push"));
144 		return (AE_AML_INTERNAL);
145 	}
146 
147 	if (!object) {
148 		ACPI_ERROR((AE_INFO,
149 			    "Null Object! Obj=%p State=%p Num=%u",
150 			    object, walk_state, walk_state->result_count));
151 		return (AE_BAD_PARAMETER);
152 	}
153 
154 	/* Assign the address of object to the top free element of result stack */
155 
156 	index = (u32)walk_state->result_count % ACPI_RESULTS_FRAME_OBJ_NUM;
157 	state->results.obj_desc[index] = object;
158 	walk_state->result_count++;
159 
160 	ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Obj=%p [%s] State=%p Num=%X Cur=%X\n",
161 			  object,
162 			  acpi_ut_get_object_type_name((union
163 							acpi_operand_object *)
164 						       object), walk_state,
165 			  walk_state->result_count,
166 			  walk_state->current_result));
167 
168 	return (AE_OK);
169 }
170 
171 /*******************************************************************************
172  *
173  * FUNCTION:    acpi_ds_result_stack_push
174  *
175  * PARAMETERS:  walk_state          - Current Walk state
176  *
177  * RETURN:      Status
178  *
179  * DESCRIPTION: Push an object onto the walk_state result stack
180  *
181  ******************************************************************************/
182 
183 static acpi_status acpi_ds_result_stack_push(struct acpi_walk_state *walk_state)
184 {
185 	union acpi_generic_state *state;
186 
187 	ACPI_FUNCTION_NAME(ds_result_stack_push);
188 
189 	/* Check for stack overflow */
190 
191 	if (((u32) walk_state->result_size + ACPI_RESULTS_FRAME_OBJ_NUM) >
192 	    ACPI_RESULTS_OBJ_NUM_MAX) {
193 		ACPI_ERROR((AE_INFO, "Result stack overflow: State=%p Num=%u",
194 			    walk_state, walk_state->result_size));
195 		return (AE_STACK_OVERFLOW);
196 	}
197 
198 	state = acpi_ut_create_generic_state();
199 	if (!state) {
200 		return (AE_NO_MEMORY);
201 	}
202 
203 	state->common.descriptor_type = ACPI_DESC_TYPE_STATE_RESULT;
204 	acpi_ut_push_generic_state(&walk_state->results, state);
205 
206 	/* Increase the length of the result stack by the length of frame */
207 
208 	walk_state->result_size += ACPI_RESULTS_FRAME_OBJ_NUM;
209 
210 	ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Results=%p State=%p\n",
211 			  state, walk_state));
212 
213 	return (AE_OK);
214 }
215 
216 /*******************************************************************************
217  *
218  * FUNCTION:    acpi_ds_result_stack_pop
219  *
220  * PARAMETERS:  walk_state          - Current Walk state
221  *
222  * RETURN:      Status
223  *
224  * DESCRIPTION: Pop an object off of the walk_state result stack
225  *
226  ******************************************************************************/
227 
228 static acpi_status acpi_ds_result_stack_pop(struct acpi_walk_state *walk_state)
229 {
230 	union acpi_generic_state *state;
231 
232 	ACPI_FUNCTION_NAME(ds_result_stack_pop);
233 
234 	/* Check for stack underflow */
235 
236 	if (walk_state->results == NULL) {
237 		ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
238 				  "Result stack underflow - State=%p\n",
239 				  walk_state));
240 		return (AE_AML_NO_OPERAND);
241 	}
242 
243 	if (walk_state->result_size < ACPI_RESULTS_FRAME_OBJ_NUM) {
244 		ACPI_ERROR((AE_INFO, "Insufficient result stack size"));
245 		return (AE_AML_INTERNAL);
246 	}
247 
248 	state = acpi_ut_pop_generic_state(&walk_state->results);
249 	acpi_ut_delete_generic_state(state);
250 
251 	/* Decrease the length of result stack by the length of frame */
252 
253 	walk_state->result_size -= ACPI_RESULTS_FRAME_OBJ_NUM;
254 
255 	ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
256 			  "Result=%p RemainingResults=%X State=%p\n",
257 			  state, walk_state->result_count, walk_state));
258 
259 	return (AE_OK);
260 }
261 
262 /*******************************************************************************
263  *
264  * FUNCTION:    acpi_ds_obj_stack_push
265  *
266  * PARAMETERS:  object              - Object to push
267  *              walk_state          - Current Walk state
268  *
269  * RETURN:      Status
270  *
271  * DESCRIPTION: Push an object onto this walk's object/operand stack
272  *
273  ******************************************************************************/
274 
275 acpi_status
276 acpi_ds_obj_stack_push(void *object, struct acpi_walk_state *walk_state)
277 {
278 	ACPI_FUNCTION_NAME(ds_obj_stack_push);
279 
280 	/* Check for stack overflow */
281 
282 	if (walk_state->num_operands >= ACPI_OBJ_NUM_OPERANDS) {
283 		ACPI_ERROR((AE_INFO,
284 			    "Object stack overflow! Obj=%p State=%p #Ops=%u",
285 			    object, walk_state, walk_state->num_operands));
286 		return (AE_STACK_OVERFLOW);
287 	}
288 
289 	/* Put the object onto the stack */
290 
291 	walk_state->operands[walk_state->operand_index] = object;
292 	walk_state->num_operands++;
293 
294 	/* For the usual order of filling the operand stack */
295 
296 	walk_state->operand_index++;
297 
298 	ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Obj=%p [%s] State=%p #Ops=%X\n",
299 			  object,
300 			  acpi_ut_get_object_type_name((union
301 							acpi_operand_object *)
302 						       object), walk_state,
303 			  walk_state->num_operands));
304 
305 	return (AE_OK);
306 }
307 
308 /*******************************************************************************
309  *
310  * FUNCTION:    acpi_ds_obj_stack_pop
311  *
312  * PARAMETERS:  pop_count           - Number of objects/entries to pop
313  *              walk_state          - Current Walk state
314  *
315  * RETURN:      Status
316  *
317  * DESCRIPTION: Pop this walk's object stack. Objects on the stack are NOT
318  *              deleted by this routine.
319  *
320  ******************************************************************************/
321 
322 acpi_status
323 acpi_ds_obj_stack_pop(u32 pop_count, struct acpi_walk_state *walk_state)
324 {
325 	u32 i;
326 
327 	ACPI_FUNCTION_NAME(ds_obj_stack_pop);
328 
329 	for (i = 0; i < pop_count; i++) {
330 
331 		/* Check for stack underflow */
332 
333 		if (walk_state->num_operands == 0) {
334 			ACPI_ERROR((AE_INFO,
335 				    "Object stack underflow! Count=%X State=%p #Ops=%u",
336 				    pop_count, walk_state,
337 				    walk_state->num_operands));
338 			return (AE_STACK_UNDERFLOW);
339 		}
340 
341 		/* Just set the stack entry to null */
342 
343 		walk_state->num_operands--;
344 		walk_state->operands[walk_state->num_operands] = NULL;
345 	}
346 
347 	ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Count=%X State=%p #Ops=%u\n",
348 			  pop_count, walk_state, walk_state->num_operands));
349 
350 	return (AE_OK);
351 }
352 
353 /*******************************************************************************
354  *
355  * FUNCTION:    acpi_ds_obj_stack_pop_and_delete
356  *
357  * PARAMETERS:  pop_count           - Number of objects/entries to pop
358  *              walk_state          - Current Walk state
359  *
360  * RETURN:      Status
361  *
362  * DESCRIPTION: Pop this walk's object stack and delete each object that is
363  *              popped off.
364  *
365  ******************************************************************************/
366 
367 void
368 acpi_ds_obj_stack_pop_and_delete(u32 pop_count,
369 				 struct acpi_walk_state *walk_state)
370 {
371 	s32 i;
372 	union acpi_operand_object *obj_desc;
373 
374 	ACPI_FUNCTION_NAME(ds_obj_stack_pop_and_delete);
375 
376 	if (pop_count == 0) {
377 		return;
378 	}
379 
380 	for (i = (s32)pop_count - 1; i >= 0; i--) {
381 		if (walk_state->num_operands == 0) {
382 			return;
383 		}
384 
385 		/* Pop the stack and delete an object if present in this stack entry */
386 
387 		walk_state->num_operands--;
388 		obj_desc = walk_state->operands[i];
389 		if (obj_desc) {
390 			acpi_ut_remove_reference(walk_state->operands[i]);
391 			walk_state->operands[i] = NULL;
392 		}
393 	}
394 
395 	ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Count=%X State=%p #Ops=%X\n",
396 			  pop_count, walk_state, walk_state->num_operands));
397 }
398 
399 /*******************************************************************************
400  *
401  * FUNCTION:    acpi_ds_get_current_walk_state
402  *
403  * PARAMETERS:  thread          - Get current active state for this Thread
404  *
405  * RETURN:      Pointer to the current walk state
406  *
407  * DESCRIPTION: Get the walk state that is at the head of the list (the "current"
408  *              walk state.)
409  *
410  ******************************************************************************/
411 
412 struct acpi_walk_state *acpi_ds_get_current_walk_state(struct acpi_thread_state
413 						       *thread)
414 {
415 	ACPI_FUNCTION_NAME(ds_get_current_walk_state);
416 
417 	if (!thread) {
418 		return (NULL);
419 	}
420 
421 	ACPI_DEBUG_PRINT((ACPI_DB_PARSE, "Current WalkState %p\n",
422 			  thread->walk_state_list));
423 
424 	return (thread->walk_state_list);
425 }
426 
427 /*******************************************************************************
428  *
429  * FUNCTION:    acpi_ds_push_walk_state
430  *
431  * PARAMETERS:  walk_state      - State to push
432  *              thread          - Thread state object
433  *
434  * RETURN:      None
435  *
436  * DESCRIPTION: Place the Thread state at the head of the state list
437  *
438  ******************************************************************************/
439 
440 void
441 acpi_ds_push_walk_state(struct acpi_walk_state *walk_state,
442 			struct acpi_thread_state *thread)
443 {
444 	ACPI_FUNCTION_TRACE(ds_push_walk_state);
445 
446 	walk_state->next = thread->walk_state_list;
447 	thread->walk_state_list = walk_state;
448 
449 	return_VOID;
450 }
451 
452 /*******************************************************************************
453  *
454  * FUNCTION:    acpi_ds_pop_walk_state
455  *
456  * PARAMETERS:  thread      - Current thread state
457  *
458  * RETURN:      A walk_state object popped from the thread's stack
459  *
460  * DESCRIPTION: Remove and return the walkstate object that is at the head of
461  *              the walk stack for the given walk list. NULL indicates that
462  *              the list is empty.
463  *
464  ******************************************************************************/
465 
466 struct acpi_walk_state *acpi_ds_pop_walk_state(struct acpi_thread_state *thread)
467 {
468 	struct acpi_walk_state *walk_state;
469 
470 	ACPI_FUNCTION_TRACE(ds_pop_walk_state);
471 
472 	walk_state = thread->walk_state_list;
473 
474 	if (walk_state) {
475 
476 		/* Next walk state becomes the current walk state */
477 
478 		thread->walk_state_list = walk_state->next;
479 
480 		/*
481 		 * Don't clear the NEXT field, this serves as an indicator
482 		 * that there is a parent WALK STATE
483 		 * Do Not: walk_state->Next = NULL;
484 		 */
485 	}
486 
487 	return_PTR(walk_state);
488 }
489 
490 /*******************************************************************************
491  *
492  * FUNCTION:    acpi_ds_create_walk_state
493  *
494  * PARAMETERS:  owner_id        - ID for object creation
495  *              origin          - Starting point for this walk
496  *              method_desc     - Method object
497  *              thread          - Current thread state
498  *
499  * RETURN:      Pointer to the new walk state.
500  *
501  * DESCRIPTION: Allocate and initialize a new walk state. The current walk
502  *              state is set to this new state.
503  *
504  ******************************************************************************/
505 
506 struct acpi_walk_state *acpi_ds_create_walk_state(acpi_owner_id owner_id,
507 						  union acpi_parse_object
508 						  *origin,
509 						  union acpi_operand_object
510 						  *method_desc,
511 						  struct acpi_thread_state
512 						  *thread)
513 {
514 	struct acpi_walk_state *walk_state;
515 
516 	ACPI_FUNCTION_TRACE(ds_create_walk_state);
517 
518 	walk_state = ACPI_ALLOCATE_ZEROED(sizeof(struct acpi_walk_state));
519 	if (!walk_state) {
520 		return_PTR(NULL);
521 	}
522 
523 	walk_state->descriptor_type = ACPI_DESC_TYPE_WALK;
524 	walk_state->method_desc = method_desc;
525 	walk_state->owner_id = owner_id;
526 	walk_state->origin = origin;
527 	walk_state->thread = thread;
528 
529 	walk_state->parser_state.start_op = origin;
530 
531 	/* Init the method args/local */
532 
533 #ifndef ACPI_CONSTANT_EVAL_ONLY
534 	acpi_ds_method_data_init(walk_state);
535 #endif
536 
537 	/* Put the new state at the head of the walk list */
538 
539 	if (thread) {
540 		acpi_ds_push_walk_state(walk_state, thread);
541 	}
542 
543 	return_PTR(walk_state);
544 }
545 
546 /*******************************************************************************
547  *
548  * FUNCTION:    acpi_ds_init_aml_walk
549  *
550  * PARAMETERS:  walk_state      - New state to be initialized
551  *              op              - Current parse op
552  *              method_node     - Control method NS node, if any
553  *              aml_start       - Start of AML
554  *              aml_length      - Length of AML
555  *              info            - Method info block (params, etc.)
556  *              pass_number     - 1, 2, or 3
557  *
558  * RETURN:      Status
559  *
560  * DESCRIPTION: Initialize a walk state for a pass 1 or 2 parse tree walk
561  *
562  ******************************************************************************/
563 
564 acpi_status
565 acpi_ds_init_aml_walk(struct acpi_walk_state *walk_state,
566 		      union acpi_parse_object *op,
567 		      struct acpi_namespace_node *method_node,
568 		      u8 * aml_start,
569 		      u32 aml_length,
570 		      struct acpi_evaluate_info *info, u8 pass_number)
571 {
572 	acpi_status status;
573 	struct acpi_parse_state *parser_state = &walk_state->parser_state;
574 	union acpi_parse_object *extra_op;
575 
576 	ACPI_FUNCTION_TRACE(ds_init_aml_walk);
577 
578 	walk_state->parser_state.aml =
579 	    walk_state->parser_state.aml_start = aml_start;
580 	walk_state->parser_state.aml_end =
581 	    walk_state->parser_state.pkg_end = aml_start + aml_length;
582 
583 	/* The next_op of the next_walk will be the beginning of the method */
584 
585 	walk_state->next_op = NULL;
586 	walk_state->pass_number = pass_number;
587 
588 	if (info) {
589 		walk_state->params = info->parameters;
590 		walk_state->caller_return_desc = &info->return_object;
591 	}
592 
593 	status = acpi_ps_init_scope(&walk_state->parser_state, op);
594 	if (ACPI_FAILURE(status)) {
595 		return_ACPI_STATUS(status);
596 	}
597 
598 	if (method_node) {
599 		walk_state->parser_state.start_node = method_node;
600 		walk_state->walk_type = ACPI_WALK_METHOD;
601 		walk_state->method_node = method_node;
602 		walk_state->method_desc =
603 		    acpi_ns_get_attached_object(method_node);
604 
605 		/* Push start scope on scope stack and make it current  */
606 
607 		status =
608 		    acpi_ds_scope_stack_push(method_node, ACPI_TYPE_METHOD,
609 					     walk_state);
610 		if (ACPI_FAILURE(status)) {
611 			return_ACPI_STATUS(status);
612 		}
613 
614 		/* Init the method arguments */
615 
616 		status = acpi_ds_method_data_init_args(walk_state->params,
617 						       ACPI_METHOD_NUM_ARGS,
618 						       walk_state);
619 		if (ACPI_FAILURE(status)) {
620 			return_ACPI_STATUS(status);
621 		}
622 	} else {
623 		/*
624 		 * Setup the current scope.
625 		 * Find a Named Op that has a namespace node associated with it.
626 		 * search upwards from this Op. Current scope is the first
627 		 * Op with a namespace node.
628 		 */
629 		extra_op = parser_state->start_op;
630 		while (extra_op && !extra_op->common.node) {
631 			extra_op = extra_op->common.parent;
632 		}
633 
634 		if (!extra_op) {
635 			parser_state->start_node = NULL;
636 		} else {
637 			parser_state->start_node = extra_op->common.node;
638 		}
639 
640 		if (parser_state->start_node) {
641 
642 			/* Push start scope on scope stack and make it current  */
643 
644 			status =
645 			    acpi_ds_scope_stack_push(parser_state->start_node,
646 						     parser_state->start_node->
647 						     type, walk_state);
648 			if (ACPI_FAILURE(status)) {
649 				return_ACPI_STATUS(status);
650 			}
651 		}
652 	}
653 
654 	status = acpi_ds_init_callbacks(walk_state, pass_number);
655 	return_ACPI_STATUS(status);
656 }
657 
658 /*******************************************************************************
659  *
660  * FUNCTION:    acpi_ds_delete_walk_state
661  *
662  * PARAMETERS:  walk_state      - State to delete
663  *
664  * RETURN:      Status
665  *
666  * DESCRIPTION: Delete a walk state including all internal data structures
667  *
668  ******************************************************************************/
669 
670 void acpi_ds_delete_walk_state(struct acpi_walk_state *walk_state)
671 {
672 	union acpi_generic_state *state;
673 
674 	ACPI_FUNCTION_TRACE_PTR(ds_delete_walk_state, walk_state);
675 
676 	if (!walk_state) {
677 		return_VOID;
678 	}
679 
680 	if (walk_state->descriptor_type != ACPI_DESC_TYPE_WALK) {
681 		ACPI_ERROR((AE_INFO, "%p is not a valid walk state",
682 			    walk_state));
683 		return_VOID;
684 	}
685 
686 	/* There should not be any open scopes */
687 
688 	if (walk_state->parser_state.scope) {
689 		ACPI_ERROR((AE_INFO, "%p walk still has a scope list",
690 			    walk_state));
691 		acpi_ps_cleanup_scope(&walk_state->parser_state);
692 	}
693 
694 	/* Always must free any linked control states */
695 
696 	while (walk_state->control_state) {
697 		state = walk_state->control_state;
698 		walk_state->control_state = state->common.next;
699 
700 		acpi_ut_delete_generic_state(state);
701 	}
702 
703 	/* Always must free any linked parse states */
704 
705 	while (walk_state->scope_info) {
706 		state = walk_state->scope_info;
707 		walk_state->scope_info = state->common.next;
708 
709 		acpi_ut_delete_generic_state(state);
710 	}
711 
712 	/* Always must free any stacked result states */
713 
714 	while (walk_state->results) {
715 		state = walk_state->results;
716 		walk_state->results = state->common.next;
717 
718 		acpi_ut_delete_generic_state(state);
719 	}
720 
721 	ACPI_FREE(walk_state);
722 	return_VOID;
723 }
724