dmwalk.c revision 1.19 1 1.1 jruoho /*******************************************************************************
2 1.1 jruoho *
3 1.1 jruoho * Module Name: dmwalk - AML disassembly tree walk
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.14 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 "acdebug.h"
157 1.8 christos #include "acconvert.h"
158 1.1 jruoho
159 1.1 jruoho
160 1.1 jruoho #define _COMPONENT ACPI_CA_DEBUGGER
161 1.1 jruoho ACPI_MODULE_NAME ("dmwalk")
162 1.1 jruoho
163 1.1 jruoho
164 1.1 jruoho /* Stub for non-compiler code */
165 1.1 jruoho
166 1.1 jruoho #ifndef ACPI_ASL_COMPILER
167 1.1 jruoho void
168 1.1 jruoho AcpiDmEmitExternals (
169 1.1 jruoho void)
170 1.1 jruoho {
171 1.1 jruoho return;
172 1.1 jruoho }
173 1.8 christos
174 1.8 christos void
175 1.8 christos AcpiDmEmitExternal (
176 1.8 christos ACPI_PARSE_OBJECT *NameOp,
177 1.8 christos ACPI_PARSE_OBJECT *TypeOp)
178 1.8 christos {
179 1.8 christos return;
180 1.8 christos }
181 1.1 jruoho #endif
182 1.1 jruoho
183 1.1 jruoho /* Local prototypes */
184 1.1 jruoho
185 1.1 jruoho static ACPI_STATUS
186 1.1 jruoho AcpiDmDescendingOp (
187 1.1 jruoho ACPI_PARSE_OBJECT *Op,
188 1.1 jruoho UINT32 Level,
189 1.1 jruoho void *Context);
190 1.1 jruoho
191 1.1 jruoho static ACPI_STATUS
192 1.1 jruoho AcpiDmAscendingOp (
193 1.1 jruoho ACPI_PARSE_OBJECT *Op,
194 1.1 jruoho UINT32 Level,
195 1.1 jruoho void *Context);
196 1.1 jruoho
197 1.1 jruoho
198 1.1 jruoho /*******************************************************************************
199 1.1 jruoho *
200 1.1 jruoho * FUNCTION: AcpiDmDisassemble
201 1.1 jruoho *
202 1.1 jruoho * PARAMETERS: WalkState - Current state
203 1.1 jruoho * Origin - Starting object
204 1.1 jruoho * NumOpcodes - Max number of opcodes to be displayed
205 1.1 jruoho *
206 1.1 jruoho * RETURN: None
207 1.1 jruoho *
208 1.2 christos * DESCRIPTION: Disassemble parser object and its children. This is the
209 1.1 jruoho * main entry point of the disassembler.
210 1.1 jruoho *
211 1.1 jruoho ******************************************************************************/
212 1.1 jruoho
213 1.1 jruoho void
214 1.1 jruoho AcpiDmDisassemble (
215 1.1 jruoho ACPI_WALK_STATE *WalkState,
216 1.1 jruoho ACPI_PARSE_OBJECT *Origin,
217 1.1 jruoho UINT32 NumOpcodes)
218 1.1 jruoho {
219 1.1 jruoho ACPI_PARSE_OBJECT *Op = Origin;
220 1.1 jruoho ACPI_OP_WALK_INFO Info;
221 1.1 jruoho
222 1.1 jruoho
223 1.1 jruoho if (!Op)
224 1.1 jruoho {
225 1.1 jruoho return;
226 1.1 jruoho }
227 1.1 jruoho
228 1.4 christos memset (&Info, 0, sizeof (ACPI_OP_WALK_INFO));
229 1.1 jruoho Info.WalkState = WalkState;
230 1.4 christos Info.StartAml = Op->Common.Aml - sizeof (ACPI_TABLE_HEADER);
231 1.4 christos Info.AmlOffset = Op->Common.Aml - Info.StartAml;
232 1.4 christos
233 1.1 jruoho AcpiDmWalkParseTree (Op, AcpiDmDescendingOp, AcpiDmAscendingOp, &Info);
234 1.1 jruoho return;
235 1.1 jruoho }
236 1.1 jruoho
237 1.1 jruoho
238 1.1 jruoho /*******************************************************************************
239 1.1 jruoho *
240 1.1 jruoho * FUNCTION: AcpiDmWalkParseTree
241 1.1 jruoho *
242 1.1 jruoho * PARAMETERS: Op - Root Op object
243 1.1 jruoho * DescendingCallback - Called during tree descent
244 1.1 jruoho * AscendingCallback - Called during tree ascent
245 1.1 jruoho * Context - To be passed to the callbacks
246 1.1 jruoho *
247 1.1 jruoho * RETURN: Status from callback(s)
248 1.1 jruoho *
249 1.1 jruoho * DESCRIPTION: Walk the entire parse tree.
250 1.1 jruoho *
251 1.1 jruoho ******************************************************************************/
252 1.1 jruoho
253 1.1 jruoho void
254 1.1 jruoho AcpiDmWalkParseTree (
255 1.1 jruoho ACPI_PARSE_OBJECT *Op,
256 1.1 jruoho ASL_WALK_CALLBACK DescendingCallback,
257 1.1 jruoho ASL_WALK_CALLBACK AscendingCallback,
258 1.1 jruoho void *Context)
259 1.1 jruoho {
260 1.1 jruoho BOOLEAN NodePreviouslyVisited;
261 1.1 jruoho ACPI_PARSE_OBJECT *StartOp = Op;
262 1.1 jruoho ACPI_STATUS Status;
263 1.1 jruoho ACPI_PARSE_OBJECT *Next;
264 1.1 jruoho ACPI_OP_WALK_INFO *Info = Context;
265 1.1 jruoho
266 1.1 jruoho
267 1.1 jruoho Info->Level = 0;
268 1.1 jruoho NodePreviouslyVisited = FALSE;
269 1.1 jruoho
270 1.1 jruoho while (Op)
271 1.1 jruoho {
272 1.1 jruoho if (NodePreviouslyVisited)
273 1.1 jruoho {
274 1.1 jruoho if (AscendingCallback)
275 1.1 jruoho {
276 1.1 jruoho Status = AscendingCallback (Op, Info->Level, Context);
277 1.1 jruoho if (ACPI_FAILURE (Status))
278 1.1 jruoho {
279 1.1 jruoho return;
280 1.1 jruoho }
281 1.1 jruoho }
282 1.1 jruoho }
283 1.1 jruoho else
284 1.1 jruoho {
285 1.1 jruoho /* Let the callback process the node */
286 1.1 jruoho
287 1.1 jruoho Status = DescendingCallback (Op, Info->Level, Context);
288 1.1 jruoho if (ACPI_SUCCESS (Status))
289 1.1 jruoho {
290 1.1 jruoho /* Visit children first, once */
291 1.1 jruoho
292 1.1 jruoho Next = AcpiPsGetArg (Op, 0);
293 1.1 jruoho if (Next)
294 1.1 jruoho {
295 1.1 jruoho Info->Level++;
296 1.1 jruoho Op = Next;
297 1.1 jruoho continue;
298 1.1 jruoho }
299 1.1 jruoho }
300 1.1 jruoho else if (Status != AE_CTRL_DEPTH)
301 1.1 jruoho {
302 1.1 jruoho /* Exit immediately on any error */
303 1.1 jruoho
304 1.1 jruoho return;
305 1.1 jruoho }
306 1.1 jruoho }
307 1.1 jruoho
308 1.1 jruoho /* Terminate walk at start op */
309 1.1 jruoho
310 1.1 jruoho if (Op == StartOp)
311 1.1 jruoho {
312 1.1 jruoho break;
313 1.1 jruoho }
314 1.1 jruoho
315 1.1 jruoho /* No more children, re-visit this node */
316 1.1 jruoho
317 1.1 jruoho if (!NodePreviouslyVisited)
318 1.1 jruoho {
319 1.1 jruoho NodePreviouslyVisited = TRUE;
320 1.1 jruoho continue;
321 1.1 jruoho }
322 1.1 jruoho
323 1.1 jruoho /* No more children, visit peers */
324 1.1 jruoho
325 1.1 jruoho if (Op->Common.Next)
326 1.1 jruoho {
327 1.1 jruoho Op = Op->Common.Next;
328 1.1 jruoho NodePreviouslyVisited = FALSE;
329 1.1 jruoho }
330 1.1 jruoho else
331 1.1 jruoho {
332 1.1 jruoho /* No peers, re-visit parent */
333 1.1 jruoho
334 1.1 jruoho if (Info->Level != 0 )
335 1.1 jruoho {
336 1.1 jruoho Info->Level--;
337 1.1 jruoho }
338 1.1 jruoho
339 1.1 jruoho Op = Op->Common.Parent;
340 1.1 jruoho NodePreviouslyVisited = TRUE;
341 1.1 jruoho }
342 1.1 jruoho }
343 1.1 jruoho
344 1.1 jruoho /* If we get here, the walk completed with no errors */
345 1.1 jruoho
346 1.1 jruoho return;
347 1.1 jruoho }
348 1.1 jruoho
349 1.1 jruoho
350 1.1 jruoho /*******************************************************************************
351 1.1 jruoho *
352 1.1 jruoho * FUNCTION: AcpiDmBlockType
353 1.1 jruoho *
354 1.1 jruoho * PARAMETERS: Op - Object to be examined
355 1.1 jruoho *
356 1.1 jruoho * RETURN: BlockType - not a block, parens, braces, or even both.
357 1.1 jruoho *
358 1.1 jruoho * DESCRIPTION: Type of block for this op (parens or braces)
359 1.1 jruoho *
360 1.1 jruoho ******************************************************************************/
361 1.1 jruoho
362 1.8 christos UINT32
363 1.1 jruoho AcpiDmBlockType (
364 1.1 jruoho ACPI_PARSE_OBJECT *Op)
365 1.1 jruoho {
366 1.1 jruoho const ACPI_OPCODE_INFO *OpInfo;
367 1.1 jruoho
368 1.1 jruoho
369 1.1 jruoho if (!Op)
370 1.1 jruoho {
371 1.1 jruoho return (BLOCK_NONE);
372 1.1 jruoho }
373 1.1 jruoho
374 1.1 jruoho switch (Op->Common.AmlOpcode)
375 1.1 jruoho {
376 1.1 jruoho case AML_ELSE_OP:
377 1.1 jruoho
378 1.1 jruoho return (BLOCK_BRACE);
379 1.1 jruoho
380 1.1 jruoho case AML_METHOD_OP:
381 1.1 jruoho case AML_DEVICE_OP:
382 1.1 jruoho case AML_SCOPE_OP:
383 1.1 jruoho case AML_PROCESSOR_OP:
384 1.8 christos case AML_POWER_RESOURCE_OP:
385 1.1 jruoho case AML_THERMAL_ZONE_OP:
386 1.1 jruoho case AML_IF_OP:
387 1.1 jruoho case AML_WHILE_OP:
388 1.1 jruoho case AML_FIELD_OP:
389 1.1 jruoho case AML_INDEX_FIELD_OP:
390 1.1 jruoho case AML_BANK_FIELD_OP:
391 1.1 jruoho
392 1.1 jruoho return (BLOCK_PAREN | BLOCK_BRACE);
393 1.1 jruoho
394 1.1 jruoho case AML_BUFFER_OP:
395 1.1 jruoho
396 1.2 christos if ((Op->Common.DisasmOpcode == ACPI_DASM_UNICODE) ||
397 1.2 christos (Op->Common.DisasmOpcode == ACPI_DASM_UUID) ||
398 1.2 christos (Op->Common.DisasmOpcode == ACPI_DASM_PLD_METHOD))
399 1.1 jruoho {
400 1.1 jruoho return (BLOCK_NONE);
401 1.1 jruoho }
402 1.1 jruoho
403 1.14 christos ACPI_FALLTHROUGH;
404 1.1 jruoho
405 1.1 jruoho case AML_PACKAGE_OP:
406 1.8 christos case AML_VARIABLE_PACKAGE_OP:
407 1.1 jruoho
408 1.1 jruoho return (BLOCK_PAREN | BLOCK_BRACE);
409 1.1 jruoho
410 1.1 jruoho case AML_EVENT_OP:
411 1.1 jruoho
412 1.1 jruoho return (BLOCK_PAREN);
413 1.1 jruoho
414 1.2 christos case AML_INT_METHODCALL_OP:
415 1.2 christos
416 1.2 christos if (Op->Common.Parent &&
417 1.2 christos ((Op->Common.Parent->Common.AmlOpcode == AML_PACKAGE_OP) ||
418 1.8 christos (Op->Common.Parent->Common.AmlOpcode == AML_VARIABLE_PACKAGE_OP)))
419 1.2 christos {
420 1.2 christos /* This is a reference to a method, not an invocation */
421 1.2 christos
422 1.2 christos return (BLOCK_NONE);
423 1.2 christos }
424 1.2 christos
425 1.14 christos ACPI_FALLTHROUGH;
426 1.2 christos
427 1.1 jruoho default:
428 1.1 jruoho
429 1.1 jruoho OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
430 1.1 jruoho if (OpInfo->Flags & AML_HAS_ARGS)
431 1.1 jruoho {
432 1.1 jruoho return (BLOCK_PAREN);
433 1.1 jruoho }
434 1.1 jruoho
435 1.1 jruoho return (BLOCK_NONE);
436 1.1 jruoho }
437 1.1 jruoho }
438 1.1 jruoho
439 1.1 jruoho
440 1.1 jruoho /*******************************************************************************
441 1.1 jruoho *
442 1.1 jruoho * FUNCTION: AcpiDmListType
443 1.1 jruoho *
444 1.1 jruoho * PARAMETERS: Op - Object to be examined
445 1.1 jruoho *
446 1.1 jruoho * RETURN: ListType - has commas or not.
447 1.1 jruoho *
448 1.1 jruoho * DESCRIPTION: Type of block for this op (parens or braces)
449 1.1 jruoho *
450 1.1 jruoho ******************************************************************************/
451 1.1 jruoho
452 1.1 jruoho UINT32
453 1.1 jruoho AcpiDmListType (
454 1.1 jruoho ACPI_PARSE_OBJECT *Op)
455 1.1 jruoho {
456 1.1 jruoho const ACPI_OPCODE_INFO *OpInfo;
457 1.1 jruoho
458 1.1 jruoho
459 1.1 jruoho if (!Op)
460 1.1 jruoho {
461 1.1 jruoho return (BLOCK_NONE);
462 1.1 jruoho }
463 1.1 jruoho
464 1.1 jruoho switch (Op->Common.AmlOpcode)
465 1.1 jruoho {
466 1.1 jruoho
467 1.1 jruoho case AML_ELSE_OP:
468 1.1 jruoho case AML_METHOD_OP:
469 1.1 jruoho case AML_DEVICE_OP:
470 1.1 jruoho case AML_SCOPE_OP:
471 1.8 christos case AML_POWER_RESOURCE_OP:
472 1.1 jruoho case AML_PROCESSOR_OP:
473 1.1 jruoho case AML_THERMAL_ZONE_OP:
474 1.1 jruoho case AML_IF_OP:
475 1.1 jruoho case AML_WHILE_OP:
476 1.1 jruoho case AML_FIELD_OP:
477 1.1 jruoho case AML_INDEX_FIELD_OP:
478 1.1 jruoho case AML_BANK_FIELD_OP:
479 1.1 jruoho
480 1.1 jruoho return (BLOCK_NONE);
481 1.1 jruoho
482 1.1 jruoho case AML_BUFFER_OP:
483 1.1 jruoho case AML_PACKAGE_OP:
484 1.8 christos case AML_VARIABLE_PACKAGE_OP:
485 1.1 jruoho
486 1.1 jruoho return (BLOCK_COMMA_LIST);
487 1.1 jruoho
488 1.1 jruoho default:
489 1.1 jruoho
490 1.1 jruoho OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
491 1.1 jruoho if (OpInfo->Flags & AML_HAS_ARGS)
492 1.1 jruoho {
493 1.1 jruoho return (BLOCK_COMMA_LIST);
494 1.1 jruoho }
495 1.1 jruoho
496 1.1 jruoho return (BLOCK_NONE);
497 1.1 jruoho }
498 1.1 jruoho }
499 1.1 jruoho
500 1.1 jruoho
501 1.1 jruoho /*******************************************************************************
502 1.1 jruoho *
503 1.1 jruoho * FUNCTION: AcpiDmDescendingOp
504 1.1 jruoho *
505 1.1 jruoho * PARAMETERS: ASL_WALK_CALLBACK
506 1.1 jruoho *
507 1.1 jruoho * RETURN: Status
508 1.1 jruoho *
509 1.1 jruoho * DESCRIPTION: First visitation of a parse object during tree descent.
510 1.1 jruoho * Decode opcode name and begin parameter list(s), if any.
511 1.1 jruoho *
512 1.1 jruoho ******************************************************************************/
513 1.1 jruoho
514 1.1 jruoho static ACPI_STATUS
515 1.1 jruoho AcpiDmDescendingOp (
516 1.1 jruoho ACPI_PARSE_OBJECT *Op,
517 1.1 jruoho UINT32 Level,
518 1.1 jruoho void *Context)
519 1.1 jruoho {
520 1.1 jruoho ACPI_OP_WALK_INFO *Info = Context;
521 1.1 jruoho const ACPI_OPCODE_INFO *OpInfo;
522 1.1 jruoho UINT32 Name;
523 1.1 jruoho ACPI_PARSE_OBJECT *NextOp;
524 1.5 christos ACPI_PARSE_OBJECT *NextOp2;
525 1.3 christos UINT32 AmlOffset;
526 1.1 jruoho
527 1.1 jruoho
528 1.8 christos /* Determine which file this parse node is contained in. */
529 1.8 christos
530 1.10 christos if (AcpiGbl_CaptureComments)
531 1.8 christos {
532 1.8 christos ASL_CV_LABEL_FILENODE (Op);
533 1.8 christos
534 1.8 christos if (Level != 0 && ASL_CV_FILE_HAS_SWITCHED (Op))
535 1.8 christos {
536 1.8 christos ASL_CV_SWITCH_FILES (Level, Op);
537 1.8 christos }
538 1.8 christos
539 1.8 christos /* If this parse node has regular comments, print them here. */
540 1.8 christos
541 1.8 christos ASL_CV_PRINT_ONE_COMMENT (Op, AML_COMMENT_STANDARD, NULL, Level);
542 1.8 christos }
543 1.8 christos
544 1.4 christos OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
545 1.4 christos
546 1.4 christos /* Listing support to dump the AML code after the ASL statement */
547 1.4 christos
548 1.4 christos if (AcpiGbl_DmOpt_Listing)
549 1.3 christos {
550 1.4 christos /* We only care about these classes of objects */
551 1.3 christos
552 1.4 christos if ((OpInfo->Class == AML_CLASS_NAMED_OBJECT) ||
553 1.4 christos (OpInfo->Class == AML_CLASS_CONTROL) ||
554 1.4 christos (OpInfo->Class == AML_CLASS_CREATE) ||
555 1.4 christos ((OpInfo->Class == AML_CLASS_EXECUTE) && (!Op->Common.Next)))
556 1.3 christos {
557 1.4 christos if (AcpiGbl_DmOpt_Listing && Info->PreviousAml)
558 1.4 christos {
559 1.4 christos /* Dump the AML byte code for the previous Op */
560 1.4 christos
561 1.4 christos if (Op->Common.Aml > Info->PreviousAml)
562 1.4 christos {
563 1.4 christos AcpiOsPrintf ("\n");
564 1.4 christos AcpiUtDumpBuffer (
565 1.4 christos (Info->StartAml + Info->AmlOffset),
566 1.4 christos (Op->Common.Aml - Info->PreviousAml),
567 1.5 christos DB_BYTE_DISPLAY, Info->AmlOffset);
568 1.4 christos AcpiOsPrintf ("\n");
569 1.4 christos }
570 1.4 christos
571 1.4 christos Info->AmlOffset = (Op->Common.Aml - Info->StartAml);
572 1.4 christos }
573 1.4 christos
574 1.4 christos Info->PreviousAml = Op->Common.Aml;
575 1.3 christos }
576 1.3 christos }
577 1.3 christos
578 1.1 jruoho if (Op->Common.DisasmFlags & ACPI_PARSEOP_IGNORE)
579 1.1 jruoho {
580 1.1 jruoho /* Ignore this op -- it was handled elsewhere */
581 1.1 jruoho
582 1.1 jruoho return (AE_CTRL_DEPTH);
583 1.1 jruoho }
584 1.1 jruoho
585 1.7 christos if (Op->Common.DisasmOpcode == ACPI_DASM_IGNORE_SINGLE)
586 1.7 christos {
587 1.7 christos /* Ignore this op, but not it's children */
588 1.7 christos
589 1.7 christos return (AE_OK);
590 1.7 christos }
591 1.7 christos
592 1.5 christos if (Op->Common.AmlOpcode == AML_IF_OP)
593 1.5 christos {
594 1.5 christos NextOp = AcpiPsGetDepthNext (NULL, Op);
595 1.5 christos if (NextOp)
596 1.5 christos {
597 1.5 christos NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
598 1.5 christos
599 1.6 christos /* Don't emit the actual embedded externals unless asked */
600 1.6 christos
601 1.6 christos if (!AcpiGbl_DmEmitExternalOpcodes)
602 1.5 christos {
603 1.6 christos /*
604 1.6 christos * A Zero predicate indicates the possibility of one or more
605 1.6 christos * External() opcodes within the If() block.
606 1.6 christos */
607 1.6 christos if (NextOp->Common.AmlOpcode == AML_ZERO_OP)
608 1.6 christos {
609 1.6 christos NextOp2 = NextOp->Common.Next;
610 1.5 christos
611 1.6 christos if (NextOp2 &&
612 1.6 christos (NextOp2->Common.AmlOpcode == AML_EXTERNAL_OP))
613 1.6 christos {
614 1.6 christos /* Ignore the If 0 block and all children */
615 1.5 christos
616 1.6 christos Op->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
617 1.6 christos return (AE_CTRL_DEPTH);
618 1.6 christos }
619 1.5 christos }
620 1.5 christos }
621 1.5 christos }
622 1.5 christos }
623 1.5 christos
624 1.1 jruoho /* Level 0 is at the Definition Block level */
625 1.1 jruoho
626 1.1 jruoho if (Level == 0)
627 1.1 jruoho {
628 1.1 jruoho /* In verbose mode, print the AML offset, opcode and depth count */
629 1.1 jruoho
630 1.1 jruoho if (Info->WalkState)
631 1.1 jruoho {
632 1.3 christos AmlOffset = (UINT32) ACPI_PTR_DIFF (Op->Common.Aml,
633 1.4 christos Info->WalkState->ParserState.AmlStart);
634 1.4 christos if (AcpiGbl_DmOpt_Verbose)
635 1.4 christos {
636 1.9 christos if (AcpiGbl_CmSingleStep)
637 1.9 christos {
638 1.9 christos AcpiOsPrintf ("%5.5X/%4.4X: ",
639 1.9 christos AmlOffset, (UINT32) Op->Common.AmlOpcode);
640 1.9 christos }
641 1.9 christos else
642 1.9 christos {
643 1.9 christos AcpiOsPrintf ("AML Offset %5.5X, Opcode %4.4X: ",
644 1.9 christos AmlOffset, (UINT32) Op->Common.AmlOpcode);
645 1.9 christos }
646 1.4 christos }
647 1.1 jruoho }
648 1.1 jruoho
649 1.1 jruoho if (Op->Common.AmlOpcode == AML_SCOPE_OP)
650 1.1 jruoho {
651 1.1 jruoho /* This is the beginning of the Definition Block */
652 1.1 jruoho
653 1.1 jruoho AcpiOsPrintf ("{\n");
654 1.1 jruoho
655 1.1 jruoho /* Emit all External() declarations here */
656 1.1 jruoho
657 1.8 christos if (!AcpiGbl_DmEmitExternalOpcodes)
658 1.8 christos {
659 1.8 christos AcpiDmEmitExternals ();
660 1.8 christos }
661 1.8 christos
662 1.1 jruoho return (AE_OK);
663 1.1 jruoho }
664 1.1 jruoho }
665 1.1 jruoho else if ((AcpiDmBlockType (Op->Common.Parent) & BLOCK_BRACE) &&
666 1.5 christos (!(Op->Common.DisasmFlags & ACPI_PARSEOP_PARAMETER_LIST)) &&
667 1.4 christos (!(Op->Common.DisasmFlags & ACPI_PARSEOP_ELSEIF)) &&
668 1.4 christos (Op->Common.AmlOpcode != AML_INT_BYTELIST_OP))
669 1.1 jruoho {
670 1.4 christos /*
671 1.4 christos * This is a first-level element of a term list,
672 1.4 christos * indent a new line
673 1.4 christos */
674 1.4 christos switch (Op->Common.AmlOpcode)
675 1.4 christos {
676 1.4 christos case AML_NOOP_OP:
677 1.1 jruoho /*
678 1.4 christos * Optionally just ignore this opcode. Some tables use
679 1.4 christos * NoOp opcodes for "padding" out packages that the BIOS
680 1.4 christos * changes dynamically. This can leave hundreds or
681 1.4 christos * thousands of NoOp opcodes that if disassembled,
682 1.4 christos * cannot be compiled because they are syntactically
683 1.4 christos * incorrect.
684 1.1 jruoho */
685 1.4 christos if (AcpiGbl_IgnoreNoopOperator)
686 1.2 christos {
687 1.4 christos Op->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
688 1.4 christos return (AE_OK);
689 1.4 christos }
690 1.2 christos
691 1.14 christos ACPI_FALLTHROUGH;
692 1.2 christos
693 1.4 christos default:
694 1.2 christos
695 1.4 christos AcpiDmIndent (Level);
696 1.4 christos break;
697 1.4 christos }
698 1.2 christos
699 1.4 christos Info->LastLevel = Level;
700 1.4 christos Info->Count = 0;
701 1.1 jruoho }
702 1.1 jruoho
703 1.1 jruoho /*
704 1.1 jruoho * This is an inexpensive mechanism to try and keep lines from getting
705 1.1 jruoho * too long. When the limit is hit, start a new line at the previous
706 1.1 jruoho * indent plus one. A better but more expensive mechanism would be to
707 1.1 jruoho * keep track of the current column.
708 1.1 jruoho */
709 1.1 jruoho Info->Count++;
710 1.2 christos if (Info->Count /* +Info->LastLevel */ > 12)
711 1.1 jruoho {
712 1.1 jruoho Info->Count = 0;
713 1.1 jruoho AcpiOsPrintf ("\n");
714 1.1 jruoho AcpiDmIndent (Info->LastLevel + 1);
715 1.1 jruoho }
716 1.1 jruoho
717 1.2 christos /* If ASL+ is enabled, check for a C-style operator */
718 1.2 christos
719 1.2 christos if (AcpiDmCheckForSymbolicOpcode (Op, Info))
720 1.2 christos {
721 1.2 christos return (AE_OK);
722 1.2 christos }
723 1.2 christos
724 1.1 jruoho /* Print the opcode name */
725 1.1 jruoho
726 1.1 jruoho AcpiDmDisassembleOneOp (NULL, Info, Op);
727 1.1 jruoho
728 1.2 christos if ((Op->Common.DisasmOpcode == ACPI_DASM_LNOT_PREFIX) ||
729 1.2 christos (Op->Common.AmlOpcode == AML_INT_CONNECTION_OP))
730 1.1 jruoho {
731 1.1 jruoho return (AE_OK);
732 1.1 jruoho }
733 1.1 jruoho
734 1.1 jruoho if ((Op->Common.AmlOpcode == AML_NAME_OP) ||
735 1.1 jruoho (Op->Common.AmlOpcode == AML_RETURN_OP))
736 1.1 jruoho {
737 1.1 jruoho Info->Level--;
738 1.1 jruoho }
739 1.1 jruoho
740 1.8 christos if (Op->Common.AmlOpcode == AML_EXTERNAL_OP)
741 1.8 christos {
742 1.8 christos Op->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
743 1.8 christos return (AE_CTRL_DEPTH);
744 1.8 christos }
745 1.8 christos
746 1.1 jruoho /* Start the opcode argument list if necessary */
747 1.1 jruoho
748 1.1 jruoho if ((OpInfo->Flags & AML_HAS_ARGS) ||
749 1.1 jruoho (Op->Common.AmlOpcode == AML_EVENT_OP))
750 1.1 jruoho {
751 1.1 jruoho /* This opcode has an argument list */
752 1.1 jruoho
753 1.1 jruoho if (AcpiDmBlockType (Op) & BLOCK_PAREN)
754 1.1 jruoho {
755 1.1 jruoho AcpiOsPrintf (" (");
756 1.8 christos if (!(AcpiDmBlockType (Op) & BLOCK_BRACE))
757 1.8 christos {
758 1.8 christos ASL_CV_PRINT_ONE_COMMENT (Op, AMLCOMMENT_INLINE, " ", 0);
759 1.8 christos }
760 1.1 jruoho }
761 1.1 jruoho
762 1.1 jruoho /* If this is a named opcode, print the associated name value */
763 1.1 jruoho
764 1.1 jruoho if (OpInfo->Flags & AML_NAMED)
765 1.1 jruoho {
766 1.1 jruoho switch (Op->Common.AmlOpcode)
767 1.1 jruoho {
768 1.1 jruoho case AML_ALIAS_OP:
769 1.1 jruoho
770 1.1 jruoho NextOp = AcpiPsGetDepthNext (NULL, Op);
771 1.1 jruoho NextOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
772 1.1 jruoho AcpiDmNamestring (NextOp->Common.Value.Name);
773 1.1 jruoho AcpiOsPrintf (", ");
774 1.1 jruoho
775 1.14 christos ACPI_FALLTHROUGH;
776 1.1 jruoho
777 1.1 jruoho default:
778 1.1 jruoho
779 1.1 jruoho Name = AcpiPsGetName (Op);
780 1.1 jruoho if (Op->Named.Path)
781 1.1 jruoho {
782 1.9 christos AcpiDmNamestring (Op->Named.Path);
783 1.1 jruoho }
784 1.1 jruoho else
785 1.1 jruoho {
786 1.1 jruoho AcpiDmDumpName (Name);
787 1.1 jruoho }
788 1.1 jruoho
789 1.1 jruoho if (Op->Common.AmlOpcode != AML_INT_NAMEDFIELD_OP)
790 1.1 jruoho {
791 1.4 christos if (AcpiGbl_DmOpt_Verbose)
792 1.1 jruoho {
793 1.1 jruoho (void) AcpiPsDisplayObjectPathname (NULL, Op);
794 1.1 jruoho }
795 1.1 jruoho }
796 1.1 jruoho break;
797 1.1 jruoho }
798 1.1 jruoho
799 1.1 jruoho switch (Op->Common.AmlOpcode)
800 1.1 jruoho {
801 1.1 jruoho case AML_METHOD_OP:
802 1.1 jruoho
803 1.1 jruoho AcpiDmMethodFlags (Op);
804 1.8 christos ASL_CV_CLOSE_PAREN (Op, Level);
805 1.2 christos
806 1.2 christos /* Emit description comment for Method() with a predefined ACPI name */
807 1.2 christos
808 1.2 christos AcpiDmPredefinedDescription (Op);
809 1.1 jruoho break;
810 1.1 jruoho
811 1.1 jruoho case AML_NAME_OP:
812 1.1 jruoho
813 1.1 jruoho /* Check for _HID and related EISAID() */
814 1.1 jruoho
815 1.2 christos AcpiDmCheckForHardwareId (Op);
816 1.1 jruoho AcpiOsPrintf (", ");
817 1.8 christos ASL_CV_PRINT_ONE_COMMENT (Op, AML_NAMECOMMENT, NULL, 0);
818 1.1 jruoho break;
819 1.1 jruoho
820 1.1 jruoho case AML_REGION_OP:
821 1.1 jruoho
822 1.1 jruoho AcpiDmRegionFlags (Op);
823 1.1 jruoho break;
824 1.1 jruoho
825 1.8 christos case AML_POWER_RESOURCE_OP:
826 1.1 jruoho
827 1.1 jruoho /* Mark the next two Ops as part of the parameter list */
828 1.1 jruoho
829 1.1 jruoho AcpiOsPrintf (", ");
830 1.1 jruoho NextOp = AcpiPsGetDepthNext (NULL, Op);
831 1.5 christos NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
832 1.1 jruoho
833 1.1 jruoho NextOp = NextOp->Common.Next;
834 1.5 christos NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
835 1.1 jruoho return (AE_OK);
836 1.1 jruoho
837 1.1 jruoho case AML_PROCESSOR_OP:
838 1.1 jruoho
839 1.1 jruoho /* Mark the next three Ops as part of the parameter list */
840 1.1 jruoho
841 1.1 jruoho AcpiOsPrintf (", ");
842 1.1 jruoho NextOp = AcpiPsGetDepthNext (NULL, Op);
843 1.5 christos NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
844 1.1 jruoho
845 1.1 jruoho NextOp = NextOp->Common.Next;
846 1.5 christos NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
847 1.1 jruoho
848 1.1 jruoho NextOp = NextOp->Common.Next;
849 1.5 christos NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
850 1.1 jruoho return (AE_OK);
851 1.1 jruoho
852 1.1 jruoho case AML_MUTEX_OP:
853 1.1 jruoho case AML_DATA_REGION_OP:
854 1.1 jruoho
855 1.1 jruoho AcpiOsPrintf (", ");
856 1.1 jruoho return (AE_OK);
857 1.1 jruoho
858 1.1 jruoho case AML_EVENT_OP:
859 1.1 jruoho case AML_ALIAS_OP:
860 1.1 jruoho
861 1.1 jruoho return (AE_OK);
862 1.1 jruoho
863 1.1 jruoho case AML_SCOPE_OP:
864 1.1 jruoho case AML_DEVICE_OP:
865 1.1 jruoho case AML_THERMAL_ZONE_OP:
866 1.1 jruoho
867 1.8 christos ASL_CV_CLOSE_PAREN (Op, Level);
868 1.1 jruoho break;
869 1.1 jruoho
870 1.1 jruoho default:
871 1.1 jruoho
872 1.2 christos AcpiOsPrintf ("*** Unhandled named opcode %X\n",
873 1.2 christos Op->Common.AmlOpcode);
874 1.1 jruoho break;
875 1.1 jruoho }
876 1.1 jruoho }
877 1.1 jruoho
878 1.1 jruoho else switch (Op->Common.AmlOpcode)
879 1.1 jruoho {
880 1.1 jruoho case AML_FIELD_OP:
881 1.1 jruoho case AML_BANK_FIELD_OP:
882 1.1 jruoho case AML_INDEX_FIELD_OP:
883 1.1 jruoho
884 1.1 jruoho Info->BitOffset = 0;
885 1.1 jruoho
886 1.1 jruoho /* Name of the parent OperationRegion */
887 1.1 jruoho
888 1.1 jruoho NextOp = AcpiPsGetDepthNext (NULL, Op);
889 1.1 jruoho AcpiDmNamestring (NextOp->Common.Value.Name);
890 1.1 jruoho AcpiOsPrintf (", ");
891 1.1 jruoho NextOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
892 1.1 jruoho
893 1.1 jruoho switch (Op->Common.AmlOpcode)
894 1.1 jruoho {
895 1.1 jruoho case AML_BANK_FIELD_OP:
896 1.1 jruoho
897 1.1 jruoho /* Namestring - Bank Name */
898 1.1 jruoho
899 1.1 jruoho NextOp = AcpiPsGetDepthNext (NULL, NextOp);
900 1.1 jruoho AcpiDmNamestring (NextOp->Common.Value.Name);
901 1.1 jruoho NextOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
902 1.1 jruoho AcpiOsPrintf (", ");
903 1.1 jruoho
904 1.1 jruoho /*
905 1.1 jruoho * Bank Value. This is a TermArg in the middle of the parameter
906 1.1 jruoho * list, must handle it here.
907 1.1 jruoho *
908 1.5 christos * Disassemble the TermArg parse tree. ACPI_PARSEOP_PARAMETER_LIST
909 1.1 jruoho * eliminates newline in the output.
910 1.1 jruoho */
911 1.1 jruoho NextOp = NextOp->Common.Next;
912 1.1 jruoho
913 1.5 christos Info->Flags = ACPI_PARSEOP_PARAMETER_LIST;
914 1.2 christos AcpiDmWalkParseTree (NextOp, AcpiDmDescendingOp,
915 1.2 christos AcpiDmAscendingOp, Info);
916 1.1 jruoho Info->Flags = 0;
917 1.1 jruoho Info->Level = Level;
918 1.1 jruoho
919 1.1 jruoho NextOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
920 1.1 jruoho AcpiOsPrintf (", ");
921 1.1 jruoho break;
922 1.1 jruoho
923 1.1 jruoho case AML_INDEX_FIELD_OP:
924 1.1 jruoho
925 1.1 jruoho /* Namestring - Data Name */
926 1.1 jruoho
927 1.1 jruoho NextOp = AcpiPsGetDepthNext (NULL, NextOp);
928 1.1 jruoho AcpiDmNamestring (NextOp->Common.Value.Name);
929 1.1 jruoho AcpiOsPrintf (", ");
930 1.1 jruoho NextOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
931 1.1 jruoho break;
932 1.1 jruoho
933 1.1 jruoho default:
934 1.1 jruoho
935 1.1 jruoho break;
936 1.1 jruoho }
937 1.1 jruoho
938 1.1 jruoho AcpiDmFieldFlags (NextOp);
939 1.1 jruoho break;
940 1.1 jruoho
941 1.1 jruoho case AML_BUFFER_OP:
942 1.1 jruoho
943 1.1 jruoho /* The next op is the size parameter */
944 1.1 jruoho
945 1.1 jruoho NextOp = AcpiPsGetDepthNext (NULL, Op);
946 1.1 jruoho if (!NextOp)
947 1.1 jruoho {
948 1.1 jruoho /* Single-step support */
949 1.1 jruoho
950 1.1 jruoho return (AE_OK);
951 1.1 jruoho }
952 1.1 jruoho
953 1.1 jruoho if (Op->Common.DisasmOpcode == ACPI_DASM_RESOURCE)
954 1.1 jruoho {
955 1.1 jruoho /*
956 1.2 christos * We have a resource list. Don't need to output
957 1.2 christos * the buffer size Op. Open up a new block
958 1.1 jruoho */
959 1.1 jruoho NextOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
960 1.8 christos ASL_CV_CLOSE_PAREN (Op, Level);
961 1.2 christos
962 1.15 christos if (Op->Asl.Parent->Common.AmlOpcode == AML_NAME_OP)
963 1.15 christos {
964 1.15 christos /*
965 1.15 christos * Emit description comment showing the full ACPI name
966 1.15 christos * of the ResourceTemplate only if it was defined using a
967 1.15 christos * Name statement.
968 1.15 christos */
969 1.15 christos AcpiDmPredefinedDescription (Op->Asl.Parent);
970 1.15 christos }
971 1.2 christos
972 1.18 christos AcpiDmPredefinedDescription (Op->Asl.Parent);
973 1.18 christos
974 1.2 christos AcpiOsPrintf ("\n");
975 1.1 jruoho AcpiDmIndent (Info->Level);
976 1.1 jruoho AcpiOsPrintf ("{\n");
977 1.1 jruoho return (AE_OK);
978 1.1 jruoho }
979 1.1 jruoho
980 1.1 jruoho /* Normal Buffer, mark size as in the parameter list */
981 1.1 jruoho
982 1.5 christos NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
983 1.1 jruoho return (AE_OK);
984 1.1 jruoho
985 1.5 christos case AML_IF_OP:
986 1.8 christos case AML_VARIABLE_PACKAGE_OP:
987 1.1 jruoho case AML_WHILE_OP:
988 1.1 jruoho
989 1.1 jruoho /* The next op is the size or predicate parameter */
990 1.1 jruoho
991 1.1 jruoho NextOp = AcpiPsGetDepthNext (NULL, Op);
992 1.1 jruoho if (NextOp)
993 1.1 jruoho {
994 1.5 christos NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
995 1.1 jruoho }
996 1.1 jruoho return (AE_OK);
997 1.1 jruoho
998 1.1 jruoho case AML_PACKAGE_OP:
999 1.1 jruoho
1000 1.2 christos /* The next op is the size parameter */
1001 1.1 jruoho
1002 1.1 jruoho NextOp = AcpiPsGetDepthNext (NULL, Op);
1003 1.1 jruoho if (NextOp)
1004 1.1 jruoho {
1005 1.5 christos NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
1006 1.1 jruoho }
1007 1.1 jruoho return (AE_OK);
1008 1.1 jruoho
1009 1.1 jruoho case AML_MATCH_OP:
1010 1.1 jruoho
1011 1.1 jruoho AcpiDmMatchOp (Op);
1012 1.1 jruoho break;
1013 1.1 jruoho
1014 1.1 jruoho default:
1015 1.1 jruoho
1016 1.1 jruoho break;
1017 1.1 jruoho }
1018 1.1 jruoho
1019 1.1 jruoho if (AcpiDmBlockType (Op) & BLOCK_BRACE)
1020 1.1 jruoho {
1021 1.1 jruoho AcpiOsPrintf ("\n");
1022 1.1 jruoho AcpiDmIndent (Level);
1023 1.1 jruoho AcpiOsPrintf ("{\n");
1024 1.1 jruoho }
1025 1.1 jruoho }
1026 1.1 jruoho
1027 1.1 jruoho return (AE_OK);
1028 1.1 jruoho }
1029 1.1 jruoho
1030 1.1 jruoho
1031 1.1 jruoho /*******************************************************************************
1032 1.1 jruoho *
1033 1.1 jruoho * FUNCTION: AcpiDmAscendingOp
1034 1.1 jruoho *
1035 1.1 jruoho * PARAMETERS: ASL_WALK_CALLBACK
1036 1.1 jruoho *
1037 1.1 jruoho * RETURN: Status
1038 1.1 jruoho *
1039 1.1 jruoho * DESCRIPTION: Second visitation of a parse object, during ascent of parse
1040 1.2 christos * tree. Close out any parameter lists and complete the opcode.
1041 1.1 jruoho *
1042 1.1 jruoho ******************************************************************************/
1043 1.1 jruoho
1044 1.1 jruoho static ACPI_STATUS
1045 1.1 jruoho AcpiDmAscendingOp (
1046 1.1 jruoho ACPI_PARSE_OBJECT *Op,
1047 1.1 jruoho UINT32 Level,
1048 1.1 jruoho void *Context)
1049 1.1 jruoho {
1050 1.1 jruoho ACPI_OP_WALK_INFO *Info = Context;
1051 1.2 christos ACPI_PARSE_OBJECT *ParentOp;
1052 1.1 jruoho
1053 1.1 jruoho
1054 1.8 christos /* Point the Op's filename pointer to the proper file */
1055 1.8 christos
1056 1.10 christos if (AcpiGbl_CaptureComments)
1057 1.8 christos {
1058 1.8 christos ASL_CV_LABEL_FILENODE (Op);
1059 1.8 christos
1060 1.8 christos /* Switch the output of these files if necessary */
1061 1.8 christos
1062 1.8 christos if (ASL_CV_FILE_HAS_SWITCHED (Op))
1063 1.8 christos {
1064 1.8 christos ASL_CV_SWITCH_FILES (Level, Op);
1065 1.8 christos }
1066 1.8 christos }
1067 1.8 christos
1068 1.7 christos if (Op->Common.DisasmFlags & ACPI_PARSEOP_IGNORE ||
1069 1.7 christos Op->Common.DisasmOpcode == ACPI_DASM_IGNORE_SINGLE)
1070 1.1 jruoho {
1071 1.1 jruoho /* Ignore this op -- it was handled elsewhere */
1072 1.1 jruoho
1073 1.1 jruoho return (AE_OK);
1074 1.1 jruoho }
1075 1.1 jruoho
1076 1.1 jruoho if ((Level == 0) && (Op->Common.AmlOpcode == AML_SCOPE_OP))
1077 1.1 jruoho {
1078 1.1 jruoho /* Indicates the end of the current descriptor block (table) */
1079 1.1 jruoho
1080 1.8 christos ASL_CV_CLOSE_BRACE (Op, Level);
1081 1.8 christos
1082 1.8 christos /* Print any comments that are at the end of the file here */
1083 1.8 christos
1084 1.10 christos if (AcpiGbl_CaptureComments && AcpiGbl_LastListHead)
1085 1.8 christos {
1086 1.8 christos AcpiOsPrintf ("\n");
1087 1.8 christos ASL_CV_PRINT_ONE_COMMENT_LIST (AcpiGbl_LastListHead, 0);
1088 1.8 christos }
1089 1.8 christos AcpiOsPrintf ("\n\n");
1090 1.8 christos
1091 1.1 jruoho return (AE_OK);
1092 1.1 jruoho }
1093 1.1 jruoho
1094 1.1 jruoho switch (AcpiDmBlockType (Op))
1095 1.1 jruoho {
1096 1.1 jruoho case BLOCK_PAREN:
1097 1.1 jruoho
1098 1.2 christos /* Completed an op that has arguments, add closing paren if needed */
1099 1.2 christos
1100 1.2 christos AcpiDmCloseOperator (Op);
1101 1.2 christos
1102 1.2 christos if (Op->Common.AmlOpcode == AML_NAME_OP)
1103 1.2 christos {
1104 1.2 christos /* Emit description comment for Name() with a predefined ACPI name */
1105 1.2 christos
1106 1.2 christos AcpiDmPredefinedDescription (Op);
1107 1.2 christos }
1108 1.2 christos else
1109 1.2 christos {
1110 1.2 christos /* For Create* operators, attempt to emit resource tag description */
1111 1.2 christos
1112 1.2 christos AcpiDmFieldPredefinedDescription (Op);
1113 1.2 christos }
1114 1.2 christos
1115 1.2 christos /* Decode Notify() values */
1116 1.2 christos
1117 1.2 christos if (Op->Common.AmlOpcode == AML_NOTIFY_OP)
1118 1.2 christos {
1119 1.2 christos AcpiDmNotifyDescription (Op);
1120 1.2 christos }
1121 1.1 jruoho
1122 1.2 christos AcpiDmDisplayTargetPathname (Op);
1123 1.1 jruoho
1124 1.1 jruoho /* Could be a nested operator, check if comma required */
1125 1.1 jruoho
1126 1.1 jruoho if (!AcpiDmCommaIfListMember (Op))
1127 1.1 jruoho {
1128 1.1 jruoho if ((AcpiDmBlockType (Op->Common.Parent) & BLOCK_BRACE) &&
1129 1.5 christos (!(Op->Common.DisasmFlags & ACPI_PARSEOP_PARAMETER_LIST)) &&
1130 1.4 christos (Op->Common.AmlOpcode != AML_INT_BYTELIST_OP))
1131 1.1 jruoho {
1132 1.1 jruoho /*
1133 1.1 jruoho * This is a first-level element of a term list
1134 1.1 jruoho * start a new line
1135 1.1 jruoho */
1136 1.5 christos if (!(Info->Flags & ACPI_PARSEOP_PARAMETER_LIST))
1137 1.1 jruoho {
1138 1.1 jruoho AcpiOsPrintf ("\n");
1139 1.1 jruoho }
1140 1.1 jruoho }
1141 1.1 jruoho }
1142 1.1 jruoho break;
1143 1.1 jruoho
1144 1.1 jruoho case BLOCK_BRACE:
1145 1.1 jruoho case (BLOCK_BRACE | BLOCK_PAREN):
1146 1.1 jruoho
1147 1.1 jruoho /* Completed an op that has a term list, add closing brace */
1148 1.1 jruoho
1149 1.1 jruoho if (Op->Common.DisasmFlags & ACPI_PARSEOP_EMPTY_TERMLIST)
1150 1.1 jruoho {
1151 1.8 christos ASL_CV_CLOSE_BRACE (Op, Level);
1152 1.1 jruoho }
1153 1.1 jruoho else
1154 1.1 jruoho {
1155 1.1 jruoho AcpiDmIndent (Level);
1156 1.8 christos ASL_CV_CLOSE_BRACE (Op, Level);
1157 1.1 jruoho }
1158 1.1 jruoho
1159 1.1 jruoho AcpiDmCommaIfListMember (Op);
1160 1.1 jruoho
1161 1.1 jruoho if (AcpiDmBlockType (Op->Common.Parent) != BLOCK_PAREN)
1162 1.1 jruoho {
1163 1.1 jruoho AcpiOsPrintf ("\n");
1164 1.1 jruoho if (!(Op->Common.DisasmFlags & ACPI_PARSEOP_EMPTY_TERMLIST))
1165 1.1 jruoho {
1166 1.1 jruoho if ((Op->Common.AmlOpcode == AML_IF_OP) &&
1167 1.1 jruoho (Op->Common.Next) &&
1168 1.1 jruoho (Op->Common.Next->Common.AmlOpcode == AML_ELSE_OP))
1169 1.1 jruoho {
1170 1.1 jruoho break;
1171 1.1 jruoho }
1172 1.1 jruoho
1173 1.1 jruoho if ((AcpiDmBlockType (Op->Common.Parent) & BLOCK_BRACE) &&
1174 1.1 jruoho (!Op->Common.Next))
1175 1.1 jruoho {
1176 1.1 jruoho break;
1177 1.1 jruoho }
1178 1.1 jruoho AcpiOsPrintf ("\n");
1179 1.1 jruoho }
1180 1.1 jruoho }
1181 1.1 jruoho break;
1182 1.1 jruoho
1183 1.1 jruoho case BLOCK_NONE:
1184 1.1 jruoho default:
1185 1.1 jruoho
1186 1.1 jruoho /* Could be a nested operator, check if comma required */
1187 1.1 jruoho
1188 1.1 jruoho if (!AcpiDmCommaIfListMember (Op))
1189 1.1 jruoho {
1190 1.1 jruoho if ((AcpiDmBlockType (Op->Common.Parent) & BLOCK_BRACE) &&
1191 1.5 christos (!(Op->Common.DisasmFlags & ACPI_PARSEOP_PARAMETER_LIST)) &&
1192 1.4 christos (Op->Common.AmlOpcode != AML_INT_BYTELIST_OP))
1193 1.1 jruoho {
1194 1.1 jruoho /*
1195 1.1 jruoho * This is a first-level element of a term list
1196 1.1 jruoho * start a new line
1197 1.1 jruoho */
1198 1.1 jruoho AcpiOsPrintf ("\n");
1199 1.1 jruoho }
1200 1.1 jruoho }
1201 1.1 jruoho else if (Op->Common.Parent)
1202 1.1 jruoho {
1203 1.1 jruoho switch (Op->Common.Parent->Common.AmlOpcode)
1204 1.1 jruoho {
1205 1.1 jruoho case AML_PACKAGE_OP:
1206 1.8 christos case AML_VARIABLE_PACKAGE_OP:
1207 1.1 jruoho
1208 1.5 christos if (!(Op->Common.DisasmFlags & ACPI_PARSEOP_PARAMETER_LIST))
1209 1.1 jruoho {
1210 1.1 jruoho AcpiOsPrintf ("\n");
1211 1.1 jruoho }
1212 1.1 jruoho break;
1213 1.1 jruoho
1214 1.1 jruoho default:
1215 1.1 jruoho
1216 1.1 jruoho break;
1217 1.1 jruoho }
1218 1.1 jruoho }
1219 1.1 jruoho break;
1220 1.1 jruoho }
1221 1.1 jruoho
1222 1.5 christos if (Op->Common.DisasmFlags & ACPI_PARSEOP_PARAMETER_LIST)
1223 1.1 jruoho {
1224 1.1 jruoho if ((Op->Common.Next) &&
1225 1.5 christos (Op->Common.Next->Common.DisasmFlags & ACPI_PARSEOP_PARAMETER_LIST))
1226 1.1 jruoho {
1227 1.1 jruoho return (AE_OK);
1228 1.1 jruoho }
1229 1.1 jruoho
1230 1.1 jruoho /*
1231 1.2 christos * The parent Op is guaranteed to be valid because of the flag
1232 1.5 christos * ACPI_PARSEOP_PARAMETER_LIST -- which means that this op is part of
1233 1.2 christos * a parameter list and thus has a valid parent.
1234 1.2 christos */
1235 1.2 christos ParentOp = Op->Common.Parent;
1236 1.2 christos
1237 1.2 christos /*
1238 1.1 jruoho * Just completed a parameter node for something like "Buffer (param)".
1239 1.7 christos * Close the paren and open up the term list block with a brace.
1240 1.7 christos *
1241 1.7 christos * Switch predicates don't have a Next node but require a closing paren
1242 1.7 christos * and opening brace.
1243 1.1 jruoho */
1244 1.7 christos if (Op->Common.Next || Op->Common.DisasmOpcode == ACPI_DASM_SWITCH_PREDICATE)
1245 1.1 jruoho {
1246 1.8 christos ASL_CV_CLOSE_PAREN (Op, Level);
1247 1.2 christos
1248 1.2 christos /*
1249 1.2 christos * Emit a description comment for a Name() operator that is a
1250 1.2 christos * predefined ACPI name. Must check the grandparent.
1251 1.2 christos */
1252 1.2 christos ParentOp = ParentOp->Common.Parent;
1253 1.2 christos if (ParentOp &&
1254 1.2 christos (ParentOp->Asl.AmlOpcode == AML_NAME_OP))
1255 1.2 christos {
1256 1.2 christos AcpiDmPredefinedDescription (ParentOp);
1257 1.2 christos }
1258 1.2 christos
1259 1.7 christos /* Correct the indentation level for Switch and Case predicates */
1260 1.7 christos
1261 1.7 christos if (Op->Common.DisasmOpcode == ACPI_DASM_SWITCH_PREDICATE)
1262 1.7 christos {
1263 1.7 christos --Level;
1264 1.7 christos }
1265 1.7 christos
1266 1.2 christos AcpiOsPrintf ("\n");
1267 1.1 jruoho AcpiDmIndent (Level - 1);
1268 1.1 jruoho AcpiOsPrintf ("{\n");
1269 1.1 jruoho }
1270 1.1 jruoho else
1271 1.1 jruoho {
1272 1.2 christos ParentOp->Common.DisasmFlags |= ACPI_PARSEOP_EMPTY_TERMLIST;
1273 1.8 christos ASL_CV_CLOSE_PAREN (Op, Level);
1274 1.8 christos AcpiOsPrintf ("{");
1275 1.1 jruoho }
1276 1.1 jruoho }
1277 1.1 jruoho
1278 1.1 jruoho if ((Op->Common.AmlOpcode == AML_NAME_OP) ||
1279 1.1 jruoho (Op->Common.AmlOpcode == AML_RETURN_OP))
1280 1.1 jruoho {
1281 1.1 jruoho Info->Level++;
1282 1.1 jruoho }
1283 1.2 christos
1284 1.2 christos /*
1285 1.2 christos * For ASL+, check for and emit a C-style symbol. If valid, the
1286 1.2 christos * symbol string has been deferred until after the first operand
1287 1.2 christos */
1288 1.2 christos if (AcpiGbl_CstyleDisassembly)
1289 1.2 christos {
1290 1.2 christos if (Op->Asl.OperatorSymbol)
1291 1.2 christos {
1292 1.2 christos AcpiOsPrintf ("%s", Op->Asl.OperatorSymbol);
1293 1.2 christos Op->Asl.OperatorSymbol = NULL;
1294 1.2 christos }
1295 1.2 christos }
1296 1.2 christos
1297 1.1 jruoho return (AE_OK);
1298 1.1 jruoho }
1299