Add the DragonFly cvs id and perform general cleanups on cvs/rcs/sccs ids. Most
[dragonfly.git] / usr.bin / systat / tcp.c
1 /*-
2  * Copyright (c) 1980, 1992, 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  * @(#)mbufs.c  8.1 (Berkeley) 6/6/93
34  * $FreeBSD: src/usr.bin/systat/tcp.c,v 1.3 1999/08/28 01:06:06 peter Exp $
35  * $DragonFly: src/usr.bin/systat/tcp.c,v 1.2 2003/06/17 04:29:32 dillon Exp $
36  */
37
38 #include <sys/param.h>
39 #include <sys/types.h>
40 #include <sys/socket.h>
41 #include <sys/sysctl.h>
42
43 #include <netinet/in.h>
44 #include <netinet/in_systm.h>
45 #include <netinet/ip.h>
46 #include <netinet/tcp.h>
47 #include <netinet/tcp_seq.h>
48 #include <netinet/tcp_fsm.h>
49 #include <netinet/tcp_timer.h>
50 #include <netinet/tcp_var.h>
51
52 #include <stdlib.h>
53 #include <string.h>
54 #include <paths.h>
55 #include "systat.h"
56 #include "extern.h"
57 #include "mode.h"
58
59 static struct tcpstat curstat, initstat, oldstat;
60
61 /*-
62 --0         1         2         3         4         5         6         7
63 --0123456789012345678901234567890123456789012345678901234567890123456789012345
64 01          TCP Connections                    TCP Packets
65 02999999999 connections initiated    999999999 total packets sent
66 03999999999 connections accepted     999999999 - data
67 04999999999 connections established  999999999 - data (retransmit)
68 05999999999 connections dropped      999999999 - ack-only
69 06999999999 - in embryonic state     999999999 - window probes
70 07999999999 - on retransmit timeout  999999999 - window updates
71 08999999999 - by keepalive           999999999 - urgent data only
72 09999999999 - from listen queue      999999999 - control
73 10                                   999999999 - resends by PMTU discovery
74 11          TCP Timers               999999999 total packets received
75 12999999999 potential rtt updates    999999999 - in sequence
76 13999999999 - successful             999999999 - completely duplicate
77 14999999999 delayed acks sent        999999999 - with some duplicate data
78 15999999999 retransmit timeouts      999999999 - out-of-order
79 16999999999 persist timeouts         999999999 - duplicate acks
80 17999999999 keepalive probes         999999999 - acks
81 18999999999 - timeouts               999999999 - window probes
82 19                                   999999999 - window updates
83 --0123456789012345678901234567890123456789012345678901234567890123456789012345
84 --0         1         2         3         4         5         6         7
85 */
86
87 WINDOW *
88 opentcp(void)
89 {
90         return (subwin(stdscr, LINES-5-1, 0, 5, 0));
91 }
92
93 void
94 closetcp(w)
95         WINDOW *w;
96 {
97         if (w == NULL)
98                 return;
99         wclear(w);
100         wrefresh(w);
101         delwin(w);
102 }
103
104 void
105 labeltcp(void)
106 {
107         wmove(wnd, 0, 0); wclrtoeol(wnd);
108 #define L(row, str) mvwprintw(wnd, row, 10, str)
109 #define R(row, str) mvwprintw(wnd, row, 45, str);
110         L(1, "TCP Connections");                R(1, "TCP Packets");
111         L(2, "connections initiated");          R(2, "total packets sent");
112         L(3, "connections accepted");           R(3, "- data");
113         L(4, "connections established");        R(4, "- data (retransmit)");
114         L(5, "connections dropped");            R(5, "- ack-only");
115         L(6, "- in embryonic state");           R(6, "- window probes");
116         L(7, "- on retransmit timeout");        R(7, "- window updates");
117         L(8, "- by keepalive");                 R(8, "- urgent data only");
118         L(9, "- from listen queue");            R(9, "- control");
119         R(10, "- resends by PMTU discovery");
120         L(11, "TCP Timers");            R(11, "total packets received");
121         L(12, "potential rtt updates");         R(12, "- in sequence");
122         L(13, "- successful");          R(13, "- completely duplicate");
123         L(14, "delayed acks sent");     R(14, "- with some duplicate data");
124         L(15, "retransmit timeouts");   R(15, "- out-of-order");
125         L(16, "persist timeouts");      R(16, "- duplicate acks");
126         L(17, "keepalive probes");      R(17, "- acks");
127         L(18, "- timeouts");            R(18, "- window probes");
128         R(19, "- window updates");
129 #undef L
130 #undef R
131 }
132
133 static void
134 domode(struct tcpstat *ret)
135 {
136         const struct tcpstat *sub;
137         int divisor = 1;
138
139         switch(currentmode) {
140         case display_RATE:
141                 sub = &oldstat;
142                 divisor = naptime;
143                 break;
144         case display_DELTA:
145                 sub = &oldstat;
146                 break;
147         case display_SINCE:
148                 sub = &initstat;
149                 break;
150         default:
151                 *ret = curstat;
152                 return;
153         }
154 #define DO(stat) ret->stat = (curstat.stat - sub->stat) / divisor
155         DO(tcps_connattempt);
156         DO(tcps_accepts);
157         DO(tcps_connects);
158         DO(tcps_drops);
159         DO(tcps_conndrops);
160         DO(tcps_closed);
161         DO(tcps_segstimed);
162         DO(tcps_rttupdated);
163         DO(tcps_delack);
164         DO(tcps_timeoutdrop);
165         DO(tcps_rexmttimeo);
166         DO(tcps_persisttimeo);
167         DO(tcps_keeptimeo);
168         DO(tcps_keepprobe);
169         DO(tcps_keepdrops);
170
171         DO(tcps_sndtotal);
172         DO(tcps_sndpack);
173         DO(tcps_sndbyte);
174         DO(tcps_sndrexmitpack);
175         DO(tcps_sndrexmitbyte);
176         DO(tcps_sndacks);
177         DO(tcps_sndprobe);
178         DO(tcps_sndurg);
179         DO(tcps_sndwinup);
180         DO(tcps_sndctrl);
181
182         DO(tcps_rcvtotal);
183         DO(tcps_rcvpack);
184         DO(tcps_rcvbyte);
185         DO(tcps_rcvbadsum);
186         DO(tcps_rcvbadoff);
187         DO(tcps_rcvshort);
188         DO(tcps_rcvduppack);
189         DO(tcps_rcvdupbyte);
190         DO(tcps_rcvpartduppack);
191         DO(tcps_rcvpartdupbyte);
192         DO(tcps_rcvoopack);
193         DO(tcps_rcvoobyte);
194         DO(tcps_rcvpackafterwin);
195         DO(tcps_rcvbyteafterwin);
196         DO(tcps_rcvafterclose);
197         DO(tcps_rcvwinprobe);
198         DO(tcps_rcvdupack);
199         DO(tcps_rcvacktoomuch);
200         DO(tcps_rcvackpack);
201         DO(tcps_rcvackbyte);
202         DO(tcps_rcvwinupd);
203         DO(tcps_pawsdrop);
204         DO(tcps_predack);
205         DO(tcps_preddat);
206         DO(tcps_pcbcachemiss);
207         DO(tcps_cachedrtt);
208         DO(tcps_cachedrttvar);
209         DO(tcps_cachedssthresh);
210         DO(tcps_usedrtt);
211         DO(tcps_usedrttvar);
212         DO(tcps_usedssthresh);
213         DO(tcps_persistdrop);
214         DO(tcps_badsyn);
215         DO(tcps_mturesent);
216         DO(tcps_listendrop);
217 #undef DO
218 }
219         
220 void
221 showtcp(void)
222 {
223         struct tcpstat stats;
224
225         memset(&stats, 0, sizeof stats);
226         domode(&stats);
227
228 #define DO(stat, row, col) \
229         mvwprintw(wnd, row, col, "%9lu", stats.stat)
230 #define L(row, stat) DO(stat, row, 0)
231 #define R(row, stat) DO(stat, row, 35)
232         L(2, tcps_connattempt);         R(2, tcps_sndtotal);
233         L(3, tcps_accepts);             R(3, tcps_sndpack);
234         L(4, tcps_connects);            R(4, tcps_sndrexmitpack);
235         L(5, tcps_drops);               R(5, tcps_sndacks);
236         L(6, tcps_conndrops);           R(6, tcps_sndprobe);
237         L(7, tcps_timeoutdrop);         R(7, tcps_sndwinup);
238         L(8, tcps_keepdrops);           R(8, tcps_sndurg);
239         L(9, tcps_listendrop);          R(9, tcps_sndctrl);
240         R(10, tcps_mturesent);
241         R(11, tcps_rcvtotal);
242         L(12, tcps_segstimed);          R(12, tcps_rcvpack);
243         L(13, tcps_rttupdated);         R(13, tcps_rcvduppack);
244         L(14, tcps_delack);             R(14, tcps_rcvpartduppack);
245         L(15, tcps_rexmttimeo);         R(15, tcps_rcvoopack);
246         L(16, tcps_persisttimeo);       R(16, tcps_rcvdupack);
247         L(17, tcps_keepprobe);          R(17, tcps_rcvackpack);
248         L(18, tcps_keeptimeo);          R(18, tcps_rcvwinprobe);
249         R(19, tcps_rcvwinupd);
250 #undef DO
251 #undef L
252 #undef R
253 }
254
255 int
256 inittcp(void)
257 {
258         size_t len;
259         int name[4];
260
261         name[0] = CTL_NET;
262         name[1] = PF_INET;
263         name[2] = IPPROTO_TCP;
264         name[3] = TCPCTL_STATS;
265
266         len = 0;
267         if (sysctl(name, 4, 0, &len, 0, 0) < 0) {
268                 error("sysctl getting tcpstat size failed");
269                 return 0;
270         }
271         if (len > sizeof curstat) {
272                 error("tcpstat structure has grown--recompile systat!");
273                 return 0;
274         }
275         if (sysctl(name, 4, &initstat, &len, 0, 0) < 0) {
276                 error("sysctl getting tcpstat failed");
277                 return 0;
278         }
279         oldstat = initstat;
280         return 1;
281 }
282
283 void
284 resettcp(void)
285 {
286         size_t len;
287         int name[4];
288
289         name[0] = CTL_NET;
290         name[1] = PF_INET;
291         name[2] = IPPROTO_TCP;
292         name[3] = TCPCTL_STATS;
293
294         len = sizeof initstat;
295         if (sysctl(name, 4, &initstat, &len, 0, 0) < 0) {
296                 error("sysctl getting tcpstat failed");
297         }
298         oldstat = initstat;
299 }
300
301 void
302 fetchtcp(void)
303 {
304         int name[4];
305         size_t len;
306
307         oldstat = curstat;
308         name[0] = CTL_NET;
309         name[1] = PF_INET;
310         name[2] = IPPROTO_TCP;
311         name[3] = TCPCTL_STATS;
312         len = sizeof curstat;
313
314         if (sysctl(name, 4, &curstat, &len, 0, 0) < 0)
315                 return;
316 }
317