1 /****************************************************************************** 2 * 3 * Module Name: aslcompile - top level compile module 4 * 5 *****************************************************************************/ 6 7 /****************************************************************************** 8 * 9 * 1. Copyright Notice 10 * 11 * Some or all of this work - Copyright (c) 1999 - 2019, Intel Corp. 12 * All rights reserved. 13 * 14 * 2. License 15 * 16 * 2.1. This is your license from Intel Corp. under its intellectual property 17 * rights. You may have additional license terms from the party that provided 18 * you this software, covering your right to use that party's intellectual 19 * property rights. 20 * 21 * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a 22 * copy of the source code appearing in this file ("Covered Code") an 23 * irrevocable, perpetual, worldwide license under Intel's copyrights in the 24 * base code distributed originally by Intel ("Original Intel Code") to copy, 25 * make derivatives, distribute, use and display any portion of the Covered 26 * Code in any form, with the right to sublicense such rights; and 27 * 28 * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent 29 * license (with the right to sublicense), under only those claims of Intel 30 * patents that are infringed by the Original Intel Code, to make, use, sell, 31 * offer to sell, and import the Covered Code and derivative works thereof 32 * solely to the minimum extent necessary to exercise the above copyright 33 * license, and in no event shall the patent license extend to any additions 34 * to or modifications of the Original Intel Code. No other license or right 35 * is granted directly or by implication, estoppel or otherwise; 36 * 37 * The above copyright and patent license is granted only if the following 38 * conditions are met: 39 * 40 * 3. Conditions 41 * 42 * 3.1. Redistribution of Source with Rights to Further Distribute Source. 43 * Redistribution of source code of any substantial portion of the Covered 44 * Code or modification with rights to further distribute source must include 45 * the above Copyright Notice, the above License, this list of Conditions, 46 * and the following Disclaimer and Export Compliance provision. In addition, 47 * Licensee must cause all Covered Code to which Licensee contributes to 48 * contain a file documenting the changes Licensee made to create that Covered 49 * Code and the date of any change. Licensee must include in that file the 50 * documentation of any changes made by any predecessor Licensee. Licensee 51 * must include a prominent statement that the modification is derived, 52 * directly or indirectly, from Original Intel Code. 53 * 54 * 3.2. Redistribution of Source with no Rights to Further Distribute Source. 55 * Redistribution of source code of any substantial portion of the Covered 56 * Code or modification without rights to further distribute source must 57 * include the following Disclaimer and Export Compliance provision in the 58 * documentation and/or other materials provided with distribution. In 59 * addition, Licensee may not authorize further sublicense of source of any 60 * portion of the Covered Code, and must include terms to the effect that the 61 * license from Licensee to its licensee is limited to the intellectual 62 * property embodied in the software Licensee provides to its licensee, and 63 * not to intellectual property embodied in modifications its licensee may 64 * make. 65 * 66 * 3.3. Redistribution of Executable. Redistribution in executable form of any 67 * substantial portion of the Covered Code or modification must reproduce the 68 * above Copyright Notice, and the following Disclaimer and Export Compliance 69 * provision in the documentation and/or other materials provided with the 70 * distribution. 71 * 72 * 3.4. Intel retains all right, title, and interest in and to the Original 73 * Intel Code. 74 * 75 * 3.5. Neither the name Intel nor any other trademark owned or controlled by 76 * Intel shall be used in advertising or otherwise to promote the sale, use or 77 * other dealings in products derived from or relating to the Covered Code 78 * without prior written authorization from Intel. 79 * 80 * 4. Disclaimer and Export Compliance 81 * 82 * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED 83 * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE 84 * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE, 85 * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY 86 * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY 87 * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A 88 * PARTICULAR PURPOSE. 89 * 90 * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES 91 * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR 92 * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT, 93 * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY 94 * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL 95 * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS 96 * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY 97 * LIMITED REMEDY. 98 * 99 * 4.3. Licensee shall not export, either directly or indirectly, any of this 100 * software or system incorporating such software without first obtaining any 101 * required license or other approval from the U. S. Department of Commerce or 102 * any other agency or department of the United States Government. In the 103 * event Licensee exports any such software from the United States or 104 * re-exports any such software from a foreign destination, Licensee shall 105 * ensure that the distribution and export/re-export of the software is in 106 * compliance with all laws, regulations, orders, or other restrictions of the 107 * U.S. Export Administration Regulations. Licensee agrees that neither it nor 108 * any of its subsidiaries will export/re-export any technical data, process, 109 * software, or service, directly or indirectly, to any country for which the 110 * United States government or any agency thereof requires an export license, 111 * other governmental approval, or letter of assurance, without first obtaining 112 * such license, approval or letter. 113 * 114 ***************************************************************************** 115 * 116 * Alternatively, you may choose to be licensed under the terms of the 117 * following license: 118 * 119 * Redistribution and use in source and binary forms, with or without 120 * modification, are permitted provided that the following conditions 121 * are met: 122 * 1. Redistributions of source code must retain the above copyright 123 * notice, this list of conditions, and the following disclaimer, 124 * without modification. 125 * 2. Redistributions in binary form must reproduce at minimum a disclaimer 126 * substantially similar to the "NO WARRANTY" disclaimer below 127 * ("Disclaimer") and any redistribution must be conditioned upon 128 * including a substantially similar Disclaimer requirement for further 129 * binary redistribution. 130 * 3. Neither the names of the above-listed copyright holders nor the names 131 * of any contributors may be used to endorse or promote products derived 132 * from this software without specific prior written permission. 133 * 134 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 135 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 136 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR 137 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 138 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 139 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT 140 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 141 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 142 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 143 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 144 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 145 * 146 * Alternatively, you may choose to be licensed under the terms of the 147 * GNU General Public License ("GPL") version 2 as published by the Free 148 * Software Foundation. 149 * 150 *****************************************************************************/ 151 152 #include "aslcompiler.h" 153 #include "acnamesp.h" 154 155 #include <stdio.h> 156 #include <time.h> 157 #include <acapps.h> 158 159 #define _COMPONENT ACPI_COMPILER 160 ACPI_MODULE_NAME ("aslcompile") 161 162 /* 163 * Main parser entry 164 * External is here in case the parser emits the same external in the 165 * generated header. (Newer versions of Bison) 166 */ 167 int 168 AslCompilerparse( 169 void); 170 171 /* Local prototypes */ 172 173 static void 174 CmFlushSourceCode ( 175 void); 176 177 static void 178 CmDumpAllEvents ( 179 void); 180 181 static void 182 CmFinishFiles( 183 BOOLEAN DeleteAmlFile); 184 185 186 /******************************************************************************* 187 * 188 * FUNCTION: CmDoCompile 189 * 190 * PARAMETERS: None 191 * 192 * RETURN: Status (0 = OK) 193 * 194 * DESCRIPTION: This procedure performs the entire compile 195 * 196 ******************************************************************************/ 197 198 ACPI_STATUS 199 CmDoCompile ( 200 void) 201 { 202 UINT8 FullCompile; 203 UINT8 Event; 204 ASL_GLOBAL_FILE_NODE *FileNode; 205 206 207 FullCompile = UtBeginEvent ("*** Total Compile time ***"); 208 Event = UtBeginEvent ("Open input and output files"); 209 UtEndEvent (Event); 210 211 Event = UtBeginEvent ("Preprocess input file"); 212 if (AslGbl_PreprocessFlag) 213 { 214 /* Enter compiler name as a #define */ 215 216 PrAddDefine (ASL_DEFINE, "", FALSE); 217 218 /* Preprocessor */ 219 220 PrDoPreprocess (); 221 AslGbl_CurrentLineNumber = 1; 222 AslGbl_LogicalLineNumber = 1; 223 224 if (AslGbl_PreprocessOnly) 225 { 226 UtEndEvent (Event); 227 CmCleanupAndExit (); 228 return (AE_OK); 229 } 230 } 231 UtEndEvent (Event); 232 233 234 /* Build the parse tree */ 235 236 Event = UtBeginEvent ("Parse source code and build parse tree"); 237 AslCompilerparse(); 238 UtEndEvent (Event); 239 240 /* Check for parser-detected syntax errors */ 241 242 if (AslGbl_SyntaxError) 243 { 244 fprintf (stderr, 245 "Compiler aborting due to parser-detected syntax error(s)\n"); 246 247 /* Flag this error in the FileNode for compilation summary */ 248 249 FileNode = FlGetCurrentFileNode (); 250 FileNode->ParserErrorDetected = TRUE; 251 AslGbl_ParserErrorDetected = TRUE; 252 LsDumpParseTree (); 253 goto ErrorExit; 254 } 255 256 /* Did the parse tree get successfully constructed? */ 257 258 if (!AslGbl_ParseTreeRoot) 259 { 260 /* 261 * If there are no errors, then we have some sort of 262 * internal problem. 263 */ 264 AslError (ASL_ERROR, ASL_MSG_COMPILER_INTERNAL, 265 NULL, "- Could not resolve parse tree root node"); 266 267 goto ErrorExit; 268 } 269 270 /* Flush out any remaining source after parse tree is complete */ 271 272 Event = UtBeginEvent ("Flush source input"); 273 CmFlushSourceCode (); 274 275 /* Prune the parse tree if requested (debug purposes only) */ 276 277 if (AslGbl_PruneParseTree) 278 { 279 AslPruneParseTree (AslGbl_PruneDepth, AslGbl_PruneType); 280 } 281 282 /* Optional parse tree dump, compiler debug output only */ 283 284 LsDumpParseTree (); 285 286 OpcGetIntegerWidth (AslGbl_ParseTreeRoot->Asl.Child); 287 UtEndEvent (Event); 288 289 /* Pre-process parse tree for any operator transforms */ 290 291 Event = UtBeginEvent ("Parse tree transforms"); 292 DbgPrint (ASL_DEBUG_OUTPUT, "\nParse tree transforms\n\n"); 293 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_TWICE, 294 TrAmlTransformWalkBegin, TrAmlTransformWalkEnd, NULL); 295 UtEndEvent (Event); 296 297 /* Generate AML opcodes corresponding to the parse tokens */ 298 299 Event = UtBeginEvent ("Generate AML opcodes"); 300 DbgPrint (ASL_DEBUG_OUTPUT, "Generating AML opcodes\n\n"); 301 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD, NULL, 302 OpcAmlOpcodeWalk, NULL); 303 UtEndEvent (Event); 304 305 UtEndEvent (FullCompile); 306 return (AE_OK); 307 308 ErrorExit: 309 UtEndEvent (FullCompile); 310 return (AE_ERROR); 311 } 312 313 314 /******************************************************************************* 315 * 316 * FUNCTION: CmDoAslMiddleAndBackEnd 317 * 318 * PARAMETERS: None 319 * 320 * RETURN: Status of middle-end and back-end 321 * 322 * DESCRIPTION: Perform compiler middle-end (type checking and semantic 323 * analysis) and back-end (code generation) 324 * 325 ******************************************************************************/ 326 327 int 328 CmDoAslMiddleAndBackEnd ( 329 void) 330 { 331 UINT8 Event; 332 ACPI_STATUS Status; 333 334 335 /* Interpret and generate all compile-time constants */ 336 337 Event = UtBeginEvent ("Constant folding via AML interpreter"); 338 DbgPrint (ASL_DEBUG_OUTPUT, 339 "Interpreting compile-time constant expressions\n\n"); 340 341 if (AslGbl_FoldConstants) 342 { 343 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD, 344 NULL, OpcAmlConstantWalk, NULL); 345 } 346 else 347 { 348 DbgPrint (ASL_PARSE_OUTPUT, " Optional folding disabled\n"); 349 } 350 UtEndEvent (Event); 351 352 /* Update AML opcodes if necessary, after constant folding */ 353 354 Event = UtBeginEvent ("Updating AML opcodes after constant folding"); 355 DbgPrint (ASL_DEBUG_OUTPUT, 356 "Updating AML opcodes after constant folding\n\n"); 357 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD, 358 NULL, OpcAmlOpcodeUpdateWalk, NULL); 359 UtEndEvent (Event); 360 361 /* Calculate all AML package lengths */ 362 363 Event = UtBeginEvent ("Generate AML package lengths"); 364 DbgPrint (ASL_DEBUG_OUTPUT, "Generating Package lengths\n\n"); 365 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD, NULL, 366 LnPackageLengthWalk, NULL); 367 UtEndEvent (Event); 368 369 if (AslGbl_ParseOnlyFlag) 370 { 371 AePrintErrorLog (ASL_FILE_STDERR); 372 UtDisplaySummary (ASL_FILE_STDERR); 373 if (AslGbl_DebugFlag) 374 { 375 /* Print error summary to the stdout also */ 376 377 AePrintErrorLog (ASL_FILE_STDOUT); 378 UtDisplaySummary (ASL_FILE_STDOUT); 379 } 380 return (0); 381 } 382 383 /* 384 * Create an internal namespace and use it as a symbol table 385 */ 386 387 /* Namespace loading */ 388 389 Event = UtBeginEvent ("Create ACPI Namespace"); 390 DbgPrint (ASL_DEBUG_OUTPUT, "Creating ACPI Namespace\n\n"); 391 Status = LdLoadNamespace (AslGbl_ParseTreeRoot); 392 UtEndEvent (Event); 393 if (ACPI_FAILURE (Status)) 394 { 395 return (-1); 396 } 397 398 /* Namespace cross-reference */ 399 400 AslGbl_NamespaceEvent = UtBeginEvent ( 401 "Cross reference parse tree and Namespace"); 402 DbgPrint (ASL_DEBUG_OUTPUT, "Cross referencing namespace\n\n"); 403 Status = XfCrossReferenceNamespace (); 404 if (ACPI_FAILURE (Status)) 405 { 406 return (-1); 407 } 408 409 /* Namespace - Check for non-referenced objects */ 410 411 LkFindUnreferencedObjects (); 412 UtEndEvent (AslGbl_NamespaceEvent); 413 414 /* Resolve External Declarations */ 415 416 Event = UtBeginEvent ("Resolve all Externals"); 417 DbgPrint (ASL_DEBUG_OUTPUT, "\nResolve Externals\n\n"); 418 419 if (AslGbl_DoExternalsInPlace) 420 { 421 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_DOWNWARD, 422 ExAmlExternalWalkBegin, NULL, NULL); 423 } 424 else 425 { 426 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_TWICE, 427 ExAmlExternalWalkBegin, ExAmlExternalWalkEnd, NULL); 428 } 429 UtEndEvent (Event); 430 431 /* 432 * Semantic analysis. This can happen only after the 433 * namespace has been loaded and cross-referenced. 434 * 435 * part one - check control methods 436 */ 437 Event = UtBeginEvent ("Analyze control method return types"); 438 AslGbl_AnalysisWalkInfo.MethodStack = NULL; 439 440 DbgPrint (ASL_DEBUG_OUTPUT, "Semantic analysis - Method analysis\n\n"); 441 442 if (AslGbl_CrossReferenceOutput) 443 { 444 OtPrintHeaders ("Part 1: Object Reference Map " 445 "(Object references from within each control method)"); 446 } 447 448 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_TWICE, 449 MtMethodAnalysisWalkBegin, 450 MtMethodAnalysisWalkEnd, &AslGbl_AnalysisWalkInfo); 451 UtEndEvent (Event); 452 453 /* Generate the object cross-reference file if requested */ 454 455 Event = UtBeginEvent ("Generate cross-reference file"); 456 OtCreateXrefFile (); 457 UtEndEvent (Event); 458 459 /* Semantic error checking part two - typing of method returns */ 460 461 Event = UtBeginEvent ("Determine object types returned by methods"); 462 DbgPrint (ASL_DEBUG_OUTPUT, "Semantic analysis - Method typing\n\n"); 463 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD, 464 NULL, AnMethodTypingWalkEnd, NULL); 465 UtEndEvent (Event); 466 467 /* Semantic error checking part three - operand type checking */ 468 469 Event = UtBeginEvent ("Analyze AML operand types"); 470 DbgPrint (ASL_DEBUG_OUTPUT, 471 "Semantic analysis - Operand type checking\n\n"); 472 if (AslGbl_DoTypechecking) 473 { 474 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD, 475 NULL, AnOperandTypecheckWalkEnd, &AslGbl_AnalysisWalkInfo); 476 } 477 UtEndEvent (Event); 478 479 /* Semantic error checking part four - other miscellaneous checks */ 480 481 Event = UtBeginEvent ("Miscellaneous analysis"); 482 DbgPrint (ASL_DEBUG_OUTPUT, "Semantic analysis - miscellaneous\n\n"); 483 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_DOWNWARD, 484 AnOtherSemanticAnalysisWalkBegin, 485 NULL, &AslGbl_AnalysisWalkInfo); 486 UtEndEvent (Event); 487 488 /* 489 * ASL-/ASL+ converter: Gbl_ParseTreeRoot->CommentList contains the 490 * very last comment of a given ASL file because it's the last constructed 491 * node during compilation. We take the very last comment and save it in a 492 * global for it to be used by the disassembler. 493 */ 494 if (AcpiGbl_CaptureComments) 495 { 496 AcpiGbl_LastListHead = AslGbl_ParseTreeRoot->Asl.CommentList; 497 AslGbl_ParseTreeRoot->Asl.CommentList = NULL; 498 } 499 500 /* Calculate all AML package lengths */ 501 502 Event = UtBeginEvent ("Finish AML package length generation"); 503 DbgPrint (ASL_DEBUG_OUTPUT, "Generating Package lengths\n\n"); 504 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD, NULL, 505 LnInitLengthsWalk, NULL); 506 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD, NULL, 507 LnPackageLengthWalk, NULL); 508 UtEndEvent (Event); 509 510 /* Code generation - emit the AML */ 511 512 Event = UtBeginEvent ("Generate AML code and write output files"); 513 DbgPrint (ASL_DEBUG_OUTPUT, "Writing AML byte code\n\n"); 514 515 AslGbl_CurrentDB = AslGbl_ParseTreeRoot->Asl.Child; 516 517 while (AslGbl_CurrentDB) 518 { 519 switch (FlSwitchFileSet(AslGbl_CurrentDB->Asl.Filename)) 520 { 521 case SWITCH_TO_DIFFERENT_FILE: 522 /* 523 * Reset these parameters when definition blocks belong in 524 * different files. If they belong in the same file, there is 525 * no need to reset these parameters 526 */ 527 FlSeekFile (ASL_FILE_SOURCE_OUTPUT, 0); 528 AslGbl_SourceLine = 0; 529 AslGbl_NextError = AslGbl_ErrorLog; 530 531 /* fall-through */ 532 533 case SWITCH_TO_SAME_FILE: 534 535 CgGenerateAmlOutput (); 536 CmDoOutputFiles (); 537 AslGbl_CurrentDB = AslGbl_CurrentDB->Asl.Next; 538 539 break; 540 541 default: /* FILE_NOT_FOUND */ 542 543 /* The requested file could not be found. Get out of here */ 544 545 AslGbl_CurrentDB = NULL; 546 break; 547 } 548 } 549 UtEndEvent (Event); 550 551 Event = UtBeginEvent ("Write optional output files"); 552 UtEndEvent (Event); 553 554 return (0); 555 } 556 557 558 /******************************************************************************* 559 * 560 * FUNCTION: AslCompilerSignon 561 * 562 * PARAMETERS: FileId - ID of the output file 563 * 564 * RETURN: None 565 * 566 * DESCRIPTION: Display compiler signon 567 * 568 ******************************************************************************/ 569 570 void 571 AslCompilerSignon ( 572 UINT32 FileId) 573 { 574 char *Prefix = ""; 575 char *UtilityName; 576 577 578 /* Set line prefix depending on the destination file type */ 579 580 switch (FileId) 581 { 582 case ASL_FILE_ASM_SOURCE_OUTPUT: 583 case ASL_FILE_ASM_INCLUDE_OUTPUT: 584 585 Prefix = "; "; 586 break; 587 588 case ASL_FILE_HEX_OUTPUT: 589 590 if (AslGbl_HexOutputFlag == HEX_OUTPUT_ASM) 591 { 592 Prefix = "; "; 593 } 594 else if ((AslGbl_HexOutputFlag == HEX_OUTPUT_C) || 595 (AslGbl_HexOutputFlag == HEX_OUTPUT_ASL)) 596 { 597 FlPrintFile (ASL_FILE_HEX_OUTPUT, "/*\n"); 598 Prefix = " * "; 599 } 600 break; 601 602 case ASL_FILE_C_SOURCE_OUTPUT: 603 case ASL_FILE_C_OFFSET_OUTPUT: 604 case ASL_FILE_C_INCLUDE_OUTPUT: 605 606 Prefix = " * "; 607 break; 608 609 default: 610 611 /* No other output types supported */ 612 613 break; 614 } 615 616 /* Running compiler or disassembler? */ 617 618 if (AcpiGbl_DisasmFlag) 619 { 620 UtilityName = AML_DISASSEMBLER_NAME; 621 } 622 else 623 { 624 UtilityName = ASL_COMPILER_NAME; 625 } 626 627 /* Compiler signon with copyright */ 628 629 FlPrintFile (FileId, "%s\n", Prefix); 630 FlPrintFile (FileId, ACPI_COMMON_HEADER (UtilityName, Prefix)); 631 } 632 633 634 /******************************************************************************* 635 * 636 * FUNCTION: AslCompilerFileHeader 637 * 638 * PARAMETERS: FileId - ID of the output file 639 * 640 * RETURN: None 641 * 642 * DESCRIPTION: Header used at the beginning of output files 643 * 644 ******************************************************************************/ 645 646 void 647 AslCompilerFileHeader ( 648 UINT32 FileId) 649 { 650 struct tm *NewTime; 651 time_t Aclock; 652 char *Prefix = ""; 653 654 655 /* Set line prefix depending on the destination file type */ 656 657 switch (FileId) 658 { 659 case ASL_FILE_ASM_SOURCE_OUTPUT: 660 case ASL_FILE_ASM_INCLUDE_OUTPUT: 661 662 Prefix = "; "; 663 break; 664 665 case ASL_FILE_HEX_OUTPUT: 666 667 if (AslGbl_HexOutputFlag == HEX_OUTPUT_ASM) 668 { 669 Prefix = "; "; 670 } 671 else if ((AslGbl_HexOutputFlag == HEX_OUTPUT_C) || 672 (AslGbl_HexOutputFlag == HEX_OUTPUT_ASL)) 673 { 674 Prefix = " * "; 675 } 676 break; 677 678 case ASL_FILE_C_SOURCE_OUTPUT: 679 case ASL_FILE_C_OFFSET_OUTPUT: 680 case ASL_FILE_C_INCLUDE_OUTPUT: 681 682 Prefix = " * "; 683 break; 684 685 default: 686 687 /* No other output types supported */ 688 689 break; 690 } 691 692 /* Compilation header with timestamp */ 693 694 (void) time (&Aclock); 695 NewTime = localtime (&Aclock); 696 697 FlPrintFile (FileId, 698 "%sCompilation of \"%s\" - %s%s\n", 699 Prefix, AslGbl_Files[ASL_FILE_INPUT].Filename, asctime (NewTime), 700 Prefix); 701 702 switch (FileId) 703 { 704 case ASL_FILE_C_SOURCE_OUTPUT: 705 case ASL_FILE_C_OFFSET_OUTPUT: 706 case ASL_FILE_C_INCLUDE_OUTPUT: 707 708 FlPrintFile (FileId, " */\n"); 709 break; 710 711 default: 712 713 /* Nothing to do for other output types */ 714 715 break; 716 } 717 } 718 719 720 /******************************************************************************* 721 * 722 * FUNCTION: CmFlushSourceCode 723 * 724 * PARAMETERS: None 725 * 726 * RETURN: None 727 * 728 * DESCRIPTION: Read in any remaining source code after the parse tree 729 * has been constructed. 730 * 731 ******************************************************************************/ 732 733 static void 734 CmFlushSourceCode ( 735 void) 736 { 737 char Buffer; 738 739 740 while (FlReadFile (ASL_FILE_INPUT, &Buffer, 1) != AE_ERROR) 741 { 742 AslInsertLineBuffer ((int) Buffer); 743 } 744 745 AslResetCurrentLineBuffer (); 746 } 747 748 749 /******************************************************************************* 750 * 751 * FUNCTION: CmDoOutputFiles 752 * 753 * PARAMETERS: None 754 * 755 * RETURN: None. 756 * 757 * DESCRIPTION: Create all "listing" type files 758 * 759 ******************************************************************************/ 760 761 void 762 CmDoOutputFiles ( 763 void) 764 { 765 766 /* Create listings and hex files */ 767 768 LsDoListings (); 769 HxDoHexOutput (); 770 771 /* Dump the namespace to the .nsp file if requested */ 772 773 (void) NsDisplayNamespace (); 774 775 /* Dump the device mapping file */ 776 777 MpEmitMappingInfo (); 778 } 779 780 781 /******************************************************************************* 782 * 783 * FUNCTION: CmDumpAllEvents 784 * 785 * PARAMETERS: None 786 * 787 * RETURN: None. 788 * 789 * DESCRIPTION: Dump all compiler events 790 * 791 ******************************************************************************/ 792 793 static void 794 CmDumpAllEvents ( 795 void) 796 { 797 ASL_EVENT_INFO *Event; 798 UINT32 Delta; 799 UINT32 MicroSeconds; 800 UINT32 MilliSeconds; 801 UINT32 i; 802 803 804 Event = AslGbl_Events; 805 806 DbgPrint (ASL_DEBUG_OUTPUT, "\n\nElapsed time for major events\n\n"); 807 if (AslGbl_CompileTimesFlag) 808 { 809 printf ("\nElapsed time for major events\n\n"); 810 } 811 812 for (i = 0; i < AslGbl_NextEvent; i++) 813 { 814 if (Event->Valid) 815 { 816 /* Delta will be in 100-nanosecond units */ 817 818 Delta = (UINT32) (Event->EndTime - Event->StartTime); 819 820 MicroSeconds = Delta / ACPI_100NSEC_PER_USEC; 821 MilliSeconds = Delta / ACPI_100NSEC_PER_MSEC; 822 823 /* Round milliseconds up */ 824 825 if ((MicroSeconds - (MilliSeconds * ACPI_USEC_PER_MSEC)) >= 500) 826 { 827 MilliSeconds++; 828 } 829 830 DbgPrint (ASL_DEBUG_OUTPUT, "%8u usec %8u msec - %s\n", 831 MicroSeconds, MilliSeconds, Event->EventName); 832 833 if (AslGbl_CompileTimesFlag) 834 { 835 printf ("%8u usec %8u msec - %s\n", 836 MicroSeconds, MilliSeconds, Event->EventName); 837 } 838 } 839 840 Event++; 841 } 842 } 843 844 845 /******************************************************************************* 846 * 847 * FUNCTION: CmCleanupAndExit 848 * 849 * PARAMETERS: None 850 * 851 * RETURN: None. 852 * 853 * DESCRIPTION: Close all open files and exit the compiler 854 * 855 ******************************************************************************/ 856 857 void 858 CmCleanupAndExit ( 859 void) 860 { 861 BOOLEAN DeleteAmlFile = FALSE; 862 ASL_GLOBAL_FILE_NODE *CurrentFileNode = AslGbl_FilesList; 863 864 865 /* Check if any errors occurred during compile */ 866 867 (void) AslCheckForErrorExit (); 868 869 AePrintErrorLog (ASL_FILE_STDERR); 870 if (AslGbl_DebugFlag) 871 { 872 /* Print error summary to stdout also */ 873 874 AePrintErrorLog (ASL_FILE_STDOUT); 875 } 876 877 /* Emit compile times if enabled */ 878 879 CmDumpAllEvents (); 880 881 if (AslGbl_CompileTimesFlag) 882 { 883 printf ("\nMiscellaneous compile statistics\n\n"); 884 printf ("%11u : %s\n", AslGbl_TotalParseNodes, "Parse nodes"); 885 printf ("%11u : %s\n", AslGbl_NsLookupCount, "Namespace searches"); 886 printf ("%11u : %s\n", AslGbl_TotalNamedObjects, "Named objects"); 887 printf ("%11u : %s\n", AslGbl_TotalMethods, "Control methods"); 888 printf ("%11u : %s\n", AslGbl_TotalAllocations, "Memory Allocations"); 889 printf ("%11u : %s\n", AslGbl_TotalAllocated, "Total allocated memory"); 890 printf ("%11u : %s\n", AslGbl_TotalFolds, "Constant subtrees folded"); 891 printf ("\n"); 892 } 893 894 if (AslGbl_NsLookupCount) 895 { 896 DbgPrint (ASL_DEBUG_OUTPUT, 897 "\n\nMiscellaneous compile statistics\n\n"); 898 899 DbgPrint (ASL_DEBUG_OUTPUT, 900 "%32s : %u\n", "Total Namespace searches", 901 AslGbl_NsLookupCount); 902 903 DbgPrint (ASL_DEBUG_OUTPUT, 904 "%32s : %u usec\n", "Time per search", ((UINT32) 905 (AslGbl_Events[AslGbl_NamespaceEvent].EndTime - 906 AslGbl_Events[AslGbl_NamespaceEvent].StartTime) / 10) / 907 AslGbl_NsLookupCount); 908 } 909 910 if (AslGbl_ExceptionCount[ASL_ERROR] > ASL_MAX_ERROR_COUNT) 911 { 912 printf ("\nMaximum error count (%d) exceeded\n", 913 ASL_MAX_ERROR_COUNT); 914 } 915 916 UtDisplaySummary (ASL_FILE_STDOUT); 917 918 /* 919 * We will delete the AML file if there are errors and the 920 * force AML output option has not been used. 921 */ 922 if (AslGbl_ParserErrorDetected || ((AslGbl_ExceptionCount[ASL_ERROR] > 0) && 923 (!AslGbl_IgnoreErrors) && 924 AslGbl_Files[ASL_FILE_AML_OUTPUT].Handle)) 925 { 926 DeleteAmlFile = TRUE; 927 } 928 929 /* Close all open files */ 930 931 while (CurrentFileNode) 932 { 933 switch (FlSwitchFileSet (CurrentFileNode->Files[ASL_FILE_INPUT].Filename)) 934 { 935 case SWITCH_TO_SAME_FILE: 936 case SWITCH_TO_DIFFERENT_FILE: 937 938 CmFinishFiles (DeleteAmlFile); 939 CurrentFileNode = CurrentFileNode->Next; 940 break; 941 942 case FILE_NOT_FOUND: 943 default: 944 945 CurrentFileNode = NULL; 946 break; 947 } 948 } 949 950 /* Final cleanup after compiling one file */ 951 952 if (!AslGbl_DoAslConversion) 953 { 954 UtDeleteLocalCaches (); 955 } 956 } 957 958 959 /******************************************************************************* 960 * 961 * FUNCTION: CmFinishFiles 962 * 963 * PARAMETERS: DeleteAmlFile 964 * 965 * RETURN: None. 966 * 967 * DESCRIPTION: Close all open files, delete AML files depending on the 968 * function parameter is true. 969 * 970 ******************************************************************************/ 971 972 static void 973 CmFinishFiles( 974 BOOLEAN DeleteAmlFile) 975 { 976 UINT32 i; 977 978 979 /* 980 * Take care with the preprocessor file (.pre), it might be the same 981 * as the "input" file, depending on where the compiler has terminated 982 * or aborted. Prevent attempt to close the same file twice in 983 * loop below. 984 */ 985 if (AslGbl_Files[ASL_FILE_PREPROCESSOR].Handle == 986 AslGbl_Files[ASL_FILE_INPUT].Handle) 987 { 988 AslGbl_Files[ASL_FILE_PREPROCESSOR].Handle = NULL; 989 } 990 991 /* Close the standard I/O files */ 992 993 for (i = ASL_FILE_INPUT; i < ASL_MAX_FILE_TYPE; i++) 994 { 995 /* 996 * Some files such as debug output files could be pointing to 997 * stderr or stdout. Leave these alone. 998 */ 999 if (AslGbl_Files[i].Handle != stderr && 1000 AslGbl_Files[i].Handle != stdout) 1001 { 1002 FlCloseFile (i); 1003 } 1004 } 1005 1006 /* Delete AML file if there are errors */ 1007 1008 if (DeleteAmlFile) 1009 { 1010 FlDeleteFile (ASL_FILE_AML_OUTPUT); 1011 } 1012 1013 /* Delete the preprocessor temp file unless full debug was specified */ 1014 1015 if (AslGbl_PreprocessFlag && !AslGbl_KeepPreprocessorTempFile) 1016 { 1017 FlDeleteFile (ASL_FILE_PREPROCESSOR); 1018 } 1019 1020 /* 1021 * Delete intermediate ("combined") source file (if -ls flag not set) 1022 * This file is created during normal ASL/AML compiles. It is not 1023 * created by the data table compiler. 1024 * 1025 * If the -ls flag is set, then the .SRC file should not be deleted. 1026 * In this case, Gbl_SourceOutputFlag is set to TRUE. 1027 * 1028 * Note: Handles are cleared by FlCloseFile above, so we look at the 1029 * filename instead, to determine if the .SRC file was actually 1030 * created. 1031 */ 1032 if (!AslGbl_SourceOutputFlag) 1033 { 1034 FlDeleteFile (ASL_FILE_SOURCE_OUTPUT); 1035 } 1036 } 1037