gas/testsuite/
[external/binutils.git] / gdb / windows-tdep.c
1 /* Copyright (C) 2008, 2009 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 "defs.h"
19 #include "windows-tdep.h"
20 #include "gdb_obstack.h"
21 #include "xml-support.h"
22
23 void
24 windows_xfer_shared_library (const char* so_name, CORE_ADDR load_addr,
25                              struct obstack *obstack)
26 {
27   char *p;
28   obstack_grow_str (obstack, "<library name=\"");
29   p = xml_escape_text (so_name);
30   obstack_grow_str (obstack, p);
31   xfree (p);
32   obstack_grow_str (obstack, "\"><segment address=\"0x");
33   /* The symbols in a dll are offset by 0x1000, which is the the
34      offset from 0 of the first byte in an image - because of the file
35      header and the section alignment. */
36   p = paddr_nz (load_addr + 0x1000);
37   obstack_grow_str (obstack, p);
38   obstack_grow_str (obstack, "\"/></library>");
39 }