xref: /freebsd/sys/contrib/dev/acpica/common/adfile.c (revision f4b37ed0f8b307b1f3f0f630ca725d68f1dff30d)
1 /******************************************************************************
2  *
3  * Module Name: adfile - Application-level disassembler file support routines
4  *
5  *****************************************************************************/
6 
7 /*
8  * Copyright (C) 2000 - 2015, Intel Corp.
9  * All rights reserved.
10  *
11  * Redistribution and use in source and binary forms, with or without
12  * modification, are permitted provided that the following conditions
13  * are met:
14  * 1. Redistributions of source code must retain the above copyright
15  *    notice, this list of conditions, and the following disclaimer,
16  *    without modification.
17  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
18  *    substantially similar to the "NO WARRANTY" disclaimer below
19  *    ("Disclaimer") and any redistribution must be conditioned upon
20  *    including a substantially similar Disclaimer requirement for further
21  *    binary redistribution.
22  * 3. Neither the names of the above-listed copyright holders nor the names
23  *    of any contributors may be used to endorse or promote products derived
24  *    from this software without specific prior written permission.
25  *
26  * Alternatively, this software may be distributed under the terms of the
27  * GNU General Public License ("GPL") version 2 as published by the Free
28  * Software Foundation.
29  *
30  * NO WARRANTY
31  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
32  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
33  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
34  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
35  * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
36  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
37  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
38  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
39  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
40  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
41  * POSSIBILITY OF SUCH DAMAGES.
42  */
43 
44 #include <contrib/dev/acpica/compiler/aslcompiler.h>
45 #include <contrib/dev/acpica/include/acpi.h>
46 #include <contrib/dev/acpica/include/accommon.h>
47 #include <contrib/dev/acpica/include/acapps.h>
48 
49 #include <stdio.h>
50 
51 
52 #define _COMPONENT          ACPI_TOOLS
53         ACPI_MODULE_NAME    ("adfile")
54 
55 /* Local prototypes */
56 
57 static INT32
58 AdWriteBuffer (
59     char                    *Filename,
60     char                    *Buffer,
61     UINT32                  Length);
62 
63 static char                 FilenameBuf[20];
64 
65 
66 /******************************************************************************
67  *
68  * FUNCTION:    AfGenerateFilename
69  *
70  * PARAMETERS:  Prefix              - prefix string
71  *              TableId             - The table ID
72  *
73  * RETURN:      Pointer to the completed string
74  *
75  * DESCRIPTION: Build an output filename from an ACPI table ID string
76  *
77  ******************************************************************************/
78 
79 char *
80 AdGenerateFilename (
81     char                    *Prefix,
82     char                    *TableId)
83 {
84     UINT32                  i;
85     UINT32                  j;
86 
87 
88     for (i = 0; Prefix[i]; i++)
89     {
90         FilenameBuf[i] = Prefix[i];
91     }
92 
93     FilenameBuf[i] = '_';
94     i++;
95 
96     for (j = 0; j < 8 && (TableId[j] != ' ') && (TableId[j] != 0); i++, j++)
97     {
98         FilenameBuf[i] = TableId[j];
99     }
100 
101     FilenameBuf[i] = 0;
102     strcat (FilenameBuf, ACPI_TABLE_FILE_SUFFIX);
103     return (FilenameBuf);
104 }
105 
106 
107 /******************************************************************************
108  *
109  * FUNCTION:    AfWriteBuffer
110  *
111  * PARAMETERS:  Filename            - name of file
112  *              Buffer              - data to write
113  *              Length              - length of data
114  *
115  * RETURN:      Actual number of bytes written
116  *
117  * DESCRIPTION: Open a file and write out a single buffer
118  *
119  ******************************************************************************/
120 
121 static INT32
122 AdWriteBuffer (
123     char                    *Filename,
124     char                    *Buffer,
125     UINT32                  Length)
126 {
127     FILE                    *File;
128     ACPI_SIZE               Actual;
129 
130 
131     File = fopen (Filename, "wb");
132     if (!File)
133     {
134         printf ("Could not open file %s\n", Filename);
135         return (-1);
136     }
137 
138     Actual = fwrite (Buffer, 1, (size_t) Length, File);
139     if (Actual != Length)
140     {
141         printf ("Could not write to file %s\n", Filename);
142     }
143 
144     fclose (File);
145     return ((INT32) Actual);
146 }
147 
148 
149 /******************************************************************************
150  *
151  * FUNCTION:    AfWriteTable
152  *
153  * PARAMETERS:  Table               - pointer to the ACPI table
154  *              Length              - length of the table
155  *              TableName           - the table signature
156  *              OemTableID          - from the table header
157  *
158  * RETURN:      None
159  *
160  * DESCRIPTION: Dump the loaded tables to a file (or files)
161  *
162  ******************************************************************************/
163 
164 void
165 AdWriteTable (
166     ACPI_TABLE_HEADER       *Table,
167     UINT32                  Length,
168     char                    *TableName,
169     char                    *OemTableId)
170 {
171     char                    *Filename;
172 
173 
174     Filename = AdGenerateFilename (TableName, OemTableId);
175     AdWriteBuffer (Filename, (char *) Table, Length);
176 
177     AcpiOsPrintf ("Table [%s] written to \"%s\"\n", TableName, Filename);
178 }
179 
180 
181 /*******************************************************************************
182  *
183  * FUNCTION:    FlGenerateFilename
184  *
185  * PARAMETERS:  InputFilename       - Original ASL source filename
186  *              Suffix              - New extension.
187  *
188  * RETURN:      New filename containing the original base + the new suffix
189  *
190  * DESCRIPTION: Generate a new filename from the ASL source filename and a new
191  *              extension. Used to create the *.LST, *.TXT, etc. files.
192  *
193  ******************************************************************************/
194 
195 char *
196 FlGenerateFilename (
197     char                    *InputFilename,
198     char                    *Suffix)
199 {
200     char                    *Position;
201     char                    *NewFilename;
202     char                    *DirectoryPosition;
203 
204 
205     /*
206      * Copy the original filename to a new buffer. Leave room for the worst
207      * case where we append the suffix, an added dot and the null terminator.
208      */
209     NewFilename = UtStringCacheCalloc ((ACPI_SIZE)
210         strlen (InputFilename) + strlen (Suffix) + 2);
211     if (!NewFilename)
212     {
213         return (NULL);
214     }
215 
216     strcpy (NewFilename, InputFilename);
217 
218     /* Try to find the last dot in the filename */
219 
220     DirectoryPosition = strrchr (NewFilename, '/');
221     Position = strrchr (NewFilename, '.');
222 
223     if (Position && (Position > DirectoryPosition))
224     {
225         /* Tack on the new suffix */
226 
227         Position++;
228         *Position = 0;
229         strcat (Position, Suffix);
230     }
231     else
232     {
233         /* No dot, add one and then the suffix */
234 
235         strcat (NewFilename, ".");
236         strcat (NewFilename, Suffix);
237     }
238 
239     return (NewFilename);
240 }
241 
242 
243 /*******************************************************************************
244  *
245  * FUNCTION:    FlStrdup
246  *
247  * DESCRIPTION: Local strdup function
248  *
249  ******************************************************************************/
250 
251 static char *
252 FlStrdup (
253     char                *String)
254 {
255     char                *NewString;
256 
257 
258     NewString = UtStringCacheCalloc ((ACPI_SIZE) strlen (String) + 1);
259     if (!NewString)
260     {
261         return (NULL);
262     }
263 
264     strcpy (NewString, String);
265     return (NewString);
266 }
267 
268 
269 /*******************************************************************************
270  *
271  * FUNCTION:    FlSplitInputPathname
272  *
273  * PARAMETERS:  InputFilename       - The user-specified ASL source file to be
274  *                                    compiled
275  *              OutDirectoryPath    - Where the directory path prefix is
276  *                                    returned
277  *              OutFilename         - Where the filename part is returned
278  *
279  * RETURN:      Status
280  *
281  * DESCRIPTION: Split the input path into a directory and filename part
282  *              1) Directory part used to open include files
283  *              2) Filename part used to generate output filenames
284  *
285  ******************************************************************************/
286 
287 ACPI_STATUS
288 FlSplitInputPathname (
289     char                    *InputPath,
290     char                    **OutDirectoryPath,
291     char                    **OutFilename)
292 {
293     char                    *Substring;
294     char                    *DirectoryPath;
295     char                    *Filename;
296 
297 
298     if (OutDirectoryPath)
299     {
300         *OutDirectoryPath = NULL;
301     }
302 
303     if (!InputPath)
304     {
305         return (AE_OK);
306     }
307 
308     /* Get the path to the input filename's directory */
309 
310     DirectoryPath = FlStrdup (InputPath);
311     if (!DirectoryPath)
312     {
313         return (AE_NO_MEMORY);
314     }
315 
316     /* Convert backslashes to slashes in the entire path */
317 
318     UtConvertBackslashes (DirectoryPath);
319 
320     /* Backup to last slash or colon */
321 
322     Substring = strrchr (DirectoryPath, '/');
323     if (!Substring)
324     {
325         Substring = strrchr (DirectoryPath, ':');
326     }
327 
328     /* Extract the simple filename */
329 
330     if (!Substring)
331     {
332         Filename = FlStrdup (DirectoryPath);
333         DirectoryPath[0] = 0;
334     }
335     else
336     {
337         Filename = FlStrdup (Substring + 1);
338         *(Substring+1) = 0;
339     }
340 
341     if (!Filename)
342     {
343         return (AE_NO_MEMORY);
344     }
345 
346     if (OutDirectoryPath)
347     {
348         *OutDirectoryPath = DirectoryPath;
349     }
350 
351     if (OutFilename)
352     {
353         *OutFilename = Filename;
354         return (AE_OK);
355     }
356 
357     return (AE_OK);
358 }
359