aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Jacobowitz <drow@false.org>2007-10-15 19:19:18 +0000
committerDaniel Jacobowitz <drow@false.org>2007-10-15 19:19:18 +0000
commit81adfcedc899da6e7641d2c2d6aad68f60d97735 (patch)
treee1137ec77293084d14043866ea01c9ad0badf798
parentd5d7db8e2faa95d6265cadc66bb0788ee922d9b1 (diff)
downloadgdb-81adfcedc899da6e7641d2c2d6aad68f60d97735.zip
gdb-81adfcedc899da6e7641d2c2d6aad68f60d97735.tar.gz
gdb-81adfcedc899da6e7641d2c2d6aad68f60d97735.tar.bz2
* target-descriptions.c (tdesc_predefined_types): New.
(tdesc_named_type): Use it. (tdesc_type_id, maint_print_c_tdesc_cmd): New functions. (_intialize_target_descriptions): Register "maint print c-tdesc". * features/Makefile (XMLTOC, CFILES, GDB): New macros. (cfiles, %.c): New rules. * features/arm-with-iwmmxt.c, features/mips-linux.c, features/mips64-linux.c: New generated files. * arm-linux-nat.c: Include preparsed description instead of "xml-support.h". (super_xfer_partial, arm_linux_xfer_partial): Remove. (arm_linux_read_description): New function. (_initialize_arm_linux_nat): Set to_read_description instead of to_xfer_partial. Initialize preparsed description. * config/arm/linux.mh (TDEP_XML): Delete. * mips-linux-nat.c: Include preparsed descriptions instead of "xml-support.h". (super_xfer_partial, mips_linux_xfer_partial): Remove. (mips_linux_read_description): New function. (_initialize_mips_linux_nat): Set to_read_description instead of to_xfer_partial. Initialize preparsed description. * config/mips/linux.mh (TDEP_XML): Delete. * Makefile.in (XMLFILES): Remove $(TDEP_XML). (features_headers, arm_with_iwmmxt_c, mips_linux_c) (mips64_linux_c): New macros. (arm-linux-nat.o, mips-linux-nat.o): Update. * gdb.texinfo (Maintenance Commands): Document "maint print c-tdesc".
-rw-r--r--gdb/ChangeLog30
-rw-r--r--gdb/Makefile.in13
-rw-r--r--gdb/arm-linux-nat.c59
-rw-r--r--gdb/config/arm/linux.mh4
-rw-r--r--gdb/config/mips/linux.mh9
-rw-r--r--gdb/doc/ChangeLog4
-rw-r--r--gdb/doc/gdb.texinfo6
-rw-r--r--gdb/features/Makefile16
-rw-r--r--gdb/features/arm-with-iwmmxt.c89
-rw-r--r--gdb/features/mips-linux.c99
-rw-r--r--gdb/features/mips64-linux.c99
-rw-r--r--gdb/mips-linux-nat.c47
-rw-r--r--gdb/target-descriptions.c214
13 files changed, 568 insertions, 121 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 4358bd0..a221863 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,33 @@
+2007-10-15 Daniel Jacobowitz <dan@codesourcery.com>
+
+ * target-descriptions.c (tdesc_predefined_types): New.
+ (tdesc_named_type): Use it.
+ (tdesc_type_id, maint_print_c_tdesc_cmd): New functions.
+ (_intialize_target_descriptions): Register "maint print c-tdesc".
+ * features/Makefile (XMLTOC, CFILES, GDB): New macros.
+ (cfiles, %.c): New rules.
+ * features/arm-with-iwmmxt.c, features/mips-linux.c,
+ features/mips64-linux.c: New generated files.
+
+ * arm-linux-nat.c: Include preparsed description instead of
+ "xml-support.h".
+ (super_xfer_partial, arm_linux_xfer_partial): Remove.
+ (arm_linux_read_description): New function.
+ (_initialize_arm_linux_nat): Set to_read_description instead of
+ to_xfer_partial. Initialize preparsed description.
+ * config/arm/linux.mh (TDEP_XML): Delete.
+ * mips-linux-nat.c: Include preparsed descriptions instead of
+ "xml-support.h".
+ (super_xfer_partial, mips_linux_xfer_partial): Remove.
+ (mips_linux_read_description): New function.
+ (_initialize_mips_linux_nat): Set to_read_description instead of
+ to_xfer_partial. Initialize preparsed description.
+ * config/mips/linux.mh (TDEP_XML): Delete.
+ * Makefile.in (XMLFILES): Remove $(TDEP_XML).
+ (features_headers, arm_with_iwmmxt_c, mips_linux_c)
+ (mips64_linux_c): New macros.
+ (arm-linux-nat.o, mips-linux-nat.o): Update.
+
2007-10-15 Pierre Muller <muller@ics.u-strasbg.fr>
* cp-abi.c (set_cp_abi_as_auto_default): ARI fix:
diff --git a/gdb/Makefile.in b/gdb/Makefile.in
index 5a51f4c..151d139 100644
--- a/gdb/Makefile.in
+++ b/gdb/Makefile.in
@@ -406,8 +406,7 @@ RUNTESTFLAGS=
# XML files to build in to GDB.
XMLFILES = $(srcdir)/features/gdb-target.dtd $(srcdir)/features/xinclude.dtd \
- $(srcdir)/features/library-list.dtd \
- $(TDEP_XML)
+ $(srcdir)/features/library-list.dtd
# This is ser-unix.o for any system which supports a v7/BSD/SYSV/POSIX
# interface to the serial port. Hopefully if get ported to OS/2, VMS,
@@ -884,6 +883,12 @@ tui_wingeneral_h = $(srcdir)/tui/tui-wingeneral.h
tui_win_h = $(srcdir)/tui/tui-win.h $(tui_data_h)
tui_winsource_h = $(srcdir)/tui/tui-winsource.h $(tui_data_h)
+# gdb/features preparsed descriptions
+features_headers = $(defs_h) $(gdbtypes_h) $(target_descriptions_h)
+arm_with_iwmmxt_c = $(srcdir)/features/arm-with-iwmmxt.c $(features_headers)
+mips_linux_c = $(srcdir)/features/mips-linux.c $(features_headers)
+mips64_linux_c = $(srcdir)/features/mips64-linux.c $(features_headers)
+
# Header files that need to have srcdir added. Note that in the cases
# where we use a macro like $(gdbcmd_h), things are carefully arranged
# so that each .h file is listed exactly once (M-x tags-search works
@@ -1802,7 +1807,7 @@ arch-utils.o: arch-utils.c $(defs_h) $(arch_utils_h) $(buildsym_h) \
arm-linux-nat.o: arm-linux-nat.c $(defs_h) $(inferior_h) $(gdbcore_h) \
$(gdb_string_h) $(regcache_h) $(arm_tdep_h) $(gregset_h) \
$(target_h) $(linux_nat_h) $(gdb_proc_service_h) $(arm_linux_tdep_h) \
- $(target_descriptions_h) $(xml_support_h)
+ $(target_descriptions_h) $(arm_with_iwmmxt_c)
arm-linux-tdep.o: arm-linux-tdep.c $(defs_h) $(target_h) $(value_h) \
$(gdbtypes_h) $(floatformat_h) $(gdbcore_h) $(frame_h) $(regcache_h) \
$(doublest_h) $(solib_svr4_h) $(osabi_h) $(arm_tdep_h) \
@@ -2361,7 +2366,7 @@ mips-irix-tdep.o: mips-irix-tdep.c $(defs_h) $(osabi_h) $(elf_bfd_h)
mips-linux-nat.o: mips-linux-nat.c $(defs_h) $(mips_tdep_h) $(target_h) \
$(regcache_h) $(linux_nat_h) $(gdb_proc_service_h) $(gregset_h) \
$(mips_linux_tdep_h) $(inferior_h) $(target_descriptions_h) \
- $(xml_support_h)
+ $(mips_linux_c) $(mips64_linux_c)
mips-linux-tdep.o: mips-linux-tdep.c $(defs_h) $(gdbcore_h) $(target_h) \
$(solib_svr4_h) $(osabi_h) $(mips_tdep_h) $(gdb_string_h) \
$(gdb_assert_h) $(frame_h) $(regcache_h) $(trad_frame_h) \
diff --git a/gdb/arm-linux-nat.c b/gdb/arm-linux-nat.c
index 6f10568..bc00593 100644
--- a/gdb/arm-linux-nat.c
+++ b/gdb/arm-linux-nat.c
@@ -25,7 +25,6 @@
#include "target.h"
#include "linux-nat.h"
#include "target-descriptions.h"
-#include "xml-support.h"
#include "arm-tdep.h"
#include "arm-linux-tdep.h"
@@ -41,6 +40,8 @@
/* Defines ps_err_e, struct ps_prochandle. */
#include "gdb_proc_service.h"
+#include "features/arm-with-iwmmxt.c"
+
#ifndef PTRACE_GET_THREAD_AREA
#define PTRACE_GET_THREAD_AREA 22
#endif
@@ -571,42 +572,23 @@ get_linux_version (unsigned int *vmajor,
return ((*vmajor << 16) | (*vminor << 8) | *vrelease);
}
-static LONGEST (*super_xfer_partial) (struct target_ops *, enum target_object,
- const char *, gdb_byte *, const gdb_byte *,
- ULONGEST, LONGEST);
-
-static LONGEST
-arm_linux_xfer_partial (struct target_ops *ops,
- enum target_object object,
- const char *annex,
- gdb_byte *readbuf, const gdb_byte *writebuf,
- ULONGEST offset, LONGEST len)
+static const struct target_desc *
+arm_linux_read_description (struct target_ops *ops)
{
- if (object == TARGET_OBJECT_AVAILABLE_FEATURES)
- {
- if (annex != NULL && strcmp (annex, "target.xml") == 0)
- {
- int ret;
- char regbuf[IWMMXT_REGS_SIZE];
-
- ret = ptrace (PTRACE_GETWMMXREGS, GET_THREAD_ID (inferior_ptid),
- 0, regbuf);
- if (ret < 0)
- arm_linux_has_wmmx_registers = 0;
- else
- arm_linux_has_wmmx_registers = 1;
-
- if (arm_linux_has_wmmx_registers)
- annex = "arm-with-iwmmxt.xml";
- else
- return -1;
- }
-
- return xml_builtin_xfer_partial (annex, readbuf, writebuf, offset, len);
- }
+ int ret;
+ char regbuf[IWMMXT_REGS_SIZE];
- return super_xfer_partial (ops, object, annex, readbuf, writebuf,
- offset, len);
+ ret = ptrace (PTRACE_GETWMMXREGS, GET_THREAD_ID (inferior_ptid),
+ 0, regbuf);
+ if (ret < 0)
+ arm_linux_has_wmmx_registers = 0;
+ else
+ arm_linux_has_wmmx_registers = 1;
+
+ if (arm_linux_has_wmmx_registers)
+ return tdesc_arm_with_iwmmxt;
+ else
+ return NULL;
}
void _initialize_arm_linux_nat (void);
@@ -625,10 +607,11 @@ _initialize_arm_linux_nat (void)
t->to_fetch_registers = arm_linux_fetch_inferior_registers;
t->to_store_registers = arm_linux_store_inferior_registers;
- /* Override the default to_xfer_partial. */
- super_xfer_partial = t->to_xfer_partial;
- t->to_xfer_partial = arm_linux_xfer_partial;
+ t->to_read_description = arm_linux_read_description;
/* Register the target. */
linux_nat_add_target (t);
+
+ /* Initialize the standard target descriptions. */
+ initialize_tdesc_arm_with_iwmmxt ();
}
diff --git a/gdb/config/arm/linux.mh b/gdb/config/arm/linux.mh
index adca462..b708f4b 100644
--- a/gdb/config/arm/linux.mh
+++ b/gdb/config/arm/linux.mh
@@ -5,7 +5,3 @@ NATDEPFILES= inf-ptrace.o fork-child.o arm-linux-nat.o gcore.o \
proc-service.o linux-thread-db.o linux-nat.o linux-fork.o
LOADLIBES= -ldl -rdynamic
-
-TDEP_XML = $(srcdir)/features/arm-with-iwmmxt.xml \
- $(srcdir)/features/xscale-iwmmxt.xml \
- $(srcdir)/features/arm-core.xml
diff --git a/gdb/config/mips/linux.mh b/gdb/config/mips/linux.mh
index 01478b6..32381a4 100644
--- a/gdb/config/mips/linux.mh
+++ b/gdb/config/mips/linux.mh
@@ -5,12 +5,3 @@ NATDEPFILES= inf-ptrace.o fork-child.o mips-linux-nat.o \
linux-nat.o linux-fork.o
LOADLIBES = -ldl -rdynamic
-
-TDEP_XML = $(srcdir)/features/mips-cpu.xml \
- $(srcdir)/features/mips-cp0.xml \
- $(srcdir)/features/mips-fpu.xml \
- $(srcdir)/features/mips-linux.xml \
- $(srcdir)/features/mips64-cpu.xml \
- $(srcdir)/features/mips64-cp0.xml \
- $(srcdir)/features/mips64-fpu.xml \
- $(srcdir)/features/mips64-linux.xml
diff --git a/gdb/doc/ChangeLog b/gdb/doc/ChangeLog
index 7fa66e8..f3ae004 100644
--- a/gdb/doc/ChangeLog
+++ b/gdb/doc/ChangeLog
@@ -1,3 +1,7 @@
+2007-10-15 Daniel Jacobowitz <dan@codesourcery.com>
+
+ * gdb.texinfo (Maintenance Commands): Document "maint print c-tdesc".
+
2007-10-12 Ulrich Weigand <uweigand@de.ibm.com>
* gdbint.texi (Target Conditionals): Remove documentation
diff --git a/gdb/doc/gdb.texinfo b/gdb/doc/gdb.texinfo
index 468d600..c42cc48 100644
--- a/gdb/doc/gdb.texinfo
+++ b/gdb/doc/gdb.texinfo
@@ -22589,6 +22589,12 @@ checksum.
Print the entire architecture configuration. The optional argument
@var{file} names the file where the output goes.
+@kindex maint print c-tdesc
+@item maint print c-tdesc
+Print the current target description (@pxref{Target Descriptions}) as
+a C source file. The created source file can be used in @value{GDBN}
+when an XML parser is not available to parse the description.
+
@kindex maint print dummy-frames
@item maint print dummy-frames
Prints the contents of @value{GDBN}'s internal dummy-frame stack.
diff --git a/gdb/features/Makefile b/gdb/features/Makefile
index e116266..b81c1b8 100644
--- a/gdb/features/Makefile
+++ b/gdb/features/Makefile
@@ -25,6 +25,12 @@
# affected XML files is changed, and the results should be kept in the
# GDB repository.
+# It can also update the C files in the features directory from their
+# XML master copies. This relies on a GDB linked with expat and
+# configured for the correct architecture, so the files are again kept
+# in the GDB repository. To generate C files:
+# make GDB=/path/to/gdb XMLTOC="xml files" cfiles
+
WHICH = arm-with-iwmmxt mips-linux mips64-linux
# Record which registers should be sent to GDB by default after stop.
@@ -36,6 +42,10 @@ XSLTPROC = xsltproc
outdir = ../regformats
OUTPUTS = $(patsubst %,$(outdir)/%.dat,$(WHICH))
+XMLTOC =
+CFILES = $(patsubst %.xml,%.c,$(XMLTOC))
+GDB = false
+
all: $(OUTPUTS)
$(outdir)/%.dat: %.xml number-regs.xsl sort-regs.xsl gdbserver-regs.xsl
@@ -47,5 +57,11 @@ $(outdir)/%.dat: %.xml number-regs.xsl sort-regs.xsl gdbserver-regs.xsl
$(XSLTPROC) gdbserver-regs.xsl - >> $(outdir)/$*.tmp
sh ../../move-if-change $(outdir)/$*.tmp $(outdir)/$*.dat
+cfiles: $(CFILES)
+%.c: %.xml
+ $(GDB) -nx -q -batch \
+ -ex "set tdesc filename $<" -ex 'maint print c-tdesc' > $@.tmp
+ sh ../../move-if-change $@.tmp $@
+
# Other dependencies.
$(outdir)/arm-with-iwmmxt.dat: arm-core.xml xscale-iwmmxt.xml
diff --git a/gdb/features/arm-with-iwmmxt.c b/gdb/features/arm-with-iwmmxt.c
new file mode 100644
index 0000000..8255c7f
--- /dev/null
+++ b/gdb/features/arm-with-iwmmxt.c
@@ -0,0 +1,89 @@
+/* THIS FILE IS GENERATED. Original: arm-with-iwmmxt.xml */
+
+#include "defs.h"
+#include "gdbtypes.h"
+#include "target-descriptions.h"
+
+struct target_desc *tdesc_arm_with_iwmmxt;
+static void
+initialize_tdesc_arm_with_iwmmxt (void)
+{
+ struct target_desc *result = allocate_target_description ();
+ struct tdesc_feature *feature;
+ struct type *field_type, *type;
+
+ set_tdesc_architecture (result, bfd_scan_arch ("iwmmxt"));
+
+ feature = tdesc_create_feature (result, "org.gnu.gdb.arm.core");
+ tdesc_create_reg (feature, "r0", 0, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r1", 1, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r2", 2, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r3", 3, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r4", 4, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r5", 5, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r6", 6, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r7", 7, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r8", 8, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r9", 9, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r10", 10, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r11", 11, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r12", 12, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "sp", 13, 1, NULL, 32, "data_ptr");
+ tdesc_create_reg (feature, "lr", 14, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "pc", 15, 1, NULL, 32, "code_ptr");
+ tdesc_create_reg (feature, "cpsr", 25, 1, NULL, 32, "int");
+
+ feature = tdesc_create_feature (result, "org.gnu.gdb.xscale.iwmmxt");
+ field_type = tdesc_named_type (feature, "uint8");
+ type = init_vector_type (field_type, 8);
+ TYPE_NAME (type) = xstrdup ("iwmmxt_v8u8");
+ tdesc_record_type (feature, type);
+
+ field_type = tdesc_named_type (feature, "uint16");
+ type = init_vector_type (field_type, 4);
+ TYPE_NAME (type) = xstrdup ("iwmmxt_v4u16");
+ tdesc_record_type (feature, type);
+
+ field_type = tdesc_named_type (feature, "uint32");
+ type = init_vector_type (field_type, 2);
+ TYPE_NAME (type) = xstrdup ("iwmmxt_v2u32");
+ tdesc_record_type (feature, type);
+
+ type = init_composite_type (NULL, TYPE_CODE_UNION);
+ TYPE_NAME (type) = xstrdup ("iwmmxt_vec64i");
+ field_type = tdesc_named_type (feature, "iwmmxt_v8u8");
+ append_composite_type_field (type, xstrdup ("u8"), field_type);
+ field_type = tdesc_named_type (feature, "iwmmxt_v4u16");
+ append_composite_type_field (type, xstrdup ("u16"), field_type);
+ field_type = tdesc_named_type (feature, "iwmmxt_v2u32");
+ append_composite_type_field (type, xstrdup ("u32"), field_type);
+ field_type = tdesc_named_type (feature, "uint64");
+ append_composite_type_field (type, xstrdup ("u64"), field_type);
+ TYPE_FLAGS (type) |= TYPE_FLAG_VECTOR;
+ tdesc_record_type (feature, type);
+
+ tdesc_create_reg (feature, "wR0", 26, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR1", 27, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR2", 28, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR3", 29, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR4", 30, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR5", 31, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR6", 32, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR7", 33, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR8", 34, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR9", 35, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR10", 36, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR11", 37, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR12", 38, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR13", 39, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR14", 40, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wR15", 41, 1, NULL, 64, "iwmmxt_vec64i");
+ tdesc_create_reg (feature, "wCSSF", 42, 1, "vector", 32, "int");
+ tdesc_create_reg (feature, "wCASF", 43, 1, "vector", 32, "int");
+ tdesc_create_reg (feature, "wCGR0", 44, 1, "vector", 32, "int");
+ tdesc_create_reg (feature, "wCGR1", 45, 1, "vector", 32, "int");
+ tdesc_create_reg (feature, "wCGR2", 46, 1, "vector", 32, "int");
+ tdesc_create_reg (feature, "wCGR3", 47, 1, "vector", 32, "int");
+
+ tdesc_arm_with_iwmmxt = result;
+}
diff --git a/gdb/features/mips-linux.c b/gdb/features/mips-linux.c
new file mode 100644
index 0000000..51785e4
--- /dev/null
+++ b/gdb/features/mips-linux.c
@@ -0,0 +1,99 @@
+/* THIS FILE IS GENERATED. Original: mips-linux.xml */
+
+#include "defs.h"
+#include "gdbtypes.h"
+#include "target-descriptions.h"
+
+struct target_desc *tdesc_mips_linux;
+static void
+initialize_tdesc_mips_linux (void)
+{
+ struct target_desc *result = allocate_target_description ();
+ struct tdesc_feature *feature;
+ struct type *field_type, *type;
+
+ set_tdesc_architecture (result, bfd_scan_arch ("mips"));
+
+ feature = tdesc_create_feature (result, "org.gnu.gdb.mips.cpu");
+ tdesc_create_reg (feature, "r0", 0, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r1", 1, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r2", 2, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r3", 3, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r4", 4, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r5", 5, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r6", 6, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r7", 7, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r8", 8, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r9", 9, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r10", 10, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r11", 11, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r12", 12, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r13", 13, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r14", 14, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r15", 15, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r16", 16, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r17", 17, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r18", 18, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r19", 19, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r20", 20, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r21", 21, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r22", 22, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r23", 23, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r24", 24, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r25", 25, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r26", 26, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r27", 27, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r28", 28, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r29", 29, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r30", 30, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "r31", 31, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "lo", 33, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "hi", 34, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "pc", 37, 1, NULL, 32, "int");
+
+ feature = tdesc_create_feature (result, "org.gnu.gdb.mips.cp0");
+ tdesc_create_reg (feature, "status", 32, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "badvaddr", 35, 1, NULL, 32, "int");
+ tdesc_create_reg (feature, "cause", 36, 1, NULL, 32, "int");
+
+ feature = tdesc_create_feature (result, "org.gnu.gdb.mips.fpu");
+ tdesc_create_reg (feature, "f0", 37, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f1", 38, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f2", 39, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f3", 40, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f4", 41, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f5", 42, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f6", 43, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f7", 44, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f8", 45, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f9", 46, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f10", 47, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f11", 48, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f12", 49, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f13", 50, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f14", 51, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f15", 52, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f16", 53, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f17", 54, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f18", 55, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f19", 56, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f20", 57, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f21", 58, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f22", 59, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f23", 60, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f24", 61, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f25", 62, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f26", 63, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f27", 64, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f28", 65, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f29", 66, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f30", 67, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "f31", 68, 1, NULL, 32, "ieee_single");
+ tdesc_create_reg (feature, "fcsr", 69, 1, "float", 32, "int");
+ tdesc_create_reg (feature, "fir", 70, 1, "float", 32, "int");
+
+ feature = tdesc_create_feature (result, "org.gnu.gdb.mips.linux");
+ tdesc_create_reg (feature, "restart", 71, 1, "system", 32, "int");
+
+ tdesc_mips_linux = result;
+}
diff --git a/gdb/features/mips64-linux.c b/gdb/features/mips64-linux.c
new file mode 100644
index 0000000..85c99a6b
--- /dev/null
+++ b/gdb/features/mips64-linux.c
@@ -0,0 +1,99 @@
+/* THIS FILE IS GENERATED. Original: mips64-linux.xml */
+
+#include "defs.h"
+#include "gdbtypes.h"
+#include "target-descriptions.h"
+
+struct target_desc *tdesc_mips64_linux;
+static void
+initialize_tdesc_mips64_linux (void)
+{
+ struct target_desc *result = allocate_target_description ();
+ struct tdesc_feature *feature;
+ struct type *field_type, *type;
+
+ set_tdesc_architecture (result, bfd_scan_arch ("mips"));
+
+ feature = tdesc_create_feature (result, "org.gnu.gdb.mips.cpu");
+ tdesc_create_reg (feature, "r0", 0, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r1", 1, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r2", 2, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r3", 3, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r4", 4, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r5", 5, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r6", 6, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r7", 7, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r8", 8, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r9", 9, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r10", 10, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r11", 11, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r12", 12, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r13", 13, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r14", 14, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r15", 15, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r16", 16, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r17", 17, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r18", 18, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r19", 19, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r20", 20, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r21", 21, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r22", 22, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r23", 23, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r24", 24, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r25", 25, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r26", 26, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r27", 27, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r28", 28, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r29", 29, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r30", 30, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "r31", 31, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "lo", 33, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "hi", 34, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "pc", 37, 1, NULL, 64, "int");
+
+ feature = tdesc_create_feature (result, "org.gnu.gdb.mips.cp0");
+ tdesc_create_reg (feature, "status", 32, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "badvaddr", 35, 1, NULL, 64, "int");
+ tdesc_create_reg (feature, "cause", 36, 1, NULL, 64, "int");
+
+ feature = tdesc_create_feature (result, "org.gnu.gdb.mips.fpu");
+ tdesc_create_reg (feature, "f0", 37, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f1", 38, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f2", 39, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f3", 40, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f4", 41, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f5", 42, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f6", 43, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f7", 44, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f8", 45, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f9", 46, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f10", 47, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f11", 48, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f12", 49, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f13", 50, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f14", 51, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f15", 52, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f16", 53, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f17", 54, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f18", 55, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f19", 56, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f20", 57, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f21", 58, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f22", 59, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f23", 60, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f24", 61, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f25", 62, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f26", 63, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f27", 64, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f28", 65, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f29", 66, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f30", 67, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "f31", 68, 1, NULL, 64, "ieee_double");
+ tdesc_create_reg (feature, "fcsr", 69, 1, "float", 64, "int");
+ tdesc_create_reg (feature, "fir", 70, 1, "float", 64, "int");
+
+ feature = tdesc_create_feature (result, "org.gnu.gdb.mips.linux");
+ tdesc_create_reg (feature, "restart", 71, 1, "system", 64, "int");
+
+ tdesc_mips64_linux = result;
+}
diff --git a/gdb/mips-linux-nat.c b/gdb/mips-linux-nat.c
index 7d87c87..fb44a7e 100644
--- a/gdb/mips-linux-nat.c
+++ b/gdb/mips-linux-nat.c
@@ -26,7 +26,6 @@
#include "linux-nat.h"
#include "mips-linux-tdep.h"
#include "target-descriptions.h"
-#include "xml-support.h"
#include "gdb_proc_service.h"
#include "gregset.h"
@@ -34,6 +33,9 @@
#include <sgidefs.h>
#include <sys/ptrace.h>
+#include "features/mips-linux.c"
+#include "features/mips64-linux.c"
+
#ifndef PTRACE_GET_THREAD_AREA
#define PTRACE_GET_THREAD_AREA 25
#endif
@@ -342,34 +344,15 @@ mips_linux_register_u_offset (struct gdbarch *gdbarch, int regno, int store_p)
return mips_linux_register_addr (gdbarch, regno, store_p);
}
-static LONGEST (*super_xfer_partial) (struct target_ops *, enum target_object,
- const char *, gdb_byte *, const gdb_byte *,
- ULONGEST, LONGEST);
-
-static LONGEST
-mips_linux_xfer_partial (struct target_ops *ops,
- enum target_object object,
- const char *annex,
- gdb_byte *readbuf, const gdb_byte *writebuf,
- ULONGEST offset, LONGEST len)
+static const struct target_desc *
+mips_linux_read_description (struct target_ops *ops)
{
- if (object == TARGET_OBJECT_AVAILABLE_FEATURES)
- {
- if (annex != NULL && strcmp (annex, "target.xml") == 0)
- {
- /* Report that target registers are a size we know for sure
- that we can get from ptrace. */
- if (_MIPS_SIM == _ABIO32)
- annex = "mips-linux.xml";
- else
- annex = "mips64-linux.xml";
- }
-
- return xml_builtin_xfer_partial (annex, readbuf, writebuf, offset, len);
- }
-
- return super_xfer_partial (ops, object, annex, readbuf, writebuf,
- offset, len);
+ /* Report that target registers are a size we know for sure
+ that we can get from ptrace. */
+ if (_MIPS_SIM == _ABIO32)
+ return tdesc_mips_linux;
+ else
+ return tdesc_mips64_linux;
}
void _initialize_mips_linux_nat (void);
@@ -385,9 +368,11 @@ _initialize_mips_linux_nat (void)
t->to_fetch_registers = mips64_linux_fetch_registers;
t->to_store_registers = mips64_linux_store_registers;
- /* Override the default to_xfer_partial. */
- super_xfer_partial = t->to_xfer_partial;
- t->to_xfer_partial = mips_linux_xfer_partial;
+ t->to_read_description = mips_linux_read_description;
linux_nat_add_target (t);
+
+ /* Initialize the standard target descriptions. */
+ initialize_tdesc_mips_linux ();
+ initialize_tdesc_mips64_linux ();
}
diff --git a/gdb/target-descriptions.c b/gdb/target-descriptions.c
index 3d530e1..2f1b82e 100644
--- a/gdb/target-descriptions.c
+++ b/gdb/target-descriptions.c
@@ -339,6 +339,28 @@ tdesc_feature_name (const struct tdesc_feature *feature)
return feature->name;
}
+/* Predefined types. Note that none of these types depend on the
+ current architecture; some of the builtin_type_foo variables are
+ swapped based on the architecture. */
+static struct
+{
+ const char *name;
+ struct type **type;
+} tdesc_predefined_types[] =
+ {
+ { "int8", &builtin_type_int8 },
+ { "int16", &builtin_type_int16 },
+ { "int32", &builtin_type_int32 },
+ { "int64", &builtin_type_int64 },
+ { "uint8", &builtin_type_uint8 },
+ { "uint16", &builtin_type_uint16 },
+ { "uint32", &builtin_type_uint32 },
+ { "uint64", &builtin_type_uint64 },
+ { "ieee_single", &builtin_type_ieee_single },
+ { "ieee_double", &builtin_type_ieee_double },
+ { "arm_fpa_ext", &builtin_type_arm_ext }
+ };
+
/* Return the type associated with ID in the context of FEATURE, or
NULL if none. */
@@ -353,41 +375,10 @@ tdesc_named_type (const struct tdesc_feature *feature, const char *id)
if (strcmp (TYPE_NAME (gdb_type), id) == 0)
return gdb_type;
- /* Next try some predefined types. Note that none of these types
- depend on the current architecture; some of the builtin_type_foo
- variables are swapped based on the architecture. */
- if (strcmp (id, "int8") == 0)
- return builtin_type_int8;
-
- if (strcmp (id, "int16") == 0)
- return builtin_type_int16;
-
- if (strcmp (id, "int32") == 0)
- return builtin_type_int32;
-
- if (strcmp (id, "int64") == 0)
- return builtin_type_int64;
-
- if (strcmp (id, "uint8") == 0)
- return builtin_type_uint8;
-
- if (strcmp (id, "uint16") == 0)
- return builtin_type_uint16;
-
- if (strcmp (id, "uint32") == 0)
- return builtin_type_uint32;
-
- if (strcmp (id, "uint64") == 0)
- return builtin_type_uint64;
-
- if (strcmp (id, "ieee_single") == 0)
- return builtin_type_ieee_single;
-
- if (strcmp (id, "ieee_double") == 0)
- return builtin_type_ieee_double;
-
- if (strcmp (id, "arm_fpa_ext") == 0)
- return builtin_type_arm_ext;
+ /* Next try the predefined types. */
+ for (ix = 0; ix < ARRAY_SIZE (tdesc_predefined_types); ix++)
+ if (strcmp (tdesc_predefined_types[ix].name, id) == 0)
+ return *tdesc_predefined_types[ix].type;
return NULL;
}
@@ -960,6 +951,155 @@ unset_tdesc_filename_cmd (char *args, int from_tty)
target_find_description ();
}
+static const char *
+tdesc_type_id (struct type *type)
+{
+ int ix;
+
+ for (ix = 0; ix < ARRAY_SIZE (tdesc_predefined_types); ix++)
+ if (TYPE_MAIN_TYPE (*tdesc_predefined_types[ix].type)
+ == TYPE_MAIN_TYPE (type))
+ return tdesc_predefined_types[ix].name;
+
+ return TYPE_NAME (type);
+}
+
+static void
+maint_print_c_tdesc_cmd (char *args, int from_tty)
+{
+ const struct target_desc *tdesc;
+ const char *filename, *inp;
+ char *function, *outp;
+ struct property *prop;
+ struct tdesc_feature *feature;
+ struct tdesc_reg *reg;
+ struct type *type;
+ int ix, ix2, ix3;
+
+ /* Use the global target-supplied description, not the current
+ architecture's. This lets a GDB for one architecture generate C
+ for another architecture's description, even though the gdbarch
+ initialization code will reject the new description. */
+ tdesc = current_target_desc;
+ if (tdesc == NULL)
+ error (_("There is no target description to print."));
+
+ if (target_description_filename == NULL)
+ error (_("The current target description did not come from an XML file."));
+
+ filename = lbasename (target_description_filename);
+ function = xmalloc (strlen (filename) + 1);
+ for (inp = filename, outp = function; *inp != '\0'; inp++)
+ if (*inp == '.')
+ break;
+ else if (*inp == '-')
+ *outp++ = '_';
+ else
+ *outp++ = *inp;
+ *outp = '\0';
+
+ /* Standard boilerplate. */
+ printf_unfiltered ("/* THIS FILE IS GENERATED. Original: %s */\n\n",
+ filename);
+ printf_unfiltered ("#include \"defs.h\"\n");
+ printf_unfiltered ("#include \"gdbtypes.h\"\n");
+ printf_unfiltered ("#include \"target-descriptions.h\"\n");
+ printf_unfiltered ("\n");
+
+ printf_unfiltered ("struct target_desc *tdesc_%s;\n", function);
+ printf_unfiltered ("static void\n");
+ printf_unfiltered ("initialize_tdesc_%s (void)\n", function);
+ printf_unfiltered ("{\n");
+ printf_unfiltered
+ (" struct target_desc *result = allocate_target_description ();\n");
+ printf_unfiltered (" struct tdesc_feature *feature;\n");
+ printf_unfiltered (" struct type *field_type, *type;\n");
+ printf_unfiltered ("\n");
+
+ if (tdesc_architecture (tdesc) != NULL)
+ {
+ printf_unfiltered
+ (" set_tdesc_architecture (result, bfd_scan_arch (\"%s\"));\n",
+ tdesc_architecture (tdesc)->printable_name);
+ printf_unfiltered ("\n");
+ }
+
+ for (ix = 0; VEC_iterate (property_s, tdesc->properties, ix, prop);
+ ix++)
+ {
+ printf_unfiltered (" set_tdesc_property (result, \"%s\", \"%s\");\n",
+ prop->key, prop->value);
+ }
+
+ for (ix = 0;
+ VEC_iterate (tdesc_feature_p, tdesc->features, ix, feature);
+ ix++)
+ {
+ printf_unfiltered (" feature = tdesc_create_feature (result, \"%s\");\n",
+ feature->name);
+
+ for (ix2 = 0;
+ VEC_iterate (type_p, feature->types, ix2, type);
+ ix2++)
+ {
+ switch (TYPE_CODE (type))
+ {
+ case TYPE_CODE_ARRAY:
+ printf_unfiltered
+ (" field_type = tdesc_named_type (feature, \"%s\");\n",
+ tdesc_type_id (TYPE_TARGET_TYPE (type)));
+ printf_unfiltered
+ (" type = init_vector_type (field_type, %d);\n",
+ TYPE_LENGTH (type) / TYPE_LENGTH (TYPE_TARGET_TYPE (type)));
+ printf_unfiltered
+ (" TYPE_NAME (type) = xstrdup (\"%s\");\n", TYPE_NAME (type));
+ break;
+ case TYPE_CODE_UNION:
+ printf_unfiltered
+ (" type = init_composite_type (NULL, TYPE_CODE_UNION);\n");
+ printf_unfiltered
+ (" TYPE_NAME (type) = xstrdup (\"%s\");\n", TYPE_NAME (type));
+ for (ix3 = 0; ix3 < TYPE_NFIELDS (type); ix3++)
+ {
+ printf_unfiltered
+ (" field_type = tdesc_named_type (feature, \"%s\");\n",
+ tdesc_type_id (TYPE_FIELD_TYPE (type, ix3)));
+ printf_unfiltered
+ (" append_composite_type_field (type, "
+ "xstrdup (\"%s\"), field_type);\n",
+ TYPE_FIELD_NAME (type, ix3));
+ }
+ if (TYPE_VECTOR (type))
+ printf_unfiltered
+ (" TYPE_FLAGS (type) |= TYPE_FLAG_VECTOR;\n");
+ break;
+ default:
+ error (_("C output is not supported type \"%s\"."), TYPE_NAME (type));
+ }
+ printf_unfiltered (" tdesc_record_type (feature, type);\n");
+ printf_unfiltered ("\n");
+ }
+
+ for (ix2 = 0;
+ VEC_iterate (tdesc_reg_p, feature->registers, ix2, reg);
+ ix2++)
+ {
+ printf_unfiltered (" tdesc_create_reg (feature, \"%s\", %ld, %d, ",
+ reg->name, reg->target_regnum, reg->save_restore);
+ if (reg->group)
+ printf_unfiltered ("\"%s\", ", reg->group);
+ else
+ printf_unfiltered ("NULL, ");
+ printf_unfiltered ("%d, \"%s\");\n", reg->bitsize, reg->type);
+ }
+
+ printf_unfiltered ("\n");
+ }
+
+ printf_unfiltered (" tdesc_%s = result;\n", function);
+ printf_unfiltered ("}\n");
+}
+
void
_initialize_target_descriptions (void)
{
@@ -993,4 +1133,8 @@ file instead of querying the remote target."),
Unset the file to read for an XML target description. When unset,\n\
GDB will read the description from the target."),
&tdesc_unset_cmdlist);
+
+ add_cmd ("c-tdesc", class_maintenance, maint_print_c_tdesc_cmd, _("\
+Print the current target description as a C source file."),
+ &maintenanceprintlist);
}