daily update
[binutils.git] / binutils / binemul.c
blob67aaba8623856233d4d5f1f0d798c6e4e5c768d5
1 /* Binutils emulation layer.
2 Copyright 2002 Free Software Foundation, Inc.
3 Written by Tom Rix, Redhat.
5 This file is part of GNU Binutils.
7 This program 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 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
21 #include "binemul.h"
23 extern bin_emulation_xfer_type bin_dummy_emulation;
25 void
26 ar_emul_usage (fp)
27 FILE *fp;
29 if (bin_dummy_emulation.ar_usage)
30 bin_dummy_emulation.ar_usage (fp);
33 void
34 ar_emul_default_usage (fp)
35 FILE *fp;
37 AR_EMUL_USAGE_PRINT_OPTION_HEADER (fp);
38 /* xgettext:c-format */
39 fprintf (fp, _(" No emulation specific options\n"));
42 bfd_boolean
43 ar_emul_append (after_bfd, file_name, verbose)
44 bfd **after_bfd;
45 char *file_name;
46 bfd_boolean verbose;
48 if (bin_dummy_emulation.ar_append)
49 return bin_dummy_emulation.ar_append (after_bfd, file_name, verbose);
51 return FALSE;
54 bfd_boolean
55 ar_emul_default_append (after_bfd, file_name, verbose)
56 bfd **after_bfd;
57 char *file_name;
58 bfd_boolean verbose;
60 bfd *temp;
62 temp = *after_bfd;
63 *after_bfd = bfd_openr (file_name, NULL);
65 AR_EMUL_ELEMENT_CHECK (*after_bfd, file_name);
66 AR_EMUL_APPEND_PRINT_VERBOSE (verbose, file_name);
68 (*after_bfd)->next = temp;
70 return TRUE;
73 bfd_boolean
74 ar_emul_replace (after_bfd, file_name, verbose)
75 bfd **after_bfd;
76 char *file_name;
77 bfd_boolean verbose;
79 if (bin_dummy_emulation.ar_replace)
80 return bin_dummy_emulation.ar_replace (after_bfd, file_name, verbose);
82 return FALSE;
85 bfd_boolean
86 ar_emul_default_replace (after_bfd, file_name, verbose)
87 bfd **after_bfd;
88 char *file_name;
89 bfd_boolean verbose;
91 bfd *temp;
93 temp = *after_bfd;
94 *after_bfd = bfd_openr (file_name, NULL);
96 AR_EMUL_ELEMENT_CHECK (*after_bfd, file_name);
97 AR_EMUL_REPLACE_PRINT_VERBOSE (verbose, file_name);
99 (*after_bfd)->next = temp;
101 return TRUE;
104 bfd_boolean
105 ar_emul_create (abfd_out, archive_file_name, file_name)
106 bfd **abfd_out;
107 char *archive_file_name;
108 char *file_name;
110 if (bin_dummy_emulation.ar_create)
111 return bin_dummy_emulation.ar_create (abfd_out, archive_file_name,
112 file_name);
114 return FALSE;
117 bfd_boolean
118 ar_emul_default_create (abfd_out, archive_file_name, file_name)
119 bfd **abfd_out;
120 char *archive_file_name;
121 char *file_name;
123 char *target = NULL;
125 /* Try to figure out the target to use for the archive from the
126 first object on the list. */
127 if (file_name != NULL)
129 bfd *obj;
131 obj = bfd_openr (file_name, NULL);
132 if (obj != NULL)
134 if (bfd_check_format (obj, bfd_object))
135 target = bfd_get_target (obj);
136 (void) bfd_close (obj);
140 /* Create an empty archive. */
141 *abfd_out = bfd_openw (archive_file_name, target);
142 if (*abfd_out == NULL
143 || ! bfd_set_format (*abfd_out, bfd_archive)
144 || ! bfd_close (*abfd_out))
145 bfd_fatal (archive_file_name);
147 return TRUE;
150 bfd_boolean
151 ar_emul_parse_arg (arg)
152 char *arg;
154 if (bin_dummy_emulation.ar_parse_arg)
155 return bin_dummy_emulation.ar_parse_arg (arg);
157 return FALSE;
160 bfd_boolean
161 ar_emul_default_parse_arg (arg)
162 char *arg ATTRIBUTE_UNUSED;
164 return FALSE;