xref: /dflybsd-src/contrib/binutils-2.34/bfd/coff-bfd.c (revision b52ef7118d1621abed722c5bbbd542210290ecef)
1*fae548d3Szrj /* BFD COFF interfaces used outside of BFD.
2*fae548d3Szrj    Copyright (C) 1990-2020 Free Software Foundation, Inc.
3*fae548d3Szrj    Written by Cygnus Support.
4*fae548d3Szrj 
5*fae548d3Szrj    This file is part of BFD, the Binary File Descriptor library.
6*fae548d3Szrj 
7*fae548d3Szrj    This program is free software; you can redistribute it and/or modify
8*fae548d3Szrj    it under the terms of the GNU General Public License as published by
9*fae548d3Szrj    the Free Software Foundation; either version 3 of the License, or
10*fae548d3Szrj    (at your option) any later version.
11*fae548d3Szrj 
12*fae548d3Szrj    This program is distributed in the hope that it will be useful,
13*fae548d3Szrj    but WITHOUT ANY WARRANTY; without even the implied warranty of
14*fae548d3Szrj    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15*fae548d3Szrj    GNU General Public License for more details.
16*fae548d3Szrj 
17*fae548d3Szrj    You should have received a copy of the GNU General Public License
18*fae548d3Szrj    along with this program; if not, write to the Free Software
19*fae548d3Szrj    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20*fae548d3Szrj    MA 02110-1301, USA.  */
21*fae548d3Szrj 
22*fae548d3Szrj #include "sysdep.h"
23*fae548d3Szrj #include "bfd.h"
24*fae548d3Szrj #include "libbfd.h"
25*fae548d3Szrj #include "coff/internal.h"
26*fae548d3Szrj #include "libcoff.h"
27*fae548d3Szrj 
28*fae548d3Szrj /* Return the COFF syment for a symbol.  */
29*fae548d3Szrj 
30*fae548d3Szrj bfd_boolean
bfd_coff_get_syment(bfd * abfd,asymbol * symbol,struct internal_syment * psyment)31*fae548d3Szrj bfd_coff_get_syment (bfd *abfd,
32*fae548d3Szrj 		     asymbol *symbol,
33*fae548d3Szrj 		     struct internal_syment *psyment)
34*fae548d3Szrj {
35*fae548d3Szrj   coff_symbol_type *csym;
36*fae548d3Szrj 
37*fae548d3Szrj   csym = coff_symbol_from (symbol);
38*fae548d3Szrj   if (csym == NULL || csym->native == NULL
39*fae548d3Szrj       || ! csym->native->is_sym)
40*fae548d3Szrj     {
41*fae548d3Szrj       bfd_set_error (bfd_error_invalid_operation);
42*fae548d3Szrj       return FALSE;
43*fae548d3Szrj     }
44*fae548d3Szrj 
45*fae548d3Szrj   *psyment = csym->native->u.syment;
46*fae548d3Szrj 
47*fae548d3Szrj   if (csym->native->fix_value)
48*fae548d3Szrj     psyment->n_value = psyment->n_value -
49*fae548d3Szrj       (bfd_hostptr_t) obj_raw_syments (abfd);
50*fae548d3Szrj 
51*fae548d3Szrj   /* FIXME: We should handle fix_line here.  */
52*fae548d3Szrj 
53*fae548d3Szrj   return TRUE;
54*fae548d3Szrj }
55*fae548d3Szrj 
56*fae548d3Szrj /* Return the COFF auxent for a symbol.  */
57*fae548d3Szrj 
58*fae548d3Szrj bfd_boolean
bfd_coff_get_auxent(bfd * abfd,asymbol * symbol,int indx,union internal_auxent * pauxent)59*fae548d3Szrj bfd_coff_get_auxent (bfd *abfd,
60*fae548d3Szrj 		     asymbol *symbol,
61*fae548d3Szrj 		     int indx,
62*fae548d3Szrj 		     union internal_auxent *pauxent)
63*fae548d3Szrj {
64*fae548d3Szrj   coff_symbol_type *csym;
65*fae548d3Szrj   combined_entry_type *ent;
66*fae548d3Szrj 
67*fae548d3Szrj   csym = coff_symbol_from (symbol);
68*fae548d3Szrj 
69*fae548d3Szrj   if (csym == NULL
70*fae548d3Szrj       || csym->native == NULL
71*fae548d3Szrj       || ! csym->native->is_sym
72*fae548d3Szrj       || indx >= csym->native->u.syment.n_numaux)
73*fae548d3Szrj     {
74*fae548d3Szrj       bfd_set_error (bfd_error_invalid_operation);
75*fae548d3Szrj       return FALSE;
76*fae548d3Szrj     }
77*fae548d3Szrj 
78*fae548d3Szrj   ent = csym->native + indx + 1;
79*fae548d3Szrj 
80*fae548d3Szrj   BFD_ASSERT (! ent->is_sym);
81*fae548d3Szrj   *pauxent = ent->u.auxent;
82*fae548d3Szrj 
83*fae548d3Szrj   if (ent->fix_tag)
84*fae548d3Szrj     pauxent->x_sym.x_tagndx.l =
85*fae548d3Szrj       ((combined_entry_type *) pauxent->x_sym.x_tagndx.p
86*fae548d3Szrj        - obj_raw_syments (abfd));
87*fae548d3Szrj 
88*fae548d3Szrj   if (ent->fix_end)
89*fae548d3Szrj     pauxent->x_sym.x_fcnary.x_fcn.x_endndx.l =
90*fae548d3Szrj       ((combined_entry_type *) pauxent->x_sym.x_fcnary.x_fcn.x_endndx.p
91*fae548d3Szrj        - obj_raw_syments (abfd));
92*fae548d3Szrj 
93*fae548d3Szrj   if (ent->fix_scnlen)
94*fae548d3Szrj     pauxent->x_csect.x_scnlen.l =
95*fae548d3Szrj       ((combined_entry_type *) pauxent->x_csect.x_scnlen.p
96*fae548d3Szrj        - obj_raw_syments (abfd));
97*fae548d3Szrj 
98*fae548d3Szrj   return TRUE;
99*fae548d3Szrj }
100