xref: /openbmc/linux/net/tls/tls_sw.c (revision e0f6d1a5)
1 /*
2  * Copyright (c) 2016-2017, Mellanox Technologies. All rights reserved.
3  * Copyright (c) 2016-2017, Dave Watson <davejwatson@fb.com>. All rights reserved.
4  * Copyright (c) 2016-2017, Lance Chao <lancerchao@fb.com>. All rights reserved.
5  * Copyright (c) 2016, Fridolin Pokorny <fridolin.pokorny@gmail.com>. All rights reserved.
6  * Copyright (c) 2016, Nikos Mavrogiannopoulos <nmav@gnutls.org>. All rights reserved.
7  *
8  * This software is available to you under a choice of one of two
9  * licenses.  You may choose to be licensed under the terms of the GNU
10  * General Public License (GPL) Version 2, available from the file
11  * COPYING in the main directory of this source tree, or the
12  * OpenIB.org BSD license below:
13  *
14  *     Redistribution and use in source and binary forms, with or
15  *     without modification, are permitted provided that the following
16  *     conditions are met:
17  *
18  *      - Redistributions of source code must retain the above
19  *        copyright notice, this list of conditions and the following
20  *        disclaimer.
21  *
22  *      - Redistributions in binary form must reproduce the above
23  *        copyright notice, this list of conditions and the following
24  *        disclaimer in the documentation and/or other materials
25  *        provided with the distribution.
26  *
27  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
28  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
29  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
30  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
31  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
32  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
33  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
34  * SOFTWARE.
35  */
36 
37 #include <linux/sched/signal.h>
38 #include <linux/module.h>
39 #include <crypto/aead.h>
40 
41 #include <net/strparser.h>
42 #include <net/tls.h>
43 
44 #define MAX_IV_SIZE	TLS_CIPHER_AES_GCM_128_IV_SIZE
45 
46 static int tls_do_decryption(struct sock *sk,
47 			     struct scatterlist *sgin,
48 			     struct scatterlist *sgout,
49 			     char *iv_recv,
50 			     size_t data_len,
51 			     struct sk_buff *skb,
52 			     gfp_t flags)
53 {
54 	struct tls_context *tls_ctx = tls_get_ctx(sk);
55 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
56 	struct strp_msg *rxm = strp_msg(skb);
57 	struct aead_request *aead_req;
58 
59 	int ret;
60 	unsigned int req_size = sizeof(struct aead_request) +
61 		crypto_aead_reqsize(ctx->aead_recv);
62 
63 	aead_req = kzalloc(req_size, flags);
64 	if (!aead_req)
65 		return -ENOMEM;
66 
67 	aead_request_set_tfm(aead_req, ctx->aead_recv);
68 	aead_request_set_ad(aead_req, TLS_AAD_SPACE_SIZE);
69 	aead_request_set_crypt(aead_req, sgin, sgout,
70 			       data_len + tls_ctx->rx.tag_size,
71 			       (u8 *)iv_recv);
72 	aead_request_set_callback(aead_req, CRYPTO_TFM_REQ_MAY_BACKLOG,
73 				  crypto_req_done, &ctx->async_wait);
74 
75 	ret = crypto_wait_req(crypto_aead_decrypt(aead_req), &ctx->async_wait);
76 
77 	if (ret < 0)
78 		goto out;
79 
80 	rxm->offset += tls_ctx->rx.prepend_size;
81 	rxm->full_len -= tls_ctx->rx.overhead_size;
82 	tls_advance_record_sn(sk, &tls_ctx->rx);
83 
84 	ctx->decrypted = true;
85 
86 	ctx->saved_data_ready(sk);
87 
88 out:
89 	kfree(aead_req);
90 	return ret;
91 }
92 
93 static void trim_sg(struct sock *sk, struct scatterlist *sg,
94 		    int *sg_num_elem, unsigned int *sg_size, int target_size)
95 {
96 	int i = *sg_num_elem - 1;
97 	int trim = *sg_size - target_size;
98 
99 	if (trim <= 0) {
100 		WARN_ON(trim < 0);
101 		return;
102 	}
103 
104 	*sg_size = target_size;
105 	while (trim >= sg[i].length) {
106 		trim -= sg[i].length;
107 		sk_mem_uncharge(sk, sg[i].length);
108 		put_page(sg_page(&sg[i]));
109 		i--;
110 
111 		if (i < 0)
112 			goto out;
113 	}
114 
115 	sg[i].length -= trim;
116 	sk_mem_uncharge(sk, trim);
117 
118 out:
119 	*sg_num_elem = i + 1;
120 }
121 
122 static void trim_both_sgl(struct sock *sk, int target_size)
123 {
124 	struct tls_context *tls_ctx = tls_get_ctx(sk);
125 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
126 
127 	trim_sg(sk, ctx->sg_plaintext_data,
128 		&ctx->sg_plaintext_num_elem,
129 		&ctx->sg_plaintext_size,
130 		target_size);
131 
132 	if (target_size > 0)
133 		target_size += tls_ctx->tx.overhead_size;
134 
135 	trim_sg(sk, ctx->sg_encrypted_data,
136 		&ctx->sg_encrypted_num_elem,
137 		&ctx->sg_encrypted_size,
138 		target_size);
139 }
140 
141 static int alloc_encrypted_sg(struct sock *sk, int len)
142 {
143 	struct tls_context *tls_ctx = tls_get_ctx(sk);
144 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
145 	int rc = 0;
146 
147 	rc = sk_alloc_sg(sk, len,
148 			 ctx->sg_encrypted_data, 0,
149 			 &ctx->sg_encrypted_num_elem,
150 			 &ctx->sg_encrypted_size, 0);
151 
152 	return rc;
153 }
154 
155 static int alloc_plaintext_sg(struct sock *sk, int len)
156 {
157 	struct tls_context *tls_ctx = tls_get_ctx(sk);
158 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
159 	int rc = 0;
160 
161 	rc = sk_alloc_sg(sk, len, ctx->sg_plaintext_data, 0,
162 			 &ctx->sg_plaintext_num_elem, &ctx->sg_plaintext_size,
163 			 tls_ctx->pending_open_record_frags);
164 
165 	return rc;
166 }
167 
168 static void free_sg(struct sock *sk, struct scatterlist *sg,
169 		    int *sg_num_elem, unsigned int *sg_size)
170 {
171 	int i, n = *sg_num_elem;
172 
173 	for (i = 0; i < n; ++i) {
174 		sk_mem_uncharge(sk, sg[i].length);
175 		put_page(sg_page(&sg[i]));
176 	}
177 	*sg_num_elem = 0;
178 	*sg_size = 0;
179 }
180 
181 static void tls_free_both_sg(struct sock *sk)
182 {
183 	struct tls_context *tls_ctx = tls_get_ctx(sk);
184 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
185 
186 	free_sg(sk, ctx->sg_encrypted_data, &ctx->sg_encrypted_num_elem,
187 		&ctx->sg_encrypted_size);
188 
189 	free_sg(sk, ctx->sg_plaintext_data, &ctx->sg_plaintext_num_elem,
190 		&ctx->sg_plaintext_size);
191 }
192 
193 static int tls_do_encryption(struct tls_context *tls_ctx,
194 			     struct tls_sw_context *ctx, size_t data_len,
195 			     gfp_t flags)
196 {
197 	unsigned int req_size = sizeof(struct aead_request) +
198 		crypto_aead_reqsize(ctx->aead_send);
199 	struct aead_request *aead_req;
200 	int rc;
201 
202 	aead_req = kzalloc(req_size, flags);
203 	if (!aead_req)
204 		return -ENOMEM;
205 
206 	ctx->sg_encrypted_data[0].offset += tls_ctx->tx.prepend_size;
207 	ctx->sg_encrypted_data[0].length -= tls_ctx->tx.prepend_size;
208 
209 	aead_request_set_tfm(aead_req, ctx->aead_send);
210 	aead_request_set_ad(aead_req, TLS_AAD_SPACE_SIZE);
211 	aead_request_set_crypt(aead_req, ctx->sg_aead_in, ctx->sg_aead_out,
212 			       data_len, tls_ctx->tx.iv);
213 
214 	aead_request_set_callback(aead_req, CRYPTO_TFM_REQ_MAY_BACKLOG,
215 				  crypto_req_done, &ctx->async_wait);
216 
217 	rc = crypto_wait_req(crypto_aead_encrypt(aead_req), &ctx->async_wait);
218 
219 	ctx->sg_encrypted_data[0].offset -= tls_ctx->tx.prepend_size;
220 	ctx->sg_encrypted_data[0].length += tls_ctx->tx.prepend_size;
221 
222 	kfree(aead_req);
223 	return rc;
224 }
225 
226 static int tls_push_record(struct sock *sk, int flags,
227 			   unsigned char record_type)
228 {
229 	struct tls_context *tls_ctx = tls_get_ctx(sk);
230 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
231 	int rc;
232 
233 	sg_mark_end(ctx->sg_plaintext_data + ctx->sg_plaintext_num_elem - 1);
234 	sg_mark_end(ctx->sg_encrypted_data + ctx->sg_encrypted_num_elem - 1);
235 
236 	tls_make_aad(ctx->aad_space, ctx->sg_plaintext_size,
237 		     tls_ctx->tx.rec_seq, tls_ctx->tx.rec_seq_size,
238 		     record_type);
239 
240 	tls_fill_prepend(tls_ctx,
241 			 page_address(sg_page(&ctx->sg_encrypted_data[0])) +
242 			 ctx->sg_encrypted_data[0].offset,
243 			 ctx->sg_plaintext_size, record_type);
244 
245 	tls_ctx->pending_open_record_frags = 0;
246 	set_bit(TLS_PENDING_CLOSED_RECORD, &tls_ctx->flags);
247 
248 	rc = tls_do_encryption(tls_ctx, ctx, ctx->sg_plaintext_size,
249 			       sk->sk_allocation);
250 	if (rc < 0) {
251 		/* If we are called from write_space and
252 		 * we fail, we need to set this SOCK_NOSPACE
253 		 * to trigger another write_space in the future.
254 		 */
255 		set_bit(SOCK_NOSPACE, &sk->sk_socket->flags);
256 		return rc;
257 	}
258 
259 	free_sg(sk, ctx->sg_plaintext_data, &ctx->sg_plaintext_num_elem,
260 		&ctx->sg_plaintext_size);
261 
262 	ctx->sg_encrypted_num_elem = 0;
263 	ctx->sg_encrypted_size = 0;
264 
265 	/* Only pass through MSG_DONTWAIT and MSG_NOSIGNAL flags */
266 	rc = tls_push_sg(sk, tls_ctx, ctx->sg_encrypted_data, 0, flags);
267 	if (rc < 0 && rc != -EAGAIN)
268 		tls_err_abort(sk, EBADMSG);
269 
270 	tls_advance_record_sn(sk, &tls_ctx->tx);
271 	return rc;
272 }
273 
274 static int tls_sw_push_pending_record(struct sock *sk, int flags)
275 {
276 	return tls_push_record(sk, flags, TLS_RECORD_TYPE_DATA);
277 }
278 
279 static int zerocopy_from_iter(struct sock *sk, struct iov_iter *from,
280 			      int length, int *pages_used,
281 			      unsigned int *size_used,
282 			      struct scatterlist *to, int to_max_pages,
283 			      bool charge)
284 {
285 	struct page *pages[MAX_SKB_FRAGS];
286 
287 	size_t offset;
288 	ssize_t copied, use;
289 	int i = 0;
290 	unsigned int size = *size_used;
291 	int num_elem = *pages_used;
292 	int rc = 0;
293 	int maxpages;
294 
295 	while (length > 0) {
296 		i = 0;
297 		maxpages = to_max_pages - num_elem;
298 		if (maxpages == 0) {
299 			rc = -EFAULT;
300 			goto out;
301 		}
302 		copied = iov_iter_get_pages(from, pages,
303 					    length,
304 					    maxpages, &offset);
305 		if (copied <= 0) {
306 			rc = -EFAULT;
307 			goto out;
308 		}
309 
310 		iov_iter_advance(from, copied);
311 
312 		length -= copied;
313 		size += copied;
314 		while (copied) {
315 			use = min_t(int, copied, PAGE_SIZE - offset);
316 
317 			sg_set_page(&to[num_elem],
318 				    pages[i], use, offset);
319 			sg_unmark_end(&to[num_elem]);
320 			if (charge)
321 				sk_mem_charge(sk, use);
322 
323 			offset = 0;
324 			copied -= use;
325 
326 			++i;
327 			++num_elem;
328 		}
329 	}
330 
331 out:
332 	*size_used = size;
333 	*pages_used = num_elem;
334 
335 	return rc;
336 }
337 
338 static int memcopy_from_iter(struct sock *sk, struct iov_iter *from,
339 			     int bytes)
340 {
341 	struct tls_context *tls_ctx = tls_get_ctx(sk);
342 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
343 	struct scatterlist *sg = ctx->sg_plaintext_data;
344 	int copy, i, rc = 0;
345 
346 	for (i = tls_ctx->pending_open_record_frags;
347 	     i < ctx->sg_plaintext_num_elem; ++i) {
348 		copy = sg[i].length;
349 		if (copy_from_iter(
350 				page_address(sg_page(&sg[i])) + sg[i].offset,
351 				copy, from) != copy) {
352 			rc = -EFAULT;
353 			goto out;
354 		}
355 		bytes -= copy;
356 
357 		++tls_ctx->pending_open_record_frags;
358 
359 		if (!bytes)
360 			break;
361 	}
362 
363 out:
364 	return rc;
365 }
366 
367 int tls_sw_sendmsg(struct sock *sk, struct msghdr *msg, size_t size)
368 {
369 	struct tls_context *tls_ctx = tls_get_ctx(sk);
370 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
371 	int ret = 0;
372 	int required_size;
373 	long timeo = sock_sndtimeo(sk, msg->msg_flags & MSG_DONTWAIT);
374 	bool eor = !(msg->msg_flags & MSG_MORE);
375 	size_t try_to_copy, copied = 0;
376 	unsigned char record_type = TLS_RECORD_TYPE_DATA;
377 	int record_room;
378 	bool full_record;
379 	int orig_size;
380 
381 	if (msg->msg_flags & ~(MSG_MORE | MSG_DONTWAIT | MSG_NOSIGNAL))
382 		return -ENOTSUPP;
383 
384 	lock_sock(sk);
385 
386 	if (tls_complete_pending_work(sk, tls_ctx, msg->msg_flags, &timeo))
387 		goto send_end;
388 
389 	if (unlikely(msg->msg_controllen)) {
390 		ret = tls_proccess_cmsg(sk, msg, &record_type);
391 		if (ret)
392 			goto send_end;
393 	}
394 
395 	while (msg_data_left(msg)) {
396 		if (sk->sk_err) {
397 			ret = -sk->sk_err;
398 			goto send_end;
399 		}
400 
401 		orig_size = ctx->sg_plaintext_size;
402 		full_record = false;
403 		try_to_copy = msg_data_left(msg);
404 		record_room = TLS_MAX_PAYLOAD_SIZE - ctx->sg_plaintext_size;
405 		if (try_to_copy >= record_room) {
406 			try_to_copy = record_room;
407 			full_record = true;
408 		}
409 
410 		required_size = ctx->sg_plaintext_size + try_to_copy +
411 				tls_ctx->tx.overhead_size;
412 
413 		if (!sk_stream_memory_free(sk))
414 			goto wait_for_sndbuf;
415 alloc_encrypted:
416 		ret = alloc_encrypted_sg(sk, required_size);
417 		if (ret) {
418 			if (ret != -ENOSPC)
419 				goto wait_for_memory;
420 
421 			/* Adjust try_to_copy according to the amount that was
422 			 * actually allocated. The difference is due
423 			 * to max sg elements limit
424 			 */
425 			try_to_copy -= required_size - ctx->sg_encrypted_size;
426 			full_record = true;
427 		}
428 
429 		if (full_record || eor) {
430 			ret = zerocopy_from_iter(sk, &msg->msg_iter,
431 				try_to_copy, &ctx->sg_plaintext_num_elem,
432 				&ctx->sg_plaintext_size,
433 				ctx->sg_plaintext_data,
434 				ARRAY_SIZE(ctx->sg_plaintext_data),
435 				true);
436 			if (ret)
437 				goto fallback_to_reg_send;
438 
439 			copied += try_to_copy;
440 			ret = tls_push_record(sk, msg->msg_flags, record_type);
441 			if (!ret)
442 				continue;
443 			if (ret == -EAGAIN)
444 				goto send_end;
445 
446 			copied -= try_to_copy;
447 fallback_to_reg_send:
448 			iov_iter_revert(&msg->msg_iter,
449 					ctx->sg_plaintext_size - orig_size);
450 			trim_sg(sk, ctx->sg_plaintext_data,
451 				&ctx->sg_plaintext_num_elem,
452 				&ctx->sg_plaintext_size,
453 				orig_size);
454 		}
455 
456 		required_size = ctx->sg_plaintext_size + try_to_copy;
457 alloc_plaintext:
458 		ret = alloc_plaintext_sg(sk, required_size);
459 		if (ret) {
460 			if (ret != -ENOSPC)
461 				goto wait_for_memory;
462 
463 			/* Adjust try_to_copy according to the amount that was
464 			 * actually allocated. The difference is due
465 			 * to max sg elements limit
466 			 */
467 			try_to_copy -= required_size - ctx->sg_plaintext_size;
468 			full_record = true;
469 
470 			trim_sg(sk, ctx->sg_encrypted_data,
471 				&ctx->sg_encrypted_num_elem,
472 				&ctx->sg_encrypted_size,
473 				ctx->sg_plaintext_size +
474 				tls_ctx->tx.overhead_size);
475 		}
476 
477 		ret = memcopy_from_iter(sk, &msg->msg_iter, try_to_copy);
478 		if (ret)
479 			goto trim_sgl;
480 
481 		copied += try_to_copy;
482 		if (full_record || eor) {
483 push_record:
484 			ret = tls_push_record(sk, msg->msg_flags, record_type);
485 			if (ret) {
486 				if (ret == -ENOMEM)
487 					goto wait_for_memory;
488 
489 				goto send_end;
490 			}
491 		}
492 
493 		continue;
494 
495 wait_for_sndbuf:
496 		set_bit(SOCK_NOSPACE, &sk->sk_socket->flags);
497 wait_for_memory:
498 		ret = sk_stream_wait_memory(sk, &timeo);
499 		if (ret) {
500 trim_sgl:
501 			trim_both_sgl(sk, orig_size);
502 			goto send_end;
503 		}
504 
505 		if (tls_is_pending_closed_record(tls_ctx))
506 			goto push_record;
507 
508 		if (ctx->sg_encrypted_size < required_size)
509 			goto alloc_encrypted;
510 
511 		goto alloc_plaintext;
512 	}
513 
514 send_end:
515 	ret = sk_stream_error(sk, msg->msg_flags, ret);
516 
517 	release_sock(sk);
518 	return copied ? copied : ret;
519 }
520 
521 int tls_sw_sendpage(struct sock *sk, struct page *page,
522 		    int offset, size_t size, int flags)
523 {
524 	struct tls_context *tls_ctx = tls_get_ctx(sk);
525 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
526 	int ret = 0;
527 	long timeo = sock_sndtimeo(sk, flags & MSG_DONTWAIT);
528 	bool eor;
529 	size_t orig_size = size;
530 	unsigned char record_type = TLS_RECORD_TYPE_DATA;
531 	struct scatterlist *sg;
532 	bool full_record;
533 	int record_room;
534 
535 	if (flags & ~(MSG_MORE | MSG_DONTWAIT | MSG_NOSIGNAL |
536 		      MSG_SENDPAGE_NOTLAST))
537 		return -ENOTSUPP;
538 
539 	/* No MSG_EOR from splice, only look at MSG_MORE */
540 	eor = !(flags & (MSG_MORE | MSG_SENDPAGE_NOTLAST));
541 
542 	lock_sock(sk);
543 
544 	sk_clear_bit(SOCKWQ_ASYNC_NOSPACE, sk);
545 
546 	if (tls_complete_pending_work(sk, tls_ctx, flags, &timeo))
547 		goto sendpage_end;
548 
549 	/* Call the sk_stream functions to manage the sndbuf mem. */
550 	while (size > 0) {
551 		size_t copy, required_size;
552 
553 		if (sk->sk_err) {
554 			ret = -sk->sk_err;
555 			goto sendpage_end;
556 		}
557 
558 		full_record = false;
559 		record_room = TLS_MAX_PAYLOAD_SIZE - ctx->sg_plaintext_size;
560 		copy = size;
561 		if (copy >= record_room) {
562 			copy = record_room;
563 			full_record = true;
564 		}
565 		required_size = ctx->sg_plaintext_size + copy +
566 			      tls_ctx->tx.overhead_size;
567 
568 		if (!sk_stream_memory_free(sk))
569 			goto wait_for_sndbuf;
570 alloc_payload:
571 		ret = alloc_encrypted_sg(sk, required_size);
572 		if (ret) {
573 			if (ret != -ENOSPC)
574 				goto wait_for_memory;
575 
576 			/* Adjust copy according to the amount that was
577 			 * actually allocated. The difference is due
578 			 * to max sg elements limit
579 			 */
580 			copy -= required_size - ctx->sg_plaintext_size;
581 			full_record = true;
582 		}
583 
584 		get_page(page);
585 		sg = ctx->sg_plaintext_data + ctx->sg_plaintext_num_elem;
586 		sg_set_page(sg, page, copy, offset);
587 		sg_unmark_end(sg);
588 
589 		ctx->sg_plaintext_num_elem++;
590 
591 		sk_mem_charge(sk, copy);
592 		offset += copy;
593 		size -= copy;
594 		ctx->sg_plaintext_size += copy;
595 		tls_ctx->pending_open_record_frags = ctx->sg_plaintext_num_elem;
596 
597 		if (full_record || eor ||
598 		    ctx->sg_plaintext_num_elem ==
599 		    ARRAY_SIZE(ctx->sg_plaintext_data)) {
600 push_record:
601 			ret = tls_push_record(sk, flags, record_type);
602 			if (ret) {
603 				if (ret == -ENOMEM)
604 					goto wait_for_memory;
605 
606 				goto sendpage_end;
607 			}
608 		}
609 		continue;
610 wait_for_sndbuf:
611 		set_bit(SOCK_NOSPACE, &sk->sk_socket->flags);
612 wait_for_memory:
613 		ret = sk_stream_wait_memory(sk, &timeo);
614 		if (ret) {
615 			trim_both_sgl(sk, ctx->sg_plaintext_size);
616 			goto sendpage_end;
617 		}
618 
619 		if (tls_is_pending_closed_record(tls_ctx))
620 			goto push_record;
621 
622 		goto alloc_payload;
623 	}
624 
625 sendpage_end:
626 	if (orig_size > size)
627 		ret = orig_size - size;
628 	else
629 		ret = sk_stream_error(sk, flags, ret);
630 
631 	release_sock(sk);
632 	return ret;
633 }
634 
635 static struct sk_buff *tls_wait_data(struct sock *sk, int flags,
636 				     long timeo, int *err)
637 {
638 	struct tls_context *tls_ctx = tls_get_ctx(sk);
639 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
640 	struct sk_buff *skb;
641 	DEFINE_WAIT_FUNC(wait, woken_wake_function);
642 
643 	while (!(skb = ctx->recv_pkt)) {
644 		if (sk->sk_err) {
645 			*err = sock_error(sk);
646 			return NULL;
647 		}
648 
649 		if (sock_flag(sk, SOCK_DONE))
650 			return NULL;
651 
652 		if ((flags & MSG_DONTWAIT) || !timeo) {
653 			*err = -EAGAIN;
654 			return NULL;
655 		}
656 
657 		add_wait_queue(sk_sleep(sk), &wait);
658 		sk_set_bit(SOCKWQ_ASYNC_WAITDATA, sk);
659 		sk_wait_event(sk, &timeo, ctx->recv_pkt != skb, &wait);
660 		sk_clear_bit(SOCKWQ_ASYNC_WAITDATA, sk);
661 		remove_wait_queue(sk_sleep(sk), &wait);
662 
663 		/* Handle signals */
664 		if (signal_pending(current)) {
665 			*err = sock_intr_errno(timeo);
666 			return NULL;
667 		}
668 	}
669 
670 	return skb;
671 }
672 
673 static int decrypt_skb(struct sock *sk, struct sk_buff *skb,
674 		       struct scatterlist *sgout)
675 {
676 	struct tls_context *tls_ctx = tls_get_ctx(sk);
677 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
678 	char iv[TLS_CIPHER_AES_GCM_128_SALT_SIZE + MAX_IV_SIZE];
679 	struct scatterlist sgin_arr[MAX_SKB_FRAGS + 2];
680 	struct scatterlist *sgin = &sgin_arr[0];
681 	struct strp_msg *rxm = strp_msg(skb);
682 	int ret, nsg = ARRAY_SIZE(sgin_arr);
683 	char aad_recv[TLS_AAD_SPACE_SIZE];
684 	struct sk_buff *unused;
685 
686 	ret = skb_copy_bits(skb, rxm->offset + TLS_HEADER_SIZE,
687 			    iv + TLS_CIPHER_AES_GCM_128_SALT_SIZE,
688 			    tls_ctx->rx.iv_size);
689 	if (ret < 0)
690 		return ret;
691 
692 	memcpy(iv, tls_ctx->rx.iv, TLS_CIPHER_AES_GCM_128_SALT_SIZE);
693 	if (!sgout) {
694 		nsg = skb_cow_data(skb, 0, &unused) + 1;
695 		sgin = kmalloc_array(nsg, sizeof(*sgin), sk->sk_allocation);
696 		if (!sgout)
697 			sgout = sgin;
698 	}
699 
700 	sg_init_table(sgin, nsg);
701 	sg_set_buf(&sgin[0], aad_recv, sizeof(aad_recv));
702 
703 	nsg = skb_to_sgvec(skb, &sgin[1],
704 			   rxm->offset + tls_ctx->rx.prepend_size,
705 			   rxm->full_len - tls_ctx->rx.prepend_size);
706 
707 	tls_make_aad(aad_recv,
708 		     rxm->full_len - tls_ctx->rx.overhead_size,
709 		     tls_ctx->rx.rec_seq,
710 		     tls_ctx->rx.rec_seq_size,
711 		     ctx->control);
712 
713 	ret = tls_do_decryption(sk, sgin, sgout, iv,
714 				rxm->full_len - tls_ctx->rx.overhead_size,
715 				skb, sk->sk_allocation);
716 
717 	if (sgin != &sgin_arr[0])
718 		kfree(sgin);
719 
720 	return ret;
721 }
722 
723 static bool tls_sw_advance_skb(struct sock *sk, struct sk_buff *skb,
724 			       unsigned int len)
725 {
726 	struct tls_context *tls_ctx = tls_get_ctx(sk);
727 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
728 	struct strp_msg *rxm = strp_msg(skb);
729 
730 	if (len < rxm->full_len) {
731 		rxm->offset += len;
732 		rxm->full_len -= len;
733 
734 		return false;
735 	}
736 
737 	/* Finished with message */
738 	ctx->recv_pkt = NULL;
739 	kfree_skb(skb);
740 	strp_unpause(&ctx->strp);
741 
742 	return true;
743 }
744 
745 int tls_sw_recvmsg(struct sock *sk,
746 		   struct msghdr *msg,
747 		   size_t len,
748 		   int nonblock,
749 		   int flags,
750 		   int *addr_len)
751 {
752 	struct tls_context *tls_ctx = tls_get_ctx(sk);
753 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
754 	unsigned char control;
755 	struct strp_msg *rxm;
756 	struct sk_buff *skb;
757 	ssize_t copied = 0;
758 	bool cmsg = false;
759 	int err = 0;
760 	long timeo;
761 
762 	flags |= nonblock;
763 
764 	if (unlikely(flags & MSG_ERRQUEUE))
765 		return sock_recv_errqueue(sk, msg, len, SOL_IP, IP_RECVERR);
766 
767 	lock_sock(sk);
768 
769 	timeo = sock_rcvtimeo(sk, flags & MSG_DONTWAIT);
770 	do {
771 		bool zc = false;
772 		int chunk = 0;
773 
774 		skb = tls_wait_data(sk, flags, timeo, &err);
775 		if (!skb)
776 			goto recv_end;
777 
778 		rxm = strp_msg(skb);
779 		if (!cmsg) {
780 			int cerr;
781 
782 			cerr = put_cmsg(msg, SOL_TLS, TLS_GET_RECORD_TYPE,
783 					sizeof(ctx->control), &ctx->control);
784 			cmsg = true;
785 			control = ctx->control;
786 			if (ctx->control != TLS_RECORD_TYPE_DATA) {
787 				if (cerr || msg->msg_flags & MSG_CTRUNC) {
788 					err = -EIO;
789 					goto recv_end;
790 				}
791 			}
792 		} else if (control != ctx->control) {
793 			goto recv_end;
794 		}
795 
796 		if (!ctx->decrypted) {
797 			int page_count;
798 			int to_copy;
799 
800 			page_count = iov_iter_npages(&msg->msg_iter,
801 						     MAX_SKB_FRAGS);
802 			to_copy = rxm->full_len - tls_ctx->rx.overhead_size;
803 			if (to_copy <= len && page_count < MAX_SKB_FRAGS &&
804 			    likely(!(flags & MSG_PEEK)))  {
805 				struct scatterlist sgin[MAX_SKB_FRAGS + 1];
806 				char unused[21];
807 				int pages = 0;
808 
809 				zc = true;
810 				sg_init_table(sgin, MAX_SKB_FRAGS + 1);
811 				sg_set_buf(&sgin[0], unused, 13);
812 
813 				err = zerocopy_from_iter(sk, &msg->msg_iter,
814 							 to_copy, &pages,
815 							 &chunk, &sgin[1],
816 							 MAX_SKB_FRAGS,	false);
817 				if (err < 0)
818 					goto fallback_to_reg_recv;
819 
820 				err = decrypt_skb(sk, skb, sgin);
821 				for (; pages > 0; pages--)
822 					put_page(sg_page(&sgin[pages]));
823 				if (err < 0) {
824 					tls_err_abort(sk, EBADMSG);
825 					goto recv_end;
826 				}
827 			} else {
828 fallback_to_reg_recv:
829 				err = decrypt_skb(sk, skb, NULL);
830 				if (err < 0) {
831 					tls_err_abort(sk, EBADMSG);
832 					goto recv_end;
833 				}
834 			}
835 			ctx->decrypted = true;
836 		}
837 
838 		if (!zc) {
839 			chunk = min_t(unsigned int, rxm->full_len, len);
840 			err = skb_copy_datagram_msg(skb, rxm->offset, msg,
841 						    chunk);
842 			if (err < 0)
843 				goto recv_end;
844 		}
845 
846 		copied += chunk;
847 		len -= chunk;
848 		if (likely(!(flags & MSG_PEEK))) {
849 			u8 control = ctx->control;
850 
851 			if (tls_sw_advance_skb(sk, skb, chunk)) {
852 				/* Return full control message to
853 				 * userspace before trying to parse
854 				 * another message type
855 				 */
856 				msg->msg_flags |= MSG_EOR;
857 				if (control != TLS_RECORD_TYPE_DATA)
858 					goto recv_end;
859 			}
860 		}
861 	} while (len);
862 
863 recv_end:
864 	release_sock(sk);
865 	return copied ? : err;
866 }
867 
868 ssize_t tls_sw_splice_read(struct socket *sock,  loff_t *ppos,
869 			   struct pipe_inode_info *pipe,
870 			   size_t len, unsigned int flags)
871 {
872 	struct tls_context *tls_ctx = tls_get_ctx(sock->sk);
873 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
874 	struct strp_msg *rxm = NULL;
875 	struct sock *sk = sock->sk;
876 	struct sk_buff *skb;
877 	ssize_t copied = 0;
878 	int err = 0;
879 	long timeo;
880 	int chunk;
881 
882 	lock_sock(sk);
883 
884 	timeo = sock_rcvtimeo(sk, flags & MSG_DONTWAIT);
885 
886 	skb = tls_wait_data(sk, flags, timeo, &err);
887 	if (!skb)
888 		goto splice_read_end;
889 
890 	/* splice does not support reading control messages */
891 	if (ctx->control != TLS_RECORD_TYPE_DATA) {
892 		err = -ENOTSUPP;
893 		goto splice_read_end;
894 	}
895 
896 	if (!ctx->decrypted) {
897 		err = decrypt_skb(sk, skb, NULL);
898 
899 		if (err < 0) {
900 			tls_err_abort(sk, EBADMSG);
901 			goto splice_read_end;
902 		}
903 		ctx->decrypted = true;
904 	}
905 	rxm = strp_msg(skb);
906 
907 	chunk = min_t(unsigned int, rxm->full_len, len);
908 	copied = skb_splice_bits(skb, sk, rxm->offset, pipe, chunk, flags);
909 	if (copied < 0)
910 		goto splice_read_end;
911 
912 	if (likely(!(flags & MSG_PEEK)))
913 		tls_sw_advance_skb(sk, skb, copied);
914 
915 splice_read_end:
916 	release_sock(sk);
917 	return copied ? : err;
918 }
919 
920 unsigned int tls_sw_poll(struct file *file, struct socket *sock,
921 			 struct poll_table_struct *wait)
922 {
923 	unsigned int ret;
924 	struct sock *sk = sock->sk;
925 	struct tls_context *tls_ctx = tls_get_ctx(sk);
926 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
927 
928 	/* Grab POLLOUT and POLLHUP from the underlying socket */
929 	ret = ctx->sk_poll(file, sock, wait);
930 
931 	/* Clear POLLIN bits, and set based on recv_pkt */
932 	ret &= ~(POLLIN | POLLRDNORM);
933 	if (ctx->recv_pkt)
934 		ret |= POLLIN | POLLRDNORM;
935 
936 	return ret;
937 }
938 
939 static int tls_read_size(struct strparser *strp, struct sk_buff *skb)
940 {
941 	struct tls_context *tls_ctx = tls_get_ctx(strp->sk);
942 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
943 	char header[tls_ctx->rx.prepend_size];
944 	struct strp_msg *rxm = strp_msg(skb);
945 	size_t cipher_overhead;
946 	size_t data_len = 0;
947 	int ret;
948 
949 	/* Verify that we have a full TLS header, or wait for more data */
950 	if (rxm->offset + tls_ctx->rx.prepend_size > skb->len)
951 		return 0;
952 
953 	/* Linearize header to local buffer */
954 	ret = skb_copy_bits(skb, rxm->offset, header, tls_ctx->rx.prepend_size);
955 
956 	if (ret < 0)
957 		goto read_failure;
958 
959 	ctx->control = header[0];
960 
961 	data_len = ((header[4] & 0xFF) | (header[3] << 8));
962 
963 	cipher_overhead = tls_ctx->rx.tag_size + tls_ctx->rx.iv_size;
964 
965 	if (data_len > TLS_MAX_PAYLOAD_SIZE + cipher_overhead) {
966 		ret = -EMSGSIZE;
967 		goto read_failure;
968 	}
969 	if (data_len < cipher_overhead) {
970 		ret = -EBADMSG;
971 		goto read_failure;
972 	}
973 
974 	if (header[1] != TLS_VERSION_MINOR(tls_ctx->crypto_recv.version) ||
975 	    header[2] != TLS_VERSION_MAJOR(tls_ctx->crypto_recv.version)) {
976 		ret = -EINVAL;
977 		goto read_failure;
978 	}
979 
980 	return data_len + TLS_HEADER_SIZE;
981 
982 read_failure:
983 	tls_err_abort(strp->sk, ret);
984 
985 	return ret;
986 }
987 
988 static void tls_queue(struct strparser *strp, struct sk_buff *skb)
989 {
990 	struct tls_context *tls_ctx = tls_get_ctx(strp->sk);
991 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
992 	struct strp_msg *rxm;
993 
994 	rxm = strp_msg(skb);
995 
996 	ctx->decrypted = false;
997 
998 	ctx->recv_pkt = skb;
999 	strp_pause(strp);
1000 
1001 	strp->sk->sk_state_change(strp->sk);
1002 }
1003 
1004 static void tls_data_ready(struct sock *sk)
1005 {
1006 	struct tls_context *tls_ctx = tls_get_ctx(sk);
1007 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
1008 
1009 	strp_data_ready(&ctx->strp);
1010 }
1011 
1012 void tls_sw_free_resources(struct sock *sk)
1013 {
1014 	struct tls_context *tls_ctx = tls_get_ctx(sk);
1015 	struct tls_sw_context *ctx = tls_sw_ctx(tls_ctx);
1016 
1017 	if (ctx->aead_send)
1018 		crypto_free_aead(ctx->aead_send);
1019 	if (ctx->aead_recv) {
1020 		if (ctx->recv_pkt) {
1021 			kfree_skb(ctx->recv_pkt);
1022 			ctx->recv_pkt = NULL;
1023 		}
1024 		crypto_free_aead(ctx->aead_recv);
1025 		strp_stop(&ctx->strp);
1026 		write_lock_bh(&sk->sk_callback_lock);
1027 		sk->sk_data_ready = ctx->saved_data_ready;
1028 		write_unlock_bh(&sk->sk_callback_lock);
1029 		release_sock(sk);
1030 		strp_done(&ctx->strp);
1031 		lock_sock(sk);
1032 	}
1033 
1034 	tls_free_both_sg(sk);
1035 
1036 	kfree(ctx);
1037 	kfree(tls_ctx);
1038 }
1039 
1040 int tls_set_sw_offload(struct sock *sk, struct tls_context *ctx, int tx)
1041 {
1042 	char keyval[TLS_CIPHER_AES_GCM_128_KEY_SIZE];
1043 	struct tls_crypto_info *crypto_info;
1044 	struct tls12_crypto_info_aes_gcm_128 *gcm_128_info;
1045 	struct tls_sw_context *sw_ctx;
1046 	struct cipher_context *cctx;
1047 	struct crypto_aead **aead;
1048 	struct strp_callbacks cb;
1049 	u16 nonce_size, tag_size, iv_size, rec_seq_size;
1050 	char *iv, *rec_seq;
1051 	int rc = 0;
1052 
1053 	if (!ctx) {
1054 		rc = -EINVAL;
1055 		goto out;
1056 	}
1057 
1058 	if (!ctx->priv_ctx) {
1059 		sw_ctx = kzalloc(sizeof(*sw_ctx), GFP_KERNEL);
1060 		if (!sw_ctx) {
1061 			rc = -ENOMEM;
1062 			goto out;
1063 		}
1064 		crypto_init_wait(&sw_ctx->async_wait);
1065 	} else {
1066 		sw_ctx = ctx->priv_ctx;
1067 	}
1068 
1069 	ctx->priv_ctx = (struct tls_offload_context *)sw_ctx;
1070 
1071 	if (tx) {
1072 		crypto_info = &ctx->crypto_send;
1073 		cctx = &ctx->tx;
1074 		aead = &sw_ctx->aead_send;
1075 	} else {
1076 		crypto_info = &ctx->crypto_recv;
1077 		cctx = &ctx->rx;
1078 		aead = &sw_ctx->aead_recv;
1079 	}
1080 
1081 	switch (crypto_info->cipher_type) {
1082 	case TLS_CIPHER_AES_GCM_128: {
1083 		nonce_size = TLS_CIPHER_AES_GCM_128_IV_SIZE;
1084 		tag_size = TLS_CIPHER_AES_GCM_128_TAG_SIZE;
1085 		iv_size = TLS_CIPHER_AES_GCM_128_IV_SIZE;
1086 		iv = ((struct tls12_crypto_info_aes_gcm_128 *)crypto_info)->iv;
1087 		rec_seq_size = TLS_CIPHER_AES_GCM_128_REC_SEQ_SIZE;
1088 		rec_seq =
1089 		 ((struct tls12_crypto_info_aes_gcm_128 *)crypto_info)->rec_seq;
1090 		gcm_128_info =
1091 			(struct tls12_crypto_info_aes_gcm_128 *)crypto_info;
1092 		break;
1093 	}
1094 	default:
1095 		rc = -EINVAL;
1096 		goto free_priv;
1097 	}
1098 
1099 	/* Sanity-check the IV size for stack allocations. */
1100 	if (iv_size > MAX_IV_SIZE) {
1101 		rc = -EINVAL;
1102 		goto free_priv;
1103 	}
1104 
1105 	cctx->prepend_size = TLS_HEADER_SIZE + nonce_size;
1106 	cctx->tag_size = tag_size;
1107 	cctx->overhead_size = cctx->prepend_size + cctx->tag_size;
1108 	cctx->iv_size = iv_size;
1109 	cctx->iv = kmalloc(iv_size + TLS_CIPHER_AES_GCM_128_SALT_SIZE,
1110 			   GFP_KERNEL);
1111 	if (!cctx->iv) {
1112 		rc = -ENOMEM;
1113 		goto free_priv;
1114 	}
1115 	memcpy(cctx->iv, gcm_128_info->salt, TLS_CIPHER_AES_GCM_128_SALT_SIZE);
1116 	memcpy(cctx->iv + TLS_CIPHER_AES_GCM_128_SALT_SIZE, iv, iv_size);
1117 	cctx->rec_seq_size = rec_seq_size;
1118 	cctx->rec_seq = kmalloc(rec_seq_size, GFP_KERNEL);
1119 	if (!cctx->rec_seq) {
1120 		rc = -ENOMEM;
1121 		goto free_iv;
1122 	}
1123 	memcpy(cctx->rec_seq, rec_seq, rec_seq_size);
1124 
1125 	if (tx) {
1126 		sg_init_table(sw_ctx->sg_encrypted_data,
1127 			      ARRAY_SIZE(sw_ctx->sg_encrypted_data));
1128 		sg_init_table(sw_ctx->sg_plaintext_data,
1129 			      ARRAY_SIZE(sw_ctx->sg_plaintext_data));
1130 
1131 		sg_init_table(sw_ctx->sg_aead_in, 2);
1132 		sg_set_buf(&sw_ctx->sg_aead_in[0], sw_ctx->aad_space,
1133 			   sizeof(sw_ctx->aad_space));
1134 		sg_unmark_end(&sw_ctx->sg_aead_in[1]);
1135 		sg_chain(sw_ctx->sg_aead_in, 2, sw_ctx->sg_plaintext_data);
1136 		sg_init_table(sw_ctx->sg_aead_out, 2);
1137 		sg_set_buf(&sw_ctx->sg_aead_out[0], sw_ctx->aad_space,
1138 			   sizeof(sw_ctx->aad_space));
1139 		sg_unmark_end(&sw_ctx->sg_aead_out[1]);
1140 		sg_chain(sw_ctx->sg_aead_out, 2, sw_ctx->sg_encrypted_data);
1141 	}
1142 
1143 	if (!*aead) {
1144 		*aead = crypto_alloc_aead("gcm(aes)", 0, 0);
1145 		if (IS_ERR(*aead)) {
1146 			rc = PTR_ERR(*aead);
1147 			*aead = NULL;
1148 			goto free_rec_seq;
1149 		}
1150 	}
1151 
1152 	ctx->push_pending_record = tls_sw_push_pending_record;
1153 
1154 	memcpy(keyval, gcm_128_info->key, TLS_CIPHER_AES_GCM_128_KEY_SIZE);
1155 
1156 	rc = crypto_aead_setkey(*aead, keyval,
1157 				TLS_CIPHER_AES_GCM_128_KEY_SIZE);
1158 	if (rc)
1159 		goto free_aead;
1160 
1161 	rc = crypto_aead_setauthsize(*aead, cctx->tag_size);
1162 	if (rc)
1163 		goto free_aead;
1164 
1165 	if (!tx) {
1166 		/* Set up strparser */
1167 		memset(&cb, 0, sizeof(cb));
1168 		cb.rcv_msg = tls_queue;
1169 		cb.parse_msg = tls_read_size;
1170 
1171 		strp_init(&sw_ctx->strp, sk, &cb);
1172 
1173 		write_lock_bh(&sk->sk_callback_lock);
1174 		sw_ctx->saved_data_ready = sk->sk_data_ready;
1175 		sk->sk_data_ready = tls_data_ready;
1176 		write_unlock_bh(&sk->sk_callback_lock);
1177 
1178 		sw_ctx->sk_poll = sk->sk_socket->ops->poll;
1179 
1180 		strp_check_rcv(&sw_ctx->strp);
1181 	}
1182 
1183 	goto out;
1184 
1185 free_aead:
1186 	crypto_free_aead(*aead);
1187 	*aead = NULL;
1188 free_rec_seq:
1189 	kfree(cctx->rec_seq);
1190 	cctx->rec_seq = NULL;
1191 free_iv:
1192 	kfree(ctx->tx.iv);
1193 	ctx->tx.iv = NULL;
1194 free_priv:
1195 	kfree(ctx->priv_ctx);
1196 	ctx->priv_ctx = NULL;
1197 out:
1198 	return rc;
1199 }
1200