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 - 2024, 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 FlPrintFile (FileId,
703 "%sCompilation of \"%s\"",
704 Prefix, AslGbl_Files[ASL_FILE_INPUT].Filename);
705
706 if (!AslGbl_Deterministic)
707 {
708 Aclock = time (NULL);
709 NewTime = ctime (&Aclock);
710 if (NewTime)
711 {
712 FlPrintFile (FileId, " - %s%s\n", NewTime, Prefix);
713 }
714 }
715 else
716 {
717 FlPrintFile (FileId, "\n");
718 }
719
720 switch (FileId)
721 {
722 case ASL_FILE_C_SOURCE_OUTPUT:
723 case ASL_FILE_C_OFFSET_OUTPUT:
724 case ASL_FILE_C_INCLUDE_OUTPUT:
725
726 FlPrintFile (FileId, " */\n");
727 break;
728
729 default:
730
731 /* Nothing to do for other output types */
732
733 break;
734 }
735 }
736
737
738 /*******************************************************************************
739 *
740 * FUNCTION: CmFlushSourceCode
741 *
742 * PARAMETERS: None
743 *
744 * RETURN: None
745 *
746 * DESCRIPTION: Read in any remaining source code after the parse tree
747 * has been constructed.
748 *
749 ******************************************************************************/
750
751 static void
CmFlushSourceCode(void)752 CmFlushSourceCode (
753 void)
754 {
755 char Buffer;
756
757
758 while (FlReadFile (ASL_FILE_INPUT, &Buffer, 1) != AE_ERROR)
759 {
760 AslInsertLineBuffer ((int) Buffer);
761 }
762
763 AslResetCurrentLineBuffer ();
764 }
765
766
767 /*******************************************************************************
768 *
769 * FUNCTION: CmDoOutputFiles
770 *
771 * PARAMETERS: None
772 *
773 * RETURN: None.
774 *
775 * DESCRIPTION: Create all "listing" type files
776 *
777 ******************************************************************************/
778
779 void
CmDoOutputFiles(void)780 CmDoOutputFiles (
781 void)
782 {
783
784 /* Create listings and hex files */
785
786 LsDoListings ();
787 HxDoHexOutput ();
788
789 /* Dump the namespace to the .nsp file if requested */
790
791 (void) NsDisplayNamespace ();
792
793 /* Dump the device mapping file */
794
795 MpEmitMappingInfo ();
796 }
797
798
799 /*******************************************************************************
800 *
801 * FUNCTION: CmDumpAllEvents
802 *
803 * PARAMETERS: None
804 *
805 * RETURN: None.
806 *
807 * DESCRIPTION: Dump all compiler events
808 *
809 ******************************************************************************/
810
811 static void
CmDumpAllEvents(void)812 CmDumpAllEvents (
813 void)
814 {
815 ASL_EVENT_INFO *Event;
816 UINT32 Delta;
817 UINT32 MicroSeconds;
818 UINT32 MilliSeconds;
819 UINT32 i;
820
821
822 Event = AslGbl_Events;
823
824 DbgPrint (ASL_DEBUG_OUTPUT, "\n\nElapsed time for major events\n\n");
825 if (AslGbl_CompileTimesFlag)
826 {
827 printf ("\nElapsed time for major events\n\n");
828 }
829
830 for (i = 0; i < AslGbl_NextEvent; i++)
831 {
832 if (Event->Valid)
833 {
834 /* Delta will be in 100-nanosecond units */
835
836 Delta = (UINT32) (Event->EndTime - Event->StartTime);
837
838 MicroSeconds = Delta / ACPI_100NSEC_PER_USEC;
839 MilliSeconds = Delta / ACPI_100NSEC_PER_MSEC;
840
841 /* Round milliseconds up */
842
843 if ((MicroSeconds - (MilliSeconds * ACPI_USEC_PER_MSEC)) >= 500)
844 {
845 MilliSeconds++;
846 }
847
848 DbgPrint (ASL_DEBUG_OUTPUT, "%8u usec %8u msec - %s\n",
849 MicroSeconds, MilliSeconds, Event->EventName);
850
851 if (AslGbl_CompileTimesFlag)
852 {
853 printf ("%8u usec %8u msec - %s\n",
854 MicroSeconds, MilliSeconds, Event->EventName);
855 }
856 }
857
858 Event++;
859 }
860 }
861
862
863 /*******************************************************************************
864 *
865 * FUNCTION: CmCleanupAndExit
866 *
867 * PARAMETERS: None
868 *
869 * RETURN: None.
870 *
871 * DESCRIPTION: Close all open files and exit the compiler
872 *
873 ******************************************************************************/
874
875 int
CmCleanupAndExit(void)876 CmCleanupAndExit (
877 void)
878 {
879 int Status = 0;
880 BOOLEAN DeleteAmlFile = FALSE;
881 ASL_GLOBAL_FILE_NODE *CurrentFileNode = AslGbl_FilesList;
882
883
884 /* Check if any errors occurred during compile */
885
886 (void) AslCheckForErrorExit ();
887
888 AePrintErrorLog (ASL_FILE_STDERR);
889 if (AslGbl_DebugFlag)
890 {
891 /* Print error summary to stdout also */
892
893 AePrintErrorLog (ASL_FILE_STDOUT);
894 }
895
896 /* Emit compile times if enabled */
897
898 CmDumpAllEvents ();
899
900 if (AslGbl_CompileTimesFlag)
901 {
902 printf ("\nMiscellaneous compile statistics\n\n");
903 printf ("%11u : %s\n", AslGbl_TotalParseNodes, "Parse nodes");
904 printf ("%11u : %s\n", AslGbl_NsLookupCount, "Namespace searches");
905 printf ("%11u : %s\n", AslGbl_TotalNamedObjects, "Named objects");
906 printf ("%11u : %s\n", AslGbl_TotalMethods, "Control methods");
907 printf ("%11u : %s\n", AslGbl_TotalAllocations, "Memory Allocations");
908 printf ("%11u : %s\n", AslGbl_TotalAllocated, "Total allocated memory");
909 printf ("%11u : %s\n", AslGbl_TotalFolds, "Constant subtrees folded");
910 printf ("\n");
911 }
912
913 if (AslGbl_NsLookupCount)
914 {
915 DbgPrint (ASL_DEBUG_OUTPUT,
916 "\n\nMiscellaneous compile statistics\n\n");
917
918 DbgPrint (ASL_DEBUG_OUTPUT,
919 "%32s : %u\n", "Total Namespace searches",
920 AslGbl_NsLookupCount);
921
922 DbgPrint (ASL_DEBUG_OUTPUT,
923 "%32s : %u usec\n", "Time per search", ((UINT32)
924 (AslGbl_Events[AslGbl_NamespaceEvent].EndTime -
925 AslGbl_Events[AslGbl_NamespaceEvent].StartTime) / 10) /
926 AslGbl_NsLookupCount);
927 }
928
929 if (AslGbl_ExceptionCount[ASL_ERROR] > ASL_MAX_ERROR_COUNT)
930 {
931 printf ("\nMaximum error count (%d) exceeded (aslcompile.c)\n",
932 ASL_MAX_ERROR_COUNT);
933 }
934
935 UtDisplaySummary (ASL_FILE_STDOUT);
936
937 /*
938 * Delete the AML file if there are errors and the force AML output option
939 * (-f) has not been used.
940 *
941 * Return -1 as a status of the compiler if no AML files are generated. If
942 * the AML file is generated in the presence of errors, return 0. In the
943 * latter case, the errors were ignored by the user so the compilation is
944 * considered successful.
945 */
946 if (AslGbl_ParserErrorDetected || AslGbl_PreprocessOnly ||
947 ((AslGbl_ExceptionCount[ASL_ERROR] > 0) &&
948 (!AslGbl_IgnoreErrors) &&
949 AslGbl_Files[ASL_FILE_AML_OUTPUT].Handle))
950 {
951 DeleteAmlFile = TRUE;
952 Status = -1;
953 }
954
955 /* Close all open files */
956
957 while (CurrentFileNode)
958 {
959 /*
960 * Set the program return status based on file errors. If there are any
961 * errors and during compilation, the command is not considered
962 * successful.
963 */
964 if (Status != -1 && !AslGbl_IgnoreErrors &&
965 CurrentFileNode->ParserErrorDetected)
966 {
967 Status = -1;
968 }
969
970 switch (FlSwitchFileSet (CurrentFileNode->Files[ASL_FILE_INPUT].Filename))
971 {
972 case SWITCH_TO_SAME_FILE:
973 case SWITCH_TO_DIFFERENT_FILE:
974
975 CmFinishFiles (DeleteAmlFile);
976 CurrentFileNode = CurrentFileNode->Next;
977 break;
978
979 case FILE_NOT_FOUND:
980 default:
981
982 CurrentFileNode = NULL;
983 break;
984 }
985 }
986
987 /* Final cleanup after compiling one file */
988
989 if (!AslGbl_DoAslConversion)
990 {
991 UtDeleteLocalCaches ();
992 }
993
994 return (Status);
995 }
996
997
998 /*******************************************************************************
999 *
1000 * FUNCTION: CmFinishFiles
1001 *
1002 * PARAMETERS: DeleteAmlFile
1003 *
1004 * RETURN: None.
1005 *
1006 * DESCRIPTION: Close all open files, delete AML files depending on the
1007 * function parameter is true.
1008 *
1009 ******************************************************************************/
1010
1011 static void
CmFinishFiles(BOOLEAN DeleteAmlFile)1012 CmFinishFiles(
1013 BOOLEAN DeleteAmlFile)
1014 {
1015 UINT32 i;
1016
1017
1018 /*
1019 * Take care with the preprocessor file (.pre), it might be the same
1020 * as the "input" file, depending on where the compiler has terminated
1021 * or aborted. Prevent attempt to close the same file twice in
1022 * loop below.
1023 */
1024 if (AslGbl_Files[ASL_FILE_PREPROCESSOR].Handle ==
1025 AslGbl_Files[ASL_FILE_INPUT].Handle)
1026 {
1027 AslGbl_Files[ASL_FILE_PREPROCESSOR].Handle = NULL;
1028 }
1029
1030 /* Close the standard I/O files */
1031
1032 for (i = ASL_FILE_INPUT; i < ASL_MAX_FILE_TYPE; i++)
1033 {
1034 /*
1035 * Some files such as debug output files could be pointing to
1036 * stderr or stdout. Leave these alone.
1037 */
1038 if (AslGbl_Files[i].Handle != stderr &&
1039 AslGbl_Files[i].Handle != stdout)
1040 {
1041 FlCloseFile (i);
1042 }
1043 }
1044
1045 /* Delete AML file if there are errors */
1046
1047 if (DeleteAmlFile)
1048 {
1049 FlDeleteFile (ASL_FILE_AML_OUTPUT);
1050 }
1051
1052 /* Delete the preprocessor temp file unless full debug was specified */
1053
1054 if (AslGbl_PreprocessFlag && !AslGbl_KeepPreprocessorTempFile)
1055 {
1056 FlDeleteFile (ASL_FILE_PREPROCESSOR);
1057 }
1058
1059 /*
1060 * Delete intermediate ("combined") source file (if -ls flag not set)
1061 * This file is created during normal ASL/AML compiles. It is not
1062 * created by the data table compiler.
1063 *
1064 * If the -ls flag is set, then the .SRC file should not be deleted.
1065 * In this case, Gbl_SourceOutputFlag is set to TRUE.
1066 *
1067 * Note: Handles are cleared by FlCloseFile above, so we look at the
1068 * filename instead, to determine if the .SRC file was actually
1069 * created.
1070 */
1071 if (!AslGbl_SourceOutputFlag)
1072 {
1073 FlDeleteFile (ASL_FILE_SOURCE_OUTPUT);
1074 }
1075 }
1076