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 - 2021, 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
CmDoCompile(void)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 AslGbl_CurrentLineOffset = 0;
224
225 if (AslGbl_PreprocessOnly)
226 {
227 UtEndEvent (Event);
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 UtEndEvent (Event);
287 UtEndEvent (FullCompile);
288 return (AE_OK);
289
290 ErrorExit:
291 UtEndEvent (FullCompile);
292 return (AE_ERROR);
293 }
294
295
296 /*******************************************************************************
297 *
298 * FUNCTION: CmDoAslMiddleAndBackEnd
299 *
300 * PARAMETERS: None
301 *
302 * RETURN: Status of middle-end and back-end
303 *
304 * DESCRIPTION: Perform compiler middle-end (type checking and semantic
305 * analysis) and back-end (code generation)
306 *
307 ******************************************************************************/
308
309 int
CmDoAslMiddleAndBackEnd(void)310 CmDoAslMiddleAndBackEnd (
311 void)
312 {
313 UINT8 Event;
314 ACPI_STATUS Status;
315
316
317 OpcGetIntegerWidth (AslGbl_ParseTreeRoot->Asl.Child);
318
319 /* Pre-process parse tree for any operator transforms */
320
321 Event = UtBeginEvent ("Parse tree transforms");
322 DbgPrint (ASL_DEBUG_OUTPUT, "\nParse tree transforms\n\n");
323 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_TWICE,
324 TrAmlTransformWalkBegin, TrAmlTransformWalkEnd, NULL);
325 UtEndEvent (Event);
326
327 /* Generate AML opcodes corresponding to the parse tokens */
328
329 Event = UtBeginEvent ("Generate AML opcodes");
330 DbgPrint (ASL_DEBUG_OUTPUT, "Generating AML opcodes\n\n");
331 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD,
332 NULL, OpcAmlOpcodeWalk, NULL);
333 UtEndEvent (Event);
334
335
336 /* Interpret and generate all compile-time constants */
337
338 Event = UtBeginEvent ("Constant folding via AML interpreter");
339 DbgPrint (ASL_DEBUG_OUTPUT,
340 "Interpreting compile-time constant expressions\n\n");
341
342 if (AslGbl_FoldConstants)
343 {
344 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD,
345 NULL, OpcAmlConstantWalk, NULL);
346 }
347 else
348 {
349 DbgPrint (ASL_PARSE_OUTPUT, " Optional folding disabled\n");
350 }
351 UtEndEvent (Event);
352
353 /* Update AML opcodes if necessary, after constant folding */
354
355 Event = UtBeginEvent ("Updating AML opcodes after constant folding");
356 DbgPrint (ASL_DEBUG_OUTPUT,
357 "Updating AML opcodes after constant folding\n\n");
358 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD,
359 NULL, OpcAmlOpcodeUpdateWalk, NULL);
360 UtEndEvent (Event);
361
362 /* Calculate all AML package lengths */
363
364 Event = UtBeginEvent ("Generate AML package lengths");
365 DbgPrint (ASL_DEBUG_OUTPUT, "Generating Package lengths\n\n");
366 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD, NULL,
367 LnPackageLengthWalk, NULL);
368 UtEndEvent (Event);
369
370 if (AslGbl_ParseOnlyFlag)
371 {
372 AePrintErrorLog (ASL_FILE_STDERR);
373 UtDisplaySummary (ASL_FILE_STDERR);
374 if (AslGbl_DebugFlag)
375 {
376 /* Print error summary to the stdout also */
377
378 AePrintErrorLog (ASL_FILE_STDOUT);
379 UtDisplaySummary (ASL_FILE_STDOUT);
380 }
381 return (0);
382 }
383
384 /*
385 * Create an internal namespace and use it as a symbol table
386 */
387
388 /* Namespace loading */
389
390 Event = UtBeginEvent ("Create ACPI Namespace");
391 DbgPrint (ASL_DEBUG_OUTPUT, "Creating ACPI Namespace\n\n");
392 Status = LdLoadNamespace (AslGbl_ParseTreeRoot);
393 UtEndEvent (Event);
394 if (ACPI_FAILURE (Status))
395 {
396 return (-1);
397 }
398
399 /* Namespace cross-reference */
400
401 AslGbl_NamespaceEvent = UtBeginEvent (
402 "Cross reference parse tree and Namespace");
403 DbgPrint (ASL_DEBUG_OUTPUT, "Cross referencing namespace\n\n");
404 Status = XfCrossReferenceNamespace ();
405 if (ACPI_FAILURE (Status))
406 {
407 return (-1);
408 }
409
410 /* Namespace - Check for non-referenced objects */
411
412 LkFindUnreferencedObjects ();
413 UtEndEvent (AslGbl_NamespaceEvent);
414
415 /* Resolve External Declarations */
416
417 Event = UtBeginEvent ("Resolve all Externals");
418 DbgPrint (ASL_DEBUG_OUTPUT, "\nResolve Externals\n\n");
419
420 if (AslGbl_DoExternalsInPlace)
421 {
422 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_DOWNWARD,
423 ExAmlExternalWalkBegin, NULL, NULL);
424 }
425 else
426 {
427 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_TWICE,
428 ExAmlExternalWalkBegin, ExAmlExternalWalkEnd, NULL);
429 }
430 UtEndEvent (Event);
431
432 /*
433 * Semantic analysis. This can happen only after the
434 * namespace has been loaded and cross-referenced.
435 *
436 * part one - check control methods
437 */
438 Event = UtBeginEvent ("Analyze control method return types");
439 AslGbl_AnalysisWalkInfo.MethodStack = NULL;
440
441 DbgPrint (ASL_DEBUG_OUTPUT, "Semantic analysis - Method analysis\n\n");
442
443 if (AslGbl_CrossReferenceOutput)
444 {
445 OtPrintHeaders ("Part 1: Object Reference Map "
446 "(Object references from within each control method)");
447 }
448
449 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_TWICE,
450 MtMethodAnalysisWalkBegin,
451 MtMethodAnalysisWalkEnd, &AslGbl_AnalysisWalkInfo);
452 UtEndEvent (Event);
453
454 /* Generate the object cross-reference file if requested */
455
456 Event = UtBeginEvent ("Generate cross-reference file");
457 OtCreateXrefFile ();
458 UtEndEvent (Event);
459
460 /* Semantic error checking part two - typing of method returns */
461
462 Event = UtBeginEvent ("Determine object types returned by methods");
463 DbgPrint (ASL_DEBUG_OUTPUT, "Semantic analysis - Method typing\n\n");
464 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD,
465 NULL, AnMethodTypingWalkEnd, NULL);
466 UtEndEvent (Event);
467
468 /* Semantic error checking part three - operand type checking */
469
470 Event = UtBeginEvent ("Analyze AML operand types");
471 DbgPrint (ASL_DEBUG_OUTPUT,
472 "Semantic analysis - Operand type checking\n\n");
473 if (AslGbl_DoTypechecking)
474 {
475 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD,
476 NULL, AnOperandTypecheckWalkEnd, &AslGbl_AnalysisWalkInfo);
477 }
478 UtEndEvent (Event);
479
480 /* Semantic error checking part four - other miscellaneous checks */
481
482 Event = UtBeginEvent ("Miscellaneous analysis");
483 DbgPrint (ASL_DEBUG_OUTPUT, "Semantic analysis - miscellaneous\n\n");
484 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_DOWNWARD,
485 AnOtherSemanticAnalysisWalkBegin,
486 NULL, &AslGbl_AnalysisWalkInfo);
487 UtEndEvent (Event);
488
489 /*
490 * ASL-/ASL+ converter: Gbl_ParseTreeRoot->CommentList contains the
491 * very last comment of a given ASL file because it's the last constructed
492 * node during compilation. We take the very last comment and save it in a
493 * global for it to be used by the disassembler.
494 */
495 if (AcpiGbl_CaptureComments)
496 {
497 AcpiGbl_LastListHead = AslGbl_ParseTreeRoot->Asl.CommentList;
498 AslGbl_ParseTreeRoot->Asl.CommentList = NULL;
499 }
500
501 /* Calculate all AML package lengths */
502
503 Event = UtBeginEvent ("Finish AML package length generation");
504 DbgPrint (ASL_DEBUG_OUTPUT, "Generating Package lengths\n\n");
505 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD, NULL,
506 LnInitLengthsWalk, NULL);
507 TrWalkParseTree (AslGbl_ParseTreeRoot, ASL_WALK_VISIT_UPWARD, NULL,
508 LnPackageLengthWalk, NULL);
509 UtEndEvent (Event);
510
511 /* Code generation - emit the AML */
512
513 Event = UtBeginEvent ("Generate AML code and write output files");
514 DbgPrint (ASL_DEBUG_OUTPUT, "Writing AML byte code\n\n");
515
516 AslGbl_CurrentDB = AslGbl_ParseTreeRoot->Asl.Child;
517
518 while (AslGbl_CurrentDB)
519 {
520 switch (FlSwitchFileSet(AslGbl_CurrentDB->Asl.Filename))
521 {
522 case SWITCH_TO_DIFFERENT_FILE:
523 /*
524 * Reset these parameters when definition blocks belong in
525 * different files. If they belong in the same file, there is
526 * no need to reset these parameters
527 */
528 FlSeekFile (ASL_FILE_SOURCE_OUTPUT, 0);
529 AslGbl_SourceLine = 0;
530 AslGbl_NextError = AslGbl_ErrorLog;
531
532 /* fall-through */
533
534 case SWITCH_TO_SAME_FILE:
535
536 CgGenerateAmlOutput ();
537 CmDoOutputFiles ();
538 AslGbl_CurrentDB = AslGbl_CurrentDB->Asl.Next;
539
540 break;
541
542 default: /* FILE_NOT_FOUND */
543
544 /* The requested file could not be found. Get out of here */
545
546 AslGbl_CurrentDB = NULL;
547 break;
548 }
549 }
550 UtEndEvent (Event);
551
552 Event = UtBeginEvent ("Write optional output files");
553 UtEndEvent (Event);
554
555 return (0);
556 }
557
558
559 /*******************************************************************************
560 *
561 * FUNCTION: AslCompilerSignon
562 *
563 * PARAMETERS: FileId - ID of the output file
564 *
565 * RETURN: None
566 *
567 * DESCRIPTION: Display compiler signon
568 *
569 ******************************************************************************/
570
571 void
AslCompilerSignon(UINT32 FileId)572 AslCompilerSignon (
573 UINT32 FileId)
574 {
575 char *Prefix = "";
576 char *UtilityName;
577
578
579 /* Set line prefix depending on the destination file type */
580
581 switch (FileId)
582 {
583 case ASL_FILE_ASM_SOURCE_OUTPUT:
584 case ASL_FILE_ASM_INCLUDE_OUTPUT:
585
586 Prefix = "; ";
587 break;
588
589 case ASL_FILE_HEX_OUTPUT:
590
591 if (AslGbl_HexOutputFlag == HEX_OUTPUT_ASM)
592 {
593 Prefix = "; ";
594 }
595 else if ((AslGbl_HexOutputFlag == HEX_OUTPUT_C) ||
596 (AslGbl_HexOutputFlag == HEX_OUTPUT_ASL))
597 {
598 FlPrintFile (ASL_FILE_HEX_OUTPUT, "/*\n");
599 Prefix = " * ";
600 }
601 break;
602
603 case ASL_FILE_C_SOURCE_OUTPUT:
604 case ASL_FILE_C_OFFSET_OUTPUT:
605 case ASL_FILE_C_INCLUDE_OUTPUT:
606
607 Prefix = " * ";
608 break;
609
610 default:
611
612 /* No other output types supported */
613
614 break;
615 }
616
617 /* Running compiler or disassembler? */
618
619 if (AcpiGbl_DisasmFlag)
620 {
621 UtilityName = AML_DISASSEMBLER_NAME;
622 }
623 else
624 {
625 UtilityName = ASL_COMPILER_NAME;
626 }
627
628 /* Compiler signon with copyright */
629
630 FlPrintFile (FileId, "%s\n", Prefix);
631 FlPrintFile (FileId, ACPI_COMMON_HEADER (UtilityName, Prefix));
632 }
633
634
635 /*******************************************************************************
636 *
637 * FUNCTION: AslCompilerFileHeader
638 *
639 * PARAMETERS: FileId - ID of the output file
640 *
641 * RETURN: None
642 *
643 * DESCRIPTION: Header used at the beginning of output files
644 *
645 ******************************************************************************/
646
647 void
AslCompilerFileHeader(UINT32 FileId)648 AslCompilerFileHeader (
649 UINT32 FileId)
650 {
651 char *NewTime;
652 time_t Aclock;
653 char *Prefix = "";
654
655
656 /* Set line prefix depending on the destination file type */
657
658 switch (FileId)
659 {
660 case ASL_FILE_ASM_SOURCE_OUTPUT:
661 case ASL_FILE_ASM_INCLUDE_OUTPUT:
662
663 Prefix = "; ";
664 break;
665
666 case ASL_FILE_HEX_OUTPUT:
667
668 if (AslGbl_HexOutputFlag == HEX_OUTPUT_ASM)
669 {
670 Prefix = "; ";
671 }
672 else if ((AslGbl_HexOutputFlag == HEX_OUTPUT_C) ||
673 (AslGbl_HexOutputFlag == HEX_OUTPUT_ASL))
674 {
675 Prefix = " * ";
676 }
677 break;
678
679 case ASL_FILE_C_SOURCE_OUTPUT:
680 case ASL_FILE_C_OFFSET_OUTPUT:
681 case ASL_FILE_C_INCLUDE_OUTPUT:
682
683 Prefix = " * ";
684 break;
685
686 default:
687
688 /* No other output types supported */
689
690 break;
691 }
692
693 /* Compilation header with timestamp */
694
695 Aclock = time (NULL);
696 NewTime = ctime (&Aclock);
697
698 FlPrintFile (FileId,
699 "%sCompilation of \"%s\" -",
700 Prefix, AslGbl_Files[ASL_FILE_INPUT].Filename);
701
702 if (NewTime)
703 {
704 FlPrintFile (FileId, " %s%s\n", NewTime, Prefix);
705 }
706
707 switch (FileId)
708 {
709 case ASL_FILE_C_SOURCE_OUTPUT:
710 case ASL_FILE_C_OFFSET_OUTPUT:
711 case ASL_FILE_C_INCLUDE_OUTPUT:
712
713 FlPrintFile (FileId, " */\n");
714 break;
715
716 default:
717
718 /* Nothing to do for other output types */
719
720 break;
721 }
722 }
723
724
725 /*******************************************************************************
726 *
727 * FUNCTION: CmFlushSourceCode
728 *
729 * PARAMETERS: None
730 *
731 * RETURN: None
732 *
733 * DESCRIPTION: Read in any remaining source code after the parse tree
734 * has been constructed.
735 *
736 ******************************************************************************/
737
738 static void
CmFlushSourceCode(void)739 CmFlushSourceCode (
740 void)
741 {
742 char Buffer;
743
744
745 while (FlReadFile (ASL_FILE_INPUT, &Buffer, 1) != AE_ERROR)
746 {
747 AslInsertLineBuffer ((int) Buffer);
748 }
749
750 AslResetCurrentLineBuffer ();
751 }
752
753
754 /*******************************************************************************
755 *
756 * FUNCTION: CmDoOutputFiles
757 *
758 * PARAMETERS: None
759 *
760 * RETURN: None.
761 *
762 * DESCRIPTION: Create all "listing" type files
763 *
764 ******************************************************************************/
765
766 void
CmDoOutputFiles(void)767 CmDoOutputFiles (
768 void)
769 {
770
771 /* Create listings and hex files */
772
773 LsDoListings ();
774 HxDoHexOutput ();
775
776 /* Dump the namespace to the .nsp file if requested */
777
778 (void) NsDisplayNamespace ();
779
780 /* Dump the device mapping file */
781
782 MpEmitMappingInfo ();
783 }
784
785
786 /*******************************************************************************
787 *
788 * FUNCTION: CmDumpAllEvents
789 *
790 * PARAMETERS: None
791 *
792 * RETURN: None.
793 *
794 * DESCRIPTION: Dump all compiler events
795 *
796 ******************************************************************************/
797
798 static void
CmDumpAllEvents(void)799 CmDumpAllEvents (
800 void)
801 {
802 ASL_EVENT_INFO *Event;
803 UINT32 Delta;
804 UINT32 MicroSeconds;
805 UINT32 MilliSeconds;
806 UINT32 i;
807
808
809 Event = AslGbl_Events;
810
811 DbgPrint (ASL_DEBUG_OUTPUT, "\n\nElapsed time for major events\n\n");
812 if (AslGbl_CompileTimesFlag)
813 {
814 printf ("\nElapsed time for major events\n\n");
815 }
816
817 for (i = 0; i < AslGbl_NextEvent; i++)
818 {
819 if (Event->Valid)
820 {
821 /* Delta will be in 100-nanosecond units */
822
823 Delta = (UINT32) (Event->EndTime - Event->StartTime);
824
825 MicroSeconds = Delta / ACPI_100NSEC_PER_USEC;
826 MilliSeconds = Delta / ACPI_100NSEC_PER_MSEC;
827
828 /* Round milliseconds up */
829
830 if ((MicroSeconds - (MilliSeconds * ACPI_USEC_PER_MSEC)) >= 500)
831 {
832 MilliSeconds++;
833 }
834
835 DbgPrint (ASL_DEBUG_OUTPUT, "%8u usec %8u msec - %s\n",
836 MicroSeconds, MilliSeconds, Event->EventName);
837
838 if (AslGbl_CompileTimesFlag)
839 {
840 printf ("%8u usec %8u msec - %s\n",
841 MicroSeconds, MilliSeconds, Event->EventName);
842 }
843 }
844
845 Event++;
846 }
847 }
848
849
850 /*******************************************************************************
851 *
852 * FUNCTION: CmCleanupAndExit
853 *
854 * PARAMETERS: None
855 *
856 * RETURN: None.
857 *
858 * DESCRIPTION: Close all open files and exit the compiler
859 *
860 ******************************************************************************/
861
862 int
CmCleanupAndExit(void)863 CmCleanupAndExit (
864 void)
865 {
866 int Status = 0;
867 BOOLEAN DeleteAmlFile = FALSE;
868 ASL_GLOBAL_FILE_NODE *CurrentFileNode = AslGbl_FilesList;
869
870
871 /* Check if any errors occurred during compile */
872
873 (void) AslCheckForErrorExit ();
874
875 AePrintErrorLog (ASL_FILE_STDERR);
876 if (AslGbl_DebugFlag)
877 {
878 /* Print error summary to stdout also */
879
880 AePrintErrorLog (ASL_FILE_STDOUT);
881 }
882
883 /* Emit compile times if enabled */
884
885 CmDumpAllEvents ();
886
887 if (AslGbl_CompileTimesFlag)
888 {
889 printf ("\nMiscellaneous compile statistics\n\n");
890 printf ("%11u : %s\n", AslGbl_TotalParseNodes, "Parse nodes");
891 printf ("%11u : %s\n", AslGbl_NsLookupCount, "Namespace searches");
892 printf ("%11u : %s\n", AslGbl_TotalNamedObjects, "Named objects");
893 printf ("%11u : %s\n", AslGbl_TotalMethods, "Control methods");
894 printf ("%11u : %s\n", AslGbl_TotalAllocations, "Memory Allocations");
895 printf ("%11u : %s\n", AslGbl_TotalAllocated, "Total allocated memory");
896 printf ("%11u : %s\n", AslGbl_TotalFolds, "Constant subtrees folded");
897 printf ("\n");
898 }
899
900 if (AslGbl_NsLookupCount)
901 {
902 DbgPrint (ASL_DEBUG_OUTPUT,
903 "\n\nMiscellaneous compile statistics\n\n");
904
905 DbgPrint (ASL_DEBUG_OUTPUT,
906 "%32s : %u\n", "Total Namespace searches",
907 AslGbl_NsLookupCount);
908
909 DbgPrint (ASL_DEBUG_OUTPUT,
910 "%32s : %u usec\n", "Time per search", ((UINT32)
911 (AslGbl_Events[AslGbl_NamespaceEvent].EndTime -
912 AslGbl_Events[AslGbl_NamespaceEvent].StartTime) / 10) /
913 AslGbl_NsLookupCount);
914 }
915
916 if (AslGbl_ExceptionCount[ASL_ERROR] > ASL_MAX_ERROR_COUNT)
917 {
918 printf ("\nMaximum error count (%d) exceeded\n",
919 ASL_MAX_ERROR_COUNT);
920 }
921
922 UtDisplaySummary (ASL_FILE_STDOUT);
923
924 /*
925 * Delete the AML file if there are errors and the force AML output option
926 * (-f) has not been used.
927 *
928 * Return -1 as a status of the compiler if no AML files are generated. If
929 * the AML file is generated in the presence of errors, return 0. In the
930 * latter case, the errors were ignored by the user so the compilation is
931 * considered successful.
932 */
933 if (AslGbl_ParserErrorDetected || AslGbl_PreprocessOnly ||
934 ((AslGbl_ExceptionCount[ASL_ERROR] > 0) &&
935 (!AslGbl_IgnoreErrors) &&
936 AslGbl_Files[ASL_FILE_AML_OUTPUT].Handle))
937 {
938 DeleteAmlFile = TRUE;
939 Status = -1;
940 }
941
942 /* Close all open files */
943
944 while (CurrentFileNode)
945 {
946 /*
947 * Set the program return status based on file errors. If there are any
948 * errors and during compilation, the command is not considered
949 * successful.
950 */
951 if (Status != -1 && !AslGbl_IgnoreErrors &&
952 CurrentFileNode->ParserErrorDetected)
953 {
954 Status = -1;
955 }
956
957 switch (FlSwitchFileSet (CurrentFileNode->Files[ASL_FILE_INPUT].Filename))
958 {
959 case SWITCH_TO_SAME_FILE:
960 case SWITCH_TO_DIFFERENT_FILE:
961
962 CmFinishFiles (DeleteAmlFile);
963 CurrentFileNode = CurrentFileNode->Next;
964 break;
965
966 case FILE_NOT_FOUND:
967 default:
968
969 CurrentFileNode = NULL;
970 break;
971 }
972 }
973
974 /* Final cleanup after compiling one file */
975
976 if (!AslGbl_DoAslConversion)
977 {
978 UtDeleteLocalCaches ();
979 }
980
981 return (Status);
982 }
983
984
985 /*******************************************************************************
986 *
987 * FUNCTION: CmFinishFiles
988 *
989 * PARAMETERS: DeleteAmlFile
990 *
991 * RETURN: None.
992 *
993 * DESCRIPTION: Close all open files, delete AML files depending on the
994 * function parameter is true.
995 *
996 ******************************************************************************/
997
998 static void
CmFinishFiles(BOOLEAN DeleteAmlFile)999 CmFinishFiles(
1000 BOOLEAN DeleteAmlFile)
1001 {
1002 UINT32 i;
1003
1004
1005 /*
1006 * Take care with the preprocessor file (.pre), it might be the same
1007 * as the "input" file, depending on where the compiler has terminated
1008 * or aborted. Prevent attempt to close the same file twice in
1009 * loop below.
1010 */
1011 if (AslGbl_Files[ASL_FILE_PREPROCESSOR].Handle ==
1012 AslGbl_Files[ASL_FILE_INPUT].Handle)
1013 {
1014 AslGbl_Files[ASL_FILE_PREPROCESSOR].Handle = NULL;
1015 }
1016
1017 /* Close the standard I/O files */
1018
1019 for (i = ASL_FILE_INPUT; i < ASL_MAX_FILE_TYPE; i++)
1020 {
1021 /*
1022 * Some files such as debug output files could be pointing to
1023 * stderr or stdout. Leave these alone.
1024 */
1025 if (AslGbl_Files[i].Handle != stderr &&
1026 AslGbl_Files[i].Handle != stdout)
1027 {
1028 FlCloseFile (i);
1029 }
1030 }
1031
1032 /* Delete AML file if there are errors */
1033
1034 if (DeleteAmlFile)
1035 {
1036 FlDeleteFile (ASL_FILE_AML_OUTPUT);
1037 }
1038
1039 /* Delete the preprocessor temp file unless full debug was specified */
1040
1041 if (AslGbl_PreprocessFlag && !AslGbl_KeepPreprocessorTempFile)
1042 {
1043 FlDeleteFile (ASL_FILE_PREPROCESSOR);
1044 }
1045
1046 /*
1047 * Delete intermediate ("combined") source file (if -ls flag not set)
1048 * This file is created during normal ASL/AML compiles. It is not
1049 * created by the data table compiler.
1050 *
1051 * If the -ls flag is set, then the .SRC file should not be deleted.
1052 * In this case, Gbl_SourceOutputFlag is set to TRUE.
1053 *
1054 * Note: Handles are cleared by FlCloseFile above, so we look at the
1055 * filename instead, to determine if the .SRC file was actually
1056 * created.
1057 */
1058 if (!AslGbl_SourceOutputFlag)
1059 {
1060 FlDeleteFile (ASL_FILE_SOURCE_OUTPUT);
1061 }
1062 }
1063