1 /* Native-dependent code for FreeBSD.
3 Copyright (C) 2002, 2003, 2004, 2007, 2008, 2009
4 Free Software Foundation, Inc.
6 This file is part of GDB.
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.
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.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>. */
26 #include "gdbthread.h"
28 #include "gdb_assert.h"
29 #include "gdb_string.h"
30 #include <sys/types.h>
31 #include <sys/procfs.h>
32 #include <sys/sysctl.h>
37 /* Return a the name of file that can be opened to get the symbols for
38 the child process identified by PID. */
41 fbsd_pid_to_exec_file (int pid
)
43 size_t len
= MAXPATHLEN
;
44 char *buf
= xcalloc (len
, sizeof (char));
47 #ifdef KERN_PROC_PATHNAME
52 mib
[2] = KERN_PROC_PATHNAME
;
54 if (sysctl (mib
, 4, buf
, &len
, NULL
, 0) == 0)
58 path
= xstrprintf ("/proc/%d/file", pid
);
59 if (readlink (path
, buf
, MAXPATHLEN
) == -1)
70 fbsd_read_mapping (FILE *mapfile
, unsigned long *start
, unsigned long *end
,
73 /* FreeBSD 5.1-RELEASE uses a 256-byte buffer. */
75 int resident
, privateresident
;
79 /* As of FreeBSD 5.0-RELEASE, the layout is described in
80 /usr/src/sys/fs/procfs/procfs_map.c. Somewhere in 5.1-CURRENT a
81 new column was added to the procfs map. Therefore we can't use
82 fscanf since we need to support older releases too. */
83 if (fgets (buf
, sizeof buf
, mapfile
) != NULL
)
84 ret
= sscanf (buf
, "%lx %lx %d %d %lx %s", start
, end
,
85 &resident
, &privateresident
, &obj
, protection
);
87 return (ret
!= 0 && ret
!= EOF
);
90 /* Iterate over all the memory regions in the current inferior,
91 calling FUNC for each memory region. OBFD is passed as the last
95 fbsd_find_memory_regions (int (*func
) (CORE_ADDR
, unsigned long,
96 int, int, int, void *),
99 pid_t pid
= ptid_get_pid (inferior_ptid
);
102 unsigned long start
, end
, size
;
104 int read
, write
, exec
;
105 struct cleanup
*cleanup
;
107 mapfilename
= xstrprintf ("/proc/%ld/map", (long) pid
);
108 cleanup
= make_cleanup (xfree
, mapfilename
);
109 mapfile
= fopen (mapfilename
, "r");
111 error (_("Couldn't open %s."), mapfilename
);
112 make_cleanup_fclose (mapfile
);
115 fprintf_filtered (gdb_stdout
,
116 "Reading memory regions from %s\n", mapfilename
);
118 /* Now iterate until end-of-file. */
119 while (fbsd_read_mapping (mapfile
, &start
, &end
, &protection
[0]))
123 read
= (strchr (protection
, 'r') != 0);
124 write
= (strchr (protection
, 'w') != 0);
125 exec
= (strchr (protection
, 'x') != 0);
129 fprintf_filtered (gdb_stdout
,
130 "Save segment, %ld bytes at 0x%s (%c%c%c)\n",
131 size
, paddr_nz (start
),
137 /* Invoke the callback function to create the corefile segment. */
138 func (start
, size
, read
, write
, exec
, obfd
);
141 do_cleanups (cleanup
);
146 find_signalled_thread (struct thread_info
*info
, void *data
)
148 if (info
->stop_signal
!= TARGET_SIGNAL_0
149 && ptid_get_pid (info
->ptid
) == ptid_get_pid (inferior_ptid
))
155 static enum target_signal
156 find_stop_signal (void)
158 struct thread_info
*info
=
159 iterate_over_threads (find_signalled_thread
, NULL
);
162 return info
->stop_signal
;
164 return TARGET_SIGNAL_0
;
167 /* Create appropriate note sections for a corefile, returning them in
171 fbsd_make_corefile_notes (bfd
*obfd
, int *note_size
)
173 const struct regcache
*regcache
= get_current_regcache ();
174 struct gdbarch
*gdbarch
= get_regcache_arch (regcache
);
177 char *note_data
= NULL
;
178 Elf_Internal_Ehdr
*i_ehdrp
;
179 const struct regset
*regset
;
182 /* Put a "FreeBSD" label in the ELF header. */
183 i_ehdrp
= elf_elfheader (obfd
);
184 i_ehdrp
->e_ident
[EI_OSABI
] = ELFOSABI_FREEBSD
;
186 gdb_assert (gdbarch_regset_from_core_section_p (gdbarch
));
189 regset
= gdbarch_regset_from_core_section (gdbarch
, ".reg", size
);
190 gdb_assert (regset
&& regset
->collect_regset
);
191 regset
->collect_regset (regset
, regcache
, -1, &gregs
, size
);
193 note_data
= elfcore_write_prstatus (obfd
, note_data
, note_size
,
194 ptid_get_pid (inferior_ptid
),
195 find_stop_signal (), &gregs
);
197 size
= sizeof fpregs
;
198 regset
= gdbarch_regset_from_core_section (gdbarch
, ".reg2", size
);
199 gdb_assert (regset
&& regset
->collect_regset
);
200 regset
->collect_regset (regset
, regcache
, -1, &fpregs
, size
);
202 note_data
= elfcore_write_prfpreg (obfd
, note_data
, note_size
,
203 &fpregs
, sizeof (fpregs
));
205 if (get_exec_file (0))
207 char *fname
= strrchr (get_exec_file (0), '/') + 1;
208 char *psargs
= xstrdup (fname
);
210 if (get_inferior_args ())
211 psargs
= reconcat (psargs
, psargs
, " ", get_inferior_args (), NULL
);
213 note_data
= elfcore_write_prpsinfo (obfd
, note_data
, note_size
,
217 make_cleanup (xfree
, note_data
);
This page took 0.034343 seconds and 4 git commands to generate.