-int vfprintf(file, format, args) /* Temporary crock! */
- FILE *file; char *format; char *args;
-{
- return _doprnt (format, args, file);
-}
-
-
-
-bfd_target *newsos3_callback ();
-
-bfd_target *
-DEFUN(newsos3_object_p,(abfd),
- bfd *abfd)
-{
- unsigned char magicbuf[LONG_SIZE]; /* Raw bytes of magic number from file */
- unsigned long magic; /* Swapped magic number */
-
- bfd_error = system_call_error;
-
- if (bfd_read ((PTR)magicbuf, 1, sizeof (magicbuf), abfd) !=
- sizeof (magicbuf))
- return 0;
- magic = bfd_h_get_32 (abfd, magicbuf);
-
- if (N_BADMAG (*((struct internal_exec *) &magic))) return 0;
-
- return aout_32_some_aout_object_p (abfd, newsos3_callback);
-}
-
-/* Finish up the reading of a NEWS-OS a.out file header */
-bfd_target *
-DEFUN(newsos3_callback,(abfd),
- bfd *abfd)
-{
- struct internal_exec *execp = exec_hdr (abfd);
-
- WORK_OUT_FILE_POSITIONS(abfd, execp) ;
-
- /* Determine the architecture and machine type of the object file. */
- abfd->obj_arch = bfd_arch_m68k;
- abfd->obj_machine = 0;
-
- return abfd->xvec;
-}
-
-/* Write an object file in NEWS-OS format.
- Section contents have already been written. We write the
- file header, symbols, and relocation. */
-
-boolean
-DEFUN(newsos3_write_object_contents,(abfd),
- bfd *abfd)
-{
- bfd_size_type data_pad = 0;
- struct external_exec exec_bytes;
- struct internal_exec *execp = exec_hdr (abfd);
-
- WRITE_HEADERS(abfd, execp);
- return true;
-}
-\f
-/* Transfer vectors for NEWS-OS version 3 */
-
-/* We use BFD generic archive files. */
-#define aout_32_openr_next_archived_file bfd_generic_openr_next_archived_file
-#define aout_32_generic_stat_arch_elt bfd_generic_stat_arch_elt
-#define aout_32_slurp_armap bfd_slurp_bsd_armap
-#define aout_32_slurp_extended_name_table bfd_true
-#define aout_32_write_armap bsd_write_armap
-#define aout_32_truncate_arname bfd_bsd_truncate_arname
-
-/* We don't support core files yet. FIXME. */
-#define aout_32_core_file_failing_command _bfd_dummy_core_file_failing_command
-#define aout_32_core_file_failing_signal _bfd_dummy_core_file_failing_signal
-#define aout_32_core_file_matches_executable_p \
- _bfd_dummy_core_file_matches_executable_p
-#define aout_32_core_file_p _bfd_dummy_target
-
-/* We define our own versions of these routines. */
-
-
-bfd_target newsos3_vec = /* Sony 68k-based machines running newos3 */
-{
- "a.out-newos3", /* name */
- bfd_target_aout_flavour_enum,
- true, /* target byte order */
- true, /* target headers byte order */
- (HAS_RELOC | EXEC_P | /* object flags */
- HAS_LINENO | HAS_DEBUG |
- HAS_SYMS | HAS_LOCALS | DYNAMIC | WP_TEXT | D_PAGED),
- (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
- ' ', /* ar_pad_char */
- 16, /* ar_max_namelen */
-
- _do_getb64, _do_putb64, _do_getb32, _do_putb32, _do_getb16, _do_putb16, /* data */
- _do_getb64, _do_putb64, _do_getb32, _do_putb32, _do_getb16, _do_putb16, /* hdrs */
-
- {_bfd_dummy_target, newsos3_object_p, /* bfd_check_format */
- bfd_generic_archive_p, aout_32_core_file_p},
- {bfd_false, aout_32_mkobject, /* bfd_set_format */
- _bfd_generic_mkarchive, bfd_false},
- {bfd_false, newsos3_write_object_contents, /* bfd_write_contents */
- _bfd_write_archive_contents, bfd_false},
-
- JUMP_TABLE(aout_32)
- };