xref: /illumos-gate/usr/src/cmd/acpi/iasl/aslfileio.c (revision 35786f68)
1bc36eafdSMike Gerdts /******************************************************************************
2bc36eafdSMike Gerdts  *
3bc36eafdSMike Gerdts  * Module Name: aslfileio - File I/O support
4bc36eafdSMike Gerdts  *
5bc36eafdSMike Gerdts  *****************************************************************************/
6bc36eafdSMike Gerdts 
7*35786f68SRobert Mustacchi /******************************************************************************
8*35786f68SRobert Mustacchi  *
9*35786f68SRobert Mustacchi  * 1. Copyright Notice
10*35786f68SRobert Mustacchi  *
11*35786f68SRobert Mustacchi  * Some or all of this work - Copyright (c) 1999 - 2018, Intel Corp.
12bc36eafdSMike Gerdts  * All rights reserved.
13bc36eafdSMike Gerdts  *
14*35786f68SRobert Mustacchi  * 2. License
15*35786f68SRobert Mustacchi  *
16*35786f68SRobert Mustacchi  * 2.1. This is your license from Intel Corp. under its intellectual property
17*35786f68SRobert Mustacchi  * rights. You may have additional license terms from the party that provided
18*35786f68SRobert Mustacchi  * you this software, covering your right to use that party's intellectual
19*35786f68SRobert Mustacchi  * property rights.
20*35786f68SRobert Mustacchi  *
21*35786f68SRobert Mustacchi  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
22*35786f68SRobert Mustacchi  * copy of the source code appearing in this file ("Covered Code") an
23*35786f68SRobert Mustacchi  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
24*35786f68SRobert Mustacchi  * base code distributed originally by Intel ("Original Intel Code") to copy,
25*35786f68SRobert Mustacchi  * make derivatives, distribute, use and display any portion of the Covered
26*35786f68SRobert Mustacchi  * Code in any form, with the right to sublicense such rights; and
27*35786f68SRobert Mustacchi  *
28*35786f68SRobert Mustacchi  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
29*35786f68SRobert Mustacchi  * license (with the right to sublicense), under only those claims of Intel
30*35786f68SRobert Mustacchi  * patents that are infringed by the Original Intel Code, to make, use, sell,
31*35786f68SRobert Mustacchi  * offer to sell, and import the Covered Code and derivative works thereof
32*35786f68SRobert Mustacchi  * solely to the minimum extent necessary to exercise the above copyright
33*35786f68SRobert Mustacchi  * license, and in no event shall the patent license extend to any additions
34*35786f68SRobert Mustacchi  * to or modifications of the Original Intel Code. No other license or right
35*35786f68SRobert Mustacchi  * is granted directly or by implication, estoppel or otherwise;
36*35786f68SRobert Mustacchi  *
37*35786f68SRobert Mustacchi  * The above copyright and patent license is granted only if the following
38*35786f68SRobert Mustacchi  * conditions are met:
39*35786f68SRobert Mustacchi  *
40*35786f68SRobert Mustacchi  * 3. Conditions
41*35786f68SRobert Mustacchi  *
42*35786f68SRobert Mustacchi  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
43*35786f68SRobert Mustacchi  * Redistribution of source code of any substantial portion of the Covered
44*35786f68SRobert Mustacchi  * Code or modification with rights to further distribute source must include
45*35786f68SRobert Mustacchi  * the above Copyright Notice, the above License, this list of Conditions,
46*35786f68SRobert Mustacchi  * and the following Disclaimer and Export Compliance provision. In addition,
47*35786f68SRobert Mustacchi  * Licensee must cause all Covered Code to which Licensee contributes to
48*35786f68SRobert Mustacchi  * contain a file documenting the changes Licensee made to create that Covered
49*35786f68SRobert Mustacchi  * Code and the date of any change. Licensee must include in that file the
50*35786f68SRobert Mustacchi  * documentation of any changes made by any predecessor Licensee. Licensee
51*35786f68SRobert Mustacchi  * must include a prominent statement that the modification is derived,
52*35786f68SRobert Mustacchi  * directly or indirectly, from Original Intel Code.
53*35786f68SRobert Mustacchi  *
54*35786f68SRobert Mustacchi  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
55*35786f68SRobert Mustacchi  * Redistribution of source code of any substantial portion of the Covered
56*35786f68SRobert Mustacchi  * Code or modification without rights to further distribute source must
57*35786f68SRobert Mustacchi  * include the following Disclaimer and Export Compliance provision in the
58*35786f68SRobert Mustacchi  * documentation and/or other materials provided with distribution. In
59*35786f68SRobert Mustacchi  * addition, Licensee may not authorize further sublicense of source of any
60*35786f68SRobert Mustacchi  * portion of the Covered Code, and must include terms to the effect that the
61*35786f68SRobert Mustacchi  * license from Licensee to its licensee is limited to the intellectual
62*35786f68SRobert Mustacchi  * property embodied in the software Licensee provides to its licensee, and
63*35786f68SRobert Mustacchi  * not to intellectual property embodied in modifications its licensee may
64*35786f68SRobert Mustacchi  * make.
65*35786f68SRobert Mustacchi  *
66*35786f68SRobert Mustacchi  * 3.3. Redistribution of Executable. Redistribution in executable form of any
67*35786f68SRobert Mustacchi  * substantial portion of the Covered Code or modification must reproduce the
68*35786f68SRobert Mustacchi  * above Copyright Notice, and the following Disclaimer and Export Compliance
69*35786f68SRobert Mustacchi  * provision in the documentation and/or other materials provided with the
70*35786f68SRobert Mustacchi  * distribution.
71*35786f68SRobert Mustacchi  *
72*35786f68SRobert Mustacchi  * 3.4. Intel retains all right, title, and interest in and to the Original
73*35786f68SRobert Mustacchi  * Intel Code.
74*35786f68SRobert Mustacchi  *
75*35786f68SRobert Mustacchi  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
76*35786f68SRobert Mustacchi  * Intel shall be used in advertising or otherwise to promote the sale, use or
77*35786f68SRobert Mustacchi  * other dealings in products derived from or relating to the Covered Code
78*35786f68SRobert Mustacchi  * without prior written authorization from Intel.
79*35786f68SRobert Mustacchi  *
80*35786f68SRobert Mustacchi  * 4. Disclaimer and Export Compliance
81*35786f68SRobert Mustacchi  *
82*35786f68SRobert Mustacchi  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
83*35786f68SRobert Mustacchi  * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
84*35786f68SRobert Mustacchi  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
85*35786f68SRobert Mustacchi  * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
86*35786f68SRobert Mustacchi  * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
87*35786f68SRobert Mustacchi  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
88*35786f68SRobert Mustacchi  * PARTICULAR PURPOSE.
89*35786f68SRobert Mustacchi  *
90*35786f68SRobert Mustacchi  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
91*35786f68SRobert Mustacchi  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
92*35786f68SRobert Mustacchi  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
93*35786f68SRobert Mustacchi  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
94*35786f68SRobert Mustacchi  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
95*35786f68SRobert Mustacchi  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
96*35786f68SRobert Mustacchi  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
97*35786f68SRobert Mustacchi  * LIMITED REMEDY.
98*35786f68SRobert Mustacchi  *
99*35786f68SRobert Mustacchi  * 4.3. Licensee shall not export, either directly or indirectly, any of this
100*35786f68SRobert Mustacchi  * software or system incorporating such software without first obtaining any
101*35786f68SRobert Mustacchi  * required license or other approval from the U. S. Department of Commerce or
102*35786f68SRobert Mustacchi  * any other agency or department of the United States Government. In the
103*35786f68SRobert Mustacchi  * event Licensee exports any such software from the United States or
104*35786f68SRobert Mustacchi  * re-exports any such software from a foreign destination, Licensee shall
105*35786f68SRobert Mustacchi  * ensure that the distribution and export/re-export of the software is in
106*35786f68SRobert Mustacchi  * compliance with all laws, regulations, orders, or other restrictions of the
107*35786f68SRobert Mustacchi  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
108*35786f68SRobert Mustacchi  * any of its subsidiaries will export/re-export any technical data, process,
109*35786f68SRobert Mustacchi  * software, or service, directly or indirectly, to any country for which the
110*35786f68SRobert Mustacchi  * United States government or any agency thereof requires an export license,
111*35786f68SRobert Mustacchi  * other governmental approval, or letter of assurance, without first obtaining
112*35786f68SRobert Mustacchi  * such license, approval or letter.
113*35786f68SRobert Mustacchi  *
114*35786f68SRobert Mustacchi  *****************************************************************************
115*35786f68SRobert Mustacchi  *
116*35786f68SRobert Mustacchi  * Alternatively, you may choose to be licensed under the terms of the
117*35786f68SRobert Mustacchi  * following license:
118*35786f68SRobert Mustacchi  *
119bc36eafdSMike Gerdts  * Redistribution and use in source and binary forms, with or without
120bc36eafdSMike Gerdts  * modification, are permitted provided that the following conditions
121bc36eafdSMike Gerdts  * are met:
122bc36eafdSMike Gerdts  * 1. Redistributions of source code must retain the above copyright
123bc36eafdSMike Gerdts  *    notice, this list of conditions, and the following disclaimer,
124bc36eafdSMike Gerdts  *    without modification.
125bc36eafdSMike Gerdts  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
126bc36eafdSMike Gerdts  *    substantially similar to the "NO WARRANTY" disclaimer below
127bc36eafdSMike Gerdts  *    ("Disclaimer") and any redistribution must be conditioned upon
128bc36eafdSMike Gerdts  *    including a substantially similar Disclaimer requirement for further
129bc36eafdSMike Gerdts  *    binary redistribution.
130bc36eafdSMike Gerdts  * 3. Neither the names of the above-listed copyright holders nor the names
131bc36eafdSMike Gerdts  *    of any contributors may be used to endorse or promote products derived
132bc36eafdSMike Gerdts  *    from this software without specific prior written permission.
133bc36eafdSMike Gerdts  *
134bc36eafdSMike Gerdts  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
135bc36eafdSMike Gerdts  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
136*35786f68SRobert Mustacchi  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
137bc36eafdSMike Gerdts  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
138*35786f68SRobert Mustacchi  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
139*35786f68SRobert Mustacchi  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
140*35786f68SRobert Mustacchi  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
141*35786f68SRobert Mustacchi  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
142*35786f68SRobert Mustacchi  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
143*35786f68SRobert Mustacchi  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
144*35786f68SRobert Mustacchi  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
145*35786f68SRobert Mustacchi  *
146*35786f68SRobert Mustacchi  * Alternatively, you may choose to be licensed under the terms of the
147*35786f68SRobert Mustacchi  * GNU General Public License ("GPL") version 2 as published by the Free
148*35786f68SRobert Mustacchi  * Software Foundation.
149*35786f68SRobert Mustacchi  *
150*35786f68SRobert Mustacchi  *****************************************************************************/
151bc36eafdSMike Gerdts 
152bc36eafdSMike Gerdts #include "aslcompiler.h"
153bc36eafdSMike Gerdts #include "acapps.h"
154bc36eafdSMike Gerdts 
155bc36eafdSMike Gerdts #define _COMPONENT          ACPI_COMPILER
156bc36eafdSMike Gerdts         ACPI_MODULE_NAME    ("aslfileio")
157bc36eafdSMike Gerdts 
158bc36eafdSMike Gerdts 
159bc36eafdSMike Gerdts /*******************************************************************************
160bc36eafdSMike Gerdts  *
161bc36eafdSMike Gerdts  * FUNCTION:    FlFileError
162bc36eafdSMike Gerdts  *
163bc36eafdSMike Gerdts  * PARAMETERS:  FileId              - Index into file info array
164bc36eafdSMike Gerdts  *              ErrorId             - Index into error message array
165bc36eafdSMike Gerdts  *
166bc36eafdSMike Gerdts  * RETURN:      None
167bc36eafdSMike Gerdts  *
168bc36eafdSMike Gerdts  * DESCRIPTION: Decode errno to an error message and add the entire error
169bc36eafdSMike Gerdts  *              to the error log.
170bc36eafdSMike Gerdts  *
171bc36eafdSMike Gerdts  ******************************************************************************/
172bc36eafdSMike Gerdts 
173bc36eafdSMike Gerdts void
FlFileError(UINT32 FileId,UINT8 ErrorId)174bc36eafdSMike Gerdts FlFileError (
175bc36eafdSMike Gerdts     UINT32                  FileId,
176bc36eafdSMike Gerdts     UINT8                   ErrorId)
177bc36eafdSMike Gerdts {
178bc36eafdSMike Gerdts 
179bc36eafdSMike Gerdts     sprintf (MsgBuffer, "\"%s\" (%s) - %s", Gbl_Files[FileId].Filename,
180bc36eafdSMike Gerdts         Gbl_Files[FileId].Description, strerror (errno));
181bc36eafdSMike Gerdts 
182bc36eafdSMike Gerdts     AslCommonError (ASL_ERROR, ErrorId, 0, 0, 0, 0, NULL, MsgBuffer);
183bc36eafdSMike Gerdts }
184bc36eafdSMike Gerdts 
185bc36eafdSMike Gerdts 
186bc36eafdSMike Gerdts /*******************************************************************************
187bc36eafdSMike Gerdts  *
188bc36eafdSMike Gerdts  * FUNCTION:    FlOpenFile
189bc36eafdSMike Gerdts  *
190bc36eafdSMike Gerdts  * PARAMETERS:  FileId              - Index into file info array
191bc36eafdSMike Gerdts  *              Filename            - file pathname to open
192bc36eafdSMike Gerdts  *              Mode                - Open mode for fopen
193bc36eafdSMike Gerdts  *
194bc36eafdSMike Gerdts  * RETURN:      None
195bc36eafdSMike Gerdts  *
196bc36eafdSMike Gerdts  * DESCRIPTION: Open a file.
197bc36eafdSMike Gerdts  *              NOTE: Aborts compiler on any error.
198bc36eafdSMike Gerdts  *
199bc36eafdSMike Gerdts  ******************************************************************************/
200bc36eafdSMike Gerdts 
201bc36eafdSMike Gerdts void
FlOpenFile(UINT32 FileId,char * Filename,char * Mode)202bc36eafdSMike Gerdts FlOpenFile (
203bc36eafdSMike Gerdts     UINT32                  FileId,
204bc36eafdSMike Gerdts     char                    *Filename,
205bc36eafdSMike Gerdts     char                    *Mode)
206bc36eafdSMike Gerdts {
207bc36eafdSMike Gerdts     FILE                    *File;
208bc36eafdSMike Gerdts 
209bc36eafdSMike Gerdts 
210bc36eafdSMike Gerdts     Gbl_Files[FileId].Filename = Filename;
211bc36eafdSMike Gerdts     Gbl_Files[FileId].Handle = NULL;
212bc36eafdSMike Gerdts 
213bc36eafdSMike Gerdts     File = fopen (Filename, Mode);
214bc36eafdSMike Gerdts     if (!File)
215bc36eafdSMike Gerdts     {
216bc36eafdSMike Gerdts         FlFileError (FileId, ASL_MSG_OPEN);
217bc36eafdSMike Gerdts         AslAbort ();
218bc36eafdSMike Gerdts     }
219bc36eafdSMike Gerdts 
220bc36eafdSMike Gerdts     Gbl_Files[FileId].Handle = File;
221bc36eafdSMike Gerdts }
222bc36eafdSMike Gerdts 
223bc36eafdSMike Gerdts 
224bc36eafdSMike Gerdts /*******************************************************************************
225bc36eafdSMike Gerdts  *
226bc36eafdSMike Gerdts  * FUNCTION:    FlGetFileSize
227bc36eafdSMike Gerdts  *
228bc36eafdSMike Gerdts  * PARAMETERS:  FileId              - Index into file info array
229bc36eafdSMike Gerdts  *
230bc36eafdSMike Gerdts  * RETURN:      File Size
231bc36eafdSMike Gerdts  *
232bc36eafdSMike Gerdts  * DESCRIPTION: Get current file size. Uses common seek-to-EOF function.
233bc36eafdSMike Gerdts  *              File must be open. Aborts compiler on error.
234bc36eafdSMike Gerdts  *
235bc36eafdSMike Gerdts  ******************************************************************************/
236bc36eafdSMike Gerdts 
237bc36eafdSMike Gerdts UINT32
FlGetFileSize(UINT32 FileId)238bc36eafdSMike Gerdts FlGetFileSize (
239bc36eafdSMike Gerdts     UINT32                  FileId)
240bc36eafdSMike Gerdts {
241bc36eafdSMike Gerdts     UINT32                  FileSize;
242bc36eafdSMike Gerdts 
243bc36eafdSMike Gerdts 
244bc36eafdSMike Gerdts     FileSize = CmGetFileSize (Gbl_Files[FileId].Handle);
245bc36eafdSMike Gerdts     if (FileSize == ACPI_UINT32_MAX)
246bc36eafdSMike Gerdts     {
247bc36eafdSMike Gerdts         AslAbort();
248bc36eafdSMike Gerdts     }
249bc36eafdSMike Gerdts 
250bc36eafdSMike Gerdts     return (FileSize);
251bc36eafdSMike Gerdts }
252bc36eafdSMike Gerdts 
253bc36eafdSMike Gerdts 
254bc36eafdSMike Gerdts /*******************************************************************************
255bc36eafdSMike Gerdts  *
256bc36eafdSMike Gerdts  * FUNCTION:    FlReadFile
257bc36eafdSMike Gerdts  *
258bc36eafdSMike Gerdts  * PARAMETERS:  FileId              - Index into file info array
259bc36eafdSMike Gerdts  *              Buffer              - Where to place the data
260bc36eafdSMike Gerdts  *              Length              - Amount to read
261bc36eafdSMike Gerdts  *
262bc36eafdSMike Gerdts  * RETURN:      Status. AE_ERROR indicates EOF.
263bc36eafdSMike Gerdts  *
264bc36eafdSMike Gerdts  * DESCRIPTION: Read data from an open file.
265bc36eafdSMike Gerdts  *              NOTE: Aborts compiler on any error.
266bc36eafdSMike Gerdts  *
267bc36eafdSMike Gerdts  ******************************************************************************/
268bc36eafdSMike Gerdts 
269bc36eafdSMike Gerdts ACPI_STATUS
FlReadFile(UINT32 FileId,void * Buffer,UINT32 Length)270bc36eafdSMike Gerdts FlReadFile (
271bc36eafdSMike Gerdts     UINT32                  FileId,
272bc36eafdSMike Gerdts     void                    *Buffer,
273bc36eafdSMike Gerdts     UINT32                  Length)
274bc36eafdSMike Gerdts {
275bc36eafdSMike Gerdts     UINT32                  Actual;
276bc36eafdSMike Gerdts 
277bc36eafdSMike Gerdts 
278bc36eafdSMike Gerdts     /* Read and check for error */
279bc36eafdSMike Gerdts 
280bc36eafdSMike Gerdts     Actual = fread (Buffer, 1, Length, Gbl_Files[FileId].Handle);
281bc36eafdSMike Gerdts     if (Actual < Length)
282bc36eafdSMike Gerdts     {
283bc36eafdSMike Gerdts         if (feof (Gbl_Files[FileId].Handle))
284bc36eafdSMike Gerdts         {
285bc36eafdSMike Gerdts             /* End-of-file, just return error */
286bc36eafdSMike Gerdts 
287bc36eafdSMike Gerdts             return (AE_ERROR);
288bc36eafdSMike Gerdts         }
289bc36eafdSMike Gerdts 
290bc36eafdSMike Gerdts         FlFileError (FileId, ASL_MSG_READ);
291bc36eafdSMike Gerdts         AslAbort ();
292bc36eafdSMike Gerdts     }
293bc36eafdSMike Gerdts 
294bc36eafdSMike Gerdts     return (AE_OK);
295bc36eafdSMike Gerdts }
296bc36eafdSMike Gerdts 
297bc36eafdSMike Gerdts 
298bc36eafdSMike Gerdts /*******************************************************************************
299bc36eafdSMike Gerdts  *
300bc36eafdSMike Gerdts  * FUNCTION:    FlWriteFile
301bc36eafdSMike Gerdts  *
302bc36eafdSMike Gerdts  * PARAMETERS:  FileId              - Index into file info array
303bc36eafdSMike Gerdts  *              Buffer              - Data to write
304bc36eafdSMike Gerdts  *              Length              - Amount of data to write
305bc36eafdSMike Gerdts  *
306bc36eafdSMike Gerdts  * RETURN:      None
307bc36eafdSMike Gerdts  *
308bc36eafdSMike Gerdts  * DESCRIPTION: Write data to an open file.
309bc36eafdSMike Gerdts  *              NOTE: Aborts compiler on any error.
310bc36eafdSMike Gerdts  *
311bc36eafdSMike Gerdts  ******************************************************************************/
312bc36eafdSMike Gerdts 
313bc36eafdSMike Gerdts void
FlWriteFile(UINT32 FileId,void * Buffer,UINT32 Length)314bc36eafdSMike Gerdts FlWriteFile (
315bc36eafdSMike Gerdts     UINT32                  FileId,
316bc36eafdSMike Gerdts     void                    *Buffer,
317bc36eafdSMike Gerdts     UINT32                  Length)
318bc36eafdSMike Gerdts {
319bc36eafdSMike Gerdts     UINT32                  Actual;
320bc36eafdSMike Gerdts 
321bc36eafdSMike Gerdts 
322bc36eafdSMike Gerdts     /* Write and check for error */
323bc36eafdSMike Gerdts 
324bc36eafdSMike Gerdts     Actual = fwrite ((char *) Buffer, 1, Length, Gbl_Files[FileId].Handle);
325bc36eafdSMike Gerdts     if (Actual != Length)
326bc36eafdSMike Gerdts     {
327bc36eafdSMike Gerdts         FlFileError (FileId, ASL_MSG_WRITE);
328bc36eafdSMike Gerdts         AslAbort ();
329bc36eafdSMike Gerdts     }
330bc36eafdSMike Gerdts 
331bc36eafdSMike Gerdts     if ((FileId == ASL_FILE_PREPROCESSOR) && Gbl_PreprocessorOutputFlag)
332bc36eafdSMike Gerdts     {
333bc36eafdSMike Gerdts         /* Duplicate the output to the user preprocessor (.i) file */
334bc36eafdSMike Gerdts 
335bc36eafdSMike Gerdts         Actual = fwrite ((char *) Buffer, 1, Length,
336bc36eafdSMike Gerdts             Gbl_Files[ASL_FILE_PREPROCESSOR_USER].Handle);
337bc36eafdSMike Gerdts         if (Actual != Length)
338bc36eafdSMike Gerdts         {
339bc36eafdSMike Gerdts             FlFileError (FileId, ASL_MSG_WRITE);
340bc36eafdSMike Gerdts             AslAbort ();
341bc36eafdSMike Gerdts         }
342bc36eafdSMike Gerdts     }
343bc36eafdSMike Gerdts }
344bc36eafdSMike Gerdts 
345bc36eafdSMike Gerdts 
346bc36eafdSMike Gerdts /*******************************************************************************
347bc36eafdSMike Gerdts  *
348bc36eafdSMike Gerdts  * FUNCTION:    FlPrintFile
349bc36eafdSMike Gerdts  *
350bc36eafdSMike Gerdts  * PARAMETERS:  FileId              - Index into file info array
351bc36eafdSMike Gerdts  *              Format              - Printf format string
352bc36eafdSMike Gerdts  *              ...                 - Printf arguments
353bc36eafdSMike Gerdts  *
354bc36eafdSMike Gerdts  * RETURN:      None
355bc36eafdSMike Gerdts  *
356bc36eafdSMike Gerdts  * DESCRIPTION: Formatted write to an open file.
357bc36eafdSMike Gerdts  *              NOTE: Aborts compiler on any error.
358bc36eafdSMike Gerdts  *
359bc36eafdSMike Gerdts  ******************************************************************************/
360bc36eafdSMike Gerdts 
361bc36eafdSMike Gerdts void
FlPrintFile(UINT32 FileId,char * Format,...)362bc36eafdSMike Gerdts FlPrintFile (
363bc36eafdSMike Gerdts     UINT32                  FileId,
364bc36eafdSMike Gerdts     char                    *Format,
365bc36eafdSMike Gerdts     ...)
366bc36eafdSMike Gerdts {
367bc36eafdSMike Gerdts     INT32                   Actual;
368bc36eafdSMike Gerdts     va_list                 Args;
369bc36eafdSMike Gerdts 
370bc36eafdSMike Gerdts 
371bc36eafdSMike Gerdts     va_start (Args, Format);
372bc36eafdSMike Gerdts     Actual = vfprintf (Gbl_Files[FileId].Handle, Format, Args);
373bc36eafdSMike Gerdts     va_end (Args);
374bc36eafdSMike Gerdts 
375bc36eafdSMike Gerdts     if (Actual == -1)
376bc36eafdSMike Gerdts     {
377bc36eafdSMike Gerdts         FlFileError (FileId, ASL_MSG_WRITE);
378bc36eafdSMike Gerdts         AslAbort ();
379bc36eafdSMike Gerdts     }
380bc36eafdSMike Gerdts 
381bc36eafdSMike Gerdts     if ((FileId == ASL_FILE_PREPROCESSOR) &&
382bc36eafdSMike Gerdts         Gbl_PreprocessorOutputFlag)
383bc36eafdSMike Gerdts     {
384bc36eafdSMike Gerdts         /*
385bc36eafdSMike Gerdts          * Duplicate the output to the user preprocessor (.i) file,
386bc36eafdSMike Gerdts          * except: no #line directives.
387bc36eafdSMike Gerdts          */
388bc36eafdSMike Gerdts         if (!strncmp (Format, "#line", 5))
389bc36eafdSMike Gerdts         {
390bc36eafdSMike Gerdts             return;
391bc36eafdSMike Gerdts         }
392bc36eafdSMike Gerdts 
393bc36eafdSMike Gerdts         va_start (Args, Format);
394bc36eafdSMike Gerdts         Actual = vfprintf (Gbl_Files[ASL_FILE_PREPROCESSOR_USER].Handle,
395bc36eafdSMike Gerdts             Format, Args);
396bc36eafdSMike Gerdts         va_end (Args);
397bc36eafdSMike Gerdts 
398bc36eafdSMike Gerdts         if (Actual == -1)
399bc36eafdSMike Gerdts         {
400bc36eafdSMike Gerdts             FlFileError (FileId, ASL_MSG_WRITE);
401bc36eafdSMike Gerdts             AslAbort ();
402bc36eafdSMike Gerdts         }
403bc36eafdSMike Gerdts     }
404bc36eafdSMike Gerdts }
405bc36eafdSMike Gerdts 
406bc36eafdSMike Gerdts 
407bc36eafdSMike Gerdts /*******************************************************************************
408bc36eafdSMike Gerdts  *
409bc36eafdSMike Gerdts  * FUNCTION:    FlSeekFile
410bc36eafdSMike Gerdts  *
411bc36eafdSMike Gerdts  * PARAMETERS:  FileId              - Index into file info array
412bc36eafdSMike Gerdts  *              Offset              - Absolute byte offset in file
413bc36eafdSMike Gerdts  *
414bc36eafdSMike Gerdts  * RETURN:      None
415bc36eafdSMike Gerdts  *
416bc36eafdSMike Gerdts  * DESCRIPTION: Seek to absolute offset.
417bc36eafdSMike Gerdts  *              NOTE: Aborts compiler on any error.
418bc36eafdSMike Gerdts  *
419bc36eafdSMike Gerdts  ******************************************************************************/
420bc36eafdSMike Gerdts 
421bc36eafdSMike Gerdts void
FlSeekFile(UINT32 FileId,long Offset)422bc36eafdSMike Gerdts FlSeekFile (
423bc36eafdSMike Gerdts     UINT32                  FileId,
424bc36eafdSMike Gerdts     long                    Offset)
425bc36eafdSMike Gerdts {
426bc36eafdSMike Gerdts     int                     Error;
427bc36eafdSMike Gerdts 
428bc36eafdSMike Gerdts 
429bc36eafdSMike Gerdts     Error = fseek (Gbl_Files[FileId].Handle, Offset, SEEK_SET);
430bc36eafdSMike Gerdts     if (Error)
431bc36eafdSMike Gerdts     {
432bc36eafdSMike Gerdts         FlFileError (FileId, ASL_MSG_SEEK);
433bc36eafdSMike Gerdts         AslAbort ();
434bc36eafdSMike Gerdts     }
435bc36eafdSMike Gerdts }
436bc36eafdSMike Gerdts 
437bc36eafdSMike Gerdts 
438bc36eafdSMike Gerdts /*******************************************************************************
439bc36eafdSMike Gerdts  *
440bc36eafdSMike Gerdts  * FUNCTION:    FlCloseFile
441bc36eafdSMike Gerdts  *
442bc36eafdSMike Gerdts  * PARAMETERS:  FileId              - Index into file info array
443bc36eafdSMike Gerdts  *
444bc36eafdSMike Gerdts  * RETURN:      None
445bc36eafdSMike Gerdts  *
446bc36eafdSMike Gerdts  * DESCRIPTION: Close an open file. Aborts compiler on error
447bc36eafdSMike Gerdts  *
448bc36eafdSMike Gerdts  ******************************************************************************/
449bc36eafdSMike Gerdts 
450bc36eafdSMike Gerdts void
FlCloseFile(UINT32 FileId)451bc36eafdSMike Gerdts FlCloseFile (
452bc36eafdSMike Gerdts     UINT32                  FileId)
453bc36eafdSMike Gerdts {
454bc36eafdSMike Gerdts     int                     Error;
455bc36eafdSMike Gerdts 
456bc36eafdSMike Gerdts 
457bc36eafdSMike Gerdts     if (!Gbl_Files[FileId].Handle)
458bc36eafdSMike Gerdts     {
459bc36eafdSMike Gerdts         return;
460bc36eafdSMike Gerdts     }
461bc36eafdSMike Gerdts 
462bc36eafdSMike Gerdts     Error = fclose (Gbl_Files[FileId].Handle);
463bc36eafdSMike Gerdts     if (Error)
464bc36eafdSMike Gerdts     {
465bc36eafdSMike Gerdts         FlFileError (FileId, ASL_MSG_CLOSE);
466bc36eafdSMike Gerdts         AslAbort ();
467bc36eafdSMike Gerdts     }
468bc36eafdSMike Gerdts 
469bc36eafdSMike Gerdts     /* Do not clear/free the filename string */
470bc36eafdSMike Gerdts 
471bc36eafdSMike Gerdts     Gbl_Files[FileId].Handle = NULL;
472bc36eafdSMike Gerdts     return;
473bc36eafdSMike Gerdts }
474bc36eafdSMike Gerdts 
475bc36eafdSMike Gerdts 
476bc36eafdSMike Gerdts /*******************************************************************************
477bc36eafdSMike Gerdts  *
478bc36eafdSMike Gerdts  * FUNCTION:    FlDeleteFile
479bc36eafdSMike Gerdts  *
480bc36eafdSMike Gerdts  * PARAMETERS:  FileId              - Index into file info array
481bc36eafdSMike Gerdts  *
482bc36eafdSMike Gerdts  * RETURN:      None
483bc36eafdSMike Gerdts  *
484bc36eafdSMike Gerdts  * DESCRIPTION: Delete a file.
485bc36eafdSMike Gerdts  *
486bc36eafdSMike Gerdts  ******************************************************************************/
487bc36eafdSMike Gerdts 
488bc36eafdSMike Gerdts void
FlDeleteFile(UINT32 FileId)489bc36eafdSMike Gerdts FlDeleteFile (
490bc36eafdSMike Gerdts     UINT32                  FileId)
491bc36eafdSMike Gerdts {
492bc36eafdSMike Gerdts     ASL_FILE_INFO           *Info = &Gbl_Files[FileId];
493bc36eafdSMike Gerdts 
494bc36eafdSMike Gerdts 
495bc36eafdSMike Gerdts     if (!Info->Filename)
496bc36eafdSMike Gerdts     {
497bc36eafdSMike Gerdts         return;
498bc36eafdSMike Gerdts     }
499bc36eafdSMike Gerdts 
500bc36eafdSMike Gerdts     if (remove (Info->Filename))
501bc36eafdSMike Gerdts     {
502bc36eafdSMike Gerdts         printf ("%s (%s file) ",
503bc36eafdSMike Gerdts             Info->Filename, Info->Description);
504bc36eafdSMike Gerdts         perror ("Could not delete");
505bc36eafdSMike Gerdts     }
506bc36eafdSMike Gerdts 
507bc36eafdSMike Gerdts     Info->Filename = NULL;
508bc36eafdSMike Gerdts     return;
509bc36eafdSMike Gerdts }
510