2 * Copyright (c) 1992, 1993, 2019
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * @(#) Copyright (c) 1992, 1993 The Regents of the University of California. All rights reserved.
30 * @(#)gcore.c 8.2 (Berkeley) 9/23/93
31 * $FreeBSD: src/usr.bin/gcore/gcore.c,v 1.15.2.2 2001/08/17 20:56:22 mikeh Exp $
35 * Originally written by Eric Cooper in Fall 1981.
36 * Inspired by a version 6 program by Len Levin, 1978.
37 * Several pieces of code lifted from Bill Joy's 4BSD ps.
38 * Most recently, hacked beyond recognition for 4.4BSD by Steven McCanne,
39 * Lawrence Berkeley Laboratory.
41 * Portions of this software were developed by the Computer Systems
42 * Engineering group at Lawrence Berkeley Laboratory under DARPA
43 * contract BG 91-66 and contributed to Berkeley.
45 #include <sys/param.h>
48 #include <sys/sysctl.h>
49 #include <machine/elf.h>
51 #include <machine/vmparam.h>
66 static void killed(int);
67 static void restart_target(void);
68 static void usage(void) __dead2
;
73 ssize_t gcore_seg_limit
= -1;
77 main(int argc
, char **argv
)
80 int ch
, cnt
, efd
, fd
, sflag
;
81 char *binfile
, *corefile
;
83 char fname
[MAXPATHLEN
+ 1];
87 while ((ch
= getopt(argc
, argv
, "c:l:sv")) != -1) {
93 gcore_seg_limit
= strtol(optarg
, &eptr
, 0);
99 gcore_seg_limit
*= 1024;
103 gcore_seg_limit
*= 1024;
107 gcore_seg_limit
*= 1024;
111 gcore_seg_limit
*= 1024;
132 /* XXX we should check that the pid argument is really a number */
136 asprintf(&binfile
, "/proc/%d/file", pid
);
138 errx(1, "allocation failure");
148 efd
= open(binfile
, O_RDONLY
, 0);
150 err(1, "%s", binfile
);
152 cnt
= read(efd
, &exec
, sizeof(Elf_Ehdr
));
153 if (cnt
!= sizeof(Elf_Ehdr
))
154 errx(1, "%s exec header: %s",
155 binfile
, cnt
> 0 ? strerror(EIO
) : strerror(errno
));
156 if (IS_ELF(*(Elf_Ehdr
*)&exec
)) {
159 errx(1, "Invalid executable file");
161 if (corefile
== NULL
) {
162 snprintf(fname
, sizeof(fname
), "core.%d", pid
);
165 fd
= open(corefile
, O_RDWR
|O_CREAT
|O_TRUNC
, DEFFILEMODE
);
167 err(1, "%s", corefile
);
170 signal(SIGHUP
, killed
);
171 signal(SIGINT
, killed
);
172 signal(SIGTERM
, killed
);
173 if (kill(pid
, SIGSTOP
) == -1)
174 err(1, "%d: stop signal", pid
);
175 atexit(restart_target
);
178 elf_coredump(fd
, pid
);
188 signal(sig
, SIG_DFL
);
202 "usage: gcore [-sv] [-c core] [-l seglimit] [executable] pid\n");