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