projects / deliverable / binutils-gdb.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
gdb: add target_ops::supports_displaced_step
[deliverable/binutils-gdb.git] / opcodes / aarch64-opc.c
1 /* aarch64-opc.c -- AArch64 opcode support.
2 Copyright (C) 2009-2020 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 #include "sysdep.h"
22 #include <assert.h>
23 #include <stdlib.h>
24 #include <stdio.h>
25 #include "bfd_stdint.h"
26 #include <stdarg.h>
27 #include <inttypes.h>
28
29 #include "opintl.h"
30 #include "libiberty.h"
31
32 #include "aarch64-opc.h"
33
34 #ifdef DEBUG_AARCH64
35 int debug_dump = FALSE;
36 #endif /* DEBUG_AARCH64 */
37
38 /* The enumeration strings associated with each value of a 5-bit SVE
39 pattern operand. A null entry indicates a reserved meaning. */
40 const char *const aarch64_sve_pattern_array[32] = {
41 /* 0-7. */
42 "pow2",
43 "vl1",
44 "vl2",
45 "vl3",
46 "vl4",
47 "vl5",
48 "vl6",
49 "vl7",
50 /* 8-15. */
51 "vl8",
52 "vl16",
53 "vl32",
54 "vl64",
55 "vl128",
56 "vl256",
57 0,
58 0,
59 /* 16-23. */
60 0,
61 0,
62 0,
63 0,
64 0,
65 0,
66 0,
67 0,
68 /* 24-31. */
69 0,
70 0,
71 0,
72 0,
73 0,
74 "mul4",
75 "mul3",
76 "all"
77 };
78
79 /* The enumeration strings associated with each value of a 4-bit SVE
80 prefetch operand. A null entry indicates a reserved meaning. */
81 const char *const aarch64_sve_prfop_array[16] = {
82 /* 0-7. */
83 "pldl1keep",
84 "pldl1strm",
85 "pldl2keep",
86 "pldl2strm",
87 "pldl3keep",
88 "pldl3strm",
89 0,
90 0,
91 /* 8-15. */
92 "pstl1keep",
93 "pstl1strm",
94 "pstl2keep",
95 "pstl2strm",
96 "pstl3keep",
97 "pstl3strm",
98 0,
99 0
100 };
101
102 /* Helper functions to determine which operand to be used to encode/decode
103 the size:Q fields for AdvSIMD instructions. */
104
105 static inline bfd_boolean
106 vector_qualifier_p (enum aarch64_opnd_qualifier qualifier)
107 {
108 return ((qualifier >= AARCH64_OPND_QLF_V_8B
109 && qualifier <= AARCH64_OPND_QLF_V_1Q) ? TRUE
110 : FALSE);
111 }
112
113 static inline bfd_boolean
114 fp_qualifier_p (enum aarch64_opnd_qualifier qualifier)
115 {
116 return ((qualifier >= AARCH64_OPND_QLF_S_B
117 && qualifier <= AARCH64_OPND_QLF_S_Q) ? TRUE
118 : FALSE);
119 }
120
121 enum data_pattern
122 {
123 DP_UNKNOWN,
124 DP_VECTOR_3SAME,
125 DP_VECTOR_LONG,
126 DP_VECTOR_WIDE,
127 DP_VECTOR_ACROSS_LANES,
128 };
129
130 static const char significant_operand_index [] =
131 {
132 0, /* DP_UNKNOWN, by default using operand 0. */
133 0, /* DP_VECTOR_3SAME */
134 1, /* DP_VECTOR_LONG */
135 2, /* DP_VECTOR_WIDE */
136 1, /* DP_VECTOR_ACROSS_LANES */
137 };
138
139 /* Given a sequence of qualifiers in QUALIFIERS, determine and return
140 the data pattern.
141 N.B. QUALIFIERS is a possible sequence of qualifiers each of which
142 corresponds to one of a sequence of operands. */
143
144 static enum data_pattern
145 get_data_pattern (const aarch64_opnd_qualifier_seq_t qualifiers)
146 {
147 if (vector_qualifier_p (qualifiers[0]) == TRUE)
148 {
149 /* e.g. v.4s, v.4s, v.4s
150 or v.4h, v.4h, v.h[3]. */
151 if (qualifiers[0] == qualifiers[1]
152 && vector_qualifier_p (qualifiers[2]) == TRUE
153 && (aarch64_get_qualifier_esize (qualifiers[0])
154 == aarch64_get_qualifier_esize (qualifiers[1]))
155 && (aarch64_get_qualifier_esize (qualifiers[0])
156 == aarch64_get_qualifier_esize (qualifiers[2])))
157 return DP_VECTOR_3SAME;
158 /* e.g. v.8h, v.8b, v.8b.
159 or v.4s, v.4h, v.h[2].
160 or v.8h, v.16b. */
161 if (vector_qualifier_p (qualifiers[1]) == TRUE
162 && aarch64_get_qualifier_esize (qualifiers[0]) != 0
163 && (aarch64_get_qualifier_esize (qualifiers[0])
164 == aarch64_get_qualifier_esize (qualifiers[1]) << 1))
165 return DP_VECTOR_LONG;
166 /* e.g. v.8h, v.8h, v.8b. */
167 if (qualifiers[0] == qualifiers[1]
168 && vector_qualifier_p (qualifiers[2]) == TRUE
169 && aarch64_get_qualifier_esize (qualifiers[0]) != 0
170 && (aarch64_get_qualifier_esize (qualifiers[0])
171 == aarch64_get_qualifier_esize (qualifiers[2]) << 1)
172 && (aarch64_get_qualifier_esize (qualifiers[0])
173 == aarch64_get_qualifier_esize (qualifiers[1])))
174 return DP_VECTOR_WIDE;
175 }
176 else if (fp_qualifier_p (qualifiers[0]) == TRUE)
177 {
178 /* e.g. SADDLV <V><d>, <Vn>.<T>. */
179 if (vector_qualifier_p (qualifiers[1]) == TRUE
180 && qualifiers[2] == AARCH64_OPND_QLF_NIL)
181 return DP_VECTOR_ACROSS_LANES;
182 }
183
184 return DP_UNKNOWN;
185 }
186
187 /* Select the operand to do the encoding/decoding of the 'size:Q' fields in
188 the AdvSIMD instructions. */
189 /* N.B. it is possible to do some optimization that doesn't call
190 get_data_pattern each time when we need to select an operand. We can
191 either buffer the caculated the result or statically generate the data,
192 however, it is not obvious that the optimization will bring significant
193 benefit. */
194
195 int
196 aarch64_select_operand_for_sizeq_field_coding (const aarch64_opcode *opcode)
197 {
198 return
199 significant_operand_index [get_data_pattern (opcode->qualifiers_list[0])];
200 }
201 \f
202 const aarch64_field fields[] =
203 {
204 { 0, 0 }, /* NIL. */
205 { 0, 4 }, /* cond2: condition in truly conditional-executed inst. */
206 { 0, 4 }, /* nzcv: flag bit specifier, encoded in the "nzcv" field. */
207 { 5, 5 }, /* defgh: d:e:f:g:h bits in AdvSIMD modified immediate. */
208 { 16, 3 }, /* abc: a:b:c bits in AdvSIMD modified immediate. */
209 { 5, 19 }, /* imm19: e.g. in CBZ. */
210 { 5, 19 }, /* immhi: e.g. in ADRP. */
211 { 29, 2 }, /* immlo: e.g. in ADRP. */
212 { 22, 2 }, /* size: in most AdvSIMD and floating-point instructions. */
213 { 10, 2 }, /* vldst_size: size field in the AdvSIMD load/store inst. */
214 { 29, 1 }, /* op: in AdvSIMD modified immediate instructions. */
215 { 30, 1 }, /* Q: in most AdvSIMD instructions. */
216 { 0, 5 }, /* Rt: in load/store instructions. */
217 { 0, 5 }, /* Rd: in many integer instructions. */
218 { 5, 5 }, /* Rn: in many integer instructions. */
219 { 10, 5 }, /* Rt2: in load/store pair instructions. */
220 { 10, 5 }, /* Ra: in fp instructions. */
221 { 5, 3 }, /* op2: in the system instructions. */
222 { 8, 4 }, /* CRm: in the system instructions. */
223 { 12, 4 }, /* CRn: in the system instructions. */
224 { 16, 3 }, /* op1: in the system instructions. */
225 { 19, 2 }, /* op0: in the system instructions. */
226 { 10, 3 }, /* imm3: in add/sub extended reg instructions. */
227 { 12, 4 }, /* cond: condition flags as a source operand. */
228 { 12, 4 }, /* opcode: in advsimd load/store instructions. */
229 { 12, 4 }, /* cmode: in advsimd modified immediate instructions. */
230 { 13, 3 }, /* asisdlso_opcode: opcode in advsimd ld/st single element. */
231 { 13, 2 }, /* len: in advsimd tbl/tbx instructions. */
232 { 16, 5 }, /* Rm: in ld/st reg offset and some integer inst. */
233 { 16, 5 }, /* Rs: in load/store exclusive instructions. */
234 { 13, 3 }, /* option: in ld/st reg offset + add/sub extended reg inst. */
235 { 12, 1 }, /* S: in load/store reg offset instructions. */
236 { 21, 2 }, /* hw: in move wide constant instructions. */
237 { 22, 2 }, /* opc: in load/store reg offset instructions. */
238 { 23, 1 }, /* opc1: in load/store reg offset instructions. */
239 { 22, 2 }, /* shift: in add/sub reg/imm shifted instructions. */
240 { 22, 2 }, /* type: floating point type field in fp data inst. */
241 { 30, 2 }, /* ldst_size: size field in ld/st reg offset inst. */
242 { 10, 6 }, /* imm6: in add/sub reg shifted instructions. */
243 { 15, 6 }, /* imm6_2: in rmif instructions. */
244 { 11, 4 }, /* imm4: in advsimd ext and advsimd ins instructions. */
245 { 0, 4 }, /* imm4_2: in rmif instructions. */
246 { 10, 4 }, /* imm4_3: in adddg/subg instructions. */
247 { 16, 5 }, /* imm5: in conditional compare (immediate) instructions. */
248 { 15, 7 }, /* imm7: in load/store pair pre/post index instructions. */
249 { 13, 8 }, /* imm8: in floating-point scalar move immediate inst. */
250 { 12, 9 }, /* imm9: in load/store pre/post index instructions. */
251 { 10, 12 }, /* imm12: in ld/st unsigned imm or add/sub shifted inst. */
252 { 5, 14 }, /* imm14: in test bit and branch instructions. */
253 { 5, 16 }, /* imm16: in exception instructions. */
254 { 0, 16 }, /* imm16_2: in udf instruction. */
255 { 0, 26 }, /* imm26: in unconditional branch instructions. */
256 { 10, 6 }, /* imms: in bitfield and logical immediate instructions. */
257 { 16, 6 }, /* immr: in bitfield and logical immediate instructions. */
258 { 16, 3 }, /* immb: in advsimd shift by immediate instructions. */
259 { 19, 4 }, /* immh: in advsimd shift by immediate instructions. */
260 { 22, 1 }, /* S: in LDRAA and LDRAB instructions. */
261 { 22, 1 }, /* N: in logical (immediate) instructions. */
262 { 11, 1 }, /* index: in ld/st inst deciding the pre/post-index. */
263 { 24, 1 }, /* index2: in ld/st pair inst deciding the pre/post-index. */
264 { 31, 1 }, /* sf: in integer data processing instructions. */
265 { 30, 1 }, /* lse_size: in LSE extension atomic instructions. */
266 { 11, 1 }, /* H: in advsimd scalar x indexed element instructions. */
267 { 21, 1 }, /* L: in advsimd scalar x indexed element instructions. */
268 { 20, 1 }, /* M: in advsimd scalar x indexed element instructions. */
269 { 31, 1 }, /* b5: in the test bit and branch instructions. */
270 { 19, 5 }, /* b40: in the test bit and branch instructions. */
271 { 10, 6 }, /* scale: in the fixed-point scalar to fp converting inst. */
272 { 4, 1 }, /* SVE_M_4: Merge/zero select, bit 4. */
273 { 14, 1 }, /* SVE_M_14: Merge/zero select, bit 14. */
274 { 16, 1 }, /* SVE_M_16: Merge/zero select, bit 16. */
275 { 17, 1 }, /* SVE_N: SVE equivalent of N. */
276 { 0, 4 }, /* SVE_Pd: p0-p15, bits [3,0]. */
277 { 10, 3 }, /* SVE_Pg3: p0-p7, bits [12,10]. */
278 { 5, 4 }, /* SVE_Pg4_5: p0-p15, bits [8,5]. */
279 { 10, 4 }, /* SVE_Pg4_10: p0-p15, bits [13,10]. */
280 { 16, 4 }, /* SVE_Pg4_16: p0-p15, bits [19,16]. */
281 { 16, 4 }, /* SVE_Pm: p0-p15, bits [19,16]. */
282 { 5, 4 }, /* SVE_Pn: p0-p15, bits [8,5]. */
283 { 0, 4 }, /* SVE_Pt: p0-p15, bits [3,0]. */
284 { 5, 5 }, /* SVE_Rm: SVE alternative position for Rm. */
285 { 16, 5 }, /* SVE_Rn: SVE alternative position for Rn. */
286 { 0, 5 }, /* SVE_Vd: Scalar SIMD&FP register, bits [4,0]. */
287 { 5, 5 }, /* SVE_Vm: Scalar SIMD&FP register, bits [9,5]. */
288 { 5, 5 }, /* SVE_Vn: Scalar SIMD&FP register, bits [9,5]. */
289 { 5, 5 }, /* SVE_Za_5: SVE vector register, bits [9,5]. */
290 { 16, 5 }, /* SVE_Za_16: SVE vector register, bits [20,16]. */
291 { 0, 5 }, /* SVE_Zd: SVE vector register. bits [4,0]. */
292 { 5, 5 }, /* SVE_Zm_5: SVE vector register, bits [9,5]. */
293 { 16, 5 }, /* SVE_Zm_16: SVE vector register, bits [20,16]. */
294 { 5, 5 }, /* SVE_Zn: SVE vector register, bits [9,5]. */
295 { 0, 5 }, /* SVE_Zt: SVE vector register, bits [4,0]. */
296 { 5, 1 }, /* SVE_i1: single-bit immediate. */
297 { 22, 1 }, /* SVE_i3h: high bit of 3-bit immediate. */
298 { 11, 1 }, /* SVE_i3l: low bit of 3-bit immediate. */
299 { 19, 2 }, /* SVE_i3h2: two high bits of 3bit immediate, bits [20,19]. */
300 { 20, 1 }, /* SVE_i2h: high bit of 2bit immediate, bits. */
301 { 16, 3 }, /* SVE_imm3: 3-bit immediate field. */
302 { 16, 4 }, /* SVE_imm4: 4-bit immediate field. */
303 { 5, 5 }, /* SVE_imm5: 5-bit immediate field. */
304 { 16, 5 }, /* SVE_imm5b: secondary 5-bit immediate field. */
305 { 16, 6 }, /* SVE_imm6: 6-bit immediate field. */
306 { 14, 7 }, /* SVE_imm7: 7-bit immediate field. */
307 { 5, 8 }, /* SVE_imm8: 8-bit immediate field. */
308 { 5, 9 }, /* SVE_imm9: 9-bit immediate field. */
309 { 11, 6 }, /* SVE_immr: SVE equivalent of immr. */
310 { 5, 6 }, /* SVE_imms: SVE equivalent of imms. */
311 { 10, 2 }, /* SVE_msz: 2-bit shift amount for ADR. */
312 { 5, 5 }, /* SVE_pattern: vector pattern enumeration. */
313 { 0, 4 }, /* SVE_prfop: prefetch operation for SVE PRF[BHWD]. */
314 { 16, 1 }, /* SVE_rot1: 1-bit rotation amount. */
315 { 10, 2 }, /* SVE_rot2: 2-bit rotation amount. */
316 { 10, 1 }, /* SVE_rot3: 1-bit rotation amount at bit 10. */
317 { 22, 1 }, /* SVE_sz: 1-bit element size select. */
318 { 17, 2 }, /* SVE_size: 2-bit element size, bits [18,17]. */
319 { 30, 1 }, /* SVE_sz2: 1-bit element size select. */
320 { 16, 4 }, /* SVE_tsz: triangular size select. */
321 { 22, 2 }, /* SVE_tszh: triangular size select high, bits [23,22]. */
322 { 8, 2 }, /* SVE_tszl_8: triangular size select low, bits [9,8]. */
323 { 19, 2 }, /* SVE_tszl_19: triangular size select low, bits [20,19]. */
324 { 14, 1 }, /* SVE_xs_14: UXTW/SXTW select (bit 14). */
325 { 22, 1 }, /* SVE_xs_22: UXTW/SXTW select (bit 22). */
326 { 11, 2 }, /* rotate1: FCMLA immediate rotate. */
327 { 13, 2 }, /* rotate2: Indexed element FCMLA immediate rotate. */
328 { 12, 1 }, /* rotate3: FCADD immediate rotate. */
329 { 12, 2 }, /* SM3: Indexed element SM3 2 bits index immediate. */
330 { 22, 1 }, /* sz: 1-bit element size select. */
331 };
332
333 enum aarch64_operand_class
334 aarch64_get_operand_class (enum aarch64_opnd type)
335 {
336 return aarch64_operands[type].op_class;
337 }
338
339 const char *
340 aarch64_get_operand_name (enum aarch64_opnd type)
341 {
342 return aarch64_operands[type].name;
343 }
344
345 /* Get operand description string.
346 This is usually for the diagnosis purpose. */
347 const char *
348 aarch64_get_operand_desc (enum aarch64_opnd type)
349 {
350 return aarch64_operands[type].desc;
351 }
352
353 /* Table of all conditional affixes. */
354 const aarch64_cond aarch64_conds[16] =
355 {
356 {{"eq", "none"}, 0x0},
357 {{"ne", "any"}, 0x1},
358 {{"cs", "hs", "nlast"}, 0x2},
359 {{"cc", "lo", "ul", "last"}, 0x3},
360 {{"mi", "first"}, 0x4},
361 {{"pl", "nfrst"}, 0x5},
362 {{"vs"}, 0x6},
363 {{"vc"}, 0x7},
364 {{"hi", "pmore"}, 0x8},
365 {{"ls", "plast"}, 0x9},
366 {{"ge", "tcont"}, 0xa},
367 {{"lt", "tstop"}, 0xb},
368 {{"gt"}, 0xc},
369 {{"le"}, 0xd},
370 {{"al"}, 0xe},
371 {{"nv"}, 0xf},
372 };
373
374 const aarch64_cond *
375 get_cond_from_value (aarch64_insn value)
376 {
377 assert (value < 16);
378 return &aarch64_conds[(unsigned int) value];
379 }
380
381 const aarch64_cond *
382 get_inverted_cond (const aarch64_cond *cond)
383 {
384 return &aarch64_conds[cond->value ^ 0x1];
385 }
386
387 /* Table describing the operand extension/shifting operators; indexed by
388 enum aarch64_modifier_kind.
389
390 The value column provides the most common values for encoding modifiers,
391 which enables table-driven encoding/decoding for the modifiers. */
392 const struct aarch64_name_value_pair aarch64_operand_modifiers [] =
393 {
394 {"none", 0x0},
395 {"msl", 0x0},
396 {"ror", 0x3},
397 {"asr", 0x2},
398 {"lsr", 0x1},
399 {"lsl", 0x0},
400 {"uxtb", 0x0},
401 {"uxth", 0x1},
402 {"uxtw", 0x2},
403 {"uxtx", 0x3},
404 {"sxtb", 0x4},
405 {"sxth", 0x5},
406 {"sxtw", 0x6},
407 {"sxtx", 0x7},
408 {"mul", 0x0},
409 {"mul vl", 0x0},
410 {NULL, 0},
411 };
412
413 enum aarch64_modifier_kind
414 aarch64_get_operand_modifier (const struct aarch64_name_value_pair *desc)
415 {
416 return desc - aarch64_operand_modifiers;
417 }
418
419 aarch64_insn
420 aarch64_get_operand_modifier_value (enum aarch64_modifier_kind kind)
421 {
422 return aarch64_operand_modifiers[kind].value;
423 }
424
425 enum aarch64_modifier_kind
426 aarch64_get_operand_modifier_from_value (aarch64_insn value,
427 bfd_boolean extend_p)
428 {
429 if (extend_p == TRUE)
430 return AARCH64_MOD_UXTB + value;
431 else
432 return AARCH64_MOD_LSL - value;
433 }
434
435 bfd_boolean
436 aarch64_extend_operator_p (enum aarch64_modifier_kind kind)
437 {
438 return (kind > AARCH64_MOD_LSL && kind <= AARCH64_MOD_SXTX)
439 ? TRUE : FALSE;
440 }
441
442 static inline bfd_boolean
443 aarch64_shift_operator_p (enum aarch64_modifier_kind kind)
444 {
445 return (kind >= AARCH64_MOD_ROR && kind <= AARCH64_MOD_LSL)
446 ? TRUE : FALSE;
447 }
448
449 const struct aarch64_name_value_pair aarch64_barrier_options[16] =
450 {
451 { "#0x00", 0x0 },
452 { "oshld", 0x1 },
453 { "oshst", 0x2 },
454 { "osh", 0x3 },
455 { "#0x04", 0x4 },
456 { "nshld", 0x5 },
457 { "nshst", 0x6 },
458 { "nsh", 0x7 },
459 { "#0x08", 0x8 },
460 { "ishld", 0x9 },
461 { "ishst", 0xa },
462 { "ish", 0xb },
463 { "#0x0c", 0xc },
464 { "ld", 0xd },
465 { "st", 0xe },
466 { "sy", 0xf },
467 };
468
469 /* Table describing the operands supported by the aliases of the HINT
470 instruction.
471
472 The name column is the operand that is accepted for the alias. The value
473 column is the hint number of the alias. The list of operands is terminated
474 by NULL in the name column. */
475
476 const struct aarch64_name_value_pair aarch64_hint_options[] =
477 {
478 /* BTI. This is also the F_DEFAULT entry for AARCH64_OPND_BTI_TARGET. */
479 { " ", HINT_ENCODE (HINT_OPD_F_NOPRINT, 0x20) },
480 { "csync", HINT_OPD_CSYNC }, /* PSB CSYNC. */
481 { "c", HINT_OPD_C }, /* BTI C. */
482 { "j", HINT_OPD_J }, /* BTI J. */
483 { "jc", HINT_OPD_JC }, /* BTI JC. */
484 { NULL, HINT_OPD_NULL },
485 };
486
487 /* op -> op: load = 0 instruction = 1 store = 2
488 l -> level: 1-3
489 t -> temporal: temporal (retained) = 0 non-temporal (streaming) = 1 */
490 #define B(op,l,t) (((op) << 3) | (((l) - 1) << 1) | (t))
491 const struct aarch64_name_value_pair aarch64_prfops[32] =
492 {
493 { "pldl1keep", B(0, 1, 0) },
494 { "pldl1strm", B(0, 1, 1) },
495 { "pldl2keep", B(0, 2, 0) },
496 { "pldl2strm", B(0, 2, 1) },
497 { "pldl3keep", B(0, 3, 0) },
498 { "pldl3strm", B(0, 3, 1) },
499 { NULL, 0x06 },
500 { NULL, 0x07 },
501 { "plil1keep", B(1, 1, 0) },
502 { "plil1strm", B(1, 1, 1) },
503 { "plil2keep", B(1, 2, 0) },
504 { "plil2strm", B(1, 2, 1) },
505 { "plil3keep", B(1, 3, 0) },
506 { "plil3strm", B(1, 3, 1) },
507 { NULL, 0x0e },
508 { NULL, 0x0f },
509 { "pstl1keep", B(2, 1, 0) },
510 { "pstl1strm", B(2, 1, 1) },
511 { "pstl2keep", B(2, 2, 0) },
512 { "pstl2strm", B(2, 2, 1) },
513 { "pstl3keep", B(2, 3, 0) },
514 { "pstl3strm", B(2, 3, 1) },
515 { NULL, 0x16 },
516 { NULL, 0x17 },
517 { NULL, 0x18 },
518 { NULL, 0x19 },
519 { NULL, 0x1a },
520 { NULL, 0x1b },
521 { NULL, 0x1c },
522 { NULL, 0x1d },
523 { NULL, 0x1e },
524 { NULL, 0x1f },
525 };
526 #undef B
527 \f
528 /* Utilities on value constraint. */
529
530 static inline int
531 value_in_range_p (int64_t value, int low, int high)
532 {
533 return (value >= low && value <= high) ? 1 : 0;
534 }
535
536 /* Return true if VALUE is a multiple of ALIGN. */
537 static inline int
538 value_aligned_p (int64_t value, int align)
539 {
540 return (value % align) == 0;
541 }
542
543 /* A signed value fits in a field. */
544 static inline int
545 value_fit_signed_field_p (int64_t value, unsigned width)
546 {
547 assert (width < 32);
548 if (width < sizeof (value) * 8)
549 {
550 int64_t lim = (uint64_t) 1 << (width - 1);
551 if (value >= -lim && value < lim)
552 return 1;
553 }
554 return 0;
555 }
556
557 /* An unsigned value fits in a field. */
558 static inline int
559 value_fit_unsigned_field_p (int64_t value, unsigned width)
560 {
561 assert (width < 32);
562 if (width < sizeof (value) * 8)
563 {
564 int64_t lim = (uint64_t) 1 << width;
565 if (value >= 0 && value < lim)
566 return 1;
567 }
568 return 0;
569 }
570
571 /* Return 1 if OPERAND is SP or WSP. */
572 int
573 aarch64_stack_pointer_p (const aarch64_opnd_info *operand)
574 {
575 return ((aarch64_get_operand_class (operand->type)
576 == AARCH64_OPND_CLASS_INT_REG)
577 && operand_maybe_stack_pointer (aarch64_operands + operand->type)
578 && operand->reg.regno == 31);
579 }
580
581 /* Return 1 if OPERAND is XZR or WZP. */
582 int
583 aarch64_zero_register_p (const aarch64_opnd_info *operand)
584 {
585 return ((aarch64_get_operand_class (operand->type)
586 == AARCH64_OPND_CLASS_INT_REG)
587 && !operand_maybe_stack_pointer (aarch64_operands + operand->type)
588 && operand->reg.regno == 31);
589 }
590
591 /* Return true if the operand *OPERAND that has the operand code
592 OPERAND->TYPE and been qualified by OPERAND->QUALIFIER can be also
593 qualified by the qualifier TARGET. */
594
595 static inline int
596 operand_also_qualified_p (const struct aarch64_opnd_info *operand,
597 aarch64_opnd_qualifier_t target)
598 {
599 switch (operand->qualifier)
600 {
601 case AARCH64_OPND_QLF_W:
602 if (target == AARCH64_OPND_QLF_WSP && aarch64_stack_pointer_p (operand))
603 return 1;
604 break;
605 case AARCH64_OPND_QLF_X:
606 if (target == AARCH64_OPND_QLF_SP && aarch64_stack_pointer_p (operand))
607 return 1;
608 break;
609 case AARCH64_OPND_QLF_WSP:
610 if (target == AARCH64_OPND_QLF_W
611 && operand_maybe_stack_pointer (aarch64_operands + operand->type))
612 return 1;
613 break;
614 case AARCH64_OPND_QLF_SP:
615 if (target == AARCH64_OPND_QLF_X
616 && operand_maybe_stack_pointer (aarch64_operands + operand->type))
617 return 1;
618 break;
619 default:
620 break;
621 }
622
623 return 0;
624 }
625
626 /* Given qualifier sequence list QSEQ_LIST and the known qualifier KNOWN_QLF
627 for operand KNOWN_IDX, return the expected qualifier for operand IDX.
628
629 Return NIL if more than one expected qualifiers are found. */
630
631 aarch64_opnd_qualifier_t
632 aarch64_get_expected_qualifier (const aarch64_opnd_qualifier_seq_t *qseq_list,
633 int idx,
634 const aarch64_opnd_qualifier_t known_qlf,
635 int known_idx)
636 {
637 int i, saved_i;
638
639 /* Special case.
640
641 When the known qualifier is NIL, we have to assume that there is only
642 one qualifier sequence in the *QSEQ_LIST and return the corresponding
643 qualifier directly. One scenario is that for instruction
644 PRFM <prfop>, [<Xn|SP>, #:lo12:<symbol>]
645 which has only one possible valid qualifier sequence
646 NIL, S_D
647 the caller may pass NIL in KNOWN_QLF to obtain S_D so that it can
648 determine the correct relocation type (i.e. LDST64_LO12) for PRFM.
649
650 Because the qualifier NIL has dual roles in the qualifier sequence:
651 it can mean no qualifier for the operand, or the qualifer sequence is
652 not in use (when all qualifiers in the sequence are NILs), we have to
653 handle this special case here. */
654 if (known_qlf == AARCH64_OPND_NIL)
655 {
656 assert (qseq_list[0][known_idx] == AARCH64_OPND_NIL);
657 return qseq_list[0][idx];
658 }
659
660 for (i = 0, saved_i = -1; i < AARCH64_MAX_QLF_SEQ_NUM; ++i)
661 {
662 if (qseq_list[i][known_idx] == known_qlf)
663 {
664 if (saved_i != -1)
665 /* More than one sequences are found to have KNOWN_QLF at
666 KNOWN_IDX. */
667 return AARCH64_OPND_NIL;
668 saved_i = i;
669 }
670 }
671
672 return qseq_list[saved_i][idx];
673 }
674
675 enum operand_qualifier_kind
676 {
677 OQK_NIL,
678 OQK_OPD_VARIANT,
679 OQK_VALUE_IN_RANGE,
680 OQK_MISC,
681 };
682
683 /* Operand qualifier description. */
684 struct operand_qualifier_data
685 {
686 /* The usage of the three data fields depends on the qualifier kind. */
687 int data0;
688 int data1;
689 int data2;
690 /* Description. */
691 const char *desc;
692 /* Kind. */
693 enum operand_qualifier_kind kind;
694 };
695
696 /* Indexed by the operand qualifier enumerators. */
697 struct operand_qualifier_data aarch64_opnd_qualifiers[] =
698 {
699 {0, 0, 0, "NIL", OQK_NIL},
700
701 /* Operand variant qualifiers.
702 First 3 fields:
703 element size, number of elements and common value for encoding. */
704
705 {4, 1, 0x0, "w", OQK_OPD_VARIANT},
706 {8, 1, 0x1, "x", OQK_OPD_VARIANT},
707 {4, 1, 0x0, "wsp", OQK_OPD_VARIANT},
708 {8, 1, 0x1, "sp", OQK_OPD_VARIANT},
709
710 {1, 1, 0x0, "b", OQK_OPD_VARIANT},
711 {2, 1, 0x1, "h", OQK_OPD_VARIANT},
712 {4, 1, 0x2, "s", OQK_OPD_VARIANT},
713 {8, 1, 0x3, "d", OQK_OPD_VARIANT},
714 {16, 1, 0x4, "q", OQK_OPD_VARIANT},
715 {4, 1, 0x0, "4b", OQK_OPD_VARIANT},
716 {4, 1, 0x0, "2h", OQK_OPD_VARIANT},
717
718 {1, 4, 0x0, "4b", OQK_OPD_VARIANT},
719 {1, 8, 0x0, "8b", OQK_OPD_VARIANT},
720 {1, 16, 0x1, "16b", OQK_OPD_VARIANT},
721 {2, 2, 0x0, "2h", OQK_OPD_VARIANT},
722 {2, 4, 0x2, "4h", OQK_OPD_VARIANT},
723 {2, 8, 0x3, "8h", OQK_OPD_VARIANT},
724 {4, 2, 0x4, "2s", OQK_OPD_VARIANT},
725 {4, 4, 0x5, "4s", OQK_OPD_VARIANT},
726 {8, 1, 0x6, "1d", OQK_OPD_VARIANT},
727 {8, 2, 0x7, "2d", OQK_OPD_VARIANT},
728 {16, 1, 0x8, "1q", OQK_OPD_VARIANT},
729
730 {0, 0, 0, "z", OQK_OPD_VARIANT},
731 {0, 0, 0, "m", OQK_OPD_VARIANT},
732
733 /* Qualifier for scaled immediate for Tag granule (stg,st2g,etc). */
734 {16, 0, 0, "tag", OQK_OPD_VARIANT},
735
736 /* Qualifiers constraining the value range.
737 First 3 fields:
738 Lower bound, higher bound, unused. */
739
740 {0, 15, 0, "CR", OQK_VALUE_IN_RANGE},
741 {0, 7, 0, "imm_0_7" , OQK_VALUE_IN_RANGE},
742 {0, 15, 0, "imm_0_15", OQK_VALUE_IN_RANGE},
743 {0, 31, 0, "imm_0_31", OQK_VALUE_IN_RANGE},
744 {0, 63, 0, "imm_0_63", OQK_VALUE_IN_RANGE},
745 {1, 32, 0, "imm_1_32", OQK_VALUE_IN_RANGE},
746 {1, 64, 0, "imm_1_64", OQK_VALUE_IN_RANGE},
747
748 /* Qualifiers for miscellaneous purpose.
749 First 3 fields:
750 unused, unused and unused. */
751
752 {0, 0, 0, "lsl", 0},
753 {0, 0, 0, "msl", 0},
754
755 {0, 0, 0, "retrieving", 0},
756 };
757
758 static inline bfd_boolean
759 operand_variant_qualifier_p (aarch64_opnd_qualifier_t qualifier)
760 {
761 return (aarch64_opnd_qualifiers[qualifier].kind == OQK_OPD_VARIANT)
762 ? TRUE : FALSE;
763 }
764
765 static inline bfd_boolean
766 qualifier_value_in_range_constraint_p (aarch64_opnd_qualifier_t qualifier)
767 {
768 return (aarch64_opnd_qualifiers[qualifier].kind == OQK_VALUE_IN_RANGE)
769 ? TRUE : FALSE;
770 }
771
772 const char*
773 aarch64_get_qualifier_name (aarch64_opnd_qualifier_t qualifier)
774 {
775 return aarch64_opnd_qualifiers[qualifier].desc;
776 }
777
778 /* Given an operand qualifier, return the expected data element size
779 of a qualified operand. */
780 unsigned char
781 aarch64_get_qualifier_esize (aarch64_opnd_qualifier_t qualifier)
782 {
783 assert (operand_variant_qualifier_p (qualifier) == TRUE);
784 return aarch64_opnd_qualifiers[qualifier].data0;
785 }
786
787 unsigned char
788 aarch64_get_qualifier_nelem (aarch64_opnd_qualifier_t qualifier)
789 {
790 assert (operand_variant_qualifier_p (qualifier) == TRUE);
791 return aarch64_opnd_qualifiers[qualifier].data1;
792 }
793
794 aarch64_insn
795 aarch64_get_qualifier_standard_value (aarch64_opnd_qualifier_t qualifier)
796 {
797 assert (operand_variant_qualifier_p (qualifier) == TRUE);
798 return aarch64_opnd_qualifiers[qualifier].data2;
799 }
800
801 static int
802 get_lower_bound (aarch64_opnd_qualifier_t qualifier)
803 {
804 assert (qualifier_value_in_range_constraint_p (qualifier) == TRUE);
805 return aarch64_opnd_qualifiers[qualifier].data0;
806 }
807
808 static int
809 get_upper_bound (aarch64_opnd_qualifier_t qualifier)
810 {
811 assert (qualifier_value_in_range_constraint_p (qualifier) == TRUE);
812 return aarch64_opnd_qualifiers[qualifier].data1;
813 }
814
815 #ifdef DEBUG_AARCH64
816 void
817 aarch64_verbose (const char *str, ...)
818 {
819 va_list ap;
820 va_start (ap, str);
821 printf ("#### ");
822 vprintf (str, ap);
823 printf ("\n");
824 va_end (ap);
825 }
826
827 static inline void
828 dump_qualifier_sequence (const aarch64_opnd_qualifier_t *qualifier)
829 {
830 int i;
831 printf ("#### \t");
832 for (i = 0; i < AARCH64_MAX_OPND_NUM; ++i, ++qualifier)
833 printf ("%s,", aarch64_get_qualifier_name (*qualifier));
834 printf ("\n");
835 }
836
837 static void
838 dump_match_qualifiers (const struct aarch64_opnd_info *opnd,
839 const aarch64_opnd_qualifier_t *qualifier)
840 {
841 int i;
842 aarch64_opnd_qualifier_t curr[AARCH64_MAX_OPND_NUM];
843
844 aarch64_verbose ("dump_match_qualifiers:");
845 for (i = 0; i < AARCH64_MAX_OPND_NUM; ++i)
846 curr[i] = opnd[i].qualifier;
847 dump_qualifier_sequence (curr);
848 aarch64_verbose ("against");
849 dump_qualifier_sequence (qualifier);
850 }
851 #endif /* DEBUG_AARCH64 */
852
853 /* This function checks if the given instruction INSN is a destructive
854 instruction based on the usage of the registers. It does not recognize
855 unary destructive instructions. */
856 bfd_boolean
857 aarch64_is_destructive_by_operands (const aarch64_opcode *opcode)
858 {
859 int i = 0;
860 const enum aarch64_opnd *opnds = opcode->operands;
861
862 if (opnds[0] == AARCH64_OPND_NIL)
863 return FALSE;
864
865 while (opnds[++i] != AARCH64_OPND_NIL)
866 if (opnds[i] == opnds[0])
867 return TRUE;
868
869 return FALSE;
870 }
871
872 /* TODO improve this, we can have an extra field at the runtime to
873 store the number of operands rather than calculating it every time. */
874
875 int
876 aarch64_num_of_operands (const aarch64_opcode *opcode)
877 {
878 int i = 0;
879 const enum aarch64_opnd *opnds = opcode->operands;
880 while (opnds[i++] != AARCH64_OPND_NIL)
881 ;
882 --i;
883 assert (i >= 0 && i <= AARCH64_MAX_OPND_NUM);
884 return i;
885 }
886
887 /* Find the best matched qualifier sequence in *QUALIFIERS_LIST for INST.
888 If succeeds, fill the found sequence in *RET, return 1; otherwise return 0.
889
890 N.B. on the entry, it is very likely that only some operands in *INST
891 have had their qualifiers been established.
892
893 If STOP_AT is not -1, the function will only try to match
894 the qualifier sequence for operands before and including the operand
895 of index STOP_AT; and on success *RET will only be filled with the first
896 (STOP_AT+1) qualifiers.
897
898 A couple examples of the matching algorithm:
899
900 X,W,NIL should match
901 X,W,NIL
902
903 NIL,NIL should match
904 X ,NIL
905
906 Apart from serving the main encoding routine, this can also be called
907 during or after the operand decoding. */
908
909 int
910 aarch64_find_best_match (const aarch64_inst *inst,
911 const aarch64_opnd_qualifier_seq_t *qualifiers_list,
912 int stop_at, aarch64_opnd_qualifier_t *ret)
913 {
914 int found = 0;
915 int i, num_opnds;
916 const aarch64_opnd_qualifier_t *qualifiers;
917
918 num_opnds = aarch64_num_of_operands (inst->opcode);
919 if (num_opnds == 0)
920 {
921 DEBUG_TRACE ("SUCCEED: no operand");
922 return 1;
923 }
924
925 if (stop_at < 0 || stop_at >= num_opnds)
926 stop_at = num_opnds - 1;
927
928 /* For each pattern. */
929 for (i = 0; i < AARCH64_MAX_QLF_SEQ_NUM; ++i, ++qualifiers_list)
930 {
931 int j;
932 qualifiers = *qualifiers_list;
933
934 /* Start as positive. */
935 found = 1;
936
937 DEBUG_TRACE ("%d", i);
938 #ifdef DEBUG_AARCH64
939 if (debug_dump)
940 dump_match_qualifiers (inst->operands, qualifiers);
941 #endif
942
943 /* Most opcodes has much fewer patterns in the list.
944 First NIL qualifier indicates the end in the list. */
945 if (empty_qualifier_sequence_p (qualifiers) == TRUE)
946 {
947 DEBUG_TRACE_IF (i == 0, "SUCCEED: empty qualifier list");
948 if (i)
949 found = 0;
950 break;
951 }
952
953 for (j = 0; j < num_opnds && j <= stop_at; ++j, ++qualifiers)
954 {
955 if (inst->operands[j].qualifier == AARCH64_OPND_QLF_NIL)
956 {
957 /* Either the operand does not have qualifier, or the qualifier
958 for the operand needs to be deduced from the qualifier
959 sequence.
960 In the latter case, any constraint checking related with
961 the obtained qualifier should be done later in
962 operand_general_constraint_met_p. */
963 continue;
964 }
965 else if (*qualifiers != inst->operands[j].qualifier)
966 {
967 /* Unless the target qualifier can also qualify the operand
968 (which has already had a non-nil qualifier), non-equal
969 qualifiers are generally un-matched. */
970 if (operand_also_qualified_p (inst->operands + j, *qualifiers))
971 continue;
972 else
973 {
974 found = 0;
975 break;
976 }
977 }
978 else
979 continue; /* Equal qualifiers are certainly matched. */
980 }
981
982 /* Qualifiers established. */
983 if (found == 1)
984 break;
985 }
986
987 if (found == 1)
988 {
989 /* Fill the result in *RET. */
990 int j;
991 qualifiers = *qualifiers_list;
992
993 DEBUG_TRACE ("complete qualifiers using list %d", i);
994 #ifdef DEBUG_AARCH64
995 if (debug_dump)
996 dump_qualifier_sequence (qualifiers);
997 #endif
998
999 for (j = 0; j <= stop_at; ++j, ++qualifiers)
1000 ret[j] = *qualifiers;
1001 for (; j < AARCH64_MAX_OPND_NUM; ++j)
1002 ret[j] = AARCH64_OPND_QLF_NIL;
1003
1004 DEBUG_TRACE ("SUCCESS");
1005 return 1;
1006 }
1007
1008 DEBUG_TRACE ("FAIL");
1009 return 0;
1010 }
1011
1012 /* Operand qualifier matching and resolving.
1013
1014 Return 1 if the operand qualifier(s) in *INST match one of the qualifier
1015 sequences in INST->OPCODE->qualifiers_list; otherwise return 0.
1016
1017 if UPDATE_P == TRUE, update the qualifier(s) in *INST after the matching
1018 succeeds. */
1019
1020 static int
1021 match_operands_qualifier (aarch64_inst *inst, bfd_boolean update_p)
1022 {
1023 int i, nops;
1024 aarch64_opnd_qualifier_seq_t qualifiers;
1025
1026 if (!aarch64_find_best_match (inst, inst->opcode->qualifiers_list, -1,
1027 qualifiers))
1028 {
1029 DEBUG_TRACE ("matching FAIL");
1030 return 0;
1031 }
1032
1033 if (inst->opcode->flags & F_STRICT)
1034 {
1035 /* Require an exact qualifier match, even for NIL qualifiers. */
1036 nops = aarch64_num_of_operands (inst->opcode);
1037 for (i = 0; i < nops; ++i)
1038 if (inst->operands[i].qualifier != qualifiers[i])
1039 return FALSE;
1040 }
1041
1042 /* Update the qualifiers. */
1043 if (update_p == TRUE)
1044 for (i = 0; i < AARCH64_MAX_OPND_NUM; ++i)
1045 {
1046 if (inst->opcode->operands[i] == AARCH64_OPND_NIL)
1047 break;
1048 DEBUG_TRACE_IF (inst->operands[i].qualifier != qualifiers[i],
1049 "update %s with %s for operand %d",
1050 aarch64_get_qualifier_name (inst->operands[i].qualifier),
1051 aarch64_get_qualifier_name (qualifiers[i]), i);
1052 inst->operands[i].qualifier = qualifiers[i];
1053 }
1054
1055 DEBUG_TRACE ("matching SUCCESS");
1056 return 1;
1057 }
1058
1059 /* Return TRUE if VALUE is a wide constant that can be moved into a general
1060 register by MOVZ.
1061
1062 IS32 indicates whether value is a 32-bit immediate or not.
1063 If SHIFT_AMOUNT is not NULL, on the return of TRUE, the logical left shift
1064 amount will be returned in *SHIFT_AMOUNT. */
1065
1066 bfd_boolean
1067 aarch64_wide_constant_p (uint64_t value, int is32, unsigned int *shift_amount)
1068 {
1069 int amount;
1070
1071 DEBUG_TRACE ("enter with 0x%" PRIx64 "(%" PRIi64 ")", value, value);
1072
1073 if (is32)
1074 {
1075 /* Allow all zeros or all ones in top 32-bits, so that
1076 32-bit constant expressions like ~0x80000000 are
1077 permitted. */
1078 if (value >> 32 != 0 && value >> 32 != 0xffffffff)
1079 /* Immediate out of range. */
1080 return FALSE;
1081 value &= 0xffffffff;
1082 }
1083
1084 /* first, try movz then movn */
1085 amount = -1;
1086 if ((value & ((uint64_t) 0xffff << 0)) == value)
1087 amount = 0;
1088 else if ((value & ((uint64_t) 0xffff << 16)) == value)
1089 amount = 16;
1090 else if (!is32 && (value & ((uint64_t) 0xffff << 32)) == value)
1091 amount = 32;
1092 else if (!is32 && (value & ((uint64_t) 0xffff << 48)) == value)
1093 amount = 48;
1094
1095 if (amount == -1)
1096 {
1097 DEBUG_TRACE ("exit FALSE with 0x%" PRIx64 "(%" PRIi64 ")", value, value);
1098 return FALSE;
1099 }
1100
1101 if (shift_amount != NULL)
1102 *shift_amount = amount;
1103
1104 DEBUG_TRACE ("exit TRUE with amount %d", amount);
1105
1106 return TRUE;
1107 }
1108
1109 /* Build the accepted values for immediate logical SIMD instructions.
1110
1111 The standard encodings of the immediate value are:
1112 N imms immr SIMD size R S
1113 1 ssssss rrrrrr 64 UInt(rrrrrr) UInt(ssssss)
1114 0 0sssss 0rrrrr 32 UInt(rrrrr) UInt(sssss)
1115 0 10ssss 00rrrr 16 UInt(rrrr) UInt(ssss)
1116 0 110sss 000rrr 8 UInt(rrr) UInt(sss)
1117 0 1110ss 0000rr 4 UInt(rr) UInt(ss)
1118 0 11110s 00000r 2 UInt(r) UInt(s)
1119 where all-ones value of S is reserved.
1120
1121 Let's call E the SIMD size.
1122
1123 The immediate value is: S+1 bits '1' rotated to the right by R.
1124
1125 The total of valid encodings is 64*63 + 32*31 + ... + 2*1 = 5334
1126 (remember S != E - 1). */
1127
1128 #define TOTAL_IMM_NB 5334
1129
1130 typedef struct
1131 {
1132 uint64_t imm;
1133 aarch64_insn encoding;
1134 } simd_imm_encoding;
1135
1136 static simd_imm_encoding simd_immediates[TOTAL_IMM_NB];
1137
1138 static int
1139 simd_imm_encoding_cmp(const void *i1, const void *i2)
1140 {
1141 const simd_imm_encoding *imm1 = (const simd_imm_encoding *)i1;
1142 const simd_imm_encoding *imm2 = (const simd_imm_encoding *)i2;
1143
1144 if (imm1->imm < imm2->imm)
1145 return -1;
1146 if (imm1->imm > imm2->imm)
1147 return +1;
1148 return 0;
1149 }
1150
1151 /* immediate bitfield standard encoding
1152 imm13<12> imm13<5:0> imm13<11:6> SIMD size R S
1153 1 ssssss rrrrrr 64 rrrrrr ssssss
1154 0 0sssss 0rrrrr 32 rrrrr sssss
1155 0 10ssss 00rrrr 16 rrrr ssss
1156 0 110sss 000rrr 8 rrr sss
1157 0 1110ss 0000rr 4 rr ss
1158 0 11110s 00000r 2 r s */
1159 static inline int
1160 encode_immediate_bitfield (int is64, uint32_t s, uint32_t r)
1161 {
1162 return (is64 << 12) | (r << 6) | s;
1163 }
1164
1165 static void
1166 build_immediate_table (void)
1167 {
1168 uint32_t log_e, e, s, r, s_mask;
1169 uint64_t mask, imm;
1170 int nb_imms;
1171 int is64;
1172
1173 nb_imms = 0;
1174 for (log_e = 1; log_e <= 6; log_e++)
1175 {
1176 /* Get element size. */
1177 e = 1u << log_e;
1178 if (log_e == 6)
1179 {
1180 is64 = 1;
1181 mask = 0xffffffffffffffffull;
1182 s_mask = 0;
1183 }
1184 else
1185 {
1186 is64 = 0;
1187 mask = (1ull << e) - 1;
1188 /* log_e s_mask
1189 1 ((1 << 4) - 1) << 2 = 111100
1190 2 ((1 << 3) - 1) << 3 = 111000
1191 3 ((1 << 2) - 1) << 4 = 110000
1192 4 ((1 << 1) - 1) << 5 = 100000
1193 5 ((1 << 0) - 1) << 6 = 000000 */
1194 s_mask = ((1u << (5 - log_e)) - 1) << (log_e + 1);
1195 }
1196 for (s = 0; s < e - 1; s++)
1197 for (r = 0; r < e; r++)
1198 {
1199 /* s+1 consecutive bits to 1 (s < 63) */
1200 imm = (1ull << (s + 1)) - 1;
1201 /* rotate right by r */
1202 if (r != 0)
1203 imm = (imm >> r) | ((imm << (e - r)) & mask);
1204 /* replicate the constant depending on SIMD size */
1205 switch (log_e)
1206 {
1207 case 1: imm = (imm << 2) | imm;
1208 /* Fall through. */
1209 case 2: imm = (imm << 4) | imm;
1210 /* Fall through. */
1211 case 3: imm = (imm << 8) | imm;
1212 /* Fall through. */
1213 case 4: imm = (imm << 16) | imm;
1214 /* Fall through. */
1215 case 5: imm = (imm << 32) | imm;
1216 /* Fall through. */
1217 case 6: break;
1218 default: abort ();
1219 }
1220 simd_immediates[nb_imms].imm = imm;
1221 simd_immediates[nb_imms].encoding =
1222 encode_immediate_bitfield(is64, s | s_mask, r);
1223 nb_imms++;
1224 }
1225 }
1226 assert (nb_imms == TOTAL_IMM_NB);
1227 qsort(simd_immediates, nb_imms,
1228 sizeof(simd_immediates[0]), simd_imm_encoding_cmp);
1229 }
1230
1231 /* Return TRUE if VALUE is a valid logical immediate, i.e. bitmask, that can
1232 be accepted by logical (immediate) instructions
1233 e.g. ORR <Xd|SP>, <Xn>, #<imm>.
1234
1235 ESIZE is the number of bytes in the decoded immediate value.
1236 If ENCODING is not NULL, on the return of TRUE, the standard encoding for
1237 VALUE will be returned in *ENCODING. */
1238
1239 bfd_boolean
1240 aarch64_logical_immediate_p (uint64_t value, int esize, aarch64_insn *encoding)
1241 {
1242 simd_imm_encoding imm_enc;
1243 const simd_imm_encoding *imm_encoding;
1244 static bfd_boolean initialized = FALSE;
1245 uint64_t upper;
1246 int i;
1247
1248 DEBUG_TRACE ("enter with 0x%" PRIx64 "(%" PRIi64 "), esize: %d", value,
1249 value, esize);
1250
1251 if (!initialized)
1252 {
1253 build_immediate_table ();
1254 initialized = TRUE;
1255 }
1256
1257 /* Allow all zeros or all ones in top bits, so that
1258 constant expressions like ~1 are permitted. */
1259 upper = (uint64_t) -1 << (esize * 4) << (esize * 4);
1260 if ((value & ~upper) != value && (value | upper) != value)
1261 return FALSE;
1262
1263 /* Replicate to a full 64-bit value. */
1264 value &= ~upper;
1265 for (i = esize * 8; i < 64; i *= 2)
1266 value |= (value << i);
1267
1268 imm_enc.imm = value;
1269 imm_encoding = (const simd_imm_encoding *)
1270 bsearch(&imm_enc, simd_immediates, TOTAL_IMM_NB,
1271 sizeof(simd_immediates[0]), simd_imm_encoding_cmp);
1272 if (imm_encoding == NULL)
1273 {
1274 DEBUG_TRACE ("exit with FALSE");
1275 return FALSE;
1276 }
1277 if (encoding != NULL)
1278 *encoding = imm_encoding->encoding;
1279 DEBUG_TRACE ("exit with TRUE");
1280 return TRUE;
1281 }
1282
1283 /* If 64-bit immediate IMM is in the format of
1284 "aaaaaaaabbbbbbbbccccccccddddddddeeeeeeeeffffffffgggggggghhhhhhhh",
1285 where a, b, c, d, e, f, g and h are independently 0 or 1, return an integer
1286 of value "abcdefgh". Otherwise return -1. */
1287 int
1288 aarch64_shrink_expanded_imm8 (uint64_t imm)
1289 {
1290 int i, ret;
1291 uint32_t byte;
1292
1293 ret = 0;
1294 for (i = 0; i < 8; i++)
1295 {
1296 byte = (imm >> (8 * i)) & 0xff;
1297 if (byte == 0xff)
1298 ret |= 1 << i;
1299 else if (byte != 0x00)
1300 return -1;
1301 }
1302 return ret;
1303 }
1304
1305 /* Utility inline functions for operand_general_constraint_met_p. */
1306
1307 static inline void
1308 set_error (aarch64_operand_error *mismatch_detail,
1309 enum aarch64_operand_error_kind kind, int idx,
1310 const char* error)
1311 {
1312 if (mismatch_detail == NULL)
1313 return;
1314 mismatch_detail->kind = kind;
1315 mismatch_detail->index = idx;
1316 mismatch_detail->error = error;
1317 }
1318
1319 static inline void
1320 set_syntax_error (aarch64_operand_error *mismatch_detail, int idx,
1321 const char* error)
1322 {
1323 if (mismatch_detail == NULL)
1324 return;
1325 set_error (mismatch_detail, AARCH64_OPDE_SYNTAX_ERROR, idx, error);
1326 }
1327
1328 static inline void
1329 set_out_of_range_error (aarch64_operand_error *mismatch_detail,
1330 int idx, int lower_bound, int upper_bound,
1331 const char* error)
1332 {
1333 if (mismatch_detail == NULL)
1334 return;
1335 set_error (mismatch_detail, AARCH64_OPDE_OUT_OF_RANGE, idx, error);
1336 mismatch_detail->data[0] = lower_bound;
1337 mismatch_detail->data[1] = upper_bound;
1338 }
1339
1340 static inline void
1341 set_imm_out_of_range_error (aarch64_operand_error *mismatch_detail,
1342 int idx, int lower_bound, int upper_bound)
1343 {
1344 if (mismatch_detail == NULL)
1345 return;
1346 set_out_of_range_error (mismatch_detail, idx, lower_bound, upper_bound,
1347 _("immediate value"));
1348 }
1349
1350 static inline void
1351 set_offset_out_of_range_error (aarch64_operand_error *mismatch_detail,
1352 int idx, int lower_bound, int upper_bound)
1353 {
1354 if (mismatch_detail == NULL)
1355 return;
1356 set_out_of_range_error (mismatch_detail, idx, lower_bound, upper_bound,
1357 _("immediate offset"));
1358 }
1359
1360 static inline void
1361 set_regno_out_of_range_error (aarch64_operand_error *mismatch_detail,
1362 int idx, int lower_bound, int upper_bound)
1363 {
1364 if (mismatch_detail == NULL)
1365 return;
1366 set_out_of_range_error (mismatch_detail, idx, lower_bound, upper_bound,
1367 _("register number"));
1368 }
1369
1370 static inline void
1371 set_elem_idx_out_of_range_error (aarch64_operand_error *mismatch_detail,
1372 int idx, int lower_bound, int upper_bound)
1373 {
1374 if (mismatch_detail == NULL)
1375 return;
1376 set_out_of_range_error (mismatch_detail, idx, lower_bound, upper_bound,
1377 _("register element index"));
1378 }
1379
1380 static inline void
1381 set_sft_amount_out_of_range_error (aarch64_operand_error *mismatch_detail,
1382 int idx, int lower_bound, int upper_bound)
1383 {
1384 if (mismatch_detail == NULL)
1385 return;
1386 set_out_of_range_error (mismatch_detail, idx, lower_bound, upper_bound,
1387 _("shift amount"));
1388 }
1389
1390 /* Report that the MUL modifier in operand IDX should be in the range
1391 [LOWER_BOUND, UPPER_BOUND]. */
1392 static inline void
1393 set_multiplier_out_of_range_error (aarch64_operand_error *mismatch_detail,
1394 int idx, int lower_bound, int upper_bound)
1395 {
1396 if (mismatch_detail == NULL)
1397 return;
1398 set_out_of_range_error (mismatch_detail, idx, lower_bound, upper_bound,
1399 _("multiplier"));
1400 }
1401
1402 static inline void
1403 set_unaligned_error (aarch64_operand_error *mismatch_detail, int idx,
1404 int alignment)
1405 {
1406 if (mismatch_detail == NULL)
1407 return;
1408 set_error (mismatch_detail, AARCH64_OPDE_UNALIGNED, idx, NULL);
1409 mismatch_detail->data[0] = alignment;
1410 }
1411
1412 static inline void
1413 set_reg_list_error (aarch64_operand_error *mismatch_detail, int idx,
1414 int expected_num)
1415 {
1416 if (mismatch_detail == NULL)
1417 return;
1418 set_error (mismatch_detail, AARCH64_OPDE_REG_LIST, idx, NULL);
1419 mismatch_detail->data[0] = expected_num;
1420 }
1421
1422 static inline void
1423 set_other_error (aarch64_operand_error *mismatch_detail, int idx,
1424 const char* error)
1425 {
1426 if (mismatch_detail == NULL)
1427 return;
1428 set_error (mismatch_detail, AARCH64_OPDE_OTHER_ERROR, idx, error);
1429 }
1430
1431 /* General constraint checking based on operand code.
1432
1433 Return 1 if OPNDS[IDX] meets the general constraint of operand code TYPE
1434 as the IDXth operand of opcode OPCODE. Otherwise return 0.
1435
1436 This function has to be called after the qualifiers for all operands
1437 have been resolved.
1438
1439 Mismatching error message is returned in *MISMATCH_DETAIL upon request,
1440 i.e. when MISMATCH_DETAIL is non-NULL. This avoids the generation
1441 of error message during the disassembling where error message is not
1442 wanted. We avoid the dynamic construction of strings of error messages
1443 here (i.e. in libopcodes), as it is costly and complicated; instead, we
1444 use a combination of error code, static string and some integer data to
1445 represent an error. */
1446
1447 static int
1448 operand_general_constraint_met_p (const aarch64_opnd_info *opnds, int idx,
1449 enum aarch64_opnd type,
1450 const aarch64_opcode *opcode,
1451 aarch64_operand_error *mismatch_detail)
1452 {
1453 unsigned num, modifiers, shift;
1454 unsigned char size;
1455 int64_t imm, min_value, max_value;
1456 uint64_t uvalue, mask;
1457 const aarch64_opnd_info *opnd = opnds + idx;
1458 aarch64_opnd_qualifier_t qualifier = opnd->qualifier;
1459
1460 assert (opcode->operands[idx] == opnd->type && opnd->type == type);
1461
1462 switch (aarch64_operands[type].op_class)
1463 {
1464 case AARCH64_OPND_CLASS_INT_REG:
1465 /* Check pair reg constraints for cas* instructions. */
1466 if (type == AARCH64_OPND_PAIRREG)
1467 {
1468 assert (idx == 1 || idx == 3);
1469 if (opnds[idx - 1].reg.regno % 2 != 0)
1470 {
1471 set_syntax_error (mismatch_detail, idx - 1,
1472 _("reg pair must start from even reg"));
1473 return 0;
1474 }
1475 if (opnds[idx].reg.regno != opnds[idx - 1].reg.regno + 1)
1476 {
1477 set_syntax_error (mismatch_detail, idx,
1478 _("reg pair must be contiguous"));
1479 return 0;
1480 }
1481 break;
1482 }
1483
1484 /* <Xt> may be optional in some IC and TLBI instructions. */
1485 if (type == AARCH64_OPND_Rt_SYS)
1486 {
1487 assert (idx == 1 && (aarch64_get_operand_class (opnds[0].type)
1488 == AARCH64_OPND_CLASS_SYSTEM));
1489 if (opnds[1].present
1490 && !aarch64_sys_ins_reg_has_xt (opnds[0].sysins_op))
1491 {
1492 set_other_error (mismatch_detail, idx, _("extraneous register"));
1493 return 0;
1494 }
1495 if (!opnds[1].present
1496 && aarch64_sys_ins_reg_has_xt (opnds[0].sysins_op))
1497 {
1498 set_other_error (mismatch_detail, idx, _("missing register"));
1499 return 0;
1500 }
1501 }
1502 switch (qualifier)
1503 {
1504 case AARCH64_OPND_QLF_WSP:
1505 case AARCH64_OPND_QLF_SP:
1506 if (!aarch64_stack_pointer_p (opnd))
1507 {
1508 set_other_error (mismatch_detail, idx,
1509 _("stack pointer register expected"));
1510 return 0;
1511 }
1512 break;
1513 default:
1514 break;
1515 }
1516 break;
1517
1518 case AARCH64_OPND_CLASS_SVE_REG:
1519 switch (type)
1520 {
1521 case AARCH64_OPND_SVE_Zm3_INDEX:
1522 case AARCH64_OPND_SVE_Zm3_22_INDEX:
1523 case AARCH64_OPND_SVE_Zm3_11_INDEX:
1524 case AARCH64_OPND_SVE_Zm4_11_INDEX:
1525 case AARCH64_OPND_SVE_Zm4_INDEX:
1526 size = get_operand_fields_width (get_operand_from_code (type));
1527 shift = get_operand_specific_data (&aarch64_operands[type]);
1528 mask = (1 << shift) - 1;
1529 if (opnd->reg.regno > mask)
1530 {
1531 assert (mask == 7 || mask == 15);
1532 set_other_error (mismatch_detail, idx,
1533 mask == 15
1534 ? _("z0-z15 expected")
1535 : _("z0-z7 expected"));
1536 return 0;
1537 }
1538 mask = (1u << (size - shift)) - 1;
1539 if (!value_in_range_p (opnd->reglane.index, 0, mask))
1540 {
1541 set_elem_idx_out_of_range_error (mismatch_detail, idx, 0, mask);
1542 return 0;
1543 }
1544 break;
1545
1546 case AARCH64_OPND_SVE_Zn_INDEX:
1547 size = aarch64_get_qualifier_esize (opnd->qualifier);
1548 if (!value_in_range_p (opnd->reglane.index, 0, 64 / size - 1))
1549 {
1550 set_elem_idx_out_of_range_error (mismatch_detail, idx,
1551 0, 64 / size - 1);
1552 return 0;
1553 }
1554 break;
1555
1556 case AARCH64_OPND_SVE_ZnxN:
1557 case AARCH64_OPND_SVE_ZtxN:
1558 if (opnd->reglist.num_regs != get_opcode_dependent_value (opcode))
1559 {
1560 set_other_error (mismatch_detail, idx,
1561 _("invalid register list"));
1562 return 0;
1563 }
1564 break;
1565
1566 default:
1567 break;
1568 }
1569 break;
1570
1571 case AARCH64_OPND_CLASS_PRED_REG:
1572 if (opnd->reg.regno >= 8
1573 && get_operand_fields_width (get_operand_from_code (type)) == 3)
1574 {
1575 set_other_error (mismatch_detail, idx, _("p0-p7 expected"));
1576 return 0;
1577 }
1578 break;
1579
1580 case AARCH64_OPND_CLASS_COND:
1581 if (type == AARCH64_OPND_COND1
1582 && (opnds[idx].cond->value & 0xe) == 0xe)
1583 {
1584 /* Not allow AL or NV. */
1585 set_syntax_error (mismatch_detail, idx, NULL);
1586 }
1587 break;
1588
1589 case AARCH64_OPND_CLASS_ADDRESS:
1590 /* Check writeback. */
1591 switch (opcode->iclass)
1592 {
1593 case ldst_pos:
1594 case ldst_unscaled:
1595 case ldstnapair_offs:
1596 case ldstpair_off:
1597 case ldst_unpriv:
1598 if (opnd->addr.writeback == 1)
1599 {
1600 set_syntax_error (mismatch_detail, idx,
1601 _("unexpected address writeback"));
1602 return 0;
1603 }
1604 break;
1605 case ldst_imm10:
1606 if (opnd->addr.writeback == 1 && opnd->addr.preind != 1)
1607 {
1608 set_syntax_error (mismatch_detail, idx,
1609 _("unexpected address writeback"));
1610 return 0;
1611 }
1612 break;
1613 case ldst_imm9:
1614 case ldstpair_indexed:
1615 case asisdlsep:
1616 case asisdlsop:
1617 if (opnd->addr.writeback == 0)
1618 {
1619 set_syntax_error (mismatch_detail, idx,
1620 _("address writeback expected"));
1621 return 0;
1622 }
1623 break;
1624 default:
1625 assert (opnd->addr.writeback == 0);
1626 break;
1627 }
1628 switch (type)
1629 {
1630 case AARCH64_OPND_ADDR_SIMM7:
1631 /* Scaled signed 7 bits immediate offset. */
1632 /* Get the size of the data element that is accessed, which may be
1633 different from that of the source register size,
1634 e.g. in strb/ldrb. */
1635 size = aarch64_get_qualifier_esize (opnd->qualifier);
1636 if (!value_in_range_p (opnd->addr.offset.imm, -64 * size, 63 * size))
1637 {
1638 set_offset_out_of_range_error (mismatch_detail, idx,
1639 -64 * size, 63 * size);
1640 return 0;
1641 }
1642 if (!value_aligned_p (opnd->addr.offset.imm, size))
1643 {
1644 set_unaligned_error (mismatch_detail, idx, size);
1645 return 0;
1646 }
1647 break;
1648 case AARCH64_OPND_ADDR_OFFSET:
1649 case AARCH64_OPND_ADDR_SIMM9:
1650 /* Unscaled signed 9 bits immediate offset. */
1651 if (!value_in_range_p (opnd->addr.offset.imm, -256, 255))
1652 {
1653 set_offset_out_of_range_error (mismatch_detail, idx, -256, 255);
1654 return 0;
1655 }
1656 break;
1657
1658 case AARCH64_OPND_ADDR_SIMM9_2:
1659 /* Unscaled signed 9 bits immediate offset, which has to be negative
1660 or unaligned. */
1661 size = aarch64_get_qualifier_esize (qualifier);
1662 if ((value_in_range_p (opnd->addr.offset.imm, 0, 255)
1663 && !value_aligned_p (opnd->addr.offset.imm, size))
1664 || value_in_range_p (opnd->addr.offset.imm, -256, -1))
1665 return 1;
1666 set_other_error (mismatch_detail, idx,
1667 _("negative or unaligned offset expected"));
1668 return 0;
1669
1670 case AARCH64_OPND_ADDR_SIMM10:
1671 /* Scaled signed 10 bits immediate offset. */
1672 if (!value_in_range_p (opnd->addr.offset.imm, -4096, 4088))
1673 {
1674 set_offset_out_of_range_error (mismatch_detail, idx, -4096, 4088);
1675 return 0;
1676 }
1677 if (!value_aligned_p (opnd->addr.offset.imm, 8))
1678 {
1679 set_unaligned_error (mismatch_detail, idx, 8);
1680 return 0;
1681 }
1682 break;
1683
1684 case AARCH64_OPND_ADDR_SIMM11:
1685 /* Signed 11 bits immediate offset (multiple of 16). */
1686 if (!value_in_range_p (opnd->addr.offset.imm, -1024, 1008))
1687 {
1688 set_offset_out_of_range_error (mismatch_detail, idx, -1024, 1008);
1689 return 0;
1690 }
1691
1692 if (!value_aligned_p (opnd->addr.offset.imm, 16))
1693 {
1694 set_unaligned_error (mismatch_detail, idx, 16);
1695 return 0;
1696 }
1697 break;
1698
1699 case AARCH64_OPND_ADDR_SIMM13:
1700 /* Signed 13 bits immediate offset (multiple of 16). */
1701 if (!value_in_range_p (opnd->addr.offset.imm, -4096, 4080))
1702 {
1703 set_offset_out_of_range_error (mismatch_detail, idx, -4096, 4080);
1704 return 0;
1705 }
1706
1707 if (!value_aligned_p (opnd->addr.offset.imm, 16))
1708 {
1709 set_unaligned_error (mismatch_detail, idx, 16);
1710 return 0;
1711 }
1712 break;
1713
1714 case AARCH64_OPND_SIMD_ADDR_POST:
1715 /* AdvSIMD load/store multiple structures, post-index. */
1716 assert (idx == 1);
1717 if (opnd->addr.offset.is_reg)
1718 {
1719 if (value_in_range_p (opnd->addr.offset.regno, 0, 30))
1720 return 1;
1721 else
1722 {
1723 set_other_error (mismatch_detail, idx,
1724 _("invalid register offset"));
1725 return 0;
1726 }
1727 }
1728 else
1729 {
1730 const aarch64_opnd_info *prev = &opnds[idx-1];
1731 unsigned num_bytes; /* total number of bytes transferred. */
1732 /* The opcode dependent area stores the number of elements in
1733 each structure to be loaded/stored. */
1734 int is_ld1r = get_opcode_dependent_value (opcode) == 1;
1735 if (opcode->operands[0] == AARCH64_OPND_LVt_AL)
1736 /* Special handling of loading single structure to all lane. */
1737 num_bytes = (is_ld1r ? 1 : prev->reglist.num_regs)
1738 * aarch64_get_qualifier_esize (prev->qualifier);
1739 else
1740 num_bytes = prev->reglist.num_regs
1741 * aarch64_get_qualifier_esize (prev->qualifier)
1742 * aarch64_get_qualifier_nelem (prev->qualifier);
1743 if ((int) num_bytes != opnd->addr.offset.imm)
1744 {
1745 set_other_error (mismatch_detail, idx,
1746 _("invalid post-increment amount"));
1747 return 0;
1748 }
1749 }
1750 break;
1751
1752 case AARCH64_OPND_ADDR_REGOFF:
1753 /* Get the size of the data element that is accessed, which may be
1754 different from that of the source register size,
1755 e.g. in strb/ldrb. */
1756 size = aarch64_get_qualifier_esize (opnd->qualifier);
1757 /* It is either no shift or shift by the binary logarithm of SIZE. */
1758 if (opnd->shifter.amount != 0
1759 && opnd->shifter.amount != (int)get_logsz (size))
1760 {
1761 set_other_error (mismatch_detail, idx,
1762 _("invalid shift amount"));
1763 return 0;
1764 }
1765 /* Only UXTW, LSL, SXTW and SXTX are the accepted extending
1766 operators. */
1767 switch (opnd->shifter.kind)
1768 {
1769 case AARCH64_MOD_UXTW:
1770 case AARCH64_MOD_LSL:
1771 case AARCH64_MOD_SXTW:
1772 case AARCH64_MOD_SXTX: break;
1773 default:
1774 set_other_error (mismatch_detail, idx,
1775 _("invalid extend/shift operator"));
1776 return 0;
1777 }
1778 break;
1779
1780 case AARCH64_OPND_ADDR_UIMM12:
1781 imm = opnd->addr.offset.imm;
1782 /* Get the size of the data element that is accessed, which may be
1783 different from that of the source register size,
1784 e.g. in strb/ldrb. */
1785 size = aarch64_get_qualifier_esize (qualifier);
1786 if (!value_in_range_p (opnd->addr.offset.imm, 0, 4095 * size))
1787 {
1788 set_offset_out_of_range_error (mismatch_detail, idx,
1789 0, 4095 * size);
1790 return 0;
1791 }
1792 if (!value_aligned_p (opnd->addr.offset.imm, size))
1793 {
1794 set_unaligned_error (mismatch_detail, idx, size);
1795 return 0;
1796 }
1797 break;
1798
1799 case AARCH64_OPND_ADDR_PCREL14:
1800 case AARCH64_OPND_ADDR_PCREL19:
1801 case AARCH64_OPND_ADDR_PCREL21:
1802 case AARCH64_OPND_ADDR_PCREL26:
1803 imm = opnd->imm.value;
1804 if (operand_need_shift_by_two (get_operand_from_code (type)))
1805 {
1806 /* The offset value in a PC-relative branch instruction is alway
1807 4-byte aligned and is encoded without the lowest 2 bits. */
1808 if (!value_aligned_p (imm, 4))
1809 {
1810 set_unaligned_error (mismatch_detail, idx, 4);
1811 return 0;
1812 }
1813 /* Right shift by 2 so that we can carry out the following check
1814 canonically. */
1815 imm >>= 2;
1816 }
1817 size = get_operand_fields_width (get_operand_from_code (type));
1818 if (!value_fit_signed_field_p (imm, size))
1819 {
1820 set_other_error (mismatch_detail, idx,
1821 _("immediate out of range"));
1822 return 0;
1823 }
1824 break;
1825
1826 case AARCH64_OPND_SVE_ADDR_RI_S4xVL:
1827 case AARCH64_OPND_SVE_ADDR_RI_S4x2xVL:
1828 case AARCH64_OPND_SVE_ADDR_RI_S4x3xVL:
1829 case AARCH64_OPND_SVE_ADDR_RI_S4x4xVL:
1830 min_value = -8;
1831 max_value = 7;
1832 sve_imm_offset_vl:
1833 assert (!opnd->addr.offset.is_reg);
1834 assert (opnd->addr.preind);
1835 num = 1 + get_operand_specific_data (&aarch64_operands[type]);
1836 min_value *= num;
1837 max_value *= num;
1838 if ((opnd->addr.offset.imm != 0 && !opnd->shifter.operator_present)
1839 || (opnd->shifter.operator_present
1840 && opnd->shifter.kind != AARCH64_MOD_MUL_VL))
1841 {
1842 set_other_error (mismatch_detail, idx,
1843 _("invalid addressing mode"));
1844 return 0;
1845 }
1846 if (!value_in_range_p (opnd->addr.offset.imm, min_value, max_value))
1847 {
1848 set_offset_out_of_range_error (mismatch_detail, idx,
1849 min_value, max_value);
1850 return 0;
1851 }
1852 if (!value_aligned_p (opnd->addr.offset.imm, num))
1853 {
1854 set_unaligned_error (mismatch_detail, idx, num);
1855 return 0;
1856 }
1857 break;
1858
1859 case AARCH64_OPND_SVE_ADDR_RI_S6xVL:
1860 min_value = -32;
1861 max_value = 31;
1862 goto sve_imm_offset_vl;
1863
1864 case AARCH64_OPND_SVE_ADDR_RI_S9xVL:
1865 min_value = -256;
1866 max_value = 255;
1867 goto sve_imm_offset_vl;
1868
1869 case AARCH64_OPND_SVE_ADDR_RI_U6:
1870 case AARCH64_OPND_SVE_ADDR_RI_U6x2:
1871 case AARCH64_OPND_SVE_ADDR_RI_U6x4:
1872 case AARCH64_OPND_SVE_ADDR_RI_U6x8:
1873 min_value = 0;
1874 max_value = 63;
1875 sve_imm_offset:
1876 assert (!opnd->addr.offset.is_reg);
1877 assert (opnd->addr.preind);
1878 num = 1 << get_operand_specific_data (&aarch64_operands[type]);
1879 min_value *= num;
1880 max_value *= num;
1881 if (opnd->shifter.operator_present
1882 || opnd->shifter.amount_present)
1883 {
1884 set_other_error (mismatch_detail, idx,
1885 _("invalid addressing mode"));
1886 return 0;
1887 }
1888 if (!value_in_range_p (opnd->addr.offset.imm, min_value, max_value))
1889 {
1890 set_offset_out_of_range_error (mismatch_detail, idx,
1891 min_value, max_value);
1892 return 0;
1893 }
1894 if (!value_aligned_p (opnd->addr.offset.imm, num))
1895 {
1896 set_unaligned_error (mismatch_detail, idx, num);
1897 return 0;
1898 }
1899 break;
1900
1901 case AARCH64_OPND_SVE_ADDR_RI_S4x16:
1902 case AARCH64_OPND_SVE_ADDR_RI_S4x32:
1903 min_value = -8;
1904 max_value = 7;
1905 goto sve_imm_offset;
1906
1907 case AARCH64_OPND_SVE_ADDR_ZX:
1908 /* Everything is already ensured by parse_operands or
1909 aarch64_ext_sve_addr_rr_lsl (because this is a very specific
1910 argument type). */
1911 assert (opnd->addr.offset.is_reg);
1912 assert (opnd->addr.preind);
1913 assert ((aarch64_operands[type].flags & OPD_F_NO_ZR) == 0);
1914 assert (opnd->shifter.kind == AARCH64_MOD_LSL);
1915 assert (opnd->shifter.operator_present == 0);
1916 break;
1917
1918 case AARCH64_OPND_SVE_ADDR_R:
1919 case AARCH64_OPND_SVE_ADDR_RR:
1920 case AARCH64_OPND_SVE_ADDR_RR_LSL1:
1921 case AARCH64_OPND_SVE_ADDR_RR_LSL2:
1922 case AARCH64_OPND_SVE_ADDR_RR_LSL3:
1923 case AARCH64_OPND_SVE_ADDR_RX:
1924 case AARCH64_OPND_SVE_ADDR_RX_LSL1:
1925 case AARCH64_OPND_SVE_ADDR_RX_LSL2:
1926 case AARCH64_OPND_SVE_ADDR_RX_LSL3:
1927 case AARCH64_OPND_SVE_ADDR_RZ:
1928 case AARCH64_OPND_SVE_ADDR_RZ_LSL1:
1929 case AARCH64_OPND_SVE_ADDR_RZ_LSL2:
1930 case AARCH64_OPND_SVE_ADDR_RZ_LSL3:
1931 modifiers = 1 << AARCH64_MOD_LSL;
1932 sve_rr_operand:
1933 assert (opnd->addr.offset.is_reg);
1934 assert (opnd->addr.preind);
1935 if ((aarch64_operands[type].flags & OPD_F_NO_ZR) != 0
1936 && opnd->addr.offset.regno == 31)
1937 {
1938 set_other_error (mismatch_detail, idx,
1939 _("index register xzr is not allowed"));
1940 return 0;
1941 }
1942 if (((1 << opnd->shifter.kind) & modifiers) == 0
1943 || (opnd->shifter.amount
1944 != get_operand_specific_data (&aarch64_operands[type])))
1945 {
1946 set_other_error (mismatch_detail, idx,
1947 _("invalid addressing mode"));
1948 return 0;
1949 }
1950 break;
1951
1952 case AARCH64_OPND_SVE_ADDR_RZ_XTW_14:
1953 case AARCH64_OPND_SVE_ADDR_RZ_XTW_22:
1954 case AARCH64_OPND_SVE_ADDR_RZ_XTW1_14:
1955 case AARCH64_OPND_SVE_ADDR_RZ_XTW1_22:
1956 case AARCH64_OPND_SVE_ADDR_RZ_XTW2_14:
1957 case AARCH64_OPND_SVE_ADDR_RZ_XTW2_22:
1958 case AARCH64_OPND_SVE_ADDR_RZ_XTW3_14:
1959 case AARCH64_OPND_SVE_ADDR_RZ_XTW3_22:
1960 modifiers = (1 << AARCH64_MOD_SXTW) | (1 << AARCH64_MOD_UXTW);
1961 goto sve_rr_operand;
1962
1963 case AARCH64_OPND_SVE_ADDR_ZI_U5:
1964 case AARCH64_OPND_SVE_ADDR_ZI_U5x2:
1965 case AARCH64_OPND_SVE_ADDR_ZI_U5x4:
1966 case AARCH64_OPND_SVE_ADDR_ZI_U5x8:
1967 min_value = 0;
1968 max_value = 31;
1969 goto sve_imm_offset;
1970
1971 case AARCH64_OPND_SVE_ADDR_ZZ_LSL:
1972 modifiers = 1 << AARCH64_MOD_LSL;
1973 sve_zz_operand:
1974 assert (opnd->addr.offset.is_reg);
1975 assert (opnd->addr.preind);
1976 if (((1 << opnd->shifter.kind) & modifiers) == 0
1977 || opnd->shifter.amount < 0
1978 || opnd->shifter.amount > 3)
1979 {
1980 set_other_error (mismatch_detail, idx,
1981 _("invalid addressing mode"));
1982 return 0;
1983 }
1984 break;
1985
1986 case AARCH64_OPND_SVE_ADDR_ZZ_SXTW:
1987 modifiers = (1 << AARCH64_MOD_SXTW);
1988 goto sve_zz_operand;
1989
1990 case AARCH64_OPND_SVE_ADDR_ZZ_UXTW:
1991 modifiers = 1 << AARCH64_MOD_UXTW;
1992 goto sve_zz_operand;
1993
1994 default:
1995 break;
1996 }
1997 break;
1998
1999 case AARCH64_OPND_CLASS_SIMD_REGLIST:
2000 if (type == AARCH64_OPND_LEt)
2001 {
2002 /* Get the upper bound for the element index. */
2003 num = 16 / aarch64_get_qualifier_esize (qualifier) - 1;
2004 if (!value_in_range_p (opnd->reglist.index, 0, num))
2005 {
2006 set_elem_idx_out_of_range_error (mismatch_detail, idx, 0, num);
2007 return 0;
2008 }
2009 }
2010 /* The opcode dependent area stores the number of elements in
2011 each structure to be loaded/stored. */
2012 num = get_opcode_dependent_value (opcode);
2013 switch (type)
2014 {
2015 case AARCH64_OPND_LVt:
2016 assert (num >= 1 && num <= 4);
2017 /* Unless LD1/ST1, the number of registers should be equal to that
2018 of the structure elements. */
2019 if (num != 1 && opnd->reglist.num_regs != num)
2020 {
2021 set_reg_list_error (mismatch_detail, idx, num);
2022 return 0;
2023 }
2024 break;
2025 case AARCH64_OPND_LVt_AL:
2026 case AARCH64_OPND_LEt:
2027 assert (num >= 1 && num <= 4);
2028 /* The number of registers should be equal to that of the structure
2029 elements. */
2030 if (opnd->reglist.num_regs != num)
2031 {
2032 set_reg_list_error (mismatch_detail, idx, num);
2033 return 0;
2034 }
2035 break;
2036 default:
2037 break;
2038 }
2039 break;
2040
2041 case AARCH64_OPND_CLASS_IMMEDIATE:
2042 /* Constraint check on immediate operand. */
2043 imm = opnd->imm.value;
2044 /* E.g. imm_0_31 constrains value to be 0..31. */
2045 if (qualifier_value_in_range_constraint_p (qualifier)
2046 && !value_in_range_p (imm, get_lower_bound (qualifier),
2047 get_upper_bound (qualifier)))
2048 {
2049 set_imm_out_of_range_error (mismatch_detail, idx,
2050 get_lower_bound (qualifier),
2051 get_upper_bound (qualifier));
2052 return 0;
2053 }
2054
2055 switch (type)
2056 {
2057 case AARCH64_OPND_AIMM:
2058 if (opnd->shifter.kind != AARCH64_MOD_LSL)
2059 {
2060 set_other_error (mismatch_detail, idx,
2061 _("invalid shift operator"));
2062 return 0;
2063 }
2064 if (opnd->shifter.amount != 0 && opnd->shifter.amount != 12)
2065 {
2066 set_other_error (mismatch_detail, idx,
2067 _("shift amount must be 0 or 12"));
2068 return 0;
2069 }
2070 if (!value_fit_unsigned_field_p (opnd->imm.value, 12))
2071 {
2072 set_other_error (mismatch_detail, idx,
2073 _("immediate out of range"));
2074 return 0;
2075 }
2076 break;
2077
2078 case AARCH64_OPND_HALF:
2079 assert (idx == 1 && opnds[0].type == AARCH64_OPND_Rd);
2080 if (opnd->shifter.kind != AARCH64_MOD_LSL)
2081 {
2082 set_other_error (mismatch_detail, idx,
2083 _("invalid shift operator"));
2084 return 0;
2085 }
2086 size = aarch64_get_qualifier_esize (opnds[0].qualifier);
2087 if (!value_aligned_p (opnd->shifter.amount, 16))
2088 {
2089 set_other_error (mismatch_detail, idx,
2090 _("shift amount must be a multiple of 16"));
2091 return 0;
2092 }
2093 if (!value_in_range_p (opnd->shifter.amount, 0, size * 8 - 16))
2094 {
2095 set_sft_amount_out_of_range_error (mismatch_detail, idx,
2096 0, size * 8 - 16);
2097 return 0;
2098 }
2099 if (opnd->imm.value < 0)
2100 {
2101 set_other_error (mismatch_detail, idx,
2102 _("negative immediate value not allowed"));
2103 return 0;
2104 }
2105 if (!value_fit_unsigned_field_p (opnd->imm.value, 16))
2106 {
2107 set_other_error (mismatch_detail, idx,
2108 _("immediate out of range"));
2109 return 0;
2110 }
2111 break;
2112
2113 case AARCH64_OPND_IMM_MOV:
2114 {
2115 int esize = aarch64_get_qualifier_esize (opnds[0].qualifier);
2116 imm = opnd->imm.value;
2117 assert (idx == 1);
2118 switch (opcode->op)
2119 {
2120 case OP_MOV_IMM_WIDEN:
2121 imm = ~imm;
2122 /* Fall through. */
2123 case OP_MOV_IMM_WIDE:
2124 if (!aarch64_wide_constant_p (imm, esize == 4, NULL))
2125 {
2126 set_other_error (mismatch_detail, idx,
2127 _("immediate out of range"));
2128 return 0;
2129 }
2130 break;
2131 case OP_MOV_IMM_LOG:
2132 if (!aarch64_logical_immediate_p (imm, esize, NULL))
2133 {
2134 set_other_error (mismatch_detail, idx,
2135 _("immediate out of range"));
2136 return 0;
2137 }
2138 break;
2139 default:
2140 assert (0);
2141 return 0;
2142 }
2143 }
2144 break;
2145
2146 case AARCH64_OPND_NZCV:
2147 case AARCH64_OPND_CCMP_IMM:
2148 case AARCH64_OPND_EXCEPTION:
2149 case AARCH64_OPND_UNDEFINED:
2150 case AARCH64_OPND_TME_UIMM16:
2151 case AARCH64_OPND_UIMM4:
2152 case AARCH64_OPND_UIMM4_ADDG:
2153 case AARCH64_OPND_UIMM7:
2154 case AARCH64_OPND_UIMM3_OP1:
2155 case AARCH64_OPND_UIMM3_OP2:
2156 case AARCH64_OPND_SVE_UIMM3:
2157 case AARCH64_OPND_SVE_UIMM7:
2158 case AARCH64_OPND_SVE_UIMM8:
2159 case AARCH64_OPND_SVE_UIMM8_53:
2160 size = get_operand_fields_width (get_operand_from_code (type));
2161 assert (size < 32);
2162 if (!value_fit_unsigned_field_p (opnd->imm.value, size))
2163 {
2164 set_imm_out_of_range_error (mismatch_detail, idx, 0,
2165 (1u << size) - 1);
2166 return 0;
2167 }
2168 break;
2169
2170 case AARCH64_OPND_UIMM10:
2171 /* Scaled unsigned 10 bits immediate offset. */
2172 if (!value_in_range_p (opnd->imm.value, 0, 1008))
2173 {
2174 set_imm_out_of_range_error (mismatch_detail, idx, 0, 1008);
2175 return 0;
2176 }
2177
2178 if (!value_aligned_p (opnd->imm.value, 16))
2179 {
2180 set_unaligned_error (mismatch_detail, idx, 16);
2181 return 0;
2182 }
2183 break;
2184
2185 case AARCH64_OPND_SIMM5:
2186 case AARCH64_OPND_SVE_SIMM5:
2187 case AARCH64_OPND_SVE_SIMM5B:
2188 case AARCH64_OPND_SVE_SIMM6:
2189 case AARCH64_OPND_SVE_SIMM8:
2190 size = get_operand_fields_width (get_operand_from_code (type));
2191 assert (size < 32);
2192 if (!value_fit_signed_field_p (opnd->imm.value, size))
2193 {
2194 set_imm_out_of_range_error (mismatch_detail, idx,
2195 -(1 << (size - 1)),
2196 (1 << (size - 1)) - 1);
2197 return 0;
2198 }
2199 break;
2200
2201 case AARCH64_OPND_WIDTH:
2202 assert (idx > 1 && opnds[idx-1].type == AARCH64_OPND_IMM
2203 && opnds[0].type == AARCH64_OPND_Rd);
2204 size = get_upper_bound (qualifier);
2205 if (opnd->imm.value + opnds[idx-1].imm.value > size)
2206 /* lsb+width <= reg.size */
2207 {
2208 set_imm_out_of_range_error (mismatch_detail, idx, 1,
2209 size - opnds[idx-1].imm.value);
2210 return 0;
2211 }
2212 break;
2213
2214 case AARCH64_OPND_LIMM:
2215 case AARCH64_OPND_SVE_LIMM:
2216 {
2217 int esize = aarch64_get_qualifier_esize (opnds[0].qualifier);
2218 uint64_t uimm = opnd->imm.value;
2219 if (opcode->op == OP_BIC)
2220 uimm = ~uimm;
2221 if (!aarch64_logical_immediate_p (uimm, esize, NULL))
2222 {
2223 set_other_error (mismatch_detail, idx,
2224 _("immediate out of range"));
2225 return 0;
2226 }
2227 }
2228 break;
2229
2230 case AARCH64_OPND_IMM0:
2231 case AARCH64_OPND_FPIMM0:
2232 if (opnd->imm.value != 0)
2233 {
2234 set_other_error (mismatch_detail, idx,
2235 _("immediate zero expected"));
2236 return 0;
2237 }
2238 break;
2239
2240 case AARCH64_OPND_IMM_ROT1:
2241 case AARCH64_OPND_IMM_ROT2:
2242 case AARCH64_OPND_SVE_IMM_ROT2:
2243 if (opnd->imm.value != 0
2244 && opnd->imm.value != 90
2245 && opnd->imm.value != 180
2246 && opnd->imm.value != 270)
2247 {
2248 set_other_error (mismatch_detail, idx,
2249 _("rotate expected to be 0, 90, 180 or 270"));
2250 return 0;
2251 }
2252 break;
2253
2254 case AARCH64_OPND_IMM_ROT3:
2255 case AARCH64_OPND_SVE_IMM_ROT1:
2256 case AARCH64_OPND_SVE_IMM_ROT3:
2257 if (opnd->imm.value != 90 && opnd->imm.value != 270)
2258 {
2259 set_other_error (mismatch_detail, idx,
2260 _("rotate expected to be 90 or 270"));
2261 return 0;
2262 }
2263 break;
2264
2265 case AARCH64_OPND_SHLL_IMM:
2266 assert (idx == 2);
2267 size = 8 * aarch64_get_qualifier_esize (opnds[idx - 1].qualifier);
2268 if (opnd->imm.value != size)
2269 {
2270 set_other_error (mismatch_detail, idx,
2271 _("invalid shift amount"));
2272 return 0;
2273 }
2274 break;
2275
2276 case AARCH64_OPND_IMM_VLSL:
2277 size = aarch64_get_qualifier_esize (qualifier);
2278 if (!value_in_range_p (opnd->imm.value, 0, size * 8 - 1))
2279 {
2280 set_imm_out_of_range_error (mismatch_detail, idx, 0,
2281 size * 8 - 1);
2282 return 0;
2283 }
2284 break;
2285
2286 case AARCH64_OPND_IMM_VLSR:
2287 size = aarch64_get_qualifier_esize (qualifier);
2288 if (!value_in_range_p (opnd->imm.value, 1, size * 8))
2289 {
2290 set_imm_out_of_range_error (mismatch_detail, idx, 1, size * 8);
2291 return 0;
2292 }
2293 break;
2294
2295 case AARCH64_OPND_SIMD_IMM:
2296 case AARCH64_OPND_SIMD_IMM_SFT:
2297 /* Qualifier check. */
2298 switch (qualifier)
2299 {
2300 case AARCH64_OPND_QLF_LSL:
2301 if (opnd->shifter.kind != AARCH64_MOD_LSL)
2302 {
2303 set_other_error (mismatch_detail, idx,
2304 _("invalid shift operator"));
2305 return 0;
2306 }
2307 break;
2308 case AARCH64_OPND_QLF_MSL:
2309 if (opnd->shifter.kind != AARCH64_MOD_MSL)
2310 {
2311 set_other_error (mismatch_detail, idx,
2312 _("invalid shift operator"));
2313 return 0;
2314 }
2315 break;
2316 case AARCH64_OPND_QLF_NIL:
2317 if (opnd->shifter.kind != AARCH64_MOD_NONE)
2318 {
2319 set_other_error (mismatch_detail, idx,
2320 _("shift is not permitted"));
2321 return 0;
2322 }
2323 break;
2324 default:
2325 assert (0);
2326 return 0;
2327 }
2328 /* Is the immediate valid? */
2329 assert (idx == 1);
2330 if (aarch64_get_qualifier_esize (opnds[0].qualifier) != 8)
2331 {
2332 /* uimm8 or simm8 */
2333 if (!value_in_range_p (opnd->imm.value, -128, 255))
2334 {
2335 set_imm_out_of_range_error (mismatch_detail, idx, -128, 255);
2336 return 0;
2337 }
2338 }
2339 else if (aarch64_shrink_expanded_imm8 (opnd->imm.value) < 0)
2340 {
2341 /* uimm64 is not
2342 'aaaaaaaabbbbbbbbccccccccddddddddeeeeeeee
2343 ffffffffgggggggghhhhhhhh'. */
2344 set_other_error (mismatch_detail, idx,
2345 _("invalid value for immediate"));
2346 return 0;
2347 }
2348 /* Is the shift amount valid? */
2349 switch (opnd->shifter.kind)
2350 {
2351 case AARCH64_MOD_LSL:
2352 size = aarch64_get_qualifier_esize (opnds[0].qualifier);
2353 if (!value_in_range_p (opnd->shifter.amount, 0, (size - 1) * 8))
2354 {
2355 set_sft_amount_out_of_range_error (mismatch_detail, idx, 0,
2356 (size - 1) * 8);
2357 return 0;
2358 }
2359 if (!value_aligned_p (opnd->shifter.amount, 8))
2360 {
2361 set_unaligned_error (mismatch_detail, idx, 8);
2362 return 0;
2363 }
2364 break;
2365 case AARCH64_MOD_MSL:
2366 /* Only 8 and 16 are valid shift amount. */
2367 if (opnd->shifter.amount != 8 && opnd->shifter.amount != 16)
2368 {
2369 set_other_error (mismatch_detail, idx,
2370 _("shift amount must be 0 or 16"));
2371 return 0;
2372 }
2373 break;
2374 default:
2375 if (opnd->shifter.kind != AARCH64_MOD_NONE)
2376 {
2377 set_other_error (mismatch_detail, idx,
2378 _("invalid shift operator"));
2379 return 0;
2380 }
2381 break;
2382 }
2383 break;
2384
2385 case AARCH64_OPND_FPIMM:
2386 case AARCH64_OPND_SIMD_FPIMM:
2387 case AARCH64_OPND_SVE_FPIMM8:
2388 if (opnd->imm.is_fp == 0)
2389 {
2390 set_other_error (mismatch_detail, idx,
2391 _("floating-point immediate expected"));
2392 return 0;
2393 }
2394 /* The value is expected to be an 8-bit floating-point constant with
2395 sign, 3-bit exponent and normalized 4 bits of precision, encoded
2396 in "a:b:c:d:e:f:g:h" or FLD_imm8 (depending on the type of the
2397 instruction). */
2398 if (!value_in_range_p (opnd->imm.value, 0, 255))
2399 {
2400 set_other_error (mismatch_detail, idx,
2401 _("immediate out of range"));
2402 return 0;
2403 }
2404 if (opnd->shifter.kind != AARCH64_MOD_NONE)
2405 {
2406 set_other_error (mismatch_detail, idx,
2407 _("invalid shift operator"));
2408 return 0;
2409 }
2410 break;
2411
2412 case AARCH64_OPND_SVE_AIMM:
2413 min_value = 0;
2414 sve_aimm:
2415 assert (opnd->shifter.kind == AARCH64_MOD_LSL);
2416 size = aarch64_get_qualifier_esize (opnds[0].qualifier);
2417 mask = ~((uint64_t) -1 << (size * 4) << (size * 4));
2418 uvalue = opnd->imm.value;
2419 shift = opnd->shifter.amount;
2420 if (size == 1)
2421 {
2422 if (shift != 0)
2423 {
2424 set_other_error (mismatch_detail, idx,
2425 _("no shift amount allowed for"
2426 " 8-bit constants"));
2427 return 0;
2428 }
2429 }
2430 else
2431 {
2432 if (shift != 0 && shift != 8)
2433 {
2434 set_other_error (mismatch_detail, idx,
2435 _("shift amount must be 0 or 8"));
2436 return 0;
2437 }
2438 if (shift == 0 && (uvalue & 0xff) == 0)
2439 {
2440 shift = 8;
2441 uvalue = (int64_t) uvalue / 256;
2442 }
2443 }
2444 mask >>= shift;
2445 if ((uvalue & mask) != uvalue && (uvalue | ~mask) != uvalue)
2446 {
2447 set_other_error (mismatch_detail, idx,
2448 _("immediate too big for element size"));
2449 return 0;
2450 }
2451 uvalue = (uvalue - min_value) & mask;
2452 if (uvalue > 0xff)
2453 {
2454 set_other_error (mismatch_detail, idx,
2455 _("invalid arithmetic immediate"));
2456 return 0;
2457 }
2458 break;
2459
2460 case AARCH64_OPND_SVE_ASIMM:
2461 min_value = -128;
2462 goto sve_aimm;
2463
2464 case AARCH64_OPND_SVE_I1_HALF_ONE:
2465 assert (opnd->imm.is_fp);
2466 if (opnd->imm.value != 0x3f000000 && opnd->imm.value != 0x3f800000)
2467 {
2468 set_other_error (mismatch_detail, idx,
2469 _("floating-point value must be 0.5 or 1.0"));
2470 return 0;
2471 }
2472 break;
2473
2474 case AARCH64_OPND_SVE_I1_HALF_TWO:
2475 assert (opnd->imm.is_fp);
2476 if (opnd->imm.value != 0x3f000000 && opnd->imm.value != 0x40000000)
2477 {
2478 set_other_error (mismatch_detail, idx,
2479 _("floating-point value must be 0.5 or 2.0"));
2480 return 0;
2481 }
2482 break;
2483
2484 case AARCH64_OPND_SVE_I1_ZERO_ONE:
2485 assert (opnd->imm.is_fp);
2486 if (opnd->imm.value != 0 && opnd->imm.value != 0x3f800000)
2487 {
2488 set_other_error (mismatch_detail, idx,
2489 _("floating-point value must be 0.0 or 1.0"));
2490 return 0;
2491 }
2492 break;
2493
2494 case AARCH64_OPND_SVE_INV_LIMM:
2495 {
2496 int esize = aarch64_get_qualifier_esize (opnds[0].qualifier);
2497 uint64_t uimm = ~opnd->imm.value;
2498 if (!aarch64_logical_immediate_p (uimm, esize, NULL))
2499 {
2500 set_other_error (mismatch_detail, idx,
2501 _("immediate out of range"));
2502 return 0;
2503 }
2504 }
2505 break;
2506
2507 case AARCH64_OPND_SVE_LIMM_MOV:
2508 {
2509 int esize = aarch64_get_qualifier_esize (opnds[0].qualifier);
2510 uint64_t uimm = opnd->imm.value;
2511 if (!aarch64_logical_immediate_p (uimm, esize, NULL))
2512 {
2513 set_other_error (mismatch_detail, idx,
2514 _("immediate out of range"));
2515 return 0;
2516 }
2517 if (!aarch64_sve_dupm_mov_immediate_p (uimm, esize))
2518 {
2519 set_other_error (mismatch_detail, idx,
2520 _("invalid replicated MOV immediate"));
2521 return 0;
2522 }
2523 }
2524 break;
2525
2526 case AARCH64_OPND_SVE_PATTERN_SCALED:
2527 assert (opnd->shifter.kind == AARCH64_MOD_MUL);
2528 if (!value_in_range_p (opnd->shifter.amount, 1, 16))
2529 {
2530 set_multiplier_out_of_range_error (mismatch_detail, idx, 1, 16);
2531 return 0;
2532 }
2533 break;
2534
2535 case AARCH64_OPND_SVE_SHLIMM_PRED:
2536 case AARCH64_OPND_SVE_SHLIMM_UNPRED:
2537 case AARCH64_OPND_SVE_SHLIMM_UNPRED_22:
2538 size = aarch64_get_qualifier_esize (opnds[idx - 1].qualifier);
2539 if (!value_in_range_p (opnd->imm.value, 0, 8 * size - 1))
2540 {
2541 set_imm_out_of_range_error (mismatch_detail, idx,
2542 0, 8 * size - 1);
2543 return 0;
2544 }
2545 break;
2546
2547 case AARCH64_OPND_SVE_SHRIMM_PRED:
2548 case AARCH64_OPND_SVE_SHRIMM_UNPRED:
2549 case AARCH64_OPND_SVE_SHRIMM_UNPRED_22:
2550 num = (type == AARCH64_OPND_SVE_SHRIMM_UNPRED_22) ? 2 : 1;
2551 size = aarch64_get_qualifier_esize (opnds[idx - num].qualifier);
2552 if (!value_in_range_p (opnd->imm.value, 1, 8 * size))
2553 {
2554 set_imm_out_of_range_error (mismatch_detail, idx, 1, 8*size);
2555 return 0;
2556 }
2557 break;
2558
2559 default:
2560 break;
2561 }
2562 break;
2563
2564 case AARCH64_OPND_CLASS_SYSTEM:
2565 switch (type)
2566 {
2567 case AARCH64_OPND_PSTATEFIELD:
2568 assert (idx == 0 && opnds[1].type == AARCH64_OPND_UIMM4);
2569 /* MSR UAO, #uimm4
2570 MSR PAN, #uimm4
2571 MSR SSBS,#uimm4
2572 The immediate must be #0 or #1. */
2573 if ((opnd->pstatefield == 0x03 /* UAO. */
2574 || opnd->pstatefield == 0x04 /* PAN. */
2575 || opnd->pstatefield == 0x19 /* SSBS. */
2576 || opnd->pstatefield == 0x1a) /* DIT. */
2577 && opnds[1].imm.value > 1)
2578 {
2579 set_imm_out_of_range_error (mismatch_detail, idx, 0, 1);
2580 return 0;
2581 }
2582 /* MSR SPSel, #uimm4
2583 Uses uimm4 as a control value to select the stack pointer: if
2584 bit 0 is set it selects the current exception level's stack
2585 pointer, if bit 0 is clear it selects shared EL0 stack pointer.
2586 Bits 1 to 3 of uimm4 are reserved and should be zero. */
2587 if (opnd->pstatefield == 0x05 /* spsel */ && opnds[1].imm.value > 1)
2588 {
2589 set_imm_out_of_range_error (mismatch_detail, idx, 0, 1);
2590 return 0;
2591 }
2592 break;
2593 default:
2594 break;
2595 }
2596 break;
2597
2598 case AARCH64_OPND_CLASS_SIMD_ELEMENT:
2599 /* Get the upper bound for the element index. */
2600 if (opcode->op == OP_FCMLA_ELEM)
2601 /* FCMLA index range depends on the vector size of other operands
2602 and is halfed because complex numbers take two elements. */
2603 num = aarch64_get_qualifier_nelem (opnds[0].qualifier)
2604 * aarch64_get_qualifier_esize (opnds[0].qualifier) / 2;
2605 else
2606 num = 16;
2607 num = num / aarch64_get_qualifier_esize (qualifier) - 1;
2608 assert (aarch64_get_qualifier_nelem (qualifier) == 1);
2609
2610 /* Index out-of-range. */
2611 if (!value_in_range_p (opnd->reglane.index, 0, num))
2612 {
2613 set_elem_idx_out_of_range_error (mismatch_detail, idx, 0, num);
2614 return 0;
2615 }
2616 /* SMLAL<Q> <Vd>.<Ta>, <Vn>.<Tb>, <Vm>.<Ts>[<index>].
2617 <Vm> Is the vector register (V0-V31) or (V0-V15), whose
2618 number is encoded in "size:M:Rm":
2619 size <Vm>
2620 00 RESERVED
2621 01 0:Rm
2622 10 M:Rm
2623 11 RESERVED */
2624 if (type == AARCH64_OPND_Em16 && qualifier == AARCH64_OPND_QLF_S_H
2625 && !value_in_range_p (opnd->reglane.regno, 0, 15))
2626 {
2627 set_regno_out_of_range_error (mismatch_detail, idx, 0, 15);
2628 return 0;
2629 }
2630 break;
2631
2632 case AARCH64_OPND_CLASS_MODIFIED_REG:
2633 assert (idx == 1 || idx == 2);
2634 switch (type)
2635 {
2636 case AARCH64_OPND_Rm_EXT:
2637 if (!aarch64_extend_operator_p (opnd->shifter.kind)
2638 && opnd->shifter.kind != AARCH64_MOD_LSL)
2639 {
2640 set_other_error (mismatch_detail, idx,
2641 _("extend operator expected"));
2642 return 0;
2643 }
2644 /* It is not optional unless at least one of "Rd" or "Rn" is '11111'
2645 (i.e. SP), in which case it defaults to LSL. The LSL alias is
2646 only valid when "Rd" or "Rn" is '11111', and is preferred in that
2647 case. */
2648 if (!aarch64_stack_pointer_p (opnds + 0)
2649 && (idx != 2 || !aarch64_stack_pointer_p (opnds + 1)))
2650 {
2651 if (!opnd->shifter.operator_present)
2652 {
2653 set_other_error (mismatch_detail, idx,
2654 _("missing extend operator"));
2655 return 0;
2656 }
2657 else if (opnd->shifter.kind == AARCH64_MOD_LSL)
2658 {
2659 set_other_error (mismatch_detail, idx,
2660 _("'LSL' operator not allowed"));
2661 return 0;
2662 }
2663 }
2664 assert (opnd->shifter.operator_present /* Default to LSL. */
2665 || opnd->shifter.kind == AARCH64_MOD_LSL);
2666 if (!value_in_range_p (opnd->shifter.amount, 0, 4))
2667 {
2668 set_sft_amount_out_of_range_error (mismatch_detail, idx, 0, 4);
2669 return 0;
2670 }
2671 /* In the 64-bit form, the final register operand is written as Wm
2672 for all but the (possibly omitted) UXTX/LSL and SXTX
2673 operators.
2674 N.B. GAS allows X register to be used with any operator as a
2675 programming convenience. */
2676 if (qualifier == AARCH64_OPND_QLF_X
2677 && opnd->shifter.kind != AARCH64_MOD_LSL
2678 && opnd->shifter.kind != AARCH64_MOD_UXTX
2679 && opnd->shifter.kind != AARCH64_MOD_SXTX)
2680 {
2681 set_other_error (mismatch_detail, idx, _("W register expected"));
2682 return 0;
2683 }
2684 break;
2685
2686 case AARCH64_OPND_Rm_SFT:
2687 /* ROR is not available to the shifted register operand in
2688 arithmetic instructions. */
2689 if (!aarch64_shift_operator_p (opnd->shifter.kind))
2690 {
2691 set_other_error (mismatch_detail, idx,
2692 _("shift operator expected"));
2693 return 0;
2694 }
2695 if (opnd->shifter.kind == AARCH64_MOD_ROR
2696 && opcode->iclass != log_shift)
2697 {
2698 set_other_error (mismatch_detail, idx,
2699 _("'ROR' operator not allowed"));
2700 return 0;
2701 }
2702 num = qualifier == AARCH64_OPND_QLF_W ? 31 : 63;
2703 if (!value_in_range_p (opnd->shifter.amount, 0, num))
2704 {
2705 set_sft_amount_out_of_range_error (mismatch_detail, idx, 0, num);
2706 return 0;
2707 }
2708 break;
2709
2710 default:
2711 break;
2712 }
2713 break;
2714
2715 default:
2716 break;
2717 }
2718
2719 return 1;
2720 }
2721
2722 /* Main entrypoint for the operand constraint checking.
2723
2724 Return 1 if operands of *INST meet the constraint applied by the operand
2725 codes and operand qualifiers; otherwise return 0 and if MISMATCH_DETAIL is
2726 not NULL, return the detail of the error in *MISMATCH_DETAIL. N.B. when
2727 adding more constraint checking, make sure MISMATCH_DETAIL->KIND is set
2728 with a proper error kind rather than AARCH64_OPDE_NIL (GAS asserts non-NIL
2729 error kind when it is notified that an instruction does not pass the check).
2730
2731 Un-determined operand qualifiers may get established during the process. */
2732
2733 int
2734 aarch64_match_operands_constraint (aarch64_inst *inst,
2735 aarch64_operand_error *mismatch_detail)
2736 {
2737 int i;
2738
2739 DEBUG_TRACE ("enter");
2740
2741 /* Check for cases where a source register needs to be the same as the
2742 destination register. Do this before matching qualifiers since if
2743 an instruction has both invalid tying and invalid qualifiers,
2744 the error about qualifiers would suggest several alternative
2745 instructions that also have invalid tying. */
2746 i = inst->opcode->tied_operand;
2747 if (i > 0 && (inst->operands[0].reg.regno != inst->operands[i].reg.regno))
2748 {
2749 if (mismatch_detail)
2750 {
2751 mismatch_detail->kind = AARCH64_OPDE_UNTIED_OPERAND;
2752 mismatch_detail->index = i;
2753 mismatch_detail->error = NULL;
2754 }
2755 return 0;
2756 }
2757
2758 /* Match operands' qualifier.
2759 *INST has already had qualifier establish for some, if not all, of
2760 its operands; we need to find out whether these established
2761 qualifiers match one of the qualifier sequence in
2762 INST->OPCODE->QUALIFIERS_LIST. If yes, we will assign each operand
2763 with the corresponding qualifier in such a sequence.
2764 Only basic operand constraint checking is done here; the more thorough
2765 constraint checking will carried out by operand_general_constraint_met_p,
2766 which has be to called after this in order to get all of the operands'
2767 qualifiers established. */
2768 if (match_operands_qualifier (inst, TRUE /* update_p */) == 0)
2769 {
2770 DEBUG_TRACE ("FAIL on operand qualifier matching");
2771 if (mismatch_detail)
2772 {
2773 /* Return an error type to indicate that it is the qualifier
2774 matching failure; we don't care about which operand as there
2775 are enough information in the opcode table to reproduce it. */
2776 mismatch_detail->kind = AARCH64_OPDE_INVALID_VARIANT;
2777 mismatch_detail->index = -1;
2778 mismatch_detail->error = NULL;
2779 }
2780 return 0;
2781 }
2782
2783 /* Match operands' constraint. */
2784 for (i = 0; i < AARCH64_MAX_OPND_NUM; ++i)
2785 {
2786 enum aarch64_opnd type = inst->opcode->operands[i];
2787 if (type == AARCH64_OPND_NIL)
2788 break;
2789 if (inst->operands[i].skip)
2790 {
2791 DEBUG_TRACE ("skip the incomplete operand %d", i);
2792 continue;
2793 }
2794 if (operand_general_constraint_met_p (inst->operands, i, type,
2795 inst->opcode, mismatch_detail) == 0)
2796 {
2797 DEBUG_TRACE ("FAIL on operand %d", i);
2798 return 0;
2799 }
2800 }
2801
2802 DEBUG_TRACE ("PASS");
2803
2804 return 1;
2805 }
2806
2807 /* Replace INST->OPCODE with OPCODE and return the replaced OPCODE.
2808 Also updates the TYPE of each INST->OPERANDS with the corresponding
2809 value of OPCODE->OPERANDS.
2810
2811 Note that some operand qualifiers may need to be manually cleared by
2812 the caller before it further calls the aarch64_opcode_encode; by
2813 doing this, it helps the qualifier matching facilities work
2814 properly. */
2815
2816 const aarch64_opcode*
2817 aarch64_replace_opcode (aarch64_inst *inst, const aarch64_opcode *opcode)
2818 {
2819 int i;
2820 const aarch64_opcode *old = inst->opcode;
2821
2822 inst->opcode = opcode;
2823
2824 /* Update the operand types. */
2825 for (i = 0; i < AARCH64_MAX_OPND_NUM; ++i)
2826 {
2827 inst->operands[i].type = opcode->operands[i];
2828 if (opcode->operands[i] == AARCH64_OPND_NIL)
2829 break;
2830 }
2831
2832 DEBUG_TRACE ("replace %s with %s", old->name, opcode->name);
2833
2834 return old;
2835 }
2836
2837 int
2838 aarch64_operand_index (const enum aarch64_opnd *operands, enum aarch64_opnd operand)
2839 {
2840 int i;
2841 for (i = 0; i < AARCH64_MAX_OPND_NUM; ++i)
2842 if (operands[i] == operand)
2843 return i;
2844 else if (operands[i] == AARCH64_OPND_NIL)
2845 break;
2846 return -1;
2847 }
2848 \f
2849 /* R0...R30, followed by FOR31. */
2850 #define BANK(R, FOR31) \
2851 { R (0), R (1), R (2), R (3), R (4), R (5), R (6), R (7), \
2852 R (8), R (9), R (10), R (11), R (12), R (13), R (14), R (15), \
2853 R (16), R (17), R (18), R (19), R (20), R (21), R (22), R (23), \
2854 R (24), R (25), R (26), R (27), R (28), R (29), R (30), FOR31 }
2855 /* [0][0] 32-bit integer regs with sp Wn
2856 [0][1] 64-bit integer regs with sp Xn sf=1
2857 [1][0] 32-bit integer regs with #0 Wn
2858 [1][1] 64-bit integer regs with #0 Xn sf=1 */
2859 static const char *int_reg[2][2][32] = {
2860 #define R32(X) "w" #X
2861 #define R64(X) "x" #X
2862 { BANK (R32, "wsp"), BANK (R64, "sp") },
2863 { BANK (R32, "wzr"), BANK (R64, "xzr") }
2864 #undef R64
2865 #undef R32
2866 };
2867
2868 /* Names of the SVE vector registers, first with .S suffixes,
2869 then with .D suffixes. */
2870
2871 static const char *sve_reg[2][32] = {
2872 #define ZS(X) "z" #X ".s"
2873 #define ZD(X) "z" #X ".d"
2874 BANK (ZS, ZS (31)), BANK (ZD, ZD (31))
2875 #undef ZD
2876 #undef ZS
2877 };
2878 #undef BANK
2879
2880 /* Return the integer register name.
2881 if SP_REG_P is not 0, R31 is an SP reg, other R31 is the zero reg. */
2882
2883 static inline const char *
2884 get_int_reg_name (int regno, aarch64_opnd_qualifier_t qualifier, int sp_reg_p)
2885 {
2886 const int has_zr = sp_reg_p ? 0 : 1;
2887 const int is_64 = aarch64_get_qualifier_esize (qualifier) == 4 ? 0 : 1;
2888 return int_reg[has_zr][is_64][regno];
2889 }
2890
2891 /* Like get_int_reg_name, but IS_64 is always 1. */
2892
2893 static inline const char *
2894 get_64bit_int_reg_name (int regno, int sp_reg_p)
2895 {
2896 const int has_zr = sp_reg_p ? 0 : 1;
2897 return int_reg[has_zr][1][regno];
2898 }
2899
2900 /* Get the name of the integer offset register in OPND, using the shift type
2901 to decide whether it's a word or doubleword. */
2902
2903 static inline const char *
2904 get_offset_int_reg_name (const aarch64_opnd_info *opnd)
2905 {
2906 switch (opnd->shifter.kind)
2907 {
2908 case AARCH64_MOD_UXTW:
2909 case AARCH64_MOD_SXTW:
2910 return get_int_reg_name (opnd->addr.offset.regno, AARCH64_OPND_QLF_W, 0);
2911
2912 case AARCH64_MOD_LSL:
2913 case AARCH64_MOD_SXTX:
2914 return get_int_reg_name (opnd->addr.offset.regno, AARCH64_OPND_QLF_X, 0);
2915
2916 default:
2917 abort ();
2918 }
2919 }
2920
2921 /* Get the name of the SVE vector offset register in OPND, using the operand
2922 qualifier to decide whether the suffix should be .S or .D. */
2923
2924 static inline const char *
2925 get_addr_sve_reg_name (int regno, aarch64_opnd_qualifier_t qualifier)
2926 {
2927 assert (qualifier == AARCH64_OPND_QLF_S_S
2928 || qualifier == AARCH64_OPND_QLF_S_D);
2929 return sve_reg[qualifier == AARCH64_OPND_QLF_S_D][regno];
2930 }
2931
2932 /* Types for expanding an encoded 8-bit value to a floating-point value. */
2933
2934 typedef union
2935 {
2936 uint64_t i;
2937 double d;
2938 } double_conv_t;
2939
2940 typedef union
2941 {
2942 uint32_t i;
2943 float f;
2944 } single_conv_t;
2945
2946 typedef union
2947 {
2948 uint32_t i;
2949 float f;
2950 } half_conv_t;
2951
2952 /* IMM8 is an 8-bit floating-point constant with sign, 3-bit exponent and
2953 normalized 4 bits of precision, encoded in "a:b:c:d:e:f:g:h" or FLD_imm8
2954 (depending on the type of the instruction). IMM8 will be expanded to a
2955 single-precision floating-point value (SIZE == 4) or a double-precision
2956 floating-point value (SIZE == 8). A half-precision floating-point value
2957 (SIZE == 2) is expanded to a single-precision floating-point value. The
2958 expanded value is returned. */
2959
2960 static uint64_t
2961 expand_fp_imm (int size, uint32_t imm8)
2962 {
2963 uint64_t imm = 0;
2964 uint32_t imm8_7, imm8_6_0, imm8_6, imm8_6_repl4;
2965
2966 imm8_7 = (imm8 >> 7) & 0x01; /* imm8<7> */
2967 imm8_6_0 = imm8 & 0x7f; /* imm8<6:0> */
2968 imm8_6 = imm8_6_0 >> 6; /* imm8<6> */
2969 imm8_6_repl4 = (imm8_6 << 3) | (imm8_6 << 2)
2970 | (imm8_6 << 1) | imm8_6; /* Replicate(imm8<6>,4) */
2971 if (size == 8)
2972 {
2973 imm = (imm8_7 << (63-32)) /* imm8<7> */
2974 | ((imm8_6 ^ 1) << (62-32)) /* NOT(imm8<6) */
2975 | (imm8_6_repl4 << (58-32)) | (imm8_6 << (57-32))
2976 | (imm8_6 << (56-32)) | (imm8_6 << (55-32)) /* Replicate(imm8<6>,7) */
2977 | (imm8_6_0 << (48-32)); /* imm8<6>:imm8<5:0> */
2978 imm <<= 32;
2979 }
2980 else if (size == 4 || size == 2)
2981 {
2982 imm = (imm8_7 << 31) /* imm8<7> */
2983 | ((imm8_6 ^ 1) << 30) /* NOT(imm8<6>) */
2984 | (imm8_6_repl4 << 26) /* Replicate(imm8<6>,4) */
2985 | (imm8_6_0 << 19); /* imm8<6>:imm8<5:0> */
2986 }
2987 else
2988 {
2989 /* An unsupported size. */
2990 assert (0);
2991 }
2992
2993 return imm;
2994 }
2995
2996 /* Produce the string representation of the register list operand *OPND
2997 in the buffer pointed by BUF of size SIZE. PREFIX is the part of
2998 the register name that comes before the register number, such as "v". */
2999 static void
3000 print_register_list (char *buf, size_t size, const aarch64_opnd_info *opnd,
3001 const char *prefix)
3002 {
3003 const int num_regs = opnd->reglist.num_regs;
3004 const int first_reg = opnd->reglist.first_regno;
3005 const int last_reg = (first_reg + num_regs - 1) & 0x1f;
3006 const char *qlf_name = aarch64_get_qualifier_name (opnd->qualifier);
3007 char tb[8]; /* Temporary buffer. */
3008
3009 assert (opnd->type != AARCH64_OPND_LEt || opnd->reglist.has_index);
3010 assert (num_regs >= 1 && num_regs <= 4);
3011
3012 /* Prepare the index if any. */
3013 if (opnd->reglist.has_index)
3014 /* PR 21096: The %100 is to silence a warning about possible truncation. */
3015 snprintf (tb, 8, "[%" PRIi64 "]", (opnd->reglist.index % 100));
3016 else
3017 tb[0] = '\0';
3018
3019 /* The hyphenated form is preferred for disassembly if there are
3020 more than two registers in the list, and the register numbers
3021 are monotonically increasing in increments of one. */
3022 if (num_regs > 2 && last_reg > first_reg)
3023 snprintf (buf, size, "{%s%d.%s-%s%d.%s}%s", prefix, first_reg, qlf_name,
3024 prefix, last_reg, qlf_name, tb);
3025 else
3026 {
3027 const int reg0 = first_reg;
3028 const int reg1 = (first_reg + 1) & 0x1f;
3029 const int reg2 = (first_reg + 2) & 0x1f;
3030 const int reg3 = (first_reg + 3) & 0x1f;
3031
3032 switch (num_regs)
3033 {
3034 case 1:
3035 snprintf (buf, size, "{%s%d.%s}%s", prefix, reg0, qlf_name, tb);
3036 break;
3037 case 2:
3038 snprintf (buf, size, "{%s%d.%s, %s%d.%s}%s", prefix, reg0, qlf_name,
3039 prefix, reg1, qlf_name, tb);
3040 break;
3041 case 3:
3042 snprintf (buf, size, "{%s%d.%s, %s%d.%s, %s%d.%s}%s",
3043 prefix, reg0, qlf_name, prefix, reg1, qlf_name,
3044 prefix, reg2, qlf_name, tb);
3045 break;
3046 case 4:
3047 snprintf (buf, size, "{%s%d.%s, %s%d.%s, %s%d.%s, %s%d.%s}%s",
3048 prefix, reg0, qlf_name, prefix, reg1, qlf_name,
3049 prefix, reg2, qlf_name, prefix, reg3, qlf_name, tb);
3050 break;
3051 }
3052 }
3053 }
3054
3055 /* Print the register+immediate address in OPND to BUF, which has SIZE
3056 characters. BASE is the name of the base register. */
3057
3058 static void
3059 print_immediate_offset_address (char *buf, size_t size,
3060 const aarch64_opnd_info *opnd,
3061 const char *base)
3062 {
3063 if (opnd->addr.writeback)
3064 {
3065 if (opnd->addr.preind)
3066 {
3067 if (opnd->type == AARCH64_OPND_ADDR_SIMM10 && !opnd->addr.offset.imm)
3068 snprintf (buf, size, "[%s]!", base);
3069 else
3070 snprintf (buf, size, "[%s, #%d]!", base, opnd->addr.offset.imm);
3071 }
3072 else
3073 snprintf (buf, size, "[%s], #%d", base, opnd->addr.offset.imm);
3074 }
3075 else
3076 {
3077 if (opnd->shifter.operator_present)
3078 {
3079 assert (opnd->shifter.kind == AARCH64_MOD_MUL_VL);
3080 snprintf (buf, size, "[%s, #%d, mul vl]",
3081 base, opnd->addr.offset.imm);
3082 }
3083 else if (opnd->addr.offset.imm)
3084 snprintf (buf, size, "[%s, #%d]", base, opnd->addr.offset.imm);
3085 else
3086 snprintf (buf, size, "[%s]", base);
3087 }
3088 }
3089
3090 /* Produce the string representation of the register offset address operand
3091 *OPND in the buffer pointed by BUF of size SIZE. BASE and OFFSET are
3092 the names of the base and offset registers. */
3093 static void
3094 print_register_offset_address (char *buf, size_t size,
3095 const aarch64_opnd_info *opnd,
3096 const char *base, const char *offset)
3097 {
3098 char tb[16]; /* Temporary buffer. */
3099 bfd_boolean print_extend_p = TRUE;
3100 bfd_boolean print_amount_p = TRUE;
3101 const char *shift_name = aarch64_operand_modifiers[opnd->shifter.kind].name;
3102
3103 if (!opnd->shifter.amount && (opnd->qualifier != AARCH64_OPND_QLF_S_B
3104 || !opnd->shifter.amount_present))
3105 {
3106 /* Not print the shift/extend amount when the amount is zero and
3107 when it is not the special case of 8-bit load/store instruction. */
3108 print_amount_p = FALSE;
3109 /* Likewise, no need to print the shift operator LSL in such a
3110 situation. */
3111 if (opnd->shifter.kind == AARCH64_MOD_LSL)
3112 print_extend_p = FALSE;
3113 }
3114
3115 /* Prepare for the extend/shift. */
3116 if (print_extend_p)
3117 {
3118 if (print_amount_p)
3119 snprintf (tb, sizeof (tb), ", %s #%" PRIi64, shift_name,
3120 /* PR 21096: The %100 is to silence a warning about possible truncation. */
3121 (opnd->shifter.amount % 100));
3122 else
3123 snprintf (tb, sizeof (tb), ", %s", shift_name);
3124 }
3125 else
3126 tb[0] = '\0';
3127
3128 snprintf (buf, size, "[%s, %s%s]", base, offset, tb);
3129 }
3130
3131 /* Generate the string representation of the operand OPNDS[IDX] for OPCODE
3132 in *BUF. The caller should pass in the maximum size of *BUF in SIZE.
3133 PC, PCREL_P and ADDRESS are used to pass in and return information about
3134 the PC-relative address calculation, where the PC value is passed in
3135 PC. If the operand is pc-relative related, *PCREL_P (if PCREL_P non-NULL)
3136 will return 1 and *ADDRESS (if ADDRESS non-NULL) will return the
3137 calculated address; otherwise, *PCREL_P (if PCREL_P non-NULL) returns 0.
3138
3139 The function serves both the disassembler and the assembler diagnostics
3140 issuer, which is the reason why it lives in this file. */
3141
3142 void
3143 aarch64_print_operand (char *buf, size_t size, bfd_vma pc,
3144 const aarch64_opcode *opcode,
3145 const aarch64_opnd_info *opnds, int idx, int *pcrel_p,
3146 bfd_vma *address, char** notes)
3147 {
3148 unsigned int i, num_conds;
3149 const char *name = NULL;
3150 const aarch64_opnd_info *opnd = opnds + idx;
3151 enum aarch64_modifier_kind kind;
3152 uint64_t addr, enum_value;
3153
3154 buf[0] = '\0';
3155 if (pcrel_p)
3156 *pcrel_p = 0;
3157
3158 switch (opnd->type)
3159 {
3160 case AARCH64_OPND_Rd:
3161 case AARCH64_OPND_Rn:
3162 case AARCH64_OPND_Rm:
3163 case AARCH64_OPND_Rt:
3164 case AARCH64_OPND_Rt2:
3165 case AARCH64_OPND_Rs:
3166 case AARCH64_OPND_Ra:
3167 case AARCH64_OPND_Rt_SYS:
3168 case AARCH64_OPND_PAIRREG:
3169 case AARCH64_OPND_SVE_Rm:
3170 /* The optional-ness of <Xt> in e.g. IC <ic_op>{, <Xt>} is determined by
3171 the <ic_op>, therefore we use opnd->present to override the
3172 generic optional-ness information. */
3173 if (opnd->type == AARCH64_OPND_Rt_SYS)
3174 {
3175 if (!opnd->present)
3176 break;
3177 }
3178 /* Omit the operand, e.g. RET. */
3179 else if (optional_operand_p (opcode, idx)
3180 && (opnd->reg.regno
3181 == get_optional_operand_default_value (opcode)))
3182 break;
3183 assert (opnd->qualifier == AARCH64_OPND_QLF_W
3184 || opnd->qualifier == AARCH64_OPND_QLF_X);
3185 snprintf (buf, size, "%s",
3186 get_int_reg_name (opnd->reg.regno, opnd->qualifier, 0));
3187 break;
3188
3189 case AARCH64_OPND_Rd_SP:
3190 case AARCH64_OPND_Rn_SP:
3191 case AARCH64_OPND_Rt_SP:
3192 case AARCH64_OPND_SVE_Rn_SP:
3193 case AARCH64_OPND_Rm_SP:
3194 assert (opnd->qualifier == AARCH64_OPND_QLF_W
3195 || opnd->qualifier == AARCH64_OPND_QLF_WSP
3196 || opnd->qualifier == AARCH64_OPND_QLF_X
3197 || opnd->qualifier == AARCH64_OPND_QLF_SP);
3198 snprintf (buf, size, "%s",
3199 get_int_reg_name (opnd->reg.regno, opnd->qualifier, 1));
3200 break;
3201
3202 case AARCH64_OPND_Rm_EXT:
3203 kind = opnd->shifter.kind;
3204 assert (idx == 1 || idx == 2);
3205 if ((aarch64_stack_pointer_p (opnds)
3206 || (idx == 2 && aarch64_stack_pointer_p (opnds + 1)))
3207 && ((opnd->qualifier == AARCH64_OPND_QLF_W
3208 && opnds[0].qualifier == AARCH64_OPND_QLF_W
3209 && kind == AARCH64_MOD_UXTW)
3210 || (opnd->qualifier == AARCH64_OPND_QLF_X
3211 && kind == AARCH64_MOD_UXTX)))
3212 {
3213 /* 'LSL' is the preferred form in this case. */
3214 kind = AARCH64_MOD_LSL;
3215 if (opnd->shifter.amount == 0)
3216 {
3217 /* Shifter omitted. */
3218 snprintf (buf, size, "%s",
3219 get_int_reg_name (opnd->reg.regno, opnd->qualifier, 0));
3220 break;
3221 }
3222 }
3223 if (opnd->shifter.amount)
3224 snprintf (buf, size, "%s, %s #%" PRIi64,
3225 get_int_reg_name (opnd->reg.regno, opnd->qualifier, 0),
3226 aarch64_operand_modifiers[kind].name,
3227 opnd->shifter.amount);
3228 else
3229 snprintf (buf, size, "%s, %s",
3230 get_int_reg_name (opnd->reg.regno, opnd->qualifier, 0),
3231 aarch64_operand_modifiers[kind].name);
3232 break;
3233
3234 case AARCH64_OPND_Rm_SFT:
3235 assert (opnd->qualifier == AARCH64_OPND_QLF_W
3236 || opnd->qualifier == AARCH64_OPND_QLF_X);
3237 if (opnd->shifter.amount == 0 && opnd->shifter.kind == AARCH64_MOD_LSL)
3238 snprintf (buf, size, "%s",
3239 get_int_reg_name (opnd->reg.regno, opnd->qualifier, 0));
3240 else
3241 snprintf (buf, size, "%s, %s #%" PRIi64,
3242 get_int_reg_name (opnd->reg.regno, opnd->qualifier, 0),
3243 aarch64_operand_modifiers[opnd->shifter.kind].name,
3244 opnd->shifter.amount);
3245 break;
3246
3247 case AARCH64_OPND_Fd:
3248 case AARCH64_OPND_Fn:
3249 case AARCH64_OPND_Fm:
3250 case AARCH64_OPND_Fa:
3251 case AARCH64_OPND_Ft:
3252 case AARCH64_OPND_Ft2:
3253 case AARCH64_OPND_Sd:
3254 case AARCH64_OPND_Sn:
3255 case AARCH64_OPND_Sm:
3256 case AARCH64_OPND_SVE_VZn:
3257 case AARCH64_OPND_SVE_Vd:
3258 case AARCH64_OPND_SVE_Vm:
3259 case AARCH64_OPND_SVE_Vn:
3260 snprintf (buf, size, "%s%d", aarch64_get_qualifier_name (opnd->qualifier),
3261 opnd->reg.regno);
3262 break;
3263
3264 case AARCH64_OPND_Va:
3265 case AARCH64_OPND_Vd:
3266 case AARCH64_OPND_Vn:
3267 case AARCH64_OPND_Vm:
3268 snprintf (buf, size, "v%d.%s", opnd->reg.regno,
3269 aarch64_get_qualifier_name (opnd->qualifier));
3270 break;
3271
3272 case AARCH64_OPND_Ed:
3273 case AARCH64_OPND_En:
3274 case AARCH64_OPND_Em:
3275 case AARCH64_OPND_Em16:
3276 case AARCH64_OPND_SM3_IMM2:
3277 snprintf (buf, size, "v%d.%s[%" PRIi64 "]", opnd->reglane.regno,
3278 aarch64_get_qualifier_name (opnd->qualifier),
3279 opnd->reglane.index);
3280 break;
3281
3282 case AARCH64_OPND_VdD1:
3283 case AARCH64_OPND_VnD1:
3284 snprintf (buf, size, "v%d.d[1]", opnd->reg.regno);
3285 break;
3286
3287 case AARCH64_OPND_LVn:
3288 case AARCH64_OPND_LVt:
3289 case AARCH64_OPND_LVt_AL:
3290 case AARCH64_OPND_LEt:
3291 print_register_list (buf, size, opnd, "v");
3292 break;
3293
3294 case AARCH64_OPND_SVE_Pd:
3295 case AARCH64_OPND_SVE_Pg3:
3296 case AARCH64_OPND_SVE_Pg4_5:
3297 case AARCH64_OPND_SVE_Pg4_10:
3298 case AARCH64_OPND_SVE_Pg4_16:
3299 case AARCH64_OPND_SVE_Pm:
3300 case AARCH64_OPND_SVE_Pn:
3301 case AARCH64_OPND_SVE_Pt:
3302 if (opnd->qualifier == AARCH64_OPND_QLF_NIL)
3303 snprintf (buf, size, "p%d", opnd->reg.regno);
3304 else if (opnd->qualifier == AARCH64_OPND_QLF_P_Z
3305 || opnd->qualifier == AARCH64_OPND_QLF_P_M)
3306 snprintf (buf, size, "p%d/%s", opnd->reg.regno,
3307 aarch64_get_qualifier_name (opnd->qualifier));
3308 else
3309 snprintf (buf, size, "p%d.%s", opnd->reg.regno,
3310 aarch64_get_qualifier_name (opnd->qualifier));
3311 break;
3312
3313 case AARCH64_OPND_SVE_Za_5:
3314 case AARCH64_OPND_SVE_Za_16:
3315 case AARCH64_OPND_SVE_Zd:
3316 case AARCH64_OPND_SVE_Zm_5:
3317 case AARCH64_OPND_SVE_Zm_16:
3318 case AARCH64_OPND_SVE_Zn:
3319 case AARCH64_OPND_SVE_Zt:
3320 if (opnd->qualifier == AARCH64_OPND_QLF_NIL)
3321 snprintf (buf, size, "z%d", opnd->reg.regno);
3322 else
3323 snprintf (buf, size, "z%d.%s", opnd->reg.regno,
3324 aarch64_get_qualifier_name (opnd->qualifier));
3325 break;
3326
3327 case AARCH64_OPND_SVE_ZnxN:
3328 case AARCH64_OPND_SVE_ZtxN:
3329 print_register_list (buf, size, opnd, "z");
3330 break;
3331
3332 case AARCH64_OPND_SVE_Zm3_INDEX:
3333 case AARCH64_OPND_SVE_Zm3_22_INDEX:
3334 case AARCH64_OPND_SVE_Zm3_11_INDEX:
3335 case AARCH64_OPND_SVE_Zm4_11_INDEX:
3336 case AARCH64_OPND_SVE_Zm4_INDEX:
3337 case AARCH64_OPND_SVE_Zn_INDEX:
3338 snprintf (buf, size, "z%d.%s[%" PRIi64 "]", opnd->reglane.regno,
3339 aarch64_get_qualifier_name (opnd->qualifier),
3340 opnd->reglane.index);
3341 break;
3342
3343 case AARCH64_OPND_CRn:
3344 case AARCH64_OPND_CRm:
3345 snprintf (buf, size, "C%" PRIi64, opnd->imm.value);
3346 break;
3347
3348 case AARCH64_OPND_IDX:
3349 case AARCH64_OPND_MASK:
3350 case AARCH64_OPND_IMM:
3351 case AARCH64_OPND_IMM_2:
3352 case AARCH64_OPND_WIDTH:
3353 case AARCH64_OPND_UIMM3_OP1:
3354 case AARCH64_OPND_UIMM3_OP2:
3355 case AARCH64_OPND_BIT_NUM:
3356 case AARCH64_OPND_IMM_VLSL:
3357 case AARCH64_OPND_IMM_VLSR:
3358 case AARCH64_OPND_SHLL_IMM:
3359 case AARCH64_OPND_IMM0:
3360 case AARCH64_OPND_IMMR:
3361 case AARCH64_OPND_IMMS:
3362 case AARCH64_OPND_UNDEFINED:
3363 case AARCH64_OPND_FBITS:
3364 case AARCH64_OPND_TME_UIMM16:
3365 case AARCH64_OPND_SIMM5:
3366 case AARCH64_OPND_SVE_SHLIMM_PRED:
3367 case AARCH64_OPND_SVE_SHLIMM_UNPRED:
3368 case AARCH64_OPND_SVE_SHLIMM_UNPRED_22:
3369 case AARCH64_OPND_SVE_SHRIMM_PRED:
3370 case AARCH64_OPND_SVE_SHRIMM_UNPRED:
3371 case AARCH64_OPND_SVE_SHRIMM_UNPRED_22:
3372 case AARCH64_OPND_SVE_SIMM5:
3373 case AARCH64_OPND_SVE_SIMM5B:
3374 case AARCH64_OPND_SVE_SIMM6:
3375 case AARCH64_OPND_SVE_SIMM8:
3376 case AARCH64_OPND_SVE_UIMM3:
3377 case AARCH64_OPND_SVE_UIMM7:
3378 case AARCH64_OPND_SVE_UIMM8:
3379 case AARCH64_OPND_SVE_UIMM8_53:
3380 case AARCH64_OPND_IMM_ROT1:
3381 case AARCH64_OPND_IMM_ROT2:
3382 case AARCH64_OPND_IMM_ROT3:
3383 case AARCH64_OPND_SVE_IMM_ROT1:
3384 case AARCH64_OPND_SVE_IMM_ROT2:
3385 case AARCH64_OPND_SVE_IMM_ROT3:
3386 snprintf (buf, size, "#%" PRIi64, opnd->imm.value);
3387 break;
3388
3389 case AARCH64_OPND_SVE_I1_HALF_ONE:
3390 case AARCH64_OPND_SVE_I1_HALF_TWO:
3391 case AARCH64_OPND_SVE_I1_ZERO_ONE:
3392 {
3393 single_conv_t c;
3394 c.i = opnd->imm.value;
3395 snprintf (buf, size, "#%.1f", c.f);
3396 break;
3397 }
3398
3399 case AARCH64_OPND_SVE_PATTERN:
3400 if (optional_operand_p (opcode, idx)
3401 && opnd->imm.value == get_optional_operand_default_value (opcode))
3402 break;
3403 enum_value = opnd->imm.value;
3404 assert (enum_value < ARRAY_SIZE (aarch64_sve_pattern_array));
3405 if (aarch64_sve_pattern_array[enum_value])
3406 snprintf (buf, size, "%s", aarch64_sve_pattern_array[enum_value]);
3407 else
3408 snprintf (buf, size, "#%" PRIi64, opnd->imm.value);
3409 break;
3410
3411 case AARCH64_OPND_SVE_PATTERN_SCALED:
3412 if (optional_operand_p (opcode, idx)
3413 && !opnd->shifter.operator_present
3414 && opnd->imm.value == get_optional_operand_default_value (opcode))
3415 break;
3416 enum_value = opnd->imm.value;
3417 assert (enum_value < ARRAY_SIZE (aarch64_sve_pattern_array));
3418 if (aarch64_sve_pattern_array[opnd->imm.value])
3419 snprintf (buf, size, "%s", aarch64_sve_pattern_array[opnd->imm.value]);
3420 else
3421 snprintf (buf, size, "#%" PRIi64, opnd->imm.value);
3422 if (opnd->shifter.operator_present)
3423 {
3424 size_t len = strlen (buf);
3425 snprintf (buf + len, size - len, ", %s #%" PRIi64,
3426 aarch64_operand_modifiers[opnd->shifter.kind].name,
3427 opnd->shifter.amount);
3428 }
3429 break;
3430
3431 case AARCH64_OPND_SVE_PRFOP:
3432 enum_value = opnd->imm.value;
3433 assert (enum_value < ARRAY_SIZE (aarch64_sve_prfop_array));
3434 if (aarch64_sve_prfop_array[enum_value])
3435 snprintf (buf, size, "%s", aarch64_sve_prfop_array[enum_value]);
3436 else
3437 snprintf (buf, size, "#%" PRIi64, opnd->imm.value);
3438 break;
3439
3440 case AARCH64_OPND_IMM_MOV:
3441 switch (aarch64_get_qualifier_esize (opnds[0].qualifier))
3442 {
3443 case 4: /* e.g. MOV Wd, #<imm32>. */
3444 {
3445 int imm32 = opnd->imm.value;
3446 snprintf (buf, size, "#0x%-20x\t// #%d", imm32, imm32);
3447 }
3448 break;
3449 case 8: /* e.g. MOV Xd, #<imm64>. */
3450 snprintf (buf, size, "#0x%-20" PRIx64 "\t// #%" PRIi64,
3451 opnd->imm.value, opnd->imm.value);
3452 break;
3453 default: assert (0);
3454 }
3455 break;
3456
3457 case AARCH64_OPND_FPIMM0:
3458 snprintf (buf, size, "#0.0");
3459 break;
3460
3461 case AARCH64_OPND_LIMM:
3462 case AARCH64_OPND_AIMM:
3463 case AARCH64_OPND_HALF:
3464 case AARCH64_OPND_SVE_INV_LIMM:
3465 case AARCH64_OPND_SVE_LIMM:
3466 case AARCH64_OPND_SVE_LIMM_MOV:
3467 if (opnd->shifter.amount)
3468 snprintf (buf, size, "#0x%" PRIx64 ", lsl #%" PRIi64, opnd->imm.value,
3469 opnd->shifter.amount);
3470 else
3471 snprintf (buf, size, "#0x%" PRIx64, opnd->imm.value);
3472 break;
3473
3474 case AARCH64_OPND_SIMD_IMM:
3475 case AARCH64_OPND_SIMD_IMM_SFT:
3476 if ((! opnd->shifter.amount && opnd->shifter.kind == AARCH64_MOD_LSL)
3477 || opnd->shifter.kind == AARCH64_MOD_NONE)
3478 snprintf (buf, size, "#0x%" PRIx64, opnd->imm.value);
3479 else
3480 snprintf (buf, size, "#0x%" PRIx64 ", %s #%" PRIi64, opnd->imm.value,
3481 aarch64_operand_modifiers[opnd->shifter.kind].name,
3482 opnd->shifter.amount);
3483 break;
3484
3485 case AARCH64_OPND_SVE_AIMM:
3486 case AARCH64_OPND_SVE_ASIMM:
3487 if (opnd->shifter.amount)
3488 snprintf (buf, size, "#%" PRIi64 ", lsl #%" PRIi64, opnd->imm.value,
3489 opnd->shifter.amount);
3490 else
3491 snprintf (buf, size, "#%" PRIi64, opnd->imm.value);
3492 break;
3493
3494 case AARCH64_OPND_FPIMM:
3495 case AARCH64_OPND_SIMD_FPIMM:
3496 case AARCH64_OPND_SVE_FPIMM8:
3497 switch (aarch64_get_qualifier_esize (opnds[0].qualifier))
3498 {
3499 case 2: /* e.g. FMOV <Hd>, #<imm>. */
3500 {
3501 half_conv_t c;
3502 c.i = expand_fp_imm (2, opnd->imm.value);
3503 snprintf (buf, size, "#%.18e", c.f);
3504 }
3505 break;
3506 case 4: /* e.g. FMOV <Vd>.4S, #<imm>. */
3507 {
3508 single_conv_t c;
3509 c.i = expand_fp_imm (4, opnd->imm.value);
3510 snprintf (buf, size, "#%.18e", c.f);
3511 }
3512 break;
3513 case 8: /* e.g. FMOV <Sd>, #<imm>. */
3514 {
3515 double_conv_t c;
3516 c.i = expand_fp_imm (8, opnd->imm.value);
3517 snprintf (buf, size, "#%.18e", c.d);
3518 }
3519 break;
3520 default: assert (0);
3521 }
3522 break;
3523
3524 case AARCH64_OPND_CCMP_IMM:
3525 case AARCH64_OPND_NZCV:
3526 case AARCH64_OPND_EXCEPTION:
3527 case AARCH64_OPND_UIMM4:
3528 case AARCH64_OPND_UIMM4_ADDG:
3529 case AARCH64_OPND_UIMM7:
3530 case AARCH64_OPND_UIMM10:
3531 if (optional_operand_p (opcode, idx) == TRUE
3532 && (opnd->imm.value ==
3533 (int64_t) get_optional_operand_default_value (opcode)))
3534 /* Omit the operand, e.g. DCPS1. */
3535 break;
3536 snprintf (buf, size, "#0x%x", (unsigned int)opnd->imm.value);
3537 break;
3538
3539 case AARCH64_OPND_COND:
3540 case AARCH64_OPND_COND1:
3541 snprintf (buf, size, "%s", opnd->cond->names[0]);
3542 num_conds = ARRAY_SIZE (opnd->cond->names);
3543 for (i = 1; i < num_conds && opnd->cond->names[i]; ++i)
3544 {
3545 size_t len = strlen (buf);
3546 if (i == 1)
3547 snprintf (buf + len, size - len, " // %s = %s",
3548 opnd->cond->names[0], opnd->cond->names[i]);
3549 else
3550 snprintf (buf + len, size - len, ", %s",
3551 opnd->cond->names[i]);
3552 }
3553 break;
3554
3555 case AARCH64_OPND_ADDR_ADRP:
3556 addr = ((pc + AARCH64_PCREL_OFFSET) & ~(uint64_t)0xfff)
3557 + opnd->imm.value;
3558 if (pcrel_p)
3559 *pcrel_p = 1;
3560 if (address)
3561 *address = addr;
3562 /* This is not necessary during the disassembling, as print_address_func
3563 in the disassemble_info will take care of the printing. But some
3564 other callers may be still interested in getting the string in *STR,
3565 so here we do snprintf regardless. */
3566 snprintf (buf, size, "#0x%" PRIx64, addr);
3567 break;
3568
3569 case AARCH64_OPND_ADDR_PCREL14:
3570 case AARCH64_OPND_ADDR_PCREL19:
3571 case AARCH64_OPND_ADDR_PCREL21:
3572 case AARCH64_OPND_ADDR_PCREL26:
3573 addr = pc + AARCH64_PCREL_OFFSET + opnd->imm.value;
3574 if (pcrel_p)
3575 *pcrel_p = 1;
3576 if (address)
3577 *address = addr;
3578 /* This is not necessary during the disassembling, as print_address_func
3579 in the disassemble_info will take care of the printing. But some
3580 other callers may be still interested in getting the string in *STR,
3581 so here we do snprintf regardless. */
3582 snprintf (buf, size, "#0x%" PRIx64, addr);
3583 break;
3584
3585 case AARCH64_OPND_ADDR_SIMPLE:
3586 case AARCH64_OPND_SIMD_ADDR_SIMPLE:
3587 case AARCH64_OPND_SIMD_ADDR_POST:
3588 name = get_64bit_int_reg_name (opnd->addr.base_regno, 1);
3589 if (opnd->type == AARCH64_OPND_SIMD_ADDR_POST)
3590 {
3591 if (opnd->addr.offset.is_reg)
3592 snprintf (buf, size, "[%s], x%d", name, opnd->addr.offset.regno);
3593 else
3594 snprintf (buf, size, "[%s], #%d", name, opnd->addr.offset.imm);
3595 }
3596 else
3597 snprintf (buf, size, "[%s]", name);
3598 break;
3599
3600 case AARCH64_OPND_ADDR_REGOFF:
3601 case AARCH64_OPND_SVE_ADDR_R:
3602 case AARCH64_OPND_SVE_ADDR_RR:
3603 case AARCH64_OPND_SVE_ADDR_RR_LSL1:
3604 case AARCH64_OPND_SVE_ADDR_RR_LSL2:
3605 case AARCH64_OPND_SVE_ADDR_RR_LSL3:
3606 case AARCH64_OPND_SVE_ADDR_RX:
3607 case AARCH64_OPND_SVE_ADDR_RX_LSL1:
3608 case AARCH64_OPND_SVE_ADDR_RX_LSL2:
3609 case AARCH64_OPND_SVE_ADDR_RX_LSL3:
3610 print_register_offset_address
3611 (buf, size, opnd, get_64bit_int_reg_name (opnd->addr.base_regno, 1),
3612 get_offset_int_reg_name (opnd));
3613 break;
3614
3615 case AARCH64_OPND_SVE_ADDR_ZX:
3616 print_register_offset_address
3617 (buf, size, opnd,
3618 get_addr_sve_reg_name (opnd->addr.base_regno, opnd->qualifier),
3619 get_64bit_int_reg_name (opnd->addr.offset.regno, 0));
3620 break;
3621
3622 case AARCH64_OPND_SVE_ADDR_RZ:
3623 case AARCH64_OPND_SVE_ADDR_RZ_LSL1:
3624 case AARCH64_OPND_SVE_ADDR_RZ_LSL2:
3625 case AARCH64_OPND_SVE_ADDR_RZ_LSL3:
3626 case AARCH64_OPND_SVE_ADDR_RZ_XTW_14:
3627 case AARCH64_OPND_SVE_ADDR_RZ_XTW_22:
3628 case AARCH64_OPND_SVE_ADDR_RZ_XTW1_14:
3629 case AARCH64_OPND_SVE_ADDR_RZ_XTW1_22:
3630 case AARCH64_OPND_SVE_ADDR_RZ_XTW2_14:
3631 case AARCH64_OPND_SVE_ADDR_RZ_XTW2_22:
3632 case AARCH64_OPND_SVE_ADDR_RZ_XTW3_14:
3633 case AARCH64_OPND_SVE_ADDR_RZ_XTW3_22:
3634 print_register_offset_address
3635 (buf, size, opnd, get_64bit_int_reg_name (opnd->addr.base_regno, 1),
3636 get_addr_sve_reg_name (opnd->addr.offset.regno, opnd->qualifier));
3637 break;
3638
3639 case AARCH64_OPND_ADDR_SIMM7:
3640 case AARCH64_OPND_ADDR_SIMM9:
3641 case AARCH64_OPND_ADDR_SIMM9_2:
3642 case AARCH64_OPND_ADDR_SIMM10:
3643 case AARCH64_OPND_ADDR_SIMM11:
3644 case AARCH64_OPND_ADDR_SIMM13:
3645 case AARCH64_OPND_ADDR_OFFSET:
3646 case AARCH64_OPND_SVE_ADDR_RI_S4x16:
3647 case AARCH64_OPND_SVE_ADDR_RI_S4x32:
3648 case AARCH64_OPND_SVE_ADDR_RI_S4xVL:
3649 case AARCH64_OPND_SVE_ADDR_RI_S4x2xVL:
3650 case AARCH64_OPND_SVE_ADDR_RI_S4x3xVL:
3651 case AARCH64_OPND_SVE_ADDR_RI_S4x4xVL:
3652 case AARCH64_OPND_SVE_ADDR_RI_S6xVL:
3653 case AARCH64_OPND_SVE_ADDR_RI_S9xVL:
3654 case AARCH64_OPND_SVE_ADDR_RI_U6:
3655 case AARCH64_OPND_SVE_ADDR_RI_U6x2:
3656 case AARCH64_OPND_SVE_ADDR_RI_U6x4:
3657 case AARCH64_OPND_SVE_ADDR_RI_U6x8:
3658 print_immediate_offset_address
3659 (buf, size, opnd, get_64bit_int_reg_name (opnd->addr.base_regno, 1));
3660 break;
3661
3662 case AARCH64_OPND_SVE_ADDR_ZI_U5:
3663 case AARCH64_OPND_SVE_ADDR_ZI_U5x2:
3664 case AARCH64_OPND_SVE_ADDR_ZI_U5x4:
3665 case AARCH64_OPND_SVE_ADDR_ZI_U5x8:
3666 print_immediate_offset_address
3667 (buf, size, opnd,
3668 get_addr_sve_reg_name (opnd->addr.base_regno, opnd->qualifier));
3669 break;
3670
3671 case AARCH64_OPND_SVE_ADDR_ZZ_LSL:
3672 case AARCH64_OPND_SVE_ADDR_ZZ_SXTW:
3673 case AARCH64_OPND_SVE_ADDR_ZZ_UXTW:
3674 print_register_offset_address
3675 (buf, size, opnd,
3676 get_addr_sve_reg_name (opnd->addr.base_regno, opnd->qualifier),
3677 get_addr_sve_reg_name (opnd->addr.offset.regno, opnd->qualifier));
3678 break;
3679
3680 case AARCH64_OPND_ADDR_UIMM12:
3681 name = get_64bit_int_reg_name (opnd->addr.base_regno, 1);
3682 if (opnd->addr.offset.imm)
3683 snprintf (buf, size, "[%s, #%d]", name, opnd->addr.offset.imm);
3684 else
3685 snprintf (buf, size, "[%s]", name);
3686 break;
3687
3688 case AARCH64_OPND_SYSREG:
3689 for (i = 0; aarch64_sys_regs[i].name; ++i)
3690 {
3691 bfd_boolean exact_match
3692 = (aarch64_sys_regs[i].flags & opnd->sysreg.flags)
3693 == opnd->sysreg.flags;
3694
3695 /* Try and find an exact match, But if that fails, return the first
3696 partial match that was found. */
3697 if (aarch64_sys_regs[i].value == opnd->sysreg.value
3698 && ! aarch64_sys_reg_deprecated_p (&aarch64_sys_regs[i])
3699 && (name == NULL || exact_match))
3700 {
3701 name = aarch64_sys_regs[i].name;
3702 if (exact_match)
3703 {
3704 if (notes)
3705 *notes = NULL;
3706 break;
3707 }
3708
3709 /* If we didn't match exactly, that means the presense of a flag
3710 indicates what we didn't want for this instruction. e.g. If
3711 F_REG_READ is there, that means we were looking for a write
3712 register. See aarch64_ext_sysreg. */
3713 if (aarch64_sys_regs[i].flags & F_REG_WRITE)
3714 *notes = _("reading from a write-only register");
3715 else if (aarch64_sys_regs[i].flags & F_REG_READ)
3716 *notes = _("writing to a read-only register");
3717 }
3718 }
3719
3720 if (name)
3721 snprintf (buf, size, "%s", name);
3722 else
3723 {
3724 /* Implementation defined system register. */
3725 unsigned int value = opnd->sysreg.value;
3726 snprintf (buf, size, "s%u_%u_c%u_c%u_%u", (value >> 14) & 0x3,
3727 (value >> 11) & 0x7, (value >> 7) & 0xf, (value >> 3) & 0xf,
3728 value & 0x7);
3729 }
3730 break;
3731
3732 case AARCH64_OPND_PSTATEFIELD:
3733 for (i = 0; aarch64_pstatefields[i].name; ++i)
3734 if (aarch64_pstatefields[i].value == opnd->pstatefield)
3735 break;
3736 assert (aarch64_pstatefields[i].name);
3737 snprintf (buf, size, "%s", aarch64_pstatefields[i].name);
3738 break;
3739
3740 case AARCH64_OPND_SYSREG_AT:
3741 case AARCH64_OPND_SYSREG_DC:
3742 case AARCH64_OPND_SYSREG_IC:
3743 case AARCH64_OPND_SYSREG_TLBI:
3744 case AARCH64_OPND_SYSREG_SR:
3745 snprintf (buf, size, "%s", opnd->sysins_op->name);
3746 break;
3747
3748 case AARCH64_OPND_BARRIER:
3749 snprintf (buf, size, "%s", opnd->barrier->name);
3750 break;
3751
3752 case AARCH64_OPND_BARRIER_ISB:
3753 /* Operand can be omitted, e.g. in DCPS1. */
3754 if (! optional_operand_p (opcode, idx)
3755 || (opnd->barrier->value
3756 != get_optional_operand_default_value (opcode)))
3757 snprintf (buf, size, "#0x%x", opnd->barrier->value);
3758 break;
3759
3760 case AARCH64_OPND_PRFOP:
3761 if (opnd->prfop->name != NULL)
3762 snprintf (buf, size, "%s", opnd->prfop->name);
3763 else
3764 snprintf (buf, size, "#0x%02x", opnd->prfop->value);
3765 break;
3766
3767 case AARCH64_OPND_BARRIER_PSB:
3768 snprintf (buf, size, "csync");
3769 break;
3770
3771 case AARCH64_OPND_BTI_TARGET:
3772 if ((HINT_FLAG (opnd->hint_option->value) & HINT_OPD_F_NOPRINT) == 0)
3773 snprintf (buf, size, "%s", opnd->hint_option->name);
3774 break;
3775
3776 default:
3777 assert (0);
3778 }
3779 }
3780 \f
3781 #define CPENC(op0,op1,crn,crm,op2) \
3782 ((((op0) << 19) | ((op1) << 16) | ((crn) << 12) | ((crm) << 8) | ((op2) << 5)) >> 5)
3783 /* for 3.9.3 Instructions for Accessing Special Purpose Registers */
3784 #define CPEN_(op1,crm,op2) CPENC(3,(op1),4,(crm),(op2))
3785 /* for 3.9.10 System Instructions */
3786 #define CPENS(op1,crn,crm,op2) CPENC(1,(op1),(crn),(crm),(op2))
3787
3788 #define C0 0
3789 #define C1 1
3790 #define C2 2
3791 #define C3 3
3792 #define C4 4
3793 #define C5 5
3794 #define C6 6
3795 #define C7 7
3796 #define C8 8
3797 #define C9 9
3798 #define C10 10
3799 #define C11 11
3800 #define C12 12
3801 #define C13 13
3802 #define C14 14
3803 #define C15 15
3804
3805 /* TODO there is one more issues need to be resolved
3806 1. handle cpu-implementation-defined system registers. */
3807 const aarch64_sys_reg aarch64_sys_regs [] =
3808 {
3809 { "spsr_el1", CPEN_(0,C0,0), 0 }, /* = spsr_svc */
3810 { "spsr_el12", CPEN_ (5, C0, 0), F_ARCHEXT },
3811 { "elr_el1", CPEN_(0,C0,1), 0 },
3812 { "elr_el12", CPEN_ (5, C0, 1), F_ARCHEXT },
3813 { "sp_el0", CPEN_(0,C1,0), 0 },
3814 { "spsel", CPEN_(0,C2,0), 0 },
3815 { "daif", CPEN_(3,C2,1), 0 },
3816 { "currentel", CPEN_(0,C2,2), F_REG_READ }, /* RO */
3817 { "pan", CPEN_(0,C2,3), F_ARCHEXT },
3818 { "uao", CPEN_ (0, C2, 4), F_ARCHEXT },
3819 { "nzcv", CPEN_(3,C2,0), 0 },
3820 { "ssbs", CPEN_(3,C2,6), F_ARCHEXT },
3821 { "fpcr", CPEN_(3,C4,0), 0 },
3822 { "fpsr", CPEN_(3,C4,1), 0 },
3823 { "dspsr_el0", CPEN_(3,C5,0), 0 },
3824 { "dlr_el0", CPEN_(3,C5,1), 0 },
3825 { "spsr_el2", CPEN_(4,C0,0), 0 }, /* = spsr_hyp */
3826 { "elr_el2", CPEN_(4,C0,1), 0 },
3827 { "sp_el1", CPEN_(4,C1,0), 0 },
3828 { "spsr_irq", CPEN_(4,C3,0), 0 },
3829 { "spsr_abt", CPEN_(4,C3,1), 0 },
3830 { "spsr_und", CPEN_(4,C3,2), 0 },
3831 { "spsr_fiq", CPEN_(4,C3,3), 0 },
3832 { "spsr_el3", CPEN_(6,C0,0), 0 },
3833 { "elr_el3", CPEN_(6,C0,1), 0 },
3834 { "sp_el2", CPEN_(6,C1,0), 0 },
3835 { "spsr_svc", CPEN_(0,C0,0), F_DEPRECATED }, /* = spsr_el1 */
3836 { "spsr_hyp", CPEN_(4,C0,0), F_DEPRECATED }, /* = spsr_el2 */
3837 { "midr_el1", CPENC(3,0,C0,C0,0), F_REG_READ }, /* RO */
3838 { "ctr_el0", CPENC(3,3,C0,C0,1), F_REG_READ }, /* RO */
3839 { "mpidr_el1", CPENC(3,0,C0,C0,5), F_REG_READ }, /* RO */
3840 { "revidr_el1", CPENC(3,0,C0,C0,6), F_REG_READ }, /* RO */
3841 { "aidr_el1", CPENC(3,1,C0,C0,7), F_REG_READ }, /* RO */
3842 { "dczid_el0", CPENC(3,3,C0,C0,7), F_REG_READ }, /* RO */
3843 { "id_dfr0_el1", CPENC(3,0,C0,C1,2), F_REG_READ }, /* RO */
3844 { "id_pfr0_el1", CPENC(3,0,C0,C1,0), F_REG_READ }, /* RO */
3845 { "id_pfr1_el1", CPENC(3,0,C0,C1,1), F_REG_READ }, /* RO */
3846 { "id_pfr2_el1", CPENC(3,0,C0,C3,4), F_ARCHEXT | F_REG_READ}, /* RO */
3847 { "id_afr0_el1", CPENC(3,0,C0,C1,3), F_REG_READ }, /* RO */
3848 { "id_mmfr0_el1", CPENC(3,0,C0,C1,4), F_REG_READ }, /* RO */
3849 { "id_mmfr1_el1", CPENC(3,0,C0,C1,5), F_REG_READ }, /* RO */
3850 { "id_mmfr2_el1", CPENC(3,0,C0,C1,6), F_REG_READ }, /* RO */
3851 { "id_mmfr3_el1", CPENC(3,0,C0,C1,7), F_REG_READ }, /* RO */
3852 { "id_mmfr4_el1", CPENC(3,0,C0,C2,6), F_REG_READ }, /* RO */
3853 { "id_isar0_el1", CPENC(3,0,C0,C2,0), F_REG_READ }, /* RO */
3854 { "id_isar1_el1", CPENC(3,0,C0,C2,1), F_REG_READ }, /* RO */
3855 { "id_isar2_el1", CPENC(3,0,C0,C2,2), F_REG_READ }, /* RO */
3856 { "id_isar3_el1", CPENC(3,0,C0,C2,3), F_REG_READ }, /* RO */
3857 { "id_isar4_el1", CPENC(3,0,C0,C2,4), F_REG_READ }, /* RO */
3858 { "id_isar5_el1", CPENC(3,0,C0,C2,5), F_REG_READ }, /* RO */
3859 { "mvfr0_el1", CPENC(3,0,C0,C3,0), F_REG_READ }, /* RO */
3860 { "mvfr1_el1", CPENC(3,0,C0,C3,1), F_REG_READ }, /* RO */
3861 { "mvfr2_el1", CPENC(3,0,C0,C3,2), F_REG_READ }, /* RO */
3862 { "ccsidr_el1", CPENC(3,1,C0,C0,0), F_REG_READ }, /* RO */
3863 { "id_aa64pfr0_el1", CPENC(3,0,C0,C4,0), F_REG_READ }, /* RO */
3864 { "id_aa64pfr1_el1", CPENC(3,0,C0,C4,1), F_REG_READ }, /* RO */
3865 { "id_aa64dfr0_el1", CPENC(3,0,C0,C5,0), F_REG_READ }, /* RO */
3866 { "id_aa64dfr1_el1", CPENC(3,0,C0,C5,1), F_REG_READ }, /* RO */
3867 { "id_aa64isar0_el1", CPENC(3,0,C0,C6,0), F_REG_READ }, /* RO */
3868 { "id_aa64isar1_el1", CPENC(3,0,C0,C6,1), F_REG_READ }, /* RO */
3869 { "id_aa64mmfr0_el1", CPENC(3,0,C0,C7,0), F_REG_READ }, /* RO */
3870 { "id_aa64mmfr1_el1", CPENC(3,0,C0,C7,1), F_REG_READ }, /* RO */
3871 { "id_aa64mmfr2_el1", CPENC (3, 0, C0, C7, 2), F_ARCHEXT | F_REG_READ }, /* RO */
3872 { "id_aa64afr0_el1", CPENC(3,0,C0,C5,4), F_REG_READ }, /* RO */
3873 { "id_aa64afr1_el1", CPENC(3,0,C0,C5,5), F_REG_READ }, /* RO */
3874 { "id_aa64zfr0_el1", CPENC (3, 0, C0, C4, 4), F_ARCHEXT | F_REG_READ }, /* RO */
3875 { "clidr_el1", CPENC(3,1,C0,C0,1), F_REG_READ }, /* RO */
3876 { "csselr_el1", CPENC(3,2,C0,C0,0), 0 },
3877 { "vpidr_el2", CPENC(3,4,C0,C0,0), 0 },
3878 { "vmpidr_el2", CPENC(3,4,C0,C0,5), 0 },
3879 { "sctlr_el1", CPENC(3,0,C1,C0,0), 0 },
3880 { "sctlr_el2", CPENC(3,4,C1,C0,0), 0 },
3881 { "sctlr_el3", CPENC(3,6,C1,C0,0), 0 },
3882 { "sctlr_el12", CPENC (3, 5, C1, C0, 0), F_ARCHEXT },
3883 { "actlr_el1", CPENC(3,0,C1,C0,1), 0 },
3884 { "actlr_el2", CPENC(3,4,C1,C0,1), 0 },
3885 { "actlr_el3", CPENC(3,6,C1,C0,1), 0 },
3886 { "cpacr_el1", CPENC(3,0,C1,C0,2), 0 },
3887 { "cpacr_el12", CPENC (3, 5, C1, C0, 2), F_ARCHEXT },
3888 { "cptr_el2", CPENC(3,4,C1,C1,2), 0 },
3889 { "cptr_el3", CPENC(3,6,C1,C1,2), 0 },
3890 { "scr_el3", CPENC(3,6,C1,C1,0), 0 },
3891 { "hcr_el2", CPENC(3,4,C1,C1,0), 0 },
3892 { "mdcr_el2", CPENC(3,4,C1,C1,1), 0 },
3893 { "mdcr_el3", CPENC(3,6,C1,C3,1), 0 },
3894 { "hstr_el2", CPENC(3,4,C1,C1,3), 0 },
3895 { "hacr_el2", CPENC(3,4,C1,C1,7), 0 },
3896 { "zcr_el1", CPENC (3, 0, C1, C2, 0), F_ARCHEXT },
3897 { "zcr_el12", CPENC (3, 5, C1, C2, 0), F_ARCHEXT },
3898 { "zcr_el2", CPENC (3, 4, C1, C2, 0), F_ARCHEXT },
3899 { "zcr_el3", CPENC (3, 6, C1, C2, 0), F_ARCHEXT },
3900 { "zidr_el1", CPENC (3, 0, C0, C0, 7), F_ARCHEXT },
3901 { "ttbr0_el1", CPENC(3,0,C2,C0,0), 0 },
3902 { "ttbr1_el1", CPENC(3,0,C2,C0,1), 0 },
3903 { "ttbr0_el2", CPENC(3,4,C2,C0,0), 0 },
3904 { "ttbr1_el2", CPENC (3, 4, C2, C0, 1), F_ARCHEXT },
3905 { "ttbr0_el3", CPENC(3,6,C2,C0,0), 0 },
3906 { "ttbr0_el12", CPENC (3, 5, C2, C0, 0), F_ARCHEXT },
3907 { "ttbr1_el12", CPENC (3, 5, C2, C0, 1), F_ARCHEXT },
3908 { "vttbr_el2", CPENC(3,4,C2,C1,0), 0 },
3909 { "tcr_el1", CPENC(3,0,C2,C0,2), 0 },
3910 { "tcr_el2", CPENC(3,4,C2,C0,2), 0 },
3911 { "tcr_el3", CPENC(3,6,C2,C0,2), 0 },
3912 { "tcr_el12", CPENC (3, 5, C2, C0, 2), F_ARCHEXT },
3913 { "vtcr_el2", CPENC(3,4,C2,C1,2), 0 },
3914 { "apiakeylo_el1", CPENC (3, 0, C2, C1, 0), F_ARCHEXT },
3915 { "apiakeyhi_el1", CPENC (3, 0, C2, C1, 1), F_ARCHEXT },
3916 { "apibkeylo_el1", CPENC (3, 0, C2, C1, 2), F_ARCHEXT },
3917 { "apibkeyhi_el1", CPENC (3, 0, C2, C1, 3), F_ARCHEXT },
3918 { "apdakeylo_el1", CPENC (3, 0, C2, C2, 0), F_ARCHEXT },
3919 { "apdakeyhi_el1", CPENC (3, 0, C2, C2, 1), F_ARCHEXT },
3920 { "apdbkeylo_el1", CPENC (3, 0, C2, C2, 2), F_ARCHEXT },
3921 { "apdbkeyhi_el1", CPENC (3, 0, C2, C2, 3), F_ARCHEXT },
3922 { "apgakeylo_el1", CPENC (3, 0, C2, C3, 0), F_ARCHEXT },
3923 { "apgakeyhi_el1", CPENC (3, 0, C2, C3, 1), F_ARCHEXT },
3924 { "afsr0_el1", CPENC(3,0,C5,C1,0), 0 },
3925 { "afsr1_el1", CPENC(3,0,C5,C1,1), 0 },
3926 { "afsr0_el2", CPENC(3,4,C5,C1,0), 0 },
3927 { "afsr1_el2", CPENC(3,4,C5,C1,1), 0 },
3928 { "afsr0_el3", CPENC(3,6,C5,C1,0), 0 },
3929 { "afsr0_el12", CPENC (3, 5, C5, C1, 0), F_ARCHEXT },
3930 { "afsr1_el3", CPENC(3,6,C5,C1,1), 0 },
3931 { "afsr1_el12", CPENC (3, 5, C5, C1, 1), F_ARCHEXT },
3932 { "esr_el1", CPENC(3,0,C5,C2,0), 0 },
3933 { "esr_el2", CPENC(3,4,C5,C2,0), 0 },
3934 { "esr_el3", CPENC(3,6,C5,C2,0), 0 },
3935 { "esr_el12", CPENC (3, 5, C5, C2, 0), F_ARCHEXT },
3936 { "vsesr_el2", CPENC (3, 4, C5, C2, 3), F_ARCHEXT },
3937 { "fpexc32_el2", CPENC(3,4,C5,C3,0), 0 },
3938 { "erridr_el1", CPENC (3, 0, C5, C3, 0), F_ARCHEXT | F_REG_READ }, /* RO */
3939 { "errselr_el1", CPENC (3, 0, C5, C3, 1), F_ARCHEXT },
3940 { "erxfr_el1", CPENC (3, 0, C5, C4, 0), F_ARCHEXT | F_REG_READ }, /* RO */
3941 { "erxctlr_el1", CPENC (3, 0, C5, C4, 1), F_ARCHEXT },
3942 { "erxstatus_el1", CPENC (3, 0, C5, C4, 2), F_ARCHEXT },
3943 { "erxaddr_el1", CPENC (3, 0, C5, C4, 3), F_ARCHEXT },
3944 { "erxmisc0_el1", CPENC (3, 0, C5, C5, 0), F_ARCHEXT },
3945 { "erxmisc1_el1", CPENC (3, 0, C5, C5, 1), F_ARCHEXT },
3946 { "far_el1", CPENC(3,0,C6,C0,0), 0 },
3947 { "far_el2", CPENC(3,4,C6,C0,0), 0 },
3948 { "far_el3", CPENC(3,6,C6,C0,0), 0 },
3949 { "far_el12", CPENC (3, 5, C6, C0, 0), F_ARCHEXT },
3950 { "hpfar_el2", CPENC(3,4,C6,C0,4), 0 },
3951 { "par_el1", CPENC(3,0,C7,C4,0), 0 },
3952 { "mair_el1", CPENC(3,0,C10,C2,0), 0 },
3953 { "mair_el2", CPENC(3,4,C10,C2,0), 0 },
3954 { "mair_el3", CPENC(3,6,C10,C2,0), 0 },
3955 { "mair_el12", CPENC (3, 5, C10, C2, 0), F_ARCHEXT },
3956 { "amair_el1", CPENC(3,0,C10,C3,0), 0 },
3957 { "amair_el2", CPENC(3,4,C10,C3,0), 0 },
3958 { "amair_el3", CPENC(3,6,C10,C3,0), 0 },
3959 { "amair_el12", CPENC (3, 5, C10, C3, 0), F_ARCHEXT },
3960 { "vbar_el1", CPENC(3,0,C12,C0,0), 0 },
3961 { "vbar_el2", CPENC(3,4,C12,C0,0), 0 },
3962 { "vbar_el3", CPENC(3,6,C12,C0,0), 0 },
3963 { "vbar_el12", CPENC (3, 5, C12, C0, 0), F_ARCHEXT },
3964 { "rvbar_el1", CPENC(3,0,C12,C0,1), F_REG_READ }, /* RO */
3965 { "rvbar_el2", CPENC(3,4,C12,C0,1), F_REG_READ }, /* RO */
3966 { "rvbar_el3", CPENC(3,6,C12,C0,1), F_REG_READ }, /* RO */
3967 { "rmr_el1", CPENC(3,0,C12,C0,2), 0 },
3968 { "rmr_el2", CPENC(3,4,C12,C0,2), 0 },
3969 { "rmr_el3", CPENC(3,6,C12,C0,2), 0 },
3970 { "isr_el1", CPENC(3,0,C12,C1,0), F_REG_READ }, /* RO */
3971 { "disr_el1", CPENC (3, 0, C12, C1, 1), F_ARCHEXT },
3972 { "vdisr_el2", CPENC (3, 4, C12, C1, 1), F_ARCHEXT },
3973 { "contextidr_el1", CPENC(3,0,C13,C0,1), 0 },
3974 { "contextidr_el2", CPENC (3, 4, C13, C0, 1), F_ARCHEXT },
3975 { "contextidr_el12", CPENC (3, 5, C13, C0, 1), F_ARCHEXT },
3976 { "rndr", CPENC(3,3,C2,C4,0), F_ARCHEXT | F_REG_READ }, /* RO */
3977 { "rndrrs", CPENC(3,3,C2,C4,1), F_ARCHEXT | F_REG_READ }, /* RO */
3978 { "tco", CPENC(3,3,C4,C2,7), F_ARCHEXT },
3979 { "tfsre0_el1", CPENC(3,0,C5,C6,1), F_ARCHEXT },
3980 { "tfsr_el1", CPENC(3,0,C5,C6,0), F_ARCHEXT },
3981 { "tfsr_el2", CPENC(3,4,C5,C6,0), F_ARCHEXT },
3982 { "tfsr_el3", CPENC(3,6,C5,C6,0), F_ARCHEXT },
3983 { "tfsr_el12", CPENC(3,5,C5,C6,0), F_ARCHEXT },
3984 { "rgsr_el1", CPENC(3,0,C1,C0,5), F_ARCHEXT },
3985 { "gcr_el1", CPENC(3,0,C1,C0,6), F_ARCHEXT },
3986 { "gmid_el1", CPENC(3,1,C0,C0,4), F_ARCHEXT | F_REG_READ }, /* RO */
3987 { "tpidr_el0", CPENC(3,3,C13,C0,2), 0 },
3988 { "tpidrro_el0", CPENC(3,3,C13,C0,3), 0 }, /* RW */
3989 { "tpidr_el1", CPENC(3,0,C13,C0,4), 0 },
3990 { "tpidr_el2", CPENC(3,4,C13,C0,2), 0 },
3991 { "tpidr_el3", CPENC(3,6,C13,C0,2), 0 },
3992 { "scxtnum_el0", CPENC(3,3,C13,C0,7), F_ARCHEXT },
3993 { "scxtnum_el1", CPENC(3,0,C13,C0,7), F_ARCHEXT },
3994 { "scxtnum_el2", CPENC(3,4,C13,C0,7), F_ARCHEXT },
3995 { "scxtnum_el12", CPENC(3,5,C13,C0,7), F_ARCHEXT },
3996 { "scxtnum_el3", CPENC(3,6,C13,C0,7), F_ARCHEXT },
3997 { "teecr32_el1", CPENC(2,2,C0, C0,0), 0 }, /* See section 3.9.7.1 */
3998 { "cntfrq_el0", CPENC(3,3,C14,C0,0), 0 }, /* RW */
3999 { "cntpct_el0", CPENC(3,3,C14,C0,1), F_REG_READ }, /* RO */
4000 { "cntvct_el0", CPENC(3,3,C14,C0,2), F_REG_READ }, /* RO */
4001 { "cntvoff_el2", CPENC(3,4,C14,C0,3), 0 },
4002 { "cntkctl_el1", CPENC(3,0,C14,C1,0), 0 },
4003 { "cntkctl_el12", CPENC (3, 5, C14, C1, 0), F_ARCHEXT },
4004 { "cnthctl_el2", CPENC(3,4,C14,C1,0), 0 },
4005 { "cntp_tval_el0", CPENC(3,3,C14,C2,0), 0 },
4006 { "cntp_tval_el02", CPENC (3, 5, C14, C2, 0), F_ARCHEXT },
4007 { "cntp_ctl_el0", CPENC(3,3,C14,C2,1), 0 },
4008 { "cntp_ctl_el02", CPENC (3, 5, C14, C2, 1), F_ARCHEXT },
4009 { "cntp_cval_el0", CPENC(3,3,C14,C2,2), 0 },
4010 { "cntp_cval_el02", CPENC (3, 5, C14, C2, 2), F_ARCHEXT },
4011 { "cntv_tval_el0", CPENC(3,3,C14,C3,0), 0 },
4012 { "cntv_tval_el02", CPENC (3, 5, C14, C3, 0), F_ARCHEXT },
4013 { "cntv_ctl_el0", CPENC(3,3,C14,C3,1), 0 },
4014 { "cntv_ctl_el02", CPENC (3, 5, C14, C3, 1), F_ARCHEXT },
4015 { "cntv_cval_el0", CPENC(3,3,C14,C3,2), 0 },
4016 { "cntv_cval_el02", CPENC (3, 5, C14, C3, 2), F_ARCHEXT },
4017 { "cnthp_tval_el2", CPENC(3,4,C14,C2,0), 0 },
4018 { "cnthp_ctl_el2", CPENC(3,4,C14,C2,1), 0 },
4019 { "cnthp_cval_el2", CPENC(3,4,C14,C2,2), 0 },
4020 { "cntps_tval_el1", CPENC(3,7,C14,C2,0), 0 },
4021 { "cntps_ctl_el1", CPENC(3,7,C14,C2,1), 0 },
4022 { "cntps_cval_el1", CPENC(3,7,C14,C2,2), 0 },
4023 { "cnthv_tval_el2", CPENC (3, 4, C14, C3, 0), F_ARCHEXT },
4024 { "cnthv_ctl_el2", CPENC (3, 4, C14, C3, 1), F_ARCHEXT },
4025 { "cnthv_cval_el2", CPENC (3, 4, C14, C3, 2), F_ARCHEXT },
4026 { "dacr32_el2", CPENC(3,4,C3,C0,0), 0 },
4027 { "ifsr32_el2", CPENC(3,4,C5,C0,1), 0 },
4028 { "teehbr32_el1", CPENC(2,2,C1,C0,0), 0 },
4029 { "sder32_el3", CPENC(3,6,C1,C1,1), 0 },
4030 { "mdscr_el1", CPENC(2,0,C0, C2, 2), 0 },
4031 { "mdccsr_el0", CPENC(2,3,C0, C1, 0), F_REG_READ }, /* r */
4032 { "mdccint_el1", CPENC(2,0,C0, C2, 0), 0 },
4033 { "dbgdtr_el0", CPENC(2,3,C0, C4, 0), 0 },
4034 { "dbgdtrrx_el0", CPENC(2,3,C0, C5, 0), F_REG_READ }, /* r */
4035 { "dbgdtrtx_el0", CPENC(2,3,C0, C5, 0), F_REG_WRITE }, /* w */
4036 { "osdtrrx_el1", CPENC(2,0,C0, C0, 2), 0 },
4037 { "osdtrtx_el1", CPENC(2,0,C0, C3, 2), 0 },
4038 { "oseccr_el1", CPENC(2,0,C0, C6, 2), 0 },
4039 { "dbgvcr32_el2", CPENC(2,4,C0, C7, 0), 0 },
4040 { "dbgbvr0_el1", CPENC(2,0,C0, C0, 4), 0 },
4041 { "dbgbvr1_el1", CPENC(2,0,C0, C1, 4), 0 },
4042 { "dbgbvr2_el1", CPENC(2,0,C0, C2, 4), 0 },
4043 { "dbgbvr3_el1", CPENC(2,0,C0, C3, 4), 0 },
4044 { "dbgbvr4_el1", CPENC(2,0,C0, C4, 4), 0 },
4045 { "dbgbvr5_el1", CPENC(2,0,C0, C5, 4), 0 },
4046 { "dbgbvr6_el1", CPENC(2,0,C0, C6, 4), 0 },
4047 { "dbgbvr7_el1", CPENC(2,0,C0, C7, 4), 0 },
4048 { "dbgbvr8_el1", CPENC(2,0,C0, C8, 4), 0 },
4049 { "dbgbvr9_el1", CPENC(2,0,C0, C9, 4), 0 },
4050 { "dbgbvr10_el1", CPENC(2,0,C0, C10,4), 0 },
4051 { "dbgbvr11_el1", CPENC(2,0,C0, C11,4), 0 },
4052 { "dbgbvr12_el1", CPENC(2,0,C0, C12,4), 0 },
4053 { "dbgbvr13_el1", CPENC(2,0,C0, C13,4), 0 },
4054 { "dbgbvr14_el1", CPENC(2,0,C0, C14,4), 0 },
4055 { "dbgbvr15_el1", CPENC(2,0,C0, C15,4), 0 },
4056 { "dbgbcr0_el1", CPENC(2,0,C0, C0, 5), 0 },
4057 { "dbgbcr1_el1", CPENC(2,0,C0, C1, 5), 0 },
4058 { "dbgbcr2_el1", CPENC(2,0,C0, C2, 5), 0 },
4059 { "dbgbcr3_el1", CPENC(2,0,C0, C3, 5), 0 },
4060 { "dbgbcr4_el1", CPENC(2,0,C0, C4, 5), 0 },
4061 { "dbgbcr5_el1", CPENC(2,0,C0, C5, 5), 0 },
4062 { "dbgbcr6_el1", CPENC(2,0,C0, C6, 5), 0 },
4063 { "dbgbcr7_el1", CPENC(2,0,C0, C7, 5), 0 },
4064 { "dbgbcr8_el1", CPENC(2,0,C0, C8, 5), 0 },
4065 { "dbgbcr9_el1", CPENC(2,0,C0, C9, 5), 0 },
4066 { "dbgbcr10_el1", CPENC(2,0,C0, C10,5), 0 },
4067 { "dbgbcr11_el1", CPENC(2,0,C0, C11,5), 0 },
4068 { "dbgbcr12_el1", CPENC(2,0,C0, C12,5), 0 },
4069 { "dbgbcr13_el1", CPENC(2,0,C0, C13,5), 0 },
4070 { "dbgbcr14_el1", CPENC(2,0,C0, C14,5), 0 },
4071 { "dbgbcr15_el1", CPENC(2,0,C0, C15,5), 0 },
4072 { "dbgwvr0_el1", CPENC(2,0,C0, C0, 6), 0 },
4073 { "dbgwvr1_el1", CPENC(2,0,C0, C1, 6), 0 },
4074 { "dbgwvr2_el1", CPENC(2,0,C0, C2, 6), 0 },
4075 { "dbgwvr3_el1", CPENC(2,0,C0, C3, 6), 0 },
4076 { "dbgwvr4_el1", CPENC(2,0,C0, C4, 6), 0 },
4077 { "dbgwvr5_el1", CPENC(2,0,C0, C5, 6), 0 },
4078 { "dbgwvr6_el1", CPENC(2,0,C0, C6, 6), 0 },
4079 { "dbgwvr7_el1", CPENC(2,0,C0, C7, 6), 0 },
4080 { "dbgwvr8_el1", CPENC(2,0,C0, C8, 6), 0 },
4081 { "dbgwvr9_el1", CPENC(2,0,C0, C9, 6), 0 },
4082 { "dbgwvr10_el1", CPENC(2,0,C0, C10,6), 0 },
4083 { "dbgwvr11_el1", CPENC(2,0,C0, C11,6), 0 },
4084 { "dbgwvr12_el1", CPENC(2,0,C0, C12,6), 0 },
4085 { "dbgwvr13_el1", CPENC(2,0,C0, C13,6), 0 },
4086 { "dbgwvr14_el1", CPENC(2,0,C0, C14,6), 0 },
4087 { "dbgwvr15_el1", CPENC(2,0,C0, C15,6), 0 },
4088 { "dbgwcr0_el1", CPENC(2,0,C0, C0, 7), 0 },
4089 { "dbgwcr1_el1", CPENC(2,0,C0, C1, 7), 0 },
4090 { "dbgwcr2_el1", CPENC(2,0,C0, C2, 7), 0 },
4091 { "dbgwcr3_el1", CPENC(2,0,C0, C3, 7), 0 },
4092 { "dbgwcr4_el1", CPENC(2,0,C0, C4, 7), 0 },
4093 { "dbgwcr5_el1", CPENC(2,0,C0, C5, 7), 0 },
4094 { "dbgwcr6_el1", CPENC(2,0,C0, C6, 7), 0 },
4095 { "dbgwcr7_el1", CPENC(2,0,C0, C7, 7), 0 },
4096 { "dbgwcr8_el1", CPENC(2,0,C0, C8, 7), 0 },
4097 { "dbgwcr9_el1", CPENC(2,0,C0, C9, 7), 0 },
4098 { "dbgwcr10_el1", CPENC(2,0,C0, C10,7), 0 },
4099 { "dbgwcr11_el1", CPENC(2,0,C0, C11,7), 0 },
4100 { "dbgwcr12_el1", CPENC(2,0,C0, C12,7), 0 },
4101 { "dbgwcr13_el1", CPENC(2,0,C0, C13,7), 0 },
4102 { "dbgwcr14_el1", CPENC(2,0,C0, C14,7), 0 },
4103 { "dbgwcr15_el1", CPENC(2,0,C0, C15,7), 0 },
4104 { "mdrar_el1", CPENC(2,0,C1, C0, 0), F_REG_READ }, /* r */
4105 { "oslar_el1", CPENC(2,0,C1, C0, 4), F_REG_WRITE }, /* w */
4106 { "oslsr_el1", CPENC(2,0,C1, C1, 4), F_REG_READ }, /* r */
4107 { "osdlr_el1", CPENC(2,0,C1, C3, 4), 0 },
4108 { "dbgprcr_el1", CPENC(2,0,C1, C4, 4), 0 },
4109 { "dbgclaimset_el1", CPENC(2,0,C7, C8, 6), 0 },
4110 { "dbgclaimclr_el1", CPENC(2,0,C7, C9, 6), 0 },
4111 { "dbgauthstatus_el1", CPENC(2,0,C7, C14,6), F_REG_READ }, /* r */
4112 { "pmblimitr_el1", CPENC (3, 0, C9, C10, 0), F_ARCHEXT }, /* rw */
4113 { "pmbptr_el1", CPENC (3, 0, C9, C10, 1), F_ARCHEXT }, /* rw */
4114 { "pmbsr_el1", CPENC (3, 0, C9, C10, 3), F_ARCHEXT }, /* rw */
4115 { "pmbidr_el1", CPENC (3, 0, C9, C10, 7), F_ARCHEXT | F_REG_READ }, /* ro */
4116 { "pmscr_el1", CPENC (3, 0, C9, C9, 0), F_ARCHEXT }, /* rw */
4117 { "pmsicr_el1", CPENC (3, 0, C9, C9, 2), F_ARCHEXT }, /* rw */
4118 { "pmsirr_el1", CPENC (3, 0, C9, C9, 3), F_ARCHEXT }, /* rw */
4119 { "pmsfcr_el1", CPENC (3, 0, C9, C9, 4), F_ARCHEXT }, /* rw */
4120 { "pmsevfr_el1", CPENC (3, 0, C9, C9, 5), F_ARCHEXT }, /* rw */
4121 { "pmslatfr_el1", CPENC (3, 0, C9, C9, 6), F_ARCHEXT }, /* rw */
4122 { "pmsidr_el1", CPENC (3, 0, C9, C9, 7), F_ARCHEXT }, /* rw */
4123 { "pmscr_el2", CPENC (3, 4, C9, C9, 0), F_ARCHEXT }, /* rw */
4124 { "pmscr_el12", CPENC (3, 5, C9, C9, 0), F_ARCHEXT }, /* rw */
4125 { "pmcr_el0", CPENC(3,3,C9,C12, 0), 0 },
4126 { "pmcntenset_el0", CPENC(3,3,C9,C12, 1), 0 },
4127 { "pmcntenclr_el0", CPENC(3,3,C9,C12, 2), 0 },
4128 { "pmovsclr_el0", CPENC(3,3,C9,C12, 3), 0 },
4129 { "pmswinc_el0", CPENC(3,3,C9,C12, 4), F_REG_WRITE }, /* w */
4130 { "pmselr_el0", CPENC(3,3,C9,C12, 5), 0 },
4131 { "pmceid0_el0", CPENC(3,3,C9,C12, 6), F_REG_READ }, /* r */
4132 { "pmceid1_el0", CPENC(3,3,C9,C12, 7), F_REG_READ }, /* r */
4133 { "pmccntr_el0", CPENC(3,3,C9,C13, 0), 0 },
4134 { "pmxevtyper_el0", CPENC(3,3,C9,C13, 1), 0 },
4135 { "pmxevcntr_el0", CPENC(3,3,C9,C13, 2), 0 },
4136 { "pmuserenr_el0", CPENC(3,3,C9,C14, 0), 0 },
4137 { "pmintenset_el1", CPENC(3,0,C9,C14, 1), 0 },
4138 { "pmintenclr_el1", CPENC(3,0,C9,C14, 2), 0 },
4139 { "pmovsset_el0", CPENC(3,3,C9,C14, 3), 0 },
4140 { "pmevcntr0_el0", CPENC(3,3,C14,C8, 0), 0 },
4141 { "pmevcntr1_el0", CPENC(3,3,C14,C8, 1), 0 },
4142 { "pmevcntr2_el0", CPENC(3,3,C14,C8, 2), 0 },
4143 { "pmevcntr3_el0", CPENC(3,3,C14,C8, 3), 0 },
4144 { "pmevcntr4_el0", CPENC(3,3,C14,C8, 4), 0 },
4145 { "pmevcntr5_el0", CPENC(3,3,C14,C8, 5), 0 },
4146 { "pmevcntr6_el0", CPENC(3,3,C14,C8, 6), 0 },
4147 { "pmevcntr7_el0", CPENC(3,3,C14,C8, 7), 0 },
4148 { "pmevcntr8_el0", CPENC(3,3,C14,C9, 0), 0 },
4149 { "pmevcntr9_el0", CPENC(3,3,C14,C9, 1), 0 },
4150 { "pmevcntr10_el0", CPENC(3,3,C14,C9, 2), 0 },
4151 { "pmevcntr11_el0", CPENC(3,3,C14,C9, 3), 0 },
4152 { "pmevcntr12_el0", CPENC(3,3,C14,C9, 4), 0 },
4153 { "pmevcntr13_el0", CPENC(3,3,C14,C9, 5), 0 },
4154 { "pmevcntr14_el0", CPENC(3,3,C14,C9, 6), 0 },
4155 { "pmevcntr15_el0", CPENC(3,3,C14,C9, 7), 0 },
4156 { "pmevcntr16_el0", CPENC(3,3,C14,C10,0), 0 },
4157 { "pmevcntr17_el0", CPENC(3,3,C14,C10,1), 0 },
4158 { "pmevcntr18_el0", CPENC(3,3,C14,C10,2), 0 },
4159 { "pmevcntr19_el0", CPENC(3,3,C14,C10,3), 0 },
4160 { "pmevcntr20_el0", CPENC(3,3,C14,C10,4), 0 },
4161 { "pmevcntr21_el0", CPENC(3,3,C14,C10,5), 0 },
4162 { "pmevcntr22_el0", CPENC(3,3,C14,C10,6), 0 },
4163 { "pmevcntr23_el0", CPENC(3,3,C14,C10,7), 0 },
4164 { "pmevcntr24_el0", CPENC(3,3,C14,C11,0), 0 },
4165 { "pmevcntr25_el0", CPENC(3,3,C14,C11,1), 0 },
4166 { "pmevcntr26_el0", CPENC(3,3,C14,C11,2), 0 },
4167 { "pmevcntr27_el0", CPENC(3,3,C14,C11,3), 0 },
4168 { "pmevcntr28_el0", CPENC(3,3,C14,C11,4), 0 },
4169 { "pmevcntr29_el0", CPENC(3,3,C14,C11,5), 0 },
4170 { "pmevcntr30_el0", CPENC(3,3,C14,C11,6), 0 },
4171 { "pmevtyper0_el0", CPENC(3,3,C14,C12,0), 0 },
4172 { "pmevtyper1_el0", CPENC(3,3,C14,C12,1), 0 },
4173 { "pmevtyper2_el0", CPENC(3,3,C14,C12,2), 0 },
4174 { "pmevtyper3_el0", CPENC(3,3,C14,C12,3), 0 },
4175 { "pmevtyper4_el0", CPENC(3,3,C14,C12,4), 0 },
4176 { "pmevtyper5_el0", CPENC(3,3,C14,C12,5), 0 },
4177 { "pmevtyper6_el0", CPENC(3,3,C14,C12,6), 0 },
4178 { "pmevtyper7_el0", CPENC(3,3,C14,C12,7), 0 },
4179 { "pmevtyper8_el0", CPENC(3,3,C14,C13,0), 0 },
4180 { "pmevtyper9_el0", CPENC(3,3,C14,C13,1), 0 },
4181 { "pmevtyper10_el0", CPENC(3,3,C14,C13,2), 0 },
4182 { "pmevtyper11_el0", CPENC(3,3,C14,C13,3), 0 },
4183 { "pmevtyper12_el0", CPENC(3,3,C14,C13,4), 0 },
4184 { "pmevtyper13_el0", CPENC(3,3,C14,C13,5), 0 },
4185 { "pmevtyper14_el0", CPENC(3,3,C14,C13,6), 0 },
4186 { "pmevtyper15_el0", CPENC(3,3,C14,C13,7), 0 },
4187 { "pmevtyper16_el0", CPENC(3,3,C14,C14,0), 0 },
4188 { "pmevtyper17_el0", CPENC(3,3,C14,C14,1), 0 },
4189 { "pmevtyper18_el0", CPENC(3,3,C14,C14,2), 0 },
4190 { "pmevtyper19_el0", CPENC(3,3,C14,C14,3), 0 },
4191 { "pmevtyper20_el0", CPENC(3,3,C14,C14,4), 0 },
4192 { "pmevtyper21_el0", CPENC(3,3,C14,C14,5), 0 },
4193 { "pmevtyper22_el0", CPENC(3,3,C14,C14,6), 0 },
4194 { "pmevtyper23_el0", CPENC(3,3,C14,C14,7), 0 },
4195 { "pmevtyper24_el0", CPENC(3,3,C14,C15,0), 0 },
4196 { "pmevtyper25_el0", CPENC(3,3,C14,C15,1), 0 },
4197 { "pmevtyper26_el0", CPENC(3,3,C14,C15,2), 0 },
4198 { "pmevtyper27_el0", CPENC(3,3,C14,C15,3), 0 },
4199 { "pmevtyper28_el0", CPENC(3,3,C14,C15,4), 0 },
4200 { "pmevtyper29_el0", CPENC(3,3,C14,C15,5), 0 },
4201 { "pmevtyper30_el0", CPENC(3,3,C14,C15,6), 0 },
4202 { "pmccfiltr_el0", CPENC(3,3,C14,C15,7), 0 },
4203
4204 { "dit", CPEN_ (3, C2, 5), F_ARCHEXT },
4205 { "vstcr_el2", CPENC(3, 4, C2, C6, 2), F_ARCHEXT },
4206 { "vsttbr_el2", CPENC(3, 4, C2, C6, 0), F_ARCHEXT },
4207 { "cnthvs_tval_el2", CPENC(3, 4, C14, C4, 0), F_ARCHEXT },
4208 { "cnthvs_cval_el2", CPENC(3, 4, C14, C4, 2), F_ARCHEXT },
4209 { "cnthvs_ctl_el2", CPENC(3, 4, C14, C4, 1), F_ARCHEXT },
4210 { "cnthps_tval_el2", CPENC(3, 4, C14, C5, 0), F_ARCHEXT },
4211 { "cnthps_cval_el2", CPENC(3, 4, C14, C5, 2), F_ARCHEXT },
4212 { "cnthps_ctl_el2", CPENC(3, 4, C14, C5, 1), F_ARCHEXT },
4213 { "sder32_el2", CPENC(3, 4, C1, C3, 1), F_ARCHEXT },
4214 { "vncr_el2", CPENC(3, 4, C2, C2, 0), F_ARCHEXT },
4215 { 0, CPENC(0,0,0,0,0), 0 },
4216 };
4217
4218 bfd_boolean
4219 aarch64_sys_reg_deprecated_p (const aarch64_sys_reg *reg)
4220 {
4221 return (reg->flags & F_DEPRECATED) != 0;
4222 }
4223
4224 bfd_boolean
4225 aarch64_sys_reg_supported_p (const aarch64_feature_set features,
4226 const aarch64_sys_reg *reg)
4227 {
4228 if (!(reg->flags & F_ARCHEXT))
4229 return TRUE;
4230
4231 /* PAN. Values are from aarch64_sys_regs. */
4232 if (reg->value == CPEN_(0,C2,3)
4233 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_PAN))
4234 return FALSE;
4235
4236 /* SCXTNUM_ELx registers. */
4237 if ((reg->value == CPENC (3, 3, C13, C0, 7)
4238 || reg->value == CPENC (3, 0, C13, C0, 7)
4239 || reg->value == CPENC (3, 4, C13, C0, 7)
4240 || reg->value == CPENC (3, 6, C13, C0, 7)
4241 || reg->value == CPENC (3, 5, C13, C0, 7))
4242 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_SCXTNUM))
4243 return FALSE;
4244
4245 /* ID_PFR2_EL1 register. */
4246 if (reg->value == CPENC(3, 0, C0, C3, 4)
4247 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_ID_PFR2))
4248 return FALSE;
4249
4250 /* SSBS. Values are from aarch64_sys_regs. */
4251 if (reg->value == CPEN_(3,C2,6)
4252 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_SSBS))
4253 return FALSE;
4254
4255 /* Virtualization host extensions: system registers. */
4256 if ((reg->value == CPENC (3, 4, C2, C0, 1)
4257 || reg->value == CPENC (3, 4, C13, C0, 1)
4258 || reg->value == CPENC (3, 4, C14, C3, 0)
4259 || reg->value == CPENC (3, 4, C14, C3, 1)
4260 || reg->value == CPENC (3, 4, C14, C3, 2))
4261 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_1))
4262 return FALSE;
4263
4264 /* Virtualization host extensions: *_el12 names of *_el1 registers. */
4265 if ((reg->value == CPEN_ (5, C0, 0)
4266 || reg->value == CPEN_ (5, C0, 1)
4267 || reg->value == CPENC (3, 5, C1, C0, 0)
4268 || reg->value == CPENC (3, 5, C1, C0, 2)
4269 || reg->value == CPENC (3, 5, C2, C0, 0)
4270 || reg->value == CPENC (3, 5, C2, C0, 1)
4271 || reg->value == CPENC (3, 5, C2, C0, 2)
4272 || reg->value == CPENC (3, 5, C5, C1, 0)
4273 || reg->value == CPENC (3, 5, C5, C1, 1)
4274 || reg->value == CPENC (3, 5, C5, C2, 0)
4275 || reg->value == CPENC (3, 5, C6, C0, 0)
4276 || reg->value == CPENC (3, 5, C10, C2, 0)
4277 || reg->value == CPENC (3, 5, C10, C3, 0)
4278 || reg->value == CPENC (3, 5, C12, C0, 0)
4279 || reg->value == CPENC (3, 5, C13, C0, 1)
4280 || reg->value == CPENC (3, 5, C14, C1, 0))
4281 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_1))
4282 return FALSE;
4283
4284 /* Virtualization host extensions: *_el02 names of *_el0 registers. */
4285 if ((reg->value == CPENC (3, 5, C14, C2, 0)
4286 || reg->value == CPENC (3, 5, C14, C2, 1)
4287 || reg->value == CPENC (3, 5, C14, C2, 2)
4288 || reg->value == CPENC (3, 5, C14, C3, 0)
4289 || reg->value == CPENC (3, 5, C14, C3, 1)
4290 || reg->value == CPENC (3, 5, C14, C3, 2))
4291 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_1))
4292 return FALSE;
4293
4294 /* ARMv8.2 features. */
4295
4296 /* ID_AA64MMFR2_EL1. */
4297 if (reg->value == CPENC (3, 0, C0, C7, 2)
4298 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_2))
4299 return FALSE;
4300
4301 /* PSTATE.UAO. */
4302 if (reg->value == CPEN_ (0, C2, 4)
4303 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_2))
4304 return FALSE;
4305
4306 /* RAS extension. */
4307
4308 /* ERRIDR_EL1, ERRSELR_EL1, ERXFR_EL1, ERXCTLR_EL1, ERXSTATUS_EL, ERXADDR_EL1,
4309 ERXMISC0_EL1 AND ERXMISC1_EL1. */
4310 if ((reg->value == CPENC (3, 0, C5, C3, 0)
4311 || reg->value == CPENC (3, 0, C5, C3, 1)
4312 || reg->value == CPENC (3, 0, C5, C3, 2)
4313 || reg->value == CPENC (3, 0, C5, C3, 3)
4314 || reg->value == CPENC (3, 0, C5, C4, 0)
4315 || reg->value == CPENC (3, 0, C5, C4, 1)
4316 || reg->value == CPENC (3, 0, C5, C4, 2)
4317 || reg->value == CPENC (3, 0, C5, C4, 3)
4318 || reg->value == CPENC (3, 0, C5, C5, 0)
4319 || reg->value == CPENC (3, 0, C5, C5, 1))
4320 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_RAS))
4321 return FALSE;
4322
4323 /* VSESR_EL2, DISR_EL1 and VDISR_EL2. */
4324 if ((reg->value == CPENC (3, 4, C5, C2, 3)
4325 || reg->value == CPENC (3, 0, C12, C1, 1)
4326 || reg->value == CPENC (3, 4, C12, C1, 1))
4327 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_RAS))
4328 return FALSE;
4329
4330 /* Statistical Profiling extension. */
4331 if ((reg->value == CPENC (3, 0, C9, C10, 0)
4332 || reg->value == CPENC (3, 0, C9, C10, 1)
4333 || reg->value == CPENC (3, 0, C9, C10, 3)
4334 || reg->value == CPENC (3, 0, C9, C10, 7)
4335 || reg->value == CPENC (3, 0, C9, C9, 0)
4336 || reg->value == CPENC (3, 0, C9, C9, 2)
4337 || reg->value == CPENC (3, 0, C9, C9, 3)
4338 || reg->value == CPENC (3, 0, C9, C9, 4)
4339 || reg->value == CPENC (3, 0, C9, C9, 5)
4340 || reg->value == CPENC (3, 0, C9, C9, 6)
4341 || reg->value == CPENC (3, 0, C9, C9, 7)
4342 || reg->value == CPENC (3, 4, C9, C9, 0)
4343 || reg->value == CPENC (3, 5, C9, C9, 0))
4344 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_PROFILE))
4345 return FALSE;
4346
4347 /* ARMv8.3 Pointer authentication keys. */
4348 if ((reg->value == CPENC (3, 0, C2, C1, 0)
4349 || reg->value == CPENC (3, 0, C2, C1, 1)
4350 || reg->value == CPENC (3, 0, C2, C1, 2)
4351 || reg->value == CPENC (3, 0, C2, C1, 3)
4352 || reg->value == CPENC (3, 0, C2, C2, 0)
4353 || reg->value == CPENC (3, 0, C2, C2, 1)
4354 || reg->value == CPENC (3, 0, C2, C2, 2)
4355 || reg->value == CPENC (3, 0, C2, C2, 3)
4356 || reg->value == CPENC (3, 0, C2, C3, 0)
4357 || reg->value == CPENC (3, 0, C2, C3, 1))
4358 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_3))
4359 return FALSE;
4360
4361 /* SVE. */
4362 if ((reg->value == CPENC (3, 0, C0, C4, 4)
4363 || reg->value == CPENC (3, 0, C1, C2, 0)
4364 || reg->value == CPENC (3, 4, C1, C2, 0)
4365 || reg->value == CPENC (3, 6, C1, C2, 0)
4366 || reg->value == CPENC (3, 5, C1, C2, 0)
4367 || reg->value == CPENC (3, 0, C0, C0, 7))
4368 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_SVE))
4369 return FALSE;
4370
4371 /* ARMv8.4 features. */
4372
4373 /* PSTATE.DIT. */
4374 if (reg->value == CPEN_ (3, C2, 5)
4375 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_4))
4376 return FALSE;
4377
4378 /* Virtualization extensions. */
4379 if ((reg->value == CPENC(3, 4, C2, C6, 2)
4380 || reg->value == CPENC(3, 4, C2, C6, 0)
4381 || reg->value == CPENC(3, 4, C14, C4, 0)
4382 || reg->value == CPENC(3, 4, C14, C4, 2)
4383 || reg->value == CPENC(3, 4, C14, C4, 1)
4384 || reg->value == CPENC(3, 4, C14, C5, 0)
4385 || reg->value == CPENC(3, 4, C14, C5, 2)
4386 || reg->value == CPENC(3, 4, C14, C5, 1)
4387 || reg->value == CPENC(3, 4, C1, C3, 1)
4388 || reg->value == CPENC(3, 4, C2, C2, 0))
4389 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_4))
4390 return FALSE;
4391
4392 /* ARMv8.4 TLB instructions. */
4393 if ((reg->value == CPENS (0, C8, C1, 0)
4394 || reg->value == CPENS (0, C8, C1, 1)
4395 || reg->value == CPENS (0, C8, C1, 2)
4396 || reg->value == CPENS (0, C8, C1, 3)
4397 || reg->value == CPENS (0, C8, C1, 5)
4398 || reg->value == CPENS (0, C8, C1, 7)
4399 || reg->value == CPENS (4, C8, C4, 0)
4400 || reg->value == CPENS (4, C8, C4, 4)
4401 || reg->value == CPENS (4, C8, C1, 1)
4402 || reg->value == CPENS (4, C8, C1, 5)
4403 || reg->value == CPENS (4, C8, C1, 6)
4404 || reg->value == CPENS (6, C8, C1, 1)
4405 || reg->value == CPENS (6, C8, C1, 5)
4406 || reg->value == CPENS (4, C8, C1, 0)
4407 || reg->value == CPENS (4, C8, C1, 4)
4408 || reg->value == CPENS (6, C8, C1, 0)
4409 || reg->value == CPENS (0, C8, C6, 1)
4410 || reg->value == CPENS (0, C8, C6, 3)
4411 || reg->value == CPENS (0, C8, C6, 5)
4412 || reg->value == CPENS (0, C8, C6, 7)
4413 || reg->value == CPENS (0, C8, C2, 1)
4414 || reg->value == CPENS (0, C8, C2, 3)
4415 || reg->value == CPENS (0, C8, C2, 5)
4416 || reg->value == CPENS (0, C8, C2, 7)
4417 || reg->value == CPENS (0, C8, C5, 1)
4418 || reg->value == CPENS (0, C8, C5, 3)
4419 || reg->value == CPENS (0, C8, C5, 5)
4420 || reg->value == CPENS (0, C8, C5, 7)
4421 || reg->value == CPENS (4, C8, C0, 2)
4422 || reg->value == CPENS (4, C8, C0, 6)
4423 || reg->value == CPENS (4, C8, C4, 2)
4424 || reg->value == CPENS (4, C8, C4, 6)
4425 || reg->value == CPENS (4, C8, C4, 3)
4426 || reg->value == CPENS (4, C8, C4, 7)
4427 || reg->value == CPENS (4, C8, C6, 1)
4428 || reg->value == CPENS (4, C8, C6, 5)
4429 || reg->value == CPENS (4, C8, C2, 1)
4430 || reg->value == CPENS (4, C8, C2, 5)
4431 || reg->value == CPENS (4, C8, C5, 1)
4432 || reg->value == CPENS (4, C8, C5, 5)
4433 || reg->value == CPENS (6, C8, C6, 1)
4434 || reg->value == CPENS (6, C8, C6, 5)
4435 || reg->value == CPENS (6, C8, C2, 1)
4436 || reg->value == CPENS (6, C8, C2, 5)
4437 || reg->value == CPENS (6, C8, C5, 1)
4438 || reg->value == CPENS (6, C8, C5, 5))
4439 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_4))
4440 return FALSE;
4441
4442 /* Random Number Instructions. For now they are available
4443 (and optional) only with ARMv8.5-A. */
4444 if ((reg->value == CPENC (3, 3, C2, C4, 0)
4445 || reg->value == CPENC (3, 3, C2, C4, 1))
4446 && !(AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_RNG)
4447 && AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_5)))
4448 return FALSE;
4449
4450 /* System Registers in ARMv8.5-A with AARCH64_FEATURE_MEMTAG. */
4451 if ((reg->value == CPENC (3, 3, C4, C2, 7)
4452 || reg->value == CPENC (3, 0, C5, C6, 1)
4453 || reg->value == CPENC (3, 0, C5, C6, 0)
4454 || reg->value == CPENC (3, 4, C5, C6, 0)
4455 || reg->value == CPENC (3, 6, C5, C6, 0)
4456 || reg->value == CPENC (3, 5, C5, C6, 0)
4457 || reg->value == CPENC (3, 0, C1, C0, 5)
4458 || reg->value == CPENC (3, 0, C1, C0, 6)
4459 || reg->value == CPENC (3, 1, C0, C0, 4))
4460 && !(AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_MEMTAG)))
4461 return FALSE;
4462
4463 return TRUE;
4464 }
4465
4466 /* The CPENC below is fairly misleading, the fields
4467 here are not in CPENC form. They are in op2op1 form. The fields are encoded
4468 by ins_pstatefield, which just shifts the value by the width of the fields
4469 in a loop. So if you CPENC them only the first value will be set, the rest
4470 are masked out to 0. As an example. op2 = 3, op1=2. CPENC would produce a
4471 value of 0b110000000001000000 (0x30040) while what you want is
4472 0b011010 (0x1a). */
4473 const aarch64_sys_reg aarch64_pstatefields [] =
4474 {
4475 { "spsel", 0x05, 0 },
4476 { "daifset", 0x1e, 0 },
4477 { "daifclr", 0x1f, 0 },
4478 { "pan", 0x04, F_ARCHEXT },
4479 { "uao", 0x03, F_ARCHEXT },
4480 { "ssbs", 0x19, F_ARCHEXT },
4481 { "dit", 0x1a, F_ARCHEXT },
4482 { "tco", 0x1c, F_ARCHEXT },
4483 { 0, CPENC(0,0,0,0,0), 0 },
4484 };
4485
4486 bfd_boolean
4487 aarch64_pstatefield_supported_p (const aarch64_feature_set features,
4488 const aarch64_sys_reg *reg)
4489 {
4490 if (!(reg->flags & F_ARCHEXT))
4491 return TRUE;
4492
4493 /* PAN. Values are from aarch64_pstatefields. */
4494 if (reg->value == 0x04
4495 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_PAN))
4496 return FALSE;
4497
4498 /* UAO. Values are from aarch64_pstatefields. */
4499 if (reg->value == 0x03
4500 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_2))
4501 return FALSE;
4502
4503 /* SSBS. Values are from aarch64_pstatefields. */
4504 if (reg->value == 0x19
4505 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_SSBS))
4506 return FALSE;
4507
4508 /* DIT. Values are from aarch64_pstatefields. */
4509 if (reg->value == 0x1a
4510 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_4))
4511 return FALSE;
4512
4513 /* TCO. Values are from aarch64_pstatefields. */
4514 if (reg->value == 0x1c
4515 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_MEMTAG))
4516 return FALSE;
4517
4518 return TRUE;
4519 }
4520
4521 const aarch64_sys_ins_reg aarch64_sys_regs_ic[] =
4522 {
4523 { "ialluis", CPENS(0,C7,C1,0), 0 },
4524 { "iallu", CPENS(0,C7,C5,0), 0 },
4525 { "ivau", CPENS (3, C7, C5, 1), F_HASXT },
4526 { 0, CPENS(0,0,0,0), 0 }
4527 };
4528
4529 const aarch64_sys_ins_reg aarch64_sys_regs_dc[] =
4530 {
4531 { "zva", CPENS (3, C7, C4, 1), F_HASXT },
4532 { "gva", CPENS (3, C7, C4, 3), F_HASXT | F_ARCHEXT },
4533 { "gzva", CPENS (3, C7, C4, 4), F_HASXT | F_ARCHEXT },
4534 { "ivac", CPENS (0, C7, C6, 1), F_HASXT },
4535 { "igvac", CPENS (0, C7, C6, 3), F_HASXT | F_ARCHEXT },
4536 { "igsw", CPENS (0, C7, C6, 4), F_HASXT | F_ARCHEXT },
4537 { "isw", CPENS (0, C7, C6, 2), F_HASXT },
4538 { "igdvac", CPENS (0, C7, C6, 5), F_HASXT | F_ARCHEXT },
4539 { "igdsw", CPENS (0, C7, C6, 6), F_HASXT | F_ARCHEXT },
4540 { "cvac", CPENS (3, C7, C10, 1), F_HASXT },
4541 { "cgvac", CPENS (3, C7, C10, 3), F_HASXT | F_ARCHEXT },
4542 { "cgdvac", CPENS (3, C7, C10, 5), F_HASXT | F_ARCHEXT },
4543 { "csw", CPENS (0, C7, C10, 2), F_HASXT },
4544 { "cgsw", CPENS (0, C7, C10, 4), F_HASXT | F_ARCHEXT },
4545 { "cgdsw", CPENS (0, C7, C10, 6), F_HASXT | F_ARCHEXT },
4546 { "cvau", CPENS (3, C7, C11, 1), F_HASXT },
4547 { "cvap", CPENS (3, C7, C12, 1), F_HASXT | F_ARCHEXT },
4548 { "cgvap", CPENS (3, C7, C12, 3), F_HASXT | F_ARCHEXT },
4549 { "cgdvap", CPENS (3, C7, C12, 5), F_HASXT | F_ARCHEXT },
4550 { "cvadp", CPENS (3, C7, C13, 1), F_HASXT | F_ARCHEXT },
4551 { "cgvadp", CPENS (3, C7, C13, 3), F_HASXT | F_ARCHEXT },
4552 { "cgdvadp", CPENS (3, C7, C13, 5), F_HASXT | F_ARCHEXT },
4553 { "civac", CPENS (3, C7, C14, 1), F_HASXT },
4554 { "cigvac", CPENS (3, C7, C14, 3), F_HASXT | F_ARCHEXT },
4555 { "cigdvac", CPENS (3, C7, C14, 5), F_HASXT | F_ARCHEXT },
4556 { "cisw", CPENS (0, C7, C14, 2), F_HASXT },
4557 { "cigsw", CPENS (0, C7, C14, 4), F_HASXT | F_ARCHEXT },
4558 { "cigdsw", CPENS (0, C7, C14, 6), F_HASXT | F_ARCHEXT },
4559 { 0, CPENS(0,0,0,0), 0 }
4560 };
4561
4562 const aarch64_sys_ins_reg aarch64_sys_regs_at[] =
4563 {
4564 { "s1e1r", CPENS (0, C7, C8, 0), F_HASXT },
4565 { "s1e1w", CPENS (0, C7, C8, 1), F_HASXT },
4566 { "s1e0r", CPENS (0, C7, C8, 2), F_HASXT },
4567 { "s1e0w", CPENS (0, C7, C8, 3), F_HASXT },
4568 { "s12e1r", CPENS (4, C7, C8, 4), F_HASXT },
4569 { "s12e1w", CPENS (4, C7, C8, 5), F_HASXT },
4570 { "s12e0r", CPENS (4, C7, C8, 6), F_HASXT },
4571 { "s12e0w", CPENS (4, C7, C8, 7), F_HASXT },
4572 { "s1e2r", CPENS (4, C7, C8, 0), F_HASXT },
4573 { "s1e2w", CPENS (4, C7, C8, 1), F_HASXT },
4574 { "s1e3r", CPENS (6, C7, C8, 0), F_HASXT },
4575 { "s1e3w", CPENS (6, C7, C8, 1), F_HASXT },
4576 { "s1e1rp", CPENS (0, C7, C9, 0), F_HASXT | F_ARCHEXT },
4577 { "s1e1wp", CPENS (0, C7, C9, 1), F_HASXT | F_ARCHEXT },
4578 { 0, CPENS(0,0,0,0), 0 }
4579 };
4580
4581 const aarch64_sys_ins_reg aarch64_sys_regs_tlbi[] =
4582 {
4583 { "vmalle1", CPENS(0,C8,C7,0), 0 },
4584 { "vae1", CPENS (0, C8, C7, 1), F_HASXT },
4585 { "aside1", CPENS (0, C8, C7, 2), F_HASXT },
4586 { "vaae1", CPENS (0, C8, C7, 3), F_HASXT },
4587 { "vmalle1is", CPENS(0,C8,C3,0), 0 },
4588 { "vae1is", CPENS (0, C8, C3, 1), F_HASXT },
4589 { "aside1is", CPENS (0, C8, C3, 2), F_HASXT },
4590 { "vaae1is", CPENS (0, C8, C3, 3), F_HASXT },
4591 { "ipas2e1is", CPENS (4, C8, C0, 1), F_HASXT },
4592 { "ipas2le1is",CPENS (4, C8, C0, 5), F_HASXT },
4593 { "ipas2e1", CPENS (4, C8, C4, 1), F_HASXT },
4594 { "ipas2le1", CPENS (4, C8, C4, 5), F_HASXT },
4595 { "vae2", CPENS (4, C8, C7, 1), F_HASXT },
4596 { "vae2is", CPENS (4, C8, C3, 1), F_HASXT },
4597 { "vmalls12e1",CPENS(4,C8,C7,6), 0 },
4598 { "vmalls12e1is",CPENS(4,C8,C3,6), 0 },
4599 { "vae3", CPENS (6, C8, C7, 1), F_HASXT },
4600 { "vae3is", CPENS (6, C8, C3, 1), F_HASXT },
4601 { "alle2", CPENS(4,C8,C7,0), 0 },
4602 { "alle2is", CPENS(4,C8,C3,0), 0 },
4603 { "alle1", CPENS(4,C8,C7,4), 0 },
4604 { "alle1is", CPENS(4,C8,C3,4), 0 },
4605 { "alle3", CPENS(6,C8,C7,0), 0 },
4606 { "alle3is", CPENS(6,C8,C3,0), 0 },
4607 { "vale1is", CPENS (0, C8, C3, 5), F_HASXT },
4608 { "vale2is", CPENS (4, C8, C3, 5), F_HASXT },
4609 { "vale3is", CPENS (6, C8, C3, 5), F_HASXT },
4610 { "vaale1is", CPENS (0, C8, C3, 7), F_HASXT },
4611 { "vale1", CPENS (0, C8, C7, 5), F_HASXT },
4612 { "vale2", CPENS (4, C8, C7, 5), F_HASXT },
4613 { "vale3", CPENS (6, C8, C7, 5), F_HASXT },
4614 { "vaale1", CPENS (0, C8, C7, 7), F_HASXT },
4615
4616 { "vmalle1os", CPENS (0, C8, C1, 0), F_ARCHEXT },
4617 { "vae1os", CPENS (0, C8, C1, 1), F_HASXT | F_ARCHEXT },
4618 { "aside1os", CPENS (0, C8, C1, 2), F_HASXT | F_ARCHEXT },
4619 { "vaae1os", CPENS (0, C8, C1, 3), F_HASXT | F_ARCHEXT },
4620 { "vale1os", CPENS (0, C8, C1, 5), F_HASXT | F_ARCHEXT },
4621 { "vaale1os", CPENS (0, C8, C1, 7), F_HASXT | F_ARCHEXT },
4622 { "ipas2e1os", CPENS (4, C8, C4, 0), F_HASXT | F_ARCHEXT },
4623 { "ipas2le1os", CPENS (4, C8, C4, 4), F_HASXT | F_ARCHEXT },
4624 { "vae2os", CPENS (4, C8, C1, 1), F_HASXT | F_ARCHEXT },
4625 { "vale2os", CPENS (4, C8, C1, 5), F_HASXT | F_ARCHEXT },
4626 { "vmalls12e1os", CPENS (4, C8, C1, 6), F_ARCHEXT },
4627 { "vae3os", CPENS (6, C8, C1, 1), F_HASXT | F_ARCHEXT },
4628 { "vale3os", CPENS (6, C8, C1, 5), F_HASXT | F_ARCHEXT },
4629 { "alle2os", CPENS (4, C8, C1, 0), F_ARCHEXT },
4630 { "alle1os", CPENS (4, C8, C1, 4), F_ARCHEXT },
4631 { "alle3os", CPENS (6, C8, C1, 0), F_ARCHEXT },
4632
4633 { "rvae1", CPENS (0, C8, C6, 1), F_HASXT | F_ARCHEXT },
4634 { "rvaae1", CPENS (0, C8, C6, 3), F_HASXT | F_ARCHEXT },
4635 { "rvale1", CPENS (0, C8, C6, 5), F_HASXT | F_ARCHEXT },
4636 { "rvaale1", CPENS (0, C8, C6, 7), F_HASXT | F_ARCHEXT },
4637 { "rvae1is", CPENS (0, C8, C2, 1), F_HASXT | F_ARCHEXT },
4638 { "rvaae1is", CPENS (0, C8, C2, 3), F_HASXT | F_ARCHEXT },
4639 { "rvale1is", CPENS (0, C8, C2, 5), F_HASXT | F_ARCHEXT },
4640 { "rvaale1is", CPENS (0, C8, C2, 7), F_HASXT | F_ARCHEXT },
4641 { "rvae1os", CPENS (0, C8, C5, 1), F_HASXT | F_ARCHEXT },
4642 { "rvaae1os", CPENS (0, C8, C5, 3), F_HASXT | F_ARCHEXT },
4643 { "rvale1os", CPENS (0, C8, C5, 5), F_HASXT | F_ARCHEXT },
4644 { "rvaale1os", CPENS (0, C8, C5, 7), F_HASXT | F_ARCHEXT },
4645 { "ripas2e1is", CPENS (4, C8, C0, 2), F_HASXT | F_ARCHEXT },
4646 { "ripas2le1is",CPENS (4, C8, C0, 6), F_HASXT | F_ARCHEXT },
4647 { "ripas2e1", CPENS (4, C8, C4, 2), F_HASXT | F_ARCHEXT },
4648 { "ripas2le1", CPENS (4, C8, C4, 6), F_HASXT | F_ARCHEXT },
4649 { "ripas2e1os", CPENS (4, C8, C4, 3), F_HASXT | F_ARCHEXT },
4650 { "ripas2le1os",CPENS (4, C8, C4, 7), F_HASXT | F_ARCHEXT },
4651 { "rvae2", CPENS (4, C8, C6, 1), F_HASXT | F_ARCHEXT },
4652 { "rvale2", CPENS (4, C8, C6, 5), F_HASXT | F_ARCHEXT },
4653 { "rvae2is", CPENS (4, C8, C2, 1), F_HASXT | F_ARCHEXT },
4654 { "rvale2is", CPENS (4, C8, C2, 5), F_HASXT | F_ARCHEXT },
4655 { "rvae2os", CPENS (4, C8, C5, 1), F_HASXT | F_ARCHEXT },
4656 { "rvale2os", CPENS (4, C8, C5, 5), F_HASXT | F_ARCHEXT },
4657 { "rvae3", CPENS (6, C8, C6, 1), F_HASXT | F_ARCHEXT },
4658 { "rvale3", CPENS (6, C8, C6, 5), F_HASXT | F_ARCHEXT },
4659 { "rvae3is", CPENS (6, C8, C2, 1), F_HASXT | F_ARCHEXT },
4660 { "rvale3is", CPENS (6, C8, C2, 5), F_HASXT | F_ARCHEXT },
4661 { "rvae3os", CPENS (6, C8, C5, 1), F_HASXT | F_ARCHEXT },
4662 { "rvale3os", CPENS (6, C8, C5, 5), F_HASXT | F_ARCHEXT },
4663
4664 { 0, CPENS(0,0,0,0), 0 }
4665 };
4666
4667 const aarch64_sys_ins_reg aarch64_sys_regs_sr[] =
4668 {
4669 /* RCTX is somewhat unique in a way that it has different values
4670 (op2) based on the instruction in which it is used (cfp/dvp/cpp).
4671 Thus op2 is masked out and instead encoded directly in the
4672 aarch64_opcode_table entries for the respective instructions. */
4673 { "rctx", CPENS(3,C7,C3,0), F_HASXT | F_ARCHEXT | F_REG_WRITE}, /* WO */
4674
4675 { 0, CPENS(0,0,0,0), 0 }
4676 };
4677
4678 bfd_boolean
4679 aarch64_sys_ins_reg_has_xt (const aarch64_sys_ins_reg *sys_ins_reg)
4680 {
4681 return (sys_ins_reg->flags & F_HASXT) != 0;
4682 }
4683
4684 extern bfd_boolean
4685 aarch64_sys_ins_reg_supported_p (const aarch64_feature_set features,
4686 const aarch64_sys_ins_reg *reg)
4687 {
4688 if (!(reg->flags & F_ARCHEXT))
4689 return TRUE;
4690
4691 /* DC CVAP. Values are from aarch64_sys_regs_dc. */
4692 if (reg->value == CPENS (3, C7, C12, 1)
4693 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_2))
4694 return FALSE;
4695
4696 /* DC CVADP. Values are from aarch64_sys_regs_dc. */
4697 if (reg->value == CPENS (3, C7, C13, 1)
4698 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_CVADP))
4699 return FALSE;
4700
4701 /* DC <dc_op> for ARMv8.5-A Memory Tagging Extension. */
4702 if ((reg->value == CPENS (0, C7, C6, 3)
4703 || reg->value == CPENS (0, C7, C6, 4)
4704 || reg->value == CPENS (0, C7, C10, 4)
4705 || reg->value == CPENS (0, C7, C14, 4)
4706 || reg->value == CPENS (3, C7, C10, 3)
4707 || reg->value == CPENS (3, C7, C12, 3)
4708 || reg->value == CPENS (3, C7, C13, 3)
4709 || reg->value == CPENS (3, C7, C14, 3)
4710 || reg->value == CPENS (3, C7, C4, 3)
4711 || reg->value == CPENS (0, C7, C6, 5)
4712 || reg->value == CPENS (0, C7, C6, 6)
4713 || reg->value == CPENS (0, C7, C10, 6)
4714 || reg->value == CPENS (0, C7, C14, 6)
4715 || reg->value == CPENS (3, C7, C10, 5)
4716 || reg->value == CPENS (3, C7, C12, 5)
4717 || reg->value == CPENS (3, C7, C13, 5)
4718 || reg->value == CPENS (3, C7, C14, 5)
4719 || reg->value == CPENS (3, C7, C4, 4))
4720 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_MEMTAG))
4721 return FALSE;
4722
4723 /* AT S1E1RP, AT S1E1WP. Values are from aarch64_sys_regs_at. */
4724 if ((reg->value == CPENS (0, C7, C9, 0)
4725 || reg->value == CPENS (0, C7, C9, 1))
4726 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_V8_2))
4727 return FALSE;
4728
4729 /* CFP/DVP/CPP RCTX : Value are from aarch64_sys_regs_sr. */
4730 if (reg->value == CPENS (3, C7, C3, 0)
4731 && !AARCH64_CPU_HAS_FEATURE (features, AARCH64_FEATURE_PREDRES))
4732 return FALSE;
4733
4734 return TRUE;
4735 }
4736
4737 #undef C0
4738 #undef C1
4739 #undef C2
4740 #undef C3
4741 #undef C4
4742 #undef C5
4743 #undef C6
4744 #undef C7
4745 #undef C8
4746 #undef C9
4747 #undef C10
4748 #undef C11
4749 #undef C12
4750 #undef C13
4751 #undef C14
4752 #undef C15
4753
4754 #define BIT(INSN,BT) (((INSN) >> (BT)) & 1)
4755 #define BITS(INSN,HI,LO) (((INSN) >> (LO)) & ((1 << (((HI) - (LO)) + 1)) - 1))
4756
4757 static enum err_type
4758 verify_ldpsw (const struct aarch64_inst *inst ATTRIBUTE_UNUSED,
4759 const aarch64_insn insn, bfd_vma pc ATTRIBUTE_UNUSED,
4760 bfd_boolean encoding ATTRIBUTE_UNUSED,
4761 aarch64_operand_error *mismatch_detail ATTRIBUTE_UNUSED,
4762 aarch64_instr_sequence *insn_sequence ATTRIBUTE_UNUSED)
4763 {
4764 int t = BITS (insn, 4, 0);
4765 int n = BITS (insn, 9, 5);
4766 int t2 = BITS (insn, 14, 10);
4767
4768 if (BIT (insn, 23))
4769 {
4770 /* Write back enabled. */
4771 if ((t == n || t2 == n) && n != 31)
4772 return ERR_UND;
4773 }
4774
4775 if (BIT (insn, 22))
4776 {
4777 /* Load */
4778 if (t == t2)
4779 return ERR_UND;
4780 }
4781
4782 return ERR_OK;
4783 }
4784
4785 /* Verifier for vector by element 3 operands functions where the
4786 conditions `if sz:L == 11 then UNDEFINED` holds. */
4787
4788 static enum err_type
4789 verify_elem_sd (const struct aarch64_inst *inst, const aarch64_insn insn,
4790 bfd_vma pc ATTRIBUTE_UNUSED, bfd_boolean encoding,
4791 aarch64_operand_error *mismatch_detail ATTRIBUTE_UNUSED,
4792 aarch64_instr_sequence *insn_sequence ATTRIBUTE_UNUSED)
4793 {
4794 const aarch64_insn undef_pattern = 0x3;
4795 aarch64_insn value;
4796
4797 assert (inst->opcode);
4798 assert (inst->opcode->operands[2] == AARCH64_OPND_Em);
4799 value = encoding ? inst->value : insn;
4800 assert (value);
4801
4802 if (undef_pattern == extract_fields (value, 0, 2, FLD_sz, FLD_L))
4803 return ERR_UND;
4804
4805 return ERR_OK;
4806 }
4807
4808 /* Initialize an instruction sequence insn_sequence with the instruction INST.
4809 If INST is NULL the given insn_sequence is cleared and the sequence is left
4810 uninitialized. */
4811
4812 void
4813 init_insn_sequence (const struct aarch64_inst *inst,
4814 aarch64_instr_sequence *insn_sequence)
4815 {
4816 int num_req_entries = 0;
4817 insn_sequence->next_insn = 0;
4818 insn_sequence->num_insns = num_req_entries;
4819 if (insn_sequence->instr)
4820 XDELETE (insn_sequence->instr);
4821 insn_sequence->instr = NULL;
4822
4823 if (inst)
4824 {
4825 insn_sequence->instr = XNEW (aarch64_inst);
4826 memcpy (insn_sequence->instr, inst, sizeof (aarch64_inst));
4827 }
4828
4829 /* Handle all the cases here. May need to think of something smarter than
4830 a giant if/else chain if this grows. At that time, a lookup table may be
4831 best. */
4832 if (inst && inst->opcode->constraints & C_SCAN_MOVPRFX)
4833 num_req_entries = 1;
4834
4835 if (insn_sequence->current_insns)
4836 XDELETEVEC (insn_sequence->current_insns);
4837 insn_sequence->current_insns = NULL;
4838
4839 if (num_req_entries != 0)
4840 {
4841 size_t size = num_req_entries * sizeof (aarch64_inst);
4842 insn_sequence->current_insns
4843 = (aarch64_inst**) XNEWVEC (aarch64_inst, num_req_entries);
4844 memset (insn_sequence->current_insns, 0, size);
4845 }
4846 }
4847
4848
4849 /* This function verifies that the instruction INST adheres to its specified
4850 constraints. If it does then ERR_OK is returned, if not then ERR_VFI is
4851 returned and MISMATCH_DETAIL contains the reason why verification failed.
4852
4853 The function is called both during assembly and disassembly. If assembling
4854 then ENCODING will be TRUE, else FALSE. If dissassembling PC will be set
4855 and will contain the PC of the current instruction w.r.t to the section.
4856
4857 If ENCODING and PC=0 then you are at a start of a section. The constraints
4858 are verified against the given state insn_sequence which is updated as it
4859 transitions through the verification. */
4860
4861 enum err_type
4862 verify_constraints (const struct aarch64_inst *inst,
4863 const aarch64_insn insn ATTRIBUTE_UNUSED,
4864 bfd_vma pc,
4865 bfd_boolean encoding,
4866 aarch64_operand_error *mismatch_detail,
4867 aarch64_instr_sequence *insn_sequence)
4868 {
4869 assert (inst);
4870 assert (inst->opcode);
4871
4872 const struct aarch64_opcode *opcode = inst->opcode;
4873 if (!opcode->constraints && !insn_sequence->instr)
4874 return ERR_OK;
4875
4876 assert (insn_sequence);
4877
4878 enum err_type res = ERR_OK;
4879
4880 /* This instruction puts a constraint on the insn_sequence. */
4881 if (opcode->flags & F_SCAN)
4882 {
4883 if (insn_sequence->instr)
4884 {
4885 mismatch_detail->kind = AARCH64_OPDE_SYNTAX_ERROR;
4886 mismatch_detail->error = _("instruction opens new dependency "
4887 "sequence without ending previous one");
4888 mismatch_detail->index = -1;
4889 mismatch_detail->non_fatal = TRUE;
4890 res = ERR_VFI;
4891 }
4892
4893 init_insn_sequence (inst, insn_sequence);
4894 return res;
4895 }
4896
4897 /* Verify constraints on an existing sequence. */
4898 if (insn_sequence->instr)
4899 {
4900 const struct aarch64_opcode* inst_opcode = insn_sequence->instr->opcode;
4901 /* If we're decoding and we hit PC=0 with an open sequence then we haven't
4902 closed a previous one that we should have. */
4903 if (!encoding && pc == 0)
4904 {
4905 mismatch_detail->kind = AARCH64_OPDE_SYNTAX_ERROR;
4906 mismatch_detail->error = _("previous `movprfx' sequence not closed");
4907 mismatch_detail->index = -1;
4908 mismatch_detail->non_fatal = TRUE;
4909 res = ERR_VFI;
4910 /* Reset the sequence. */
4911 init_insn_sequence (NULL, insn_sequence);
4912 return res;
4913 }
4914
4915 /* Validate C_SCAN_MOVPRFX constraints. Move this to a lookup table. */
4916 if (inst_opcode->constraints & C_SCAN_MOVPRFX)
4917 {
4918 /* Check to see if the MOVPRFX SVE instruction is followed by an SVE
4919 instruction for better error messages. */
4920 if (!opcode->avariant
4921 || !(*opcode->avariant &
4922 (AARCH64_FEATURE_SVE | AARCH64_FEATURE_SVE2)))
4923 {
4924 mismatch_detail->kind = AARCH64_OPDE_SYNTAX_ERROR;
4925 mismatch_detail->error = _("SVE instruction expected after "
4926 "`movprfx'");
4927 mismatch_detail->index = -1;
4928 mismatch_detail->non_fatal = TRUE;
4929 res = ERR_VFI;
4930 goto done;
4931 }
4932
4933 /* Check to see if the MOVPRFX SVE instruction is followed by an SVE
4934 instruction that is allowed to be used with a MOVPRFX. */
4935 if (!(opcode->constraints & C_SCAN_MOVPRFX))
4936 {
4937 mismatch_detail->kind = AARCH64_OPDE_SYNTAX_ERROR;
4938 mismatch_detail->error = _("SVE `movprfx' compatible instruction "
4939 "expected");
4940 mismatch_detail->index = -1;
4941 mismatch_detail->non_fatal = TRUE;
4942 res = ERR_VFI;
4943 goto done;
4944 }
4945
4946 /* Next check for usage of the predicate register. */
4947 aarch64_opnd_info blk_dest = insn_sequence->instr->operands[0];
4948 aarch64_opnd_info blk_pred, inst_pred;
4949 memset (&blk_pred, 0, sizeof (aarch64_opnd_info));
4950 memset (&inst_pred, 0, sizeof (aarch64_opnd_info));
4951 bfd_boolean predicated = FALSE;
4952 assert (blk_dest.type == AARCH64_OPND_SVE_Zd);
4953
4954 /* Determine if the movprfx instruction used is predicated or not. */
4955 if (insn_sequence->instr->operands[1].type == AARCH64_OPND_SVE_Pg3)
4956 {
4957 predicated = TRUE;
4958 blk_pred = insn_sequence->instr->operands[1];
4959 }
4960
4961 unsigned char max_elem_size = 0;
4962 unsigned char current_elem_size;
4963 int num_op_used = 0, last_op_usage = 0;
4964 int i, inst_pred_idx = -1;
4965 int num_ops = aarch64_num_of_operands (opcode);
4966 for (i = 0; i < num_ops; i++)
4967 {
4968 aarch64_opnd_info inst_op = inst->operands[i];
4969 switch (inst_op.type)
4970 {
4971 case AARCH64_OPND_SVE_Zd:
4972 case AARCH64_OPND_SVE_Zm_5:
4973 case AARCH64_OPND_SVE_Zm_16:
4974 case AARCH64_OPND_SVE_Zn:
4975 case AARCH64_OPND_SVE_Zt:
4976 case AARCH64_OPND_SVE_Vm:
4977 case AARCH64_OPND_SVE_Vn:
4978 case AARCH64_OPND_Va:
4979 case AARCH64_OPND_Vn:
4980 case AARCH64_OPND_Vm:
4981 case AARCH64_OPND_Sn:
4982 case AARCH64_OPND_Sm:
4983 if (inst_op.reg.regno == blk_dest.reg.regno)
4984 {
4985 num_op_used++;
4986 last_op_usage = i;
4987 }
4988 current_elem_size
4989 = aarch64_get_qualifier_esize (inst_op.qualifier);
4990 if (current_elem_size > max_elem_size)
4991 max_elem_size = current_elem_size;
4992 break;
4993 case AARCH64_OPND_SVE_Pd:
4994 case AARCH64_OPND_SVE_Pg3:
4995 case AARCH64_OPND_SVE_Pg4_5:
4996 case AARCH64_OPND_SVE_Pg4_10:
4997 case AARCH64_OPND_SVE_Pg4_16:
4998 case AARCH64_OPND_SVE_Pm:
4999 case AARCH64_OPND_SVE_Pn:
5000 case AARCH64_OPND_SVE_Pt:
5001 inst_pred = inst_op;
5002 inst_pred_idx = i;
5003 break;
5004 default:
5005 break;
5006 }
5007 }
5008
5009 assert (max_elem_size != 0);
5010 aarch64_opnd_info inst_dest = inst->operands[0];
5011 /* Determine the size that should be used to compare against the
5012 movprfx size. */
5013 current_elem_size
5014 = opcode->constraints & C_MAX_ELEM
5015 ? max_elem_size
5016 : aarch64_get_qualifier_esize (inst_dest.qualifier);
5017
5018 /* If movprfx is predicated do some extra checks. */
5019 if (predicated)
5020 {
5021 /* The instruction must be predicated. */
5022 if (inst_pred_idx < 0)
5023 {
5024 mismatch_detail->kind = AARCH64_OPDE_SYNTAX_ERROR;
5025 mismatch_detail->error = _("predicated instruction expected "
5026 "after `movprfx'");
5027 mismatch_detail->index = -1;
5028 mismatch_detail->non_fatal = TRUE;
5029 res = ERR_VFI;
5030 goto done;
5031 }
5032
5033 /* The instruction must have a merging predicate. */
5034 if (inst_pred.qualifier != AARCH64_OPND_QLF_P_M)
5035 {
5036 mismatch_detail->kind = AARCH64_OPDE_SYNTAX_ERROR;
5037 mismatch_detail->error = _("merging predicate expected due "
5038 "to preceding `movprfx'");
5039 mismatch_detail->index = inst_pred_idx;
5040 mismatch_detail->non_fatal = TRUE;
5041 res = ERR_VFI;
5042 goto done;
5043 }
5044
5045 /* The same register must be used in instruction. */
5046 if (blk_pred.reg.regno != inst_pred.reg.regno)
5047 {
5048 mismatch_detail->kind = AARCH64_OPDE_SYNTAX_ERROR;
5049 mismatch_detail->error = _("predicate register differs "
5050 "from that in preceding "
5051 "`movprfx'");
5052 mismatch_detail->index = inst_pred_idx;
5053 mismatch_detail->non_fatal = TRUE;
5054 res = ERR_VFI;
5055 goto done;
5056 }
5057 }
5058
5059 /* Destructive operations by definition must allow one usage of the
5060 same register. */
5061 int allowed_usage
5062 = aarch64_is_destructive_by_operands (opcode) ? 2 : 1;
5063
5064 /* Operand is not used at all. */
5065 if (num_op_used == 0)
5066 {
5067 mismatch_detail->kind = AARCH64_OPDE_SYNTAX_ERROR;
5068 mismatch_detail->error = _("output register of preceding "
5069 "`movprfx' not used in current "
5070 "instruction");
5071 mismatch_detail->index = 0;
5072 mismatch_detail->non_fatal = TRUE;
5073 res = ERR_VFI;
5074 goto done;
5075 }
5076
5077 /* We now know it's used, now determine exactly where it's used. */
5078 if (blk_dest.reg.regno != inst_dest.reg.regno)
5079 {
5080 mismatch_detail->kind = AARCH64_OPDE_SYNTAX_ERROR;
5081 mismatch_detail->error = _("output register of preceding "
5082 "`movprfx' expected as output");
5083 mismatch_detail->index = 0;
5084 mismatch_detail->non_fatal = TRUE;
5085 res = ERR_VFI;
5086 goto done;
5087 }
5088
5089 /* Operand used more than allowed for the specific opcode type. */
5090 if (num_op_used > allowed_usage)
5091 {
5092 mismatch_detail->kind = AARCH64_OPDE_SYNTAX_ERROR;
5093 mismatch_detail->error = _("output register of preceding "
5094 "`movprfx' used as input");
5095 mismatch_detail->index = last_op_usage;
5096 mismatch_detail->non_fatal = TRUE;
5097 res = ERR_VFI;
5098 goto done;
5099 }
5100
5101 /* Now the only thing left is the qualifiers checks. The register
5102 must have the same maximum element size. */
5103 if (inst_dest.qualifier
5104 && blk_dest.qualifier
5105 && current_elem_size
5106 != aarch64_get_qualifier_esize (blk_dest.qualifier))
5107 {
5108 mismatch_detail->kind = AARCH64_OPDE_SYNTAX_ERROR;
5109 mismatch_detail->error = _("register size not compatible with "
5110 "previous `movprfx'");
5111 mismatch_detail->index = 0;
5112 mismatch_detail->non_fatal = TRUE;
5113 res = ERR_VFI;
5114 goto done;
5115 }
5116 }
5117
5118 done:
5119 /* Add the new instruction to the sequence. */
5120 memcpy (insn_sequence->current_insns + insn_sequence->next_insn++,
5121 inst, sizeof (aarch64_inst));
5122
5123 /* Check if sequence is now full. */
5124 if (insn_sequence->next_insn >= insn_sequence->num_insns)
5125 {
5126 /* Sequence is full, but we don't have anything special to do for now,
5127 so clear and reset it. */
5128 init_insn_sequence (NULL, insn_sequence);
5129 }
5130 }
5131
5132 return res;
5133 }
5134
5135
5136 /* Return true if VALUE cannot be moved into an SVE register using DUP
5137 (with any element size, not just ESIZE) and if using DUPM would
5138 therefore be OK. ESIZE is the number of bytes in the immediate. */
5139
5140 bfd_boolean
5141 aarch64_sve_dupm_mov_immediate_p (uint64_t uvalue, int esize)
5142 {
5143 int64_t svalue = uvalue;
5144 uint64_t upper = (uint64_t) -1 << (esize * 4) << (esize * 4);
5145
5146 if ((uvalue & ~upper) != uvalue && (uvalue | upper) != uvalue)
5147 return FALSE;
5148 if (esize <= 4 || (uint32_t) uvalue == (uint32_t) (uvalue >> 32))
5149 {
5150 svalue = (int32_t) uvalue;
5151 if (esize <= 2 || (uint16_t) uvalue == (uint16_t) (uvalue >> 16))
5152 {
5153 svalue = (int16_t) uvalue;
5154 if (esize == 1 || (uint8_t) uvalue == (uint8_t) (uvalue >> 8))
5155 return FALSE;
5156 }
5157 }
5158 if ((svalue & 0xff) == 0)
5159 svalue /= 256;
5160 return svalue < -128 || svalue >= 128;
5161 }
5162
5163 /* Include the opcode description table as well as the operand description
5164 table. */
5165 #define VERIFIER(x) verify_##x
5166 #include "aarch64-tbl.h"
GDB Binutils - Deliverables
This page took 0.228927 seconds and 4 git commands to generate.