Add multiple-CPU support in ravenscar-thread.c
[external/binutils.git] / opcodes / aarch64-opc.h
1 /* aarch64-opc.h -- Header file for aarch64-opc.c and aarch64-opc-2.c.
2    Copyright (C) 2012-2017 Free Software Foundation, Inc.
3    Contributed by ARM Ltd.
4
5    This file is part of the GNU opcodes library.
6
7    This library is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 3, or (at your option)
10    any later version.
11
12    It is distributed in the hope that it will be useful, but WITHOUT
13    ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
14    or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
15    License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with this program; see the file COPYING3. If not,
19    see <http://www.gnu.org/licenses/>.  */
20
21 #ifndef OPCODES_AARCH64_OPC_H
22 #define OPCODES_AARCH64_OPC_H
23
24 #include <string.h>
25 #include "opcode/aarch64.h"
26
27 /* Instruction fields.
28    Keep synced with fields.  */
29 enum aarch64_field_kind
30 {
31   FLD_NIL,
32   FLD_cond2,
33   FLD_nzcv,
34   FLD_defgh,
35   FLD_abc,
36   FLD_imm19,
37   FLD_immhi,
38   FLD_immlo,
39   FLD_size,
40   FLD_vldst_size,
41   FLD_op,
42   FLD_Q,
43   FLD_Rt,
44   FLD_Rd,
45   FLD_Rn,
46   FLD_Rt2,
47   FLD_Ra,
48   FLD_op2,
49   FLD_CRm,
50   FLD_CRn,
51   FLD_op1,
52   FLD_op0,
53   FLD_imm3,
54   FLD_cond,
55   FLD_opcode,
56   FLD_cmode,
57   FLD_asisdlso_opcode,
58   FLD_len,
59   FLD_Rm,
60   FLD_Rs,
61   FLD_option,
62   FLD_S,
63   FLD_hw,
64   FLD_opc,
65   FLD_opc1,
66   FLD_shift,
67   FLD_type,
68   FLD_ldst_size,
69   FLD_imm6,
70   FLD_imm6_2,
71   FLD_imm4,
72   FLD_imm4_2,
73   FLD_imm5,
74   FLD_imm7,
75   FLD_imm8,
76   FLD_imm9,
77   FLD_imm12,
78   FLD_imm14,
79   FLD_imm16,
80   FLD_imm26,
81   FLD_imms,
82   FLD_immr,
83   FLD_immb,
84   FLD_immh,
85   FLD_S_imm10,
86   FLD_N,
87   FLD_index,
88   FLD_index2,
89   FLD_sf,
90   FLD_lse_sz,
91   FLD_H,
92   FLD_L,
93   FLD_M,
94   FLD_b5,
95   FLD_b40,
96   FLD_scale,
97   FLD_SVE_M_4,
98   FLD_SVE_M_14,
99   FLD_SVE_M_16,
100   FLD_SVE_N,
101   FLD_SVE_Pd,
102   FLD_SVE_Pg3,
103   FLD_SVE_Pg4_5,
104   FLD_SVE_Pg4_10,
105   FLD_SVE_Pg4_16,
106   FLD_SVE_Pm,
107   FLD_SVE_Pn,
108   FLD_SVE_Pt,
109   FLD_SVE_Rm,
110   FLD_SVE_Rn,
111   FLD_SVE_Vd,
112   FLD_SVE_Vm,
113   FLD_SVE_Vn,
114   FLD_SVE_Za_5,
115   FLD_SVE_Za_16,
116   FLD_SVE_Zd,
117   FLD_SVE_Zm_5,
118   FLD_SVE_Zm_16,
119   FLD_SVE_Zn,
120   FLD_SVE_Zt,
121   FLD_SVE_i1,
122   FLD_SVE_i3h,
123   FLD_SVE_imm3,
124   FLD_SVE_imm4,
125   FLD_SVE_imm5,
126   FLD_SVE_imm5b,
127   FLD_SVE_imm6,
128   FLD_SVE_imm7,
129   FLD_SVE_imm8,
130   FLD_SVE_imm9,
131   FLD_SVE_immr,
132   FLD_SVE_imms,
133   FLD_SVE_msz,
134   FLD_SVE_pattern,
135   FLD_SVE_prfop,
136   FLD_SVE_rot1,
137   FLD_SVE_rot2,
138   FLD_SVE_sz,
139   FLD_SVE_tsz,
140   FLD_SVE_tszh,
141   FLD_SVE_tszl_8,
142   FLD_SVE_tszl_19,
143   FLD_SVE_xs_14,
144   FLD_SVE_xs_22,
145   FLD_rotate1,
146   FLD_rotate2,
147   FLD_rotate3,
148   FLD_SM3_imm2
149 };
150
151 /* Field description.  */
152 struct aarch64_field
153 {
154   int lsb;
155   int width;
156 };
157
158 typedef struct aarch64_field aarch64_field;
159
160 extern const aarch64_field fields[];
161 \f
162 /* Operand description.  */
163
164 struct aarch64_operand
165 {
166   enum aarch64_operand_class op_class;
167
168   /* Name of the operand code; used mainly for the purpose of internal
169      debugging.  */
170   const char *name;
171
172   unsigned int flags;
173
174   /* The associated instruction bit-fields; no operand has more than 4
175      bit-fields */
176   enum aarch64_field_kind fields[4];
177
178   /* Brief description */
179   const char *desc;
180 };
181
182 typedef struct aarch64_operand aarch64_operand;
183
184 extern const aarch64_operand aarch64_operands[];
185
186 /* Operand flags.  */
187
188 #define OPD_F_HAS_INSERTER      0x00000001
189 #define OPD_F_HAS_EXTRACTOR     0x00000002
190 #define OPD_F_SEXT              0x00000004      /* Require sign-extension.  */
191 #define OPD_F_SHIFT_BY_2        0x00000008      /* Need to left shift the field
192                                                    value by 2 to get the value
193                                                    of an immediate operand.  */
194 #define OPD_F_MAYBE_SP          0x00000010      /* May potentially be SP.  */
195 #define OPD_F_OD_MASK           0x000000e0      /* Operand-dependent data.  */
196 #define OPD_F_OD_LSB            5
197 #define OPD_F_NO_ZR             0x00000100      /* ZR index not allowed.  */
198
199 static inline bfd_boolean
200 operand_has_inserter (const aarch64_operand *operand)
201 {
202   return (operand->flags & OPD_F_HAS_INSERTER) ? TRUE : FALSE;
203 }
204
205 static inline bfd_boolean
206 operand_has_extractor (const aarch64_operand *operand)
207 {
208   return (operand->flags & OPD_F_HAS_EXTRACTOR) ? TRUE : FALSE;
209 }
210
211 static inline bfd_boolean
212 operand_need_sign_extension (const aarch64_operand *operand)
213 {
214   return (operand->flags & OPD_F_SEXT) ? TRUE : FALSE;
215 }
216
217 static inline bfd_boolean
218 operand_need_shift_by_two (const aarch64_operand *operand)
219 {
220   return (operand->flags & OPD_F_SHIFT_BY_2) ? TRUE : FALSE;
221 }
222
223 static inline bfd_boolean
224 operand_maybe_stack_pointer (const aarch64_operand *operand)
225 {
226   return (operand->flags & OPD_F_MAYBE_SP) ? TRUE : FALSE;
227 }
228
229 /* Return the value of the operand-specific data field (OPD_F_OD_MASK).  */
230 static inline unsigned int
231 get_operand_specific_data (const aarch64_operand *operand)
232 {
233   return (operand->flags & OPD_F_OD_MASK) >> OPD_F_OD_LSB;
234 }
235
236 /* Return the width of field number N of operand *OPERAND.  */
237 static inline unsigned
238 get_operand_field_width (const aarch64_operand *operand, unsigned n)
239 {
240   assert (operand->fields[n] != FLD_NIL);
241   return fields[operand->fields[n]].width;
242 }
243
244 /* Return the total width of the operand *OPERAND.  */
245 static inline unsigned
246 get_operand_fields_width (const aarch64_operand *operand)
247 {
248   int i = 0;
249   unsigned width = 0;
250   while (operand->fields[i] != FLD_NIL)
251     width += fields[operand->fields[i++]].width;
252   assert (width > 0 && width < 32);
253   return width;
254 }
255
256 static inline const aarch64_operand *
257 get_operand_from_code (enum aarch64_opnd code)
258 {
259   return aarch64_operands + code;
260 }
261 \f
262 /* Operand qualifier and operand constraint checking.  */
263
264 int aarch64_match_operands_constraint (aarch64_inst *,
265                                        aarch64_operand_error *);
266
267 /* Operand qualifier related functions.  */
268 const char* aarch64_get_qualifier_name (aarch64_opnd_qualifier_t);
269 unsigned char aarch64_get_qualifier_nelem (aarch64_opnd_qualifier_t);
270 aarch64_insn aarch64_get_qualifier_standard_value (aarch64_opnd_qualifier_t);
271 int aarch64_find_best_match (const aarch64_inst *,
272                              const aarch64_opnd_qualifier_seq_t *,
273                              int, aarch64_opnd_qualifier_t *);
274
275 static inline void
276 reset_operand_qualifier (aarch64_inst *inst, int idx)
277 {
278   assert (idx >=0 && idx < aarch64_num_of_operands (inst->opcode));
279   inst->operands[idx].qualifier = AARCH64_OPND_QLF_NIL;
280 }
281 \f
282 /* Inline functions operating on instruction bit-field(s).  */
283
284 /* Generate a mask that has WIDTH number of consecutive 1s.  */
285
286 static inline aarch64_insn
287 gen_mask (int width)
288 {
289   return ((aarch64_insn) 1 << width) - 1;
290 }
291
292 /* LSB_REL is the relative location of the lsb in the sub field, starting from 0.  */
293 static inline int
294 gen_sub_field (enum aarch64_field_kind kind, int lsb_rel, int width, aarch64_field *ret)
295 {
296   const aarch64_field *field = &fields[kind];
297   if (lsb_rel < 0 || width <= 0 || lsb_rel + width > field->width)
298     return 0;
299   ret->lsb = field->lsb + lsb_rel;
300   ret->width = width;
301   return 1;
302 }
303
304 /* Insert VALUE into FIELD of CODE.  MASK can be zero or the base mask
305    of the opcode.  */
306
307 static inline void
308 insert_field_2 (const aarch64_field *field, aarch64_insn *code,
309                 aarch64_insn value, aarch64_insn mask)
310 {
311   assert (field->width < 32 && field->width >= 1 && field->lsb >= 0
312           && field->lsb + field->width <= 32);
313   value &= gen_mask (field->width);
314   value <<= field->lsb;
315   /* In some opcodes, field can be part of the base opcode, e.g. the size
316      field in FADD.  The following helps avoid corrupt the base opcode.  */
317   value &= ~mask;
318   *code |= value;
319 }
320
321 /* Extract FIELD of CODE and return the value.  MASK can be zero or the base
322    mask of the opcode.  */
323
324 static inline aarch64_insn
325 extract_field_2 (const aarch64_field *field, aarch64_insn code,
326                  aarch64_insn mask)
327 {
328   aarch64_insn value;
329   /* Clear any bit that is a part of the base opcode.  */
330   code &= ~mask;
331   value = (code >> field->lsb) & gen_mask (field->width);
332   return value;
333 }
334
335 /* Insert VALUE into field KIND of CODE.  MASK can be zero or the base mask
336    of the opcode.  */
337
338 static inline void
339 insert_field (enum aarch64_field_kind kind, aarch64_insn *code,
340               aarch64_insn value, aarch64_insn mask)
341 {
342   insert_field_2 (&fields[kind], code, value, mask);
343 }
344
345 /* Extract field KIND of CODE and return the value.  MASK can be zero or the
346    base mask of the opcode.  */
347
348 static inline aarch64_insn
349 extract_field (enum aarch64_field_kind kind, aarch64_insn code,
350                aarch64_insn mask)
351 {
352   return extract_field_2 (&fields[kind], code, mask);
353 }
354
355 extern aarch64_insn
356 extract_fields (aarch64_insn code, aarch64_insn mask, ...);
357 \f
358 /* Inline functions selecting operand to do the encoding/decoding for a
359    certain instruction bit-field.  */
360
361 /* Select the operand to do the encoding/decoding of the 'sf' field.
362    The heuristic-based rule is that the result operand is respected more.  */
363
364 static inline int
365 select_operand_for_sf_field_coding (const aarch64_opcode *opcode)
366 {
367   int idx = -1;
368   if (aarch64_get_operand_class (opcode->operands[0])
369       == AARCH64_OPND_CLASS_INT_REG)
370     /* normal case.  */
371     idx = 0;
372   else if (aarch64_get_operand_class (opcode->operands[1])
373            == AARCH64_OPND_CLASS_INT_REG)
374     /* e.g. float2fix.  */
375     idx = 1;
376   else
377     { assert (0); abort (); }
378   return idx;
379 }
380
381 /* Select the operand to do the encoding/decoding of the 'type' field in
382    the floating-point instructions.
383    The heuristic-based rule is that the source operand is respected more.  */
384
385 static inline int
386 select_operand_for_fptype_field_coding (const aarch64_opcode *opcode)
387 {
388   int idx;
389   if (aarch64_get_operand_class (opcode->operands[1])
390       == AARCH64_OPND_CLASS_FP_REG)
391     /* normal case.  */
392     idx = 1;
393   else if (aarch64_get_operand_class (opcode->operands[0])
394            == AARCH64_OPND_CLASS_FP_REG)
395     /* e.g. float2fix.  */
396     idx = 0;
397   else
398     { assert (0); abort (); }
399   return idx;
400 }
401
402 /* Select the operand to do the encoding/decoding of the 'size' field in
403    the AdvSIMD scalar instructions.
404    The heuristic-based rule is that the destination operand is respected
405    more.  */
406
407 static inline int
408 select_operand_for_scalar_size_field_coding (const aarch64_opcode *opcode)
409 {
410   int src_size = 0, dst_size = 0;
411   if (aarch64_get_operand_class (opcode->operands[0])
412       == AARCH64_OPND_CLASS_SISD_REG)
413     dst_size = aarch64_get_qualifier_esize (opcode->qualifiers_list[0][0]);
414   if (aarch64_get_operand_class (opcode->operands[1])
415       == AARCH64_OPND_CLASS_SISD_REG)
416     src_size = aarch64_get_qualifier_esize (opcode->qualifiers_list[0][1]);
417   if (src_size == dst_size && src_size == 0)
418     { assert (0); abort (); }
419   /* When the result is not a sisd register or it is a long operantion.  */
420   if (dst_size == 0 || dst_size == src_size << 1)
421     return 1;
422   else
423     return 0;
424 }
425
426 /* Select the operand to do the encoding/decoding of the 'size:Q' fields in
427    the AdvSIMD instructions.  */
428
429 int aarch64_select_operand_for_sizeq_field_coding (const aarch64_opcode *);
430 \f
431 /* Miscellaneous.  */
432
433 aarch64_insn aarch64_get_operand_modifier_value (enum aarch64_modifier_kind);
434 enum aarch64_modifier_kind
435 aarch64_get_operand_modifier_from_value (aarch64_insn, bfd_boolean);
436
437
438 bfd_boolean aarch64_wide_constant_p (int64_t, int, unsigned int *);
439 bfd_boolean aarch64_logical_immediate_p (uint64_t, int, aarch64_insn *);
440 int aarch64_shrink_expanded_imm8 (uint64_t);
441
442 /* Copy the content of INST->OPERANDS[SRC] to INST->OPERANDS[DST].  */
443 static inline void
444 copy_operand_info (aarch64_inst *inst, int dst, int src)
445 {
446   assert (dst >= 0 && src >= 0 && dst < AARCH64_MAX_OPND_NUM
447           && src < AARCH64_MAX_OPND_NUM);
448   memcpy (&inst->operands[dst], &inst->operands[src],
449           sizeof (aarch64_opnd_info));
450   inst->operands[dst].idx = dst;
451 }
452
453 /* A primitive log caculator.  */
454
455 static inline unsigned int
456 get_logsz (unsigned int size)
457 {
458   const unsigned char ls[16] =
459     {0, 1, -1, 2, -1, -1, -1, 3, -1, -1, -1, -1, -1, -1, -1, 4};
460   if (size > 16)
461     {
462       assert (0);
463       return -1;
464     }
465   assert (ls[size - 1] != (unsigned char)-1);
466   return ls[size - 1];
467 }
468
469 #endif /* OPCODES_AARCH64_OPC_H */