xref: /freebsd/sys/netinet/tcp_sack.c (revision 5acfd95cbca5fda5ae95af36191bc5ee8f219871)
1c398230bSWarner Losh /*-
251369649SPedro F. Giffuni  * SPDX-License-Identifier: BSD-3-Clause
351369649SPedro F. Giffuni  *
46d90faf3SPaul Saab  * Copyright (c) 1982, 1986, 1988, 1990, 1993, 1994, 1995
5632bbf0fSRobert Watson  *	The Regents of the University of California.
6632bbf0fSRobert Watson  * All rights reserved.
76d90faf3SPaul Saab  *
86d90faf3SPaul Saab  * Redistribution and use in source and binary forms, with or without
96d90faf3SPaul Saab  * modification, are permitted provided that the following conditions
106d90faf3SPaul Saab  * are met:
116d90faf3SPaul Saab  * 1. Redistributions of source code must retain the above copyright
126d90faf3SPaul Saab  *    notice, this list of conditions and the following disclaimer.
136d90faf3SPaul Saab  * 2. Redistributions in binary form must reproduce the above copyright
146d90faf3SPaul Saab  *    notice, this list of conditions and the following disclaimer in the
156d90faf3SPaul Saab  *    documentation and/or other materials provided with the distribution.
1651369649SPedro F. Giffuni  * 3. Neither the name of the University nor the names of its contributors
176d90faf3SPaul Saab  *    may be used to endorse or promote products derived from this software
186d90faf3SPaul Saab  *    without specific prior written permission.
196d90faf3SPaul Saab  *
206d90faf3SPaul Saab  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
216d90faf3SPaul Saab  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
226d90faf3SPaul Saab  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
236d90faf3SPaul Saab  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
246d90faf3SPaul Saab  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
256d90faf3SPaul Saab  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
266d90faf3SPaul Saab  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
276d90faf3SPaul Saab  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
286d90faf3SPaul Saab  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
296d90faf3SPaul Saab  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
306d90faf3SPaul Saab  * SUCH DAMAGE.
316d90faf3SPaul Saab  *
326d90faf3SPaul Saab  *	@(#)tcp_sack.c	8.12 (Berkeley) 5/24/95
336d90faf3SPaul Saab  */
346d90faf3SPaul Saab 
35c398230bSWarner Losh /*-
366d90faf3SPaul Saab  *	@@(#)COPYRIGHT	1.1 (NRL) 17 January 1995
376d90faf3SPaul Saab  *
386d90faf3SPaul Saab  * NRL grants permission for redistribution and use in source and binary
396d90faf3SPaul Saab  * forms, with or without modification, of the software and documentation
406d90faf3SPaul Saab  * created at NRL provided that the following conditions are met:
416d90faf3SPaul Saab  *
426d90faf3SPaul Saab  * 1. Redistributions of source code must retain the above copyright
436d90faf3SPaul Saab  *    notice, this list of conditions and the following disclaimer.
446d90faf3SPaul Saab  * 2. Redistributions in binary form must reproduce the above copyright
456d90faf3SPaul Saab  *    notice, this list of conditions and the following disclaimer in the
466d90faf3SPaul Saab  *    documentation and/or other materials provided with the distribution.
476d90faf3SPaul Saab  * 3. All advertising materials mentioning features or use of this software
486d90faf3SPaul Saab  *    must display the following acknowledgements:
496d90faf3SPaul Saab  *	This product includes software developed by the University of
506d90faf3SPaul Saab  *	California, Berkeley and its contributors.
516d90faf3SPaul Saab  *	This product includes software developed at the Information
526d90faf3SPaul Saab  *	Technology Division, US Naval Research Laboratory.
536d90faf3SPaul Saab  * 4. Neither the name of the NRL nor the names of its contributors
546d90faf3SPaul Saab  *    may be used to endorse or promote products derived from this software
556d90faf3SPaul Saab  *    without specific prior written permission.
566d90faf3SPaul Saab  *
576d90faf3SPaul Saab  * THE SOFTWARE PROVIDED BY NRL IS PROVIDED BY NRL AND CONTRIBUTORS ``AS
586d90faf3SPaul Saab  * IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
596d90faf3SPaul Saab  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
606d90faf3SPaul Saab  * PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL NRL OR
616d90faf3SPaul Saab  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
626d90faf3SPaul Saab  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
636d90faf3SPaul Saab  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
646d90faf3SPaul Saab  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
656d90faf3SPaul Saab  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
666d90faf3SPaul Saab  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
676d90faf3SPaul Saab  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
686d90faf3SPaul Saab  *
696d90faf3SPaul Saab  * The views and conclusions contained in the software and documentation
706d90faf3SPaul Saab  * are those of the authors and should not be interpreted as representing
716d90faf3SPaul Saab  * official policies, either expressed or implied, of the US Naval
726d90faf3SPaul Saab  * Research Laboratory (NRL).
736d90faf3SPaul Saab  */
74632bbf0fSRobert Watson 
75632bbf0fSRobert Watson #include <sys/cdefs.h>
76632bbf0fSRobert Watson __FBSDID("$FreeBSD$");
77632bbf0fSRobert Watson 
786d90faf3SPaul Saab #include "opt_inet.h"
796d90faf3SPaul Saab #include "opt_inet6.h"
806d90faf3SPaul Saab #include "opt_tcpdebug.h"
816d90faf3SPaul Saab 
826d90faf3SPaul Saab #include <sys/param.h>
836d90faf3SPaul Saab #include <sys/systm.h>
846d90faf3SPaul Saab #include <sys/kernel.h>
856d90faf3SPaul Saab #include <sys/sysctl.h>
866d90faf3SPaul Saab #include <sys/malloc.h>
876d90faf3SPaul Saab #include <sys/mbuf.h>
886d90faf3SPaul Saab #include <sys/proc.h>		/* for proc0 declaration */
896d90faf3SPaul Saab #include <sys/protosw.h>
906d90faf3SPaul Saab #include <sys/socket.h>
916d90faf3SPaul Saab #include <sys/socketvar.h>
926d90faf3SPaul Saab #include <sys/syslog.h>
936d90faf3SPaul Saab #include <sys/systm.h>
946d90faf3SPaul Saab 
956d90faf3SPaul Saab #include <machine/cpu.h>	/* before tcp_seq.h, for tcp_random18() */
966d90faf3SPaul Saab 
976d90faf3SPaul Saab #include <vm/uma.h>
986d90faf3SPaul Saab 
996d90faf3SPaul Saab #include <net/if.h>
10076039bc8SGleb Smirnoff #include <net/if_var.h>
1016d90faf3SPaul Saab #include <net/route.h>
102530c0060SRobert Watson #include <net/vnet.h>
1036d90faf3SPaul Saab 
1046d90faf3SPaul Saab #include <netinet/in.h>
1056d90faf3SPaul Saab #include <netinet/in_systm.h>
1066d90faf3SPaul Saab #include <netinet/ip.h>
1076d90faf3SPaul Saab #include <netinet/in_var.h>
1086d90faf3SPaul Saab #include <netinet/in_pcb.h>
1096d90faf3SPaul Saab #include <netinet/ip_var.h>
1106d90faf3SPaul Saab #include <netinet/ip6.h>
1116d90faf3SPaul Saab #include <netinet/icmp6.h>
1126d90faf3SPaul Saab #include <netinet6/nd6.h>
1136d90faf3SPaul Saab #include <netinet6/ip6_var.h>
1146d90faf3SPaul Saab #include <netinet6/in6_pcb.h>
1156d90faf3SPaul Saab #include <netinet/tcp.h>
1166d90faf3SPaul Saab #include <netinet/tcp_fsm.h>
1176d90faf3SPaul Saab #include <netinet/tcp_seq.h>
1186d90faf3SPaul Saab #include <netinet/tcp_timer.h>
1196d90faf3SPaul Saab #include <netinet/tcp_var.h>
1206d90faf3SPaul Saab #include <netinet6/tcp6_var.h>
1216d90faf3SPaul Saab #include <netinet/tcpip.h>
1226d90faf3SPaul Saab #ifdef TCPDEBUG
1236d90faf3SPaul Saab #include <netinet/tcp_debug.h>
1246d90faf3SPaul Saab #endif /* TCPDEBUG */
1256d90faf3SPaul Saab 
1266d90faf3SPaul Saab #include <machine/in_cksum.h>
1276d90faf3SPaul Saab 
128eddfbb76SRobert Watson VNET_DECLARE(struct uma_zone *, sack_hole_zone);
1291e77c105SRobert Watson #define	V_sack_hole_zone		VNET(sack_hole_zone)
13044e33a07SMarko Zec 
131a55db2b6SPaul Saab SYSCTL_NODE(_net_inet_tcp, OID_AUTO, sack, CTLFLAG_RW, 0, "TCP SACK");
13282cea7e6SBjoern A. Zeeb VNET_DEFINE(int, tcp_do_sack) = 1;
13382cea7e6SBjoern A. Zeeb #define	V_tcp_do_sack			VNET(tcp_do_sack)
1346df8a710SGleb Smirnoff SYSCTL_INT(_net_inet_tcp_sack, OID_AUTO, enable, CTLFLAG_VNET | CTLFLAG_RW,
135eddfbb76SRobert Watson     &VNET_NAME(tcp_do_sack), 0, "Enable/Disable TCP SACK support");
136a55db2b6SPaul Saab 
13782cea7e6SBjoern A. Zeeb VNET_DEFINE(int, tcp_sack_maxholes) = 128;
1386df8a710SGleb Smirnoff SYSCTL_INT(_net_inet_tcp_sack, OID_AUTO, maxholes, CTLFLAG_VNET | CTLFLAG_RW,
139eddfbb76SRobert Watson     &VNET_NAME(tcp_sack_maxholes), 0,
140e891d82bSPaul Saab     "Maximum number of TCP SACK holes allowed per connection");
141e891d82bSPaul Saab 
14282cea7e6SBjoern A. Zeeb VNET_DEFINE(int, tcp_sack_globalmaxholes) = 65536;
1436df8a710SGleb Smirnoff SYSCTL_INT(_net_inet_tcp_sack, OID_AUTO, globalmaxholes, CTLFLAG_VNET | CTLFLAG_RW,
144eddfbb76SRobert Watson     &VNET_NAME(tcp_sack_globalmaxholes), 0,
145e891d82bSPaul Saab     "Global maximum number of TCP SACK holes");
146e891d82bSPaul Saab 
14782cea7e6SBjoern A. Zeeb VNET_DEFINE(int, tcp_sack_globalholes) = 0;
1486df8a710SGleb Smirnoff SYSCTL_INT(_net_inet_tcp_sack, OID_AUTO, globalholes, CTLFLAG_VNET | CTLFLAG_RD,
149eddfbb76SRobert Watson     &VNET_NAME(tcp_sack_globalholes), 0,
150e891d82bSPaul Saab     "Global number of TCP SACK holes currently allocated");
151b7c75571SPaul Saab 
1526d90faf3SPaul Saab /*
153632bbf0fSRobert Watson  * This function is called upon receipt of new valid data (while not in
154632bbf0fSRobert Watson  * header prediction mode), and it updates the ordered list of sacks.
1556d90faf3SPaul Saab  */
1566d90faf3SPaul Saab void
157b7c75571SPaul Saab tcp_update_sack_list(struct tcpcb *tp, tcp_seq rcv_start, tcp_seq rcv_end)
1586d90faf3SPaul Saab {
1596d90faf3SPaul Saab 	/*
1606d90faf3SPaul Saab 	 * First reported block MUST be the most recent one.  Subsequent
1616d90faf3SPaul Saab 	 * blocks SHOULD be in the order in which they arrived at the
1626d90faf3SPaul Saab 	 * receiver.  These two conditions make the implementation fully
1636d90faf3SPaul Saab 	 * compliant with RFC 2018.
1646d90faf3SPaul Saab 	 */
165b7c75571SPaul Saab 	struct sackblk head_blk, saved_blks[MAX_SACK_BLKS];
166b7c75571SPaul Saab 	int num_head, num_saved, i;
1676d90faf3SPaul Saab 
1688501a69cSRobert Watson 	INP_WLOCK_ASSERT(tp->t_inpcb);
169b7c75571SPaul Saab 
170632bbf0fSRobert Watson 	/* Check arguments. */
171*5acfd95cSMichael Tuexen 	KASSERT(SEQ_LEQ(rcv_start, rcv_end), ("rcv_start <= rcv_end"));
172b7c75571SPaul Saab 
173b7c75571SPaul Saab 	/* SACK block for the received segment. */
174b7c75571SPaul Saab 	head_blk.start = rcv_start;
175b7c75571SPaul Saab 	head_blk.end = rcv_end;
176b7c75571SPaul Saab 
177b7c75571SPaul Saab 	/*
178632bbf0fSRobert Watson 	 * Merge updated SACK blocks into head_blk, and save unchanged SACK
179632bbf0fSRobert Watson 	 * blocks into saved_blks[].  num_saved will have the number of the
180632bbf0fSRobert Watson 	 * saved SACK blocks.
181b7c75571SPaul Saab 	 */
182b7c75571SPaul Saab 	num_saved = 0;
1836d90faf3SPaul Saab 	for (i = 0; i < tp->rcv_numsacks; i++) {
184b7c75571SPaul Saab 		tcp_seq start = tp->sackblks[i].start;
185b7c75571SPaul Saab 		tcp_seq end = tp->sackblks[i].end;
186b7c75571SPaul Saab 		if (SEQ_GEQ(start, end) || SEQ_LEQ(start, tp->rcv_nxt)) {
187b7c75571SPaul Saab 			/*
188b7c75571SPaul Saab 			 * Discard this SACK block.
189b7c75571SPaul Saab 			 */
190b7c75571SPaul Saab 		} else if (SEQ_LEQ(head_blk.start, end) &&
191b7c75571SPaul Saab 			   SEQ_GEQ(head_blk.end, start)) {
192b7c75571SPaul Saab 			/*
193632bbf0fSRobert Watson 			 * Merge this SACK block into head_blk.  This SACK
194632bbf0fSRobert Watson 			 * block itself will be discarded.
195b7c75571SPaul Saab 			 */
196*5acfd95cSMichael Tuexen 			/*
197*5acfd95cSMichael Tuexen 			 * |-|
198*5acfd95cSMichael Tuexen 			 *   |---|  merge
199*5acfd95cSMichael Tuexen 			 *
200*5acfd95cSMichael Tuexen 			 *     |-|
201*5acfd95cSMichael Tuexen 			 * |---|    merge
202*5acfd95cSMichael Tuexen 			 *
203*5acfd95cSMichael Tuexen 			 * |-----|
204*5acfd95cSMichael Tuexen 			 *   |-|    DSACK smaller
205*5acfd95cSMichael Tuexen 			 *
206*5acfd95cSMichael Tuexen 			 *   |-|
207*5acfd95cSMichael Tuexen 			 * |-----|  DSACK smaller
208*5acfd95cSMichael Tuexen 			 */
209*5acfd95cSMichael Tuexen 			if (head_blk.start == end)
210b7c75571SPaul Saab 				head_blk.start = start;
211*5acfd95cSMichael Tuexen 			else if (head_blk.end == start)
212b7c75571SPaul Saab 				head_blk.end = end;
213*5acfd95cSMichael Tuexen 			else {
214*5acfd95cSMichael Tuexen 				if (SEQ_LT(head_blk.start, start)) {
215*5acfd95cSMichael Tuexen 					tcp_seq temp = start;
216*5acfd95cSMichael Tuexen 					start = head_blk.start;
217*5acfd95cSMichael Tuexen 					head_blk.start = temp;
218*5acfd95cSMichael Tuexen 				}
219*5acfd95cSMichael Tuexen 				if (SEQ_GT(head_blk.end, end)) {
220*5acfd95cSMichael Tuexen 					tcp_seq temp = end;
221*5acfd95cSMichael Tuexen 					end = head_blk.end;
222*5acfd95cSMichael Tuexen 					head_blk.end = temp;
223*5acfd95cSMichael Tuexen 				}
224*5acfd95cSMichael Tuexen 				if ((head_blk.start != start) ||
225*5acfd95cSMichael Tuexen 				    (head_blk.end != end)) {
226*5acfd95cSMichael Tuexen 					if ((num_saved >= 1) &&
227*5acfd95cSMichael Tuexen 					   SEQ_GEQ(saved_blks[num_saved-1].start, start) &&
228*5acfd95cSMichael Tuexen 					   SEQ_LEQ(saved_blks[num_saved-1].end, end))
229*5acfd95cSMichael Tuexen 						num_saved--;
230*5acfd95cSMichael Tuexen 					saved_blks[num_saved].start = start;
231*5acfd95cSMichael Tuexen 					saved_blks[num_saved].end = end;
232*5acfd95cSMichael Tuexen 					num_saved++;
233*5acfd95cSMichael Tuexen 				}
234*5acfd95cSMichael Tuexen 			}
2356d90faf3SPaul Saab 		} else {
2366d90faf3SPaul Saab 			/*
237*5acfd95cSMichael Tuexen 			 * This block supercedes the prior block
238*5acfd95cSMichael Tuexen 			 */
239*5acfd95cSMichael Tuexen 			if ((num_saved >= 1) &&
240*5acfd95cSMichael Tuexen 			   SEQ_GEQ(saved_blks[num_saved-1].start, start) &&
241*5acfd95cSMichael Tuexen 			   SEQ_LEQ(saved_blks[num_saved-1].end, end))
242*5acfd95cSMichael Tuexen 				num_saved--;
243*5acfd95cSMichael Tuexen 			/*
244b7c75571SPaul Saab 			 * Save this SACK block.
2456d90faf3SPaul Saab 			 */
246b7c75571SPaul Saab 			saved_blks[num_saved].start = start;
247b7c75571SPaul Saab 			saved_blks[num_saved].end = end;
248b7c75571SPaul Saab 			num_saved++;
249b7c75571SPaul Saab 		}
250b7c75571SPaul Saab 	}
251b7c75571SPaul Saab 
2526d90faf3SPaul Saab 	/*
253b7c75571SPaul Saab 	 * Update SACK list in tp->sackblks[].
2546d90faf3SPaul Saab 	 */
255b7c75571SPaul Saab 	num_head = 0;
256*5acfd95cSMichael Tuexen 	if (SEQ_LT(rcv_start, rcv_end)) {
257b7c75571SPaul Saab 		/*
258632bbf0fSRobert Watson 		 * The received data segment is an out-of-order segment.  Put
259632bbf0fSRobert Watson 		 * head_blk at the top of SACK list.
260b7c75571SPaul Saab 		 */
261b7c75571SPaul Saab 		tp->sackblks[0] = head_blk;
262b7c75571SPaul Saab 		num_head = 1;
263b7c75571SPaul Saab 		/*
264b7c75571SPaul Saab 		 * If the number of saved SACK blocks exceeds its limit,
265b7c75571SPaul Saab 		 * discard the last SACK block.
266b7c75571SPaul Saab 		 */
267b7c75571SPaul Saab 		if (num_saved >= MAX_SACK_BLKS)
268b7c75571SPaul Saab 			num_saved--;
2696d90faf3SPaul Saab 	}
270b7c75571SPaul Saab 	if (num_saved > 0) {
271b7c75571SPaul Saab 		/*
272b7c75571SPaul Saab 		 * Copy the saved SACK blocks back.
273b7c75571SPaul Saab 		 */
274b7c75571SPaul Saab 		bcopy(saved_blks, &tp->sackblks[num_head],
275b7c75571SPaul Saab 		      sizeof(struct sackblk) * num_saved);
2766d90faf3SPaul Saab 	}
277b7c75571SPaul Saab 
278b7c75571SPaul Saab 	/* Save the number of SACK blocks. */
279b7c75571SPaul Saab 	tp->rcv_numsacks = num_head + num_saved;
2806d90faf3SPaul Saab }
2816d90faf3SPaul Saab 
2826d90faf3SPaul Saab /*
2836d90faf3SPaul Saab  * Delete all receiver-side SACK information.
2846d90faf3SPaul Saab  */
2856d90faf3SPaul Saab void
286f2565d68SRobert Watson tcp_clean_sackreport(struct tcpcb *tp)
2876d90faf3SPaul Saab {
2886d90faf3SPaul Saab 	int i;
2896d90faf3SPaul Saab 
2908501a69cSRobert Watson 	INP_WLOCK_ASSERT(tp->t_inpcb);
2916d90faf3SPaul Saab 	tp->rcv_numsacks = 0;
2926d90faf3SPaul Saab 	for (i = 0; i < MAX_SACK_BLKS; i++)
2936d90faf3SPaul Saab 		tp->sackblks[i].start = tp->sackblks[i].end=0;
2946d90faf3SPaul Saab }
2956d90faf3SPaul Saab 
2966d90faf3SPaul Saab /*
2974fc53245SPaul Saab  * Allocate struct sackhole.
2984fc53245SPaul Saab  */
2994fc53245SPaul Saab static struct sackhole *
3004fc53245SPaul Saab tcp_sackhole_alloc(struct tcpcb *tp, tcp_seq start, tcp_seq end)
3014fc53245SPaul Saab {
3024fc53245SPaul Saab 	struct sackhole *hole;
3034fc53245SPaul Saab 
304603724d3SBjoern A. Zeeb 	if (tp->snd_numholes >= V_tcp_sack_maxholes ||
305603724d3SBjoern A. Zeeb 	    V_tcp_sack_globalholes >= V_tcp_sack_globalmaxholes) {
30678b50714SRobert Watson 		TCPSTAT_INC(tcps_sack_sboverflow);
3074fc53245SPaul Saab 		return NULL;
3084fc53245SPaul Saab 	}
3094fc53245SPaul Saab 
3101ed81b73SMarko Zec 	hole = (struct sackhole *)uma_zalloc(V_sack_hole_zone, M_NOWAIT);
3114fc53245SPaul Saab 	if (hole == NULL)
3124fc53245SPaul Saab 		return NULL;
3134fc53245SPaul Saab 
3144fc53245SPaul Saab 	hole->start = start;
3154fc53245SPaul Saab 	hole->end = end;
3164fc53245SPaul Saab 	hole->rxmit = start;
3174fc53245SPaul Saab 
3184fc53245SPaul Saab 	tp->snd_numholes++;
31991a5ebdeSLawrence Stewart 	atomic_add_int(&V_tcp_sack_globalholes, 1);
3204fc53245SPaul Saab 
3214fc53245SPaul Saab 	return hole;
3224fc53245SPaul Saab }
3234fc53245SPaul Saab 
3244fc53245SPaul Saab /*
3254fc53245SPaul Saab  * Free struct sackhole.
3264fc53245SPaul Saab  */
3274fc53245SPaul Saab static void
3284fc53245SPaul Saab tcp_sackhole_free(struct tcpcb *tp, struct sackhole *hole)
3294fc53245SPaul Saab {
330632bbf0fSRobert Watson 
3311ed81b73SMarko Zec 	uma_zfree(V_sack_hole_zone, hole);
3324fc53245SPaul Saab 
3334fc53245SPaul Saab 	tp->snd_numholes--;
33491a5ebdeSLawrence Stewart 	atomic_subtract_int(&V_tcp_sack_globalholes, 1);
3354fc53245SPaul Saab 
3364fc53245SPaul Saab 	KASSERT(tp->snd_numholes >= 0, ("tp->snd_numholes >= 0"));
337603724d3SBjoern A. Zeeb 	KASSERT(V_tcp_sack_globalholes >= 0, ("tcp_sack_globalholes >= 0"));
3384fc53245SPaul Saab }
3394fc53245SPaul Saab 
3404fc53245SPaul Saab /*
3419d17a7a6SPaul Saab  * Insert new SACK hole into scoreboard.
3429d17a7a6SPaul Saab  */
3439d17a7a6SPaul Saab static struct sackhole *
3449d17a7a6SPaul Saab tcp_sackhole_insert(struct tcpcb *tp, tcp_seq start, tcp_seq end,
3459d17a7a6SPaul Saab     struct sackhole *after)
3469d17a7a6SPaul Saab {
3479d17a7a6SPaul Saab 	struct sackhole *hole;
3489d17a7a6SPaul Saab 
3499d17a7a6SPaul Saab 	/* Allocate a new SACK hole. */
3509d17a7a6SPaul Saab 	hole = tcp_sackhole_alloc(tp, start, end);
3519d17a7a6SPaul Saab 	if (hole == NULL)
3529d17a7a6SPaul Saab 		return NULL;
3539d17a7a6SPaul Saab 
354632bbf0fSRobert Watson 	/* Insert the new SACK hole into scoreboard. */
3559d17a7a6SPaul Saab 	if (after != NULL)
3569d17a7a6SPaul Saab 		TAILQ_INSERT_AFTER(&tp->snd_holes, after, hole, scblink);
3579d17a7a6SPaul Saab 	else
3589d17a7a6SPaul Saab 		TAILQ_INSERT_TAIL(&tp->snd_holes, hole, scblink);
3599d17a7a6SPaul Saab 
3609d17a7a6SPaul Saab 	/* Update SACK hint. */
3619d17a7a6SPaul Saab 	if (tp->sackhint.nexthole == NULL)
3629d17a7a6SPaul Saab 		tp->sackhint.nexthole = hole;
3639d17a7a6SPaul Saab 
3649d17a7a6SPaul Saab 	return hole;
3659d17a7a6SPaul Saab }
3669d17a7a6SPaul Saab 
3679d17a7a6SPaul Saab /*
3689d17a7a6SPaul Saab  * Remove SACK hole from scoreboard.
3699d17a7a6SPaul Saab  */
3709d17a7a6SPaul Saab static void
3719d17a7a6SPaul Saab tcp_sackhole_remove(struct tcpcb *tp, struct sackhole *hole)
3729d17a7a6SPaul Saab {
373632bbf0fSRobert Watson 
3749d17a7a6SPaul Saab 	/* Update SACK hint. */
3759d17a7a6SPaul Saab 	if (tp->sackhint.nexthole == hole)
3769d17a7a6SPaul Saab 		tp->sackhint.nexthole = TAILQ_NEXT(hole, scblink);
3779d17a7a6SPaul Saab 
3789d17a7a6SPaul Saab 	/* Remove this SACK hole. */
3799d17a7a6SPaul Saab 	TAILQ_REMOVE(&tp->snd_holes, hole, scblink);
3809d17a7a6SPaul Saab 
3819d17a7a6SPaul Saab 	/* Free this SACK hole. */
3829d17a7a6SPaul Saab 	tcp_sackhole_free(tp, hole);
3839d17a7a6SPaul Saab }
3849d17a7a6SPaul Saab 
3859d17a7a6SPaul Saab /*
3865a53ca16SPaul Saab  * Process cumulative ACK and the TCP SACK option to update the scoreboard.
3875a53ca16SPaul Saab  * tp->snd_holes is an ordered list of holes (oldest to newest, in terms of
3885a53ca16SPaul Saab  * the sequence space).
389021eaf79SHiren Panchasara  * Returns 1 if incoming ACK has previously unknown SACK information,
390021eaf79SHiren Panchasara  * 0 otherwise. Note: We treat (snd_una, th_ack) as a sack block so any changes
391021eaf79SHiren Panchasara  * to that (i.e. left edge moving) would also be considered a change in SACK
392021eaf79SHiren Panchasara  * information which is slightly different than rfc6675.
3936d90faf3SPaul Saab  */
394021eaf79SHiren Panchasara int
3955a53ca16SPaul Saab tcp_sack_doack(struct tcpcb *tp, struct tcpopt *to, tcp_seq th_ack)
3966d90faf3SPaul Saab {
397a6235da6SPaul Saab 	struct sackhole *cur, *temp;
3985a53ca16SPaul Saab 	struct sackblk sack, sack_blocks[TCP_MAX_SACK + 1], *sblkp;
399021eaf79SHiren Panchasara 	int i, j, num_sack_blks, sack_changed;
4006d90faf3SPaul Saab 
4018501a69cSRobert Watson 	INP_WLOCK_ASSERT(tp->t_inpcb);
4025a53ca16SPaul Saab 
40364b5fbaaSPaul Saab 	num_sack_blks = 0;
404021eaf79SHiren Panchasara 	sack_changed = 0;
4055a53ca16SPaul Saab 	/*
4065a53ca16SPaul Saab 	 * If SND.UNA will be advanced by SEG.ACK, and if SACK holes exist,
4075a53ca16SPaul Saab 	 * treat [SND.UNA, SEG.ACK) as if it is a SACK block.
4085a53ca16SPaul Saab 	 */
4095a53ca16SPaul Saab 	if (SEQ_LT(tp->snd_una, th_ack) && !TAILQ_EMPTY(&tp->snd_holes)) {
4105a53ca16SPaul Saab 		sack_blocks[num_sack_blks].start = tp->snd_una;
4115a53ca16SPaul Saab 		sack_blocks[num_sack_blks++].end = th_ack;
4125a53ca16SPaul Saab 	}
4135a53ca16SPaul Saab 	/*
414632bbf0fSRobert Watson 	 * Append received valid SACK blocks to sack_blocks[], but only if we
415632bbf0fSRobert Watson 	 * received new blocks from the other side.
4165a53ca16SPaul Saab 	 */
41707b64b90SAndre Oppermann 	if (to->to_flags & TOF_SACK) {
41812eeb81fSHiren Panchasara 		tp->sackhint.sacked_bytes = 0;	/* reset */
4195a53ca16SPaul Saab 		for (i = 0; i < to->to_nsacks; i++) {
42007b64b90SAndre Oppermann 			bcopy((to->to_sacks + i * TCPOLEN_SACK),
42107b64b90SAndre Oppermann 			    &sack, sizeof(sack));
4226d90faf3SPaul Saab 			sack.start = ntohl(sack.start);
4236d90faf3SPaul Saab 			sack.end = ntohl(sack.end);
42464b5fbaaSPaul Saab 			if (SEQ_GT(sack.end, sack.start) &&
42564b5fbaaSPaul Saab 			    SEQ_GT(sack.start, tp->snd_una) &&
4265a53ca16SPaul Saab 			    SEQ_GT(sack.start, th_ack) &&
4271f65c2cdSMohan Srinivasan 			    SEQ_LT(sack.start, tp->snd_max) &&
4281f65c2cdSMohan Srinivasan 			    SEQ_GT(sack.end, tp->snd_una) &&
42912eeb81fSHiren Panchasara 			    SEQ_LEQ(sack.end, tp->snd_max)) {
43064b5fbaaSPaul Saab 				sack_blocks[num_sack_blks++] = sack;
43112eeb81fSHiren Panchasara 				tp->sackhint.sacked_bytes +=
43212eeb81fSHiren Panchasara 				    (sack.end-sack.start);
43312eeb81fSHiren Panchasara 			}
4346d90faf3SPaul Saab 		}
43507b64b90SAndre Oppermann 	}
4365a53ca16SPaul Saab 	/*
437632bbf0fSRobert Watson 	 * Return if SND.UNA is not advanced and no valid SACK block is
438632bbf0fSRobert Watson 	 * received.
4395a53ca16SPaul Saab 	 */
44064b5fbaaSPaul Saab 	if (num_sack_blks == 0)
441021eaf79SHiren Panchasara 		return (sack_changed);
4425a53ca16SPaul Saab 
4435a53ca16SPaul Saab 	/*
444632bbf0fSRobert Watson 	 * Sort the SACK blocks so we can update the scoreboard with just one
445632bbf0fSRobert Watson 	 * pass. The overhead of sorting up to 4+1 elements is less than
446632bbf0fSRobert Watson 	 * making up to 4+1 passes over the scoreboard.
4475a53ca16SPaul Saab 	 */
44864b5fbaaSPaul Saab 	for (i = 0; i < num_sack_blks; i++) {
44964b5fbaaSPaul Saab 		for (j = i + 1; j < num_sack_blks; j++) {
4509d17a7a6SPaul Saab 			if (SEQ_GT(sack_blocks[i].end, sack_blocks[j].end)) {
45164b5fbaaSPaul Saab 				sack = sack_blocks[i];
45264b5fbaaSPaul Saab 				sack_blocks[i] = sack_blocks[j];
45364b5fbaaSPaul Saab 				sack_blocks[j] = sack;
4546d90faf3SPaul Saab 			}
4556d90faf3SPaul Saab 		}
45664b5fbaaSPaul Saab 	}
45764b5fbaaSPaul Saab 	if (TAILQ_EMPTY(&tp->snd_holes))
45864b5fbaaSPaul Saab 		/*
459808f11b7SPaul Saab 		 * Empty scoreboard. Need to initialize snd_fack (it may be
46064b5fbaaSPaul Saab 		 * uninitialized or have a bogus value). Scoreboard holes
461632bbf0fSRobert Watson 		 * (from the sack blocks received) are created later below
462632bbf0fSRobert Watson 		 * (in the logic that adds holes to the tail of the
463632bbf0fSRobert Watson 		 * scoreboard).
46464b5fbaaSPaul Saab 		 */
4655a53ca16SPaul Saab 		tp->snd_fack = SEQ_MAX(tp->snd_una, th_ack);
4669d17a7a6SPaul Saab 	/*
467632bbf0fSRobert Watson 	 * In the while-loop below, incoming SACK blocks (sack_blocks[]) and
468632bbf0fSRobert Watson 	 * SACK holes (snd_holes) are traversed from their tails with just
469632bbf0fSRobert Watson 	 * one pass in order to reduce the number of compares especially when
470632bbf0fSRobert Watson 	 * the bandwidth-delay product is large.
471632bbf0fSRobert Watson 	 *
4729d17a7a6SPaul Saab 	 * Note: Typically, in the first RTT of SACK recovery, the highest
4739d17a7a6SPaul Saab 	 * three or four SACK blocks with the same ack number are received.
4749d17a7a6SPaul Saab 	 * In the second RTT, if retransmitted data segments are not lost,
4759d17a7a6SPaul Saab 	 * the highest three or four SACK blocks with ack number advancing
4769d17a7a6SPaul Saab 	 * are received.
4779d17a7a6SPaul Saab 	 */
4789d17a7a6SPaul Saab 	sblkp = &sack_blocks[num_sack_blks - 1];	/* Last SACK block */
479bee9ab2bSLawrence Stewart 	tp->sackhint.last_sack_ack = sblkp->end;
4809d17a7a6SPaul Saab 	if (SEQ_LT(tp->snd_fack, sblkp->start)) {
4819d17a7a6SPaul Saab 		/*
482632bbf0fSRobert Watson 		 * The highest SACK block is beyond fack.  Append new SACK
483632bbf0fSRobert Watson 		 * hole at the tail.  If the second or later highest SACK
484632bbf0fSRobert Watson 		 * blocks are also beyond the current fack, they will be
485632bbf0fSRobert Watson 		 * inserted by way of hole splitting in the while-loop below.
4869d17a7a6SPaul Saab 		 */
4878b9bbaaaSPaul Saab 		temp = tcp_sackhole_insert(tp, tp->snd_fack,sblkp->start,NULL);
488d0a14f55SPaul Saab 		if (temp != NULL) {
4899d17a7a6SPaul Saab 			tp->snd_fack = sblkp->end;
4909d17a7a6SPaul Saab 			/* Go to the previous sack block. */
4919d17a7a6SPaul Saab 			sblkp--;
492021eaf79SHiren Panchasara 			sack_changed = 1;
493d0a14f55SPaul Saab 		} else {
494d0a14f55SPaul Saab 			/*
495d0a14f55SPaul Saab 			 * We failed to add a new hole based on the current
496d0a14f55SPaul Saab 			 * sack block.  Skip over all the sack blocks that
497632bbf0fSRobert Watson 			 * fall completely to the right of snd_fack and
498632bbf0fSRobert Watson 			 * proceed to trim the scoreboard based on the
499632bbf0fSRobert Watson 			 * remaining sack blocks.  This also trims the
500632bbf0fSRobert Watson 			 * scoreboard for th_ack (which is sack_blocks[0]).
501d0a14f55SPaul Saab 			 */
502d0a14f55SPaul Saab 			while (sblkp >= sack_blocks &&
503d0a14f55SPaul Saab 			       SEQ_LT(tp->snd_fack, sblkp->start))
504d0a14f55SPaul Saab 				sblkp--;
505d0a14f55SPaul Saab 			if (sblkp >= sack_blocks &&
506d0a14f55SPaul Saab 			    SEQ_LT(tp->snd_fack, sblkp->end))
507d0a14f55SPaul Saab 				tp->snd_fack = sblkp->end;
508d0a14f55SPaul Saab 		}
509021eaf79SHiren Panchasara 	} else if (SEQ_LT(tp->snd_fack, sblkp->end)) {
5109d17a7a6SPaul Saab 		/* fack is advanced. */
5119d17a7a6SPaul Saab 		tp->snd_fack = sblkp->end;
512021eaf79SHiren Panchasara 		sack_changed = 1;
513021eaf79SHiren Panchasara 	}
514632bbf0fSRobert Watson 	cur = TAILQ_LAST(&tp->snd_holes, sackhole_head); /* Last SACK hole. */
51564b5fbaaSPaul Saab 	/*
51664b5fbaaSPaul Saab 	 * Since the incoming sack blocks are sorted, we can process them
51764b5fbaaSPaul Saab 	 * making one sweep of the scoreboard.
51864b5fbaaSPaul Saab 	 */
519d0a14f55SPaul Saab 	while (sblkp >= sack_blocks  && cur != NULL) {
5209d17a7a6SPaul Saab 		if (SEQ_GEQ(sblkp->start, cur->end)) {
52164b5fbaaSPaul Saab 			/*
522632bbf0fSRobert Watson 			 * SACKs data beyond the current hole.  Go to the
523632bbf0fSRobert Watson 			 * previous sack block.
52464b5fbaaSPaul Saab 			 */
5259d17a7a6SPaul Saab 			sblkp--;
5269d17a7a6SPaul Saab 			continue;
5279d17a7a6SPaul Saab 		}
5289d17a7a6SPaul Saab 		if (SEQ_LEQ(sblkp->end, cur->start)) {
5299d17a7a6SPaul Saab 			/*
530632bbf0fSRobert Watson 			 * SACKs data before the current hole.  Go to the
531632bbf0fSRobert Watson 			 * previous hole.
5329d17a7a6SPaul Saab 			 */
5339d17a7a6SPaul Saab 			cur = TAILQ_PREV(cur, sackhole_head, scblink);
5346d90faf3SPaul Saab 			continue;
5356d90faf3SPaul Saab 		}
53664b5fbaaSPaul Saab 		tp->sackhint.sack_bytes_rexmit -= (cur->rxmit - cur->start);
5370077b016SPaul Saab 		KASSERT(tp->sackhint.sack_bytes_rexmit >= 0,
5380077b016SPaul Saab 		    ("sackhint bytes rtx >= 0"));
539021eaf79SHiren Panchasara 		sack_changed = 1;
5409d17a7a6SPaul Saab 		if (SEQ_LEQ(sblkp->start, cur->start)) {
541632bbf0fSRobert Watson 			/* Data acks at least the beginning of hole. */
5429d17a7a6SPaul Saab 			if (SEQ_GEQ(sblkp->end, cur->end)) {
543632bbf0fSRobert Watson 				/* Acks entire hole, so delete hole. */
544a6235da6SPaul Saab 				temp = cur;
5459d17a7a6SPaul Saab 				cur = TAILQ_PREV(cur, sackhole_head, scblink);
5469d17a7a6SPaul Saab 				tcp_sackhole_remove(tp, temp);
54764b5fbaaSPaul Saab 				/*
548632bbf0fSRobert Watson 				 * The sack block may ack all or part of the
549632bbf0fSRobert Watson 				 * next hole too, so continue onto the next
550632bbf0fSRobert Watson 				 * hole.
55164b5fbaaSPaul Saab 				 */
5526d90faf3SPaul Saab 				continue;
5530077b016SPaul Saab 			} else {
554632bbf0fSRobert Watson 				/* Move start of hole forward. */
5559d17a7a6SPaul Saab 				cur->start = sblkp->end;
5566d90faf3SPaul Saab 				cur->rxmit = SEQ_MAX(cur->rxmit, cur->start);
5576d90faf3SPaul Saab 			}
55864b5fbaaSPaul Saab 		} else {
559632bbf0fSRobert Watson 			/* Data acks at least the end of hole. */
5609d17a7a6SPaul Saab 			if (SEQ_GEQ(sblkp->end, cur->end)) {
561632bbf0fSRobert Watson 				/* Move end of hole backward. */
5629d17a7a6SPaul Saab 				cur->end = sblkp->start;
5636d90faf3SPaul Saab 				cur->rxmit = SEQ_MIN(cur->rxmit, cur->end);
5640077b016SPaul Saab 			} else {
5656d90faf3SPaul Saab 				/*
566632bbf0fSRobert Watson 				 * ACKs some data in middle of a hole; need
567632bbf0fSRobert Watson 				 * to split current hole
5686d90faf3SPaul Saab 				 */
5699d17a7a6SPaul Saab 				temp = tcp_sackhole_insert(tp, sblkp->end,
5709d17a7a6SPaul Saab 				    cur->end, cur);
5710077b016SPaul Saab 				if (temp != NULL) {
5729d17a7a6SPaul Saab 					if (SEQ_GT(cur->rxmit, temp->rxmit)) {
5734fc53245SPaul Saab 						temp->rxmit = cur->rxmit;
5749d17a7a6SPaul Saab 						tp->sackhint.sack_bytes_rexmit
5759d17a7a6SPaul Saab 						    += (temp->rxmit
5769d17a7a6SPaul Saab 						    - temp->start);
5779d17a7a6SPaul Saab 					}
5789d17a7a6SPaul Saab 					cur->end = sblkp->start;
5799d17a7a6SPaul Saab 					cur->rxmit = SEQ_MIN(cur->rxmit,
5809d17a7a6SPaul Saab 					    cur->end);
5816d90faf3SPaul Saab 				}
5826d90faf3SPaul Saab 			}
5830077b016SPaul Saab 		}
58464b5fbaaSPaul Saab 		tp->sackhint.sack_bytes_rexmit += (cur->rxmit - cur->start);
585db4b83feSPaul Saab 		/*
586db4b83feSPaul Saab 		 * Testing sblkp->start against cur->start tells us whether
587db4b83feSPaul Saab 		 * we're done with the sack block or the sack hole.
588db4b83feSPaul Saab 		 * Accordingly, we advance one or the other.
589db4b83feSPaul Saab 		 */
590db4b83feSPaul Saab 		if (SEQ_LEQ(sblkp->start, cur->start))
591db4b83feSPaul Saab 			cur = TAILQ_PREV(cur, sackhole_head, scblink);
592db4b83feSPaul Saab 		else
593db4b83feSPaul Saab 			sblkp--;
5946d90faf3SPaul Saab 	}
595021eaf79SHiren Panchasara 	return (sack_changed);
5966d90faf3SPaul Saab }
5976d90faf3SPaul Saab 
5986d90faf3SPaul Saab /*
5995a53ca16SPaul Saab  * Free all SACK holes to clear the scoreboard.
6006d90faf3SPaul Saab  */
6016d90faf3SPaul Saab void
6026d90faf3SPaul Saab tcp_free_sackholes(struct tcpcb *tp)
6036d90faf3SPaul Saab {
604a6235da6SPaul Saab 	struct sackhole *q;
6056d90faf3SPaul Saab 
6068501a69cSRobert Watson 	INP_WLOCK_ASSERT(tp->t_inpcb);
6079d17a7a6SPaul Saab 	while ((q = TAILQ_FIRST(&tp->snd_holes)) != NULL)
6089d17a7a6SPaul Saab 		tcp_sackhole_remove(tp, q);
6090077b016SPaul Saab 	tp->sackhint.sack_bytes_rexmit = 0;
6104fc53245SPaul Saab 
6114fc53245SPaul Saab 	KASSERT(tp->snd_numholes == 0, ("tp->snd_numholes == 0"));
6129d17a7a6SPaul Saab 	KASSERT(tp->sackhint.nexthole == NULL,
6139d17a7a6SPaul Saab 		("tp->sackhint.nexthole == NULL"));
6146d90faf3SPaul Saab }
6156d90faf3SPaul Saab 
6166d90faf3SPaul Saab /*
617632bbf0fSRobert Watson  * Partial ack handling within a sack recovery episode.  Keeping this very
618632bbf0fSRobert Watson  * simple for now.  When a partial ack is received, force snd_cwnd to a value
619632bbf0fSRobert Watson  * that will allow the sender to transmit no more than 2 segments.  If
620632bbf0fSRobert Watson  * necessary, a better scheme can be adopted at a later point, but for now,
621632bbf0fSRobert Watson  * the goal is to prevent the sender from bursting a large amount of data in
622632bbf0fSRobert Watson  * the midst of sack recovery.
6236d90faf3SPaul Saab  */
6246d90faf3SPaul Saab void
625ad3f9ab3SAndre Oppermann tcp_sack_partialack(struct tcpcb *tp, struct tcphdr *th)
6266d90faf3SPaul Saab {
6278db456bfSPaul Saab 	int num_segs = 1;
6286d90faf3SPaul Saab 
6298501a69cSRobert Watson 	INP_WLOCK_ASSERT(tp->t_inpcb);
630b8152ba7SAndre Oppermann 	tcp_timer_activate(tp, TT_REXMT, 0);
6316d90faf3SPaul Saab 	tp->t_rtttime = 0;
632632bbf0fSRobert Watson 	/* Send one or 2 segments based on how much new data was acked. */
633c45e1b3cSWeongyo Jeong 	if ((BYTES_THIS_ACK(tp, th) / tp->t_maxseg) >= 2)
6348db456bfSPaul Saab 		num_segs = 2;
6350077b016SPaul Saab 	tp->snd_cwnd = (tp->sackhint.sack_bytes_rexmit +
636632bbf0fSRobert Watson 	    (tp->snd_nxt - tp->sack_newdata) + num_segs * tp->t_maxseg);
63725e6f9edSPaul Saab 	if (tp->snd_cwnd > tp->snd_ssthresh)
63825e6f9edSPaul Saab 		tp->snd_cwnd = tp->snd_ssthresh;
6396d90faf3SPaul Saab 	tp->t_flags |= TF_ACKNOW;
64055bceb1eSRandall Stewart 	(void) tp->t_fb->tfb_tcp_output(tp);
6416d90faf3SPaul Saab }
6426d90faf3SPaul Saab 
6431714e18eSMohan Srinivasan #if 0
6446d90faf3SPaul Saab /*
6450077b016SPaul Saab  * Debug version of tcp_sack_output() that walks the scoreboard.  Used for
6460077b016SPaul Saab  * now to sanity check the hint.
6476d90faf3SPaul Saab  */
6480077b016SPaul Saab static struct sackhole *
6490077b016SPaul Saab tcp_sack_output_debug(struct tcpcb *tp, int *sack_bytes_rexmt)
6506d90faf3SPaul Saab {
651a6235da6SPaul Saab 	struct sackhole *p;
6526d90faf3SPaul Saab 
6538501a69cSRobert Watson 	INP_WLOCK_ASSERT(tp->t_inpcb);
654a55db2b6SPaul Saab 	*sack_bytes_rexmt = 0;
655a6235da6SPaul Saab 	TAILQ_FOREACH(p, &tp->snd_holes, scblink) {
6566d90faf3SPaul Saab 		if (SEQ_LT(p->rxmit, p->end)) {
6576d90faf3SPaul Saab 			if (SEQ_LT(p->rxmit, tp->snd_una)) {/* old SACK hole */
6586d90faf3SPaul Saab 				continue;
6596d90faf3SPaul Saab 			}
660a55db2b6SPaul Saab 			*sack_bytes_rexmt += (p->rxmit - p->start);
661a55db2b6SPaul Saab 			break;
662a55db2b6SPaul Saab 		}
663a55db2b6SPaul Saab 		*sack_bytes_rexmt += (p->rxmit - p->start);
664a55db2b6SPaul Saab 	}
6656d90faf3SPaul Saab 	return (p);
6666d90faf3SPaul Saab }
6671714e18eSMohan Srinivasan #endif
6686d90faf3SPaul Saab 
6696d90faf3SPaul Saab /*
6700077b016SPaul Saab  * Returns the next hole to retransmit and the number of retransmitted bytes
6710077b016SPaul Saab  * from the scoreboard.  We store both the next hole and the number of
6720077b016SPaul Saab  * retransmitted bytes as hints (and recompute these on the fly upon SACK/ACK
6730077b016SPaul Saab  * reception).  This avoids scoreboard traversals completely.
6740077b016SPaul Saab  *
675632bbf0fSRobert Watson  * The loop here will traverse *at most* one link.  Here's the argument.  For
676632bbf0fSRobert Watson  * the loop to traverse more than 1 link before finding the next hole to
677632bbf0fSRobert Watson  * retransmit, we would need to have at least 1 node following the current
678632bbf0fSRobert Watson  * hint with (rxmit == end).  But, for all holes following the current hint,
679632bbf0fSRobert Watson  * (start == rxmit), since we have not yet retransmitted from them.
680632bbf0fSRobert Watson  * Therefore, in order to traverse more 1 link in the loop below, we need to
681632bbf0fSRobert Watson  * have at least one node following the current hint with (start == rxmit ==
682632bbf0fSRobert Watson  * end).  But that can't happen, (start == end) means that all the data in
683632bbf0fSRobert Watson  * that hole has been sacked, in which case, the hole would have been removed
684632bbf0fSRobert Watson  * from the scoreboard.
6850077b016SPaul Saab  */
6860077b016SPaul Saab struct sackhole *
6870077b016SPaul Saab tcp_sack_output(struct tcpcb *tp, int *sack_bytes_rexmt)
6880077b016SPaul Saab {
6891714e18eSMohan Srinivasan 	struct sackhole *hole = NULL;
6900077b016SPaul Saab 
6918501a69cSRobert Watson 	INP_WLOCK_ASSERT(tp->t_inpcb);
6920077b016SPaul Saab 	*sack_bytes_rexmt = tp->sackhint.sack_bytes_rexmit;
6930077b016SPaul Saab 	hole = tp->sackhint.nexthole;
6940077b016SPaul Saab 	if (hole == NULL || SEQ_LT(hole->rxmit, hole->end))
6950077b016SPaul Saab 		goto out;
6960077b016SPaul Saab 	while ((hole = TAILQ_NEXT(hole, scblink)) != NULL) {
6970077b016SPaul Saab 		if (SEQ_LT(hole->rxmit, hole->end)) {
6980077b016SPaul Saab 			tp->sackhint.nexthole = hole;
6990077b016SPaul Saab 			break;
7000077b016SPaul Saab 		}
7010077b016SPaul Saab 	}
7020077b016SPaul Saab out:
7030077b016SPaul Saab 	return (hole);
7040077b016SPaul Saab }
7050077b016SPaul Saab 
7060077b016SPaul Saab /*
7076d90faf3SPaul Saab  * After a timeout, the SACK list may be rebuilt.  This SACK information
7086d90faf3SPaul Saab  * should be used to avoid retransmitting SACKed data.  This function
7096d90faf3SPaul Saab  * traverses the SACK list to see if snd_nxt should be moved forward.
7106d90faf3SPaul Saab  */
7116d90faf3SPaul Saab void
7126d90faf3SPaul Saab tcp_sack_adjust(struct tcpcb *tp)
7136d90faf3SPaul Saab {
714a6235da6SPaul Saab 	struct sackhole *p, *cur = TAILQ_FIRST(&tp->snd_holes);
715b7c75571SPaul Saab 
7168501a69cSRobert Watson 	INP_WLOCK_ASSERT(tp->t_inpcb);
7176d90faf3SPaul Saab 	if (cur == NULL)
7186d90faf3SPaul Saab 		return; /* No holes */
719808f11b7SPaul Saab 	if (SEQ_GEQ(tp->snd_nxt, tp->snd_fack))
7206d90faf3SPaul Saab 		return; /* We're already beyond any SACKed blocks */
721632bbf0fSRobert Watson 	/*-
7226d90faf3SPaul Saab 	 * Two cases for which we want to advance snd_nxt:
7236d90faf3SPaul Saab 	 * i) snd_nxt lies between end of one hole and beginning of another
724808f11b7SPaul Saab 	 * ii) snd_nxt lies between end of last hole and snd_fack
7256d90faf3SPaul Saab 	 */
726a6235da6SPaul Saab 	while ((p = TAILQ_NEXT(cur, scblink)) != NULL) {
7276d90faf3SPaul Saab 		if (SEQ_LT(tp->snd_nxt, cur->end))
7286d90faf3SPaul Saab 			return;
729a6235da6SPaul Saab 		if (SEQ_GEQ(tp->snd_nxt, p->start))
730a6235da6SPaul Saab 			cur = p;
7316d90faf3SPaul Saab 		else {
732a6235da6SPaul Saab 			tp->snd_nxt = p->start;
7336d90faf3SPaul Saab 			return;
7346d90faf3SPaul Saab 		}
7356d90faf3SPaul Saab 	}
7366d90faf3SPaul Saab 	if (SEQ_LT(tp->snd_nxt, cur->end))
7376d90faf3SPaul Saab 		return;
738808f11b7SPaul Saab 	tp->snd_nxt = tp->snd_fack;
7396d90faf3SPaul Saab }
740