hdr.ar_fmag[0] = '`'; hdr.ar_fmag[1] = '\n';
for (i = 0; i < sizeof (struct ar_hdr); i++)
if (((char *)(&hdr))[i] == '\0') (((char *)(&hdr))[i]) = ' ';
- bfd_write (&hdr, 1, sizeof (struct ar_hdr), arch);
+ bfd_write ((char *)&hdr, 1, sizeof (struct ar_hdr), arch);
bfd_write (etable, 1, elength, arch);
if ((elength % 2) == 1) bfd_write ("\n", 1, 1, arch);
struct ar_hdr *hdr = arch_hdr(current);
/* write ar header */
- if (bfd_write (hdr, 1, sizeof(*hdr), arch) != sizeof(*hdr)) {
+ if (bfd_write ((char *)hdr, 1, sizeof(*hdr), arch) != sizeof(*hdr)) {
syserr:
bfd_error = system_call_error;
return false;
hdr.ar_fmag[0] = '`'; hdr.ar_fmag[1] = '\n';
for (i = 0; i < sizeof (struct ar_hdr); i++)
if (((char *)(&hdr))[i] == '\0') (((char *)(&hdr))[i]) = ' ';
- bfd_write (&hdr, 1, sizeof (struct ar_hdr), arch);
+ bfd_write ((char *)&hdr, 1, sizeof (struct ar_hdr), arch);
+ /* FIXME, this needs to be byte-swapped! */
temp = orl_count /* + 4 */;
bfd_write (&temp, 1, sizeof (temp), arch);
}
/* now write the strings themselves */
+ /* FIXME, this needs to be byte-swapped! */
temp = stridx + 4;
bfd_write (&temp, 1, sizeof (temp), arch);
for (count = 0; count < orl_count; count++)
/* Write the ar header for this item and the number of symbols */
- bfd_write (&hdr, 1, sizeof (struct ar_hdr), arch);
+ bfd_write ((char *)&hdr, 1, sizeof (struct ar_hdr), arch);
+ /* FIXME, this needs to be byte-swapped */
bfd_write (&orl_count, 1, sizeof (orl_count), arch);
/* Two passes, first write the file offsets for each symbol -
current = current->next;
last_eltno++;
}
+ /* FIXME, this needs to be byte-swapped */
bfd_write (&archive_member_file_ptr,
1,
sizeof (archive_member_file_ptr),
/* MIPS Extended-Coff handler for Binary File Diddling.
- Written by Per Bothner.
+ Written by Per Bothner. */
/* Copyright (C) 1990, 1991 Free Software Foundation, Inc.
#include "intel-coff.h"
#include "libcoff.h" /* to allow easier abstraction-breaking */
-static reloc_howto_type howto_table[] =
-{
- {0},
- {1},
- {2},
- {3},
- {4},
- {5},
- {6},
- {7},
- {8},
- {9},
- {10},
- {11},
- {12},
- {13},
- {14},
- {15},
- {16},
- { R_RELLONG, 0, 2, 32, 0, 0, true, true},
- {18},
- {19},
- {20},
- {21},
- {22},
- {23},
- {24},
- { R_IPRMED, 2, 2,22,1,0, true, true},
- {26},
-/* FIXME: What do we do with this - ? */
-#if 1
- { R_OPTCALL, 0,2,32,0,0, true, true},
-#else
- { R_OPTCALL, 0,3,32,0,0, true, true},
-#endif
-};
-
-
-#define ALIGN(this, boundary) \
- ((( (this) + ((boundary) -1)) & (~((boundary)-1))))
-
-
-/* Support for Motorola 88k bcs coff as well as Intel 960 coff */
-
-
-
-/* Align an address by rounding it up to a power of two. It leaves the
- address unchanged if align == 0 (2^0 = alignment of 1 byte) */
-#define i960_align(addr, align) \
- ( ((addr) + ((1<<(align))-1)) & (-1 << (align)))
-
-#define TAG_SECTION_NAME ".tagbits"
-
-/* Libraries shouldn't be doing this stuff anyway! */
-void fatal();
-/* void warning(); */
-\f
-
/* initialize a section structure with information
* peculiar to this particular implementation of coff
*/
static boolean
-ecoff_new_section_hook(abfd, section)
-bfd *abfd;
-asection *section;
+ecoff_new_section_hook(ignore_abfd, ignore)
+bfd *ignore_abfd;
+asection *ignore;
{
return true;
}
-/* actually it makes itself and its children from the file headers */
-static boolean
-make_a_section_from_file (abfd, hdr)
- bfd *abfd;
- struct scnhdr *hdr;
-{
- asection *return_section ;
-
- { char *name = (char *)xmalloc(9);
- strncpy(name, (char *)&hdr->s_name[0], 8);
+/* Take a section header read from a coff file (in HOST byte order),
+ and make a BFD "section" out of it. */
+static boolean
+DEFUN(make_a_section_from_file,(abfd, hdr),
+ bfd *abfd AND
+ struct scnhdr *hdr)
+{
+ asection *return_section;
- return_section = bfd_make_section(abfd, name);
- (return_section->name)[8] = 0;
- }
+ {
+ /* Assorted wastage to null-terminate the name, thanks AT&T! */
+ char *name = bfd_alloc(abfd, sizeof (hdr->s_name)+1);
+ if (name == NULL) {
+ bfd_error = no_memory;
+ return false;
+ }
+ strncpy(name, (char *) &hdr->s_name[0], sizeof (hdr->s_name));
+ name[sizeof (hdr->s_name)] = 0;
+
+ return_section = bfd_make_section(abfd, name);
+ }
- /* s_paddr is presumed to be = to s_vaddr */
- /* FIXME -- needs to call swapping routines */
+ /* s_paddr is presumed to be = to s_vaddr */
#define assign(to, from) return_section->to = hdr->from
- assign (vma, s_vaddr);
-/* assign (vma, s_vaddr);*/
- assign (size, s_size);
- assign (filepos, s_scnptr);
- assign (rel_filepos, s_relptr);
- assign (reloc_count, s_nreloc);
-#ifdef I960
- assign (alignment, s_align);
-#endif
- assign (line_filepos, s_lnnoptr);
-/* return_section->linesize = hdr->s_nlnno * sizeof (struct lineno);*/
+ assign(vma, s_vaddr);
+ /* assign (vma, s_vaddr); */
+ assign(size, s_size);
+ assign(filepos, s_scnptr);
+ assign(rel_filepos, s_relptr);
+ assign(reloc_count, s_nreloc);
+ assign(line_filepos, s_lnnoptr);
+ /*
+ return_section->linesize = hdr->s_nlnno * sizeof (struct lineno);
+ */
#undef assign
- return_section->lineno_count = hdr->s_nlnno;
- return_section->userdata = (void *)NULL;
- return_section->next = (asection *)NULL;
- if ((hdr->s_flags & STYP_TEXT) || (hdr->s_flags & STYP_DATA))
- return_section->flags = (SEC_LOAD | SEC_ALLOC);
- else if (hdr->s_flags & STYP_BSS)
- return_section->flags = SEC_ALLOC;
-
- if (hdr->s_nreloc != 0) return_section->flags |= SEC_RELOC;
-
- return true;
+ return_section->lineno_count = hdr->s_nlnno;
+ return_section->userdata = NULL;
+ return_section->next = (asection *) NULL;
+ if ((hdr->s_flags & STYP_TEXT) || (hdr->s_flags & STYP_DATA))
+ return_section->flags = (SEC_LOAD | SEC_ALLOC);
+ else if (hdr->s_flags & STYP_BSS)
+ return_section->flags = SEC_ALLOC;
+
+ if (hdr->s_nreloc != 0)
+ return_section->flags |= SEC_RELOC;
+ if (hdr->s_scnptr != 0)
+ return_section->flags |= SEC_HAS_CONTENTS;
+ return true;
}
bfd_target *
ecoff_object_p (abfd)
bfd *abfd;
{
+ unsigned char short_bytes[SHORT_SIZE];
unsigned short magic, nscns, opthdr;
bfd_error = no_error;
/* figure out how much to read */
- if (bfd_read (&magic, 1, sizeof (magic), abfd) != sizeof (magic))
+ if (bfd_read (short_bytes, 1, SHORT_SIZE, abfd) != SHORT_SIZE)
return 0;
- magic = bfd_h_getshort (abfd, (unsigned char *)&magic);
+ magic = bfd_h_getshort (abfd, short_bytes);
if (magic != (abfd->xvec->byteorder_big_p ? 0x160 : 0x162)) {
bfd_error = wrong_format;
return 0;
}
- if (bfd_read (&nscns, 1, sizeof (nscns), abfd) != sizeof (nscns))
+ if (bfd_read (short_bytes, 1, SHORT_SIZE, abfd) != SHORT_SIZE)
return 0;
- nscns = bfd_h_getshort (abfd, (unsigned char *)&nscns);
+ nscns = bfd_h_getshort (abfd, short_bytes);
if (bfd_seek (abfd,(file_ptr) ((sizeof (long)) * 3), true) < 0)
return 0;
- if (bfd_read (&opthdr, 1, sizeof (opthdr), abfd) != sizeof (opthdr))
+ if (bfd_read (short_bytes, 1, SHORT_SIZE, abfd) != SHORT_SIZE)
return 0;
- opthdr = bfd_h_getshort (abfd, (unsigned char *)&opthdr);
+ opthdr = bfd_h_getshort (abfd, short_bytes);
return ecoff_real_object_p (abfd, nscns, opthdr);
}
return true;
}
\f
-static void
-ecoff_count_linenumbers(abfd)
-bfd *abfd;
-{
- unsigned int limit = bfd_get_symcount(abfd);
- unsigned int i;
- asymbol **p;
- {
- asection *s = abfd->sections->output_section;
- while (s) {
- BFD_ASSERT(s->lineno_count == 0);
- s = s->next;
- }
- }
-
-
- for (p = abfd->outsymbols,i = 0; i < limit; i++, p++)
- {
- asymbol *q_maybe = *p;
- if (q_maybe->the_bfd->xvec->flavour == bfd_target_coff_flavour_enum) {
- coff_symbol_type *q = coffsymbol(q_maybe);
- if (q->lineno)
- {
- /* This symbol has a linenumber, increment the
- * owning section's linenumber count */
- alent *l = q->lineno;
- q->symbol.section->output_section->lineno_count++;
- l++;
- while (l->line_number) {
- q->symbol.section->output_section->lineno_count++;
- l++;
- }
- }
- }
- }
-}
-
-static void
-ecoff_write_symbols(abfd)
-bfd *abfd;
-{
-}
-
-
void
-ecoff_write_linenumbers(abfd)
-bfd *abfd;
+ecoff_write_linenumbers(ignore_abfd)
+bfd *ignore_abfd;
{
}
-asymbol *
-ecoff_make_empty_symbol(abfd, n)
-bfd *abfd;
-unsigned int n;
+static asymbol *
+ecoff_make_empty_symbol(abfd)
+ bfd *abfd;
{
- coff_symbol_type *new = (coff_symbol_type *)xmalloc(sizeof(coff_symbol_type));
- new->native = 0;
- new->lineno = (alent *)NULL;
- new->symbol.the_bfd = abfd;
- return &new->symbol;
+ coff_symbol_type *new = (coff_symbol_type *) bfd_alloc(abfd, sizeof(coff_symbol_type));
+ if (new == NULL) {
+ bfd_error = no_memory;
+ return (NULL);
+ } /* on error */
+ new->native = 0;
+ new->lineno = (alent *) NULL;
+ new->symbol.the_bfd = abfd;
+ return &new->symbol;
}
/*SUPPRESS 558*/
/*SUPPRESS 529*/
boolean
-ecoff_write_object_contents (abfd)
- bfd *abfd;
+ecoff_write_object_contents (ignore_abfd)
+ bfd *ignore_abfd;
{
return false;
}
\f
/* Calculate the file position for each section. */
-
-static void
-ecoff_compute_section_file_positions (abfd)
- bfd *abfd;
-{
- abort();
-}
-
+/* ARGSUSED */
boolean
ecoff_set_section_contents (abfd, section, location, offset, count)
bfd *abfd;
return false;
}
+/* ARGSUSED */
boolean
ecoff_set_section_linenos (abfd, section, location, offset, count)
bfd *abfd;
}
\f
+/* ARGSUSED */
boolean
ecoff_close_and_cleanup (abfd)
bfd *abfd;
return false;
}
\f
-static
-struct sec *section_from_bfd_index(abfd, index)
-bfd *abfd;
-int index;
-{
-if (index > 0) {
- struct sec *answer = abfd->sections;
-
- while (--index) {
- answer = answer->next;
- }
- return answer;
-}
-return 0;
-}
-
-static int
-ecoff_get_symcount_upper_bound (abfd)
- bfd *abfd;
-{
-fatal("call to ecoff_get_symcount_upper_bound");
-return 0;
-}
-
-static symindex
-ecoff_get_first_symbol (abfd)
- bfd * abfd;
-{
- return 0;
-}
-
-static symindex
-ecoff_get_next_symbol (abfd, oidx)
- bfd *abfd;
- symindex oidx;
-{
- if (oidx == BFD_NO_MORE_SYMBOLS) return BFD_NO_MORE_SYMBOLS;
- return ++oidx >= bfd_get_symcount (abfd) ? BFD_NO_MORE_SYMBOLS : oidx;
-}
-
-static char *
-ecoff_symbol_name (abfd, idx)
- bfd *abfd;
- symindex idx;
-{
- return (obj_symbols (abfd) + idx)->symbol.name;
-}
-
-static long
-ecoff_symbol_value (abfd, idx)
- bfd *abfd;
- symindex idx;
-{
- return (obj_symbols (abfd) + idx)->symbol.value;
-}
-
-static symclass
-ecoff_classify_symbol (abfd, idx)
- bfd *abfd;
- symindex idx;
-{
- abort();
-}
-
-static boolean
-ecoff_symbol_hasclass (abfd, idx, class)
- bfd *abfd;
- symindex idx;
- symclass class;
-{
- abort();
-}
-
-
-
-
-static
-boolean
-ecoff_slurp_line_table (abfd, asect)
- bfd *abfd;
- asection *asect;
-{
- return true;
-}
-
+/* ARGSUSED */
static boolean
ecoff_slurp_symbol_table(abfd)
bfd *abfd;
-
+/* ARGSUSED */
boolean
ecoff_slurp_reloc_table (abfd, asect)
bfd *abfd;
else return true;
}
+/* ARGSUSED */
alent *
ecoff_get_lineno(ignore_abfd, ignore_symbol)
bfd *ignore_abfd;
projects / external / binutils.git / commitdiff