Line data Source code
1 : #include "fd_quic_tile.h"
2 : #include "../metrics/fd_metrics.h"
3 : #include "../stem/fd_stem.h"
4 : #include "../topo/fd_topo.h"
5 : #include "fd_tpu.h"
6 : #include "../../waltz/quic/fd_quic_private.h"
7 : #include "generated/quic_seccomp.h"
8 : #include "../../util/io/fd_io.h"
9 : #include "../../util/net/fd_eth.h"
10 :
11 : #include <errno.h>
12 : #include <fcntl.h>
13 : #include <sys/random.h>
14 :
15 : #define OUT_IDX_VERIFY 0
16 0 : #define OUT_IDX_NET 1
17 :
18 0 : #define FD_QUIC_KEYLOG_FLUSH_INTERVAL_NS ((long)100e6)
19 :
20 : /* fd_quic_tile provides a TPU server tile.
21 :
22 : This tile handles incoming transactions that clients request to be
23 : included in blocks. Supported protocols currently include TPU/UDP
24 : and TPU/QUIC.
25 :
26 : The fd_quic tile acts as a plain old Tango producer. The tile will
27 : defragment multi-packet TPU streams coming in from QUIC, such tha
28 : each frag_meta refers to a complete txn. This requires the dcache
29 : mtu to be at least that of the largest allowed serialized txn size.
30 :
31 : QUIC tiles don't service network devices directly, but rely on net
32 : tiles to send and receive packets. An arbitrary number of QUIC tiles
33 : can be run. Each UDP flow must stick to one QUIC tile. */
34 :
35 : static inline fd_quic_limits_t
36 0 : quic_limits( fd_topo_tile_t const * tile ) {
37 0 : fd_quic_limits_t limits = {
38 0 : .conn_cnt = tile->quic.max_concurrent_connections,
39 0 : .handshake_cnt = tile->quic.max_concurrent_handshakes,
40 :
41 : /* fd_quic will not issue nor use any new connection IDs after
42 : completing a handshake. Connection migration is not supported
43 : either. */
44 0 : .conn_id_cnt = FD_QUIC_MIN_CONN_ID_CNT,
45 0 : .inflight_frame_cnt = 64UL * tile->quic.max_concurrent_connections,
46 0 : .min_inflight_frame_cnt_conn = 32UL
47 0 : };
48 0 : if( FD_UNLIKELY( !fd_quic_footprint( &limits ) ) ) {
49 0 : FD_LOG_ERR(( "Invalid QUIC limits in config" ));
50 0 : }
51 0 : return limits;
52 0 : }
53 :
54 : FD_FN_CONST static inline ulong
55 0 : scratch_align( void ) {
56 0 : return fd_ulong_max( alignof(fd_quic_ctx_t), fd_quic_align() );
57 0 : }
58 :
59 : static inline ulong
60 0 : scratch_footprint( fd_topo_tile_t const * tile ) {
61 0 : ulong out_depth = tile->quic.out_depth;
62 0 : ulong reasm_max = tile->quic.reasm_cnt;
63 :
64 0 : fd_quic_limits_t limits = quic_limits( tile ); /* May FD_LOG_ERR */
65 0 : ulong l = FD_LAYOUT_INIT;
66 0 : l = FD_LAYOUT_APPEND( l, alignof( fd_quic_ctx_t ), sizeof( fd_quic_ctx_t ) );
67 0 : l = FD_LAYOUT_APPEND( l, fd_quic_align(), fd_quic_footprint( &limits ) );
68 0 : l = FD_LAYOUT_APPEND( l, fd_tpu_reasm_align(), fd_tpu_reasm_footprint( out_depth, reasm_max ) );
69 0 : return FD_LAYOUT_FINI( l, scratch_align() );
70 0 : }
71 :
72 : /* legacy_stream_notify is called for transactions sent via TPU/UDP. For
73 : now both QUIC and non-QUIC transactions are accepted, with traffic
74 : type determined by port.
75 :
76 : UDP transactions must fit in one packet and cannot be fragmented, and
77 : notify here means the entire packet was received. */
78 :
79 : static void
80 : legacy_stream_notify( fd_quic_ctx_t * ctx,
81 : uchar * packet,
82 : ulong packet_sz,
83 0 : uint ipv4 ) {
84 :
85 0 : long tspub = ctx->now;
86 0 : fd_tpu_reasm_t * reasm = ctx->reasm;
87 0 : fd_stem_context_t * stem = ctx->stem;
88 0 : fd_frag_meta_t * mcache = stem->mcaches[0];
89 0 : void * base = ctx->verify_out_mem;
90 0 : ulong seq = stem->seqs[0];
91 :
92 0 : int err = fd_tpu_reasm_publish_fast( reasm, packet, packet_sz, mcache, base, seq, tspub, ipv4, FD_TXN_M_TPU_SOURCE_UDP );
93 0 : if( FD_LIKELY( err==FD_TPU_REASM_SUCCESS ) ) {
94 0 : fd_stem_advance( stem, 0UL );
95 0 : ctx->metrics.txns_received_udp++;
96 0 : }
97 0 : }
98 :
99 : /* This tile always publishes messages downstream, even if there are
100 : no credits available. It ignores the flow control of the downstream
101 : verify tile. This is OK as the verify tile is written to expect
102 : this behavior, and enables the QUIC tile to publish as fast as it
103 : can. It would currently be difficult trying to backpressure further
104 : up the stack to the network itself. */
105 : static inline void
106 : before_credit( fd_quic_ctx_t * ctx,
107 : fd_stem_context_t * stem,
108 0 : int * charge_busy ) {
109 0 : ctx->stem = stem;
110 :
111 : /* Publishes to mcache via callbacks */
112 0 : long now = fd_clock_now( ctx->clock );
113 0 : ctx->now = now;
114 0 : *charge_busy = fd_quic_service( ctx->quic, now );
115 0 : }
116 :
117 : static inline void
118 0 : metrics_write( fd_quic_ctx_t * ctx ) {
119 0 : FD_MCNT_SET ( QUIC, TXNS_RECEIVED_UDP, ctx->metrics.txns_received_udp );
120 0 : FD_MCNT_SET ( QUIC, TXNS_RECEIVED_QUIC_FAST, ctx->metrics.txns_received_quic_fast );
121 0 : FD_MCNT_SET ( QUIC, TXNS_RECEIVED_QUIC_FRAG, ctx->metrics.txns_received_quic_frag );
122 0 : FD_MCNT_SET ( QUIC, FRAGS_OK, ctx->metrics.frag_ok_cnt );
123 0 : FD_MCNT_SET ( QUIC, FRAGS_GAP, ctx->metrics.frag_gap_cnt );
124 0 : FD_MCNT_SET ( QUIC, FRAGS_DUP, ctx->metrics.frag_dup_cnt );
125 0 : FD_MCNT_SET ( QUIC, TXNS_OVERRUN, ctx->metrics.reasm_overrun );
126 0 : FD_MCNT_SET ( QUIC, TXNS_ABANDONED, ctx->metrics.reasm_abandoned );
127 0 : FD_MCNT_SET ( QUIC, TXN_REASMS_STARTED, ctx->metrics.reasm_started );
128 0 : FD_MGAUGE_SET( QUIC, TXN_REASMS_ACTIVE, (ulong)fd_long_max( ctx->metrics.reasm_active, 0L ) );
129 :
130 0 : FD_MCNT_SET( QUIC, LEGACY_TXN_UNDERSZ, ctx->metrics.udp_pkt_too_small );
131 0 : FD_MCNT_SET( QUIC, LEGACY_TXN_OVERSZ, ctx->metrics.udp_pkt_too_large );
132 0 : FD_MCNT_SET( QUIC, TXN_UNDERSZ, ctx->metrics.quic_txn_too_small );
133 0 : FD_MCNT_SET( QUIC, TXN_OVERSZ, ctx->metrics.quic_txn_too_large );
134 :
135 0 : FD_MCNT_SET( QUIC, RECEIVED_PACKETS, ctx->quic->metrics.net_rx_pkt_cnt );
136 0 : FD_MCNT_SET( QUIC, RECEIVED_BYTES, ctx->quic->metrics.net_rx_byte_cnt );
137 0 : FD_MCNT_SET( QUIC, SENT_PACKETS, ctx->quic->metrics.net_tx_pkt_cnt );
138 0 : FD_MCNT_SET( QUIC, SENT_BYTES, ctx->quic->metrics.net_tx_byte_cnt );
139 0 : FD_MCNT_SET( QUIC, RETRY_SENT, ctx->quic->metrics.retry_tx_cnt );
140 :
141 0 : FD_MGAUGE_ENUM_COPY( QUIC, CONNECTIONS_STATE, ctx->quic->metrics.conn_state_cnt );
142 0 : FD_MGAUGE_SET( QUIC, CONNECTIONS_ALLOC, ctx->quic->metrics.conn_alloc_cnt );
143 0 : FD_MCNT_SET( QUIC, CONNECTIONS_CREATED, ctx->quic->metrics.conn_created_cnt );
144 0 : FD_MCNT_SET( QUIC, CONNECTIONS_CLOSED, ctx->quic->metrics.conn_closed_cnt );
145 0 : FD_MCNT_SET( QUIC, CONNECTIONS_ABORTED, ctx->quic->metrics.conn_aborted_cnt );
146 0 : FD_MCNT_SET( QUIC, CONNECTIONS_TIMED_OUT, ctx->quic->metrics.conn_timeout_cnt );
147 0 : FD_MCNT_SET( QUIC, CONNECTIONS_RETRIED, ctx->quic->metrics.conn_retry_cnt );
148 :
149 0 : FD_MCNT_SET( QUIC, CONNECTION_ERROR_NO_SLOTS, ctx->quic->metrics.conn_err_no_slots_cnt );
150 0 : FD_MCNT_SET( QUIC, CONNECTION_ERROR_RETRY_FAIL, ctx->quic->metrics.conn_err_retry_fail_cnt );
151 :
152 0 : FD_MCNT_ENUM_COPY( QUIC, PKT_CRYPTO_FAILED, ctx->quic->metrics.pkt_decrypt_fail_cnt );
153 0 : FD_MCNT_ENUM_COPY( QUIC, PKT_NO_KEY, ctx->quic->metrics.pkt_no_key_cnt );
154 0 : FD_MCNT_ENUM_COPY( QUIC, PKT_NO_CONN, ctx->quic->metrics.pkt_no_conn_cnt );
155 0 : FD_MCNT_ENUM_COPY( QUIC, FRAME_TX_ALLOC, ctx->quic->metrics.frame_tx_alloc_cnt );
156 0 : FD_MCNT_SET( QUIC, PKT_NET_HEADER_INVALID, ctx->quic->metrics.pkt_net_hdr_err_cnt );
157 0 : FD_MCNT_SET( QUIC, PKT_QUIC_HEADER_INVALID, ctx->quic->metrics.pkt_quic_hdr_err_cnt );
158 0 : FD_MCNT_SET( QUIC, PKT_UNDERSZ, ctx->quic->metrics.pkt_undersz_cnt );
159 0 : FD_MCNT_SET( QUIC, PKT_OVERSZ, ctx->quic->metrics.pkt_oversz_cnt );
160 0 : FD_MCNT_SET( QUIC, PKT_VERNEG, ctx->quic->metrics.pkt_verneg_cnt );
161 0 : FD_MCNT_ENUM_COPY( QUIC, PKT_RETRANSMISSIONS, ctx->quic->metrics.pkt_retransmissions_cnt );
162 0 : FD_MCNT_ENUM_COPY( QUIC, INITIAL_TOKEN_LEN, ctx->quic->metrics.initial_token_len_cnt );
163 :
164 0 : FD_MCNT_SET( QUIC, HANDSHAKES_CREATED, ctx->quic->metrics.hs_created_cnt );
165 0 : FD_MCNT_SET( QUIC, HANDSHAKE_ERROR_ALLOC_FAIL, ctx->quic->metrics.hs_err_alloc_fail_cnt );
166 0 : FD_MCNT_SET( QUIC, HANDSHAKE_EVICTED, ctx->quic->metrics.hs_evicted_cnt );
167 :
168 0 : FD_MCNT_SET( QUIC, STREAM_RECEIVED_EVENTS, ctx->quic->metrics.stream_rx_event_cnt );
169 0 : FD_MCNT_SET( QUIC, STREAM_RECEIVED_BYTES, ctx->quic->metrics.stream_rx_byte_cnt );
170 :
171 0 : FD_MCNT_ENUM_COPY( QUIC, RECEIVED_FRAMES, ctx->quic->metrics.frame_rx_cnt );
172 0 : FD_MCNT_SET ( QUIC, FRAME_FAIL_PARSE, ctx->quic->metrics.frame_rx_err_cnt );
173 :
174 0 : FD_MCNT_ENUM_COPY( QUIC, ACK_TX, ctx->quic->metrics.ack_tx );
175 :
176 0 : FD_MHIST_COPY( QUIC, SERVICE_DURATION_SECONDS, ctx->quic->metrics.service_duration );
177 0 : FD_MHIST_COPY( QUIC, RECEIVE_DURATION_SECONDS, ctx->quic->metrics.receive_duration );
178 0 : }
179 :
180 : static int
181 : before_frag( fd_quic_ctx_t * ctx,
182 : ulong in_idx,
183 : ulong seq,
184 0 : ulong sig ) {
185 0 : (void)in_idx;
186 0 : (void)seq;
187 :
188 0 : ulong proto = fd_disco_netmux_sig_proto( sig );
189 0 : if( FD_UNLIKELY( proto!=DST_PROTO_TPU_UDP && proto!=DST_PROTO_TPU_QUIC ) ) return 1;
190 :
191 0 : ulong hash = fd_disco_netmux_sig_hash( sig );
192 0 : if( FD_UNLIKELY( (hash % ctx->round_robin_cnt) != ctx->round_robin_id ) ) return 1;
193 :
194 0 : return 0;
195 0 : }
196 :
197 : static void
198 : during_frag( fd_quic_ctx_t * ctx,
199 : ulong in_idx,
200 : ulong seq FD_PARAM_UNUSED,
201 : ulong sig FD_PARAM_UNUSED,
202 : ulong chunk,
203 : ulong sz,
204 0 : ulong ctl ) {
205 0 : void const * src = fd_net_rx_translate_frag( &ctx->net_in_bounds[ in_idx ], chunk, ctl, sz );
206 :
207 : /* FIXME this copy could be eliminated by combining it with the decrypt operation */
208 0 : fd_memcpy( ctx->buffer, src, sz );
209 0 : }
210 :
211 : static void
212 : after_frag( fd_quic_ctx_t * ctx,
213 : ulong in_idx,
214 : ulong seq,
215 : ulong sig,
216 : ulong sz,
217 : ulong tsorig,
218 : ulong tspub,
219 0 : fd_stem_context_t * stem ) {
220 0 : (void)in_idx;
221 0 : (void)seq;
222 0 : (void)tsorig;
223 0 : (void)tspub;
224 0 : (void)stem;
225 :
226 0 : ulong proto = fd_disco_netmux_sig_proto( sig );
227 :
228 0 : if( FD_LIKELY( proto==DST_PROTO_TPU_QUIC ) ) {
229 0 : if( FD_UNLIKELY( sz<sizeof(fd_eth_hdr_t) ) ) FD_LOG_ERR(( "QUIC packet too small" ));
230 0 : uchar * ip_pkt = ctx->buffer + sizeof(fd_eth_hdr_t);
231 0 : ulong ip_sz = sz - sizeof(fd_eth_hdr_t);
232 :
233 0 : fd_quic_t * quic = ctx->quic;
234 0 : fd_quic_process_packet( quic, ip_pkt, ip_sz, ctx->now );
235 0 : } else if( FD_LIKELY( proto==DST_PROTO_TPU_UDP ) ) {
236 0 : ulong network_hdr_sz = fd_disco_netmux_sig_hdr_sz( sig );
237 0 : if( FD_UNLIKELY( sz<=network_hdr_sz ) ) {
238 : /* Transaction not valid if the packet isn't large enough for the network
239 : headers. */
240 0 : ctx->metrics.udp_pkt_too_small++;
241 0 : return;
242 0 : }
243 :
244 0 : ulong data_sz = sz - network_hdr_sz;
245 0 : if( FD_UNLIKELY( data_sz<FD_TXN_MIN_SERIALIZED_SZ ) ) {
246 : /* Smaller than the smallest possible transaction */
247 0 : ctx->metrics.udp_pkt_too_small++;
248 0 : return;
249 0 : }
250 :
251 0 : if( FD_UNLIKELY( data_sz>FD_TPU_MTU ) ) {
252 : /* Transaction couldn't possibly be valid if it's longer than transaction
253 : MTU so drop it. This is not required, as the txn will fail to parse,
254 : but it's a nice short circuit. */
255 0 : ctx->metrics.udp_pkt_too_large++;
256 0 : return;
257 0 : }
258 :
259 0 : legacy_stream_notify( ctx, ctx->buffer+network_hdr_sz, data_sz, fd_disco_netmux_sig_ip( sig ) );
260 0 : }
261 0 : }
262 :
263 : static void
264 : quic_conn_final( fd_quic_conn_t * conn,
265 0 : void * quic_ctx ) {
266 0 : fd_quic_ctx_t * ctx = quic_ctx;
267 0 : long abandon_cnt = fd_long_max( conn->srx->rx_streams_active, 0L );
268 0 : ctx->metrics.reasm_active -= abandon_cnt;
269 0 : ctx->metrics.reasm_abandoned += (ulong)abandon_cnt;
270 0 : }
271 :
272 : static int
273 : quic_stream_rx( fd_quic_conn_t * conn,
274 : ulong stream_id,
275 : ulong offset,
276 : uchar const * data,
277 : ulong data_sz,
278 0 : int fin ) {
279 :
280 0 : fd_quic_t * quic = conn->quic;
281 0 : fd_quic_state_t * state = fd_quic_get_state( quic ); /* ugly */
282 0 : fd_quic_ctx_t * ctx = quic->cb.quic_ctx;
283 0 : long tspub = ctx->now;
284 0 : fd_tpu_reasm_t * reasm = ctx->reasm;
285 0 : ulong conn_uid = fd_quic_conn_uid( conn );
286 0 : fd_stem_context_t * stem = ctx->stem;
287 0 : fd_frag_meta_t * mcache = stem->mcaches[0];
288 0 : void * base = ctx->verify_out_mem;
289 0 : ulong seq = stem->seqs[0];
290 :
291 0 : int oversz = offset+data_sz > FD_TPU_MTU;
292 :
293 0 : if( offset==0UL && fin ) {
294 : /* Fast path */
295 0 : if( FD_UNLIKELY( data_sz<FD_TXN_MIN_SERIALIZED_SZ ) ) {
296 0 : ctx->metrics.quic_txn_too_small++;
297 0 : return FD_QUIC_SUCCESS; /* drop */
298 0 : }
299 0 : if( FD_UNLIKELY( oversz ) ) {
300 0 : ctx->metrics.quic_txn_too_large++;
301 0 : return FD_QUIC_SUCCESS; /* drop */
302 0 : }
303 0 : int err = fd_tpu_reasm_publish_fast( reasm, data, data_sz, mcache, base, seq, tspub, conn->peer->ip_addr, FD_TXN_M_TPU_SOURCE_QUIC );
304 0 : if( FD_LIKELY( err==FD_TPU_REASM_SUCCESS ) ) {
305 0 : fd_stem_advance( stem, 0UL );
306 0 : ctx->metrics.txns_received_quic_fast++;
307 0 : }
308 0 : return FD_QUIC_SUCCESS;
309 0 : }
310 :
311 0 : if( data_sz==0UL && !fin ) return FD_QUIC_SUCCESS; /* noop */
312 :
313 0 : fd_tpu_reasm_slot_t * slot = fd_tpu_reasm_query( reasm, conn_uid, stream_id );
314 :
315 0 : if( !slot ) { /* start a new reassembly */
316 0 : if( offset>0 ) {
317 0 : ctx->metrics.frag_gap_cnt++;
318 0 : return FD_QUIC_SUCCESS;
319 0 : }
320 0 : if( data_sz==0 ) return FD_QUIC_SUCCESS; /* ignore empty */
321 0 : if( FD_UNLIKELY( oversz ) ) {
322 0 : ctx->metrics.quic_txn_too_large++;
323 0 : return FD_QUIC_SUCCESS; /* drop */
324 0 : }
325 :
326 : /* Was the reasm buffer we evicted busy? */
327 0 : fd_tpu_reasm_slot_t * victim = fd_tpu_reasm_peek_tail( reasm );
328 0 : int victim_busy = victim->k.state == FD_TPU_REASM_STATE_BUSY;
329 :
330 : /* If so, does the connection it refers to still exist?
331 : (Or was the buffer previously abandoned by means of conn close) */
332 0 : uint victim_cidx = fd_quic_conn_uid_idx( victim->k.conn_uid );
333 0 : uint victim_gen = fd_quic_conn_uid_gen( victim->k.conn_uid );
334 0 : fd_quic_conn_t * victim_conn = fd_quic_conn_at_idx( state, victim_cidx ); /* possibly oob */
335 0 : if( victim_busy ) {
336 0 : uint victim_exists = (victim_conn->conn_gen == victim_gen) &
337 0 : (victim_conn->state == FD_QUIC_CONN_STATE_ACTIVE); /* in [0,1] */
338 0 : victim_conn->srx->rx_streams_active -= victim_exists;
339 0 : ctx->metrics.reasm_overrun += victim_exists;
340 0 : ctx->metrics.reasm_active -= victim_exists;
341 0 : }
342 :
343 0 : slot = fd_tpu_reasm_prepare( reasm, conn_uid, stream_id, tspub ); /* infallible */
344 0 : ctx->metrics.reasm_started++;
345 0 : ctx->metrics.reasm_active++;
346 0 : conn->srx->rx_streams_active++;
347 0 : } else if( slot->k.state != FD_TPU_REASM_STATE_BUSY ) {
348 0 : ctx->metrics.frag_dup_cnt++;
349 0 : return FD_QUIC_SUCCESS;
350 0 : }
351 :
352 0 : int reasm_res = fd_tpu_reasm_frag( reasm, slot, data, data_sz, offset );
353 0 : if( FD_UNLIKELY( reasm_res != FD_TPU_REASM_SUCCESS ) ) {
354 0 : int is_gap = reasm_res==FD_TPU_REASM_ERR_SKIP;
355 0 : int is_oversz = reasm_res==FD_TPU_REASM_ERR_SZ;
356 0 : ctx->metrics.frag_gap_cnt += (ulong)is_gap;
357 0 : ctx->metrics.quic_txn_too_large += (ulong)is_oversz;
358 0 : return is_gap ? FD_QUIC_FAILED : FD_QUIC_SUCCESS;
359 0 : }
360 0 : ctx->metrics.frag_ok_cnt++;
361 :
362 0 : if( fin ) {
363 0 : if( FD_UNLIKELY( slot->k.sz < FD_TXN_MIN_SERIALIZED_SZ ) ) {
364 0 : ctx->metrics.quic_txn_too_small++;
365 0 : return FD_QUIC_SUCCESS; /* ignore */
366 0 : }
367 0 : int pub_err = fd_tpu_reasm_publish( reasm, slot, mcache, base, seq, tspub, conn->peer->ip_addr, FD_TXN_M_TPU_SOURCE_QUIC );
368 0 : if( FD_UNLIKELY( pub_err!=FD_TPU_REASM_SUCCESS ) ) return FD_QUIC_SUCCESS; /* unreachable */
369 0 : ulong * rcv_cnt = (offset==0UL && fin) ? &ctx->metrics.txns_received_quic_fast : &ctx->metrics.txns_received_quic_frag;
370 0 : (*rcv_cnt)++;
371 0 : ctx->metrics.reasm_active--;
372 0 : conn->srx->rx_streams_active--;
373 :
374 0 : fd_stem_advance( stem, 0UL );
375 0 : }
376 :
377 0 : return FD_QUIC_SUCCESS;
378 0 : }
379 :
380 : static int
381 : quic_tx_aio_send( void * _ctx,
382 : fd_aio_pkt_info_t const * batch,
383 : ulong batch_cnt,
384 : ulong * opt_batch_idx,
385 0 : int flush ) {
386 0 : (void)flush;
387 :
388 0 : fd_quic_ctx_t * ctx = _ctx;
389 :
390 0 : for( ulong i=0; i<batch_cnt; i++ ) {
391 0 : if( FD_UNLIKELY( batch[ i ].buf_sz<FD_NETMUX_SIG_MIN_HDR_SZ ) ) continue;
392 :
393 0 : uint const ip_dst = FD_LOAD( uint, batch[ i ].buf+offsetof( fd_ip4_hdr_t, daddr_c ) );
394 0 : uchar * packet_l2 = fd_chunk_to_laddr( ctx->net_out_mem, ctx->net_out_chunk );
395 0 : uchar * packet_l3 = packet_l2 + sizeof(fd_eth_hdr_t);
396 0 : memset( packet_l2, 0, 12 );
397 0 : FD_STORE( ushort, packet_l2+offsetof( fd_eth_hdr_t, net_type ), fd_ushort_bswap( FD_ETH_HDR_TYPE_IP ) );
398 0 : fd_memcpy( packet_l3, batch[ i ].buf, batch[ i ].buf_sz );
399 0 : ulong sz_l2 = sizeof(fd_eth_hdr_t) + batch[ i ].buf_sz;
400 :
401 : /* send packets are just round-robined by sequence number, so for now
402 : just indicate where they came from so they don't bounce back */
403 0 : ulong sig = fd_disco_netmux_sig( ip_dst, 0U, ip_dst, DST_PROTO_OUTGOING, FD_NETMUX_SIG_MIN_HDR_SZ );
404 :
405 0 : ulong chunk = ctx->net_out_chunk;
406 0 : ulong ctl = fd_frag_meta_ctl( 0UL, 1, 1, 0 );
407 0 : fd_stem_publish( ctx->stem, OUT_IDX_NET, sig, chunk, sz_l2, ctl, 0L, 0L );
408 :
409 0 : ctx->net_out_chunk = fd_dcache_compact_next( chunk, FD_NET_MTU, ctx->net_out_chunk0, ctx->net_out_wmark );
410 0 : }
411 :
412 0 : if( FD_LIKELY( opt_batch_idx ) ) {
413 0 : *opt_batch_idx = batch_cnt;
414 0 : }
415 :
416 0 : return FD_AIO_SUCCESS;
417 0 : }
418 :
419 : static void
420 : quic_tls_keylog( void * _ctx,
421 0 : char const * line ) {
422 0 : fd_quic_ctx_t * ctx = _ctx;
423 0 : fd_io_buffered_ostream_t * os = &ctx->keylog_stream;
424 :
425 : /* Lazily flush ostream */
426 0 : ulong line_sz = strlen( line )+1;
427 0 : ulong peek_sz = fd_io_buffered_ostream_peek_sz( os );
428 0 : if( FD_UNLIKELY( peek_sz<line_sz ) ) {
429 0 : int err = fd_io_buffered_ostream_flush( os );
430 0 : if( FD_UNLIKELY( err ) ) {
431 0 : FD_LOG_ERR(( "fd_io_buffered_ostream_flush(keylog) failed (%i-%s)", errno, fd_io_strerror( errno ) ));
432 0 : }
433 0 : peek_sz = fd_io_buffered_ostream_peek_sz( os );
434 0 : }
435 0 : if( FD_UNLIKELY( peek_sz<line_sz ) ) {
436 0 : FD_LOG_ERR(( "keylog buffer too small (buf_sz=%lu, line_sz=%lu)", peek_sz, line_sz ));
437 0 : }
438 :
439 : /* Append line */
440 0 : char * cur = fd_io_buffered_ostream_peek( os );
441 0 : cur = fd_cstr_append_text( cur, line, strlen( line ) );
442 0 : cur = fd_cstr_append_char( cur, '\n' );
443 0 : fd_io_buffered_ostream_seek( os, line_sz );
444 0 : }
445 :
446 : static void
447 0 : during_housekeeping( fd_quic_ctx_t * ctx ) {
448 0 : if( FD_UNLIKELY( ctx->recal_next <= ctx->now ) ) {
449 0 : ctx->recal_next = fd_clock_default_recal( ctx->clock );
450 0 : }
451 :
452 0 : if( FD_UNLIKELY( ctx->keylog_stream.wbuf ) ) {
453 0 : long now = ctx->now = fd_clock_now( ctx->clock );
454 0 : if( FD_UNLIKELY( now > ctx->keylog_next_flush ) ) {
455 0 : int err = fd_io_buffered_ostream_flush( &ctx->keylog_stream );
456 0 : if( FD_UNLIKELY( err ) ) {
457 0 : FD_LOG_ERR(( "fd_io_buffered_ostream_flush(keylog) failed (%i-%s)", errno, fd_io_strerror( errno ) ));
458 0 : }
459 0 : ctx->keylog_next_flush = now + FD_QUIC_KEYLOG_FLUSH_INTERVAL_NS;
460 0 : }
461 0 : }
462 0 : }
463 :
464 : static void
465 : privileged_init( fd_topo_t * topo,
466 0 : fd_topo_tile_t * tile ) {
467 0 : fd_quic_ctx_t * ctx = fd_topo_obj_laddr( topo, tile->tile_obj_id );
468 0 : if( FD_UNLIKELY( topo->objs[ tile->tile_obj_id ].footprint < scratch_footprint( tile ) ) ) {
469 0 : FD_LOG_ERR(( "insufficient tile scratch space" ));
470 0 : }
471 0 : fd_memset( ctx, 0, sizeof(fd_quic_ctx_t) );
472 0 : ctx->keylog_fd = -1;
473 :
474 0 : if( 0!=strcmp( tile->quic.key_log_path, "" ) ) {
475 0 : ctx->keylog_fd = open( tile->quic.key_log_path, O_WRONLY|O_CREAT|O_APPEND, 0644 );
476 0 : if( FD_UNLIKELY( ctx->keylog_fd<0 ) ) {
477 0 : FD_LOG_ERR(( "open(%s, O_WRONLY|O_CREAT|O_APPEND, 0644) failed (%i-%s)",
478 0 : tile->quic.key_log_path, errno, fd_io_strerror( errno ) ));
479 0 : }
480 0 : fd_io_buffered_ostream_init( &ctx->keylog_stream, ctx->keylog_fd, ctx->keylog_buf, sizeof(ctx->keylog_buf) );
481 0 : FD_LOG_WARNING(( "Logging QUIC encryption keys to %s", tile->quic.key_log_path ));
482 0 : }
483 :
484 : /* The fd_quic implementation calls fd_log_wallclock() internally
485 : which itself calls clock_gettime() which on most kernels is not a
486 : real syscall but a virtual one in the process via. the vDSO.
487 :
488 : The first time this virtual call is made to the vDSO it does an
489 : mmap(2) of some shared memory into userspace, which cannot
490 : happen while sandboxed so we need to ensure that initialization
491 : happens here. */
492 :
493 0 : fd_log_wallclock();
494 0 : }
495 :
496 : static void
497 : quic_tls_cv_sign( void * signer_ctx,
498 : uchar signature[ static 64 ],
499 0 : uchar const payload[ static 130 ] ) {
500 0 : fd_quic_ctx_t * ctx = signer_ctx;
501 0 : fd_sha512_t * sha512 = fd_sha512_join( ctx->sha512 );
502 0 : fd_ed25519_sign( signature, payload, 130UL, ctx->tls_pub_key, ctx->tls_priv_key, sha512 );
503 0 : fd_sha512_leave( sha512 );
504 0 : }
505 :
506 : static void
507 : unprivileged_init( fd_topo_t * topo,
508 0 : fd_topo_tile_t * tile ) {
509 0 : void * scratch = fd_topo_obj_laddr( topo, tile->tile_obj_id );
510 :
511 0 : if( FD_UNLIKELY( tile->in_cnt==0 ) ) {
512 0 : FD_LOG_ERR(( "quic tile has no input links" ));
513 0 : }
514 0 : if( FD_UNLIKELY( tile->in_cnt > FD_QUIC_TILE_IN_MAX ) ) {
515 0 : FD_LOG_ERR(( "quic tile has too many input links (%lu), max %lu",
516 0 : tile->in_cnt, FD_QUIC_TILE_IN_MAX ));
517 0 : }
518 :
519 0 : if( FD_UNLIKELY( tile->out_cnt!=2UL ||
520 0 : strcmp( topo->links[ tile->out_link_id[ OUT_IDX_VERIFY ] ].name, "quic_verify" ) ||
521 0 : strcmp( topo->links[ tile->out_link_id[ OUT_IDX_NET ] ].name, "quic_net" ) ) )
522 0 : FD_LOG_ERR(( "quic tile has none or unexpected output links %lu %s %s",
523 0 : tile->out_cnt, topo->links[ tile->out_link_id[ 0 ] ].name, topo->links[ tile->out_link_id[ 1 ] ].name ));
524 :
525 0 : ulong out_depth = topo->links[ tile->out_link_id[ 0 ] ].depth;
526 0 : if( FD_UNLIKELY( tile->quic.out_depth != out_depth ) )
527 0 : FD_LOG_ERR(( "tile->quic.out_depth (%u) does not match quic_verify link depth (%lu)",
528 0 : tile->quic.out_depth, out_depth ));
529 :
530 0 : void * txn_dcache = topo->links[ tile->out_link_id[ 0UL ] ].dcache;
531 0 : if( FD_UNLIKELY( !txn_dcache ) ) FD_LOG_ERR(( "Missing output dcache" ));
532 :
533 0 : FD_SCRATCH_ALLOC_INIT( l, scratch );
534 0 : fd_quic_ctx_t * ctx = FD_SCRATCH_ALLOC_APPEND( l, alignof( fd_quic_ctx_t ), sizeof( fd_quic_ctx_t ) );
535 0 : FD_TEST( (ulong)ctx==(ulong)scratch );
536 :
537 0 : for( ulong i=0; i<tile->in_cnt; i++ ) {
538 0 : fd_topo_link_t * link = &topo->links[ tile->in_link_id[ i ] ];
539 0 : if( FD_UNLIKELY( 0!=strcmp( link->name, "net_quic" ) ) ) {
540 0 : FD_LOG_ERR(( "unexpected input link %s", link->name ));
541 0 : }
542 0 : fd_net_rx_bounds_init( &ctx->net_in_bounds[ i ], link->dcache );
543 0 : }
544 :
545 0 : fd_clock_t * clock = ctx->clock;
546 0 : fd_clock_default_init( clock, ctx->clock_mem );
547 0 : ctx->recal_next = fd_clock_recal_next( clock );
548 0 : ctx->now = fd_clock_now( clock );
549 :
550 0 : if( FD_UNLIKELY( getrandom( ctx->tls_priv_key, ED25519_PRIV_KEY_SZ, 0 )!=ED25519_PRIV_KEY_SZ ) ) {
551 0 : FD_LOG_ERR(( "getrandom failed (%i-%s)", errno, fd_io_strerror( errno ) ));
552 0 : }
553 0 : fd_sha512_t * sha512 = fd_sha512_join( fd_sha512_new( ctx->sha512 ) );
554 0 : fd_ed25519_public_from_private( ctx->tls_pub_key, ctx->tls_priv_key, sha512 );
555 0 : fd_sha512_leave( sha512 );
556 :
557 0 : fd_aio_t * quic_tx_aio = fd_aio_join( fd_aio_new( ctx->quic_tx_aio, ctx, quic_tx_aio_send ) );
558 0 : if( FD_UNLIKELY( !quic_tx_aio ) ) FD_LOG_ERR(( "fd_aio_join failed" ));
559 :
560 0 : fd_quic_limits_t limits = quic_limits( tile );
561 0 : fd_quic_t * quic = fd_quic_join( fd_quic_new( FD_SCRATCH_ALLOC_APPEND( l, fd_quic_align(), fd_quic_footprint( &limits ) ), &limits ) );
562 0 : if( FD_UNLIKELY( !quic ) ) FD_LOG_ERR(( "fd_quic_new failed" ));
563 :
564 0 : ulong orig = 0UL; /* fd_tango origin ID */
565 0 : ulong reasm_max = tile->quic.reasm_cnt;
566 0 : void * reasm_mem = FD_SCRATCH_ALLOC_APPEND( l, fd_tpu_reasm_align(), fd_tpu_reasm_footprint( out_depth, reasm_max ) );
567 0 : ctx->reasm = fd_tpu_reasm_join( fd_tpu_reasm_new( reasm_mem, out_depth, reasm_max, orig, txn_dcache ) );
568 0 : if( FD_UNLIKELY( !ctx->reasm ) ) FD_LOG_ERR(( "fd_tpu_reasm_new failed" ));
569 :
570 0 : if( FD_UNLIKELY( tile->quic.ack_delay_millis == 0 ) ) {
571 0 : FD_LOG_ERR(( "Invalid `ack_delay_millis`: must be greater than zero" ));
572 0 : }
573 0 : if( FD_UNLIKELY( tile->quic.ack_delay_millis >= tile->quic.idle_timeout_millis ) ) {
574 0 : FD_LOG_ERR(( "Invalid `ack_delay_millis`: must be lower than `idle_timeout_millis`" ));
575 0 : }
576 :
577 0 : quic->config.role = FD_QUIC_ROLE_SERVER;
578 0 : quic->config.idle_timeout = tile->quic.idle_timeout_millis * (long)1e6;
579 0 : quic->config.ack_delay = tile->quic.ack_delay_millis * (long)1e6;
580 0 : quic->config.initial_rx_max_stream_data = FD_TXN_MTU;
581 0 : quic->config.retry = tile->quic.retry;
582 0 : fd_memcpy( quic->config.identity_public_key, ctx->tls_pub_key, ED25519_PUB_KEY_SZ );
583 :
584 0 : quic->config.sign = quic_tls_cv_sign;
585 0 : quic->config.sign_ctx = ctx;
586 :
587 0 : quic->cb.conn_final = quic_conn_final;
588 0 : quic->cb.stream_rx = quic_stream_rx;
589 0 : quic->cb.quic_ctx = ctx;
590 0 : if( ctx->keylog_fd>=0 ) {
591 0 : quic->cb.tls_keylog = quic_tls_keylog;
592 0 : ctx->keylog_next_flush = fd_log_wallclock() + FD_QUIC_KEYLOG_FLUSH_INTERVAL_NS;
593 0 : }
594 :
595 0 : fd_quic_set_aio_net_tx( quic, quic_tx_aio );
596 0 : if( FD_UNLIKELY( !fd_quic_init( quic ) ) ) FD_LOG_ERR(( "fd_quic_init failed" ));
597 :
598 0 : fd_topo_link_t * net_out = &topo->links[ tile->out_link_id[ 1 ] ];
599 :
600 0 : ctx->net_out_mem = topo->workspaces[ topo->objs[ net_out->dcache_obj_id ].wksp_id ].wksp;
601 0 : ctx->net_out_chunk0 = fd_dcache_compact_chunk0( ctx->net_out_mem, net_out->dcache );
602 0 : ctx->net_out_wmark = fd_dcache_compact_wmark ( ctx->net_out_mem, net_out->dcache, net_out->mtu );
603 0 : ctx->net_out_chunk = ctx->net_out_chunk0;
604 :
605 0 : fd_topo_link_t * verify_out = &topo->links[ tile->out_link_id[ 0 ] ];
606 :
607 0 : ctx->verify_out_mem = topo->workspaces[ topo->objs[ verify_out->dcache_obj_id ].wksp_id ].wksp;
608 :
609 0 : ctx->quic = quic;
610 :
611 0 : ctx->round_robin_cnt = fd_topo_tile_name_cnt( topo, tile->name );
612 0 : ctx->round_robin_id = tile->kind_id;
613 0 : if( FD_UNLIKELY( ctx->round_robin_id >= ctx->round_robin_cnt ) ) {
614 0 : FD_LOG_ERR(( "invalid round robin configuration" ));
615 0 : }
616 :
617 0 : ulong scratch_top = FD_SCRATCH_ALLOC_FINI( l, 1UL );
618 0 : if( FD_UNLIKELY( scratch_top > (ulong)scratch + scratch_footprint( tile ) ) )
619 0 : FD_LOG_ERR(( "scratch overflow %lu %lu %lu", scratch_top - (ulong)scratch - scratch_footprint( tile ), scratch_top, (ulong)scratch + scratch_footprint( tile ) ));
620 :
621 : /* Call new/join here rather than in fd_quic so min/max can differ across uses */
622 0 : fd_histf_join( fd_histf_new( ctx->quic->metrics.service_duration, FD_MHIST_SECONDS_MIN( QUIC, SERVICE_DURATION_SECONDS ),
623 0 : FD_MHIST_SECONDS_MAX( QUIC, SERVICE_DURATION_SECONDS ) ) );
624 0 : fd_histf_join( fd_histf_new( ctx->quic->metrics.receive_duration, FD_MHIST_SECONDS_MIN( QUIC, RECEIVE_DURATION_SECONDS ),
625 0 : FD_MHIST_SECONDS_MAX( QUIC, RECEIVE_DURATION_SECONDS ) ) );
626 0 : }
627 :
628 : static ulong
629 : populate_allowed_seccomp( fd_topo_t const * topo,
630 : fd_topo_tile_t const * tile,
631 : ulong out_cnt,
632 0 : struct sock_filter * out ) {
633 0 : fd_quic_ctx_t const * ctx = fd_topo_obj_laddr( topo, tile->tile_obj_id );
634 0 : populate_sock_filter_policy_quic( out_cnt, out, (uint)fd_log_private_logfile_fd(), (uint)ctx->keylog_fd );
635 0 : return sock_filter_policy_quic_instr_cnt;
636 0 : }
637 :
638 : static ulong
639 : populate_allowed_fds( fd_topo_t const * topo,
640 : fd_topo_tile_t const * tile,
641 : ulong out_fds_cnt,
642 0 : int * out_fds ) {
643 0 : fd_quic_ctx_t * ctx = fd_topo_obj_laddr( topo, tile->tile_obj_id );
644 :
645 0 : if( FD_UNLIKELY( out_fds_cnt<3UL ) ) FD_LOG_ERR(( "out_fds_cnt %lu", out_fds_cnt ));
646 :
647 0 : ulong out_cnt = 0UL;
648 0 : out_fds[ out_cnt++ ] = 2; /* stderr */
649 0 : if( FD_LIKELY( -1!=fd_log_private_logfile_fd() ) )
650 0 : out_fds[ out_cnt++ ] = fd_log_private_logfile_fd(); /* logfile */
651 0 : if( ctx->keylog_fd!=-1 )
652 0 : out_fds[ out_cnt++ ] = ctx->keylog_fd;
653 0 : return out_cnt;
654 0 : }
655 :
656 0 : #define STEM_BURST (1UL)
657 0 : #define STEM_LAZY ((long)10e6) /* 10ms */
658 :
659 0 : #define STEM_CALLBACK_CONTEXT_TYPE fd_quic_ctx_t
660 0 : #define STEM_CALLBACK_CONTEXT_ALIGN alignof(fd_quic_ctx_t)
661 :
662 0 : #define STEM_CALLBACK_METRICS_WRITE metrics_write
663 0 : #define STEM_CALLBACK_BEFORE_CREDIT before_credit
664 0 : #define STEM_CALLBACK_BEFORE_FRAG before_frag
665 0 : #define STEM_CALLBACK_DURING_FRAG during_frag
666 0 : #define STEM_CALLBACK_AFTER_FRAG after_frag
667 0 : #define STEM_CALLBACK_DURING_HOUSEKEEPING during_housekeeping
668 :
669 : #include "../stem/fd_stem.c"
670 :
671 : fd_topo_run_tile_t fd_tile_quic = {
672 : .name = "quic",
673 : .populate_allowed_seccomp = populate_allowed_seccomp,
674 : .populate_allowed_fds = populate_allowed_fds,
675 : .scratch_align = scratch_align,
676 : .scratch_footprint = scratch_footprint,
677 : .privileged_init = privileged_init,
678 : .unprivileged_init = unprivileged_init,
679 : .run = stem_run,
680 : };
|
