tcp_output.c revision 1.27 1 1.27 thorpej /* $NetBSD: tcp_output.c,v 1.27 1998/01/05 10:32:05 thorpej Exp $ */
2 1.10 cgd
3 1.1 cgd /*
4 1.27 thorpej * Copyright (c) 1982, 1986, 1988, 1990, 1993, 1995
5 1.9 mycroft * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * Redistribution and use in source and binary forms, with or without
8 1.1 cgd * modification, are permitted provided that the following conditions
9 1.1 cgd * are met:
10 1.1 cgd * 1. Redistributions of source code must retain the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer.
12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd * notice, this list of conditions and the following disclaimer in the
14 1.1 cgd * documentation and/or other materials provided with the distribution.
15 1.1 cgd * 3. All advertising materials mentioning features or use of this software
16 1.1 cgd * must display the following acknowledgement:
17 1.1 cgd * This product includes software developed by the University of
18 1.1 cgd * California, Berkeley and its contributors.
19 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
20 1.1 cgd * may be used to endorse or promote products derived from this software
21 1.1 cgd * without specific prior written permission.
22 1.1 cgd *
23 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 cgd * SUCH DAMAGE.
34 1.1 cgd *
35 1.27 thorpej * @(#)tcp_output.c 8.4 (Berkeley) 5/24/95
36 1.1 cgd */
37 1.1 cgd
38 1.4 mycroft #include <sys/param.h>
39 1.4 mycroft #include <sys/systm.h>
40 1.4 mycroft #include <sys/malloc.h>
41 1.4 mycroft #include <sys/mbuf.h>
42 1.4 mycroft #include <sys/protosw.h>
43 1.4 mycroft #include <sys/socket.h>
44 1.4 mycroft #include <sys/socketvar.h>
45 1.4 mycroft #include <sys/errno.h>
46 1.1 cgd
47 1.17 thorpej #include <net/if.h>
48 1.4 mycroft #include <net/route.h>
49 1.1 cgd
50 1.4 mycroft #include <netinet/in.h>
51 1.4 mycroft #include <netinet/in_systm.h>
52 1.4 mycroft #include <netinet/ip.h>
53 1.4 mycroft #include <netinet/in_pcb.h>
54 1.4 mycroft #include <netinet/ip_var.h>
55 1.4 mycroft #include <netinet/tcp.h>
56 1.1 cgd #define TCPOUTFLAGS
57 1.4 mycroft #include <netinet/tcp_fsm.h>
58 1.4 mycroft #include <netinet/tcp_seq.h>
59 1.4 mycroft #include <netinet/tcp_timer.h>
60 1.4 mycroft #include <netinet/tcp_var.h>
61 1.4 mycroft #include <netinet/tcpip.h>
62 1.4 mycroft #include <netinet/tcp_debug.h>
63 1.14 christos
64 1.14 christos #ifdef TUBA
65 1.14 christos #include <netiso/iso.h>
66 1.14 christos #include <netiso/tuba_table.h>
67 1.14 christos #endif
68 1.1 cgd
69 1.1 cgd #ifdef notyet
70 1.1 cgd extern struct mbuf *m_copypack();
71 1.1 cgd #endif
72 1.1 cgd
73 1.9 mycroft #define MAX_TCPOPTLEN 32 /* max # bytes that go in options */
74 1.1 cgd
75 1.18 thorpej static __inline void tcp_segsize __P((struct tcpcb *, int *, int *));
76 1.18 thorpej static __inline void
77 1.18 thorpej tcp_segsize(tp, txsegsizep, rxsegsizep)
78 1.17 thorpej struct tcpcb *tp;
79 1.18 thorpej int *txsegsizep, *rxsegsizep;
80 1.17 thorpej {
81 1.17 thorpej struct inpcb *inp = tp->t_inpcb;
82 1.17 thorpej struct rtentry *rt;
83 1.17 thorpej struct ifnet *ifp;
84 1.17 thorpej int size;
85 1.17 thorpej
86 1.17 thorpej if ((rt = in_pcbrtentry(inp)) == NULL) {
87 1.17 thorpej size = tcp_mssdflt;
88 1.17 thorpej goto out;
89 1.17 thorpej }
90 1.17 thorpej
91 1.17 thorpej ifp = rt->rt_ifp;
92 1.17 thorpej
93 1.19 kml if (rt->rt_rmx.rmx_mtu != 0)
94 1.17 thorpej size = rt->rt_rmx.rmx_mtu - sizeof(struct tcpiphdr);
95 1.20 kml else if (ip_mtudisc || in_localaddr(inp->inp_faddr) ||
96 1.19 kml ifp->if_flags & IFF_LOOPBACK)
97 1.17 thorpej size = ifp->if_mtu - sizeof(struct tcpiphdr);
98 1.17 thorpej else
99 1.17 thorpej size = tcp_mssdflt;
100 1.17 thorpej
101 1.17 thorpej out:
102 1.21 kml *txsegsizep = min(tp->t_peermss, size);
103 1.18 thorpej *rxsegsizep = min(tp->t_ourmss, size);
104 1.21 kml
105 1.21 kml if (*txsegsizep != tp->t_segsz) {
106 1.21 kml tp->snd_cwnd = (tp->snd_cwnd / tp->t_segsz) * *txsegsizep;
107 1.21 kml tp->snd_ssthresh = (tp->snd_ssthresh / tp->t_segsz) *
108 1.21 kml *txsegsizep;
109 1.21 kml tp->t_segsz = *txsegsizep;
110 1.21 kml }
111 1.17 thorpej }
112 1.17 thorpej
113 1.1 cgd /*
114 1.1 cgd * Tcp output routine: figure out what should be sent and send it.
115 1.1 cgd */
116 1.6 mycroft int
117 1.1 cgd tcp_output(tp)
118 1.1 cgd register struct tcpcb *tp;
119 1.1 cgd {
120 1.1 cgd register struct socket *so = tp->t_inpcb->inp_socket;
121 1.1 cgd register long len, win;
122 1.1 cgd int off, flags, error;
123 1.1 cgd register struct mbuf *m;
124 1.1 cgd register struct tcpiphdr *ti;
125 1.9 mycroft u_char opt[MAX_TCPOPTLEN];
126 1.1 cgd unsigned optlen, hdrlen;
127 1.18 thorpej int idle, sendalot, txsegsize, rxsegsize;
128 1.17 thorpej
129 1.18 thorpej tcp_segsize(tp, &txsegsize, &rxsegsize);
130 1.1 cgd
131 1.1 cgd /*
132 1.1 cgd * Determine length of data that should be transmitted,
133 1.1 cgd * and flags that will be used.
134 1.1 cgd * If there is some data or critical controls (SYN, RST)
135 1.1 cgd * to send, then transmit; otherwise, investigate further.
136 1.1 cgd */
137 1.1 cgd idle = (tp->snd_max == tp->snd_una);
138 1.1 cgd if (idle && tp->t_idle >= tp->t_rxtcur)
139 1.1 cgd /*
140 1.1 cgd * We have been idle for "a while" and no acks are
141 1.1 cgd * expected to clock out any data we send --
142 1.1 cgd * slow start to get ack "clock" running again.
143 1.1 cgd */
144 1.24 thorpej tp->snd_cwnd = TCP_INITIAL_WINDOW(txsegsize);
145 1.1 cgd again:
146 1.1 cgd sendalot = 0;
147 1.1 cgd off = tp->snd_nxt - tp->snd_una;
148 1.1 cgd win = min(tp->snd_wnd, tp->snd_cwnd);
149 1.1 cgd
150 1.9 mycroft flags = tcp_outflags[tp->t_state];
151 1.1 cgd /*
152 1.1 cgd * If in persist timeout with window of 0, send 1 byte.
153 1.1 cgd * Otherwise, if window is small but nonzero
154 1.1 cgd * and timer expired, we will send what we can
155 1.1 cgd * and go to transmit state.
156 1.1 cgd */
157 1.1 cgd if (tp->t_force) {
158 1.9 mycroft if (win == 0) {
159 1.9 mycroft /*
160 1.9 mycroft * If we still have some data to send, then
161 1.9 mycroft * clear the FIN bit. Usually this would
162 1.9 mycroft * happen below when it realizes that we
163 1.9 mycroft * aren't sending all the data. However,
164 1.9 mycroft * if we have exactly 1 byte of unset data,
165 1.9 mycroft * then it won't clear the FIN bit below,
166 1.9 mycroft * and if we are in persist state, we wind
167 1.9 mycroft * up sending the packet without recording
168 1.9 mycroft * that we sent the FIN bit.
169 1.9 mycroft *
170 1.9 mycroft * We can't just blindly clear the FIN bit,
171 1.9 mycroft * because if we don't have any more data
172 1.9 mycroft * to send then the probe will be the FIN
173 1.9 mycroft * itself.
174 1.9 mycroft */
175 1.9 mycroft if (off < so->so_snd.sb_cc)
176 1.9 mycroft flags &= ~TH_FIN;
177 1.1 cgd win = 1;
178 1.9 mycroft } else {
179 1.1 cgd tp->t_timer[TCPT_PERSIST] = 0;
180 1.1 cgd tp->t_rxtshift = 0;
181 1.1 cgd }
182 1.1 cgd }
183 1.1 cgd
184 1.11 mycroft if (win < so->so_snd.sb_cc) {
185 1.11 mycroft len = win - off;
186 1.11 mycroft flags &= ~TH_FIN;
187 1.11 mycroft } else
188 1.11 mycroft len = so->so_snd.sb_cc - off;
189 1.1 cgd
190 1.1 cgd if (len < 0) {
191 1.1 cgd /*
192 1.1 cgd * If FIN has been sent but not acked,
193 1.1 cgd * but we haven't been called to retransmit,
194 1.1 cgd * len will be -1. Otherwise, window shrank
195 1.1 cgd * after we sent into it. If window shrank to 0,
196 1.25 thorpej * cancel pending retransmit, pull snd_nxt back
197 1.25 thorpej * to (closed) window, and set the persist timer
198 1.25 thorpej * if it isn't already going. If the window didn't
199 1.25 thorpej * close completely, just wait for an ACK.
200 1.1 cgd */
201 1.1 cgd len = 0;
202 1.1 cgd if (win == 0) {
203 1.1 cgd tp->t_timer[TCPT_REXMT] = 0;
204 1.25 thorpej tp->t_rxtshift = 0;
205 1.1 cgd tp->snd_nxt = tp->snd_una;
206 1.25 thorpej if (tp->t_timer[TCPT_PERSIST] == 0)
207 1.25 thorpej tcp_setpersist(tp);
208 1.1 cgd }
209 1.1 cgd }
210 1.18 thorpej if (len > txsegsize) {
211 1.18 thorpej len = txsegsize;
212 1.11 mycroft flags &= ~TH_FIN;
213 1.1 cgd sendalot = 1;
214 1.1 cgd }
215 1.1 cgd
216 1.1 cgd win = sbspace(&so->so_rcv);
217 1.1 cgd
218 1.1 cgd /*
219 1.1 cgd * Sender silly window avoidance. If connection is idle
220 1.1 cgd * and can send all data, a maximum segment,
221 1.1 cgd * at least a maximum default-size segment do it,
222 1.1 cgd * or are forced, do it; otherwise don't bother.
223 1.1 cgd * If peer's buffer is tiny, then send
224 1.1 cgd * when window is at least half open.
225 1.1 cgd * If retransmitting (possibly after persist timer forced us
226 1.1 cgd * to send into a small window), then must resend.
227 1.1 cgd */
228 1.1 cgd if (len) {
229 1.18 thorpej if (len == txsegsize)
230 1.1 cgd goto send;
231 1.1 cgd if ((idle || tp->t_flags & TF_NODELAY) &&
232 1.1 cgd len + off >= so->so_snd.sb_cc)
233 1.1 cgd goto send;
234 1.1 cgd if (tp->t_force)
235 1.1 cgd goto send;
236 1.1 cgd if (len >= tp->max_sndwnd / 2)
237 1.1 cgd goto send;
238 1.1 cgd if (SEQ_LT(tp->snd_nxt, tp->snd_max))
239 1.1 cgd goto send;
240 1.1 cgd }
241 1.1 cgd
242 1.1 cgd /*
243 1.18 thorpej * Compare available window to amount of window known to peer
244 1.18 thorpej * (as advertised window less next expected input). If the
245 1.18 thorpej * difference is at least twice the size of the largest segment
246 1.18 thorpej * we expect to receive (i.e. two segments) or at least 50% of
247 1.18 thorpej * the maximum possible window, then want to send a window update
248 1.18 thorpej * to peer.
249 1.1 cgd */
250 1.1 cgd if (win > 0) {
251 1.9 mycroft /*
252 1.9 mycroft * "adv" is the amount we can increase the window,
253 1.9 mycroft * taking into account that we are limited by
254 1.9 mycroft * TCP_MAXWIN << tp->rcv_scale.
255 1.9 mycroft */
256 1.9 mycroft long adv = min(win, (long)TCP_MAXWIN << tp->rcv_scale) -
257 1.9 mycroft (tp->rcv_adv - tp->rcv_nxt);
258 1.1 cgd
259 1.18 thorpej if (adv >= (long) (2 * rxsegsize))
260 1.1 cgd goto send;
261 1.1 cgd if (2 * adv >= (long) so->so_rcv.sb_hiwat)
262 1.1 cgd goto send;
263 1.1 cgd }
264 1.1 cgd
265 1.1 cgd /*
266 1.1 cgd * Send if we owe peer an ACK.
267 1.1 cgd */
268 1.1 cgd if (tp->t_flags & TF_ACKNOW)
269 1.1 cgd goto send;
270 1.1 cgd if (flags & (TH_SYN|TH_RST))
271 1.1 cgd goto send;
272 1.1 cgd if (SEQ_GT(tp->snd_up, tp->snd_una))
273 1.1 cgd goto send;
274 1.1 cgd /*
275 1.1 cgd * If our state indicates that FIN should be sent
276 1.1 cgd * and we have not yet done so, or we're retransmitting the FIN,
277 1.1 cgd * then we need to send.
278 1.1 cgd */
279 1.1 cgd if (flags & TH_FIN &&
280 1.1 cgd ((tp->t_flags & TF_SENTFIN) == 0 || tp->snd_nxt == tp->snd_una))
281 1.1 cgd goto send;
282 1.1 cgd
283 1.1 cgd /*
284 1.1 cgd * TCP window updates are not reliable, rather a polling protocol
285 1.1 cgd * using ``persist'' packets is used to insure receipt of window
286 1.1 cgd * updates. The three ``states'' for the output side are:
287 1.1 cgd * idle not doing retransmits or persists
288 1.1 cgd * persisting to move a small or zero window
289 1.1 cgd * (re)transmitting and thereby not persisting
290 1.1 cgd *
291 1.1 cgd * tp->t_timer[TCPT_PERSIST]
292 1.1 cgd * is set when we are in persist state.
293 1.1 cgd * tp->t_force
294 1.1 cgd * is set when we are called to send a persist packet.
295 1.1 cgd * tp->t_timer[TCPT_REXMT]
296 1.1 cgd * is set when we are retransmitting
297 1.1 cgd * The output side is idle when both timers are zero.
298 1.1 cgd *
299 1.1 cgd * If send window is too small, there is data to transmit, and no
300 1.1 cgd * retransmit or persist is pending, then go to persist state.
301 1.1 cgd * If nothing happens soon, send when timer expires:
302 1.1 cgd * if window is nonzero, transmit what we can,
303 1.1 cgd * otherwise force out a byte.
304 1.1 cgd */
305 1.1 cgd if (so->so_snd.sb_cc && tp->t_timer[TCPT_REXMT] == 0 &&
306 1.1 cgd tp->t_timer[TCPT_PERSIST] == 0) {
307 1.1 cgd tp->t_rxtshift = 0;
308 1.1 cgd tcp_setpersist(tp);
309 1.1 cgd }
310 1.1 cgd
311 1.1 cgd /*
312 1.1 cgd * No reason to send a segment, just return.
313 1.1 cgd */
314 1.1 cgd return (0);
315 1.1 cgd
316 1.1 cgd send:
317 1.1 cgd /*
318 1.1 cgd * Before ESTABLISHED, force sending of initial options
319 1.1 cgd * unless TCP set not to do any options.
320 1.1 cgd * NOTE: we assume that the IP/TCP header plus TCP options
321 1.1 cgd * always fit in a single mbuf, leaving room for a maximum
322 1.1 cgd * link header, i.e.
323 1.1 cgd * max_linkhdr + sizeof (struct tcpiphdr) + optlen <= MHLEN
324 1.1 cgd */
325 1.1 cgd optlen = 0;
326 1.1 cgd hdrlen = sizeof (struct tcpiphdr);
327 1.9 mycroft if (flags & TH_SYN) {
328 1.9 mycroft tp->snd_nxt = tp->iss;
329 1.17 thorpej tp->t_ourmss = tcp_mss_to_advertise(tp);
330 1.9 mycroft if ((tp->t_flags & TF_NOOPT) == 0) {
331 1.9 mycroft opt[0] = TCPOPT_MAXSEG;
332 1.9 mycroft opt[1] = 4;
333 1.17 thorpej opt[2] = (tp->t_ourmss >> 8) & 0xff;
334 1.17 thorpej opt[3] = tp->t_ourmss & 0xff;
335 1.9 mycroft optlen = 4;
336 1.9 mycroft
337 1.9 mycroft if ((tp->t_flags & TF_REQ_SCALE) &&
338 1.9 mycroft ((flags & TH_ACK) == 0 ||
339 1.9 mycroft (tp->t_flags & TF_RCVD_SCALE))) {
340 1.12 cgd *((u_int32_t *) (opt + optlen)) = htonl(
341 1.9 mycroft TCPOPT_NOP << 24 |
342 1.9 mycroft TCPOPT_WINDOW << 16 |
343 1.9 mycroft TCPOLEN_WINDOW << 8 |
344 1.9 mycroft tp->request_r_scale);
345 1.9 mycroft optlen += 4;
346 1.9 mycroft }
347 1.9 mycroft }
348 1.9 mycroft }
349 1.9 mycroft
350 1.9 mycroft /*
351 1.9 mycroft * Send a timestamp and echo-reply if this is a SYN and our side
352 1.9 mycroft * wants to use timestamps (TF_REQ_TSTMP is set) or both our side
353 1.9 mycroft * and our peer have sent timestamps in our SYN's.
354 1.9 mycroft */
355 1.9 mycroft if ((tp->t_flags & (TF_REQ_TSTMP|TF_NOOPT)) == TF_REQ_TSTMP &&
356 1.9 mycroft (flags & TH_RST) == 0 &&
357 1.9 mycroft ((flags & (TH_SYN|TH_ACK)) == TH_SYN ||
358 1.9 mycroft (tp->t_flags & TF_RCVD_TSTMP))) {
359 1.13 cgd u_int32_t *lp = (u_int32_t *)(opt + optlen);
360 1.9 mycroft
361 1.9 mycroft /* Form timestamp option as shown in appendix A of RFC 1323. */
362 1.9 mycroft *lp++ = htonl(TCPOPT_TSTAMP_HDR);
363 1.9 mycroft *lp++ = htonl(tcp_now);
364 1.9 mycroft *lp = htonl(tp->ts_recent);
365 1.9 mycroft optlen += TCPOLEN_TSTAMP_APPA;
366 1.9 mycroft }
367 1.9 mycroft
368 1.9 mycroft hdrlen += optlen;
369 1.9 mycroft
370 1.9 mycroft /*
371 1.9 mycroft * Adjust data length if insertion of options will
372 1.18 thorpej * bump the packet length beyond the txsegsize length.
373 1.9 mycroft */
374 1.18 thorpej if (len > txsegsize - optlen) {
375 1.18 thorpej len = txsegsize - optlen;
376 1.11 mycroft flags &= ~TH_FIN;
377 1.9 mycroft sendalot = 1;
378 1.9 mycroft }
379 1.9 mycroft
380 1.1 cgd #ifdef DIAGNOSTIC
381 1.9 mycroft if (max_linkhdr + hdrlen > MHLEN)
382 1.9 mycroft panic("tcphdr too big");
383 1.1 cgd #endif
384 1.1 cgd
385 1.1 cgd /*
386 1.1 cgd * Grab a header mbuf, attaching a copy of data to
387 1.1 cgd * be transmitted, and initialize the header from
388 1.1 cgd * the template for sends on this connection.
389 1.1 cgd */
390 1.1 cgd if (len) {
391 1.1 cgd if (tp->t_force && len == 1)
392 1.1 cgd tcpstat.tcps_sndprobe++;
393 1.1 cgd else if (SEQ_LT(tp->snd_nxt, tp->snd_max)) {
394 1.1 cgd tcpstat.tcps_sndrexmitpack++;
395 1.1 cgd tcpstat.tcps_sndrexmitbyte += len;
396 1.1 cgd } else {
397 1.1 cgd tcpstat.tcps_sndpack++;
398 1.1 cgd tcpstat.tcps_sndbyte += len;
399 1.1 cgd }
400 1.1 cgd #ifdef notyet
401 1.1 cgd if ((m = m_copypack(so->so_snd.sb_mb, off,
402 1.1 cgd (int)len, max_linkhdr + hdrlen)) == 0) {
403 1.1 cgd error = ENOBUFS;
404 1.1 cgd goto out;
405 1.1 cgd }
406 1.1 cgd /*
407 1.1 cgd * m_copypack left space for our hdr; use it.
408 1.1 cgd */
409 1.1 cgd m->m_len += hdrlen;
410 1.1 cgd m->m_data -= hdrlen;
411 1.1 cgd #else
412 1.1 cgd MGETHDR(m, M_DONTWAIT, MT_HEADER);
413 1.1 cgd if (m == NULL) {
414 1.1 cgd error = ENOBUFS;
415 1.1 cgd goto out;
416 1.1 cgd }
417 1.1 cgd m->m_data += max_linkhdr;
418 1.1 cgd m->m_len = hdrlen;
419 1.1 cgd if (len <= MHLEN - hdrlen - max_linkhdr) {
420 1.1 cgd m_copydata(so->so_snd.sb_mb, off, (int) len,
421 1.1 cgd mtod(m, caddr_t) + hdrlen);
422 1.1 cgd m->m_len += len;
423 1.1 cgd } else {
424 1.1 cgd m->m_next = m_copy(so->so_snd.sb_mb, off, (int) len);
425 1.25 thorpej if (m->m_next == 0) {
426 1.25 thorpej (void) m_freem(m);
427 1.25 thorpej error = ENOBUFS;
428 1.25 thorpej goto out;
429 1.25 thorpej }
430 1.1 cgd }
431 1.1 cgd #endif
432 1.1 cgd /*
433 1.1 cgd * If we're sending everything we've got, set PUSH.
434 1.1 cgd * (This will keep happy those implementations which only
435 1.1 cgd * give data to the user when a buffer fills or
436 1.1 cgd * a PUSH comes in.)
437 1.1 cgd */
438 1.1 cgd if (off + len == so->so_snd.sb_cc)
439 1.1 cgd flags |= TH_PUSH;
440 1.1 cgd } else {
441 1.1 cgd if (tp->t_flags & TF_ACKNOW)
442 1.1 cgd tcpstat.tcps_sndacks++;
443 1.1 cgd else if (flags & (TH_SYN|TH_FIN|TH_RST))
444 1.1 cgd tcpstat.tcps_sndctrl++;
445 1.1 cgd else if (SEQ_GT(tp->snd_up, tp->snd_una))
446 1.1 cgd tcpstat.tcps_sndurg++;
447 1.1 cgd else
448 1.1 cgd tcpstat.tcps_sndwinup++;
449 1.1 cgd
450 1.1 cgd MGETHDR(m, M_DONTWAIT, MT_HEADER);
451 1.1 cgd if (m == NULL) {
452 1.1 cgd error = ENOBUFS;
453 1.1 cgd goto out;
454 1.1 cgd }
455 1.1 cgd m->m_data += max_linkhdr;
456 1.1 cgd m->m_len = hdrlen;
457 1.1 cgd }
458 1.1 cgd m->m_pkthdr.rcvif = (struct ifnet *)0;
459 1.1 cgd ti = mtod(m, struct tcpiphdr *);
460 1.1 cgd if (tp->t_template == 0)
461 1.1 cgd panic("tcp_output");
462 1.1 cgd bcopy((caddr_t)tp->t_template, (caddr_t)ti, sizeof (struct tcpiphdr));
463 1.1 cgd
464 1.1 cgd /*
465 1.1 cgd * Fill in fields, remembering maximum advertised
466 1.1 cgd * window for use in delaying messages about window sizes.
467 1.1 cgd * If resending a FIN, be sure not to use a new sequence number.
468 1.1 cgd */
469 1.9 mycroft if (flags & TH_FIN && tp->t_flags & TF_SENTFIN &&
470 1.1 cgd tp->snd_nxt == tp->snd_max)
471 1.1 cgd tp->snd_nxt--;
472 1.9 mycroft /*
473 1.9 mycroft * If we are doing retransmissions, then snd_nxt will
474 1.9 mycroft * not reflect the first unsent octet. For ACK only
475 1.9 mycroft * packets, we do not want the sequence number of the
476 1.9 mycroft * retransmitted packet, we want the sequence number
477 1.9 mycroft * of the next unsent octet. So, if there is no data
478 1.9 mycroft * (and no SYN or FIN), use snd_max instead of snd_nxt
479 1.9 mycroft * when filling in ti_seq. But if we are in persist
480 1.9 mycroft * state, snd_max might reflect one byte beyond the
481 1.9 mycroft * right edge of the window, so use snd_nxt in that
482 1.9 mycroft * case, since we know we aren't doing a retransmission.
483 1.9 mycroft * (retransmit and persist are mutually exclusive...)
484 1.9 mycroft */
485 1.8 mycroft if (len || (flags & (TH_SYN|TH_FIN)) || tp->t_timer[TCPT_PERSIST])
486 1.8 mycroft ti->ti_seq = htonl(tp->snd_nxt);
487 1.8 mycroft else
488 1.8 mycroft ti->ti_seq = htonl(tp->snd_max);
489 1.1 cgd ti->ti_ack = htonl(tp->rcv_nxt);
490 1.1 cgd if (optlen) {
491 1.1 cgd bcopy((caddr_t)opt, (caddr_t)(ti + 1), optlen);
492 1.1 cgd ti->ti_off = (sizeof (struct tcphdr) + optlen) >> 2;
493 1.1 cgd }
494 1.1 cgd ti->ti_flags = flags;
495 1.1 cgd /*
496 1.1 cgd * Calculate receive window. Don't shrink window,
497 1.1 cgd * but avoid silly window syndrome.
498 1.1 cgd */
499 1.18 thorpej if (win < (long)(so->so_rcv.sb_hiwat / 4) && win < (long)rxsegsize)
500 1.1 cgd win = 0;
501 1.9 mycroft if (win > (long)TCP_MAXWIN << tp->rcv_scale)
502 1.9 mycroft win = (long)TCP_MAXWIN << tp->rcv_scale;
503 1.1 cgd if (win < (long)(tp->rcv_adv - tp->rcv_nxt))
504 1.1 cgd win = (long)(tp->rcv_adv - tp->rcv_nxt);
505 1.12 cgd ti->ti_win = htons((u_int16_t) (win>>tp->rcv_scale));
506 1.1 cgd if (SEQ_GT(tp->snd_up, tp->snd_nxt)) {
507 1.16 kml u_int32_t urp = tp->snd_up - tp->snd_nxt;
508 1.16 kml if (urp > IP_MAXPACKET)
509 1.16 kml urp = IP_MAXPACKET;
510 1.16 kml ti->ti_urp = htons((u_int16_t)urp);
511 1.1 cgd ti->ti_flags |= TH_URG;
512 1.1 cgd } else
513 1.1 cgd /*
514 1.1 cgd * If no urgent pointer to send, then we pull
515 1.1 cgd * the urgent pointer to the left edge of the send window
516 1.1 cgd * so that it doesn't drift into the send window on sequence
517 1.1 cgd * number wraparound.
518 1.1 cgd */
519 1.1 cgd tp->snd_up = tp->snd_una; /* drag it along */
520 1.1 cgd
521 1.1 cgd /*
522 1.1 cgd * Put TCP length in extended header, and then
523 1.1 cgd * checksum extended header and data.
524 1.1 cgd */
525 1.1 cgd if (len + optlen)
526 1.12 cgd ti->ti_len = htons((u_int16_t)(sizeof (struct tcphdr) +
527 1.1 cgd optlen + len));
528 1.1 cgd ti->ti_sum = in_cksum(m, (int)(hdrlen + len));
529 1.1 cgd
530 1.1 cgd /*
531 1.1 cgd * In transmit state, time the transmission and arrange for
532 1.1 cgd * the retransmit. In persist state, just set snd_max.
533 1.1 cgd */
534 1.1 cgd if (tp->t_force == 0 || tp->t_timer[TCPT_PERSIST] == 0) {
535 1.1 cgd tcp_seq startseq = tp->snd_nxt;
536 1.1 cgd
537 1.1 cgd /*
538 1.1 cgd * Advance snd_nxt over sequence space of this segment.
539 1.1 cgd */
540 1.1 cgd if (flags & (TH_SYN|TH_FIN)) {
541 1.1 cgd if (flags & TH_SYN)
542 1.1 cgd tp->snd_nxt++;
543 1.1 cgd if (flags & TH_FIN) {
544 1.1 cgd tp->snd_nxt++;
545 1.1 cgd tp->t_flags |= TF_SENTFIN;
546 1.1 cgd }
547 1.1 cgd }
548 1.1 cgd tp->snd_nxt += len;
549 1.1 cgd if (SEQ_GT(tp->snd_nxt, tp->snd_max)) {
550 1.1 cgd tp->snd_max = tp->snd_nxt;
551 1.1 cgd /*
552 1.1 cgd * Time this transmission if not a retransmission and
553 1.1 cgd * not currently timing anything.
554 1.1 cgd */
555 1.1 cgd if (tp->t_rtt == 0) {
556 1.1 cgd tp->t_rtt = 1;
557 1.1 cgd tp->t_rtseq = startseq;
558 1.1 cgd tcpstat.tcps_segstimed++;
559 1.1 cgd }
560 1.1 cgd }
561 1.1 cgd
562 1.1 cgd /*
563 1.1 cgd * Set retransmit timer if not currently set,
564 1.1 cgd * and not doing an ack or a keep-alive probe.
565 1.1 cgd * Initial value for retransmit timer is smoothed
566 1.1 cgd * round-trip time + 2 * round-trip time variance.
567 1.1 cgd * Initialize shift counter which is used for backoff
568 1.1 cgd * of retransmit time.
569 1.1 cgd */
570 1.1 cgd if (tp->t_timer[TCPT_REXMT] == 0 &&
571 1.1 cgd tp->snd_nxt != tp->snd_una) {
572 1.1 cgd tp->t_timer[TCPT_REXMT] = tp->t_rxtcur;
573 1.1 cgd if (tp->t_timer[TCPT_PERSIST]) {
574 1.1 cgd tp->t_timer[TCPT_PERSIST] = 0;
575 1.1 cgd tp->t_rxtshift = 0;
576 1.1 cgd }
577 1.1 cgd }
578 1.1 cgd } else
579 1.1 cgd if (SEQ_GT(tp->snd_nxt + len, tp->snd_max))
580 1.1 cgd tp->snd_max = tp->snd_nxt + len;
581 1.1 cgd
582 1.1 cgd /*
583 1.1 cgd * Trace.
584 1.1 cgd */
585 1.1 cgd if (so->so_options & SO_DEBUG)
586 1.1 cgd tcp_trace(TA_OUTPUT, tp->t_state, tp, ti, 0);
587 1.1 cgd
588 1.1 cgd /*
589 1.1 cgd * Fill in IP length and desired time to live and
590 1.1 cgd * send to IP level. There should be a better way
591 1.1 cgd * to handle ttl and tos; we could keep them in
592 1.1 cgd * the template, but need a way to checksum without them.
593 1.1 cgd */
594 1.1 cgd m->m_pkthdr.len = hdrlen + len;
595 1.9 mycroft #ifdef TUBA
596 1.9 mycroft if (tp->t_tuba_pcb)
597 1.9 mycroft error = tuba_output(m, tp);
598 1.9 mycroft else
599 1.9 mycroft #endif
600 1.9 mycroft {
601 1.19 kml struct rtentry *rt;
602 1.19 kml
603 1.1 cgd ((struct ip *)ti)->ip_len = m->m_pkthdr.len;
604 1.1 cgd ((struct ip *)ti)->ip_ttl = tp->t_inpcb->inp_ip.ip_ttl; /* XXX */
605 1.1 cgd ((struct ip *)ti)->ip_tos = tp->t_inpcb->inp_ip.ip_tos; /* XXX */
606 1.19 kml
607 1.20 kml if (ip_mtudisc && (rt = in_pcbrtentry(tp->t_inpcb)) != 0 &&
608 1.19 kml (rt->rt_rmx.rmx_locks & RTV_MTU) == 0)
609 1.19 kml ((struct ip *)ti)->ip_off |= IP_DF;
610 1.19 kml
611 1.1 cgd #if BSD >= 43
612 1.1 cgd error = ip_output(m, tp->t_inpcb->inp_options, &tp->t_inpcb->inp_route,
613 1.9 mycroft so->so_options & SO_DONTROUTE, 0);
614 1.1 cgd #else
615 1.9 mycroft error = ip_output(m, (struct mbuf *)0, &tp->t_inpcb->inp_route,
616 1.1 cgd so->so_options & SO_DONTROUTE);
617 1.1 cgd #endif
618 1.9 mycroft }
619 1.1 cgd if (error) {
620 1.1 cgd out:
621 1.1 cgd if (error == ENOBUFS) {
622 1.6 mycroft tcp_quench(tp->t_inpcb, 0);
623 1.1 cgd return (0);
624 1.1 cgd }
625 1.1 cgd if ((error == EHOSTUNREACH || error == ENETDOWN)
626 1.1 cgd && TCPS_HAVERCVDSYN(tp->t_state)) {
627 1.1 cgd tp->t_softerror = error;
628 1.1 cgd return (0);
629 1.1 cgd }
630 1.1 cgd return (error);
631 1.1 cgd }
632 1.1 cgd tcpstat.tcps_sndtotal++;
633 1.23 thorpej if (tp->t_flags & TF_DELACK)
634 1.23 thorpej tcpstat.tcps_delack++;
635 1.1 cgd
636 1.1 cgd /*
637 1.1 cgd * Data sent (as far as we can tell).
638 1.1 cgd * If this advertises a larger window than any other segment,
639 1.1 cgd * then remember the size of the advertised window.
640 1.1 cgd * Any pending ACK has now been sent.
641 1.1 cgd */
642 1.1 cgd if (win > 0 && SEQ_GT(tp->rcv_nxt+win, tp->rcv_adv))
643 1.1 cgd tp->rcv_adv = tp->rcv_nxt + win;
644 1.9 mycroft tp->last_ack_sent = tp->rcv_nxt;
645 1.26 thorpej tp->t_flags &= ~TF_ACKNOW;
646 1.26 thorpej TCP_CLEAR_DELACK(tp);
647 1.1 cgd if (sendalot)
648 1.1 cgd goto again;
649 1.1 cgd return (0);
650 1.1 cgd }
651 1.1 cgd
652 1.6 mycroft void
653 1.1 cgd tcp_setpersist(tp)
654 1.1 cgd register struct tcpcb *tp;
655 1.1 cgd {
656 1.22 thorpej register int t = ((tp->t_srtt >> 2) + tp->t_rttvar) >> (1 + 2);
657 1.1 cgd
658 1.1 cgd if (tp->t_timer[TCPT_REXMT])
659 1.1 cgd panic("tcp_output REXMT");
660 1.1 cgd /*
661 1.1 cgd * Start/restart persistance timer.
662 1.1 cgd */
663 1.1 cgd TCPT_RANGESET(tp->t_timer[TCPT_PERSIST],
664 1.1 cgd t * tcp_backoff[tp->t_rxtshift],
665 1.1 cgd TCPTV_PERSMIN, TCPTV_PERSMAX);
666 1.1 cgd if (tp->t_rxtshift < TCP_MAXRXTSHIFT)
667 1.1 cgd tp->t_rxtshift++;
668 1.1 cgd }
669