tcp_output.c 111.0 KB
Newer Older
1
// SPDX-License-Identifier: GPL-2.0-only
L
Linus Torvalds 已提交
2 3 4 5 6 7 8
/*
 * INET		An implementation of the TCP/IP protocol suite for the LINUX
 *		operating system.  INET is implemented using the  BSD Socket
 *		interface as the means of communication with the user level.
 *
 *		Implementation of the Transmission Control Protocol(TCP).
 *
9
 * Authors:	Ross Biro
L
Linus Torvalds 已提交
10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37
 *		Fred N. van Kempen, <waltje@uWalt.NL.Mugnet.ORG>
 *		Mark Evans, <evansmp@uhura.aston.ac.uk>
 *		Corey Minyard <wf-rch!minyard@relay.EU.net>
 *		Florian La Roche, <flla@stud.uni-sb.de>
 *		Charles Hedrick, <hedrick@klinzhai.rutgers.edu>
 *		Linus Torvalds, <torvalds@cs.helsinki.fi>
 *		Alan Cox, <gw4pts@gw4pts.ampr.org>
 *		Matthew Dillon, <dillon@apollo.west.oic.com>
 *		Arnt Gulbrandsen, <agulbra@nvg.unit.no>
 *		Jorge Cwik, <jorge@laser.satlink.net>
 */

/*
 * Changes:	Pedro Roque	:	Retransmit queue handled by TCP.
 *				:	Fragmentation on mtu decrease
 *				:	Segment collapse on retransmit
 *				:	AF independence
 *
 *		Linus Torvalds	:	send_delayed_ack
 *		David S. Miller	:	Charge memory using the right skb
 *					during syn/ack processing.
 *		David S. Miller :	Output engine completely rewritten.
 *		Andrea Arcangeli:	SYNACK carry ts_recent in tsecr.
 *		Cacophonix Gaul :	draft-minshall-nagle-01
 *		J Hadi Salim	:	ECN support
 *
 */

38 39
#define pr_fmt(fmt) "TCP: " fmt

L
Linus Torvalds 已提交
40 41 42
#include <net/tcp.h>

#include <linux/compiler.h>
43
#include <linux/gfp.h>
L
Linus Torvalds 已提交
44
#include <linux/module.h>
45
#include <linux/static_key.h>
L
Linus Torvalds 已提交
46

47
#include <trace/events/tcp.h>
48

49 50 51 52 53 54 55
/* Refresh clocks of a TCP socket,
 * ensuring monotically increasing values.
 */
void tcp_mstamp_refresh(struct tcp_sock *tp)
{
	u64 val = tcp_clock_ns();

56 57
	tp->tcp_clock_cache = val;
	tp->tcp_mstamp = div_u64(val, NSEC_PER_USEC);
58 59
}

E
Eric Dumazet 已提交
60 61
static bool tcp_write_xmit(struct sock *sk, unsigned int mss_now, int nonagle,
			   int push_one, gfp_t gfp);
62

63
/* Account for new data that has been sent to the network. */
64
static void tcp_event_new_data_sent(struct sock *sk, struct sk_buff *skb)
L
Linus Torvalds 已提交
65
{
N
Nandita Dukkipati 已提交
66
	struct inet_connection_sock *icsk = inet_csk(sk);
67
	struct tcp_sock *tp = tcp_sk(sk);
68
	unsigned int prior_packets = tp->packets_out;
69

70
	WRITE_ONCE(tp->snd_nxt, TCP_SKB_CB(skb)->end_seq);
71

72 73 74
	__skb_unlink(skb, &sk->sk_write_queue);
	tcp_rbtree_insert(&sk->tcp_rtx_queue, skb);

75
	tp->packets_out += tcp_skb_pcount(skb);
Y
Yuchung Cheng 已提交
76
	if (!prior_packets || icsk->icsk_pending == ICSK_TIME_LOSS_PROBE)
77
		tcp_rearm_rto(sk);
78

79 80
	NET_ADD_STATS(sock_net(sk), LINUX_MIB_TCPORIGDATASENT,
		      tcp_skb_pcount(skb));
L
Linus Torvalds 已提交
81 82
}

83 84
/* SND.NXT, if window was not shrunk or the amount of shrunk was less than one
 * window scaling factor due to loss of precision.
L
Linus Torvalds 已提交
85 86 87 88 89
 * If window has been shrunk, what should we make? It is not clear at all.
 * Using SND.UNA we will fail to open window, SND.NXT is out of window. :-(
 * Anything in between SND.UNA...SND.UNA+SND.WND also can be already
 * invalid. OK, let's make this for now:
 */
90
static inline __u32 tcp_acceptable_seq(const struct sock *sk)
L
Linus Torvalds 已提交
91
{
92
	const struct tcp_sock *tp = tcp_sk(sk);
93

94 95 96
	if (!before(tcp_wnd_end(tp), tp->snd_nxt) ||
	    (tp->rx_opt.wscale_ok &&
	     ((tp->snd_nxt - tcp_wnd_end(tp)) < (1 << tp->rx_opt.rcv_wscale))))
L
Linus Torvalds 已提交
97 98
		return tp->snd_nxt;
	else
99
		return tcp_wnd_end(tp);
L
Linus Torvalds 已提交
100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118
}

/* Calculate mss to advertise in SYN segment.
 * RFC1122, RFC1063, draft-ietf-tcpimpl-pmtud-01 state that:
 *
 * 1. It is independent of path mtu.
 * 2. Ideally, it is maximal possible segment size i.e. 65535-40.
 * 3. For IPv4 it is reasonable to calculate it from maximal MTU of
 *    attached devices, because some buggy hosts are confused by
 *    large MSS.
 * 4. We do not make 3, we advertise MSS, calculated from first
 *    hop device mtu, but allow to raise it to ip_rt_min_advmss.
 *    This may be overridden via information stored in routing table.
 * 5. Value 65535 for MSS is valid in IPv6 and means "as large as possible,
 *    probably even Jumbo".
 */
static __u16 tcp_advertise_mss(struct sock *sk)
{
	struct tcp_sock *tp = tcp_sk(sk);
119
	const struct dst_entry *dst = __sk_dst_get(sk);
L
Linus Torvalds 已提交
120 121
	int mss = tp->advmss;

122 123 124 125 126 127 128
	if (dst) {
		unsigned int metric = dst_metric_advmss(dst);

		if (metric < mss) {
			mss = metric;
			tp->advmss = mss;
		}
L
Linus Torvalds 已提交
129 130 131 132 133 134
	}

	return (__u16)mss;
}

/* RFC2861. Reset CWND after idle period longer RTO to "restart window".
135 136 137
 * This is the first part of cwnd validation mechanism.
 */
void tcp_cwnd_restart(struct sock *sk, s32 delta)
L
Linus Torvalds 已提交
138
{
139
	struct tcp_sock *tp = tcp_sk(sk);
140
	u32 restart_cwnd = tcp_init_cwnd(tp, __sk_dst_get(sk));
L
Linus Torvalds 已提交
141 142
	u32 cwnd = tp->snd_cwnd;

143
	tcp_ca_event(sk, CA_EVENT_CWND_RESTART);
L
Linus Torvalds 已提交
144

145
	tp->snd_ssthresh = tcp_current_ssthresh(sk);
L
Linus Torvalds 已提交
146 147
	restart_cwnd = min(restart_cwnd, cwnd);

148
	while ((delta -= inet_csk(sk)->icsk_rto) > 0 && cwnd > restart_cwnd)
L
Linus Torvalds 已提交
149 150
		cwnd >>= 1;
	tp->snd_cwnd = max(cwnd, restart_cwnd);
151
	tp->snd_cwnd_stamp = tcp_jiffies32;
L
Linus Torvalds 已提交
152 153 154
	tp->snd_cwnd_used = 0;
}

155
/* Congestion state accounting after a packet has been sent. */
S
Stephen Hemminger 已提交
156
static void tcp_event_data_sent(struct tcp_sock *tp,
157
				struct sock *sk)
L
Linus Torvalds 已提交
158
{
159
	struct inet_connection_sock *icsk = inet_csk(sk);
160
	const u32 now = tcp_jiffies32;
L
Linus Torvalds 已提交
161

162 163 164
	if (tcp_packets_in_flight(tp) == 0)
		tcp_ca_event(sk, CA_EVENT_TX_START);

W
Wei Wang 已提交
165 166 167 168
	/* If this is the first data packet sent in response to the
	 * previous received data,
	 * and it is a reply for ato after last received packet,
	 * increase pingpong count.
L
Linus Torvalds 已提交
169
	 */
W
Wei Wang 已提交
170 171 172 173 174
	if (before(tp->lsndtime, icsk->icsk_ack.lrcvtime) &&
	    (u32)(now - icsk->icsk_ack.lrcvtime) < icsk->icsk_ack.ato)
		inet_csk_inc_pingpong_cnt(sk);

	tp->lsndtime = now;
L
Linus Torvalds 已提交
175 176
}

177
/* Account for an ACK we sent. */
178 179
static inline void tcp_event_ack_sent(struct sock *sk, unsigned int pkts,
				      u32 rcv_nxt)
L
Linus Torvalds 已提交
180
{
E
Eric Dumazet 已提交
181 182
	struct tcp_sock *tp = tcp_sk(sk);

183
	if (unlikely(tp->compressed_ack > TCP_FASTRETRANS_THRESH)) {
184
		NET_ADD_STATS(sock_net(sk), LINUX_MIB_TCPACKCOMPRESSED,
185 186
			      tp->compressed_ack - TCP_FASTRETRANS_THRESH);
		tp->compressed_ack = TCP_FASTRETRANS_THRESH;
E
Eric Dumazet 已提交
187 188 189
		if (hrtimer_try_to_cancel(&tp->compressed_ack_timer) == 1)
			__sock_put(sk);
	}
190 191 192

	if (unlikely(rcv_nxt != tp->rcv_nxt))
		return;  /* Special ACK sent by DCTCP to reflect ECN */
193 194
	tcp_dec_quickack_mode(sk, pkts);
	inet_csk_clear_xmit_timer(sk, ICSK_TIME_DACK);
L
Linus Torvalds 已提交
195 196 197 198 199 200 201 202 203
}

/* Determine a window scaling and initial window to offer.
 * Based on the assumption that the given amount of space
 * will be offered. Store the results in the tp structure.
 * NOTE: for smooth operation initial space offering should
 * be a multiple of mss if possible. We assume here that mss >= 1.
 * This MUST be enforced by all callers.
 */
204
void tcp_select_initial_window(const struct sock *sk, int __space, __u32 mss,
L
Linus Torvalds 已提交
205
			       __u32 *rcv_wnd, __u32 *window_clamp,
206 207
			       int wscale_ok, __u8 *rcv_wscale,
			       __u32 init_rcv_wnd)
L
Linus Torvalds 已提交
208 209 210 211 212
{
	unsigned int space = (__space < 0 ? 0 : __space);

	/* If no clamp set the clamp to the max possible scaled window */
	if (*window_clamp == 0)
213
		(*window_clamp) = (U16_MAX << TCP_MAX_WSCALE);
L
Linus Torvalds 已提交
214 215 216 217
	space = min(*window_clamp, space);

	/* Quantize space offering to a multiple of mss if possible. */
	if (space > mss)
218
		space = rounddown(space, mss);
L
Linus Torvalds 已提交
219 220

	/* NOTE: offering an initial window larger than 32767
221 222 223 224 225 226
	 * will break some buggy TCP stacks. If the admin tells us
	 * it is likely we could be speaking with such a buggy stack
	 * we will truncate our initial window offering to 32K-1
	 * unless the remote has sent us a window scaling option,
	 * which we interpret as a sign the remote TCP is not
	 * misinterpreting the window field as a signed quantity.
L
Linus Torvalds 已提交
227
	 */
228
	if (sock_net(sk)->ipv4.sysctl_tcp_workaround_signed_windows)
229 230
		(*rcv_wnd) = min(space, MAX_TCP_WINDOW);
	else
231 232 233 234
		(*rcv_wnd) = min_t(u32, space, U16_MAX);

	if (init_rcv_wnd)
		*rcv_wnd = min(*rcv_wnd, init_rcv_wnd * mss);
235

E
Eric Dumazet 已提交
236
	*rcv_wscale = 0;
L
Linus Torvalds 已提交
237
	if (wscale_ok) {
238
		/* Set window scaling on max possible window */
239
		space = max_t(u32, space, sock_net(sk)->ipv4.sysctl_tcp_rmem[2]);
240
		space = max_t(u32, space, sysctl_rmem_max);
241
		space = min_t(u32, space, *window_clamp);
E
Eric Dumazet 已提交
242 243
		*rcv_wscale = clamp_t(int, ilog2(space) - 15,
				      0, TCP_MAX_WSCALE);
L
Linus Torvalds 已提交
244 245
	}
	/* Set the clamp no higher than max representable value */
246
	(*window_clamp) = min_t(__u32, U16_MAX << (*rcv_wscale), *window_clamp);
L
Linus Torvalds 已提交
247
}
E
Eric Dumazet 已提交
248
EXPORT_SYMBOL(tcp_select_initial_window);
L
Linus Torvalds 已提交
249 250 251 252 253 254

/* Chose a new window to advertise, update state in tcp_sock for the
 * socket, and return result with RFC1323 scaling applied.  The return
 * value can be stuffed directly into th->window for an outgoing
 * frame.
 */
S
Stephen Hemminger 已提交
255
static u16 tcp_select_window(struct sock *sk)
L
Linus Torvalds 已提交
256 257
{
	struct tcp_sock *tp = tcp_sk(sk);
258
	u32 old_win = tp->rcv_wnd;
L
Linus Torvalds 已提交
259 260 261 262
	u32 cur_win = tcp_receive_window(tp);
	u32 new_win = __tcp_select_window(sk);

	/* Never shrink the offered window */
S
Stephen Hemminger 已提交
263
	if (new_win < cur_win) {
L
Linus Torvalds 已提交
264 265 266 267 268 269 270
		/* Danger Will Robinson!
		 * Don't update rcv_wup/rcv_wnd here or else
		 * we will not be able to advertise a zero
		 * window in time.  --DaveM
		 *
		 * Relax Will Robinson.
		 */
271 272 273
		if (new_win == 0)
			NET_INC_STATS(sock_net(sk),
				      LINUX_MIB_TCPWANTZEROWINDOWADV);
274
		new_win = ALIGN(cur_win, 1 << tp->rx_opt.rcv_wscale);
L
Linus Torvalds 已提交
275 276 277 278 279 280 281
	}
	tp->rcv_wnd = new_win;
	tp->rcv_wup = tp->rcv_nxt;

	/* Make sure we do not exceed the maximum possible
	 * scaled window.
	 */
282 283
	if (!tp->rx_opt.rcv_wscale &&
	    sock_net(sk)->ipv4.sysctl_tcp_workaround_signed_windows)
L
Linus Torvalds 已提交
284 285 286 287 288 289 290
		new_win = min(new_win, MAX_TCP_WINDOW);
	else
		new_win = min(new_win, (65535U << tp->rx_opt.rcv_wscale));

	/* RFC1323 scaling applied */
	new_win >>= tp->rx_opt.rcv_wscale;

291
	/* If we advertise zero window, disable fast path. */
292
	if (new_win == 0) {
293
		tp->pred_flags = 0;
294 295 296 297 298 299
		if (old_win)
			NET_INC_STATS(sock_net(sk),
				      LINUX_MIB_TCPTOZEROWINDOWADV);
	} else if (old_win == 0) {
		NET_INC_STATS(sock_net(sk), LINUX_MIB_TCPFROMZEROWINDOWADV);
	}
L
Linus Torvalds 已提交
300 301 302 303

	return new_win;
}

304
/* Packet ECN state for a SYN-ACK */
305
static void tcp_ecn_send_synack(struct sock *sk, struct sk_buff *skb)
306
{
307 308
	const struct tcp_sock *tp = tcp_sk(sk);

E
Eric Dumazet 已提交
309
	TCP_SKB_CB(skb)->tcp_flags &= ~TCPHDR_CWR;
310
	if (!(tp->ecn_flags & TCP_ECN_OK))
E
Eric Dumazet 已提交
311
		TCP_SKB_CB(skb)->tcp_flags &= ~TCPHDR_ECE;
312 313
	else if (tcp_ca_needs_ecn(sk) ||
		 tcp_bpf_ca_needs_ecn(sk))
314
		INET_ECN_xmit(sk);
315 316
}

317
/* Packet ECN state for a SYN.  */
318
static void tcp_ecn_send_syn(struct sock *sk, struct sk_buff *skb)
319 320
{
	struct tcp_sock *tp = tcp_sk(sk);
321
	bool bpf_needs_ecn = tcp_bpf_ca_needs_ecn(sk);
322
	bool use_ecn = sock_net(sk)->ipv4.sysctl_tcp_ecn == 1 ||
323
		tcp_ca_needs_ecn(sk) || bpf_needs_ecn;
324 325 326 327 328 329 330

	if (!use_ecn) {
		const struct dst_entry *dst = __sk_dst_get(sk);

		if (dst && dst_feature(dst, RTAX_FEATURE_ECN))
			use_ecn = true;
	}
331 332

	tp->ecn_flags = 0;
333 334

	if (use_ecn) {
E
Eric Dumazet 已提交
335
		TCP_SKB_CB(skb)->tcp_flags |= TCPHDR_ECE | TCPHDR_CWR;
336
		tp->ecn_flags = TCP_ECN_OK;
337
		if (tcp_ca_needs_ecn(sk) || bpf_needs_ecn)
338
			INET_ECN_xmit(sk);
339 340 341
	}
}

342 343 344 345 346 347 348 349 350
static void tcp_ecn_clear_syn(struct sock *sk, struct sk_buff *skb)
{
	if (sock_net(sk)->ipv4.sysctl_tcp_ecn_fallback)
		/* tp->ecn_flags are cleared at a later point in time when
		 * SYN ACK is ultimatively being received.
		 */
		TCP_SKB_CB(skb)->tcp_flags &= ~(TCPHDR_ECE | TCPHDR_CWR);
}

351
static void
352
tcp_ecn_make_synack(const struct request_sock *req, struct tcphdr *th)
353
{
354
	if (inet_rsk(req)->ecn_ok)
355 356 357
		th->ece = 1;
}

358 359 360
/* Set up ECN state for a packet on a ESTABLISHED socket that is about to
 * be sent.
 */
361
static void tcp_ecn_send(struct sock *sk, struct sk_buff *skb,
362
			 struct tcphdr *th, int tcp_header_len)
363 364 365 366 367 368 369 370
{
	struct tcp_sock *tp = tcp_sk(sk);

	if (tp->ecn_flags & TCP_ECN_OK) {
		/* Not-retransmitted data segment: set ECT and inject CWR. */
		if (skb->len != tcp_header_len &&
		    !before(TCP_SKB_CB(skb)->seq, tp->snd_nxt)) {
			INET_ECN_xmit(sk);
371
			if (tp->ecn_flags & TCP_ECN_QUEUE_CWR) {
372
				tp->ecn_flags &= ~TCP_ECN_QUEUE_CWR;
373
				th->cwr = 1;
374 375
				skb_shinfo(skb)->gso_type |= SKB_GSO_TCP_ECN;
			}
376
		} else if (!tcp_ca_needs_ecn(sk)) {
377 378 379 380
			/* ACK or retransmitted segment: clear ECT|CE */
			INET_ECN_dontxmit(sk);
		}
		if (tp->ecn_flags & TCP_ECN_DEMAND_CWR)
381
			th->ece = 1;
382 383 384
	}
}

385 386 387 388 389
/* Constructs common control bits of non-data skb. If SYN/FIN is present,
 * auto increment end seqno.
 */
static void tcp_init_nondata_skb(struct sk_buff *skb, u32 seq, u8 flags)
{
390
	skb->ip_summed = CHECKSUM_PARTIAL;
391

E
Eric Dumazet 已提交
392
	TCP_SKB_CB(skb)->tcp_flags = flags;
393 394
	TCP_SKB_CB(skb)->sacked = 0;

395
	tcp_skb_pcount_set(skb, 1);
396 397

	TCP_SKB_CB(skb)->seq = seq;
C
Changli Gao 已提交
398
	if (flags & (TCPHDR_SYN | TCPHDR_FIN))
399 400 401 402
		seq++;
	TCP_SKB_CB(skb)->end_seq = seq;
}

E
Eric Dumazet 已提交
403
static inline bool tcp_urg_mode(const struct tcp_sock *tp)
I
Ilpo Järvinen 已提交
404 405 406 407
{
	return tp->snd_una != tp->snd_up;
}

A
Adam Langley 已提交
408 409 410
#define OPTION_SACK_ADVERTISE	(1 << 0)
#define OPTION_TS		(1 << 1)
#define OPTION_MD5		(1 << 2)
411
#define OPTION_WSCALE		(1 << 3)
Y
Yuchung Cheng 已提交
412
#define OPTION_FAST_OPEN_COOKIE	(1 << 8)
413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428
#define OPTION_SMC		(1 << 9)

static void smc_options_write(__be32 *ptr, u16 *options)
{
#if IS_ENABLED(CONFIG_SMC)
	if (static_branch_unlikely(&tcp_have_smc)) {
		if (unlikely(OPTION_SMC & *options)) {
			*ptr++ = htonl((TCPOPT_NOP  << 24) |
				       (TCPOPT_NOP  << 16) |
				       (TCPOPT_EXP <<  8) |
				       (TCPOLEN_EXP_SMC_BASE));
			*ptr++ = htonl(TCPOPT_SMC_MAGIC);
		}
	}
#endif
}
A
Adam Langley 已提交
429 430

struct tcp_out_options {
Y
Yuchung Cheng 已提交
431 432
	u16 options;		/* bit field of OPTION_* */
	u16 mss;		/* 0 to disable */
A
Adam Langley 已提交
433 434
	u8 ws;			/* window scale, 0 to disable */
	u8 num_sack_blocks;	/* number of SACK blocks to include */
435 436
	u8 hash_size;		/* bytes in hash_location */
	__u8 *hash_location;	/* temporary pointer, overloaded */
Y
Yuchung Cheng 已提交
437 438
	__u32 tsval, tsecr;	/* need to include OPTION_TS */
	struct tcp_fastopen_cookie *fastopen_cookie;	/* Fast open cookie */
A
Adam Langley 已提交
439 440
};

441 442 443
/* Write previously computed TCP options to the packet.
 *
 * Beware: Something in the Internet is very sensitive to the ordering of
444 445
 * TCP options, we learned this through the hard way, so be careful here.
 * Luckily we can at least blame others for their non-compliance but from
S
stephen hemminger 已提交
446
 * inter-operability perspective it seems that we're somewhat stuck with
447 448 449 450 451 452 453
 * the ordering which we have been using if we want to keep working with
 * those broken things (not that it currently hurts anybody as there isn't
 * particular reason why the ordering would need to be changed).
 *
 * At least SACK_PERM as the first option is known to lead to a disaster
 * (but it may well be that other scenarios fail similarly).
 */
A
Adam Langley 已提交
454
static void tcp_options_write(__be32 *ptr, struct tcp_sock *tp,
455 456
			      struct tcp_out_options *opts)
{
Y
Yuchung Cheng 已提交
457
	u16 options = opts->options;	/* mungable copy */
458 459

	if (unlikely(OPTION_MD5 & options)) {
C
Christoph Paasch 已提交
460 461
		*ptr++ = htonl((TCPOPT_NOP << 24) | (TCPOPT_NOP << 16) |
			       (TCPOPT_MD5SIG << 8) | TCPOLEN_MD5SIG);
462 463
		/* overload cookie hash location */
		opts->hash_location = (__u8 *)ptr;
A
Adam Langley 已提交
464
		ptr += 4;
S
Stephen Hemminger 已提交
465
	}
A
Adam Langley 已提交
466

467 468 469 470 471 472
	if (unlikely(opts->mss)) {
		*ptr++ = htonl((TCPOPT_MSS << 24) |
			       (TCPOLEN_MSS << 16) |
			       opts->mss);
	}

473 474
	if (likely(OPTION_TS & options)) {
		if (unlikely(OPTION_SACK_ADVERTISE & options)) {
A
Adam Langley 已提交
475 476 477 478
			*ptr++ = htonl((TCPOPT_SACK_PERM << 24) |
				       (TCPOLEN_SACK_PERM << 16) |
				       (TCPOPT_TIMESTAMP << 8) |
				       TCPOLEN_TIMESTAMP);
479
			options &= ~OPTION_SACK_ADVERTISE;
A
Adam Langley 已提交
480 481 482 483 484 485 486 487 488 489
		} else {
			*ptr++ = htonl((TCPOPT_NOP << 24) |
				       (TCPOPT_NOP << 16) |
				       (TCPOPT_TIMESTAMP << 8) |
				       TCPOLEN_TIMESTAMP);
		}
		*ptr++ = htonl(opts->tsval);
		*ptr++ = htonl(opts->tsecr);
	}

490
	if (unlikely(OPTION_SACK_ADVERTISE & options)) {
A
Adam Langley 已提交
491 492 493 494 495 496
		*ptr++ = htonl((TCPOPT_NOP << 24) |
			       (TCPOPT_NOP << 16) |
			       (TCPOPT_SACK_PERM << 8) |
			       TCPOLEN_SACK_PERM);
	}

497
	if (unlikely(OPTION_WSCALE & options)) {
A
Adam Langley 已提交
498 499 500 501 502 503 504 505 506
		*ptr++ = htonl((TCPOPT_NOP << 24) |
			       (TCPOPT_WINDOW << 16) |
			       (TCPOLEN_WINDOW << 8) |
			       opts->ws);
	}

	if (unlikely(opts->num_sack_blocks)) {
		struct tcp_sack_block *sp = tp->rx_opt.dsack ?
			tp->duplicate_sack : tp->selective_acks;
S
Stephen Hemminger 已提交
507 508 509 510 511
		int this_sack;

		*ptr++ = htonl((TCPOPT_NOP  << 24) |
			       (TCPOPT_NOP  << 16) |
			       (TCPOPT_SACK <<  8) |
A
Adam Langley 已提交
512
			       (TCPOLEN_SACK_BASE + (opts->num_sack_blocks *
S
Stephen Hemminger 已提交
513
						     TCPOLEN_SACK_PERBLOCK)));
S
Stephen Hemminger 已提交
514

A
Adam Langley 已提交
515 516
		for (this_sack = 0; this_sack < opts->num_sack_blocks;
		     ++this_sack) {
S
Stephen Hemminger 已提交
517 518 519
			*ptr++ = htonl(sp[this_sack].start_seq);
			*ptr++ = htonl(sp[this_sack].end_seq);
		}
S
Stephen Hemminger 已提交
520

521
		tp->rx_opt.dsack = 0;
S
Stephen Hemminger 已提交
522
	}
Y
Yuchung Cheng 已提交
523 524 525

	if (unlikely(OPTION_FAST_OPEN_COOKIE & options)) {
		struct tcp_fastopen_cookie *foc = opts->fastopen_cookie;
526 527 528 529 530 531 532 533 534 535 536 537 538
		u8 *p = (u8 *)ptr;
		u32 len; /* Fast Open option length */

		if (foc->exp) {
			len = TCPOLEN_EXP_FASTOPEN_BASE + foc->len;
			*ptr = htonl((TCPOPT_EXP << 24) | (len << 16) |
				     TCPOPT_FASTOPEN_MAGIC);
			p += TCPOLEN_EXP_FASTOPEN_BASE;
		} else {
			len = TCPOLEN_FASTOPEN_BASE + foc->len;
			*p++ = TCPOPT_FASTOPEN;
			*p++ = len;
		}
Y
Yuchung Cheng 已提交
539

540 541 542 543
		memcpy(p, foc->val, foc->len);
		if ((len & 3) == 2) {
			p[foc->len] = TCPOPT_NOP;
			p[foc->len + 1] = TCPOPT_NOP;
Y
Yuchung Cheng 已提交
544
		}
545
		ptr += (len + 3) >> 2;
Y
Yuchung Cheng 已提交
546
	}
547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581

	smc_options_write(ptr, &options);
}

static void smc_set_option(const struct tcp_sock *tp,
			   struct tcp_out_options *opts,
			   unsigned int *remaining)
{
#if IS_ENABLED(CONFIG_SMC)
	if (static_branch_unlikely(&tcp_have_smc)) {
		if (tp->syn_smc) {
			if (*remaining >= TCPOLEN_EXP_SMC_BASE_ALIGNED) {
				opts->options |= OPTION_SMC;
				*remaining -= TCPOLEN_EXP_SMC_BASE_ALIGNED;
			}
		}
	}
#endif
}

static void smc_set_option_cond(const struct tcp_sock *tp,
				const struct inet_request_sock *ireq,
				struct tcp_out_options *opts,
				unsigned int *remaining)
{
#if IS_ENABLED(CONFIG_SMC)
	if (static_branch_unlikely(&tcp_have_smc)) {
		if (tp->syn_smc && ireq->smc_ok) {
			if (*remaining >= TCPOLEN_EXP_SMC_BASE_ALIGNED) {
				opts->options |= OPTION_SMC;
				*remaining -= TCPOLEN_EXP_SMC_BASE_ALIGNED;
			}
		}
	}
#endif
A
Adam Langley 已提交
582 583
}

584 585 586
/* Compute TCP options for SYN packets. This is not the final
 * network wire format yet.
 */
587
static unsigned int tcp_syn_options(struct sock *sk, struct sk_buff *skb,
A
Adam Langley 已提交
588
				struct tcp_out_options *opts,
589 590
				struct tcp_md5sig_key **md5)
{
A
Adam Langley 已提交
591
	struct tcp_sock *tp = tcp_sk(sk);
592
	unsigned int remaining = MAX_TCP_OPTION_SPACE;
593
	struct tcp_fastopen_request *fastopen = tp->fastopen_req;
A
Adam Langley 已提交
594

595
	*md5 = NULL;
596
#ifdef CONFIG_TCP_MD5SIG
597
	if (static_branch_unlikely(&tcp_md5_needed) &&
598
	    rcu_access_pointer(tp->md5sig_info)) {
599 600 601 602 603
		*md5 = tp->af_specific->md5_lookup(sk, sk);
		if (*md5) {
			opts->options |= OPTION_MD5;
			remaining -= TCPOLEN_MD5SIG_ALIGNED;
		}
604 605
	}
#endif
A
Adam Langley 已提交
606 607 608 609 610 611 612 613 614 615 616

	/* We always get an MSS option.  The option bytes which will be seen in
	 * normal data packets should timestamps be used, must be in the MSS
	 * advertised.  But we subtract them from tp->mss_cache so that
	 * calculations in tcp_sendmsg are simpler etc.  So account for this
	 * fact here if necessary.  If we don't do this correctly, as a
	 * receiver we won't recognize data packets as being full sized when we
	 * should, and thus we won't abide by the delayed ACK rules correctly.
	 * SACKs don't matter, we never delay an ACK when we have any of those
	 * going out.  */
	opts->mss = tcp_advertise_mss(sk);
617
	remaining -= TCPOLEN_MSS_ALIGNED;
A
Adam Langley 已提交
618

619
	if (likely(sock_net(sk)->ipv4.sysctl_tcp_timestamps && !*md5)) {
A
Adam Langley 已提交
620
		opts->options |= OPTION_TS;
E
Eric Dumazet 已提交
621
		opts->tsval = tcp_skb_timestamp(skb) + tp->tsoffset;
A
Adam Langley 已提交
622
		opts->tsecr = tp->rx_opt.ts_recent;
623
		remaining -= TCPOLEN_TSTAMP_ALIGNED;
A
Adam Langley 已提交
624
	}
625
	if (likely(sock_net(sk)->ipv4.sysctl_tcp_window_scaling)) {
A
Adam Langley 已提交
626
		opts->ws = tp->rx_opt.rcv_wscale;
627
		opts->options |= OPTION_WSCALE;
628
		remaining -= TCPOLEN_WSCALE_ALIGNED;
A
Adam Langley 已提交
629
	}
E
Eric Dumazet 已提交
630
	if (likely(sock_net(sk)->ipv4.sysctl_tcp_sack)) {
A
Adam Langley 已提交
631
		opts->options |= OPTION_SACK_ADVERTISE;
632
		if (unlikely(!(OPTION_TS & opts->options)))
633
			remaining -= TCPOLEN_SACKPERM_ALIGNED;
A
Adam Langley 已提交
634 635
	}

636
	if (fastopen && fastopen->cookie.len >= 0) {
637 638 639 640
		u32 need = fastopen->cookie.len;

		need += fastopen->cookie.exp ? TCPOLEN_EXP_FASTOPEN_BASE :
					       TCPOLEN_FASTOPEN_BASE;
641 642 643 644 645 646
		need = (need + 3) & ~3U;  /* Align to 32 bits */
		if (remaining >= need) {
			opts->options |= OPTION_FAST_OPEN_COOKIE;
			opts->fastopen_cookie = &fastopen->cookie;
			remaining -= need;
			tp->syn_fastopen = 1;
647
			tp->syn_fastopen_exp = fastopen->cookie.exp ? 1 : 0;
648 649
		}
	}
650

651 652
	smc_set_option(tp, opts, &remaining);

653
	return MAX_TCP_OPTION_SPACE - remaining;
S
Stephen Hemminger 已提交
654 655
}

656
/* Set up TCP options for SYN-ACKs. */
657 658
static unsigned int tcp_synack_options(const struct sock *sk,
				       struct request_sock *req,
659 660 661 662
				       unsigned int mss, struct sk_buff *skb,
				       struct tcp_out_options *opts,
				       const struct tcp_md5sig_key *md5,
				       struct tcp_fastopen_cookie *foc)
663
{
A
Adam Langley 已提交
664
	struct inet_request_sock *ireq = inet_rsk(req);
665
	unsigned int remaining = MAX_TCP_OPTION_SPACE;
A
Adam Langley 已提交
666

667
#ifdef CONFIG_TCP_MD5SIG
E
Eric Dumazet 已提交
668
	if (md5) {
A
Adam Langley 已提交
669
		opts->options |= OPTION_MD5;
670 671 672 673 674 675 676
		remaining -= TCPOLEN_MD5SIG_ALIGNED;

		/* We can't fit any SACK blocks in a packet with MD5 + TS
		 * options. There was discussion about disabling SACK
		 * rather than TS in order to fit in better with old,
		 * buggy kernels, but that was deemed to be unnecessary.
		 */
E
Eric Dumazet 已提交
677
		ireq->tstamp_ok &= !ireq->sack_ok;
678 679
	}
#endif
A
Adam Langley 已提交
680

681
	/* We always send an MSS option. */
A
Adam Langley 已提交
682
	opts->mss = mss;
683
	remaining -= TCPOLEN_MSS_ALIGNED;
A
Adam Langley 已提交
684 685 686

	if (likely(ireq->wscale_ok)) {
		opts->ws = ireq->rcv_wscale;
687
		opts->options |= OPTION_WSCALE;
688
		remaining -= TCPOLEN_WSCALE_ALIGNED;
A
Adam Langley 已提交
689
	}
E
Eric Dumazet 已提交
690
	if (likely(ireq->tstamp_ok)) {
A
Adam Langley 已提交
691
		opts->options |= OPTION_TS;
692
		opts->tsval = tcp_skb_timestamp(skb) + tcp_rsk(req)->ts_off;
A
Adam Langley 已提交
693
		opts->tsecr = req->ts_recent;
694
		remaining -= TCPOLEN_TSTAMP_ALIGNED;
A
Adam Langley 已提交
695 696 697
	}
	if (likely(ireq->sack_ok)) {
		opts->options |= OPTION_SACK_ADVERTISE;
E
Eric Dumazet 已提交
698
		if (unlikely(!ireq->tstamp_ok))
699
			remaining -= TCPOLEN_SACKPERM_ALIGNED;
A
Adam Langley 已提交
700
	}
701 702 703 704 705
	if (foc != NULL && foc->len >= 0) {
		u32 need = foc->len;

		need += foc->exp ? TCPOLEN_EXP_FASTOPEN_BASE :
				   TCPOLEN_FASTOPEN_BASE;
706 707 708 709 710 711 712
		need = (need + 3) & ~3U;  /* Align to 32 bits */
		if (remaining >= need) {
			opts->options |= OPTION_FAST_OPEN_COOKIE;
			opts->fastopen_cookie = foc;
			remaining -= need;
		}
	}
C
Christoph Paasch 已提交
713

714 715
	smc_set_option_cond(tcp_sk(sk), ireq, opts, &remaining);

716
	return MAX_TCP_OPTION_SPACE - remaining;
A
Adam Langley 已提交
717 718
}

719 720 721
/* Compute TCP options for ESTABLISHED sockets. This is not the
 * final wire format yet.
 */
722
static unsigned int tcp_established_options(struct sock *sk, struct sk_buff *skb,
A
Adam Langley 已提交
723
					struct tcp_out_options *opts,
724 725
					struct tcp_md5sig_key **md5)
{
A
Adam Langley 已提交
726
	struct tcp_sock *tp = tcp_sk(sk);
727
	unsigned int size = 0;
728
	unsigned int eff_sacks;
A
Adam Langley 已提交
729

730 731
	opts->options = 0;

732
	*md5 = NULL;
A
Adam Langley 已提交
733
#ifdef CONFIG_TCP_MD5SIG
734
	if (static_branch_unlikely(&tcp_md5_needed) &&
735
	    rcu_access_pointer(tp->md5sig_info)) {
736 737 738 739 740
		*md5 = tp->af_specific->md5_lookup(sk, sk);
		if (*md5) {
			opts->options |= OPTION_MD5;
			size += TCPOLEN_MD5SIG_ALIGNED;
		}
A
Adam Langley 已提交
741 742 743 744 745
	}
#endif

	if (likely(tp->rx_opt.tstamp_ok)) {
		opts->options |= OPTION_TS;
E
Eric Dumazet 已提交
746
		opts->tsval = skb ? tcp_skb_timestamp(skb) + tp->tsoffset : 0;
A
Adam Langley 已提交
747 748 749 750
		opts->tsecr = tp->rx_opt.ts_recent;
		size += TCPOLEN_TSTAMP_ALIGNED;
	}

751 752
	eff_sacks = tp->rx_opt.num_sacks + tp->rx_opt.dsack;
	if (unlikely(eff_sacks)) {
753
		const unsigned int remaining = MAX_TCP_OPTION_SPACE - size;
A
Adam Langley 已提交
754
		opts->num_sack_blocks =
755
			min_t(unsigned int, eff_sacks,
A
Adam Langley 已提交
756 757 758 759 760 761 762
			      (remaining - TCPOLEN_SACK_BASE_ALIGNED) /
			      TCPOLEN_SACK_PERBLOCK);
		size += TCPOLEN_SACK_BASE_ALIGNED +
			opts->num_sack_blocks * TCPOLEN_SACK_PERBLOCK;
	}

	return size;
S
Stephen Hemminger 已提交
763
}
L
Linus Torvalds 已提交
764

E
Eric Dumazet 已提交
765 766 767 768 769 770 771 772 773

/* TCP SMALL QUEUES (TSQ)
 *
 * TSQ goal is to keep small amount of skbs per tcp flow in tx queues (qdisc+dev)
 * to reduce RTT and bufferbloat.
 * We do this using a special skb destructor (tcp_wfree).
 *
 * Its important tcp_wfree() can be replaced by sock_wfree() in the event skb
 * needs to be reallocated in a driver.
S
stephen hemminger 已提交
774
 * The invariant being skb->truesize subtracted from sk->sk_wmem_alloc
E
Eric Dumazet 已提交
775 776 777 778 779 780 781 782 783 784 785
 *
 * Since transmit from skb destructor is forbidden, we use a tasklet
 * to process all sockets that eventually need to send more skbs.
 * We use one tasklet per cpu, with its own queue of sockets.
 */
struct tsq_tasklet {
	struct tasklet_struct	tasklet;
	struct list_head	head; /* queue of tcp sockets */
};
static DEFINE_PER_CPU(struct tsq_tasklet, tsq_tasklet);

786
static void tcp_tsq_write(struct sock *sk)
787 788 789
{
	if ((1 << sk->sk_state) &
	    (TCPF_ESTABLISHED | TCPF_FIN_WAIT1 | TCPF_CLOSING |
790 791 792 793
	     TCPF_CLOSE_WAIT  | TCPF_LAST_ACK)) {
		struct tcp_sock *tp = tcp_sk(sk);

		if (tp->lost_out > tp->retrans_out &&
794 795
		    tp->snd_cwnd > tcp_packets_in_flight(tp)) {
			tcp_mstamp_refresh(tp);
796
			tcp_xmit_retransmit_queue(sk);
797
		}
798 799

		tcp_write_xmit(sk, tcp_current_mss(sk), tp->nonagle,
J
John Ogness 已提交
800
			       0, GFP_ATOMIC);
801
	}
802
}
803 804 805 806 807 808 809 810 811 812

static void tcp_tsq_handler(struct sock *sk)
{
	bh_lock_sock(sk);
	if (!sock_owned_by_user(sk))
		tcp_tsq_write(sk);
	else if (!test_and_set_bit(TCP_TSQ_DEFERRED, &sk->sk_tsq_flags))
		sock_hold(sk);
	bh_unlock_sock(sk);
}
E
Eric Dumazet 已提交
813
/*
S
stephen hemminger 已提交
814
 * One tasklet per cpu tries to send more skbs.
E
Eric Dumazet 已提交
815
 * We run in tasklet context but need to disable irqs when
S
stephen hemminger 已提交
816
 * transferring tsq->head because tcp_wfree() might
E
Eric Dumazet 已提交
817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836
 * interrupt us (non NAPI drivers)
 */
static void tcp_tasklet_func(unsigned long data)
{
	struct tsq_tasklet *tsq = (struct tsq_tasklet *)data;
	LIST_HEAD(list);
	unsigned long flags;
	struct list_head *q, *n;
	struct tcp_sock *tp;
	struct sock *sk;

	local_irq_save(flags);
	list_splice_init(&tsq->head, &list);
	local_irq_restore(flags);

	list_for_each_safe(q, n, &list) {
		tp = list_entry(q, struct tcp_sock, tsq_node);
		list_del(&tp->tsq_node);

		sk = (struct sock *)tp;
837
		smp_mb__before_atomic();
838 839
		clear_bit(TSQ_QUEUED, &sk->sk_tsq_flags);

840
		tcp_tsq_handler(sk);
E
Eric Dumazet 已提交
841 842 843 844
		sk_free(sk);
	}
}

E
Eric Dumazet 已提交
845 846 847 848
#define TCP_DEFERRED_ALL (TCPF_TSQ_DEFERRED |		\
			  TCPF_WRITE_TIMER_DEFERRED |	\
			  TCPF_DELACK_TIMER_DEFERRED |	\
			  TCPF_MTU_REDUCED_DEFERRED)
E
Eric Dumazet 已提交
849 850 851 852 853 854 855 856 857
/**
 * tcp_release_cb - tcp release_sock() callback
 * @sk: socket
 *
 * called from release_sock() to perform protocol dependent
 * actions before socket release.
 */
void tcp_release_cb(struct sock *sk)
{
858
	unsigned long flags, nflags;
E
Eric Dumazet 已提交
859

860 861
	/* perform an atomic operation only if at least one flag is set */
	do {
862
		flags = sk->sk_tsq_flags;
863 864 865
		if (!(flags & TCP_DEFERRED_ALL))
			return;
		nflags = flags & ~TCP_DEFERRED_ALL;
866
	} while (cmpxchg(&sk->sk_tsq_flags, flags, nflags) != flags);
867

868 869 870 871
	if (flags & TCPF_TSQ_DEFERRED) {
		tcp_tsq_write(sk);
		__sock_put(sk);
	}
872 873 874 875 876 877 878 879 880 881 882
	/* Here begins the tricky part :
	 * We are called from release_sock() with :
	 * 1) BH disabled
	 * 2) sk_lock.slock spinlock held
	 * 3) socket owned by us (sk->sk_lock.owned == 1)
	 *
	 * But following code is meant to be called from BH handlers,
	 * so we should keep BH disabled, but early release socket ownership
	 */
	sock_release_ownership(sk);

E
Eric Dumazet 已提交
883
	if (flags & TCPF_WRITE_TIMER_DEFERRED) {
884
		tcp_write_timer_handler(sk);
885 886
		__sock_put(sk);
	}
E
Eric Dumazet 已提交
887
	if (flags & TCPF_DELACK_TIMER_DEFERRED) {
888
		tcp_delack_timer_handler(sk);
889 890
		__sock_put(sk);
	}
E
Eric Dumazet 已提交
891
	if (flags & TCPF_MTU_REDUCED_DEFERRED) {
892
		inet_csk(sk)->icsk_af_ops->mtu_reduced(sk);
893 894
		__sock_put(sk);
	}
E
Eric Dumazet 已提交
895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913
}
EXPORT_SYMBOL(tcp_release_cb);

void __init tcp_tasklet_init(void)
{
	int i;

	for_each_possible_cpu(i) {
		struct tsq_tasklet *tsq = &per_cpu(tsq_tasklet, i);

		INIT_LIST_HEAD(&tsq->head);
		tasklet_init(&tsq->tasklet,
			     tcp_tasklet_func,
			     (unsigned long)tsq);
	}
}

/*
 * Write buffer destructor automatically called from kfree_skb.
S
stephen hemminger 已提交
914
 * We can't xmit new skbs from this context, as we might already
E
Eric Dumazet 已提交
915 916
 * hold qdisc lock.
 */
E
Eric Dumazet 已提交
917
void tcp_wfree(struct sk_buff *skb)
E
Eric Dumazet 已提交
918 919 920
{
	struct sock *sk = skb->sk;
	struct tcp_sock *tp = tcp_sk(sk);
921
	unsigned long flags, nval, oval;
922 923 924 925

	/* Keep one reference on sk_wmem_alloc.
	 * Will be released by sk_free() from here or tcp_tasklet_func()
	 */
926
	WARN_ON(refcount_sub_and_test(skb->truesize - 1, &sk->sk_wmem_alloc));
927 928 929 930 931 932 933 934

	/* If this softirq is serviced by ksoftirqd, we are likely under stress.
	 * Wait until our queues (qdisc + devices) are drained.
	 * This gives :
	 * - less callbacks to tcp_write_xmit(), reducing stress (batches)
	 * - chance for incoming ACK (processed by another cpu maybe)
	 *   to migrate this flow (skb->ooo_okay will be eventually set)
	 */
935
	if (refcount_read(&sk->sk_wmem_alloc) >= SKB_TRUESIZE(1) && this_cpu_ksoftirqd() == current)
936
		goto out;
E
Eric Dumazet 已提交
937

938
	for (oval = READ_ONCE(sk->sk_tsq_flags);; oval = nval) {
E
Eric Dumazet 已提交
939
		struct tsq_tasklet *tsq;
940
		bool empty;
E
Eric Dumazet 已提交
941

942 943 944
		if (!(oval & TSQF_THROTTLED) || (oval & TSQF_QUEUED))
			goto out;

945
		nval = (oval & ~TSQF_THROTTLED) | TSQF_QUEUED;
946
		nval = cmpxchg(&sk->sk_tsq_flags, oval, nval);
947 948 949
		if (nval != oval)
			continue;

E
Eric Dumazet 已提交
950 951
		/* queue this socket to tasklet queue */
		local_irq_save(flags);
952
		tsq = this_cpu_ptr(&tsq_tasklet);
953
		empty = list_empty(&tsq->head);
E
Eric Dumazet 已提交
954
		list_add(&tp->tsq_node, &tsq->head);
955 956
		if (empty)
			tasklet_schedule(&tsq->tasklet);
E
Eric Dumazet 已提交
957
		local_irq_restore(flags);
958
		return;
E
Eric Dumazet 已提交
959
	}
960 961
out:
	sk_free(sk);
E
Eric Dumazet 已提交
962 963
}

964 965
/* Note: Called under soft irq.
 * We can call TCP stack right away, unless socket is owned by user.
966 967 968 969 970 971
 */
enum hrtimer_restart tcp_pace_kick(struct hrtimer *timer)
{
	struct tcp_sock *tp = container_of(timer, struct tcp_sock, pacing_timer);
	struct sock *sk = (struct sock *)tp;

972 973
	tcp_tsq_handler(sk);
	sock_put(sk);
974 975 976 977

	return HRTIMER_NORESTART;
}

978 979
static void tcp_update_skb_after_send(struct sock *sk, struct sk_buff *skb,
				      u64 prior_wstamp)
980
{
981 982 983
	struct tcp_sock *tp = tcp_sk(sk);

	if (sk->sk_pacing_status != SK_PACING_NONE) {
984
		unsigned long rate = sk->sk_pacing_rate;
985 986 987 988 989

		/* Original sch_fq does not pace first 10 MSS
		 * Note that tp->data_segs_out overflows after 2^32 packets,
		 * this is a minor annoyance.
		 */
990
		if (rate != ~0UL && rate && tp->data_segs_out >= 10) {
991 992 993 994 995 996
			u64 len_ns = div64_ul((u64)skb->len * NSEC_PER_SEC, rate);
			u64 credit = tp->tcp_wstamp_ns - prior_wstamp;

			/* take into account OS jitter */
			len_ns -= min_t(u64, len_ns / 2, credit);
			tp->tcp_wstamp_ns += len_ns;
997 998
		}
	}
999 1000 1001
	list_move_tail(&skb->tcp_tsorted_anchor, &tp->tsorted_sent_queue);
}

L
Linus Torvalds 已提交
1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012
/* This routine actually transmits TCP packets queued in by
 * tcp_do_sendmsg().  This is used by both the initial
 * transmission and possible later retransmissions.
 * All SKB's seen here are completely headerless.  It is our
 * job to build the TCP header, and pass the packet down to
 * IP so it can do the same plus pass the packet off to the
 * device.
 *
 * We are working here with either a clone of the original
 * SKB, or a fresh unique copy made by the retransmit engine.
 */
1013 1014
static int __tcp_transmit_skb(struct sock *sk, struct sk_buff *skb,
			      int clone_it, gfp_t gfp_mask, u32 rcv_nxt)
L
Linus Torvalds 已提交
1015
{
1016 1017 1018 1019
	const struct inet_connection_sock *icsk = inet_csk(sk);
	struct inet_sock *inet;
	struct tcp_sock *tp;
	struct tcp_skb_cb *tcb;
A
Adam Langley 已提交
1020
	struct tcp_out_options opts;
1021
	unsigned int tcp_options_size, tcp_header_size;
1022
	struct sk_buff *oskb = NULL;
1023
	struct tcp_md5sig_key *md5;
1024
	struct tcphdr *th;
1025
	u64 prior_wstamp;
1026 1027 1028
	int err;

	BUG_ON(!skb || !tcp_skb_pcount(skb));
1029
	tp = tcp_sk(sk);
1030 1031 1032
	prior_wstamp = tp->tcp_wstamp_ns;
	tp->tcp_wstamp_ns = max(tp->tcp_wstamp_ns, tp->tcp_clock_cache);
	skb->skb_mstamp_ns = tp->tcp_wstamp_ns;
1033
	if (clone_it) {
1034 1035
		TCP_SKB_CB(skb)->tx.in_flight = TCP_SKB_CB(skb)->end_seq
			- tp->snd_una;
1036
		oskb = skb;
1037 1038 1039 1040 1041 1042 1043 1044

		tcp_skb_tsorted_save(oskb) {
			if (unlikely(skb_cloned(oskb)))
				skb = pskb_copy(oskb, gfp_mask);
			else
				skb = skb_clone(oskb, gfp_mask);
		} tcp_skb_tsorted_restore(oskb);

1045 1046 1047
		if (unlikely(!skb))
			return -ENOBUFS;
	}
1048

1049 1050
	inet = inet_sk(sk);
	tcb = TCP_SKB_CB(skb);
A
Adam Langley 已提交
1051
	memset(&opts, 0, sizeof(opts));
L
Linus Torvalds 已提交
1052

1053
	if (unlikely(tcb->tcp_flags & TCPHDR_SYN)) {
A
Adam Langley 已提交
1054
		tcp_options_size = tcp_syn_options(sk, skb, &opts, &md5);
1055
	} else {
A
Adam Langley 已提交
1056 1057
		tcp_options_size = tcp_established_options(sk, skb, &opts,
							   &md5);
1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068
		/* Force a PSH flag on all (GSO) packets to expedite GRO flush
		 * at receiver : This slightly improve GRO performance.
		 * Note that we do not force the PSH flag for non GSO packets,
		 * because they might be sent under high congestion events,
		 * and in this case it is better to delay the delivery of 1-MSS
		 * packets and thus the corresponding ACK packet that would
		 * release the following packet.
		 */
		if (tcp_skb_pcount(skb) > 1)
			tcb->tcp_flags |= TCPHDR_PSH;
	}
A
Adam Langley 已提交
1069
	tcp_header_size = tcp_options_size + sizeof(struct tcphdr);
1070

E
Eric Dumazet 已提交
1071
	/* if no packet is in qdisc/device queue, then allow XPS to select
1072
	 * another queue. We can be called from tcp_tsq_handler()
1073
	 * which holds one reference to sk.
1074 1075 1076
	 *
	 * TODO: Ideally, in-flight pure ACK packets should not matter here.
	 * One way to get this would be to set skb->truesize = 2 on them.
E
Eric Dumazet 已提交
1077
	 */
1078
	skb->ooo_okay = sk_wmem_alloc_get(sk) < SKB_TRUESIZE(1);
1079

1080 1081 1082 1083 1084 1085 1086
	/* If we had to use memory reserve to allocate this skb,
	 * this might cause drops if packet is looped back :
	 * Other socket might not have SOCK_MEMALLOC.
	 * Packets not looped back do not care about pfmemalloc.
	 */
	skb->pfmemalloc = 0;

1087 1088
	skb_push(skb, tcp_header_size);
	skb_reset_transport_header(skb);
E
Eric Dumazet 已提交
1089 1090 1091

	skb_orphan(skb);
	skb->sk = sk;
E
Eric Dumazet 已提交
1092
	skb->destructor = skb_is_tcp_pure_ack(skb) ? __sock_wfree : tcp_wfree;
1093
	skb_set_hash_from_sk(skb, sk);
1094
	refcount_add(skb->truesize, &sk->sk_wmem_alloc);
1095

1096 1097
	skb_set_dst_pending_confirm(skb, sk->sk_dst_pending_confirm);

1098
	/* Build TCP header and checksum it. */
1099
	th = (struct tcphdr *)skb->data;
E
Eric Dumazet 已提交
1100 1101
	th->source		= inet->inet_sport;
	th->dest		= inet->inet_dport;
1102
	th->seq			= htonl(tcb->seq);
1103
	th->ack_seq		= htonl(rcv_nxt);
1104
	*(((__be16 *)th) + 6)	= htons(((tcp_header_size >> 2) << 12) |
E
Eric Dumazet 已提交
1105
					tcb->tcp_flags);
1106 1107 1108

	th->check		= 0;
	th->urg_ptr		= 0;
L
Linus Torvalds 已提交
1109

I
Ilpo Järvinen 已提交
1110
	/* The urg_mode check is necessary during a below snd_una win probe */
1111 1112 1113 1114 1115
	if (unlikely(tcp_urg_mode(tp) && before(tcb->seq, tp->snd_up))) {
		if (before(tp->snd_up, tcb->seq + 0x10000)) {
			th->urg_ptr = htons(tp->snd_up - tcb->seq);
			th->urg = 1;
		} else if (after(tcb->seq + 0xFFFF, tp->snd_nxt)) {
1116
			th->urg_ptr = htons(0xFFFF);
1117 1118
			th->urg = 1;
		}
1119
	}
L
Linus Torvalds 已提交
1120

1121
	tcp_options_write((__be32 *)(th + 1), tp, &opts);
1122
	skb_shinfo(skb)->gso_type = sk->sk_gso_type;
1123 1124 1125 1126 1127 1128 1129 1130 1131
	if (likely(!(tcb->tcp_flags & TCPHDR_SYN))) {
		th->window      = htons(tcp_select_window(sk));
		tcp_ecn_send(sk, skb, th, tcp_header_size);
	} else {
		/* RFC1323: The window in SYN & SYN/ACK segments
		 * is never scaled.
		 */
		th->window	= htons(min(tp->rcv_wnd, 65535U));
	}
1132 1133 1134
#ifdef CONFIG_TCP_MD5SIG
	/* Calculate the MD5 hash, as we have all we need now */
	if (md5) {
E
Eric Dumazet 已提交
1135
		sk_nocaps_add(sk, NETIF_F_GSO_MASK);
1136
		tp->af_specific->calc_md5_hash(opts.hash_location,
1137
					       md5, sk, skb);
1138 1139 1140
	}
#endif

1141
	icsk->icsk_af_ops->send_check(sk, skb);
L
Linus Torvalds 已提交
1142

E
Eric Dumazet 已提交
1143
	if (likely(tcb->tcp_flags & TCPHDR_ACK))
1144
		tcp_event_ack_sent(sk, tcp_skb_pcount(skb), rcv_nxt);
L
Linus Torvalds 已提交
1145

1146
	if (skb->len != tcp_header_size) {
1147
		tcp_event_data_sent(tp, sk);
1148
		tp->data_segs_out += tcp_skb_pcount(skb);
W
Wei Wang 已提交
1149
		tp->bytes_sent += skb->len - tcp_header_size;
1150
	}
L
Linus Torvalds 已提交
1151

1152
	if (after(tcb->end_seq, tp->snd_nxt) || tcb->seq == tcb->end_seq)
1153 1154
		TCP_ADD_STATS(sock_net(sk), TCP_MIB_OUTSEGS,
			      tcp_skb_pcount(skb));
L
Linus Torvalds 已提交
1155

1156
	tp->segs_out += tcp_skb_pcount(skb);
1157
	/* OK, its time to fill skb_shinfo(skb)->gso_{segs|size} */
1158
	skb_shinfo(skb)->gso_segs = tcp_skb_pcount(skb);
1159
	skb_shinfo(skb)->gso_size = tcp_skb_mss(skb);
1160

1161
	/* Leave earliest departure time in skb->tstamp (skb->skb_mstamp_ns) */
1162 1163 1164 1165 1166

	/* Cleanup our debris for IP stacks */
	memset(skb->cb, 0, max(sizeof(struct inet_skb_parm),
			       sizeof(struct inet6_skb_parm)));

1167 1168
	tcp_add_tx_delay(skb, tp);

1169
	err = icsk->icsk_af_ops->queue_xmit(sk, skb, &inet->cork.fl);
E
Eric Dumazet 已提交
1170

1171 1172 1173 1174
	if (unlikely(err > 0)) {
		tcp_enter_cwr(sk);
		err = net_xmit_eval(err);
	}
E
Eric Dumazet 已提交
1175
	if (!err && oskb) {
1176
		tcp_update_skb_after_send(sk, oskb, prior_wstamp);
E
Eric Dumazet 已提交
1177 1178
		tcp_rate_skb_sent(sk, oskb);
	}
1179
	return err;
L
Linus Torvalds 已提交
1180 1181
}

1182 1183 1184 1185 1186 1187 1188
static int tcp_transmit_skb(struct sock *sk, struct sk_buff *skb, int clone_it,
			    gfp_t gfp_mask)
{
	return __tcp_transmit_skb(sk, skb, clone_it, gfp_mask,
				  tcp_sk(sk)->rcv_nxt);
}

1189
/* This routine just queues the buffer for sending.
L
Linus Torvalds 已提交
1190 1191 1192 1193 1194 1195 1196 1197 1198
 *
 * NOTE: probe0 timer is not checked, do not forget tcp_push_pending_frames,
 * otherwise socket can stall.
 */
static void tcp_queue_skb(struct sock *sk, struct sk_buff *skb)
{
	struct tcp_sock *tp = tcp_sk(sk);

	/* Advance write_seq and place onto the write_queue. */
1199
	WRITE_ONCE(tp->write_seq, TCP_SKB_CB(skb)->end_seq);
1200
	__skb_header_release(skb);
1201
	tcp_add_write_queue_tail(sk, skb);
1202 1203
	sk->sk_wmem_queued += skb->truesize;
	sk_mem_charge(sk, skb->truesize);
L
Linus Torvalds 已提交
1204 1205
}

1206
/* Initialize TSO segments for a packet. */
1207
static void tcp_set_skb_tso_segs(struct sk_buff *skb, unsigned int mss_now)
1208
{
1209
	if (skb->len <= mss_now) {
1210 1211 1212
		/* Avoid the costly divide in the normal
		 * non-TSO case.
		 */
1213
		tcp_skb_pcount_set(skb, 1);
1214
		TCP_SKB_CB(skb)->tcp_gso_size = 0;
1215
	} else {
1216
		tcp_skb_pcount_set(skb, DIV_ROUND_UP(skb->len, mss_now));
1217
		TCP_SKB_CB(skb)->tcp_gso_size = mss_now;
L
Linus Torvalds 已提交
1218 1219 1220
	}
}

1221 1222 1223
/* Pcount in the middle of the write queue got changed, we need to do various
 * tweaks to fix counters
 */
1224
static void tcp_adjust_pcount(struct sock *sk, const struct sk_buff *skb, int decr)
1225 1226 1227 1228 1229 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242
{
	struct tcp_sock *tp = tcp_sk(sk);

	tp->packets_out -= decr;

	if (TCP_SKB_CB(skb)->sacked & TCPCB_SACKED_ACKED)
		tp->sacked_out -= decr;
	if (TCP_SKB_CB(skb)->sacked & TCPCB_SACKED_RETRANS)
		tp->retrans_out -= decr;
	if (TCP_SKB_CB(skb)->sacked & TCPCB_LOST)
		tp->lost_out -= decr;

	/* Reno case is special. Sigh... */
	if (tcp_is_reno(tp) && decr > 0)
		tp->sacked_out -= min_t(u32, tp->sacked_out, decr);

	if (tp->lost_skb_hint &&
	    before(TCP_SKB_CB(skb)->seq, TCP_SKB_CB(tp->lost_skb_hint)->seq) &&
Y
Yuchung Cheng 已提交
1243
	    (TCP_SKB_CB(skb)->sacked & TCPCB_SACKED_ACKED))
1244 1245 1246 1247 1248
		tp->lost_cnt_hint -= decr;

	tcp_verify_left_out(tp);
}

1249 1250 1251 1252 1253 1254
static bool tcp_has_tx_tstamp(const struct sk_buff *skb)
{
	return TCP_SKB_CB(skb)->txstamp_ack ||
		(skb_shinfo(skb)->tx_flags & SKBTX_ANY_TSTAMP);
}

1255 1256 1257 1258
static void tcp_fragment_tstamp(struct sk_buff *skb, struct sk_buff *skb2)
{
	struct skb_shared_info *shinfo = skb_shinfo(skb);

1259
	if (unlikely(tcp_has_tx_tstamp(skb)) &&
1260 1261 1262 1263 1264 1265 1266
	    !before(shinfo->tskey, TCP_SKB_CB(skb2)->seq)) {
		struct skb_shared_info *shinfo2 = skb_shinfo(skb2);
		u8 tsflags = shinfo->tx_flags & SKBTX_ANY_TSTAMP;

		shinfo->tx_flags &= ~tsflags;
		shinfo2->tx_flags |= tsflags;
		swap(shinfo->tskey, shinfo2->tskey);
1267 1268
		TCP_SKB_CB(skb2)->txstamp_ack = TCP_SKB_CB(skb)->txstamp_ack;
		TCP_SKB_CB(skb)->txstamp_ack = 0;
1269 1270 1271
	}
}

1272 1273 1274 1275 1276 1277
static void tcp_skb_fragment_eor(struct sk_buff *skb, struct sk_buff *skb2)
{
	TCP_SKB_CB(skb2)->eor = TCP_SKB_CB(skb)->eor;
	TCP_SKB_CB(skb)->eor = 0;
}

1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289
/* Insert buff after skb on the write or rtx queue of sk.  */
static void tcp_insert_write_queue_after(struct sk_buff *skb,
					 struct sk_buff *buff,
					 struct sock *sk,
					 enum tcp_queue tcp_queue)
{
	if (tcp_queue == TCP_FRAG_IN_WRITE_QUEUE)
		__skb_queue_after(&sk->sk_write_queue, skb, buff);
	else
		tcp_rbtree_insert(&sk->tcp_rtx_queue, buff);
}

L
Linus Torvalds 已提交
1290 1291
/* Function to create two new TCP segments.  Shrinks the given segment
 * to the specified size and appends a new segment with the rest of the
1292
 * packet to the list.  This won't be called frequently, I hope.
L
Linus Torvalds 已提交
1293 1294
 * Remember, these are still headerless SKBs at this point.
 */
1295 1296
int tcp_fragment(struct sock *sk, enum tcp_queue tcp_queue,
		 struct sk_buff *skb, u32 len,
1297
		 unsigned int mss_now, gfp_t gfp)
L
Linus Torvalds 已提交
1298 1299 1300
{
	struct tcp_sock *tp = tcp_sk(sk);
	struct sk_buff *buff;
1301
	int nsize, old_factor;
1302
	long limit;
1303
	int nlen;
1304
	u8 flags;
L
Linus Torvalds 已提交
1305

1306 1307
	if (WARN_ON(len > skb->len))
		return -EINVAL;
1308

L
Linus Torvalds 已提交
1309 1310 1311 1312
	nsize = skb_headlen(skb) - len;
	if (nsize < 0)
		nsize = 0;

1313 1314 1315 1316 1317 1318 1319 1320 1321 1322
	/* tcp_sendmsg() can overshoot sk_wmem_queued by one full size skb.
	 * We need some allowance to not penalize applications setting small
	 * SO_SNDBUF values.
	 * Also allow first and last skb in retransmit queue to be split.
	 */
	limit = sk->sk_sndbuf + 2 * SKB_TRUESIZE(GSO_MAX_SIZE);
	if (unlikely((sk->sk_wmem_queued >> 1) > limit &&
		     tcp_queue != TCP_FRAG_IN_WRITE_QUEUE &&
		     skb != tcp_rtx_queue_head(sk) &&
		     skb != tcp_rtx_queue_tail(sk))) {
1323 1324 1325 1326
		NET_INC_STATS(sock_net(sk), LINUX_MIB_TCPWQUEUETOOBIG);
		return -ENOMEM;
	}

1327
	if (skb_unclone(skb, gfp))
L
Linus Torvalds 已提交
1328 1329 1330
		return -ENOMEM;

	/* Get a new skb... force flag on. */
1331
	buff = sk_stream_alloc_skb(sk, nsize, gfp, true);
1332
	if (!buff)
L
Linus Torvalds 已提交
1333
		return -ENOMEM; /* We'll just try again later. */
1334
	skb_copy_decrypted(buff, skb);
H
Herbert Xu 已提交
1335

1336 1337
	sk->sk_wmem_queued += buff->truesize;
	sk_mem_charge(sk, buff->truesize);
1338 1339 1340
	nlen = skb->len - len - nsize;
	buff->truesize += nlen;
	skb->truesize -= nlen;
L
Linus Torvalds 已提交
1341 1342 1343 1344 1345 1346 1347

	/* Correct the sequence numbers. */
	TCP_SKB_CB(buff)->seq = TCP_SKB_CB(skb)->seq + len;
	TCP_SKB_CB(buff)->end_seq = TCP_SKB_CB(skb)->end_seq;
	TCP_SKB_CB(skb)->end_seq = TCP_SKB_CB(buff)->seq;

	/* PSH and FIN should only be set in the second packet. */
E
Eric Dumazet 已提交
1348 1349 1350
	flags = TCP_SKB_CB(skb)->tcp_flags;
	TCP_SKB_CB(skb)->tcp_flags = flags & ~(TCPHDR_FIN | TCPHDR_PSH);
	TCP_SKB_CB(buff)->tcp_flags = flags;
1351
	TCP_SKB_CB(buff)->sacked = TCP_SKB_CB(skb)->sacked;
1352
	tcp_skb_fragment_eor(skb, buff);
L
Linus Torvalds 已提交
1353

1354
	skb_split(skb, buff, len);
L
Linus Torvalds 已提交
1355

1356
	buff->ip_summed = CHECKSUM_PARTIAL;
L
Linus Torvalds 已提交
1357

1358
	buff->tstamp = skb->tstamp;
1359
	tcp_fragment_tstamp(skb, buff);
L
Linus Torvalds 已提交
1360

1361 1362
	old_factor = tcp_skb_pcount(skb);

L
Linus Torvalds 已提交
1363
	/* Fix up tso_factor for both original and new SKB.  */
1364 1365
	tcp_set_skb_tso_segs(skb, mss_now);
	tcp_set_skb_tso_segs(buff, mss_now);
L
Linus Torvalds 已提交
1366

1367 1368 1369
	/* Update delivered info for the new segment */
	TCP_SKB_CB(buff)->tx = TCP_SKB_CB(skb)->tx;

1370 1371 1372
	/* If this packet has been sent out already, we must
	 * adjust the various packet counters.
	 */
1373
	if (!before(tp->snd_nxt, TCP_SKB_CB(buff)->end_seq)) {
1374 1375
		int diff = old_factor - tcp_skb_pcount(skb) -
			tcp_skb_pcount(buff);
L
Linus Torvalds 已提交
1376

1377 1378
		if (diff)
			tcp_adjust_pcount(sk, skb, diff);
L
Linus Torvalds 已提交
1379 1380 1381
	}

	/* Link BUFF into the send queue. */
1382
	__skb_header_release(buff);
1383
	tcp_insert_write_queue_after(skb, buff, sk, tcp_queue);
1384 1385
	if (tcp_queue == TCP_FRAG_IN_RTX_QUEUE)
		list_add(&buff->tcp_tsorted_anchor, &skb->tcp_tsorted_anchor);
L
Linus Torvalds 已提交
1386 1387 1388 1389

	return 0;
}

1390 1391
/* This is similar to __pskb_pull_tail(). The difference is that pulled
 * data is not copied, but immediately discarded.
L
Linus Torvalds 已提交
1392
 */
1393
static int __pskb_trim_head(struct sk_buff *skb, int len)
L
Linus Torvalds 已提交
1394
{
1395
	struct skb_shared_info *shinfo;
L
Linus Torvalds 已提交
1396 1397
	int i, k, eat;

E
Eric Dumazet 已提交
1398 1399 1400 1401 1402
	eat = min_t(int, len, skb_headlen(skb));
	if (eat) {
		__skb_pull(skb, eat);
		len -= eat;
		if (!len)
1403
			return 0;
E
Eric Dumazet 已提交
1404
	}
L
Linus Torvalds 已提交
1405 1406
	eat = len;
	k = 0;
1407 1408 1409
	shinfo = skb_shinfo(skb);
	for (i = 0; i < shinfo->nr_frags; i++) {
		int size = skb_frag_size(&shinfo->frags[i]);
E
Eric Dumazet 已提交
1410 1411

		if (size <= eat) {
1412
			skb_frag_unref(skb, i);
E
Eric Dumazet 已提交
1413
			eat -= size;
L
Linus Torvalds 已提交
1414
		} else {
1415
			shinfo->frags[k] = shinfo->frags[i];
L
Linus Torvalds 已提交
1416
			if (eat) {
J
Jonathan Lemon 已提交
1417
				skb_frag_off_add(&shinfo->frags[k], eat);
1418
				skb_frag_size_sub(&shinfo->frags[k], eat);
L
Linus Torvalds 已提交
1419 1420 1421 1422 1423
				eat = 0;
			}
			k++;
		}
	}
1424
	shinfo->nr_frags = k;
L
Linus Torvalds 已提交
1425 1426 1427

	skb->data_len -= len;
	skb->len = skb->data_len;
1428
	return len;
L
Linus Torvalds 已提交
1429 1430
}

1431
/* Remove acked data from a packet in the transmit queue. */
L
Linus Torvalds 已提交
1432 1433
int tcp_trim_head(struct sock *sk, struct sk_buff *skb, u32 len)
{
1434 1435
	u32 delta_truesize;

1436
	if (skb_unclone(skb, GFP_ATOMIC))
L
Linus Torvalds 已提交
1437 1438
		return -ENOMEM;

1439
	delta_truesize = __pskb_trim_head(skb, len);
L
Linus Torvalds 已提交
1440 1441

	TCP_SKB_CB(skb)->seq += len;
1442
	skb->ip_summed = CHECKSUM_PARTIAL;
L
Linus Torvalds 已提交
1443

1444 1445 1446 1447 1448 1449
	if (delta_truesize) {
		skb->truesize	   -= delta_truesize;
		sk->sk_wmem_queued -= delta_truesize;
		sk_mem_uncharge(sk, delta_truesize);
		sock_set_flag(sk, SOCK_QUEUE_SHRUNK);
	}
L
Linus Torvalds 已提交
1450

1451
	/* Any change of skb->len requires recalculation of tso factor. */
L
Linus Torvalds 已提交
1452
	if (tcp_skb_pcount(skb) > 1)
1453
		tcp_set_skb_tso_segs(skb, tcp_skb_mss(skb));
L
Linus Torvalds 已提交
1454 1455 1456 1457

	return 0;
}

1458 1459
/* Calculate MSS not accounting any TCP options.  */
static inline int __tcp_mtu_to_mss(struct sock *sk, int pmtu)
J
John Heffner 已提交
1460
{
1461 1462
	const struct tcp_sock *tp = tcp_sk(sk);
	const struct inet_connection_sock *icsk = inet_csk(sk);
J
John Heffner 已提交
1463 1464 1465 1466 1467 1468 1469
	int mss_now;

	/* Calculate base mss without TCP options:
	   It is MMS_S - sizeof(tcphdr) of rfc1122
	 */
	mss_now = pmtu - icsk->icsk_af_ops->net_header_len - sizeof(struct tcphdr);

1470 1471 1472 1473 1474 1475 1476 1477
	/* IPv6 adds a frag_hdr in case RTAX_FEATURE_ALLFRAG is set */
	if (icsk->icsk_af_ops->net_frag_header_len) {
		const struct dst_entry *dst = __sk_dst_get(sk);

		if (dst && dst_allfrag(dst))
			mss_now -= icsk->icsk_af_ops->net_frag_header_len;
	}

J
John Heffner 已提交
1478 1479 1480 1481 1482 1483 1484 1485
	/* Clamp it (mss_clamp does not include tcp options) */
	if (mss_now > tp->rx_opt.mss_clamp)
		mss_now = tp->rx_opt.mss_clamp;

	/* Now subtract optional transport overhead */
	mss_now -= icsk->icsk_ext_hdr_len;

	/* Then reserve room for full set of TCP options and 8 bytes of data */
E
Eric Dumazet 已提交
1486
	mss_now = max(mss_now, sock_net(sk)->ipv4.sysctl_tcp_min_snd_mss);
J
John Heffner 已提交
1487 1488 1489
	return mss_now;
}

1490 1491 1492 1493 1494 1495 1496 1497
/* Calculate MSS. Not accounting for SACKs here.  */
int tcp_mtu_to_mss(struct sock *sk, int pmtu)
{
	/* Subtract TCP options size, not including SACKs */
	return __tcp_mtu_to_mss(sk, pmtu) -
	       (tcp_sk(sk)->tcp_header_len - sizeof(struct tcphdr));
}

J
John Heffner 已提交
1498
/* Inverse of above */
1499
int tcp_mss_to_mtu(struct sock *sk, int mss)
J
John Heffner 已提交
1500
{
1501 1502
	const struct tcp_sock *tp = tcp_sk(sk);
	const struct inet_connection_sock *icsk = inet_csk(sk);
J
John Heffner 已提交
1503 1504 1505 1506 1507 1508 1509
	int mtu;

	mtu = mss +
	      tp->tcp_header_len +
	      icsk->icsk_ext_hdr_len +
	      icsk->icsk_af_ops->net_header_len;

1510 1511 1512 1513 1514 1515 1516
	/* IPv6 adds a frag_hdr in case RTAX_FEATURE_ALLFRAG is set */
	if (icsk->icsk_af_ops->net_frag_header_len) {
		const struct dst_entry *dst = __sk_dst_get(sk);

		if (dst && dst_allfrag(dst))
			mtu += icsk->icsk_af_ops->net_frag_header_len;
	}
J
John Heffner 已提交
1517 1518
	return mtu;
}
1519
EXPORT_SYMBOL(tcp_mss_to_mtu);
J
John Heffner 已提交
1520

1521
/* MTU probing init per socket */
J
John Heffner 已提交
1522 1523 1524 1525
void tcp_mtup_init(struct sock *sk)
{
	struct tcp_sock *tp = tcp_sk(sk);
	struct inet_connection_sock *icsk = inet_csk(sk);
F
Fan Du 已提交
1526
	struct net *net = sock_net(sk);
J
John Heffner 已提交
1527

F
Fan Du 已提交
1528
	icsk->icsk_mtup.enabled = net->ipv4.sysctl_tcp_mtu_probing > 1;
J
John Heffner 已提交
1529
	icsk->icsk_mtup.search_high = tp->rx_opt.mss_clamp + sizeof(struct tcphdr) +
1530
			       icsk->icsk_af_ops->net_header_len;
F
Fan Du 已提交
1531
	icsk->icsk_mtup.search_low = tcp_mss_to_mtu(sk, net->ipv4.sysctl_tcp_base_mss);
J
John Heffner 已提交
1532
	icsk->icsk_mtup.probe_size = 0;
1533
	if (icsk->icsk_mtup.enabled)
1534
		icsk->icsk_mtup.probe_timestamp = tcp_jiffies32;
J
John Heffner 已提交
1535
}
E
Eric Dumazet 已提交
1536
EXPORT_SYMBOL(tcp_mtup_init);
J
John Heffner 已提交
1537

L
Linus Torvalds 已提交
1538 1539 1540 1541 1542 1543
/* This function synchronize snd mss to current pmtu/exthdr set.

   tp->rx_opt.user_mss is mss set by user by TCP_MAXSEG. It does NOT counts
   for TCP options, but includes only bare TCP header.

   tp->rx_opt.mss_clamp is mss negotiated at connection setup.
S
Stephen Hemminger 已提交
1544
   It is minimum of user_mss and mss received with SYN.
L
Linus Torvalds 已提交
1545 1546
   It also does not include TCP options.

1547
   inet_csk(sk)->icsk_pmtu_cookie is last pmtu, seen by this function.
L
Linus Torvalds 已提交
1548 1549 1550 1551 1552 1553 1554 1555 1556

   tp->mss_cache is current effective sending mss, including
   all tcp options except for SACKs. It is evaluated,
   taking into account current pmtu, but never exceeds
   tp->rx_opt.mss_clamp.

   NOTE1. rfc1122 clearly states that advertised MSS
   DOES NOT include either tcp or ip options.

1557 1558
   NOTE2. inet_csk(sk)->icsk_pmtu_cookie and tp->mss_cache
   are READ ONLY outside this function.		--ANK (980731)
L
Linus Torvalds 已提交
1559 1560 1561 1562
 */
unsigned int tcp_sync_mss(struct sock *sk, u32 pmtu)
{
	struct tcp_sock *tp = tcp_sk(sk);
1563
	struct inet_connection_sock *icsk = inet_csk(sk);
J
John Heffner 已提交
1564
	int mss_now;
L
Linus Torvalds 已提交
1565

J
John Heffner 已提交
1566 1567
	if (icsk->icsk_mtup.search_high > pmtu)
		icsk->icsk_mtup.search_high = pmtu;
L
Linus Torvalds 已提交
1568

J
John Heffner 已提交
1569
	mss_now = tcp_mtu_to_mss(sk, pmtu);
1570
	mss_now = tcp_bound_to_half_wnd(tp, mss_now);
L
Linus Torvalds 已提交
1571 1572

	/* And store cached results */
1573
	icsk->icsk_pmtu_cookie = pmtu;
J
John Heffner 已提交
1574 1575
	if (icsk->icsk_mtup.enabled)
		mss_now = min(mss_now, tcp_mtu_to_mss(sk, icsk->icsk_mtup.search_low));
1576
	tp->mss_cache = mss_now;
L
Linus Torvalds 已提交
1577 1578 1579

	return mss_now;
}
E
Eric Dumazet 已提交
1580
EXPORT_SYMBOL(tcp_sync_mss);
L
Linus Torvalds 已提交
1581 1582 1583 1584

/* Compute the current effective MSS, taking SACKs and IP options,
 * and even PMTU discovery events into account.
 */
I
Ilpo Järvinen 已提交
1585
unsigned int tcp_current_mss(struct sock *sk)
L
Linus Torvalds 已提交
1586
{
1587 1588
	const struct tcp_sock *tp = tcp_sk(sk);
	const struct dst_entry *dst = __sk_dst_get(sk);
1589
	u32 mss_now;
1590
	unsigned int header_len;
A
Adam Langley 已提交
1591 1592
	struct tcp_out_options opts;
	struct tcp_md5sig_key *md5;
1593 1594 1595

	mss_now = tp->mss_cache;

L
Linus Torvalds 已提交
1596 1597
	if (dst) {
		u32 mtu = dst_mtu(dst);
1598
		if (mtu != inet_csk(sk)->icsk_pmtu_cookie)
L
Linus Torvalds 已提交
1599 1600 1601
			mss_now = tcp_sync_mss(sk, mtu);
	}

A
Adam Langley 已提交
1602 1603 1604 1605 1606 1607 1608 1609 1610 1611
	header_len = tcp_established_options(sk, NULL, &opts, &md5) +
		     sizeof(struct tcphdr);
	/* The mss_cache is sized based on tp->tcp_header_len, which assumes
	 * some common options. If this is an odd packet (because we have SACK
	 * blocks etc) then our calculated header_len will be different, and
	 * we have to adjust mss_now correspondingly */
	if (header_len != tp->tcp_header_len) {
		int delta = (int) header_len - tp->tcp_header_len;
		mss_now -= delta;
	}
1612

L
Linus Torvalds 已提交
1613 1614 1615
	return mss_now;
}

1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634
/* RFC2861, slow part. Adjust cwnd, after it was not full during one rto.
 * As additional protections, we do not touch cwnd in retransmission phases,
 * and if application hit its sndbuf limit recently.
 */
static void tcp_cwnd_application_limited(struct sock *sk)
{
	struct tcp_sock *tp = tcp_sk(sk);

	if (inet_csk(sk)->icsk_ca_state == TCP_CA_Open &&
	    sk->sk_socket && !test_bit(SOCK_NOSPACE, &sk->sk_socket->flags)) {
		/* Limited by application or receiver window. */
		u32 init_win = tcp_init_cwnd(tp, __sk_dst_get(sk));
		u32 win_used = max(tp->snd_cwnd_used, init_win);
		if (win_used < tp->snd_cwnd) {
			tp->snd_ssthresh = tcp_current_ssthresh(sk);
			tp->snd_cwnd = (tp->snd_cwnd + win_used) >> 1;
		}
		tp->snd_cwnd_used = 0;
	}
1635
	tp->snd_cwnd_stamp = tcp_jiffies32;
1636 1637
}

1638
static void tcp_cwnd_validate(struct sock *sk, bool is_cwnd_limited)
1639
{
1640
	const struct tcp_congestion_ops *ca_ops = inet_csk(sk)->icsk_ca_ops;
1641
	struct tcp_sock *tp = tcp_sk(sk);
1642

1643 1644 1645 1646 1647 1648 1649 1650 1651
	/* Track the maximum number of outstanding packets in each
	 * window, and remember whether we were cwnd-limited then.
	 */
	if (!before(tp->snd_una, tp->max_packets_seq) ||
	    tp->packets_out > tp->max_packets_out) {
		tp->max_packets_out = tp->packets_out;
		tp->max_packets_seq = tp->snd_nxt;
		tp->is_cwnd_limited = is_cwnd_limited;
	}
1652

1653
	if (tcp_is_cwnd_limited(sk)) {
1654 1655
		/* Network is feed fully. */
		tp->snd_cwnd_used = 0;
1656
		tp->snd_cwnd_stamp = tcp_jiffies32;
1657 1658 1659 1660 1661
	} else {
		/* Network starves. */
		if (tp->packets_out > tp->snd_cwnd_used)
			tp->snd_cwnd_used = tp->packets_out;

1662
		if (sock_net(sk)->ipv4.sysctl_tcp_slow_start_after_idle &&
1663
		    (s32)(tcp_jiffies32 - tp->snd_cwnd_stamp) >= inet_csk(sk)->icsk_rto &&
1664
		    !ca_ops->cong_control)
1665
			tcp_cwnd_application_limited(sk);
1666 1667 1668 1669 1670

		/* The following conditions together indicate the starvation
		 * is caused by insufficient sender buffer:
		 * 1) just sent some data (see tcp_write_xmit)
		 * 2) not cwnd limited (this else condition)
1671
		 * 3) no more data to send (tcp_write_queue_empty())
1672 1673
		 * 4) application is hitting buffer limit (SOCK_NOSPACE)
		 */
1674
		if (tcp_write_queue_empty(sk) && sk->sk_socket &&
1675 1676 1677
		    test_bit(SOCK_NOSPACE, &sk->sk_socket->flags) &&
		    (1 << sk->sk_state) & (TCPF_ESTABLISHED | TCPF_CLOSE_WAIT))
			tcp_chrono_start(sk, TCP_CHRONO_SNDBUF_LIMITED);
1678 1679 1680
	}
}

E
Eric Dumazet 已提交
1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694
/* Minshall's variant of the Nagle send check. */
static bool tcp_minshall_check(const struct tcp_sock *tp)
{
	return after(tp->snd_sml, tp->snd_una) &&
		!after(tp->snd_sml, tp->snd_nxt);
}

/* Update snd_sml if this skb is under mss
 * Note that a TSO packet might end with a sub-mss segment
 * The test is really :
 * if ((skb->len % mss) != 0)
 *        tp->snd_sml = TCP_SKB_CB(skb)->end_seq;
 * But we can avoid doing the divide again given we already have
 *  skb_pcount = skb->len / mss_now
1695
 */
E
Eric Dumazet 已提交
1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710
static void tcp_minshall_update(struct tcp_sock *tp, unsigned int mss_now,
				const struct sk_buff *skb)
{
	if (skb->len < tcp_skb_pcount(skb) * mss_now)
		tp->snd_sml = TCP_SKB_CB(skb)->end_seq;
}

/* Return false, if packet can be sent now without violation Nagle's rules:
 * 1. It is full sized. (provided by caller in %partial bool)
 * 2. Or it contains FIN. (already checked by caller)
 * 3. Or TCP_CORK is not set, and TCP_NODELAY is set.
 * 4. Or TCP_CORK is not set, and all sent packets are ACKed.
 *    With Minshall's modification: all sent small packets are ACKed.
 */
static bool tcp_nagle_check(bool partial, const struct tcp_sock *tp,
1711
			    int nonagle)
E
Eric Dumazet 已提交
1712 1713 1714 1715 1716
{
	return partial &&
		((nonagle & TCP_NAGLE_CORK) ||
		 (!nonagle && tp->packets_out && tcp_minshall_check(tp)));
}
E
Eric Dumazet 已提交
1717 1718 1719 1720

/* Return how many segs we'd like on a TSO packet,
 * to send one TSO packet per ms
 */
1721 1722
static u32 tcp_tso_autosize(const struct sock *sk, unsigned int mss_now,
			    int min_tso_segs)
E
Eric Dumazet 已提交
1723 1724 1725
{
	u32 bytes, segs;

1726 1727 1728
	bytes = min_t(unsigned long,
		      sk->sk_pacing_rate >> sk->sk_pacing_shift,
		      sk->sk_gso_max_size - 1 - MAX_TCP_HEADER);
E
Eric Dumazet 已提交
1729 1730 1731 1732 1733 1734

	/* Goal is to send at least one packet per ms,
	 * not one big TSO packet every 100 ms.
	 * This preserves ACK clocking and is consistent
	 * with tcp_tso_should_defer() heuristic.
	 */
1735
	segs = max_t(u32, bytes / mss_now, min_tso_segs);
E
Eric Dumazet 已提交
1736

1737
	return segs;
E
Eric Dumazet 已提交
1738 1739
}

1740 1741 1742 1743 1744 1745
/* Return the number of segments we want in the skb we are transmitting.
 * See if congestion control module wants to decide; otherwise, autosize.
 */
static u32 tcp_tso_segs(struct sock *sk, unsigned int mss_now)
{
	const struct tcp_congestion_ops *ca_ops = inet_csk(sk)->icsk_ca_ops;
1746
	u32 min_tso, tso_segs;
1747

1748 1749 1750 1751 1752
	min_tso = ca_ops->min_tso_segs ?
			ca_ops->min_tso_segs(sk) :
			sock_net(sk)->ipv4.sysctl_tcp_min_tso_segs;

	tso_segs = tcp_tso_autosize(sk, mss_now, min_tso);
1753
	return min_t(u32, tso_segs, sk->sk_gso_max_segs);
1754 1755
}

E
Eric Dumazet 已提交
1756 1757 1758 1759 1760 1761
/* Returns the portion of skb which can be sent right away */
static unsigned int tcp_mss_split_point(const struct sock *sk,
					const struct sk_buff *skb,
					unsigned int mss_now,
					unsigned int max_segs,
					int nonagle)
1762
{
1763
	const struct tcp_sock *tp = tcp_sk(sk);
E
Eric Dumazet 已提交
1764
	u32 partial, needed, window, max_len;
1765

1766
	window = tcp_wnd_end(tp) - TCP_SKB_CB(skb)->seq;
1767
	max_len = mss_now * max_segs;
1768

1769 1770
	if (likely(max_len <= window && skb != tcp_write_queue_tail(sk)))
		return max_len;
1771

1772 1773
	needed = min(skb->len, window);

1774 1775
	if (max_len <= needed)
		return max_len;
1776

E
Eric Dumazet 已提交
1777 1778 1779 1780 1781
	partial = needed % mss_now;
	/* If last segment is not a full MSS, check if Nagle rules allow us
	 * to include this last segment in this skb.
	 * Otherwise, we'll split the skb at last MSS boundary
	 */
1782
	if (tcp_nagle_check(partial != 0, tp, nonagle))
E
Eric Dumazet 已提交
1783 1784 1785
		return needed - partial;

	return needed;
1786 1787 1788 1789 1790
}

/* Can at least one segment of SKB be sent right now, according to the
 * congestion window rules?  If so, return how many segments are allowed.
 */
1791 1792
static inline unsigned int tcp_cwnd_test(const struct tcp_sock *tp,
					 const struct sk_buff *skb)
1793
{
E
Eric Dumazet 已提交
1794
	u32 in_flight, cwnd, halfcwnd;
1795 1796

	/* Don't be strict about the congestion window for the final FIN.  */
E
Eric Dumazet 已提交
1797 1798
	if ((TCP_SKB_CB(skb)->tcp_flags & TCPHDR_FIN) &&
	    tcp_skb_pcount(skb) == 1)
1799 1800 1801 1802
		return 1;

	in_flight = tcp_packets_in_flight(tp);
	cwnd = tp->snd_cwnd;
E
Eric Dumazet 已提交
1803 1804
	if (in_flight >= cwnd)
		return 0;
1805

E
Eric Dumazet 已提交
1806 1807 1808 1809 1810
	/* For better scheduling, ensure we have at least
	 * 2 GSO packets in flight.
	 */
	halfcwnd = max(cwnd >> 1, 1U);
	return min(halfcwnd, cwnd - in_flight);
1811 1812
}

1813
/* Initialize TSO state of a skb.
1814
 * This must be invoked the first time we consider transmitting
1815 1816
 * SKB onto the wire.
 */
1817
static int tcp_init_tso_segs(struct sk_buff *skb, unsigned int mss_now)
1818 1819 1820
{
	int tso_segs = tcp_skb_pcount(skb);

1821
	if (!tso_segs || (tso_segs > 1 && tcp_skb_mss(skb) != mss_now)) {
1822
		tcp_set_skb_tso_segs(skb, mss_now);
1823 1824 1825 1826 1827 1828
		tso_segs = tcp_skb_pcount(skb);
	}
	return tso_segs;
}


E
Eric Dumazet 已提交
1829
/* Return true if the Nagle test allows this packet to be
1830 1831
 * sent now.
 */
E
Eric Dumazet 已提交
1832 1833
static inline bool tcp_nagle_test(const struct tcp_sock *tp, const struct sk_buff *skb,
				  unsigned int cur_mss, int nonagle)
1834 1835 1836 1837 1838 1839 1840 1841
{
	/* Nagle rule does not apply to frames, which sit in the middle of the
	 * write_queue (they have no chances to get new data).
	 *
	 * This is implemented in the callers, where they modify the 'nonagle'
	 * argument based upon the location of SKB in the send queue.
	 */
	if (nonagle & TCP_NAGLE_PUSH)
E
Eric Dumazet 已提交
1842
		return true;
1843

Y
Yuchung Cheng 已提交
1844 1845
	/* Don't use the nagle rule for urgent data (or for the final FIN). */
	if (tcp_urg_mode(tp) || (TCP_SKB_CB(skb)->tcp_flags & TCPHDR_FIN))
E
Eric Dumazet 已提交
1846
		return true;
1847

1848
	if (!tcp_nagle_check(skb->len < cur_mss, tp, nonagle))
E
Eric Dumazet 已提交
1849
		return true;
1850

E
Eric Dumazet 已提交
1851
	return false;
1852 1853 1854
}

/* Does at least the first segment of SKB fit into the send window? */
E
Eric Dumazet 已提交
1855 1856 1857
static bool tcp_snd_wnd_test(const struct tcp_sock *tp,
			     const struct sk_buff *skb,
			     unsigned int cur_mss)
1858 1859 1860 1861 1862 1863
{
	u32 end_seq = TCP_SKB_CB(skb)->end_seq;

	if (skb->len > cur_mss)
		end_seq = TCP_SKB_CB(skb)->seq + cur_mss;

1864
	return !after(end_seq, tcp_wnd_end(tp));
1865 1866 1867 1868 1869 1870 1871 1872 1873
}

/* Trim TSO SKB to LEN bytes, put the remaining data into a new packet
 * which is put after SKB on the list.  It is very much like
 * tcp_fragment() except that it may make several kinds of assumptions
 * in order to speed up the splitting operation.  In particular, we
 * know that all the data is in scatter-gather pages, and that the
 * packet has never been sent out before (and thus is not cloned).
 */
1874
static int tso_fragment(struct sock *sk, struct sk_buff *skb, unsigned int len,
1875
			unsigned int mss_now, gfp_t gfp)
1876 1877
{
	int nlen = skb->len - len;
1878
	struct sk_buff *buff;
1879
	u8 flags;
1880 1881

	/* All of a TSO frame must be composed of paged data.  */
1882
	if (skb->len != skb->data_len)
1883 1884
		return tcp_fragment(sk, TCP_FRAG_IN_WRITE_QUEUE,
				    skb, len, mss_now, gfp);
1885

1886
	buff = sk_stream_alloc_skb(sk, 0, gfp, true);
1887
	if (unlikely(!buff))
1888
		return -ENOMEM;
1889
	skb_copy_decrypted(buff, skb);
1890

1891 1892
	sk->sk_wmem_queued += buff->truesize;
	sk_mem_charge(sk, buff->truesize);
1893
	buff->truesize += nlen;
1894 1895 1896 1897 1898 1899 1900 1901
	skb->truesize -= nlen;

	/* Correct the sequence numbers. */
	TCP_SKB_CB(buff)->seq = TCP_SKB_CB(skb)->seq + len;
	TCP_SKB_CB(buff)->end_seq = TCP_SKB_CB(skb)->end_seq;
	TCP_SKB_CB(skb)->end_seq = TCP_SKB_CB(buff)->seq;

	/* PSH and FIN should only be set in the second packet. */
E
Eric Dumazet 已提交
1902 1903 1904
	flags = TCP_SKB_CB(skb)->tcp_flags;
	TCP_SKB_CB(skb)->tcp_flags = flags & ~(TCPHDR_FIN | TCPHDR_PSH);
	TCP_SKB_CB(buff)->tcp_flags = flags;
1905 1906 1907 1908

	/* This packet was never sent out yet, so no SACK bits. */
	TCP_SKB_CB(buff)->sacked = 0;

1909 1910
	tcp_skb_fragment_eor(skb, buff);

1911
	buff->ip_summed = CHECKSUM_PARTIAL;
1912
	skb_split(skb, buff, len);
1913
	tcp_fragment_tstamp(skb, buff);
1914 1915

	/* Fix up tso_factor for both original and new SKB.  */
1916 1917
	tcp_set_skb_tso_segs(skb, mss_now);
	tcp_set_skb_tso_segs(buff, mss_now);
1918 1919

	/* Link BUFF into the send queue. */
1920
	__skb_header_release(buff);
1921
	tcp_insert_write_queue_after(skb, buff, sk, TCP_FRAG_IN_WRITE_QUEUE);
1922 1923 1924 1925 1926 1927 1928 1929 1930

	return 0;
}

/* Try to defer sending, if possible, in order to minimize the amount
 * of TSO splitting we do.  View it as a kind of TSO Nagle test.
 *
 * This algorithm is from John Heffner.
 */
1931
static bool tcp_tso_should_defer(struct sock *sk, struct sk_buff *skb,
1932 1933 1934
				 bool *is_cwnd_limited,
				 bool *is_rwnd_limited,
				 u32 max_segs)
1935
{
1936
	const struct inet_connection_sock *icsk = inet_csk(sk);
1937
	u32 send_win, cong_win, limit, in_flight;
1938 1939
	struct tcp_sock *tp = tcp_sk(sk);
	struct sk_buff *head;
1940
	int win_divisor;
1941
	s64 delta;
1942

1943
	if (icsk->icsk_ca_state >= TCP_CA_Recovery)
J
John Heffner 已提交
1944 1945
		goto send_now;

E
Eric Dumazet 已提交
1946
	/* Avoid bursty behavior by allowing defer
1947 1948 1949
	 * only if the last write was recent (1 ms).
	 * Note that tp->tcp_wstamp_ns can be in the future if we have
	 * packets waiting in a qdisc or device for EDT delivery.
E
Eric Dumazet 已提交
1950
	 */
1951 1952
	delta = tp->tcp_clock_cache - tp->tcp_wstamp_ns - NSEC_PER_MSEC;
	if (delta > 0)
J
John Heffner 已提交
1953
		goto send_now;
1954

1955 1956
	in_flight = tcp_packets_in_flight(tp);

1957 1958
	BUG_ON(tcp_skb_pcount(skb) <= 1);
	BUG_ON(tp->snd_cwnd <= in_flight);
1959

1960
	send_win = tcp_wnd_end(tp) - TCP_SKB_CB(skb)->seq;
1961 1962 1963 1964 1965 1966

	/* From in_flight test above, we know that cwnd > in_flight.  */
	cong_win = (tp->snd_cwnd - in_flight) * tp->mss_cache;

	limit = min(send_win, cong_win);

1967
	/* If a full-sized TSO skb can be sent, do it. */
E
Eric Dumazet 已提交
1968
	if (limit >= max_segs * tp->mss_cache)
J
John Heffner 已提交
1969
		goto send_now;
1970

1971 1972 1973 1974
	/* Middle in queue won't get any more data, full sendable already? */
	if ((skb != tcp_write_queue_tail(sk)) && (limit >= skb->len))
		goto send_now;

1975
	win_divisor = READ_ONCE(sock_net(sk)->ipv4.sysctl_tcp_tso_win_divisor);
1976
	if (win_divisor) {
1977 1978 1979 1980 1981
		u32 chunk = min(tp->snd_wnd, tp->snd_cwnd * tp->mss_cache);

		/* If at least some fraction of a window is available,
		 * just use it.
		 */
1982
		chunk /= win_divisor;
1983
		if (limit >= chunk)
J
John Heffner 已提交
1984
			goto send_now;
1985 1986 1987 1988 1989 1990
	} else {
		/* Different approach, try not to defer past a single
		 * ACK.  Receiver should ACK every other full sized
		 * frame, so if we have space for more than 3 frames
		 * then send now.
		 */
1991
		if (limit > tcp_max_tso_deferred_mss(tp) * tp->mss_cache)
J
John Heffner 已提交
1992
			goto send_now;
1993 1994
	}

1995 1996 1997 1998
	/* TODO : use tsorted_sent_queue ? */
	head = tcp_rtx_queue_head(sk);
	if (!head)
		goto send_now;
1999
	delta = tp->tcp_clock_cache - head->tstamp;
2000
	/* If next ACK is likely to come too late (half srtt), do not defer */
2001
	if ((s64)(delta - (u64)NSEC_PER_USEC * (tp->srtt_us >> 4)) < 0)
2002 2003
		goto send_now;

2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020
	/* Ok, it looks like it is advisable to defer.
	 * Three cases are tracked :
	 * 1) We are cwnd-limited
	 * 2) We are rwnd-limited
	 * 3) We are application limited.
	 */
	if (cong_win < send_win) {
		if (cong_win <= skb->len) {
			*is_cwnd_limited = true;
			return true;
		}
	} else {
		if (send_win <= skb->len) {
			*is_rwnd_limited = true;
			return true;
		}
	}
J
John Heffner 已提交
2021

2022
	/* If this packet won't get more data, do not wait. */
2023 2024
	if ((TCP_SKB_CB(skb)->tcp_flags & TCPHDR_FIN) ||
	    TCP_SKB_CB(skb)->eor)
2025
		goto send_now;
2026

E
Eric Dumazet 已提交
2027
	return true;
J
John Heffner 已提交
2028 2029

send_now:
E
Eric Dumazet 已提交
2030
	return false;
2031 2032
}

2033 2034 2035 2036 2037 2038 2039 2040 2041
static inline void tcp_mtu_check_reprobe(struct sock *sk)
{
	struct inet_connection_sock *icsk = inet_csk(sk);
	struct tcp_sock *tp = tcp_sk(sk);
	struct net *net = sock_net(sk);
	u32 interval;
	s32 delta;

	interval = net->ipv4.sysctl_tcp_probe_interval;
2042
	delta = tcp_jiffies32 - icsk->icsk_mtup.probe_timestamp;
2043 2044 2045 2046 2047 2048 2049 2050 2051 2052 2053
	if (unlikely(delta >= interval * HZ)) {
		int mss = tcp_current_mss(sk);

		/* Update current search range */
		icsk->icsk_mtup.probe_size = 0;
		icsk->icsk_mtup.search_high = tp->rx_opt.mss_clamp +
			sizeof(struct tcphdr) +
			icsk->icsk_af_ops->net_header_len;
		icsk->icsk_mtup.search_low = tcp_mss_to_mtu(sk, mss);

		/* Update probe time stamp */
2054
		icsk->icsk_mtup.probe_timestamp = tcp_jiffies32;
2055 2056 2057
	}
}

2058 2059 2060 2061 2062 2063 2064 2065 2066
static bool tcp_can_coalesce_send_queue_head(struct sock *sk, int len)
{
	struct sk_buff *skb, *next;

	skb = tcp_send_head(sk);
	tcp_for_write_queue_from_safe(skb, next, sk) {
		if (len <= skb->len)
			break;

2067
		if (unlikely(TCP_SKB_CB(skb)->eor) || tcp_has_tx_tstamp(skb))
2068 2069 2070 2071 2072 2073 2074 2075
			return false;

		len -= skb->len;
	}

	return true;
}

J
John Heffner 已提交
2076
/* Create a new MTU probe if we are ready.
2077 2078 2079 2080
 * MTU probe is regularly attempting to increase the path MTU by
 * deliberately sending larger packets.  This discovers routing
 * changes resulting in larger path MTUs.
 *
J
John Heffner 已提交
2081 2082
 * Returns 0 if we should wait to probe (no cwnd available),
 *         1 if a probe was sent,
2083 2084
 *         -1 otherwise
 */
J
John Heffner 已提交
2085 2086 2087
static int tcp_mtu_probe(struct sock *sk)
{
	struct inet_connection_sock *icsk = inet_csk(sk);
2088
	struct tcp_sock *tp = tcp_sk(sk);
J
John Heffner 已提交
2089
	struct sk_buff *skb, *nskb, *next;
2090
	struct net *net = sock_net(sk);
J
John Heffner 已提交
2091
	int probe_size;
2092
	int size_needed;
2093
	int copy, len;
J
John Heffner 已提交
2094
	int mss_now;
2095
	int interval;
J
John Heffner 已提交
2096 2097 2098 2099

	/* Not currently probing/verifying,
	 * not in recovery,
	 * have enough cwnd, and
2100 2101 2102 2103 2104 2105 2106
	 * not SACKing (the variable headers throw things off)
	 */
	if (likely(!icsk->icsk_mtup.enabled ||
		   icsk->icsk_mtup.probe_size ||
		   inet_csk(sk)->icsk_ca_state != TCP_CA_Open ||
		   tp->snd_cwnd < 11 ||
		   tp->rx_opt.num_sacks || tp->rx_opt.dsack))
J
John Heffner 已提交
2107 2108
		return -1;

2109 2110 2111 2112
	/* Use binary search for probe_size between tcp_mss_base,
	 * and current mss_clamp. if (search_high - search_low)
	 * smaller than a threshold, backoff from probing.
	 */
I
Ilpo Järvinen 已提交
2113
	mss_now = tcp_current_mss(sk);
2114 2115
	probe_size = tcp_mtu_to_mss(sk, (icsk->icsk_mtup.search_high +
				    icsk->icsk_mtup.search_low) >> 1);
2116
	size_needed = probe_size + (tp->reordering + 1) * tp->mss_cache;
2117
	interval = icsk->icsk_mtup.search_high - icsk->icsk_mtup.search_low;
2118 2119 2120 2121
	/* When misfortune happens, we are reprobing actively,
	 * and then reprobe timer has expired. We stick with current
	 * probing process by not resetting search range to its orignal.
	 */
2122
	if (probe_size > tcp_mtu_to_mss(sk, icsk->icsk_mtup.search_high) ||
2123 2124 2125 2126 2127
		interval < net->ipv4.sysctl_tcp_probe_threshold) {
		/* Check whether enough time has elaplased for
		 * another round of probing.
		 */
		tcp_mtu_check_reprobe(sk);
J
John Heffner 已提交
2128 2129 2130 2131
		return -1;
	}

	/* Have enough data in the send queue to probe? */
2132
	if (tp->write_seq - tp->snd_nxt < size_needed)
J
John Heffner 已提交
2133 2134
		return -1;

2135 2136
	if (tp->snd_wnd < size_needed)
		return -1;
2137
	if (after(tp->snd_nxt + size_needed, tcp_wnd_end(tp)))
2138
		return 0;
J
John Heffner 已提交
2139

2140 2141 2142
	/* Do we need to wait to drain cwnd? With none in flight, don't stall */
	if (tcp_packets_in_flight(tp) + 2 > tp->snd_cwnd) {
		if (!tcp_packets_in_flight(tp))
J
John Heffner 已提交
2143 2144 2145 2146 2147
			return -1;
		else
			return 0;
	}

2148 2149 2150
	if (!tcp_can_coalesce_send_queue_head(sk, probe_size))
		return -1;

J
John Heffner 已提交
2151
	/* We're allowed to probe.  Build it now. */
2152
	nskb = sk_stream_alloc_skb(sk, probe_size, GFP_ATOMIC, false);
2153
	if (!nskb)
J
John Heffner 已提交
2154
		return -1;
2155 2156
	sk->sk_wmem_queued += nskb->truesize;
	sk_mem_charge(sk, nskb->truesize);
J
John Heffner 已提交
2157

2158
	skb = tcp_send_head(sk);
2159
	skb_copy_decrypted(nskb, skb);
J
John Heffner 已提交
2160 2161 2162

	TCP_SKB_CB(nskb)->seq = TCP_SKB_CB(skb)->seq;
	TCP_SKB_CB(nskb)->end_seq = TCP_SKB_CB(skb)->seq + probe_size;
E
Eric Dumazet 已提交
2163
	TCP_SKB_CB(nskb)->tcp_flags = TCPHDR_ACK;
J
John Heffner 已提交
2164 2165
	TCP_SKB_CB(nskb)->sacked = 0;
	nskb->csum = 0;
2166
	nskb->ip_summed = CHECKSUM_PARTIAL;
J
John Heffner 已提交
2167

2168
	tcp_insert_write_queue_before(nskb, skb, sk);
2169
	tcp_highest_sack_replace(sk, skb, nskb);
2170

J
John Heffner 已提交
2171
	len = 0;
2172
	tcp_for_write_queue_from_safe(skb, next, sk) {
J
John Heffner 已提交
2173
		copy = min_t(int, skb->len, probe_size - len);
2174
		skb_copy_bits(skb, 0, skb_put(nskb, copy), copy);
J
John Heffner 已提交
2175 2176 2177 2178

		if (skb->len <= copy) {
			/* We've eaten all the data from this skb.
			 * Throw it away. */
E
Eric Dumazet 已提交
2179
			TCP_SKB_CB(nskb)->tcp_flags |= TCP_SKB_CB(skb)->tcp_flags;
2180 2181 2182 2183
			/* If this is the last SKB we copy and eor is set
			 * we need to propagate it to the new skb.
			 */
			TCP_SKB_CB(nskb)->eor = TCP_SKB_CB(skb)->eor;
2184
			tcp_skb_collapse_tstamp(nskb, skb);
2185
			tcp_unlink_write_queue(skb, sk);
2186
			sk_wmem_free_skb(sk, skb);
J
John Heffner 已提交
2187
		} else {
E
Eric Dumazet 已提交
2188
			TCP_SKB_CB(nskb)->tcp_flags |= TCP_SKB_CB(skb)->tcp_flags &
C
Changli Gao 已提交
2189
						   ~(TCPHDR_FIN|TCPHDR_PSH);
J
John Heffner 已提交
2190 2191 2192 2193
			if (!skb_shinfo(skb)->nr_frags) {
				skb_pull(skb, copy);
			} else {
				__pskb_trim_head(skb, copy);
2194
				tcp_set_skb_tso_segs(skb, mss_now);
J
John Heffner 已提交
2195 2196 2197 2198 2199
			}
			TCP_SKB_CB(skb)->seq += copy;
		}

		len += copy;
2200 2201 2202

		if (len >= probe_size)
			break;
J
John Heffner 已提交
2203
	}
2204
	tcp_init_tso_segs(nskb, nskb->len);
J
John Heffner 已提交
2205 2206

	/* We're ready to send.  If this fails, the probe will
E
Eric Dumazet 已提交
2207 2208
	 * be resegmented into mss-sized pieces by tcp_write_xmit().
	 */
J
John Heffner 已提交
2209 2210
	if (!tcp_transmit_skb(sk, nskb, 1, GFP_ATOMIC)) {
		/* Decrement cwnd here because we are sending
2211
		 * effectively two packets. */
J
John Heffner 已提交
2212
		tp->snd_cwnd--;
2213
		tcp_event_new_data_sent(sk, nskb);
J
John Heffner 已提交
2214 2215

		icsk->icsk_mtup.probe_size = tcp_mss_to_mtu(sk, nskb->len);
2216 2217
		tp->mtu_probe.probe_seq_start = TCP_SKB_CB(nskb)->seq;
		tp->mtu_probe.probe_seq_end = TCP_SKB_CB(nskb)->end_seq;
J
John Heffner 已提交
2218 2219 2220 2221 2222 2223 2224

		return 1;
	}

	return -1;
}

E
Eric Dumazet 已提交
2225
static bool tcp_pacing_check(struct sock *sk)
2226
{
E
Eric Dumazet 已提交
2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241
	struct tcp_sock *tp = tcp_sk(sk);

	if (!tcp_needs_internal_pacing(sk))
		return false;

	if (tp->tcp_wstamp_ns <= tp->tcp_clock_cache)
		return false;

	if (!hrtimer_is_queued(&tp->pacing_timer)) {
		hrtimer_start(&tp->pacing_timer,
			      ns_to_ktime(tp->tcp_wstamp_ns),
			      HRTIMER_MODE_ABS_PINNED_SOFT);
		sock_hold(sk);
	}
	return true;
2242 2243
}

2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257
/* TCP Small Queues :
 * Control number of packets in qdisc/devices to two packets / or ~1 ms.
 * (These limits are doubled for retransmits)
 * This allows for :
 *  - better RTT estimation and ACK scheduling
 *  - faster recovery
 *  - high rates
 * Alas, some drivers / subsystems require a fair amount
 * of queued bytes to ensure line rate.
 * One example is wifi aggregation (802.11 AMPDU)
 */
static bool tcp_small_queue_check(struct sock *sk, const struct sk_buff *skb,
				  unsigned int factor)
{
2258
	unsigned long limit;
2259

2260 2261 2262
	limit = max_t(unsigned long,
		      2 * skb->truesize,
		      sk->sk_pacing_rate >> sk->sk_pacing_shift);
2263 2264 2265
	if (sk->sk_pacing_status == SK_PACING_NONE)
		limit = min_t(unsigned long, limit,
			      sock_net(sk)->ipv4.sysctl_tcp_limit_output_bytes);
2266 2267
	limit <<= factor;

2268 2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279
	if (static_branch_unlikely(&tcp_tx_delay_enabled) &&
	    tcp_sk(sk)->tcp_tx_delay) {
		u64 extra_bytes = (u64)sk->sk_pacing_rate * tcp_sk(sk)->tcp_tx_delay;

		/* TSQ is based on skb truesize sum (sk_wmem_alloc), so we
		 * approximate our needs assuming an ~100% skb->truesize overhead.
		 * USEC_PER_SEC is approximated by 2^20.
		 * do_div(extra_bytes, USEC_PER_SEC/2) is replaced by a right shift.
		 */
		extra_bytes >>= (20 - 1);
		limit += extra_bytes;
	}
2280
	if (refcount_read(&sk->sk_wmem_alloc) > limit) {
2281
		/* Always send skb if rtx queue is empty.
2282 2283 2284 2285
		 * No need to wait for TX completion to call us back,
		 * after softirq/tasklet schedule.
		 * This helps when TX completions are delayed too much.
		 */
2286
		if (tcp_rtx_queue_empty(sk))
2287 2288
			return false;

2289
		set_bit(TSQ_THROTTLED, &sk->sk_tsq_flags);
2290 2291 2292 2293 2294
		/* It is possible TX completion already happened
		 * before we set TSQ_THROTTLED, so we must
		 * test again the condition.
		 */
		smp_mb__after_atomic();
2295
		if (refcount_read(&sk->sk_wmem_alloc) > limit)
2296 2297 2298 2299 2300
			return true;
	}
	return false;
}

2301 2302
static void tcp_chrono_set(struct tcp_sock *tp, const enum tcp_chrono new)
{
2303
	const u32 now = tcp_jiffies32;
2304
	enum tcp_chrono old = tp->chrono_type;
2305

2306 2307
	if (old > TCP_CHRONO_UNSPEC)
		tp->chrono_stat[old - 1] += now - tp->chrono_start;
2308 2309 2310 2311 2312 2313 2314 2315 2316
	tp->chrono_start = now;
	tp->chrono_type = new;
}

void tcp_chrono_start(struct sock *sk, const enum tcp_chrono type)
{
	struct tcp_sock *tp = tcp_sk(sk);

	/* If there are multiple conditions worthy of tracking in a
2317 2318
	 * chronograph then the highest priority enum takes precedence
	 * over the other conditions. So that if something "more interesting"
2319 2320 2321 2322 2323 2324 2325 2326 2327 2328
	 * starts happening, stop the previous chrono and start a new one.
	 */
	if (type > tp->chrono_type)
		tcp_chrono_set(tp, type);
}

void tcp_chrono_stop(struct sock *sk, const enum tcp_chrono type)
{
	struct tcp_sock *tp = tcp_sk(sk);

2329 2330 2331 2332 2333 2334 2335 2336

	/* There are multiple conditions worthy of tracking in a
	 * chronograph, so that the highest priority enum takes
	 * precedence over the other conditions (see tcp_chrono_start).
	 * If a condition stops, we only stop chrono tracking if
	 * it's the "most interesting" or current chrono we are
	 * tracking and starts busy chrono if we have pending data.
	 */
2337
	if (tcp_rtx_and_write_queues_empty(sk))
2338 2339 2340
		tcp_chrono_set(tp, TCP_CHRONO_UNSPEC);
	else if (type == tp->chrono_type)
		tcp_chrono_set(tp, TCP_CHRONO_BUSY);
2341 2342
}

L
Linus Torvalds 已提交
2343 2344 2345 2346
/* This routine writes packets to the network.  It advances the
 * send_head.  This happens as incoming acks open up the remote
 * window for us.
 *
2347 2348 2349 2350
 * LARGESEND note: !tcp_urg_mode is overkill, only frames between
 * snd_up-64k-mss .. snd_up cannot be large. However, taking into
 * account rare use of URG, this is not a big flaw.
 *
N
Nandita Dukkipati 已提交
2351 2352 2353
 * Send at most one packet when push_one > 0. Temporarily ignore
 * cwnd limit to force at most one packet out when push_one == 2.

E
Eric Dumazet 已提交
2354 2355
 * Returns true, if no segments are in flight and we have queued segments,
 * but cannot send anything now because of SWS or another problem.
L
Linus Torvalds 已提交
2356
 */
E
Eric Dumazet 已提交
2357 2358
static bool tcp_write_xmit(struct sock *sk, unsigned int mss_now, int nonagle,
			   int push_one, gfp_t gfp)
L
Linus Torvalds 已提交
2359 2360
{
	struct tcp_sock *tp = tcp_sk(sk);
2361
	struct sk_buff *skb;
2362 2363
	unsigned int tso_segs, sent_pkts;
	int cwnd_quota;
J
John Heffner 已提交
2364
	int result;
2365
	bool is_cwnd_limited = false, is_rwnd_limited = false;
E
Eric Dumazet 已提交
2366
	u32 max_segs;
L
Linus Torvalds 已提交
2367

2368
	sent_pkts = 0;
J
John Heffner 已提交
2369

2370
	tcp_mstamp_refresh(tp);
2371 2372 2373 2374
	if (!push_one) {
		/* Do MTU probing. */
		result = tcp_mtu_probe(sk);
		if (!result) {
E
Eric Dumazet 已提交
2375
			return false;
2376 2377 2378
		} else if (result > 0) {
			sent_pkts = 1;
		}
J
John Heffner 已提交
2379 2380
	}

2381
	max_segs = tcp_tso_segs(sk, mss_now);
2382
	while ((skb = tcp_send_head(sk))) {
2383 2384
		unsigned int limit;

2385 2386 2387 2388
		if (unlikely(tp->repair) && tp->repair_queue == TCP_SEND_QUEUE) {
			/* "skb_mstamp_ns" is used as a start point for the retransmit timer */
			skb->skb_mstamp_ns = tp->tcp_wstamp_ns = tp->tcp_clock_cache;
			list_move_tail(&skb->tcp_tsorted_anchor, &tp->tsorted_sent_queue);
2389
			tcp_init_tso_segs(skb, mss_now);
2390 2391 2392
			goto repair; /* Skip network transmission */
		}

2393 2394 2395
		if (tcp_pacing_check(sk))
			break;

2396
		tso_segs = tcp_init_tso_segs(skb, mss_now);
2397
		BUG_ON(!tso_segs);
2398

2399
		cwnd_quota = tcp_cwnd_test(tp, skb);
N
Nandita Dukkipati 已提交
2400 2401 2402 2403 2404 2405 2406
		if (!cwnd_quota) {
			if (push_one == 2)
				/* Force out a loss probe pkt. */
				cwnd_quota = 1;
			else
				break;
		}
2407

2408 2409
		if (unlikely(!tcp_snd_wnd_test(tp, skb, mss_now))) {
			is_rwnd_limited = true;
2410
			break;
2411
		}
2412

2413
		if (tso_segs == 1) {
2414 2415 2416 2417 2418
			if (unlikely(!tcp_nagle_test(tp, skb, mss_now,
						     (tcp_skb_is_last(sk, skb) ?
						      nonagle : TCP_NAGLE_PUSH))))
				break;
		} else {
2419
			if (!push_one &&
E
Eric Dumazet 已提交
2420
			    tcp_tso_should_defer(sk, skb, &is_cwnd_limited,
2421
						 &is_rwnd_limited, max_segs))
2422 2423
				break;
		}
2424

E
Eric Dumazet 已提交
2425
		limit = mss_now;
2426
		if (tso_segs > 1 && !tcp_urg_mode(tp))
E
Eric Dumazet 已提交
2427 2428 2429 2430 2431 2432 2433
			limit = tcp_mss_split_point(sk, skb, mss_now,
						    min_t(unsigned int,
							  cwnd_quota,
							  max_segs),
						    nonagle);

		if (skb->len > limit &&
2434
		    unlikely(tso_fragment(sk, skb, limit, mss_now, gfp)))
E
Eric Dumazet 已提交
2435 2436
			break;

2437 2438
		if (tcp_small_queue_check(sk, skb, 0))
			break;
E
Eric Dumazet 已提交
2439

2440
		if (unlikely(tcp_transmit_skb(sk, skb, 1, gfp)))
2441
			break;
L
Linus Torvalds 已提交
2442

2443
repair:
2444 2445 2446
		/* Advance the send_head.  This one is sent out.
		 * This call will increment packets_out.
		 */
2447
		tcp_event_new_data_sent(sk, skb);
L
Linus Torvalds 已提交
2448

2449
		tcp_minshall_update(tp, mss_now, skb);
2450
		sent_pkts += tcp_skb_pcount(skb);
2451 2452 2453

		if (push_one)
			break;
2454
	}
L
Linus Torvalds 已提交
2455

2456 2457 2458 2459 2460
	if (is_rwnd_limited)
		tcp_chrono_start(sk, TCP_CHRONO_RWND_LIMITED);
	else
		tcp_chrono_stop(sk, TCP_CHRONO_RWND_LIMITED);

2461
	if (likely(sent_pkts)) {
2462 2463
		if (tcp_in_cwnd_reduction(sk))
			tp->prr_out += sent_pkts;
N
Nandita Dukkipati 已提交
2464 2465 2466

		/* Send one loss probe per tail loss episode. */
		if (push_one != 2)
2467
			tcp_schedule_loss_probe(sk, false);
2468
		is_cwnd_limited |= (tcp_packets_in_flight(tp) >= tp->snd_cwnd);
2469
		tcp_cwnd_validate(sk, is_cwnd_limited);
E
Eric Dumazet 已提交
2470
		return false;
L
Linus Torvalds 已提交
2471
	}
2472
	return !tp->packets_out && !tcp_write_queue_empty(sk);
N
Nandita Dukkipati 已提交
2473 2474
}

2475
bool tcp_schedule_loss_probe(struct sock *sk, bool advancing_rto)
N
Nandita Dukkipati 已提交
2476 2477 2478
{
	struct inet_connection_sock *icsk = inet_csk(sk);
	struct tcp_sock *tp = tcp_sk(sk);
2479
	u32 timeout, rto_delta_us;
2480
	int early_retrans;
N
Nandita Dukkipati 已提交
2481 2482 2483 2484

	/* Don't do any loss probe on a Fast Open connection before 3WHS
	 * finishes.
	 */
2485
	if (rcu_access_pointer(tp->fastopen_rsk))
N
Nandita Dukkipati 已提交
2486 2487
		return false;

2488
	early_retrans = sock_net(sk)->ipv4.sysctl_tcp_early_retrans;
N
Nandita Dukkipati 已提交
2489
	/* Schedule a loss probe in 2*RTT for SACK capable connections
N
Neal Cardwell 已提交
2490
	 * not in loss recovery, that are either limited by cwnd or application.
N
Nandita Dukkipati 已提交
2491
	 */
2492
	if ((early_retrans != 3 && early_retrans != 4) ||
Y
Yuchung Cheng 已提交
2493
	    !tp->packets_out || !tcp_is_sack(tp) ||
N
Neal Cardwell 已提交
2494 2495
	    (icsk->icsk_ca_state != TCP_CA_Open &&
	     icsk->icsk_ca_state != TCP_CA_CWR))
N
Nandita Dukkipati 已提交
2496 2497
		return false;

2498
	/* Probe timeout is 2*rtt. Add minimum RTO to account
2499 2500
	 * for delayed ack when there's one outstanding packet. If no RTT
	 * sample is available then probe after TCP_TIMEOUT_INIT.
N
Nandita Dukkipati 已提交
2501
	 */
2502 2503 2504 2505 2506 2507 2508 2509 2510
	if (tp->srtt_us) {
		timeout = usecs_to_jiffies(tp->srtt_us >> 2);
		if (tp->packets_out == 1)
			timeout += TCP_RTO_MIN;
		else
			timeout += TCP_TIMEOUT_MIN;
	} else {
		timeout = TCP_TIMEOUT_INIT;
	}
N
Nandita Dukkipati 已提交
2511

2512
	/* If the RTO formula yields an earlier time, then use that time. */
2513 2514 2515
	rto_delta_us = advancing_rto ?
			jiffies_to_usecs(inet_csk(sk)->icsk_rto) :
			tcp_rto_delta_us(sk);  /* How far in future is RTO? */
2516 2517
	if (rto_delta_us > 0)
		timeout = min_t(u32, timeout, usecs_to_jiffies(rto_delta_us));
N
Nandita Dukkipati 已提交
2518

2519 2520
	tcp_reset_xmit_timer(sk, ICSK_TIME_LOSS_PROBE, timeout,
			     TCP_RTO_MAX, NULL);
N
Nandita Dukkipati 已提交
2521 2522 2523
	return true;
}

2524 2525 2526 2527 2528 2529 2530
/* Thanks to skb fast clones, we can detect if a prior transmit of
 * a packet is still in a qdisc or driver queue.
 * In this case, there is very little point doing a retransmit !
 */
static bool skb_still_in_host_queue(const struct sock *sk,
				    const struct sk_buff *skb)
{
2531
	if (unlikely(skb_fclone_busy(sk, skb))) {
2532 2533
		NET_INC_STATS(sock_net(sk),
			      LINUX_MIB_TCPSPURIOUS_RTX_HOSTQUEUES);
2534 2535 2536 2537 2538
		return true;
	}
	return false;
}

2539
/* When probe timeout (PTO) fires, try send a new segment if possible, else
N
Nandita Dukkipati 已提交
2540 2541 2542 2543
 * retransmit the last segment.
 */
void tcp_send_loss_probe(struct sock *sk)
{
N
Nandita Dukkipati 已提交
2544
	struct tcp_sock *tp = tcp_sk(sk);
N
Nandita Dukkipati 已提交
2545 2546 2547 2548
	struct sk_buff *skb;
	int pcount;
	int mss = tcp_current_mss(sk);

2549
	skb = tcp_send_head(sk);
2550 2551 2552 2553 2554 2555
	if (skb && tcp_snd_wnd_test(tp, skb, mss)) {
		pcount = tp->packets_out;
		tcp_write_xmit(sk, mss, TCP_NAGLE_OFF, 2, GFP_ATOMIC);
		if (tp->packets_out > pcount)
			goto probe_sent;
		goto rearm_timer;
N
Nandita Dukkipati 已提交
2556
	}
2557
	skb = skb_rb_last(&sk->tcp_rtx_queue);
2558 2559 2560 2561 2562 2563 2564
	if (unlikely(!skb)) {
		WARN_ONCE(tp->packets_out,
			  "invalid inflight: %u state %u cwnd %u mss %d\n",
			  tp->packets_out, sk->sk_state, tp->snd_cwnd, mss);
		inet_csk(sk)->icsk_pending = 0;
		return;
	}
N
Nandita Dukkipati 已提交
2565

N
Nandita Dukkipati 已提交
2566 2567 2568 2569
	/* At most one outstanding TLP retransmission. */
	if (tp->tlp_high_seq)
		goto rearm_timer;

2570 2571 2572
	if (skb_still_in_host_queue(sk, skb))
		goto rearm_timer;

N
Nandita Dukkipati 已提交
2573 2574 2575 2576 2577
	pcount = tcp_skb_pcount(skb);
	if (WARN_ON(!pcount))
		goto rearm_timer;

	if ((pcount > 1) && (skb->len > (pcount - 1) * mss)) {
2578 2579
		if (unlikely(tcp_fragment(sk, TCP_FRAG_IN_RTX_QUEUE, skb,
					  (pcount - 1) * mss, mss,
2580
					  GFP_ATOMIC)))
N
Nandita Dukkipati 已提交
2581
			goto rearm_timer;
2582
		skb = skb_rb_next(skb);
N
Nandita Dukkipati 已提交
2583 2584 2585 2586 2587
	}

	if (WARN_ON(!skb || !tcp_skb_pcount(skb)))
		goto rearm_timer;

2588
	if (__tcp_retransmit_skb(sk, skb, 1))
2589
		goto rearm_timer;
N
Nandita Dukkipati 已提交
2590

N
Nandita Dukkipati 已提交
2591
	/* Record snd_nxt for loss detection. */
2592
	tp->tlp_high_seq = tp->snd_nxt;
N
Nandita Dukkipati 已提交
2593

2594
probe_sent:
2595
	NET_INC_STATS(sock_net(sk), LINUX_MIB_TCPLOSSPROBES);
2596 2597
	/* Reset s.t. tcp_rearm_rto will restart timer from now */
	inet_csk(sk)->icsk_pending = 0;
N
Nandita Dukkipati 已提交
2598
rearm_timer:
2599
	tcp_rearm_rto(sk);
L
Linus Torvalds 已提交
2600 2601
}

2602 2603 2604 2605
/* Push out any pending frames which were held back due to
 * TCP_CORK or attempt at coalescing tiny packets.
 * The socket must be locked by the caller.
 */
2606 2607
void __tcp_push_pending_frames(struct sock *sk, unsigned int cur_mss,
			       int nonagle)
2608
{
2609 2610 2611 2612 2613 2614 2615
	/* If we are closed, the bytes will have to remain here.
	 * In time closedown will finish, we empty the write queue and
	 * all will be happy.
	 */
	if (unlikely(sk->sk_state == TCP_CLOSE))
		return;

2616
	if (tcp_write_xmit(sk, cur_mss, nonagle, 0,
2617
			   sk_gfp_mask(sk, GFP_ATOMIC)))
2618
		tcp_check_probe_timer(sk);
2619 2620
}

2621 2622 2623 2624 2625
/* Send _single_ skb sitting at the send head. This function requires
 * true push pending frames to setup probe timer etc.
 */
void tcp_push_one(struct sock *sk, unsigned int mss_now)
{
2626
	struct sk_buff *skb = tcp_send_head(sk);
2627 2628 2629

	BUG_ON(!skb || skb->len < mss_now);

2630
	tcp_write_xmit(sk, mss_now, TCP_NAGLE_PUSH, 1, sk->sk_allocation);
2631 2632
}

L
Linus Torvalds 已提交
2633 2634
/* This function returns the amount that we can raise the
 * usable window based on the following constraints
2635
 *
L
Linus Torvalds 已提交
2636 2637 2638 2639 2640 2641 2642 2643 2644 2645 2646 2647 2648 2649 2650 2651 2652 2653
 * 1. The window can never be shrunk once it is offered (RFC 793)
 * 2. We limit memory per socket
 *
 * RFC 1122:
 * "the suggested [SWS] avoidance algorithm for the receiver is to keep
 *  RECV.NEXT + RCV.WIN fixed until:
 *  RCV.BUFF - RCV.USER - RCV.WINDOW >= min(1/2 RCV.BUFF, MSS)"
 *
 * i.e. don't raise the right edge of the window until you can raise
 * it at least MSS bytes.
 *
 * Unfortunately, the recommended algorithm breaks header prediction,
 * since header prediction assumes th->window stays fixed.
 *
 * Strictly speaking, keeping th->window fixed violates the receiver
 * side SWS prevention criteria. The problem is that under this rule
 * a stream of single byte packets will cause the right side of the
 * window to always advance by a single byte.
2654
 *
L
Linus Torvalds 已提交
2655 2656
 * Of course, if the sender implements sender side SWS prevention
 * then this will not be a problem.
2657
 *
L
Linus Torvalds 已提交
2658
 * BSD seems to make the following compromise:
2659
 *
L
Linus Torvalds 已提交
2660 2661 2662 2663 2664 2665 2666 2667 2668 2669 2670 2671 2672 2673 2674 2675 2676 2677 2678 2679 2680 2681 2682 2683 2684 2685 2686
 *	If the free space is less than the 1/4 of the maximum
 *	space available and the free space is less than 1/2 mss,
 *	then set the window to 0.
 *	[ Actually, bsd uses MSS and 1/4 of maximal _window_ ]
 *	Otherwise, just prevent the window from shrinking
 *	and from being larger than the largest representable value.
 *
 * This prevents incremental opening of the window in the regime
 * where TCP is limited by the speed of the reader side taking
 * data out of the TCP receive queue. It does nothing about
 * those cases where the window is constrained on the sender side
 * because the pipeline is full.
 *
 * BSD also seems to "accidentally" limit itself to windows that are a
 * multiple of MSS, at least until the free space gets quite small.
 * This would appear to be a side effect of the mbuf implementation.
 * Combining these two algorithms results in the observed behavior
 * of having a fixed window size at almost all times.
 *
 * Below we obtain similar behavior by forcing the offered window to
 * a multiple of the mss when it is feasible to do so.
 *
 * Note, we don't "adjust" for TIMESTAMP or SACK option bytes.
 * Regular options like TIMESTAMP are taken into account.
 */
u32 __tcp_select_window(struct sock *sk)
{
2687
	struct inet_connection_sock *icsk = inet_csk(sk);
L
Linus Torvalds 已提交
2688
	struct tcp_sock *tp = tcp_sk(sk);
S
Stephen Hemminger 已提交
2689
	/* MSS for the peer's data.  Previous versions used mss_clamp
L
Linus Torvalds 已提交
2690 2691 2692 2693 2694
	 * here.  I don't know if the value based on our guesses
	 * of peer's MSS is better for the performance.  It's more correct
	 * but may be worse for the performance because of rcv_mss
	 * fluctuations.  --SAW  1998/11/1
	 */
2695
	int mss = icsk->icsk_ack.rcv_mss;
L
Linus Torvalds 已提交
2696
	int free_space = tcp_space(sk);
2697 2698
	int allowed_space = tcp_full_space(sk);
	int full_space = min_t(int, tp->window_clamp, allowed_space);
L
Linus Torvalds 已提交
2699 2700
	int window;

2701
	if (unlikely(mss > full_space)) {
2702
		mss = full_space;
2703 2704 2705
		if (mss <= 0)
			return 0;
	}
2706
	if (free_space < (full_space >> 1)) {
2707
		icsk->icsk_ack.quick = 0;
L
Linus Torvalds 已提交
2708

2709
		if (tcp_under_memory_pressure(sk))
2710 2711
			tp->rcv_ssthresh = min(tp->rcv_ssthresh,
					       4U * tp->advmss);
L
Linus Torvalds 已提交
2712

2713 2714 2715 2716 2717 2718 2719 2720 2721 2722 2723 2724 2725
		/* free_space might become our new window, make sure we don't
		 * increase it due to wscale.
		 */
		free_space = round_down(free_space, 1 << tp->rx_opt.rcv_wscale);

		/* if free space is less than mss estimate, or is below 1/16th
		 * of the maximum allowed, try to move to zero-window, else
		 * tcp_clamp_window() will grow rcv buf up to tcp_rmem[2], and
		 * new incoming data is dropped due to memory limits.
		 * With large window, mss test triggers way too late in order
		 * to announce zero window in time before rmem limit kicks in.
		 */
		if (free_space < (allowed_space >> 4) || free_space < mss)
L
Linus Torvalds 已提交
2726 2727 2728 2729 2730 2731 2732 2733 2734 2735 2736 2737 2738 2739 2740 2741
			return 0;
	}

	if (free_space > tp->rcv_ssthresh)
		free_space = tp->rcv_ssthresh;

	/* Don't do rounding if we are using window scaling, since the
	 * scaled window will not line up with the MSS boundary anyway.
	 */
	if (tp->rx_opt.rcv_wscale) {
		window = free_space;

		/* Advertise enough space so that it won't get scaled away.
		 * Import case: prevent zero window announcement if
		 * 1<<rcv_wscale > mss.
		 */
2742
		window = ALIGN(window, (1 << tp->rx_opt.rcv_wscale));
L
Linus Torvalds 已提交
2743
	} else {
2744
		window = tp->rcv_wnd;
L
Linus Torvalds 已提交
2745 2746 2747 2748 2749 2750 2751 2752 2753
		/* Get the largest window that is a nice multiple of mss.
		 * Window clamp already applied above.
		 * If our current window offering is within 1 mss of the
		 * free space we just keep it. This prevents the divide
		 * and multiply from happening most of the time.
		 * We also don't do any window rounding when the free space
		 * is too small.
		 */
		if (window <= free_space - mss || window > free_space)
2754
			window = rounddown(free_space, mss);
2755
		else if (mss == full_space &&
2756
			 free_space > window + (full_space >> 1))
2757
			window = free_space;
L
Linus Torvalds 已提交
2758 2759 2760 2761 2762
	}

	return window;
}

2763 2764
void tcp_skb_collapse_tstamp(struct sk_buff *skb,
			     const struct sk_buff *next_skb)
2765
{
2766 2767 2768
	if (unlikely(tcp_has_tx_tstamp(next_skb))) {
		const struct skb_shared_info *next_shinfo =
			skb_shinfo(next_skb);
2769 2770
		struct skb_shared_info *shinfo = skb_shinfo(skb);

2771
		shinfo->tx_flags |= next_shinfo->tx_flags & SKBTX_ANY_TSTAMP;
2772
		shinfo->tskey = next_shinfo->tskey;
2773 2774
		TCP_SKB_CB(skb)->txstamp_ack |=
			TCP_SKB_CB(next_skb)->txstamp_ack;
2775 2776 2777
	}
}

2778
/* Collapses two adjacent SKB's during retransmission. */
2779
static bool tcp_collapse_retrans(struct sock *sk, struct sk_buff *skb)
L
Linus Torvalds 已提交
2780 2781
{
	struct tcp_sock *tp = tcp_sk(sk);
2782
	struct sk_buff *next_skb = skb_rb_next(skb);
2783
	int next_skb_size;
L
Linus Torvalds 已提交
2784

2785
	next_skb_size = next_skb->len;
L
Linus Torvalds 已提交
2786

2787
	BUG_ON(tcp_skb_pcount(skb) != 1 || tcp_skb_pcount(next_skb) != 1);
2788

2789 2790 2791 2792
	if (next_skb_size) {
		if (next_skb_size <= skb_availroom(skb))
			skb_copy_bits(next_skb, 0, skb_put(skb, next_skb_size),
				      next_skb_size);
2793
		else if (!tcp_skb_shift(skb, next_skb, 1, next_skb_size))
2794 2795
			return false;
	}
2796
	tcp_highest_sack_replace(sk, next_skb, skb);
L
Linus Torvalds 已提交
2797

2798 2799
	/* Update sequence range on original skb. */
	TCP_SKB_CB(skb)->end_seq = TCP_SKB_CB(next_skb)->end_seq;
L
Linus Torvalds 已提交
2800

2801
	/* Merge over control information. This moves PSH/FIN etc. over */
E
Eric Dumazet 已提交
2802
	TCP_SKB_CB(skb)->tcp_flags |= TCP_SKB_CB(next_skb)->tcp_flags;
2803 2804 2805 2806 2807

	/* All done, get rid of second SKB and account for it so
	 * packet counting does not break.
	 */
	TCP_SKB_CB(skb)->sacked |= TCP_SKB_CB(next_skb)->sacked & TCPCB_EVER_RETRANS;
2808
	TCP_SKB_CB(skb)->eor = TCP_SKB_CB(next_skb)->eor;
2809 2810

	/* changed transmit queue under us so clear hints */
2811 2812 2813
	tcp_clear_retrans_hints_partial(tp);
	if (next_skb == tp->retransmit_skb_hint)
		tp->retransmit_skb_hint = skb;
2814

2815 2816
	tcp_adjust_pcount(sk, next_skb, tcp_skb_pcount(next_skb));

2817 2818
	tcp_skb_collapse_tstamp(skb, next_skb);

2819
	tcp_rtx_queue_unlink_and_free(next_skb, sk);
2820
	return true;
L
Linus Torvalds 已提交
2821 2822
}

2823
/* Check if coalescing SKBs is legal. */
E
Eric Dumazet 已提交
2824
static bool tcp_can_collapse(const struct sock *sk, const struct sk_buff *skb)
2825 2826
{
	if (tcp_skb_pcount(skb) > 1)
E
Eric Dumazet 已提交
2827
		return false;
2828
	if (skb_cloned(skb))
E
Eric Dumazet 已提交
2829
		return false;
E
Eric Dumazet 已提交
2830
	/* Some heuristics for collapsing over SACK'd could be invented */
2831
	if (TCP_SKB_CB(skb)->sacked & TCPCB_SACKED_ACKED)
E
Eric Dumazet 已提交
2832
		return false;
2833

E
Eric Dumazet 已提交
2834
	return true;
2835 2836
}

2837 2838 2839
/* Collapse packets in the retransmit queue to make to create
 * less packets on the wire. This is only done on retransmission.
 */
2840 2841 2842 2843 2844
static void tcp_retrans_try_collapse(struct sock *sk, struct sk_buff *to,
				     int space)
{
	struct tcp_sock *tp = tcp_sk(sk);
	struct sk_buff *skb = to, *tmp;
E
Eric Dumazet 已提交
2845
	bool first = true;
2846

2847
	if (!sock_net(sk)->ipv4.sysctl_tcp_retrans_collapse)
2848
		return;
E
Eric Dumazet 已提交
2849
	if (TCP_SKB_CB(skb)->tcp_flags & TCPHDR_SYN)
2850 2851
		return;

2852
	skb_rbtree_walk_from_safe(skb, tmp) {
2853 2854 2855
		if (!tcp_can_collapse(sk, skb))
			break;

2856 2857 2858
		if (!tcp_skb_can_collapse_to(to))
			break;

2859 2860 2861
		space -= skb->len;

		if (first) {
E
Eric Dumazet 已提交
2862
			first = false;
2863 2864 2865 2866 2867 2868 2869 2870 2871
			continue;
		}

		if (space < 0)
			break;

		if (after(TCP_SKB_CB(skb)->end_seq, tcp_wnd_end(tp)))
			break;

2872 2873
		if (!tcp_collapse_retrans(sk, to))
			break;
2874 2875 2876
	}
}

L
Linus Torvalds 已提交
2877 2878 2879 2880
/* This retransmits one SKB.  Policy decisions and retransmit queue
 * state updates are done by the caller.  Returns non-zero if an
 * error occurred which prevented the send.
 */
2881
int __tcp_retransmit_skb(struct sock *sk, struct sk_buff *skb, int segs)
L
Linus Torvalds 已提交
2882
{
J
John Heffner 已提交
2883
	struct inet_connection_sock *icsk = inet_csk(sk);
2884
	struct tcp_sock *tp = tcp_sk(sk);
2885
	unsigned int cur_mss;
2886 2887
	int diff, len, err;

L
Linus Torvalds 已提交
2888

2889 2890
	/* Inconclusive MTU probe */
	if (icsk->icsk_mtup.probe_size)
J
John Heffner 已提交
2891 2892
		icsk->icsk_mtup.probe_size = 0;

L
Linus Torvalds 已提交
2893
	/* Do not sent more than we queued. 1/4 is reserved for possible
S
Stephen Hemminger 已提交
2894
	 * copying overhead: fragmentation, tunneling, mangling etc.
L
Linus Torvalds 已提交
2895
	 */
2896
	if (refcount_read(&sk->sk_wmem_alloc) >
2897 2898
	    min_t(u32, sk->sk_wmem_queued + (sk->sk_wmem_queued >> 2),
		  sk->sk_sndbuf))
L
Linus Torvalds 已提交
2899 2900
		return -EAGAIN;

2901 2902 2903
	if (skb_still_in_host_queue(sk, skb))
		return -EBUSY;

L
Linus Torvalds 已提交
2904
	if (before(TCP_SKB_CB(skb)->seq, tp->snd_una)) {
2905 2906 2907 2908
		if (unlikely(before(TCP_SKB_CB(skb)->end_seq, tp->snd_una))) {
			WARN_ON_ONCE(1);
			return -EINVAL;
		}
L
Linus Torvalds 已提交
2909 2910 2911 2912
		if (tcp_trim_head(sk, skb, tp->snd_una - TCP_SKB_CB(skb)->seq))
			return -ENOMEM;
	}

2913 2914 2915
	if (inet_csk(sk)->icsk_af_ops->rebuild_header(sk))
		return -EHOSTUNREACH; /* Routing failure or similar. */

I
Ilpo Järvinen 已提交
2916
	cur_mss = tcp_current_mss(sk);
2917

L
Linus Torvalds 已提交
2918 2919 2920 2921 2922
	/* If receiver has shrunk his window, and skb is out of
	 * new window, do not retransmit it. The exception is the
	 * case, when window is shrunk to zero. In this case
	 * our retransmit serves as a zero window probe.
	 */
2923 2924
	if (!before(TCP_SKB_CB(skb)->seq, tcp_wnd_end(tp)) &&
	    TCP_SKB_CB(skb)->seq != tp->snd_una)
L
Linus Torvalds 已提交
2925 2926
		return -EAGAIN;

2927 2928
	len = cur_mss * segs;
	if (skb->len > len) {
2929 2930
		if (tcp_fragment(sk, TCP_FRAG_IN_RTX_QUEUE, skb, len,
				 cur_mss, GFP_ATOMIC))
L
Linus Torvalds 已提交
2931
			return -ENOMEM; /* We'll try again later. */
2932
	} else {
2933 2934
		if (skb_unclone(skb, GFP_ATOMIC))
			return -ENOMEM;
2935

2936 2937 2938 2939 2940 2941 2942
		diff = tcp_skb_pcount(skb);
		tcp_set_skb_tso_segs(skb, cur_mss);
		diff -= tcp_skb_pcount(skb);
		if (diff)
			tcp_adjust_pcount(sk, skb, diff);
		if (skb->len < cur_mss)
			tcp_retrans_try_collapse(sk, skb, cur_mss);
L
Linus Torvalds 已提交
2943 2944
	}

2945 2946 2947 2948
	/* RFC3168, section 6.1.1.1. ECN fallback */
	if ((TCP_SKB_CB(skb)->tcp_flags & TCPHDR_SYN_ECN) == TCPHDR_SYN_ECN)
		tcp_ecn_clear_syn(sk, skb);

2949 2950 2951 2952 2953 2954
	/* Update global and local TCP statistics. */
	segs = tcp_skb_pcount(skb);
	TCP_ADD_STATS(sock_net(sk), TCP_MIB_RETRANSSEGS, segs);
	if (TCP_SKB_CB(skb)->tcp_flags & TCPHDR_SYN)
		__NET_INC_STATS(sock_net(sk), LINUX_MIB_TCPSYNRETRANS);
	tp->total_retrans += segs;
2955
	tp->bytes_retrans += skb->len;
2956

2957 2958 2959 2960 2961 2962
	/* make sure skb->data is aligned on arches that require it
	 * and check if ack-trimming & collapsing extended the headroom
	 * beyond what csum_start can cover.
	 */
	if (unlikely((NET_IP_ALIGN && ((unsigned long)skb->data & 3)) ||
		     skb_headroom(skb) >= 0xFFFF)) {
2963 2964
		struct sk_buff *nskb;

2965 2966 2967 2968 2969 2970
		tcp_skb_tsorted_save(skb) {
			nskb = __pskb_copy(skb, MAX_TCP_HEADER, GFP_ATOMIC);
			err = nskb ? tcp_transmit_skb(sk, nskb, 0, GFP_ATOMIC) :
				     -ENOBUFS;
		} tcp_skb_tsorted_restore(skb);

2971
		if (!err) {
2972
			tcp_update_skb_after_send(sk, skb, tp->tcp_wstamp_ns);
2973 2974
			tcp_rate_skb_sent(sk, skb);
		}
E
Eric Dumazet 已提交
2975
	} else {
2976
		err = tcp_transmit_skb(sk, skb, 1, GFP_ATOMIC);
E
Eric Dumazet 已提交
2977
	}
2978

2979 2980 2981 2982 2983
	/* To avoid taking spuriously low RTT samples based on a timestamp
	 * for a transmit that never happened, always mark EVER_RETRANS
	 */
	TCP_SKB_CB(skb)->sacked |= TCPCB_EVER_RETRANS;

2984 2985 2986 2987
	if (BPF_SOCK_OPS_TEST_FLAG(tp, BPF_SOCK_OPS_RETRANS_CB_FLAG))
		tcp_call_bpf_3arg(sk, BPF_SOCK_OPS_RETRANS_CB,
				  TCP_SKB_CB(skb)->seq, segs, err);

2988
	if (likely(!err)) {
2989
		trace_tcp_retransmit_skb(sk, skb);
2990
	} else if (err != -EBUSY) {
2991
		NET_ADD_STATS(sock_net(sk), LINUX_MIB_TCPRETRANSFAIL, segs);
2992
	}
2993
	return err;
2994 2995
}

2996
int tcp_retransmit_skb(struct sock *sk, struct sk_buff *skb, int segs)
2997 2998
{
	struct tcp_sock *tp = tcp_sk(sk);
2999
	int err = __tcp_retransmit_skb(sk, skb, segs);
L
Linus Torvalds 已提交
3000 3001 3002

	if (err == 0) {
#if FASTRETRANS_DEBUG > 0
3003
		if (TCP_SKB_CB(skb)->sacked & TCPCB_SACKED_RETRANS) {
3004
			net_dbg_ratelimited("retrans_out leaked\n");
L
Linus Torvalds 已提交
3005 3006 3007 3008 3009
		}
#endif
		TCP_SKB_CB(skb)->sacked |= TCPCB_RETRANS;
		tp->retrans_out += tcp_skb_pcount(skb);
	}
Y
Yuchung Cheng 已提交
3010

3011 3012 3013 3014
	/* Save stamp of the first (attempted) retransmit. */
	if (!tp->retrans_stamp)
		tp->retrans_stamp = tcp_skb_timestamp(skb);

Y
Yuchung Cheng 已提交
3015 3016 3017
	if (tp->undo_retrans < 0)
		tp->undo_retrans = 0;
	tp->undo_retrans += tcp_skb_pcount(skb);
L
Linus Torvalds 已提交
3018 3019 3020 3021 3022 3023 3024 3025 3026 3027
	return err;
}

/* This gets called after a retransmit timeout, and the initially
 * retransmitted data is acknowledged.  It tries to continue
 * resending the rest of the retransmit queue, until either
 * we've sent it all or the congestion window limit is reached.
 */
void tcp_xmit_retransmit_queue(struct sock *sk)
{
3028
	const struct inet_connection_sock *icsk = inet_csk(sk);
3029
	struct sk_buff *skb, *rtx_head, *hole = NULL;
L
Linus Torvalds 已提交
3030
	struct tcp_sock *tp = tcp_sk(sk);
3031
	u32 max_segs;
3032
	int mib_idx;
3033

3034 3035 3036
	if (!tp->packets_out)
		return;

3037 3038
	rtx_head = tcp_rtx_queue_head(sk);
	skb = tp->retransmit_skb_hint ?: rtx_head;
3039
	max_segs = tcp_tso_segs(sk, tcp_current_mss(sk));
3040
	skb_rbtree_walk_from(skb) {
E
Eric Dumazet 已提交
3041
		__u8 sacked;
3042
		int segs;
L
Linus Torvalds 已提交
3043

3044 3045 3046
		if (tcp_pacing_check(sk))
			break;

3047
		/* we could do better than to assign each time */
3048
		if (!hole)
3049
			tp->retransmit_skb_hint = skb;
3050

3051 3052
		segs = tp->snd_cwnd - tcp_packets_in_flight(tp);
		if (segs <= 0)
3053
			return;
E
Eric Dumazet 已提交
3054
		sacked = TCP_SKB_CB(skb)->sacked;
3055 3056 3057 3058
		/* In case tcp_shift_skb_data() have aggregated large skbs,
		 * we need to make sure not sending too bigs TSO packets
		 */
		segs = min_t(int, segs, max_segs);
L
Linus Torvalds 已提交
3059

3060 3061
		if (tp->retrans_out >= tp->lost_out) {
			break;
3062
		} else if (!(sacked & TCPCB_LOST)) {
3063
			if (!hole && !(sacked & (TCPCB_SACKED_RETRANS|TCPCB_SACKED_ACKED)))
3064 3065
				hole = skb;
			continue;
L
Linus Torvalds 已提交
3066

3067 3068 3069 3070 3071 3072
		} else {
			if (icsk->icsk_ca_state != TCP_CA_Loss)
				mib_idx = LINUX_MIB_TCPFASTRETRANS;
			else
				mib_idx = LINUX_MIB_TCPSLOWSTARTRETRANS;
		}
L
Linus Torvalds 已提交
3073

3074
		if (sacked & (TCPCB_SACKED_ACKED|TCPCB_SACKED_RETRANS))
L
Linus Torvalds 已提交
3075 3076
			continue;

3077 3078 3079
		if (tcp_small_queue_check(sk, skb, 1))
			return;

3080
		if (tcp_retransmit_skb(sk, skb, segs))
3081
			return;
3082

3083
		NET_ADD_STATS(sock_net(sk), mib_idx, tcp_skb_pcount(skb));
L
Linus Torvalds 已提交
3084

3085
		if (tcp_in_cwnd_reduction(sk))
3086 3087
			tp->prr_out += tcp_skb_pcount(skb);

3088
		if (skb == rtx_head &&
3089
		    icsk->icsk_pending != ICSK_TIME_REO_TIMEOUT)
3090 3091 3092 3093
			tcp_reset_xmit_timer(sk, ICSK_TIME_RETRANS,
					     inet_csk(sk)->icsk_rto,
					     TCP_RTO_MAX,
					     skb);
L
Linus Torvalds 已提交
3094 3095 3096
	}
}

3097 3098
/* We allow to exceed memory limits for FIN packets to expedite
 * connection tear down and (memory) recovery.
3099 3100
 * Otherwise tcp_send_fin() could be tempted to either delay FIN
 * or even be forced to close flow without any FIN.
3101 3102
 * In general, we want to allow one skb per socket to avoid hangs
 * with edge trigger epoll()
3103
 */
3104
void sk_forced_mem_schedule(struct sock *sk, int size)
3105
{
3106
	int amt;
3107 3108 3109 3110 3111

	if (size <= sk->sk_forward_alloc)
		return;
	amt = sk_mem_pages(size);
	sk->sk_forward_alloc += amt * SK_MEM_QUANTUM;
3112 3113
	sk_memory_allocated_add(sk, amt);

3114 3115
	if (mem_cgroup_sockets_enabled && sk->sk_memcg)
		mem_cgroup_charge_skmem(sk->sk_memcg, amt);
3116 3117
}

3118 3119
/* Send a FIN. The caller locks the socket for us.
 * We should try to send a FIN packet really hard, but eventually give up.
L
Linus Torvalds 已提交
3120 3121 3122
 */
void tcp_send_fin(struct sock *sk)
{
3123
	struct sk_buff *skb, *tskb = tcp_write_queue_tail(sk);
3124 3125
	struct tcp_sock *tp = tcp_sk(sk);

3126 3127 3128 3129
	/* Optimization, tack on the FIN if we have one skb in write queue and
	 * this skb was not yet sent, or we are under memory pressure.
	 * Note: in the latter case, FIN packet will be sent after a timeout,
	 * as TCP stack thinks it has already been transmitted.
L
Linus Torvalds 已提交
3130
	 */
3131 3132 3133 3134
	if (!tskb && tcp_under_memory_pressure(sk))
		tskb = skb_rb_last(&sk->tcp_rtx_queue);

	if (tskb) {
3135 3136
		TCP_SKB_CB(tskb)->tcp_flags |= TCPHDR_FIN;
		TCP_SKB_CB(tskb)->end_seq++;
L
Linus Torvalds 已提交
3137
		tp->write_seq++;
3138
		if (tcp_write_queue_empty(sk)) {
3139 3140 3141 3142 3143 3144
			/* This means tskb was already sent.
			 * Pretend we included the FIN on previous transmit.
			 * We need to set tp->snd_nxt to the value it would have
			 * if FIN had been sent. This is because retransmit path
			 * does not change tp->snd_nxt.
			 */
3145
			WRITE_ONCE(tp->snd_nxt, tp->snd_nxt + 1);
3146 3147
			return;
		}
L
Linus Torvalds 已提交
3148
	} else {
3149
		skb = alloc_skb_fclone(MAX_TCP_HEADER, sk->sk_allocation);
3150
		if (unlikely(!skb))
3151
			return;
3152

3153
		INIT_LIST_HEAD(&skb->tcp_tsorted_anchor);
3154
		skb_reserve(skb, MAX_TCP_HEADER);
3155
		sk_forced_mem_schedule(sk, skb->truesize);
L
Linus Torvalds 已提交
3156
		/* FIN eats a sequence byte, write_seq advanced by tcp_queue_skb(). */
3157
		tcp_init_nondata_skb(skb, tp->write_seq,
C
Changli Gao 已提交
3158
				     TCPHDR_ACK | TCPHDR_FIN);
L
Linus Torvalds 已提交
3159 3160
		tcp_queue_skb(sk, skb);
	}
3161
	__tcp_push_pending_frames(sk, tcp_current_mss(sk), TCP_NAGLE_OFF);
L
Linus Torvalds 已提交
3162 3163 3164 3165 3166
}

/* We get here when a process closes a file descriptor (either due to
 * an explicit close() or as a byproduct of exit()'ing) and there
 * was unread data in the receive queue.  This behavior is recommended
3167
 * by RFC 2525, section 2.17.  -DaveM
L
Linus Torvalds 已提交
3168
 */
A
Al Viro 已提交
3169
void tcp_send_active_reset(struct sock *sk, gfp_t priority)
L
Linus Torvalds 已提交
3170 3171 3172
{
	struct sk_buff *skb;

3173 3174
	TCP_INC_STATS(sock_net(sk), TCP_MIB_OUTRSTS);

L
Linus Torvalds 已提交
3175 3176 3177
	/* NOTE: No TCP options attached and we never retransmit this. */
	skb = alloc_skb(MAX_TCP_HEADER, priority);
	if (!skb) {
P
Pavel Emelyanov 已提交
3178
		NET_INC_STATS(sock_net(sk), LINUX_MIB_TCPABORTFAILED);
L
Linus Torvalds 已提交
3179 3180 3181 3182 3183
		return;
	}

	/* Reserve space for headers and prepare control bits. */
	skb_reserve(skb, MAX_TCP_HEADER);
3184
	tcp_init_nondata_skb(skb, tcp_acceptable_seq(sk),
C
Changli Gao 已提交
3185
			     TCPHDR_ACK | TCPHDR_RST);
3186
	tcp_mstamp_refresh(tcp_sk(sk));
L
Linus Torvalds 已提交
3187
	/* Send it off. */
3188
	if (tcp_transmit_skb(sk, skb, 0, priority))
P
Pavel Emelyanov 已提交
3189
		NET_INC_STATS(sock_net(sk), LINUX_MIB_TCPABORTFAILED);
3190 3191 3192 3193 3194

	/* skb of trace_tcp_send_reset() keeps the skb that caused RST,
	 * skb here is different to the troublesome skb, so use NULL
	 */
	trace_tcp_send_reset(sk, NULL);
L
Linus Torvalds 已提交
3195 3196
}

3197 3198
/* Send a crossed SYN-ACK during socket establishment.
 * WARNING: This routine must only be called when we have already sent
L
Linus Torvalds 已提交
3199 3200 3201 3202 3203 3204
 * a SYN packet that crossed the incoming SYN that caused this routine
 * to get called. If this assumption fails then the initial rcv_wnd
 * and rcv_wscale values will not be correct.
 */
int tcp_send_synack(struct sock *sk)
{
3205
	struct sk_buff *skb;
L
Linus Torvalds 已提交
3206

3207
	skb = tcp_rtx_queue_head(sk);
3208
	if (!skb || !(TCP_SKB_CB(skb)->tcp_flags & TCPHDR_SYN)) {
3209
		pr_err("%s: wrong queue state\n", __func__);
L
Linus Torvalds 已提交
3210 3211
		return -EFAULT;
	}
E
Eric Dumazet 已提交
3212
	if (!(TCP_SKB_CB(skb)->tcp_flags & TCPHDR_ACK)) {
L
Linus Torvalds 已提交
3213
		if (skb_cloned(skb)) {
3214 3215 3216 3217 3218
			struct sk_buff *nskb;

			tcp_skb_tsorted_save(skb) {
				nskb = skb_copy(skb, GFP_ATOMIC);
			} tcp_skb_tsorted_restore(skb);
3219
			if (!nskb)
L
Linus Torvalds 已提交
3220
				return -ENOMEM;
3221
			INIT_LIST_HEAD(&nskb->tcp_tsorted_anchor);
3222
			tcp_rtx_queue_unlink_and_free(skb, sk);
3223
			__skb_header_release(nskb);
3224
			tcp_rbtree_insert(&sk->tcp_rtx_queue, nskb);
3225 3226
			sk->sk_wmem_queued += nskb->truesize;
			sk_mem_charge(sk, nskb->truesize);
L
Linus Torvalds 已提交
3227 3228 3229
			skb = nskb;
		}

E
Eric Dumazet 已提交
3230
		TCP_SKB_CB(skb)->tcp_flags |= TCPHDR_ACK;
3231
		tcp_ecn_send_synack(sk, skb);
L
Linus Torvalds 已提交
3232
	}
3233
	return tcp_transmit_skb(sk, skb, 1, GFP_ATOMIC);
L
Linus Torvalds 已提交
3234 3235
}

3236 3237 3238 3239 3240 3241 3242 3243 3244
/**
 * tcp_make_synack - Prepare a SYN-ACK.
 * sk: listener socket
 * dst: dst entry attached to the SYNACK
 * req: request_sock pointer
 *
 * Allocate one skb and build a SYNACK packet.
 * @dst is consumed : Caller should not use it again.
 */
3245
struct sk_buff *tcp_make_synack(const struct sock *sk, struct dst_entry *dst,
3246
				struct request_sock *req,
3247
				struct tcp_fastopen_cookie *foc,
3248
				enum tcp_synack_type synack_type)
L
Linus Torvalds 已提交
3249
{
3250
	struct inet_request_sock *ireq = inet_rsk(req);
3251
	const struct tcp_sock *tp = tcp_sk(sk);
E
Eric Dumazet 已提交
3252
	struct tcp_md5sig_key *md5 = NULL;
3253 3254
	struct tcp_out_options opts;
	struct sk_buff *skb;
3255
	int tcp_header_size;
3256
	struct tcphdr *th;
3257
	int mss;
3258
	u64 now;
L
Linus Torvalds 已提交
3259

3260
	skb = alloc_skb(MAX_TCP_HEADER, GFP_ATOMIC);
3261 3262
	if (unlikely(!skb)) {
		dst_release(dst);
L
Linus Torvalds 已提交
3263
		return NULL;
3264
	}
L
Linus Torvalds 已提交
3265 3266 3267
	/* Reserve space for headers. */
	skb_reserve(skb, MAX_TCP_HEADER);

3268 3269
	switch (synack_type) {
	case TCP_SYNACK_NORMAL:
3270
		skb_set_owner_w(skb, req_to_sk(req));
3271 3272 3273 3274 3275 3276 3277
		break;
	case TCP_SYNACK_COOKIE:
		/* Under synflood, we do not attach skb to a socket,
		 * to avoid false sharing.
		 */
		break;
	case TCP_SYNACK_FASTOPEN:
3278 3279 3280 3281 3282
		/* sk is a const pointer, because we want to express multiple
		 * cpu might call us concurrently.
		 * sk->sk_wmem_alloc in an atomic, we can promote to rw.
		 */
		skb_set_owner_w(skb, (struct sock *)sk);
3283
		break;
3284
	}
3285
	skb_dst_set(skb, dst);
L
Linus Torvalds 已提交
3286

E
Eric Dumazet 已提交
3287
	mss = tcp_mss_clamp(tp, dst_metric_advmss(dst));
3288

A
Adam Langley 已提交
3289
	memset(&opts, 0, sizeof(opts));
3290
	now = tcp_clock_ns();
3291 3292
#ifdef CONFIG_SYN_COOKIES
	if (unlikely(req->cookie_ts))
3293
		skb->skb_mstamp_ns = cookie_init_timestamp(req);
3294 3295
	else
#endif
3296
	{
3297
		skb->skb_mstamp_ns = now;
3298 3299 3300
		if (!tcp_rsk(req)->snt_synack) /* Timestamp first SYNACK */
			tcp_rsk(req)->snt_synack = tcp_skb_timestamp_us(skb);
	}
E
Eric Dumazet 已提交
3301 3302 3303

#ifdef CONFIG_TCP_MD5SIG
	rcu_read_lock();
3304
	md5 = tcp_rsk(req)->af_specific->req_md5_lookup(sk, req_to_sk(req));
E
Eric Dumazet 已提交
3305
#endif
3306
	skb_set_hash(skb, tcp_rsk(req)->txhash, PKT_HASH_TYPE_L4);
3307 3308
	tcp_header_size = tcp_synack_options(sk, req, mss, skb, &opts, md5,
					     foc) + sizeof(*th);
3309

3310 3311
	skb_push(skb, tcp_header_size);
	skb_reset_transport_header(skb);
L
Linus Torvalds 已提交
3312

3313
	th = (struct tcphdr *)skb->data;
L
Linus Torvalds 已提交
3314 3315 3316
	memset(th, 0, sizeof(struct tcphdr));
	th->syn = 1;
	th->ack = 1;
3317
	tcp_ecn_make_synack(req, th);
E
Eric Dumazet 已提交
3318
	th->source = htons(ireq->ir_num);
3319
	th->dest = ireq->ir_rmt_port;
3320
	skb->mark = ireq->ir_mark;
3321 3322
	skb->ip_summed = CHECKSUM_PARTIAL;
	th->seq = htonl(tcp_rsk(req)->snt_isn);
3323 3324
	/* XXX data is queued and acked as is. No buffer/window check */
	th->ack_seq = htonl(tcp_rsk(req)->rcv_nxt);
L
Linus Torvalds 已提交
3325 3326

	/* RFC1323: The window in SYN & SYN/ACK segments is never scaled. */
3327
	th->window = htons(min(req->rsk_rcv_wnd, 65535U));
3328
	tcp_options_write((__be32 *)(th + 1), NULL, &opts);
L
Linus Torvalds 已提交
3329
	th->doff = (tcp_header_size >> 2);
E
Eric Dumazet 已提交
3330
	__TCP_INC_STATS(sock_net(sk), TCP_MIB_OUTSEGS);
3331 3332 3333

#ifdef CONFIG_TCP_MD5SIG
	/* Okay, we have all we need - do the md5 hash if needed */
E
Eric Dumazet 已提交
3334
	if (md5)
3335
		tcp_rsk(req)->af_specific->calc_md5_hash(opts.hash_location,
3336
					       md5, req_to_sk(req), skb);
E
Eric Dumazet 已提交
3337
	rcu_read_unlock();
3338 3339
#endif

3340 3341 3342
	skb->skb_mstamp_ns = now;
	tcp_add_tx_delay(skb, tp);

L
Linus Torvalds 已提交
3343 3344
	return skb;
}
E
Eric Dumazet 已提交
3345
EXPORT_SYMBOL(tcp_make_synack);
L
Linus Torvalds 已提交
3346

3347 3348 3349 3350 3351 3352 3353 3354 3355 3356 3357 3358 3359 3360 3361 3362 3363 3364 3365
static void tcp_ca_dst_init(struct sock *sk, const struct dst_entry *dst)
{
	struct inet_connection_sock *icsk = inet_csk(sk);
	const struct tcp_congestion_ops *ca;
	u32 ca_key = dst_metric(dst, RTAX_CC_ALGO);

	if (ca_key == TCP_CA_UNSPEC)
		return;

	rcu_read_lock();
	ca = tcp_ca_find_key(ca_key);
	if (likely(ca && try_module_get(ca->owner))) {
		module_put(icsk->icsk_ca_ops->owner);
		icsk->icsk_ca_dst_locked = tcp_ca_dst_locked(dst);
		icsk->icsk_ca_ops = ca;
	}
	rcu_read_unlock();
}

3366
/* Do all connect socket setups that can be done AF independent. */
3367
static void tcp_connect_init(struct sock *sk)
L
Linus Torvalds 已提交
3368
{
3369
	const struct dst_entry *dst = __sk_dst_get(sk);
L
Linus Torvalds 已提交
3370 3371
	struct tcp_sock *tp = tcp_sk(sk);
	__u8 rcv_wscale;
3372
	u32 rcv_wnd;
L
Linus Torvalds 已提交
3373 3374 3375 3376

	/* We'll fix this up when we get a response from the other end.
	 * See tcp_input.c:tcp_rcv_state_process case TCP_SYN_SENT.
	 */
3377 3378 3379
	tp->tcp_header_len = sizeof(struct tcphdr);
	if (sock_net(sk)->ipv4.sysctl_tcp_timestamps)
		tp->tcp_header_len += TCPOLEN_TSTAMP_ALIGNED;
L
Linus Torvalds 已提交
3380

3381
#ifdef CONFIG_TCP_MD5SIG
3382
	if (tp->af_specific->md5_lookup(sk, sk))
3383 3384 3385
		tp->tcp_header_len += TCPOLEN_MD5SIG_ALIGNED;
#endif

L
Linus Torvalds 已提交
3386 3387 3388 3389
	/* If user gave his TCP_MAXSEG, record it to clamp */
	if (tp->rx_opt.user_mss)
		tp->rx_opt.mss_clamp = tp->rx_opt.user_mss;
	tp->max_window = 0;
J
John Heffner 已提交
3390
	tcp_mtup_init(sk);
L
Linus Torvalds 已提交
3391 3392
	tcp_sync_mss(sk, dst_mtu(dst));

3393 3394
	tcp_ca_dst_init(sk, dst);

L
Linus Torvalds 已提交
3395 3396
	if (!tp->window_clamp)
		tp->window_clamp = dst_metric(dst, RTAX_WINDOW);
E
Eric Dumazet 已提交
3397
	tp->advmss = tcp_mss_clamp(tp, dst_metric_advmss(dst));
3398

L
Linus Torvalds 已提交
3399 3400
	tcp_initialize_rcv_mss(sk);

3401 3402 3403 3404 3405
	/* limit the window selection if the user enforce a smaller rx buffer */
	if (sk->sk_userlocks & SOCK_RCVBUF_LOCK &&
	    (tp->window_clamp > tcp_full_space(sk) || tp->window_clamp == 0))
		tp->window_clamp = tcp_full_space(sk);

3406 3407 3408 3409
	rcv_wnd = tcp_rwnd_init_bpf(sk);
	if (rcv_wnd == 0)
		rcv_wnd = dst_metric(dst, RTAX_INITRWND);

3410
	tcp_select_initial_window(sk, tcp_full_space(sk),
L
Linus Torvalds 已提交
3411 3412 3413
				  tp->advmss - (tp->rx_opt.ts_recent_stamp ? tp->tcp_header_len - sizeof(struct tcphdr) : 0),
				  &tp->rcv_wnd,
				  &tp->window_clamp,
3414
				  sock_net(sk)->ipv4.sysctl_tcp_window_scaling,
3415
				  &rcv_wscale,
3416
				  rcv_wnd);
L
Linus Torvalds 已提交
3417 3418 3419 3420 3421 3422 3423

	tp->rx_opt.rcv_wscale = rcv_wscale;
	tp->rcv_ssthresh = tp->rcv_wnd;

	sk->sk_err = 0;
	sock_reset_flag(sk, SOCK_DONE);
	tp->snd_wnd = 0;
3424
	tcp_init_wl(tp, 0);
3425
	tcp_write_queue_purge(sk);
L
Linus Torvalds 已提交
3426 3427
	tp->snd_una = tp->write_seq;
	tp->snd_sml = tp->write_seq;
I
Ilpo Järvinen 已提交
3428
	tp->snd_up = tp->write_seq;
3429
	WRITE_ONCE(tp->snd_nxt, tp->write_seq);
P
Pavel Emelyanov 已提交
3430 3431 3432

	if (likely(!tp->repair))
		tp->rcv_nxt = 0;
3433
	else
3434
		tp->rcv_tstamp = tcp_jiffies32;
P
Pavel Emelyanov 已提交
3435
	tp->rcv_wup = tp->rcv_nxt;
3436
	WRITE_ONCE(tp->copied_seq, tp->rcv_nxt);
L
Linus Torvalds 已提交
3437

3438
	inet_csk(sk)->icsk_rto = tcp_timeout_init(sk);
3439
	inet_csk(sk)->icsk_retransmits = 0;
L
Linus Torvalds 已提交
3440 3441 3442
	tcp_clear_retrans(tp);
}

3443 3444 3445 3446 3447 3448
static void tcp_connect_queue_skb(struct sock *sk, struct sk_buff *skb)
{
	struct tcp_sock *tp = tcp_sk(sk);
	struct tcp_skb_cb *tcb = TCP_SKB_CB(skb);

	tcb->end_seq += skb->len;
3449
	__skb_header_release(skb);
3450 3451
	sk->sk_wmem_queued += skb->truesize;
	sk_mem_charge(sk, skb->truesize);
3452
	WRITE_ONCE(tp->write_seq, tcb->end_seq);
3453 3454 3455 3456 3457 3458 3459 3460 3461 3462 3463 3464 3465 3466
	tp->packets_out += tcp_skb_pcount(skb);
}

/* Build and send a SYN with data and (cached) Fast Open cookie. However,
 * queue a data-only packet after the regular SYN, such that regular SYNs
 * are retransmitted on timeouts. Also if the remote SYN-ACK acknowledges
 * only the SYN sequence, the data are retransmitted in the first ACK.
 * If cookie is not cached or other error occurs, falls back to send a
 * regular SYN with Fast Open cookie request option.
 */
static int tcp_send_syn_data(struct sock *sk, struct sk_buff *syn)
{
	struct tcp_sock *tp = tcp_sk(sk);
	struct tcp_fastopen_request *fo = tp->fastopen_req;
3467
	int space, err = 0;
3468
	struct sk_buff *syn_data;
3469

3470
	tp->rx_opt.mss_clamp = tp->advmss;  /* If MSS is not cached */
3471
	if (!tcp_fastopen_cookie_check(sk, &tp->rx_opt.mss_clamp, &fo->cookie))
3472 3473 3474 3475 3476 3477
		goto fallback;

	/* MSS for SYN-data is based on cached MSS and bounded by PMTU and
	 * user-MSS. Reserve maximum option space for middleboxes that add
	 * private TCP options. The cost is reduced data space in SYN :(
	 */
E
Eric Dumazet 已提交
3478 3479
	tp->rx_opt.mss_clamp = tcp_mss_clamp(tp, tp->rx_opt.mss_clamp);

3480
	space = __tcp_mtu_to_mss(sk, inet_csk(sk)->icsk_pmtu_cookie) -
3481 3482
		MAX_TCP_OPTION_SPACE;

3483 3484 3485 3486 3487
	space = min_t(size_t, space, fo->size);

	/* limit to order-0 allocations */
	space = min_t(size_t, space, SKB_MAX_HEAD(MAX_TCP_HEADER));

3488
	syn_data = sk_stream_alloc_skb(sk, space, sk->sk_allocation, false);
3489
	if (!syn_data)
3490
		goto fallback;
3491 3492
	syn_data->ip_summed = CHECKSUM_PARTIAL;
	memcpy(syn_data->cb, syn->cb, sizeof(syn->cb));
3493 3494 3495 3496
	if (space) {
		int copied = copy_from_iter(skb_put(syn_data, space), space,
					    &fo->data->msg_iter);
		if (unlikely(!copied)) {
E
Eric Dumazet 已提交
3497
			tcp_skb_tsorted_anchor_cleanup(syn_data);
3498 3499 3500 3501 3502 3503 3504
			kfree_skb(syn_data);
			goto fallback;
		}
		if (copied != space) {
			skb_trim(syn_data, copied);
			space = copied;
		}
3505
		skb_zcopy_set(syn_data, fo->uarg, NULL);
3506
	}
3507 3508 3509 3510
	/* No more data pending in inet_wait_for_connect() */
	if (space == fo->size)
		fo->data = NULL;
	fo->copied = space;
3511

3512
	tcp_connect_queue_skb(sk, syn_data);
3513 3514
	if (syn_data->len)
		tcp_chrono_start(sk, TCP_CHRONO_BUSY);
3515

3516
	err = tcp_transmit_skb(sk, syn_data, 1, sk->sk_allocation);
3517

3518
	syn->skb_mstamp_ns = syn_data->skb_mstamp_ns;
E
Eric Dumazet 已提交
3519

3520 3521 3522 3523 3524 3525 3526 3527
	/* Now full SYN+DATA was cloned and sent (or not),
	 * remove the SYN from the original skb (syn_data)
	 * we keep in write queue in case of a retransmit, as we
	 * also have the SYN packet (with no data) in the same queue.
	 */
	TCP_SKB_CB(syn_data)->seq++;
	TCP_SKB_CB(syn_data)->tcp_flags = TCPHDR_ACK | TCPHDR_PSH;
	if (!err) {
3528
		tp->syn_data = (fo->copied > 0);
3529
		tcp_rbtree_insert(&sk->tcp_rtx_queue, syn_data);
3530
		NET_INC_STATS(sock_net(sk), LINUX_MIB_TCPORIGDATASENT);
3531 3532 3533
		goto done;
	}

3534 3535
	/* data was not sent, put it in write_queue */
	__skb_queue_tail(&sk->sk_write_queue, syn_data);
3536 3537
	tp->packets_out -= tcp_skb_pcount(syn_data);

3538 3539 3540 3541 3542 3543 3544 3545 3546 3547 3548 3549
fallback:
	/* Send a regular SYN with Fast Open cookie request option */
	if (fo->cookie.len > 0)
		fo->cookie.len = 0;
	err = tcp_transmit_skb(sk, syn, 1, sk->sk_allocation);
	if (err)
		tp->syn_fastopen = 0;
done:
	fo->cookie.len = -1;  /* Exclude Fast Open option for SYN retries */
	return err;
}

3550
/* Build a SYN and send it off. */
L
Linus Torvalds 已提交
3551 3552 3553 3554
int tcp_connect(struct sock *sk)
{
	struct tcp_sock *tp = tcp_sk(sk);
	struct sk_buff *buff;
3555
	int err;
L
Linus Torvalds 已提交
3556

3557
	tcp_call_bpf(sk, BPF_SOCK_OPS_TCP_CONNECT_CB, 0, NULL);
3558 3559 3560 3561

	if (inet_csk(sk)->icsk_af_ops->rebuild_header(sk))
		return -EHOSTUNREACH; /* Routing failure or similar. */

L
Linus Torvalds 已提交
3562 3563
	tcp_connect_init(sk);

A
Andrey Vagin 已提交
3564 3565 3566 3567 3568
	if (unlikely(tp->repair)) {
		tcp_finish_connect(sk, NULL);
		return 0;
	}

3569
	buff = sk_stream_alloc_skb(sk, 0, sk->sk_allocation, true);
3570
	if (unlikely(!buff))
L
Linus Torvalds 已提交
3571 3572
		return -ENOBUFS;

C
Changli Gao 已提交
3573
	tcp_init_nondata_skb(buff, tp->write_seq++, TCPHDR_SYN);
3574 3575
	tcp_mstamp_refresh(tp);
	tp->retrans_stamp = tcp_time_stamp(tp);
3576
	tcp_connect_queue_skb(sk, buff);
3577
	tcp_ecn_send_syn(sk, buff);
3578
	tcp_rbtree_insert(&sk->tcp_rtx_queue, buff);
L
Linus Torvalds 已提交
3579

3580 3581 3582
	/* Send off SYN; include data in Fast Open. */
	err = tp->fastopen_req ? tcp_send_syn_data(sk, buff) :
	      tcp_transmit_skb(sk, buff, 1, sk->sk_allocation);
3583 3584
	if (err == -ECONNREFUSED)
		return err;
3585 3586 3587 3588

	/* We change tp->snd_nxt after the tcp_transmit_skb() call
	 * in order to make this packet get counted in tcpOutSegs.
	 */
3589
	WRITE_ONCE(tp->snd_nxt, tp->write_seq);
3590
	tp->pushed_seq = tp->write_seq;
3591 3592
	buff = tcp_send_head(sk);
	if (unlikely(buff)) {
3593
		WRITE_ONCE(tp->snd_nxt, TCP_SKB_CB(buff)->seq);
3594 3595
		tp->pushed_seq	= TCP_SKB_CB(buff)->seq;
	}
P
Pavel Emelyanov 已提交
3596
	TCP_INC_STATS(sock_net(sk), TCP_MIB_ACTIVEOPENS);
L
Linus Torvalds 已提交
3597 3598

	/* Timer for repeating the SYN until an answer. */
3599 3600
	inet_csk_reset_xmit_timer(sk, ICSK_TIME_RETRANS,
				  inet_csk(sk)->icsk_rto, TCP_RTO_MAX);
L
Linus Torvalds 已提交
3601 3602
	return 0;
}
E
Eric Dumazet 已提交
3603
EXPORT_SYMBOL(tcp_connect);
L
Linus Torvalds 已提交
3604 3605 3606 3607 3608 3609 3610

/* Send out a delayed ack, the caller does the policy checking
 * to see if we should even be here.  See tcp_input.c:tcp_ack_snd_check()
 * for details.
 */
void tcp_send_delayed_ack(struct sock *sk)
{
3611 3612
	struct inet_connection_sock *icsk = inet_csk(sk);
	int ato = icsk->icsk_ack.ato;
L
Linus Torvalds 已提交
3613 3614 3615
	unsigned long timeout;

	if (ato > TCP_DELACK_MIN) {
3616
		const struct tcp_sock *tp = tcp_sk(sk);
3617
		int max_ato = HZ / 2;
L
Linus Torvalds 已提交
3618

W
Wei Wang 已提交
3619
		if (inet_csk_in_pingpong_mode(sk) ||
3620
		    (icsk->icsk_ack.pending & ICSK_ACK_PUSHED))
L
Linus Torvalds 已提交
3621 3622 3623 3624 3625
			max_ato = TCP_DELACK_MAX;

		/* Slow path, intersegment interval is "high". */

		/* If some rtt estimate is known, use it to bound delayed ack.
3626
		 * Do not use inet_csk(sk)->icsk_rto here, use results of rtt measurements
L
Linus Torvalds 已提交
3627 3628
		 * directly.
		 */
3629 3630 3631
		if (tp->srtt_us) {
			int rtt = max_t(int, usecs_to_jiffies(tp->srtt_us >> 3),
					TCP_DELACK_MIN);
L
Linus Torvalds 已提交
3632 3633 3634 3635 3636 3637 3638 3639 3640 3641 3642 3643

			if (rtt < max_ato)
				max_ato = rtt;
		}

		ato = min(ato, max_ato);
	}

	/* Stay within the limit we were given */
	timeout = jiffies + ato;

	/* Use new timeout only if there wasn't a older one earlier. */
3644
	if (icsk->icsk_ack.pending & ICSK_ACK_TIMER) {
L
Linus Torvalds 已提交
3645 3646 3647
		/* If delack timer was blocked or is about to expire,
		 * send ACK now.
		 */
3648 3649
		if (icsk->icsk_ack.blocked ||
		    time_before_eq(icsk->icsk_ack.timeout, jiffies + (ato >> 2))) {
L
Linus Torvalds 已提交
3650 3651 3652 3653
			tcp_send_ack(sk);
			return;
		}

3654 3655
		if (!time_before(timeout, icsk->icsk_ack.timeout))
			timeout = icsk->icsk_ack.timeout;
L
Linus Torvalds 已提交
3656
	}
3657 3658 3659
	icsk->icsk_ack.pending |= ICSK_ACK_SCHED | ICSK_ACK_TIMER;
	icsk->icsk_ack.timeout = timeout;
	sk_reset_timer(sk, &icsk->icsk_delack_timer, timeout);
L
Linus Torvalds 已提交
3660 3661 3662
}

/* This routine sends an ack and also updates the window. */
3663
void __tcp_send_ack(struct sock *sk, u32 rcv_nxt)
L
Linus Torvalds 已提交
3664
{
3665
	struct sk_buff *buff;
L
Linus Torvalds 已提交
3666

3667 3668 3669
	/* If we have been reset, we may not send again. */
	if (sk->sk_state == TCP_CLOSE)
		return;
L
Linus Torvalds 已提交
3670

3671 3672 3673 3674
	/* We are not putting this on the write queue, so
	 * tcp_transmit_skb() will set the ownership to this
	 * sock.
	 */
3675 3676 3677
	buff = alloc_skb(MAX_TCP_HEADER,
			 sk_gfp_mask(sk, GFP_ATOMIC | __GFP_NOWARN));
	if (unlikely(!buff)) {
3678 3679 3680 3681 3682
		inet_csk_schedule_ack(sk);
		inet_csk(sk)->icsk_ack.ato = TCP_ATO_MIN;
		inet_csk_reset_xmit_timer(sk, ICSK_TIME_DACK,
					  TCP_DELACK_MAX, TCP_RTO_MAX);
		return;
L
Linus Torvalds 已提交
3683
	}
3684 3685 3686

	/* Reserve space for headers and prepare control bits. */
	skb_reserve(buff, MAX_TCP_HEADER);
C
Changli Gao 已提交
3687
	tcp_init_nondata_skb(buff, tcp_acceptable_seq(sk), TCPHDR_ACK);
3688

E
Eric Dumazet 已提交
3689 3690 3691 3692 3693 3694
	/* We do not want pure acks influencing TCP Small Queues or fq/pacing
	 * too much.
	 * SKB_TRUESIZE(max(1 .. 66, MAX_TCP_HEADER)) is unfortunately ~784
	 */
	skb_set_tcp_pure_ack(buff);

3695
	/* Send it off, this clears delayed acks for us. */
3696 3697
	__tcp_transmit_skb(sk, buff, 0, (__force gfp_t)0, rcv_nxt);
}
3698
EXPORT_SYMBOL_GPL(__tcp_send_ack);
3699 3700 3701 3702

void tcp_send_ack(struct sock *sk)
{
	__tcp_send_ack(sk, tcp_sk(sk)->rcv_nxt);
L
Linus Torvalds 已提交
3703 3704 3705 3706 3707 3708 3709 3710 3711 3712 3713 3714 3715
}

/* This routine sends a packet with an out of date sequence
 * number. It assumes the other end will try to ack it.
 *
 * Question: what should we make while urgent mode?
 * 4.4BSD forces sending single byte of data. We cannot send
 * out of window data, because we have SND.NXT==SND.MAX...
 *
 * Current solution: to send TWO zero-length segments in urgent mode:
 * one is with SEG.SEQ=SND.UNA to deliver urgent pointer, another is
 * out-of-date with SND.UNA-1 to probe window.
 */
3716
static int tcp_xmit_probe_skb(struct sock *sk, int urgent, int mib)
L
Linus Torvalds 已提交
3717 3718 3719 3720 3721
{
	struct tcp_sock *tp = tcp_sk(sk);
	struct sk_buff *skb;

	/* We don't queue it, tcp_transmit_skb() sets ownership. */
3722 3723
	skb = alloc_skb(MAX_TCP_HEADER,
			sk_gfp_mask(sk, GFP_ATOMIC | __GFP_NOWARN));
3724
	if (!skb)
L
Linus Torvalds 已提交
3725 3726 3727 3728 3729 3730 3731 3732
		return -1;

	/* Reserve space for headers and set control bits. */
	skb_reserve(skb, MAX_TCP_HEADER);
	/* Use a previous sequence.  This should cause the other
	 * end to send an ack.  Don't queue or clone SKB, just
	 * send it.
	 */
C
Changli Gao 已提交
3733
	tcp_init_nondata_skb(skb, tp->snd_una - !urgent, TCPHDR_ACK);
3734
	NET_INC_STATS(sock_net(sk), mib);
3735
	return tcp_transmit_skb(sk, skb, 0, (__force gfp_t)0);
L
Linus Torvalds 已提交
3736 3737
}

3738
/* Called from setsockopt( ... TCP_REPAIR ) */
P
Pavel Emelyanov 已提交
3739 3740 3741 3742
void tcp_send_window_probe(struct sock *sk)
{
	if (sk->sk_state == TCP_ESTABLISHED) {
		tcp_sk(sk)->snd_wl1 = tcp_sk(sk)->rcv_nxt - 1;
3743
		tcp_mstamp_refresh(tcp_sk(sk));
3744
		tcp_xmit_probe_skb(sk, 0, LINUX_MIB_TCPWINPROBE);
P
Pavel Emelyanov 已提交
3745 3746 3747
	}
}

3748
/* Initiate keepalive or window probe from timer. */
3749
int tcp_write_wakeup(struct sock *sk, int mib)
L
Linus Torvalds 已提交
3750
{
3751 3752
	struct tcp_sock *tp = tcp_sk(sk);
	struct sk_buff *skb;
L
Linus Torvalds 已提交
3753

3754 3755 3756
	if (sk->sk_state == TCP_CLOSE)
		return -1;

3757 3758
	skb = tcp_send_head(sk);
	if (skb && before(TCP_SKB_CB(skb)->seq, tcp_wnd_end(tp))) {
3759
		int err;
I
Ilpo Järvinen 已提交
3760
		unsigned int mss = tcp_current_mss(sk);
3761 3762 3763 3764 3765 3766 3767 3768 3769 3770 3771 3772
		unsigned int seg_size = tcp_wnd_end(tp) - TCP_SKB_CB(skb)->seq;

		if (before(tp->pushed_seq, TCP_SKB_CB(skb)->end_seq))
			tp->pushed_seq = TCP_SKB_CB(skb)->end_seq;

		/* We are probing the opening of a window
		 * but the window size is != 0
		 * must have been a result SWS avoidance ( sender )
		 */
		if (seg_size < TCP_SKB_CB(skb)->end_seq - TCP_SKB_CB(skb)->seq ||
		    skb->len > mss) {
			seg_size = min(seg_size, mss);
E
Eric Dumazet 已提交
3773
			TCP_SKB_CB(skb)->tcp_flags |= TCPHDR_PSH;
3774 3775
			if (tcp_fragment(sk, TCP_FRAG_IN_WRITE_QUEUE,
					 skb, seg_size, mss, GFP_ATOMIC))
3776 3777
				return -1;
		} else if (!tcp_skb_pcount(skb))
3778
			tcp_set_skb_tso_segs(skb, mss);
3779

E
Eric Dumazet 已提交
3780
		TCP_SKB_CB(skb)->tcp_flags |= TCPHDR_PSH;
3781 3782 3783 3784 3785
		err = tcp_transmit_skb(sk, skb, 1, GFP_ATOMIC);
		if (!err)
			tcp_event_new_data_sent(sk, skb);
		return err;
	} else {
I
Ilpo Järvinen 已提交
3786
		if (between(tp->snd_up, tp->snd_una + 1, tp->snd_una + 0xFFFF))
3787 3788
			tcp_xmit_probe_skb(sk, 1, mib);
		return tcp_xmit_probe_skb(sk, 0, mib);
L
Linus Torvalds 已提交
3789 3790 3791 3792 3793 3794 3795 3796
	}
}

/* A window probe timeout has occurred.  If window is not closed send
 * a partial packet else a zero probe.
 */
void tcp_send_probe0(struct sock *sk)
{
3797
	struct inet_connection_sock *icsk = inet_csk(sk);
L
Linus Torvalds 已提交
3798
	struct tcp_sock *tp = tcp_sk(sk);
3799
	struct net *net = sock_net(sk);
3800
	unsigned long timeout;
L
Linus Torvalds 已提交
3801 3802
	int err;

3803
	err = tcp_write_wakeup(sk, LINUX_MIB_TCPWINPROBE);
L
Linus Torvalds 已提交
3804

3805
	if (tp->packets_out || tcp_write_queue_empty(sk)) {
L
Linus Torvalds 已提交
3806
		/* Cancel probe timer, if it is not required. */
3807
		icsk->icsk_probes_out = 0;
3808
		icsk->icsk_backoff = 0;
L
Linus Torvalds 已提交
3809 3810 3811
		return;
	}

3812
	icsk->icsk_probes_out++;
L
Linus Torvalds 已提交
3813
	if (err <= 0) {
3814
		if (icsk->icsk_backoff < net->ipv4.sysctl_tcp_retries2)
3815
			icsk->icsk_backoff++;
3816
		timeout = tcp_probe0_when(sk, TCP_RTO_MAX);
L
Linus Torvalds 已提交
3817 3818
	} else {
		/* If packet was not sent due to local congestion,
3819
		 * Let senders fight for local resources conservatively.
L
Linus Torvalds 已提交
3820
		 */
3821 3822 3823
		timeout = TCP_RESOURCE_PROBE_INTERVAL;
	}
	tcp_reset_xmit_timer(sk, ICSK_TIME_PROBE0, timeout, TCP_RTO_MAX, NULL);
L
Linus Torvalds 已提交
3824
}
3825

3826
int tcp_rtx_synack(const struct sock *sk, struct request_sock *req)
3827 3828 3829 3830 3831
{
	const struct tcp_request_sock_ops *af_ops = tcp_rsk(req)->af_specific;
	struct flowi fl;
	int res;

3832
	tcp_rsk(req)->txhash = net_tx_rndhash();
3833
	res = af_ops->send_synack(sk, NULL, &fl, req, NULL, TCP_SYNACK_NORMAL);
3834
	if (!res) {
E
Eric Dumazet 已提交
3835
		__TCP_INC_STATS(sock_net(sk), TCP_MIB_RETRANSSEGS);
3836
		__NET_INC_STATS(sock_net(sk), LINUX_MIB_TCPSYNRETRANS);
3837 3838
		if (unlikely(tcp_passive_fastopen(sk)))
			tcp_sk(sk)->total_retrans++;
3839
		trace_tcp_retransmit_synack(sk, req);
3840 3841 3842 3843
	}
	return res;
}
EXPORT_SYMBOL(tcp_rtx_synack);