aslfiles.c revision 1.1.1.2.4.2
1 1.1.1.2.4.2 rmind 2 1.1.1.2.4.2 rmind /****************************************************************************** 3 1.1.1.2.4.2 rmind * 4 1.1.1.2.4.2 rmind * Module Name: aslfiles - file I/O suppoert 5 1.1.1.2.4.2 rmind * 6 1.1.1.2.4.2 rmind *****************************************************************************/ 7 1.1.1.2.4.2 rmind 8 1.1.1.2.4.2 rmind /* 9 1.1.1.2.4.2 rmind * Copyright (C) 2000 - 2011, Intel Corp. 10 1.1.1.2.4.2 rmind * All rights reserved. 11 1.1.1.2.4.2 rmind * 12 1.1.1.2.4.2 rmind * Redistribution and use in source and binary forms, with or without 13 1.1.1.2.4.2 rmind * modification, are permitted provided that the following conditions 14 1.1.1.2.4.2 rmind * are met: 15 1.1.1.2.4.2 rmind * 1. Redistributions of source code must retain the above copyright 16 1.1.1.2.4.2 rmind * notice, this list of conditions, and the following disclaimer, 17 1.1.1.2.4.2 rmind * without modification. 18 1.1.1.2.4.2 rmind * 2. Redistributions in binary form must reproduce at minimum a disclaimer 19 1.1.1.2.4.2 rmind * substantially similar to the "NO WARRANTY" disclaimer below 20 1.1.1.2.4.2 rmind * ("Disclaimer") and any redistribution must be conditioned upon 21 1.1.1.2.4.2 rmind * including a substantially similar Disclaimer requirement for further 22 1.1.1.2.4.2 rmind * binary redistribution. 23 1.1.1.2.4.2 rmind * 3. Neither the names of the above-listed copyright holders nor the names 24 1.1.1.2.4.2 rmind * of any contributors may be used to endorse or promote products derived 25 1.1.1.2.4.2 rmind * from this software without specific prior written permission. 26 1.1.1.2.4.2 rmind * 27 1.1.1.2.4.2 rmind * Alternatively, this software may be distributed under the terms of the 28 1.1.1.2.4.2 rmind * GNU General Public License ("GPL") version 2 as published by the Free 29 1.1.1.2.4.2 rmind * Software Foundation. 30 1.1.1.2.4.2 rmind * 31 1.1.1.2.4.2 rmind * NO WARRANTY 32 1.1.1.2.4.2 rmind * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 33 1.1.1.2.4.2 rmind * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 34 1.1.1.2.4.2 rmind * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR 35 1.1.1.2.4.2 rmind * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 36 1.1.1.2.4.2 rmind * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 37 1.1.1.2.4.2 rmind * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 38 1.1.1.2.4.2 rmind * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 39 1.1.1.2.4.2 rmind * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 40 1.1.1.2.4.2 rmind * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING 41 1.1.1.2.4.2 rmind * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 42 1.1.1.2.4.2 rmind * POSSIBILITY OF SUCH DAMAGES. 43 1.1.1.2.4.2 rmind */ 44 1.1.1.2.4.2 rmind 45 1.1.1.2.4.2 rmind #include "aslcompiler.h" 46 1.1.1.2.4.2 rmind #include "acapps.h" 47 1.1.1.2.4.2 rmind 48 1.1.1.2.4.2 rmind #define _COMPONENT ACPI_COMPILER 49 1.1.1.2.4.2 rmind ACPI_MODULE_NAME ("aslfiles") 50 1.1.1.2.4.2 rmind 51 1.1.1.2.4.2 rmind /* Local prototypes */ 52 1.1.1.2.4.2 rmind 53 1.1.1.2.4.2 rmind static FILE * 54 1.1.1.2.4.2 rmind FlOpenIncludeWithPrefix ( 55 1.1.1.2.4.2 rmind char *PrefixDir, 56 1.1.1.2.4.2 rmind char *Filename); 57 1.1.1.2.4.2 rmind 58 1.1.1.2.4.2 rmind 59 1.1.1.2.4.2 rmind #ifdef ACPI_OBSOLETE_FUNCTIONS 60 1.1.1.2.4.2 rmind ACPI_STATUS 61 1.1.1.2.4.2 rmind FlParseInputPathname ( 62 1.1.1.2.4.2 rmind char *InputFilename); 63 1.1.1.2.4.2 rmind #endif 64 1.1.1.2.4.2 rmind 65 1.1.1.2.4.2 rmind 66 1.1.1.2.4.2 rmind /******************************************************************************* 67 1.1.1.2.4.2 rmind * 68 1.1.1.2.4.2 rmind * FUNCTION: AslAbort 69 1.1.1.2.4.2 rmind * 70 1.1.1.2.4.2 rmind * PARAMETERS: None 71 1.1.1.2.4.2 rmind * 72 1.1.1.2.4.2 rmind * RETURN: None 73 1.1.1.2.4.2 rmind * 74 1.1.1.2.4.2 rmind * DESCRIPTION: Dump the error log and abort the compiler. Used for serious 75 1.1.1.2.4.2 rmind * I/O errors 76 1.1.1.2.4.2 rmind * 77 1.1.1.2.4.2 rmind ******************************************************************************/ 78 1.1.1.2.4.2 rmind 79 1.1.1.2.4.2 rmind void 80 1.1.1.2.4.2 rmind AslAbort ( 81 1.1.1.2.4.2 rmind void) 82 1.1.1.2.4.2 rmind { 83 1.1.1.2.4.2 rmind 84 1.1.1.2.4.2 rmind AePrintErrorLog (ASL_FILE_STDOUT); 85 1.1.1.2.4.2 rmind if (Gbl_DebugFlag) 86 1.1.1.2.4.2 rmind { 87 1.1.1.2.4.2 rmind /* Print error summary to the debug file */ 88 1.1.1.2.4.2 rmind 89 1.1.1.2.4.2 rmind AePrintErrorLog (ASL_FILE_STDERR); 90 1.1.1.2.4.2 rmind } 91 1.1.1.2.4.2 rmind 92 1.1.1.2.4.2 rmind exit (1); 93 1.1.1.2.4.2 rmind } 94 1.1.1.2.4.2 rmind 95 1.1.1.2.4.2 rmind 96 1.1.1.2.4.2 rmind /******************************************************************************* 97 1.1.1.2.4.2 rmind * 98 1.1.1.2.4.2 rmind * FUNCTION: FlFileError 99 1.1.1.2.4.2 rmind * 100 1.1.1.2.4.2 rmind * PARAMETERS: FileId - Index into file info array 101 1.1.1.2.4.2 rmind * ErrorId - Index into error message array 102 1.1.1.2.4.2 rmind * 103 1.1.1.2.4.2 rmind * RETURN: None 104 1.1.1.2.4.2 rmind * 105 1.1.1.2.4.2 rmind * DESCRIPTION: Decode errno to an error message and add the entire error 106 1.1.1.2.4.2 rmind * to the error log. 107 1.1.1.2.4.2 rmind * 108 1.1.1.2.4.2 rmind ******************************************************************************/ 109 1.1.1.2.4.2 rmind 110 1.1.1.2.4.2 rmind void 111 1.1.1.2.4.2 rmind FlFileError ( 112 1.1.1.2.4.2 rmind UINT32 FileId, 113 1.1.1.2.4.2 rmind UINT8 ErrorId) 114 1.1.1.2.4.2 rmind { 115 1.1.1.2.4.2 rmind 116 1.1.1.2.4.2 rmind sprintf (MsgBuffer, "\"%s\" (%s)", Gbl_Files[FileId].Filename, 117 1.1.1.2.4.2 rmind strerror (errno)); 118 1.1.1.2.4.2 rmind AslCommonError (ASL_ERROR, ErrorId, 0, 0, 0, 0, NULL, MsgBuffer); 119 1.1.1.2.4.2 rmind } 120 1.1.1.2.4.2 rmind 121 1.1.1.2.4.2 rmind 122 1.1.1.2.4.2 rmind /******************************************************************************* 123 1.1.1.2.4.2 rmind * 124 1.1.1.2.4.2 rmind * FUNCTION: FlOpenFile 125 1.1.1.2.4.2 rmind * 126 1.1.1.2.4.2 rmind * PARAMETERS: FileId - Index into file info array 127 1.1.1.2.4.2 rmind * Filename - file pathname to open 128 1.1.1.2.4.2 rmind * Mode - Open mode for fopen 129 1.1.1.2.4.2 rmind * 130 1.1.1.2.4.2 rmind * RETURN: None 131 1.1.1.2.4.2 rmind * 132 1.1.1.2.4.2 rmind * DESCRIPTION: Open a file. 133 1.1.1.2.4.2 rmind * NOTE: Aborts compiler on any error. 134 1.1.1.2.4.2 rmind * 135 1.1.1.2.4.2 rmind ******************************************************************************/ 136 1.1.1.2.4.2 rmind 137 1.1.1.2.4.2 rmind void 138 1.1.1.2.4.2 rmind FlOpenFile ( 139 1.1.1.2.4.2 rmind UINT32 FileId, 140 1.1.1.2.4.2 rmind char *Filename, 141 1.1.1.2.4.2 rmind char *Mode) 142 1.1.1.2.4.2 rmind { 143 1.1.1.2.4.2 rmind FILE *File; 144 1.1.1.2.4.2 rmind 145 1.1.1.2.4.2 rmind 146 1.1.1.2.4.2 rmind File = fopen (Filename, Mode); 147 1.1.1.2.4.2 rmind 148 1.1.1.2.4.2 rmind Gbl_Files[FileId].Filename = Filename; 149 1.1.1.2.4.2 rmind Gbl_Files[FileId].Handle = File; 150 1.1.1.2.4.2 rmind 151 1.1.1.2.4.2 rmind if (!File) 152 1.1.1.2.4.2 rmind { 153 1.1.1.2.4.2 rmind FlFileError (FileId, ASL_MSG_OPEN); 154 1.1.1.2.4.2 rmind AslAbort (); 155 1.1.1.2.4.2 rmind } 156 1.1.1.2.4.2 rmind } 157 1.1.1.2.4.2 rmind 158 1.1.1.2.4.2 rmind 159 1.1.1.2.4.2 rmind /******************************************************************************* 160 1.1.1.2.4.2 rmind * 161 1.1.1.2.4.2 rmind * FUNCTION: FlGetFileSize 162 1.1.1.2.4.2 rmind * 163 1.1.1.2.4.2 rmind * PARAMETERS: FileId - Index into file info array 164 1.1.1.2.4.2 rmind * 165 1.1.1.2.4.2 rmind * RETURN: File Size 166 1.1.1.2.4.2 rmind * 167 1.1.1.2.4.2 rmind * DESCRIPTION: Get current file size. Uses seek-to-EOF. File must be open. 168 1.1.1.2.4.2 rmind * 169 1.1.1.2.4.2 rmind ******************************************************************************/ 170 1.1.1.2.4.2 rmind 171 1.1.1.2.4.2 rmind UINT32 172 1.1.1.2.4.2 rmind FlGetFileSize ( 173 1.1.1.2.4.2 rmind UINT32 FileId) 174 1.1.1.2.4.2 rmind { 175 1.1.1.2.4.2 rmind FILE *fp; 176 1.1.1.2.4.2 rmind UINT32 FileSize; 177 1.1.1.2.4.2 rmind 178 1.1.1.2.4.2 rmind 179 1.1.1.2.4.2 rmind fp = Gbl_Files[FileId].Handle; 180 1.1.1.2.4.2 rmind 181 1.1.1.2.4.2 rmind fseek (fp, 0, SEEK_END); 182 1.1.1.2.4.2 rmind FileSize = (UINT32) ftell (fp); 183 1.1.1.2.4.2 rmind fseek (fp, 0, SEEK_SET); 184 1.1.1.2.4.2 rmind 185 1.1.1.2.4.2 rmind return (FileSize); 186 1.1.1.2.4.2 rmind } 187 1.1.1.2.4.2 rmind 188 1.1.1.2.4.2 rmind 189 1.1.1.2.4.2 rmind /******************************************************************************* 190 1.1.1.2.4.2 rmind * 191 1.1.1.2.4.2 rmind * FUNCTION: FlReadFile 192 1.1.1.2.4.2 rmind * 193 1.1.1.2.4.2 rmind * PARAMETERS: FileId - Index into file info array 194 1.1.1.2.4.2 rmind * Buffer - Where to place the data 195 1.1.1.2.4.2 rmind * Length - Amount to read 196 1.1.1.2.4.2 rmind * 197 1.1.1.2.4.2 rmind * RETURN: Status. AE_ERROR indicates EOF. 198 1.1.1.2.4.2 rmind * 199 1.1.1.2.4.2 rmind * DESCRIPTION: Read data from an open file. 200 1.1.1.2.4.2 rmind * NOTE: Aborts compiler on any error. 201 1.1.1.2.4.2 rmind * 202 1.1.1.2.4.2 rmind ******************************************************************************/ 203 1.1.1.2.4.2 rmind 204 1.1.1.2.4.2 rmind ACPI_STATUS 205 1.1.1.2.4.2 rmind FlReadFile ( 206 1.1.1.2.4.2 rmind UINT32 FileId, 207 1.1.1.2.4.2 rmind void *Buffer, 208 1.1.1.2.4.2 rmind UINT32 Length) 209 1.1.1.2.4.2 rmind { 210 1.1.1.2.4.2 rmind UINT32 Actual; 211 1.1.1.2.4.2 rmind 212 1.1.1.2.4.2 rmind 213 1.1.1.2.4.2 rmind /* Read and check for error */ 214 1.1.1.2.4.2 rmind 215 1.1.1.2.4.2 rmind Actual = fread (Buffer, 1, Length, Gbl_Files[FileId].Handle); 216 1.1.1.2.4.2 rmind if (Actual != Length) 217 1.1.1.2.4.2 rmind { 218 1.1.1.2.4.2 rmind if (feof (Gbl_Files[FileId].Handle)) 219 1.1.1.2.4.2 rmind { 220 1.1.1.2.4.2 rmind /* End-of-file, just return error */ 221 1.1.1.2.4.2 rmind 222 1.1.1.2.4.2 rmind return (AE_ERROR); 223 1.1.1.2.4.2 rmind } 224 1.1.1.2.4.2 rmind 225 1.1.1.2.4.2 rmind FlFileError (FileId, ASL_MSG_READ); 226 1.1.1.2.4.2 rmind AslAbort (); 227 1.1.1.2.4.2 rmind } 228 1.1.1.2.4.2 rmind 229 1.1.1.2.4.2 rmind return (AE_OK); 230 1.1.1.2.4.2 rmind } 231 1.1.1.2.4.2 rmind 232 1.1.1.2.4.2 rmind 233 1.1.1.2.4.2 rmind /******************************************************************************* 234 1.1.1.2.4.2 rmind * 235 1.1.1.2.4.2 rmind * FUNCTION: FlWriteFile 236 1.1.1.2.4.2 rmind * 237 1.1.1.2.4.2 rmind * PARAMETERS: FileId - Index into file info array 238 1.1.1.2.4.2 rmind * Buffer - Data to write 239 1.1.1.2.4.2 rmind * Length - Amount of data to write 240 1.1.1.2.4.2 rmind * 241 1.1.1.2.4.2 rmind * RETURN: None 242 1.1.1.2.4.2 rmind * 243 1.1.1.2.4.2 rmind * DESCRIPTION: Write data to an open file. 244 1.1.1.2.4.2 rmind * NOTE: Aborts compiler on any error. 245 1.1.1.2.4.2 rmind * 246 1.1.1.2.4.2 rmind ******************************************************************************/ 247 1.1.1.2.4.2 rmind 248 1.1.1.2.4.2 rmind void 249 1.1.1.2.4.2 rmind FlWriteFile ( 250 1.1.1.2.4.2 rmind UINT32 FileId, 251 1.1.1.2.4.2 rmind void *Buffer, 252 1.1.1.2.4.2 rmind UINT32 Length) 253 1.1.1.2.4.2 rmind { 254 1.1.1.2.4.2 rmind UINT32 Actual; 255 1.1.1.2.4.2 rmind 256 1.1.1.2.4.2 rmind 257 1.1.1.2.4.2 rmind /* Write and check for error */ 258 1.1.1.2.4.2 rmind 259 1.1.1.2.4.2 rmind Actual = fwrite ((char *) Buffer, 1, Length, Gbl_Files[FileId].Handle); 260 1.1.1.2.4.2 rmind if (Actual != Length) 261 1.1.1.2.4.2 rmind { 262 1.1.1.2.4.2 rmind FlFileError (FileId, ASL_MSG_WRITE); 263 1.1.1.2.4.2 rmind AslAbort (); 264 1.1.1.2.4.2 rmind } 265 1.1.1.2.4.2 rmind } 266 1.1.1.2.4.2 rmind 267 1.1.1.2.4.2 rmind 268 1.1.1.2.4.2 rmind /******************************************************************************* 269 1.1.1.2.4.2 rmind * 270 1.1.1.2.4.2 rmind * FUNCTION: FlPrintFile 271 1.1.1.2.4.2 rmind * 272 1.1.1.2.4.2 rmind * PARAMETERS: FileId - Index into file info array 273 1.1.1.2.4.2 rmind * Format - Printf format string 274 1.1.1.2.4.2 rmind * ... - Printf arguments 275 1.1.1.2.4.2 rmind * 276 1.1.1.2.4.2 rmind * RETURN: None 277 1.1.1.2.4.2 rmind * 278 1.1.1.2.4.2 rmind * DESCRIPTION: Formatted write to an open file. 279 1.1.1.2.4.2 rmind * NOTE: Aborts compiler on any error. 280 1.1.1.2.4.2 rmind * 281 1.1.1.2.4.2 rmind ******************************************************************************/ 282 1.1.1.2.4.2 rmind 283 1.1.1.2.4.2 rmind void 284 1.1.1.2.4.2 rmind FlPrintFile ( 285 1.1.1.2.4.2 rmind UINT32 FileId, 286 1.1.1.2.4.2 rmind char *Format, 287 1.1.1.2.4.2 rmind ...) 288 1.1.1.2.4.2 rmind { 289 1.1.1.2.4.2 rmind INT32 Actual; 290 1.1.1.2.4.2 rmind va_list Args; 291 1.1.1.2.4.2 rmind 292 1.1.1.2.4.2 rmind 293 1.1.1.2.4.2 rmind va_start (Args, Format); 294 1.1.1.2.4.2 rmind 295 1.1.1.2.4.2 rmind Actual = vfprintf (Gbl_Files[FileId].Handle, Format, Args); 296 1.1.1.2.4.2 rmind va_end (Args); 297 1.1.1.2.4.2 rmind 298 1.1.1.2.4.2 rmind if (Actual == -1) 299 1.1.1.2.4.2 rmind { 300 1.1.1.2.4.2 rmind FlFileError (FileId, ASL_MSG_WRITE); 301 1.1.1.2.4.2 rmind AslAbort (); 302 1.1.1.2.4.2 rmind } 303 1.1.1.2.4.2 rmind } 304 1.1.1.2.4.2 rmind 305 1.1.1.2.4.2 rmind 306 1.1.1.2.4.2 rmind /******************************************************************************* 307 1.1.1.2.4.2 rmind * 308 1.1.1.2.4.2 rmind * FUNCTION: FlSeekFile 309 1.1.1.2.4.2 rmind * 310 1.1.1.2.4.2 rmind * PARAMETERS: FileId - Index into file info array 311 1.1.1.2.4.2 rmind * Offset - Absolute byte offset in file 312 1.1.1.2.4.2 rmind * 313 1.1.1.2.4.2 rmind * RETURN: None 314 1.1.1.2.4.2 rmind * 315 1.1.1.2.4.2 rmind * DESCRIPTION: Seek to absolute offset 316 1.1.1.2.4.2 rmind * NOTE: Aborts compiler on any error. 317 1.1.1.2.4.2 rmind * 318 1.1.1.2.4.2 rmind ******************************************************************************/ 319 1.1.1.2.4.2 rmind 320 1.1.1.2.4.2 rmind void 321 1.1.1.2.4.2 rmind FlSeekFile ( 322 1.1.1.2.4.2 rmind UINT32 FileId, 323 1.1.1.2.4.2 rmind long Offset) 324 1.1.1.2.4.2 rmind { 325 1.1.1.2.4.2 rmind int Error; 326 1.1.1.2.4.2 rmind 327 1.1.1.2.4.2 rmind 328 1.1.1.2.4.2 rmind Error = fseek (Gbl_Files[FileId].Handle, Offset, SEEK_SET); 329 1.1.1.2.4.2 rmind if (Error) 330 1.1.1.2.4.2 rmind { 331 1.1.1.2.4.2 rmind FlFileError (FileId, ASL_MSG_SEEK); 332 1.1.1.2.4.2 rmind AslAbort (); 333 1.1.1.2.4.2 rmind } 334 1.1.1.2.4.2 rmind } 335 1.1.1.2.4.2 rmind 336 1.1.1.2.4.2 rmind 337 1.1.1.2.4.2 rmind /******************************************************************************* 338 1.1.1.2.4.2 rmind * 339 1.1.1.2.4.2 rmind * FUNCTION: FlCloseFile 340 1.1.1.2.4.2 rmind * 341 1.1.1.2.4.2 rmind * PARAMETERS: FileId - Index into file info array 342 1.1.1.2.4.2 rmind * 343 1.1.1.2.4.2 rmind * RETURN: None 344 1.1.1.2.4.2 rmind * 345 1.1.1.2.4.2 rmind * DESCRIPTION: Close an open file. Aborts compiler on error 346 1.1.1.2.4.2 rmind * 347 1.1.1.2.4.2 rmind ******************************************************************************/ 348 1.1.1.2.4.2 rmind 349 1.1.1.2.4.2 rmind void 350 1.1.1.2.4.2 rmind FlCloseFile ( 351 1.1.1.2.4.2 rmind UINT32 FileId) 352 1.1.1.2.4.2 rmind { 353 1.1.1.2.4.2 rmind int Error; 354 1.1.1.2.4.2 rmind 355 1.1.1.2.4.2 rmind 356 1.1.1.2.4.2 rmind if (!Gbl_Files[FileId].Handle) 357 1.1.1.2.4.2 rmind { 358 1.1.1.2.4.2 rmind return; 359 1.1.1.2.4.2 rmind } 360 1.1.1.2.4.2 rmind 361 1.1.1.2.4.2 rmind Error = fclose (Gbl_Files[FileId].Handle); 362 1.1.1.2.4.2 rmind Gbl_Files[FileId].Handle = NULL; 363 1.1.1.2.4.2 rmind 364 1.1.1.2.4.2 rmind if (Error) 365 1.1.1.2.4.2 rmind { 366 1.1.1.2.4.2 rmind FlFileError (FileId, ASL_MSG_CLOSE); 367 1.1.1.2.4.2 rmind AslAbort (); 368 1.1.1.2.4.2 rmind } 369 1.1.1.2.4.2 rmind 370 1.1.1.2.4.2 rmind return; 371 1.1.1.2.4.2 rmind } 372 1.1.1.2.4.2 rmind 373 1.1.1.2.4.2 rmind 374 1.1.1.2.4.2 rmind /******************************************************************************* 375 1.1.1.2.4.2 rmind * 376 1.1.1.2.4.2 rmind * FUNCTION: FlSetLineNumber 377 1.1.1.2.4.2 rmind * 378 1.1.1.2.4.2 rmind * PARAMETERS: Op - Parse node for the LINE asl statement 379 1.1.1.2.4.2 rmind * 380 1.1.1.2.4.2 rmind * RETURN: None. 381 1.1.1.2.4.2 rmind * 382 1.1.1.2.4.2 rmind * DESCRIPTION: Set the current line number 383 1.1.1.2.4.2 rmind * 384 1.1.1.2.4.2 rmind ******************************************************************************/ 385 1.1.1.2.4.2 rmind 386 1.1.1.2.4.2 rmind void 387 1.1.1.2.4.2 rmind FlSetLineNumber ( 388 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Op) 389 1.1.1.2.4.2 rmind { 390 1.1.1.2.4.2 rmind 391 1.1.1.2.4.2 rmind Gbl_CurrentLineNumber = (UINT32) Op->Asl.Value.Integer; 392 1.1.1.2.4.2 rmind Gbl_LogicalLineNumber = (UINT32) Op->Asl.Value.Integer; 393 1.1.1.2.4.2 rmind } 394 1.1.1.2.4.2 rmind 395 1.1.1.2.4.2 rmind 396 1.1.1.2.4.2 rmind /******************************************************************************* 397 1.1.1.2.4.2 rmind * 398 1.1.1.2.4.2 rmind * FUNCTION: FlAddIncludeDirectory 399 1.1.1.2.4.2 rmind * 400 1.1.1.2.4.2 rmind * PARAMETERS: Dir - Directory pathname string 401 1.1.1.2.4.2 rmind * 402 1.1.1.2.4.2 rmind * RETURN: None 403 1.1.1.2.4.2 rmind * 404 1.1.1.2.4.2 rmind * DESCRIPTION: Add a directory the list of include prefix directories. 405 1.1.1.2.4.2 rmind * 406 1.1.1.2.4.2 rmind ******************************************************************************/ 407 1.1.1.2.4.2 rmind 408 1.1.1.2.4.2 rmind void 409 1.1.1.2.4.2 rmind FlAddIncludeDirectory ( 410 1.1.1.2.4.2 rmind char *Dir) 411 1.1.1.2.4.2 rmind { 412 1.1.1.2.4.2 rmind ASL_INCLUDE_DIR *NewDir; 413 1.1.1.2.4.2 rmind ASL_INCLUDE_DIR *NextDir; 414 1.1.1.2.4.2 rmind ASL_INCLUDE_DIR *PrevDir = NULL; 415 1.1.1.2.4.2 rmind UINT32 NeedsSeparator = 0; 416 1.1.1.2.4.2 rmind size_t DirLength; 417 1.1.1.2.4.2 rmind 418 1.1.1.2.4.2 rmind 419 1.1.1.2.4.2 rmind DirLength = strlen (Dir); 420 1.1.1.2.4.2 rmind if (!DirLength) 421 1.1.1.2.4.2 rmind { 422 1.1.1.2.4.2 rmind return; 423 1.1.1.2.4.2 rmind } 424 1.1.1.2.4.2 rmind 425 1.1.1.2.4.2 rmind /* Make sure that the pathname ends with a path separator */ 426 1.1.1.2.4.2 rmind 427 1.1.1.2.4.2 rmind if ((Dir[DirLength-1] != '/') && 428 1.1.1.2.4.2 rmind (Dir[DirLength-1] != '\\')) 429 1.1.1.2.4.2 rmind { 430 1.1.1.2.4.2 rmind NeedsSeparator = 1; 431 1.1.1.2.4.2 rmind } 432 1.1.1.2.4.2 rmind 433 1.1.1.2.4.2 rmind NewDir = ACPI_ALLOCATE_ZEROED (sizeof (ASL_INCLUDE_DIR)); 434 1.1.1.2.4.2 rmind NewDir->Dir = ACPI_ALLOCATE (DirLength + 1 + NeedsSeparator); 435 1.1.1.2.4.2 rmind strcpy (NewDir->Dir, Dir); 436 1.1.1.2.4.2 rmind if (NeedsSeparator) 437 1.1.1.2.4.2 rmind { 438 1.1.1.2.4.2 rmind strcat (NewDir->Dir, "/"); 439 1.1.1.2.4.2 rmind } 440 1.1.1.2.4.2 rmind 441 1.1.1.2.4.2 rmind /* 442 1.1.1.2.4.2 rmind * Preserve command line ordering of -I options by adding new elements 443 1.1.1.2.4.2 rmind * at the end of the list 444 1.1.1.2.4.2 rmind */ 445 1.1.1.2.4.2 rmind NextDir = Gbl_IncludeDirList; 446 1.1.1.2.4.2 rmind while (NextDir) 447 1.1.1.2.4.2 rmind { 448 1.1.1.2.4.2 rmind PrevDir = NextDir; 449 1.1.1.2.4.2 rmind NextDir = NextDir->Next; 450 1.1.1.2.4.2 rmind } 451 1.1.1.2.4.2 rmind 452 1.1.1.2.4.2 rmind if (PrevDir) 453 1.1.1.2.4.2 rmind { 454 1.1.1.2.4.2 rmind PrevDir->Next = NewDir; 455 1.1.1.2.4.2 rmind } 456 1.1.1.2.4.2 rmind else 457 1.1.1.2.4.2 rmind { 458 1.1.1.2.4.2 rmind Gbl_IncludeDirList = NewDir; 459 1.1.1.2.4.2 rmind } 460 1.1.1.2.4.2 rmind } 461 1.1.1.2.4.2 rmind 462 1.1.1.2.4.2 rmind 463 1.1.1.2.4.2 rmind /******************************************************************************* 464 1.1.1.2.4.2 rmind * 465 1.1.1.2.4.2 rmind * FUNCTION: FlOpenIncludeWithPrefix 466 1.1.1.2.4.2 rmind * 467 1.1.1.2.4.2 rmind * PARAMETERS: PrefixDir - Prefix directory pathname. Can be a zero 468 1.1.1.2.4.2 rmind * length string. 469 1.1.1.2.4.2 rmind * Filename - The include filename from the source ASL. 470 1.1.1.2.4.2 rmind * 471 1.1.1.2.4.2 rmind * RETURN: Valid file descriptor if successful. Null otherwise. 472 1.1.1.2.4.2 rmind * 473 1.1.1.2.4.2 rmind * DESCRIPTION: Open an include file and push it on the input file stack. 474 1.1.1.2.4.2 rmind * 475 1.1.1.2.4.2 rmind ******************************************************************************/ 476 1.1.1.2.4.2 rmind 477 1.1.1.2.4.2 rmind static FILE * 478 1.1.1.2.4.2 rmind FlOpenIncludeWithPrefix ( 479 1.1.1.2.4.2 rmind char *PrefixDir, 480 1.1.1.2.4.2 rmind char *Filename) 481 1.1.1.2.4.2 rmind { 482 1.1.1.2.4.2 rmind FILE *IncludeFile; 483 1.1.1.2.4.2 rmind char *Pathname; 484 1.1.1.2.4.2 rmind 485 1.1.1.2.4.2 rmind 486 1.1.1.2.4.2 rmind /* Build the full pathname to the file */ 487 1.1.1.2.4.2 rmind 488 1.1.1.2.4.2 rmind Pathname = ACPI_ALLOCATE (strlen (PrefixDir) + strlen (Filename) + 1); 489 1.1.1.2.4.2 rmind 490 1.1.1.2.4.2 rmind strcpy (Pathname, PrefixDir); 491 1.1.1.2.4.2 rmind strcat (Pathname, Filename); 492 1.1.1.2.4.2 rmind 493 1.1.1.2.4.2 rmind DbgPrint (ASL_PARSE_OUTPUT, "\nAttempt to open include file: path %s\n\n", 494 1.1.1.2.4.2 rmind Pathname); 495 1.1.1.2.4.2 rmind 496 1.1.1.2.4.2 rmind /* Attempt to open the file, push if successful */ 497 1.1.1.2.4.2 rmind 498 1.1.1.2.4.2 rmind IncludeFile = fopen (Pathname, "r"); 499 1.1.1.2.4.2 rmind if (IncludeFile) 500 1.1.1.2.4.2 rmind { 501 1.1.1.2.4.2 rmind /* Push the include file on the open input file stack */ 502 1.1.1.2.4.2 rmind 503 1.1.1.2.4.2 rmind AslPushInputFileStack (IncludeFile, Pathname); 504 1.1.1.2.4.2 rmind return (IncludeFile); 505 1.1.1.2.4.2 rmind } 506 1.1.1.2.4.2 rmind 507 1.1.1.2.4.2 rmind ACPI_FREE (Pathname); 508 1.1.1.2.4.2 rmind return (NULL); 509 1.1.1.2.4.2 rmind } 510 1.1.1.2.4.2 rmind 511 1.1.1.2.4.2 rmind 512 1.1.1.2.4.2 rmind /******************************************************************************* 513 1.1.1.2.4.2 rmind * 514 1.1.1.2.4.2 rmind * FUNCTION: FlOpenIncludeFile 515 1.1.1.2.4.2 rmind * 516 1.1.1.2.4.2 rmind * PARAMETERS: Op - Parse node for the INCLUDE ASL statement 517 1.1.1.2.4.2 rmind * 518 1.1.1.2.4.2 rmind * RETURN: None. 519 1.1.1.2.4.2 rmind * 520 1.1.1.2.4.2 rmind * DESCRIPTION: Open an include file and push it on the input file stack. 521 1.1.1.2.4.2 rmind * 522 1.1.1.2.4.2 rmind ******************************************************************************/ 523 1.1.1.2.4.2 rmind 524 1.1.1.2.4.2 rmind void 525 1.1.1.2.4.2 rmind FlOpenIncludeFile ( 526 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Op) 527 1.1.1.2.4.2 rmind { 528 1.1.1.2.4.2 rmind FILE *IncludeFile; 529 1.1.1.2.4.2 rmind ASL_INCLUDE_DIR *NextDir; 530 1.1.1.2.4.2 rmind 531 1.1.1.2.4.2 rmind 532 1.1.1.2.4.2 rmind /* Op must be valid */ 533 1.1.1.2.4.2 rmind 534 1.1.1.2.4.2 rmind if (!Op) 535 1.1.1.2.4.2 rmind { 536 1.1.1.2.4.2 rmind AslCommonError (ASL_ERROR, ASL_MSG_INCLUDE_FILE_OPEN, 537 1.1.1.2.4.2 rmind Gbl_CurrentLineNumber, Gbl_LogicalLineNumber, 538 1.1.1.2.4.2 rmind Gbl_InputByteCount, Gbl_CurrentColumn, 539 1.1.1.2.4.2 rmind Gbl_Files[ASL_FILE_INPUT].Filename, " - Null parse node"); 540 1.1.1.2.4.2 rmind 541 1.1.1.2.4.2 rmind return; 542 1.1.1.2.4.2 rmind } 543 1.1.1.2.4.2 rmind 544 1.1.1.2.4.2 rmind /* 545 1.1.1.2.4.2 rmind * Flush out the "include ()" statement on this line, start 546 1.1.1.2.4.2 rmind * the actual include file on the next line 547 1.1.1.2.4.2 rmind */ 548 1.1.1.2.4.2 rmind ResetCurrentLineBuffer (); 549 1.1.1.2.4.2 rmind FlPrintFile (ASL_FILE_SOURCE_OUTPUT, "\n"); 550 1.1.1.2.4.2 rmind Gbl_CurrentLineOffset++; 551 1.1.1.2.4.2 rmind 552 1.1.1.2.4.2 rmind 553 1.1.1.2.4.2 rmind /* Attempt to open the include file */ 554 1.1.1.2.4.2 rmind 555 1.1.1.2.4.2 rmind /* If the file specifies an absolute path, just open it */ 556 1.1.1.2.4.2 rmind 557 1.1.1.2.4.2 rmind if ((Op->Asl.Value.String[0] == '/') || 558 1.1.1.2.4.2 rmind (Op->Asl.Value.String[0] == '\\') || 559 1.1.1.2.4.2 rmind (Op->Asl.Value.String[1] == ':')) 560 1.1.1.2.4.2 rmind { 561 1.1.1.2.4.2 rmind IncludeFile = FlOpenIncludeWithPrefix ("", Op->Asl.Value.String); 562 1.1.1.2.4.2 rmind if (!IncludeFile) 563 1.1.1.2.4.2 rmind { 564 1.1.1.2.4.2 rmind goto ErrorExit; 565 1.1.1.2.4.2 rmind } 566 1.1.1.2.4.2 rmind return; 567 1.1.1.2.4.2 rmind } 568 1.1.1.2.4.2 rmind 569 1.1.1.2.4.2 rmind /* 570 1.1.1.2.4.2 rmind * The include filename is not an absolute path. 571 1.1.1.2.4.2 rmind * 572 1.1.1.2.4.2 rmind * First, search for the file within the "local" directory -- meaning 573 1.1.1.2.4.2 rmind * the same directory that contains the source file. 574 1.1.1.2.4.2 rmind * 575 1.1.1.2.4.2 rmind * Construct the file pathname from the global directory name. 576 1.1.1.2.4.2 rmind */ 577 1.1.1.2.4.2 rmind IncludeFile = FlOpenIncludeWithPrefix (Gbl_DirectoryPath, Op->Asl.Value.String); 578 1.1.1.2.4.2 rmind if (IncludeFile) 579 1.1.1.2.4.2 rmind { 580 1.1.1.2.4.2 rmind return; 581 1.1.1.2.4.2 rmind } 582 1.1.1.2.4.2 rmind 583 1.1.1.2.4.2 rmind /* 584 1.1.1.2.4.2 rmind * Second, search for the file within the (possibly multiple) directories 585 1.1.1.2.4.2 rmind * specified by the -I option on the command line. 586 1.1.1.2.4.2 rmind */ 587 1.1.1.2.4.2 rmind NextDir = Gbl_IncludeDirList; 588 1.1.1.2.4.2 rmind while (NextDir) 589 1.1.1.2.4.2 rmind { 590 1.1.1.2.4.2 rmind IncludeFile = FlOpenIncludeWithPrefix (NextDir->Dir, Op->Asl.Value.String); 591 1.1.1.2.4.2 rmind if (IncludeFile) 592 1.1.1.2.4.2 rmind { 593 1.1.1.2.4.2 rmind return; 594 1.1.1.2.4.2 rmind } 595 1.1.1.2.4.2 rmind 596 1.1.1.2.4.2 rmind NextDir = NextDir->Next; 597 1.1.1.2.4.2 rmind } 598 1.1.1.2.4.2 rmind 599 1.1.1.2.4.2 rmind /* We could not open the include file after trying very hard */ 600 1.1.1.2.4.2 rmind 601 1.1.1.2.4.2 rmind ErrorExit: 602 1.1.1.2.4.2 rmind sprintf (MsgBuffer, "%s, %s", Op->Asl.Value.String, strerror (errno)); 603 1.1.1.2.4.2 rmind AslError (ASL_ERROR, ASL_MSG_INCLUDE_FILE_OPEN, Op, MsgBuffer); 604 1.1.1.2.4.2 rmind } 605 1.1.1.2.4.2 rmind 606 1.1.1.2.4.2 rmind 607 1.1.1.2.4.2 rmind /******************************************************************************* 608 1.1.1.2.4.2 rmind * 609 1.1.1.2.4.2 rmind * FUNCTION: FlOpenInputFile 610 1.1.1.2.4.2 rmind * 611 1.1.1.2.4.2 rmind * PARAMETERS: InputFilename - The user-specified ASL source file to be 612 1.1.1.2.4.2 rmind * compiled 613 1.1.1.2.4.2 rmind * 614 1.1.1.2.4.2 rmind * RETURN: Status 615 1.1.1.2.4.2 rmind * 616 1.1.1.2.4.2 rmind * DESCRIPTION: Open the specified input file, and save the directory path to 617 1.1.1.2.4.2 rmind * the file so that include files can be opened in 618 1.1.1.2.4.2 rmind * the same directory. 619 1.1.1.2.4.2 rmind * 620 1.1.1.2.4.2 rmind ******************************************************************************/ 621 1.1.1.2.4.2 rmind 622 1.1.1.2.4.2 rmind ACPI_STATUS 623 1.1.1.2.4.2 rmind FlOpenInputFile ( 624 1.1.1.2.4.2 rmind char *InputFilename) 625 1.1.1.2.4.2 rmind { 626 1.1.1.2.4.2 rmind 627 1.1.1.2.4.2 rmind /* Open the input ASL file, text mode */ 628 1.1.1.2.4.2 rmind 629 1.1.1.2.4.2 rmind FlOpenFile (ASL_FILE_INPUT, InputFilename, "r"); 630 1.1.1.2.4.2 rmind AslCompilerin = Gbl_Files[ASL_FILE_INPUT].Handle; 631 1.1.1.2.4.2 rmind 632 1.1.1.2.4.2 rmind return (AE_OK); 633 1.1.1.2.4.2 rmind } 634 1.1.1.2.4.2 rmind 635 1.1.1.2.4.2 rmind 636 1.1.1.2.4.2 rmind /******************************************************************************* 637 1.1.1.2.4.2 rmind * 638 1.1.1.2.4.2 rmind * FUNCTION: FlOpenAmlOutputFile 639 1.1.1.2.4.2 rmind * 640 1.1.1.2.4.2 rmind * PARAMETERS: FilenamePrefix - The user-specified ASL source file 641 1.1.1.2.4.2 rmind * 642 1.1.1.2.4.2 rmind * RETURN: Status 643 1.1.1.2.4.2 rmind * 644 1.1.1.2.4.2 rmind * DESCRIPTION: Create the output filename (*.AML) and open the file. The file 645 1.1.1.2.4.2 rmind * is created in the same directory as the parent input file. 646 1.1.1.2.4.2 rmind * 647 1.1.1.2.4.2 rmind ******************************************************************************/ 648 1.1.1.2.4.2 rmind 649 1.1.1.2.4.2 rmind ACPI_STATUS 650 1.1.1.2.4.2 rmind FlOpenAmlOutputFile ( 651 1.1.1.2.4.2 rmind char *FilenamePrefix) 652 1.1.1.2.4.2 rmind { 653 1.1.1.2.4.2 rmind char *Filename; 654 1.1.1.2.4.2 rmind 655 1.1.1.2.4.2 rmind 656 1.1.1.2.4.2 rmind /* Output filename usually comes from the ASL itself */ 657 1.1.1.2.4.2 rmind 658 1.1.1.2.4.2 rmind Filename = Gbl_Files[ASL_FILE_AML_OUTPUT].Filename; 659 1.1.1.2.4.2 rmind if (!Filename) 660 1.1.1.2.4.2 rmind { 661 1.1.1.2.4.2 rmind /* Create the output AML filename */ 662 1.1.1.2.4.2 rmind 663 1.1.1.2.4.2 rmind Filename = FlGenerateFilename (FilenamePrefix, FILE_SUFFIX_AML_CODE); 664 1.1.1.2.4.2 rmind if (!Filename) 665 1.1.1.2.4.2 rmind { 666 1.1.1.2.4.2 rmind AslCommonError (ASL_ERROR, ASL_MSG_OUTPUT_FILENAME, 667 1.1.1.2.4.2 rmind 0, 0, 0, 0, NULL, NULL); 668 1.1.1.2.4.2 rmind return (AE_ERROR); 669 1.1.1.2.4.2 rmind } 670 1.1.1.2.4.2 rmind } 671 1.1.1.2.4.2 rmind 672 1.1.1.2.4.2 rmind /* Open the output AML file in binary mode */ 673 1.1.1.2.4.2 rmind 674 1.1.1.2.4.2 rmind FlOpenFile (ASL_FILE_AML_OUTPUT, Filename, "w+b"); 675 1.1.1.2.4.2 rmind return (AE_OK); 676 1.1.1.2.4.2 rmind } 677 1.1.1.2.4.2 rmind 678 1.1.1.2.4.2 rmind 679 1.1.1.2.4.2 rmind /******************************************************************************* 680 1.1.1.2.4.2 rmind * 681 1.1.1.2.4.2 rmind * FUNCTION: FlOpenMiscOutputFiles 682 1.1.1.2.4.2 rmind * 683 1.1.1.2.4.2 rmind * PARAMETERS: FilenamePrefix - The user-specified ASL source file 684 1.1.1.2.4.2 rmind * 685 1.1.1.2.4.2 rmind * RETURN: Status 686 1.1.1.2.4.2 rmind * 687 1.1.1.2.4.2 rmind * DESCRIPTION: Create and open the various output files needed, depending on 688 1.1.1.2.4.2 rmind * the command line options 689 1.1.1.2.4.2 rmind * 690 1.1.1.2.4.2 rmind ******************************************************************************/ 691 1.1.1.2.4.2 rmind 692 1.1.1.2.4.2 rmind ACPI_STATUS 693 1.1.1.2.4.2 rmind FlOpenMiscOutputFiles ( 694 1.1.1.2.4.2 rmind char *FilenamePrefix) 695 1.1.1.2.4.2 rmind { 696 1.1.1.2.4.2 rmind char *Filename; 697 1.1.1.2.4.2 rmind 698 1.1.1.2.4.2 rmind 699 1.1.1.2.4.2 rmind /* Create/Open a hex output file if asked */ 700 1.1.1.2.4.2 rmind 701 1.1.1.2.4.2 rmind if (Gbl_HexOutputFlag) 702 1.1.1.2.4.2 rmind { 703 1.1.1.2.4.2 rmind Filename = FlGenerateFilename (FilenamePrefix, FILE_SUFFIX_HEX_DUMP); 704 1.1.1.2.4.2 rmind if (!Filename) 705 1.1.1.2.4.2 rmind { 706 1.1.1.2.4.2 rmind AslCommonError (ASL_ERROR, ASL_MSG_LISTING_FILENAME, 707 1.1.1.2.4.2 rmind 0, 0, 0, 0, NULL, NULL); 708 1.1.1.2.4.2 rmind return (AE_ERROR); 709 1.1.1.2.4.2 rmind } 710 1.1.1.2.4.2 rmind 711 1.1.1.2.4.2 rmind /* Open the hex file, text mode */ 712 1.1.1.2.4.2 rmind 713 1.1.1.2.4.2 rmind FlOpenFile (ASL_FILE_HEX_OUTPUT, Filename, "w+"); 714 1.1.1.2.4.2 rmind 715 1.1.1.2.4.2 rmind AslCompilerSignon (ASL_FILE_HEX_OUTPUT); 716 1.1.1.2.4.2 rmind AslCompilerFileHeader (ASL_FILE_HEX_OUTPUT); 717 1.1.1.2.4.2 rmind } 718 1.1.1.2.4.2 rmind 719 1.1.1.2.4.2 rmind /* Create/Open a debug output file if asked */ 720 1.1.1.2.4.2 rmind 721 1.1.1.2.4.2 rmind if (Gbl_DebugFlag) 722 1.1.1.2.4.2 rmind { 723 1.1.1.2.4.2 rmind Filename = FlGenerateFilename (FilenamePrefix, FILE_SUFFIX_DEBUG); 724 1.1.1.2.4.2 rmind if (!Filename) 725 1.1.1.2.4.2 rmind { 726 1.1.1.2.4.2 rmind AslCommonError (ASL_ERROR, ASL_MSG_DEBUG_FILENAME, 727 1.1.1.2.4.2 rmind 0, 0, 0, 0, NULL, NULL); 728 1.1.1.2.4.2 rmind return (AE_ERROR); 729 1.1.1.2.4.2 rmind } 730 1.1.1.2.4.2 rmind 731 1.1.1.2.4.2 rmind /* Open the debug file as STDERR, text mode */ 732 1.1.1.2.4.2 rmind 733 1.1.1.2.4.2 rmind /* TBD: hide this behind a FlReopenFile function */ 734 1.1.1.2.4.2 rmind 735 1.1.1.2.4.2 rmind Gbl_Files[ASL_FILE_DEBUG_OUTPUT].Filename = Filename; 736 1.1.1.2.4.2 rmind Gbl_Files[ASL_FILE_DEBUG_OUTPUT].Handle = 737 1.1.1.2.4.2 rmind freopen (Filename, "w+t", stderr); 738 1.1.1.2.4.2 rmind 739 1.1.1.2.4.2 rmind AslCompilerSignon (ASL_FILE_DEBUG_OUTPUT); 740 1.1.1.2.4.2 rmind AslCompilerFileHeader (ASL_FILE_DEBUG_OUTPUT); 741 1.1.1.2.4.2 rmind } 742 1.1.1.2.4.2 rmind 743 1.1.1.2.4.2 rmind /* Create/Open a listing output file if asked */ 744 1.1.1.2.4.2 rmind 745 1.1.1.2.4.2 rmind if (Gbl_ListingFlag) 746 1.1.1.2.4.2 rmind { 747 1.1.1.2.4.2 rmind Filename = FlGenerateFilename (FilenamePrefix, FILE_SUFFIX_LISTING); 748 1.1.1.2.4.2 rmind if (!Filename) 749 1.1.1.2.4.2 rmind { 750 1.1.1.2.4.2 rmind AslCommonError (ASL_ERROR, ASL_MSG_LISTING_FILENAME, 751 1.1.1.2.4.2 rmind 0, 0, 0, 0, NULL, NULL); 752 1.1.1.2.4.2 rmind return (AE_ERROR); 753 1.1.1.2.4.2 rmind } 754 1.1.1.2.4.2 rmind 755 1.1.1.2.4.2 rmind /* Open the listing file, text mode */ 756 1.1.1.2.4.2 rmind 757 1.1.1.2.4.2 rmind FlOpenFile (ASL_FILE_LISTING_OUTPUT, Filename, "w+"); 758 1.1.1.2.4.2 rmind 759 1.1.1.2.4.2 rmind AslCompilerSignon (ASL_FILE_LISTING_OUTPUT); 760 1.1.1.2.4.2 rmind AslCompilerFileHeader (ASL_FILE_LISTING_OUTPUT); 761 1.1.1.2.4.2 rmind } 762 1.1.1.2.4.2 rmind 763 1.1.1.2.4.2 rmind if (Gbl_FileType == ASL_INPUT_TYPE_ASCII_DATA) 764 1.1.1.2.4.2 rmind { 765 1.1.1.2.4.2 rmind return (AE_OK); 766 1.1.1.2.4.2 rmind } 767 1.1.1.2.4.2 rmind 768 1.1.1.2.4.2 rmind /* Create/Open a combined source output file */ 769 1.1.1.2.4.2 rmind 770 1.1.1.2.4.2 rmind Filename = FlGenerateFilename (FilenamePrefix, FILE_SUFFIX_SOURCE); 771 1.1.1.2.4.2 rmind if (!Filename) 772 1.1.1.2.4.2 rmind { 773 1.1.1.2.4.2 rmind AslCommonError (ASL_ERROR, ASL_MSG_LISTING_FILENAME, 774 1.1.1.2.4.2 rmind 0, 0, 0, 0, NULL, NULL); 775 1.1.1.2.4.2 rmind return (AE_ERROR); 776 1.1.1.2.4.2 rmind } 777 1.1.1.2.4.2 rmind 778 1.1.1.2.4.2 rmind /* 779 1.1.1.2.4.2 rmind * Open the source output file, binary mode (so that LF does not get 780 1.1.1.2.4.2 rmind * expanded to CR/LF on some systems, messing up our seek 781 1.1.1.2.4.2 rmind * calculations.) 782 1.1.1.2.4.2 rmind */ 783 1.1.1.2.4.2 rmind FlOpenFile (ASL_FILE_SOURCE_OUTPUT, Filename, "w+b"); 784 1.1.1.2.4.2 rmind 785 1.1.1.2.4.2 rmind /* Create/Open a assembly code source output file if asked */ 786 1.1.1.2.4.2 rmind 787 1.1.1.2.4.2 rmind if (Gbl_AsmOutputFlag) 788 1.1.1.2.4.2 rmind { 789 1.1.1.2.4.2 rmind Filename = FlGenerateFilename (FilenamePrefix, FILE_SUFFIX_ASM_SOURCE); 790 1.1.1.2.4.2 rmind if (!Filename) 791 1.1.1.2.4.2 rmind { 792 1.1.1.2.4.2 rmind AslCommonError (ASL_ERROR, ASL_MSG_LISTING_FILENAME, 793 1.1.1.2.4.2 rmind 0, 0, 0, 0, NULL, NULL); 794 1.1.1.2.4.2 rmind return (AE_ERROR); 795 1.1.1.2.4.2 rmind } 796 1.1.1.2.4.2 rmind 797 1.1.1.2.4.2 rmind /* Open the assembly code source file, text mode */ 798 1.1.1.2.4.2 rmind 799 1.1.1.2.4.2 rmind FlOpenFile (ASL_FILE_ASM_SOURCE_OUTPUT, Filename, "w+"); 800 1.1.1.2.4.2 rmind 801 1.1.1.2.4.2 rmind AslCompilerSignon (ASL_FILE_ASM_SOURCE_OUTPUT); 802 1.1.1.2.4.2 rmind AslCompilerFileHeader (ASL_FILE_ASM_SOURCE_OUTPUT); 803 1.1.1.2.4.2 rmind } 804 1.1.1.2.4.2 rmind 805 1.1.1.2.4.2 rmind /* Create/Open a C code source output file if asked */ 806 1.1.1.2.4.2 rmind 807 1.1.1.2.4.2 rmind if (Gbl_C_OutputFlag) 808 1.1.1.2.4.2 rmind { 809 1.1.1.2.4.2 rmind Filename = FlGenerateFilename (FilenamePrefix, FILE_SUFFIX_C_SOURCE); 810 1.1.1.2.4.2 rmind if (!Filename) 811 1.1.1.2.4.2 rmind { 812 1.1.1.2.4.2 rmind AslCommonError (ASL_ERROR, ASL_MSG_LISTING_FILENAME, 813 1.1.1.2.4.2 rmind 0, 0, 0, 0, NULL, NULL); 814 1.1.1.2.4.2 rmind return (AE_ERROR); 815 1.1.1.2.4.2 rmind } 816 1.1.1.2.4.2 rmind 817 1.1.1.2.4.2 rmind /* Open the C code source file, text mode */ 818 1.1.1.2.4.2 rmind 819 1.1.1.2.4.2 rmind FlOpenFile (ASL_FILE_C_SOURCE_OUTPUT, Filename, "w+"); 820 1.1.1.2.4.2 rmind 821 1.1.1.2.4.2 rmind FlPrintFile (ASL_FILE_C_SOURCE_OUTPUT, "/*\n"); 822 1.1.1.2.4.2 rmind AslCompilerSignon (ASL_FILE_C_SOURCE_OUTPUT); 823 1.1.1.2.4.2 rmind AslCompilerFileHeader (ASL_FILE_C_SOURCE_OUTPUT); 824 1.1.1.2.4.2 rmind } 825 1.1.1.2.4.2 rmind 826 1.1.1.2.4.2 rmind /* Create/Open a assembly include output file if asked */ 827 1.1.1.2.4.2 rmind 828 1.1.1.2.4.2 rmind if (Gbl_AsmIncludeOutputFlag) 829 1.1.1.2.4.2 rmind { 830 1.1.1.2.4.2 rmind Filename = FlGenerateFilename (FilenamePrefix, FILE_SUFFIX_ASM_INCLUDE); 831 1.1.1.2.4.2 rmind if (!Filename) 832 1.1.1.2.4.2 rmind { 833 1.1.1.2.4.2 rmind AslCommonError (ASL_ERROR, ASL_MSG_LISTING_FILENAME, 834 1.1.1.2.4.2 rmind 0, 0, 0, 0, NULL, NULL); 835 1.1.1.2.4.2 rmind return (AE_ERROR); 836 1.1.1.2.4.2 rmind } 837 1.1.1.2.4.2 rmind 838 1.1.1.2.4.2 rmind /* Open the assembly include file, text mode */ 839 1.1.1.2.4.2 rmind 840 1.1.1.2.4.2 rmind FlOpenFile (ASL_FILE_ASM_INCLUDE_OUTPUT, Filename, "w+"); 841 1.1.1.2.4.2 rmind 842 1.1.1.2.4.2 rmind AslCompilerSignon (ASL_FILE_ASM_INCLUDE_OUTPUT); 843 1.1.1.2.4.2 rmind AslCompilerFileHeader (ASL_FILE_ASM_INCLUDE_OUTPUT); 844 1.1.1.2.4.2 rmind } 845 1.1.1.2.4.2 rmind 846 1.1.1.2.4.2 rmind /* Create/Open a C include output file if asked */ 847 1.1.1.2.4.2 rmind 848 1.1.1.2.4.2 rmind if (Gbl_C_IncludeOutputFlag) 849 1.1.1.2.4.2 rmind { 850 1.1.1.2.4.2 rmind Filename = FlGenerateFilename (FilenamePrefix, FILE_SUFFIX_C_INCLUDE); 851 1.1.1.2.4.2 rmind if (!Filename) 852 1.1.1.2.4.2 rmind { 853 1.1.1.2.4.2 rmind AslCommonError (ASL_ERROR, ASL_MSG_LISTING_FILENAME, 854 1.1.1.2.4.2 rmind 0, 0, 0, 0, NULL, NULL); 855 1.1.1.2.4.2 rmind return (AE_ERROR); 856 1.1.1.2.4.2 rmind } 857 1.1.1.2.4.2 rmind 858 1.1.1.2.4.2 rmind /* Open the C include file, text mode */ 859 1.1.1.2.4.2 rmind 860 1.1.1.2.4.2 rmind FlOpenFile (ASL_FILE_C_INCLUDE_OUTPUT, Filename, "w+"); 861 1.1.1.2.4.2 rmind 862 1.1.1.2.4.2 rmind FlPrintFile (ASL_FILE_C_INCLUDE_OUTPUT, "/*\n"); 863 1.1.1.2.4.2 rmind AslCompilerSignon (ASL_FILE_C_INCLUDE_OUTPUT); 864 1.1.1.2.4.2 rmind AslCompilerFileHeader (ASL_FILE_C_INCLUDE_OUTPUT); 865 1.1.1.2.4.2 rmind } 866 1.1.1.2.4.2 rmind 867 1.1.1.2.4.2 rmind /* Create a namespace output file if asked */ 868 1.1.1.2.4.2 rmind 869 1.1.1.2.4.2 rmind if (Gbl_NsOutputFlag) 870 1.1.1.2.4.2 rmind { 871 1.1.1.2.4.2 rmind Filename = FlGenerateFilename (FilenamePrefix, FILE_SUFFIX_NAMESPACE); 872 1.1.1.2.4.2 rmind if (!Filename) 873 1.1.1.2.4.2 rmind { 874 1.1.1.2.4.2 rmind AslCommonError (ASL_ERROR, ASL_MSG_LISTING_FILENAME, 875 1.1.1.2.4.2 rmind 0, 0, 0, 0, NULL, NULL); 876 1.1.1.2.4.2 rmind return (AE_ERROR); 877 1.1.1.2.4.2 rmind } 878 1.1.1.2.4.2 rmind 879 1.1.1.2.4.2 rmind /* Open the namespace file, text mode */ 880 1.1.1.2.4.2 rmind 881 1.1.1.2.4.2 rmind FlOpenFile (ASL_FILE_NAMESPACE_OUTPUT, Filename, "w+"); 882 1.1.1.2.4.2 rmind 883 1.1.1.2.4.2 rmind AslCompilerSignon (ASL_FILE_NAMESPACE_OUTPUT); 884 1.1.1.2.4.2 rmind AslCompilerFileHeader (ASL_FILE_NAMESPACE_OUTPUT); 885 1.1.1.2.4.2 rmind } 886 1.1.1.2.4.2 rmind 887 1.1.1.2.4.2 rmind return (AE_OK); 888 1.1.1.2.4.2 rmind } 889 1.1.1.2.4.2 rmind 890 1.1.1.2.4.2 rmind 891 1.1.1.2.4.2 rmind #ifdef ACPI_OBSOLETE_FUNCTIONS 892 1.1.1.2.4.2 rmind /******************************************************************************* 893 1.1.1.2.4.2 rmind * 894 1.1.1.2.4.2 rmind * FUNCTION: FlParseInputPathname 895 1.1.1.2.4.2 rmind * 896 1.1.1.2.4.2 rmind * PARAMETERS: InputFilename - The user-specified ASL source file to be 897 1.1.1.2.4.2 rmind * compiled 898 1.1.1.2.4.2 rmind * 899 1.1.1.2.4.2 rmind * RETURN: Status 900 1.1.1.2.4.2 rmind * 901 1.1.1.2.4.2 rmind * DESCRIPTION: Split the input path into a directory and filename part 902 1.1.1.2.4.2 rmind * 1) Directory part used to open include files 903 1.1.1.2.4.2 rmind * 2) Filename part used to generate output filenames 904 1.1.1.2.4.2 rmind * 905 1.1.1.2.4.2 rmind ******************************************************************************/ 906 1.1.1.2.4.2 rmind 907 1.1.1.2.4.2 rmind ACPI_STATUS 908 1.1.1.2.4.2 rmind FlParseInputPathname ( 909 1.1.1.2.4.2 rmind char *InputFilename) 910 1.1.1.2.4.2 rmind { 911 1.1.1.2.4.2 rmind char *Substring; 912 1.1.1.2.4.2 rmind 913 1.1.1.2.4.2 rmind 914 1.1.1.2.4.2 rmind if (!InputFilename) 915 1.1.1.2.4.2 rmind { 916 1.1.1.2.4.2 rmind return (AE_OK); 917 1.1.1.2.4.2 rmind } 918 1.1.1.2.4.2 rmind 919 1.1.1.2.4.2 rmind /* Get the path to the input filename's directory */ 920 1.1.1.2.4.2 rmind 921 1.1.1.2.4.2 rmind Gbl_DirectoryPath = strdup (InputFilename); 922 1.1.1.2.4.2 rmind if (!Gbl_DirectoryPath) 923 1.1.1.2.4.2 rmind { 924 1.1.1.2.4.2 rmind return (AE_NO_MEMORY); 925 1.1.1.2.4.2 rmind } 926 1.1.1.2.4.2 rmind 927 1.1.1.2.4.2 rmind Substring = strrchr (Gbl_DirectoryPath, '\\'); 928 1.1.1.2.4.2 rmind if (!Substring) 929 1.1.1.2.4.2 rmind { 930 1.1.1.2.4.2 rmind Substring = strrchr (Gbl_DirectoryPath, '/'); 931 1.1.1.2.4.2 rmind if (!Substring) 932 1.1.1.2.4.2 rmind { 933 1.1.1.2.4.2 rmind Substring = strrchr (Gbl_DirectoryPath, ':'); 934 1.1.1.2.4.2 rmind } 935 1.1.1.2.4.2 rmind } 936 1.1.1.2.4.2 rmind 937 1.1.1.2.4.2 rmind if (!Substring) 938 1.1.1.2.4.2 rmind { 939 1.1.1.2.4.2 rmind Gbl_DirectoryPath[0] = 0; 940 1.1.1.2.4.2 rmind if (Gbl_UseDefaultAmlFilename) 941 1.1.1.2.4.2 rmind { 942 1.1.1.2.4.2 rmind Gbl_OutputFilenamePrefix = strdup (InputFilename); 943 1.1.1.2.4.2 rmind } 944 1.1.1.2.4.2 rmind } 945 1.1.1.2.4.2 rmind else 946 1.1.1.2.4.2 rmind { 947 1.1.1.2.4.2 rmind if (Gbl_UseDefaultAmlFilename) 948 1.1.1.2.4.2 rmind { 949 1.1.1.2.4.2 rmind Gbl_OutputFilenamePrefix = strdup (Substring + 1); 950 1.1.1.2.4.2 rmind } 951 1.1.1.2.4.2 rmind *(Substring+1) = 0; 952 1.1.1.2.4.2 rmind } 953 1.1.1.2.4.2 rmind 954 1.1.1.2.4.2 rmind return (AE_OK); 955 1.1.1.2.4.2 rmind } 956 1.1.1.2.4.2 rmind #endif 957 1.1.1.2.4.2 rmind 958 1.1.1.2.4.2 rmind 959
Indexes created Fri Oct 03 23:09:56 GMT 2025