xref: /dflybsd-src/contrib/binutils-2.27/gas/expr.h (revision e656dc90e3d65d744d534af2f5ea88cf8101ebcf)
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