1 /* Copyright (C) 2012-2021 Free Software Foundation, Inc.
2 
3    This file is part of GDB.
4 
5    This program is free software; you can redistribute it and/or modify
6    it under the terms of the GNU General Public License as published by
7    the Free Software Foundation; either version 3 of the License, or
8    (at your option) any later version.
9 
10    This program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU General Public License for more details.
14 
15    You should have received a copy of the GNU General Public License
16    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
17 
18 #include "server.h"
19 #include "tdesc.h"
20 #include "regdef.h"
21 
22 #ifndef IN_PROCESS_AGENT
23 
~target_desc()24 target_desc::~target_desc ()
25 {
26   xfree ((char *) arch);
27   xfree ((char *) osabi);
28 }
29 
operator ==(const target_desc & other) const30 bool target_desc::operator== (const target_desc &other) const
31 {
32   if (reg_defs != other.reg_defs)
33     return false;
34 
35   /* Compare expedite_regs.  */
36   int i = 0;
37   for (; expedite_regs[i] != NULL; i++)
38     {
39       if (strcmp (expedite_regs[i], other.expedite_regs[i]) != 0)
40 	return false;
41     }
42   if (other.expedite_regs[i] != NULL)
43     return false;
44 
45   return true;
46 }
47 
48 #endif
49 
accept(tdesc_element_visitor & v) const50 void target_desc::accept (tdesc_element_visitor &v) const
51 {
52 #ifndef IN_PROCESS_AGENT
53   v.visit_pre (this);
54 
55   for (const tdesc_feature_up &feature : features)
56     feature->accept (v);
57 
58   v.visit_post (this);
59 #endif
60 }
61 
62 void
init_target_desc(struct target_desc * tdesc,const char ** expedite_regs)63 init_target_desc (struct target_desc *tdesc,
64 		  const char **expedite_regs)
65 {
66   int offset = 0;
67 
68   /* Go through all the features and populate reg_defs.  */
69   for (const tdesc_feature_up &feature : tdesc->features)
70     for (const tdesc_reg_up &treg : feature->registers)
71       {
72 	int regnum = treg->target_regnum;
73 
74 	/* Register number will increase (possibly with gaps) or be zero.  */
75 	gdb_assert (regnum == 0 || regnum >= tdesc->reg_defs.size ());
76 
77 	if (regnum != 0)
78 	  tdesc->reg_defs.resize (regnum, gdb::reg (offset));
79 
80 	tdesc->reg_defs.emplace_back (treg->name.c_str (), offset,
81 				      treg->bitsize);
82 	offset += treg->bitsize;
83       }
84 
85   tdesc->registers_size = offset / 8;
86 
87   /* Make sure PBUFSIZ is large enough to hold a full register
88      packet.  */
89   gdb_assert (2 * tdesc->registers_size + 32 <= PBUFSIZ);
90 
91 #ifndef IN_PROCESS_AGENT
92   tdesc->expedite_regs = expedite_regs;
93 #endif
94 }
95 
96 /* See gdbsupport/tdesc.h.  */
97 
98 target_desc_up
allocate_target_description(void)99 allocate_target_description (void)
100 {
101   return target_desc_up (new target_desc ());
102 }
103 
104 /* See gdbsupport/tdesc.h.  */
105 
106 void
operator ()(struct target_desc * target_desc) const107 target_desc_deleter::operator() (struct target_desc *target_desc) const
108 {
109   delete target_desc;
110 }
111 
112 #ifndef IN_PROCESS_AGENT
113 
114 static const struct target_desc default_description {};
115 
116 void
copy_target_description(struct target_desc * dest,const struct target_desc * src)117 copy_target_description (struct target_desc *dest,
118 			 const struct target_desc *src)
119 {
120   dest->reg_defs = src->reg_defs;
121   dest->expedite_regs = src->expedite_regs;
122   dest->registers_size = src->registers_size;
123   dest->xmltarget = src->xmltarget;
124 }
125 
126 const struct target_desc *
current_target_desc(void)127 current_target_desc (void)
128 {
129   if (current_thread == NULL)
130     return &default_description;
131 
132   return current_process ()->tdesc;
133 }
134 
135 /* An empty structure.  */
136 
137 struct tdesc_compatible_info { };
138 
139 /* See gdbsupport/tdesc.h.  */
140 
141 const std::vector<tdesc_compatible_info_up> &
tdesc_compatible_info_list(const target_desc * target_desc)142 tdesc_compatible_info_list (const target_desc *target_desc)
143 {
144   static std::vector<tdesc_compatible_info_up> empty;
145   return empty;
146 }
147 
148 /* See gdbsupport/tdesc.h.  */
149 
150 const char *
tdesc_compatible_info_arch_name(const tdesc_compatible_info_up & c_info)151 tdesc_compatible_info_arch_name (const tdesc_compatible_info_up &c_info)
152 {
153   return nullptr;
154 }
155 
156 /* See gdbsupport/tdesc.h.  */
157 
158 const char *
tdesc_architecture_name(const struct target_desc * target_desc)159 tdesc_architecture_name (const struct target_desc *target_desc)
160 {
161   return target_desc->arch;
162 }
163 
164 /* See gdbsupport/tdesc.h.  */
165 
166 void
set_tdesc_architecture(struct target_desc * target_desc,const char * name)167 set_tdesc_architecture (struct target_desc *target_desc,
168 			const char *name)
169 {
170   target_desc->arch = xstrdup (name);
171 }
172 
173 /* See gdbsupport/tdesc.h.  */
174 
175 const char *
tdesc_osabi_name(const struct target_desc * target_desc)176 tdesc_osabi_name (const struct target_desc *target_desc)
177 {
178   return target_desc->osabi;
179 }
180 
181 /* See gdbsupport/tdesc.h.  */
182 
183 void
set_tdesc_osabi(struct target_desc * target_desc,const char * name)184 set_tdesc_osabi (struct target_desc *target_desc, const char *name)
185 {
186   target_desc->osabi = xstrdup (name);
187 }
188 
189 /* See gdbsupport/tdesc.h.  */
190 
191 const char *
tdesc_get_features_xml(const target_desc * tdesc)192 tdesc_get_features_xml (const target_desc *tdesc)
193 {
194   /* Either .xmltarget or .features is not NULL.  */
195   gdb_assert (tdesc->xmltarget != NULL
196 	      || (!tdesc->features.empty ()
197 		  && tdesc->arch != NULL));
198 
199   if (tdesc->xmltarget == NULL)
200     {
201       std::string buffer ("@");
202       print_xml_feature v (&buffer);
203       tdesc->accept (v);
204       tdesc->xmltarget = xstrdup (buffer.c_str ());
205     }
206 
207   return tdesc->xmltarget;
208 }
209 #endif
210 
211 /* See gdbsupport/tdesc.h.  */
212 
213 struct tdesc_feature *
tdesc_create_feature(struct target_desc * tdesc,const char * name)214 tdesc_create_feature (struct target_desc *tdesc, const char *name)
215 {
216   struct tdesc_feature *new_feature = new tdesc_feature (name);
217   tdesc->features.emplace_back (new_feature);
218   return new_feature;
219 }
220 
221 /* See gdbsupport/tdesc.h.  */
222 
223 bool
tdesc_contains_feature(const target_desc * tdesc,const std::string & feature)224 tdesc_contains_feature (const target_desc *tdesc, const std::string &feature)
225 {
226   gdb_assert (tdesc != nullptr);
227 
228   for (const tdesc_feature_up &f : tdesc->features)
229     {
230       if (f->name == feature)
231 	return true;
232     }
233 
234   return false;
235 }
236