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