1 %{ 2 /****************************************************************************** 3 * 4 * Module Name: dtparser.y - Bison input file for table compiler parser 5 * 6 *****************************************************************************/ 7 8 /* 9 * Copyright (C) 2000 - 2016, Intel Corp. 10 * All rights reserved. 11 * 12 * Redistribution and use in source and binary forms, with or without 13 * modification, are permitted provided that the following conditions 14 * are met: 15 * 1. Redistributions of source code must retain the above copyright 16 * notice, this list of conditions, and the following disclaimer, 17 * without modification. 18 * 2. Redistributions in binary form must reproduce at minimum a disclaimer 19 * substantially similar to the "NO WARRANTY" disclaimer below 20 * ("Disclaimer") and any redistribution must be conditioned upon 21 * including a substantially similar Disclaimer requirement for further 22 * binary redistribution. 23 * 3. Neither the names of the above-listed copyright holders nor the names 24 * of any contributors may be used to endorse or promote products derived 25 * from this software without specific prior written permission. 26 * 27 * Alternatively, this software may be distributed under the terms of the 28 * GNU General Public License ("GPL") version 2 as published by the Free 29 * Software Foundation. 30 * 31 * NO WARRANTY 32 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 33 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 34 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR 35 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 36 * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 37 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 38 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 39 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 40 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING 41 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 42 * POSSIBILITY OF SUCH DAMAGES. 43 */ 44 45 #include "aslcompiler.h" 46 #include "dtcompiler.h" 47 48 #define _COMPONENT DT_COMPILER 49 ACPI_MODULE_NAME ("dtparser") 50 51 void * AslLocalAllocate (unsigned int Size); 52 53 /* Bison/yacc configuration */ 54 55 #undef alloca 56 #define alloca AslLocalAllocate 57 58 int DtParserlex (void); 59 int DtParserparse (void); 60 void DtParsererror (char const *msg); 61 extern char *DtParsertext; 62 extern DT_FIELD *Gbl_CurrentField; 63 64 UINT64 DtParserResult; /* Expression return value */ 65 66 /* Bison/yacc configuration */ 67 68 #ifndef yytname 69 #define yytname DtParsername 70 #endif 71 #define YYDEBUG 1 /* Enable debug output */ 72 #define YYERROR_VERBOSE 1 /* Verbose error messages */ 73 #define YYFLAG -32768 74 75 /* Define YYMALLOC/YYFREE to prevent redefinition errors */ 76 77 #define YYMALLOC malloc 78 #define YYFREE free 79 %} 80 81 %union 82 { 83 UINT64 value; 84 UINT32 op; 85 } 86 87 /*! [Begin] no source code translation */ 88 89 %type <value> Expression 90 91 %token <op> EXPOP_EOF 92 %token <op> EXPOP_NEW_LINE 93 %token <op> EXPOP_NUMBER 94 %token <op> EXPOP_HEX_NUMBER 95 %token <op> EXPOP_DECIMAL_NUMBER 96 %token <op> EXPOP_LABEL 97 %token <op> EXPOP_PAREN_OPEN 98 %token <op> EXPOP_PAREN_CLOSE 99 100 %left <op> EXPOP_LOGICAL_OR 101 %left <op> EXPOP_LOGICAL_AND 102 %left <op> EXPOP_OR 103 %left <op> EXPOP_XOR 104 %left <op> EXPOP_AND 105 %left <op> EXPOP_EQUAL EXPOP_NOT_EQUAL 106 %left <op> EXPOP_GREATER EXPOP_LESS EXPOP_GREATER_EQUAL EXPOP_LESS_EQUAL 107 %left <op> EXPOP_SHIFT_RIGHT EXPOP_SHIFT_LEFT 108 %left <op> EXPOP_ADD EXPOP_SUBTRACT 109 %left <op> EXPOP_MULTIPLY EXPOP_DIVIDE EXPOP_MODULO 110 %right <op> EXPOP_ONES_COMPLIMENT EXPOP_LOGICAL_NOT 111 112 %% 113 114 /* 115 * Operator precedence rules (from K&R) 116 * 117 * 1) ( ) 118 * 2) ! ~ (unary operators that are supported here) 119 * 3) * / % 120 * 4) + - 121 * 5) >> << 122 * 6) < > <= >= 123 * 7) == != 124 * 8) & 125 * 9) ^ 126 * 10) | 127 * 11) && 128 * 12) || 129 */ 130 Value 131 : Expression EXPOP_NEW_LINE { DtParserResult=$1; return 0; } /* End of line (newline) */ 132 | Expression EXPOP_EOF { DtParserResult=$1; return 0; } /* End of string (0) */ 133 ; 134 135 Expression 136 137 /* Unary operators */ 138 139 : EXPOP_LOGICAL_NOT Expression { $$ = DtDoOperator ($2, EXPOP_LOGICAL_NOT, $2);} 140 | EXPOP_ONES_COMPLIMENT Expression { $$ = DtDoOperator ($2, EXPOP_ONES_COMPLIMENT, $2);} 141 142 /* Binary operators */ 143 144 | Expression EXPOP_MULTIPLY Expression { $$ = DtDoOperator ($1, EXPOP_MULTIPLY, $3);} 145 | Expression EXPOP_DIVIDE Expression { $$ = DtDoOperator ($1, EXPOP_DIVIDE, $3);} 146 | Expression EXPOP_MODULO Expression { $$ = DtDoOperator ($1, EXPOP_MODULO, $3);} 147 | Expression EXPOP_ADD Expression { $$ = DtDoOperator ($1, EXPOP_ADD, $3);} 148 | Expression EXPOP_SUBTRACT Expression { $$ = DtDoOperator ($1, EXPOP_SUBTRACT, $3);} 149 | Expression EXPOP_SHIFT_RIGHT Expression { $$ = DtDoOperator ($1, EXPOP_SHIFT_RIGHT, $3);} 150 | Expression EXPOP_SHIFT_LEFT Expression { $$ = DtDoOperator ($1, EXPOP_SHIFT_LEFT, $3);} 151 | Expression EXPOP_GREATER Expression { $$ = DtDoOperator ($1, EXPOP_GREATER, $3);} 152 | Expression EXPOP_LESS Expression { $$ = DtDoOperator ($1, EXPOP_LESS, $3);} 153 | Expression EXPOP_GREATER_EQUAL Expression { $$ = DtDoOperator ($1, EXPOP_GREATER_EQUAL, $3);} 154 | Expression EXPOP_LESS_EQUAL Expression { $$ = DtDoOperator ($1, EXPOP_LESS_EQUAL, $3);} 155 | Expression EXPOP_EQUAL Expression { $$ = DtDoOperator ($1, EXPOP_EQUAL, $3);} 156 | Expression EXPOP_NOT_EQUAL Expression { $$ = DtDoOperator ($1, EXPOP_NOT_EQUAL, $3);} 157 | Expression EXPOP_AND Expression { $$ = DtDoOperator ($1, EXPOP_AND, $3);} 158 | Expression EXPOP_XOR Expression { $$ = DtDoOperator ($1, EXPOP_XOR, $3);} 159 | Expression EXPOP_OR Expression { $$ = DtDoOperator ($1, EXPOP_OR, $3);} 160 | Expression EXPOP_LOGICAL_AND Expression { $$ = DtDoOperator ($1, EXPOP_LOGICAL_AND, $3);} 161 | Expression EXPOP_LOGICAL_OR Expression { $$ = DtDoOperator ($1, EXPOP_LOGICAL_OR, $3);} 162 163 /* Parentheses: '(' Expression ')' */ 164 165 | EXPOP_PAREN_OPEN Expression 166 EXPOP_PAREN_CLOSE { $$ = $2;} 167 168 /* Label references (prefixed with $) */ 169 170 | EXPOP_LABEL { $$ = DtResolveLabel (DtParsertext);} 171 172 /* Default base for a non-prefixed integer is 16 */ 173 174 | EXPOP_NUMBER { stroul64 (DtParsertext, 16, &$$);} 175 176 /* Standard hex number (0x1234) */ 177 178 | EXPOP_HEX_NUMBER { stroul64 (DtParsertext, 16, &$$);} 179 180 /* TBD: Decimal number with prefix (0d1234) - Not supported by stroul64 at this time */ 181 182 | EXPOP_DECIMAL_NUMBER { stroul64 (DtParsertext, 10, &$$);} 183 ; 184 %% 185 186 /*! [End] no source code translation !*/ 187 188 /* 189 * Local support functions, including parser entry point 190 */ 191 #define PR_FIRST_PARSE_OPCODE EXPOP_EOF 192 #define PR_YYTNAME_START 3 193 194 195 /****************************************************************************** 196 * 197 * FUNCTION: DtParsererror 198 * 199 * PARAMETERS: Message - Parser-generated error message 200 * 201 * RETURN: None 202 * 203 * DESCRIPTION: Handler for parser errors 204 * 205 *****************************************************************************/ 206 207 void 208 DtParsererror ( 209 char const *Message) 210 { 211 DtError (ASL_ERROR, ASL_MSG_SYNTAX, 212 Gbl_CurrentField, (char *) Message); 213 } 214 215 216 /****************************************************************************** 217 * 218 * FUNCTION: DtGetOpName 219 * 220 * PARAMETERS: ParseOpcode - Parser token (EXPOP_*) 221 * 222 * RETURN: Pointer to the opcode name 223 * 224 * DESCRIPTION: Get the ascii name of the parse opcode for debug output 225 * 226 *****************************************************************************/ 227 228 char * 229 DtGetOpName ( 230 UINT32 ParseOpcode) 231 { 232 #ifdef ASL_YYTNAME_START 233 /* 234 * First entries (PR_YYTNAME_START) in yytname are special reserved names. 235 * Ignore first 6 characters of name (EXPOP_) 236 */ 237 return ((char *) yytname 238 [(ParseOpcode - PR_FIRST_PARSE_OPCODE) + PR_YYTNAME_START] + 6); 239 #else 240 return ("[Unknown parser generator]"); 241 #endif 242 } 243 244 245 /****************************************************************************** 246 * 247 * FUNCTION: DtEvaluateExpression 248 * 249 * PARAMETERS: ExprString - Expression to be evaluated. Must be 250 * terminated by either a newline or a NUL 251 * string terminator 252 * 253 * RETURN: 64-bit value for the expression 254 * 255 * DESCRIPTION: Main entry point for the DT expression parser 256 * 257 *****************************************************************************/ 258 259 UINT64 260 DtEvaluateExpression ( 261 char *ExprString) 262 { 263 264 DbgPrint (ASL_DEBUG_OUTPUT, 265 "**** Input expression: %s (Base 16)\n", ExprString); 266 267 /* Point lexer to the input string */ 268 269 if (DtInitLexer (ExprString)) 270 { 271 DtError (ASL_ERROR, ASL_MSG_COMPILER_INTERNAL, 272 Gbl_CurrentField, "Could not initialize lexer"); 273 return (0); 274 } 275 276 /* Parse/Evaluate the input string (value returned in DtParserResult) */ 277 278 DtParserparse (); 279 DtTerminateLexer (); 280 281 DbgPrint (ASL_DEBUG_OUTPUT, 282 "**** Parser returned value: %u (%8.8X%8.8X)\n", 283 (UINT32) DtParserResult, ACPI_FORMAT_UINT64 (DtParserResult)); 284 285 return (DtParserResult); 286 } 287