Merge from vendor branch OPENSSH:
[dragonfly.git] / sbin / kldstat / kldstat.c
1 /*-
2  * Copyright (c) 1997 Doug Rabson
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
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  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD: src/sbin/kldstat/kldstat.c,v 1.7.2.2 2000/07/01 07:56:00 ps Exp $
27  * $DragonFly: src/sbin/kldstat/kldstat.c,v 1.4 2005/04/22 02:23:23 swildner Exp $
28  */
29
30 #include <sys/types.h>
31 #include <sys/param.h>
32 #include <sys/module.h>
33 #include <sys/linker.h>
34
35 #include <err.h>
36 #include <stdio.h>
37 #include <stdlib.h>
38 #include <unistd.h>
39
40 #define POINTER_WIDTH   10
41
42 static void
43 printmod(int modid)
44 {
45     struct module_stat stat;
46
47     stat.version = sizeof(struct module_stat);
48     if (modstat(modid, &stat) < 0)
49         warn("can't stat module id %d", modid);
50     else
51         printf("\t\t%2d %s\n", stat.id, stat.name);
52 }
53
54 static void
55 printfile(int fileid, int verbose)
56 {
57     struct kld_file_stat stat;
58     int modid;
59
60     stat.version = sizeof(struct kld_file_stat);
61     if (kldstat(fileid, &stat) < 0)
62         warn("can't stat file id %d", fileid);
63     else
64         printf("%2d %4d %p %-8x %s\n",
65                stat.id, stat.refs, stat.address, stat.size, stat.name);
66
67     if (verbose) {
68         printf("\tContains modules:\n");
69         printf("\t\tId Name\n");
70         for (modid = kldfirstmod(fileid); modid > 0;
71              modid = modfnext(modid))
72             printmod(modid);
73     }
74 }
75
76 static void
77 usage(void)
78 {
79     fprintf(stderr, "usage: kldstat [-v] [-i id] [-n name]\n");
80     exit(1);
81 }
82
83 int
84 main(int argc, char** argv)
85 {
86     int c;
87     int verbose = 0;
88     int fileid = 0;
89     long tmp;
90     char* filename = NULL;
91     char *ep;
92
93     while ((c = getopt(argc, argv, "i:n:v")) != -1)
94         switch (c) {
95         case 'i':
96             tmp = strtol(optarg, &ep, 10);
97             if (*ep != NULL || tmp < INT_MIN || tmp > INT_MAX)
98                 errx(1, "invalid id value: %s", optarg);
99             fileid = (int)tmp;
100             break;
101         case 'n':
102             filename = optarg;
103             break;
104         case 'v':
105             verbose = 1;
106             break;
107         default:
108             usage();
109         }
110     argc -= optind;
111     argv += optind;
112
113     if (argc != 0)
114         usage();
115
116     if (filename != NULL) {
117         if ((fileid = kldfind(filename)) < 0)
118             err(1, "can't find file %s", filename);
119     }
120
121     printf("Id Refs Address%*c Size     Name\n", POINTER_WIDTH - 7, ' ');
122     if (fileid)
123         printfile(fileid, verbose);
124     else
125         for (fileid = kldnext(0); fileid > 0; fileid = kldnext(fileid))
126             printfile(fileid, verbose);
127
128     return 0;
129 }