kernel: Sync ACPICA with Intel's version 20140627.
[dragonfly.git] / sys / contrib / dev / acpica / source / components / utilities / utfileio.c
1 /*******************************************************************************
2  *
3  * Module Name: utfileio - simple file I/O routines
4  *
5  ******************************************************************************/
6
7 /*
8  * Copyright (C) 2000 - 2014, 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
45 #include "acpi.h"
46 #include "accommon.h"
47 #include "actables.h"
48 #include "acapps.h"
49
50 #ifdef ACPI_ASL_COMPILER
51 #include "aslcompiler.h"
52 #endif
53
54
55 #define _COMPONENT          ACPI_CA_DEBUGGER
56         ACPI_MODULE_NAME    ("utfileio")
57
58
59 #ifdef ACPI_APPLICATION
60
61 /* Local prototypes */
62
63 static ACPI_STATUS
64 AcpiUtCheckTextModeCorruption (
65     UINT8                   *Table,
66     UINT32                  TableLength,
67     UINT32                  FileLength);
68
69 static ACPI_STATUS
70 AcpiUtReadTable (
71     FILE                    *fp,
72     ACPI_TABLE_HEADER       **Table,
73     UINT32                  *TableLength);
74
75
76 /*******************************************************************************
77  *
78  * FUNCTION:    AcpiUtCheckTextModeCorruption
79  *
80  * PARAMETERS:  Table           - Table buffer
81  *              TableLength     - Length of table from the table header
82  *              FileLength      - Length of the file that contains the table
83  *
84  * RETURN:      Status
85  *
86  * DESCRIPTION: Check table for text mode file corruption where all linefeed
87  *              characters (LF) have been replaced by carriage return linefeed
88  *              pairs (CR/LF).
89  *
90  ******************************************************************************/
91
92 static ACPI_STATUS
93 AcpiUtCheckTextModeCorruption (
94     UINT8                   *Table,
95     UINT32                  TableLength,
96     UINT32                  FileLength)
97 {
98     UINT32                  i;
99     UINT32                  Pairs = 0;
100
101
102     if (TableLength != FileLength)
103     {
104         ACPI_WARNING ((AE_INFO,
105             "File length (0x%X) is not the same as the table length (0x%X)",
106             FileLength, TableLength));
107     }
108
109     /* Scan entire table to determine if each LF has been prefixed with a CR */
110
111     for (i = 1; i < FileLength; i++)
112     {
113         if (Table[i] == 0x0A)
114         {
115             if (Table[i - 1] != 0x0D)
116             {
117                 /* The LF does not have a preceding CR, table not corrupted */
118
119                 return (AE_OK);
120             }
121             else
122             {
123                 /* Found a CR/LF pair */
124
125                 Pairs++;
126             }
127             i++;
128         }
129     }
130
131     if (!Pairs)
132     {
133         return (AE_OK);
134     }
135
136     /*
137      * Entire table scanned, each CR is part of a CR/LF pair --
138      * meaning that the table was treated as a text file somewhere.
139      *
140      * NOTE: We can't "fix" the table, because any existing CR/LF pairs in the
141      * original table are left untouched by the text conversion process --
142      * meaning that we cannot simply replace CR/LF pairs with LFs.
143      */
144     AcpiOsPrintf ("Table has been corrupted by text mode conversion\n");
145     AcpiOsPrintf ("All LFs (%u) were changed to CR/LF pairs\n", Pairs);
146     AcpiOsPrintf ("Table cannot be repaired!\n");
147     return (AE_BAD_VALUE);
148 }
149
150
151 /*******************************************************************************
152  *
153  * FUNCTION:    AcpiUtReadTable
154  *
155  * PARAMETERS:  fp              - File that contains table
156  *              Table           - Return value, buffer with table
157  *              TableLength     - Return value, length of table
158  *
159  * RETURN:      Status
160  *
161  * DESCRIPTION: Load the DSDT from the file pointer
162  *
163  ******************************************************************************/
164
165 static ACPI_STATUS
166 AcpiUtReadTable (
167     FILE                    *fp,
168     ACPI_TABLE_HEADER       **Table,
169     UINT32                  *TableLength)
170 {
171     ACPI_TABLE_HEADER       TableHeader;
172     UINT32                  Actual;
173     ACPI_STATUS             Status;
174     UINT32                  FileSize;
175     BOOLEAN                 StandardHeader = TRUE;
176     INT32                   Count;
177
178     /* Get the file size */
179
180     FileSize = CmGetFileSize (fp);
181     if (FileSize == ACPI_UINT32_MAX)
182     {
183         return (AE_ERROR);
184     }
185
186     if (FileSize < 4)
187     {
188         return (AE_BAD_HEADER);
189     }
190
191     /* Read the signature */
192
193     fseek (fp, 0, SEEK_SET);
194
195     Count = fread (&TableHeader, 1, sizeof (ACPI_TABLE_HEADER), fp);
196     if (Count != sizeof (ACPI_TABLE_HEADER))
197     {
198         AcpiOsPrintf ("Could not read the table header\n");
199         return (AE_BAD_HEADER);
200     }
201
202     /* The RSDP table does not have standard ACPI header */
203
204     if (ACPI_VALIDATE_RSDP_SIG (TableHeader.Signature))
205     {
206         *TableLength = FileSize;
207         StandardHeader = FALSE;
208     }
209     else
210     {
211
212 #if 0
213         /* Validate the table header/length */
214
215         Status = AcpiTbValidateTableHeader (&TableHeader);
216         if (ACPI_FAILURE (Status))
217         {
218             AcpiOsPrintf ("Table header is invalid!\n");
219             return (Status);
220         }
221 #endif
222
223         /* File size must be at least as long as the Header-specified length */
224
225         if (TableHeader.Length > FileSize)
226         {
227             AcpiOsPrintf (
228                 "TableHeader length [0x%X] greater than the input file size [0x%X]\n",
229                 TableHeader.Length, FileSize);
230
231 #ifdef ACPI_ASL_COMPILER
232             Status = FlCheckForAscii (fp, NULL, FALSE);
233             if (ACPI_SUCCESS (Status))
234             {
235                 AcpiOsPrintf ("File appears to be ASCII only, must be binary\n",
236                     TableHeader.Length, FileSize);
237             }
238 #endif
239             return (AE_BAD_HEADER);
240         }
241
242 #ifdef ACPI_OBSOLETE_CODE
243         /* We only support a limited number of table types */
244
245         if (!ACPI_COMPARE_NAME ((char *) TableHeader.Signature, ACPI_SIG_DSDT) &&
246             !ACPI_COMPARE_NAME ((char *) TableHeader.Signature, ACPI_SIG_PSDT) &&
247             !ACPI_COMPARE_NAME ((char *) TableHeader.Signature, ACPI_SIG_SSDT))
248         {
249             AcpiOsPrintf ("Table signature [%4.4s] is invalid or not supported\n",
250                 (char *) TableHeader.Signature);
251             ACPI_DUMP_BUFFER (&TableHeader, sizeof (ACPI_TABLE_HEADER));
252             return (AE_ERROR);
253         }
254 #endif
255
256         *TableLength = TableHeader.Length;
257     }
258
259     /* Allocate a buffer for the table */
260
261     *Table = AcpiOsAllocate ((size_t) FileSize);
262     if (!*Table)
263     {
264         AcpiOsPrintf (
265             "Could not allocate memory for ACPI table %4.4s (size=0x%X)\n",
266             TableHeader.Signature, *TableLength);
267         return (AE_NO_MEMORY);
268     }
269
270     /* Get the rest of the table */
271
272     fseek (fp, 0, SEEK_SET);
273     Actual = fread (*Table, 1, (size_t) FileSize, fp);
274     if (Actual == FileSize)
275     {
276         if (StandardHeader)
277         {
278             /* Now validate the checksum */
279
280             Status = AcpiTbVerifyChecksum ((void *) *Table,
281                         ACPI_CAST_PTR (ACPI_TABLE_HEADER, *Table)->Length);
282
283             if (Status == AE_BAD_CHECKSUM)
284             {
285                 Status = AcpiUtCheckTextModeCorruption ((UINT8 *) *Table,
286                             FileSize, (*Table)->Length);
287                 return (Status);
288             }
289         }
290         return (AE_OK);
291     }
292
293     if (Actual > 0)
294     {
295         AcpiOsPrintf ("Warning - reading table, asked for %X got %X\n",
296             FileSize, Actual);
297         return (AE_OK);
298     }
299
300     AcpiOsPrintf ("Error - could not read the table file\n");
301     AcpiOsFree (*Table);
302     *Table = NULL;
303     *TableLength = 0;
304     return (AE_ERROR);
305 }
306
307
308 /*******************************************************************************
309  *
310  * FUNCTION:    AcpiUtReadTableFromFile
311  *
312  * PARAMETERS:  Filename         - File where table is located
313  *              Table            - Where a pointer to the table is returned
314  *
315  * RETURN:      Status
316  *
317  * DESCRIPTION: Get an ACPI table from a file
318  *
319  ******************************************************************************/
320
321 ACPI_STATUS
322 AcpiUtReadTableFromFile (
323     char                    *Filename,
324     ACPI_TABLE_HEADER       **Table)
325 {
326     FILE                    *File;
327     UINT32                  FileSize;
328     UINT32                  TableLength;
329     ACPI_STATUS             Status = AE_ERROR;
330
331
332     /* Open the file, get current size */
333
334     File = fopen (Filename, "rb");
335     if (!File)
336     {
337         perror ("Could not open input file");
338         return (Status);
339     }
340
341     FileSize = CmGetFileSize (File);
342     if (FileSize == ACPI_UINT32_MAX)
343     {
344         goto Exit;
345     }
346
347     /* Get the entire file */
348
349     fprintf (stderr, "Loading Acpi table from file %10s - Length %.8u (%06X)\n",
350         Filename, FileSize, FileSize);
351
352     Status = AcpiUtReadTable (File, Table, &TableLength);
353     if (ACPI_FAILURE (Status))
354     {
355         AcpiOsPrintf ("Could not get table from the file\n");
356     }
357
358 Exit:
359     fclose(File);
360     return (Status);
361 }
362
363 #endif