Home | History | Annotate | Line # | Download | only in gcore
gcore.c revision 1.4 
      1 /*	$NetBSD: gcore.c,v 1.4 2003/01/23 17:34:50 christos Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2003 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Christos Zoulas.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  * 3. All advertising materials mentioning features or use of this software
     19  *    must display the following acknowledgement:
     20  *        This product includes software developed by the NetBSD
     21  *        Foundation, Inc. and its contributors.
     22  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23  *    contributors may be used to endorse or promote products derived
     24  *    from this software without specific prior written permission.
     25  *
     26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36  * POSSIBILITY OF SUCH DAMAGE.
     37  */
     38 
     39 #include <sys/cdefs.h>
     40 __RCSID("$NetBSD: gcore.c,v 1.4 2003/01/23 17:34:50 christos Exp $");
     41 
     42 #include <sys/types.h>
     43 #include <sys/param.h>
     44 #include <sys/time.h>
     45 #include <sys/ptrace.h>
     46 #include <sys/proc.h>
     47 
     48 #include <stdio.h>
     49 #include <err.h>
     50 #include <limits.h>
     51 #include <stdlib.h>
     52 #include <unistd.h>
     53 #include <errno.h>
     54 
     55 static void usage(void) __attribute__((__noreturn__));
     56 
     57 static void
     58 usage(void)
     59 {
     60 	(void)fprintf(stderr, "Usage: %s <pid> [...<pid>]", getprogname());
     61 	exit(1);
     62 }
     63 
     64 
     65 int
     66 main(int argc, char **argv)
     67 {
     68 	int c;
     69 
     70 	while ((c = getopt(argc, argv, "o:")) != -1)
     71 		switch (c) {
     72 		case 'o':
     73 			errx(1, "-o is not supported yet.");
     74 			/*NOTREACHED*/
     75 		case '?':
     76 		default:
     77 			usage();
     78 			/*NOTREACHED*/
     79 		}
     80 
     81 	if (optind == argc)
     82 		usage();
     83 
     84 	for (c = optind; c < argc; c++) {
     85 		char *ep;
     86 		long lval = strtol(argv[c], &ep, 0);
     87 
     88 		if (argv[c] == '\0' || *ep)
     89 			errx(1, "`%s' is not a number.", argv[c]);
     90 		if (errno == ERANGE && (lval == LONG_MAX || lval == LONG_MIN))
     91 			err(1, "Pid `%s'", argv[c]);
     92 		if (ptrace(PT_DUMPCORE, (pid_t)lval, NULL, 0) == -1)
     93 			err(1, "ptrace(PT_DUMPCORE) failed");
     94 	}
     95 	return 0;
     96 }
     97