1 /*******************************************************************************
2  *
3  * Module Name: dmwalk - AML disassembly tree walk
4  *
5  ******************************************************************************/
6 
7 /******************************************************************************
8  *
9  * 1. Copyright Notice
10  *
11  * Some or all of this work - Copyright (c) 1999 - 2023, Intel Corp.
12  * All rights reserved.
13  *
14  * 2. License
15  *
16  * 2.1. This is your license from Intel Corp. under its intellectual property
17  * rights. You may have additional license terms from the party that provided
18  * you this software, covering your right to use that party's intellectual
19  * property rights.
20  *
21  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
22  * copy of the source code appearing in this file ("Covered Code") an
23  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
24  * base code distributed originally by Intel ("Original Intel Code") to copy,
25  * make derivatives, distribute, use and display any portion of the Covered
26  * Code in any form, with the right to sublicense such rights; and
27  *
28  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
29  * license (with the right to sublicense), under only those claims of Intel
30  * patents that are infringed by the Original Intel Code, to make, use, sell,
31  * offer to sell, and import the Covered Code and derivative works thereof
32  * solely to the minimum extent necessary to exercise the above copyright
33  * license, and in no event shall the patent license extend to any additions
34  * to or modifications of the Original Intel Code. No other license or right
35  * is granted directly or by implication, estoppel or otherwise;
36  *
37  * The above copyright and patent license is granted only if the following
38  * conditions are met:
39  *
40  * 3. Conditions
41  *
42  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
43  * Redistribution of source code of any substantial portion of the Covered
44  * Code or modification with rights to further distribute source must include
45  * the above Copyright Notice, the above License, this list of Conditions,
46  * and the following Disclaimer and Export Compliance provision. In addition,
47  * Licensee must cause all Covered Code to which Licensee contributes to
48  * contain a file documenting the changes Licensee made to create that Covered
49  * Code and the date of any change. Licensee must include in that file the
50  * documentation of any changes made by any predecessor Licensee. Licensee
51  * must include a prominent statement that the modification is derived,
52  * directly or indirectly, from Original Intel Code.
53  *
54  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
55  * Redistribution of source code of any substantial portion of the Covered
56  * Code or modification without rights to further distribute source must
57  * include the following Disclaimer and Export Compliance provision in the
58  * documentation and/or other materials provided with distribution. In
59  * addition, Licensee may not authorize further sublicense of source of any
60  * portion of the Covered Code, and must include terms to the effect that the
61  * license from Licensee to its licensee is limited to the intellectual
62  * property embodied in the software Licensee provides to its licensee, and
63  * not to intellectual property embodied in modifications its licensee may
64  * make.
65  *
66  * 3.3. Redistribution of Executable. Redistribution in executable form of any
67  * substantial portion of the Covered Code or modification must reproduce the
68  * above Copyright Notice, and the following Disclaimer and Export Compliance
69  * provision in the documentation and/or other materials provided with the
70  * distribution.
71  *
72  * 3.4. Intel retains all right, title, and interest in and to the Original
73  * Intel Code.
74  *
75  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
76  * Intel shall be used in advertising or otherwise to promote the sale, use or
77  * other dealings in products derived from or relating to the Covered Code
78  * without prior written authorization from Intel.
79  *
80  * 4. Disclaimer and Export Compliance
81  *
82  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
83  * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
84  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
85  * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
86  * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
87  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
88  * PARTICULAR PURPOSE.
89  *
90  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
91  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
92  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
93  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
94  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
95  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
96  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
97  * LIMITED REMEDY.
98  *
99  * 4.3. Licensee shall not export, either directly or indirectly, any of this
100  * software or system incorporating such software without first obtaining any
101  * required license or other approval from the U. S. Department of Commerce or
102  * any other agency or department of the United States Government. In the
103  * event Licensee exports any such software from the United States or
104  * re-exports any such software from a foreign destination, Licensee shall
105  * ensure that the distribution and export/re-export of the software is in
106  * compliance with all laws, regulations, orders, or other restrictions of the
107  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
108  * any of its subsidiaries will export/re-export any technical data, process,
109  * software, or service, directly or indirectly, to any country for which the
110  * United States government or any agency thereof requires an export license,
111  * other governmental approval, or letter of assurance, without first obtaining
112  * such license, approval or letter.
113  *
114  *****************************************************************************
115  *
116  * Alternatively, you may choose to be licensed under the terms of the
117  * following license:
118  *
119  * Redistribution and use in source and binary forms, with or without
120  * modification, are permitted provided that the following conditions
121  * are met:
122  * 1. Redistributions of source code must retain the above copyright
123  *    notice, this list of conditions, and the following disclaimer,
124  *    without modification.
125  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
126  *    substantially similar to the "NO WARRANTY" disclaimer below
127  *    ("Disclaimer") and any redistribution must be conditioned upon
128  *    including a substantially similar Disclaimer requirement for further
129  *    binary redistribution.
130  * 3. Neither the names of the above-listed copyright holders nor the names
131  *    of any contributors may be used to endorse or promote products derived
132  *    from this software without specific prior written permission.
133  *
134  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
135  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
136  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
137  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
138  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
139  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
140  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
141  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
142  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
143  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
144  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
145  *
146  * Alternatively, you may choose to be licensed under the terms of the
147  * GNU General Public License ("GPL") version 2 as published by the Free
148  * Software Foundation.
149  *
150  *****************************************************************************/
151 
152 #include "acpi.h"
153 #include "accommon.h"
154 #include "acparser.h"
155 #include "amlcode.h"
156 #include "acdebug.h"
157 #include "acconvert.h"
158 
159 
160 #define _COMPONENT          ACPI_CA_DEBUGGER
161         ACPI_MODULE_NAME    ("dmwalk")
162 
163 
164 /* Stub for non-compiler code */
165 
166 #ifndef ACPI_ASL_COMPILER
167 void
AcpiDmEmitExternals(void)168 AcpiDmEmitExternals (
169     void)
170 {
171     return;
172 }
173 
174 void
AcpiDmEmitExternal(ACPI_PARSE_OBJECT * NameOp,ACPI_PARSE_OBJECT * TypeOp)175 AcpiDmEmitExternal (
176     ACPI_PARSE_OBJECT       *NameOp,
177     ACPI_PARSE_OBJECT       *TypeOp)
178 {
179     return;
180 }
181 #endif
182 
183 /* Local prototypes */
184 
185 static ACPI_STATUS
186 AcpiDmDescendingOp (
187     ACPI_PARSE_OBJECT       *Op,
188     UINT32                  Level,
189     void                    *Context);
190 
191 static ACPI_STATUS
192 AcpiDmAscendingOp (
193     ACPI_PARSE_OBJECT       *Op,
194     UINT32                  Level,
195     void                    *Context);
196 
197 
198 /*******************************************************************************
199  *
200  * FUNCTION:    AcpiDmDisassemble
201  *
202  * PARAMETERS:  WalkState       - Current state
203  *              Origin          - Starting object
204  *              NumOpcodes      - Max number of opcodes to be displayed
205  *
206  * RETURN:      None
207  *
208  * DESCRIPTION: Disassemble parser object and its children. This is the
209  *              main entry point of the disassembler.
210  *
211  ******************************************************************************/
212 
213 void
AcpiDmDisassemble(ACPI_WALK_STATE * WalkState,ACPI_PARSE_OBJECT * Origin,UINT32 NumOpcodes)214 AcpiDmDisassemble (
215     ACPI_WALK_STATE         *WalkState,
216     ACPI_PARSE_OBJECT       *Origin,
217     UINT32                  NumOpcodes)
218 {
219     ACPI_PARSE_OBJECT       *Op = Origin;
220     ACPI_OP_WALK_INFO       Info;
221 
222 
223     if (!Op)
224     {
225         return;
226     }
227 
228     memset (&Info, 0, sizeof (ACPI_OP_WALK_INFO));
229     Info.WalkState = WalkState;
230     Info.StartAml = Op->Common.Aml - sizeof (ACPI_TABLE_HEADER);
231     Info.AmlOffset = Op->Common.Aml - Info.StartAml;
232 
233     AcpiDmWalkParseTree (Op, AcpiDmDescendingOp, AcpiDmAscendingOp, &Info);
234     return;
235 }
236 
237 
238 /*******************************************************************************
239  *
240  * FUNCTION:    AcpiDmWalkParseTree
241  *
242  * PARAMETERS:  Op                      - Root Op object
243  *              DescendingCallback      - Called during tree descent
244  *              AscendingCallback       - Called during tree ascent
245  *              Context                 - To be passed to the callbacks
246  *
247  * RETURN:      Status from callback(s)
248  *
249  * DESCRIPTION: Walk the entire parse tree.
250  *
251  ******************************************************************************/
252 
253 void
AcpiDmWalkParseTree(ACPI_PARSE_OBJECT * Op,ASL_WALK_CALLBACK DescendingCallback,ASL_WALK_CALLBACK AscendingCallback,void * Context)254 AcpiDmWalkParseTree (
255     ACPI_PARSE_OBJECT       *Op,
256     ASL_WALK_CALLBACK       DescendingCallback,
257     ASL_WALK_CALLBACK       AscendingCallback,
258     void                    *Context)
259 {
260     BOOLEAN                 NodePreviouslyVisited;
261     ACPI_PARSE_OBJECT       *StartOp = Op;
262     ACPI_STATUS             Status;
263     ACPI_PARSE_OBJECT       *Next;
264     ACPI_OP_WALK_INFO       *Info = Context;
265 
266 
267     Info->Level = 0;
268     NodePreviouslyVisited = FALSE;
269 
270     while (Op)
271     {
272         if (NodePreviouslyVisited)
273         {
274             if (AscendingCallback)
275             {
276                 Status = AscendingCallback (Op, Info->Level, Context);
277                 if (ACPI_FAILURE (Status))
278                 {
279                     return;
280                 }
281             }
282         }
283         else
284         {
285             /* Let the callback process the node */
286 
287             Status = DescendingCallback (Op, Info->Level, Context);
288             if (ACPI_SUCCESS (Status))
289             {
290                 /* Visit children first, once */
291 
292                 Next = AcpiPsGetArg (Op, 0);
293                 if (Next)
294                 {
295                     Info->Level++;
296                     Op = Next;
297                     continue;
298                 }
299             }
300             else if (Status != AE_CTRL_DEPTH)
301             {
302                 /* Exit immediately on any error */
303 
304                 return;
305             }
306         }
307 
308         /* Terminate walk at start op */
309 
310         if (Op == StartOp)
311         {
312             break;
313         }
314 
315         /* No more children, re-visit this node */
316 
317         if (!NodePreviouslyVisited)
318         {
319             NodePreviouslyVisited = TRUE;
320             continue;
321         }
322 
323         /* No more children, visit peers */
324 
325         if (Op->Common.Next)
326         {
327             Op = Op->Common.Next;
328             NodePreviouslyVisited = FALSE;
329         }
330         else
331         {
332             /* No peers, re-visit parent */
333 
334             if (Info->Level != 0 )
335             {
336                 Info->Level--;
337             }
338 
339             Op = Op->Common.Parent;
340             NodePreviouslyVisited = TRUE;
341         }
342     }
343 
344     /* If we get here, the walk completed with no errors */
345 
346     return;
347 }
348 
349 
350 /*******************************************************************************
351  *
352  * FUNCTION:    AcpiDmBlockType
353  *
354  * PARAMETERS:  Op              - Object to be examined
355  *
356  * RETURN:      BlockType - not a block, parens, braces, or even both.
357  *
358  * DESCRIPTION: Type of block for this op (parens or braces)
359  *
360  ******************************************************************************/
361 
362 UINT32
AcpiDmBlockType(ACPI_PARSE_OBJECT * Op)363 AcpiDmBlockType (
364     ACPI_PARSE_OBJECT       *Op)
365 {
366     const ACPI_OPCODE_INFO  *OpInfo;
367 
368 
369     if (!Op)
370     {
371         return (BLOCK_NONE);
372     }
373 
374     switch (Op->Common.AmlOpcode)
375     {
376     case AML_ELSE_OP:
377 
378         return (BLOCK_BRACE);
379 
380     case AML_METHOD_OP:
381     case AML_DEVICE_OP:
382     case AML_SCOPE_OP:
383     case AML_PROCESSOR_OP:
384     case AML_POWER_RESOURCE_OP:
385     case AML_THERMAL_ZONE_OP:
386     case AML_IF_OP:
387     case AML_WHILE_OP:
388     case AML_FIELD_OP:
389     case AML_INDEX_FIELD_OP:
390     case AML_BANK_FIELD_OP:
391 
392         return (BLOCK_PAREN | BLOCK_BRACE);
393 
394     case AML_BUFFER_OP:
395 
396         if ((Op->Common.DisasmOpcode == ACPI_DASM_UNICODE) ||
397             (Op->Common.DisasmOpcode == ACPI_DASM_UUID) ||
398             (Op->Common.DisasmOpcode == ACPI_DASM_PLD_METHOD))
399         {
400             return (BLOCK_NONE);
401         }
402 
403         ACPI_FALLTHROUGH;
404 
405     case AML_PACKAGE_OP:
406     case AML_VARIABLE_PACKAGE_OP:
407 
408         return (BLOCK_PAREN | BLOCK_BRACE);
409 
410     case AML_EVENT_OP:
411 
412         return (BLOCK_PAREN);
413 
414     case AML_INT_METHODCALL_OP:
415 
416         if (Op->Common.Parent &&
417             ((Op->Common.Parent->Common.AmlOpcode == AML_PACKAGE_OP) ||
418              (Op->Common.Parent->Common.AmlOpcode == AML_VARIABLE_PACKAGE_OP)))
419         {
420             /* This is a reference to a method, not an invocation */
421 
422             return (BLOCK_NONE);
423         }
424 
425         ACPI_FALLTHROUGH;
426 
427     default:
428 
429         OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
430         if (OpInfo->Flags & AML_HAS_ARGS)
431         {
432             return (BLOCK_PAREN);
433         }
434 
435         return (BLOCK_NONE);
436     }
437 }
438 
439 
440 /*******************************************************************************
441  *
442  * FUNCTION:    AcpiDmListType
443  *
444  * PARAMETERS:  Op              - Object to be examined
445  *
446  * RETURN:      ListType - has commas or not.
447  *
448  * DESCRIPTION: Type of block for this op (parens or braces)
449  *
450  ******************************************************************************/
451 
452 UINT32
AcpiDmListType(ACPI_PARSE_OBJECT * Op)453 AcpiDmListType (
454     ACPI_PARSE_OBJECT       *Op)
455 {
456     const ACPI_OPCODE_INFO  *OpInfo;
457 
458 
459     if (!Op)
460     {
461         return (BLOCK_NONE);
462     }
463 
464     switch (Op->Common.AmlOpcode)
465     {
466 
467     case AML_ELSE_OP:
468     case AML_METHOD_OP:
469     case AML_DEVICE_OP:
470     case AML_SCOPE_OP:
471     case AML_POWER_RESOURCE_OP:
472     case AML_PROCESSOR_OP:
473     case AML_THERMAL_ZONE_OP:
474     case AML_IF_OP:
475     case AML_WHILE_OP:
476     case AML_FIELD_OP:
477     case AML_INDEX_FIELD_OP:
478     case AML_BANK_FIELD_OP:
479 
480         return (BLOCK_NONE);
481 
482     case AML_BUFFER_OP:
483     case AML_PACKAGE_OP:
484     case AML_VARIABLE_PACKAGE_OP:
485 
486         return (BLOCK_COMMA_LIST);
487 
488     default:
489 
490         OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
491         if (OpInfo->Flags & AML_HAS_ARGS)
492         {
493             return (BLOCK_COMMA_LIST);
494         }
495 
496         return (BLOCK_NONE);
497     }
498 }
499 
500 
501 /*******************************************************************************
502  *
503  * FUNCTION:    AcpiDmDescendingOp
504  *
505  * PARAMETERS:  ASL_WALK_CALLBACK
506  *
507  * RETURN:      Status
508  *
509  * DESCRIPTION: First visitation of a parse object during tree descent.
510  *              Decode opcode name and begin parameter list(s), if any.
511  *
512  ******************************************************************************/
513 
514 static ACPI_STATUS
AcpiDmDescendingOp(ACPI_PARSE_OBJECT * Op,UINT32 Level,void * Context)515 AcpiDmDescendingOp (
516     ACPI_PARSE_OBJECT       *Op,
517     UINT32                  Level,
518     void                    *Context)
519 {
520     ACPI_OP_WALK_INFO       *Info = Context;
521     const ACPI_OPCODE_INFO  *OpInfo;
522     UINT32                  Name;
523     ACPI_PARSE_OBJECT       *NextOp;
524     ACPI_PARSE_OBJECT       *NextOp2;
525     UINT32                  AmlOffset;
526 
527 
528     /* Determine which file this parse node is contained in. */
529 
530     if (AcpiGbl_CaptureComments)
531     {
532         ASL_CV_LABEL_FILENODE (Op);
533 
534         if (Level != 0 && ASL_CV_FILE_HAS_SWITCHED (Op))
535         {
536             ASL_CV_SWITCH_FILES (Level, Op);
537         }
538 
539         /* If this parse node has regular comments, print them here. */
540 
541         ASL_CV_PRINT_ONE_COMMENT (Op, AML_COMMENT_STANDARD, NULL, Level);
542     }
543 
544     OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
545 
546     /* Listing support to dump the AML code after the ASL statement */
547 
548     if (AcpiGbl_DmOpt_Listing)
549     {
550         /* We only care about these classes of objects */
551 
552         if ((OpInfo->Class == AML_CLASS_NAMED_OBJECT) ||
553             (OpInfo->Class == AML_CLASS_CONTROL) ||
554             (OpInfo->Class == AML_CLASS_CREATE) ||
555             ((OpInfo->Class == AML_CLASS_EXECUTE) && (!Op->Common.Next)))
556         {
557             if (AcpiGbl_DmOpt_Listing && Info->PreviousAml)
558             {
559                 /* Dump the AML byte code for the previous Op */
560 
561                 if (Op->Common.Aml > Info->PreviousAml)
562                 {
563                     AcpiOsPrintf ("\n");
564                     AcpiUtDumpBuffer (
565                         (Info->StartAml + Info->AmlOffset),
566                         (Op->Common.Aml - Info->PreviousAml),
567                         DB_BYTE_DISPLAY, Info->AmlOffset);
568                     AcpiOsPrintf ("\n");
569                 }
570 
571                 Info->AmlOffset = (Op->Common.Aml - Info->StartAml);
572             }
573 
574             Info->PreviousAml = Op->Common.Aml;
575         }
576     }
577 
578     if (Op->Common.DisasmFlags & ACPI_PARSEOP_IGNORE)
579     {
580         /* Ignore this op -- it was handled elsewhere */
581 
582         return (AE_CTRL_DEPTH);
583     }
584 
585     if (Op->Common.DisasmOpcode == ACPI_DASM_IGNORE_SINGLE)
586     {
587         /* Ignore this op, but not it's children */
588 
589         return (AE_OK);
590     }
591 
592     if (Op->Common.AmlOpcode == AML_IF_OP)
593     {
594         NextOp = AcpiPsGetDepthNext (NULL, Op);
595         if (NextOp)
596         {
597             NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
598 
599             /* Don't emit the actual embedded externals unless asked */
600 
601             if (!AcpiGbl_DmEmitExternalOpcodes)
602             {
603                 /*
604                  * A Zero predicate indicates the possibility of one or more
605                  * External() opcodes within the If() block.
606                  */
607                 if (NextOp->Common.AmlOpcode == AML_ZERO_OP)
608                 {
609                     NextOp2 = NextOp->Common.Next;
610 
611                     if (NextOp2 &&
612                         (NextOp2->Common.AmlOpcode == AML_EXTERNAL_OP))
613                     {
614                         /* Ignore the If 0 block and all children */
615 
616                         Op->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
617                         return (AE_CTRL_DEPTH);
618                     }
619                 }
620             }
621         }
622     }
623 
624     /* Level 0 is at the Definition Block level */
625 
626     if (Level == 0)
627     {
628         /* In verbose mode, print the AML offset, opcode and depth count */
629 
630         if (Info->WalkState)
631         {
632             AmlOffset = (UINT32) ACPI_PTR_DIFF (Op->Common.Aml,
633                 Info->WalkState->ParserState.AmlStart);
634             if (AcpiGbl_DmOpt_Verbose)
635             {
636                 if (AcpiGbl_CmSingleStep)
637                 {
638                     AcpiOsPrintf ("%5.5X/%4.4X: ",
639                         AmlOffset, (UINT32) Op->Common.AmlOpcode);
640                 }
641                 else
642                 {
643                     AcpiOsPrintf ("AML Offset %5.5X, Opcode %4.4X: ",
644                         AmlOffset, (UINT32) Op->Common.AmlOpcode);
645                 }
646             }
647         }
648 
649         if (Op->Common.AmlOpcode == AML_SCOPE_OP)
650         {
651             /* This is the beginning of the Definition Block */
652 
653             AcpiOsPrintf ("{\n");
654 
655             /* Emit all External() declarations here */
656 
657             if (!AcpiGbl_DmEmitExternalOpcodes)
658             {
659                 AcpiDmEmitExternals ();
660             }
661 
662             return (AE_OK);
663         }
664     }
665     else if ((AcpiDmBlockType (Op->Common.Parent) & BLOCK_BRACE) &&
666          (!(Op->Common.DisasmFlags & ACPI_PARSEOP_PARAMETER_LIST)) &&
667          (!(Op->Common.DisasmFlags & ACPI_PARSEOP_ELSEIF)) &&
668          (Op->Common.AmlOpcode != AML_INT_BYTELIST_OP))
669     {
670         /*
671          * This is a first-level element of a term list,
672          * indent a new line
673          */
674         switch (Op->Common.AmlOpcode)
675         {
676         case AML_NOOP_OP:
677             /*
678              * Optionally just ignore this opcode. Some tables use
679              * NoOp opcodes for "padding" out packages that the BIOS
680              * changes dynamically. This can leave hundreds or
681              * thousands of NoOp opcodes that if disassembled,
682              * cannot be compiled because they are syntactically
683              * incorrect.
684              */
685             if (AcpiGbl_IgnoreNoopOperator)
686             {
687                 Op->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
688                 return (AE_OK);
689             }
690 
691             ACPI_FALLTHROUGH;
692 
693         default:
694 
695             AcpiDmIndent (Level);
696             break;
697         }
698 
699         Info->LastLevel = Level;
700         Info->Count = 0;
701     }
702 
703     /*
704      * This is an inexpensive mechanism to try and keep lines from getting
705      * too long. When the limit is hit, start a new line at the previous
706      * indent plus one. A better but more expensive mechanism would be to
707      * keep track of the current column.
708      */
709     Info->Count++;
710     if (Info->Count /* +Info->LastLevel */ > 12)
711     {
712         Info->Count = 0;
713         AcpiOsPrintf ("\n");
714         AcpiDmIndent (Info->LastLevel + 1);
715     }
716 
717     /* If ASL+ is enabled, check for a C-style operator */
718 
719     if (AcpiDmCheckForSymbolicOpcode (Op, Info))
720     {
721         return (AE_OK);
722     }
723 
724     /* Print the opcode name */
725 
726     AcpiDmDisassembleOneOp (NULL, Info, Op);
727 
728     if ((Op->Common.DisasmOpcode == ACPI_DASM_LNOT_PREFIX) ||
729         (Op->Common.AmlOpcode == AML_INT_CONNECTION_OP))
730     {
731         return (AE_OK);
732     }
733 
734     if ((Op->Common.AmlOpcode == AML_NAME_OP) ||
735         (Op->Common.AmlOpcode == AML_RETURN_OP))
736     {
737         Info->Level--;
738     }
739 
740     if (Op->Common.AmlOpcode == AML_EXTERNAL_OP)
741     {
742         Op->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
743         return (AE_CTRL_DEPTH);
744     }
745 
746     /* Start the opcode argument list if necessary */
747 
748     if ((OpInfo->Flags & AML_HAS_ARGS) ||
749         (Op->Common.AmlOpcode == AML_EVENT_OP))
750     {
751         /* This opcode has an argument list */
752 
753         if (AcpiDmBlockType (Op) & BLOCK_PAREN)
754         {
755             AcpiOsPrintf (" (");
756             if (!(AcpiDmBlockType (Op) & BLOCK_BRACE))
757             {
758                 ASL_CV_PRINT_ONE_COMMENT (Op, AMLCOMMENT_INLINE, " ", 0);
759             }
760         }
761 
762         /* If this is a named opcode, print the associated name value */
763 
764         if (OpInfo->Flags & AML_NAMED)
765         {
766             switch (Op->Common.AmlOpcode)
767             {
768             case AML_ALIAS_OP:
769 
770                 NextOp = AcpiPsGetDepthNext (NULL, Op);
771                 NextOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
772                 AcpiDmNamestring (NextOp->Common.Value.Name);
773                 AcpiOsPrintf (", ");
774 
775                 ACPI_FALLTHROUGH;
776 
777             default:
778 
779                 Name = AcpiPsGetName (Op);
780                 if (Op->Named.Path)
781                 {
782                     AcpiDmNamestring (Op->Named.Path);
783                 }
784                 else
785                 {
786                     AcpiDmDumpName (Name);
787                 }
788 
789                 if (Op->Common.AmlOpcode != AML_INT_NAMEDFIELD_OP)
790                 {
791                     if (AcpiGbl_DmOpt_Verbose)
792                     {
793                         (void) AcpiPsDisplayObjectPathname (NULL, Op);
794                     }
795                 }
796                 break;
797             }
798 
799             switch (Op->Common.AmlOpcode)
800             {
801             case AML_METHOD_OP:
802 
803                 AcpiDmMethodFlags (Op);
804                 ASL_CV_CLOSE_PAREN (Op, Level);
805 
806                 /* Emit description comment for Method() with a predefined ACPI name */
807 
808                 AcpiDmPredefinedDescription (Op);
809                 break;
810 
811             case AML_NAME_OP:
812 
813                 /* Check for _HID and related EISAID() */
814 
815                 AcpiDmCheckForHardwareId (Op);
816                 AcpiOsPrintf (", ");
817                 ASL_CV_PRINT_ONE_COMMENT (Op, AML_NAMECOMMENT, NULL, 0);
818                 break;
819 
820             case AML_REGION_OP:
821 
822                 AcpiDmRegionFlags (Op);
823                 break;
824 
825             case AML_POWER_RESOURCE_OP:
826 
827                 /* Mark the next two Ops as part of the parameter list */
828 
829                 AcpiOsPrintf (", ");
830                 NextOp = AcpiPsGetDepthNext (NULL, Op);
831                 NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
832 
833                 NextOp = NextOp->Common.Next;
834                 NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
835                 return (AE_OK);
836 
837             case AML_PROCESSOR_OP:
838 
839                 /* Mark the next three Ops as part of the parameter list */
840 
841                 AcpiOsPrintf (", ");
842                 NextOp = AcpiPsGetDepthNext (NULL, Op);
843                 NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
844 
845                 NextOp = NextOp->Common.Next;
846                 NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
847 
848                 NextOp = NextOp->Common.Next;
849                 NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
850                 return (AE_OK);
851 
852             case AML_MUTEX_OP:
853             case AML_DATA_REGION_OP:
854 
855                 AcpiOsPrintf (", ");
856                 return (AE_OK);
857 
858             case AML_EVENT_OP:
859             case AML_ALIAS_OP:
860 
861                 return (AE_OK);
862 
863             case AML_SCOPE_OP:
864             case AML_DEVICE_OP:
865             case AML_THERMAL_ZONE_OP:
866 
867                 ASL_CV_CLOSE_PAREN (Op, Level);
868                 break;
869 
870             default:
871 
872                 AcpiOsPrintf ("*** Unhandled named opcode %X\n",
873                     Op->Common.AmlOpcode);
874                 break;
875             }
876         }
877 
878         else switch (Op->Common.AmlOpcode)
879         {
880         case AML_FIELD_OP:
881         case AML_BANK_FIELD_OP:
882         case AML_INDEX_FIELD_OP:
883 
884             Info->BitOffset = 0;
885 
886             /* Name of the parent OperationRegion */
887 
888             NextOp = AcpiPsGetDepthNext (NULL, Op);
889             AcpiDmNamestring (NextOp->Common.Value.Name);
890             AcpiOsPrintf (", ");
891             NextOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
892 
893             switch (Op->Common.AmlOpcode)
894             {
895             case AML_BANK_FIELD_OP:
896 
897                 /* Namestring - Bank Name */
898 
899                 NextOp = AcpiPsGetDepthNext (NULL, NextOp);
900                 AcpiDmNamestring (NextOp->Common.Value.Name);
901                 NextOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
902                 AcpiOsPrintf (", ");
903 
904                 /*
905                  * Bank Value. This is a TermArg in the middle of the parameter
906                  * list, must handle it here.
907                  *
908                  * Disassemble the TermArg parse tree. ACPI_PARSEOP_PARAMETER_LIST
909                  * eliminates newline in the output.
910                  */
911                 NextOp = NextOp->Common.Next;
912 
913                 Info->Flags = ACPI_PARSEOP_PARAMETER_LIST;
914                 AcpiDmWalkParseTree (NextOp, AcpiDmDescendingOp,
915                     AcpiDmAscendingOp, Info);
916                 Info->Flags = 0;
917                 Info->Level = Level;
918 
919                 NextOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
920                 AcpiOsPrintf (", ");
921                 break;
922 
923             case AML_INDEX_FIELD_OP:
924 
925                 /* Namestring - Data Name */
926 
927                 NextOp = AcpiPsGetDepthNext (NULL, NextOp);
928                 AcpiDmNamestring (NextOp->Common.Value.Name);
929                 AcpiOsPrintf (", ");
930                 NextOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
931                 break;
932 
933             default:
934 
935                 break;
936             }
937 
938             AcpiDmFieldFlags (NextOp);
939             break;
940 
941         case AML_BUFFER_OP:
942 
943             /* The next op is the size parameter */
944 
945             NextOp = AcpiPsGetDepthNext (NULL, Op);
946             if (!NextOp)
947             {
948                 /* Single-step support */
949 
950                 return (AE_OK);
951             }
952 
953             if (Op->Common.DisasmOpcode == ACPI_DASM_RESOURCE)
954             {
955                 /*
956                  * We have a resource list. Don't need to output
957                  * the buffer size Op. Open up a new block
958                  */
959                 NextOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
960                 ASL_CV_CLOSE_PAREN (Op, Level);
961 
962                 if (Op->Asl.Parent->Common.AmlOpcode == AML_NAME_OP)
963                 {
964                     /*
965                      * Emit description comment showing the full ACPI name
966                      * of the ResourceTemplate only if it was defined using a
967                      * Name statement.
968                      */
969                      AcpiDmPredefinedDescription (Op->Asl.Parent);
970                 }
971 
972                 AcpiDmPredefinedDescription (Op->Asl.Parent);
973 
974                 AcpiOsPrintf ("\n");
975                 AcpiDmIndent (Info->Level);
976                 AcpiOsPrintf ("{\n");
977                 return (AE_OK);
978             }
979 
980             /* Normal Buffer, mark size as in the parameter list */
981 
982             NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
983             return (AE_OK);
984 
985         case AML_IF_OP:
986         case AML_VARIABLE_PACKAGE_OP:
987         case AML_WHILE_OP:
988 
989             /* The next op is the size or predicate parameter */
990 
991             NextOp = AcpiPsGetDepthNext (NULL, Op);
992             if (NextOp)
993             {
994                 NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
995             }
996             return (AE_OK);
997 
998         case AML_PACKAGE_OP:
999 
1000             /* The next op is the size parameter */
1001 
1002             NextOp = AcpiPsGetDepthNext (NULL, Op);
1003             if (NextOp)
1004             {
1005                 NextOp->Common.DisasmFlags |= ACPI_PARSEOP_PARAMETER_LIST;
1006             }
1007             return (AE_OK);
1008 
1009         case AML_MATCH_OP:
1010 
1011             AcpiDmMatchOp (Op);
1012             break;
1013 
1014         default:
1015 
1016             break;
1017         }
1018 
1019         if (AcpiDmBlockType (Op) & BLOCK_BRACE)
1020         {
1021             AcpiOsPrintf ("\n");
1022             AcpiDmIndent (Level);
1023             AcpiOsPrintf ("{\n");
1024         }
1025     }
1026 
1027     return (AE_OK);
1028 }
1029 
1030 
1031 /*******************************************************************************
1032  *
1033  * FUNCTION:    AcpiDmAscendingOp
1034  *
1035  * PARAMETERS:  ASL_WALK_CALLBACK
1036  *
1037  * RETURN:      Status
1038  *
1039  * DESCRIPTION: Second visitation of a parse object, during ascent of parse
1040  *              tree. Close out any parameter lists and complete the opcode.
1041  *
1042  ******************************************************************************/
1043 
1044 static ACPI_STATUS
AcpiDmAscendingOp(ACPI_PARSE_OBJECT * Op,UINT32 Level,void * Context)1045 AcpiDmAscendingOp (
1046     ACPI_PARSE_OBJECT       *Op,
1047     UINT32                  Level,
1048     void                    *Context)
1049 {
1050     ACPI_OP_WALK_INFO       *Info = Context;
1051     ACPI_PARSE_OBJECT       *ParentOp;
1052 
1053 
1054     /* Point the Op's filename pointer to the proper file */
1055 
1056     if (AcpiGbl_CaptureComments)
1057     {
1058         ASL_CV_LABEL_FILENODE (Op);
1059 
1060         /* Switch the output of these files if necessary */
1061 
1062         if (ASL_CV_FILE_HAS_SWITCHED (Op))
1063         {
1064             ASL_CV_SWITCH_FILES (Level, Op);
1065         }
1066     }
1067 
1068     if (Op->Common.DisasmFlags & ACPI_PARSEOP_IGNORE ||
1069         Op->Common.DisasmOpcode == ACPI_DASM_IGNORE_SINGLE)
1070     {
1071         /* Ignore this op -- it was handled elsewhere */
1072 
1073         return (AE_OK);
1074     }
1075 
1076     if ((Level == 0) && (Op->Common.AmlOpcode == AML_SCOPE_OP))
1077     {
1078         /* Indicates the end of the current descriptor block (table) */
1079 
1080         ASL_CV_CLOSE_BRACE (Op, Level);
1081 
1082         /* Print any comments that are at the end of the file here */
1083 
1084         if (AcpiGbl_CaptureComments && AcpiGbl_LastListHead)
1085         {
1086             AcpiOsPrintf ("\n");
1087             ASL_CV_PRINT_ONE_COMMENT_LIST (AcpiGbl_LastListHead, 0);
1088         }
1089         AcpiOsPrintf ("\n\n");
1090 
1091         return (AE_OK);
1092     }
1093 
1094     switch (AcpiDmBlockType (Op))
1095     {
1096     case BLOCK_PAREN:
1097 
1098         /* Completed an op that has arguments, add closing paren if needed */
1099 
1100         AcpiDmCloseOperator (Op);
1101 
1102         if (Op->Common.AmlOpcode == AML_NAME_OP)
1103         {
1104             /* Emit description comment for Name() with a predefined ACPI name */
1105 
1106             AcpiDmPredefinedDescription (Op);
1107         }
1108         else
1109         {
1110             /* For Create* operators, attempt to emit resource tag description */
1111 
1112             AcpiDmFieldPredefinedDescription (Op);
1113         }
1114 
1115         /* Decode Notify() values */
1116 
1117         if (Op->Common.AmlOpcode == AML_NOTIFY_OP)
1118         {
1119             AcpiDmNotifyDescription (Op);
1120         }
1121 
1122         AcpiDmDisplayTargetPathname (Op);
1123 
1124         /* Could be a nested operator, check if comma required */
1125 
1126         if (!AcpiDmCommaIfListMember (Op))
1127         {
1128             if ((AcpiDmBlockType (Op->Common.Parent) & BLOCK_BRACE) &&
1129                  (!(Op->Common.DisasmFlags & ACPI_PARSEOP_PARAMETER_LIST)) &&
1130                  (Op->Common.AmlOpcode != AML_INT_BYTELIST_OP))
1131             {
1132                 /*
1133                  * This is a first-level element of a term list
1134                  * start a new line
1135                  */
1136                 if (!(Info->Flags & ACPI_PARSEOP_PARAMETER_LIST))
1137                 {
1138                     AcpiOsPrintf ("\n");
1139                 }
1140             }
1141         }
1142         break;
1143 
1144     case BLOCK_BRACE:
1145     case (BLOCK_BRACE | BLOCK_PAREN):
1146 
1147         /* Completed an op that has a term list, add closing brace */
1148 
1149         if (Op->Common.DisasmFlags & ACPI_PARSEOP_EMPTY_TERMLIST)
1150         {
1151             ASL_CV_CLOSE_BRACE (Op, Level);
1152         }
1153         else
1154         {
1155             AcpiDmIndent (Level);
1156             ASL_CV_CLOSE_BRACE (Op, Level);
1157         }
1158 
1159         AcpiDmCommaIfListMember (Op);
1160 
1161         if (AcpiDmBlockType (Op->Common.Parent) != BLOCK_PAREN)
1162         {
1163             AcpiOsPrintf ("\n");
1164             if (!(Op->Common.DisasmFlags & ACPI_PARSEOP_EMPTY_TERMLIST))
1165             {
1166                 if ((Op->Common.AmlOpcode == AML_IF_OP)  &&
1167                     (Op->Common.Next) &&
1168                     (Op->Common.Next->Common.AmlOpcode == AML_ELSE_OP))
1169                 {
1170                     break;
1171                 }
1172 
1173                 if ((AcpiDmBlockType (Op->Common.Parent) & BLOCK_BRACE) &&
1174                     (!Op->Common.Next))
1175                 {
1176                     break;
1177                 }
1178                 AcpiOsPrintf ("\n");
1179             }
1180         }
1181         break;
1182 
1183     case BLOCK_NONE:
1184     default:
1185 
1186         /* Could be a nested operator, check if comma required */
1187 
1188         if (!AcpiDmCommaIfListMember (Op))
1189         {
1190             if ((AcpiDmBlockType (Op->Common.Parent) & BLOCK_BRACE) &&
1191                  (!(Op->Common.DisasmFlags & ACPI_PARSEOP_PARAMETER_LIST)) &&
1192                  (Op->Common.AmlOpcode != AML_INT_BYTELIST_OP))
1193             {
1194                 /*
1195                  * This is a first-level element of a term list
1196                  * start a new line
1197                  */
1198                 AcpiOsPrintf ("\n");
1199             }
1200         }
1201         else if (Op->Common.Parent)
1202         {
1203             switch (Op->Common.Parent->Common.AmlOpcode)
1204             {
1205             case AML_PACKAGE_OP:
1206             case AML_VARIABLE_PACKAGE_OP:
1207 
1208                 if (!(Op->Common.DisasmFlags & ACPI_PARSEOP_PARAMETER_LIST))
1209                 {
1210                     AcpiOsPrintf ("\n");
1211                 }
1212                 break;
1213 
1214             default:
1215 
1216                 break;
1217             }
1218         }
1219         break;
1220     }
1221 
1222     if (Op->Common.DisasmFlags & ACPI_PARSEOP_PARAMETER_LIST)
1223     {
1224         if ((Op->Common.Next) &&
1225             (Op->Common.Next->Common.DisasmFlags & ACPI_PARSEOP_PARAMETER_LIST))
1226         {
1227             return (AE_OK);
1228         }
1229 
1230         /*
1231          * The parent Op is guaranteed to be valid because of the flag
1232          * ACPI_PARSEOP_PARAMETER_LIST -- which means that this op is part of
1233          * a parameter list and thus has a valid parent.
1234          */
1235         ParentOp = Op->Common.Parent;
1236 
1237         /*
1238          * Just completed a parameter node for something like "Buffer (param)".
1239          * Close the paren and open up the term list block with a brace.
1240          *
1241          * Switch predicates don't have a Next node but require a closing paren
1242          * and opening brace.
1243          */
1244         if (Op->Common.Next || Op->Common.DisasmOpcode == ACPI_DASM_SWITCH_PREDICATE)
1245         {
1246             ASL_CV_CLOSE_PAREN (Op, Level);
1247 
1248             /*
1249              * Emit a description comment for a Name() operator that is a
1250              * predefined ACPI name. Must check the grandparent.
1251              */
1252             ParentOp = ParentOp->Common.Parent;
1253             if (ParentOp &&
1254                 (ParentOp->Asl.AmlOpcode == AML_NAME_OP))
1255             {
1256                 AcpiDmPredefinedDescription (ParentOp);
1257             }
1258 
1259             /* Correct the indentation level for Switch and Case predicates */
1260 
1261             if (Op->Common.DisasmOpcode == ACPI_DASM_SWITCH_PREDICATE)
1262             {
1263                 --Level;
1264             }
1265 
1266             AcpiOsPrintf ("\n");
1267             AcpiDmIndent (Level - 1);
1268             AcpiOsPrintf ("{\n");
1269         }
1270         else
1271         {
1272             ParentOp->Common.DisasmFlags |= ACPI_PARSEOP_EMPTY_TERMLIST;
1273             ASL_CV_CLOSE_PAREN (Op, Level);
1274             AcpiOsPrintf ("{");
1275         }
1276     }
1277 
1278     if ((Op->Common.AmlOpcode == AML_NAME_OP) ||
1279         (Op->Common.AmlOpcode == AML_RETURN_OP))
1280     {
1281         Info->Level++;
1282     }
1283 
1284     /*
1285      * For ASL+, check for and emit a C-style symbol. If valid, the
1286      * symbol string has been deferred until after the first operand
1287      */
1288     if (AcpiGbl_CstyleDisassembly)
1289     {
1290         if (Op->Asl.OperatorSymbol)
1291         {
1292             AcpiOsPrintf ("%s", Op->Asl.OperatorSymbol);
1293             Op->Asl.OperatorSymbol = NULL;
1294         }
1295     }
1296 
1297     return (AE_OK);
1298 }
1299