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