Home | History | Annotate | Line # | Download | only in netinet
tcp_output.c revision 1.20.2.3
      1  1.20.2.3    mellon /*	$NetBSD: tcp_output.c,v 1.20.2.3 1998/01/29 10:24:04 mellon Exp $	*/
      2      1.10       cgd 
      3       1.1       cgd /*
      4  1.20.2.3    mellon  * 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.20.2.3    mellon  *	@(#)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.20.2.1   thorpej 	*txsegsizep = min(tp->t_peermss, size);
    103      1.18   thorpej 	*rxsegsizep = min(tp->t_ourmss, size);
    104  1.20.2.1   thorpej 
    105  1.20.2.1   thorpej 	if (*txsegsizep != tp->t_segsz) {
    106  1.20.2.1   thorpej 		tp->snd_cwnd = (tp->snd_cwnd / tp->t_segsz) * *txsegsizep;
    107  1.20.2.1   thorpej 		tp->snd_ssthresh = (tp->snd_ssthresh / tp->t_segsz) *
    108  1.20.2.1   thorpej 		    *txsegsizep;
    109  1.20.2.1   thorpej 		tp->t_segsz = *txsegsizep;
    110  1.20.2.1   thorpej 	}
    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.20.2.3    mellon 		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.20.2.3    mellon 		 * cancel pending retransmit, pull snd_nxt back
    197  1.20.2.3    mellon 		 * to (closed) window, and set the persist timer
    198  1.20.2.3    mellon 		 * if it isn't already going.  If the window didn't
    199  1.20.2.3    mellon 		 * 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.20.2.3    mellon 			tp->t_rxtshift = 0;
    205       1.1       cgd 			tp->snd_nxt = tp->snd_una;
    206  1.20.2.3    mellon 			if (tp->t_timer[TCPT_PERSIST] == 0)
    207  1.20.2.3    mellon 				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.20.2.3    mellon 			if (m->m_next == 0) {
    426  1.20.2.3    mellon 				(void) m_freem(m);
    427  1.20.2.3    mellon 				error = ENOBUFS;
    428  1.20.2.3    mellon 				goto out;
    429  1.20.2.3    mellon 			}
    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.20.2.3    mellon 	if (tp->t_flags & TF_DELACK)
    634  1.20.2.3    mellon 		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.20.2.3    mellon 	tp->t_flags &= ~TF_ACKNOW;
    646  1.20.2.3    mellon 	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.20.2.2   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