1 /****************************************************************************** 2 * 3 * Module Name: dtio.c - File I/O support for data table compiler 4 * 5 *****************************************************************************/ 6 7 /****************************************************************************** 8 * 9 * 1. Copyright Notice 10 * 11 * Some or all of this work - Copyright (c) 1999 - 2023, Intel Corp. 12 * All rights reserved. 13 * 14 * 2. License 15 * 16 * 2.1. This is your license from Intel Corp. under its intellectual property 17 * rights. You may have additional license terms from the party that provided 18 * you this software, covering your right to use that party's intellectual 19 * property rights. 20 * 21 * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a 22 * copy of the source code appearing in this file ("Covered Code") an 23 * irrevocable, perpetual, worldwide license under Intel's copyrights in the 24 * base code distributed originally by Intel ("Original Intel Code") to copy, 25 * make derivatives, distribute, use and display any portion of the Covered 26 * Code in any form, with the right to sublicense such rights; and 27 * 28 * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent 29 * license (with the right to sublicense), under only those claims of Intel 30 * patents that are infringed by the Original Intel Code, to make, use, sell, 31 * offer to sell, and import the Covered Code and derivative works thereof 32 * solely to the minimum extent necessary to exercise the above copyright 33 * license, and in no event shall the patent license extend to any additions 34 * to or modifications of the Original Intel Code. No other license or right 35 * is granted directly or by implication, estoppel or otherwise; 36 * 37 * The above copyright and patent license is granted only if the following 38 * conditions are met: 39 * 40 * 3. Conditions 41 * 42 * 3.1. Redistribution of Source with Rights to Further Distribute Source. 43 * Redistribution of source code of any substantial portion of the Covered 44 * Code or modification with rights to further distribute source must include 45 * the above Copyright Notice, the above License, this list of Conditions, 46 * and the following Disclaimer and Export Compliance provision. In addition, 47 * Licensee must cause all Covered Code to which Licensee contributes to 48 * contain a file documenting the changes Licensee made to create that Covered 49 * Code and the date of any change. Licensee must include in that file the 50 * documentation of any changes made by any predecessor Licensee. Licensee 51 * must include a prominent statement that the modification is derived, 52 * directly or indirectly, from Original Intel Code. 53 * 54 * 3.2. Redistribution of Source with no Rights to Further Distribute Source. 55 * Redistribution of source code of any substantial portion of the Covered 56 * Code or modification without rights to further distribute source must 57 * include the following Disclaimer and Export Compliance provision in the 58 * documentation and/or other materials provided with distribution. In 59 * addition, Licensee may not authorize further sublicense of source of any 60 * portion of the Covered Code, and must include terms to the effect that the 61 * license from Licensee to its licensee is limited to the intellectual 62 * property embodied in the software Licensee provides to its licensee, and 63 * not to intellectual property embodied in modifications its licensee may 64 * make. 65 * 66 * 3.3. Redistribution of Executable. Redistribution in executable form of any 67 * substantial portion of the Covered Code or modification must reproduce the 68 * above Copyright Notice, and the following Disclaimer and Export Compliance 69 * provision in the documentation and/or other materials provided with the 70 * distribution. 71 * 72 * 3.4. Intel retains all right, title, and interest in and to the Original 73 * Intel Code. 74 * 75 * 3.5. Neither the name Intel nor any other trademark owned or controlled by 76 * Intel shall be used in advertising or otherwise to promote the sale, use or 77 * other dealings in products derived from or relating to the Covered Code 78 * without prior written authorization from Intel. 79 * 80 * 4. Disclaimer and Export Compliance 81 * 82 * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED 83 * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE 84 * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE, 85 * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY 86 * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY 87 * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A 88 * PARTICULAR PURPOSE. 89 * 90 * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES 91 * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR 92 * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT, 93 * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY 94 * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL 95 * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS 96 * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY 97 * LIMITED REMEDY. 98 * 99 * 4.3. Licensee shall not export, either directly or indirectly, any of this 100 * software or system incorporating such software without first obtaining any 101 * required license or other approval from the U. S. Department of Commerce or 102 * any other agency or department of the United States Government. In the 103 * event Licensee exports any such software from the United States or 104 * re-exports any such software from a foreign destination, Licensee shall 105 * ensure that the distribution and export/re-export of the software is in 106 * compliance with all laws, regulations, orders, or other restrictions of the 107 * U.S. Export Administration Regulations. Licensee agrees that neither it nor 108 * any of its subsidiaries will export/re-export any technical data, process, 109 * software, or service, directly or indirectly, to any country for which the 110 * United States government or any agency thereof requires an export license, 111 * other governmental approval, or letter of assurance, without first obtaining 112 * such license, approval or letter. 113 * 114 ***************************************************************************** 115 * 116 * Alternatively, you may choose to be licensed under the terms of the 117 * following license: 118 * 119 * Redistribution and use in source and binary forms, with or without 120 * modification, are permitted provided that the following conditions 121 * are met: 122 * 1. Redistributions of source code must retain the above copyright 123 * notice, this list of conditions, and the following disclaimer, 124 * without modification. 125 * 2. Redistributions in binary form must reproduce at minimum a disclaimer 126 * substantially similar to the "NO WARRANTY" disclaimer below 127 * ("Disclaimer") and any redistribution must be conditioned upon 128 * including a substantially similar Disclaimer requirement for further 129 * binary redistribution. 130 * 3. Neither the names of the above-listed copyright holders nor the names 131 * of any contributors may be used to endorse or promote products derived 132 * from this software without specific prior written permission. 133 * 134 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 135 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 136 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR 137 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 138 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 139 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT 140 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 141 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 142 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 143 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 144 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 145 * 146 * Alternatively, you may choose to be licensed under the terms of the 147 * GNU General Public License ("GPL") version 2 as published by the Free 148 * Software Foundation. 149 * 150 *****************************************************************************/ 151 152 #include <contrib/dev/acpica/compiler/aslcompiler.h> 153 #include <contrib/dev/acpica/include/acapps.h> 154 155 #define _COMPONENT DT_COMPILER 156 ACPI_MODULE_NAME ("dtio") 157 158 159 /* Local prototypes */ 160 161 static char * 162 DtTrim ( 163 char *String); 164 165 static ACPI_STATUS 166 DtParseLine ( 167 char *LineBuffer, 168 UINT32 Line, 169 UINT32 Offset); 170 171 static void 172 DtWriteBinary ( 173 DT_SUBTABLE *Subtable, 174 void *Context, 175 void *ReturnValue); 176 177 static void 178 DtDumpBuffer ( 179 UINT32 FileId, 180 UINT8 *Buffer, 181 UINT32 Offset, 182 UINT32 Length); 183 184 static void 185 DtDumpSubtableInfo ( 186 DT_SUBTABLE *Subtable, 187 void *Context, 188 void *ReturnValue); 189 190 static void 191 DtDumpSubtableTree ( 192 DT_SUBTABLE *Subtable, 193 void *Context, 194 void *ReturnValue); 195 196 197 /* States for DtGetNextLine */ 198 199 #define DT_NORMAL_TEXT 0 200 #define DT_START_QUOTED_STRING 1 201 #define DT_START_COMMENT 2 202 #define DT_SLASH_ASTERISK_COMMENT 3 203 #define DT_SLASH_SLASH_COMMENT 4 204 #define DT_END_COMMENT 5 205 #define DT_MERGE_LINES 6 206 #define DT_ESCAPE_SEQUENCE 7 207 208 static UINT32 AslGbl_NextLineOffset; 209 210 211 /****************************************************************************** 212 * 213 * FUNCTION: DtTrim 214 * 215 * PARAMETERS: String - Current source code line to trim 216 * 217 * RETURN: Trimmed line. Must be freed by caller. 218 * 219 * DESCRIPTION: Trim left and right spaces 220 * 221 *****************************************************************************/ 222 223 static char * 224 DtTrim ( 225 char *String) 226 { 227 char *Start; 228 char *End; 229 char *ReturnString; 230 ACPI_SIZE Length; 231 232 233 /* Skip lines that start with a space */ 234 235 if (*String == 0 || !strcmp (String, " ")) 236 { 237 ReturnString = UtLocalCacheCalloc (1); 238 return (ReturnString); 239 } 240 241 /* Setup pointers to start and end of input string */ 242 243 Start = String; 244 End = String + strlen (String) - 1; 245 246 /* Find first non-whitespace character */ 247 248 while ((Start <= End) && ((*Start == ' ') || (*Start == '\t'))) 249 { 250 Start++; 251 } 252 253 /* Find last non-space character */ 254 255 while (End >= Start) 256 { 257 if (*End == '\n') 258 { 259 End--; 260 continue; 261 } 262 263 if (*End != ' ') 264 { 265 break; 266 } 267 268 End--; 269 } 270 271 /* Remove any quotes around the string */ 272 273 if (*Start == '\"') 274 { 275 Start++; 276 } 277 if (*End == '\"') 278 { 279 End--; 280 } 281 282 /* Create the trimmed return string */ 283 284 Length = ACPI_PTR_DIFF (End, Start) + 1; 285 ReturnString = UtLocalCacheCalloc (Length + 1); 286 if (strlen (Start)) 287 { 288 strncpy (ReturnString, Start, Length); 289 } 290 291 ReturnString[Length] = 0; 292 return (ReturnString); 293 } 294 295 296 /****************************************************************************** 297 * 298 * FUNCTION: DtParseLine 299 * 300 * PARAMETERS: LineBuffer - Current source code line 301 * Line - Current line number in the source 302 * Offset - Current byte offset of the line 303 * 304 * RETURN: Status 305 * 306 * DESCRIPTION: Parse one source line 307 * 308 *****************************************************************************/ 309 310 static ACPI_STATUS 311 DtParseLine ( 312 char *LineBuffer, 313 UINT32 Line, 314 UINT32 Offset) 315 { 316 char *Start; 317 char *End; 318 char *TmpName; 319 char *TmpValue; 320 char *Name; 321 char *Value; 322 char *Colon; 323 UINT32 Length; 324 DT_FIELD *Field; 325 UINT32 Column; 326 UINT32 NameColumn; 327 BOOLEAN IsNullString = FALSE; 328 329 330 if (!LineBuffer) 331 { 332 return (AE_OK); 333 } 334 335 /* All lines after "Raw Table Data" are ignored */ 336 337 if (strstr (LineBuffer, ACPI_RAW_TABLE_DATA_HEADER)) 338 { 339 return (AE_NOT_FOUND); 340 } 341 342 Colon = strchr (LineBuffer, ':'); 343 if (!Colon) 344 { 345 return (AE_OK); 346 } 347 348 Start = LineBuffer; 349 End = Colon; 350 351 while (Start < Colon) 352 { 353 if (*Start == '[') 354 { 355 /* Found left bracket, go to the right bracket */ 356 357 while (Start < Colon && *Start != ']') 358 { 359 Start++; 360 } 361 } 362 else if (*Start != ' ') 363 { 364 break; 365 } 366 367 Start++; 368 } 369 370 /* 371 * There are two column values. One for the field name, 372 * and one for the field value. 373 */ 374 Column = ACPI_PTR_DIFF (Colon, LineBuffer) + 3; 375 NameColumn = ACPI_PTR_DIFF (Start, LineBuffer) + 1; 376 377 Length = ACPI_PTR_DIFF (End, Start); 378 379 TmpName = UtLocalCalloc (Length + 1); 380 strncpy (TmpName, Start, Length); 381 Name = DtTrim (TmpName); 382 ACPI_FREE (TmpName); 383 384 Start = End = (Colon + 1); 385 while (*End) 386 { 387 /* Found left quotation, go to the right quotation and break */ 388 389 if (*End == '"') 390 { 391 End++; 392 393 /* Check for an explicit null string */ 394 395 if (*End == '"') 396 { 397 IsNullString = TRUE; 398 } 399 while (*End && (*End != '"')) 400 { 401 End++; 402 } 403 404 End++; 405 break; 406 } 407 408 /* 409 * Special "comment" fields at line end, ignore them. 410 * Note: normal slash-slash and slash-asterisk comments are 411 * stripped already by the DtGetNextLine parser. 412 * 413 * TBD: Perhaps DtGetNextLine should parse the following type 414 * of comments also. 415 */ 416 if (*End == '[') 417 { 418 End--; 419 break; 420 } 421 422 End++; 423 } 424 425 Length = ACPI_PTR_DIFF (End, Start); 426 TmpValue = UtLocalCalloc (Length + 1); 427 428 strncpy (TmpValue, Start, Length); 429 Value = DtTrim (TmpValue); 430 ACPI_FREE (TmpValue); 431 432 /* Create a new field object only if we have a valid value field */ 433 434 if ((Value && *Value) || IsNullString) 435 { 436 Field = UtFieldCacheCalloc (); 437 Field->Name = Name; 438 Field->Value = Value; 439 Field->Line = Line; 440 Field->ByteOffset = Offset; 441 Field->NameColumn = NameColumn; 442 Field->Column = Column; 443 Field->StringLength = Length; 444 445 DtLinkField (Field); 446 } 447 /* Else -- Ignore this field, it has no valid data */ 448 449 return (AE_OK); 450 } 451 452 453 /****************************************************************************** 454 * 455 * FUNCTION: DtGetNextLine 456 * 457 * PARAMETERS: Handle - Open file handle for the source file 458 * 459 * RETURN: Filled line buffer and offset of start-of-line (ASL_EOF on EOF) 460 * 461 * DESCRIPTION: Get the next valid source line. Removes all comments. 462 * Ignores empty lines. 463 * 464 * Handles both slash-asterisk and slash-slash comments. 465 * Also, quoted strings, but no escapes within. 466 * 467 * Line is returned in AslGbl_CurrentLineBuffer. 468 * Line number in original file is returned in AslGbl_CurrentLineNumber. 469 * 470 *****************************************************************************/ 471 472 UINT32 473 DtGetNextLine ( 474 FILE *Handle, 475 UINT32 Flags) 476 { 477 BOOLEAN LineNotAllBlanks = FALSE; 478 UINT32 State = DT_NORMAL_TEXT; 479 UINT32 CurrentLineOffset; 480 UINT32 i; 481 int c; 482 int c1; 483 484 485 memset (AslGbl_CurrentLineBuffer, 0, AslGbl_LineBufferSize); 486 for (i = 0; ;) 487 { 488 /* 489 * If line is too long, expand the line buffers. Also increases 490 * AslGbl_LineBufferSize. 491 */ 492 if (i >= AslGbl_LineBufferSize) 493 { 494 UtExpandLineBuffers (); 495 } 496 497 c = getc (Handle); 498 if (c == EOF) 499 { 500 switch (State) 501 { 502 case DT_START_QUOTED_STRING: 503 case DT_SLASH_ASTERISK_COMMENT: 504 505 AcpiOsPrintf ("**** EOF within comment/string %u\n", State); 506 break; 507 508 default: 509 510 break; 511 } 512 513 /* Standalone EOF is OK */ 514 515 if (i == 0) 516 { 517 return (ASL_EOF); 518 } 519 520 /* 521 * Received an EOF in the middle of a line. Terminate the 522 * line with a newline. The next call to this function will 523 * return a standalone EOF. Thus, the upper parsing software 524 * never has to deal with an EOF within a valid line (or 525 * the last line does not get tossed on the floor.) 526 */ 527 c = '\n'; 528 State = DT_NORMAL_TEXT; 529 } 530 else if (c == '\r') 531 { 532 c1 = getc (Handle); 533 if (c1 == '\n') 534 { 535 /* 536 * Skip the carriage return as if it didn't exist. This is 537 * onlt meant for input files in DOS format in unix. fopen in 538 * unix may not support "text mode" and leaves CRLF intact. 539 */ 540 c = '\n'; 541 } 542 else 543 { 544 /* This was not a CRLF. Only a CR */ 545 546 ungetc(c1, Handle); 547 548 DtFatal (ASL_MSG_COMPILER_INTERNAL, NULL, 549 "Carriage return without linefeed detected"); 550 return (ASL_EOF); 551 } 552 } 553 554 switch (State) 555 { 556 case DT_NORMAL_TEXT: 557 558 /* Normal text, insert char into line buffer */ 559 560 AslGbl_CurrentLineBuffer[i] = (char) c; 561 switch (c) 562 { 563 case '/': 564 565 State = DT_START_COMMENT; 566 break; 567 568 case '"': 569 570 State = DT_START_QUOTED_STRING; 571 LineNotAllBlanks = TRUE; 572 i++; 573 break; 574 575 case '\\': 576 /* 577 * The continuation char MUST be last char on this line. 578 * Otherwise, it will be assumed to be a valid ASL char. 579 */ 580 State = DT_MERGE_LINES; 581 break; 582 583 case '\n': 584 585 CurrentLineOffset = AslGbl_NextLineOffset; 586 AslGbl_NextLineOffset = (UINT32) ftell (Handle); 587 AslGbl_CurrentLineNumber++; 588 589 /* 590 * Exit if line is complete. Ignore empty lines (only \n) 591 * or lines that contain nothing but blanks. 592 */ 593 if ((i != 0) && LineNotAllBlanks) 594 { 595 if ((i + 1) >= AslGbl_LineBufferSize) 596 { 597 UtExpandLineBuffers (); 598 } 599 600 AslGbl_CurrentLineBuffer[i+1] = 0; /* Terminate string */ 601 return (CurrentLineOffset); 602 } 603 604 /* Toss this line and start a new one */ 605 606 i = 0; 607 LineNotAllBlanks = FALSE; 608 break; 609 610 default: 611 612 if (c != ' ') 613 { 614 LineNotAllBlanks = TRUE; 615 } 616 617 i++; 618 break; 619 } 620 break; 621 622 case DT_START_QUOTED_STRING: 623 624 /* Insert raw chars until end of quoted string */ 625 626 AslGbl_CurrentLineBuffer[i] = (char) c; 627 i++; 628 629 switch (c) 630 { 631 case '"': 632 633 State = DT_NORMAL_TEXT; 634 break; 635 636 case '\\': 637 638 State = DT_ESCAPE_SEQUENCE; 639 break; 640 641 case '\n': 642 643 if (!(Flags & DT_ALLOW_MULTILINE_QUOTES)) 644 { 645 AcpiOsPrintf ( 646 "ERROR at line %u: Unterminated quoted string\n", 647 AslGbl_CurrentLineNumber++); 648 State = DT_NORMAL_TEXT; 649 } 650 break; 651 652 default: /* Get next character */ 653 654 break; 655 } 656 break; 657 658 case DT_ESCAPE_SEQUENCE: 659 660 /* Just copy the escaped character. TBD: sufficient for table compiler? */ 661 662 AslGbl_CurrentLineBuffer[i] = (char) c; 663 i++; 664 State = DT_START_QUOTED_STRING; 665 break; 666 667 case DT_START_COMMENT: 668 669 /* Open comment if this character is an asterisk or slash */ 670 671 switch (c) 672 { 673 case '*': 674 675 State = DT_SLASH_ASTERISK_COMMENT; 676 break; 677 678 case '/': 679 680 State = DT_SLASH_SLASH_COMMENT; 681 break; 682 683 default: /* Not a comment */ 684 685 i++; /* Save the preceding slash */ 686 if (i >= AslGbl_LineBufferSize) 687 { 688 UtExpandLineBuffers (); 689 } 690 691 AslGbl_CurrentLineBuffer[i] = (char) c; 692 i++; 693 State = DT_NORMAL_TEXT; 694 break; 695 } 696 break; 697 698 case DT_SLASH_ASTERISK_COMMENT: 699 700 /* Ignore chars until an asterisk-slash is found */ 701 702 switch (c) 703 { 704 case '\n': 705 706 AslGbl_NextLineOffset = (UINT32) ftell (Handle); 707 AslGbl_CurrentLineNumber++; 708 break; 709 710 case '*': 711 712 State = DT_END_COMMENT; 713 break; 714 715 default: 716 717 break; 718 } 719 break; 720 721 case DT_SLASH_SLASH_COMMENT: 722 723 /* Ignore chars until end-of-line */ 724 725 if (c == '\n') 726 { 727 /* We will exit via the NORMAL_TEXT path */ 728 729 ungetc (c, Handle); 730 State = DT_NORMAL_TEXT; 731 } 732 break; 733 734 case DT_END_COMMENT: 735 736 /* End comment if this char is a slash */ 737 738 switch (c) 739 { 740 case '/': 741 742 State = DT_NORMAL_TEXT; 743 break; 744 745 case '\n': 746 747 AslGbl_NextLineOffset = (UINT32) ftell (Handle); 748 AslGbl_CurrentLineNumber++; 749 break; 750 751 case '*': 752 753 /* Consume all adjacent asterisks */ 754 break; 755 756 default: 757 758 State = DT_SLASH_ASTERISK_COMMENT; 759 break; 760 } 761 break; 762 763 case DT_MERGE_LINES: 764 765 if (c != '\n') 766 { 767 /* 768 * This is not a continuation backslash, it is a normal 769 * normal ASL backslash - for example: Scope(\_SB_) 770 */ 771 i++; /* Keep the backslash that is already in the buffer */ 772 773 ungetc (c, Handle); 774 State = DT_NORMAL_TEXT; 775 } 776 else 777 { 778 /* 779 * This is a continuation line -- a backlash followed 780 * immediately by a newline. Insert a space between the 781 * lines (overwrite the backslash) 782 */ 783 AslGbl_CurrentLineBuffer[i] = ' '; 784 i++; 785 786 /* Ignore newline, this will merge the lines */ 787 788 AslGbl_NextLineOffset = (UINT32) ftell (Handle); 789 AslGbl_CurrentLineNumber++; 790 State = DT_NORMAL_TEXT; 791 } 792 break; 793 794 default: 795 796 DtFatal (ASL_MSG_COMPILER_INTERNAL, NULL, "Unknown input state"); 797 return (ASL_EOF); 798 } 799 } 800 } 801 802 803 /****************************************************************************** 804 * 805 * FUNCTION: DtScanFile 806 * 807 * PARAMETERS: Handle - Open file handle for the source file 808 * 809 * RETURN: Pointer to start of the constructed parse tree. 810 * 811 * DESCRIPTION: Scan source file, link all field names and values 812 * to the global parse tree: AslGbl_FieldList 813 * 814 *****************************************************************************/ 815 816 DT_FIELD * 817 DtScanFile ( 818 FILE *Handle) 819 { 820 ACPI_STATUS Status; 821 UINT32 Offset; 822 823 824 ACPI_FUNCTION_NAME (DtScanFile); 825 826 827 /* Get the file size */ 828 829 AslGbl_InputByteCount = CmGetFileSize (Handle); 830 if (AslGbl_InputByteCount == ACPI_UINT32_MAX) 831 { 832 AslAbort (); 833 } 834 835 AslGbl_CurrentLineNumber = 0; 836 AslGbl_CurrentLineOffset = 0; 837 AslGbl_NextLineOffset = 0; 838 839 /* Scan line-by-line */ 840 841 while ((Offset = DtGetNextLine (Handle, 0)) != ASL_EOF) 842 { 843 ACPI_DEBUG_PRINT ((ACPI_DB_PARSE, "Line %2.2u/%4.4X - %s", 844 AslGbl_CurrentLineNumber, Offset, AslGbl_CurrentLineBuffer)); 845 846 Status = DtParseLine (AslGbl_CurrentLineBuffer, 847 AslGbl_CurrentLineNumber, Offset); 848 if (Status == AE_NOT_FOUND) 849 { 850 break; 851 } 852 } 853 854 /* Dump the parse tree if debug enabled */ 855 856 DtDumpFieldList (AslGbl_FieldList); 857 return (AslGbl_FieldList); 858 } 859 860 861 /* 862 * Output functions 863 */ 864 865 /****************************************************************************** 866 * 867 * FUNCTION: DtWriteBinary 868 * 869 * PARAMETERS: DT_WALK_CALLBACK 870 * 871 * RETURN: Status 872 * 873 * DESCRIPTION: Write one subtable of a binary ACPI table 874 * 875 *****************************************************************************/ 876 877 static void 878 DtWriteBinary ( 879 DT_SUBTABLE *Subtable, 880 void *Context, 881 void *ReturnValue) 882 { 883 884 FlWriteFile (ASL_FILE_AML_OUTPUT, Subtable->Buffer, Subtable->Length); 885 } 886 887 888 /****************************************************************************** 889 * 890 * FUNCTION: DtOutputBinary 891 * 892 * PARAMETERS: 893 * 894 * RETURN: Status 895 * 896 * DESCRIPTION: Write entire binary ACPI table (result of compilation) 897 * 898 *****************************************************************************/ 899 900 void 901 DtOutputBinary ( 902 DT_SUBTABLE *RootTable) 903 { 904 905 if (!RootTable) 906 { 907 return; 908 } 909 910 /* Walk the entire parse tree, emitting the binary data */ 911 912 DtWalkTableTree (RootTable, DtWriteBinary, NULL, NULL); 913 914 AslGbl_TableLength = CmGetFileSize (AslGbl_Files[ASL_FILE_AML_OUTPUT].Handle); 915 if (AslGbl_TableLength == ACPI_UINT32_MAX) 916 { 917 AslAbort (); 918 } 919 } 920 921 922 /* 923 * Listing support 924 */ 925 926 /****************************************************************************** 927 * 928 * FUNCTION: DtDumpBuffer 929 * 930 * PARAMETERS: FileID - Where to write buffer data 931 * Buffer - Buffer to dump 932 * Offset - Offset in current table 933 * Length - Buffer Length 934 * 935 * RETURN: None 936 * 937 * DESCRIPTION: Another copy of DumpBuffer routine (unfortunately). 938 * 939 * TBD: merge dump buffer routines 940 * 941 *****************************************************************************/ 942 943 static void 944 DtDumpBuffer ( 945 UINT32 FileId, 946 UINT8 *Buffer, 947 UINT32 Offset, 948 UINT32 Length) 949 { 950 UINT32 i; 951 UINT32 j; 952 UINT8 BufChar; 953 954 955 FlPrintFile (FileId, "Output: [%3.3Xh %4.4d %3.3Xh] ", 956 Offset, Offset, Length); 957 958 i = 0; 959 while (i < Length) 960 { 961 if (i >= 16) 962 { 963 FlPrintFile (FileId, "%24s", ""); 964 } 965 966 /* Print 16 hex chars */ 967 968 for (j = 0; j < 16;) 969 { 970 if (i + j >= Length) 971 { 972 /* Dump fill spaces */ 973 974 FlPrintFile (FileId, " "); 975 j++; 976 continue; 977 } 978 979 FlPrintFile (FileId, "%02X ", Buffer[i+j]); 980 j++; 981 } 982 983 FlPrintFile (FileId, " "); 984 for (j = 0; j < 16; j++) 985 { 986 if (i + j >= Length) 987 { 988 FlPrintFile (FileId, "\n\n"); 989 return; 990 } 991 992 BufChar = Buffer[(ACPI_SIZE) i + j]; 993 if (isprint (BufChar)) 994 { 995 FlPrintFile (FileId, "%c", BufChar); 996 } 997 else 998 { 999 FlPrintFile (FileId, "."); 1000 } 1001 } 1002 1003 /* Done with that line. */ 1004 1005 FlPrintFile (FileId, "\n"); 1006 i += 16; 1007 } 1008 1009 FlPrintFile (FileId, "\n\n"); 1010 } 1011 1012 1013 /****************************************************************************** 1014 * 1015 * FUNCTION: DtDumpFieldList 1016 * 1017 * PARAMETERS: Field - Root field 1018 * 1019 * RETURN: None 1020 * 1021 * DESCRIPTION: Dump the entire field list 1022 * 1023 *****************************************************************************/ 1024 1025 void 1026 DtDumpFieldList ( 1027 DT_FIELD *Field) 1028 { 1029 1030 if (!AslGbl_DebugFlag || !Field) 1031 { 1032 return; 1033 } 1034 1035 DbgPrint (ASL_DEBUG_OUTPUT, "\nField List:\n" 1036 "LineNo ByteOff NameCol Column TableOff " 1037 "Flags %32s : %s\n\n", "Name", "Value"); 1038 1039 while (Field) 1040 { 1041 DbgPrint (ASL_DEBUG_OUTPUT, 1042 "%.08X %.08X %.08X %.08X %.08X %2.2X %32s : %s\n", 1043 Field->Line, Field->ByteOffset, Field->NameColumn, 1044 Field->Column, Field->TableOffset, Field->Flags, 1045 Field->Name, Field->Value); 1046 1047 Field = Field->Next; 1048 } 1049 1050 DbgPrint (ASL_DEBUG_OUTPUT, "\n\n"); 1051 } 1052 1053 1054 /****************************************************************************** 1055 * 1056 * FUNCTION: DtDumpSubtableInfo, DtDumpSubtableTree 1057 * 1058 * PARAMETERS: DT_WALK_CALLBACK 1059 * 1060 * RETURN: None 1061 * 1062 * DESCRIPTION: Info - dump a subtable tree entry with extra information. 1063 * Tree - dump a subtable tree formatted by depth indentation. 1064 * 1065 *****************************************************************************/ 1066 1067 static void 1068 DtDumpSubtableInfo ( 1069 DT_SUBTABLE *Subtable, 1070 void *Context, 1071 void *ReturnValue) 1072 { 1073 1074 DbgPrint (ASL_DEBUG_OUTPUT, 1075 "[%.04X] %24s %.08X %.08X %.08X %.08X %p %p %p %p\n", 1076 Subtable->Depth, Subtable->Name, Subtable->Length, Subtable->TotalLength, 1077 Subtable->SizeOfLengthField, Subtable->Flags, Subtable, 1078 Subtable->Parent, Subtable->Child, Subtable->Peer); 1079 } 1080 1081 static void 1082 DtDumpSubtableTree ( 1083 DT_SUBTABLE *Subtable, 1084 void *Context, 1085 void *ReturnValue) 1086 { 1087 1088 DbgPrint (ASL_DEBUG_OUTPUT, 1089 "[%.04X] %24s %*s%p (%.02X) - (%.02X) %.02X\n", 1090 Subtable->Depth, Subtable->Name, (4 * Subtable->Depth), " ", 1091 Subtable, Subtable->Length, Subtable->TotalLength, *Subtable->Buffer); 1092 } 1093 1094 1095 /****************************************************************************** 1096 * 1097 * FUNCTION: DtDumpSubtableList 1098 * 1099 * PARAMETERS: None 1100 * 1101 * RETURN: None 1102 * 1103 * DESCRIPTION: Dump the raw list of subtables with information, and also 1104 * dump the subtable list in formatted tree format. Assists with 1105 * the development of new table code. 1106 * 1107 *****************************************************************************/ 1108 1109 void 1110 DtDumpSubtableList ( 1111 void) 1112 { 1113 1114 if (!AslGbl_DebugFlag || !AslGbl_RootTable) 1115 { 1116 return; 1117 } 1118 1119 DbgPrint (ASL_DEBUG_OUTPUT, 1120 "Subtable Info:\n" 1121 "Depth Name Length TotalLen LenSize Flags " 1122 "This Parent Child Peer\n\n"); 1123 DtWalkTableTree (AslGbl_RootTable, DtDumpSubtableInfo, NULL, NULL); 1124 1125 DbgPrint (ASL_DEBUG_OUTPUT, 1126 "\nSubtable Tree: (Depth, Name, Subtable, Length, TotalLength, Integer Value)\n\n"); 1127 DtWalkTableTree (AslGbl_RootTable, DtDumpSubtableTree, NULL, NULL); 1128 1129 DbgPrint (ASL_DEBUG_OUTPUT, "\n"); 1130 } 1131 1132 1133 /****************************************************************************** 1134 * 1135 * FUNCTION: DtWriteFieldToListing 1136 * 1137 * PARAMETERS: Buffer - Contains the compiled data 1138 * Field - Field node for the input line 1139 * Length - Length of the output data 1140 * 1141 * RETURN: None 1142 * 1143 * DESCRIPTION: Write one field to the listing file (if listing is enabled). 1144 * 1145 *****************************************************************************/ 1146 1147 void 1148 DtWriteFieldToListing ( 1149 UINT8 *Buffer, 1150 DT_FIELD *Field, 1151 UINT32 Length) 1152 { 1153 UINT8 FileByte; 1154 1155 1156 if (!AslGbl_ListingFlag || !Field) 1157 { 1158 return; 1159 } 1160 1161 /* Dump the original source line */ 1162 1163 FlPrintFile (ASL_FILE_LISTING_OUTPUT, "Input: "); 1164 FlSeekFile (ASL_FILE_INPUT, Field->ByteOffset); 1165 1166 while (FlReadFile (ASL_FILE_INPUT, &FileByte, 1) == AE_OK) 1167 { 1168 FlWriteFile (ASL_FILE_LISTING_OUTPUT, &FileByte, 1); 1169 if (FileByte == '\n') 1170 { 1171 break; 1172 } 1173 } 1174 1175 /* Dump the line as parsed and represented internally */ 1176 1177 FlPrintFile (ASL_FILE_LISTING_OUTPUT, "Parsed: %*s : %.64s", 1178 Field->Column-4, Field->Name, Field->Value); 1179 1180 if (strlen (Field->Value) > 64) 1181 { 1182 FlPrintFile (ASL_FILE_LISTING_OUTPUT, "...Additional data, length 0x%X\n", 1183 (UINT32) strlen (Field->Value)); 1184 } 1185 1186 FlPrintFile (ASL_FILE_LISTING_OUTPUT, "\n"); 1187 1188 /* Dump the hex data that will be output for this field */ 1189 1190 DtDumpBuffer (ASL_FILE_LISTING_OUTPUT, Buffer, Field->TableOffset, Length); 1191 } 1192 1193 1194 /****************************************************************************** 1195 * 1196 * FUNCTION: DtWriteTableToListing 1197 * 1198 * PARAMETERS: None 1199 * 1200 * RETURN: None 1201 * 1202 * DESCRIPTION: Write the entire compiled table to the listing file 1203 * in hex format 1204 * 1205 *****************************************************************************/ 1206 1207 void 1208 DtWriteTableToListing ( 1209 void) 1210 { 1211 UINT8 *Buffer; 1212 1213 1214 if (!AslGbl_ListingFlag) 1215 { 1216 return; 1217 } 1218 1219 /* Read the entire table from the output file */ 1220 1221 Buffer = UtLocalCalloc (AslGbl_TableLength); 1222 FlSeekFile (ASL_FILE_AML_OUTPUT, 0); 1223 FlReadFile (ASL_FILE_AML_OUTPUT, Buffer, AslGbl_TableLength); 1224 1225 /* Dump the raw table data */ 1226 1227 AcpiOsRedirectOutput (AslGbl_Files[ASL_FILE_LISTING_OUTPUT].Handle); 1228 1229 AcpiOsPrintf ("\n%s: Length %d (0x%X)\n\n", 1230 ACPI_RAW_TABLE_DATA_HEADER, AslGbl_TableLength, AslGbl_TableLength); 1231 AcpiUtDumpBuffer (Buffer, AslGbl_TableLength, DB_BYTE_DISPLAY, 0); 1232 1233 AcpiOsRedirectOutput (stdout); 1234 ACPI_FREE (Buffer); 1235 } 1236