Line data Source code
1 : #include <math.h>
2 :
3 : #include <tlspicotls/certs.h>
4 : #include <tlspicotls/tls_picotls.h>
5 : #include <tlspicotls/pico_vpp_crypto.h>
6 :
7 : picotls_main_t picotls_main;
8 :
9 : #define MAX_QUEUE 12000
10 : #define PTLS_MAX_PLAINTEXT_RECORD_SIZE 16384
11 :
12 : static ptls_key_exchange_algorithm_t *default_key_exchange[] = {
13 : #ifdef PTLS_OPENSSL_HAVE_X25519
14 : &ptls_openssl_x25519,
15 : #endif
16 : #ifdef PTLS_OPENSSL_HAVE_SECP256R1
17 : &ptls_openssl_secp256r1,
18 : #endif
19 : #ifdef PTLS_OPENSSL_HAVE_SECP384R1
20 : &ptls_openssl_secp384r1,
21 : #endif
22 : #ifdef PTLS_OPENSSL_HAVE_SECP521R1
23 : &ptls_openssl_secp521r1
24 : #endif
25 : };
26 :
27 : static u32
28 0 : picotls_ctx_alloc (void)
29 : {
30 0 : u32 thread_id = vlib_get_thread_index ();
31 0 : picotls_main_t *pm = &picotls_main;
32 : picotls_ctx_t **ctx;
33 :
34 0 : pool_get_aligned_safe (pm->ctx_pool[thread_id], ctx, CLIB_CACHE_LINE_BYTES);
35 0 : if (!(*ctx))
36 0 : *ctx = clib_mem_alloc (sizeof (picotls_ctx_t));
37 :
38 0 : clib_memset (*ctx, 0, sizeof (picotls_ctx_t));
39 0 : (*ctx)->ctx.c_thread_index = thread_id;
40 0 : (*ctx)->ctx.tls_ctx_engine = CRYPTO_ENGINE_PICOTLS;
41 0 : (*ctx)->ctx.app_session_handle = SESSION_INVALID_HANDLE;
42 0 : (*ctx)->ptls_ctx_idx = ctx - pm->ctx_pool[thread_id];
43 0 : return (*ctx)->ptls_ctx_idx;
44 : }
45 :
46 : static void
47 0 : picotls_ctx_free (tls_ctx_t * ctx)
48 : {
49 0 : picotls_ctx_t *ptls_ctx = (picotls_ctx_t *) ctx;
50 0 : vec_free (ptls_ctx->rx_content);
51 0 : ptls_free (ptls_ctx->tls);
52 0 : pool_put_index (picotls_main.ctx_pool[ctx->c_thread_index],
53 : ptls_ctx->ptls_ctx_idx);
54 0 : }
55 :
56 : static u32
57 0 : picotls_listen_ctx_alloc (void)
58 : {
59 0 : picotls_main_t *pm = &picotls_main;
60 : picotls_listen_ctx_t *ptls_lctx;
61 :
62 0 : pool_get (pm->lctx_pool, ptls_lctx);
63 :
64 0 : clib_memset (ptls_lctx, 0, sizeof (picotls_listen_ctx_t));
65 0 : ptls_lctx->ptls_lctx_index = ptls_lctx - pm->lctx_pool;
66 0 : return ptls_lctx->ptls_lctx_index;
67 : }
68 :
69 : static void
70 0 : picotls_listen_ctx_free (picotls_listen_ctx_t * lctx)
71 : {
72 0 : pool_put_index (picotls_main.lctx_pool, lctx->ptls_lctx_index);
73 0 : }
74 :
75 : tls_ctx_t *
76 0 : picotls_ctx_get (u32 ctx_index)
77 : {
78 : picotls_ctx_t **ctx;
79 0 : ctx =
80 0 : pool_elt_at_index (picotls_main.ctx_pool[vlib_get_thread_index ()],
81 : ctx_index);
82 0 : return &(*ctx)->ctx;
83 : }
84 :
85 : picotls_listen_ctx_t *
86 0 : picotls_lctx_get (u32 lctx_index)
87 : {
88 0 : return pool_elt_at_index (picotls_main.lctx_pool, lctx_index);
89 : }
90 :
91 : static u8
92 0 : picotls_handshake_is_over (tls_ctx_t * ctx)
93 : {
94 0 : picotls_ctx_t *ptls_ctx = (picotls_ctx_t *) ctx;
95 0 : assert (ptls_ctx->tls);
96 0 : return ptls_handshake_is_complete (ptls_ctx->tls);
97 : }
98 :
99 : static int
100 0 : picotls_try_handshake_write (picotls_ctx_t * ptls_ctx,
101 : session_t * tls_session, ptls_buffer_t * buf)
102 : {
103 : u32 enq_max, enq_now;
104 : svm_fifo_t *f;
105 : int write, buf_left;
106 :
107 0 : if (buf->off <= 0)
108 0 : return 0;
109 :
110 0 : f = tls_session->tx_fifo;
111 0 : buf_left = buf->off;
112 0 : enq_max = svm_fifo_max_enqueue_prod (f);
113 0 : if (!enq_max)
114 0 : return 0;
115 :
116 0 : enq_now = clib_min (svm_fifo_max_write_chunk (f), enq_max);
117 0 : enq_now = clib_min (enq_now, buf_left);
118 0 : write = svm_fifo_enqueue (f, enq_now, buf->base);
119 0 : buf_left -= write;
120 0 : tls_add_vpp_q_tx_evt (tls_session);
121 0 : return write;
122 : }
123 :
124 : static int
125 0 : picotls_start_listen (tls_ctx_t * lctx)
126 : {
127 : picotls_listen_ctx_t *ptls_lctx;
128 : ptls_context_t *ptls_ctx;
129 : u32 ptls_lctx_idx;
130 : app_cert_key_pair_t *ckpair;
131 :
132 0 : ckpair = app_cert_key_pair_get_if_valid (lctx->ckpair_index);
133 0 : if (!ckpair || !ckpair->cert || !ckpair->key)
134 : {
135 : TLS_DBG (1, "tls cert and/or key not configured %d",
136 : lctx->parent_app_wrk_index);
137 0 : return -1;
138 : }
139 :
140 0 : ptls_lctx_idx = picotls_listen_ctx_alloc ();
141 0 : ptls_lctx = picotls_lctx_get (ptls_lctx_idx);
142 0 : ptls_ctx = malloc (sizeof (ptls_context_t));
143 0 : ptls_lctx->ptls_ctx = ptls_ctx;
144 :
145 0 : memset (ptls_ctx, 0, sizeof (ptls_context_t));
146 0 : ptls_ctx->update_open_count = NULL;
147 :
148 : /*
149 : * Process certificate & private key.
150 : */
151 0 : load_bio_certificate_chain (ptls_ctx, (char *) ckpair->cert);
152 0 : load_bio_private_key (ptls_ctx, (char *) ckpair->key);
153 :
154 : /* setup protocol related functions */
155 0 : ptls_ctx->key_exchanges = default_key_exchange;
156 0 : ptls_ctx->random_bytes = ptls_openssl_random_bytes;
157 0 : ptls_ctx->cipher_suites = ptls_vpp_crypto_cipher_suites;
158 0 : ptls_ctx->get_time = &ptls_get_time;
159 :
160 0 : lctx->tls_ssl_ctx = ptls_lctx_idx;
161 :
162 0 : return 0;
163 : }
164 :
165 : static int
166 0 : picotls_stop_listen (tls_ctx_t * lctx)
167 : {
168 : u32 ptls_lctx_index;
169 : picotls_listen_ctx_t *ptls_lctx;
170 :
171 0 : ptls_lctx_index = lctx->tls_ssl_ctx;
172 0 : ptls_lctx = picotls_lctx_get (ptls_lctx_index);
173 :
174 0 : picotls_listen_ctx_free (ptls_lctx);
175 :
176 0 : return 0;
177 : }
178 :
179 : static void
180 0 : picotls_handle_handshake_failure (tls_ctx_t * ctx)
181 : {
182 0 : session_free (session_get (ctx->c_s_index, ctx->c_thread_index));
183 0 : ctx->no_app_session = 1;
184 0 : ctx->c_s_index = SESSION_INVALID_INDEX;
185 0 : tls_disconnect_transport (ctx);
186 0 : }
187 :
188 : static void
189 0 : picotls_confirm_app_close (tls_ctx_t * ctx)
190 : {
191 0 : tls_disconnect_transport (ctx);
192 0 : session_transport_closed_notify (&ctx->connection);
193 0 : }
194 :
195 : static int
196 0 : picotls_transport_close (tls_ctx_t * ctx)
197 : {
198 0 : if (!picotls_handshake_is_over (ctx))
199 : {
200 0 : picotls_handle_handshake_failure (ctx);
201 0 : return 0;
202 : }
203 0 : session_transport_closing_notify (&ctx->connection);
204 0 : return 0;
205 : }
206 :
207 : static int
208 0 : picotls_app_close (tls_ctx_t * ctx)
209 : {
210 : session_t *app_session;
211 :
212 0 : app_session = session_get_from_handle (ctx->app_session_handle);
213 0 : if (!svm_fifo_max_dequeue_cons (app_session->tx_fifo))
214 0 : picotls_confirm_app_close (ctx);
215 : else
216 0 : ctx->app_closed = 1;
217 :
218 0 : return 0;
219 : }
220 :
221 : static inline int
222 0 : picotls_do_handshake (picotls_ctx_t *ptls_ctx, session_t *tcp_session)
223 0 : {
224 0 : int rv = PTLS_ERROR_IN_PROGRESS, write = 0, i = 0, read = 0, len;
225 0 : svm_fifo_t *tcp_rx_fifo = tcp_session->rx_fifo;
226 0 : ptls_buffer_t *buf = &ptls_ctx->read_buffer;
227 0 : u32 n_segs = 2, max_len = 16384;
228 0 : ptls_t *tls = ptls_ctx->tls;
229 0 : svm_fifo_seg_t fs[n_segs];
230 : uword deq_now;
231 :
232 0 : ptls_buffer_init (buf, "", 0);
233 :
234 0 : len = svm_fifo_segments (tcp_rx_fifo, 0, fs, &n_segs, max_len);
235 0 : if (len <= 0)
236 0 : return 0;
237 :
238 0 : while (read < len && i < n_segs)
239 : {
240 0 : deq_now = fs[i].len;
241 0 : rv = ptls_handshake (tls, buf, fs[i].data, &deq_now, NULL);
242 :
243 0 : write += picotls_try_handshake_write (ptls_ctx, tcp_session, buf);
244 0 : read += deq_now;
245 :
246 0 : if (!(rv == 0 || rv == PTLS_ERROR_IN_PROGRESS))
247 : {
248 0 : clib_error ("unexpected error %u", rv);
249 0 : break;
250 : }
251 :
252 0 : if (!rv)
253 0 : break;
254 :
255 0 : if (deq_now < fs[i].len)
256 : {
257 0 : fs[i].data += deq_now;
258 0 : fs[i].len -= deq_now;
259 : }
260 : else
261 0 : i++;
262 : }
263 :
264 0 : if (read)
265 0 : svm_fifo_dequeue_drop (tcp_rx_fifo, read);
266 :
267 0 : ptls_buffer_dispose (buf);
268 :
269 0 : return write;
270 : }
271 :
272 : static inline int
273 0 : ptls_copy_buf_to_fs (ptls_buffer_t *buf, u32 to_copy, svm_fifo_seg_t *fs,
274 : u32 *fs_idx, u32 max_fs)
275 : {
276 0 : u32 idx = *fs_idx;
277 :
278 0 : while (to_copy)
279 : {
280 0 : if (fs[idx].len <= to_copy)
281 : {
282 0 : clib_memcpy_fast (fs[idx].data, buf->base + (buf->off - to_copy),
283 0 : fs[idx].len);
284 0 : to_copy -= fs[idx].len;
285 0 : idx += 1;
286 : /* no more space in the app's rx fifo */
287 0 : if (idx == max_fs)
288 0 : break;
289 : }
290 : else
291 : {
292 0 : clib_memcpy_fast (fs[idx].data, buf->base + (buf->off - to_copy),
293 : to_copy);
294 0 : fs[idx].len -= to_copy;
295 0 : fs[idx].data += to_copy;
296 0 : to_copy = 0;
297 : }
298 : }
299 :
300 0 : *fs_idx = idx;
301 :
302 0 : return to_copy;
303 : }
304 :
305 : static u32
306 0 : ptls_tcp_to_app_write (picotls_ctx_t *ptls_ctx, svm_fifo_t *app_rx_fifo,
307 : svm_fifo_t *tcp_rx_fifo)
308 0 : {
309 0 : u32 ai = 0, thread_index, min_buf_len, to_copy, left, wrote = 0;
310 0 : ptls_buffer_t *buf = &ptls_ctx->read_buffer;
311 0 : int ret, i = 0, read = 0, tcp_len, n_fs_app;
312 0 : u32 n_segs = 4, max_len = 1 << 16;
313 0 : svm_fifo_seg_t tcp_fs[n_segs], app_fs[n_segs];
314 0 : picotls_main_t *pm = &picotls_main;
315 : uword deq_now;
316 : u8 is_nocopy;
317 :
318 0 : thread_index = ptls_ctx->ctx.c_thread_index;
319 :
320 0 : n_fs_app = svm_fifo_provision_chunks (app_rx_fifo, app_fs, n_segs, max_len);
321 0 : if (n_fs_app <= 0)
322 0 : return 0;
323 :
324 0 : tcp_len = svm_fifo_segments (tcp_rx_fifo, 0, tcp_fs, &n_segs, max_len);
325 0 : if (tcp_len <= 0)
326 0 : return 0;
327 :
328 0 : if (ptls_ctx->read_buffer_offset)
329 : {
330 0 : to_copy = buf->off - ptls_ctx->read_buffer_offset;
331 0 : left = ptls_copy_buf_to_fs (buf, to_copy, app_fs, &ai, n_fs_app);
332 0 : wrote += to_copy - left;
333 0 : if (left)
334 : {
335 0 : ptls_ctx->read_buffer_offset = buf->off - left;
336 0 : goto do_checks;
337 : }
338 0 : ptls_ctx->read_buffer_offset = 0;
339 : }
340 :
341 0 : while (ai < n_fs_app && read < tcp_len)
342 : {
343 0 : deq_now = clib_min (tcp_fs[i].len, tcp_len - read);
344 0 : min_buf_len = deq_now + (16 << 10);
345 0 : is_nocopy = app_fs[ai].len < min_buf_len ? 0 : 1;
346 0 : if (is_nocopy)
347 : {
348 0 : ptls_buffer_init (buf, app_fs[ai].data, app_fs[ai].len);
349 0 : ret = ptls_receive (ptls_ctx->tls, buf, tcp_fs[i].data, &deq_now);
350 0 : assert (ret == 0 || ret == PTLS_ERROR_IN_PROGRESS);
351 :
352 0 : wrote += buf->off;
353 0 : if (buf->off == app_fs[ai].len)
354 : {
355 0 : ai++;
356 : }
357 : else
358 : {
359 0 : app_fs[ai].len -= buf->off;
360 0 : app_fs[ai].data += buf->off;
361 : }
362 : }
363 : else
364 : {
365 0 : vec_validate (pm->rx_bufs[thread_index], min_buf_len);
366 0 : ptls_buffer_init (buf, pm->rx_bufs[thread_index], min_buf_len);
367 0 : ret = ptls_receive (ptls_ctx->tls, buf, tcp_fs[i].data, &deq_now);
368 0 : assert (ret == 0 || ret == PTLS_ERROR_IN_PROGRESS);
369 :
370 0 : left = ptls_copy_buf_to_fs (buf, buf->off, app_fs, &ai, n_fs_app);
371 0 : if (!left)
372 : {
373 0 : ptls_ctx->read_buffer_offset = 0;
374 0 : wrote += buf->off;
375 : }
376 : else
377 : {
378 0 : ptls_ctx->read_buffer_offset = buf->off - left;
379 0 : wrote += ptls_ctx->read_buffer_offset;
380 : }
381 : }
382 :
383 0 : assert (deq_now <= tcp_fs[i].len);
384 0 : read += deq_now;
385 0 : if (deq_now < tcp_fs[i].len)
386 : {
387 0 : tcp_fs[i].data += deq_now;
388 0 : tcp_fs[i].len -= deq_now;
389 : }
390 : else
391 0 : i++;
392 : }
393 :
394 0 : do_checks:
395 :
396 0 : if (read)
397 : {
398 0 : svm_fifo_dequeue_drop (tcp_rx_fifo, read);
399 0 : if (svm_fifo_needs_deq_ntf (tcp_rx_fifo, read))
400 : {
401 0 : svm_fifo_clear_deq_ntf (tcp_rx_fifo);
402 0 : session_send_io_evt_to_thread (tcp_rx_fifo, SESSION_IO_EVT_RX);
403 : }
404 : }
405 :
406 0 : if (wrote)
407 0 : svm_fifo_enqueue_nocopy (app_rx_fifo, wrote);
408 :
409 0 : return wrote;
410 : }
411 :
412 : static inline int
413 0 : picotls_ctx_read (tls_ctx_t *ctx, session_t *tcp_session)
414 : {
415 0 : picotls_ctx_t *ptls_ctx = (picotls_ctx_t *) ctx;
416 : svm_fifo_t *tcp_rx_fifo;
417 : session_t *app_session;
418 : int wrote;
419 :
420 0 : if (PREDICT_FALSE (!ptls_handshake_is_complete (ptls_ctx->tls)))
421 : {
422 0 : picotls_do_handshake (ptls_ctx, tcp_session);
423 0 : if (picotls_handshake_is_over (ctx))
424 : {
425 0 : if (ptls_is_server (ptls_ctx->tls))
426 : {
427 0 : if (tls_notify_app_accept (ctx))
428 : {
429 0 : ctx->c_s_index = SESSION_INVALID_INDEX;
430 0 : tls_disconnect_transport (ctx);
431 0 : return -1;
432 : }
433 : }
434 : else
435 : {
436 0 : tls_notify_app_connected (ctx, SESSION_E_NONE);
437 : }
438 : }
439 :
440 0 : if (!svm_fifo_max_dequeue (tcp_session->rx_fifo))
441 0 : return 0;
442 : }
443 :
444 0 : tcp_rx_fifo = tcp_session->rx_fifo;
445 0 : app_session = session_get_from_handle (ctx->app_session_handle);
446 0 : wrote = ptls_tcp_to_app_write (ptls_ctx, app_session->rx_fifo, tcp_rx_fifo);
447 :
448 0 : if (wrote && app_session->session_state >= SESSION_STATE_READY)
449 0 : tls_notify_app_enqueue (ctx, app_session);
450 :
451 0 : if (ptls_ctx->read_buffer_offset || svm_fifo_max_dequeue (tcp_rx_fifo))
452 0 : tls_add_vpp_q_builtin_rx_evt (tcp_session);
453 :
454 0 : return wrote;
455 : }
456 :
457 : static inline u32
458 0 : ptls_compute_deq_len (picotls_ctx_t *ptls_ctx, u32 dst_chunk, u32 src_chunk,
459 : u32 dst_space, u8 *is_nocopy)
460 : {
461 0 : int record_overhead = ptls_get_record_overhead (ptls_ctx->tls);
462 : int num_records;
463 : u32 deq_len, total_overhead;
464 :
465 0 : if (dst_chunk >= clib_min (8192, src_chunk + record_overhead))
466 : {
467 0 : *is_nocopy = 1;
468 0 : deq_len = clib_min (src_chunk, dst_chunk);
469 0 : num_records = ceil ((f64) deq_len / PTLS_MAX_PLAINTEXT_RECORD_SIZE);
470 0 : total_overhead = num_records * record_overhead;
471 0 : if (deq_len + total_overhead > dst_chunk)
472 0 : deq_len = dst_chunk - total_overhead;
473 : }
474 : else
475 : {
476 0 : deq_len = clib_min (src_chunk, dst_space);
477 0 : num_records = ceil ((f64) deq_len / PTLS_MAX_PLAINTEXT_RECORD_SIZE);
478 0 : total_overhead = num_records * record_overhead;
479 0 : if (deq_len + total_overhead > dst_space)
480 0 : deq_len = dst_space - total_overhead;
481 : }
482 :
483 0 : return deq_len;
484 : }
485 :
486 : static u32
487 0 : ptls_app_to_tcp_write (picotls_ctx_t *ptls_ctx, session_t *app_session,
488 : svm_fifo_t *tcp_tx_fifo, u32 max_len)
489 0 : {
490 0 : u32 wrote = 0, max_enq, thread_index, app_buf_len, left, ti = 0;
491 0 : int read = 0, rv, i = 0, len, n_tcp_segs = 4, deq_len;
492 0 : u32 n_app_segs = 2, min_chunk = 2048;
493 0 : svm_fifo_seg_t app_fs[n_app_segs], tcp_fs[n_tcp_segs];
494 0 : picotls_main_t *pm = &picotls_main;
495 0 : ptls_buffer_t _buf, *buf = &_buf;
496 : svm_fifo_t *app_tx_fifo;
497 : u8 is_nocopy, *app_buf;
498 : u32 first_chunk_len;
499 :
500 0 : thread_index = app_session->thread_index;
501 0 : app_tx_fifo = app_session->tx_fifo;
502 :
503 0 : len = svm_fifo_segments (app_tx_fifo, 0, app_fs, &n_app_segs, max_len);
504 0 : if (len <= 0)
505 0 : return 0;
506 :
507 0 : n_tcp_segs = svm_fifo_provision_chunks (tcp_tx_fifo, tcp_fs, n_tcp_segs,
508 : 1000 + max_len);
509 0 : if (n_tcp_segs <= 0)
510 0 : return 0;
511 :
512 0 : while ((left = len - read) && ti < n_tcp_segs)
513 : {
514 : /* If we wrote something and are left with few bytes, postpone write
515 : * as we may be able to encrypt a bigger chunk next time */
516 0 : if (wrote && left < min_chunk)
517 0 : break;
518 :
519 : /* Avoid short records if possible */
520 0 : if (app_fs[i].len < min_chunk && min_chunk < left)
521 : {
522 0 : app_buf_len = app_fs[i].len + app_fs[i + 1].len;
523 0 : app_buf = pm->rx_bufs[thread_index];
524 0 : vec_validate (pm->rx_bufs[thread_index], app_buf_len);
525 0 : clib_memcpy_fast (pm->rx_bufs[thread_index], app_fs[i].data,
526 0 : app_fs[i].len);
527 0 : clib_memcpy_fast (pm->rx_bufs[thread_index] + app_fs[i].len,
528 0 : app_fs[i + 1].data, app_buf_len - app_fs[i].len);
529 0 : first_chunk_len = app_fs[i].len;
530 0 : i += 1;
531 : }
532 : else
533 : {
534 0 : app_buf = app_fs[i].data;
535 0 : app_buf_len = app_fs[i].len;
536 0 : first_chunk_len = 0;
537 : }
538 :
539 0 : is_nocopy = 0;
540 0 : max_enq = tcp_fs[ti].len;
541 0 : max_enq += ti < (n_tcp_segs - 1) ? tcp_fs[ti + 1].len : 0;
542 :
543 0 : deq_len = ptls_compute_deq_len (ptls_ctx, tcp_fs[ti].len, app_buf_len,
544 : max_enq, &is_nocopy);
545 0 : if (is_nocopy)
546 : {
547 0 : ptls_buffer_init (buf, tcp_fs[ti].data, tcp_fs[ti].len);
548 0 : rv = ptls_send (ptls_ctx->tls, buf, app_buf, deq_len);
549 :
550 0 : assert (rv == 0);
551 0 : wrote += buf->off;
552 :
553 0 : tcp_fs[ti].len -= buf->off;
554 0 : tcp_fs[ti].data += buf->off;
555 0 : if (!tcp_fs[ti].len)
556 0 : ti += 1;
557 : }
558 : else
559 : {
560 0 : vec_validate (pm->tx_bufs[thread_index], max_enq);
561 0 : ptls_buffer_init (buf, pm->tx_bufs[thread_index], max_enq);
562 0 : rv = ptls_send (ptls_ctx->tls, buf, app_buf, deq_len);
563 :
564 0 : assert (rv == 0);
565 0 : wrote += buf->off;
566 :
567 0 : left = ptls_copy_buf_to_fs (buf, buf->off, tcp_fs, &ti, n_tcp_segs);
568 0 : assert (left == 0);
569 : }
570 :
571 0 : read += deq_len;
572 0 : ASSERT (deq_len >= first_chunk_len);
573 :
574 0 : if (deq_len == app_buf_len)
575 : {
576 0 : i += 1;
577 : }
578 : else
579 : {
580 0 : app_fs[i].len -= deq_len - first_chunk_len;
581 0 : app_fs[i].data += deq_len - first_chunk_len;
582 : }
583 : }
584 :
585 0 : if (read)
586 : {
587 0 : svm_fifo_dequeue_drop (app_tx_fifo, read);
588 0 : if (svm_fifo_needs_deq_ntf (app_tx_fifo, read))
589 0 : session_dequeue_notify (app_session);
590 : }
591 :
592 0 : if (wrote)
593 : {
594 0 : svm_fifo_enqueue_nocopy (tcp_tx_fifo, wrote);
595 0 : if (svm_fifo_set_event (tcp_tx_fifo))
596 0 : session_send_io_evt_to_thread (tcp_tx_fifo, SESSION_IO_EVT_TX);
597 : }
598 :
599 0 : return wrote;
600 : }
601 :
602 : static inline int
603 0 : picotls_ctx_write (tls_ctx_t *ctx, session_t *app_session,
604 : transport_send_params_t *sp)
605 : {
606 0 : picotls_ctx_t *ptls_ctx = (picotls_ctx_t *) ctx;
607 0 : u32 deq_max, deq_now, enq_max, enq_buf, wrote = 0;
608 : svm_fifo_t *tcp_tx_fifo;
609 : session_t *tcp_session;
610 :
611 0 : tcp_session = session_get_from_handle (ctx->tls_session_handle);
612 0 : tcp_tx_fifo = tcp_session->tx_fifo;
613 :
614 0 : enq_max = svm_fifo_max_enqueue_prod (tcp_tx_fifo);
615 0 : if (enq_max < 2048)
616 0 : goto check_tls_fifo;
617 :
618 0 : deq_max = svm_fifo_max_dequeue_cons (app_session->tx_fifo);
619 0 : deq_max = clib_min (deq_max, enq_max);
620 0 : if (!deq_max)
621 0 : goto check_tls_fifo;
622 :
623 0 : deq_now = clib_min (deq_max, sp->max_burst_size);
624 0 : wrote = ptls_app_to_tcp_write (ptls_ctx, app_session, tcp_tx_fifo, deq_now);
625 :
626 0 : check_tls_fifo:
627 :
628 0 : if (ctx->app_closed)
629 0 : picotls_app_close (ctx);
630 :
631 : /* Deschedule and wait for deq notification if fifo is almost full */
632 0 : enq_buf = clib_min (svm_fifo_size (tcp_tx_fifo) / 2, TLSP_MIN_ENQ_SPACE);
633 0 : if (enq_max < wrote + enq_buf)
634 : {
635 0 : svm_fifo_add_want_deq_ntf (tcp_tx_fifo, SVM_FIFO_WANT_DEQ_NOTIF);
636 0 : transport_connection_deschedule (&ctx->connection);
637 0 : sp->flags |= TRANSPORT_SND_F_DESCHED;
638 : }
639 : else
640 : /* Request tx reschedule of the app session */
641 0 : app_session->flags |= SESSION_F_CUSTOM_TX;
642 :
643 0 : return wrote;
644 : }
645 :
646 : static int
647 0 : picotls_ctx_init_server (tls_ctx_t * ctx)
648 : {
649 0 : picotls_ctx_t *ptls_ctx = (picotls_ctx_t *) ctx;
650 0 : u32 ptls_lctx_idx = ctx->tls_ssl_ctx;
651 : picotls_listen_ctx_t *ptls_lctx;
652 :
653 0 : ptls_lctx = picotls_lctx_get (ptls_lctx_idx);
654 0 : ptls_ctx->tls = ptls_new (ptls_lctx->ptls_ctx, 1);
655 0 : if (ptls_ctx->tls == NULL)
656 : {
657 : TLS_DBG (1, "Failed to initialize ptls_ssl structure");
658 0 : return -1;
659 : }
660 :
661 0 : ptls_ctx->rx_len = 0;
662 0 : ptls_ctx->rx_offset = 0;
663 :
664 0 : return 0;
665 : }
666 :
667 : static int
668 0 : picotls_ctx_init_client (tls_ctx_t *ctx)
669 : {
670 0 : picotls_ctx_t *ptls_ctx = (picotls_ctx_t *) ctx;
671 0 : picotls_main_t *pm = &picotls_main;
672 0 : ptls_context_t *client_ptls_ctx = pm->client_ptls_ctx;
673 0 : ptls_handshake_properties_t hsprop = { { { { NULL } } } };
674 :
675 0 : session_t *tls_session = session_get_from_handle (ctx->tls_session_handle);
676 : ptls_buffer_t hs_buf;
677 :
678 0 : ptls_ctx->tls = ptls_new (client_ptls_ctx, 0);
679 0 : if (ptls_ctx->tls == NULL)
680 : {
681 : TLS_DBG (1, "Failed to initialize ptls_ssl structure");
682 0 : return -1;
683 : }
684 :
685 0 : ptls_ctx->rx_len = 0;
686 0 : ptls_ctx->rx_offset = 0;
687 :
688 0 : ptls_buffer_init (&hs_buf, "", 0);
689 0 : if (ptls_handshake (ptls_ctx->tls, &hs_buf, NULL, NULL, &hsprop) !=
690 : PTLS_ERROR_IN_PROGRESS)
691 : {
692 : TLS_DBG (1, "Failed to initialize tls connection");
693 : }
694 :
695 0 : picotls_try_handshake_write (ptls_ctx, tls_session, &hs_buf);
696 :
697 0 : ptls_buffer_dispose (&hs_buf);
698 :
699 0 : return 0;
700 : }
701 :
702 : tls_ctx_t *
703 0 : picotls_ctx_get_w_thread (u32 ctx_index, u8 thread_index)
704 : {
705 : picotls_ctx_t **ctx;
706 0 : ctx = pool_elt_at_index (picotls_main.ctx_pool[thread_index], ctx_index);
707 0 : return &(*ctx)->ctx;
708 : }
709 :
710 : int
711 559 : picotls_init_client_ptls_ctx (ptls_context_t **client_ptls_ctx)
712 : {
713 559 : *client_ptls_ctx = clib_mem_alloc (sizeof (ptls_context_t));
714 559 : memset (*client_ptls_ctx, 0, sizeof (ptls_context_t));
715 :
716 559 : (*client_ptls_ctx)->update_open_count = NULL;
717 559 : (*client_ptls_ctx)->key_exchanges = default_key_exchange;
718 559 : (*client_ptls_ctx)->random_bytes = ptls_openssl_random_bytes;
719 559 : (*client_ptls_ctx)->cipher_suites = ptls_vpp_crypto_cipher_suites;
720 559 : (*client_ptls_ctx)->get_time = &ptls_get_time;
721 :
722 559 : return 0;
723 : }
724 :
725 : int
726 0 : picotls_reinit_ca_chain (void)
727 : {
728 : /* Not supported yet */
729 0 : return 0;
730 : }
731 :
732 : const static tls_engine_vft_t picotls_engine = {
733 : .ctx_alloc = picotls_ctx_alloc,
734 : .ctx_free = picotls_ctx_free,
735 : .ctx_get = picotls_ctx_get,
736 : .ctx_get_w_thread = picotls_ctx_get_w_thread,
737 : .ctx_handshake_is_over = picotls_handshake_is_over,
738 : .ctx_start_listen = picotls_start_listen,
739 : .ctx_stop_listen = picotls_stop_listen,
740 : .ctx_init_server = picotls_ctx_init_server,
741 : .ctx_init_client = picotls_ctx_init_client,
742 : .ctx_read = picotls_ctx_read,
743 : .ctx_write = picotls_ctx_write,
744 : .ctx_transport_close = picotls_transport_close,
745 : .ctx_app_close = picotls_app_close,
746 : .ctx_reinit_cachain = picotls_reinit_ca_chain,
747 : };
748 :
749 : static clib_error_t *
750 559 : tls_picotls_init (vlib_main_t * vm)
751 : {
752 559 : vlib_thread_main_t *vtm = vlib_get_thread_main ();
753 559 : picotls_main_t *pm = &picotls_main;
754 559 : clib_error_t *error = 0;
755 : u32 num_threads;
756 :
757 559 : num_threads = 1 + vtm->n_threads;
758 :
759 559 : vec_validate (pm->ctx_pool, num_threads - 1);
760 559 : vec_validate (pm->rx_bufs, num_threads - 1);
761 559 : vec_validate (pm->tx_bufs, num_threads - 1);
762 :
763 559 : clib_rwlock_init (&picotls_main.crypto_keys_rw_lock);
764 :
765 559 : tls_register_engine (&picotls_engine, CRYPTO_ENGINE_PICOTLS);
766 :
767 559 : picotls_init_client_ptls_ctx (&pm->client_ptls_ctx);
768 :
769 559 : return error;
770 : }
771 :
772 : /* *INDENT-OFF* */
773 1119 : VLIB_INIT_FUNCTION (tls_picotls_init) = {
774 : .runs_after = VLIB_INITS ("tls_init"),
775 : };
776 : /* *INDENT-ON* */
777 :
778 : /* *INDENT-OFF* */
779 : VLIB_PLUGIN_REGISTER () = {
780 : .version = VPP_BUILD_VER,
781 : .description = "Transport Layer Security (TLS) Engine, Picotls Based",
782 : };
783 : /* *INDENT-ON* */
784 :
785 : /*
786 : * fd.io coding-style-patch-verification: ON
787 : *
788 : * Local Variables:
789 : * eval: (c-set-style "gnu")
790 : * End:
791 : */
|
