OpenCores
URL https://opencores.org/ocsvn/open8_urisc/open8_urisc/trunk

Subversion Repositories open8_urisc

[/] [open8_urisc/] [trunk/] [gnu/] [binutils/] [binutils/] [emul_aix.c] - Blame information for rev 272

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 15 khays
/* Binutils emulation layer.
2
   Copyright 2002, 2003, 2005, 2006, 2007, 2008, 2010
3
   Free Software Foundation, Inc.
4
   Written by Tom Rix, Red Hat Inc.
5
 
6
   This file is part of GNU Binutils.
7
 
8
   This program is free software; you can redistribute it and/or modify
9
   it under the terms of the GNU General Public License as published by
10
   the Free Software Foundation; either version 3 of the License, or
11
   (at your option) any later version.
12
 
13
   This program is distributed in the hope that it will be useful,
14
   but WITHOUT ANY WARRANTY; without even the implied warranty of
15
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16
   GNU General Public License for more details.
17
 
18
   You should have received a copy of the GNU General Public License
19
   along with this program; if not, write to the Free Software
20
   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
21
   MA 02110-1301, USA.  */
22
 
23
#include "binemul.h"
24
#include "bfdlink.h"
25
#include "coff/internal.h"
26
#include "coff/xcoff.h"
27
#include "libcoff.h"
28
#include "libxcoff.h"
29
 
30
/* Default to <bigaf>.  */
31
/* FIXME: write only variable.  */
32
static bfd_boolean big_archive = TRUE;
33
 
34
/* Whether to include 32 bit objects.  */
35
static bfd_boolean X32 = TRUE;
36
 
37
/* Whether to include 64 bit objects.  */
38
static bfd_boolean X64 = FALSE;
39
 
40
static void
41
ar_emul_aix_usage (FILE *fp)
42
{
43
  AR_EMUL_USAGE_PRINT_OPTION_HEADER (fp);
44
  /* xgettext:c-format */
45
  fprintf (fp, _("  [-g]         - 32 bit small archive\n"));
46
  fprintf (fp, _("  [-X32]       - ignores 64 bit objects\n"));
47
  fprintf (fp, _("  [-X64]       - ignores 32 bit objects\n"));
48
  fprintf (fp, _("  [-X32_64]    - accepts 32 and 64 bit objects\n"));
49
}
50
 
51
static bfd_boolean
52
check_aix (bfd *try_bfd)
53
{
54
  extern const bfd_target rs6000coff_vec;
55
  extern const bfd_target rs6000coff64_vec;
56
  extern const bfd_target aix5coff64_vec;
57
 
58
  if (bfd_check_format (try_bfd, bfd_object))
59
    {
60
      if (!X32 && try_bfd->xvec == &rs6000coff_vec)
61
        return FALSE;
62
 
63
      if (!X64 && (try_bfd->xvec == &rs6000coff64_vec
64
                   || try_bfd->xvec == &aix5coff64_vec))
65
        return FALSE;
66
    }
67
  return TRUE;
68
}
69
 
70
static bfd_boolean
71
ar_emul_aix_append (bfd **after_bfd, char *file_name, const char *target,
72
                    bfd_boolean verbose, bfd_boolean flatten)
73
{
74
  bfd *new_bfd;
75
 
76
  new_bfd = bfd_openr (file_name, target);
77
  AR_EMUL_ELEMENT_CHECK (new_bfd, file_name);
78
 
79
  return do_ar_emul_append (after_bfd, new_bfd, verbose, flatten, check_aix);
80
}
81
 
82
static bfd_boolean
83
ar_emul_aix_replace (bfd **after_bfd, char *file_name, const char *target,
84
                     bfd_boolean verbose)
85
{
86
  bfd *new_bfd;
87
 
88
  new_bfd = bfd_openr (file_name, target);
89
  AR_EMUL_ELEMENT_CHECK (new_bfd, file_name);
90
 
91
  if (!check_aix (new_bfd))
92
    return FALSE;
93
 
94
  AR_EMUL_REPLACE_PRINT_VERBOSE (verbose, file_name);
95
 
96
  new_bfd->archive_next = *after_bfd;
97
  *after_bfd = new_bfd;
98
 
99
  return TRUE;
100
}
101
 
102
static bfd_boolean
103
ar_emul_aix_parse_arg (char *arg)
104
{
105
  if (CONST_STRNEQ (arg, "-X32_64"))
106
    {
107
      big_archive = TRUE;
108
      X32 = TRUE;
109
      X64 = TRUE;
110
    }
111
  else if (CONST_STRNEQ (arg, "-X32"))
112
    {
113
      big_archive = TRUE;
114
      X32 = TRUE;
115
      X64 = FALSE;
116
    }
117
  else if (CONST_STRNEQ (arg, "-X64"))
118
    {
119
      big_archive = TRUE;
120
      X32 = FALSE;
121
      X64 = TRUE;
122
    }
123
  else if (CONST_STRNEQ (arg, "-g"))
124
    {
125
      big_archive = FALSE;
126
      X32 = TRUE;
127
      X64 = FALSE;
128
    }
129
  else
130
    return FALSE;
131
 
132
  return TRUE;
133
}
134
 
135
struct bin_emulation_xfer_struct bin_aix_emulation =
136
{
137
  ar_emul_aix_usage,
138
  ar_emul_aix_append,
139
  ar_emul_aix_replace,
140
  ar_emul_aix_parse_arg,
141
};

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.