aslparseop.c revision 1.1.1.2.2.2
1 1.1.1.2.2.2 jdolecek /****************************************************************************** 2 1.1.1.2.2.2 jdolecek * 3 1.1.1.2.2.2 jdolecek * Module Name: aslparseop - Parse op create/allocate/cache interfaces 4 1.1.1.2.2.2 jdolecek * 5 1.1.1.2.2.2 jdolecek *****************************************************************************/ 6 1.1.1.2.2.2 jdolecek 7 1.1.1.2.2.2 jdolecek /* 8 1.1.1.2.2.2 jdolecek * Copyright (C) 2000 - 2017, Intel Corp. 9 1.1.1.2.2.2 jdolecek * All rights reserved. 10 1.1.1.2.2.2 jdolecek * 11 1.1.1.2.2.2 jdolecek * Redistribution and use in source and binary forms, with or without 12 1.1.1.2.2.2 jdolecek * modification, are permitted provided that the following conditions 13 1.1.1.2.2.2 jdolecek * are met: 14 1.1.1.2.2.2 jdolecek * 1. Redistributions of source code must retain the above copyright 15 1.1.1.2.2.2 jdolecek * notice, this list of conditions, and the following disclaimer, 16 1.1.1.2.2.2 jdolecek * without modification. 17 1.1.1.2.2.2 jdolecek * 2. Redistributions in binary form must reproduce at minimum a disclaimer 18 1.1.1.2.2.2 jdolecek * substantially similar to the "NO WARRANTY" disclaimer below 19 1.1.1.2.2.2 jdolecek * ("Disclaimer") and any redistribution must be conditioned upon 20 1.1.1.2.2.2 jdolecek * including a substantially similar Disclaimer requirement for further 21 1.1.1.2.2.2 jdolecek * binary redistribution. 22 1.1.1.2.2.2 jdolecek * 3. Neither the names of the above-listed copyright holders nor the names 23 1.1.1.2.2.2 jdolecek * of any contributors may be used to endorse or promote products derived 24 1.1.1.2.2.2 jdolecek * from this software without specific prior written permission. 25 1.1.1.2.2.2 jdolecek * 26 1.1.1.2.2.2 jdolecek * Alternatively, this software may be distributed under the terms of the 27 1.1.1.2.2.2 jdolecek * GNU General Public License ("GPL") version 2 as published by the Free 28 1.1.1.2.2.2 jdolecek * Software Foundation. 29 1.1.1.2.2.2 jdolecek * 30 1.1.1.2.2.2 jdolecek * NO WARRANTY 31 1.1.1.2.2.2 jdolecek * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 32 1.1.1.2.2.2 jdolecek * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 33 1.1.1.2.2.2 jdolecek * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR 34 1.1.1.2.2.2 jdolecek * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 35 1.1.1.2.2.2 jdolecek * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 36 1.1.1.2.2.2 jdolecek * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 37 1.1.1.2.2.2 jdolecek * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 38 1.1.1.2.2.2 jdolecek * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 39 1.1.1.2.2.2 jdolecek * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING 40 1.1.1.2.2.2 jdolecek * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 41 1.1.1.2.2.2 jdolecek * POSSIBILITY OF SUCH DAMAGES. 42 1.1.1.2.2.2 jdolecek */ 43 1.1.1.2.2.2 jdolecek 44 1.1.1.2.2.2 jdolecek #include "aslcompiler.h" 45 1.1.1.2.2.2 jdolecek #include "aslcompiler.y.h" 46 1.1.1.2.2.2 jdolecek #include "acapps.h" 47 1.1.1.2.2.2 jdolecek #include "acconvert.h" 48 1.1.1.2.2.2 jdolecek 49 1.1.1.2.2.2 jdolecek #define _COMPONENT ACPI_COMPILER 50 1.1.1.2.2.2 jdolecek ACPI_MODULE_NAME ("aslparseop") 51 1.1.1.2.2.2 jdolecek 52 1.1.1.2.2.2 jdolecek 53 1.1.1.2.2.2 jdolecek /******************************************************************************* 54 1.1.1.2.2.2 jdolecek * 55 1.1.1.2.2.2 jdolecek * FUNCTION: TrCreateOp 56 1.1.1.2.2.2 jdolecek * 57 1.1.1.2.2.2 jdolecek * PARAMETERS: ParseOpcode - Opcode to be assigned to the op 58 1.1.1.2.2.2 jdolecek * NumChildren - Number of children to follow 59 1.1.1.2.2.2 jdolecek * ... - A list of child ops to link to the new 60 1.1.1.2.2.2 jdolecek * op. NumChildren long. 61 1.1.1.2.2.2 jdolecek * 62 1.1.1.2.2.2 jdolecek * RETURN: Pointer to the new op. Aborts on allocation failure 63 1.1.1.2.2.2 jdolecek * 64 1.1.1.2.2.2 jdolecek * DESCRIPTION: Create a new parse op and link together a list of child 65 1.1.1.2.2.2 jdolecek * ops underneath the new op. 66 1.1.1.2.2.2 jdolecek * 67 1.1.1.2.2.2 jdolecek ******************************************************************************/ 68 1.1.1.2.2.2 jdolecek 69 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT * 70 1.1.1.2.2.2 jdolecek TrCreateOp ( 71 1.1.1.2.2.2 jdolecek UINT32 ParseOpcode, 72 1.1.1.2.2.2 jdolecek UINT32 NumChildren, 73 1.1.1.2.2.2 jdolecek ...) 74 1.1.1.2.2.2 jdolecek { 75 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *Op; 76 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *Child; 77 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *PrevChild; 78 1.1.1.2.2.2 jdolecek va_list ap; 79 1.1.1.2.2.2 jdolecek UINT32 i; 80 1.1.1.2.2.2 jdolecek BOOLEAN FirstChild; 81 1.1.1.2.2.2 jdolecek 82 1.1.1.2.2.2 jdolecek 83 1.1.1.2.2.2 jdolecek va_start (ap, NumChildren); 84 1.1.1.2.2.2 jdolecek 85 1.1.1.2.2.2 jdolecek /* Allocate one new op */ 86 1.1.1.2.2.2 jdolecek 87 1.1.1.2.2.2 jdolecek Op = TrAllocateOp (ParseOpcode); 88 1.1.1.2.2.2 jdolecek 89 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, 90 1.1.1.2.2.2 jdolecek "\nCreateOp Ln/Col %u/%u NewParent %p Child %u Op %s ", 91 1.1.1.2.2.2 jdolecek Op->Asl.LineNumber, Op->Asl.Column, Op, 92 1.1.1.2.2.2 jdolecek NumChildren, UtGetOpName(ParseOpcode)); 93 1.1.1.2.2.2 jdolecek 94 1.1.1.2.2.2 jdolecek /* Some extra debug output based on the parse opcode */ 95 1.1.1.2.2.2 jdolecek 96 1.1.1.2.2.2 jdolecek switch (ParseOpcode) 97 1.1.1.2.2.2 jdolecek { 98 1.1.1.2.2.2 jdolecek case PARSEOP_ASL_CODE: 99 1.1.1.2.2.2 jdolecek 100 1.1.1.2.2.2 jdolecek Gbl_ParseTreeRoot = Op; 101 1.1.1.2.2.2 jdolecek Op->Asl.ParseOpcode = PARSEOP_DEFAULT_ARG; 102 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "ASLCODE (Tree Completed)->"); 103 1.1.1.2.2.2 jdolecek break; 104 1.1.1.2.2.2 jdolecek 105 1.1.1.2.2.2 jdolecek case PARSEOP_DEFINITION_BLOCK: 106 1.1.1.2.2.2 jdolecek 107 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "DEFINITION_BLOCK (Tree Completed)->"); 108 1.1.1.2.2.2 jdolecek break; 109 1.1.1.2.2.2 jdolecek 110 1.1.1.2.2.2 jdolecek case PARSEOP_OPERATIONREGION: 111 1.1.1.2.2.2 jdolecek 112 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "OPREGION->"); 113 1.1.1.2.2.2 jdolecek break; 114 1.1.1.2.2.2 jdolecek 115 1.1.1.2.2.2 jdolecek case PARSEOP_OR: 116 1.1.1.2.2.2 jdolecek 117 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "OR->"); 118 1.1.1.2.2.2 jdolecek break; 119 1.1.1.2.2.2 jdolecek 120 1.1.1.2.2.2 jdolecek default: 121 1.1.1.2.2.2 jdolecek 122 1.1.1.2.2.2 jdolecek /* Nothing to do for other opcodes */ 123 1.1.1.2.2.2 jdolecek 124 1.1.1.2.2.2 jdolecek break; 125 1.1.1.2.2.2 jdolecek } 126 1.1.1.2.2.2 jdolecek 127 1.1.1.2.2.2 jdolecek /* Link the new op to its children */ 128 1.1.1.2.2.2 jdolecek 129 1.1.1.2.2.2 jdolecek PrevChild = NULL; 130 1.1.1.2.2.2 jdolecek FirstChild = TRUE; 131 1.1.1.2.2.2 jdolecek for (i = 0; i < NumChildren; i++) 132 1.1.1.2.2.2 jdolecek { 133 1.1.1.2.2.2 jdolecek /* Get the next child */ 134 1.1.1.2.2.2 jdolecek 135 1.1.1.2.2.2 jdolecek Child = va_arg (ap, ACPI_PARSE_OBJECT *); 136 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "%p, ", Child); 137 1.1.1.2.2.2 jdolecek 138 1.1.1.2.2.2 jdolecek /* 139 1.1.1.2.2.2 jdolecek * If child is NULL, this means that an optional argument 140 1.1.1.2.2.2 jdolecek * was omitted. We must create a placeholder with a special 141 1.1.1.2.2.2 jdolecek * opcode (DEFAULT_ARG) so that the code generator will know 142 1.1.1.2.2.2 jdolecek * that it must emit the correct default for this argument 143 1.1.1.2.2.2 jdolecek */ 144 1.1.1.2.2.2 jdolecek if (!Child) 145 1.1.1.2.2.2 jdolecek { 146 1.1.1.2.2.2 jdolecek Child = TrAllocateOp (PARSEOP_DEFAULT_ARG); 147 1.1.1.2.2.2 jdolecek } 148 1.1.1.2.2.2 jdolecek 149 1.1.1.2.2.2 jdolecek /* Link first child to parent */ 150 1.1.1.2.2.2 jdolecek 151 1.1.1.2.2.2 jdolecek if (FirstChild) 152 1.1.1.2.2.2 jdolecek { 153 1.1.1.2.2.2 jdolecek FirstChild = FALSE; 154 1.1.1.2.2.2 jdolecek Op->Asl.Child = Child; 155 1.1.1.2.2.2 jdolecek 156 1.1.1.2.2.2 jdolecek /* 157 1.1.1.2.2.2 jdolecek * For the ASL-/ASL+ converter: if the ParseOp is a Connection, 158 1.1.1.2.2.2 jdolecek * External, Offset or AccessAs, it means that the comments in the 159 1.1.1.2.2.2 jdolecek * FirstChild belongs to their parent due to the parsing order in 160 1.1.1.2.2.2 jdolecek * the .y files. To correct this, take the comments in the 161 1.1.1.2.2.2 jdolecek * FirstChild place it in the parent. This also means that 162 1.1.1.2.2.2 jdolecek * legitimate comments for the child gets put to the parent. 163 1.1.1.2.2.2 jdolecek */ 164 1.1.1.2.2.2 jdolecek if (Gbl_CaptureComments && 165 1.1.1.2.2.2 jdolecek ((ParseOpcode == PARSEOP_CONNECTION) || 166 1.1.1.2.2.2 jdolecek (ParseOpcode == PARSEOP_EXTERNAL) || 167 1.1.1.2.2.2 jdolecek (ParseOpcode == PARSEOP_OFFSET) || 168 1.1.1.2.2.2 jdolecek (ParseOpcode == PARSEOP_ACCESSAS))) 169 1.1.1.2.2.2 jdolecek { 170 1.1.1.2.2.2 jdolecek Op->Asl.CommentList = Child->Asl.CommentList; 171 1.1.1.2.2.2 jdolecek Op->Asl.EndBlkComment = Child->Asl.EndBlkComment; 172 1.1.1.2.2.2 jdolecek Op->Asl.InlineComment = Child->Asl.InlineComment; 173 1.1.1.2.2.2 jdolecek Op->Asl.FileChanged = Child->Asl.FileChanged; 174 1.1.1.2.2.2 jdolecek 175 1.1.1.2.2.2 jdolecek Child->Asl.CommentList = NULL; 176 1.1.1.2.2.2 jdolecek Child->Asl.EndBlkComment = NULL; 177 1.1.1.2.2.2 jdolecek Child->Asl.InlineComment = NULL; 178 1.1.1.2.2.2 jdolecek Child->Asl.FileChanged = FALSE; 179 1.1.1.2.2.2 jdolecek 180 1.1.1.2.2.2 jdolecek /* 181 1.1.1.2.2.2 jdolecek * These do not need to be "passed off". They can be copied 182 1.1.1.2.2.2 jdolecek * because the code for these opcodes should be printed in the 183 1.1.1.2.2.2 jdolecek * same file. 184 1.1.1.2.2.2 jdolecek */ 185 1.1.1.2.2.2 jdolecek Op->Asl.Filename = Child->Asl.Filename; 186 1.1.1.2.2.2 jdolecek Op->Asl.ParentFilename = Child->Asl.ParentFilename; 187 1.1.1.2.2.2 jdolecek } 188 1.1.1.2.2.2 jdolecek } 189 1.1.1.2.2.2 jdolecek 190 1.1.1.2.2.2 jdolecek /* Point all children to parent */ 191 1.1.1.2.2.2 jdolecek 192 1.1.1.2.2.2 jdolecek Child->Asl.Parent = Op; 193 1.1.1.2.2.2 jdolecek 194 1.1.1.2.2.2 jdolecek /* Link children in a peer list */ 195 1.1.1.2.2.2 jdolecek 196 1.1.1.2.2.2 jdolecek if (PrevChild) 197 1.1.1.2.2.2 jdolecek { 198 1.1.1.2.2.2 jdolecek PrevChild->Asl.Next = Child; 199 1.1.1.2.2.2 jdolecek }; 200 1.1.1.2.2.2 jdolecek 201 1.1.1.2.2.2 jdolecek /* Get the comment from last child in the resource template call */ 202 1.1.1.2.2.2 jdolecek 203 1.1.1.2.2.2 jdolecek if (Gbl_CaptureComments && 204 1.1.1.2.2.2 jdolecek (Op->Asl.ParseOpcode == PARSEOP_RESOURCETEMPLATE)) 205 1.1.1.2.2.2 jdolecek { 206 1.1.1.2.2.2 jdolecek CvDbgPrint ("Transferred current comment list to this op.\n"); 207 1.1.1.2.2.2 jdolecek Op->Asl.CommentList = Child->Asl.CommentList; 208 1.1.1.2.2.2 jdolecek Child->Asl.CommentList = NULL; 209 1.1.1.2.2.2 jdolecek 210 1.1.1.2.2.2 jdolecek Op->Asl.InlineComment = Child->Asl.InlineComment; 211 1.1.1.2.2.2 jdolecek Child->Asl.InlineComment = NULL; 212 1.1.1.2.2.2 jdolecek } 213 1.1.1.2.2.2 jdolecek 214 1.1.1.2.2.2 jdolecek /* 215 1.1.1.2.2.2 jdolecek * This child might be a list, point all ops in the list 216 1.1.1.2.2.2 jdolecek * to the same parent 217 1.1.1.2.2.2 jdolecek */ 218 1.1.1.2.2.2 jdolecek while (Child->Asl.Next) 219 1.1.1.2.2.2 jdolecek { 220 1.1.1.2.2.2 jdolecek Child = Child->Asl.Next; 221 1.1.1.2.2.2 jdolecek Child->Asl.Parent = Op; 222 1.1.1.2.2.2 jdolecek } 223 1.1.1.2.2.2 jdolecek 224 1.1.1.2.2.2 jdolecek PrevChild = Child; 225 1.1.1.2.2.2 jdolecek } 226 1.1.1.2.2.2 jdolecek 227 1.1.1.2.2.2 jdolecek va_end(ap); 228 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "\n"); 229 1.1.1.2.2.2 jdolecek return (Op); 230 1.1.1.2.2.2 jdolecek } 231 1.1.1.2.2.2 jdolecek 232 1.1.1.2.2.2 jdolecek 233 1.1.1.2.2.2 jdolecek /******************************************************************************* 234 1.1.1.2.2.2 jdolecek * 235 1.1.1.2.2.2 jdolecek * FUNCTION: TrCreateLeafOp 236 1.1.1.2.2.2 jdolecek * 237 1.1.1.2.2.2 jdolecek * PARAMETERS: ParseOpcode - New opcode to be assigned to the op 238 1.1.1.2.2.2 jdolecek * 239 1.1.1.2.2.2 jdolecek * RETURN: Pointer to the new op. Aborts on allocation failure 240 1.1.1.2.2.2 jdolecek * 241 1.1.1.2.2.2 jdolecek * DESCRIPTION: Create a simple leaf op (no children or peers, and no value 242 1.1.1.2.2.2 jdolecek * assigned to the op) 243 1.1.1.2.2.2 jdolecek * 244 1.1.1.2.2.2 jdolecek ******************************************************************************/ 245 1.1.1.2.2.2 jdolecek 246 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT * 247 1.1.1.2.2.2 jdolecek TrCreateLeafOp ( 248 1.1.1.2.2.2 jdolecek UINT32 ParseOpcode) 249 1.1.1.2.2.2 jdolecek { 250 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *Op; 251 1.1.1.2.2.2 jdolecek 252 1.1.1.2.2.2 jdolecek 253 1.1.1.2.2.2 jdolecek Op = TrAllocateOp (ParseOpcode); 254 1.1.1.2.2.2 jdolecek 255 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, 256 1.1.1.2.2.2 jdolecek "\nCreateLeafOp Ln/Col %u/%u NewOp %p Op %s\n\n", 257 1.1.1.2.2.2 jdolecek Op->Asl.LineNumber, Op->Asl.Column, Op, UtGetOpName (ParseOpcode)); 258 1.1.1.2.2.2 jdolecek 259 1.1.1.2.2.2 jdolecek return (Op); 260 1.1.1.2.2.2 jdolecek } 261 1.1.1.2.2.2 jdolecek 262 1.1.1.2.2.2 jdolecek 263 1.1.1.2.2.2 jdolecek /******************************************************************************* 264 1.1.1.2.2.2 jdolecek * 265 1.1.1.2.2.2 jdolecek * FUNCTION: TrCreateValuedLeafOp 266 1.1.1.2.2.2 jdolecek * 267 1.1.1.2.2.2 jdolecek * PARAMETERS: ParseOpcode - New opcode to be assigned to the op 268 1.1.1.2.2.2 jdolecek * Value - Value to be assigned to the op 269 1.1.1.2.2.2 jdolecek * 270 1.1.1.2.2.2 jdolecek * RETURN: Pointer to the new op. Aborts on allocation failure 271 1.1.1.2.2.2 jdolecek * 272 1.1.1.2.2.2 jdolecek * DESCRIPTION: Create a leaf op (no children or peers) with a value 273 1.1.1.2.2.2 jdolecek * assigned to it 274 1.1.1.2.2.2 jdolecek * 275 1.1.1.2.2.2 jdolecek ******************************************************************************/ 276 1.1.1.2.2.2 jdolecek 277 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT * 278 1.1.1.2.2.2 jdolecek TrCreateValuedLeafOp ( 279 1.1.1.2.2.2 jdolecek UINT32 ParseOpcode, 280 1.1.1.2.2.2 jdolecek UINT64 Value) 281 1.1.1.2.2.2 jdolecek { 282 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *Op; 283 1.1.1.2.2.2 jdolecek 284 1.1.1.2.2.2 jdolecek 285 1.1.1.2.2.2 jdolecek Op = TrAllocateOp (ParseOpcode); 286 1.1.1.2.2.2 jdolecek Op->Asl.Value.Integer = Value; 287 1.1.1.2.2.2 jdolecek 288 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, 289 1.1.1.2.2.2 jdolecek "\nCreateValuedLeafOp Ln/Col %u/%u NewOp %p " 290 1.1.1.2.2.2 jdolecek "Op %s Value %8.8X%8.8X ", 291 1.1.1.2.2.2 jdolecek Op->Asl.LineNumber, Op->Asl.Column, Op, UtGetOpName(ParseOpcode), 292 1.1.1.2.2.2 jdolecek ACPI_FORMAT_UINT64 (Value)); 293 1.1.1.2.2.2 jdolecek 294 1.1.1.2.2.2 jdolecek switch (ParseOpcode) 295 1.1.1.2.2.2 jdolecek { 296 1.1.1.2.2.2 jdolecek case PARSEOP_STRING_LITERAL: 297 1.1.1.2.2.2 jdolecek 298 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "STRING->%s", Value); 299 1.1.1.2.2.2 jdolecek break; 300 1.1.1.2.2.2 jdolecek 301 1.1.1.2.2.2 jdolecek case PARSEOP_NAMESEG: 302 1.1.1.2.2.2 jdolecek 303 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "NAMESEG->%s", Value); 304 1.1.1.2.2.2 jdolecek break; 305 1.1.1.2.2.2 jdolecek 306 1.1.1.2.2.2 jdolecek case PARSEOP_NAMESTRING: 307 1.1.1.2.2.2 jdolecek 308 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "NAMESTRING->%s", Value); 309 1.1.1.2.2.2 jdolecek break; 310 1.1.1.2.2.2 jdolecek 311 1.1.1.2.2.2 jdolecek case PARSEOP_EISAID: 312 1.1.1.2.2.2 jdolecek 313 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "EISAID->%s", Value); 314 1.1.1.2.2.2 jdolecek break; 315 1.1.1.2.2.2 jdolecek 316 1.1.1.2.2.2 jdolecek case PARSEOP_METHOD: 317 1.1.1.2.2.2 jdolecek 318 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "METHOD"); 319 1.1.1.2.2.2 jdolecek break; 320 1.1.1.2.2.2 jdolecek 321 1.1.1.2.2.2 jdolecek case PARSEOP_INTEGER: 322 1.1.1.2.2.2 jdolecek 323 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "INTEGER->%8.8X%8.8X", 324 1.1.1.2.2.2 jdolecek ACPI_FORMAT_UINT64 (Value)); 325 1.1.1.2.2.2 jdolecek break; 326 1.1.1.2.2.2 jdolecek 327 1.1.1.2.2.2 jdolecek default: 328 1.1.1.2.2.2 jdolecek break; 329 1.1.1.2.2.2 jdolecek } 330 1.1.1.2.2.2 jdolecek 331 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, "\n\n"); 332 1.1.1.2.2.2 jdolecek return (Op); 333 1.1.1.2.2.2 jdolecek } 334 1.1.1.2.2.2 jdolecek 335 1.1.1.2.2.2 jdolecek 336 1.1.1.2.2.2 jdolecek /******************************************************************************* 337 1.1.1.2.2.2 jdolecek * 338 1.1.1.2.2.2 jdolecek * FUNCTION: TrCreateTargetOp 339 1.1.1.2.2.2 jdolecek * 340 1.1.1.2.2.2 jdolecek * PARAMETERS: OriginalOp - Op to be copied 341 1.1.1.2.2.2 jdolecek * 342 1.1.1.2.2.2 jdolecek * RETURN: Pointer to the new op. Aborts on allocation failure 343 1.1.1.2.2.2 jdolecek * 344 1.1.1.2.2.2 jdolecek * DESCRIPTION: Copy an existing op (and subtree). Used in ASL+ (C-style) 345 1.1.1.2.2.2 jdolecek * expressions where the target is the same as one of the 346 1.1.1.2.2.2 jdolecek * operands. A new op and subtree must be created from the 347 1.1.1.2.2.2 jdolecek * original so that the parse tree can be linked properly. 348 1.1.1.2.2.2 jdolecek * 349 1.1.1.2.2.2 jdolecek * NOTE: This code is specific to target operands that are the last 350 1.1.1.2.2.2 jdolecek * operand in an ASL/AML operator. Meaning that the top-level 351 1.1.1.2.2.2 jdolecek * parse Op in a possible subtree has a NULL Next pointer. 352 1.1.1.2.2.2 jdolecek * This simplifies the recursion. 353 1.1.1.2.2.2 jdolecek * 354 1.1.1.2.2.2 jdolecek * Subtree example: 355 1.1.1.2.2.2 jdolecek * DeRefOf (Local1) += 32 356 1.1.1.2.2.2 jdolecek * 357 1.1.1.2.2.2 jdolecek * This gets converted to: 358 1.1.1.2.2.2 jdolecek * Add (DeRefOf (Local1), 32, DeRefOf (Local1)) 359 1.1.1.2.2.2 jdolecek * 360 1.1.1.2.2.2 jdolecek * Each DeRefOf has a single child, Local1. Even more complex 361 1.1.1.2.2.2 jdolecek * subtrees can be created via the Index and DeRefOf operators. 362 1.1.1.2.2.2 jdolecek * 363 1.1.1.2.2.2 jdolecek ******************************************************************************/ 364 1.1.1.2.2.2 jdolecek 365 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT * 366 1.1.1.2.2.2 jdolecek TrCreateTargetOp ( 367 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *OriginalOp, 368 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *ParentOp) 369 1.1.1.2.2.2 jdolecek { 370 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *Op; 371 1.1.1.2.2.2 jdolecek 372 1.1.1.2.2.2 jdolecek 373 1.1.1.2.2.2 jdolecek if (!OriginalOp) 374 1.1.1.2.2.2 jdolecek { 375 1.1.1.2.2.2 jdolecek return (NULL); 376 1.1.1.2.2.2 jdolecek } 377 1.1.1.2.2.2 jdolecek 378 1.1.1.2.2.2 jdolecek Op = UtParseOpCacheCalloc (); 379 1.1.1.2.2.2 jdolecek 380 1.1.1.2.2.2 jdolecek /* Copy the pertinent values (omit link pointer fields) */ 381 1.1.1.2.2.2 jdolecek 382 1.1.1.2.2.2 jdolecek Op->Asl.Value = OriginalOp->Asl.Value; 383 1.1.1.2.2.2 jdolecek Op->Asl.Filename = OriginalOp->Asl.Filename; 384 1.1.1.2.2.2 jdolecek Op->Asl.LineNumber = OriginalOp->Asl.LineNumber; 385 1.1.1.2.2.2 jdolecek Op->Asl.LogicalLineNumber = OriginalOp->Asl.LogicalLineNumber; 386 1.1.1.2.2.2 jdolecek Op->Asl.LogicalByteOffset = OriginalOp->Asl.LogicalByteOffset; 387 1.1.1.2.2.2 jdolecek Op->Asl.Column = OriginalOp->Asl.Column; 388 1.1.1.2.2.2 jdolecek Op->Asl.Flags = OriginalOp->Asl.Flags; 389 1.1.1.2.2.2 jdolecek Op->Asl.CompileFlags = OriginalOp->Asl.CompileFlags; 390 1.1.1.2.2.2 jdolecek Op->Asl.AmlOpcode = OriginalOp->Asl.AmlOpcode; 391 1.1.1.2.2.2 jdolecek Op->Asl.ParseOpcode = OriginalOp->Asl.ParseOpcode; 392 1.1.1.2.2.2 jdolecek Op->Asl.Parent = ParentOp; 393 1.1.1.2.2.2 jdolecek 394 1.1.1.2.2.2 jdolecek UtSetParseOpName (Op); 395 1.1.1.2.2.2 jdolecek 396 1.1.1.2.2.2 jdolecek /* Copy a possible subtree below this op */ 397 1.1.1.2.2.2 jdolecek 398 1.1.1.2.2.2 jdolecek if (OriginalOp->Asl.Child) 399 1.1.1.2.2.2 jdolecek { 400 1.1.1.2.2.2 jdolecek Op->Asl.Child = TrCreateTargetOp (OriginalOp->Asl.Child, Op); 401 1.1.1.2.2.2 jdolecek } 402 1.1.1.2.2.2 jdolecek 403 1.1.1.2.2.2 jdolecek if (OriginalOp->Asl.Next) /* Null for top-level op */ 404 1.1.1.2.2.2 jdolecek { 405 1.1.1.2.2.2 jdolecek Op->Asl.Next = TrCreateTargetOp (OriginalOp->Asl.Next, ParentOp); 406 1.1.1.2.2.2 jdolecek } 407 1.1.1.2.2.2 jdolecek 408 1.1.1.2.2.2 jdolecek return (Op); 409 1.1.1.2.2.2 jdolecek } 410 1.1.1.2.2.2 jdolecek 411 1.1.1.2.2.2 jdolecek 412 1.1.1.2.2.2 jdolecek /******************************************************************************* 413 1.1.1.2.2.2 jdolecek * 414 1.1.1.2.2.2 jdolecek * FUNCTION: TrCreateAssignmentOp 415 1.1.1.2.2.2 jdolecek * 416 1.1.1.2.2.2 jdolecek * PARAMETERS: Target - Assignment target 417 1.1.1.2.2.2 jdolecek * Source - Assignment source 418 1.1.1.2.2.2 jdolecek * 419 1.1.1.2.2.2 jdolecek * RETURN: Pointer to the new op. Aborts on allocation failure 420 1.1.1.2.2.2 jdolecek * 421 1.1.1.2.2.2 jdolecek * DESCRIPTION: Implements the C-style '=' operator. It changes the parse 422 1.1.1.2.2.2 jdolecek * tree if possible to utilize the last argument of the math 423 1.1.1.2.2.2 jdolecek * operators which is a target operand -- thus saving invocation 424 1.1.1.2.2.2 jdolecek * of and additional Store() operator. An optimization. 425 1.1.1.2.2.2 jdolecek * 426 1.1.1.2.2.2 jdolecek ******************************************************************************/ 427 1.1.1.2.2.2 jdolecek 428 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT * 429 1.1.1.2.2.2 jdolecek TrCreateAssignmentOp ( 430 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *Target, 431 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *Source) 432 1.1.1.2.2.2 jdolecek { 433 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *TargetOp; 434 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *SourceOp1; 435 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *SourceOp2; 436 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *Operator; 437 1.1.1.2.2.2 jdolecek 438 1.1.1.2.2.2 jdolecek 439 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, 440 1.1.1.2.2.2 jdolecek "\nTrCreateAssignmentOp Line [%u to %u] Source %s Target %s\n", 441 1.1.1.2.2.2 jdolecek Source->Asl.LineNumber, Source->Asl.EndLine, 442 1.1.1.2.2.2 jdolecek UtGetOpName (Source->Asl.ParseOpcode), 443 1.1.1.2.2.2 jdolecek UtGetOpName (Target->Asl.ParseOpcode)); 444 1.1.1.2.2.2 jdolecek 445 1.1.1.2.2.2 jdolecek TrSetOpFlags (Target, OP_IS_TARGET); 446 1.1.1.2.2.2 jdolecek 447 1.1.1.2.2.2 jdolecek switch (Source->Asl.ParseOpcode) 448 1.1.1.2.2.2 jdolecek { 449 1.1.1.2.2.2 jdolecek /* 450 1.1.1.2.2.2 jdolecek * Only these operators can be optimized because they have 451 1.1.1.2.2.2 jdolecek * a target operand 452 1.1.1.2.2.2 jdolecek */ 453 1.1.1.2.2.2 jdolecek case PARSEOP_ADD: 454 1.1.1.2.2.2 jdolecek case PARSEOP_AND: 455 1.1.1.2.2.2 jdolecek case PARSEOP_DIVIDE: 456 1.1.1.2.2.2 jdolecek case PARSEOP_INDEX: 457 1.1.1.2.2.2 jdolecek case PARSEOP_MOD: 458 1.1.1.2.2.2 jdolecek case PARSEOP_MULTIPLY: 459 1.1.1.2.2.2 jdolecek case PARSEOP_NOT: 460 1.1.1.2.2.2 jdolecek case PARSEOP_OR: 461 1.1.1.2.2.2 jdolecek case PARSEOP_SHIFTLEFT: 462 1.1.1.2.2.2 jdolecek case PARSEOP_SHIFTRIGHT: 463 1.1.1.2.2.2 jdolecek case PARSEOP_SUBTRACT: 464 1.1.1.2.2.2 jdolecek case PARSEOP_XOR: 465 1.1.1.2.2.2 jdolecek 466 1.1.1.2.2.2 jdolecek break; 467 1.1.1.2.2.2 jdolecek 468 1.1.1.2.2.2 jdolecek /* Otherwise, just create a normal Store operator */ 469 1.1.1.2.2.2 jdolecek 470 1.1.1.2.2.2 jdolecek default: 471 1.1.1.2.2.2 jdolecek goto CannotOptimize; 472 1.1.1.2.2.2 jdolecek } 473 1.1.1.2.2.2 jdolecek 474 1.1.1.2.2.2 jdolecek /* 475 1.1.1.2.2.2 jdolecek * Transform the parse tree such that the target is moved to the 476 1.1.1.2.2.2 jdolecek * last operand of the operator 477 1.1.1.2.2.2 jdolecek */ 478 1.1.1.2.2.2 jdolecek SourceOp1 = Source->Asl.Child; 479 1.1.1.2.2.2 jdolecek SourceOp2 = SourceOp1->Asl.Next; 480 1.1.1.2.2.2 jdolecek 481 1.1.1.2.2.2 jdolecek /* NOT only has one operand, but has a target */ 482 1.1.1.2.2.2 jdolecek 483 1.1.1.2.2.2 jdolecek if (Source->Asl.ParseOpcode == PARSEOP_NOT) 484 1.1.1.2.2.2 jdolecek { 485 1.1.1.2.2.2 jdolecek SourceOp2 = SourceOp1; 486 1.1.1.2.2.2 jdolecek } 487 1.1.1.2.2.2 jdolecek 488 1.1.1.2.2.2 jdolecek /* DIVIDE has an extra target operand (remainder) */ 489 1.1.1.2.2.2 jdolecek 490 1.1.1.2.2.2 jdolecek if (Source->Asl.ParseOpcode == PARSEOP_DIVIDE) 491 1.1.1.2.2.2 jdolecek { 492 1.1.1.2.2.2 jdolecek SourceOp2 = SourceOp2->Asl.Next; 493 1.1.1.2.2.2 jdolecek } 494 1.1.1.2.2.2 jdolecek 495 1.1.1.2.2.2 jdolecek TargetOp = SourceOp2->Asl.Next; 496 1.1.1.2.2.2 jdolecek 497 1.1.1.2.2.2 jdolecek /* 498 1.1.1.2.2.2 jdolecek * Can't perform this optimization if there already is a target 499 1.1.1.2.2.2 jdolecek * for the operator (ZERO is a "no target" placeholder). 500 1.1.1.2.2.2 jdolecek */ 501 1.1.1.2.2.2 jdolecek if (TargetOp->Asl.ParseOpcode != PARSEOP_ZERO) 502 1.1.1.2.2.2 jdolecek { 503 1.1.1.2.2.2 jdolecek goto CannotOptimize; 504 1.1.1.2.2.2 jdolecek } 505 1.1.1.2.2.2 jdolecek 506 1.1.1.2.2.2 jdolecek /* Link in the target as the final operand */ 507 1.1.1.2.2.2 jdolecek 508 1.1.1.2.2.2 jdolecek SourceOp2->Asl.Next = Target; 509 1.1.1.2.2.2 jdolecek Target->Asl.Parent = Source; 510 1.1.1.2.2.2 jdolecek return (Source); 511 1.1.1.2.2.2 jdolecek 512 1.1.1.2.2.2 jdolecek 513 1.1.1.2.2.2 jdolecek CannotOptimize: 514 1.1.1.2.2.2 jdolecek 515 1.1.1.2.2.2 jdolecek Operator = TrAllocateOp (PARSEOP_STORE); 516 1.1.1.2.2.2 jdolecek TrLinkOpChildren (Operator, 2, Source, Target); 517 1.1.1.2.2.2 jdolecek 518 1.1.1.2.2.2 jdolecek /* Set the appropriate line numbers for the new op */ 519 1.1.1.2.2.2 jdolecek 520 1.1.1.2.2.2 jdolecek Operator->Asl.LineNumber = Target->Asl.LineNumber; 521 1.1.1.2.2.2 jdolecek Operator->Asl.LogicalLineNumber = Target->Asl.LogicalLineNumber; 522 1.1.1.2.2.2 jdolecek Operator->Asl.LogicalByteOffset = Target->Asl.LogicalByteOffset; 523 1.1.1.2.2.2 jdolecek Operator->Asl.Column = Target->Asl.Column; 524 1.1.1.2.2.2 jdolecek 525 1.1.1.2.2.2 jdolecek return (Operator); 526 1.1.1.2.2.2 jdolecek } 527 1.1.1.2.2.2 jdolecek 528 1.1.1.2.2.2 jdolecek 529 1.1.1.2.2.2 jdolecek /******************************************************************************* 530 1.1.1.2.2.2 jdolecek * 531 1.1.1.2.2.2 jdolecek * FUNCTION: TrCreateNullTargetOp 532 1.1.1.2.2.2 jdolecek * 533 1.1.1.2.2.2 jdolecek * PARAMETERS: None 534 1.1.1.2.2.2 jdolecek * 535 1.1.1.2.2.2 jdolecek * RETURN: Pointer to the new op. Aborts on allocation failure 536 1.1.1.2.2.2 jdolecek * 537 1.1.1.2.2.2 jdolecek * DESCRIPTION: Create a "null" target op. This is defined by the ACPI 538 1.1.1.2.2.2 jdolecek * specification to be a zero AML opcode, and indicates that 539 1.1.1.2.2.2 jdolecek * no target has been specified for the parent operation 540 1.1.1.2.2.2 jdolecek * 541 1.1.1.2.2.2 jdolecek ******************************************************************************/ 542 1.1.1.2.2.2 jdolecek 543 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT * 544 1.1.1.2.2.2 jdolecek TrCreateNullTargetOp ( 545 1.1.1.2.2.2 jdolecek void) 546 1.1.1.2.2.2 jdolecek { 547 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *Op; 548 1.1.1.2.2.2 jdolecek 549 1.1.1.2.2.2 jdolecek 550 1.1.1.2.2.2 jdolecek Op = TrAllocateOp (PARSEOP_ZERO); 551 1.1.1.2.2.2 jdolecek Op->Asl.CompileFlags |= (OP_IS_TARGET | OP_COMPILE_TIME_CONST); 552 1.1.1.2.2.2 jdolecek 553 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, 554 1.1.1.2.2.2 jdolecek "\nCreateNullTargetOp Ln/Col %u/%u NewOp %p Op %s\n", 555 1.1.1.2.2.2 jdolecek Op->Asl.LineNumber, Op->Asl.Column, Op, 556 1.1.1.2.2.2 jdolecek UtGetOpName (Op->Asl.ParseOpcode)); 557 1.1.1.2.2.2 jdolecek 558 1.1.1.2.2.2 jdolecek return (Op); 559 1.1.1.2.2.2 jdolecek } 560 1.1.1.2.2.2 jdolecek 561 1.1.1.2.2.2 jdolecek 562 1.1.1.2.2.2 jdolecek /******************************************************************************* 563 1.1.1.2.2.2 jdolecek * 564 1.1.1.2.2.2 jdolecek * FUNCTION: TrCreateConstantLeafOp 565 1.1.1.2.2.2 jdolecek * 566 1.1.1.2.2.2 jdolecek * PARAMETERS: ParseOpcode - The constant opcode 567 1.1.1.2.2.2 jdolecek * 568 1.1.1.2.2.2 jdolecek * RETURN: Pointer to the new op. Aborts on allocation failure 569 1.1.1.2.2.2 jdolecek * 570 1.1.1.2.2.2 jdolecek * DESCRIPTION: Create a leaf op (no children or peers) for one of the 571 1.1.1.2.2.2 jdolecek * special constants - __LINE__, __FILE__, and __DATE__. 572 1.1.1.2.2.2 jdolecek * 573 1.1.1.2.2.2 jdolecek * Note: The fullimplemenation of __METHOD__ cannot happen here because we 574 1.1.1.2.2.2 jdolecek * don't have a full parse tree at this time and cannot find the parent 575 1.1.1.2.2.2 jdolecek * control method. __METHOD__ must be implemented later, after the parse 576 1.1.1.2.2.2 jdolecek * tree has been fully constructed. 577 1.1.1.2.2.2 jdolecek * 578 1.1.1.2.2.2 jdolecek ******************************************************************************/ 579 1.1.1.2.2.2 jdolecek 580 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT * 581 1.1.1.2.2.2 jdolecek TrCreateConstantLeafOp ( 582 1.1.1.2.2.2 jdolecek UINT32 ParseOpcode) 583 1.1.1.2.2.2 jdolecek { 584 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *Op = NULL; 585 1.1.1.2.2.2 jdolecek time_t CurrentTime; 586 1.1.1.2.2.2 jdolecek char *StaticTimeString; 587 1.1.1.2.2.2 jdolecek char *TimeString; 588 1.1.1.2.2.2 jdolecek char *Filename; 589 1.1.1.2.2.2 jdolecek 590 1.1.1.2.2.2 jdolecek 591 1.1.1.2.2.2 jdolecek switch (ParseOpcode) 592 1.1.1.2.2.2 jdolecek { 593 1.1.1.2.2.2 jdolecek case PARSEOP___LINE__: 594 1.1.1.2.2.2 jdolecek 595 1.1.1.2.2.2 jdolecek Op = TrAllocateOp (PARSEOP_INTEGER); 596 1.1.1.2.2.2 jdolecek Op->Asl.Value.Integer = Op->Asl.LineNumber; 597 1.1.1.2.2.2 jdolecek break; 598 1.1.1.2.2.2 jdolecek 599 1.1.1.2.2.2 jdolecek case PARSEOP___METHOD__: 600 1.1.1.2.2.2 jdolecek 601 1.1.1.2.2.2 jdolecek /* Will become a string literal later */ 602 1.1.1.2.2.2 jdolecek 603 1.1.1.2.2.2 jdolecek Op = TrAllocateOp (PARSEOP___METHOD__); 604 1.1.1.2.2.2 jdolecek Op->Asl.Value.String = NULL; 605 1.1.1.2.2.2 jdolecek break; 606 1.1.1.2.2.2 jdolecek 607 1.1.1.2.2.2 jdolecek case PARSEOP___PATH__: 608 1.1.1.2.2.2 jdolecek 609 1.1.1.2.2.2 jdolecek Op = TrAllocateOp (PARSEOP_STRING_LITERAL); 610 1.1.1.2.2.2 jdolecek 611 1.1.1.2.2.2 jdolecek /* Op.Asl.Filename contains the full pathname to the file */ 612 1.1.1.2.2.2 jdolecek 613 1.1.1.2.2.2 jdolecek Op->Asl.Value.String = Op->Asl.Filename; 614 1.1.1.2.2.2 jdolecek break; 615 1.1.1.2.2.2 jdolecek 616 1.1.1.2.2.2 jdolecek case PARSEOP___FILE__: 617 1.1.1.2.2.2 jdolecek 618 1.1.1.2.2.2 jdolecek Op = TrAllocateOp (PARSEOP_STRING_LITERAL); 619 1.1.1.2.2.2 jdolecek 620 1.1.1.2.2.2 jdolecek /* Get the simple filename from the full path */ 621 1.1.1.2.2.2 jdolecek 622 1.1.1.2.2.2 jdolecek FlSplitInputPathname (Op->Asl.Filename, NULL, &Filename); 623 1.1.1.2.2.2 jdolecek Op->Asl.Value.String = Filename; 624 1.1.1.2.2.2 jdolecek break; 625 1.1.1.2.2.2 jdolecek 626 1.1.1.2.2.2 jdolecek case PARSEOP___DATE__: 627 1.1.1.2.2.2 jdolecek 628 1.1.1.2.2.2 jdolecek Op = TrAllocateOp (PARSEOP_STRING_LITERAL); 629 1.1.1.2.2.2 jdolecek 630 1.1.1.2.2.2 jdolecek /* Get a copy of the current time */ 631 1.1.1.2.2.2 jdolecek 632 1.1.1.2.2.2 jdolecek CurrentTime = time (NULL); 633 1.1.1.2.2.2 jdolecek StaticTimeString = ctime (&CurrentTime); 634 1.1.1.2.2.2 jdolecek TimeString = UtLocalCalloc (strlen (StaticTimeString) + 1); 635 1.1.1.2.2.2 jdolecek strcpy (TimeString, StaticTimeString); 636 1.1.1.2.2.2 jdolecek 637 1.1.1.2.2.2 jdolecek TimeString[strlen(TimeString) -1] = 0; /* Remove trailing newline */ 638 1.1.1.2.2.2 jdolecek Op->Asl.Value.String = TimeString; 639 1.1.1.2.2.2 jdolecek break; 640 1.1.1.2.2.2 jdolecek 641 1.1.1.2.2.2 jdolecek default: /* This would be an internal error */ 642 1.1.1.2.2.2 jdolecek 643 1.1.1.2.2.2 jdolecek return (NULL); 644 1.1.1.2.2.2 jdolecek } 645 1.1.1.2.2.2 jdolecek 646 1.1.1.2.2.2 jdolecek DbgPrint (ASL_PARSE_OUTPUT, 647 1.1.1.2.2.2 jdolecek "\nCreateConstantLeafOp Ln/Col %u/%u NewOp %p " 648 1.1.1.2.2.2 jdolecek "Op %s Value %8.8X%8.8X \n", 649 1.1.1.2.2.2 jdolecek Op->Asl.LineNumber, Op->Asl.Column, Op, UtGetOpName (ParseOpcode), 650 1.1.1.2.2.2 jdolecek ACPI_FORMAT_UINT64 (Op->Asl.Value.Integer)); 651 1.1.1.2.2.2 jdolecek 652 1.1.1.2.2.2 jdolecek return (Op); 653 1.1.1.2.2.2 jdolecek } 654 1.1.1.2.2.2 jdolecek 655 1.1.1.2.2.2 jdolecek 656 1.1.1.2.2.2 jdolecek /******************************************************************************* 657 1.1.1.2.2.2 jdolecek * 658 1.1.1.2.2.2 jdolecek * FUNCTION: TrAllocateOp 659 1.1.1.2.2.2 jdolecek * 660 1.1.1.2.2.2 jdolecek * PARAMETERS: ParseOpcode - Opcode to be assigned to the op 661 1.1.1.2.2.2 jdolecek * 662 1.1.1.2.2.2 jdolecek * RETURN: New parse op. Aborts on allocation failure 663 1.1.1.2.2.2 jdolecek * 664 1.1.1.2.2.2 jdolecek * DESCRIPTION: Allocate and initialize a new parse op for the parse tree 665 1.1.1.2.2.2 jdolecek * 666 1.1.1.2.2.2 jdolecek ******************************************************************************/ 667 1.1.1.2.2.2 jdolecek 668 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT * 669 1.1.1.2.2.2 jdolecek TrAllocateOp ( 670 1.1.1.2.2.2 jdolecek UINT32 ParseOpcode) 671 1.1.1.2.2.2 jdolecek { 672 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *Op; 673 1.1.1.2.2.2 jdolecek ACPI_PARSE_OBJECT *LatestOp; 674 1.1.1.2.2.2 jdolecek 675 1.1.1.2.2.2 jdolecek 676 1.1.1.2.2.2 jdolecek Op = UtParseOpCacheCalloc (); 677 1.1.1.2.2.2 jdolecek 678 1.1.1.2.2.2 jdolecek Op->Asl.ParseOpcode = (UINT16) ParseOpcode; 679 1.1.1.2.2.2 jdolecek Op->Asl.Filename = Gbl_Files[ASL_FILE_INPUT].Filename; 680 1.1.1.2.2.2 jdolecek Op->Asl.LineNumber = Gbl_CurrentLineNumber; 681 1.1.1.2.2.2 jdolecek Op->Asl.LogicalLineNumber = Gbl_LogicalLineNumber; 682 1.1.1.2.2.2 jdolecek Op->Asl.LogicalByteOffset = Gbl_CurrentLineOffset; 683 1.1.1.2.2.2 jdolecek Op->Asl.Column = Gbl_CurrentColumn; 684 1.1.1.2.2.2 jdolecek 685 1.1.1.2.2.2 jdolecek UtSetParseOpName (Op); 686 1.1.1.2.2.2 jdolecek 687 1.1.1.2.2.2 jdolecek /* The following is for capturing comments */ 688 1.1.1.2.2.2 jdolecek 689 1.1.1.2.2.2 jdolecek if(Gbl_CaptureComments) 690 1.1.1.2.2.2 jdolecek { 691 1.1.1.2.2.2 jdolecek LatestOp = Gbl_CommentState.LatestParseOp; 692 1.1.1.2.2.2 jdolecek Op->Asl.InlineComment = NULL; 693 1.1.1.2.2.2 jdolecek Op->Asl.EndNodeComment = NULL; 694 1.1.1.2.2.2 jdolecek Op->Asl.CommentList = NULL; 695 1.1.1.2.2.2 jdolecek Op->Asl.FileChanged = FALSE; 696 1.1.1.2.2.2 jdolecek 697 1.1.1.2.2.2 jdolecek /* 698 1.1.1.2.2.2 jdolecek * Check to see if the file name has changed before resetting the 699 1.1.1.2.2.2 jdolecek * latest parse op. 700 1.1.1.2.2.2 jdolecek */ 701 1.1.1.2.2.2 jdolecek if (LatestOp && 702 1.1.1.2.2.2 jdolecek (ParseOpcode != PARSEOP_INCLUDE) && 703 1.1.1.2.2.2 jdolecek (ParseOpcode != PARSEOP_INCLUDE_END) && 704 1.1.1.2.2.2 jdolecek strcmp (LatestOp->Asl.Filename, Op->Asl.Filename)) 705 1.1.1.2.2.2 jdolecek { 706 1.1.1.2.2.2 jdolecek CvDbgPrint ("latest op: %s\n", LatestOp->Asl.ParseOpName); 707 1.1.1.2.2.2 jdolecek Op->Asl.FileChanged = TRUE; 708 1.1.1.2.2.2 jdolecek if (Gbl_IncludeFileStack) 709 1.1.1.2.2.2 jdolecek { 710 1.1.1.2.2.2 jdolecek Op->Asl.ParentFilename = Gbl_IncludeFileStack->Filename; 711 1.1.1.2.2.2 jdolecek } 712 1.1.1.2.2.2 jdolecek else 713 1.1.1.2.2.2 jdolecek { 714 1.1.1.2.2.2 jdolecek Op->Asl.ParentFilename = NULL; 715 1.1.1.2.2.2 jdolecek } 716 1.1.1.2.2.2 jdolecek } 717 1.1.1.2.2.2 jdolecek 718 1.1.1.2.2.2 jdolecek Gbl_CommentState.LatestParseOp = Op; 719 1.1.1.2.2.2 jdolecek CvDbgPrint ("TrAllocateOp=Set latest parse op to this op.\n"); 720 1.1.1.2.2.2 jdolecek CvDbgPrint (" Op->Asl.ParseOpName = %s\n", 721 1.1.1.2.2.2 jdolecek Gbl_CommentState.LatestParseOp->Asl.ParseOpName); 722 1.1.1.2.2.2 jdolecek CvDbgPrint (" Op->Asl.ParseOpcode = 0x%x\n", ParseOpcode); 723 1.1.1.2.2.2 jdolecek 724 1.1.1.2.2.2 jdolecek if (Op->Asl.FileChanged) 725 1.1.1.2.2.2 jdolecek { 726 1.1.1.2.2.2 jdolecek CvDbgPrint(" file has been changed!\n"); 727 1.1.1.2.2.2 jdolecek } 728 1.1.1.2.2.2 jdolecek 729 1.1.1.2.2.2 jdolecek /* 730 1.1.1.2.2.2 jdolecek * if this parse op's syntax uses () and {} (i.e. Package(1){0x00}) then 731 1.1.1.2.2.2 jdolecek * set a flag in the comment state. This facilitates paring comments for 732 1.1.1.2.2.2 jdolecek * these types of opcodes. 733 1.1.1.2.2.2 jdolecek */ 734 1.1.1.2.2.2 jdolecek if ((CvParseOpBlockType(Op) == (BLOCK_PAREN | BLOCK_BRACE)) && 735 1.1.1.2.2.2 jdolecek (ParseOpcode != PARSEOP_DEFINITION_BLOCK)) 736 1.1.1.2.2.2 jdolecek { 737 1.1.1.2.2.2 jdolecek CvDbgPrint ("Parsing paren/Brace op now!\n"); 738 1.1.1.2.2.2 jdolecek Gbl_CommentState.ParsingParenBraceNode = Op; 739 1.1.1.2.2.2 jdolecek } 740 1.1.1.2.2.2 jdolecek 741 1.1.1.2.2.2 jdolecek if (Gbl_CommentListHead) 742 1.1.1.2.2.2 jdolecek { 743 1.1.1.2.2.2 jdolecek CvDbgPrint ("Transferring...\n"); 744 1.1.1.2.2.2 jdolecek Op->Asl.CommentList = Gbl_CommentListHead; 745 1.1.1.2.2.2 jdolecek Gbl_CommentListHead = NULL; 746 1.1.1.2.2.2 jdolecek Gbl_CommentListTail = NULL; 747 1.1.1.2.2.2 jdolecek CvDbgPrint (" Transferred current comment list to this op.\n"); 748 1.1.1.2.2.2 jdolecek CvDbgPrint (" %s\n", Op->Asl.CommentList->Comment); 749 1.1.1.2.2.2 jdolecek } 750 1.1.1.2.2.2 jdolecek 751 1.1.1.2.2.2 jdolecek if (Gbl_InlineCommentBuffer) 752 1.1.1.2.2.2 jdolecek { 753 1.1.1.2.2.2 jdolecek Op->Asl.InlineComment = Gbl_InlineCommentBuffer; 754 1.1.1.2.2.2 jdolecek Gbl_InlineCommentBuffer = NULL; 755 1.1.1.2.2.2 jdolecek CvDbgPrint ("Transferred current inline comment list to this op.\n"); 756 1.1.1.2.2.2 jdolecek } 757 1.1.1.2.2.2 jdolecek } 758 1.1.1.2.2.2 jdolecek 759 1.1.1.2.2.2 jdolecek return (Op); 760 1.1.1.2.2.2 jdolecek } 761 1.1.1.2.2.2 jdolecek 762 1.1.1.2.2.2 jdolecek 763 1.1.1.2.2.2 jdolecek /******************************************************************************* 764 1.1.1.2.2.2 jdolecek * 765 1.1.1.2.2.2 jdolecek * FUNCTION: TrPrintOpFlags 766 1.1.1.2.2.2 jdolecek * 767 1.1.1.2.2.2 jdolecek * PARAMETERS: Flags - Flags word to be decoded 768 1.1.1.2.2.2 jdolecek * OutputLevel - Debug output level: ASL_TREE_OUTPUT etc. 769 1.1.1.2.2.2 jdolecek * 770 1.1.1.2.2.2 jdolecek * RETURN: None 771 1.1.1.2.2.2 jdolecek * 772 1.1.1.2.2.2 jdolecek * DESCRIPTION: Decode a flags word to text. Displays all flags that are set. 773 1.1.1.2.2.2 jdolecek * 774 1.1.1.2.2.2 jdolecek ******************************************************************************/ 775 1.1.1.2.2.2 jdolecek 776 1.1.1.2.2.2 jdolecek void 777 1.1.1.2.2.2 jdolecek TrPrintOpFlags ( 778 1.1.1.2.2.2 jdolecek UINT32 Flags, 779 1.1.1.2.2.2 jdolecek UINT32 OutputLevel) 780 1.1.1.2.2.2 jdolecek { 781 1.1.1.2.2.2 jdolecek UINT32 FlagBit = 1; 782 1.1.1.2.2.2 jdolecek UINT32 i; 783 1.1.1.2.2.2 jdolecek 784 1.1.1.2.2.2 jdolecek 785 1.1.1.2.2.2 jdolecek for (i = 0; i < ACPI_NUM_OP_FLAGS; i++) 786 1.1.1.2.2.2 jdolecek { 787 1.1.1.2.2.2 jdolecek if (Flags & FlagBit) 788 1.1.1.2.2.2 jdolecek { 789 1.1.1.2.2.2 jdolecek DbgPrint (OutputLevel, " %s", Gbl_OpFlagNames[i]); 790 1.1.1.2.2.2 jdolecek } 791 1.1.1.2.2.2 jdolecek 792 1.1.1.2.2.2 jdolecek FlagBit <<= 1; 793 1.1.1.2.2.2 jdolecek } 794 1.1.1.2.2.2 jdolecek } 795
Indexes created Thu Oct 02 07:10:07 GMT 2025