aslcodegen.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: aslcodegen - AML code generation 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 46 1.1.1.2.4.2 rmind #include "aslcompiler.h" 47 1.1.1.2.4.2 rmind #include "aslcompiler.y.h" 48 1.1.1.2.4.2 rmind #include "amlcode.h" 49 1.1.1.2.4.2 rmind 50 1.1.1.2.4.2 rmind #define _COMPONENT ACPI_COMPILER 51 1.1.1.2.4.2 rmind ACPI_MODULE_NAME ("aslcodegen") 52 1.1.1.2.4.2 rmind 53 1.1.1.2.4.2 rmind /* Local prototypes */ 54 1.1.1.2.4.2 rmind 55 1.1.1.2.4.2 rmind static ACPI_STATUS 56 1.1.1.2.4.2 rmind CgAmlWriteWalk ( 57 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Op, 58 1.1.1.2.4.2 rmind UINT32 Level, 59 1.1.1.2.4.2 rmind void *Context); 60 1.1.1.2.4.2 rmind 61 1.1.1.2.4.2 rmind static void 62 1.1.1.2.4.2 rmind CgLocalWriteAmlData ( 63 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Op, 64 1.1.1.2.4.2 rmind void *Buffer, 65 1.1.1.2.4.2 rmind UINT32 Length); 66 1.1.1.2.4.2 rmind 67 1.1.1.2.4.2 rmind static void 68 1.1.1.2.4.2 rmind CgWriteAmlOpcode ( 69 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Op); 70 1.1.1.2.4.2 rmind 71 1.1.1.2.4.2 rmind static void 72 1.1.1.2.4.2 rmind CgWriteTableHeader ( 73 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Op); 74 1.1.1.2.4.2 rmind 75 1.1.1.2.4.2 rmind static void 76 1.1.1.2.4.2 rmind CgCloseTable ( 77 1.1.1.2.4.2 rmind void); 78 1.1.1.2.4.2 rmind 79 1.1.1.2.4.2 rmind static void 80 1.1.1.2.4.2 rmind CgWriteNode ( 81 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Op); 82 1.1.1.2.4.2 rmind 83 1.1.1.2.4.2 rmind 84 1.1.1.2.4.2 rmind /******************************************************************************* 85 1.1.1.2.4.2 rmind * 86 1.1.1.2.4.2 rmind * FUNCTION: CgGenerateAmlOutput 87 1.1.1.2.4.2 rmind * 88 1.1.1.2.4.2 rmind * PARAMETERS: None. 89 1.1.1.2.4.2 rmind * 90 1.1.1.2.4.2 rmind * RETURN: None 91 1.1.1.2.4.2 rmind * 92 1.1.1.2.4.2 rmind * DESCRIPTION: Generate AML code. Currently generates the listing file 93 1.1.1.2.4.2 rmind * simultaneously. 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 void 98 1.1.1.2.4.2 rmind CgGenerateAmlOutput ( 99 1.1.1.2.4.2 rmind void) 100 1.1.1.2.4.2 rmind { 101 1.1.1.2.4.2 rmind 102 1.1.1.2.4.2 rmind DbgPrint (ASL_DEBUG_OUTPUT, "\nWriting AML\n\n"); 103 1.1.1.2.4.2 rmind 104 1.1.1.2.4.2 rmind /* Generate the AML output file */ 105 1.1.1.2.4.2 rmind 106 1.1.1.2.4.2 rmind FlSeekFile (ASL_FILE_SOURCE_OUTPUT, 0); 107 1.1.1.2.4.2 rmind Gbl_SourceLine = 0; 108 1.1.1.2.4.2 rmind Gbl_NextError = Gbl_ErrorLog; 109 1.1.1.2.4.2 rmind 110 1.1.1.2.4.2 rmind TrWalkParseTree (RootNode, ASL_WALK_VISIT_DOWNWARD, 111 1.1.1.2.4.2 rmind CgAmlWriteWalk, NULL, NULL); 112 1.1.1.2.4.2 rmind CgCloseTable (); 113 1.1.1.2.4.2 rmind } 114 1.1.1.2.4.2 rmind 115 1.1.1.2.4.2 rmind 116 1.1.1.2.4.2 rmind /******************************************************************************* 117 1.1.1.2.4.2 rmind * 118 1.1.1.2.4.2 rmind * FUNCTION: CgAmlWriteWalk 119 1.1.1.2.4.2 rmind * 120 1.1.1.2.4.2 rmind * PARAMETERS: ASL_WALK_CALLBACK 121 1.1.1.2.4.2 rmind * 122 1.1.1.2.4.2 rmind * RETURN: Status 123 1.1.1.2.4.2 rmind * 124 1.1.1.2.4.2 rmind * DESCRIPTION: Parse tree walk to generate the AML code. 125 1.1.1.2.4.2 rmind * 126 1.1.1.2.4.2 rmind ******************************************************************************/ 127 1.1.1.2.4.2 rmind 128 1.1.1.2.4.2 rmind static ACPI_STATUS 129 1.1.1.2.4.2 rmind CgAmlWriteWalk ( 130 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Op, 131 1.1.1.2.4.2 rmind UINT32 Level, 132 1.1.1.2.4.2 rmind void *Context) 133 1.1.1.2.4.2 rmind { 134 1.1.1.2.4.2 rmind 135 1.1.1.2.4.2 rmind /* 136 1.1.1.2.4.2 rmind * Print header at level 0. Alignment assumes 32-bit pointers 137 1.1.1.2.4.2 rmind */ 138 1.1.1.2.4.2 rmind if (!Level) 139 1.1.1.2.4.2 rmind { 140 1.1.1.2.4.2 rmind DbgPrint (ASL_TREE_OUTPUT, 141 1.1.1.2.4.2 rmind "Final parse tree used for AML output:\n"); 142 1.1.1.2.4.2 rmind DbgPrint (ASL_TREE_OUTPUT, 143 1.1.1.2.4.2 rmind "%*s Value P_Op A_Op OpLen PByts Len SubLen PSubLen OpPtr Child Parent Flags AcTyp Final Col L\n", 144 1.1.1.2.4.2 rmind 76, " "); 145 1.1.1.2.4.2 rmind } 146 1.1.1.2.4.2 rmind 147 1.1.1.2.4.2 rmind /* Debug output */ 148 1.1.1.2.4.2 rmind 149 1.1.1.2.4.2 rmind DbgPrint (ASL_TREE_OUTPUT, 150 1.1.1.2.4.2 rmind "%5.5d [%2d]", Op->Asl.LogicalLineNumber, Level); 151 1.1.1.2.4.2 rmind UtPrintFormattedName (Op->Asl.ParseOpcode, Level); 152 1.1.1.2.4.2 rmind 153 1.1.1.2.4.2 rmind if (Op->Asl.ParseOpcode == PARSEOP_NAMESEG || 154 1.1.1.2.4.2 rmind Op->Asl.ParseOpcode == PARSEOP_NAMESTRING || 155 1.1.1.2.4.2 rmind Op->Asl.ParseOpcode == PARSEOP_METHODCALL) 156 1.1.1.2.4.2 rmind { 157 1.1.1.2.4.2 rmind DbgPrint (ASL_TREE_OUTPUT, 158 1.1.1.2.4.2 rmind "%10.32s ", Op->Asl.ExternalName); 159 1.1.1.2.4.2 rmind } 160 1.1.1.2.4.2 rmind else 161 1.1.1.2.4.2 rmind { 162 1.1.1.2.4.2 rmind DbgPrint (ASL_TREE_OUTPUT, " "); 163 1.1.1.2.4.2 rmind } 164 1.1.1.2.4.2 rmind 165 1.1.1.2.4.2 rmind DbgPrint (ASL_TREE_OUTPUT, 166 1.1.1.2.4.2 rmind "%08X %04X %04X %01X %04X %04X %04X %04X %08X %08X %08X %08X %08X %04X %02d %02d\n", 167 1.1.1.2.4.2 rmind /* 1 */ (UINT32) Op->Asl.Value.Integer, 168 1.1.1.2.4.2 rmind /* 2 */ Op->Asl.ParseOpcode, 169 1.1.1.2.4.2 rmind /* 3 */ Op->Asl.AmlOpcode, 170 1.1.1.2.4.2 rmind /* 4 */ Op->Asl.AmlOpcodeLength, 171 1.1.1.2.4.2 rmind /* 5 */ Op->Asl.AmlPkgLenBytes, 172 1.1.1.2.4.2 rmind /* 6 */ Op->Asl.AmlLength, 173 1.1.1.2.4.2 rmind /* 7 */ Op->Asl.AmlSubtreeLength, 174 1.1.1.2.4.2 rmind /* 8 */ Op->Asl.Parent ? Op->Asl.Parent->Asl.AmlSubtreeLength : 0, 175 1.1.1.2.4.2 rmind /* 9 */ Op, 176 1.1.1.2.4.2 rmind /* 10 */ Op->Asl.Child, 177 1.1.1.2.4.2 rmind /* 11 */ Op->Asl.Parent, 178 1.1.1.2.4.2 rmind /* 12 */ Op->Asl.CompileFlags, 179 1.1.1.2.4.2 rmind /* 13 */ Op->Asl.AcpiBtype, 180 1.1.1.2.4.2 rmind /* 14 */ Op->Asl.FinalAmlLength, 181 1.1.1.2.4.2 rmind /* 15 */ Op->Asl.Column, 182 1.1.1.2.4.2 rmind /* 16 */ Op->Asl.LineNumber); 183 1.1.1.2.4.2 rmind 184 1.1.1.2.4.2 rmind /* Generate the AML for this node */ 185 1.1.1.2.4.2 rmind 186 1.1.1.2.4.2 rmind CgWriteNode (Op); 187 1.1.1.2.4.2 rmind return (AE_OK); 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 /******************************************************************************* 192 1.1.1.2.4.2 rmind * 193 1.1.1.2.4.2 rmind * FUNCTION: CgLocalWriteAmlData 194 1.1.1.2.4.2 rmind * 195 1.1.1.2.4.2 rmind * PARAMETERS: Op - Current parse op 196 1.1.1.2.4.2 rmind * Buffer - Buffer to write 197 1.1.1.2.4.2 rmind * Length - Size of data in buffer 198 1.1.1.2.4.2 rmind * 199 1.1.1.2.4.2 rmind * RETURN: None 200 1.1.1.2.4.2 rmind * 201 1.1.1.2.4.2 rmind * DESCRIPTION: Write a buffer of AML data to the AML output file. 202 1.1.1.2.4.2 rmind * 203 1.1.1.2.4.2 rmind ******************************************************************************/ 204 1.1.1.2.4.2 rmind 205 1.1.1.2.4.2 rmind static void 206 1.1.1.2.4.2 rmind CgLocalWriteAmlData ( 207 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Op, 208 1.1.1.2.4.2 rmind void *Buffer, 209 1.1.1.2.4.2 rmind UINT32 Length) 210 1.1.1.2.4.2 rmind { 211 1.1.1.2.4.2 rmind 212 1.1.1.2.4.2 rmind /* Write the raw data to the AML file */ 213 1.1.1.2.4.2 rmind 214 1.1.1.2.4.2 rmind FlWriteFile (ASL_FILE_AML_OUTPUT, Buffer, Length); 215 1.1.1.2.4.2 rmind 216 1.1.1.2.4.2 rmind /* Update the final AML length for this node (used for listings) */ 217 1.1.1.2.4.2 rmind 218 1.1.1.2.4.2 rmind if (Op) 219 1.1.1.2.4.2 rmind { 220 1.1.1.2.4.2 rmind Op->Asl.FinalAmlLength += Length; 221 1.1.1.2.4.2 rmind } 222 1.1.1.2.4.2 rmind } 223 1.1.1.2.4.2 rmind 224 1.1.1.2.4.2 rmind 225 1.1.1.2.4.2 rmind /******************************************************************************* 226 1.1.1.2.4.2 rmind * 227 1.1.1.2.4.2 rmind * FUNCTION: CgWriteAmlOpcode 228 1.1.1.2.4.2 rmind * 229 1.1.1.2.4.2 rmind * PARAMETERS: Op - Parse node with an AML opcode 230 1.1.1.2.4.2 rmind * 231 1.1.1.2.4.2 rmind * RETURN: None. 232 1.1.1.2.4.2 rmind * 233 1.1.1.2.4.2 rmind * DESCRIPTION: Write the AML opcode corresponding to a parse node. 234 1.1.1.2.4.2 rmind * 235 1.1.1.2.4.2 rmind ******************************************************************************/ 236 1.1.1.2.4.2 rmind 237 1.1.1.2.4.2 rmind static void 238 1.1.1.2.4.2 rmind CgWriteAmlOpcode ( 239 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Op) 240 1.1.1.2.4.2 rmind { 241 1.1.1.2.4.2 rmind UINT8 PkgLenFirstByte; 242 1.1.1.2.4.2 rmind UINT32 i; 243 1.1.1.2.4.2 rmind union { 244 1.1.1.2.4.2 rmind UINT16 Opcode; 245 1.1.1.2.4.2 rmind UINT8 OpcodeBytes[2]; 246 1.1.1.2.4.2 rmind } Aml; 247 1.1.1.2.4.2 rmind union { 248 1.1.1.2.4.2 rmind UINT32 Len; 249 1.1.1.2.4.2 rmind UINT8 LenBytes[4]; 250 1.1.1.2.4.2 rmind } PkgLen; 251 1.1.1.2.4.2 rmind 252 1.1.1.2.4.2 rmind 253 1.1.1.2.4.2 rmind /* We expect some DEFAULT_ARGs, just ignore them */ 254 1.1.1.2.4.2 rmind 255 1.1.1.2.4.2 rmind if (Op->Asl.ParseOpcode == PARSEOP_DEFAULT_ARG) 256 1.1.1.2.4.2 rmind { 257 1.1.1.2.4.2 rmind return; 258 1.1.1.2.4.2 rmind } 259 1.1.1.2.4.2 rmind 260 1.1.1.2.4.2 rmind switch (Op->Asl.AmlOpcode) 261 1.1.1.2.4.2 rmind { 262 1.1.1.2.4.2 rmind case AML_UNASSIGNED_OPCODE: 263 1.1.1.2.4.2 rmind 264 1.1.1.2.4.2 rmind /* These opcodes should not get here */ 265 1.1.1.2.4.2 rmind 266 1.1.1.2.4.2 rmind printf ("Found a node with an unassigned AML opcode\n"); 267 1.1.1.2.4.2 rmind fprintf (stderr, "Found a node with an unassigned AML opcode\n"); 268 1.1.1.2.4.2 rmind return; 269 1.1.1.2.4.2 rmind 270 1.1.1.2.4.2 rmind case AML_INT_RESERVEDFIELD_OP: 271 1.1.1.2.4.2 rmind 272 1.1.1.2.4.2 rmind /* Special opcodes for within a field definition */ 273 1.1.1.2.4.2 rmind 274 1.1.1.2.4.2 rmind Aml.Opcode = 0x00; 275 1.1.1.2.4.2 rmind break; 276 1.1.1.2.4.2 rmind 277 1.1.1.2.4.2 rmind case AML_INT_ACCESSFIELD_OP: 278 1.1.1.2.4.2 rmind 279 1.1.1.2.4.2 rmind Aml.Opcode = 0x01; 280 1.1.1.2.4.2 rmind break; 281 1.1.1.2.4.2 rmind 282 1.1.1.2.4.2 rmind default: 283 1.1.1.2.4.2 rmind Aml.Opcode = Op->Asl.AmlOpcode; 284 1.1.1.2.4.2 rmind break; 285 1.1.1.2.4.2 rmind } 286 1.1.1.2.4.2 rmind 287 1.1.1.2.4.2 rmind 288 1.1.1.2.4.2 rmind switch (Aml.Opcode) 289 1.1.1.2.4.2 rmind { 290 1.1.1.2.4.2 rmind case AML_PACKAGE_LENGTH: 291 1.1.1.2.4.2 rmind 292 1.1.1.2.4.2 rmind /* Value is the length to be encoded (Used in field definitions) */ 293 1.1.1.2.4.2 rmind 294 1.1.1.2.4.2 rmind PkgLen.Len = (UINT32) Op->Asl.Value.Integer; 295 1.1.1.2.4.2 rmind break; 296 1.1.1.2.4.2 rmind 297 1.1.1.2.4.2 rmind default: 298 1.1.1.2.4.2 rmind 299 1.1.1.2.4.2 rmind /* Check for two-byte opcode */ 300 1.1.1.2.4.2 rmind 301 1.1.1.2.4.2 rmind if (Aml.Opcode > 0x00FF) 302 1.1.1.2.4.2 rmind { 303 1.1.1.2.4.2 rmind /* Write the high byte first */ 304 1.1.1.2.4.2 rmind 305 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, &Aml.OpcodeBytes[1], 1); 306 1.1.1.2.4.2 rmind } 307 1.1.1.2.4.2 rmind 308 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, &Aml.OpcodeBytes[0], 1); 309 1.1.1.2.4.2 rmind 310 1.1.1.2.4.2 rmind /* Subtreelength doesn't include length of package length bytes */ 311 1.1.1.2.4.2 rmind 312 1.1.1.2.4.2 rmind PkgLen.Len = Op->Asl.AmlSubtreeLength + Op->Asl.AmlPkgLenBytes; 313 1.1.1.2.4.2 rmind break; 314 1.1.1.2.4.2 rmind } 315 1.1.1.2.4.2 rmind 316 1.1.1.2.4.2 rmind /* Does this opcode have an associated "PackageLength" field? */ 317 1.1.1.2.4.2 rmind 318 1.1.1.2.4.2 rmind if (Op->Asl.CompileFlags & NODE_AML_PACKAGE) 319 1.1.1.2.4.2 rmind { 320 1.1.1.2.4.2 rmind if (Op->Asl.AmlPkgLenBytes == 1) 321 1.1.1.2.4.2 rmind { 322 1.1.1.2.4.2 rmind /* Simplest case -- no bytes to follow, just write the count */ 323 1.1.1.2.4.2 rmind 324 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, &PkgLen.LenBytes[0], 1); 325 1.1.1.2.4.2 rmind } 326 1.1.1.2.4.2 rmind else if (Op->Asl.AmlPkgLenBytes != 0) 327 1.1.1.2.4.2 rmind { 328 1.1.1.2.4.2 rmind /* 329 1.1.1.2.4.2 rmind * Encode the "bytes to follow" in the first byte, top two bits. 330 1.1.1.2.4.2 rmind * The low-order nybble of the length is in the bottom 4 bits 331 1.1.1.2.4.2 rmind */ 332 1.1.1.2.4.2 rmind PkgLenFirstByte = (UINT8) 333 1.1.1.2.4.2 rmind (((UINT32) (Op->Asl.AmlPkgLenBytes - 1) << 6) | 334 1.1.1.2.4.2 rmind (PkgLen.LenBytes[0] & 0x0F)); 335 1.1.1.2.4.2 rmind 336 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, &PkgLenFirstByte, 1); 337 1.1.1.2.4.2 rmind 338 1.1.1.2.4.2 rmind /* 339 1.1.1.2.4.2 rmind * Shift the length over by the 4 bits we just stuffed 340 1.1.1.2.4.2 rmind * in the first byte 341 1.1.1.2.4.2 rmind */ 342 1.1.1.2.4.2 rmind PkgLen.Len >>= 4; 343 1.1.1.2.4.2 rmind 344 1.1.1.2.4.2 rmind /* Now we can write the remaining bytes - either 1, 2, or 3 bytes */ 345 1.1.1.2.4.2 rmind 346 1.1.1.2.4.2 rmind for (i = 0; i < (UINT32) (Op->Asl.AmlPkgLenBytes - 1); i++) 347 1.1.1.2.4.2 rmind { 348 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, &PkgLen.LenBytes[i], 1); 349 1.1.1.2.4.2 rmind } 350 1.1.1.2.4.2 rmind } 351 1.1.1.2.4.2 rmind } 352 1.1.1.2.4.2 rmind 353 1.1.1.2.4.2 rmind switch (Aml.Opcode) 354 1.1.1.2.4.2 rmind { 355 1.1.1.2.4.2 rmind case AML_BYTE_OP: 356 1.1.1.2.4.2 rmind 357 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, &Op->Asl.Value.Integer, 1); 358 1.1.1.2.4.2 rmind break; 359 1.1.1.2.4.2 rmind 360 1.1.1.2.4.2 rmind case AML_WORD_OP: 361 1.1.1.2.4.2 rmind 362 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, &Op->Asl.Value.Integer, 2); 363 1.1.1.2.4.2 rmind break; 364 1.1.1.2.4.2 rmind 365 1.1.1.2.4.2 rmind case AML_DWORD_OP: 366 1.1.1.2.4.2 rmind 367 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, &Op->Asl.Value.Integer, 4); 368 1.1.1.2.4.2 rmind break; 369 1.1.1.2.4.2 rmind 370 1.1.1.2.4.2 rmind case AML_QWORD_OP: 371 1.1.1.2.4.2 rmind 372 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, &Op->Asl.Value.Integer, 8); 373 1.1.1.2.4.2 rmind break; 374 1.1.1.2.4.2 rmind 375 1.1.1.2.4.2 rmind case AML_STRING_OP: 376 1.1.1.2.4.2 rmind 377 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, Op->Asl.Value.String, Op->Asl.AmlLength); 378 1.1.1.2.4.2 rmind break; 379 1.1.1.2.4.2 rmind 380 1.1.1.2.4.2 rmind default: 381 1.1.1.2.4.2 rmind /* All data opcodes must appear above */ 382 1.1.1.2.4.2 rmind break; 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 387 1.1.1.2.4.2 rmind /******************************************************************************* 388 1.1.1.2.4.2 rmind * 389 1.1.1.2.4.2 rmind * FUNCTION: CgWriteTableHeader 390 1.1.1.2.4.2 rmind * 391 1.1.1.2.4.2 rmind * PARAMETERS: Op - The DEFINITIONBLOCK node 392 1.1.1.2.4.2 rmind * 393 1.1.1.2.4.2 rmind * RETURN: None 394 1.1.1.2.4.2 rmind * 395 1.1.1.2.4.2 rmind * DESCRIPTION: Write a table header corresponding to the DEFINITIONBLOCK 396 1.1.1.2.4.2 rmind * 397 1.1.1.2.4.2 rmind ******************************************************************************/ 398 1.1.1.2.4.2 rmind 399 1.1.1.2.4.2 rmind static void 400 1.1.1.2.4.2 rmind CgWriteTableHeader ( 401 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Op) 402 1.1.1.2.4.2 rmind { 403 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Child; 404 1.1.1.2.4.2 rmind 405 1.1.1.2.4.2 rmind 406 1.1.1.2.4.2 rmind /* AML filename */ 407 1.1.1.2.4.2 rmind 408 1.1.1.2.4.2 rmind Child = Op->Asl.Child; 409 1.1.1.2.4.2 rmind 410 1.1.1.2.4.2 rmind /* Signature */ 411 1.1.1.2.4.2 rmind 412 1.1.1.2.4.2 rmind Child = Child->Asl.Next; 413 1.1.1.2.4.2 rmind strncpy (TableHeader.Signature, Child->Asl.Value.String, 4); 414 1.1.1.2.4.2 rmind 415 1.1.1.2.4.2 rmind /* Revision */ 416 1.1.1.2.4.2 rmind 417 1.1.1.2.4.2 rmind Child = Child->Asl.Next; 418 1.1.1.2.4.2 rmind TableHeader.Revision = (UINT8) Child->Asl.Value.Integer; 419 1.1.1.2.4.2 rmind 420 1.1.1.2.4.2 rmind /* Command-line Revision override */ 421 1.1.1.2.4.2 rmind 422 1.1.1.2.4.2 rmind if (Gbl_RevisionOverride) 423 1.1.1.2.4.2 rmind { 424 1.1.1.2.4.2 rmind TableHeader.Revision = Gbl_RevisionOverride; 425 1.1.1.2.4.2 rmind } 426 1.1.1.2.4.2 rmind 427 1.1.1.2.4.2 rmind /* OEMID */ 428 1.1.1.2.4.2 rmind 429 1.1.1.2.4.2 rmind Child = Child->Asl.Next; 430 1.1.1.2.4.2 rmind strncpy (TableHeader.OemId, Child->Asl.Value.String, 6); 431 1.1.1.2.4.2 rmind 432 1.1.1.2.4.2 rmind /* OEM TableID */ 433 1.1.1.2.4.2 rmind 434 1.1.1.2.4.2 rmind Child = Child->Asl.Next; 435 1.1.1.2.4.2 rmind strncpy (TableHeader.OemTableId, Child->Asl.Value.String, 8); 436 1.1.1.2.4.2 rmind 437 1.1.1.2.4.2 rmind /* OEM Revision */ 438 1.1.1.2.4.2 rmind 439 1.1.1.2.4.2 rmind Child = Child->Asl.Next; 440 1.1.1.2.4.2 rmind TableHeader.OemRevision = (UINT32) Child->Asl.Value.Integer; 441 1.1.1.2.4.2 rmind 442 1.1.1.2.4.2 rmind /* Compiler ID */ 443 1.1.1.2.4.2 rmind 444 1.1.1.2.4.2 rmind strncpy (TableHeader.AslCompilerId, ASL_CREATOR_ID, 4); 445 1.1.1.2.4.2 rmind 446 1.1.1.2.4.2 rmind /* Compiler version */ 447 1.1.1.2.4.2 rmind 448 1.1.1.2.4.2 rmind TableHeader.AslCompilerRevision = ASL_REVISION; 449 1.1.1.2.4.2 rmind 450 1.1.1.2.4.2 rmind /* Table length. Checksum zero for now, will rewrite later */ 451 1.1.1.2.4.2 rmind 452 1.1.1.2.4.2 rmind TableHeader.Length = Gbl_TableLength; 453 1.1.1.2.4.2 rmind TableHeader.Checksum = 0; 454 1.1.1.2.4.2 rmind 455 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, &TableHeader, sizeof (ACPI_TABLE_HEADER)); 456 1.1.1.2.4.2 rmind } 457 1.1.1.2.4.2 rmind 458 1.1.1.2.4.2 rmind 459 1.1.1.2.4.2 rmind /******************************************************************************* 460 1.1.1.2.4.2 rmind * 461 1.1.1.2.4.2 rmind * FUNCTION: CgCloseTable 462 1.1.1.2.4.2 rmind * 463 1.1.1.2.4.2 rmind * PARAMETERS: None. 464 1.1.1.2.4.2 rmind * 465 1.1.1.2.4.2 rmind * RETURN: None. 466 1.1.1.2.4.2 rmind * 467 1.1.1.2.4.2 rmind * DESCRIPTION: Complete the ACPI table by calculating the checksum and 468 1.1.1.2.4.2 rmind * re-writing the header. 469 1.1.1.2.4.2 rmind * 470 1.1.1.2.4.2 rmind ******************************************************************************/ 471 1.1.1.2.4.2 rmind 472 1.1.1.2.4.2 rmind static void 473 1.1.1.2.4.2 rmind CgCloseTable ( 474 1.1.1.2.4.2 rmind void) 475 1.1.1.2.4.2 rmind { 476 1.1.1.2.4.2 rmind signed char Sum; 477 1.1.1.2.4.2 rmind UINT8 FileByte; 478 1.1.1.2.4.2 rmind 479 1.1.1.2.4.2 rmind 480 1.1.1.2.4.2 rmind FlSeekFile (ASL_FILE_AML_OUTPUT, 0); 481 1.1.1.2.4.2 rmind Sum = 0; 482 1.1.1.2.4.2 rmind 483 1.1.1.2.4.2 rmind /* Calculate the checksum over the entire file */ 484 1.1.1.2.4.2 rmind 485 1.1.1.2.4.2 rmind while (FlReadFile (ASL_FILE_AML_OUTPUT, &FileByte, 1) == AE_OK) 486 1.1.1.2.4.2 rmind { 487 1.1.1.2.4.2 rmind Sum = (signed char) (Sum + FileByte); 488 1.1.1.2.4.2 rmind } 489 1.1.1.2.4.2 rmind 490 1.1.1.2.4.2 rmind /* Re-write the table header with the checksum */ 491 1.1.1.2.4.2 rmind 492 1.1.1.2.4.2 rmind TableHeader.Checksum = (UINT8) (0 - Sum); 493 1.1.1.2.4.2 rmind 494 1.1.1.2.4.2 rmind FlSeekFile (ASL_FILE_AML_OUTPUT, 0); 495 1.1.1.2.4.2 rmind CgLocalWriteAmlData (NULL, &TableHeader, sizeof (ACPI_TABLE_HEADER)); 496 1.1.1.2.4.2 rmind } 497 1.1.1.2.4.2 rmind 498 1.1.1.2.4.2 rmind 499 1.1.1.2.4.2 rmind /******************************************************************************* 500 1.1.1.2.4.2 rmind * 501 1.1.1.2.4.2 rmind * FUNCTION: CgWriteNode 502 1.1.1.2.4.2 rmind * 503 1.1.1.2.4.2 rmind * PARAMETERS: Op - Parse node to write. 504 1.1.1.2.4.2 rmind * 505 1.1.1.2.4.2 rmind * RETURN: None. 506 1.1.1.2.4.2 rmind * 507 1.1.1.2.4.2 rmind * DESCRIPTION: Write the AML that corresponds to a parse node. 508 1.1.1.2.4.2 rmind * 509 1.1.1.2.4.2 rmind ******************************************************************************/ 510 1.1.1.2.4.2 rmind 511 1.1.1.2.4.2 rmind static void 512 1.1.1.2.4.2 rmind CgWriteNode ( 513 1.1.1.2.4.2 rmind ACPI_PARSE_OBJECT *Op) 514 1.1.1.2.4.2 rmind { 515 1.1.1.2.4.2 rmind ASL_RESOURCE_NODE *Rnode; 516 1.1.1.2.4.2 rmind 517 1.1.1.2.4.2 rmind 518 1.1.1.2.4.2 rmind /* Always check for DEFAULT_ARG and other "Noop" nodes */ 519 1.1.1.2.4.2 rmind /* TBD: this may not be the best place for this check */ 520 1.1.1.2.4.2 rmind 521 1.1.1.2.4.2 rmind if ((Op->Asl.ParseOpcode == PARSEOP_DEFAULT_ARG) || 522 1.1.1.2.4.2 rmind (Op->Asl.ParseOpcode == PARSEOP_EXTERNAL) || 523 1.1.1.2.4.2 rmind (Op->Asl.ParseOpcode == PARSEOP_INCLUDE) || 524 1.1.1.2.4.2 rmind (Op->Asl.ParseOpcode == PARSEOP_INCLUDE_END)) 525 1.1.1.2.4.2 rmind { 526 1.1.1.2.4.2 rmind return; 527 1.1.1.2.4.2 rmind } 528 1.1.1.2.4.2 rmind 529 1.1.1.2.4.2 rmind Op->Asl.FinalAmlLength = 0; 530 1.1.1.2.4.2 rmind 531 1.1.1.2.4.2 rmind switch (Op->Asl.AmlOpcode) 532 1.1.1.2.4.2 rmind { 533 1.1.1.2.4.2 rmind case AML_RAW_DATA_BYTE: 534 1.1.1.2.4.2 rmind case AML_RAW_DATA_WORD: 535 1.1.1.2.4.2 rmind case AML_RAW_DATA_DWORD: 536 1.1.1.2.4.2 rmind case AML_RAW_DATA_QWORD: 537 1.1.1.2.4.2 rmind 538 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, &Op->Asl.Value.Integer, Op->Asl.AmlLength); 539 1.1.1.2.4.2 rmind return; 540 1.1.1.2.4.2 rmind 541 1.1.1.2.4.2 rmind 542 1.1.1.2.4.2 rmind case AML_RAW_DATA_BUFFER: 543 1.1.1.2.4.2 rmind 544 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, Op->Asl.Value.Buffer, Op->Asl.AmlLength); 545 1.1.1.2.4.2 rmind return; 546 1.1.1.2.4.2 rmind 547 1.1.1.2.4.2 rmind 548 1.1.1.2.4.2 rmind case AML_RAW_DATA_CHAIN: 549 1.1.1.2.4.2 rmind 550 1.1.1.2.4.2 rmind Rnode = ACPI_CAST_PTR (ASL_RESOURCE_NODE, Op->Asl.Value.Buffer); 551 1.1.1.2.4.2 rmind while (Rnode) 552 1.1.1.2.4.2 rmind { 553 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, Rnode->Buffer, Rnode->BufferLength); 554 1.1.1.2.4.2 rmind Rnode = Rnode->Next; 555 1.1.1.2.4.2 rmind } 556 1.1.1.2.4.2 rmind return; 557 1.1.1.2.4.2 rmind 558 1.1.1.2.4.2 rmind default: 559 1.1.1.2.4.2 rmind /* Internal data opcodes must all appear above */ 560 1.1.1.2.4.2 rmind break; 561 1.1.1.2.4.2 rmind } 562 1.1.1.2.4.2 rmind 563 1.1.1.2.4.2 rmind switch (Op->Asl.ParseOpcode) 564 1.1.1.2.4.2 rmind { 565 1.1.1.2.4.2 rmind case PARSEOP_DEFAULT_ARG: 566 1.1.1.2.4.2 rmind 567 1.1.1.2.4.2 rmind break; 568 1.1.1.2.4.2 rmind 569 1.1.1.2.4.2 rmind case PARSEOP_DEFINITIONBLOCK: 570 1.1.1.2.4.2 rmind 571 1.1.1.2.4.2 rmind CgWriteTableHeader (Op); 572 1.1.1.2.4.2 rmind break; 573 1.1.1.2.4.2 rmind 574 1.1.1.2.4.2 rmind case PARSEOP_NAMESEG: 575 1.1.1.2.4.2 rmind case PARSEOP_NAMESTRING: 576 1.1.1.2.4.2 rmind case PARSEOP_METHODCALL: 577 1.1.1.2.4.2 rmind 578 1.1.1.2.4.2 rmind CgLocalWriteAmlData (Op, Op->Asl.Value.String, Op->Asl.AmlLength); 579 1.1.1.2.4.2 rmind break; 580 1.1.1.2.4.2 rmind 581 1.1.1.2.4.2 rmind default: 582 1.1.1.2.4.2 rmind 583 1.1.1.2.4.2 rmind CgWriteAmlOpcode (Op); 584 1.1.1.2.4.2 rmind break; 585 1.1.1.2.4.2 rmind } 586 1.1.1.2.4.2 rmind } 587 1.1.1.2.4.2 rmind 588 1.1.1.2.4.2 rmind 589
Indexes created Tue Sep 30 07:10:03 GMT 2025