xref: /freebsd/sys/contrib/dev/acpica/compiler/aslutils.c (revision a009b7dcabdc27aa3fdde1f2c6dd08d4fe5a3170)
153289f6aSNate Lawson /******************************************************************************
253289f6aSNate Lawson  *
353289f6aSNate Lawson  * Module Name: aslutils -- compiler utilities
453289f6aSNate Lawson  *
553289f6aSNate Lawson  *****************************************************************************/
653289f6aSNate Lawson 
70d84335fSJung-uk Kim /******************************************************************************
80d84335fSJung-uk Kim  *
90d84335fSJung-uk Kim  * 1. Copyright Notice
100d84335fSJung-uk Kim  *
11e5e1f58aSJung-uk Kim  * Some or all of this work - Copyright (c) 1999 - 2019, Intel Corp.
1253289f6aSNate Lawson  * All rights reserved.
1353289f6aSNate Lawson  *
140d84335fSJung-uk Kim  * 2. License
150d84335fSJung-uk Kim  *
160d84335fSJung-uk Kim  * 2.1. This is your license from Intel Corp. under its intellectual property
170d84335fSJung-uk Kim  * rights. You may have additional license terms from the party that provided
180d84335fSJung-uk Kim  * you this software, covering your right to use that party's intellectual
190d84335fSJung-uk Kim  * property rights.
200d84335fSJung-uk Kim  *
210d84335fSJung-uk Kim  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
220d84335fSJung-uk Kim  * copy of the source code appearing in this file ("Covered Code") an
230d84335fSJung-uk Kim  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
240d84335fSJung-uk Kim  * base code distributed originally by Intel ("Original Intel Code") to copy,
250d84335fSJung-uk Kim  * make derivatives, distribute, use and display any portion of the Covered
260d84335fSJung-uk Kim  * Code in any form, with the right to sublicense such rights; and
270d84335fSJung-uk Kim  *
280d84335fSJung-uk Kim  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
290d84335fSJung-uk Kim  * license (with the right to sublicense), under only those claims of Intel
300d84335fSJung-uk Kim  * patents that are infringed by the Original Intel Code, to make, use, sell,
310d84335fSJung-uk Kim  * offer to sell, and import the Covered Code and derivative works thereof
320d84335fSJung-uk Kim  * solely to the minimum extent necessary to exercise the above copyright
330d84335fSJung-uk Kim  * license, and in no event shall the patent license extend to any additions
340d84335fSJung-uk Kim  * to or modifications of the Original Intel Code. No other license or right
350d84335fSJung-uk Kim  * is granted directly or by implication, estoppel or otherwise;
360d84335fSJung-uk Kim  *
370d84335fSJung-uk Kim  * The above copyright and patent license is granted only if the following
380d84335fSJung-uk Kim  * conditions are met:
390d84335fSJung-uk Kim  *
400d84335fSJung-uk Kim  * 3. Conditions
410d84335fSJung-uk Kim  *
420d84335fSJung-uk Kim  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
430d84335fSJung-uk Kim  * Redistribution of source code of any substantial portion of the Covered
440d84335fSJung-uk Kim  * Code or modification with rights to further distribute source must include
450d84335fSJung-uk Kim  * the above Copyright Notice, the above License, this list of Conditions,
460d84335fSJung-uk Kim  * and the following Disclaimer and Export Compliance provision. In addition,
470d84335fSJung-uk Kim  * Licensee must cause all Covered Code to which Licensee contributes to
480d84335fSJung-uk Kim  * contain a file documenting the changes Licensee made to create that Covered
490d84335fSJung-uk Kim  * Code and the date of any change. Licensee must include in that file the
500d84335fSJung-uk Kim  * documentation of any changes made by any predecessor Licensee. Licensee
510d84335fSJung-uk Kim  * must include a prominent statement that the modification is derived,
520d84335fSJung-uk Kim  * directly or indirectly, from Original Intel Code.
530d84335fSJung-uk Kim  *
540d84335fSJung-uk Kim  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
550d84335fSJung-uk Kim  * Redistribution of source code of any substantial portion of the Covered
560d84335fSJung-uk Kim  * Code or modification without rights to further distribute source must
570d84335fSJung-uk Kim  * include the following Disclaimer and Export Compliance provision in the
580d84335fSJung-uk Kim  * documentation and/or other materials provided with distribution. In
590d84335fSJung-uk Kim  * addition, Licensee may not authorize further sublicense of source of any
600d84335fSJung-uk Kim  * portion of the Covered Code, and must include terms to the effect that the
610d84335fSJung-uk Kim  * license from Licensee to its licensee is limited to the intellectual
620d84335fSJung-uk Kim  * property embodied in the software Licensee provides to its licensee, and
630d84335fSJung-uk Kim  * not to intellectual property embodied in modifications its licensee may
640d84335fSJung-uk Kim  * make.
650d84335fSJung-uk Kim  *
660d84335fSJung-uk Kim  * 3.3. Redistribution of Executable. Redistribution in executable form of any
670d84335fSJung-uk Kim  * substantial portion of the Covered Code or modification must reproduce the
680d84335fSJung-uk Kim  * above Copyright Notice, and the following Disclaimer and Export Compliance
690d84335fSJung-uk Kim  * provision in the documentation and/or other materials provided with the
700d84335fSJung-uk Kim  * distribution.
710d84335fSJung-uk Kim  *
720d84335fSJung-uk Kim  * 3.4. Intel retains all right, title, and interest in and to the Original
730d84335fSJung-uk Kim  * Intel Code.
740d84335fSJung-uk Kim  *
750d84335fSJung-uk Kim  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
760d84335fSJung-uk Kim  * Intel shall be used in advertising or otherwise to promote the sale, use or
770d84335fSJung-uk Kim  * other dealings in products derived from or relating to the Covered Code
780d84335fSJung-uk Kim  * without prior written authorization from Intel.
790d84335fSJung-uk Kim  *
800d84335fSJung-uk Kim  * 4. Disclaimer and Export Compliance
810d84335fSJung-uk Kim  *
820d84335fSJung-uk Kim  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
830d84335fSJung-uk Kim  * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
840d84335fSJung-uk Kim  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
850d84335fSJung-uk Kim  * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
860d84335fSJung-uk Kim  * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
870d84335fSJung-uk Kim  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
880d84335fSJung-uk Kim  * PARTICULAR PURPOSE.
890d84335fSJung-uk Kim  *
900d84335fSJung-uk Kim  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
910d84335fSJung-uk Kim  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
920d84335fSJung-uk Kim  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
930d84335fSJung-uk Kim  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
940d84335fSJung-uk Kim  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
950d84335fSJung-uk Kim  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
960d84335fSJung-uk Kim  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
970d84335fSJung-uk Kim  * LIMITED REMEDY.
980d84335fSJung-uk Kim  *
990d84335fSJung-uk Kim  * 4.3. Licensee shall not export, either directly or indirectly, any of this
1000d84335fSJung-uk Kim  * software or system incorporating such software without first obtaining any
1010d84335fSJung-uk Kim  * required license or other approval from the U. S. Department of Commerce or
1020d84335fSJung-uk Kim  * any other agency or department of the United States Government. In the
1030d84335fSJung-uk Kim  * event Licensee exports any such software from the United States or
1040d84335fSJung-uk Kim  * re-exports any such software from a foreign destination, Licensee shall
1050d84335fSJung-uk Kim  * ensure that the distribution and export/re-export of the software is in
1060d84335fSJung-uk Kim  * compliance with all laws, regulations, orders, or other restrictions of the
1070d84335fSJung-uk Kim  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
1080d84335fSJung-uk Kim  * any of its subsidiaries will export/re-export any technical data, process,
1090d84335fSJung-uk Kim  * software, or service, directly or indirectly, to any country for which the
1100d84335fSJung-uk Kim  * United States government or any agency thereof requires an export license,
1110d84335fSJung-uk Kim  * other governmental approval, or letter of assurance, without first obtaining
1120d84335fSJung-uk Kim  * such license, approval or letter.
1130d84335fSJung-uk Kim  *
1140d84335fSJung-uk Kim  *****************************************************************************
1150d84335fSJung-uk Kim  *
1160d84335fSJung-uk Kim  * Alternatively, you may choose to be licensed under the terms of the
1170d84335fSJung-uk Kim  * following license:
1180d84335fSJung-uk Kim  *
119d244b227SJung-uk Kim  * Redistribution and use in source and binary forms, with or without
120d244b227SJung-uk Kim  * modification, are permitted provided that the following conditions
121d244b227SJung-uk Kim  * are met:
122d244b227SJung-uk Kim  * 1. Redistributions of source code must retain the above copyright
123d244b227SJung-uk Kim  *    notice, this list of conditions, and the following disclaimer,
124d244b227SJung-uk Kim  *    without modification.
125d244b227SJung-uk Kim  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
126d244b227SJung-uk Kim  *    substantially similar to the "NO WARRANTY" disclaimer below
127d244b227SJung-uk Kim  *    ("Disclaimer") and any redistribution must be conditioned upon
128d244b227SJung-uk Kim  *    including a substantially similar Disclaimer requirement for further
129d244b227SJung-uk Kim  *    binary redistribution.
130d244b227SJung-uk Kim  * 3. Neither the names of the above-listed copyright holders nor the names
131d244b227SJung-uk Kim  *    of any contributors may be used to endorse or promote products derived
132d244b227SJung-uk Kim  *    from this software without specific prior written permission.
13353289f6aSNate Lawson  *
1340d84335fSJung-uk Kim  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
1350d84335fSJung-uk Kim  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
1360d84335fSJung-uk Kim  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
1370d84335fSJung-uk Kim  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
1380d84335fSJung-uk Kim  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
1390d84335fSJung-uk Kim  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
1400d84335fSJung-uk Kim  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
1410d84335fSJung-uk Kim  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
1420d84335fSJung-uk Kim  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
1430d84335fSJung-uk Kim  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
1440d84335fSJung-uk Kim  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
1450d84335fSJung-uk Kim  *
1460d84335fSJung-uk Kim  * Alternatively, you may choose to be licensed under the terms of the
147d244b227SJung-uk Kim  * GNU General Public License ("GPL") version 2 as published by the Free
148d244b227SJung-uk Kim  * Software Foundation.
14953289f6aSNate Lawson  *
1500d84335fSJung-uk Kim  *****************************************************************************/
15153289f6aSNate Lawson 
152ab6f3bf9SJung-uk Kim #include <contrib/dev/acpica/compiler/aslcompiler.h>
15353289f6aSNate Lawson #include "aslcompiler.y.h"
154a88e22b7SJung-uk Kim #include <contrib/dev/acpica/include/acdisasm.h>
155ab6f3bf9SJung-uk Kim #include <contrib/dev/acpica/include/acnamesp.h>
156ab6f3bf9SJung-uk Kim #include <contrib/dev/acpica/include/amlcode.h>
1573c1812acSJung-uk Kim #include <contrib/dev/acpica/include/acapps.h>
158f8146b88SJung-uk Kim #include <sys/stat.h>
159f8146b88SJung-uk Kim 
16053289f6aSNate Lawson 
16153289f6aSNate Lawson #define _COMPONENT          ACPI_COMPILER
16253289f6aSNate Lawson         ACPI_MODULE_NAME    ("aslutils")
16353289f6aSNate Lawson 
1643f0275a0SJung-uk Kim 
165fba7fc7eSJung-uk Kim /* Local prototypes */
16653289f6aSNate Lawson 
167fba7fc7eSJung-uk Kim static void
168fba7fc7eSJung-uk Kim UtPadNameWithUnderscores (
169fba7fc7eSJung-uk Kim     char                    *NameSeg,
170fba7fc7eSJung-uk Kim     char                    *PaddedNameSeg);
171fba7fc7eSJung-uk Kim 
172fba7fc7eSJung-uk Kim static void
173fba7fc7eSJung-uk Kim UtAttachNameseg (
174fba7fc7eSJung-uk Kim     ACPI_PARSE_OBJECT       *Op,
175fba7fc7eSJung-uk Kim     char                    *Name);
17653289f6aSNate Lawson 
17744b0f624SJung-uk Kim static void
17844b0f624SJung-uk Kim UtDisplayErrorSummary (
17944b0f624SJung-uk Kim     UINT32                  FileId);
18044b0f624SJung-uk Kim 
18153289f6aSNate Lawson 
18253289f6aSNate Lawson /*******************************************************************************
18353289f6aSNate Lawson  *
184f8146b88SJung-uk Kim  * FUNCTION:    UtIsBigEndianMachine
185f8146b88SJung-uk Kim  *
186f8146b88SJung-uk Kim  * PARAMETERS:  None
187f8146b88SJung-uk Kim  *
188f8146b88SJung-uk Kim  * RETURN:      TRUE if machine is big endian
189f8146b88SJung-uk Kim  *              FALSE if machine is little endian
190f8146b88SJung-uk Kim  *
191f8146b88SJung-uk Kim  * DESCRIPTION: Detect whether machine is little endian or big endian.
192f8146b88SJung-uk Kim  *
193f8146b88SJung-uk Kim  ******************************************************************************/
194f8146b88SJung-uk Kim 
195f8146b88SJung-uk Kim UINT8
196f8146b88SJung-uk Kim UtIsBigEndianMachine (
197f8146b88SJung-uk Kim     void)
198f8146b88SJung-uk Kim {
199f8146b88SJung-uk Kim     union {
200f8146b88SJung-uk Kim         UINT32              Integer;
201f8146b88SJung-uk Kim         UINT8               Bytes[4];
202f8146b88SJung-uk Kim     } Overlay =                 {0xFF000000};
203f8146b88SJung-uk Kim 
204f8146b88SJung-uk Kim 
205f8146b88SJung-uk Kim     return (Overlay.Bytes[0]); /* Returns 0xFF (TRUE) for big endian */
206f8146b88SJung-uk Kim }
207f8146b88SJung-uk Kim 
208f8146b88SJung-uk Kim 
209f8146b88SJung-uk Kim /******************************************************************************
210f8146b88SJung-uk Kim  *
211f8146b88SJung-uk Kim  * FUNCTION:    UtQueryForOverwrite
212f8146b88SJung-uk Kim  *
213f8146b88SJung-uk Kim  * PARAMETERS:  Pathname            - Output filename
214f8146b88SJung-uk Kim  *
215f8146b88SJung-uk Kim  * RETURN:      TRUE if file does not exist or overwrite is authorized
216f8146b88SJung-uk Kim  *
217f8146b88SJung-uk Kim  * DESCRIPTION: Query for file overwrite if it already exists.
218f8146b88SJung-uk Kim  *
219f8146b88SJung-uk Kim  ******************************************************************************/
220f8146b88SJung-uk Kim 
221f8146b88SJung-uk Kim BOOLEAN
222f8146b88SJung-uk Kim UtQueryForOverwrite (
223f8146b88SJung-uk Kim     char                    *Pathname)
224f8146b88SJung-uk Kim {
225f8146b88SJung-uk Kim     struct stat             StatInfo;
226*a009b7dcSJung-uk Kim     int                     InChar;
227f8146b88SJung-uk Kim 
228f8146b88SJung-uk Kim 
229f8146b88SJung-uk Kim     if (!stat (Pathname, &StatInfo))
230f8146b88SJung-uk Kim     {
231f8146b88SJung-uk Kim         fprintf (stderr, "Target file \"%s\" already exists, overwrite? [y|n] ",
232f8146b88SJung-uk Kim             Pathname);
233f8146b88SJung-uk Kim 
234*a009b7dcSJung-uk Kim         InChar = fgetc (stdin);
235*a009b7dcSJung-uk Kim         if (InChar == '\n')
236*a009b7dcSJung-uk Kim         {
237*a009b7dcSJung-uk Kim             InChar = fgetc (stdin);
238*a009b7dcSJung-uk Kim         }
239*a009b7dcSJung-uk Kim 
240*a009b7dcSJung-uk Kim         if ((InChar != 'y') && (InChar != 'Y'))
241f8146b88SJung-uk Kim         {
242f8146b88SJung-uk Kim             return (FALSE);
243f8146b88SJung-uk Kim         }
244f8146b88SJung-uk Kim     }
245f8146b88SJung-uk Kim 
246f8146b88SJung-uk Kim     return (TRUE);
247f8146b88SJung-uk Kim }
248f8146b88SJung-uk Kim 
249f8146b88SJung-uk Kim 
250f8146b88SJung-uk Kim /*******************************************************************************
251f8146b88SJung-uk Kim  *
252835b56bfSJung-uk Kim  * FUNCTION:    UtNodeIsDescendantOf
253835b56bfSJung-uk Kim  *
254835b56bfSJung-uk Kim  * PARAMETERS:  Node1                   - Child node
255835b56bfSJung-uk Kim  *              Node2                   - Possible parent node
256835b56bfSJung-uk Kim  *
257835b56bfSJung-uk Kim  * RETURN:      Boolean
258835b56bfSJung-uk Kim  *
259835b56bfSJung-uk Kim  * DESCRIPTION: Returns TRUE if Node1 is a descendant of Node2. Otherwise,
260835b56bfSJung-uk Kim  *              return FALSE. Note, we assume a NULL Node2 element to be the
261835b56bfSJung-uk Kim  *              topmost (root) scope. All nodes are descendants of the root.
262835b56bfSJung-uk Kim  *              Note: Nodes at the same level (siblings) are not considered
263835b56bfSJung-uk Kim  *              descendants.
264835b56bfSJung-uk Kim  *
265835b56bfSJung-uk Kim  ******************************************************************************/
266835b56bfSJung-uk Kim 
267835b56bfSJung-uk Kim BOOLEAN
268835b56bfSJung-uk Kim UtNodeIsDescendantOf (
269835b56bfSJung-uk Kim     ACPI_NAMESPACE_NODE     *Node1,
270835b56bfSJung-uk Kim     ACPI_NAMESPACE_NODE     *Node2)
271835b56bfSJung-uk Kim {
272835b56bfSJung-uk Kim 
273835b56bfSJung-uk Kim     if (Node1 == Node2)
274835b56bfSJung-uk Kim     {
275835b56bfSJung-uk Kim         return (FALSE);
276835b56bfSJung-uk Kim     }
277835b56bfSJung-uk Kim 
278835b56bfSJung-uk Kim     if (!Node2)
279835b56bfSJung-uk Kim     {
280835b56bfSJung-uk Kim         return (TRUE); /* All nodes descend from the root */
281835b56bfSJung-uk Kim     }
282835b56bfSJung-uk Kim 
283835b56bfSJung-uk Kim     /* Walk upward until the root is reached or parent is found */
284835b56bfSJung-uk Kim 
285835b56bfSJung-uk Kim     while (Node1)
286835b56bfSJung-uk Kim     {
287835b56bfSJung-uk Kim         if (Node1 == Node2)
288835b56bfSJung-uk Kim         {
289835b56bfSJung-uk Kim             return (TRUE);
290835b56bfSJung-uk Kim         }
291835b56bfSJung-uk Kim 
292835b56bfSJung-uk Kim         Node1 = Node1->Parent;
293835b56bfSJung-uk Kim     }
294835b56bfSJung-uk Kim 
295835b56bfSJung-uk Kim     return (FALSE);
296835b56bfSJung-uk Kim }
297835b56bfSJung-uk Kim 
298835b56bfSJung-uk Kim 
299835b56bfSJung-uk Kim /*******************************************************************************
300835b56bfSJung-uk Kim  *
301835b56bfSJung-uk Kim  * FUNCTION:    UtGetParentMethod
302835b56bfSJung-uk Kim  *
303835b56bfSJung-uk Kim  * PARAMETERS:  Node                    - Namespace node for any object
304835b56bfSJung-uk Kim  *
305835b56bfSJung-uk Kim  * RETURN:      Namespace node for the parent method
306835b56bfSJung-uk Kim  *              NULL - object is not within a method
307835b56bfSJung-uk Kim  *
308835b56bfSJung-uk Kim  * DESCRIPTION: Find the parent (owning) method node for a namespace object
309835b56bfSJung-uk Kim  *
310835b56bfSJung-uk Kim  ******************************************************************************/
311835b56bfSJung-uk Kim 
312835b56bfSJung-uk Kim void *
313835b56bfSJung-uk Kim UtGetParentMethod (
314835b56bfSJung-uk Kim     ACPI_NAMESPACE_NODE     *Node)
315835b56bfSJung-uk Kim {
316835b56bfSJung-uk Kim     ACPI_NAMESPACE_NODE     *ParentNode;
317835b56bfSJung-uk Kim 
318835b56bfSJung-uk Kim 
319835b56bfSJung-uk Kim     if (!Node)
320835b56bfSJung-uk Kim     {
321835b56bfSJung-uk Kim         return (NULL);
322835b56bfSJung-uk Kim     }
323835b56bfSJung-uk Kim 
324835b56bfSJung-uk Kim     /* Walk upward until a method is found, or the root is reached */
325835b56bfSJung-uk Kim 
326835b56bfSJung-uk Kim     ParentNode = Node->Parent;
327835b56bfSJung-uk Kim     while (ParentNode)
328835b56bfSJung-uk Kim     {
329835b56bfSJung-uk Kim         if (ParentNode->Type == ACPI_TYPE_METHOD)
330835b56bfSJung-uk Kim         {
331835b56bfSJung-uk Kim             return (ParentNode);
332835b56bfSJung-uk Kim         }
333835b56bfSJung-uk Kim 
334835b56bfSJung-uk Kim         ParentNode = ParentNode->Parent;
335835b56bfSJung-uk Kim     }
336835b56bfSJung-uk Kim 
337835b56bfSJung-uk Kim     return (NULL); /* Object is not within a control method */
338835b56bfSJung-uk Kim }
339835b56bfSJung-uk Kim 
340835b56bfSJung-uk Kim 
341835b56bfSJung-uk Kim /*******************************************************************************
342835b56bfSJung-uk Kim  *
343a88e22b7SJung-uk Kim  * FUNCTION:    UtDisplaySupportedTables
344a88e22b7SJung-uk Kim  *
345a88e22b7SJung-uk Kim  * PARAMETERS:  None
346a88e22b7SJung-uk Kim  *
347a88e22b7SJung-uk Kim  * RETURN:      None
348a88e22b7SJung-uk Kim  *
349a88e22b7SJung-uk Kim  * DESCRIPTION: Print all supported ACPI table names.
350a88e22b7SJung-uk Kim  *
351a88e22b7SJung-uk Kim  ******************************************************************************/
352a88e22b7SJung-uk Kim 
353a88e22b7SJung-uk Kim void
354a88e22b7SJung-uk Kim UtDisplaySupportedTables (
355a88e22b7SJung-uk Kim     void)
356a88e22b7SJung-uk Kim {
357a371a5fdSJung-uk Kim     const AH_TABLE          *TableData;
3581df130f1SJung-uk Kim     UINT32                  i;
359a88e22b7SJung-uk Kim 
360a88e22b7SJung-uk Kim 
3611df130f1SJung-uk Kim     printf ("\nACPI tables supported by iASL version %8.8X:\n"
3621df130f1SJung-uk Kim         "  (Compiler, Disassembler, Template Generator)\n\n",
3631df130f1SJung-uk Kim         ACPI_CA_VERSION);
364a88e22b7SJung-uk Kim 
365a371a5fdSJung-uk Kim     /* All ACPI tables with the common table header */
366a88e22b7SJung-uk Kim 
367a371a5fdSJung-uk Kim     printf ("\n  Supported ACPI tables:\n");
3686f1f1a63SJung-uk Kim     for (TableData = AcpiGbl_SupportedTables, i = 1;
369a371a5fdSJung-uk Kim          TableData->Signature; TableData++, i++)
370a88e22b7SJung-uk Kim     {
371a371a5fdSJung-uk Kim         printf ("%8u) %s    %s\n", i,
372a371a5fdSJung-uk Kim             TableData->Signature, TableData->Description);
373a88e22b7SJung-uk Kim     }
374a88e22b7SJung-uk Kim }
375a88e22b7SJung-uk Kim 
376a88e22b7SJung-uk Kim 
377a88e22b7SJung-uk Kim /*******************************************************************************
378a88e22b7SJung-uk Kim  *
379f38b0f21SJung-uk Kim  * FUNCTION:    UtDisplayConstantOpcodes
38053289f6aSNate Lawson  *
38153289f6aSNate Lawson  * PARAMETERS:  None
38253289f6aSNate Lawson  *
38353289f6aSNate Lawson  * RETURN:      None
38453289f6aSNate Lawson  *
38553289f6aSNate Lawson  * DESCRIPTION: Print AML opcodes that can be used in constant expressions.
38653289f6aSNate Lawson  *
38753289f6aSNate Lawson  ******************************************************************************/
38853289f6aSNate Lawson 
38953289f6aSNate Lawson void
39053289f6aSNate Lawson UtDisplayConstantOpcodes (
39153289f6aSNate Lawson     void)
39253289f6aSNate Lawson {
39353289f6aSNate Lawson     UINT32                  i;
39453289f6aSNate Lawson 
395fba7fc7eSJung-uk Kim 
39653289f6aSNate Lawson     printf ("Constant expression opcode information\n\n");
39753289f6aSNate Lawson 
39853289f6aSNate Lawson     for (i = 0; i < sizeof (AcpiGbl_AmlOpInfo) / sizeof (ACPI_OPCODE_INFO); i++)
39953289f6aSNate Lawson     {
40053289f6aSNate Lawson         if (AcpiGbl_AmlOpInfo[i].Flags & AML_CONSTANT)
40153289f6aSNate Lawson         {
40253289f6aSNate Lawson             printf ("%s\n", AcpiGbl_AmlOpInfo[i].Name);
40353289f6aSNate Lawson         }
40453289f6aSNate Lawson     }
40553289f6aSNate Lawson }
40653289f6aSNate Lawson 
40753289f6aSNate Lawson 
40853289f6aSNate Lawson /*******************************************************************************
40953289f6aSNate Lawson  *
41053289f6aSNate Lawson  * FUNCTION:    UtBeginEvent
41153289f6aSNate Lawson  *
412fba7fc7eSJung-uk Kim  * PARAMETERS:  Name                - Ascii name of this event
41353289f6aSNate Lawson  *
414f38b0f21SJung-uk Kim  * RETURN:      Event number (integer index)
41553289f6aSNate Lawson  *
41653289f6aSNate Lawson  * DESCRIPTION: Saves the current time with this event
41753289f6aSNate Lawson  *
41853289f6aSNate Lawson  ******************************************************************************/
41953289f6aSNate Lawson 
420fba7fc7eSJung-uk Kim UINT8
42153289f6aSNate Lawson UtBeginEvent (
42253289f6aSNate Lawson     char                    *Name)
42353289f6aSNate Lawson {
42453289f6aSNate Lawson 
425fba7fc7eSJung-uk Kim     if (AslGbl_NextEvent >= ASL_NUM_EVENTS)
426fba7fc7eSJung-uk Kim     {
427fba7fc7eSJung-uk Kim         AcpiOsPrintf ("Ran out of compiler event structs!\n");
428fba7fc7eSJung-uk Kim         return (AslGbl_NextEvent);
429fba7fc7eSJung-uk Kim     }
430fba7fc7eSJung-uk Kim 
431fba7fc7eSJung-uk Kim     /* Init event with current (start) time */
432fba7fc7eSJung-uk Kim 
433fba7fc7eSJung-uk Kim     AslGbl_Events[AslGbl_NextEvent].StartTime = AcpiOsGetTimer ();
434fba7fc7eSJung-uk Kim     AslGbl_Events[AslGbl_NextEvent].EventName = Name;
435fba7fc7eSJung-uk Kim     AslGbl_Events[AslGbl_NextEvent].Valid = TRUE;
436fba7fc7eSJung-uk Kim     return (AslGbl_NextEvent++);
43753289f6aSNate Lawson }
43853289f6aSNate Lawson 
43953289f6aSNate Lawson 
44053289f6aSNate Lawson /*******************************************************************************
44153289f6aSNate Lawson  *
44253289f6aSNate Lawson  * FUNCTION:    UtEndEvent
44353289f6aSNate Lawson  *
44453289f6aSNate Lawson  * PARAMETERS:  Event               - Event number (integer index)
44553289f6aSNate Lawson  *
44653289f6aSNate Lawson  * RETURN:      None
44753289f6aSNate Lawson  *
44853289f6aSNate Lawson  * DESCRIPTION: Saves the current time (end time) with this event
44953289f6aSNate Lawson  *
45053289f6aSNate Lawson  ******************************************************************************/
45153289f6aSNate Lawson 
45253289f6aSNate Lawson void
45353289f6aSNate Lawson UtEndEvent (
454fba7fc7eSJung-uk Kim     UINT8                   Event)
45553289f6aSNate Lawson {
45653289f6aSNate Lawson 
457fba7fc7eSJung-uk Kim     if (Event >= ASL_NUM_EVENTS)
458fba7fc7eSJung-uk Kim     {
459fba7fc7eSJung-uk Kim         return;
460fba7fc7eSJung-uk Kim     }
461fba7fc7eSJung-uk Kim 
462fba7fc7eSJung-uk Kim     /* Insert end time for event */
463fba7fc7eSJung-uk Kim 
464fba7fc7eSJung-uk Kim     AslGbl_Events[Event].EndTime = AcpiOsGetTimer ();
46553289f6aSNate Lawson }
46653289f6aSNate Lawson 
46753289f6aSNate Lawson 
46853289f6aSNate Lawson /*******************************************************************************
46953289f6aSNate Lawson  *
47053289f6aSNate Lawson  * FUNCTION:    DbgPrint
47153289f6aSNate Lawson  *
472fba7fc7eSJung-uk Kim  * PARAMETERS:  Type                - Type of output
473fba7fc7eSJung-uk Kim  *              Fmt                 - Printf format string
47453289f6aSNate Lawson  *              ...                 - variable printf list
47553289f6aSNate Lawson  *
47653289f6aSNate Lawson  * RETURN:      None
47753289f6aSNate Lawson  *
47853289f6aSNate Lawson  * DESCRIPTION: Conditional print statement. Prints to stderr only if the
47953289f6aSNate Lawson  *              debug flag is set.
48053289f6aSNate Lawson  *
48153289f6aSNate Lawson  ******************************************************************************/
48253289f6aSNate Lawson 
48353289f6aSNate Lawson void
48453289f6aSNate Lawson DbgPrint (
48553289f6aSNate Lawson     UINT32                  Type,
48653289f6aSNate Lawson     char                    *Fmt,
48753289f6aSNate Lawson     ...)
48853289f6aSNate Lawson {
48953289f6aSNate Lawson     va_list                 Args;
49053289f6aSNate Lawson 
49153289f6aSNate Lawson 
4926f1f1a63SJung-uk Kim     if (!AslGbl_DebugFlag)
49353289f6aSNate Lawson     {
49453289f6aSNate Lawson         return;
49553289f6aSNate Lawson     }
49653289f6aSNate Lawson 
49753289f6aSNate Lawson     if ((Type == ASL_PARSE_OUTPUT) &&
49853289f6aSNate Lawson         (!(AslCompilerdebug)))
49953289f6aSNate Lawson     {
50053289f6aSNate Lawson         return;
50153289f6aSNate Lawson     }
50253289f6aSNate Lawson 
5038d744e47SJung-uk Kim     va_start (Args, Fmt);
50453289f6aSNate Lawson     (void) vfprintf (stderr, Fmt, Args);
50553289f6aSNate Lawson     va_end (Args);
50653289f6aSNate Lawson     return;
50753289f6aSNate Lawson }
50853289f6aSNate Lawson 
50953289f6aSNate Lawson 
51053289f6aSNate Lawson /*******************************************************************************
51153289f6aSNate Lawson  *
51253289f6aSNate Lawson  * FUNCTION:    UtSetParseOpName
51353289f6aSNate Lawson  *
514f38b0f21SJung-uk Kim  * PARAMETERS:  Op                  - Parse op to be named.
51553289f6aSNate Lawson  *
51653289f6aSNate Lawson  * RETURN:      None
51753289f6aSNate Lawson  *
51853289f6aSNate Lawson  * DESCRIPTION: Insert the ascii name of the parse opcode
51953289f6aSNate Lawson  *
52053289f6aSNate Lawson  ******************************************************************************/
52153289f6aSNate Lawson 
52253289f6aSNate Lawson void
52353289f6aSNate Lawson UtSetParseOpName (
52453289f6aSNate Lawson     ACPI_PARSE_OBJECT       *Op)
52553289f6aSNate Lawson {
526fba7fc7eSJung-uk Kim 
527f1db5ef7SJung-uk Kim     AcpiUtSafeStrncpy (Op->Asl.ParseOpName, UtGetOpName (Op->Asl.ParseOpcode),
5281a39cfb0SJung-uk Kim         ACPI_MAX_PARSEOP_NAME);
52953289f6aSNate Lawson }
53053289f6aSNate Lawson 
53153289f6aSNate Lawson 
53253289f6aSNate Lawson /*******************************************************************************
53353289f6aSNate Lawson  *
53444b0f624SJung-uk Kim  * FUNCTION:    UtDisplayOneSummary
53553289f6aSNate Lawson  *
536fba7fc7eSJung-uk Kim  * PARAMETERS:  FileID              - ID of outpout file
53753289f6aSNate Lawson  *
53853289f6aSNate Lawson  * RETURN:      None
53953289f6aSNate Lawson  *
54044b0f624SJung-uk Kim  * DESCRIPTION: Display compilation statistics for one input file
54153289f6aSNate Lawson  *
54253289f6aSNate Lawson  ******************************************************************************/
54353289f6aSNate Lawson 
54453289f6aSNate Lawson void
54544b0f624SJung-uk Kim UtDisplayOneSummary (
54644b0f624SJung-uk Kim     UINT32                  FileId,
54744b0f624SJung-uk Kim     BOOLEAN                 DisplayErrorSummary)
54853289f6aSNate Lawson {
5493f0275a0SJung-uk Kim     UINT32                  i;
55044b0f624SJung-uk Kim     ASL_GLOBAL_FILE_NODE    *FileNode;
5519ad8b64eSJung-uk Kim     BOOLEAN                 DisplayAMLSummary;
5523f0275a0SJung-uk Kim 
55353289f6aSNate Lawson 
5549ad8b64eSJung-uk Kim     DisplayAMLSummary =
5559ad8b64eSJung-uk Kim         !AslGbl_PreprocessOnly && !AslGbl_ParserErrorDetected &&
5569ad8b64eSJung-uk Kim         ((AslGbl_ExceptionCount[ASL_ERROR] == 0) || AslGbl_IgnoreErrors) &&
5579ad8b64eSJung-uk Kim         AslGbl_Files[ASL_FILE_AML_OUTPUT].Handle;
5589ad8b64eSJung-uk Kim 
55953289f6aSNate Lawson     if (FileId != ASL_FILE_STDOUT)
56053289f6aSNate Lawson     {
56153289f6aSNate Lawson         /* Compiler name and version number */
56253289f6aSNate Lawson 
56361673a1fSJung-uk Kim         FlPrintFile (FileId, "%s version %X\n\n",
56461673a1fSJung-uk Kim             ASL_COMPILER_NAME, (UINT32) ACPI_CA_VERSION);
56553289f6aSNate Lawson     }
56653289f6aSNate Lawson 
5673f0275a0SJung-uk Kim     /* Summary of main input and output files */
5683f0275a0SJung-uk Kim 
56944b0f624SJung-uk Kim     FileNode = FlGetCurrentFileNode ();
57044b0f624SJung-uk Kim     if (!FileNode)
57144b0f624SJung-uk Kim     {
57244b0f624SJung-uk Kim         fprintf (stderr, "Summary could not be generated");
57344b0f624SJung-uk Kim         return;
57444b0f624SJung-uk Kim     }
575*a009b7dcSJung-uk Kim 
57644b0f624SJung-uk Kim     if (FileNode->ParserErrorDetected)
57744b0f624SJung-uk Kim     {
57853289f6aSNate Lawson         FlPrintFile (FileId,
57944b0f624SJung-uk Kim             "%-14s %s - Compilation aborted due to parser-detected syntax error(s)\n",
580*a009b7dcSJung-uk Kim             "Input file:", AslGbl_Files[ASL_FILE_INPUT].Filename);
58144b0f624SJung-uk Kim     }
582*a009b7dcSJung-uk Kim     else if (FileNode->FileType == ASL_INPUT_TYPE_ASCII_DATA)
583*a009b7dcSJung-uk Kim     {
584*a009b7dcSJung-uk Kim         FlPrintFile (FileId,
585*a009b7dcSJung-uk Kim             "%-14s %s - %7u bytes %6u fields %8u source lines\n",
586*a009b7dcSJung-uk Kim             "Table Input:",
587*a009b7dcSJung-uk Kim             AslGbl_Files[ASL_FILE_INPUT].Filename,
588*a009b7dcSJung-uk Kim             FileNode->OriginalInputFileSize, FileNode->TotalFields,
589*a009b7dcSJung-uk Kim             FileNode->TotalLineCount);
590*a009b7dcSJung-uk Kim 
591*a009b7dcSJung-uk Kim         FlPrintFile (FileId,
592*a009b7dcSJung-uk Kim             "%-14s %s - %7u bytes\n",
593*a009b7dcSJung-uk Kim             "Binary Output:",
594*a009b7dcSJung-uk Kim             AslGbl_Files[ASL_FILE_AML_OUTPUT].Filename, FileNode->OutputByteLength);
595*a009b7dcSJung-uk Kim     }
596*a009b7dcSJung-uk Kim     else if (FileNode->FileType == ASL_INPUT_TYPE_ASCII_ASL)
59744b0f624SJung-uk Kim     {
59844b0f624SJung-uk Kim         FlPrintFile (FileId,
59944b0f624SJung-uk Kim             "%-14s %s - %7u bytes %6u keywords %6u source lines\n",
6003f0275a0SJung-uk Kim             "ASL Input:",
60144b0f624SJung-uk Kim             AslGbl_Files[ASL_FILE_INPUT].Filename,
60244b0f624SJung-uk Kim             FileNode->OriginalInputFileSize,
60344b0f624SJung-uk Kim             FileNode->TotalKeywords,
60444b0f624SJung-uk Kim             FileNode->TotalLineCount);
60553289f6aSNate Lawson 
60653289f6aSNate Lawson         /* AML summary */
60753289f6aSNate Lawson 
6089ad8b64eSJung-uk Kim         if (DisplayAMLSummary)
6095ef50723SJung-uk Kim         {
61053289f6aSNate Lawson             FlPrintFile (FileId,
61144b0f624SJung-uk Kim                 "%-14s %s - %7u bytes %6u opcodes  %6u named objects\n",
6123f0275a0SJung-uk Kim                 "AML Output:",
6136f1f1a63SJung-uk Kim                 AslGbl_Files[ASL_FILE_AML_OUTPUT].Filename,
614f8146b88SJung-uk Kim                 FlGetFileSize (ASL_FILE_AML_OUTPUT),
61544b0f624SJung-uk Kim                 FileNode->TotalExecutableOpcodes,
61644b0f624SJung-uk Kim                 FileNode->TotalNamedObjects);
61753289f6aSNate Lawson         }
618a88e22b7SJung-uk Kim     }
61953289f6aSNate Lawson 
6203f0275a0SJung-uk Kim     /* Display summary of any optional files */
6213f0275a0SJung-uk Kim 
6223f0275a0SJung-uk Kim     for (i = ASL_FILE_SOURCE_OUTPUT; i <= ASL_MAX_FILE_TYPE; i++)
6233f0275a0SJung-uk Kim     {
6246f1f1a63SJung-uk Kim         if (!AslGbl_Files[i].Filename || !AslGbl_Files[i].Handle)
6253f0275a0SJung-uk Kim         {
6263f0275a0SJung-uk Kim             continue;
6273f0275a0SJung-uk Kim         }
6283f0275a0SJung-uk Kim 
6293f0275a0SJung-uk Kim         /* .SRC is a temp file unless specifically requested */
6303f0275a0SJung-uk Kim 
6316f1f1a63SJung-uk Kim         if ((i == ASL_FILE_SOURCE_OUTPUT) && (!AslGbl_SourceOutputFlag))
6323f0275a0SJung-uk Kim         {
6333f0275a0SJung-uk Kim             continue;
6343f0275a0SJung-uk Kim         }
6353f0275a0SJung-uk Kim 
6365ef50723SJung-uk Kim         /* .PRE is the preprocessor intermediate file */
6374c52cad2SJung-uk Kim 
6386f1f1a63SJung-uk Kim         if ((i == ASL_FILE_PREPROCESSOR)  && (!AslGbl_KeepPreprocessorTempFile))
6394c52cad2SJung-uk Kim         {
6404c52cad2SJung-uk Kim             continue;
6414c52cad2SJung-uk Kim         }
6424c52cad2SJung-uk Kim 
6439ad8b64eSJung-uk Kim         FlPrintFile (FileId, "%-14s %s - %7u bytes\n",
64444b0f624SJung-uk Kim             AslGbl_FileDescs[i].ShortDescription,
6456f1f1a63SJung-uk Kim             AslGbl_Files[i].Filename, FlGetFileSize (i));
6463f0275a0SJung-uk Kim     }
6473f0275a0SJung-uk Kim 
64844b0f624SJung-uk Kim 
64944b0f624SJung-uk Kim     /*
65044b0f624SJung-uk Kim      * Optionally emit an error summary for a file. This is used to enhance the
65144b0f624SJung-uk Kim      * appearance of listing files.
65244b0f624SJung-uk Kim      */
65344b0f624SJung-uk Kim     if (DisplayErrorSummary)
65444b0f624SJung-uk Kim     {
65544b0f624SJung-uk Kim         UtDisplayErrorSummary (FileId);
65644b0f624SJung-uk Kim     }
65744b0f624SJung-uk Kim }
65844b0f624SJung-uk Kim 
65944b0f624SJung-uk Kim 
66044b0f624SJung-uk Kim /*******************************************************************************
66144b0f624SJung-uk Kim  *
66244b0f624SJung-uk Kim  * FUNCTION:    UtDisplayErrorSummary
66344b0f624SJung-uk Kim  *
66444b0f624SJung-uk Kim  * PARAMETERS:  FileID              - ID of outpout file
66544b0f624SJung-uk Kim  *
66644b0f624SJung-uk Kim  * RETURN:      None
66744b0f624SJung-uk Kim  *
66844b0f624SJung-uk Kim  * DESCRIPTION: Display compilation statistics for all input files
66944b0f624SJung-uk Kim  *
67044b0f624SJung-uk Kim  ******************************************************************************/
67144b0f624SJung-uk Kim 
67244b0f624SJung-uk Kim static void
67344b0f624SJung-uk Kim UtDisplayErrorSummary (
67444b0f624SJung-uk Kim     UINT32                  FileId)
67544b0f624SJung-uk Kim {
67644b0f624SJung-uk Kim     BOOLEAN                 ErrorDetected;
67744b0f624SJung-uk Kim 
67844b0f624SJung-uk Kim 
67944b0f624SJung-uk Kim     ErrorDetected = AslGbl_ParserErrorDetected ||
68044b0f624SJung-uk Kim         ((AslGbl_ExceptionCount[ASL_ERROR] > 0) && !AslGbl_IgnoreErrors);
68144b0f624SJung-uk Kim 
68244b0f624SJung-uk Kim     if (ErrorDetected)
68344b0f624SJung-uk Kim     {
68444b0f624SJung-uk Kim         FlPrintFile (FileId, "\nCompilation failed. ");
68544b0f624SJung-uk Kim     }
68644b0f624SJung-uk Kim     else
68744b0f624SJung-uk Kim     {
68844b0f624SJung-uk Kim         FlPrintFile (FileId, "\nCompilation successful. ");
68944b0f624SJung-uk Kim     }
69053289f6aSNate Lawson 
69153289f6aSNate Lawson     FlPrintFile (FileId,
69244b0f624SJung-uk Kim         "%u Errors, %u Warnings, %u Remarks",
6936f1f1a63SJung-uk Kim         AslGbl_ExceptionCount[ASL_ERROR],
6946f1f1a63SJung-uk Kim         AslGbl_ExceptionCount[ASL_WARNING] +
6956f1f1a63SJung-uk Kim             AslGbl_ExceptionCount[ASL_WARNING2] +
6966f1f1a63SJung-uk Kim             AslGbl_ExceptionCount[ASL_WARNING3],
6976f1f1a63SJung-uk Kim         AslGbl_ExceptionCount[ASL_REMARK]);
698a88e22b7SJung-uk Kim 
6996f1f1a63SJung-uk Kim     if (AslGbl_FileType != ASL_INPUT_TYPE_ASCII_DATA)
700a88e22b7SJung-uk Kim     {
70144b0f624SJung-uk Kim         if (AslGbl_ParserErrorDetected)
70244b0f624SJung-uk Kim         {
70344b0f624SJung-uk Kim             FlPrintFile (FileId,
70444b0f624SJung-uk Kim                 "\nNo AML files were generated due to syntax error(s)\n");
70544b0f624SJung-uk Kim             return;
70644b0f624SJung-uk Kim         }
70744b0f624SJung-uk Kim         else if (ErrorDetected)
70844b0f624SJung-uk Kim         {
70944b0f624SJung-uk Kim             FlPrintFile (FileId,
71044b0f624SJung-uk Kim                 "\nNo AML files were generated due to compiler error(s)\n");
71144b0f624SJung-uk Kim             return;
71244b0f624SJung-uk Kim         }
71344b0f624SJung-uk Kim 
7147cf3e94aSJung-uk Kim         FlPrintFile (FileId, ", %u Optimizations",
7156f1f1a63SJung-uk Kim             AslGbl_ExceptionCount[ASL_OPTIMIZATION]);
7167cf3e94aSJung-uk Kim 
7176f1f1a63SJung-uk Kim         if (AslGbl_TotalFolds)
7187cf3e94aSJung-uk Kim         {
7196f1f1a63SJung-uk Kim             FlPrintFile (FileId, ", %u Constants Folded", AslGbl_TotalFolds);
7207cf3e94aSJung-uk Kim         }
721a88e22b7SJung-uk Kim     }
722a88e22b7SJung-uk Kim 
723a88e22b7SJung-uk Kim     FlPrintFile (FileId, "\n");
72453289f6aSNate Lawson }
72553289f6aSNate Lawson 
72653289f6aSNate Lawson 
72753289f6aSNate Lawson /*******************************************************************************
72853289f6aSNate Lawson  *
72944b0f624SJung-uk Kim  * FUNCTION:    UtDisplaySummary
73044b0f624SJung-uk Kim  *
73144b0f624SJung-uk Kim  * PARAMETERS:  FileID              - ID of outpout file
73244b0f624SJung-uk Kim  *
73344b0f624SJung-uk Kim  * RETURN:      None
73444b0f624SJung-uk Kim  *
73544b0f624SJung-uk Kim  * DESCRIPTION: Display compilation statistics for all input files
73644b0f624SJung-uk Kim  *
73744b0f624SJung-uk Kim  ******************************************************************************/
73844b0f624SJung-uk Kim 
73944b0f624SJung-uk Kim void
74044b0f624SJung-uk Kim UtDisplaySummary (
74144b0f624SJung-uk Kim     UINT32                  FileId)
74244b0f624SJung-uk Kim {
74344b0f624SJung-uk Kim     ASL_GLOBAL_FILE_NODE    *Current = AslGbl_FilesList;
74444b0f624SJung-uk Kim 
74544b0f624SJung-uk Kim 
74644b0f624SJung-uk Kim     while (Current)
74744b0f624SJung-uk Kim     {
74844b0f624SJung-uk Kim         switch  (FlSwitchFileSet(Current->Files[ASL_FILE_INPUT].Filename))
74944b0f624SJung-uk Kim         {
75044b0f624SJung-uk Kim             case SWITCH_TO_SAME_FILE:
75144b0f624SJung-uk Kim             case SWITCH_TO_DIFFERENT_FILE:
75244b0f624SJung-uk Kim 
75344b0f624SJung-uk Kim                 UtDisplayOneSummary (FileId, FALSE);
75444b0f624SJung-uk Kim                 Current = Current->Next;
75544b0f624SJung-uk Kim                 break;
75644b0f624SJung-uk Kim 
75744b0f624SJung-uk Kim             case FILE_NOT_FOUND:
75844b0f624SJung-uk Kim             default:
75944b0f624SJung-uk Kim 
76044b0f624SJung-uk Kim                 Current = NULL;
76144b0f624SJung-uk Kim                 break;
76244b0f624SJung-uk Kim         }
76344b0f624SJung-uk Kim     }
76444b0f624SJung-uk Kim     UtDisplayErrorSummary (FileId);
76544b0f624SJung-uk Kim }
76644b0f624SJung-uk Kim 
76744b0f624SJung-uk Kim /*******************************************************************************
76844b0f624SJung-uk Kim  *
769f38b0f21SJung-uk Kim  * FUNCTION:    UtCheckIntegerRange
77053289f6aSNate Lawson  *
77153289f6aSNate Lawson  * PARAMETERS:  Op                  - Integer parse node
77253289f6aSNate Lawson  *              LowValue            - Smallest allowed value
77353289f6aSNate Lawson  *              HighValue           - Largest allowed value
77453289f6aSNate Lawson  *
77553289f6aSNate Lawson  * RETURN:      Op if OK, otherwise NULL
77653289f6aSNate Lawson  *
77753289f6aSNate Lawson  * DESCRIPTION: Check integer for an allowable range
77853289f6aSNate Lawson  *
77953289f6aSNate Lawson  ******************************************************************************/
78053289f6aSNate Lawson 
78153289f6aSNate Lawson ACPI_PARSE_OBJECT *
78253289f6aSNate Lawson UtCheckIntegerRange (
78353289f6aSNate Lawson     ACPI_PARSE_OBJECT       *Op,
78453289f6aSNate Lawson     UINT32                  LowValue,
78553289f6aSNate Lawson     UINT32                  HighValue)
78653289f6aSNate Lawson {
78753289f6aSNate Lawson 
78853289f6aSNate Lawson     if (!Op)
78953289f6aSNate Lawson     {
7908ef1a331SJung-uk Kim         return (NULL);
79153289f6aSNate Lawson     }
79253289f6aSNate Lawson 
7931df130f1SJung-uk Kim     if ((Op->Asl.Value.Integer < LowValue) ||
7941df130f1SJung-uk Kim         (Op->Asl.Value.Integer > HighValue))
79553289f6aSNate Lawson     {
7966f1f1a63SJung-uk Kim         sprintf (AslGbl_MsgBuffer, "0x%X, allowable: 0x%X-0x%X",
7971df130f1SJung-uk Kim             (UINT32) Op->Asl.Value.Integer, LowValue, HighValue);
7981df130f1SJung-uk Kim 
7996f1f1a63SJung-uk Kim         AslError (ASL_ERROR, ASL_MSG_RANGE, Op, AslGbl_MsgBuffer);
8001df130f1SJung-uk Kim         return (NULL);
80153289f6aSNate Lawson     }
80253289f6aSNate Lawson 
8031df130f1SJung-uk Kim     return (Op);
80453289f6aSNate Lawson }
80553289f6aSNate Lawson 
80653289f6aSNate Lawson 
80753289f6aSNate Lawson /*******************************************************************************
80853289f6aSNate Lawson  *
80953289f6aSNate Lawson  * FUNCTION:    UtInternalizeName
81053289f6aSNate Lawson  *
81153289f6aSNate Lawson  * PARAMETERS:  ExternalName        - Name to convert
81253289f6aSNate Lawson  *              ConvertedName       - Where the converted name is returned
81353289f6aSNate Lawson  *
81453289f6aSNate Lawson  * RETURN:      Status
81553289f6aSNate Lawson  *
81653289f6aSNate Lawson  * DESCRIPTION: Convert an external (ASL) name to an internal (AML) name
81753289f6aSNate Lawson  *
81853289f6aSNate Lawson  ******************************************************************************/
81953289f6aSNate Lawson 
82053289f6aSNate Lawson ACPI_STATUS
82153289f6aSNate Lawson UtInternalizeName (
82253289f6aSNate Lawson     char                    *ExternalName,
82353289f6aSNate Lawson     char                    **ConvertedName)
82453289f6aSNate Lawson {
82553289f6aSNate Lawson     ACPI_NAMESTRING_INFO    Info;
82653289f6aSNate Lawson     ACPI_STATUS             Status;
82753289f6aSNate Lawson 
82853289f6aSNate Lawson 
82953289f6aSNate Lawson     if (!ExternalName)
83053289f6aSNate Lawson     {
83153289f6aSNate Lawson         return (AE_OK);
83253289f6aSNate Lawson     }
83353289f6aSNate Lawson 
83453289f6aSNate Lawson     /* Get the length of the new internal name */
83553289f6aSNate Lawson 
83653289f6aSNate Lawson     Info.ExternalName = ExternalName;
83753289f6aSNate Lawson     AcpiNsGetInternalNameLength (&Info);
83853289f6aSNate Lawson 
83953289f6aSNate Lawson     /* We need a segment to store the internal name */
84053289f6aSNate Lawson 
84167d9aa44SJung-uk Kim     Info.InternalName = UtLocalCacheCalloc (Info.Length);
84253289f6aSNate Lawson 
84353289f6aSNate Lawson     /* Build the name */
84453289f6aSNate Lawson 
84553289f6aSNate Lawson     Status = AcpiNsBuildInternalName (&Info);
84653289f6aSNate Lawson     if (ACPI_FAILURE (Status))
84753289f6aSNate Lawson     {
84853289f6aSNate Lawson         return (Status);
84953289f6aSNate Lawson     }
85053289f6aSNate Lawson 
85153289f6aSNate Lawson     *ConvertedName = Info.InternalName;
85253289f6aSNate Lawson     return (AE_OK);
85353289f6aSNate Lawson }
85453289f6aSNate Lawson 
85553289f6aSNate Lawson 
85653289f6aSNate Lawson /*******************************************************************************
85753289f6aSNate Lawson  *
85853289f6aSNate Lawson  * FUNCTION:    UtPadNameWithUnderscores
85953289f6aSNate Lawson  *
86053289f6aSNate Lawson  * PARAMETERS:  NameSeg             - Input nameseg
86153289f6aSNate Lawson  *              PaddedNameSeg       - Output padded nameseg
86253289f6aSNate Lawson  *
86353289f6aSNate Lawson  * RETURN:      Padded nameseg.
86453289f6aSNate Lawson  *
86553289f6aSNate Lawson  * DESCRIPTION: Pads a NameSeg with underscores if necessary to form a full
86653289f6aSNate Lawson  *              ACPI_NAME.
86753289f6aSNate Lawson  *
86853289f6aSNate Lawson  ******************************************************************************/
86953289f6aSNate Lawson 
870fba7fc7eSJung-uk Kim static void
87153289f6aSNate Lawson UtPadNameWithUnderscores (
87253289f6aSNate Lawson     char                    *NameSeg,
87353289f6aSNate Lawson     char                    *PaddedNameSeg)
87453289f6aSNate Lawson {
87553289f6aSNate Lawson     UINT32                  i;
87653289f6aSNate Lawson 
87753289f6aSNate Lawson 
878278f0de6SJung-uk Kim     for (i = 0; (i < ACPI_NAMESEG_SIZE); i++)
87953289f6aSNate Lawson     {
88053289f6aSNate Lawson         if (*NameSeg)
88153289f6aSNate Lawson         {
88253289f6aSNate Lawson             *PaddedNameSeg = *NameSeg;
88353289f6aSNate Lawson             NameSeg++;
88453289f6aSNate Lawson         }
88553289f6aSNate Lawson         else
88653289f6aSNate Lawson         {
88753289f6aSNate Lawson             *PaddedNameSeg = '_';
88853289f6aSNate Lawson         }
889f8146b88SJung-uk Kim 
89053289f6aSNate Lawson         PaddedNameSeg++;
89153289f6aSNate Lawson     }
89253289f6aSNate Lawson }
89353289f6aSNate Lawson 
89453289f6aSNate Lawson 
89553289f6aSNate Lawson /*******************************************************************************
89653289f6aSNate Lawson  *
89753289f6aSNate Lawson  * FUNCTION:    UtAttachNameseg
89853289f6aSNate Lawson  *
89953289f6aSNate Lawson  * PARAMETERS:  Op                  - Parent parse node
90053289f6aSNate Lawson  *              Name                - Full ExternalName
90153289f6aSNate Lawson  *
902fba7fc7eSJung-uk Kim  * RETURN:      None; Sets the NameSeg field in parent node
90353289f6aSNate Lawson  *
90453289f6aSNate Lawson  * DESCRIPTION: Extract the last nameseg of the ExternalName and store it
90553289f6aSNate Lawson  *              in the NameSeg field of the Op.
90653289f6aSNate Lawson  *
90753289f6aSNate Lawson  ******************************************************************************/
90853289f6aSNate Lawson 
909fba7fc7eSJung-uk Kim static void
91053289f6aSNate Lawson UtAttachNameseg (
91153289f6aSNate Lawson     ACPI_PARSE_OBJECT       *Op,
91253289f6aSNate Lawson     char                    *Name)
91353289f6aSNate Lawson {
91453289f6aSNate Lawson     char                    *NameSeg;
91553289f6aSNate Lawson     char                    PaddedNameSeg[4];
91653289f6aSNate Lawson 
91753289f6aSNate Lawson 
91853289f6aSNate Lawson     if (!Name)
91953289f6aSNate Lawson     {
92053289f6aSNate Lawson         return;
92153289f6aSNate Lawson     }
92253289f6aSNate Lawson 
92353289f6aSNate Lawson     /* Look for the last dot in the namepath */
92453289f6aSNate Lawson 
92553289f6aSNate Lawson     NameSeg = strrchr (Name, '.');
92653289f6aSNate Lawson     if (NameSeg)
92753289f6aSNate Lawson     {
92853289f6aSNate Lawson         /* Found last dot, we have also found the final nameseg */
92953289f6aSNate Lawson 
93053289f6aSNate Lawson         NameSeg++;
93153289f6aSNate Lawson         UtPadNameWithUnderscores (NameSeg, PaddedNameSeg);
93253289f6aSNate Lawson     }
93353289f6aSNate Lawson     else
93453289f6aSNate Lawson     {
93553289f6aSNate Lawson         /* No dots in the namepath, there is only a single nameseg. */
93653289f6aSNate Lawson         /* Handle prefixes */
93753289f6aSNate Lawson 
938efcc2a30SJung-uk Kim         while (ACPI_IS_ROOT_PREFIX (*Name) ||
939efcc2a30SJung-uk Kim                ACPI_IS_PARENT_PREFIX (*Name))
94053289f6aSNate Lawson         {
94153289f6aSNate Lawson             Name++;
94253289f6aSNate Lawson         }
94353289f6aSNate Lawson 
9448ef1a331SJung-uk Kim         /* Remaining string should be one single nameseg */
94553289f6aSNate Lawson 
94653289f6aSNate Lawson         UtPadNameWithUnderscores (Name, PaddedNameSeg);
94753289f6aSNate Lawson     }
94853289f6aSNate Lawson 
949278f0de6SJung-uk Kim     ACPI_COPY_NAMESEG (Op->Asl.NameSeg, PaddedNameSeg);
95053289f6aSNate Lawson }
95153289f6aSNate Lawson 
95253289f6aSNate Lawson 
95353289f6aSNate Lawson /*******************************************************************************
95453289f6aSNate Lawson  *
95553289f6aSNate Lawson  * FUNCTION:    UtAttachNamepathToOwner
95653289f6aSNate Lawson  *
95753289f6aSNate Lawson  * PARAMETERS:  Op                  - Parent parse node
95853289f6aSNate Lawson  *              NameOp              - Node that contains the name
95953289f6aSNate Lawson  *
96053289f6aSNate Lawson  * RETURN:      Sets the ExternalName and Namepath in the parent node
96153289f6aSNate Lawson  *
96253289f6aSNate Lawson  * DESCRIPTION: Store the name in two forms in the parent node: The original
96353289f6aSNate Lawson  *              (external) name, and the internalized name that is used within
96453289f6aSNate Lawson  *              the ACPI namespace manager.
96553289f6aSNate Lawson  *
96653289f6aSNate Lawson  ******************************************************************************/
96753289f6aSNate Lawson 
96853289f6aSNate Lawson void
96953289f6aSNate Lawson UtAttachNamepathToOwner (
97053289f6aSNate Lawson     ACPI_PARSE_OBJECT       *Op,
97153289f6aSNate Lawson     ACPI_PARSE_OBJECT       *NameOp)
97253289f6aSNate Lawson {
97353289f6aSNate Lawson     ACPI_STATUS             Status;
97453289f6aSNate Lawson 
97553289f6aSNate Lawson 
97653289f6aSNate Lawson     /* Full external path */
97753289f6aSNate Lawson 
97853289f6aSNate Lawson     Op->Asl.ExternalName = NameOp->Asl.Value.String;
97953289f6aSNate Lawson 
980fba7fc7eSJung-uk Kim     /* Save the NameOp for possible error reporting later */
981fba7fc7eSJung-uk Kim 
982fba7fc7eSJung-uk Kim     Op->Asl.ParentMethod = (void *) NameOp;
983fba7fc7eSJung-uk Kim 
98453289f6aSNate Lawson     /* Last nameseg of the path */
98553289f6aSNate Lawson 
98653289f6aSNate Lawson     UtAttachNameseg (Op, Op->Asl.ExternalName);
98753289f6aSNate Lawson 
98853289f6aSNate Lawson     /* Create internalized path */
98953289f6aSNate Lawson 
99053289f6aSNate Lawson     Status = UtInternalizeName (NameOp->Asl.Value.String, &Op->Asl.Namepath);
99153289f6aSNate Lawson     if (ACPI_FAILURE (Status))
99253289f6aSNate Lawson     {
99353289f6aSNate Lawson         /* TBD: abort on no memory */
99453289f6aSNate Lawson     }
99553289f6aSNate Lawson }
99653289f6aSNate Lawson 
99753289f6aSNate Lawson 
99853289f6aSNate Lawson /*******************************************************************************
99953289f6aSNate Lawson  *
1000*a009b7dcSJung-uk Kim  * FUNCTION:    UtNameContainsAllPrefix
1001*a009b7dcSJung-uk Kim  *
1002*a009b7dcSJung-uk Kim  * PARAMETERS:  Op                  - Op containing NameString
1003*a009b7dcSJung-uk Kim  *
1004*a009b7dcSJung-uk Kim  * RETURN:      NameString consists of all ^ characters
1005*a009b7dcSJung-uk Kim  *
1006*a009b7dcSJung-uk Kim  * DESCRIPTION: Determine if this Op contains a name segment that consists of
1007*a009b7dcSJung-uk Kim  *              all '^' characters.
1008*a009b7dcSJung-uk Kim  *
1009*a009b7dcSJung-uk Kim  ******************************************************************************/
1010*a009b7dcSJung-uk Kim 
1011*a009b7dcSJung-uk Kim BOOLEAN
1012*a009b7dcSJung-uk Kim UtNameContainsAllPrefix (
1013*a009b7dcSJung-uk Kim     ACPI_PARSE_OBJECT       *Op)
1014*a009b7dcSJung-uk Kim {
1015*a009b7dcSJung-uk Kim     UINT32                  Length = Op->Asl.AmlLength;
1016*a009b7dcSJung-uk Kim     UINT32                  i;
1017*a009b7dcSJung-uk Kim 
1018*a009b7dcSJung-uk Kim     for (i = 0; i < Length; i++)
1019*a009b7dcSJung-uk Kim     {
1020*a009b7dcSJung-uk Kim         if (Op->Asl.Value.String[i] != '^')
1021*a009b7dcSJung-uk Kim         {
1022*a009b7dcSJung-uk Kim             return (FALSE);
1023*a009b7dcSJung-uk Kim         }
1024*a009b7dcSJung-uk Kim     }
1025*a009b7dcSJung-uk Kim 
1026*a009b7dcSJung-uk Kim     return (TRUE);
1027*a009b7dcSJung-uk Kim }
1028*a009b7dcSJung-uk Kim 
1029*a009b7dcSJung-uk Kim /*******************************************************************************
1030*a009b7dcSJung-uk Kim  *
103153289f6aSNate Lawson  * FUNCTION:    UtDoConstant
103253289f6aSNate Lawson  *
10332f6a1a81SJung-uk Kim  * PARAMETERS:  String              - Hex/Decimal/Octal
103453289f6aSNate Lawson  *
103553289f6aSNate Lawson  * RETURN:      Converted Integer
103653289f6aSNate Lawson  *
10372f6a1a81SJung-uk Kim  * DESCRIPTION: Convert a string to an integer, with overflow/error checking.
103853289f6aSNate Lawson  *
103953289f6aSNate Lawson  ******************************************************************************/
104053289f6aSNate Lawson 
10419a179dd8SJung-uk Kim UINT64
104253289f6aSNate Lawson UtDoConstant (
104353289f6aSNate Lawson     char                    *String)
104453289f6aSNate Lawson {
104553289f6aSNate Lawson     ACPI_STATUS             Status;
10462f6a1a81SJung-uk Kim     UINT64                  ConvertedInteger;
104753289f6aSNate Lawson     char                    ErrBuf[64];
104853289f6aSNate Lawson 
104953289f6aSNate Lawson 
10502f6a1a81SJung-uk Kim     Status = AcpiUtStrtoul64 (String, &ConvertedInteger);
105153289f6aSNate Lawson     if (ACPI_FAILURE (Status))
105253289f6aSNate Lawson     {
10532f6a1a81SJung-uk Kim         sprintf (ErrBuf, "While creating 64-bit constant: %s\n",
1054fba7fc7eSJung-uk Kim             AcpiFormatException (Status));
10552f6a1a81SJung-uk Kim 
10566f1f1a63SJung-uk Kim         AslCommonError (ASL_ERROR, ASL_MSG_SYNTAX, AslGbl_CurrentLineNumber,
10576f1f1a63SJung-uk Kim             AslGbl_LogicalLineNumber, AslGbl_CurrentLineOffset,
10586f1f1a63SJung-uk Kim             AslGbl_CurrentColumn, AslGbl_Files[ASL_FILE_INPUT].Filename, ErrBuf);
105953289f6aSNate Lawson     }
106053289f6aSNate Lawson 
10612f6a1a81SJung-uk Kim     return (ConvertedInteger);
106253289f6aSNate Lawson }
1063*a009b7dcSJung-uk Kim 
1064*a009b7dcSJung-uk Kim 
1065*a009b7dcSJung-uk Kim /******************************************************************************
1066*a009b7dcSJung-uk Kim  *
1067*a009b7dcSJung-uk Kim  * FUNCTION:    AcpiUtStrdup
1068*a009b7dcSJung-uk Kim  *
1069*a009b7dcSJung-uk Kim  * PARAMETERS:  String1             - string to duplicate
1070*a009b7dcSJung-uk Kim  *
1071*a009b7dcSJung-uk Kim  * RETURN:      int that signifies string relationship. Zero means strings
1072*a009b7dcSJung-uk Kim  *              are equal.
1073*a009b7dcSJung-uk Kim  *
1074*a009b7dcSJung-uk Kim  * DESCRIPTION: Duplicate the string using UtCacheAlloc to avoid manual memory
1075*a009b7dcSJung-uk Kim  *              reclamation.
1076*a009b7dcSJung-uk Kim  *
1077*a009b7dcSJung-uk Kim  ******************************************************************************/
1078*a009b7dcSJung-uk Kim 
1079*a009b7dcSJung-uk Kim char *
1080*a009b7dcSJung-uk Kim AcpiUtStrdup (
1081*a009b7dcSJung-uk Kim     char                    *String)
1082*a009b7dcSJung-uk Kim {
1083*a009b7dcSJung-uk Kim     char                    *NewString = (char *) UtLocalCalloc (strlen (String) + 1);
1084*a009b7dcSJung-uk Kim 
1085*a009b7dcSJung-uk Kim 
1086*a009b7dcSJung-uk Kim     strcpy (NewString, String);
1087*a009b7dcSJung-uk Kim     return (NewString);
1088*a009b7dcSJung-uk Kim }
1089*a009b7dcSJung-uk Kim 
1090*a009b7dcSJung-uk Kim 
1091*a009b7dcSJung-uk Kim /******************************************************************************
1092*a009b7dcSJung-uk Kim  *
1093*a009b7dcSJung-uk Kim  * FUNCTION:    AcpiUtStrcat
1094*a009b7dcSJung-uk Kim  *
1095*a009b7dcSJung-uk Kim  * PARAMETERS:  String1
1096*a009b7dcSJung-uk Kim  *              String2
1097*a009b7dcSJung-uk Kim  *
1098*a009b7dcSJung-uk Kim  * RETURN:      New string with String1 concatenated with String2
1099*a009b7dcSJung-uk Kim  *
1100*a009b7dcSJung-uk Kim  * DESCRIPTION: Concatenate string1 and string2
1101*a009b7dcSJung-uk Kim  *
1102*a009b7dcSJung-uk Kim  ******************************************************************************/
1103*a009b7dcSJung-uk Kim 
1104*a009b7dcSJung-uk Kim char *
1105*a009b7dcSJung-uk Kim AcpiUtStrcat (
1106*a009b7dcSJung-uk Kim     char                    *String1,
1107*a009b7dcSJung-uk Kim     char                    *String2)
1108*a009b7dcSJung-uk Kim {
1109*a009b7dcSJung-uk Kim     UINT32                  String1Length = strlen (String1);
1110*a009b7dcSJung-uk Kim     char                    *NewString = (char *) UtLocalCalloc (strlen (String1) + strlen (String2) + 1);
1111*a009b7dcSJung-uk Kim 
1112*a009b7dcSJung-uk Kim     strcpy (NewString, String1);
1113*a009b7dcSJung-uk Kim     strcpy (NewString + String1Length, String2);
1114*a009b7dcSJung-uk Kim     return (NewString);
1115*a009b7dcSJung-uk Kim }
1116