sys/contrib/dev/acpica/source/common/adfile.c

   1 /******************************************************************************
   2  *
   3  * Module Name: adfile - Application-level disassembler file support 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 "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 = ACPI_ALLOCATE_ZEROED ((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 = ACPI_ALLOCATE ((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     *OutDirectoryPath = NULL;
 299
 300     if (!InputPath)
 301     {
 302         return (AE_OK);
 303     }
 304
 305     /* Get the path to the input filename's directory */
 306
 307     DirectoryPath = FlStrdup (InputPath);
 308     if (!DirectoryPath)
 309     {
 310         return (AE_NO_MEMORY);
 311     }
 312
 313     /* Convert backslashes to slashes in the entire path */
 314
 315     UtConvertBackslashes (DirectoryPath);
 316
 317     /* Backup to last slash or colon */
 318
 319     Substring = strrchr (DirectoryPath, '/');
 320     if (!Substring)
 321     {
 322         Substring = strrchr (DirectoryPath, ':');
 323     }
 324
 325     /* Extract the simple filename */
 326
 327     if (!Substring)
 328     {
 329         Filename = FlStrdup (DirectoryPath);
 330         DirectoryPath[0] = 0;
 331     }
 332     else
 333     {
 334         Filename = FlStrdup (Substring + 1);
 335         *(Substring+1) = 0;
 336     }
 337
 338     if (!Filename)
 339     {
 340         ACPI_FREE (DirectoryPath);
 341         return (AE_NO_MEMORY);
 342     }
 343
 344     *OutDirectoryPath = DirectoryPath;
 345
 346     if (OutFilename)
 347     {
 348         *OutFilename = Filename;
 349         return (AE_OK);
 350     }
 351
 352     ACPI_FREE (Filename);
 353     return (AE_OK);
 354 }