Commit | Line | Data |
---|---|---|
a90cd31d | 1 | /* FreeBSD-specific methods for using the /proc file system. |
fc07cc2d MK |
2 | |
3 | Copyright 2002, 2003 Free Software Foundation, Inc. | |
a90cd31d MK |
4 | |
5 | This file is part of GDB. | |
6 | ||
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 2 of the License, or | |
10 | (at your option) any later version. | |
11 | ||
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. | |
16 | ||
17 | You should have received a copy of the GNU General Public License | |
18 | along with this program; if not, write to the Free Software | |
19 | Foundation, Inc., 59 Temple Place - Suite 330, | |
20 | Boston, MA 02111-1307, USA. */ | |
21 | ||
22 | #include "defs.h" | |
23 | #include "gdbcore.h" | |
24 | #include "inferior.h" | |
b66d6d2e | 25 | #include "gdb_string.h" |
a90cd31d MK |
26 | |
27 | #include <sys/procfs.h> | |
28 | #include <sys/types.h> | |
29 | ||
30 | #include "elf-bfd.h" | |
31 | ||
32 | #include "gregset.h" | |
33 | ||
34 | char * | |
35 | child_pid_to_exec_file (int pid) | |
36 | { | |
37 | char *path; | |
38 | char *buf; | |
39 | ||
a4e4e501 | 40 | xasprintf (&path, "/proc/%d/file", pid); |
a90cd31d MK |
41 | buf = xcalloc (MAXPATHLEN, sizeof (char)); |
42 | make_cleanup (xfree, path); | |
43 | make_cleanup (xfree, buf); | |
44 | ||
45 | if (readlink (path, buf, MAXPATHLEN) > 0) | |
46 | return buf; | |
47 | ||
48 | return NULL; | |
49 | } | |
50 | ||
51 | static int | |
fc07cc2d | 52 | read_mapping (FILE *mapfile, unsigned long *start, unsigned long *end, |
a90cd31d MK |
53 | char *protection) |
54 | { | |
55 | int resident, privateresident; | |
56 | unsigned long obj; | |
57 | int ref_count, shadow_count; | |
58 | unsigned flags; | |
59 | char cow[5], access[4]; | |
60 | char type[8]; | |
61 | int ret; | |
62 | ||
63 | /* The layout is described in /usr/src/miscfs/procfs/procfs_map.c. */ | |
64 | ret = fscanf (mapfile, "%lx %lx %d %d %lx %s %d %d %x %s %s %s\n", | |
65 | start, end, | |
66 | &resident, &privateresident, &obj, | |
67 | protection, | |
68 | &ref_count, &shadow_count, &flags, cow, access, type); | |
69 | ||
70 | return (ret != 0 && ret != EOF); | |
71 | } | |
72 | ||
73 | static int | |
fc07cc2d MK |
74 | fbsd_find_memory_regions (int (*func) (CORE_ADDR, unsigned long, |
75 | int, int, int, void *), | |
a90cd31d MK |
76 | void *obfd) |
77 | { | |
78 | pid_t pid = ptid_get_pid (inferior_ptid); | |
79 | char *mapfilename; | |
80 | FILE *mapfile; | |
81 | unsigned long start, end, size; | |
82 | char protection[4]; | |
83 | int read, write, exec; | |
84 | ||
a4e4e501 | 85 | xasprintf (&mapfilename, "/proc/%ld/map", (long) pid); |
a90cd31d MK |
86 | mapfile = fopen (mapfilename, "r"); |
87 | if (mapfile == NULL) | |
88 | error ("Couldn't open %s\n", mapfilename); | |
89 | ||
90 | if (info_verbose) | |
91 | fprintf_filtered (gdb_stdout, | |
92 | "Reading memory regions from %s\n", mapfilename); | |
93 | ||
94 | /* Now iterate until end-of-file. */ | |
95 | while (read_mapping (mapfile, &start, &end, &protection[0])) | |
96 | { | |
97 | size = end - start; | |
98 | ||
99 | read = (strchr (protection, 'r') != 0); | |
100 | write = (strchr (protection, 'w') != 0); | |
101 | exec = (strchr (protection, 'x') != 0); | |
102 | ||
103 | if (info_verbose) | |
104 | { | |
105 | fprintf_filtered (gdb_stdout, | |
106 | "Save segment, %ld bytes at 0x%s (%c%c%c)\n", | |
107 | size, paddr_nz (start), | |
108 | read ? 'r' : '-', | |
109 | write ? 'w' : '-', | |
110 | exec ? 'x' : '-'); | |
111 | } | |
112 | ||
113 | /* Invoke the callback function to create the corefile segment. */ | |
114 | func (start, size, read, write, exec, obfd); | |
115 | } | |
116 | ||
117 | fclose (mapfile); | |
118 | return 0; | |
119 | } | |
120 | ||
121 | static char * | |
122 | fbsd_make_corefile_notes (bfd *obfd, int *note_size) | |
123 | { | |
124 | gregset_t gregs; | |
125 | fpregset_t fpregs; | |
126 | char *note_data = NULL; | |
9a12a2a0 MK |
127 | Elf_Internal_Ehdr *i_ehdrp; |
128 | ||
129 | /* Put a "FreeBSD" label in the ELF header. */ | |
130 | i_ehdrp = elf_elfheader (obfd); | |
131 | i_ehdrp->e_ident[EI_OSABI] = ELFOSABI_FREEBSD; | |
a90cd31d MK |
132 | |
133 | fill_gregset (&gregs, -1); | |
25e60c9b MK |
134 | note_data = elfcore_write_prstatus (obfd, note_data, note_size, |
135 | ptid_get_pid (inferior_ptid), | |
136 | stop_signal, &gregs); | |
a90cd31d MK |
137 | |
138 | fill_fpregset (&fpregs, -1); | |
25e60c9b MK |
139 | note_data = elfcore_write_prfpreg (obfd, note_data, note_size, |
140 | &fpregs, sizeof (fpregs)); | |
a90cd31d MK |
141 | |
142 | if (get_exec_file (0)) | |
143 | { | |
144 | char *fname = strrchr (get_exec_file (0), '/') + 1; | |
a4e4e501 | 145 | char *psargs = xstrdup (fname); |
a90cd31d MK |
146 | |
147 | if (get_inferior_args ()) | |
148 | psargs = reconcat (psargs, psargs, " ", get_inferior_args (), NULL); | |
149 | ||
25e60c9b MK |
150 | note_data = elfcore_write_prpsinfo (obfd, note_data, note_size, |
151 | fname, psargs); | |
a90cd31d MK |
152 | } |
153 | ||
154 | make_cleanup (xfree, note_data); | |
155 | return note_data; | |
156 | } | |
157 | \f | |
158 | ||
159 | void | |
160 | _initialize_fbsd_proc (void) | |
161 | { | |
162 | extern void inftarg_set_find_memory_regions (); | |
163 | extern void inftarg_set_make_corefile_notes (); | |
164 | ||
165 | inftarg_set_find_memory_regions (fbsd_find_memory_regions); | |
166 | inftarg_set_make_corefile_notes (fbsd_make_corefile_notes); | |
167 | } |