1 /* RISC-V-specific support for ELF.
2 Copyright (C) 2011-2020 Free Software Foundation, Inc.
4 Contributed by Andrew Waterman (andrew@sifive.com).
5 Based on TILE-Gx and MIPS targets.
7 This file is part of BFD, the Binary File Descriptor library.
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program; see the file COPYING3. If not,
21 see <http://www.gnu.org/licenses/>. */
27 #include "elf/riscv.h"
28 #include "libiberty.h"
29 #include "elfxx-riscv.h"
30 #include "safe-ctype.h"
32 #define MINUS_ONE ((bfd_vma)0 - 1)
34 /* Special handler for ADD/SUB relocations that allows them to be filled out
35 both in the pre-linked and post-linked file. This is necessary to make
36 pre-linked debug info work, as due to linker relaxations we need to emit
37 relocations for the debug info. */
38 static bfd_reloc_status_type riscv_elf_add_sub_reloc
39 (bfd
*, arelent
*, asymbol
*, void *, asection
*, bfd
*, char **);
41 /* The relocation table used for SHT_RELA sections. */
43 static reloc_howto_type howto_table
[] =
46 HOWTO (R_RISCV_NONE
, /* type */
50 FALSE
, /* pc_relative */
52 complain_overflow_dont
, /* complain_on_overflow */
53 bfd_elf_generic_reloc
, /* special_function */
54 "R_RISCV_NONE", /* name */
55 FALSE
, /* partial_inplace */
58 FALSE
), /* pcrel_offset */
60 /* 32 bit relocation. */
61 HOWTO (R_RISCV_32
, /* type */
65 FALSE
, /* pc_relative */
67 complain_overflow_dont
, /* complain_on_overflow */
68 bfd_elf_generic_reloc
, /* special_function */
69 "R_RISCV_32", /* name */
70 FALSE
, /* partial_inplace */
72 MINUS_ONE
, /* dst_mask */
73 FALSE
), /* pcrel_offset */
75 /* 64 bit relocation. */
76 HOWTO (R_RISCV_64
, /* type */
80 FALSE
, /* pc_relative */
82 complain_overflow_dont
, /* complain_on_overflow */
83 bfd_elf_generic_reloc
, /* special_function */
84 "R_RISCV_64", /* name */
85 FALSE
, /* partial_inplace */
87 MINUS_ONE
, /* dst_mask */
88 FALSE
), /* pcrel_offset */
90 /* Relocation against a local symbol in a shared object. */
91 HOWTO (R_RISCV_RELATIVE
, /* type */
95 FALSE
, /* pc_relative */
97 complain_overflow_dont
, /* complain_on_overflow */
98 bfd_elf_generic_reloc
, /* special_function */
99 "R_RISCV_RELATIVE", /* name */
100 FALSE
, /* partial_inplace */
102 MINUS_ONE
, /* dst_mask */
103 FALSE
), /* pcrel_offset */
105 HOWTO (R_RISCV_COPY
, /* type */
107 0, /* this one is variable size */
109 FALSE
, /* pc_relative */
111 complain_overflow_bitfield
, /* complain_on_overflow */
112 bfd_elf_generic_reloc
, /* special_function */
113 "R_RISCV_COPY", /* name */
114 FALSE
, /* partial_inplace */
117 FALSE
), /* pcrel_offset */
119 HOWTO (R_RISCV_JUMP_SLOT
, /* type */
123 FALSE
, /* pc_relative */
125 complain_overflow_bitfield
, /* complain_on_overflow */
126 bfd_elf_generic_reloc
, /* special_function */
127 "R_RISCV_JUMP_SLOT", /* name */
128 FALSE
, /* partial_inplace */
131 FALSE
), /* pcrel_offset */
133 /* Dynamic TLS relocations. */
134 HOWTO (R_RISCV_TLS_DTPMOD32
, /* type */
138 FALSE
, /* pc_relative */
140 complain_overflow_dont
, /* complain_on_overflow */
141 bfd_elf_generic_reloc
, /* special_function */
142 "R_RISCV_TLS_DTPMOD32", /* name */
143 FALSE
, /* partial_inplace */
145 MINUS_ONE
, /* dst_mask */
146 FALSE
), /* pcrel_offset */
148 HOWTO (R_RISCV_TLS_DTPMOD64
, /* type */
152 FALSE
, /* pc_relative */
154 complain_overflow_dont
, /* complain_on_overflow */
155 bfd_elf_generic_reloc
, /* special_function */
156 "R_RISCV_TLS_DTPMOD64", /* name */
157 FALSE
, /* partial_inplace */
159 MINUS_ONE
, /* dst_mask */
160 FALSE
), /* pcrel_offset */
162 HOWTO (R_RISCV_TLS_DTPREL32
, /* type */
166 FALSE
, /* pc_relative */
168 complain_overflow_dont
, /* complain_on_overflow */
169 bfd_elf_generic_reloc
, /* special_function */
170 "R_RISCV_TLS_DTPREL32", /* name */
171 TRUE
, /* partial_inplace */
173 MINUS_ONE
, /* dst_mask */
174 FALSE
), /* pcrel_offset */
176 HOWTO (R_RISCV_TLS_DTPREL64
, /* type */
180 FALSE
, /* pc_relative */
182 complain_overflow_dont
, /* complain_on_overflow */
183 bfd_elf_generic_reloc
, /* special_function */
184 "R_RISCV_TLS_DTPREL64", /* name */
185 TRUE
, /* partial_inplace */
187 MINUS_ONE
, /* dst_mask */
188 FALSE
), /* pcrel_offset */
190 HOWTO (R_RISCV_TLS_TPREL32
, /* type */
194 FALSE
, /* pc_relative */
196 complain_overflow_dont
, /* complain_on_overflow */
197 bfd_elf_generic_reloc
, /* special_function */
198 "R_RISCV_TLS_TPREL32", /* name */
199 FALSE
, /* partial_inplace */
201 MINUS_ONE
, /* dst_mask */
202 FALSE
), /* pcrel_offset */
204 HOWTO (R_RISCV_TLS_TPREL64
, /* type */
208 FALSE
, /* pc_relative */
210 complain_overflow_dont
, /* complain_on_overflow */
211 bfd_elf_generic_reloc
, /* special_function */
212 "R_RISCV_TLS_TPREL64", /* name */
213 FALSE
, /* partial_inplace */
215 MINUS_ONE
, /* dst_mask */
216 FALSE
), /* pcrel_offset */
218 /* Reserved for future relocs that the dynamic linker must understand. */
224 /* 12-bit PC-relative branch offset. */
225 HOWTO (R_RISCV_BRANCH
, /* type */
229 TRUE
, /* pc_relative */
231 complain_overflow_signed
, /* complain_on_overflow */
232 bfd_elf_generic_reloc
, /* special_function */
233 "R_RISCV_BRANCH", /* name */
234 FALSE
, /* partial_inplace */
236 ENCODE_SBTYPE_IMM (-1U), /* dst_mask */
237 TRUE
), /* pcrel_offset */
239 /* 20-bit PC-relative jump offset. */
240 HOWTO (R_RISCV_JAL
, /* type */
244 TRUE
, /* pc_relative */
246 complain_overflow_dont
, /* complain_on_overflow */
247 bfd_elf_generic_reloc
, /* special_function */
248 "R_RISCV_JAL", /* name */
249 FALSE
, /* partial_inplace */
251 ENCODE_UJTYPE_IMM (-1U), /* dst_mask */
252 TRUE
), /* pcrel_offset */
254 /* 32-bit PC-relative function call (AUIPC/JALR). */
255 HOWTO (R_RISCV_CALL
, /* type */
259 TRUE
, /* pc_relative */
261 complain_overflow_dont
, /* complain_on_overflow */
262 bfd_elf_generic_reloc
, /* special_function */
263 "R_RISCV_CALL", /* name */
264 FALSE
, /* partial_inplace */
266 ENCODE_UTYPE_IMM (-1U) | ((bfd_vma
) ENCODE_ITYPE_IMM (-1U) << 32),
268 TRUE
), /* pcrel_offset */
270 /* Like R_RISCV_CALL, but not locally binding. */
271 HOWTO (R_RISCV_CALL_PLT
, /* type */
275 TRUE
, /* pc_relative */
277 complain_overflow_dont
, /* complain_on_overflow */
278 bfd_elf_generic_reloc
, /* special_function */
279 "R_RISCV_CALL_PLT", /* name */
280 FALSE
, /* partial_inplace */
282 ENCODE_UTYPE_IMM (-1U) | ((bfd_vma
) ENCODE_ITYPE_IMM (-1U) << 32),
284 TRUE
), /* pcrel_offset */
286 /* High 20 bits of 32-bit PC-relative GOT access. */
287 HOWTO (R_RISCV_GOT_HI20
, /* type */
291 TRUE
, /* pc_relative */
293 complain_overflow_dont
, /* complain_on_overflow */
294 bfd_elf_generic_reloc
, /* special_function */
295 "R_RISCV_GOT_HI20", /* name */
296 FALSE
, /* partial_inplace */
298 ENCODE_UTYPE_IMM (-1U), /* dst_mask */
299 FALSE
), /* pcrel_offset */
301 /* High 20 bits of 32-bit PC-relative TLS IE GOT access. */
302 HOWTO (R_RISCV_TLS_GOT_HI20
, /* type */
306 TRUE
, /* pc_relative */
308 complain_overflow_dont
, /* complain_on_overflow */
309 bfd_elf_generic_reloc
, /* special_function */
310 "R_RISCV_TLS_GOT_HI20", /* name */
311 FALSE
, /* partial_inplace */
313 ENCODE_UTYPE_IMM (-1U), /* dst_mask */
314 FALSE
), /* pcrel_offset */
316 /* High 20 bits of 32-bit PC-relative TLS GD GOT reference. */
317 HOWTO (R_RISCV_TLS_GD_HI20
, /* type */
321 TRUE
, /* pc_relative */
323 complain_overflow_dont
, /* complain_on_overflow */
324 bfd_elf_generic_reloc
, /* special_function */
325 "R_RISCV_TLS_GD_HI20", /* name */
326 FALSE
, /* partial_inplace */
328 ENCODE_UTYPE_IMM (-1U), /* dst_mask */
329 FALSE
), /* pcrel_offset */
331 /* High 20 bits of 32-bit PC-relative reference. */
332 HOWTO (R_RISCV_PCREL_HI20
, /* type */
336 TRUE
, /* pc_relative */
338 complain_overflow_dont
, /* complain_on_overflow */
339 bfd_elf_generic_reloc
, /* special_function */
340 "R_RISCV_PCREL_HI20", /* name */
341 FALSE
, /* partial_inplace */
343 ENCODE_UTYPE_IMM (-1U), /* dst_mask */
344 TRUE
), /* pcrel_offset */
346 /* Low 12 bits of a 32-bit PC-relative load or add. */
347 HOWTO (R_RISCV_PCREL_LO12_I
, /* type */
351 FALSE
, /* pc_relative */
353 complain_overflow_dont
, /* complain_on_overflow */
354 bfd_elf_generic_reloc
, /* special_function */
355 "R_RISCV_PCREL_LO12_I", /* name */
356 FALSE
, /* partial_inplace */
358 ENCODE_ITYPE_IMM (-1U), /* dst_mask */
359 FALSE
), /* pcrel_offset */
361 /* Low 12 bits of a 32-bit PC-relative store. */
362 HOWTO (R_RISCV_PCREL_LO12_S
, /* type */
366 FALSE
, /* pc_relative */
368 complain_overflow_dont
, /* complain_on_overflow */
369 bfd_elf_generic_reloc
, /* special_function */
370 "R_RISCV_PCREL_LO12_S", /* name */
371 FALSE
, /* partial_inplace */
373 ENCODE_STYPE_IMM (-1U), /* dst_mask */
374 FALSE
), /* pcrel_offset */
376 /* High 20 bits of 32-bit absolute address. */
377 HOWTO (R_RISCV_HI20
, /* type */
381 FALSE
, /* pc_relative */
383 complain_overflow_dont
, /* complain_on_overflow */
384 bfd_elf_generic_reloc
, /* special_function */
385 "R_RISCV_HI20", /* name */
386 FALSE
, /* partial_inplace */
388 ENCODE_UTYPE_IMM (-1U), /* dst_mask */
389 FALSE
), /* pcrel_offset */
391 /* High 12 bits of 32-bit load or add. */
392 HOWTO (R_RISCV_LO12_I
, /* type */
396 FALSE
, /* pc_relative */
398 complain_overflow_dont
, /* complain_on_overflow */
399 bfd_elf_generic_reloc
, /* special_function */
400 "R_RISCV_LO12_I", /* name */
401 FALSE
, /* partial_inplace */
403 ENCODE_ITYPE_IMM (-1U), /* dst_mask */
404 FALSE
), /* pcrel_offset */
406 /* High 12 bits of 32-bit store. */
407 HOWTO (R_RISCV_LO12_S
, /* type */
411 FALSE
, /* pc_relative */
413 complain_overflow_dont
, /* complain_on_overflow */
414 bfd_elf_generic_reloc
, /* special_function */
415 "R_RISCV_LO12_S", /* name */
416 FALSE
, /* partial_inplace */
418 ENCODE_STYPE_IMM (-1U), /* dst_mask */
419 FALSE
), /* pcrel_offset */
421 /* High 20 bits of TLS LE thread pointer offset. */
422 HOWTO (R_RISCV_TPREL_HI20
, /* type */
426 FALSE
, /* pc_relative */
428 complain_overflow_signed
, /* complain_on_overflow */
429 bfd_elf_generic_reloc
, /* special_function */
430 "R_RISCV_TPREL_HI20", /* name */
431 TRUE
, /* partial_inplace */
433 ENCODE_UTYPE_IMM (-1U), /* dst_mask */
434 FALSE
), /* pcrel_offset */
436 /* Low 12 bits of TLS LE thread pointer offset for loads and adds. */
437 HOWTO (R_RISCV_TPREL_LO12_I
, /* type */
441 FALSE
, /* pc_relative */
443 complain_overflow_signed
, /* complain_on_overflow */
444 bfd_elf_generic_reloc
, /* special_function */
445 "R_RISCV_TPREL_LO12_I", /* name */
446 FALSE
, /* partial_inplace */
448 ENCODE_ITYPE_IMM (-1U), /* dst_mask */
449 FALSE
), /* pcrel_offset */
451 /* Low 12 bits of TLS LE thread pointer offset for stores. */
452 HOWTO (R_RISCV_TPREL_LO12_S
, /* type */
456 FALSE
, /* pc_relative */
458 complain_overflow_signed
, /* complain_on_overflow */
459 bfd_elf_generic_reloc
, /* special_function */
460 "R_RISCV_TPREL_LO12_S", /* name */
461 FALSE
, /* partial_inplace */
463 ENCODE_STYPE_IMM (-1U), /* dst_mask */
464 FALSE
), /* pcrel_offset */
466 /* TLS LE thread pointer usage. May be relaxed. */
467 HOWTO (R_RISCV_TPREL_ADD
, /* type */
471 FALSE
, /* pc_relative */
473 complain_overflow_dont
, /* complain_on_overflow */
474 bfd_elf_generic_reloc
, /* special_function */
475 "R_RISCV_TPREL_ADD", /* name */
476 TRUE
, /* partial_inplace */
479 FALSE
), /* pcrel_offset */
481 /* 8-bit in-place addition, for local label subtraction. */
482 HOWTO (R_RISCV_ADD8
, /* type */
486 FALSE
, /* pc_relative */
488 complain_overflow_dont
, /* complain_on_overflow */
489 riscv_elf_add_sub_reloc
, /* special_function */
490 "R_RISCV_ADD8", /* name */
491 FALSE
, /* partial_inplace */
493 MINUS_ONE
, /* dst_mask */
494 FALSE
), /* pcrel_offset */
496 /* 16-bit in-place addition, for local label subtraction. */
497 HOWTO (R_RISCV_ADD16
, /* type */
501 FALSE
, /* pc_relative */
503 complain_overflow_dont
, /* complain_on_overflow */
504 riscv_elf_add_sub_reloc
, /* special_function */
505 "R_RISCV_ADD16", /* name */
506 FALSE
, /* partial_inplace */
508 MINUS_ONE
, /* dst_mask */
509 FALSE
), /* pcrel_offset */
511 /* 32-bit in-place addition, for local label subtraction. */
512 HOWTO (R_RISCV_ADD32
, /* type */
516 FALSE
, /* pc_relative */
518 complain_overflow_dont
, /* complain_on_overflow */
519 riscv_elf_add_sub_reloc
, /* special_function */
520 "R_RISCV_ADD32", /* name */
521 FALSE
, /* partial_inplace */
523 MINUS_ONE
, /* dst_mask */
524 FALSE
), /* pcrel_offset */
526 /* 64-bit in-place addition, for local label subtraction. */
527 HOWTO (R_RISCV_ADD64
, /* type */
531 FALSE
, /* pc_relative */
533 complain_overflow_dont
, /* complain_on_overflow */
534 riscv_elf_add_sub_reloc
, /* special_function */
535 "R_RISCV_ADD64", /* name */
536 FALSE
, /* partial_inplace */
538 MINUS_ONE
, /* dst_mask */
539 FALSE
), /* pcrel_offset */
541 /* 8-bit in-place addition, for local label subtraction. */
542 HOWTO (R_RISCV_SUB8
, /* type */
546 FALSE
, /* pc_relative */
548 complain_overflow_dont
, /* complain_on_overflow */
549 riscv_elf_add_sub_reloc
, /* special_function */
550 "R_RISCV_SUB8", /* name */
551 FALSE
, /* partial_inplace */
553 MINUS_ONE
, /* dst_mask */
554 FALSE
), /* pcrel_offset */
556 /* 16-bit in-place addition, for local label subtraction. */
557 HOWTO (R_RISCV_SUB16
, /* type */
561 FALSE
, /* pc_relative */
563 complain_overflow_dont
, /* complain_on_overflow */
564 riscv_elf_add_sub_reloc
, /* special_function */
565 "R_RISCV_SUB16", /* name */
566 FALSE
, /* partial_inplace */
568 MINUS_ONE
, /* dst_mask */
569 FALSE
), /* pcrel_offset */
571 /* 32-bit in-place addition, for local label subtraction. */
572 HOWTO (R_RISCV_SUB32
, /* type */
576 FALSE
, /* pc_relative */
578 complain_overflow_dont
, /* complain_on_overflow */
579 riscv_elf_add_sub_reloc
, /* special_function */
580 "R_RISCV_SUB32", /* name */
581 FALSE
, /* partial_inplace */
583 MINUS_ONE
, /* dst_mask */
584 FALSE
), /* pcrel_offset */
586 /* 64-bit in-place addition, for local label subtraction. */
587 HOWTO (R_RISCV_SUB64
, /* type */
591 FALSE
, /* pc_relative */
593 complain_overflow_dont
, /* complain_on_overflow */
594 riscv_elf_add_sub_reloc
, /* special_function */
595 "R_RISCV_SUB64", /* name */
596 FALSE
, /* partial_inplace */
598 MINUS_ONE
, /* dst_mask */
599 FALSE
), /* pcrel_offset */
601 /* GNU extension to record C++ vtable hierarchy */
602 HOWTO (R_RISCV_GNU_VTINHERIT
, /* type */
606 FALSE
, /* pc_relative */
608 complain_overflow_dont
, /* complain_on_overflow */
609 NULL
, /* special_function */
610 "R_RISCV_GNU_VTINHERIT", /* name */
611 FALSE
, /* partial_inplace */
614 FALSE
), /* pcrel_offset */
616 /* GNU extension to record C++ vtable member usage */
617 HOWTO (R_RISCV_GNU_VTENTRY
, /* type */
621 FALSE
, /* pc_relative */
623 complain_overflow_dont
, /* complain_on_overflow */
624 _bfd_elf_rel_vtable_reloc_fn
, /* special_function */
625 "R_RISCV_GNU_VTENTRY", /* name */
626 FALSE
, /* partial_inplace */
629 FALSE
), /* pcrel_offset */
631 /* Indicates an alignment statement. The addend field encodes how many
632 bytes of NOPs follow the statement. The desired alignment is the
633 addend rounded up to the next power of two. */
634 HOWTO (R_RISCV_ALIGN
, /* type */
638 FALSE
, /* pc_relative */
640 complain_overflow_dont
, /* complain_on_overflow */
641 bfd_elf_generic_reloc
, /* special_function */
642 "R_RISCV_ALIGN", /* name */
643 FALSE
, /* partial_inplace */
646 TRUE
), /* pcrel_offset */
648 /* 8-bit PC-relative branch offset. */
649 HOWTO (R_RISCV_RVC_BRANCH
, /* type */
653 TRUE
, /* pc_relative */
655 complain_overflow_signed
, /* complain_on_overflow */
656 bfd_elf_generic_reloc
, /* special_function */
657 "R_RISCV_RVC_BRANCH", /* name */
658 FALSE
, /* partial_inplace */
660 ENCODE_RVC_B_IMM (-1U), /* dst_mask */
661 TRUE
), /* pcrel_offset */
663 /* 11-bit PC-relative jump offset. */
664 HOWTO (R_RISCV_RVC_JUMP
, /* type */
668 TRUE
, /* pc_relative */
670 complain_overflow_dont
, /* complain_on_overflow */
671 bfd_elf_generic_reloc
, /* special_function */
672 "R_RISCV_RVC_JUMP", /* name */
673 FALSE
, /* partial_inplace */
675 ENCODE_RVC_J_IMM (-1U), /* dst_mask */
676 TRUE
), /* pcrel_offset */
678 /* High 6 bits of 18-bit absolute address. */
679 HOWTO (R_RISCV_RVC_LUI
, /* type */
683 FALSE
, /* pc_relative */
685 complain_overflow_dont
, /* complain_on_overflow */
686 bfd_elf_generic_reloc
, /* special_function */
687 "R_RISCV_RVC_LUI", /* name */
688 FALSE
, /* partial_inplace */
690 ENCODE_RVC_IMM (-1U), /* dst_mask */
691 FALSE
), /* pcrel_offset */
693 /* GP-relative load. */
694 HOWTO (R_RISCV_GPREL_I
, /* type */
698 FALSE
, /* pc_relative */
700 complain_overflow_dont
, /* complain_on_overflow */
701 bfd_elf_generic_reloc
, /* special_function */
702 "R_RISCV_GPREL_I", /* name */
703 FALSE
, /* partial_inplace */
705 ENCODE_ITYPE_IMM (-1U), /* dst_mask */
706 FALSE
), /* pcrel_offset */
708 /* GP-relative store. */
709 HOWTO (R_RISCV_GPREL_S
, /* type */
713 FALSE
, /* pc_relative */
715 complain_overflow_dont
, /* complain_on_overflow */
716 bfd_elf_generic_reloc
, /* special_function */
717 "R_RISCV_GPREL_S", /* name */
718 FALSE
, /* partial_inplace */
720 ENCODE_STYPE_IMM (-1U), /* dst_mask */
721 FALSE
), /* pcrel_offset */
723 /* TP-relative TLS LE load. */
724 HOWTO (R_RISCV_TPREL_I
, /* type */
728 FALSE
, /* pc_relative */
730 complain_overflow_signed
, /* complain_on_overflow */
731 bfd_elf_generic_reloc
, /* special_function */
732 "R_RISCV_TPREL_I", /* name */
733 FALSE
, /* partial_inplace */
735 ENCODE_ITYPE_IMM (-1U), /* dst_mask */
736 FALSE
), /* pcrel_offset */
738 /* TP-relative TLS LE store. */
739 HOWTO (R_RISCV_TPREL_S
, /* type */
743 FALSE
, /* pc_relative */
745 complain_overflow_signed
, /* complain_on_overflow */
746 bfd_elf_generic_reloc
, /* special_function */
747 "R_RISCV_TPREL_S", /* name */
748 FALSE
, /* partial_inplace */
750 ENCODE_STYPE_IMM (-1U), /* dst_mask */
751 FALSE
), /* pcrel_offset */
753 /* The paired relocation may be relaxed. */
754 HOWTO (R_RISCV_RELAX
, /* type */
758 FALSE
, /* pc_relative */
760 complain_overflow_dont
, /* complain_on_overflow */
761 bfd_elf_generic_reloc
, /* special_function */
762 "R_RISCV_RELAX", /* name */
763 FALSE
, /* partial_inplace */
766 FALSE
), /* pcrel_offset */
768 /* 6-bit in-place addition, for local label subtraction. */
769 HOWTO (R_RISCV_SUB6
, /* type */
773 FALSE
, /* pc_relative */
775 complain_overflow_dont
, /* complain_on_overflow */
776 riscv_elf_add_sub_reloc
, /* special_function */
777 "R_RISCV_SUB6", /* name */
778 FALSE
, /* partial_inplace */
781 FALSE
), /* pcrel_offset */
783 /* 6-bit in-place setting, for local label subtraction. */
784 HOWTO (R_RISCV_SET6
, /* type */
788 FALSE
, /* pc_relative */
790 complain_overflow_dont
, /* complain_on_overflow */
791 bfd_elf_generic_reloc
, /* special_function */
792 "R_RISCV_SET6", /* name */
793 FALSE
, /* partial_inplace */
796 FALSE
), /* pcrel_offset */
798 /* 8-bit in-place setting, for local label subtraction. */
799 HOWTO (R_RISCV_SET8
, /* type */
803 FALSE
, /* pc_relative */
805 complain_overflow_dont
, /* complain_on_overflow */
806 bfd_elf_generic_reloc
, /* special_function */
807 "R_RISCV_SET8", /* name */
808 FALSE
, /* partial_inplace */
810 MINUS_ONE
, /* dst_mask */
811 FALSE
), /* pcrel_offset */
813 /* 16-bit in-place setting, for local label subtraction. */
814 HOWTO (R_RISCV_SET16
, /* type */
818 FALSE
, /* pc_relative */
820 complain_overflow_dont
, /* complain_on_overflow */
821 bfd_elf_generic_reloc
, /* special_function */
822 "R_RISCV_SET16", /* name */
823 FALSE
, /* partial_inplace */
825 MINUS_ONE
, /* dst_mask */
826 FALSE
), /* pcrel_offset */
828 /* 32-bit in-place setting, for local label subtraction. */
829 HOWTO (R_RISCV_SET32
, /* type */
833 FALSE
, /* pc_relative */
835 complain_overflow_dont
, /* complain_on_overflow */
836 bfd_elf_generic_reloc
, /* special_function */
837 "R_RISCV_SET32", /* name */
838 FALSE
, /* partial_inplace */
840 MINUS_ONE
, /* dst_mask */
841 FALSE
), /* pcrel_offset */
843 /* 32-bit PC relative. */
844 HOWTO (R_RISCV_32_PCREL
, /* type */
848 TRUE
, /* pc_relative */
850 complain_overflow_dont
, /* complain_on_overflow */
851 bfd_elf_generic_reloc
, /* special_function */
852 "R_RISCV_32_PCREL", /* name */
853 FALSE
, /* partial_inplace */
855 MINUS_ONE
, /* dst_mask */
856 FALSE
), /* pcrel_offset */
859 /* A mapping from BFD reloc types to RISC-V ELF reloc types. */
863 bfd_reloc_code_real_type bfd_val
;
864 enum elf_riscv_reloc_type elf_val
;
867 static const struct elf_reloc_map riscv_reloc_map
[] =
869 { BFD_RELOC_NONE
, R_RISCV_NONE
},
870 { BFD_RELOC_32
, R_RISCV_32
},
871 { BFD_RELOC_64
, R_RISCV_64
},
872 { BFD_RELOC_RISCV_ADD8
, R_RISCV_ADD8
},
873 { BFD_RELOC_RISCV_ADD16
, R_RISCV_ADD16
},
874 { BFD_RELOC_RISCV_ADD32
, R_RISCV_ADD32
},
875 { BFD_RELOC_RISCV_ADD64
, R_RISCV_ADD64
},
876 { BFD_RELOC_RISCV_SUB8
, R_RISCV_SUB8
},
877 { BFD_RELOC_RISCV_SUB16
, R_RISCV_SUB16
},
878 { BFD_RELOC_RISCV_SUB32
, R_RISCV_SUB32
},
879 { BFD_RELOC_RISCV_SUB64
, R_RISCV_SUB64
},
880 { BFD_RELOC_CTOR
, R_RISCV_64
},
881 { BFD_RELOC_12_PCREL
, R_RISCV_BRANCH
},
882 { BFD_RELOC_RISCV_HI20
, R_RISCV_HI20
},
883 { BFD_RELOC_RISCV_LO12_I
, R_RISCV_LO12_I
},
884 { BFD_RELOC_RISCV_LO12_S
, R_RISCV_LO12_S
},
885 { BFD_RELOC_RISCV_PCREL_LO12_I
, R_RISCV_PCREL_LO12_I
},
886 { BFD_RELOC_RISCV_PCREL_LO12_S
, R_RISCV_PCREL_LO12_S
},
887 { BFD_RELOC_RISCV_CALL
, R_RISCV_CALL
},
888 { BFD_RELOC_RISCV_CALL_PLT
, R_RISCV_CALL_PLT
},
889 { BFD_RELOC_RISCV_PCREL_HI20
, R_RISCV_PCREL_HI20
},
890 { BFD_RELOC_RISCV_JMP
, R_RISCV_JAL
},
891 { BFD_RELOC_RISCV_GOT_HI20
, R_RISCV_GOT_HI20
},
892 { BFD_RELOC_RISCV_TLS_DTPMOD32
, R_RISCV_TLS_DTPMOD32
},
893 { BFD_RELOC_RISCV_TLS_DTPREL32
, R_RISCV_TLS_DTPREL32
},
894 { BFD_RELOC_RISCV_TLS_DTPMOD64
, R_RISCV_TLS_DTPMOD64
},
895 { BFD_RELOC_RISCV_TLS_DTPREL64
, R_RISCV_TLS_DTPREL64
},
896 { BFD_RELOC_RISCV_TLS_TPREL32
, R_RISCV_TLS_TPREL32
},
897 { BFD_RELOC_RISCV_TLS_TPREL64
, R_RISCV_TLS_TPREL64
},
898 { BFD_RELOC_RISCV_TPREL_HI20
, R_RISCV_TPREL_HI20
},
899 { BFD_RELOC_RISCV_TPREL_ADD
, R_RISCV_TPREL_ADD
},
900 { BFD_RELOC_RISCV_TPREL_LO12_S
, R_RISCV_TPREL_LO12_S
},
901 { BFD_RELOC_RISCV_TPREL_LO12_I
, R_RISCV_TPREL_LO12_I
},
902 { BFD_RELOC_RISCV_TLS_GOT_HI20
, R_RISCV_TLS_GOT_HI20
},
903 { BFD_RELOC_RISCV_TLS_GD_HI20
, R_RISCV_TLS_GD_HI20
},
904 { BFD_RELOC_RISCV_ALIGN
, R_RISCV_ALIGN
},
905 { BFD_RELOC_RISCV_RVC_BRANCH
, R_RISCV_RVC_BRANCH
},
906 { BFD_RELOC_RISCV_RVC_JUMP
, R_RISCV_RVC_JUMP
},
907 { BFD_RELOC_RISCV_RVC_LUI
, R_RISCV_RVC_LUI
},
908 { BFD_RELOC_RISCV_GPREL_I
, R_RISCV_GPREL_I
},
909 { BFD_RELOC_RISCV_GPREL_S
, R_RISCV_GPREL_S
},
910 { BFD_RELOC_RISCV_TPREL_I
, R_RISCV_TPREL_I
},
911 { BFD_RELOC_RISCV_TPREL_S
, R_RISCV_TPREL_S
},
912 { BFD_RELOC_RISCV_RELAX
, R_RISCV_RELAX
},
913 { BFD_RELOC_RISCV_SUB6
, R_RISCV_SUB6
},
914 { BFD_RELOC_RISCV_SET6
, R_RISCV_SET6
},
915 { BFD_RELOC_RISCV_SET8
, R_RISCV_SET8
},
916 { BFD_RELOC_RISCV_SET16
, R_RISCV_SET16
},
917 { BFD_RELOC_RISCV_SET32
, R_RISCV_SET32
},
918 { BFD_RELOC_RISCV_32_PCREL
, R_RISCV_32_PCREL
},
921 /* Given a BFD reloc type, return a howto structure. */
924 riscv_reloc_type_lookup (bfd
*abfd ATTRIBUTE_UNUSED
,
925 bfd_reloc_code_real_type code
)
929 for (i
= 0; i
< ARRAY_SIZE (riscv_reloc_map
); i
++)
930 if (riscv_reloc_map
[i
].bfd_val
== code
)
931 return &howto_table
[(int) riscv_reloc_map
[i
].elf_val
];
933 bfd_set_error (bfd_error_bad_value
);
938 riscv_reloc_name_lookup (bfd
*abfd ATTRIBUTE_UNUSED
, const char *r_name
)
942 for (i
= 0; i
< ARRAY_SIZE (howto_table
); i
++)
943 if (howto_table
[i
].name
&& strcasecmp (howto_table
[i
].name
, r_name
) == 0)
944 return &howto_table
[i
];
950 riscv_elf_rtype_to_howto (bfd
*abfd
, unsigned int r_type
)
952 if (r_type
>= ARRAY_SIZE (howto_table
))
954 (*_bfd_error_handler
) (_("%pB: unsupported relocation type %#x"),
956 bfd_set_error (bfd_error_bad_value
);
959 return &howto_table
[r_type
];
962 /* Special_function of RISCV_ADD and RISCV_SUB relocations. */
964 static bfd_reloc_status_type
965 riscv_elf_add_sub_reloc (bfd
*abfd
,
966 arelent
*reloc_entry
,
969 asection
*input_section
,
971 char **error_message ATTRIBUTE_UNUSED
)
973 reloc_howto_type
*howto
= reloc_entry
->howto
;
976 if (output_bfd
!= NULL
977 && (symbol
->flags
& BSF_SECTION_SYM
) == 0
978 && (!reloc_entry
->howto
->partial_inplace
|| reloc_entry
->addend
== 0))
980 reloc_entry
->address
+= input_section
->output_offset
;
984 if (output_bfd
!= NULL
)
985 return bfd_reloc_continue
;
987 relocation
= symbol
->value
+ symbol
->section
->output_section
->vma
988 + symbol
->section
->output_offset
+ reloc_entry
->addend
;
989 bfd_vma old_value
= bfd_get (howto
->bitsize
, abfd
,
990 data
+ reloc_entry
->address
);
998 relocation
= old_value
+ relocation
;
1005 relocation
= old_value
- relocation
;
1008 bfd_put (howto
->bitsize
, abfd
, relocation
, data
+ reloc_entry
->address
);
1010 return bfd_reloc_ok
;
1013 /* Parsing subset version.
1016 Points to the end of version
1019 `rps`: Hooks and status for parsing subset.
1020 `march`: Full arch string.
1021 `p`: Curent parsing position.
1022 `major_version`: Parsing result of major version, using
1023 default_major_version if version is not present in arch string.
1024 `minor_version`: Parsing result of minor version, set to 0 if version is
1025 not present in arch string, but set to `default_minor_version` if
1026 `major_version` using default_major_version.
1027 `std_ext_p`: True if parsing std extension.
1028 `use_default_version`: Set it to True if we need the default version. */
1031 riscv_parsing_subset_version (riscv_parse_subset_t
*rps
,
1034 unsigned *major_version
,
1035 unsigned *minor_version
,
1036 bfd_boolean std_ext_p
,
1037 bfd_boolean
*use_default_version
)
1039 bfd_boolean major_p
= TRUE
;
1040 unsigned version
= 0;
1053 /* Might be beginning of `p` extension. */
1056 *major_version
= version
;
1063 (_("-march=%s: Expect number after `%dp'."),
1069 *major_version
= version
;
1073 else if (ISDIGIT (*p
))
1074 version
= (version
* 10) + (*p
- '0');
1080 *major_version
= version
;
1082 *minor_version
= version
;
1084 /* We can not find any version in string, need to parse default version. */
1085 if (use_default_version
!= NULL
1086 && *major_version
== 0
1087 && *minor_version
== 0)
1088 *use_default_version
= TRUE
;
1092 /* Return string which contain all supported standard extensions in
1096 riscv_supported_std_ext (void)
1098 return "mafdqlcbjtpvn";
1101 /* Parsing function for standard extensions.
1104 Points to the end of extensions.
1107 `rps`: Hooks and status for parsing subset.
1108 `march`: Full arch string.
1109 `p`: Curent parsing position. */
1112 riscv_parse_std_ext (riscv_parse_subset_t
*rps
,
1116 const char *all_std_exts
= riscv_supported_std_ext ();
1117 const char *std_exts
= all_std_exts
;
1118 unsigned major_version
= 0;
1119 unsigned minor_version
= 0;
1120 char std_ext
= '\0';
1121 bfd_boolean use_default_version
= FALSE
;
1123 /* First letter must start with i, e or g. */
1127 p
= riscv_parsing_subset_version (rps
,
1132 /* std_ext_p= */TRUE
,
1133 &use_default_version
);
1135 /* Find the default version if needed. */
1136 if (use_default_version
1137 && rps
->get_default_version
!= NULL
)
1138 rps
->get_default_version ("i",
1141 riscv_add_subset (rps
->subset_list
, "i",
1142 major_version
, minor_version
);
1146 p
= riscv_parsing_subset_version (rps
,
1151 /* std_ext_p= */TRUE
,
1152 &use_default_version
);
1154 /* Find the default version if needed. */
1155 if (use_default_version
1156 && rps
->get_default_version
!= NULL
)
1157 rps
->get_default_version ("e",
1160 riscv_add_subset (rps
->subset_list
, "e",
1161 major_version
, minor_version
);
1163 /* i-ext must be enabled. */
1164 if (rps
->get_default_version
!= NULL
)
1165 rps
->get_default_version ("i",
1168 riscv_add_subset (rps
->subset_list
, "i",
1169 major_version
, minor_version
);
1171 if (*rps
->xlen
> 32)
1174 (_("-march=%s: rv%de is not a valid base ISA"),
1181 /* The g-ext shouldn't has the version, so we just
1182 skip the setting if user set a version to it. */
1183 p
= riscv_parsing_subset_version (rps
,
1189 &use_default_version
);
1191 /* i-ext must be enabled. */
1192 if (rps
->get_default_version
!= NULL
)
1193 rps
->get_default_version ("i",
1196 riscv_add_subset (rps
->subset_list
, "i",
1197 major_version
, minor_version
);
1199 for ( ; *std_exts
!= 'q'; std_exts
++)
1201 const char subset
[] = {*std_exts
, '\0'};
1203 if (rps
->get_default_version
!= NULL
)
1204 rps
->get_default_version (subset
,
1207 riscv_add_subset (rps
->subset_list
, subset
,
1208 major_version
, minor_version
);
1214 (_("-march=%s: first ISA subset must be `e', `i' or `g'"), march
);
1218 /* The riscv_parsing_subset_version may set `p` to NULL, so I think we should
1219 skip parsing the string if `p` is NULL or value of `p` is `\0`. */
1220 while (p
!= NULL
&& *p
!= '\0')
1222 char subset
[2] = {0, 0};
1224 if (*p
== 'x' || *p
== 's' || *p
== 'z')
1235 /* Checking canonical order. */
1236 while (*std_exts
&& std_ext
!= *std_exts
) std_exts
++;
1238 if (std_ext
!= *std_exts
)
1240 if (strchr (all_std_exts
, std_ext
) == NULL
)
1242 (_("-march=%s: unsupported ISA subset `%c'"), march
, *p
);
1245 (_("-march=%s: ISA string is not in canonical order. `%c'"),
1252 use_default_version
= FALSE
;
1253 subset
[0] = std_ext
;
1254 p
= riscv_parsing_subset_version (rps
,
1260 &use_default_version
);
1262 /* Find the default version if needed. */
1263 if (use_default_version
1264 && rps
->get_default_version
!= NULL
)
1265 rps
->get_default_version (subset
,
1268 riscv_add_subset (rps
->subset_list
, subset
,
1269 major_version
, minor_version
);
1274 /* Classify the argument 'arch' into one of riscv_isa_ext_class_t. */
1276 riscv_isa_ext_class_t
1277 riscv_get_prefix_class (const char *arch
)
1281 case 's': return RV_ISA_CLASS_S
;
1282 case 'x': return RV_ISA_CLASS_X
;
1283 case 'z': return RV_ISA_CLASS_Z
;
1284 default: return RV_ISA_CLASS_UNKNOWN
;
1288 /* Structure describing parameters to use when parsing a particular
1289 riscv_isa_ext_class_t. One of these should be provided for each
1290 possible class, except RV_ISA_CLASS_UNKNOWN. */
1292 typedef struct riscv_parse_config
1294 /* Class of the extension. */
1295 riscv_isa_ext_class_t
class;
1297 /* Lower-case prefix string for error printing
1298 and internal parser usage, e.g. "z", "x". */
1301 /* Predicate which is used for checking whether
1302 this is a "known" extension. For 'x',
1303 it always returns true (since they are by
1304 definition non-standard and cannot be known. */
1305 bfd_boolean (*ext_valid_p
) (const char *);
1306 } riscv_parse_config_t
;
1308 /* Parse a generic prefixed extension.
1309 `rps`: Hooks and status for parsing subset.
1310 `march`: The full architecture string as passed in by "-march=...".
1311 `p`: Point from which to start parsing the -march string.
1312 `config`: What class of extensions to parse, predicate funcs,
1313 and strings to use in error reporting. */
1316 riscv_parse_prefixed_ext (riscv_parse_subset_t
*rps
,
1319 const riscv_parse_config_t
*config
)
1321 unsigned major_version
= 0;
1322 unsigned minor_version
= 0;
1323 const char *last_name
;
1324 riscv_isa_ext_class_t
class;
1325 bfd_boolean use_default_version
;
1335 /* Assert that the current extension specifier matches our parsing
1337 class = riscv_get_prefix_class (p
);
1338 if (class != config
->class)
1341 char *subset
= xstrdup (p
);
1343 const char *end_of_version
;
1345 while (*++q
!= '\0' && *q
!= '_' && !ISDIGIT (*q
))
1348 use_default_version
= FALSE
;
1350 riscv_parsing_subset_version (rps
, march
, q
, &major_version
,
1351 &minor_version
, FALSE
,
1352 &use_default_version
);
1355 /* Check that the name is valid.
1356 For 'x', anything goes but it cannot simply be 'x'.
1357 For 's', it must be known from a list and cannot simply be 's'.
1358 For 'z', it must be known from a list and cannot simply be 'z'. */
1360 /* Check that the extension name is well-formed. */
1361 if (!config
->ext_valid_p (subset
))
1364 (_("-march=%s: Invalid or unknown %s ISA extension: '%s'"),
1365 march
, config
->prefix
, subset
);
1370 /* Check that the last item is not the same as this. */
1371 last_name
= rps
->subset_list
->tail
->name
;
1372 if (!strcasecmp (last_name
, subset
))
1375 (_("-march=%s: Duplicate %s ISA extension: \'%s\'"),
1376 march
, config
->prefix
, subset
);
1381 /* Check that we are in alphabetical order within the subset. */
1382 if (!strncasecmp (last_name
, config
->prefix
, 1)
1383 && strcasecmp (last_name
, subset
) > 0)
1387 -march=%s: %s ISA extension not in alphabetical order: \'%s\' must come before \'%s\'."),
1388 march
, config
->prefix
, subset
, last_name
);
1393 /* Find the default version if needed. */
1394 if (use_default_version
1395 && rps
->get_default_version
!= NULL
)
1396 rps
->get_default_version (subset
,
1399 riscv_add_subset (rps
->subset_list
, subset
,
1400 major_version
, minor_version
);
1403 p
+= end_of_version
- subset
;
1405 if (*p
!= '\0' && *p
!= '_')
1407 rps
->error_handler (_("-march=%s: %s must separate with _"),
1408 march
, config
->prefix
);
1416 /* List of Z-class extensions that binutils should know about.
1417 Whether or not a particular entry is in this list will
1418 dictate if gas/ld will accept its presence in the -march
1421 Example: To add an extension called "Zbb" (bitmanip base extension),
1422 add "zbb" string to the list (all lowercase).
1424 Keep this list alphabetically ordered. */
1426 static const char * const riscv_std_z_ext_strtab
[] =
1431 /* Same as `riscv_std_z_ext_strtab', but for S-class extensions. */
1433 static const char * const riscv_std_s_ext_strtab
[] =
1438 /* For the extension EXT, search through the list of known extensions
1439 KNOWN_EXTS for a match, and return TRUE if found. */
1442 riscv_multi_letter_ext_valid_p (const char *ext
,
1443 const char *const *known_exts
)
1447 for (i
= 0; known_exts
[i
]; ++i
)
1448 if (!strcmp (ext
, known_exts
[i
]))
1454 /* Predicator function for x-prefixed extensions.
1455 Anything goes, except the literal 'x'. */
1458 riscv_ext_x_valid_p (const char *arg
)
1460 if (!strcasecmp (arg
, "x"))
1466 /* Predicator functions for z-prefixed extensions.
1467 Only known z-extensions are permitted. */
1470 riscv_ext_z_valid_p (const char *arg
)
1472 return riscv_multi_letter_ext_valid_p (arg
, riscv_std_z_ext_strtab
);
1475 /* Predicator function for 's' prefixed extensions.
1476 Must be either literal 's', or a known s-prefixed extension. */
1479 riscv_ext_s_valid_p (const char *arg
)
1481 return riscv_multi_letter_ext_valid_p (arg
, riscv_std_s_ext_strtab
);
1484 /* Parsing order that is specified by the ISA manual. */
1486 static const riscv_parse_config_t parse_config
[] =
1488 {RV_ISA_CLASS_S
, "s", riscv_ext_s_valid_p
},
1489 {RV_ISA_CLASS_Z
, "z", riscv_ext_z_valid_p
},
1490 {RV_ISA_CLASS_X
, "x", riscv_ext_x_valid_p
},
1491 {RV_ISA_CLASS_UNKNOWN
, NULL
, NULL
}
1494 /* Function for parsing arch string.
1497 Return TRUE on success.
1500 `rps`: Hooks and status for parsing subset.
1501 `arch`: Arch string. */
1504 riscv_parse_subset (riscv_parse_subset_t
*rps
,
1507 const char *p
= arch
;
1510 if (strncmp (p
, "rv32", 4) == 0)
1515 else if (strncmp (p
, "rv64", 4) == 0)
1523 (_("-march=%s: ISA string must begin with rv32 or rv64"),
1528 /* Parsing standard extension. */
1529 p
= riscv_parse_std_ext (rps
, arch
, p
);
1534 /* Parse the different classes of extensions in the specified order. */
1535 for (i
= 0; i
< ARRAY_SIZE (parse_config
); ++i
) {
1536 p
= riscv_parse_prefixed_ext (rps
, arch
, p
, &parse_config
[i
]);
1544 rps
->error_handler (_("-march=%s: unexpected ISA string at end: %s"),
1549 if (riscv_lookup_subset (rps
->subset_list
, "e")
1550 && riscv_lookup_subset (rps
->subset_list
, "f"))
1553 (_("-march=%s: rv32e does not support the `f' extension"),
1558 if (riscv_lookup_subset (rps
->subset_list
, "d")
1559 && !riscv_lookup_subset (rps
->subset_list
, "f"))
1562 (_("-march=%s: `d' extension requires `f' extension"),
1567 if (riscv_lookup_subset (rps
->subset_list
, "q")
1568 && !riscv_lookup_subset (rps
->subset_list
, "d"))
1571 (_("-march=%s: `q' extension requires `d' extension"),
1576 if (riscv_lookup_subset (rps
->subset_list
, "q") && *rps
->xlen
< 64)
1579 (_("-march=%s: rv32 does not support the `q' extension"),
1586 /* Add new subset to list. */
1589 riscv_add_subset (riscv_subset_list_t
*subset_list
,
1594 riscv_subset_t
*s
= xmalloc (sizeof *s
);
1596 if (subset_list
->head
== NULL
)
1597 subset_list
->head
= s
;
1599 s
->name
= xstrdup (subset
);
1600 s
->major_version
= major
;
1601 s
->minor_version
= minor
;
1604 if (subset_list
->tail
!= NULL
)
1605 subset_list
->tail
->next
= s
;
1607 subset_list
->tail
= s
;
1610 /* Find subset in list without version checking, return NULL if not found. */
1613 riscv_lookup_subset (const riscv_subset_list_t
*subset_list
,
1616 return riscv_lookup_subset_version
1617 (subset_list
, subset
,
1618 RISCV_DONT_CARE_VERSION
,
1619 RISCV_DONT_CARE_VERSION
);
1622 /* Find subset in list with version checking, return NULL if not found. */
1625 riscv_lookup_subset_version (const riscv_subset_list_t
*subset_list
,
1627 int major
, int minor
)
1631 for (s
= subset_list
->head
; s
!= NULL
; s
= s
->next
)
1632 if (strcasecmp (s
->name
, subset
) == 0)
1634 if ((major
!= RISCV_DONT_CARE_VERSION
)
1635 && (s
->major_version
!= major
))
1638 if ((minor
!= RISCV_DONT_CARE_VERSION
)
1639 && (s
->minor_version
!= minor
))
1648 /* Release subset list. */
1651 riscv_release_subset_list (riscv_subset_list_t
*subset_list
)
1653 while (subset_list
->head
!= NULL
)
1655 riscv_subset_t
*next
= subset_list
->head
->next
;
1656 free ((void *)subset_list
->head
->name
);
1657 free (subset_list
->head
);
1658 subset_list
->head
= next
;
1661 subset_list
->tail
= NULL
;
1664 /* Return the number of digits for the input. */
1667 riscv_estimate_digit (unsigned num
)
1673 for (digit
= 0; num
; num
/= 10)
1679 /* Auxiliary function to estimate string length of subset list. */
1682 riscv_estimate_arch_strlen1 (const riscv_subset_t
*subset
)
1685 return 6; /* For rv32/rv64/rv128 and string terminator. */
1687 return riscv_estimate_arch_strlen1 (subset
->next
)
1688 + strlen (subset
->name
)
1689 + riscv_estimate_digit (subset
->major_version
)
1690 + 1 /* For version seperator: 'p'. */
1691 + riscv_estimate_digit (subset
->minor_version
)
1692 + 1 /* For underscore. */;
1695 /* Estimate the string length of this subset list. */
1698 riscv_estimate_arch_strlen (const riscv_subset_list_t
*subset_list
)
1700 return riscv_estimate_arch_strlen1 (subset_list
->head
);
1703 /* Auxiliary function to convert subset info to string. */
1706 riscv_arch_str1 (riscv_subset_t
*subset
,
1707 char *attr_str
, char *buf
, size_t bufsz
)
1709 const char *underline
= "_";
1714 /* No underline between rvXX and i/e. */
1715 if ((strcasecmp (subset
->name
, "i") == 0)
1716 || (strcasecmp (subset
->name
, "e") == 0))
1719 snprintf (buf
, bufsz
, "%s%s%dp%d",
1722 subset
->major_version
,
1723 subset
->minor_version
);
1725 strncat (attr_str
, buf
, bufsz
);
1727 /* Skip 'i' extension after 'e'. */
1728 if ((strcasecmp (subset
->name
, "e") == 0)
1730 && (strcasecmp (subset
->next
->name
, "i") == 0))
1731 riscv_arch_str1 (subset
->next
->next
, attr_str
, buf
, bufsz
);
1733 riscv_arch_str1 (subset
->next
, attr_str
, buf
, bufsz
);
1736 /* Convert subset info to string with explicit version info. */
1739 riscv_arch_str (unsigned xlen
, const riscv_subset_list_t
*subset
)
1741 size_t arch_str_len
= riscv_estimate_arch_strlen (subset
);
1742 char *attr_str
= xmalloc (arch_str_len
);
1743 char *buf
= xmalloc (arch_str_len
);
1745 snprintf (attr_str
, arch_str_len
, "rv%u", xlen
);
1747 riscv_arch_str1 (subset
->head
, attr_str
, buf
, arch_str_len
);