1 /* Native-dependent code for FreeBSD.
3 Copyright (C) 2002-2015 Free Software Foundation, Inc.
5 This file is part of GDB.
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.
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.
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/>. */
25 #include "gdbthread.h"
26 #include <sys/types.h>
27 #include <sys/procfs.h>
28 #include <sys/sysctl.h>
29 #ifdef HAVE_KINFO_GETVMMAP
37 /* Return the name of a file that can be opened to get the symbols for
38 the child process identified by PID. */
41 fbsd_pid_to_exec_file (struct target_ops *self, int pid)
43 ssize_t len = PATH_MAX;
44 static char buf[PATH_MAX];
47 #ifdef KERN_PROC_PATHNAME
52 mib[2] = KERN_PROC_PATHNAME;
54 if (sysctl (mib, 4, buf, &len, NULL, 0) == 0)
58 xsnprintf (name, PATH_MAX, "/proc/%d/exe", pid);
59 len = readlink (name, buf, PATH_MAX - 1);
69 #ifdef HAVE_KINFO_GETVMMAP
70 /* Iterate over all the memory regions in the current inferior,
71 calling FUNC for each memory region. OBFD is passed as the last
75 fbsd_find_memory_regions (struct target_ops *self,
76 find_memory_region_ftype func, void *obfd)
78 pid_t pid = ptid_get_pid (inferior_ptid);
79 struct kinfo_vmentry *vmentl, *kve;
81 struct cleanup *cleanup;
84 vmentl = kinfo_getvmmap (pid, &nitems);
86 perror_with_name (_("Couldn't fetch VM map entries."));
87 cleanup = make_cleanup (free, vmentl);
89 for (i = 0; i < nitems; i++)
93 /* Skip unreadable segments and those where MAP_NOCORE has been set. */
94 if (!(kve->kve_protection & KVME_PROT_READ)
95 || kve->kve_flags & KVME_FLAG_NOCOREDUMP)
98 /* Skip segments with an invalid type. */
99 if (kve->kve_type != KVME_TYPE_DEFAULT
100 && kve->kve_type != KVME_TYPE_VNODE
101 && kve->kve_type != KVME_TYPE_SWAP
102 && kve->kve_type != KVME_TYPE_PHYS)
105 size = kve->kve_end - kve->kve_start;
108 fprintf_filtered (gdb_stdout,
109 "Save segment, %ld bytes at %s (%c%c%c)\n",
111 paddress (target_gdbarch (), kve->kve_start),
112 kve->kve_protection & KVME_PROT_READ ? 'r' : '-',
113 kve->kve_protection & KVME_PROT_WRITE ? 'w' : '-',
114 kve->kve_protection & KVME_PROT_EXEC ? 'x' : '-');
117 /* Invoke the callback function to create the corefile segment.
118 Pass MODIFIED as true, we do not know the real modification state. */
119 func (kve->kve_start, size, kve->kve_protection & KVME_PROT_READ,
120 kve->kve_protection & KVME_PROT_WRITE,
121 kve->kve_protection & KVME_PROT_EXEC, 1, obfd);
123 do_cleanups (cleanup);
128 fbsd_read_mapping (FILE *mapfile, unsigned long *start, unsigned long *end,
131 /* FreeBSD 5.1-RELEASE uses a 256-byte buffer. */
133 int resident, privateresident;
137 /* As of FreeBSD 5.0-RELEASE, the layout is described in
138 /usr/src/sys/fs/procfs/procfs_map.c. Somewhere in 5.1-CURRENT a
139 new column was added to the procfs map. Therefore we can't use
140 fscanf since we need to support older releases too. */
141 if (fgets (buf, sizeof buf, mapfile) != NULL)
142 ret = sscanf (buf, "%lx %lx %d %d %lx %s", start, end,
143 &resident, &privateresident, &obj, protection);
145 return (ret != 0 && ret != EOF);
148 /* Iterate over all the memory regions in the current inferior,
149 calling FUNC for each memory region. OBFD is passed as the last
153 fbsd_find_memory_regions (struct target_ops *self,
154 find_memory_region_ftype func, void *obfd)
156 pid_t pid = ptid_get_pid (inferior_ptid);
159 unsigned long start, end, size;
161 int read, write, exec;
162 struct cleanup *cleanup;
164 mapfilename = xstrprintf ("/proc/%ld/map", (long) pid);
165 cleanup = make_cleanup (xfree, mapfilename);
166 mapfile = fopen (mapfilename, "r");
168 error (_("Couldn't open %s."), mapfilename);
169 make_cleanup_fclose (mapfile);
172 fprintf_filtered (gdb_stdout,
173 "Reading memory regions from %s\n", mapfilename);
175 /* Now iterate until end-of-file. */
176 while (fbsd_read_mapping (mapfile, &start, &end, &protection[0]))
180 read = (strchr (protection, 'r') != 0);
181 write = (strchr (protection, 'w') != 0);
182 exec = (strchr (protection, 'x') != 0);
186 fprintf_filtered (gdb_stdout,
187 "Save segment, %ld bytes at %s (%c%c%c)\n",
188 size, paddress (target_gdbarch (), start),
194 /* Invoke the callback function to create the corefile segment.
195 Pass MODIFIED as true, we do not know the real modification state. */
196 func (start, size, read, write, exec, 1, obfd);
199 do_cleanups (cleanup);
205 fbsd_nat_add_target (struct target_ops *t)
207 t->to_pid_to_exec_file = fbsd_pid_to_exec_file;
208 t->to_find_memory_regions = fbsd_find_memory_regions;