2 * SPDX-License-Identifier: BSD-3-Clause
4 * Copyright (c) 1992, 1993
5 * The Regents of the University of California. All rights reserved.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 static const char copyright[] =
34 "@(#) Copyright (c) 1992, 1993\n\
35 The Regents of the University of California. All rights reserved.\n";
40 static char sccsid[] = "@(#)gcore.c 8.2 (Berkeley) 9/23/93";
43 #include <sys/cdefs.h>
45 * Originally written by Eric Cooper in Fall 1981.
46 * Inspired by a version 6 program by Len Levin, 1978.
47 * Several pieces of code lifted from Bill Joy's 4BSD ps.
48 * Most recently, hacked beyond recognition for 4.4BSD by Steven McCanne,
49 * Lawrence Berkeley Laboratory.
51 * Portions of this software were developed by the Computer Systems
52 * Engineering group at Lawrence Berkeley Laboratory under DARPA
53 * contract BG 91-66 and contributed to Berkeley.
56 #include <sys/param.h>
57 #include <sys/ptrace.h>
60 #include <sys/linker_set.h>
61 #include <sys/sysctl.h>
75 static void killed(int);
76 static void usage(void) __dead2;
79 static bool kflag = false;
81 SET_DECLARE(dumpset, struct dumpers);
84 open_corefile(char *corefile)
86 char fname[MAXPATHLEN];
89 if (corefile == NULL) {
90 (void)snprintf(fname, sizeof(fname), "core.%d", pid);
93 fd = open(corefile, O_RDWR | O_CREAT | O_TRUNC, DEFFILEMODE);
95 err(1, "%s", corefile);
100 kcoredump(int fd, pid_t pid)
102 struct ptrace_coredump pc;
103 int error, res, ret, waited;
105 error = ptrace(PT_ATTACH, pid, NULL, 0);
109 waited = waitpid(pid, &res, 0);
111 err(1, "wait for STOP");
114 memset(&pc, 0, sizeof(pc));
116 pc.pc_flags = (pflags & PFLAGS_FULL) != 0 ? PC_ALL : 0;
117 error = ptrace(PT_COREDUMP, pid, (void *)&pc, sizeof(pc));
123 waited = waitpid(pid, &res, WNOHANG);
125 warn("wait after coredump");
129 error = ptrace(PT_DETACH, pid, NULL, 0);
131 warn("detach failed, check process status");
139 main(int argc, char *argv[])
141 int ch, efd, fd, name[4];
142 char *binfile, *corefile;
143 char passpath[MAXPATHLEN];
144 struct dumpers **d, *dumper;
149 while ((ch = getopt(argc, argv, "c:fk")) != -1) {
155 pflags |= PFLAGS_FULL;
168 /* XXX we should check that the pid argument is really a number */
182 fd = open_corefile(corefile);
189 name[2] = KERN_PROC_PATHNAME;
191 len = sizeof(passpath);
192 if (sysctl(name, 4, passpath, &len, NULL, 0) == -1)
193 errx(1, "kern.proc.pathname failure");
196 efd = open(binfile, O_RDONLY, 0);
198 err(1, "%s", binfile);
200 SET_FOREACH(d, dumpset) {
201 lseek(efd, 0, SEEK_SET);
202 if (((*d)->ident)(efd, pid, binfile)) {
204 lseek(efd, 0, SEEK_SET);
209 errx(1, "Invalid executable file");
210 fd = open_corefile(corefile);
212 dumper->dump(efd, fd, pid);
222 (void)fprintf(stderr,
223 "usage: gcore [-kf] [-c core] [executable] pid\n");