prmacros.c revision 1.1.1.1.10.3
1 1.1.1.1.10.2 tls /****************************************************************************** 2 1.1.1.1.10.2 tls * 3 1.1.1.1.10.2 tls * Module Name: prmacros - Preprocessor #define macro support 4 1.1.1.1.10.2 tls * 5 1.1.1.1.10.2 tls *****************************************************************************/ 6 1.1.1.1.10.2 tls 7 1.1.1.1.10.2 tls /* 8 1.1.1.1.10.3 jdolecek * Copyright (C) 2000 - 2017, Intel Corp. 9 1.1.1.1.10.2 tls * All rights reserved. 10 1.1.1.1.10.2 tls * 11 1.1.1.1.10.2 tls * Redistribution and use in source and binary forms, with or without 12 1.1.1.1.10.2 tls * modification, are permitted provided that the following conditions 13 1.1.1.1.10.2 tls * are met: 14 1.1.1.1.10.2 tls * 1. Redistributions of source code must retain the above copyright 15 1.1.1.1.10.2 tls * notice, this list of conditions, and the following disclaimer, 16 1.1.1.1.10.2 tls * without modification. 17 1.1.1.1.10.2 tls * 2. Redistributions in binary form must reproduce at minimum a disclaimer 18 1.1.1.1.10.2 tls * substantially similar to the "NO WARRANTY" disclaimer below 19 1.1.1.1.10.2 tls * ("Disclaimer") and any redistribution must be conditioned upon 20 1.1.1.1.10.2 tls * including a substantially similar Disclaimer requirement for further 21 1.1.1.1.10.2 tls * binary redistribution. 22 1.1.1.1.10.2 tls * 3. Neither the names of the above-listed copyright holders nor the names 23 1.1.1.1.10.2 tls * of any contributors may be used to endorse or promote products derived 24 1.1.1.1.10.2 tls * from this software without specific prior written permission. 25 1.1.1.1.10.2 tls * 26 1.1.1.1.10.2 tls * Alternatively, this software may be distributed under the terms of the 27 1.1.1.1.10.2 tls * GNU General Public License ("GPL") version 2 as published by the Free 28 1.1.1.1.10.2 tls * Software Foundation. 29 1.1.1.1.10.2 tls * 30 1.1.1.1.10.2 tls * NO WARRANTY 31 1.1.1.1.10.2 tls * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 32 1.1.1.1.10.2 tls * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 33 1.1.1.1.10.2 tls * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR 34 1.1.1.1.10.2 tls * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 35 1.1.1.1.10.2 tls * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 36 1.1.1.1.10.2 tls * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 37 1.1.1.1.10.2 tls * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 38 1.1.1.1.10.2 tls * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 39 1.1.1.1.10.2 tls * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING 40 1.1.1.1.10.2 tls * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 41 1.1.1.1.10.2 tls * POSSIBILITY OF SUCH DAMAGES. 42 1.1.1.1.10.2 tls */ 43 1.1.1.1.10.2 tls 44 1.1.1.1.10.2 tls #include "aslcompiler.h" 45 1.1.1.1.10.2 tls 46 1.1.1.1.10.2 tls #define _COMPONENT ASL_PREPROCESSOR 47 1.1.1.1.10.2 tls ACPI_MODULE_NAME ("prmacros") 48 1.1.1.1.10.2 tls 49 1.1.1.1.10.2 tls 50 1.1.1.1.10.2 tls /******************************************************************************* 51 1.1.1.1.10.2 tls * 52 1.1.1.1.10.2 tls * FUNCTION: PrDumpPredefinedNames 53 1.1.1.1.10.2 tls * 54 1.1.1.1.10.2 tls * PARAMETERS: None 55 1.1.1.1.10.2 tls * 56 1.1.1.1.10.2 tls * RETURN: None 57 1.1.1.1.10.2 tls * 58 1.1.1.1.10.2 tls * DESCRIPTION: Dump the list of #defines. Used as the preprocessor starts, to 59 1.1.1.1.10.2 tls * display the names that were defined on the command line. 60 1.1.1.1.10.2 tls * Debug information only. 61 1.1.1.1.10.2 tls * 62 1.1.1.1.10.2 tls ******************************************************************************/ 63 1.1.1.1.10.2 tls 64 1.1.1.1.10.2 tls void 65 1.1.1.1.10.2 tls PrDumpPredefinedNames ( 66 1.1.1.1.10.2 tls void) 67 1.1.1.1.10.2 tls { 68 1.1.1.1.10.2 tls PR_DEFINE_INFO *DefineInfo; 69 1.1.1.1.10.2 tls 70 1.1.1.1.10.2 tls 71 1.1.1.1.10.2 tls DefineInfo = Gbl_DefineList; 72 1.1.1.1.10.2 tls while (DefineInfo) 73 1.1.1.1.10.2 tls { 74 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 75 1.1.1.1.10.2 tls "Predefined #define: %s->%s\n", 76 1.1.1.1.10.2 tls 0, DefineInfo->Identifier, DefineInfo->Replacement); 77 1.1.1.1.10.2 tls 78 1.1.1.1.10.2 tls DefineInfo = DefineInfo->Next; 79 1.1.1.1.10.2 tls } 80 1.1.1.1.10.2 tls } 81 1.1.1.1.10.2 tls 82 1.1.1.1.10.2 tls 83 1.1.1.1.10.2 tls /******************************************************************************* 84 1.1.1.1.10.2 tls * 85 1.1.1.1.10.2 tls * FUNCTION: PrAddDefine 86 1.1.1.1.10.2 tls * 87 1.1.1.1.10.2 tls * PARAMETERS: Identifier - Name to be replaced 88 1.1.1.1.10.2 tls * Replacement - Replacement for Identifier 89 1.1.1.1.10.2 tls * Persist - Keep define across multiple compiles? 90 1.1.1.1.10.2 tls * 91 1.1.1.1.10.2 tls * RETURN: A new define_info struct. NULL on error. 92 1.1.1.1.10.2 tls * 93 1.1.1.1.10.2 tls * DESCRIPTION: Add a new #define to the global list 94 1.1.1.1.10.2 tls * 95 1.1.1.1.10.2 tls ******************************************************************************/ 96 1.1.1.1.10.2 tls 97 1.1.1.1.10.2 tls PR_DEFINE_INFO * 98 1.1.1.1.10.2 tls PrAddDefine ( 99 1.1.1.1.10.2 tls char *Identifier, 100 1.1.1.1.10.2 tls char *Replacement, 101 1.1.1.1.10.2 tls BOOLEAN Persist) 102 1.1.1.1.10.2 tls { 103 1.1.1.1.10.2 tls char *IdentifierString; 104 1.1.1.1.10.2 tls char *ReplacementString; 105 1.1.1.1.10.2 tls PR_DEFINE_INFO *DefineInfo; 106 1.1.1.1.10.2 tls 107 1.1.1.1.10.2 tls 108 1.1.1.1.10.2 tls if (!Replacement) 109 1.1.1.1.10.2 tls { 110 1.1.1.1.10.2 tls Replacement = ""; 111 1.1.1.1.10.2 tls } 112 1.1.1.1.10.2 tls 113 1.1.1.1.10.2 tls /* Check for already-defined first */ 114 1.1.1.1.10.2 tls 115 1.1.1.1.10.2 tls DefineInfo = PrMatchDefine (Identifier); 116 1.1.1.1.10.2 tls if (DefineInfo) 117 1.1.1.1.10.2 tls { 118 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID, 119 1.1.1.1.10.2 tls "#define: name already exists: %s\n", 120 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, Identifier); 121 1.1.1.1.10.2 tls 122 1.1.1.1.10.2 tls /* 123 1.1.1.1.10.2 tls * Name already exists. This is only an error if the target name 124 1.1.1.1.10.2 tls * is different. 125 1.1.1.1.10.2 tls */ 126 1.1.1.1.10.2 tls if (strcmp (Replacement, DefineInfo->Replacement)) 127 1.1.1.1.10.2 tls { 128 1.1.1.1.10.2 tls PrError (ASL_ERROR, ASL_MSG_EXISTING_NAME, 129 1.1.1.1.10.2 tls THIS_TOKEN_OFFSET (Identifier)); 130 1.1.1.1.10.2 tls 131 1.1.1.1.10.2 tls return (NULL); 132 1.1.1.1.10.2 tls } 133 1.1.1.1.10.2 tls 134 1.1.1.1.10.2 tls return (DefineInfo); 135 1.1.1.1.10.2 tls } 136 1.1.1.1.10.2 tls 137 1.1.1.1.10.2 tls /* Copy input strings */ 138 1.1.1.1.10.2 tls 139 1.1.1.1.10.2 tls IdentifierString = UtLocalCalloc (strlen (Identifier) + 1); 140 1.1.1.1.10.2 tls strcpy (IdentifierString, Identifier); 141 1.1.1.1.10.2 tls 142 1.1.1.1.10.2 tls ReplacementString = UtLocalCalloc (strlen (Replacement) + 1); 143 1.1.1.1.10.2 tls strcpy (ReplacementString, Replacement); 144 1.1.1.1.10.2 tls 145 1.1.1.1.10.2 tls /* Init and link new define info struct */ 146 1.1.1.1.10.2 tls 147 1.1.1.1.10.2 tls DefineInfo = UtLocalCalloc (sizeof (PR_DEFINE_INFO)); 148 1.1.1.1.10.2 tls DefineInfo->Replacement = ReplacementString; 149 1.1.1.1.10.2 tls DefineInfo->Identifier = IdentifierString; 150 1.1.1.1.10.2 tls DefineInfo->Persist = Persist; 151 1.1.1.1.10.2 tls 152 1.1.1.1.10.2 tls if (Gbl_DefineList) 153 1.1.1.1.10.2 tls { 154 1.1.1.1.10.2 tls Gbl_DefineList->Previous = DefineInfo; 155 1.1.1.1.10.2 tls } 156 1.1.1.1.10.2 tls 157 1.1.1.1.10.2 tls DefineInfo->Next = Gbl_DefineList; 158 1.1.1.1.10.2 tls Gbl_DefineList = DefineInfo; 159 1.1.1.1.10.2 tls return (DefineInfo); 160 1.1.1.1.10.2 tls } 161 1.1.1.1.10.2 tls 162 1.1.1.1.10.2 tls 163 1.1.1.1.10.2 tls /******************************************************************************* 164 1.1.1.1.10.2 tls * 165 1.1.1.1.10.2 tls * FUNCTION: PrRemoveDefine 166 1.1.1.1.10.2 tls * 167 1.1.1.1.10.2 tls * PARAMETERS: DefineName - Name of define to be removed 168 1.1.1.1.10.2 tls * 169 1.1.1.1.10.2 tls * RETURN: None 170 1.1.1.1.10.2 tls * 171 1.1.1.1.10.2 tls * DESCRIPTION: Implements #undef. Remove a #define if found in the global 172 1.1.1.1.10.2 tls * list. No error if the target of the #undef does not exist, 173 1.1.1.1.10.2 tls * as per the C #undef definition. 174 1.1.1.1.10.2 tls * 175 1.1.1.1.10.2 tls ******************************************************************************/ 176 1.1.1.1.10.2 tls 177 1.1.1.1.10.2 tls void 178 1.1.1.1.10.2 tls PrRemoveDefine ( 179 1.1.1.1.10.2 tls char *DefineName) 180 1.1.1.1.10.2 tls { 181 1.1.1.1.10.2 tls PR_DEFINE_INFO *DefineInfo; 182 1.1.1.1.10.2 tls 183 1.1.1.1.10.2 tls 184 1.1.1.1.10.2 tls /* Match name and delete the node */ 185 1.1.1.1.10.2 tls 186 1.1.1.1.10.2 tls DefineInfo = Gbl_DefineList; 187 1.1.1.1.10.2 tls while (DefineInfo) 188 1.1.1.1.10.2 tls { 189 1.1.1.1.10.2 tls if (!strcmp (DefineName, DefineInfo->Identifier)) 190 1.1.1.1.10.2 tls { 191 1.1.1.1.10.2 tls /* Remove from linked list */ 192 1.1.1.1.10.2 tls 193 1.1.1.1.10.2 tls if (DefineInfo->Previous) 194 1.1.1.1.10.2 tls { 195 1.1.1.1.10.2 tls (DefineInfo->Previous)->Next = DefineInfo->Next; 196 1.1.1.1.10.2 tls } 197 1.1.1.1.10.2 tls else 198 1.1.1.1.10.2 tls { 199 1.1.1.1.10.2 tls Gbl_DefineList = DefineInfo->Next; 200 1.1.1.1.10.2 tls } 201 1.1.1.1.10.2 tls 202 1.1.1.1.10.2 tls if (DefineInfo->Next) 203 1.1.1.1.10.2 tls { 204 1.1.1.1.10.2 tls (DefineInfo->Next)->Previous = DefineInfo->Previous; 205 1.1.1.1.10.2 tls } 206 1.1.1.1.10.2 tls 207 1.1.1.1.10.2 tls free (DefineInfo); 208 1.1.1.1.10.2 tls return; 209 1.1.1.1.10.2 tls } 210 1.1.1.1.10.2 tls 211 1.1.1.1.10.2 tls DefineInfo = DefineInfo->Next; 212 1.1.1.1.10.2 tls } 213 1.1.1.1.10.2 tls 214 1.1.1.1.10.2 tls /* 215 1.1.1.1.10.2 tls * Name was not found. By definition of #undef, this is not 216 1.1.1.1.10.2 tls * an error, however. 217 1.1.1.1.10.2 tls */ 218 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 219 1.1.1.1.10.2 tls "#undef: could not find %s\n", 220 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, DefineName); 221 1.1.1.1.10.2 tls } 222 1.1.1.1.10.2 tls 223 1.1.1.1.10.2 tls 224 1.1.1.1.10.2 tls /******************************************************************************* 225 1.1.1.1.10.2 tls * 226 1.1.1.1.10.2 tls * FUNCTION: PrMatchDefine 227 1.1.1.1.10.2 tls * 228 1.1.1.1.10.2 tls * PARAMETERS: MatchString - Name associated with the #define 229 1.1.1.1.10.2 tls * 230 1.1.1.1.10.2 tls * RETURN: Matched string if found. NULL otherwise. 231 1.1.1.1.10.2 tls * 232 1.1.1.1.10.2 tls * DESCRIPTION: Find a name in global #define list 233 1.1.1.1.10.2 tls * 234 1.1.1.1.10.2 tls ******************************************************************************/ 235 1.1.1.1.10.2 tls 236 1.1.1.1.10.2 tls PR_DEFINE_INFO * 237 1.1.1.1.10.2 tls PrMatchDefine ( 238 1.1.1.1.10.2 tls char *MatchString) 239 1.1.1.1.10.2 tls { 240 1.1.1.1.10.2 tls PR_DEFINE_INFO *DefineInfo; 241 1.1.1.1.10.2 tls 242 1.1.1.1.10.2 tls 243 1.1.1.1.10.2 tls DefineInfo = Gbl_DefineList; 244 1.1.1.1.10.2 tls while (DefineInfo) 245 1.1.1.1.10.2 tls { 246 1.1.1.1.10.2 tls if (!strcmp (MatchString, DefineInfo->Identifier)) 247 1.1.1.1.10.2 tls { 248 1.1.1.1.10.2 tls return (DefineInfo); 249 1.1.1.1.10.2 tls } 250 1.1.1.1.10.2 tls 251 1.1.1.1.10.2 tls DefineInfo = DefineInfo->Next; 252 1.1.1.1.10.2 tls } 253 1.1.1.1.10.2 tls 254 1.1.1.1.10.2 tls return (NULL); 255 1.1.1.1.10.2 tls } 256 1.1.1.1.10.2 tls 257 1.1.1.1.10.2 tls 258 1.1.1.1.10.2 tls /******************************************************************************* 259 1.1.1.1.10.2 tls * 260 1.1.1.1.10.2 tls * FUNCTION: PrAddMacro 261 1.1.1.1.10.2 tls * 262 1.1.1.1.10.2 tls * PARAMETERS: Name - Start of the macro definition 263 1.1.1.1.10.2 tls * Next - "Next" buffer from GetNextToken 264 1.1.1.1.10.2 tls * 265 1.1.1.1.10.2 tls * RETURN: None 266 1.1.1.1.10.2 tls * 267 1.1.1.1.10.2 tls * DESCRIPTION: Add a new macro to the list of #defines. Handles argument 268 1.1.1.1.10.2 tls * processing. 269 1.1.1.1.10.2 tls * 270 1.1.1.1.10.2 tls ******************************************************************************/ 271 1.1.1.1.10.2 tls 272 1.1.1.1.10.2 tls void 273 1.1.1.1.10.2 tls PrAddMacro ( 274 1.1.1.1.10.2 tls char *Name, 275 1.1.1.1.10.2 tls char **Next) 276 1.1.1.1.10.2 tls { 277 1.1.1.1.10.2 tls char *Token = NULL; 278 1.1.1.1.10.2 tls ACPI_SIZE TokenOffset; 279 1.1.1.1.10.2 tls ACPI_SIZE MacroBodyOffset; 280 1.1.1.1.10.2 tls PR_DEFINE_INFO *DefineInfo; 281 1.1.1.1.10.2 tls PR_MACRO_ARG *Args; 282 1.1.1.1.10.2 tls char *Body; 283 1.1.1.1.10.2 tls char *BodyInSource; 284 1.1.1.1.10.2 tls UINT32 i; 285 1.1.1.1.10.2 tls UINT16 UseCount = 0; 286 1.1.1.1.10.2 tls UINT16 ArgCount = 0; 287 1.1.1.1.10.2 tls UINT32 Depth = 1; 288 1.1.1.1.10.2 tls UINT32 EndOfArgList; 289 1.1.1.1.10.2 tls char BufferChar; 290 1.1.1.1.10.2 tls 291 1.1.1.1.10.2 tls 292 1.1.1.1.10.2 tls /* Find the end of the arguments list */ 293 1.1.1.1.10.2 tls 294 1.1.1.1.10.2 tls TokenOffset = Name - Gbl_MainTokenBuffer + strlen (Name) + 1; 295 1.1.1.1.10.2 tls while (1) 296 1.1.1.1.10.2 tls { 297 1.1.1.1.10.2 tls BufferChar = Gbl_CurrentLineBuffer[TokenOffset]; 298 1.1.1.1.10.2 tls if (BufferChar == '(') 299 1.1.1.1.10.2 tls { 300 1.1.1.1.10.2 tls Depth++; 301 1.1.1.1.10.2 tls } 302 1.1.1.1.10.2 tls else if (BufferChar == ')') 303 1.1.1.1.10.2 tls { 304 1.1.1.1.10.2 tls Depth--; 305 1.1.1.1.10.2 tls } 306 1.1.1.1.10.2 tls else if (BufferChar == 0) 307 1.1.1.1.10.2 tls { 308 1.1.1.1.10.2 tls PrError (ASL_ERROR, ASL_MSG_MACRO_SYNTAX, TokenOffset); 309 1.1.1.1.10.2 tls return; 310 1.1.1.1.10.2 tls } 311 1.1.1.1.10.2 tls 312 1.1.1.1.10.2 tls if (Depth == 0) 313 1.1.1.1.10.2 tls { 314 1.1.1.1.10.2 tls /* Found arg list end */ 315 1.1.1.1.10.2 tls 316 1.1.1.1.10.2 tls EndOfArgList = TokenOffset; 317 1.1.1.1.10.2 tls break; 318 1.1.1.1.10.2 tls } 319 1.1.1.1.10.2 tls 320 1.1.1.1.10.2 tls TokenOffset++; 321 1.1.1.1.10.2 tls } 322 1.1.1.1.10.2 tls 323 1.1.1.1.10.2 tls /* At this point, we know that we have a reasonable argument list */ 324 1.1.1.1.10.2 tls 325 1.1.1.1.10.2 tls Args = UtLocalCalloc (sizeof (PR_MACRO_ARG) * PR_MAX_MACRO_ARGS); 326 1.1.1.1.10.2 tls 327 1.1.1.1.10.2 tls /* Get the macro argument names */ 328 1.1.1.1.10.2 tls 329 1.1.1.1.10.2 tls for (i = 0; i < PR_MAX_MACRO_ARGS; i++) 330 1.1.1.1.10.2 tls { 331 1.1.1.1.10.2 tls Token = PrGetNextToken (NULL, PR_MACRO_SEPARATORS, Next); 332 1.1.1.1.10.2 tls if (!Token) 333 1.1.1.1.10.2 tls { 334 1.1.1.1.10.2 tls /* This is the case for a NULL macro body */ 335 1.1.1.1.10.2 tls 336 1.1.1.1.10.2 tls BodyInSource = ""; 337 1.1.1.1.10.2 tls goto AddMacroToList; 338 1.1.1.1.10.2 tls } 339 1.1.1.1.10.2 tls 340 1.1.1.1.10.2 tls /* Don't go beyond the argument list */ 341 1.1.1.1.10.2 tls 342 1.1.1.1.10.2 tls TokenOffset = Token - Gbl_MainTokenBuffer + strlen (Token); 343 1.1.1.1.10.2 tls if (TokenOffset > EndOfArgList) 344 1.1.1.1.10.2 tls { 345 1.1.1.1.10.2 tls break; 346 1.1.1.1.10.2 tls } 347 1.1.1.1.10.2 tls 348 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 349 1.1.1.1.10.2 tls "Macro arg: %s \n", 350 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, Token); 351 1.1.1.1.10.2 tls 352 1.1.1.1.10.2 tls Args[i].Name = UtLocalCalloc (strlen (Token) + 1); 353 1.1.1.1.10.2 tls strcpy (Args[i].Name, Token); 354 1.1.1.1.10.2 tls 355 1.1.1.1.10.2 tls Args[i].UseCount = 0; 356 1.1.1.1.10.2 tls 357 1.1.1.1.10.2 tls ArgCount++; 358 1.1.1.1.10.2 tls if (ArgCount >= PR_MAX_MACRO_ARGS) 359 1.1.1.1.10.2 tls { 360 1.1.1.1.10.2 tls PrError (ASL_ERROR, ASL_MSG_TOO_MANY_ARGUMENTS, TokenOffset); 361 1.1.1.1.10.3 jdolecek goto ErrorExit; 362 1.1.1.1.10.2 tls } 363 1.1.1.1.10.2 tls } 364 1.1.1.1.10.2 tls 365 1.1.1.1.10.2 tls /* Get the macro body. Token now points to start of body */ 366 1.1.1.1.10.2 tls 367 1.1.1.1.10.2 tls MacroBodyOffset = Token - Gbl_MainTokenBuffer; 368 1.1.1.1.10.2 tls 369 1.1.1.1.10.2 tls /* Match each method arg in the macro body for later use */ 370 1.1.1.1.10.2 tls 371 1.1.1.1.10.2 tls Token = PrGetNextToken (NULL, PR_MACRO_SEPARATORS, Next); 372 1.1.1.1.10.2 tls while (Token) 373 1.1.1.1.10.2 tls { 374 1.1.1.1.10.2 tls /* Search the macro arg list for matching arg */ 375 1.1.1.1.10.2 tls 376 1.1.1.1.10.3 jdolecek for (i = 0; ((i < PR_MAX_MACRO_ARGS) && Args[i].Name); i++) 377 1.1.1.1.10.2 tls { 378 1.1.1.1.10.2 tls /* 379 1.1.1.1.10.2 tls * Save argument offset within macro body. This is the mechanism 380 1.1.1.1.10.2 tls * used to expand the macro upon invocation. 381 1.1.1.1.10.2 tls * 382 1.1.1.1.10.2 tls * Handles multiple instances of the same argument 383 1.1.1.1.10.2 tls */ 384 1.1.1.1.10.2 tls if (!strcmp (Token, Args[i].Name)) 385 1.1.1.1.10.2 tls { 386 1.1.1.1.10.2 tls UseCount = Args[i].UseCount; 387 1.1.1.1.10.2 tls 388 1.1.1.1.10.3 jdolecek Args[i].Offset[UseCount] = 389 1.1.1.1.10.3 jdolecek (Token - Gbl_MainTokenBuffer) - MacroBodyOffset; 390 1.1.1.1.10.2 tls 391 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 392 1.1.1.1.10.2 tls "Macro Arg #%u: %s UseCount %u Offset %u \n", 393 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, i, Token, 394 1.1.1.1.10.2 tls UseCount+1, Args[i].Offset[UseCount]); 395 1.1.1.1.10.2 tls 396 1.1.1.1.10.2 tls Args[i].UseCount++; 397 1.1.1.1.10.2 tls if (Args[i].UseCount >= PR_MAX_ARG_INSTANCES) 398 1.1.1.1.10.2 tls { 399 1.1.1.1.10.2 tls PrError (ASL_ERROR, ASL_MSG_TOO_MANY_ARGUMENTS, 400 1.1.1.1.10.2 tls THIS_TOKEN_OFFSET (Token)); 401 1.1.1.1.10.2 tls 402 1.1.1.1.10.3 jdolecek goto ErrorExit; 403 1.1.1.1.10.2 tls } 404 1.1.1.1.10.2 tls break; 405 1.1.1.1.10.2 tls } 406 1.1.1.1.10.2 tls } 407 1.1.1.1.10.2 tls 408 1.1.1.1.10.2 tls Token = PrGetNextToken (NULL, PR_MACRO_SEPARATORS, Next); 409 1.1.1.1.10.2 tls } 410 1.1.1.1.10.2 tls 411 1.1.1.1.10.2 tls BodyInSource = &Gbl_CurrentLineBuffer[MacroBodyOffset]; 412 1.1.1.1.10.2 tls 413 1.1.1.1.10.2 tls 414 1.1.1.1.10.2 tls AddMacroToList: 415 1.1.1.1.10.2 tls 416 1.1.1.1.10.2 tls /* Check if name is already defined first */ 417 1.1.1.1.10.2 tls 418 1.1.1.1.10.2 tls DefineInfo = PrMatchDefine (Name); 419 1.1.1.1.10.2 tls if (DefineInfo) 420 1.1.1.1.10.2 tls { 421 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 422 1.1.1.1.10.2 tls "#define: macro name already exists: %s\n", 423 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, Name); 424 1.1.1.1.10.2 tls 425 1.1.1.1.10.2 tls /* Error only if not exactly the same macro */ 426 1.1.1.1.10.2 tls 427 1.1.1.1.10.2 tls if (strcmp (DefineInfo->Body, BodyInSource) || 428 1.1.1.1.10.2 tls (DefineInfo->ArgCount != ArgCount)) 429 1.1.1.1.10.2 tls { 430 1.1.1.1.10.2 tls PrError (ASL_ERROR, ASL_MSG_EXISTING_NAME, 431 1.1.1.1.10.2 tls THIS_TOKEN_OFFSET (Name)); 432 1.1.1.1.10.2 tls } 433 1.1.1.1.10.2 tls 434 1.1.1.1.10.3 jdolecek goto ErrorExit; 435 1.1.1.1.10.2 tls } 436 1.1.1.1.10.2 tls 437 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 438 1.1.1.1.10.2 tls "Macro body: %s \n", 439 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, BodyInSource); 440 1.1.1.1.10.2 tls 441 1.1.1.1.10.2 tls /* Add macro to the #define list */ 442 1.1.1.1.10.2 tls 443 1.1.1.1.10.2 tls DefineInfo = PrAddDefine (Name, BodyInSource, FALSE); 444 1.1.1.1.10.2 tls if (DefineInfo) 445 1.1.1.1.10.2 tls { 446 1.1.1.1.10.2 tls Body = UtLocalCalloc (strlen (BodyInSource) + 1); 447 1.1.1.1.10.2 tls strcpy (Body, BodyInSource); 448 1.1.1.1.10.2 tls 449 1.1.1.1.10.2 tls DefineInfo->Body = Body; 450 1.1.1.1.10.2 tls DefineInfo->Args = Args; 451 1.1.1.1.10.2 tls DefineInfo->ArgCount = ArgCount; 452 1.1.1.1.10.2 tls } 453 1.1.1.1.10.3 jdolecek 454 1.1.1.1.10.3 jdolecek return; 455 1.1.1.1.10.3 jdolecek 456 1.1.1.1.10.3 jdolecek 457 1.1.1.1.10.3 jdolecek ErrorExit: 458 1.1.1.1.10.3 jdolecek ACPI_FREE (Args); 459 1.1.1.1.10.3 jdolecek return; 460 1.1.1.1.10.2 tls } 461 1.1.1.1.10.2 tls 462 1.1.1.1.10.2 tls 463 1.1.1.1.10.2 tls /******************************************************************************* 464 1.1.1.1.10.2 tls * 465 1.1.1.1.10.2 tls * FUNCTION: PrDoMacroInvocation 466 1.1.1.1.10.2 tls * 467 1.1.1.1.10.2 tls * PARAMETERS: TokenBuffer - Current line buffer 468 1.1.1.1.10.2 tls * MacroStart - Start of the macro invocation within 469 1.1.1.1.10.2 tls * the token buffer 470 1.1.1.1.10.2 tls * DefineInfo - Info for this macro 471 1.1.1.1.10.2 tls * Next - "Next" buffer from GetNextToken 472 1.1.1.1.10.2 tls * 473 1.1.1.1.10.2 tls * RETURN: None 474 1.1.1.1.10.2 tls * 475 1.1.1.1.10.2 tls * DESCRIPTION: Expand a macro invocation 476 1.1.1.1.10.2 tls * 477 1.1.1.1.10.2 tls ******************************************************************************/ 478 1.1.1.1.10.2 tls 479 1.1.1.1.10.2 tls void 480 1.1.1.1.10.2 tls PrDoMacroInvocation ( 481 1.1.1.1.10.2 tls char *TokenBuffer, 482 1.1.1.1.10.2 tls char *MacroStart, 483 1.1.1.1.10.2 tls PR_DEFINE_INFO *DefineInfo, 484 1.1.1.1.10.2 tls char **Next) 485 1.1.1.1.10.2 tls { 486 1.1.1.1.10.2 tls PR_MACRO_ARG *Args; 487 1.1.1.1.10.2 tls char *Token = NULL; 488 1.1.1.1.10.2 tls UINT32 TokenOffset; 489 1.1.1.1.10.2 tls UINT32 Length; 490 1.1.1.1.10.2 tls UINT32 i; 491 1.1.1.1.10.2 tls 492 1.1.1.1.10.2 tls 493 1.1.1.1.10.2 tls /* Take a copy of the macro body for expansion */ 494 1.1.1.1.10.2 tls 495 1.1.1.1.10.2 tls strcpy (Gbl_MacroTokenBuffer, DefineInfo->Body); 496 1.1.1.1.10.2 tls 497 1.1.1.1.10.2 tls /* Replace each argument within the prototype body */ 498 1.1.1.1.10.2 tls 499 1.1.1.1.10.2 tls Args = DefineInfo->Args; 500 1.1.1.1.10.2 tls if (!Args->Name) 501 1.1.1.1.10.2 tls { 502 1.1.1.1.10.2 tls /* This macro has no arguments */ 503 1.1.1.1.10.2 tls 504 1.1.1.1.10.2 tls Token = PrGetNextToken (NULL, PR_MACRO_ARGUMENTS, Next); 505 1.1.1.1.10.2 tls if (!Token) 506 1.1.1.1.10.2 tls { 507 1.1.1.1.10.2 tls goto BadInvocation; 508 1.1.1.1.10.2 tls } 509 1.1.1.1.10.2 tls 510 1.1.1.1.10.2 tls TokenOffset = (MacroStart - TokenBuffer); 511 1.1.1.1.10.2 tls Length = Token - MacroStart + strlen (Token) + 1; 512 1.1.1.1.10.2 tls 513 1.1.1.1.10.2 tls PrReplaceData ( 514 1.1.1.1.10.2 tls &Gbl_CurrentLineBuffer[TokenOffset], Length, 515 1.1.1.1.10.2 tls Gbl_MacroTokenBuffer, strlen (Gbl_MacroTokenBuffer)); 516 1.1.1.1.10.2 tls return; 517 1.1.1.1.10.2 tls } 518 1.1.1.1.10.2 tls 519 1.1.1.1.10.2 tls while (Args->Name) 520 1.1.1.1.10.2 tls { 521 1.1.1.1.10.2 tls /* Get the next argument from macro invocation */ 522 1.1.1.1.10.2 tls 523 1.1.1.1.10.2 tls Token = PrGetNextToken (NULL, PR_MACRO_SEPARATORS, Next); 524 1.1.1.1.10.2 tls if (!Token) 525 1.1.1.1.10.2 tls { 526 1.1.1.1.10.2 tls goto BadInvocation; 527 1.1.1.1.10.2 tls } 528 1.1.1.1.10.2 tls 529 1.1.1.1.10.2 tls /* Replace all instances of this argument */ 530 1.1.1.1.10.2 tls 531 1.1.1.1.10.2 tls for (i = 0; i < Args->UseCount; i++) 532 1.1.1.1.10.2 tls { 533 1.1.1.1.10.2 tls /* Offset zero indicates "arg not used" */ 534 1.1.1.1.10.2 tls /* TBD: Not really needed now, with UseCount available */ 535 1.1.1.1.10.2 tls 536 1.1.1.1.10.2 tls if (Args->Offset[i] == 0) 537 1.1.1.1.10.2 tls { 538 1.1.1.1.10.2 tls break; 539 1.1.1.1.10.2 tls } 540 1.1.1.1.10.2 tls 541 1.1.1.1.10.2 tls PrReplaceData ( 542 1.1.1.1.10.2 tls &Gbl_MacroTokenBuffer[Args->Offset[i]], strlen (Args->Name), 543 1.1.1.1.10.2 tls Token, strlen (Token)); 544 1.1.1.1.10.2 tls 545 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 546 1.1.1.1.10.2 tls "ExpandArg: %s \n", 547 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, Gbl_MacroTokenBuffer); 548 1.1.1.1.10.2 tls } 549 1.1.1.1.10.2 tls 550 1.1.1.1.10.2 tls Args++; 551 1.1.1.1.10.2 tls } 552 1.1.1.1.10.2 tls 553 1.1.1.1.10.2 tls /* TBD: need to make sure macro was not invoked with too many arguments */ 554 1.1.1.1.10.2 tls 555 1.1.1.1.10.2 tls if (!Token) 556 1.1.1.1.10.2 tls { 557 1.1.1.1.10.2 tls return; 558 1.1.1.1.10.2 tls } 559 1.1.1.1.10.2 tls 560 1.1.1.1.10.2 tls /* Replace the entire macro invocation with the expanded macro */ 561 1.1.1.1.10.2 tls 562 1.1.1.1.10.2 tls TokenOffset = (MacroStart - TokenBuffer); 563 1.1.1.1.10.2 tls Length = Token - MacroStart + strlen (Token) + 1; 564 1.1.1.1.10.2 tls 565 1.1.1.1.10.2 tls PrReplaceData ( 566 1.1.1.1.10.2 tls &Gbl_CurrentLineBuffer[TokenOffset], Length, 567 1.1.1.1.10.2 tls Gbl_MacroTokenBuffer, strlen (Gbl_MacroTokenBuffer)); 568 1.1.1.1.10.2 tls 569 1.1.1.1.10.2 tls return; 570 1.1.1.1.10.2 tls 571 1.1.1.1.10.2 tls 572 1.1.1.1.10.2 tls BadInvocation: 573 1.1.1.1.10.2 tls PrError (ASL_ERROR, ASL_MSG_INVALID_INVOCATION, 574 1.1.1.1.10.2 tls THIS_TOKEN_OFFSET (MacroStart)); 575 1.1.1.1.10.2 tls 576 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 577 1.1.1.1.10.2 tls "Bad macro invocation: %s \n", 578 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, Gbl_MacroTokenBuffer); 579 1.1.1.1.10.2 tls return; 580 1.1.1.1.10.2 tls } 581
Indexes created Mon Sep 29 03:10:08 GMT 2025