Home | History | Annotate | Line # | Download | only in acpihelp
ahaml.c revision 1.1.1.9
      1      1.1  christos /******************************************************************************
      2      1.1  christos  *
      3      1.1  christos  * Module Name: ahaml - AML opcode decoding for acpihelp utility
      4      1.1  christos  *
      5      1.1  christos  *****************************************************************************/
      6      1.1  christos 
      7  1.1.1.8  christos /******************************************************************************
      8  1.1.1.8  christos  *
      9  1.1.1.8  christos  * 1. Copyright Notice
     10  1.1.1.8  christos  *
     11  1.1.1.9  christos  * Some or all of this work - Copyright (c) 1999 - 2025, Intel Corp.
     12      1.1  christos  * All rights reserved.
     13      1.1  christos  *
     14  1.1.1.8  christos  * 2. License
     15  1.1.1.8  christos  *
     16  1.1.1.8  christos  * 2.1. This is your license from Intel Corp. under its intellectual property
     17  1.1.1.8  christos  * rights. You may have additional license terms from the party that provided
     18  1.1.1.8  christos  * you this software, covering your right to use that party's intellectual
     19  1.1.1.8  christos  * property rights.
     20  1.1.1.8  christos  *
     21  1.1.1.8  christos  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
     22  1.1.1.8  christos  * copy of the source code appearing in this file ("Covered Code") an
     23  1.1.1.8  christos  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
     24  1.1.1.8  christos  * base code distributed originally by Intel ("Original Intel Code") to copy,
     25  1.1.1.8  christos  * make derivatives, distribute, use and display any portion of the Covered
     26  1.1.1.8  christos  * Code in any form, with the right to sublicense such rights; and
     27  1.1.1.8  christos  *
     28  1.1.1.8  christos  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
     29  1.1.1.8  christos  * license (with the right to sublicense), under only those claims of Intel
     30  1.1.1.8  christos  * patents that are infringed by the Original Intel Code, to make, use, sell,
     31  1.1.1.8  christos  * offer to sell, and import the Covered Code and derivative works thereof
     32  1.1.1.8  christos  * solely to the minimum extent necessary to exercise the above copyright
     33  1.1.1.8  christos  * license, and in no event shall the patent license extend to any additions
     34  1.1.1.8  christos  * to or modifications of the Original Intel Code. No other license or right
     35  1.1.1.8  christos  * is granted directly or by implication, estoppel or otherwise;
     36  1.1.1.8  christos  *
     37  1.1.1.8  christos  * The above copyright and patent license is granted only if the following
     38  1.1.1.8  christos  * conditions are met:
     39  1.1.1.8  christos  *
     40  1.1.1.8  christos  * 3. Conditions
     41  1.1.1.8  christos  *
     42  1.1.1.8  christos  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
     43  1.1.1.8  christos  * Redistribution of source code of any substantial portion of the Covered
     44  1.1.1.8  christos  * Code or modification with rights to further distribute source must include
     45  1.1.1.8  christos  * the above Copyright Notice, the above License, this list of Conditions,
     46  1.1.1.8  christos  * and the following Disclaimer and Export Compliance provision. In addition,
     47  1.1.1.8  christos  * Licensee must cause all Covered Code to which Licensee contributes to
     48  1.1.1.8  christos  * contain a file documenting the changes Licensee made to create that Covered
     49  1.1.1.8  christos  * Code and the date of any change. Licensee must include in that file the
     50  1.1.1.8  christos  * documentation of any changes made by any predecessor Licensee. Licensee
     51  1.1.1.8  christos  * must include a prominent statement that the modification is derived,
     52  1.1.1.8  christos  * directly or indirectly, from Original Intel Code.
     53  1.1.1.8  christos  *
     54  1.1.1.8  christos  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
     55  1.1.1.8  christos  * Redistribution of source code of any substantial portion of the Covered
     56  1.1.1.8  christos  * Code or modification without rights to further distribute source must
     57  1.1.1.8  christos  * include the following Disclaimer and Export Compliance provision in the
     58  1.1.1.8  christos  * documentation and/or other materials provided with distribution. In
     59  1.1.1.8  christos  * addition, Licensee may not authorize further sublicense of source of any
     60  1.1.1.8  christos  * portion of the Covered Code, and must include terms to the effect that the
     61  1.1.1.8  christos  * license from Licensee to its licensee is limited to the intellectual
     62  1.1.1.8  christos  * property embodied in the software Licensee provides to its licensee, and
     63  1.1.1.8  christos  * not to intellectual property embodied in modifications its licensee may
     64  1.1.1.8  christos  * make.
     65  1.1.1.8  christos  *
     66  1.1.1.8  christos  * 3.3. Redistribution of Executable. Redistribution in executable form of any
     67  1.1.1.8  christos  * substantial portion of the Covered Code or modification must reproduce the
     68  1.1.1.8  christos  * above Copyright Notice, and the following Disclaimer and Export Compliance
     69  1.1.1.8  christos  * provision in the documentation and/or other materials provided with the
     70  1.1.1.8  christos  * distribution.
     71  1.1.1.8  christos  *
     72  1.1.1.8  christos  * 3.4. Intel retains all right, title, and interest in and to the Original
     73  1.1.1.8  christos  * Intel Code.
     74  1.1.1.8  christos  *
     75  1.1.1.8  christos  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
     76  1.1.1.8  christos  * Intel shall be used in advertising or otherwise to promote the sale, use or
     77  1.1.1.8  christos  * other dealings in products derived from or relating to the Covered Code
     78  1.1.1.8  christos  * without prior written authorization from Intel.
     79  1.1.1.8  christos  *
     80  1.1.1.8  christos  * 4. Disclaimer and Export Compliance
     81  1.1.1.8  christos  *
     82  1.1.1.8  christos  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
     83  1.1.1.8  christos  * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
     84  1.1.1.8  christos  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
     85  1.1.1.8  christos  * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
     86  1.1.1.8  christos  * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
     87  1.1.1.8  christos  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
     88  1.1.1.8  christos  * PARTICULAR PURPOSE.
     89  1.1.1.8  christos  *
     90  1.1.1.8  christos  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
     91  1.1.1.8  christos  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
     92  1.1.1.8  christos  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
     93  1.1.1.8  christos  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
     94  1.1.1.8  christos  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
     95  1.1.1.8  christos  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
     96  1.1.1.8  christos  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
     97  1.1.1.8  christos  * LIMITED REMEDY.
     98  1.1.1.8  christos  *
     99  1.1.1.8  christos  * 4.3. Licensee shall not export, either directly or indirectly, any of this
    100  1.1.1.8  christos  * software or system incorporating such software without first obtaining any
    101  1.1.1.8  christos  * required license or other approval from the U. S. Department of Commerce or
    102  1.1.1.8  christos  * any other agency or department of the United States Government. In the
    103  1.1.1.8  christos  * event Licensee exports any such software from the United States or
    104  1.1.1.8  christos  * re-exports any such software from a foreign destination, Licensee shall
    105  1.1.1.8  christos  * ensure that the distribution and export/re-export of the software is in
    106  1.1.1.8  christos  * compliance with all laws, regulations, orders, or other restrictions of the
    107  1.1.1.8  christos  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
    108  1.1.1.8  christos  * any of its subsidiaries will export/re-export any technical data, process,
    109  1.1.1.8  christos  * software, or service, directly or indirectly, to any country for which the
    110  1.1.1.8  christos  * United States government or any agency thereof requires an export license,
    111  1.1.1.8  christos  * other governmental approval, or letter of assurance, without first obtaining
    112  1.1.1.8  christos  * such license, approval or letter.
    113  1.1.1.8  christos  *
    114  1.1.1.8  christos  *****************************************************************************
    115  1.1.1.8  christos  *
    116  1.1.1.8  christos  * Alternatively, you may choose to be licensed under the terms of the
    117  1.1.1.8  christos  * following license:
    118  1.1.1.8  christos  *
    119      1.1  christos  * Redistribution and use in source and binary forms, with or without
    120      1.1  christos  * modification, are permitted provided that the following conditions
    121      1.1  christos  * are met:
    122      1.1  christos  * 1. Redistributions of source code must retain the above copyright
    123      1.1  christos  *    notice, this list of conditions, and the following disclaimer,
    124      1.1  christos  *    without modification.
    125      1.1  christos  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
    126      1.1  christos  *    substantially similar to the "NO WARRANTY" disclaimer below
    127      1.1  christos  *    ("Disclaimer") and any redistribution must be conditioned upon
    128      1.1  christos  *    including a substantially similar Disclaimer requirement for further
    129      1.1  christos  *    binary redistribution.
    130      1.1  christos  * 3. Neither the names of the above-listed copyright holders nor the names
    131      1.1  christos  *    of any contributors may be used to endorse or promote products derived
    132      1.1  christos  *    from this software without specific prior written permission.
    133      1.1  christos  *
    134      1.1  christos  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
    135      1.1  christos  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
    136  1.1.1.5  christos  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
    137      1.1  christos  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
    138  1.1.1.8  christos  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
    139  1.1.1.8  christos  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
    140  1.1.1.8  christos  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
    141  1.1.1.8  christos  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
    142  1.1.1.8  christos  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
    143  1.1.1.8  christos  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
    144  1.1.1.8  christos  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
    145  1.1.1.8  christos  *
    146  1.1.1.8  christos  * Alternatively, you may choose to be licensed under the terms of the
    147  1.1.1.8  christos  * GNU General Public License ("GPL") version 2 as published by the Free
    148  1.1.1.8  christos  * Software Foundation.
    149  1.1.1.8  christos  *
    150  1.1.1.8  christos  *****************************************************************************/
    151      1.1  christos 
    152      1.1  christos #include "acpihelp.h"
    153      1.1  christos 
    154      1.1  christos 
    155      1.1  christos /* Local prototypes */
    156      1.1  christos 
    157      1.1  christos static void
    158      1.1  christos AhDisplayAmlOpcode (
    159      1.1  christos     const AH_AML_OPCODE     *Op);
    160      1.1  christos 
    161      1.1  christos static void
    162      1.1  christos AhDisplayAmlType (
    163      1.1  christos     const AH_AML_TYPE       *Op);
    164      1.1  christos 
    165      1.1  christos 
    166      1.1  christos /*******************************************************************************
    167      1.1  christos  *
    168      1.1  christos  * FUNCTION:    AhFindAmlOpcode (entry point for AML opcode name search)
    169      1.1  christos  *
    170      1.1  christos  * PARAMETERS:  Name                - Name or prefix for an AML opcode.
    171      1.1  christos  *                                    NULL means "find all"
    172      1.1  christos  *
    173      1.1  christos  * RETURN:      None
    174      1.1  christos  *
    175      1.1  christos  * DESCRIPTION: Find all AML opcodes that match the input Name or name
    176      1.1  christos  *              prefix.
    177      1.1  christos  *
    178      1.1  christos  ******************************************************************************/
    179      1.1  christos 
    180      1.1  christos void
    181      1.1  christos AhFindAmlOpcode (
    182      1.1  christos     char                    *Name)
    183      1.1  christos {
    184      1.1  christos     const AH_AML_OPCODE     *Op;
    185      1.1  christos     BOOLEAN                 Found = FALSE;
    186      1.1  christos 
    187      1.1  christos 
    188      1.1  christos     AcpiUtStrupr (Name);
    189      1.1  christos 
    190      1.1  christos     /* Find/display all opcode names that match the input name prefix */
    191      1.1  christos 
    192      1.1  christos     for (Op = Gbl_AmlOpcodeInfo; Op->OpcodeString; Op++)
    193      1.1  christos     {
    194      1.1  christos         if (!Op->OpcodeName) /* Unused opcodes */
    195      1.1  christos         {
    196      1.1  christos             continue;
    197      1.1  christos         }
    198      1.1  christos 
    199      1.1  christos         if (!Name || (Name[0] == '*'))
    200      1.1  christos         {
    201      1.1  christos             AhDisplayAmlOpcode (Op);
    202      1.1  christos             Found = TRUE;
    203      1.1  christos             continue;
    204      1.1  christos         }
    205      1.1  christos 
    206      1.1  christos         /* Upper case the opcode name before substring compare */
    207      1.1  christos 
    208      1.1  christos         strcpy (Gbl_Buffer, Op->OpcodeName);
    209      1.1  christos         AcpiUtStrupr (Gbl_Buffer);
    210      1.1  christos 
    211      1.1  christos         if (strstr (Gbl_Buffer, Name) == Gbl_Buffer)
    212      1.1  christos         {
    213      1.1  christos             AhDisplayAmlOpcode (Op);
    214      1.1  christos             Found = TRUE;
    215      1.1  christos         }
    216      1.1  christos     }
    217      1.1  christos 
    218  1.1.1.5  christos     if (!Found && Name)
    219      1.1  christos     {
    220  1.1.1.5  christos         printf ("%s, no matching AML opcodes\n", Name);
    221      1.1  christos     }
    222      1.1  christos }
    223      1.1  christos 
    224      1.1  christos 
    225      1.1  christos /*******************************************************************************
    226      1.1  christos  *
    227      1.1  christos  * FUNCTION:    AhDecodeAmlOpcode (entry point for AML opcode search)
    228      1.1  christos  *
    229      1.1  christos  * PARAMETERS:  OpcodeString        - String version of AML opcode
    230      1.1  christos  *
    231      1.1  christos  * RETURN:      None
    232      1.1  christos  *
    233      1.1  christos  * DESCRIPTION: Display information about the input AML opcode
    234      1.1  christos  *
    235      1.1  christos  ******************************************************************************/
    236      1.1  christos 
    237      1.1  christos void
    238      1.1  christos AhDecodeAmlOpcode (
    239      1.1  christos     char                    *OpcodeString)
    240      1.1  christos {
    241      1.1  christos     const AH_AML_OPCODE     *Op;
    242      1.1  christos     UINT32                  Opcode;
    243      1.1  christos     UINT8                   Prefix;
    244      1.1  christos 
    245      1.1  christos 
    246      1.1  christos     if (!OpcodeString)
    247      1.1  christos     {
    248      1.1  christos         AhFindAmlOpcode (NULL);
    249      1.1  christos         return;
    250      1.1  christos     }
    251      1.1  christos 
    252      1.1  christos     Opcode = strtoul (OpcodeString, NULL, 16);
    253      1.1  christos     if (Opcode > ACPI_UINT16_MAX)
    254      1.1  christos     {
    255      1.1  christos         printf ("Invalid opcode (more than 16 bits)\n");
    256      1.1  christos         return;
    257      1.1  christos     }
    258      1.1  christos 
    259      1.1  christos     /* Only valid opcode extension is 0x5B */
    260      1.1  christos 
    261      1.1  christos     Prefix = (Opcode & 0x0000FF00) >> 8;
    262      1.1  christos     if (Prefix && (Prefix != 0x5B))
    263      1.1  christos     {
    264      1.1  christos         printf ("Invalid opcode (invalid extension prefix 0x%X)\n",
    265      1.1  christos             Prefix);
    266      1.1  christos         return;
    267      1.1  christos     }
    268      1.1  christos 
    269      1.1  christos     /* Find/Display the opcode. May fall within an opcode range */
    270      1.1  christos 
    271      1.1  christos     for (Op = Gbl_AmlOpcodeInfo; Op->OpcodeString; Op++)
    272      1.1  christos     {
    273      1.1  christos         if ((Opcode >= Op->OpcodeRangeStart) &&
    274      1.1  christos             (Opcode <= Op->OpcodeRangeEnd))
    275      1.1  christos         {
    276      1.1  christos             AhDisplayAmlOpcode (Op);
    277      1.1  christos         }
    278      1.1  christos     }
    279      1.1  christos }
    280      1.1  christos 
    281      1.1  christos 
    282      1.1  christos /*******************************************************************************
    283      1.1  christos  *
    284      1.1  christos  * FUNCTION:    AhDisplayAmlOpcode
    285      1.1  christos  *
    286      1.1  christos  * PARAMETERS:  Op                  - An opcode info struct
    287      1.1  christos  *
    288      1.1  christos  * RETURN:      None
    289      1.1  christos  *
    290      1.1  christos  * DESCRIPTION: Display the contents of an AML opcode information struct
    291      1.1  christos  *
    292      1.1  christos  ******************************************************************************/
    293      1.1  christos 
    294      1.1  christos static void
    295      1.1  christos AhDisplayAmlOpcode (
    296      1.1  christos     const AH_AML_OPCODE     *Op)
    297      1.1  christos {
    298      1.1  christos 
    299      1.1  christos     if (!Op->OpcodeName)
    300      1.1  christos     {
    301      1.1  christos         printf ("%18s: Opcode=%-9s\n", "Reserved opcode", Op->OpcodeString);
    302      1.1  christos         return;
    303      1.1  christos     }
    304      1.1  christos 
    305      1.1  christos     /* Opcode name and value(s) */
    306      1.1  christos 
    307      1.1  christos     printf ("%18s: Opcode=%-9s Type (%s)",
    308      1.1  christos         Op->OpcodeName, Op->OpcodeString, Op->Type);
    309      1.1  christos 
    310      1.1  christos     /* Optional fixed/static arguments */
    311      1.1  christos 
    312      1.1  christos     if (Op->FixedArguments)
    313      1.1  christos     {
    314      1.1  christos         printf (" FixedArgs (");
    315      1.1  christos         AhPrintOneField (37, 36 + 7 + strlen (Op->Type) + 12,
    316      1.1  christos             AH_MAX_AML_LINE_LENGTH, Op->FixedArguments);
    317      1.1  christos         printf (")");
    318      1.1  christos     }
    319      1.1  christos 
    320      1.1  christos     /* Optional variable-length argument list */
    321      1.1  christos 
    322      1.1  christos     if (Op->VariableArguments)
    323      1.1  christos     {
    324      1.1  christos         if (Op->FixedArguments)
    325      1.1  christos         {
    326      1.1  christos             printf ("\n%*s", 36, " ");
    327      1.1  christos         }
    328      1.1  christos         printf (" VariableArgs (");
    329      1.1  christos         AhPrintOneField (37, 15, AH_MAX_AML_LINE_LENGTH, Op->VariableArguments);
    330      1.1  christos         printf (")");
    331      1.1  christos     }
    332      1.1  christos     printf ("\n");
    333      1.1  christos 
    334      1.1  christos     /* Grammar specification */
    335      1.1  christos 
    336      1.1  christos     if (Op->Grammar)
    337      1.1  christos     {
    338      1.1  christos         AhPrintOneField (37, 0, AH_MAX_AML_LINE_LENGTH, Op->Grammar);
    339      1.1  christos         printf ("\n");
    340      1.1  christos     }
    341      1.1  christos }
    342      1.1  christos 
    343      1.1  christos 
    344      1.1  christos /*******************************************************************************
    345      1.1  christos  *
    346      1.1  christos  * FUNCTION:    AhFindAmlTypes (entry point for AML grammar keyword search)
    347      1.1  christos  *
    348      1.1  christos  * PARAMETERS:  Name                - Name or prefix for an AML grammar element.
    349      1.1  christos  *                                    NULL means "find all"
    350      1.1  christos  *
    351      1.1  christos  * RETURN:      None
    352      1.1  christos  *
    353      1.1  christos  * DESCRIPTION: Find all AML grammar keywords that match the input Name or name
    354      1.1  christos  *              prefix.
    355      1.1  christos  *
    356      1.1  christos  ******************************************************************************/
    357      1.1  christos 
    358      1.1  christos void
    359      1.1  christos AhFindAmlTypes (
    360      1.1  christos     char                    *Name)
    361      1.1  christos {
    362      1.1  christos     const AH_AML_TYPE       *Keyword;
    363      1.1  christos     BOOLEAN                 Found = FALSE;
    364      1.1  christos 
    365      1.1  christos 
    366      1.1  christos     AcpiUtStrupr (Name);
    367      1.1  christos 
    368      1.1  christos     for (Keyword = Gbl_AmlTypesInfo; Keyword->Name; Keyword++)
    369      1.1  christos     {
    370      1.1  christos         if (!Name)
    371      1.1  christos         {
    372      1.1  christos             printf ("    %s\n", Keyword->Name);
    373      1.1  christos             Found = TRUE;
    374      1.1  christos             continue;
    375      1.1  christos         }
    376      1.1  christos 
    377      1.1  christos         if (*Name == '*')
    378      1.1  christos         {
    379      1.1  christos             AhDisplayAmlType (Keyword);
    380      1.1  christos             Found = TRUE;
    381      1.1  christos             continue;
    382      1.1  christos         }
    383      1.1  christos 
    384      1.1  christos         /* Upper case the operator name before substring compare */
    385      1.1  christos 
    386      1.1  christos         strcpy (Gbl_Buffer, Keyword->Name);
    387      1.1  christos         AcpiUtStrupr (Gbl_Buffer);
    388      1.1  christos 
    389      1.1  christos         if (strstr (Gbl_Buffer, Name) == Gbl_Buffer)
    390      1.1  christos         {
    391      1.1  christos             AhDisplayAmlType (Keyword);
    392      1.1  christos             Found = TRUE;
    393      1.1  christos         }
    394      1.1  christos     }
    395      1.1  christos 
    396      1.1  christos     if (!Found)
    397      1.1  christos     {
    398      1.1  christos         printf ("%s, no matching AML grammar type\n", Name);
    399      1.1  christos     }
    400      1.1  christos }
    401      1.1  christos 
    402      1.1  christos 
    403      1.1  christos /*******************************************************************************
    404      1.1  christos  *
    405      1.1  christos  * FUNCTION:    AhDisplayAmlType
    406      1.1  christos  *
    407      1.1  christos  * PARAMETERS:  Op                  - Pointer to AML grammar info
    408      1.1  christos  *
    409      1.1  christos  * RETURN:      None
    410      1.1  christos  *
    411      1.1  christos  * DESCRIPTION: Format and display info for an AML grammar element.
    412      1.1  christos  *
    413      1.1  christos  ******************************************************************************/
    414      1.1  christos 
    415      1.1  christos static void
    416      1.1  christos AhDisplayAmlType (
    417      1.1  christos     const AH_AML_TYPE       *Op)
    418      1.1  christos {
    419      1.1  christos     char                    *Description;
    420      1.1  christos 
    421      1.1  christos 
    422      1.1  christos     Description = Op->Description;
    423      1.1  christos     printf ("%4s", " ");    /* Primary indent */
    424      1.1  christos 
    425      1.1  christos     /* Emit the entire description string */
    426      1.1  christos 
    427      1.1  christos     while (*Description)
    428      1.1  christos     {
    429      1.1  christos         /* Description can be multiple lines, must indent each */
    430      1.1  christos 
    431      1.1  christos         while (*Description != '\n')
    432      1.1  christos         {
    433      1.1  christos             printf ("%c", *Description);
    434      1.1  christos             Description++;
    435      1.1  christos         }
    436      1.1  christos 
    437      1.1  christos         printf ("\n");
    438      1.1  christos         Description++;
    439      1.1  christos 
    440      1.1  christos         /* Do indent */
    441      1.1  christos 
    442      1.1  christos         if (*Description)
    443      1.1  christos         {
    444      1.1  christos             printf ("%8s", " ");    /* Secondary indent */
    445      1.1  christos 
    446      1.1  christos             /* Index extra for a comment */
    447      1.1  christos 
    448      1.1  christos             if ((Description[0] == '/') &&
    449      1.1  christos                 (Description[1] == '/'))
    450      1.1  christos             {
    451      1.1  christos                 printf ("%4s", " ");
    452      1.1  christos             }
    453      1.1  christos         }
    454      1.1  christos     }
    455      1.1  christos 
    456      1.1  christos     printf ("\n");
    457      1.1  christos }
    458