prmacros.c revision 1.1.1.1.10.2
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.2 tls * Copyright (C) 2000 - 2013, 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 #include "dtcompiler.h" 46 1.1.1.1.10.2 tls 47 1.1.1.1.10.2 tls 48 1.1.1.1.10.2 tls #define _COMPONENT ASL_PREPROCESSOR 49 1.1.1.1.10.2 tls ACPI_MODULE_NAME ("prmacros") 50 1.1.1.1.10.2 tls 51 1.1.1.1.10.2 tls 52 1.1.1.1.10.2 tls /******************************************************************************* 53 1.1.1.1.10.2 tls * 54 1.1.1.1.10.2 tls * FUNCTION: PrDumpPredefinedNames 55 1.1.1.1.10.2 tls * 56 1.1.1.1.10.2 tls * PARAMETERS: None 57 1.1.1.1.10.2 tls * 58 1.1.1.1.10.2 tls * RETURN: None 59 1.1.1.1.10.2 tls * 60 1.1.1.1.10.2 tls * DESCRIPTION: Dump the list of #defines. Used as the preprocessor starts, to 61 1.1.1.1.10.2 tls * display the names that were defined on the command line. 62 1.1.1.1.10.2 tls * Debug information only. 63 1.1.1.1.10.2 tls * 64 1.1.1.1.10.2 tls ******************************************************************************/ 65 1.1.1.1.10.2 tls 66 1.1.1.1.10.2 tls void 67 1.1.1.1.10.2 tls PrDumpPredefinedNames ( 68 1.1.1.1.10.2 tls void) 69 1.1.1.1.10.2 tls { 70 1.1.1.1.10.2 tls PR_DEFINE_INFO *DefineInfo; 71 1.1.1.1.10.2 tls 72 1.1.1.1.10.2 tls 73 1.1.1.1.10.2 tls DefineInfo = Gbl_DefineList; 74 1.1.1.1.10.2 tls while (DefineInfo) 75 1.1.1.1.10.2 tls { 76 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 77 1.1.1.1.10.2 tls "Predefined #define: %s->%s\n", 78 1.1.1.1.10.2 tls 0, DefineInfo->Identifier, DefineInfo->Replacement); 79 1.1.1.1.10.2 tls 80 1.1.1.1.10.2 tls DefineInfo = DefineInfo->Next; 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 /******************************************************************************* 86 1.1.1.1.10.2 tls * 87 1.1.1.1.10.2 tls * FUNCTION: PrAddDefine 88 1.1.1.1.10.2 tls * 89 1.1.1.1.10.2 tls * PARAMETERS: Identifier - Name to be replaced 90 1.1.1.1.10.2 tls * Replacement - Replacement for Identifier 91 1.1.1.1.10.2 tls * Persist - Keep define across multiple compiles? 92 1.1.1.1.10.2 tls * 93 1.1.1.1.10.2 tls * RETURN: A new define_info struct. NULL on error. 94 1.1.1.1.10.2 tls * 95 1.1.1.1.10.2 tls * DESCRIPTION: Add a new #define to the global list 96 1.1.1.1.10.2 tls * 97 1.1.1.1.10.2 tls ******************************************************************************/ 98 1.1.1.1.10.2 tls 99 1.1.1.1.10.2 tls PR_DEFINE_INFO * 100 1.1.1.1.10.2 tls PrAddDefine ( 101 1.1.1.1.10.2 tls char *Identifier, 102 1.1.1.1.10.2 tls char *Replacement, 103 1.1.1.1.10.2 tls BOOLEAN Persist) 104 1.1.1.1.10.2 tls { 105 1.1.1.1.10.2 tls char *IdentifierString; 106 1.1.1.1.10.2 tls char *ReplacementString; 107 1.1.1.1.10.2 tls PR_DEFINE_INFO *DefineInfo; 108 1.1.1.1.10.2 tls 109 1.1.1.1.10.2 tls 110 1.1.1.1.10.2 tls if (!Replacement) 111 1.1.1.1.10.2 tls { 112 1.1.1.1.10.2 tls Replacement = ""; 113 1.1.1.1.10.2 tls } 114 1.1.1.1.10.2 tls 115 1.1.1.1.10.2 tls /* Check for already-defined first */ 116 1.1.1.1.10.2 tls 117 1.1.1.1.10.2 tls DefineInfo = PrMatchDefine (Identifier); 118 1.1.1.1.10.2 tls if (DefineInfo) 119 1.1.1.1.10.2 tls { 120 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID, 121 1.1.1.1.10.2 tls "#define: name already exists: %s\n", 122 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, Identifier); 123 1.1.1.1.10.2 tls 124 1.1.1.1.10.2 tls /* 125 1.1.1.1.10.2 tls * Name already exists. This is only an error if the target name 126 1.1.1.1.10.2 tls * is different. 127 1.1.1.1.10.2 tls */ 128 1.1.1.1.10.2 tls if (strcmp (Replacement, DefineInfo->Replacement)) 129 1.1.1.1.10.2 tls { 130 1.1.1.1.10.2 tls PrError (ASL_ERROR, ASL_MSG_EXISTING_NAME, 131 1.1.1.1.10.2 tls THIS_TOKEN_OFFSET (Identifier)); 132 1.1.1.1.10.2 tls 133 1.1.1.1.10.2 tls return (NULL); 134 1.1.1.1.10.2 tls } 135 1.1.1.1.10.2 tls 136 1.1.1.1.10.2 tls return (DefineInfo); 137 1.1.1.1.10.2 tls } 138 1.1.1.1.10.2 tls 139 1.1.1.1.10.2 tls /* Copy input strings */ 140 1.1.1.1.10.2 tls 141 1.1.1.1.10.2 tls IdentifierString = UtLocalCalloc (strlen (Identifier) + 1); 142 1.1.1.1.10.2 tls strcpy (IdentifierString, Identifier); 143 1.1.1.1.10.2 tls 144 1.1.1.1.10.2 tls ReplacementString = UtLocalCalloc (strlen (Replacement) + 1); 145 1.1.1.1.10.2 tls strcpy (ReplacementString, Replacement); 146 1.1.1.1.10.2 tls 147 1.1.1.1.10.2 tls /* Init and link new define info struct */ 148 1.1.1.1.10.2 tls 149 1.1.1.1.10.2 tls DefineInfo = UtLocalCalloc (sizeof (PR_DEFINE_INFO)); 150 1.1.1.1.10.2 tls DefineInfo->Replacement = ReplacementString; 151 1.1.1.1.10.2 tls DefineInfo->Identifier = IdentifierString; 152 1.1.1.1.10.2 tls DefineInfo->Persist = Persist; 153 1.1.1.1.10.2 tls 154 1.1.1.1.10.2 tls if (Gbl_DefineList) 155 1.1.1.1.10.2 tls { 156 1.1.1.1.10.2 tls Gbl_DefineList->Previous = DefineInfo; 157 1.1.1.1.10.2 tls } 158 1.1.1.1.10.2 tls 159 1.1.1.1.10.2 tls DefineInfo->Next = Gbl_DefineList; 160 1.1.1.1.10.2 tls Gbl_DefineList = DefineInfo; 161 1.1.1.1.10.2 tls return (DefineInfo); 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 /******************************************************************************* 166 1.1.1.1.10.2 tls * 167 1.1.1.1.10.2 tls * FUNCTION: PrRemoveDefine 168 1.1.1.1.10.2 tls * 169 1.1.1.1.10.2 tls * PARAMETERS: DefineName - Name of define to be removed 170 1.1.1.1.10.2 tls * 171 1.1.1.1.10.2 tls * RETURN: None 172 1.1.1.1.10.2 tls * 173 1.1.1.1.10.2 tls * DESCRIPTION: Implements #undef. Remove a #define if found in the global 174 1.1.1.1.10.2 tls * list. No error if the target of the #undef does not exist, 175 1.1.1.1.10.2 tls * as per the C #undef definition. 176 1.1.1.1.10.2 tls * 177 1.1.1.1.10.2 tls ******************************************************************************/ 178 1.1.1.1.10.2 tls 179 1.1.1.1.10.2 tls void 180 1.1.1.1.10.2 tls PrRemoveDefine ( 181 1.1.1.1.10.2 tls char *DefineName) 182 1.1.1.1.10.2 tls { 183 1.1.1.1.10.2 tls PR_DEFINE_INFO *DefineInfo; 184 1.1.1.1.10.2 tls 185 1.1.1.1.10.2 tls 186 1.1.1.1.10.2 tls /* Match name and delete the node */ 187 1.1.1.1.10.2 tls 188 1.1.1.1.10.2 tls DefineInfo = Gbl_DefineList; 189 1.1.1.1.10.2 tls while (DefineInfo) 190 1.1.1.1.10.2 tls { 191 1.1.1.1.10.2 tls if (!strcmp (DefineName, DefineInfo->Identifier)) 192 1.1.1.1.10.2 tls { 193 1.1.1.1.10.2 tls /* Remove from linked list */ 194 1.1.1.1.10.2 tls 195 1.1.1.1.10.2 tls if (DefineInfo->Previous) 196 1.1.1.1.10.2 tls { 197 1.1.1.1.10.2 tls (DefineInfo->Previous)->Next = DefineInfo->Next; 198 1.1.1.1.10.2 tls } 199 1.1.1.1.10.2 tls else 200 1.1.1.1.10.2 tls { 201 1.1.1.1.10.2 tls Gbl_DefineList = DefineInfo->Next; 202 1.1.1.1.10.2 tls } 203 1.1.1.1.10.2 tls 204 1.1.1.1.10.2 tls if (DefineInfo->Next) 205 1.1.1.1.10.2 tls { 206 1.1.1.1.10.2 tls (DefineInfo->Next)->Previous = DefineInfo->Previous; 207 1.1.1.1.10.2 tls } 208 1.1.1.1.10.2 tls 209 1.1.1.1.10.2 tls free (DefineInfo); 210 1.1.1.1.10.2 tls return; 211 1.1.1.1.10.2 tls } 212 1.1.1.1.10.2 tls 213 1.1.1.1.10.2 tls DefineInfo = DefineInfo->Next; 214 1.1.1.1.10.2 tls } 215 1.1.1.1.10.2 tls 216 1.1.1.1.10.2 tls /* 217 1.1.1.1.10.2 tls * Name was not found. By definition of #undef, this is not 218 1.1.1.1.10.2 tls * an error, however. 219 1.1.1.1.10.2 tls */ 220 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 221 1.1.1.1.10.2 tls "#undef: could not find %s\n", 222 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, DefineName); 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 /******************************************************************************* 227 1.1.1.1.10.2 tls * 228 1.1.1.1.10.2 tls * FUNCTION: PrMatchDefine 229 1.1.1.1.10.2 tls * 230 1.1.1.1.10.2 tls * PARAMETERS: MatchString - Name associated with the #define 231 1.1.1.1.10.2 tls * 232 1.1.1.1.10.2 tls * RETURN: Matched string if found. NULL otherwise. 233 1.1.1.1.10.2 tls * 234 1.1.1.1.10.2 tls * DESCRIPTION: Find a name in global #define list 235 1.1.1.1.10.2 tls * 236 1.1.1.1.10.2 tls ******************************************************************************/ 237 1.1.1.1.10.2 tls 238 1.1.1.1.10.2 tls PR_DEFINE_INFO * 239 1.1.1.1.10.2 tls PrMatchDefine ( 240 1.1.1.1.10.2 tls char *MatchString) 241 1.1.1.1.10.2 tls { 242 1.1.1.1.10.2 tls PR_DEFINE_INFO *DefineInfo; 243 1.1.1.1.10.2 tls 244 1.1.1.1.10.2 tls 245 1.1.1.1.10.2 tls DefineInfo = Gbl_DefineList; 246 1.1.1.1.10.2 tls while (DefineInfo) 247 1.1.1.1.10.2 tls { 248 1.1.1.1.10.2 tls if (!strcmp (MatchString, DefineInfo->Identifier)) 249 1.1.1.1.10.2 tls { 250 1.1.1.1.10.2 tls return (DefineInfo); 251 1.1.1.1.10.2 tls } 252 1.1.1.1.10.2 tls 253 1.1.1.1.10.2 tls DefineInfo = DefineInfo->Next; 254 1.1.1.1.10.2 tls } 255 1.1.1.1.10.2 tls 256 1.1.1.1.10.2 tls return (NULL); 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 /******************************************************************************* 261 1.1.1.1.10.2 tls * 262 1.1.1.1.10.2 tls * FUNCTION: PrAddMacro 263 1.1.1.1.10.2 tls * 264 1.1.1.1.10.2 tls * PARAMETERS: Name - Start of the macro definition 265 1.1.1.1.10.2 tls * Next - "Next" buffer from GetNextToken 266 1.1.1.1.10.2 tls * 267 1.1.1.1.10.2 tls * RETURN: None 268 1.1.1.1.10.2 tls * 269 1.1.1.1.10.2 tls * DESCRIPTION: Add a new macro to the list of #defines. Handles argument 270 1.1.1.1.10.2 tls * processing. 271 1.1.1.1.10.2 tls * 272 1.1.1.1.10.2 tls ******************************************************************************/ 273 1.1.1.1.10.2 tls 274 1.1.1.1.10.2 tls void 275 1.1.1.1.10.2 tls PrAddMacro ( 276 1.1.1.1.10.2 tls char *Name, 277 1.1.1.1.10.2 tls char **Next) 278 1.1.1.1.10.2 tls { 279 1.1.1.1.10.2 tls char *Token = NULL; 280 1.1.1.1.10.2 tls ACPI_SIZE TokenOffset; 281 1.1.1.1.10.2 tls ACPI_SIZE MacroBodyOffset; 282 1.1.1.1.10.2 tls PR_DEFINE_INFO *DefineInfo; 283 1.1.1.1.10.2 tls PR_MACRO_ARG *Args; 284 1.1.1.1.10.2 tls char *Body; 285 1.1.1.1.10.2 tls char *BodyInSource; 286 1.1.1.1.10.2 tls UINT32 i; 287 1.1.1.1.10.2 tls UINT16 UseCount = 0; 288 1.1.1.1.10.2 tls UINT16 ArgCount = 0; 289 1.1.1.1.10.2 tls UINT32 Depth = 1; 290 1.1.1.1.10.2 tls UINT32 EndOfArgList; 291 1.1.1.1.10.2 tls char BufferChar; 292 1.1.1.1.10.2 tls 293 1.1.1.1.10.2 tls 294 1.1.1.1.10.2 tls /* Find the end of the arguments list */ 295 1.1.1.1.10.2 tls 296 1.1.1.1.10.2 tls TokenOffset = Name - Gbl_MainTokenBuffer + strlen (Name) + 1; 297 1.1.1.1.10.2 tls while (1) 298 1.1.1.1.10.2 tls { 299 1.1.1.1.10.2 tls BufferChar = Gbl_CurrentLineBuffer[TokenOffset]; 300 1.1.1.1.10.2 tls if (BufferChar == '(') 301 1.1.1.1.10.2 tls { 302 1.1.1.1.10.2 tls Depth++; 303 1.1.1.1.10.2 tls } 304 1.1.1.1.10.2 tls else if (BufferChar == ')') 305 1.1.1.1.10.2 tls { 306 1.1.1.1.10.2 tls Depth--; 307 1.1.1.1.10.2 tls } 308 1.1.1.1.10.2 tls else if (BufferChar == 0) 309 1.1.1.1.10.2 tls { 310 1.1.1.1.10.2 tls PrError (ASL_ERROR, ASL_MSG_MACRO_SYNTAX, TokenOffset); 311 1.1.1.1.10.2 tls return; 312 1.1.1.1.10.2 tls } 313 1.1.1.1.10.2 tls 314 1.1.1.1.10.2 tls if (Depth == 0) 315 1.1.1.1.10.2 tls { 316 1.1.1.1.10.2 tls /* Found arg list end */ 317 1.1.1.1.10.2 tls 318 1.1.1.1.10.2 tls EndOfArgList = TokenOffset; 319 1.1.1.1.10.2 tls break; 320 1.1.1.1.10.2 tls } 321 1.1.1.1.10.2 tls 322 1.1.1.1.10.2 tls TokenOffset++; 323 1.1.1.1.10.2 tls } 324 1.1.1.1.10.2 tls 325 1.1.1.1.10.2 tls /* At this point, we know that we have a reasonable argument list */ 326 1.1.1.1.10.2 tls 327 1.1.1.1.10.2 tls Args = UtLocalCalloc (sizeof (PR_MACRO_ARG) * PR_MAX_MACRO_ARGS); 328 1.1.1.1.10.2 tls 329 1.1.1.1.10.2 tls /* Get the macro argument names */ 330 1.1.1.1.10.2 tls 331 1.1.1.1.10.2 tls for (i = 0; i < PR_MAX_MACRO_ARGS; i++) 332 1.1.1.1.10.2 tls { 333 1.1.1.1.10.2 tls Token = PrGetNextToken (NULL, PR_MACRO_SEPARATORS, Next); 334 1.1.1.1.10.2 tls if (!Token) 335 1.1.1.1.10.2 tls { 336 1.1.1.1.10.2 tls /* This is the case for a NULL macro body */ 337 1.1.1.1.10.2 tls 338 1.1.1.1.10.2 tls BodyInSource = ""; 339 1.1.1.1.10.2 tls goto AddMacroToList; 340 1.1.1.1.10.2 tls } 341 1.1.1.1.10.2 tls 342 1.1.1.1.10.2 tls /* Don't go beyond the argument list */ 343 1.1.1.1.10.2 tls 344 1.1.1.1.10.2 tls TokenOffset = Token - Gbl_MainTokenBuffer + strlen (Token); 345 1.1.1.1.10.2 tls if (TokenOffset > EndOfArgList) 346 1.1.1.1.10.2 tls { 347 1.1.1.1.10.2 tls break; 348 1.1.1.1.10.2 tls } 349 1.1.1.1.10.2 tls 350 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 351 1.1.1.1.10.2 tls "Macro arg: %s \n", 352 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, Token); 353 1.1.1.1.10.2 tls 354 1.1.1.1.10.2 tls Args[i].Name = UtLocalCalloc (strlen (Token) + 1); 355 1.1.1.1.10.2 tls strcpy (Args[i].Name, Token); 356 1.1.1.1.10.2 tls 357 1.1.1.1.10.2 tls Args[i].UseCount = 0; 358 1.1.1.1.10.2 tls 359 1.1.1.1.10.2 tls ArgCount++; 360 1.1.1.1.10.2 tls if (ArgCount >= PR_MAX_MACRO_ARGS) 361 1.1.1.1.10.2 tls { 362 1.1.1.1.10.2 tls PrError (ASL_ERROR, ASL_MSG_TOO_MANY_ARGUMENTS, TokenOffset); 363 1.1.1.1.10.2 tls return; 364 1.1.1.1.10.2 tls } 365 1.1.1.1.10.2 tls } 366 1.1.1.1.10.2 tls 367 1.1.1.1.10.2 tls /* Get the macro body. Token now points to start of body */ 368 1.1.1.1.10.2 tls 369 1.1.1.1.10.2 tls MacroBodyOffset = Token - Gbl_MainTokenBuffer; 370 1.1.1.1.10.2 tls 371 1.1.1.1.10.2 tls /* Match each method arg in the macro body for later use */ 372 1.1.1.1.10.2 tls 373 1.1.1.1.10.2 tls Token = PrGetNextToken (NULL, PR_MACRO_SEPARATORS, Next); 374 1.1.1.1.10.2 tls while (Token) 375 1.1.1.1.10.2 tls { 376 1.1.1.1.10.2 tls /* Search the macro arg list for matching arg */ 377 1.1.1.1.10.2 tls 378 1.1.1.1.10.2 tls for (i = 0; Args[i].Name && (i < PR_MAX_MACRO_ARGS); i++) 379 1.1.1.1.10.2 tls { 380 1.1.1.1.10.2 tls /* 381 1.1.1.1.10.2 tls * Save argument offset within macro body. This is the mechanism 382 1.1.1.1.10.2 tls * used to expand the macro upon invocation. 383 1.1.1.1.10.2 tls * 384 1.1.1.1.10.2 tls * Handles multiple instances of the same argument 385 1.1.1.1.10.2 tls */ 386 1.1.1.1.10.2 tls if (!strcmp (Token, Args[i].Name)) 387 1.1.1.1.10.2 tls { 388 1.1.1.1.10.2 tls UseCount = Args[i].UseCount; 389 1.1.1.1.10.2 tls 390 1.1.1.1.10.2 tls Args[i].Offset[UseCount] = (Token - Gbl_MainTokenBuffer) - MacroBodyOffset; 391 1.1.1.1.10.2 tls 392 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 393 1.1.1.1.10.2 tls "Macro Arg #%u: %s UseCount %u Offset %u \n", 394 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, i, Token, 395 1.1.1.1.10.2 tls UseCount+1, Args[i].Offset[UseCount]); 396 1.1.1.1.10.2 tls 397 1.1.1.1.10.2 tls Args[i].UseCount++; 398 1.1.1.1.10.2 tls if (Args[i].UseCount >= PR_MAX_ARG_INSTANCES) 399 1.1.1.1.10.2 tls { 400 1.1.1.1.10.2 tls PrError (ASL_ERROR, ASL_MSG_TOO_MANY_ARGUMENTS, 401 1.1.1.1.10.2 tls THIS_TOKEN_OFFSET (Token)); 402 1.1.1.1.10.2 tls 403 1.1.1.1.10.2 tls return; 404 1.1.1.1.10.2 tls } 405 1.1.1.1.10.2 tls break; 406 1.1.1.1.10.2 tls } 407 1.1.1.1.10.2 tls } 408 1.1.1.1.10.2 tls 409 1.1.1.1.10.2 tls Token = PrGetNextToken (NULL, PR_MACRO_SEPARATORS, Next); 410 1.1.1.1.10.2 tls } 411 1.1.1.1.10.2 tls 412 1.1.1.1.10.2 tls BodyInSource = &Gbl_CurrentLineBuffer[MacroBodyOffset]; 413 1.1.1.1.10.2 tls 414 1.1.1.1.10.2 tls 415 1.1.1.1.10.2 tls AddMacroToList: 416 1.1.1.1.10.2 tls 417 1.1.1.1.10.2 tls /* Check if name is already defined first */ 418 1.1.1.1.10.2 tls 419 1.1.1.1.10.2 tls DefineInfo = PrMatchDefine (Name); 420 1.1.1.1.10.2 tls if (DefineInfo) 421 1.1.1.1.10.2 tls { 422 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 423 1.1.1.1.10.2 tls "#define: macro name already exists: %s\n", 424 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, Name); 425 1.1.1.1.10.2 tls 426 1.1.1.1.10.2 tls /* Error only if not exactly the same macro */ 427 1.1.1.1.10.2 tls 428 1.1.1.1.10.2 tls if (strcmp (DefineInfo->Body, BodyInSource) || 429 1.1.1.1.10.2 tls (DefineInfo->ArgCount != ArgCount)) 430 1.1.1.1.10.2 tls { 431 1.1.1.1.10.2 tls PrError (ASL_ERROR, ASL_MSG_EXISTING_NAME, 432 1.1.1.1.10.2 tls THIS_TOKEN_OFFSET (Name)); 433 1.1.1.1.10.2 tls } 434 1.1.1.1.10.2 tls 435 1.1.1.1.10.2 tls return; 436 1.1.1.1.10.2 tls } 437 1.1.1.1.10.2 tls 438 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 439 1.1.1.1.10.2 tls "Macro body: %s \n", 440 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, BodyInSource); 441 1.1.1.1.10.2 tls 442 1.1.1.1.10.2 tls /* Add macro to the #define list */ 443 1.1.1.1.10.2 tls 444 1.1.1.1.10.2 tls DefineInfo = PrAddDefine (Name, BodyInSource, FALSE); 445 1.1.1.1.10.2 tls if (DefineInfo) 446 1.1.1.1.10.2 tls { 447 1.1.1.1.10.2 tls Body = UtLocalCalloc (strlen (BodyInSource) + 1); 448 1.1.1.1.10.2 tls strcpy (Body, BodyInSource); 449 1.1.1.1.10.2 tls 450 1.1.1.1.10.2 tls DefineInfo->Body = Body; 451 1.1.1.1.10.2 tls DefineInfo->Args = Args; 452 1.1.1.1.10.2 tls DefineInfo->ArgCount = ArgCount; 453 1.1.1.1.10.2 tls } 454 1.1.1.1.10.2 tls } 455 1.1.1.1.10.2 tls 456 1.1.1.1.10.2 tls 457 1.1.1.1.10.2 tls /******************************************************************************* 458 1.1.1.1.10.2 tls * 459 1.1.1.1.10.2 tls * FUNCTION: PrDoMacroInvocation 460 1.1.1.1.10.2 tls * 461 1.1.1.1.10.2 tls * PARAMETERS: TokenBuffer - Current line buffer 462 1.1.1.1.10.2 tls * MacroStart - Start of the macro invocation within 463 1.1.1.1.10.2 tls * the token buffer 464 1.1.1.1.10.2 tls * DefineInfo - Info for this macro 465 1.1.1.1.10.2 tls * Next - "Next" buffer from GetNextToken 466 1.1.1.1.10.2 tls * 467 1.1.1.1.10.2 tls * RETURN: None 468 1.1.1.1.10.2 tls * 469 1.1.1.1.10.2 tls * DESCRIPTION: Expand a macro invocation 470 1.1.1.1.10.2 tls * 471 1.1.1.1.10.2 tls ******************************************************************************/ 472 1.1.1.1.10.2 tls 473 1.1.1.1.10.2 tls void 474 1.1.1.1.10.2 tls PrDoMacroInvocation ( 475 1.1.1.1.10.2 tls char *TokenBuffer, 476 1.1.1.1.10.2 tls char *MacroStart, 477 1.1.1.1.10.2 tls PR_DEFINE_INFO *DefineInfo, 478 1.1.1.1.10.2 tls char **Next) 479 1.1.1.1.10.2 tls { 480 1.1.1.1.10.2 tls PR_MACRO_ARG *Args; 481 1.1.1.1.10.2 tls char *Token = NULL; 482 1.1.1.1.10.2 tls UINT32 TokenOffset; 483 1.1.1.1.10.2 tls UINT32 Length; 484 1.1.1.1.10.2 tls UINT32 i; 485 1.1.1.1.10.2 tls 486 1.1.1.1.10.2 tls 487 1.1.1.1.10.2 tls /* Take a copy of the macro body for expansion */ 488 1.1.1.1.10.2 tls 489 1.1.1.1.10.2 tls strcpy (Gbl_MacroTokenBuffer, DefineInfo->Body); 490 1.1.1.1.10.2 tls 491 1.1.1.1.10.2 tls /* Replace each argument within the prototype body */ 492 1.1.1.1.10.2 tls 493 1.1.1.1.10.2 tls Args = DefineInfo->Args; 494 1.1.1.1.10.2 tls if (!Args->Name) 495 1.1.1.1.10.2 tls { 496 1.1.1.1.10.2 tls /* This macro has no arguments */ 497 1.1.1.1.10.2 tls 498 1.1.1.1.10.2 tls Token = PrGetNextToken (NULL, PR_MACRO_ARGUMENTS, Next); 499 1.1.1.1.10.2 tls if (!Token) 500 1.1.1.1.10.2 tls { 501 1.1.1.1.10.2 tls goto BadInvocation; 502 1.1.1.1.10.2 tls } 503 1.1.1.1.10.2 tls 504 1.1.1.1.10.2 tls TokenOffset = (MacroStart - TokenBuffer); 505 1.1.1.1.10.2 tls Length = Token - MacroStart + strlen (Token) + 1; 506 1.1.1.1.10.2 tls 507 1.1.1.1.10.2 tls PrReplaceData ( 508 1.1.1.1.10.2 tls &Gbl_CurrentLineBuffer[TokenOffset], Length, 509 1.1.1.1.10.2 tls Gbl_MacroTokenBuffer, strlen (Gbl_MacroTokenBuffer)); 510 1.1.1.1.10.2 tls return; 511 1.1.1.1.10.2 tls } 512 1.1.1.1.10.2 tls 513 1.1.1.1.10.2 tls while (Args->Name) 514 1.1.1.1.10.2 tls { 515 1.1.1.1.10.2 tls /* Get the next argument from macro invocation */ 516 1.1.1.1.10.2 tls 517 1.1.1.1.10.2 tls Token = PrGetNextToken (NULL, PR_MACRO_SEPARATORS, Next); 518 1.1.1.1.10.2 tls if (!Token) 519 1.1.1.1.10.2 tls { 520 1.1.1.1.10.2 tls goto BadInvocation; 521 1.1.1.1.10.2 tls } 522 1.1.1.1.10.2 tls 523 1.1.1.1.10.2 tls /* Replace all instances of this argument */ 524 1.1.1.1.10.2 tls 525 1.1.1.1.10.2 tls for (i = 0; i < Args->UseCount; i++) 526 1.1.1.1.10.2 tls { 527 1.1.1.1.10.2 tls /* Offset zero indicates "arg not used" */ 528 1.1.1.1.10.2 tls /* TBD: Not really needed now, with UseCount available */ 529 1.1.1.1.10.2 tls 530 1.1.1.1.10.2 tls if (Args->Offset[i] == 0) 531 1.1.1.1.10.2 tls { 532 1.1.1.1.10.2 tls break; 533 1.1.1.1.10.2 tls } 534 1.1.1.1.10.2 tls 535 1.1.1.1.10.2 tls PrReplaceData ( 536 1.1.1.1.10.2 tls &Gbl_MacroTokenBuffer[Args->Offset[i]], strlen (Args->Name), 537 1.1.1.1.10.2 tls Token, strlen (Token)); 538 1.1.1.1.10.2 tls 539 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 540 1.1.1.1.10.2 tls "ExpandArg: %s \n", 541 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, Gbl_MacroTokenBuffer); 542 1.1.1.1.10.2 tls } 543 1.1.1.1.10.2 tls 544 1.1.1.1.10.2 tls Args++; 545 1.1.1.1.10.2 tls } 546 1.1.1.1.10.2 tls 547 1.1.1.1.10.2 tls /* TBD: need to make sure macro was not invoked with too many arguments */ 548 1.1.1.1.10.2 tls 549 1.1.1.1.10.2 tls if (!Token) 550 1.1.1.1.10.2 tls { 551 1.1.1.1.10.2 tls return; 552 1.1.1.1.10.2 tls } 553 1.1.1.1.10.2 tls 554 1.1.1.1.10.2 tls /* Replace the entire macro invocation with the expanded macro */ 555 1.1.1.1.10.2 tls 556 1.1.1.1.10.2 tls TokenOffset = (MacroStart - TokenBuffer); 557 1.1.1.1.10.2 tls Length = Token - MacroStart + strlen (Token) + 1; 558 1.1.1.1.10.2 tls 559 1.1.1.1.10.2 tls PrReplaceData ( 560 1.1.1.1.10.2 tls &Gbl_CurrentLineBuffer[TokenOffset], Length, 561 1.1.1.1.10.2 tls Gbl_MacroTokenBuffer, strlen (Gbl_MacroTokenBuffer)); 562 1.1.1.1.10.2 tls 563 1.1.1.1.10.2 tls return; 564 1.1.1.1.10.2 tls 565 1.1.1.1.10.2 tls 566 1.1.1.1.10.2 tls BadInvocation: 567 1.1.1.1.10.2 tls PrError (ASL_ERROR, ASL_MSG_INVALID_INVOCATION, 568 1.1.1.1.10.2 tls THIS_TOKEN_OFFSET (MacroStart)); 569 1.1.1.1.10.2 tls 570 1.1.1.1.10.2 tls DbgPrint (ASL_DEBUG_OUTPUT, PR_PREFIX_ID 571 1.1.1.1.10.2 tls "Bad macro invocation: %s \n", 572 1.1.1.1.10.2 tls Gbl_CurrentLineNumber, Gbl_MacroTokenBuffer); 573 1.1.1.1.10.2 tls return; 574 1.1.1.1.10.2 tls } 575
Indexes created Mon Sep 29 03:10:08 GMT 2025