1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
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 "acdebug.h"
52
53#define _COMPONENT ACPI_DISPATCHER
54ACPI_MODULE_NAME("dsutils")
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70void acpi_ds_clear_implicit_return(struct acpi_walk_state *walk_state)
71{
72 ACPI_FUNCTION_NAME(ds_clear_implicit_return);
73
74
75
76
77 if (!acpi_gbl_enable_interpreter_slack) {
78 return;
79 }
80
81 if (walk_state->implicit_return_obj) {
82
83
84
85
86
87 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
88 "Removing reference on stale implicit return obj %p\n",
89 walk_state->implicit_return_obj));
90
91 acpi_ut_remove_reference(walk_state->implicit_return_obj);
92 walk_state->implicit_return_obj = NULL;
93 }
94}
95
96#ifndef ACPI_NO_METHOD_EXECUTION
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115u8
116acpi_ds_do_implicit_return(union acpi_operand_object *return_desc,
117 struct acpi_walk_state *walk_state, u8 add_reference)
118{
119 ACPI_FUNCTION_NAME(ds_do_implicit_return);
120
121
122
123
124
125 if ((!acpi_gbl_enable_interpreter_slack) || (!return_desc)) {
126 return (FALSE);
127 }
128
129 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
130 "Result %p will be implicitly returned; Prev=%p\n",
131 return_desc, walk_state->implicit_return_obj));
132
133
134
135
136
137
138
139 if (walk_state->implicit_return_obj) {
140 if (walk_state->implicit_return_obj == return_desc) {
141 return (TRUE);
142 }
143 acpi_ds_clear_implicit_return(walk_state);
144 }
145
146
147
148 walk_state->implicit_return_obj = return_desc;
149 if (add_reference) {
150 acpi_ut_add_reference(return_desc);
151 }
152
153 return (TRUE);
154}
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169u8
170acpi_ds_is_result_used(union acpi_parse_object * op,
171 struct acpi_walk_state * walk_state)
172{
173 const struct acpi_opcode_info *parent_info;
174
175 ACPI_FUNCTION_TRACE_PTR(ds_is_result_used, op);
176
177
178
179 if (!op) {
180 ACPI_ERROR((AE_INFO, "Null Op"));
181 return_UINT8(TRUE);
182 }
183
184
185
186
187
188
189
190
191
192
193 (void)acpi_ds_do_implicit_return(walk_state->result_obj, walk_state,
194 TRUE);
195
196
197
198
199
200
201
202
203
204 if ((!op->common.parent) ||
205 (op->common.parent->common.aml_opcode == AML_SCOPE_OP)) {
206
207
208
209 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
210 "At Method level, result of [%s] not used\n",
211 acpi_ps_get_opcode_name(op->common.
212 aml_opcode)));
213 return_UINT8(FALSE);
214 }
215
216
217
218 parent_info =
219 acpi_ps_get_opcode_info(op->common.parent->common.aml_opcode);
220 if (parent_info->class == AML_CLASS_UNKNOWN) {
221 ACPI_ERROR((AE_INFO, "Unknown parent opcode Op=%p", op));
222 return_UINT8(FALSE);
223 }
224
225
226
227
228
229
230
231 switch (parent_info->class) {
232 case AML_CLASS_CONTROL:
233
234 switch (op->common.parent->common.aml_opcode) {
235 case AML_RETURN_OP:
236
237
238
239 goto result_used;
240
241 case AML_IF_OP:
242 case AML_WHILE_OP:
243
244
245
246
247 if ((walk_state->control_state->common.state ==
248 ACPI_CONTROL_PREDICATE_EXECUTING)
249 && (walk_state->control_state->control.
250 predicate_op == op)) {
251 goto result_used;
252 }
253 break;
254
255 default:
256
257
258
259 break;
260 }
261
262
263
264 goto result_not_used;
265
266 case AML_CLASS_CREATE:
267
268
269
270
271 goto result_used;
272
273 case AML_CLASS_NAMED_OBJECT:
274
275 if ((op->common.parent->common.aml_opcode == AML_REGION_OP) ||
276 (op->common.parent->common.aml_opcode == AML_DATA_REGION_OP)
277 || (op->common.parent->common.aml_opcode == AML_PACKAGE_OP)
278 || (op->common.parent->common.aml_opcode ==
279 AML_VAR_PACKAGE_OP)
280 || (op->common.parent->common.aml_opcode == AML_BUFFER_OP)
281 || (op->common.parent->common.aml_opcode ==
282 AML_INT_EVAL_SUBTREE_OP)
283 || (op->common.parent->common.aml_opcode ==
284 AML_BANK_FIELD_OP)) {
285
286
287
288
289 goto result_used;
290 }
291
292 goto result_not_used;
293
294 default:
295
296
297
298
299 goto result_used;
300 }
301
302 result_used:
303 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
304 "Result of [%s] used by Parent [%s] Op=%p\n",
305 acpi_ps_get_opcode_name(op->common.aml_opcode),
306 acpi_ps_get_opcode_name(op->common.parent->common.
307 aml_opcode), op));
308
309 return_UINT8(TRUE);
310
311 result_not_used:
312 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
313 "Result of [%s] not used by Parent [%s] Op=%p\n",
314 acpi_ps_get_opcode_name(op->common.aml_opcode),
315 acpi_ps_get_opcode_name(op->common.parent->common.
316 aml_opcode), op));
317
318 return_UINT8(FALSE);
319}
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338void
339acpi_ds_delete_result_if_not_used(union acpi_parse_object *op,
340 union acpi_operand_object *result_obj,
341 struct acpi_walk_state *walk_state)
342{
343 union acpi_operand_object *obj_desc;
344 acpi_status status;
345
346 ACPI_FUNCTION_TRACE_PTR(ds_delete_result_if_not_used, result_obj);
347
348 if (!op) {
349 ACPI_ERROR((AE_INFO, "Null Op"));
350 return_VOID;
351 }
352
353 if (!result_obj) {
354 return_VOID;
355 }
356
357 if (!acpi_ds_is_result_used(op, walk_state)) {
358
359
360
361 status = acpi_ds_result_pop(&obj_desc, walk_state);
362 if (ACPI_SUCCESS(status)) {
363 acpi_ut_remove_reference(result_obj);
364 }
365 }
366
367 return_VOID;
368}
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384acpi_status acpi_ds_resolve_operands(struct acpi_walk_state *walk_state)
385{
386 u32 i;
387 acpi_status status = AE_OK;
388
389 ACPI_FUNCTION_TRACE_PTR(ds_resolve_operands, walk_state);
390
391
392
393
394
395
396 for (i = 0; i < walk_state->num_operands; i++) {
397 status =
398 acpi_ex_resolve_to_value(&walk_state->operands[i],
399 walk_state);
400 if (ACPI_FAILURE(status)) {
401 break;
402 }
403 }
404
405 return_ACPI_STATUS(status);
406}
407
408
409
410
411
412
413
414
415
416
417
418
419
420void acpi_ds_clear_operands(struct acpi_walk_state *walk_state)
421{
422 u32 i;
423
424 ACPI_FUNCTION_TRACE_PTR(ds_clear_operands, walk_state);
425
426
427
428 for (i = 0; i < walk_state->num_operands; i++) {
429
430
431
432
433 acpi_ut_remove_reference(walk_state->operands[i]);
434 walk_state->operands[i] = NULL;
435 }
436
437 walk_state->num_operands = 0;
438 return_VOID;
439}
440#endif
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459acpi_status
460acpi_ds_create_operand(struct acpi_walk_state *walk_state,
461 union acpi_parse_object *arg, u32 arg_index)
462{
463 acpi_status status = AE_OK;
464 char *name_string;
465 u32 name_length;
466 union acpi_operand_object *obj_desc;
467 union acpi_parse_object *parent_op;
468 u16 opcode;
469 acpi_interpreter_mode interpreter_mode;
470 const struct acpi_opcode_info *op_info;
471
472 ACPI_FUNCTION_TRACE_PTR(ds_create_operand, arg);
473
474
475
476 if ((arg->common.aml_opcode == AML_INT_NAMEPATH_OP) &&
477 (arg->common.value.string) &&
478 !(arg->common.flags & ACPI_PARSEOP_IN_STACK)) {
479 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH, "Getting a name: Arg=%p\n",
480 arg));
481
482
483
484 status =
485 acpi_ex_get_name_string(ACPI_TYPE_ANY,
486 arg->common.value.buffer,
487 &name_string, &name_length);
488
489 if (ACPI_FAILURE(status)) {
490 return_ACPI_STATUS(status);
491 }
492
493
494
495
496
497
498
499
500
501
502
503
504 if ((walk_state->deferred_node) &&
505 (walk_state->deferred_node->type == ACPI_TYPE_BUFFER_FIELD)
506 && (arg_index ==
507 (u32) ((walk_state->opcode ==
508 AML_CREATE_FIELD_OP) ? 3 : 2))) {
509 obj_desc =
510 ACPI_CAST_PTR(union acpi_operand_object,
511 walk_state->deferred_node);
512 status = AE_OK;
513 } else {
514
515
516
517
518
519
520
521 parent_op = arg->common.parent;
522 op_info =
523 acpi_ps_get_opcode_info(parent_op->common.
524 aml_opcode);
525 if ((op_info->flags & AML_NSNODE)
526 && (parent_op->common.aml_opcode !=
527 AML_INT_METHODCALL_OP)
528 && (parent_op->common.aml_opcode != AML_REGION_OP)
529 && (parent_op->common.aml_opcode !=
530 AML_INT_NAMEPATH_OP)) {
531
532
533
534 interpreter_mode = ACPI_IMODE_LOAD_PASS2;
535 } else {
536
537
538 interpreter_mode = ACPI_IMODE_EXECUTE;
539 }
540
541 status =
542 acpi_ns_lookup(walk_state->scope_info, name_string,
543 ACPI_TYPE_ANY, interpreter_mode,
544 ACPI_NS_SEARCH_PARENT |
545 ACPI_NS_DONT_OPEN_SCOPE, walk_state,
546 ACPI_CAST_INDIRECT_PTR(struct
547 acpi_namespace_node,
548 &obj_desc));
549
550
551
552
553 if (status == AE_NOT_FOUND) {
554 if (parent_op->common.aml_opcode ==
555 AML_COND_REF_OF_OP) {
556
557
558
559
560
561
562 obj_desc =
563 ACPI_CAST_PTR(union
564 acpi_operand_object,
565 acpi_gbl_root_node);
566 status = AE_OK;
567 } else {
568
569
570
571
572 status = AE_AML_NAME_NOT_FOUND;
573 }
574 }
575
576 if (ACPI_FAILURE(status)) {
577 ACPI_ERROR_NAMESPACE(name_string, status);
578 }
579 }
580
581
582
583 ACPI_FREE(name_string);
584
585
586
587 if (ACPI_FAILURE(status)) {
588 return_ACPI_STATUS(status);
589 }
590
591
592
593 status = acpi_ds_obj_stack_push(obj_desc, walk_state);
594 if (ACPI_FAILURE(status)) {
595 return_ACPI_STATUS(status);
596 }
597 ACPI_DEBUGGER_EXEC(acpi_db_display_argument_object
598 (obj_desc, walk_state));
599 } else {
600
601
602 if ((arg->common.aml_opcode == AML_INT_NAMEPATH_OP) &&
603 !(arg->common.flags & ACPI_PARSEOP_IN_STACK)) {
604
605
606
607
608
609
610 opcode = AML_ZERO_OP;
611
612 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
613 "Null namepath: Arg=%p\n", arg));
614 } else {
615 opcode = arg->common.aml_opcode;
616 }
617
618
619
620 op_info = acpi_ps_get_opcode_info(opcode);
621 if (op_info->object_type == ACPI_TYPE_INVALID) {
622 return_ACPI_STATUS(AE_NOT_IMPLEMENTED);
623 }
624
625 if ((op_info->flags & AML_HAS_RETVAL)
626 || (arg->common.flags & ACPI_PARSEOP_IN_STACK)) {
627 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
628 "Argument previously created, already stacked\n"));
629
630 ACPI_DEBUGGER_EXEC(acpi_db_display_argument_object
631 (walk_state->
632 operands[walk_state->num_operands -
633 1], walk_state));
634
635
636
637
638
639 status = acpi_ds_result_pop(&obj_desc, walk_state);
640 if (ACPI_FAILURE(status)) {
641
642
643
644
645 ACPI_EXCEPTION((AE_INFO, status,
646 "Missing or null operand"));
647 return_ACPI_STATUS(status);
648 }
649 } else {
650
651
652 obj_desc =
653 acpi_ut_create_internal_object(op_info->
654 object_type);
655 if (!obj_desc) {
656 return_ACPI_STATUS(AE_NO_MEMORY);
657 }
658
659
660
661 status =
662 acpi_ds_init_object_from_op(walk_state, arg, opcode,
663 &obj_desc);
664 if (ACPI_FAILURE(status)) {
665 acpi_ut_delete_object_desc(obj_desc);
666 return_ACPI_STATUS(status);
667 }
668 }
669
670
671
672 status = acpi_ds_obj_stack_push(obj_desc, walk_state);
673 if (ACPI_FAILURE(status)) {
674 return_ACPI_STATUS(status);
675 }
676
677 ACPI_DEBUGGER_EXEC(acpi_db_display_argument_object
678 (obj_desc, walk_state));
679 }
680
681 return_ACPI_STATUS(AE_OK);
682}
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699acpi_status
700acpi_ds_create_operands(struct acpi_walk_state *walk_state,
701 union acpi_parse_object *first_arg)
702{
703 acpi_status status = AE_OK;
704 union acpi_parse_object *arg;
705 union acpi_parse_object *arguments[ACPI_OBJ_NUM_OPERANDS];
706 u32 arg_count = 0;
707 u32 index = walk_state->num_operands;
708 u32 i;
709
710 ACPI_FUNCTION_TRACE_PTR(ds_create_operands, first_arg);
711
712
713
714 arg = first_arg;
715 while (arg) {
716 if (index >= ACPI_OBJ_NUM_OPERANDS) {
717 return_ACPI_STATUS(AE_BAD_DATA);
718 }
719
720 arguments[index] = arg;
721 walk_state->operands[index] = NULL;
722
723
724
725 arg = arg->common.next;
726 arg_count++;
727 index++;
728 }
729
730 index--;
731
732
733
734 for (i = 0; i < arg_count; i++) {
735 arg = arguments[index];
736
737
738
739 walk_state->operand_index = (u8) index;
740
741 status = acpi_ds_create_operand(walk_state, arg, index);
742 if (ACPI_FAILURE(status)) {
743 goto cleanup;
744 }
745
746 index--;
747
748 ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH,
749 "Arg #%u (%p) done, Arg1=%p\n", index, arg,
750 first_arg));
751 }
752
753 return_ACPI_STATUS(status);
754
755 cleanup:
756
757
758
759
760
761 acpi_ds_obj_stack_pop_and_delete(arg_count, walk_state);
762
763 ACPI_EXCEPTION((AE_INFO, status, "While creating Arg %u", index));
764 return_ACPI_STATUS(status);
765}
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783acpi_status acpi_ds_evaluate_name_path(struct acpi_walk_state *walk_state)
784{
785 acpi_status status = AE_OK;
786 union acpi_parse_object *op = walk_state->op;
787 union acpi_operand_object **operand = &walk_state->operands[0];
788 union acpi_operand_object *new_obj_desc;
789 u8 type;
790
791 ACPI_FUNCTION_TRACE_PTR(ds_evaluate_name_path, walk_state);
792
793 if (!op->common.parent) {
794
795
796
797 goto exit;
798 }
799
800 if ((op->common.parent->common.aml_opcode == AML_PACKAGE_OP) ||
801 (op->common.parent->common.aml_opcode == AML_VAR_PACKAGE_OP) ||
802 (op->common.parent->common.aml_opcode == AML_REF_OF_OP)) {
803
804
805
806 goto exit;
807 }
808
809 status = acpi_ds_create_operand(walk_state, op, 0);
810 if (ACPI_FAILURE(status)) {
811 goto exit;
812 }
813
814 if (op->common.flags & ACPI_PARSEOP_TARGET) {
815 new_obj_desc = *operand;
816 goto push_result;
817 }
818
819 type = (*operand)->common.type;
820
821 status = acpi_ex_resolve_to_value(operand, walk_state);
822 if (ACPI_FAILURE(status)) {
823 goto exit;
824 }
825
826 if (type == ACPI_TYPE_INTEGER) {
827
828
829
830 acpi_ut_remove_reference(*operand);
831
832 status =
833 acpi_ut_copy_iobject_to_iobject(*operand, &new_obj_desc,
834 walk_state);
835 if (ACPI_FAILURE(status)) {
836 goto exit;
837 }
838 } else {
839
840
841
842
843 new_obj_desc = *operand;
844 }
845
846
847
848 status = acpi_ds_obj_stack_pop(1, walk_state);
849 if (ACPI_FAILURE(status)) {
850 walk_state->result_obj = new_obj_desc;
851 goto exit;
852 }
853
854 push_result:
855
856 walk_state->result_obj = new_obj_desc;
857
858 status = acpi_ds_result_push(walk_state->result_obj, walk_state);
859 if (ACPI_SUCCESS(status)) {
860
861
862
863 op->common.flags |= ACPI_PARSEOP_IN_STACK;
864 }
865
866 exit:
867
868 return_ACPI_STATUS(status);
869}
870