10 #include <sys/malloc.h>
11 #include <sys/kernel.h>
12 #include <sys/sysctl.h>
15 #include <sys/rwlock.h>
16 #include <sys/socket.h>
17 #include <sys/socketvar.h>
18 #include <sys/protosw.h>
21 #include <sys/domain.h>
28 #include <net/if_var.h>
29 #include <net/route.h>
32 #include <netinet/in.h>
33 #include <netinet/in_systm.h>
34 #include <netinet/in_var.h>
35 #include <netinet/in_pcb.h>
36 #include <netinet/tcp.h>
37 #include <netinet/tcp_fsm.h>
38 #include <netinet/tcp_timer.h>
39 #include <netinet/tcp_var.h>
41 #include <linux/device.h>
42 #include <linux/err.h>
43 #include <linux/sched.h>
44 #include <linux/workqueue.h>
45 #include <linux/wait.h>
46 #include <linux/module.h>
47 #include <linux/moduleparam.h>
48 #include <linux/pci.h>
50 #include <rdma/ib_verbs.h>
51 #include <rdma/rdma_cm.h>
52 #include <rdma/ib_cm.h>
53 #include <rdma/sdp_socket.h>
54 #include <rdma/ib_fmr_pool.h>
57 #define CONFIG_INFINIBAND_SDP_DEBUG
63 /* From sys/queue.h */
64 #define LIST_HEAD(name, type) \
66 struct type *lh_first; /* first element */ \
69 /* Interval between sucessive polls in the Tx routine when polling is used
70 instead of interrupts (in per-core Tx rings) - should be power of 2 */
71 #define SDP_TX_POLL_MODER 16
72 #define SDP_TX_POLL_TIMEOUT (HZ / 20)
73 #define SDP_NAGLE_TIMEOUT (HZ / 10)
75 #define SDP_SRCAVAIL_CANCEL_TIMEOUT (HZ * 5)
76 #define SDP_SRCAVAIL_ADV_TIMEOUT (1 * HZ)
77 #define SDP_SRCAVAIL_PAYLOAD_LEN 1
79 #define SDP_RESOLVE_TIMEOUT 1000
80 #define SDP_ROUTE_TIMEOUT 1000
81 #define SDP_RETRY_COUNT 5
82 #define SDP_KEEPALIVE_TIME (120 * 60 * HZ)
83 #define SDP_FIN_WAIT_TIMEOUT (60 * HZ) /* like TCP_FIN_TIMEOUT */
85 #define SDP_TX_SIZE 0x40
86 #define SDP_RX_SIZE 0x40
88 #define SDP_FMR_SIZE (MIN(0x1000, PAGE_SIZE) / sizeof(u64))
89 #define SDP_FMR_POOL_SIZE 1024
90 #define SDP_FMR_DIRTY_SIZE ( SDP_FMR_POOL_SIZE / 4 )
92 #define SDP_MAX_RDMA_READ_LEN (PAGE_SIZE * (SDP_FMR_SIZE - 2))
94 /* mb inlined data len - rest will be rx'ed into frags */
95 #define SDP_HEAD_SIZE (sizeof(struct sdp_bsdh))
97 /* limit tx payload len, if the sink supports bigger buffers than the source
99 * or rx fragment size (limited by sge->length size) */
100 #define SDP_MAX_PACKET (1 << 16)
101 #define SDP_MAX_PAYLOAD (SDP_MAX_PACKET - SDP_HEAD_SIZE)
103 #define SDP_MAX_RECV_SGES (SDP_MAX_PACKET / MCLBYTES)
104 #define SDP_MAX_SEND_SGES (SDP_MAX_PACKET / MCLBYTES) + 2
108 #define SDP_DEF_ZCOPY_THRESH 64*1024
109 #define SDP_MIN_ZCOPY_THRESH PAGE_SIZE
110 #define SDP_MAX_ZCOPY_THRESH 1048576
112 #define SDP_OP_RECV 0x800000000LL
113 #define SDP_OP_SEND 0x400000000LL
114 #define SDP_OP_RDMA 0x200000000LL
115 #define SDP_OP_NOP 0x100000000LL
117 /* how long (in jiffies) to block sender till tx completion*/
118 #define SDP_BZCOPY_POLL_TIMEOUT (HZ / 10)
120 #define SDP_AUTO_CONF 0xffff
121 #define AUTO_MOD_DELAY (HZ / 4)
124 __u32 seq; /* Starting sequence number */
125 struct bzcopy_state *bz;
126 struct rx_srcavail_state *rx_sa;
127 struct tx_srcavail_state *tx_sa;
130 #define M_PUSH M_PROTO1 /* Do a 'push'. */
131 #define M_URG M_PROTO2 /* Mark as urgent (oob). */
133 #define SDP_SKB_CB(__mb) ((struct sdp_mb_cb *)&((__mb)->cb[0]))
134 #define BZCOPY_STATE(mb) (SDP_SKB_CB(mb)->bz)
135 #define RX_SRCAVAIL_STATE(mb) (SDP_SKB_CB(mb)->rx_sa)
136 #define TX_SRCAVAIL_STATE(mb) (SDP_SKB_CB(mb)->tx_sa)
139 #define MIN(a, b) (a < b ? a : b)
142 #define ring_head(ring) (atomic_read(&(ring).head))
143 #define ring_tail(ring) (atomic_read(&(ring).tail))
144 #define ring_posted(ring) (ring_head(ring) - ring_tail(ring))
146 #define rx_ring_posted(ssk) ring_posted(ssk->rx_ring)
148 #define tx_ring_posted(ssk) (ring_posted(ssk->tx_ring) + \
149 (ssk->tx_ring.rdma_inflight ? ssk->tx_ring.rdma_inflight->busy : 0))
151 #define tx_ring_posted(ssk) ring_posted(ssk->tx_ring)
154 extern int sdp_zcopy_thresh;
155 extern int rcvbuf_initial_size;
156 extern struct workqueue_struct *rx_comp_wq;
157 extern struct ib_client sdp_client;
161 SDP_MID_HELLO_ACK = 0x1,
162 SDP_MID_DISCONN = 0x2,
164 SDP_MID_SENDSM = 0x4,
165 SDP_MID_RDMARDCOMPL = 0x6,
166 SDP_MID_SRCAVAIL_CANCEL = 0x8,
167 SDP_MID_CHRCVBUF = 0xB,
168 SDP_MID_CHRCVBUF_ACK = 0xC,
169 SDP_MID_SINKAVAIL = 0xFD,
170 SDP_MID_SRCAVAIL = 0xFE,
175 SDP_OOB_PRES = 1 << 0,
176 SDP_OOB_PEND = 1 << 1,
180 SDP_MIN_TX_CREDITS = 2
197 } __attribute__((__packed__));
205 } __attribute__((__packed__));
207 /* TODO: too much? Can I avoid having the src/dst and port here? */
209 struct sdp_bsdh bsdh;
218 union cma_ip_addr src_addr;
219 union cma_ip_addr dst_addr;
220 u8 rsvd3[IB_CM_REQ_PRIVATE_DATA_SIZE - sizeof(struct sdp_bsdh) - 48];
221 } __attribute__((__packed__));
224 struct sdp_bsdh bsdh;
230 u8 rsvd2[IB_CM_REP_PRIVATE_DATA_SIZE - sizeof(struct sdp_bsdh) - 8];
231 } __attribute__((__packed__));
235 } __attribute__((__packed__));
241 } __attribute__((__packed__));
245 u64 mapping[SDP_MAX_SEND_SGES];
246 } __attribute__((__packed__));
248 struct sdp_chrecvbuf {
250 } __attribute__((__packed__));
252 /* Context used for synchronous zero copy bcopy (BZCOPY) */
253 struct bzcopy_state {
254 unsigned char __user *u_base;
261 struct sdp_sock *ssk;
271 TX_SA_CROSS_SEND = 0x02,
272 TX_SA_INTRRUPTED = 0x04,
273 TX_SA_TIMEDOUT = 0x08,
277 struct rx_srcavail_state {
278 /* Advertised buffer stuff */
287 struct ib_umem *umem;
288 struct ib_pool_fmr *fmr;
292 enum rx_sa_flag flags;
295 struct tx_srcavail_state {
296 /* Data below 'busy' will be reset */
299 struct ib_umem *umem;
300 struct ib_pool_fmr *fmr;
305 enum tx_sa_flag abort_flags;
313 struct rx_srcavail_state *rdma_inflight;
315 struct sdp_buf *buffer;
321 #define tx_credits(ssk) (atomic_read(&ssk->tx_ring.credits))
323 struct callout timer;
328 struct sdp_buf *buffer;
334 struct rwlock destroyed_lock;
340 struct ib_fmr_pool *fmr_pool;
343 struct sdp_moderation {
344 unsigned long last_moder_packets;
345 unsigned long last_moder_tx_packets;
346 unsigned long last_moder_bytes;
347 unsigned long last_moder_jiffies;
357 u16 adaptive_rx_coal;
364 /* These are flags fields. */
365 #define SDP_TIMEWAIT 0x0001 /* In ssk timewait state. */
366 #define SDP_DROPPED 0x0002 /* Socket has been dropped. */
367 #define SDP_SOCKREF 0x0004 /* Holding a sockref for close. */
368 #define SDP_NODELAY 0x0008 /* Disble nagle. */
369 #define SDP_NEEDFIN 0x0010 /* Send a fin on the next tx. */
370 #define SDP_DREQWAIT 0x0020 /* Waiting on DREQ. */
371 #define SDP_DESTROY 0x0040 /* Being destroyed. */
372 #define SDP_DISCON 0x0080 /* rdma_disconnect is owed. */
374 /* These are oobflags */
375 #define SDP_HADOOB 0x0001 /* Had OOB data. */
376 #define SDP_HAVEOOB 0x0002 /* Have OOB data. */
379 LIST_ENTRY(sdp_sock) list;
380 struct socket *socket;
381 struct rdma_cm_id *id;
382 struct ib_device *ib_device;
383 struct sdp_device *sdp_dev;
386 struct callout keep2msl; /* 2msl and keepalive timer. */
387 struct callout nagle_timer; /* timeout waiting for ack */
388 struct ib_ucontext context;
394 int oobflags; /* protected by rx lock. */
397 int recv_bytes; /* Bytes per recv. buf including header */
401 struct sdp_rx_ring rx_ring;
402 struct sdp_tx_ring tx_ring;
404 struct mbuf *rx_ctl_q;
405 struct mbuf *rx_ctl_tail;
407 int qp_active; /* XXX Flag. */
409 struct work_struct rx_comp_work;
410 #define rcv_nxt(ssk) atomic_read(&(ssk->rcv_nxt))
415 #define mseq_ack(ssk) (atomic_read(&ssk->mseq_ack))
416 unsigned max_bufs; /* Initial buffers offered by other side */
417 unsigned min_bufs; /* Low water mark to wake senders */
419 unsigned long nagle_last_unacked; /* mseq of lastest unacked packet */
421 atomic_t remote_credits;
422 #define remote_credits(ssk) (atomic_read(&ssk->remote_credits))
426 int recv_request_head; /* mark the rx_head when the resize request
428 int recv_request; /* XXX flag if request to resize was recieved */
430 unsigned long tx_packets;
431 unsigned long rx_packets;
432 unsigned long tx_bytes;
433 unsigned long rx_bytes;
434 struct sdp_moderation auto_mod;
435 struct task shutdown_task;
437 struct tx_srcavail_state *tx_sa;
438 struct rx_srcavail_state *rx_sa;
439 spinlock_t tx_sa_lock;
440 struct delayed_work srcavail_cancel_work;
441 int srcavail_cancel_mseq;
442 /* ZCOPY data: -1:use global; 0:disable zcopy; >0: zcopy threshold */
447 #define sdp_sk(so) ((struct sdp_sock *)(so->so_pcb))
449 #define SDP_RLOCK(ssk) rw_rlock(&(ssk)->lock)
450 #define SDP_WLOCK(ssk) rw_wlock(&(ssk)->lock)
451 #define SDP_RUNLOCK(ssk) rw_runlock(&(ssk)->lock)
452 #define SDP_WUNLOCK(ssk) rw_wunlock(&(ssk)->lock)
453 #define SDP_WLOCK_ASSERT(ssk) rw_assert(&(ssk)->lock, RA_WLOCKED)
454 #define SDP_RLOCK_ASSERT(ssk) rw_assert(&(ssk)->lock, RA_RLOCKED)
455 #define SDP_LOCK_ASSERT(ssk) rw_assert(&(ssk)->lock, RA_LOCKED)
457 static inline void tx_sa_reset(struct tx_srcavail_state *tx_sa)
459 memset((void *)&tx_sa->busy, 0,
460 sizeof(*tx_sa) - offsetof(typeof(*tx_sa), busy));
463 static inline void rx_ring_unlock(struct sdp_rx_ring *rx_ring)
465 rw_runlock(&rx_ring->destroyed_lock);
468 static inline int rx_ring_trylock(struct sdp_rx_ring *rx_ring)
470 rw_rlock(&rx_ring->destroyed_lock);
471 if (rx_ring->destroyed) {
472 rx_ring_unlock(rx_ring);
478 static inline void rx_ring_destroy_lock(struct sdp_rx_ring *rx_ring)
480 rw_wlock(&rx_ring->destroyed_lock);
481 rx_ring->destroyed = 1;
482 rw_wunlock(&rx_ring->destroyed_lock);
485 static inline void sdp_arm_rx_cq(struct sdp_sock *ssk)
487 sdp_prf(ssk->socket, NULL, "Arming RX cq");
488 sdp_dbg_data(ssk->socket, "Arming RX cq\n");
490 ib_req_notify_cq(ssk->rx_ring.cq, IB_CQ_NEXT_COMP);
493 static inline void sdp_arm_tx_cq(struct sdp_sock *ssk)
495 sdp_prf(ssk->socket, NULL, "Arming TX cq");
496 sdp_dbg_data(ssk->socket, "Arming TX cq. credits: %d, posted: %d\n",
497 tx_credits(ssk), tx_ring_posted(ssk));
499 ib_req_notify_cq(ssk->tx_ring.cq, IB_CQ_NEXT_COMP);
502 /* return the min of:
504 * - free slots in tx_ring (not including SDP_MIN_TX_CREDITS
506 static inline int tx_slots_free(struct sdp_sock *ssk)
510 min_free = MIN(tx_credits(ssk),
511 SDP_TX_SIZE - tx_ring_posted(ssk));
512 if (min_free < SDP_MIN_TX_CREDITS)
515 return min_free - SDP_MIN_TX_CREDITS;
519 static inline char *mid2str(int mid)
521 #define ENUM2STR(e) [e] = #e
522 static char *mid2str[] = {
523 ENUM2STR(SDP_MID_HELLO),
524 ENUM2STR(SDP_MID_HELLO_ACK),
525 ENUM2STR(SDP_MID_ABORT),
526 ENUM2STR(SDP_MID_DISCONN),
527 ENUM2STR(SDP_MID_SENDSM),
528 ENUM2STR(SDP_MID_RDMARDCOMPL),
529 ENUM2STR(SDP_MID_SRCAVAIL_CANCEL),
530 ENUM2STR(SDP_MID_CHRCVBUF),
531 ENUM2STR(SDP_MID_CHRCVBUF_ACK),
532 ENUM2STR(SDP_MID_DATA),
533 ENUM2STR(SDP_MID_SRCAVAIL),
534 ENUM2STR(SDP_MID_SINKAVAIL),
537 if (mid >= ARRAY_SIZE(mid2str))
543 static inline struct mbuf *
544 sdp_alloc_mb(struct socket *sk, u8 mid, int size, int wait)
549 MGETHDR(mb, wait, MT_DATA);
552 mb->m_pkthdr.len = mb->m_len = sizeof(struct sdp_bsdh);
553 h = mtod(mb, struct sdp_bsdh *);
558 static inline struct mbuf *
559 sdp_alloc_mb_data(struct socket *sk, int wait)
561 return sdp_alloc_mb(sk, SDP_MID_DATA, 0, wait);
564 static inline struct mbuf *
565 sdp_alloc_mb_disconnect(struct socket *sk, int wait)
567 return sdp_alloc_mb(sk, SDP_MID_DISCONN, 0, wait);
571 mb_put(struct mbuf *mb, int len)
581 static inline struct mbuf *
582 sdp_alloc_mb_chrcvbuf_ack(struct socket *sk, int size, int wait)
585 struct sdp_chrecvbuf *resp_size;
587 mb = sdp_alloc_mb(sk, SDP_MID_CHRCVBUF_ACK, sizeof(*resp_size), wait);
590 resp_size = (struct sdp_chrecvbuf *)mb_put(mb, sizeof *resp_size);
591 resp_size->size = htonl(size);
596 static inline struct mbuf *
597 sdp_alloc_mb_srcavail(struct socket *sk, u32 len, u32 rkey, u64 vaddr, int wait)
600 struct sdp_srcah *srcah;
602 mb = sdp_alloc_mb(sk, SDP_MID_SRCAVAIL, sizeof(*srcah), wait);
605 srcah = (struct sdp_srcah *)mb_put(mb, sizeof(*srcah));
606 srcah->len = htonl(len);
607 srcah->rkey = htonl(rkey);
608 srcah->vaddr = cpu_to_be64(vaddr);
613 static inline struct mbuf *
614 sdp_alloc_mb_srcavail_cancel(struct socket *sk, int wait)
616 return sdp_alloc_mb(sk, SDP_MID_SRCAVAIL_CANCEL, 0, wait);
619 static inline struct mbuf *
620 sdp_alloc_mb_rdmardcompl(struct socket *sk, u32 len, int wait)
623 struct sdp_rrch *rrch;
625 mb = sdp_alloc_mb(sk, SDP_MID_RDMARDCOMPL, sizeof(*rrch), wait);
628 rrch = (struct sdp_rrch *)mb_put(mb, sizeof(*rrch));
629 rrch->len = htonl(len);
634 static inline struct mbuf *
635 sdp_alloc_mb_sendsm(struct socket *sk, int wait)
637 return sdp_alloc_mb(sk, SDP_MID_SENDSM, 0, wait);
639 static inline int sdp_tx_ring_slots_left(struct sdp_sock *ssk)
641 return SDP_TX_SIZE - tx_ring_posted(ssk);
644 static inline int credit_update_needed(struct sdp_sock *ssk)
648 c = remote_credits(ssk);
649 if (likely(c > SDP_MIN_TX_CREDITS))
651 return unlikely(c < rx_ring_posted(ssk)) &&
652 likely(tx_credits(ssk) > 0) &&
653 likely(sdp_tx_ring_slots_left(ssk));
657 #define SDPSTATS_COUNTER_INC(stat)
658 #define SDPSTATS_COUNTER_ADD(stat, val)
659 #define SDPSTATS_COUNTER_MID_INC(stat, mid)
660 #define SDPSTATS_HIST_LINEAR(stat, size)
661 #define SDPSTATS_HIST(stat, size)
664 sdp_cleanup_sdp_buf(struct sdp_sock *ssk, struct sdp_buf *sbuf,
665 enum dma_data_direction dir)
667 struct ib_device *dev;
671 dev = ssk->ib_device;
672 for (i = 0, mb = sbuf->mb; mb != NULL; mb = mb->m_next, i++)
673 ib_dma_unmap_single(dev, sbuf->mapping[i], mb->m_len, dir);
677 void sdp_set_default_moderation(struct sdp_sock *ssk);
678 void sdp_start_keepalive_timer(struct socket *sk);
679 void sdp_urg(struct sdp_sock *ssk, struct mbuf *mb);
680 void sdp_cancel_dreq_wait_timeout(struct sdp_sock *ssk);
681 void sdp_abort(struct socket *sk);
682 struct sdp_sock *sdp_notify(struct sdp_sock *ssk, int error);
686 int sdp_cma_handler(struct rdma_cm_id *, struct rdma_cm_event *);
689 int sdp_tx_ring_create(struct sdp_sock *ssk, struct ib_device *device);
690 void sdp_tx_ring_destroy(struct sdp_sock *ssk);
691 int sdp_xmit_poll(struct sdp_sock *ssk, int force);
692 void sdp_post_send(struct sdp_sock *ssk, struct mbuf *mb);
693 void sdp_post_sends(struct sdp_sock *ssk, int wait);
694 void sdp_post_keepalive(struct sdp_sock *ssk);
697 void sdp_rx_ring_init(struct sdp_sock *ssk);
698 int sdp_rx_ring_create(struct sdp_sock *ssk, struct ib_device *device);
699 void sdp_rx_ring_destroy(struct sdp_sock *ssk);
700 int sdp_resize_buffers(struct sdp_sock *ssk, u32 new_size);
701 int sdp_init_buffers(struct sdp_sock *ssk, u32 new_size);
702 void sdp_do_posts(struct sdp_sock *ssk);
703 void sdp_rx_comp_full(struct sdp_sock *ssk);
707 int sdp_sendmsg_zcopy(struct kiocb *iocb, struct socket *sk, struct iovec *iov);
708 int sdp_handle_srcavail(struct sdp_sock *ssk, struct sdp_srcah *srcah);
709 void sdp_handle_sendsm(struct sdp_sock *ssk, u32 mseq_ack);
710 void sdp_handle_rdma_read_compl(struct sdp_sock *ssk, u32 mseq_ack,
711 u32 bytes_completed);
712 int sdp_handle_rdma_read_cqe(struct sdp_sock *ssk);
713 int sdp_rdma_to_iovec(struct socket *sk, struct iovec *iov, struct mbuf *mb,
714 unsigned long *used);
715 int sdp_post_rdma_rd_compl(struct sdp_sock *ssk,
716 struct rx_srcavail_state *rx_sa);
717 int sdp_post_sendsm(struct socket *sk);
718 void srcavail_cancel_timeout(struct work_struct *work);
719 void sdp_abort_srcavail(struct socket *sk);
720 void sdp_abort_rdma_read(struct socket *sk);
721 int sdp_process_rx(struct sdp_sock *ssk);