Merge from vendor branch BIND:
[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.4 2005/03/05 13:23:15 hmp 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         void    *buf;
70         int     type;
71         size_t  i, len;
72         struct  xunpcb *xunp;
73         char mibvar[sizeof "net.local.seqpacket.pcblist"];
74
75         for (type = SOCK_STREAM; type <= SOCK_SEQPACKET; type++) {
76                 sprintf(mibvar, "net.local.%s.pcblist", socktype[type]);
77
78                 len = 0;
79                 if (sysctlbyname(mibvar, 0, &len, 0, 0) < 0) {
80                         if (errno != ENOENT)
81                                 warn("sysctl: %s", mibvar);
82                         continue;
83                 }
84                 if ((buf = malloc(len)) == 0) {
85                         warn("malloc %lu bytes", (u_long)len);
86                         return;
87                 }
88                 if (sysctlbyname(mibvar, buf, &len, 0, 0) < 0) {
89                         warn("sysctl: %s", mibvar);
90                         free(buf);
91                         return;
92                 }
93
94                 xunp = (struct xunpcb *)buf;
95                 len /= sizeof(*xunp);
96                 for (i = 0; i < len; i++) {
97                         if (xunp[i].xu_len != sizeof(*xunp)) {
98                                 warnx("sysctl: ABI mismatch");
99                                 free(buf);
100                                 return;
101                         }
102                         unixdomainpr(&xunp[i], &xunp[i].xu_socket);
103                 }
104                 free(buf);
105         }
106 }
107
108 static void
109 unixdomainpr(struct xunpcb *xunp, struct xsocket *so)
110 {
111         struct unpcb *unp;
112         struct sockaddr_un *sa;
113         static int first = 1;
114
115         unp = &xunp->xu_unp;
116         if (unp->unp_addr)
117                 sa = &xunp->xu_addr;
118         else
119                 sa = (struct sockaddr_un *)0;
120
121         if (first) {
122                 printf("Active UNIX domain sockets\n");
123                 printf(
124 "%-8.8s %-6.6s %-6.6s %-6.6s %8.8s %8.8s %8.8s %8.8s Addr\n",
125                     "Address", "Type", "Recv-Q", "Send-Q",
126                     "Inode", "Conn", "Refs", "Nextref");
127                 first = 0;
128         }
129         printf("%8lx %-6.6s %6ld %6ld %8lx %8lx %8lx %8lx",
130                (long)so->so_pcb, socktype[so->so_type], so->so_rcv.sb_cc,
131                so->so_snd.sb_cc,
132                (long)unp->unp_vnode, (long)unp->unp_conn,
133                (long)LIST_FIRST(&unp->unp_refs), (long)LIST_NEXT(unp, unp_reflink));
134         if (sa)
135                 printf(" %.*s",
136                     (int)(sa->sun_len - offsetof(struct sockaddr_un, sun_path)),
137                     sa->sun_path);
138         putchar('\n');
139 }