xref: /freebsd/sys/contrib/dev/acpica/components/disassembler/dmopcode.c (revision f81cdf24ba5436367377f7c8e8f51f6df2a75ca7)
1 /*******************************************************************************
2  *
3  * Module Name: dmopcode - AML disassembler, specific AML opcodes
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 <contrib/dev/acpica/include/acpi.h>
153 #include <contrib/dev/acpica/include/accommon.h>
154 #include <contrib/dev/acpica/include/acparser.h>
155 #include <contrib/dev/acpica/include/amlcode.h>
156 #include <contrib/dev/acpica/include/acinterp.h>
157 #include <contrib/dev/acpica/include/acnamesp.h>
158 #include <contrib/dev/acpica/include/acdebug.h>
159 #include <contrib/dev/acpica/include/acconvert.h>
160 
161 
162 #define _COMPONENT          ACPI_CA_DEBUGGER
163         ACPI_MODULE_NAME    ("dmopcode")
164 
165 
166 /* Local prototypes */
167 
168 static void
169 AcpiDmMatchKeyword (
170     ACPI_PARSE_OBJECT       *Op);
171 
172 static void
173 AcpiDmConvertToElseIf (
174     ACPI_PARSE_OBJECT       *Op);
175 
176 static void
177 AcpiDmPromoteSubtree (
178     ACPI_PARSE_OBJECT       *StartOp);
179 
180 /*******************************************************************************
181  *
182  * FUNCTION:    AcpiDmDisplayTargetPathname
183  *
184  * PARAMETERS:  Op              - Parse object
185  *
186  * RETURN:      None
187  *
188  * DESCRIPTION: For AML opcodes that have a target operand, display the full
189  *              pathname for the target, in a comment field. Handles Return()
190  *              statements also.
191  *
192  ******************************************************************************/
193 
194 void
195 AcpiDmDisplayTargetPathname (
196     ACPI_PARSE_OBJECT       *Op)
197 {
198     ACPI_PARSE_OBJECT       *NextOp;
199     ACPI_PARSE_OBJECT       *PrevOp = NULL;
200     char                    *Pathname;
201     const ACPI_OPCODE_INFO  *OpInfo;
202 
203 
204     if (Op->Common.AmlOpcode == AML_RETURN_OP)
205     {
206         PrevOp = Op->Asl.Value.Arg;
207     }
208     else
209     {
210         OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
211         if (!(OpInfo->Flags & AML_HAS_TARGET))
212         {
213             return;
214         }
215 
216         /* Target is the last Op in the arg list */
217 
218         NextOp = Op->Asl.Value.Arg;
219         while (NextOp)
220         {
221             PrevOp = NextOp;
222             NextOp = PrevOp->Asl.Next;
223         }
224     }
225 
226     if (!PrevOp)
227     {
228         return;
229     }
230 
231     /* We must have a namepath AML opcode */
232 
233     if (PrevOp->Asl.AmlOpcode != AML_INT_NAMEPATH_OP)
234     {
235         return;
236     }
237 
238     /* A null string is the "no target specified" case */
239 
240     if (!PrevOp->Asl.Value.String)
241     {
242         return;
243     }
244 
245     /* No node means "unresolved external reference" */
246 
247     if (!PrevOp->Asl.Node)
248     {
249         AcpiOsPrintf (" /* External reference */");
250         return;
251     }
252 
253     /* Ignore if path is already from the root */
254 
255     if (*PrevOp->Asl.Value.String == '\\')
256     {
257         return;
258     }
259 
260     /* Now: we can get the full pathname */
261 
262     Pathname = AcpiNsGetExternalPathname (PrevOp->Asl.Node);
263     if (!Pathname)
264     {
265         return;
266     }
267 
268     AcpiOsPrintf (" /* %s */", Pathname);
269     ACPI_FREE (Pathname);
270 }
271 
272 
273 /*******************************************************************************
274  *
275  * FUNCTION:    AcpiDmNotifyDescription
276  *
277  * PARAMETERS:  Op              - Name() parse object
278  *
279  * RETURN:      None
280  *
281  * DESCRIPTION: Emit a description comment for the value associated with a
282  *              Notify() operator.
283  *
284  ******************************************************************************/
285 
286 void
287 AcpiDmNotifyDescription (
288     ACPI_PARSE_OBJECT       *Op)
289 {
290     ACPI_PARSE_OBJECT       *NextOp;
291     ACPI_NAMESPACE_NODE     *Node;
292     UINT8                   NotifyValue;
293     UINT8                   Type = ACPI_TYPE_ANY;
294 
295 
296     /* The notify value is the second argument */
297 
298     NextOp = Op->Asl.Value.Arg;
299     NextOp = NextOp->Asl.Next;
300 
301     switch (NextOp->Common.AmlOpcode)
302     {
303     case AML_ZERO_OP:
304     case AML_ONE_OP:
305 
306         NotifyValue = (UINT8) NextOp->Common.AmlOpcode;
307         break;
308 
309     case AML_BYTE_OP:
310 
311         NotifyValue = (UINT8) NextOp->Asl.Value.Integer;
312         break;
313 
314     default:
315         return;
316     }
317 
318     /*
319      * Attempt to get the namespace node so we can determine the object type.
320      * Some notify values are dependent on the object type (Device, Thermal,
321      * or Processor).
322      */
323     Node = Op->Asl.Node;
324     if (Node)
325     {
326         Type = Node->Type;
327     }
328 
329     AcpiOsPrintf (" // %s", AcpiUtGetNotifyName (NotifyValue, Type));
330 }
331 
332 
333 /*******************************************************************************
334  *
335  * FUNCTION:    AcpiDmPredefinedDescription
336  *
337  * PARAMETERS:  Op              - Name() parse object
338  *
339  * RETURN:      None
340  *
341  * DESCRIPTION: Emit a description comment for a predefined ACPI name.
342  *              Used for iASL compiler only.
343  *
344  ******************************************************************************/
345 
346 void
347 AcpiDmPredefinedDescription (
348     ACPI_PARSE_OBJECT       *Op)
349 {
350 #ifdef ACPI_ASL_COMPILER
351     const AH_PREDEFINED_NAME    *Info;
352     char                        *NameString;
353     int                         LastCharIsDigit;
354     int                         LastCharsAreHex;
355 
356 
357     if (!Op)
358     {
359         return;
360     }
361 
362     /* Ensure that the comment field is emitted only once */
363 
364     if (Op->Common.DisasmFlags & ACPI_PARSEOP_PREDEFINED_CHECKED)
365     {
366         return;
367     }
368     Op->Common.DisasmFlags |= ACPI_PARSEOP_PREDEFINED_CHECKED;
369 
370     /* Predefined name must start with an underscore */
371 
372     NameString = ACPI_CAST_PTR (char, &Op->Named.Name);
373     if (NameString[0] != '_')
374     {
375         return;
376     }
377 
378     /*
379      * Check for the special ACPI names:
380      * _ACd, _ALd, _EJd, _Exx, _Lxx, _Qxx, _Wxx, _T_a
381      * (where d=decimal_digit, x=hex_digit, a=anything)
382      *
383      * Convert these to the generic name for table lookup.
384      * Note: NameString is guaranteed to be upper case here.
385      */
386     LastCharIsDigit =
387         (isdigit ((int) NameString[3]));    /* d */
388     LastCharsAreHex =
389         (isxdigit ((int) NameString[2]) &&  /* xx */
390          isxdigit ((int) NameString[3]));
391 
392     switch (NameString[1])
393     {
394     case 'A':
395 
396         if ((NameString[2] == 'C') && (LastCharIsDigit))
397         {
398             NameString = "_ACx";
399         }
400         else if ((NameString[2] == 'L') && (LastCharIsDigit))
401         {
402             NameString = "_ALx";
403         }
404         break;
405 
406     case 'E':
407 
408         if ((NameString[2] == 'J') && (LastCharIsDigit))
409         {
410             NameString = "_EJx";
411         }
412         else if (LastCharsAreHex)
413         {
414             NameString = "_Exx";
415         }
416         break;
417 
418     case 'L':
419 
420         if (LastCharsAreHex)
421         {
422             NameString = "_Lxx";
423         }
424         break;
425 
426     case 'Q':
427 
428         if (LastCharsAreHex)
429         {
430             NameString = "_Qxx";
431         }
432         break;
433 
434     case 'T':
435 
436         if (NameString[2] == '_')
437         {
438             NameString = "_T_x";
439         }
440         break;
441 
442     case 'W':
443 
444         if (LastCharsAreHex)
445         {
446             NameString = "_Wxx";
447         }
448         break;
449 
450     default:
451 
452         break;
453     }
454 
455     /* Match the name in the info table */
456 
457     Info = AcpiAhMatchPredefinedName (NameString);
458     if (Info)
459     {
460         AcpiOsPrintf ("  // %4.4s: %s",
461             NameString, ACPI_CAST_PTR (char, Info->Description));
462     }
463 
464 #endif
465     return;
466 }
467 
468 
469 /*******************************************************************************
470  *
471  * FUNCTION:    AcpiDmFieldPredefinedDescription
472  *
473  * PARAMETERS:  Op              - Parse object
474  *
475  * RETURN:      None
476  *
477  * DESCRIPTION: Emit a description comment for a resource descriptor tag
478  *              (which is a predefined ACPI name.) Used for iASL compiler only.
479  *
480  ******************************************************************************/
481 
482 void
483 AcpiDmFieldPredefinedDescription (
484     ACPI_PARSE_OBJECT       *Op)
485 {
486 #ifdef ACPI_ASL_COMPILER
487     ACPI_PARSE_OBJECT       *IndexOp;
488     char                    *Tag;
489     const ACPI_OPCODE_INFO  *OpInfo;
490     const AH_PREDEFINED_NAME *Info;
491 
492 
493     if (!Op)
494     {
495         return;
496     }
497 
498     /* Ensure that the comment field is emitted only once */
499 
500     if (Op->Common.DisasmFlags & ACPI_PARSEOP_PREDEFINED_CHECKED)
501     {
502         return;
503     }
504     Op->Common.DisasmFlags |= ACPI_PARSEOP_PREDEFINED_CHECKED;
505 
506     /*
507      * Op must be one of the Create* operators: CreateField, CreateBitField,
508      * CreateByteField, CreateWordField, CreateDwordField, CreateQwordField
509      */
510     OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
511     if (!(OpInfo->Flags & AML_CREATE))
512     {
513         return;
514     }
515 
516     /* Second argument is the Index argument */
517 
518     IndexOp = Op->Common.Value.Arg;
519     IndexOp = IndexOp->Common.Next;
520 
521     /* Index argument must be a namepath */
522 
523     if (IndexOp->Common.AmlOpcode != AML_INT_NAMEPATH_OP)
524     {
525         return;
526     }
527 
528     /* Major cheat: We previously put the Tag ptr in the Node field */
529 
530     Tag = ACPI_CAST_PTR (char, IndexOp->Common.Node);
531     if (!Tag || (*Tag == 0))
532     {
533         return;
534     }
535 
536     /* Is the tag a predefined name? */
537 
538     Info = AcpiAhMatchPredefinedName (Tag);
539     if (!Info)
540     {
541         /* Not a predefined name (does not start with underscore) */
542 
543         return;
544     }
545 
546     AcpiOsPrintf ("  // %4.4s: %s", Tag,
547         ACPI_CAST_PTR (char, Info->Description));
548 
549     /* String contains the prefix path, free it */
550 
551     ACPI_FREE (IndexOp->Common.Value.String);
552     IndexOp->Common.Value.String = NULL;
553 #endif
554 
555     return;
556 }
557 
558 
559 /*******************************************************************************
560  *
561  * FUNCTION:    AcpiDmMethodFlags
562  *
563  * PARAMETERS:  Op              - Method Object to be examined
564  *
565  * RETURN:      None
566  *
567  * DESCRIPTION: Decode control method flags
568  *
569  ******************************************************************************/
570 
571 void
572 AcpiDmMethodFlags (
573     ACPI_PARSE_OBJECT       *Op)
574 {
575     UINT32                  Flags;
576     UINT32                  Args;
577 
578 
579     /* The next Op contains the flags */
580 
581     Op = AcpiPsGetDepthNext (NULL, Op);
582     Flags = (UINT8) Op->Common.Value.Integer;
583     Args = Flags & 0x07;
584 
585     /* Mark the Op as completed */
586 
587     Op->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
588 
589     /* 1) Method argument count */
590 
591     AcpiOsPrintf (", %u, ", Args);
592 
593     /* 2) Serialize rule */
594 
595     if (!(Flags & 0x08))
596     {
597         AcpiOsPrintf ("Not");
598     }
599 
600     AcpiOsPrintf ("Serialized");
601 
602     /* 3) SyncLevel */
603 
604     if (Flags & 0xF0)
605     {
606         AcpiOsPrintf (", %u", Flags >> 4);
607     }
608 }
609 
610 
611 /*******************************************************************************
612  *
613  * FUNCTION:    AcpiDmFieldFlags
614  *
615  * PARAMETERS:  Op              - Field Object to be examined
616  *
617  * RETURN:      None
618  *
619  * DESCRIPTION: Decode Field definition flags
620  *
621  ******************************************************************************/
622 
623 void
624 AcpiDmFieldFlags (
625     ACPI_PARSE_OBJECT       *Op)
626 {
627     UINT32                  Flags;
628 
629 
630     Op = Op->Common.Next;
631     Flags = (UINT8) Op->Common.Value.Integer;
632 
633     /* Mark the Op as completed */
634 
635     Op->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
636 
637     AcpiOsPrintf ("%s, ", AcpiGbl_AccessTypes [Flags & 0x07]);
638     AcpiOsPrintf ("%s, ", AcpiGbl_LockRule [(Flags & 0x10) >> 4]);
639     AcpiOsPrintf ("%s)",  AcpiGbl_UpdateRules [(Flags & 0x60) >> 5]);
640 }
641 
642 
643 /*******************************************************************************
644  *
645  * FUNCTION:    AcpiDmAddressSpace
646  *
647  * PARAMETERS:  SpaceId         - ID to be translated
648  *
649  * RETURN:      None
650  *
651  * DESCRIPTION: Decode a SpaceId to an AddressSpaceKeyword
652  *
653  ******************************************************************************/
654 
655 void
656 AcpiDmAddressSpace (
657     UINT8                   SpaceId)
658 {
659 
660     if (SpaceId >= ACPI_NUM_PREDEFINED_REGIONS)
661     {
662         if (SpaceId == 0x7F)
663         {
664             AcpiOsPrintf ("FFixedHW, ");
665         }
666         else
667         {
668             AcpiOsPrintf ("0x%.2X, ", SpaceId);
669         }
670     }
671     else
672     {
673         AcpiOsPrintf ("%s, ", AcpiGbl_RegionTypes [SpaceId]);
674     }
675 }
676 
677 
678 /*******************************************************************************
679  *
680  * FUNCTION:    AcpiDmRegionFlags
681  *
682  * PARAMETERS:  Op              - Object to be examined
683  *
684  * RETURN:      None
685  *
686  * DESCRIPTION: Decode OperationRegion flags
687  *
688  ******************************************************************************/
689 
690 void
691 AcpiDmRegionFlags (
692     ACPI_PARSE_OBJECT       *Op)
693 {
694 
695     /* The next Op contains the SpaceId */
696 
697     Op = AcpiPsGetDepthNext (NULL, Op);
698 
699     /* Mark the Op as completed */
700 
701     Op->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
702 
703     AcpiOsPrintf (", ");
704     AcpiDmAddressSpace ((UINT8) Op->Common.Value.Integer);
705 }
706 
707 
708 /*******************************************************************************
709  *
710  * FUNCTION:    AcpiDmMatchOp
711  *
712  * PARAMETERS:  Op              - Match Object to be examined
713  *
714  * RETURN:      None
715  *
716  * DESCRIPTION: Decode Match opcode operands
717  *
718  ******************************************************************************/
719 
720 void
721 AcpiDmMatchOp (
722     ACPI_PARSE_OBJECT       *Op)
723 {
724     ACPI_PARSE_OBJECT       *NextOp;
725 
726 
727     NextOp = AcpiPsGetDepthNext (NULL, Op);
728     NextOp = NextOp->Common.Next;
729 
730     if (!NextOp)
731     {
732         /* Handle partial tree during single-step */
733 
734         return;
735     }
736 
737     /* Mark the two nodes that contain the encoding for the match keywords */
738 
739     NextOp->Common.DisasmOpcode = ACPI_DASM_MATCHOP;
740 
741     NextOp = NextOp->Common.Next;
742     NextOp = NextOp->Common.Next;
743     NextOp->Common.DisasmOpcode = ACPI_DASM_MATCHOP;
744 }
745 
746 
747 /*******************************************************************************
748  *
749  * FUNCTION:    AcpiDmMatchKeyword
750  *
751  * PARAMETERS:  Op              - Match Object to be examined
752  *
753  * RETURN:      None
754  *
755  * DESCRIPTION: Decode Match opcode operands
756  *
757  ******************************************************************************/
758 
759 static void
760 AcpiDmMatchKeyword (
761     ACPI_PARSE_OBJECT       *Op)
762 {
763 
764     if (((UINT32) Op->Common.Value.Integer) > ACPI_MAX_MATCH_OPCODE)
765     {
766         AcpiOsPrintf ("/* Unknown Match Keyword encoding */");
767     }
768     else
769     {
770         AcpiOsPrintf ("%s",
771             AcpiGbl_MatchOps[(ACPI_SIZE) Op->Common.Value.Integer]);
772     }
773 }
774 
775 
776 /*******************************************************************************
777  *
778  * FUNCTION:    AcpiDmDisassembleOneOp
779  *
780  * PARAMETERS:  WalkState           - Current walk info
781  *              Info                - Parse tree walk info
782  *              Op                  - Op that is to be printed
783  *
784  * RETURN:      None
785  *
786  * DESCRIPTION: Disassemble a single AML opcode
787  *
788  ******************************************************************************/
789 
790 void
791 AcpiDmDisassembleOneOp (
792     ACPI_WALK_STATE         *WalkState,
793     ACPI_OP_WALK_INFO       *Info,
794     ACPI_PARSE_OBJECT       *Op)
795 {
796     const ACPI_OPCODE_INFO  *OpInfo = NULL;
797     UINT32                  Offset;
798     UINT32                  Length;
799     ACPI_PARSE_OBJECT       *Child;
800     ACPI_STATUS             Status;
801     UINT8                   *Aml;
802     const AH_DEVICE_ID      *IdInfo;
803 
804 
805     if (!Op)
806     {
807         AcpiOsPrintf ("<NULL OP PTR>");
808         return;
809     }
810 
811     if (Op->Common.DisasmFlags & ACPI_PARSEOP_ELSEIF)
812     {
813         return; /* ElseIf macro was already emitted */
814     }
815 
816     switch (Op->Common.DisasmOpcode)
817     {
818     case ACPI_DASM_MATCHOP:
819 
820         AcpiDmMatchKeyword (Op);
821         return;
822 
823     case ACPI_DASM_LNOT_SUFFIX:
824 
825         if (!AcpiGbl_CstyleDisassembly)
826         {
827             switch (Op->Common.AmlOpcode)
828             {
829             case AML_LOGICAL_EQUAL_OP:
830                 AcpiOsPrintf ("LNotEqual");
831                 break;
832 
833             case AML_LOGICAL_GREATER_OP:
834                 AcpiOsPrintf ("LLessEqual");
835                 break;
836 
837             case AML_LOGICAL_LESS_OP:
838                 AcpiOsPrintf ("LGreaterEqual");
839                 break;
840 
841             default:
842                 break;
843             }
844         }
845 
846         Op->Common.DisasmOpcode = 0;
847         Op->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
848         return;
849 
850     default:
851         break;
852     }
853 
854     OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
855 
856     /* The op and arguments */
857 
858     switch (Op->Common.AmlOpcode)
859     {
860     case AML_LOGICAL_NOT_OP:
861 
862         Child = Op->Common.Value.Arg;
863         if ((Child->Common.AmlOpcode == AML_LOGICAL_EQUAL_OP) ||
864             (Child->Common.AmlOpcode == AML_LOGICAL_GREATER_OP) ||
865             (Child->Common.AmlOpcode == AML_LOGICAL_LESS_OP))
866         {
867             Child->Common.DisasmOpcode = ACPI_DASM_LNOT_SUFFIX;
868             Op->Common.DisasmOpcode = ACPI_DASM_LNOT_PREFIX;
869         }
870         else
871         {
872             AcpiOsPrintf ("%s", OpInfo->Name);
873         }
874         break;
875 
876     case AML_BYTE_OP:
877 
878         AcpiOsPrintf ("0x%2.2X", (UINT32) Op->Common.Value.Integer);
879         break;
880 
881     case AML_WORD_OP:
882 
883         if (Op->Common.DisasmOpcode == ACPI_DASM_EISAID)
884         {
885             AcpiDmDecompressEisaId ((UINT32) Op->Common.Value.Integer);
886         }
887         else
888         {
889             AcpiOsPrintf ("0x%4.4X", (UINT32) Op->Common.Value.Integer);
890         }
891         break;
892 
893     case AML_DWORD_OP:
894 
895         if (Op->Common.DisasmOpcode == ACPI_DASM_EISAID)
896         {
897             AcpiDmDecompressEisaId ((UINT32) Op->Common.Value.Integer);
898         }
899         else
900         {
901             AcpiOsPrintf ("0x%8.8X", (UINT32) Op->Common.Value.Integer);
902         }
903         break;
904 
905     case AML_QWORD_OP:
906 
907         AcpiOsPrintf ("0x%8.8X%8.8X",
908             ACPI_FORMAT_UINT64 (Op->Common.Value.Integer));
909         break;
910 
911     case AML_STRING_OP:
912 
913         AcpiUtPrintString (Op->Common.Value.String, ACPI_UINT16_MAX);
914 
915         /* For _HID/_CID strings, attempt to output a descriptive comment */
916 
917         if (Op->Common.DisasmOpcode == ACPI_DASM_HID_STRING)
918         {
919             /* If we know about the ID, emit the description */
920 
921             IdInfo = AcpiAhMatchHardwareId (Op->Common.Value.String);
922             if (IdInfo)
923             {
924                 AcpiOsPrintf (" /* %s */", IdInfo->Description);
925             }
926         }
927         break;
928 
929     case AML_BUFFER_OP:
930         /*
931          * Determine the type of buffer. We can have one of the following:
932          *
933          * 1) ResourceTemplate containing Resource Descriptors.
934          * 2) Unicode String buffer
935          * 3) ASCII String buffer
936          * 4) Raw data buffer (if none of the above)
937          *
938          * Since there are no special AML opcodes to differentiate these
939          * types of buffers, we have to closely look at the data in the
940          * buffer to determine the type.
941          */
942         if (!AcpiGbl_NoResourceDisassembly)
943         {
944             Status = AcpiDmIsResourceTemplate (WalkState, Op);
945             if (ACPI_SUCCESS (Status))
946             {
947                 Op->Common.DisasmOpcode = ACPI_DASM_RESOURCE;
948                 AcpiOsPrintf ("ResourceTemplate");
949                 break;
950             }
951             else if (Status == AE_AML_NO_RESOURCE_END_TAG)
952             {
953                 AcpiOsPrintf (
954                     "/**** Is ResourceTemplate, "
955                     "but EndTag not at buffer end ****/ ");
956             }
957         }
958 
959         if (AcpiDmIsUuidBuffer (Op))
960         {
961             Op->Common.DisasmOpcode = ACPI_DASM_UUID;
962             AcpiOsPrintf ("ToUUID (");
963         }
964         else if (AcpiDmIsUnicodeBuffer (Op))
965         {
966             Op->Common.DisasmOpcode = ACPI_DASM_UNICODE;
967             AcpiOsPrintf ("Unicode (");
968         }
969         else if (AcpiDmIsStringBuffer (Op))
970         {
971             Op->Common.DisasmOpcode = ACPI_DASM_STRING;
972             AcpiOsPrintf ("Buffer");
973         }
974         else if (AcpiDmIsPldBuffer (Op))
975         {
976             Op->Common.DisasmOpcode = ACPI_DASM_PLD_METHOD;
977             AcpiOsPrintf ("ToPLD (");
978         }
979         else
980         {
981             Op->Common.DisasmOpcode = ACPI_DASM_BUFFER;
982             AcpiOsPrintf ("Buffer");
983         }
984         break;
985 
986     case AML_INT_NAMEPATH_OP:
987 
988         AcpiDmNamestring (Op->Common.Value.Name);
989         break;
990 
991     case AML_INT_NAMEDFIELD_OP:
992 
993         Length = AcpiDmDumpName (Op->Named.Name);
994 
995         AcpiOsPrintf (",");
996         ASL_CV_PRINT_ONE_COMMENT (Op, AML_NAMECOMMENT, NULL, 0);
997         AcpiOsPrintf ("%*.s  %u", (unsigned) (5 - Length), " ",
998             (UINT32) Op->Common.Value.Integer);
999 
1000         AcpiDmCommaIfFieldMember (Op);
1001 
1002         Info->BitOffset += (UINT32) Op->Common.Value.Integer;
1003         break;
1004 
1005     case AML_INT_RESERVEDFIELD_OP:
1006 
1007         /* Offset() -- Must account for previous offsets */
1008 
1009         Offset = (UINT32) Op->Common.Value.Integer;
1010         Info->BitOffset += Offset;
1011 
1012         if (Info->BitOffset % 8 == 0)
1013         {
1014             AcpiOsPrintf ("Offset (0x%.2X)", ACPI_DIV_8 (Info->BitOffset));
1015         }
1016         else
1017         {
1018             AcpiOsPrintf ("    ,   %u", Offset);
1019         }
1020 
1021         AcpiDmCommaIfFieldMember (Op);
1022         break;
1023 
1024     case AML_INT_ACCESSFIELD_OP:
1025     case AML_INT_EXTACCESSFIELD_OP:
1026 
1027         AcpiOsPrintf ("AccessAs (%s, ",
1028             AcpiGbl_AccessTypes [(UINT32) (Op->Common.Value.Integer & 0x7)]);
1029 
1030         AcpiDmDecodeAttribute ((UINT8) (Op->Common.Value.Integer >> 8));
1031 
1032         if (Op->Common.AmlOpcode == AML_INT_EXTACCESSFIELD_OP)
1033         {
1034             AcpiOsPrintf (" (0x%2.2X)", (unsigned)
1035                 ((Op->Common.Value.Integer >> 16) & 0xFF));
1036         }
1037 
1038         AcpiOsPrintf (")");
1039         AcpiDmCommaIfFieldMember (Op);
1040         ASL_CV_PRINT_ONE_COMMENT (Op, AML_COMMENT_END_NODE, NULL, 0);
1041         break;
1042 
1043     case AML_INT_CONNECTION_OP:
1044         /*
1045          * Two types of Connection() - one with a buffer object, the
1046          * other with a namestring that points to a buffer object.
1047          */
1048         AcpiOsPrintf ("Connection (");
1049         Child = Op->Common.Value.Arg;
1050 
1051         if (Child->Common.AmlOpcode == AML_INT_BYTELIST_OP)
1052         {
1053             AcpiOsPrintf ("\n");
1054 
1055             Aml = Child->Named.Data;
1056             Length = (UINT32) Child->Common.Value.Integer;
1057 
1058             Info->Level += 1;
1059             Info->MappingOp = Op;
1060             Op->Common.DisasmOpcode = ACPI_DASM_RESOURCE;
1061 
1062             AcpiDmResourceTemplate (Info, Op->Common.Parent, Aml, Length);
1063 
1064             Info->Level -= 1;
1065             AcpiDmIndent (Info->Level);
1066         }
1067         else
1068         {
1069             AcpiDmNamestring (Child->Common.Value.Name);
1070         }
1071 
1072         AcpiOsPrintf (")");
1073         AcpiDmCommaIfFieldMember (Op);
1074         ASL_CV_PRINT_ONE_COMMENT (Op, AML_COMMENT_END_NODE, NULL, 0);
1075         ASL_CV_PRINT_ONE_COMMENT (Op, AMLCOMMENT_INLINE, NULL, 0);
1076         AcpiOsPrintf ("\n");
1077 
1078         Op->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE; /* for now, ignore in AcpiDmAscendingOp */
1079         Child->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
1080         break;
1081 
1082     case AML_INT_BYTELIST_OP:
1083 
1084         AcpiDmByteList (Info, Op);
1085         break;
1086 
1087     case AML_INT_METHODCALL_OP:
1088 
1089         Op = AcpiPsGetDepthNext (NULL, Op);
1090         Op->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
1091 
1092         AcpiDmNamestring (Op->Common.Value.Name);
1093         break;
1094 
1095     case AML_WHILE_OP:
1096 
1097         if (Op->Common.DisasmOpcode == ACPI_DASM_SWITCH)
1098         {
1099             AcpiOsPrintf ("%s", "Switch");
1100             break;
1101         }
1102 
1103         AcpiOsPrintf ("%s", OpInfo->Name);
1104         break;
1105 
1106     case AML_IF_OP:
1107 
1108         if (Op->Common.DisasmOpcode == ACPI_DASM_CASE)
1109         {
1110             AcpiOsPrintf ("%s", "Case");
1111             break;
1112         }
1113 
1114         AcpiOsPrintf ("%s", OpInfo->Name);
1115         break;
1116 
1117     case AML_ELSE_OP:
1118 
1119         AcpiDmConvertToElseIf (Op);
1120         break;
1121 
1122     case AML_EXTERNAL_OP:
1123 
1124         if (AcpiGbl_DmEmitExternalOpcodes)
1125         {
1126             AcpiDmEmitExternal (Op, AcpiPsGetArg(Op, 0));
1127         }
1128 
1129         break;
1130 
1131     default:
1132 
1133         /* Just get the opcode name and print it */
1134 
1135         AcpiOsPrintf ("%s", OpInfo->Name);
1136 
1137 
1138 #ifdef ACPI_DEBUGGER
1139 
1140         if ((Op->Common.AmlOpcode == AML_INT_RETURN_VALUE_OP) &&
1141             (WalkState) &&
1142             (WalkState->Results) &&
1143             (WalkState->ResultCount))
1144         {
1145             AcpiDbDecodeInternalObject (
1146                 WalkState->Results->Results.ObjDesc [
1147                     (WalkState->ResultCount - 1) %
1148                         ACPI_RESULTS_FRAME_OBJ_NUM]);
1149         }
1150 #endif
1151 
1152         break;
1153     }
1154 }
1155 
1156 
1157 /*******************************************************************************
1158  *
1159  * FUNCTION:    AcpiDmConvertToElseIf
1160  *
1161  * PARAMETERS:  OriginalElseOp          - ELSE Object to be examined
1162  *
1163  * RETURN:      None. Emits either an "Else" or an "ElseIf" ASL operator.
1164  *
1165  * DESCRIPTION: Detect and convert an If..Else..If sequence to If..ElseIf
1166  *
1167  * EXAMPLE:
1168  *
1169  * This If..Else..If nested sequence:
1170  *
1171  *        If (Arg0 == 1)
1172  *        {
1173  *            Local0 = 4
1174  *        }
1175  *        Else
1176  *        {
1177  *            If (Arg0 == 2)
1178  *            {
1179  *                Local0 = 5
1180  *            }
1181  *        }
1182  *
1183  * Is converted to this simpler If..ElseIf sequence:
1184  *
1185  *        If (Arg0 == 1)
1186  *        {
1187  *            Local0 = 4
1188  *        }
1189  *        ElseIf (Arg0 == 2)
1190  *        {
1191  *            Local0 = 5
1192  *        }
1193  *
1194  * NOTE: There is no actual ElseIf AML opcode. ElseIf is essentially an ASL
1195  * macro that emits an Else opcode followed by an If opcode. This function
1196  * reverses these AML sequences back to an ElseIf macro where possible. This
1197  * can make the disassembled ASL code simpler and more like the original code.
1198  *
1199  ******************************************************************************/
1200 
1201 static void
1202 AcpiDmConvertToElseIf (
1203     ACPI_PARSE_OBJECT       *OriginalElseOp)
1204 {
1205     ACPI_PARSE_OBJECT       *IfOp;
1206     ACPI_PARSE_OBJECT       *ElseOp;
1207 
1208 
1209     /*
1210      * To be able to perform the conversion, two conditions must be satisfied:
1211      * 1) The first child of the Else must be an If statement.
1212      * 2) The If block can only be followed by an Else block and these must
1213      *    be the only blocks under the original Else.
1214      */
1215     IfOp = OriginalElseOp->Common.Value.Arg;
1216 
1217     if (!IfOp ||
1218         (IfOp->Common.AmlOpcode != AML_IF_OP) ||
1219         (IfOp->Asl.Next && (IfOp->Asl.Next->Common.AmlOpcode != AML_ELSE_OP)))
1220     {
1221         /* Not a proper Else..If sequence, cannot convert to ElseIf */
1222 
1223         if (OriginalElseOp->Common.DisasmOpcode == ACPI_DASM_DEFAULT)
1224         {
1225             AcpiOsPrintf ("%s", "Default");
1226             return;
1227         }
1228 
1229         AcpiOsPrintf ("%s", "Else");
1230         return;
1231     }
1232 
1233     /* Cannot have anything following the If...Else block */
1234 
1235     ElseOp = IfOp->Common.Next;
1236     if (ElseOp && ElseOp->Common.Next)
1237     {
1238         if (OriginalElseOp->Common.DisasmOpcode == ACPI_DASM_DEFAULT)
1239         {
1240             AcpiOsPrintf ("%s", "Default");
1241             return;
1242         }
1243 
1244         AcpiOsPrintf ("%s", "Else");
1245         return;
1246     }
1247 
1248     if (OriginalElseOp->Common.DisasmOpcode == ACPI_DASM_DEFAULT)
1249     {
1250         /*
1251          * There is an ElseIf but in this case the Else is actually
1252          * a Default block for a Switch/Case statement. No conversion.
1253          */
1254         AcpiOsPrintf ("%s", "Default");
1255         return;
1256     }
1257 
1258     if (OriginalElseOp->Common.DisasmOpcode == ACPI_DASM_CASE)
1259     {
1260         /*
1261          * This ElseIf is actually a Case block for a Switch/Case
1262          * statement. Print Case but do not return so that we can
1263          * promote the subtree and keep the indentation level.
1264          */
1265         AcpiOsPrintf ("%s", "Case");
1266     }
1267     else
1268     {
1269        /* Emit ElseIf, mark the IF as now an ELSEIF */
1270 
1271         AcpiOsPrintf ("%s", "ElseIf");
1272     }
1273 
1274     IfOp->Common.DisasmFlags |= ACPI_PARSEOP_ELSEIF;
1275 
1276     /* The IF parent will now be the same as the original ELSE parent */
1277 
1278     IfOp->Common.Parent = OriginalElseOp->Common.Parent;
1279 
1280     /*
1281      * Update the NEXT pointers to restructure the parse tree, essentially
1282      * promoting an If..Else block up to the same level as the original
1283      * Else.
1284      *
1285      * Check if the IF has a corresponding ELSE peer
1286      */
1287     ElseOp = IfOp->Common.Next;
1288     if (ElseOp &&
1289         (ElseOp->Common.AmlOpcode == AML_ELSE_OP))
1290     {
1291         /* If an ELSE matches the IF, promote it also */
1292 
1293         ElseOp->Common.Parent = OriginalElseOp->Common.Parent;
1294 
1295         /* Promote the entire block under the ElseIf (All Next OPs) */
1296 
1297         AcpiDmPromoteSubtree (OriginalElseOp);
1298     }
1299     else
1300     {
1301         /* Otherwise, set the IF NEXT to the original ELSE NEXT */
1302 
1303         IfOp->Common.Next = OriginalElseOp->Common.Next;
1304     }
1305 
1306     /* Detach the child IF block from the original ELSE */
1307 
1308     OriginalElseOp->Common.Value.Arg = NULL;
1309 
1310     /* Ignore the original ELSE from now on */
1311 
1312     OriginalElseOp->Common.DisasmFlags |= ACPI_PARSEOP_IGNORE;
1313     OriginalElseOp->Common.DisasmOpcode = ACPI_DASM_LNOT_PREFIX;
1314 
1315     /* Insert IF (now ELSEIF) as next peer of the original ELSE */
1316 
1317     OriginalElseOp->Common.Next = IfOp;
1318 }
1319 
1320 
1321 /*******************************************************************************
1322  *
1323  * FUNCTION:    AcpiDmPromoteSubtree
1324  *
1325  * PARAMETERS:  StartOpOp           - Original parent of the entire subtree
1326  *
1327  * RETURN:      None
1328  *
1329  * DESCRIPTION: Promote an entire parse subtree up one level.
1330  *
1331  ******************************************************************************/
1332 
1333 static void
1334 AcpiDmPromoteSubtree (
1335     ACPI_PARSE_OBJECT       *StartOp)
1336 {
1337     ACPI_PARSE_OBJECT       *Op;
1338     ACPI_PARSE_OBJECT       *ParentOp;
1339 
1340 
1341     /* New parent for subtree elements */
1342 
1343     ParentOp = StartOp->Common.Parent;
1344 
1345     /* First child starts the subtree */
1346 
1347     Op = StartOp->Common.Value.Arg;
1348 
1349     /* Walk the top-level elements of the subtree */
1350 
1351     while (Op)
1352     {
1353         Op->Common.Parent = ParentOp;
1354         if (!Op->Common.Next)
1355         {
1356             /* Last Op in list, update its next field */
1357 
1358             Op->Common.Next = StartOp->Common.Next;
1359             break;
1360         }
1361         Op = Op->Common.Next;
1362     }
1363 }
1364