Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /******************************************************************************* |
2 | * | |
3 | * Module Name: dsutils - Dispatcher utilities | |
4 | * | |
5 | ******************************************************************************/ | |
6 | ||
7 | /* | |
4a90c7e8 | 8 | * Copyright (C) 2000 - 2006, R. Byron Moore |
1da177e4 LT |
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 | ||
1da177e4 LT |
44 | #include <acpi/acpi.h> |
45 | #include <acpi/acparser.h> | |
46 | #include <acpi/amlcode.h> | |
47 | #include <acpi/acdispat.h> | |
48 | #include <acpi/acinterp.h> | |
49 | #include <acpi/acnamesp.h> | |
50 | #include <acpi/acdebug.h> | |
51 | ||
52 | #define _COMPONENT ACPI_DISPATCHER | |
4be44fcd | 53 | ACPI_MODULE_NAME("dsutils") |
1da177e4 LT |
54 | |
55 | /******************************************************************************* | |
56 | * | |
57 | * FUNCTION: acpi_ds_clear_implicit_return | |
58 | * | |
59 | * PARAMETERS: walk_state - Current State | |
60 | * | |
61 | * RETURN: None. | |
62 | * | |
63 | * DESCRIPTION: Clear and remove a reference on an implicit return value. Used | |
64 | * to delete "stale" return values (if enabled, the return value | |
65 | * from every operator is saved at least momentarily, in case the | |
66 | * parent method exits.) | |
67 | * | |
68 | ******************************************************************************/ | |
4be44fcd | 69 | void acpi_ds_clear_implicit_return(struct acpi_walk_state *walk_state) |
1da177e4 | 70 | { |
4be44fcd | 71 | ACPI_FUNCTION_NAME("ds_clear_implicit_return"); |
1da177e4 LT |
72 | |
73 | /* | |
74 | * Slack must be enabled for this feature | |
75 | */ | |
76 | if (!acpi_gbl_enable_interpreter_slack) { | |
77 | return; | |
78 | } | |
79 | ||
80 | if (walk_state->implicit_return_obj) { | |
81 | /* | |
82 | * Delete any "stale" implicit return. However, in | |
83 | * complex statements, the implicit return value can be | |
84 | * bubbled up several levels. | |
85 | */ | |
4be44fcd LB |
86 | ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH, |
87 | "Removing reference on stale implicit return obj %p\n", | |
88 | walk_state->implicit_return_obj)); | |
1da177e4 | 89 | |
4be44fcd | 90 | acpi_ut_remove_reference(walk_state->implicit_return_obj); |
1da177e4 LT |
91 | walk_state->implicit_return_obj = NULL; |
92 | } | |
93 | } | |
94 | ||
1da177e4 | 95 | #ifndef ACPI_NO_METHOD_EXECUTION |
1da177e4 LT |
96 | /******************************************************************************* |
97 | * | |
98 | * FUNCTION: acpi_ds_do_implicit_return | |
99 | * | |
100 | * PARAMETERS: return_desc - The return value | |
101 | * walk_state - Current State | |
102 | * add_reference - True if a reference should be added to the | |
103 | * return object | |
104 | * | |
105 | * RETURN: TRUE if implicit return enabled, FALSE otherwise | |
106 | * | |
107 | * DESCRIPTION: Implements the optional "implicit return". We save the result | |
108 | * of every ASL operator and control method invocation in case the | |
109 | * parent method exit. Before storing a new return value, we | |
110 | * delete the previous return value. | |
111 | * | |
112 | ******************************************************************************/ | |
113 | ||
114 | u8 | |
4be44fcd LB |
115 | acpi_ds_do_implicit_return(union acpi_operand_object *return_desc, |
116 | struct acpi_walk_state *walk_state, u8 add_reference) | |
1da177e4 | 117 | { |
4be44fcd | 118 | ACPI_FUNCTION_NAME("ds_do_implicit_return"); |
1da177e4 LT |
119 | |
120 | /* | |
121 | * Slack must be enabled for this feature, and we must | |
122 | * have a valid return object | |
123 | */ | |
4be44fcd | 124 | if ((!acpi_gbl_enable_interpreter_slack) || (!return_desc)) { |
1da177e4 LT |
125 | return (FALSE); |
126 | } | |
127 | ||
4be44fcd LB |
128 | ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH, |
129 | "Result %p will be implicitly returned; Prev=%p\n", | |
130 | return_desc, walk_state->implicit_return_obj)); | |
1da177e4 LT |
131 | |
132 | /* | |
133 | * Delete any "stale" implicit return value first. However, in | |
134 | * complex statements, the implicit return value can be | |
135 | * bubbled up several levels, so we don't clear the value if it | |
136 | * is the same as the return_desc. | |
137 | */ | |
138 | if (walk_state->implicit_return_obj) { | |
139 | if (walk_state->implicit_return_obj == return_desc) { | |
140 | return (TRUE); | |
141 | } | |
4be44fcd | 142 | acpi_ds_clear_implicit_return(walk_state); |
1da177e4 LT |
143 | } |
144 | ||
145 | /* Save the implicit return value, add a reference if requested */ | |
146 | ||
147 | walk_state->implicit_return_obj = return_desc; | |
148 | if (add_reference) { | |
4be44fcd | 149 | acpi_ut_add_reference(return_desc); |
1da177e4 LT |
150 | } |
151 | ||
152 | return (TRUE); | |
153 | } | |
154 | ||
1da177e4 LT |
155 | /******************************************************************************* |
156 | * | |
157 | * FUNCTION: acpi_ds_is_result_used | |
158 | * | |
159 | * PARAMETERS: Op - Current Op | |
160 | * walk_state - Current State | |
161 | * | |
162 | * RETURN: TRUE if result is used, FALSE otherwise | |
163 | * | |
164 | * DESCRIPTION: Check if a result object will be used by the parent | |
165 | * | |
166 | ******************************************************************************/ | |
167 | ||
168 | u8 | |
4be44fcd LB |
169 | acpi_ds_is_result_used(union acpi_parse_object * op, |
170 | struct acpi_walk_state * walk_state) | |
1da177e4 | 171 | { |
4be44fcd | 172 | const struct acpi_opcode_info *parent_info; |
1da177e4 | 173 | |
4be44fcd | 174 | ACPI_FUNCTION_TRACE_PTR("ds_is_result_used", op); |
1da177e4 LT |
175 | |
176 | /* Must have both an Op and a Result Object */ | |
177 | ||
178 | if (!op) { | |
b8e4d893 | 179 | ACPI_ERROR((AE_INFO, "Null Op")); |
50eca3eb | 180 | return_UINT8(TRUE); |
1da177e4 LT |
181 | } |
182 | ||
183 | /* | |
184 | * We know that this operator is not a | |
185 | * Return() operator (would not come here.) The following code is the | |
186 | * optional support for a so-called "implicit return". Some AML code | |
187 | * assumes that the last value of the method is "implicitly" returned | |
188 | * to the caller. Just save the last result as the return value. | |
189 | * NOTE: this is optional because the ASL language does not actually | |
190 | * support this behavior. | |
191 | */ | |
4be44fcd LB |
192 | (void)acpi_ds_do_implicit_return(walk_state->result_obj, walk_state, |
193 | TRUE); | |
1da177e4 LT |
194 | |
195 | /* | |
196 | * Now determine if the parent will use the result | |
197 | * | |
198 | * If there is no parent, or the parent is a scope_op, we are executing | |
199 | * at the method level. An executing method typically has no parent, | |
200 | * since each method is parsed separately. A method invoked externally | |
201 | * via execute_control_method has a scope_op as the parent. | |
202 | */ | |
203 | if ((!op->common.parent) || | |
4be44fcd | 204 | (op->common.parent->common.aml_opcode == AML_SCOPE_OP)) { |
1da177e4 LT |
205 | /* No parent, the return value cannot possibly be used */ |
206 | ||
4be44fcd LB |
207 | ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH, |
208 | "At Method level, result of [%s] not used\n", | |
209 | acpi_ps_get_opcode_name(op->common. | |
210 | aml_opcode))); | |
50eca3eb | 211 | return_UINT8(FALSE); |
1da177e4 LT |
212 | } |
213 | ||
214 | /* Get info on the parent. The root_op is AML_SCOPE */ | |
215 | ||
4be44fcd LB |
216 | parent_info = |
217 | acpi_ps_get_opcode_info(op->common.parent->common.aml_opcode); | |
1da177e4 | 218 | if (parent_info->class == AML_CLASS_UNKNOWN) { |
b8e4d893 | 219 | ACPI_ERROR((AE_INFO, "Unknown parent opcode Op=%p", op)); |
50eca3eb | 220 | return_UINT8(FALSE); |
1da177e4 LT |
221 | } |
222 | ||
223 | /* | |
224 | * Decide what to do with the result based on the parent. If | |
225 | * the parent opcode will not use the result, delete the object. | |
226 | * Otherwise leave it as is, it will be deleted when it is used | |
227 | * as an operand later. | |
228 | */ | |
229 | switch (parent_info->class) { | |
230 | case AML_CLASS_CONTROL: | |
231 | ||
232 | switch (op->common.parent->common.aml_opcode) { | |
233 | case AML_RETURN_OP: | |
234 | ||
235 | /* Never delete the return value associated with a return opcode */ | |
236 | ||
237 | goto result_used; | |
238 | ||
239 | case AML_IF_OP: | |
240 | case AML_WHILE_OP: | |
241 | ||
242 | /* | |
243 | * If we are executing the predicate AND this is the predicate op, | |
244 | * we will use the return value | |
245 | */ | |
4be44fcd LB |
246 | if ((walk_state->control_state->common.state == |
247 | ACPI_CONTROL_PREDICATE_EXECUTING) | |
248 | && (walk_state->control_state->control. | |
249 | predicate_op == op)) { | |
1da177e4 LT |
250 | goto result_used; |
251 | } | |
252 | break; | |
253 | ||
254 | default: | |
255 | /* Ignore other control opcodes */ | |
256 | break; | |
257 | } | |
258 | ||
259 | /* The general control opcode returns no result */ | |
260 | ||
261 | goto result_not_used; | |
262 | ||
1da177e4 LT |
263 | case AML_CLASS_CREATE: |
264 | ||
265 | /* | |
266 | * These opcodes allow term_arg(s) as operands and therefore | |
267 | * the operands can be method calls. The result is used. | |
268 | */ | |
269 | goto result_used; | |
270 | ||
1da177e4 LT |
271 | case AML_CLASS_NAMED_OBJECT: |
272 | ||
4be44fcd LB |
273 | if ((op->common.parent->common.aml_opcode == AML_REGION_OP) || |
274 | (op->common.parent->common.aml_opcode == AML_DATA_REGION_OP) | |
275 | || (op->common.parent->common.aml_opcode == AML_PACKAGE_OP) | |
276 | || (op->common.parent->common.aml_opcode == | |
277 | AML_VAR_PACKAGE_OP) | |
278 | || (op->common.parent->common.aml_opcode == AML_BUFFER_OP) | |
279 | || (op->common.parent->common.aml_opcode == | |
280 | AML_INT_EVAL_SUBTREE_OP)) { | |
1da177e4 LT |
281 | /* |
282 | * These opcodes allow term_arg(s) as operands and therefore | |
283 | * the operands can be method calls. The result is used. | |
284 | */ | |
285 | goto result_used; | |
286 | } | |
287 | ||
288 | goto result_not_used; | |
289 | ||
1da177e4 LT |
290 | default: |
291 | ||
292 | /* | |
293 | * In all other cases. the parent will actually use the return | |
294 | * object, so keep it. | |
295 | */ | |
296 | goto result_used; | |
297 | } | |
298 | ||
4be44fcd LB |
299 | result_used: |
300 | ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH, | |
301 | "Result of [%s] used by Parent [%s] Op=%p\n", | |
302 | acpi_ps_get_opcode_name(op->common.aml_opcode), | |
303 | acpi_ps_get_opcode_name(op->common.parent->common. | |
304 | aml_opcode), op)); | |
1da177e4 | 305 | |
50eca3eb | 306 | return_UINT8(TRUE); |
1da177e4 | 307 | |
4be44fcd LB |
308 | result_not_used: |
309 | ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH, | |
310 | "Result of [%s] not used by Parent [%s] Op=%p\n", | |
311 | acpi_ps_get_opcode_name(op->common.aml_opcode), | |
312 | acpi_ps_get_opcode_name(op->common.parent->common. | |
313 | aml_opcode), op)); | |
1da177e4 | 314 | |
50eca3eb | 315 | return_UINT8(FALSE); |
1da177e4 LT |
316 | } |
317 | ||
1da177e4 LT |
318 | /******************************************************************************* |
319 | * | |
320 | * FUNCTION: acpi_ds_delete_result_if_not_used | |
321 | * | |
322 | * PARAMETERS: Op - Current parse Op | |
323 | * result_obj - Result of the operation | |
324 | * walk_state - Current state | |
325 | * | |
326 | * RETURN: Status | |
327 | * | |
328 | * DESCRIPTION: Used after interpretation of an opcode. If there is an internal | |
329 | * result descriptor, check if the parent opcode will actually use | |
330 | * this result. If not, delete the result now so that it will | |
331 | * not become orphaned. | |
332 | * | |
333 | ******************************************************************************/ | |
334 | ||
335 | void | |
4be44fcd LB |
336 | acpi_ds_delete_result_if_not_used(union acpi_parse_object *op, |
337 | union acpi_operand_object *result_obj, | |
338 | struct acpi_walk_state *walk_state) | |
1da177e4 | 339 | { |
4be44fcd LB |
340 | union acpi_operand_object *obj_desc; |
341 | acpi_status status; | |
1da177e4 | 342 | |
4be44fcd | 343 | ACPI_FUNCTION_TRACE_PTR("ds_delete_result_if_not_used", result_obj); |
1da177e4 LT |
344 | |
345 | if (!op) { | |
b8e4d893 | 346 | ACPI_ERROR((AE_INFO, "Null Op")); |
1da177e4 LT |
347 | return_VOID; |
348 | } | |
349 | ||
350 | if (!result_obj) { | |
351 | return_VOID; | |
352 | } | |
353 | ||
4be44fcd | 354 | if (!acpi_ds_is_result_used(op, walk_state)) { |
1da177e4 LT |
355 | /* Must pop the result stack (obj_desc should be equal to result_obj) */ |
356 | ||
4be44fcd LB |
357 | status = acpi_ds_result_pop(&obj_desc, walk_state); |
358 | if (ACPI_SUCCESS(status)) { | |
359 | acpi_ut_remove_reference(result_obj); | |
1da177e4 LT |
360 | } |
361 | } | |
362 | ||
363 | return_VOID; | |
364 | } | |
365 | ||
1da177e4 LT |
366 | /******************************************************************************* |
367 | * | |
368 | * FUNCTION: acpi_ds_resolve_operands | |
369 | * | |
370 | * PARAMETERS: walk_state - Current walk state with operands on stack | |
371 | * | |
372 | * RETURN: Status | |
373 | * | |
374 | * DESCRIPTION: Resolve all operands to their values. Used to prepare | |
375 | * arguments to a control method invocation (a call from one | |
376 | * method to another.) | |
377 | * | |
378 | ******************************************************************************/ | |
379 | ||
4be44fcd | 380 | acpi_status acpi_ds_resolve_operands(struct acpi_walk_state *walk_state) |
1da177e4 | 381 | { |
4be44fcd LB |
382 | u32 i; |
383 | acpi_status status = AE_OK; | |
1da177e4 | 384 | |
4be44fcd | 385 | ACPI_FUNCTION_TRACE_PTR("ds_resolve_operands", walk_state); |
1da177e4 LT |
386 | |
387 | /* | |
388 | * Attempt to resolve each of the valid operands | |
389 | * Method arguments are passed by reference, not by value. This means | |
390 | * that the actual objects are passed, not copies of the objects. | |
391 | */ | |
392 | for (i = 0; i < walk_state->num_operands; i++) { | |
4be44fcd LB |
393 | status = |
394 | acpi_ex_resolve_to_value(&walk_state->operands[i], | |
395 | walk_state); | |
396 | if (ACPI_FAILURE(status)) { | |
1da177e4 LT |
397 | break; |
398 | } | |
399 | } | |
400 | ||
4be44fcd | 401 | return_ACPI_STATUS(status); |
1da177e4 LT |
402 | } |
403 | ||
1da177e4 LT |
404 | /******************************************************************************* |
405 | * | |
406 | * FUNCTION: acpi_ds_clear_operands | |
407 | * | |
408 | * PARAMETERS: walk_state - Current walk state with operands on stack | |
409 | * | |
410 | * RETURN: None | |
411 | * | |
412 | * DESCRIPTION: Clear all operands on the current walk state operand stack. | |
413 | * | |
414 | ******************************************************************************/ | |
415 | ||
4be44fcd | 416 | void acpi_ds_clear_operands(struct acpi_walk_state *walk_state) |
1da177e4 | 417 | { |
4be44fcd | 418 | u32 i; |
1da177e4 | 419 | |
4be44fcd | 420 | ACPI_FUNCTION_TRACE_PTR("ds_clear_operands", walk_state); |
1da177e4 LT |
421 | |
422 | /* Remove a reference on each operand on the stack */ | |
423 | ||
424 | for (i = 0; i < walk_state->num_operands; i++) { | |
425 | /* | |
426 | * Remove a reference to all operands, including both | |
427 | * "Arguments" and "Targets". | |
428 | */ | |
4be44fcd | 429 | acpi_ut_remove_reference(walk_state->operands[i]); |
1da177e4 LT |
430 | walk_state->operands[i] = NULL; |
431 | } | |
432 | ||
433 | walk_state->num_operands = 0; | |
434 | return_VOID; | |
435 | } | |
436 | #endif | |
437 | ||
1da177e4 LT |
438 | /******************************************************************************* |
439 | * | |
440 | * FUNCTION: acpi_ds_create_operand | |
441 | * | |
442 | * PARAMETERS: walk_state - Current walk state | |
443 | * Arg - Parse object for the argument | |
444 | * arg_index - Which argument (zero based) | |
445 | * | |
446 | * RETURN: Status | |
447 | * | |
448 | * DESCRIPTION: Translate a parse tree object that is an argument to an AML | |
449 | * opcode to the equivalent interpreter object. This may include | |
450 | * looking up a name or entering a new name into the internal | |
451 | * namespace. | |
452 | * | |
453 | ******************************************************************************/ | |
454 | ||
455 | acpi_status | |
4be44fcd LB |
456 | acpi_ds_create_operand(struct acpi_walk_state *walk_state, |
457 | union acpi_parse_object *arg, u32 arg_index) | |
1da177e4 | 458 | { |
4be44fcd LB |
459 | acpi_status status = AE_OK; |
460 | char *name_string; | |
461 | u32 name_length; | |
462 | union acpi_operand_object *obj_desc; | |
463 | union acpi_parse_object *parent_op; | |
464 | u16 opcode; | |
465 | acpi_interpreter_mode interpreter_mode; | |
466 | const struct acpi_opcode_info *op_info; | |
1da177e4 | 467 | |
4be44fcd | 468 | ACPI_FUNCTION_TRACE_PTR("ds_create_operand", arg); |
1da177e4 LT |
469 | |
470 | /* A valid name must be looked up in the namespace */ | |
471 | ||
472 | if ((arg->common.aml_opcode == AML_INT_NAMEPATH_OP) && | |
4be44fcd LB |
473 | (arg->common.value.string)) { |
474 | ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH, "Getting a name: Arg=%p\n", | |
475 | arg)); | |
1da177e4 LT |
476 | |
477 | /* Get the entire name string from the AML stream */ | |
478 | ||
4be44fcd LB |
479 | status = |
480 | acpi_ex_get_name_string(ACPI_TYPE_ANY, | |
481 | arg->common.value.buffer, | |
482 | &name_string, &name_length); | |
1da177e4 | 483 | |
4be44fcd LB |
484 | if (ACPI_FAILURE(status)) { |
485 | return_ACPI_STATUS(status); | |
1da177e4 LT |
486 | } |
487 | ||
488 | /* All prefixes have been handled, and the name is in name_string */ | |
489 | ||
490 | /* | |
491 | * Special handling for buffer_field declarations. This is a deferred | |
492 | * opcode that unfortunately defines the field name as the last | |
493 | * parameter instead of the first. We get here when we are performing | |
494 | * the deferred execution, so the actual name of the field is already | |
495 | * in the namespace. We don't want to attempt to look it up again | |
496 | * because we may be executing in a different scope than where the | |
497 | * actual opcode exists. | |
498 | */ | |
499 | if ((walk_state->deferred_node) && | |
4be44fcd LB |
500 | (walk_state->deferred_node->type == ACPI_TYPE_BUFFER_FIELD) |
501 | && (arg_index != 0)) { | |
502 | obj_desc = | |
503 | ACPI_CAST_PTR(union acpi_operand_object, | |
504 | walk_state->deferred_node); | |
1da177e4 | 505 | status = AE_OK; |
4be44fcd LB |
506 | } else { /* All other opcodes */ |
507 | ||
1da177e4 LT |
508 | /* |
509 | * Differentiate between a namespace "create" operation | |
510 | * versus a "lookup" operation (IMODE_LOAD_PASS2 vs. | |
511 | * IMODE_EXECUTE) in order to support the creation of | |
512 | * namespace objects during the execution of control methods. | |
513 | */ | |
514 | parent_op = arg->common.parent; | |
4be44fcd LB |
515 | op_info = |
516 | acpi_ps_get_opcode_info(parent_op->common. | |
517 | aml_opcode); | |
518 | if ((op_info->flags & AML_NSNODE) | |
519 | && (parent_op->common.aml_opcode != | |
520 | AML_INT_METHODCALL_OP) | |
521 | && (parent_op->common.aml_opcode != AML_REGION_OP) | |
522 | && (parent_op->common.aml_opcode != | |
523 | AML_INT_NAMEPATH_OP)) { | |
1da177e4 LT |
524 | /* Enter name into namespace if not found */ |
525 | ||
526 | interpreter_mode = ACPI_IMODE_LOAD_PASS2; | |
4be44fcd | 527 | } else { |
1da177e4 LT |
528 | /* Return a failure if name not found */ |
529 | ||
530 | interpreter_mode = ACPI_IMODE_EXECUTE; | |
531 | } | |
532 | ||
4be44fcd LB |
533 | status = |
534 | acpi_ns_lookup(walk_state->scope_info, name_string, | |
535 | ACPI_TYPE_ANY, interpreter_mode, | |
536 | ACPI_NS_SEARCH_PARENT | | |
537 | ACPI_NS_DONT_OPEN_SCOPE, walk_state, | |
538 | ACPI_CAST_INDIRECT_PTR(struct | |
539 | acpi_namespace_node, | |
540 | &obj_desc)); | |
1da177e4 LT |
541 | /* |
542 | * The only case where we pass through (ignore) a NOT_FOUND | |
543 | * error is for the cond_ref_of opcode. | |
544 | */ | |
545 | if (status == AE_NOT_FOUND) { | |
4be44fcd LB |
546 | if (parent_op->common.aml_opcode == |
547 | AML_COND_REF_OF_OP) { | |
1da177e4 LT |
548 | /* |
549 | * For the Conditional Reference op, it's OK if | |
550 | * the name is not found; We just need a way to | |
551 | * indicate this to the interpreter, set the | |
552 | * object to the root | |
553 | */ | |
4be44fcd LB |
554 | obj_desc = |
555 | ACPI_CAST_PTR(union | |
556 | acpi_operand_object, | |
557 | acpi_gbl_root_node); | |
1da177e4 | 558 | status = AE_OK; |
4be44fcd | 559 | } else { |
1da177e4 LT |
560 | /* |
561 | * We just plain didn't find it -- which is a | |
562 | * very serious error at this point | |
563 | */ | |
564 | status = AE_AML_NAME_NOT_FOUND; | |
565 | } | |
566 | } | |
567 | ||
4be44fcd | 568 | if (ACPI_FAILURE(status)) { |
b8e4d893 | 569 | ACPI_ERROR_NAMESPACE(name_string, status); |
1da177e4 LT |
570 | } |
571 | } | |
572 | ||
573 | /* Free the namestring created above */ | |
574 | ||
4be44fcd | 575 | ACPI_MEM_FREE(name_string); |
1da177e4 LT |
576 | |
577 | /* Check status from the lookup */ | |
578 | ||
4be44fcd LB |
579 | if (ACPI_FAILURE(status)) { |
580 | return_ACPI_STATUS(status); | |
1da177e4 LT |
581 | } |
582 | ||
583 | /* Put the resulting object onto the current object stack */ | |
584 | ||
4be44fcd LB |
585 | status = acpi_ds_obj_stack_push(obj_desc, walk_state); |
586 | if (ACPI_FAILURE(status)) { | |
587 | return_ACPI_STATUS(status); | |
1da177e4 | 588 | } |
4be44fcd LB |
589 | ACPI_DEBUGGER_EXEC(acpi_db_display_argument_object |
590 | (obj_desc, walk_state)); | |
591 | } else { | |
1da177e4 LT |
592 | /* Check for null name case */ |
593 | ||
594 | if (arg->common.aml_opcode == AML_INT_NAMEPATH_OP) { | |
595 | /* | |
596 | * If the name is null, this means that this is an | |
597 | * optional result parameter that was not specified | |
598 | * in the original ASL. Create a Zero Constant for a | |
599 | * placeholder. (Store to a constant is a Noop.) | |
600 | */ | |
4be44fcd | 601 | opcode = AML_ZERO_OP; /* Has no arguments! */ |
1da177e4 | 602 | |
4be44fcd LB |
603 | ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH, |
604 | "Null namepath: Arg=%p\n", arg)); | |
605 | } else { | |
1da177e4 LT |
606 | opcode = arg->common.aml_opcode; |
607 | } | |
608 | ||
609 | /* Get the object type of the argument */ | |
610 | ||
4be44fcd | 611 | op_info = acpi_ps_get_opcode_info(opcode); |
1da177e4 | 612 | if (op_info->object_type == ACPI_TYPE_INVALID) { |
4be44fcd | 613 | return_ACPI_STATUS(AE_NOT_IMPLEMENTED); |
1da177e4 LT |
614 | } |
615 | ||
616 | if (op_info->flags & AML_HAS_RETVAL) { | |
4be44fcd | 617 | ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH, |
50eca3eb | 618 | "Argument previously created, already stacked\n")); |
1da177e4 | 619 | |
4be44fcd LB |
620 | ACPI_DEBUGGER_EXEC(acpi_db_display_argument_object |
621 | (walk_state-> | |
622 | operands[walk_state->num_operands - | |
623 | 1], walk_state)); | |
1da177e4 LT |
624 | |
625 | /* | |
626 | * Use value that was already previously returned | |
627 | * by the evaluation of this argument | |
628 | */ | |
4be44fcd LB |
629 | status = |
630 | acpi_ds_result_pop_from_bottom(&obj_desc, | |
631 | walk_state); | |
632 | if (ACPI_FAILURE(status)) { | |
1da177e4 LT |
633 | /* |
634 | * Only error is underflow, and this indicates | |
635 | * a missing or null operand! | |
636 | */ | |
b8e4d893 BM |
637 | ACPI_EXCEPTION((AE_INFO, status, |
638 | "Missing or null operand")); | |
4be44fcd | 639 | return_ACPI_STATUS(status); |
1da177e4 | 640 | } |
4be44fcd | 641 | } else { |
1da177e4 LT |
642 | /* Create an ACPI_INTERNAL_OBJECT for the argument */ |
643 | ||
4be44fcd LB |
644 | obj_desc = |
645 | acpi_ut_create_internal_object(op_info-> | |
646 | object_type); | |
1da177e4 | 647 | if (!obj_desc) { |
4be44fcd | 648 | return_ACPI_STATUS(AE_NO_MEMORY); |
1da177e4 LT |
649 | } |
650 | ||
651 | /* Initialize the new object */ | |
652 | ||
4be44fcd LB |
653 | status = |
654 | acpi_ds_init_object_from_op(walk_state, arg, opcode, | |
655 | &obj_desc); | |
656 | if (ACPI_FAILURE(status)) { | |
657 | acpi_ut_delete_object_desc(obj_desc); | |
658 | return_ACPI_STATUS(status); | |
1da177e4 LT |
659 | } |
660 | } | |
661 | ||
662 | /* Put the operand object on the object stack */ | |
663 | ||
4be44fcd LB |
664 | status = acpi_ds_obj_stack_push(obj_desc, walk_state); |
665 | if (ACPI_FAILURE(status)) { | |
666 | return_ACPI_STATUS(status); | |
1da177e4 LT |
667 | } |
668 | ||
4be44fcd LB |
669 | ACPI_DEBUGGER_EXEC(acpi_db_display_argument_object |
670 | (obj_desc, walk_state)); | |
1da177e4 LT |
671 | } |
672 | ||
4be44fcd | 673 | return_ACPI_STATUS(AE_OK); |
1da177e4 LT |
674 | } |
675 | ||
1da177e4 LT |
676 | /******************************************************************************* |
677 | * | |
678 | * FUNCTION: acpi_ds_create_operands | |
679 | * | |
680 | * PARAMETERS: walk_state - Current state | |
681 | * first_arg - First argument of a parser argument tree | |
682 | * | |
683 | * RETURN: Status | |
684 | * | |
685 | * DESCRIPTION: Convert an operator's arguments from a parse tree format to | |
686 | * namespace objects and place those argument object on the object | |
687 | * stack in preparation for evaluation by the interpreter. | |
688 | * | |
689 | ******************************************************************************/ | |
690 | ||
691 | acpi_status | |
4be44fcd LB |
692 | acpi_ds_create_operands(struct acpi_walk_state *walk_state, |
693 | union acpi_parse_object *first_arg) | |
1da177e4 | 694 | { |
4be44fcd LB |
695 | acpi_status status = AE_OK; |
696 | union acpi_parse_object *arg; | |
697 | u32 arg_count = 0; | |
1da177e4 | 698 | |
4be44fcd | 699 | ACPI_FUNCTION_TRACE_PTR("ds_create_operands", first_arg); |
1da177e4 LT |
700 | |
701 | /* For all arguments in the list... */ | |
702 | ||
703 | arg = first_arg; | |
704 | while (arg) { | |
4be44fcd LB |
705 | status = acpi_ds_create_operand(walk_state, arg, arg_count); |
706 | if (ACPI_FAILURE(status)) { | |
1da177e4 LT |
707 | goto cleanup; |
708 | } | |
709 | ||
4be44fcd LB |
710 | ACPI_DEBUG_PRINT((ACPI_DB_DISPATCH, |
711 | "Arg #%d (%p) done, Arg1=%p\n", arg_count, | |
712 | arg, first_arg)); | |
1da177e4 LT |
713 | |
714 | /* Move on to next argument, if any */ | |
715 | ||
716 | arg = arg->common.next; | |
717 | arg_count++; | |
718 | } | |
719 | ||
4be44fcd | 720 | return_ACPI_STATUS(status); |
1da177e4 | 721 | |
4be44fcd | 722 | cleanup: |
1da177e4 LT |
723 | /* |
724 | * We must undo everything done above; meaning that we must | |
725 | * pop everything off of the operand stack and delete those | |
726 | * objects | |
727 | */ | |
4be44fcd | 728 | (void)acpi_ds_obj_stack_pop_and_delete(arg_count, walk_state); |
1da177e4 | 729 | |
b8e4d893 BM |
730 | ACPI_EXCEPTION((AE_INFO, status, "While creating Arg %d", |
731 | (arg_count + 1))); | |
4be44fcd | 732 | return_ACPI_STATUS(status); |
1da177e4 | 733 | } |