Use gdb_bfd_ref_ptr in target_bfd
[external/binutils.git] / gdb / bfd-target.c
1 /* Very simple "bfd" target, for GDB, the GNU debugger.
2
3    Copyright (C) 2003-2018 Free Software Foundation, Inc.
4
5    This file is part of GDB.
6
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 3 of the License, or
10    (at your option) any later version.
11
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.
16
17    You should have received a copy of the GNU General Public License
18    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
19
20 #include "defs.h"
21 #include "target.h"
22 #include "bfd-target.h"
23 #include "exec.h"
24 #include "gdb_bfd.h"
25
26 /* A target that wraps a BFD.  */
27
28 static const target_info target_bfd_target_info = {
29   "bfd",
30   N_("BFD backed target"),
31   N_("You should never see this")
32 };
33
34 class target_bfd : public target_ops
35 {
36 public:
37   explicit target_bfd (struct bfd *bfd);
38   ~target_bfd () override;
39
40   const target_info &info () const override
41   { return target_bfd_target_info; }
42
43   void close () override;
44
45   target_xfer_status
46     xfer_partial (target_object object,
47                   const char *annex, gdb_byte *readbuf,
48                   const gdb_byte *writebuf,
49                   ULONGEST offset, ULONGEST len,
50                   ULONGEST *xfered_len) override;
51
52   target_section_table *get_section_table () override;
53
54 private:
55   /* The BFD we're wrapping.  */
56   gdb_bfd_ref_ptr m_bfd;
57
58   /* The section table build from the ALLOC sections in BFD.  Note
59      that we can't rely on extracting the BFD from a random section in
60      the table, since the table can be legitimately empty.  */
61   struct target_section_table m_table;
62 };
63
64 target_xfer_status
65 target_bfd::xfer_partial (target_object object,
66                           const char *annex, gdb_byte *readbuf,
67                           const gdb_byte *writebuf,
68                           ULONGEST offset, ULONGEST len,
69                           ULONGEST *xfered_len)
70 {
71   switch (object)
72     {
73     case TARGET_OBJECT_MEMORY:
74       {
75         return section_table_xfer_memory_partial (readbuf, writebuf,
76                                                   offset, len, xfered_len,
77                                                   m_table.sections,
78                                                   m_table.sections_end,
79                                                   NULL);
80       }
81     default:
82       return TARGET_XFER_E_IO;
83     }
84 }
85
86 target_section_table *
87 target_bfd::get_section_table ()
88 {
89   return &m_table;
90 }
91
92 target_bfd::target_bfd (struct bfd *abfd)
93   : m_bfd (gdb_bfd_ref_ptr::new_reference (abfd))
94 {
95   this->to_stratum = file_stratum;
96   m_table.sections = NULL;
97   m_table.sections_end = NULL;
98   build_section_table (abfd, &m_table.sections, &m_table.sections_end);
99 }
100
101 target_bfd::~target_bfd ()
102 {
103   xfree (m_table.sections);
104 }
105
106 target_ops *
107 target_bfd_reopen (struct bfd *abfd)
108 {
109   return new target_bfd (abfd);
110 }
111
112 void
113 target_bfd::close ()
114 {
115   delete this;
116 }