dsutils.c revision 1.19 1 1.1 jruoho /*******************************************************************************
2 1.1 jruoho *
3 1.1 jruoho * Module Name: dsutils - Dispatcher utilities
4 1.1 jruoho *
5 1.1 jruoho ******************************************************************************/
6 1.1 jruoho
7 1.18 christos /******************************************************************************
8 1.18 christos *
9 1.18 christos * 1. Copyright Notice
10 1.18 christos *
11 1.19 christos * Some or all of this work - Copyright (c) 1999 - 2025, Intel Corp.
12 1.1 jruoho * All rights reserved.
13 1.1 jruoho *
14 1.18 christos * 2. License
15 1.18 christos *
16 1.18 christos * 2.1. This is your license from Intel Corp. under its intellectual property
17 1.18 christos * rights. You may have additional license terms from the party that provided
18 1.18 christos * you this software, covering your right to use that party's intellectual
19 1.18 christos * property rights.
20 1.18 christos *
21 1.18 christos * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
22 1.18 christos * copy of the source code appearing in this file ("Covered Code") an
23 1.18 christos * irrevocable, perpetual, worldwide license under Intel's copyrights in the
24 1.18 christos * base code distributed originally by Intel ("Original Intel Code") to copy,
25 1.18 christos * make derivatives, distribute, use and display any portion of the Covered
26 1.18 christos * Code in any form, with the right to sublicense such rights; and
27 1.18 christos *
28 1.18 christos * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
29 1.18 christos * license (with the right to sublicense), under only those claims of Intel
30 1.18 christos * patents that are infringed by the Original Intel Code, to make, use, sell,
31 1.18 christos * offer to sell, and import the Covered Code and derivative works thereof
32 1.18 christos * solely to the minimum extent necessary to exercise the above copyright
33 1.18 christos * license, and in no event shall the patent license extend to any additions
34 1.18 christos * to or modifications of the Original Intel Code. No other license or right
35 1.18 christos * is granted directly or by implication, estoppel or otherwise;
36 1.18 christos *
37 1.18 christos * The above copyright and patent license is granted only if the following
38 1.18 christos * conditions are met:
39 1.18 christos *
40 1.18 christos * 3. Conditions
41 1.18 christos *
42 1.18 christos * 3.1. Redistribution of Source with Rights to Further Distribute Source.
43 1.18 christos * Redistribution of source code of any substantial portion of the Covered
44 1.18 christos * Code or modification with rights to further distribute source must include
45 1.18 christos * the above Copyright Notice, the above License, this list of Conditions,
46 1.18 christos * and the following Disclaimer and Export Compliance provision. In addition,
47 1.18 christos * Licensee must cause all Covered Code to which Licensee contributes to
48 1.18 christos * contain a file documenting the changes Licensee made to create that Covered
49 1.18 christos * Code and the date of any change. Licensee must include in that file the
50 1.18 christos * documentation of any changes made by any predecessor Licensee. Licensee
51 1.18 christos * must include a prominent statement that the modification is derived,
52 1.18 christos * directly or indirectly, from Original Intel Code.
53 1.18 christos *
54 1.18 christos * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
55 1.18 christos * Redistribution of source code of any substantial portion of the Covered
56 1.18 christos * Code or modification without rights to further distribute source must
57 1.18 christos * include the following Disclaimer and Export Compliance provision in the
58 1.18 christos * documentation and/or other materials provided with distribution. In
59 1.18 christos * addition, Licensee may not authorize further sublicense of source of any
60 1.18 christos * portion of the Covered Code, and must include terms to the effect that the
61 1.18 christos * license from Licensee to its licensee is limited to the intellectual
62 1.18 christos * property embodied in the software Licensee provides to its licensee, and
63 1.18 christos * not to intellectual property embodied in modifications its licensee may
64 1.18 christos * make.
65 1.18 christos *
66 1.18 christos * 3.3. Redistribution of Executable. Redistribution in executable form of any
67 1.18 christos * substantial portion of the Covered Code or modification must reproduce the
68 1.18 christos * above Copyright Notice, and the following Disclaimer and Export Compliance
69 1.18 christos * provision in the documentation and/or other materials provided with the
70 1.18 christos * distribution.
71 1.18 christos *
72 1.18 christos * 3.4. Intel retains all right, title, and interest in and to the Original
73 1.18 christos * Intel Code.
74 1.18 christos *
75 1.18 christos * 3.5. Neither the name Intel nor any other trademark owned or controlled by
76 1.18 christos * Intel shall be used in advertising or otherwise to promote the sale, use or
77 1.18 christos * other dealings in products derived from or relating to the Covered Code
78 1.18 christos * without prior written authorization from Intel.
79 1.18 christos *
80 1.18 christos * 4. Disclaimer and Export Compliance
81 1.18 christos *
82 1.18 christos * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
83 1.18 christos * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
84 1.18 christos * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
85 1.18 christos * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
86 1.18 christos * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
87 1.18 christos * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
88 1.18 christos * PARTICULAR PURPOSE.
89 1.18 christos *
90 1.18 christos * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
91 1.18 christos * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
92 1.18 christos * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
93 1.18 christos * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
94 1.18 christos * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
95 1.18 christos * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
96 1.18 christos * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
97 1.18 christos * LIMITED REMEDY.
98 1.18 christos *
99 1.18 christos * 4.3. Licensee shall not export, either directly or indirectly, any of this
100 1.18 christos * software or system incorporating such software without first obtaining any
101 1.18 christos * required license or other approval from the U. S. Department of Commerce or
102 1.18 christos * any other agency or department of the United States Government. In the
103 1.18 christos * event Licensee exports any such software from the United States or
104 1.18 christos * re-exports any such software from a foreign destination, Licensee shall
105 1.18 christos * ensure that the distribution and export/re-export of the software is in
106 1.18 christos * compliance with all laws, regulations, orders, or other restrictions of the
107 1.18 christos * U.S. Export Administration Regulations. Licensee agrees that neither it nor
108 1.18 christos * any of its subsidiaries will export/re-export any technical data, process,
109 1.18 christos * software, or service, directly or indirectly, to any country for which the
110 1.18 christos * United States government or any agency thereof requires an export license,
111 1.18 christos * other governmental approval, or letter of assurance, without first obtaining
112 1.18 christos * such license, approval or letter.
113 1.18 christos *
114 1.18 christos *****************************************************************************
115 1.18 christos *
116 1.18 christos * Alternatively, you may choose to be licensed under the terms of the
117 1.18 christos * following license:
118 1.18 christos *
119 1.2 christos * Redistribution and use in source and binary forms, with or without
120 1.2 christos * modification, are permitted provided that the following conditions
121 1.2 christos * are met:
122 1.2 christos * 1. Redistributions of source code must retain the above copyright
123 1.2 christos * notice, this list of conditions, and the following disclaimer,
124 1.2 christos * without modification.
125 1.2 christos * 2. Redistributions in binary form must reproduce at minimum a disclaimer
126 1.2 christos * substantially similar to the "NO WARRANTY" disclaimer below
127 1.2 christos * ("Disclaimer") and any redistribution must be conditioned upon
128 1.2 christos * including a substantially similar Disclaimer requirement for further
129 1.2 christos * binary redistribution.
130 1.2 christos * 3. Neither the names of the above-listed copyright holders nor the names
131 1.2 christos * of any contributors may be used to endorse or promote products derived
132 1.2 christos * from this software without specific prior written permission.
133 1.2 christos *
134 1.2 christos * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
135 1.2 christos * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
136 1.15 christos * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
137 1.2 christos * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
138 1.18 christos * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
139 1.18 christos * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
140 1.18 christos * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
141 1.18 christos * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
142 1.18 christos * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
143 1.18 christos * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
144 1.18 christos * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
145 1.18 christos *
146 1.18 christos * Alternatively, you may choose to be licensed under the terms of the
147 1.18 christos * GNU General Public License ("GPL") version 2 as published by the Free
148 1.18 christos * Software Foundation.
149 1.18 christos *
150 1.18 christos *****************************************************************************/
151 1.1 jruoho
152 1.1 jruoho #include "acpi.h"
153 1.1 jruoho #include "accommon.h"
154 1.1 jruoho #include "acparser.h"
155 1.1 jruoho #include "amlcode.h"
156 1.1 jruoho #include "acdispat.h"
157 1.1 jruoho #include "acinterp.h"
158 1.1 jruoho #include "acnamesp.h"
159 1.1 jruoho #include "acdebug.h"
160 1.1 jruoho
161 1.1 jruoho #define _COMPONENT ACPI_DISPATCHER
162 1.1 jruoho ACPI_MODULE_NAME ("dsutils")
163 1.1 jruoho
164 1.1 jruoho
165 1.1 jruoho /*******************************************************************************
166 1.1 jruoho *
167 1.1 jruoho * FUNCTION: AcpiDsClearImplicitReturn
168 1.1 jruoho *
169 1.1 jruoho * PARAMETERS: WalkState - Current State
170 1.1 jruoho *
171 1.1 jruoho * RETURN: None.
172 1.1 jruoho *
173 1.2 christos * DESCRIPTION: Clear and remove a reference on an implicit return value. Used
174 1.1 jruoho * to delete "stale" return values (if enabled, the return value
175 1.1 jruoho * from every operator is saved at least momentarily, in case the
176 1.1 jruoho * parent method exits.)
177 1.1 jruoho *
178 1.1 jruoho ******************************************************************************/
179 1.1 jruoho
180 1.1 jruoho void
181 1.1 jruoho AcpiDsClearImplicitReturn (
182 1.1 jruoho ACPI_WALK_STATE *WalkState)
183 1.1 jruoho {
184 1.1 jruoho ACPI_FUNCTION_NAME (DsClearImplicitReturn);
185 1.1 jruoho
186 1.1 jruoho
187 1.1 jruoho /*
188 1.1 jruoho * Slack must be enabled for this feature
189 1.1 jruoho */
190 1.1 jruoho if (!AcpiGbl_EnableInterpreterSlack)
191 1.1 jruoho {
192 1.1 jruoho return;
193 1.1 jruoho }
194 1.1 jruoho
195 1.1 jruoho if (WalkState->ImplicitReturnObj)
196 1.1 jruoho {
197 1.1 jruoho /*
198 1.1 jruoho * Delete any "stale" implicit return. However, in
199 1.1 jruoho * complex statements, the implicit return value can be
200 1.1 jruoho * bubbled up several levels.
201 1.1 jruoho */
202 1.1 jruoho ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
203 1.1 jruoho "Removing reference on stale implicit return obj %p\n",
204 1.1 jruoho WalkState->ImplicitReturnObj));
205 1.1 jruoho
206 1.1 jruoho AcpiUtRemoveReference (WalkState->ImplicitReturnObj);
207 1.1 jruoho WalkState->ImplicitReturnObj = NULL;
208 1.1 jruoho }
209 1.1 jruoho }
210 1.1 jruoho
211 1.1 jruoho
212 1.1 jruoho /*******************************************************************************
213 1.1 jruoho *
214 1.1 jruoho * FUNCTION: AcpiDsDoImplicitReturn
215 1.1 jruoho *
216 1.1 jruoho * PARAMETERS: ReturnDesc - The return value
217 1.1 jruoho * WalkState - Current State
218 1.1 jruoho * AddReference - True if a reference should be added to the
219 1.1 jruoho * return object
220 1.1 jruoho *
221 1.1 jruoho * RETURN: TRUE if implicit return enabled, FALSE otherwise
222 1.1 jruoho *
223 1.1 jruoho * DESCRIPTION: Implements the optional "implicit return". We save the result
224 1.1 jruoho * of every ASL operator and control method invocation in case the
225 1.2 christos * parent method exit. Before storing a new return value, we
226 1.1 jruoho * delete the previous return value.
227 1.1 jruoho *
228 1.1 jruoho ******************************************************************************/
229 1.1 jruoho
230 1.1 jruoho BOOLEAN
231 1.1 jruoho AcpiDsDoImplicitReturn (
232 1.1 jruoho ACPI_OPERAND_OBJECT *ReturnDesc,
233 1.1 jruoho ACPI_WALK_STATE *WalkState,
234 1.1 jruoho BOOLEAN AddReference)
235 1.1 jruoho {
236 1.1 jruoho ACPI_FUNCTION_NAME (DsDoImplicitReturn);
237 1.1 jruoho
238 1.1 jruoho
239 1.1 jruoho /*
240 1.1 jruoho * Slack must be enabled for this feature, and we must
241 1.1 jruoho * have a valid return object
242 1.1 jruoho */
243 1.1 jruoho if ((!AcpiGbl_EnableInterpreterSlack) ||
244 1.1 jruoho (!ReturnDesc))
245 1.1 jruoho {
246 1.1 jruoho return (FALSE);
247 1.1 jruoho }
248 1.1 jruoho
249 1.1 jruoho ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
250 1.5 christos "Result %p will be implicitly returned; Prev=%p\n",
251 1.5 christos ReturnDesc,
252 1.5 christos WalkState->ImplicitReturnObj));
253 1.1 jruoho
254 1.1 jruoho /*
255 1.1 jruoho * Delete any "stale" implicit return value first. However, in
256 1.1 jruoho * complex statements, the implicit return value can be
257 1.1 jruoho * bubbled up several levels, so we don't clear the value if it
258 1.1 jruoho * is the same as the ReturnDesc.
259 1.1 jruoho */
260 1.1 jruoho if (WalkState->ImplicitReturnObj)
261 1.1 jruoho {
262 1.1 jruoho if (WalkState->ImplicitReturnObj == ReturnDesc)
263 1.1 jruoho {
264 1.1 jruoho return (TRUE);
265 1.1 jruoho }
266 1.1 jruoho AcpiDsClearImplicitReturn (WalkState);
267 1.1 jruoho }
268 1.1 jruoho
269 1.1 jruoho /* Save the implicit return value, add a reference if requested */
270 1.1 jruoho
271 1.1 jruoho WalkState->ImplicitReturnObj = ReturnDesc;
272 1.1 jruoho if (AddReference)
273 1.1 jruoho {
274 1.1 jruoho AcpiUtAddReference (ReturnDesc);
275 1.1 jruoho }
276 1.1 jruoho
277 1.1 jruoho return (TRUE);
278 1.1 jruoho }
279 1.1 jruoho
280 1.1 jruoho
281 1.1 jruoho /*******************************************************************************
282 1.1 jruoho *
283 1.1 jruoho * FUNCTION: AcpiDsIsResultUsed
284 1.1 jruoho *
285 1.1 jruoho * PARAMETERS: Op - Current Op
286 1.1 jruoho * WalkState - Current State
287 1.1 jruoho *
288 1.1 jruoho * RETURN: TRUE if result is used, FALSE otherwise
289 1.1 jruoho *
290 1.1 jruoho * DESCRIPTION: Check if a result object will be used by the parent
291 1.1 jruoho *
292 1.1 jruoho ******************************************************************************/
293 1.1 jruoho
294 1.1 jruoho BOOLEAN
295 1.1 jruoho AcpiDsIsResultUsed (
296 1.1 jruoho ACPI_PARSE_OBJECT *Op,
297 1.1 jruoho ACPI_WALK_STATE *WalkState)
298 1.1 jruoho {
299 1.1 jruoho const ACPI_OPCODE_INFO *ParentInfo;
300 1.1 jruoho
301 1.1 jruoho ACPI_FUNCTION_TRACE_PTR (DsIsResultUsed, Op);
302 1.1 jruoho
303 1.1 jruoho
304 1.1 jruoho /* Must have both an Op and a Result Object */
305 1.1 jruoho
306 1.1 jruoho if (!Op)
307 1.1 jruoho {
308 1.1 jruoho ACPI_ERROR ((AE_INFO, "Null Op"));
309 1.1 jruoho return_UINT8 (TRUE);
310 1.1 jruoho }
311 1.1 jruoho
312 1.1 jruoho /*
313 1.1 jruoho * We know that this operator is not a
314 1.1 jruoho * Return() operator (would not come here.) The following code is the
315 1.1 jruoho * optional support for a so-called "implicit return". Some AML code
316 1.1 jruoho * assumes that the last value of the method is "implicitly" returned
317 1.1 jruoho * to the caller. Just save the last result as the return value.
318 1.1 jruoho * NOTE: this is optional because the ASL language does not actually
319 1.1 jruoho * support this behavior.
320 1.1 jruoho */
321 1.1 jruoho (void) AcpiDsDoImplicitReturn (WalkState->ResultObj, WalkState, TRUE);
322 1.1 jruoho
323 1.1 jruoho /*
324 1.1 jruoho * Now determine if the parent will use the result
325 1.1 jruoho *
326 1.1 jruoho * If there is no parent, or the parent is a ScopeOp, we are executing
327 1.1 jruoho * at the method level. An executing method typically has no parent,
328 1.2 christos * since each method is parsed separately. A method invoked externally
329 1.1 jruoho * via ExecuteControlMethod has a ScopeOp as the parent.
330 1.1 jruoho */
331 1.1 jruoho if ((!Op->Common.Parent) ||
332 1.1 jruoho (Op->Common.Parent->Common.AmlOpcode == AML_SCOPE_OP))
333 1.1 jruoho {
334 1.1 jruoho /* No parent, the return value cannot possibly be used */
335 1.1 jruoho
336 1.1 jruoho ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
337 1.1 jruoho "At Method level, result of [%s] not used\n",
338 1.1 jruoho AcpiPsGetOpcodeName (Op->Common.AmlOpcode)));
339 1.1 jruoho return_UINT8 (FALSE);
340 1.1 jruoho }
341 1.1 jruoho
342 1.1 jruoho /* Get info on the parent. The RootOp is AML_SCOPE */
343 1.1 jruoho
344 1.1 jruoho ParentInfo = AcpiPsGetOpcodeInfo (Op->Common.Parent->Common.AmlOpcode);
345 1.1 jruoho if (ParentInfo->Class == AML_CLASS_UNKNOWN)
346 1.1 jruoho {
347 1.1 jruoho ACPI_ERROR ((AE_INFO,
348 1.1 jruoho "Unknown parent opcode Op=%p", Op));
349 1.1 jruoho return_UINT8 (FALSE);
350 1.1 jruoho }
351 1.1 jruoho
352 1.1 jruoho /*
353 1.2 christos * Decide what to do with the result based on the parent. If
354 1.1 jruoho * the parent opcode will not use the result, delete the object.
355 1.1 jruoho * Otherwise leave it as is, it will be deleted when it is used
356 1.1 jruoho * as an operand later.
357 1.1 jruoho */
358 1.1 jruoho switch (ParentInfo->Class)
359 1.1 jruoho {
360 1.1 jruoho case AML_CLASS_CONTROL:
361 1.1 jruoho
362 1.1 jruoho switch (Op->Common.Parent->Common.AmlOpcode)
363 1.1 jruoho {
364 1.1 jruoho case AML_RETURN_OP:
365 1.1 jruoho
366 1.1 jruoho /* Never delete the return value associated with a return opcode */
367 1.1 jruoho
368 1.1 jruoho goto ResultUsed;
369 1.1 jruoho
370 1.1 jruoho case AML_IF_OP:
371 1.1 jruoho case AML_WHILE_OP:
372 1.1 jruoho /*
373 1.1 jruoho * If we are executing the predicate AND this is the predicate op,
374 1.1 jruoho * we will use the return value
375 1.1 jruoho */
376 1.5 christos if ((WalkState->ControlState->Common.State ==
377 1.5 christos ACPI_CONTROL_PREDICATE_EXECUTING) &&
378 1.1 jruoho (WalkState->ControlState->Control.PredicateOp == Op))
379 1.1 jruoho {
380 1.1 jruoho goto ResultUsed;
381 1.1 jruoho }
382 1.1 jruoho break;
383 1.1 jruoho
384 1.1 jruoho default:
385 1.2 christos
386 1.1 jruoho /* Ignore other control opcodes */
387 1.2 christos
388 1.1 jruoho break;
389 1.1 jruoho }
390 1.1 jruoho
391 1.1 jruoho /* The general control opcode returns no result */
392 1.1 jruoho
393 1.1 jruoho goto ResultNotUsed;
394 1.1 jruoho
395 1.1 jruoho case AML_CLASS_CREATE:
396 1.1 jruoho /*
397 1.1 jruoho * These opcodes allow TermArg(s) as operands and therefore
398 1.2 christos * the operands can be method calls. The result is used.
399 1.1 jruoho */
400 1.1 jruoho goto ResultUsed;
401 1.1 jruoho
402 1.1 jruoho case AML_CLASS_NAMED_OBJECT:
403 1.1 jruoho
404 1.1 jruoho if ((Op->Common.Parent->Common.AmlOpcode == AML_REGION_OP) ||
405 1.1 jruoho (Op->Common.Parent->Common.AmlOpcode == AML_DATA_REGION_OP) ||
406 1.1 jruoho (Op->Common.Parent->Common.AmlOpcode == AML_PACKAGE_OP) ||
407 1.1 jruoho (Op->Common.Parent->Common.AmlOpcode == AML_BUFFER_OP) ||
408 1.8 christos (Op->Common.Parent->Common.AmlOpcode == AML_VARIABLE_PACKAGE_OP) ||
409 1.1 jruoho (Op->Common.Parent->Common.AmlOpcode == AML_INT_EVAL_SUBTREE_OP) ||
410 1.1 jruoho (Op->Common.Parent->Common.AmlOpcode == AML_BANK_FIELD_OP))
411 1.1 jruoho {
412 1.1 jruoho /*
413 1.1 jruoho * These opcodes allow TermArg(s) as operands and therefore
414 1.2 christos * the operands can be method calls. The result is used.
415 1.1 jruoho */
416 1.1 jruoho goto ResultUsed;
417 1.1 jruoho }
418 1.1 jruoho
419 1.1 jruoho goto ResultNotUsed;
420 1.1 jruoho
421 1.1 jruoho default:
422 1.1 jruoho /*
423 1.1 jruoho * In all other cases. the parent will actually use the return
424 1.1 jruoho * object, so keep it.
425 1.1 jruoho */
426 1.1 jruoho goto ResultUsed;
427 1.1 jruoho }
428 1.1 jruoho
429 1.1 jruoho
430 1.1 jruoho ResultUsed:
431 1.1 jruoho ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
432 1.1 jruoho "Result of [%s] used by Parent [%s] Op=%p\n",
433 1.1 jruoho AcpiPsGetOpcodeName (Op->Common.AmlOpcode),
434 1.1 jruoho AcpiPsGetOpcodeName (Op->Common.Parent->Common.AmlOpcode), Op));
435 1.1 jruoho
436 1.1 jruoho return_UINT8 (TRUE);
437 1.1 jruoho
438 1.1 jruoho
439 1.1 jruoho ResultNotUsed:
440 1.1 jruoho ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
441 1.1 jruoho "Result of [%s] not used by Parent [%s] Op=%p\n",
442 1.1 jruoho AcpiPsGetOpcodeName (Op->Common.AmlOpcode),
443 1.1 jruoho AcpiPsGetOpcodeName (Op->Common.Parent->Common.AmlOpcode), Op));
444 1.1 jruoho
445 1.1 jruoho return_UINT8 (FALSE);
446 1.1 jruoho }
447 1.1 jruoho
448 1.1 jruoho
449 1.1 jruoho /*******************************************************************************
450 1.1 jruoho *
451 1.1 jruoho * FUNCTION: AcpiDsDeleteResultIfNotUsed
452 1.1 jruoho *
453 1.1 jruoho * PARAMETERS: Op - Current parse Op
454 1.1 jruoho * ResultObj - Result of the operation
455 1.1 jruoho * WalkState - Current state
456 1.1 jruoho *
457 1.1 jruoho * RETURN: Status
458 1.1 jruoho *
459 1.2 christos * DESCRIPTION: Used after interpretation of an opcode. If there is an internal
460 1.1 jruoho * result descriptor, check if the parent opcode will actually use
461 1.2 christos * this result. If not, delete the result now so that it will
462 1.1 jruoho * not become orphaned.
463 1.1 jruoho *
464 1.1 jruoho ******************************************************************************/
465 1.1 jruoho
466 1.1 jruoho void
467 1.1 jruoho AcpiDsDeleteResultIfNotUsed (
468 1.1 jruoho ACPI_PARSE_OBJECT *Op,
469 1.1 jruoho ACPI_OPERAND_OBJECT *ResultObj,
470 1.1 jruoho ACPI_WALK_STATE *WalkState)
471 1.1 jruoho {
472 1.1 jruoho ACPI_OPERAND_OBJECT *ObjDesc;
473 1.1 jruoho ACPI_STATUS Status;
474 1.1 jruoho
475 1.1 jruoho
476 1.1 jruoho ACPI_FUNCTION_TRACE_PTR (DsDeleteResultIfNotUsed, ResultObj);
477 1.1 jruoho
478 1.1 jruoho
479 1.1 jruoho if (!Op)
480 1.1 jruoho {
481 1.1 jruoho ACPI_ERROR ((AE_INFO, "Null Op"));
482 1.1 jruoho return_VOID;
483 1.1 jruoho }
484 1.1 jruoho
485 1.1 jruoho if (!ResultObj)
486 1.1 jruoho {
487 1.1 jruoho return_VOID;
488 1.1 jruoho }
489 1.1 jruoho
490 1.1 jruoho if (!AcpiDsIsResultUsed (Op, WalkState))
491 1.1 jruoho {
492 1.1 jruoho /* Must pop the result stack (ObjDesc should be equal to ResultObj) */
493 1.1 jruoho
494 1.1 jruoho Status = AcpiDsResultPop (&ObjDesc, WalkState);
495 1.1 jruoho if (ACPI_SUCCESS (Status))
496 1.1 jruoho {
497 1.1 jruoho AcpiUtRemoveReference (ResultObj);
498 1.1 jruoho }
499 1.1 jruoho }
500 1.1 jruoho
501 1.1 jruoho return_VOID;
502 1.1 jruoho }
503 1.1 jruoho
504 1.1 jruoho
505 1.1 jruoho /*******************************************************************************
506 1.1 jruoho *
507 1.1 jruoho * FUNCTION: AcpiDsResolveOperands
508 1.1 jruoho *
509 1.1 jruoho * PARAMETERS: WalkState - Current walk state with operands on stack
510 1.1 jruoho *
511 1.1 jruoho * RETURN: Status
512 1.1 jruoho *
513 1.2 christos * DESCRIPTION: Resolve all operands to their values. Used to prepare
514 1.1 jruoho * arguments to a control method invocation (a call from one
515 1.1 jruoho * method to another.)
516 1.1 jruoho *
517 1.1 jruoho ******************************************************************************/
518 1.1 jruoho
519 1.1 jruoho ACPI_STATUS
520 1.1 jruoho AcpiDsResolveOperands (
521 1.1 jruoho ACPI_WALK_STATE *WalkState)
522 1.1 jruoho {
523 1.1 jruoho UINT32 i;
524 1.1 jruoho ACPI_STATUS Status = AE_OK;
525 1.1 jruoho
526 1.1 jruoho
527 1.1 jruoho ACPI_FUNCTION_TRACE_PTR (DsResolveOperands, WalkState);
528 1.1 jruoho
529 1.1 jruoho
530 1.1 jruoho /*
531 1.1 jruoho * Attempt to resolve each of the valid operands
532 1.2 christos * Method arguments are passed by reference, not by value. This means
533 1.1 jruoho * that the actual objects are passed, not copies of the objects.
534 1.1 jruoho */
535 1.1 jruoho for (i = 0; i < WalkState->NumOperands; i++)
536 1.1 jruoho {
537 1.1 jruoho Status = AcpiExResolveToValue (&WalkState->Operands[i], WalkState);
538 1.1 jruoho if (ACPI_FAILURE (Status))
539 1.1 jruoho {
540 1.1 jruoho break;
541 1.1 jruoho }
542 1.1 jruoho }
543 1.1 jruoho
544 1.1 jruoho return_ACPI_STATUS (Status);
545 1.1 jruoho }
546 1.1 jruoho
547 1.1 jruoho
548 1.1 jruoho /*******************************************************************************
549 1.1 jruoho *
550 1.1 jruoho * FUNCTION: AcpiDsClearOperands
551 1.1 jruoho *
552 1.1 jruoho * PARAMETERS: WalkState - Current walk state with operands on stack
553 1.1 jruoho *
554 1.1 jruoho * RETURN: None
555 1.1 jruoho *
556 1.1 jruoho * DESCRIPTION: Clear all operands on the current walk state operand stack.
557 1.1 jruoho *
558 1.1 jruoho ******************************************************************************/
559 1.1 jruoho
560 1.1 jruoho void
561 1.1 jruoho AcpiDsClearOperands (
562 1.1 jruoho ACPI_WALK_STATE *WalkState)
563 1.1 jruoho {
564 1.1 jruoho UINT32 i;
565 1.1 jruoho
566 1.1 jruoho
567 1.1 jruoho ACPI_FUNCTION_TRACE_PTR (DsClearOperands, WalkState);
568 1.1 jruoho
569 1.1 jruoho
570 1.1 jruoho /* Remove a reference on each operand on the stack */
571 1.1 jruoho
572 1.1 jruoho for (i = 0; i < WalkState->NumOperands; i++)
573 1.1 jruoho {
574 1.1 jruoho /*
575 1.1 jruoho * Remove a reference to all operands, including both
576 1.1 jruoho * "Arguments" and "Targets".
577 1.1 jruoho */
578 1.1 jruoho AcpiUtRemoveReference (WalkState->Operands[i]);
579 1.1 jruoho WalkState->Operands[i] = NULL;
580 1.1 jruoho }
581 1.1 jruoho
582 1.1 jruoho WalkState->NumOperands = 0;
583 1.1 jruoho return_VOID;
584 1.1 jruoho }
585 1.1 jruoho
586 1.1 jruoho
587 1.1 jruoho /*******************************************************************************
588 1.1 jruoho *
589 1.1 jruoho * FUNCTION: AcpiDsCreateOperand
590 1.1 jruoho *
591 1.1 jruoho * PARAMETERS: WalkState - Current walk state
592 1.1 jruoho * Arg - Parse object for the argument
593 1.1 jruoho * ArgIndex - Which argument (zero based)
594 1.1 jruoho *
595 1.1 jruoho * RETURN: Status
596 1.1 jruoho *
597 1.1 jruoho * DESCRIPTION: Translate a parse tree object that is an argument to an AML
598 1.2 christos * opcode to the equivalent interpreter object. This may include
599 1.1 jruoho * looking up a name or entering a new name into the internal
600 1.1 jruoho * namespace.
601 1.1 jruoho *
602 1.1 jruoho ******************************************************************************/
603 1.1 jruoho
604 1.1 jruoho ACPI_STATUS
605 1.1 jruoho AcpiDsCreateOperand (
606 1.1 jruoho ACPI_WALK_STATE *WalkState,
607 1.1 jruoho ACPI_PARSE_OBJECT *Arg,
608 1.1 jruoho UINT32 ArgIndex)
609 1.1 jruoho {
610 1.1 jruoho ACPI_STATUS Status = AE_OK;
611 1.1 jruoho char *NameString;
612 1.1 jruoho UINT32 NameLength;
613 1.1 jruoho ACPI_OPERAND_OBJECT *ObjDesc;
614 1.1 jruoho ACPI_PARSE_OBJECT *ParentOp;
615 1.1 jruoho UINT16 Opcode;
616 1.1 jruoho ACPI_INTERPRETER_MODE InterpreterMode;
617 1.1 jruoho const ACPI_OPCODE_INFO *OpInfo;
618 1.1 jruoho
619 1.1 jruoho
620 1.1 jruoho ACPI_FUNCTION_TRACE_PTR (DsCreateOperand, Arg);
621 1.1 jruoho
622 1.1 jruoho
623 1.1 jruoho /* A valid name must be looked up in the namespace */
624 1.1 jruoho
625 1.1 jruoho if ((Arg->Common.AmlOpcode == AML_INT_NAMEPATH_OP) &&
626 1.1 jruoho (Arg->Common.Value.String) &&
627 1.1 jruoho !(Arg->Common.Flags & ACPI_PARSEOP_IN_STACK))
628 1.1 jruoho {
629 1.1 jruoho ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "Getting a name: Arg=%p\n", Arg));
630 1.1 jruoho
631 1.1 jruoho /* Get the entire name string from the AML stream */
632 1.1 jruoho
633 1.5 christos Status = AcpiExGetNameString (ACPI_TYPE_ANY,
634 1.5 christos Arg->Common.Value.Buffer, &NameString, &NameLength);
635 1.1 jruoho
636 1.1 jruoho if (ACPI_FAILURE (Status))
637 1.1 jruoho {
638 1.1 jruoho return_ACPI_STATUS (Status);
639 1.1 jruoho }
640 1.1 jruoho
641 1.1 jruoho /* All prefixes have been handled, and the name is in NameString */
642 1.1 jruoho
643 1.1 jruoho /*
644 1.2 christos * Special handling for BufferField declarations. This is a deferred
645 1.1 jruoho * opcode that unfortunately defines the field name as the last
646 1.2 christos * parameter instead of the first. We get here when we are performing
647 1.1 jruoho * the deferred execution, so the actual name of the field is already
648 1.2 christos * in the namespace. We don't want to attempt to look it up again
649 1.1 jruoho * because we may be executing in a different scope than where the
650 1.1 jruoho * actual opcode exists.
651 1.1 jruoho */
652 1.1 jruoho if ((WalkState->DeferredNode) &&
653 1.1 jruoho (WalkState->DeferredNode->Type == ACPI_TYPE_BUFFER_FIELD) &&
654 1.5 christos (ArgIndex == (UINT32)
655 1.5 christos ((WalkState->Opcode == AML_CREATE_FIELD_OP) ? 3 : 2)))
656 1.1 jruoho {
657 1.1 jruoho ObjDesc = ACPI_CAST_PTR (
658 1.5 christos ACPI_OPERAND_OBJECT, WalkState->DeferredNode);
659 1.1 jruoho Status = AE_OK;
660 1.1 jruoho }
661 1.1 jruoho else /* All other opcodes */
662 1.1 jruoho {
663 1.1 jruoho /*
664 1.1 jruoho * Differentiate between a namespace "create" operation
665 1.1 jruoho * versus a "lookup" operation (IMODE_LOAD_PASS2 vs.
666 1.1 jruoho * IMODE_EXECUTE) in order to support the creation of
667 1.1 jruoho * namespace objects during the execution of control methods.
668 1.1 jruoho */
669 1.1 jruoho ParentOp = Arg->Common.Parent;
670 1.1 jruoho OpInfo = AcpiPsGetOpcodeInfo (ParentOp->Common.AmlOpcode);
671 1.5 christos
672 1.1 jruoho if ((OpInfo->Flags & AML_NSNODE) &&
673 1.1 jruoho (ParentOp->Common.AmlOpcode != AML_INT_METHODCALL_OP) &&
674 1.1 jruoho (ParentOp->Common.AmlOpcode != AML_REGION_OP) &&
675 1.1 jruoho (ParentOp->Common.AmlOpcode != AML_INT_NAMEPATH_OP))
676 1.1 jruoho {
677 1.1 jruoho /* Enter name into namespace if not found */
678 1.1 jruoho
679 1.1 jruoho InterpreterMode = ACPI_IMODE_LOAD_PASS2;
680 1.1 jruoho }
681 1.1 jruoho else
682 1.1 jruoho {
683 1.1 jruoho /* Return a failure if name not found */
684 1.1 jruoho
685 1.1 jruoho InterpreterMode = ACPI_IMODE_EXECUTE;
686 1.1 jruoho }
687 1.1 jruoho
688 1.1 jruoho Status = AcpiNsLookup (WalkState->ScopeInfo, NameString,
689 1.5 christos ACPI_TYPE_ANY, InterpreterMode,
690 1.5 christos ACPI_NS_SEARCH_PARENT | ACPI_NS_DONT_OPEN_SCOPE, WalkState,
691 1.5 christos ACPI_CAST_INDIRECT_PTR (ACPI_NAMESPACE_NODE, &ObjDesc));
692 1.1 jruoho /*
693 1.1 jruoho * The only case where we pass through (ignore) a NOT_FOUND
694 1.1 jruoho * error is for the CondRefOf opcode.
695 1.1 jruoho */
696 1.1 jruoho if (Status == AE_NOT_FOUND)
697 1.1 jruoho {
698 1.8 christos if (ParentOp->Common.AmlOpcode == AML_CONDITIONAL_REF_OF_OP)
699 1.1 jruoho {
700 1.1 jruoho /*
701 1.1 jruoho * For the Conditional Reference op, it's OK if
702 1.1 jruoho * the name is not found; We just need a way to
703 1.1 jruoho * indicate this to the interpreter, set the
704 1.1 jruoho * object to the root
705 1.1 jruoho */
706 1.1 jruoho ObjDesc = ACPI_CAST_PTR (
707 1.5 christos ACPI_OPERAND_OBJECT, AcpiGbl_RootNode);
708 1.1 jruoho Status = AE_OK;
709 1.1 jruoho }
710 1.2 christos else if (ParentOp->Common.AmlOpcode == AML_EXTERNAL_OP)
711 1.2 christos {
712 1.6 christos /*
713 1.6 christos * This opcode should never appear here. It is used only
714 1.6 christos * by AML disassemblers and is surrounded by an If(0)
715 1.6 christos * by the ASL compiler.
716 1.6 christos *
717 1.6 christos * Therefore, if we see it here, it is a serious error.
718 1.6 christos */
719 1.6 christos Status = AE_AML_BAD_OPCODE;
720 1.3 christos }
721 1.1 jruoho else
722 1.1 jruoho {
723 1.1 jruoho /*
724 1.1 jruoho * We just plain didn't find it -- which is a
725 1.1 jruoho * very serious error at this point
726 1.1 jruoho */
727 1.1 jruoho Status = AE_AML_NAME_NOT_FOUND;
728 1.1 jruoho }
729 1.1 jruoho }
730 1.1 jruoho
731 1.1 jruoho if (ACPI_FAILURE (Status))
732 1.1 jruoho {
733 1.10 christos ACPI_ERROR_NAMESPACE (WalkState->ScopeInfo,
734 1.10 christos NameString, Status);
735 1.1 jruoho }
736 1.1 jruoho }
737 1.1 jruoho
738 1.1 jruoho /* Free the namestring created above */
739 1.1 jruoho
740 1.1 jruoho ACPI_FREE (NameString);
741 1.1 jruoho
742 1.1 jruoho /* Check status from the lookup */
743 1.1 jruoho
744 1.1 jruoho if (ACPI_FAILURE (Status))
745 1.1 jruoho {
746 1.1 jruoho return_ACPI_STATUS (Status);
747 1.1 jruoho }
748 1.1 jruoho
749 1.1 jruoho /* Put the resulting object onto the current object stack */
750 1.1 jruoho
751 1.1 jruoho Status = AcpiDsObjStackPush (ObjDesc, WalkState);
752 1.1 jruoho if (ACPI_FAILURE (Status))
753 1.1 jruoho {
754 1.1 jruoho return_ACPI_STATUS (Status);
755 1.1 jruoho }
756 1.5 christos
757 1.5 christos AcpiDbDisplayArgumentObject (ObjDesc, WalkState);
758 1.1 jruoho }
759 1.1 jruoho else
760 1.1 jruoho {
761 1.1 jruoho /* Check for null name case */
762 1.1 jruoho
763 1.1 jruoho if ((Arg->Common.AmlOpcode == AML_INT_NAMEPATH_OP) &&
764 1.1 jruoho !(Arg->Common.Flags & ACPI_PARSEOP_IN_STACK))
765 1.1 jruoho {
766 1.1 jruoho /*
767 1.1 jruoho * If the name is null, this means that this is an
768 1.1 jruoho * optional result parameter that was not specified
769 1.2 christos * in the original ASL. Create a Zero Constant for a
770 1.2 christos * placeholder. (Store to a constant is a Noop.)
771 1.1 jruoho */
772 1.1 jruoho Opcode = AML_ZERO_OP; /* Has no arguments! */
773 1.1 jruoho
774 1.1 jruoho ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
775 1.1 jruoho "Null namepath: Arg=%p\n", Arg));
776 1.1 jruoho }
777 1.1 jruoho else
778 1.1 jruoho {
779 1.1 jruoho Opcode = Arg->Common.AmlOpcode;
780 1.1 jruoho }
781 1.1 jruoho
782 1.1 jruoho /* Get the object type of the argument */
783 1.1 jruoho
784 1.1 jruoho OpInfo = AcpiPsGetOpcodeInfo (Opcode);
785 1.1 jruoho if (OpInfo->ObjectType == ACPI_TYPE_INVALID)
786 1.1 jruoho {
787 1.1 jruoho return_ACPI_STATUS (AE_NOT_IMPLEMENTED);
788 1.1 jruoho }
789 1.1 jruoho
790 1.5 christos if ((OpInfo->Flags & AML_HAS_RETVAL) ||
791 1.5 christos (Arg->Common.Flags & ACPI_PARSEOP_IN_STACK))
792 1.1 jruoho {
793 1.1 jruoho /*
794 1.1 jruoho * Use value that was already previously returned
795 1.1 jruoho * by the evaluation of this argument
796 1.1 jruoho */
797 1.1 jruoho Status = AcpiDsResultPop (&ObjDesc, WalkState);
798 1.1 jruoho if (ACPI_FAILURE (Status))
799 1.1 jruoho {
800 1.1 jruoho /*
801 1.1 jruoho * Only error is underflow, and this indicates
802 1.1 jruoho * a missing or null operand!
803 1.1 jruoho */
804 1.1 jruoho ACPI_EXCEPTION ((AE_INFO, Status,
805 1.1 jruoho "Missing or null operand"));
806 1.1 jruoho return_ACPI_STATUS (Status);
807 1.1 jruoho }
808 1.1 jruoho }
809 1.1 jruoho else
810 1.1 jruoho {
811 1.1 jruoho /* Create an ACPI_INTERNAL_OBJECT for the argument */
812 1.1 jruoho
813 1.1 jruoho ObjDesc = AcpiUtCreateInternalObject (OpInfo->ObjectType);
814 1.1 jruoho if (!ObjDesc)
815 1.1 jruoho {
816 1.1 jruoho return_ACPI_STATUS (AE_NO_MEMORY);
817 1.1 jruoho }
818 1.1 jruoho
819 1.1 jruoho /* Initialize the new object */
820 1.1 jruoho
821 1.1 jruoho Status = AcpiDsInitObjectFromOp (
822 1.5 christos WalkState, Arg, Opcode, &ObjDesc);
823 1.1 jruoho if (ACPI_FAILURE (Status))
824 1.1 jruoho {
825 1.1 jruoho AcpiUtDeleteObjectDesc (ObjDesc);
826 1.1 jruoho return_ACPI_STATUS (Status);
827 1.1 jruoho }
828 1.1 jruoho }
829 1.1 jruoho
830 1.1 jruoho /* Put the operand object on the object stack */
831 1.1 jruoho
832 1.1 jruoho Status = AcpiDsObjStackPush (ObjDesc, WalkState);
833 1.1 jruoho if (ACPI_FAILURE (Status))
834 1.1 jruoho {
835 1.1 jruoho return_ACPI_STATUS (Status);
836 1.1 jruoho }
837 1.1 jruoho
838 1.5 christos AcpiDbDisplayArgumentObject (ObjDesc, WalkState);
839 1.1 jruoho }
840 1.1 jruoho
841 1.1 jruoho return_ACPI_STATUS (AE_OK);
842 1.1 jruoho }
843 1.1 jruoho
844 1.1 jruoho
845 1.1 jruoho /*******************************************************************************
846 1.1 jruoho *
847 1.1 jruoho * FUNCTION: AcpiDsCreateOperands
848 1.1 jruoho *
849 1.1 jruoho * PARAMETERS: WalkState - Current state
850 1.1 jruoho * FirstArg - First argument of a parser argument tree
851 1.1 jruoho *
852 1.1 jruoho * RETURN: Status
853 1.1 jruoho *
854 1.1 jruoho * DESCRIPTION: Convert an operator's arguments from a parse tree format to
855 1.1 jruoho * namespace objects and place those argument object on the object
856 1.1 jruoho * stack in preparation for evaluation by the interpreter.
857 1.1 jruoho *
858 1.1 jruoho ******************************************************************************/
859 1.1 jruoho
860 1.1 jruoho ACPI_STATUS
861 1.1 jruoho AcpiDsCreateOperands (
862 1.1 jruoho ACPI_WALK_STATE *WalkState,
863 1.1 jruoho ACPI_PARSE_OBJECT *FirstArg)
864 1.1 jruoho {
865 1.1 jruoho ACPI_STATUS Status = AE_OK;
866 1.1 jruoho ACPI_PARSE_OBJECT *Arg;
867 1.1 jruoho ACPI_PARSE_OBJECT *Arguments[ACPI_OBJ_NUM_OPERANDS];
868 1.1 jruoho UINT32 ArgCount = 0;
869 1.1 jruoho UINT32 Index = WalkState->NumOperands;
870 1.18 christos UINT32 PrevNumOperands = WalkState->NumOperands;
871 1.18 christos UINT32 NewNumOperands;
872 1.1 jruoho UINT32 i;
873 1.1 jruoho
874 1.1 jruoho
875 1.1 jruoho ACPI_FUNCTION_TRACE_PTR (DsCreateOperands, FirstArg);
876 1.1 jruoho
877 1.1 jruoho
878 1.1 jruoho /* Get all arguments in the list */
879 1.1 jruoho
880 1.1 jruoho Arg = FirstArg;
881 1.1 jruoho while (Arg)
882 1.1 jruoho {
883 1.1 jruoho if (Index >= ACPI_OBJ_NUM_OPERANDS)
884 1.1 jruoho {
885 1.1 jruoho return_ACPI_STATUS (AE_BAD_DATA);
886 1.1 jruoho }
887 1.1 jruoho
888 1.1 jruoho Arguments[Index] = Arg;
889 1.1 jruoho WalkState->Operands [Index] = NULL;
890 1.1 jruoho
891 1.1 jruoho /* Move on to next argument, if any */
892 1.1 jruoho
893 1.1 jruoho Arg = Arg->Common.Next;
894 1.1 jruoho ArgCount++;
895 1.1 jruoho Index++;
896 1.1 jruoho }
897 1.1 jruoho
898 1.2 christos ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
899 1.2 christos "NumOperands %d, ArgCount %d, Index %d\n",
900 1.2 christos WalkState->NumOperands, ArgCount, Index));
901 1.1 jruoho
902 1.2 christos /* Create the interpreter arguments, in reverse order */
903 1.1 jruoho
904 1.18 christos NewNumOperands = Index;
905 1.2 christos Index--;
906 1.1 jruoho for (i = 0; i < ArgCount; i++)
907 1.1 jruoho {
908 1.1 jruoho Arg = Arguments[Index];
909 1.1 jruoho WalkState->OperandIndex = (UINT8) Index;
910 1.1 jruoho
911 1.1 jruoho Status = AcpiDsCreateOperand (WalkState, Arg, Index);
912 1.1 jruoho if (ACPI_FAILURE (Status))
913 1.1 jruoho {
914 1.1 jruoho goto Cleanup;
915 1.1 jruoho }
916 1.1 jruoho
917 1.2 christos ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
918 1.2 christos "Created Arg #%u (%p) %u args total\n",
919 1.2 christos Index, Arg, ArgCount));
920 1.1 jruoho Index--;
921 1.1 jruoho }
922 1.1 jruoho
923 1.1 jruoho return_ACPI_STATUS (Status);
924 1.1 jruoho
925 1.1 jruoho
926 1.1 jruoho Cleanup:
927 1.1 jruoho /*
928 1.1 jruoho * We must undo everything done above; meaning that we must
929 1.1 jruoho * pop everything off of the operand stack and delete those
930 1.1 jruoho * objects
931 1.1 jruoho */
932 1.18 christos WalkState->NumOperands = (UINT8) (i);
933 1.18 christos AcpiDsObjStackPopAndDelete (NewNumOperands, WalkState);
934 1.18 christos
935 1.18 christos /* Restore operand count */
936 1.18 christos WalkState->NumOperands = (UINT8) (PrevNumOperands);
937 1.1 jruoho
938 1.1 jruoho ACPI_EXCEPTION ((AE_INFO, Status, "While creating Arg %u", Index));
939 1.1 jruoho return_ACPI_STATUS (Status);
940 1.1 jruoho }
941 1.1 jruoho
942 1.1 jruoho
943 1.1 jruoho /*****************************************************************************
944 1.1 jruoho *
945 1.1 jruoho * FUNCTION: AcpiDsEvaluateNamePath
946 1.1 jruoho *
947 1.1 jruoho * PARAMETERS: WalkState - Current state of the parse tree walk,
948 1.1 jruoho * the opcode of current operation should be
949 1.1 jruoho * AML_INT_NAMEPATH_OP
950 1.1 jruoho *
951 1.1 jruoho * RETURN: Status
952 1.1 jruoho *
953 1.1 jruoho * DESCRIPTION: Translate the -NamePath- parse tree object to the equivalent
954 1.1 jruoho * interpreter object, convert it to value, if needed, duplicate
955 1.1 jruoho * it, if needed, and push it onto the current result stack.
956 1.1 jruoho *
957 1.1 jruoho ****************************************************************************/
958 1.1 jruoho
959 1.1 jruoho ACPI_STATUS
960 1.1 jruoho AcpiDsEvaluateNamePath (
961 1.1 jruoho ACPI_WALK_STATE *WalkState)
962 1.1 jruoho {
963 1.1 jruoho ACPI_STATUS Status = AE_OK;
964 1.1 jruoho ACPI_PARSE_OBJECT *Op = WalkState->Op;
965 1.1 jruoho ACPI_OPERAND_OBJECT **Operand = &WalkState->Operands[0];
966 1.1 jruoho ACPI_OPERAND_OBJECT *NewObjDesc;
967 1.1 jruoho UINT8 Type;
968 1.1 jruoho
969 1.1 jruoho
970 1.1 jruoho ACPI_FUNCTION_TRACE_PTR (DsEvaluateNamePath, WalkState);
971 1.1 jruoho
972 1.1 jruoho
973 1.1 jruoho if (!Op->Common.Parent)
974 1.1 jruoho {
975 1.1 jruoho /* This happens after certain exception processing */
976 1.1 jruoho
977 1.1 jruoho goto Exit;
978 1.1 jruoho }
979 1.1 jruoho
980 1.1 jruoho if ((Op->Common.Parent->Common.AmlOpcode == AML_PACKAGE_OP) ||
981 1.8 christos (Op->Common.Parent->Common.AmlOpcode == AML_VARIABLE_PACKAGE_OP) ||
982 1.1 jruoho (Op->Common.Parent->Common.AmlOpcode == AML_REF_OF_OP))
983 1.1 jruoho {
984 1.1 jruoho /* TBD: Should we specify this feature as a bit of OpInfo->Flags of these opcodes? */
985 1.1 jruoho
986 1.1 jruoho goto Exit;
987 1.1 jruoho }
988 1.1 jruoho
989 1.1 jruoho Status = AcpiDsCreateOperand (WalkState, Op, 0);
990 1.1 jruoho if (ACPI_FAILURE (Status))
991 1.1 jruoho {
992 1.1 jruoho goto Exit;
993 1.1 jruoho }
994 1.1 jruoho
995 1.1 jruoho if (Op->Common.Flags & ACPI_PARSEOP_TARGET)
996 1.1 jruoho {
997 1.1 jruoho NewObjDesc = *Operand;
998 1.1 jruoho goto PushResult;
999 1.1 jruoho }
1000 1.1 jruoho
1001 1.1 jruoho Type = (*Operand)->Common.Type;
1002 1.1 jruoho
1003 1.1 jruoho Status = AcpiExResolveToValue (Operand, WalkState);
1004 1.1 jruoho if (ACPI_FAILURE (Status))
1005 1.1 jruoho {
1006 1.1 jruoho goto Exit;
1007 1.1 jruoho }
1008 1.1 jruoho
1009 1.1 jruoho if (Type == ACPI_TYPE_INTEGER)
1010 1.1 jruoho {
1011 1.1 jruoho /* It was incremented by AcpiExResolveToValue */
1012 1.1 jruoho
1013 1.1 jruoho AcpiUtRemoveReference (*Operand);
1014 1.1 jruoho
1015 1.5 christos Status = AcpiUtCopyIobjectToIobject (
1016 1.5 christos *Operand, &NewObjDesc, WalkState);
1017 1.1 jruoho if (ACPI_FAILURE (Status))
1018 1.1 jruoho {
1019 1.1 jruoho goto Exit;
1020 1.1 jruoho }
1021 1.1 jruoho }
1022 1.1 jruoho else
1023 1.1 jruoho {
1024 1.1 jruoho /*
1025 1.1 jruoho * The object either was anew created or is
1026 1.1 jruoho * a Namespace node - don't decrement it.
1027 1.1 jruoho */
1028 1.1 jruoho NewObjDesc = *Operand;
1029 1.1 jruoho }
1030 1.1 jruoho
1031 1.1 jruoho /* Cleanup for name-path operand */
1032 1.1 jruoho
1033 1.1 jruoho Status = AcpiDsObjStackPop (1, WalkState);
1034 1.1 jruoho if (ACPI_FAILURE (Status))
1035 1.1 jruoho {
1036 1.1 jruoho WalkState->ResultObj = NewObjDesc;
1037 1.1 jruoho goto Exit;
1038 1.1 jruoho }
1039 1.1 jruoho
1040 1.1 jruoho PushResult:
1041 1.1 jruoho
1042 1.1 jruoho WalkState->ResultObj = NewObjDesc;
1043 1.1 jruoho
1044 1.1 jruoho Status = AcpiDsResultPush (WalkState->ResultObj, WalkState);
1045 1.1 jruoho if (ACPI_SUCCESS (Status))
1046 1.1 jruoho {
1047 1.1 jruoho /* Force to take it from stack */
1048 1.1 jruoho
1049 1.1 jruoho Op->Common.Flags |= ACPI_PARSEOP_IN_STACK;
1050 1.1 jruoho }
1051 1.1 jruoho
1052 1.1 jruoho Exit:
1053 1.1 jruoho
1054 1.1 jruoho return_ACPI_STATUS (Status);
1055 1.1 jruoho }
1056