Merge from vendor branch GDB:
[dragonfly.git] / usr.bin / netstat / unix.c
1 /*-
2  * Copyright (c) 1983, 1988, 1993
3  *      The Regents of the University of California.  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  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *      This product includes software developed by the University of
16  *      California, Berkeley and its contributors.
17  * 4. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  *
33  * @(#)unix.c   8.1 (Berkeley) 6/6/93
34  * $FreeBSD: src/usr.bin/netstat/unix.c,v 1.12.2.2 2001/08/10 09:07:09 ru Exp $
35  * $DragonFly: src/usr.bin/netstat/unix.c,v 1.2 2003/06/17 04:29:30 dillon Exp $
36  */
37
38 /*
39  * Display protocol blocks in the unix domain.
40  */
41 #include <sys/param.h>
42 #include <sys/queue.h>
43 #include <sys/protosw.h>
44 #include <sys/socket.h>
45 #include <sys/socketvar.h>
46 #include <sys/mbuf.h>
47 #include <sys/sysctl.h>
48 #include <sys/un.h>
49 #include <sys/unpcb.h>
50
51 #include <netinet/in.h>
52
53 #include <errno.h>
54 #include <err.h>
55 #include <stddef.h>
56 #include <stdio.h>
57 #include <stdlib.h>
58 #include <kvm.h>
59 #include "netstat.h"
60
61 static  void unixdomainpr (struct xunpcb *, struct xsocket *);
62
63 static  const char *const socktype[] =
64     { "#0", "stream", "dgram", "raw", "rdm", "seqpacket" };
65
66 void
67 unixpr(void)
68 {
69         char    *buf;
70         int     type;
71         size_t  len;
72         struct  xsocket *so;
73         struct  xunpgen *xug, *oxug;
74         struct  xunpcb *xunp;
75         char mibvar[sizeof "net.local.seqpacket.pcblist"];
76
77         for (type = SOCK_STREAM; type <= SOCK_SEQPACKET; type++) {
78                 sprintf(mibvar, "net.local.%s.pcblist", socktype[type]);
79
80                 len = 0;
81                 if (sysctlbyname(mibvar, 0, &len, 0, 0) < 0) {
82                         if (errno != ENOENT)
83                                 warn("sysctl: %s", mibvar);
84                         continue;
85                 }
86                 if ((buf = malloc(len)) == 0) {
87                         warn("malloc %lu bytes", (u_long)len);
88                         return;
89                 }
90                 if (sysctlbyname(mibvar, buf, &len, 0, 0) < 0) {
91                         warn("sysctl: %s", mibvar);
92                         free(buf);
93                         return;
94                 }
95
96                 oxug = xug = (struct xunpgen *)buf;
97                 for (xug = (struct xunpgen *)((char *)xug + xug->xug_len);
98                      xug->xug_len > sizeof(struct xunpgen);
99                      xug = (struct xunpgen *)((char *)xug + xug->xug_len)) {
100                         xunp = (struct xunpcb *)xug;
101                         so = &xunp->xu_socket;
102
103                         /* Ignore PCBs which were freed during copyout. */
104                         if (xunp->xu_unp.unp_gencnt > oxug->xug_gen)
105                                 continue;
106                         unixdomainpr(xunp, so);
107                 }
108                 if (xug != oxug && xug->xug_gen != oxug->xug_gen) {
109                         if (oxug->xug_count > xug->xug_count) {
110                                 printf("Some %s sockets may have been deleted.\n",
111                                        socktype[type]);
112                         } else if (oxug->xug_count < xug->xug_count) {
113                                 printf("Some %s sockets may have been created.\n",
114                                socktype[type]);
115                         } else {
116                                 printf("Some %s sockets may have been created or deleted",
117                                socktype[type]);
118                         }
119                 }
120                 free(buf);
121         }
122 }
123
124 static void
125 unixdomainpr(struct xunpcb *xunp, struct xsocket *so)
126 {
127         struct unpcb *unp;
128         struct sockaddr_un *sa;
129         static int first = 1;
130
131         unp = &xunp->xu_unp;
132         if (unp->unp_addr)
133                 sa = &xunp->xu_addr;
134         else
135                 sa = (struct sockaddr_un *)0;
136
137         if (first) {
138                 printf("Active UNIX domain sockets\n");
139                 printf(
140 "%-8.8s %-6.6s %-6.6s %-6.6s %8.8s %8.8s %8.8s %8.8s Addr\n",
141                     "Address", "Type", "Recv-Q", "Send-Q",
142                     "Inode", "Conn", "Refs", "Nextref");
143                 first = 0;
144         }
145         printf("%8lx %-6.6s %6ld %6ld %8lx %8lx %8lx %8lx",
146                (long)so->so_pcb, socktype[so->so_type], so->so_rcv.sb_cc,
147                so->so_snd.sb_cc,
148                (long)unp->unp_vnode, (long)unp->unp_conn,
149                (long)LIST_FIRST(&unp->unp_refs), (long)LIST_NEXT(unp, unp_reflink));
150         if (sa)
151                 printf(" %.*s",
152                     (int)(sa->sun_len - offsetof(struct sockaddr_un, sun_path)),
153                     sa->sun_path);
154         putchar('\n');
155 }