1*a9fa9459Szrj /* expr.h -> header file for expr.c 2*a9fa9459Szrj Copyright (C) 1987-2016 Free Software Foundation, Inc. 3*a9fa9459Szrj 4*a9fa9459Szrj This file is part of GAS, the GNU Assembler. 5*a9fa9459Szrj 6*a9fa9459Szrj GAS is free software; you can redistribute it and/or modify 7*a9fa9459Szrj it under the terms of the GNU General Public License as published by 8*a9fa9459Szrj the Free Software Foundation; either version 3, or (at your option) 9*a9fa9459Szrj any later version. 10*a9fa9459Szrj 11*a9fa9459Szrj GAS is distributed in the hope that it will be useful, 12*a9fa9459Szrj but WITHOUT ANY WARRANTY; without even the implied warranty of 13*a9fa9459Szrj MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14*a9fa9459Szrj GNU General Public License for more details. 15*a9fa9459Szrj 16*a9fa9459Szrj You should have received a copy of the GNU General Public License 17*a9fa9459Szrj along with GAS; see the file COPYING. If not, write to the Free 18*a9fa9459Szrj Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA 19*a9fa9459Szrj 02110-1301, USA. */ 20*a9fa9459Szrj 21*a9fa9459Szrj /* 22*a9fa9459Szrj * By popular demand, we define a struct to represent an expression. 23*a9fa9459Szrj * This will no doubt mutate as expressions become baroque. 24*a9fa9459Szrj * 25*a9fa9459Szrj * Currently, we support expressions like "foo OP bar + 42". In other 26*a9fa9459Szrj * words we permit a (possibly undefined) symbol, a (possibly 27*a9fa9459Szrj * undefined) symbol and the operation used to combine the symbols, 28*a9fa9459Szrj * and an (absolute) augend. RMS says this is so we can have 1-pass 29*a9fa9459Szrj * assembly for any compiler emissions, and a 'case' statement might 30*a9fa9459Szrj * emit 'undefined1 - undefined2'. 31*a9fa9459Szrj * 32*a9fa9459Szrj * The type of an expression used to be stored as a segment. That got 33*a9fa9459Szrj * confusing because it overloaded the concept of a segment. I added 34*a9fa9459Szrj * an operator field, instead. 35*a9fa9459Szrj */ 36*a9fa9459Szrj 37*a9fa9459Szrj /* This is the type of an expression. The operator types are also 38*a9fa9459Szrj used while parsing an expression. 39*a9fa9459Szrj 40*a9fa9459Szrj NOTE: This enumeration must match the op_rank array in expr.c. */ 41*a9fa9459Szrj 42*a9fa9459Szrj typedef enum { 43*a9fa9459Szrj /* An illegal expression. */ 44*a9fa9459Szrj O_illegal, 45*a9fa9459Szrj /* A nonexistent expression. */ 46*a9fa9459Szrj O_absent, 47*a9fa9459Szrj /* X_add_number (a constant expression). */ 48*a9fa9459Szrj O_constant, 49*a9fa9459Szrj /* X_add_symbol + X_add_number. */ 50*a9fa9459Szrj O_symbol, 51*a9fa9459Szrj /* X_add_symbol + X_add_number - the base address of the image. */ 52*a9fa9459Szrj O_symbol_rva, 53*a9fa9459Szrj /* A register (X_add_number is register number). */ 54*a9fa9459Szrj O_register, 55*a9fa9459Szrj /* A big value. If X_add_number is negative or 0, the value is in 56*a9fa9459Szrj generic_floating_point_number. Otherwise the value is in 57*a9fa9459Szrj generic_bignum, and X_add_number is the number of LITTLENUMs in 58*a9fa9459Szrj the value. */ 59*a9fa9459Szrj O_big, 60*a9fa9459Szrj /* (- X_add_symbol) + X_add_number. */ 61*a9fa9459Szrj O_uminus, 62*a9fa9459Szrj /* (~ X_add_symbol) + X_add_number. */ 63*a9fa9459Szrj O_bit_not, 64*a9fa9459Szrj /* (! X_add_symbol) + X_add_number. */ 65*a9fa9459Szrj O_logical_not, 66*a9fa9459Szrj /* (X_add_symbol * X_op_symbol) + X_add_number. */ 67*a9fa9459Szrj O_multiply, 68*a9fa9459Szrj /* (X_add_symbol / X_op_symbol) + X_add_number. */ 69*a9fa9459Szrj O_divide, 70*a9fa9459Szrj /* (X_add_symbol % X_op_symbol) + X_add_number. */ 71*a9fa9459Szrj O_modulus, 72*a9fa9459Szrj /* (X_add_symbol << X_op_symbol) + X_add_number. */ 73*a9fa9459Szrj O_left_shift, 74*a9fa9459Szrj /* (X_add_symbol >> X_op_symbol) + X_add_number. */ 75*a9fa9459Szrj O_right_shift, 76*a9fa9459Szrj /* (X_add_symbol | X_op_symbol) + X_add_number. */ 77*a9fa9459Szrj O_bit_inclusive_or, 78*a9fa9459Szrj /* (X_add_symbol |~ X_op_symbol) + X_add_number. */ 79*a9fa9459Szrj O_bit_or_not, 80*a9fa9459Szrj /* (X_add_symbol ^ X_op_symbol) + X_add_number. */ 81*a9fa9459Szrj O_bit_exclusive_or, 82*a9fa9459Szrj /* (X_add_symbol & X_op_symbol) + X_add_number. */ 83*a9fa9459Szrj O_bit_and, 84*a9fa9459Szrj /* (X_add_symbol + X_op_symbol) + X_add_number. */ 85*a9fa9459Szrj O_add, 86*a9fa9459Szrj /* (X_add_symbol - X_op_symbol) + X_add_number. */ 87*a9fa9459Szrj O_subtract, 88*a9fa9459Szrj /* (X_add_symbol == X_op_symbol) + X_add_number. */ 89*a9fa9459Szrj O_eq, 90*a9fa9459Szrj /* (X_add_symbol != X_op_symbol) + X_add_number. */ 91*a9fa9459Szrj O_ne, 92*a9fa9459Szrj /* (X_add_symbol < X_op_symbol) + X_add_number. */ 93*a9fa9459Szrj O_lt, 94*a9fa9459Szrj /* (X_add_symbol <= X_op_symbol) + X_add_number. */ 95*a9fa9459Szrj O_le, 96*a9fa9459Szrj /* (X_add_symbol >= X_op_symbol) + X_add_number. */ 97*a9fa9459Szrj O_ge, 98*a9fa9459Szrj /* (X_add_symbol > X_op_symbol) + X_add_number. */ 99*a9fa9459Szrj O_gt, 100*a9fa9459Szrj /* (X_add_symbol && X_op_symbol) + X_add_number. */ 101*a9fa9459Szrj O_logical_and, 102*a9fa9459Szrj /* (X_add_symbol || X_op_symbol) + X_add_number. */ 103*a9fa9459Szrj O_logical_or, 104*a9fa9459Szrj /* X_op_symbol [ X_add_symbol ] */ 105*a9fa9459Szrj O_index, 106*a9fa9459Szrj /* machine dependent operators */ 107*a9fa9459Szrj O_md1, O_md2, O_md3, O_md4, O_md5, O_md6, O_md7, O_md8, 108*a9fa9459Szrj O_md9, O_md10, O_md11, O_md12, O_md13, O_md14, O_md15, O_md16, 109*a9fa9459Szrj O_md17, O_md18, O_md19, O_md20, O_md21, O_md22, O_md23, O_md24, 110*a9fa9459Szrj O_md25, O_md26, O_md27, O_md28, O_md29, O_md30, O_md31, O_md32, 111*a9fa9459Szrj /* this must be the largest value */ 112*a9fa9459Szrj O_max 113*a9fa9459Szrj } operatorT; 114*a9fa9459Szrj 115*a9fa9459Szrj typedef struct expressionS { 116*a9fa9459Szrj /* The main symbol. */ 117*a9fa9459Szrj symbolS *X_add_symbol; 118*a9fa9459Szrj /* The second symbol, if needed. */ 119*a9fa9459Szrj symbolS *X_op_symbol; 120*a9fa9459Szrj /* A number to add. */ 121*a9fa9459Szrj offsetT X_add_number; 122*a9fa9459Szrj 123*a9fa9459Szrj /* The type of the expression. We can't assume that an arbitrary 124*a9fa9459Szrj compiler can handle a bitfield of enum type. FIXME: We could 125*a9fa9459Szrj check this using autoconf. */ 126*a9fa9459Szrj #ifdef __GNUC__ 127*a9fa9459Szrj operatorT X_op : 8; 128*a9fa9459Szrj #else 129*a9fa9459Szrj unsigned char X_op; 130*a9fa9459Szrj #endif 131*a9fa9459Szrj 132*a9fa9459Szrj /* Non-zero if X_add_number should be regarded as unsigned. This is 133*a9fa9459Szrj only valid for O_constant expressions. It is only used when an 134*a9fa9459Szrj O_constant must be extended into a bignum (i.e., it is not used 135*a9fa9459Szrj when performing arithmetic on these values). 136*a9fa9459Szrj FIXME: This field is not set very reliably. */ 137*a9fa9459Szrj unsigned int X_unsigned : 1; 138*a9fa9459Szrj /* This is used to implement "word size + 1 bit" arithmetic, so that e.g. 139*a9fa9459Szrj expressions used with .sleb128 directives can use the full range available 140*a9fa9459Szrj for an unsigned word, but can also properly represent all values of a 141*a9fa9459Szrj signed word. */ 142*a9fa9459Szrj unsigned int X_extrabit : 1; 143*a9fa9459Szrj 144*a9fa9459Szrj /* 7 additional bits can be defined if needed. */ 145*a9fa9459Szrj 146*a9fa9459Szrj /* Machine dependent field */ 147*a9fa9459Szrj unsigned short X_md; 148*a9fa9459Szrj } expressionS; 149*a9fa9459Szrj 150*a9fa9459Szrj enum expr_mode 151*a9fa9459Szrj { 152*a9fa9459Szrj expr_evaluate, 153*a9fa9459Szrj expr_normal, 154*a9fa9459Szrj expr_defer 155*a9fa9459Szrj }; 156*a9fa9459Szrj 157*a9fa9459Szrj /* "result" should be type (expressionS *). */ 158*a9fa9459Szrj #define expression(result) expr (0, result, expr_normal) 159*a9fa9459Szrj #define expression_and_evaluate(result) expr (0, result, expr_evaluate) 160*a9fa9459Szrj #define deferred_expression(result) expr (0, result, expr_defer) 161*a9fa9459Szrj 162*a9fa9459Szrj /* If an expression is O_big, look here for its value. These common 163*a9fa9459Szrj data may be clobbered whenever expr() is called. */ 164*a9fa9459Szrj /* Flonums returned here. Big enough to hold most precise flonum. */ 165*a9fa9459Szrj extern FLONUM_TYPE generic_floating_point_number; 166*a9fa9459Szrj /* Bignums returned here. */ 167*a9fa9459Szrj extern LITTLENUM_TYPE generic_bignum[]; 168*a9fa9459Szrj /* Number of littlenums in above. */ 169*a9fa9459Szrj #define SIZE_OF_LARGE_NUMBER (20) 170*a9fa9459Szrj 171*a9fa9459Szrj typedef char operator_rankT; 172*a9fa9459Szrj 173*a9fa9459Szrj extern char get_symbol_name (char **); 174*a9fa9459Szrj extern char restore_line_pointer (char); 175*a9fa9459Szrj extern void expr_begin (void); 176*a9fa9459Szrj extern void expr_set_precedence (void); 177*a9fa9459Szrj extern void expr_set_rank (operatorT, operator_rankT); 178*a9fa9459Szrj extern void add_to_result (expressionS *, offsetT, int); 179*a9fa9459Szrj extern void subtract_from_result (expressionS *, offsetT, int); 180*a9fa9459Szrj extern segT expr (int, expressionS *, enum expr_mode); 181*a9fa9459Szrj extern unsigned int get_single_number (void); 182*a9fa9459Szrj extern symbolS *make_expr_symbol (expressionS * expressionP); 183*a9fa9459Szrj extern int expr_symbol_where (symbolS *, const char **, unsigned int *); 184*a9fa9459Szrj extern void current_location (expressionS *); 185*a9fa9459Szrj 186*a9fa9459Szrj extern symbolS *expr_build_uconstant (offsetT); 187*a9fa9459Szrj extern symbolS *expr_build_dot (void); 188*a9fa9459Szrj 189*a9fa9459Szrj int resolve_expression (expressionS *); 190