xref: /linux/net/rxrpc/output.c (revision 74ce1896c6c65b2f8cccbf59162d542988835835)
1 /* RxRPC packet transmission
2  *
3  * Copyright (C) 2007 Red Hat, Inc. All Rights Reserved.
4  * Written by David Howells (dhowells@redhat.com)
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version
9  * 2 of the License, or (at your option) any later version.
10  */
11 
12 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
13 
14 #include <linux/net.h>
15 #include <linux/gfp.h>
16 #include <linux/skbuff.h>
17 #include <linux/export.h>
18 #include <net/sock.h>
19 #include <net/af_rxrpc.h>
20 #include "ar-internal.h"
21 
22 struct rxrpc_ack_buffer {
23 	struct rxrpc_wire_header whdr;
24 	struct rxrpc_ackpacket ack;
25 	u8 acks[255];
26 	u8 pad[3];
27 	struct rxrpc_ackinfo ackinfo;
28 };
29 
30 struct rxrpc_abort_buffer {
31 	struct rxrpc_wire_header whdr;
32 	__be32 abort_code;
33 };
34 
35 /*
36  * Fill out an ACK packet.
37  */
38 static size_t rxrpc_fill_out_ack(struct rxrpc_call *call,
39 				 struct rxrpc_ack_buffer *pkt,
40 				 rxrpc_seq_t *_hard_ack,
41 				 rxrpc_seq_t *_top,
42 				 u8 reason)
43 {
44 	rxrpc_serial_t serial;
45 	rxrpc_seq_t hard_ack, top, seq;
46 	int ix;
47 	u32 mtu, jmax;
48 	u8 *ackp = pkt->acks;
49 
50 	/* Barrier against rxrpc_input_data(). */
51 	serial = call->ackr_serial;
52 	hard_ack = READ_ONCE(call->rx_hard_ack);
53 	top = smp_load_acquire(&call->rx_top);
54 	*_hard_ack = hard_ack;
55 	*_top = top;
56 
57 	pkt->ack.bufferSpace	= htons(8);
58 	pkt->ack.maxSkew	= htons(call->ackr_skew);
59 	pkt->ack.firstPacket	= htonl(hard_ack + 1);
60 	pkt->ack.previousPacket	= htonl(call->ackr_prev_seq);
61 	pkt->ack.serial		= htonl(serial);
62 	pkt->ack.reason		= reason;
63 	pkt->ack.nAcks		= top - hard_ack;
64 
65 	if (reason == RXRPC_ACK_PING)
66 		pkt->whdr.flags |= RXRPC_REQUEST_ACK;
67 
68 	if (after(top, hard_ack)) {
69 		seq = hard_ack + 1;
70 		do {
71 			ix = seq & RXRPC_RXTX_BUFF_MASK;
72 			if (call->rxtx_buffer[ix])
73 				*ackp++ = RXRPC_ACK_TYPE_ACK;
74 			else
75 				*ackp++ = RXRPC_ACK_TYPE_NACK;
76 			seq++;
77 		} while (before_eq(seq, top));
78 	}
79 
80 	mtu = call->conn->params.peer->if_mtu;
81 	mtu -= call->conn->params.peer->hdrsize;
82 	jmax = (call->nr_jumbo_bad > 3) ? 1 : rxrpc_rx_jumbo_max;
83 	pkt->ackinfo.rxMTU	= htonl(rxrpc_rx_mtu);
84 	pkt->ackinfo.maxMTU	= htonl(mtu);
85 	pkt->ackinfo.rwind	= htonl(call->rx_winsize);
86 	pkt->ackinfo.jumbo_max	= htonl(jmax);
87 
88 	*ackp++ = 0;
89 	*ackp++ = 0;
90 	*ackp++ = 0;
91 	return top - hard_ack + 3;
92 }
93 
94 /*
95  * Send an ACK call packet.
96  */
97 int rxrpc_send_ack_packet(struct rxrpc_call *call, bool ping)
98 {
99 	struct rxrpc_connection *conn = NULL;
100 	struct rxrpc_ack_buffer *pkt;
101 	struct msghdr msg;
102 	struct kvec iov[2];
103 	rxrpc_serial_t serial;
104 	rxrpc_seq_t hard_ack, top;
105 	size_t len, n;
106 	int ret;
107 	u8 reason;
108 
109 	spin_lock_bh(&call->lock);
110 	if (call->conn)
111 		conn = rxrpc_get_connection_maybe(call->conn);
112 	spin_unlock_bh(&call->lock);
113 	if (!conn)
114 		return -ECONNRESET;
115 
116 	pkt = kzalloc(sizeof(*pkt), GFP_KERNEL);
117 	if (!pkt) {
118 		rxrpc_put_connection(conn);
119 		return -ENOMEM;
120 	}
121 
122 	msg.msg_name	= &call->peer->srx.transport;
123 	msg.msg_namelen	= call->peer->srx.transport_len;
124 	msg.msg_control	= NULL;
125 	msg.msg_controllen = 0;
126 	msg.msg_flags	= 0;
127 
128 	pkt->whdr.epoch		= htonl(conn->proto.epoch);
129 	pkt->whdr.cid		= htonl(call->cid);
130 	pkt->whdr.callNumber	= htonl(call->call_id);
131 	pkt->whdr.seq		= 0;
132 	pkt->whdr.type		= RXRPC_PACKET_TYPE_ACK;
133 	pkt->whdr.flags		= RXRPC_SLOW_START_OK | conn->out_clientflag;
134 	pkt->whdr.userStatus	= 0;
135 	pkt->whdr.securityIndex	= call->security_ix;
136 	pkt->whdr._rsvd		= 0;
137 	pkt->whdr.serviceId	= htons(call->service_id);
138 
139 	spin_lock_bh(&call->lock);
140 	if (ping) {
141 		reason = RXRPC_ACK_PING;
142 	} else {
143 		reason = call->ackr_reason;
144 		if (!call->ackr_reason) {
145 			spin_unlock_bh(&call->lock);
146 			ret = 0;
147 			goto out;
148 		}
149 		call->ackr_reason = 0;
150 	}
151 	n = rxrpc_fill_out_ack(call, pkt, &hard_ack, &top, reason);
152 
153 	spin_unlock_bh(&call->lock);
154 
155 	iov[0].iov_base	= pkt;
156 	iov[0].iov_len	= sizeof(pkt->whdr) + sizeof(pkt->ack) + n;
157 	iov[1].iov_base = &pkt->ackinfo;
158 	iov[1].iov_len	= sizeof(pkt->ackinfo);
159 	len = iov[0].iov_len + iov[1].iov_len;
160 
161 	serial = atomic_inc_return(&conn->serial);
162 	pkt->whdr.serial = htonl(serial);
163 	trace_rxrpc_tx_ack(call, serial,
164 			   ntohl(pkt->ack.firstPacket),
165 			   ntohl(pkt->ack.serial),
166 			   pkt->ack.reason, pkt->ack.nAcks);
167 
168 	if (ping) {
169 		call->ping_serial = serial;
170 		smp_wmb();
171 		/* We need to stick a time in before we send the packet in case
172 		 * the reply gets back before kernel_sendmsg() completes - but
173 		 * asking UDP to send the packet can take a relatively long
174 		 * time, so we update the time after, on the assumption that
175 		 * the packet transmission is more likely to happen towards the
176 		 * end of the kernel_sendmsg() call.
177 		 */
178 		call->ping_time = ktime_get_real();
179 		set_bit(RXRPC_CALL_PINGING, &call->flags);
180 		trace_rxrpc_rtt_tx(call, rxrpc_rtt_tx_ping, serial);
181 	}
182 
183 	ret = kernel_sendmsg(conn->params.local->socket, &msg, iov, 2, len);
184 	if (ping)
185 		call->ping_time = ktime_get_real();
186 
187 	if (call->state < RXRPC_CALL_COMPLETE) {
188 		if (ret < 0) {
189 			if (ping)
190 				clear_bit(RXRPC_CALL_PINGING, &call->flags);
191 			rxrpc_propose_ACK(call, pkt->ack.reason,
192 					  ntohs(pkt->ack.maxSkew),
193 					  ntohl(pkt->ack.serial),
194 					  true, true,
195 					  rxrpc_propose_ack_retry_tx);
196 		} else {
197 			spin_lock_bh(&call->lock);
198 			if (after(hard_ack, call->ackr_consumed))
199 				call->ackr_consumed = hard_ack;
200 			if (after(top, call->ackr_seen))
201 				call->ackr_seen = top;
202 			spin_unlock_bh(&call->lock);
203 		}
204 	}
205 
206 out:
207 	rxrpc_put_connection(conn);
208 	kfree(pkt);
209 	return ret;
210 }
211 
212 /*
213  * Send an ABORT call packet.
214  */
215 int rxrpc_send_abort_packet(struct rxrpc_call *call)
216 {
217 	struct rxrpc_connection *conn = NULL;
218 	struct rxrpc_abort_buffer pkt;
219 	struct msghdr msg;
220 	struct kvec iov[1];
221 	rxrpc_serial_t serial;
222 	int ret;
223 
224 	spin_lock_bh(&call->lock);
225 	if (call->conn)
226 		conn = rxrpc_get_connection_maybe(call->conn);
227 	spin_unlock_bh(&call->lock);
228 	if (!conn)
229 		return -ECONNRESET;
230 
231 	msg.msg_name	= &call->peer->srx.transport;
232 	msg.msg_namelen	= call->peer->srx.transport_len;
233 	msg.msg_control	= NULL;
234 	msg.msg_controllen = 0;
235 	msg.msg_flags	= 0;
236 
237 	pkt.whdr.epoch		= htonl(conn->proto.epoch);
238 	pkt.whdr.cid		= htonl(call->cid);
239 	pkt.whdr.callNumber	= htonl(call->call_id);
240 	pkt.whdr.seq		= 0;
241 	pkt.whdr.type		= RXRPC_PACKET_TYPE_ABORT;
242 	pkt.whdr.flags		= conn->out_clientflag;
243 	pkt.whdr.userStatus	= 0;
244 	pkt.whdr.securityIndex	= call->security_ix;
245 	pkt.whdr._rsvd		= 0;
246 	pkt.whdr.serviceId	= htons(call->service_id);
247 	pkt.abort_code		= htonl(call->abort_code);
248 
249 	iov[0].iov_base	= &pkt;
250 	iov[0].iov_len	= sizeof(pkt);
251 
252 	serial = atomic_inc_return(&conn->serial);
253 	pkt.whdr.serial = htonl(serial);
254 
255 	ret = kernel_sendmsg(conn->params.local->socket,
256 			     &msg, iov, 1, sizeof(pkt));
257 
258 	rxrpc_put_connection(conn);
259 	return ret;
260 }
261 
262 /*
263  * send a packet through the transport endpoint
264  */
265 int rxrpc_send_data_packet(struct rxrpc_call *call, struct sk_buff *skb,
266 			   bool retrans)
267 {
268 	struct rxrpc_connection *conn = call->conn;
269 	struct rxrpc_wire_header whdr;
270 	struct rxrpc_skb_priv *sp = rxrpc_skb(skb);
271 	struct msghdr msg;
272 	struct kvec iov[2];
273 	rxrpc_serial_t serial;
274 	size_t len;
275 	bool lost = false;
276 	int ret, opt;
277 
278 	_enter(",{%d}", skb->len);
279 
280 	/* Each transmission of a Tx packet needs a new serial number */
281 	serial = atomic_inc_return(&conn->serial);
282 
283 	whdr.epoch	= htonl(conn->proto.epoch);
284 	whdr.cid	= htonl(call->cid);
285 	whdr.callNumber	= htonl(call->call_id);
286 	whdr.seq	= htonl(sp->hdr.seq);
287 	whdr.serial	= htonl(serial);
288 	whdr.type	= RXRPC_PACKET_TYPE_DATA;
289 	whdr.flags	= sp->hdr.flags;
290 	whdr.userStatus	= 0;
291 	whdr.securityIndex = call->security_ix;
292 	whdr._rsvd	= htons(sp->hdr._rsvd);
293 	whdr.serviceId	= htons(call->service_id);
294 
295 	if (test_bit(RXRPC_CONN_PROBING_FOR_UPGRADE, &conn->flags) &&
296 	    sp->hdr.seq == 1)
297 		whdr.userStatus	= RXRPC_USERSTATUS_SERVICE_UPGRADE;
298 
299 	iov[0].iov_base = &whdr;
300 	iov[0].iov_len = sizeof(whdr);
301 	iov[1].iov_base = skb->head;
302 	iov[1].iov_len = skb->len;
303 	len = iov[0].iov_len + iov[1].iov_len;
304 
305 	msg.msg_name = &call->peer->srx.transport;
306 	msg.msg_namelen = call->peer->srx.transport_len;
307 	msg.msg_control = NULL;
308 	msg.msg_controllen = 0;
309 	msg.msg_flags = 0;
310 
311 	/* If our RTT cache needs working on, request an ACK.  Also request
312 	 * ACKs if a DATA packet appears to have been lost.
313 	 */
314 	if (!(sp->hdr.flags & RXRPC_LAST_PACKET) &&
315 	    (retrans ||
316 	     call->cong_mode == RXRPC_CALL_SLOW_START ||
317 	     (call->peer->rtt_usage < 3 && sp->hdr.seq & 1) ||
318 	     ktime_before(ktime_add_ms(call->peer->rtt_last_req, 1000),
319 			  ktime_get_real())))
320 		whdr.flags |= RXRPC_REQUEST_ACK;
321 
322 	if (IS_ENABLED(CONFIG_AF_RXRPC_INJECT_LOSS)) {
323 		static int lose;
324 		if ((lose++ & 7) == 7) {
325 			ret = 0;
326 			lost = true;
327 			goto done;
328 		}
329 	}
330 
331 	_proto("Tx DATA %%%u { #%u }", serial, sp->hdr.seq);
332 
333 	/* send the packet with the don't fragment bit set if we currently
334 	 * think it's small enough */
335 	if (iov[1].iov_len >= call->peer->maxdata)
336 		goto send_fragmentable;
337 
338 	down_read(&conn->params.local->defrag_sem);
339 	/* send the packet by UDP
340 	 * - returns -EMSGSIZE if UDP would have to fragment the packet
341 	 *   to go out of the interface
342 	 *   - in which case, we'll have processed the ICMP error
343 	 *     message and update the peer record
344 	 */
345 	ret = kernel_sendmsg(conn->params.local->socket, &msg, iov, 2, len);
346 
347 	up_read(&conn->params.local->defrag_sem);
348 	if (ret == -EMSGSIZE)
349 		goto send_fragmentable;
350 
351 done:
352 	trace_rxrpc_tx_data(call, sp->hdr.seq, serial, whdr.flags,
353 			    retrans, lost);
354 	if (ret >= 0) {
355 		ktime_t now = ktime_get_real();
356 		skb->tstamp = now;
357 		smp_wmb();
358 		sp->hdr.serial = serial;
359 		if (whdr.flags & RXRPC_REQUEST_ACK) {
360 			call->peer->rtt_last_req = now;
361 			trace_rxrpc_rtt_tx(call, rxrpc_rtt_tx_data, serial);
362 		}
363 	}
364 	_leave(" = %d [%u]", ret, call->peer->maxdata);
365 	return ret;
366 
367 send_fragmentable:
368 	/* attempt to send this message with fragmentation enabled */
369 	_debug("send fragment");
370 
371 	down_write(&conn->params.local->defrag_sem);
372 
373 	switch (conn->params.local->srx.transport.family) {
374 	case AF_INET:
375 		opt = IP_PMTUDISC_DONT;
376 		ret = kernel_setsockopt(conn->params.local->socket,
377 					SOL_IP, IP_MTU_DISCOVER,
378 					(char *)&opt, sizeof(opt));
379 		if (ret == 0) {
380 			ret = kernel_sendmsg(conn->params.local->socket, &msg,
381 					     iov, 2, len);
382 
383 			opt = IP_PMTUDISC_DO;
384 			kernel_setsockopt(conn->params.local->socket, SOL_IP,
385 					  IP_MTU_DISCOVER,
386 					  (char *)&opt, sizeof(opt));
387 		}
388 		break;
389 
390 #ifdef CONFIG_AF_RXRPC_IPV6
391 	case AF_INET6:
392 		opt = IPV6_PMTUDISC_DONT;
393 		ret = kernel_setsockopt(conn->params.local->socket,
394 					SOL_IPV6, IPV6_MTU_DISCOVER,
395 					(char *)&opt, sizeof(opt));
396 		if (ret == 0) {
397 			ret = kernel_sendmsg(conn->params.local->socket, &msg,
398 					     iov, 1, iov[0].iov_len);
399 
400 			opt = IPV6_PMTUDISC_DO;
401 			kernel_setsockopt(conn->params.local->socket,
402 					  SOL_IPV6, IPV6_MTU_DISCOVER,
403 					  (char *)&opt, sizeof(opt));
404 		}
405 		break;
406 #endif
407 	}
408 
409 	up_write(&conn->params.local->defrag_sem);
410 	goto done;
411 }
412 
413 /*
414  * reject packets through the local endpoint
415  */
416 void rxrpc_reject_packets(struct rxrpc_local *local)
417 {
418 	struct sockaddr_rxrpc srx;
419 	struct rxrpc_skb_priv *sp;
420 	struct rxrpc_wire_header whdr;
421 	struct sk_buff *skb;
422 	struct msghdr msg;
423 	struct kvec iov[2];
424 	size_t size;
425 	__be32 code;
426 
427 	_enter("%d", local->debug_id);
428 
429 	iov[0].iov_base = &whdr;
430 	iov[0].iov_len = sizeof(whdr);
431 	iov[1].iov_base = &code;
432 	iov[1].iov_len = sizeof(code);
433 	size = sizeof(whdr) + sizeof(code);
434 
435 	msg.msg_name = &srx.transport;
436 	msg.msg_control = NULL;
437 	msg.msg_controllen = 0;
438 	msg.msg_flags = 0;
439 
440 	memset(&whdr, 0, sizeof(whdr));
441 	whdr.type = RXRPC_PACKET_TYPE_ABORT;
442 
443 	while ((skb = skb_dequeue(&local->reject_queue))) {
444 		rxrpc_see_skb(skb, rxrpc_skb_rx_seen);
445 		sp = rxrpc_skb(skb);
446 
447 		if (rxrpc_extract_addr_from_skb(local, &srx, skb) == 0) {
448 			msg.msg_namelen = srx.transport_len;
449 
450 			code = htonl(skb->priority);
451 
452 			whdr.epoch	= htonl(sp->hdr.epoch);
453 			whdr.cid	= htonl(sp->hdr.cid);
454 			whdr.callNumber	= htonl(sp->hdr.callNumber);
455 			whdr.serviceId	= htons(sp->hdr.serviceId);
456 			whdr.flags	= sp->hdr.flags;
457 			whdr.flags	^= RXRPC_CLIENT_INITIATED;
458 			whdr.flags	&= RXRPC_CLIENT_INITIATED;
459 
460 			kernel_sendmsg(local->socket, &msg, iov, 2, size);
461 		}
462 
463 		rxrpc_free_skb(skb, rxrpc_skb_rx_freed);
464 	}
465 
466 	_leave("");
467 }
468