4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License version 2 only,
8 * as published by the Free Software Foundation.
10 * This program is distributed in the hope that it will be useful, but
11 * WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * General Public License version 2 for more details (a copy is included
14 * in the LICENSE file that accompanied this code).
16 * You should have received a copy of the GNU General Public License
17 * version 2 along with this program; If not, see
18 * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
20 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21 * CA 95054 USA or visit www.sun.com if you need additional information or
27 * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
28 * Use is subject to license terms.
30 * Copyright (c) 2011, 2013, Intel Corporation.
33 * This file is part of Lustre, http://www.lustre.org/
34 * Lustre is a trademark of Sun Microsystems, Inc.
36 * lnet/klnds/o2iblnd/o2iblnd.h
38 * Author: Eric Barton <eric@bartonsoftware.com>
41 #include <linux/version.h>
42 #include <linux/module.h>
43 #include <linux/kernel.h>
45 #include <linux/string.h>
46 #include <linux/stat.h>
47 #include <linux/errno.h>
48 #include <linux/unistd.h>
49 #include <linux/uio.h>
51 #include <asm/uaccess.h>
54 #include <linux/init.h>
56 #include <linux/file.h>
57 #include <linux/stat.h>
58 #include <linux/list.h>
59 #include <linux/kmod.h>
60 #include <linux/sysctl.h>
61 #include <linux/pci.h>
62 #if LINUX_VERSION_CODE > KERNEL_VERSION(2,6,32)
63 #include <linux/pci-dma.h>
69 #define DEBUG_SUBSYSTEM S_LND
71 #include <libcfs/libcfs.h>
72 #include <lnet/lnet.h>
73 #include <lnet/lib-lnet.h>
74 #include <lnet/lnet-sysctl.h>
76 #ifdef HAVE_COMPAT_RDMA
77 #include <linux/compat-2.6.h>
79 #include <rdma/rdma_cm.h>
80 #include <rdma/ib_cm.h>
81 #include <rdma/ib_verbs.h>
82 #include <rdma/ib_fmr_pool.h>
84 #define IBLND_PEER_HASH_SIZE 101 /* # peer lists */
85 /* # scheduler loops before reschedule */
86 #define IBLND_RESCHED 100
88 #define IBLND_N_SCHED 2
89 #define IBLND_N_SCHED_HIGH 4
93 int *kib_dev_failover; /* HCA failover */
94 unsigned int *kib_service; /* IB service number */
95 int *kib_min_reconnect_interval; /* first failed connection retry... */
96 int *kib_max_reconnect_interval; /* ...exponentially increasing to this */
97 int *kib_cksum; /* checksum kib_msg_t? */
98 int *kib_timeout; /* comms timeout (seconds) */
99 int *kib_keepalive; /* keepalive timeout (seconds) */
100 int *kib_ntx; /* # tx descs */
101 int *kib_credits; /* # concurrent sends */
102 int *kib_peertxcredits; /* # concurrent sends to 1 peer */
103 int *kib_peerrtrcredits; /* # per-peer router buffer credits */
104 int *kib_peercredits_hiw; /* # when eagerly to return credits */
105 int *kib_peertimeout; /* seconds to consider peer dead */
106 char **kib_default_ipif; /* default IPoIB interface */
107 int *kib_retry_count;
108 int *kib_rnr_retry_count;
109 int *kib_concurrent_sends; /* send work queue sizing */
110 int *kib_ib_mtu; /* IB MTU */
111 int *kib_map_on_demand; /* map-on-demand if RD has more fragments
112 * than this value, 0 disable map-on-demand */
113 int *kib_pmr_pool_size; /* # physical MR in pool */
114 int *kib_fmr_pool_size; /* # FMRs in pool */
115 int *kib_fmr_flush_trigger; /* When to trigger FMR flush */
116 int *kib_fmr_cache; /* enable FMR pool cache? */
117 #if defined(CONFIG_SYSCTL) && !CFS_SYSFS_MODULE_PARM
118 struct ctl_table_header *kib_sysctl; /* sysctl interface */
120 int *kib_require_priv_port;/* accept only privileged ports */
121 int *kib_use_priv_port; /* use privileged port for active connect */
122 /* # threads on each CPT */
126 extern kib_tunables_t kiblnd_tunables;
128 #define IBLND_MSG_QUEUE_SIZE_V1 8 /* V1 only : # messages/RDMAs in-flight */
129 #define IBLND_CREDIT_HIGHWATER_V1 7 /* V1 only : when eagerly to return credits */
131 #define IBLND_CREDITS_DEFAULT 8 /* default # of peer credits */
132 #define IBLND_CREDITS_MAX ((typeof(((kib_msg_t*) 0)->ibm_credits)) - 1) /* Max # of peer credits */
134 #define IBLND_MSG_QUEUE_SIZE(v) ((v) == IBLND_MSG_VERSION_1 ? \
135 IBLND_MSG_QUEUE_SIZE_V1 : \
136 *kiblnd_tunables.kib_peertxcredits) /* # messages/RDMAs in-flight */
137 #define IBLND_CREDITS_HIGHWATER(v) ((v) == IBLND_MSG_VERSION_1 ? \
138 IBLND_CREDIT_HIGHWATER_V1 : \
139 *kiblnd_tunables.kib_peercredits_hiw) /* when eagerly to return credits */
141 #ifdef HAVE_RDMA_CREATE_ID_4ARG
142 #define kiblnd_rdma_create_id(cb, dev, ps, qpt) rdma_create_id(cb, dev, ps, qpt)
144 #define kiblnd_rdma_create_id(cb, dev, ps, qpt) rdma_create_id(cb, dev, ps)
148 kiblnd_concurrent_sends_v1(void)
150 if (*kiblnd_tunables.kib_concurrent_sends > IBLND_MSG_QUEUE_SIZE_V1 * 2)
151 return IBLND_MSG_QUEUE_SIZE_V1 * 2;
153 if (*kiblnd_tunables.kib_concurrent_sends < IBLND_MSG_QUEUE_SIZE_V1 / 2)
154 return IBLND_MSG_QUEUE_SIZE_V1 / 2;
156 return *kiblnd_tunables.kib_concurrent_sends;
159 #define IBLND_CONCURRENT_SENDS(v) ((v) == IBLND_MSG_VERSION_1 ? \
160 kiblnd_concurrent_sends_v1() : \
161 *kiblnd_tunables.kib_concurrent_sends)
162 /* 2 OOB shall suffice for 1 keepalive and 1 returning credits */
163 #define IBLND_OOB_CAPABLE(v) ((v) != IBLND_MSG_VERSION_1)
164 #define IBLND_OOB_MSGS(v) (IBLND_OOB_CAPABLE(v) ? 2 : 0)
166 #define IBLND_MSG_SIZE (4<<10) /* max size of queued messages (inc hdr) */
167 #define IBLND_MAX_RDMA_FRAGS LNET_MAX_IOV /* max # of fragments supported */
168 #define IBLND_CFG_RDMA_FRAGS (*kiblnd_tunables.kib_map_on_demand != 0 ? \
169 *kiblnd_tunables.kib_map_on_demand : \
170 IBLND_MAX_RDMA_FRAGS) /* max # of fragments configured by user */
171 #define IBLND_RDMA_FRAGS(v) ((v) == IBLND_MSG_VERSION_1 ? \
172 IBLND_MAX_RDMA_FRAGS : IBLND_CFG_RDMA_FRAGS)
174 /************************/
175 /* derived constants... */
176 /* Pools (shared by connections on each CPT) */
177 /* These pools can grow at runtime, so don't need give a very large value */
178 #define IBLND_TX_POOL 256
179 #define IBLND_PMR_POOL 256
180 #define IBLND_FMR_POOL 256
181 #define IBLND_FMR_POOL_FLUSH 192
183 /* TX messages (shared by all connections) */
184 #define IBLND_TX_MSGS() (*kiblnd_tunables.kib_ntx)
186 /* RX messages (per connection) */
187 #define IBLND_RX_MSGS(v) (IBLND_MSG_QUEUE_SIZE(v) * 2 + IBLND_OOB_MSGS(v))
188 #define IBLND_RX_MSG_BYTES(v) (IBLND_RX_MSGS(v) * IBLND_MSG_SIZE)
189 #define IBLND_RX_MSG_PAGES(v) ((IBLND_RX_MSG_BYTES(v) + PAGE_SIZE - 1) / PAGE_SIZE)
191 /* WRs and CQEs (per connection) */
192 #define IBLND_RECV_WRS(v) IBLND_RX_MSGS(v)
193 #define IBLND_SEND_WRS(v) ((IBLND_RDMA_FRAGS(v) + 1) * IBLND_CONCURRENT_SENDS(v))
194 #define IBLND_CQ_ENTRIES(v) (IBLND_RECV_WRS(v) + IBLND_SEND_WRS(v))
198 /* o2iblnd can run over aliased interface */
200 #define KIB_IFNAME_SIZE IFALIASZ
202 #define KIB_IFNAME_SIZE 256
207 cfs_list_t ibd_list; /* chain on kib_devs */
208 cfs_list_t ibd_fail_list; /* chain on kib_failed_devs */
209 __u32 ibd_ifip; /* IPoIB interface IP */
210 /** IPoIB interface name */
211 char ibd_ifname[KIB_IFNAME_SIZE];
212 int ibd_nnets; /* # nets extant */
214 cfs_time_t ibd_next_failover;
215 int ibd_failed_failover; /* # failover failures */
216 unsigned int ibd_failover; /* failover in progress */
217 unsigned int ibd_can_failover; /* IPoIB interface is a bonding master */
219 struct kib_hca_dev *ibd_hdev;
222 typedef struct kib_hca_dev
224 struct rdma_cm_id *ibh_cmid; /* listener cmid */
225 struct ib_device *ibh_ibdev; /* IB device */
226 int ibh_page_shift; /* page shift of current HCA */
227 int ibh_page_size; /* page size of current HCA */
228 __u64 ibh_page_mask; /* page mask of current HCA */
229 int ibh_mr_shift; /* bits shift of max MR size */
230 __u64 ibh_mr_size; /* size of MR */
231 int ibh_nmrs; /* # of global MRs */
232 struct ib_mr **ibh_mrs; /* global MR */
233 struct ib_pd *ibh_pd; /* PD */
234 kib_dev_t *ibh_dev; /* owner */
235 cfs_atomic_t ibh_ref; /* refcount */
238 /** # of seconds to keep pool alive */
239 #define IBLND_POOL_DEADLINE 300
240 /** # of seconds to retry if allocation failed */
241 #define IBLND_POOL_RETRY 1
245 int ibp_npages; /* # pages */
246 struct page *ibp_pages[0]; /* page array */
252 cfs_list_t pmr_list; /* chain node */
253 struct ib_phys_buf *pmr_ipb; /* physical buffer */
254 struct ib_mr *pmr_mr; /* IB MR */
255 struct kib_pmr_pool *pmr_pool; /* owner of this MR */
256 __u64 pmr_iova; /* Virtual I/O address */
257 int pmr_refcount; /* reference count */
263 typedef int (*kib_ps_pool_create_t)(struct kib_poolset *ps,
264 int inc, struct kib_pool **pp_po);
265 typedef void (*kib_ps_pool_destroy_t)(struct kib_pool *po);
266 typedef void (*kib_ps_node_init_t)(struct kib_pool *po, cfs_list_t *node);
267 typedef void (*kib_ps_node_fini_t)(struct kib_pool *po, cfs_list_t *node);
271 #define IBLND_POOL_NAME_LEN 32
273 typedef struct kib_poolset
275 spinlock_t ps_lock; /* serialize */
276 struct kib_net *ps_net; /* network it belongs to */
277 char ps_name[IBLND_POOL_NAME_LEN]; /* pool set name */
278 cfs_list_t ps_pool_list; /* list of pools */
279 cfs_list_t ps_failed_pool_list; /* failed pool list */
280 cfs_time_t ps_next_retry; /* time stamp for retry if failed to allocate */
281 int ps_increasing; /* is allocating new pool */
282 int ps_pool_size; /* new pool size */
283 int ps_cpt; /* CPT id */
285 kib_ps_pool_create_t ps_pool_create; /* create a new pool */
286 kib_ps_pool_destroy_t ps_pool_destroy; /* destroy a pool */
287 kib_ps_node_init_t ps_node_init; /* initialize new allocated node */
288 kib_ps_node_fini_t ps_node_fini; /* finalize node */
291 typedef struct kib_pool
293 cfs_list_t po_list; /* chain on pool list */
294 cfs_list_t po_free_list; /* pre-allocated node */
295 kib_poolset_t *po_owner; /* pool_set of this pool */
296 cfs_time_t po_deadline; /* deadline of this pool */
297 int po_allocated; /* # of elements in use */
298 int po_failed; /* pool is created on failed HCA */
299 int po_size; /* # of pre-allocated elements */
303 kib_poolset_t tps_poolset; /* pool-set */
304 __u64 tps_next_tx_cookie; /* cookie of TX */
308 kib_pool_t tpo_pool; /* pool */
309 struct kib_hca_dev *tpo_hdev; /* device for this pool */
310 struct kib_tx *tpo_tx_descs; /* all the tx descriptors */
311 kib_pages_t *tpo_tx_pages; /* premapped tx msg pages */
315 kib_poolset_t pps_poolset; /* pool-set */
318 typedef struct kib_pmr_pool {
319 struct kib_hca_dev *ppo_hdev; /* device for this pool */
320 kib_pool_t ppo_pool; /* pool */
325 spinlock_t fps_lock; /* serialize */
326 struct kib_net *fps_net; /* IB network */
327 cfs_list_t fps_pool_list; /* FMR pool list */
328 cfs_list_t fps_failed_pool_list; /* FMR pool list */
329 __u64 fps_version; /* validity stamp */
330 int fps_cpt; /* CPT id */
332 int fps_flush_trigger;
333 /* is allocating new pool */
335 /* time stamp for retry if failed to allocate */
336 cfs_time_t fps_next_retry;
341 cfs_list_t fpo_list; /* chain on pool list */
342 struct kib_hca_dev *fpo_hdev; /* device for this pool */
343 kib_fmr_poolset_t *fpo_owner; /* owner of this pool */
344 struct ib_fmr_pool *fpo_fmr_pool; /* IB FMR pool */
345 cfs_time_t fpo_deadline; /* deadline of this pool */
346 int fpo_failed; /* fmr pool is failed */
347 int fpo_map_count; /* # of mapped FMR */
351 struct ib_pool_fmr *fmr_pfmr; /* IB pool fmr */
352 kib_fmr_pool_t *fmr_pool; /* pool of FMR */
355 typedef struct kib_net
357 cfs_list_t ibn_list; /* chain on kib_dev_t::ibd_nets */
358 __u64 ibn_incarnation; /* my epoch */
359 int ibn_init; /* initialisation state */
360 int ibn_shutdown; /* shutting down? */
362 cfs_atomic_t ibn_npeers; /* # peers extant */
363 cfs_atomic_t ibn_nconns; /* # connections extant */
365 kib_tx_poolset_t **ibn_tx_ps; /* tx pool-set */
366 kib_fmr_poolset_t **ibn_fmr_ps; /* fmr pool-set */
367 kib_pmr_poolset_t **ibn_pmr_ps; /* pmr pool-set */
369 kib_dev_t *ibn_dev; /* underlying IB device */
372 #define KIB_THREAD_SHIFT 16
373 #define KIB_THREAD_ID(cpt, tid) ((cpt) << KIB_THREAD_SHIFT | (tid))
374 #define KIB_THREAD_CPT(id) ((id) >> KIB_THREAD_SHIFT)
375 #define KIB_THREAD_TID(id) ((id) & ((1UL << KIB_THREAD_SHIFT) - 1))
377 struct kib_sched_info {
380 /* schedulers sleep here */
381 wait_queue_head_t ibs_waitq;
382 /* conns to check for rx completions */
383 cfs_list_t ibs_conns;
384 /* number of scheduler threads */
386 /* max allowed scheduler threads */
387 int ibs_nthreads_max;
388 int ibs_cpt; /* CPT id */
393 int kib_init; /* initialisation state */
394 int kib_shutdown; /* shut down? */
395 cfs_list_t kib_devs; /* IB devices extant */
396 /* list head of failed devices */
397 cfs_list_t kib_failed_devs;
398 /* schedulers sleep here */
399 wait_queue_head_t kib_failover_waitq;
400 cfs_atomic_t kib_nthreads; /* # live threads */
401 /* stabilize net/dev/peer/conn ops */
402 rwlock_t kib_global_lock;
403 /* hash table of all my known peers */
404 cfs_list_t *kib_peers;
405 /* size of kib_peers */
406 int kib_peer_hash_size;
407 /* the connd task (serialisation assertions) */
409 /* connections to setup/teardown */
410 cfs_list_t kib_connd_conns;
411 /* connections with zero refcount */
412 cfs_list_t kib_connd_zombies;
413 /* connection daemon sleeps here */
414 wait_queue_head_t kib_connd_waitq;
415 spinlock_t kib_connd_lock; /* serialise */
416 struct ib_qp_attr kib_error_qpa; /* QP->ERROR */
417 /* percpt data for schedulers */
418 struct kib_sched_info **kib_scheds;
421 #define IBLND_INIT_NOTHING 0
422 #define IBLND_INIT_DATA 1
423 #define IBLND_INIT_ALL 2
425 /************************************************************************
426 * IB Wire message format.
427 * These are sent in sender's byte order (i.e. receiver flips).
430 typedef struct kib_connparams
432 __u16 ibcp_queue_depth;
433 __u16 ibcp_max_frags;
434 __u32 ibcp_max_msg_size;
435 } WIRE_ATTR kib_connparams_t;
439 lnet_hdr_t ibim_hdr; /* portals header */
440 char ibim_payload[0]; /* piggy-backed payload */
441 } WIRE_ATTR kib_immediate_msg_t;
445 __u32 rf_nob; /* # bytes this frag */
446 __u64 rf_addr; /* CAVEAT EMPTOR: misaligned!! */
447 } WIRE_ATTR kib_rdma_frag_t;
451 __u32 rd_key; /* local/remote key */
452 __u32 rd_nfrags; /* # fragments */
453 kib_rdma_frag_t rd_frags[0]; /* buffer frags */
454 } WIRE_ATTR kib_rdma_desc_t;
458 lnet_hdr_t ibprm_hdr; /* portals header */
459 __u64 ibprm_cookie; /* opaque completion cookie */
460 } WIRE_ATTR kib_putreq_msg_t;
464 __u64 ibpam_src_cookie; /* reflected completion cookie */
465 __u64 ibpam_dst_cookie; /* opaque completion cookie */
466 kib_rdma_desc_t ibpam_rd; /* sender's sink buffer */
467 } WIRE_ATTR kib_putack_msg_t;
471 lnet_hdr_t ibgm_hdr; /* portals header */
472 __u64 ibgm_cookie; /* opaque completion cookie */
473 kib_rdma_desc_t ibgm_rd; /* rdma descriptor */
474 } WIRE_ATTR kib_get_msg_t;
478 __u64 ibcm_cookie; /* opaque completion cookie */
479 __s32 ibcm_status; /* < 0 failure: >= 0 length */
480 } WIRE_ATTR kib_completion_msg_t;
484 /* First 2 fields fixed FOR ALL TIME */
485 __u32 ibm_magic; /* I'm an ibnal message */
486 __u16 ibm_version; /* this is my version number */
488 __u8 ibm_type; /* msg type */
489 __u8 ibm_credits; /* returned credits */
490 __u32 ibm_nob; /* # bytes in whole message */
491 __u32 ibm_cksum; /* checksum (0 == no checksum) */
492 __u64 ibm_srcnid; /* sender's NID */
493 __u64 ibm_srcstamp; /* sender's incarnation */
494 __u64 ibm_dstnid; /* destination's NID */
495 __u64 ibm_dststamp; /* destination's incarnation */
498 kib_connparams_t connparams;
499 kib_immediate_msg_t immediate;
500 kib_putreq_msg_t putreq;
501 kib_putack_msg_t putack;
503 kib_completion_msg_t completion;
505 } WIRE_ATTR kib_msg_t;
507 #define IBLND_MSG_MAGIC LNET_PROTO_IB_MAGIC /* unique magic */
509 #define IBLND_MSG_VERSION_1 0x11
510 #define IBLND_MSG_VERSION_2 0x12
511 #define IBLND_MSG_VERSION IBLND_MSG_VERSION_2
513 #define IBLND_MSG_CONNREQ 0xc0 /* connection request */
514 #define IBLND_MSG_CONNACK 0xc1 /* connection acknowledge */
515 #define IBLND_MSG_NOOP 0xd0 /* nothing (just credits) */
516 #define IBLND_MSG_IMMEDIATE 0xd1 /* immediate */
517 #define IBLND_MSG_PUT_REQ 0xd2 /* putreq (src->sink) */
518 #define IBLND_MSG_PUT_NAK 0xd3 /* completion (sink->src) */
519 #define IBLND_MSG_PUT_ACK 0xd4 /* putack (sink->src) */
520 #define IBLND_MSG_PUT_DONE 0xd5 /* completion (src->sink) */
521 #define IBLND_MSG_GET_REQ 0xd6 /* getreq (sink->src) */
522 #define IBLND_MSG_GET_DONE 0xd7 /* completion (src->sink: all OK) */
525 __u32 ibr_magic; /* sender's magic */
526 __u16 ibr_version; /* sender's version */
527 __u8 ibr_why; /* reject reason */
528 __u8 ibr_padding; /* padding */
529 __u64 ibr_incarnation; /* incarnation of peer */
530 kib_connparams_t ibr_cp; /* connection parameters */
531 } WIRE_ATTR kib_rej_t;
533 /* connection rejection reasons */
534 #define IBLND_REJECT_CONN_RACE 1 /* You lost connection race */
535 #define IBLND_REJECT_NO_RESOURCES 2 /* Out of memory/conns etc */
536 #define IBLND_REJECT_FATAL 3 /* Anything else */
538 #define IBLND_REJECT_CONN_UNCOMPAT 4 /* incompatible version peer */
539 #define IBLND_REJECT_CONN_STALE 5 /* stale peer */
541 #define IBLND_REJECT_RDMA_FRAGS 6 /* Fatal: peer's rdma frags can't match mine */
542 #define IBLND_REJECT_MSG_QUEUE_SIZE 7 /* Fatal: peer's msg queue size can't match mine */
544 /***********************************************************************/
546 typedef struct kib_rx /* receive message */
548 cfs_list_t rx_list; /* queue for attention */
549 struct kib_conn *rx_conn; /* owning conn */
550 int rx_nob; /* # bytes received (-1 while posted) */
551 enum ib_wc_status rx_status; /* completion status */
552 kib_msg_t *rx_msg; /* message buffer (host vaddr) */
553 __u64 rx_msgaddr; /* message buffer (I/O addr) */
554 DECLARE_PCI_UNMAP_ADDR (rx_msgunmap); /* for dma_unmap_single() */
555 struct ib_recv_wr rx_wrq; /* receive work item... */
556 struct ib_sge rx_sge; /* ...and its memory */
559 #define IBLND_POSTRX_DONT_POST 0 /* don't post */
560 #define IBLND_POSTRX_NO_CREDIT 1 /* post: no credits */
561 #define IBLND_POSTRX_PEER_CREDIT 2 /* post: give peer back 1 credit */
562 #define IBLND_POSTRX_RSRVD_CREDIT 3 /* post: give myself back 1 reserved credit */
564 typedef struct kib_tx /* transmit message */
566 cfs_list_t tx_list; /* queue on idle_txs ibc_tx_queue etc. */
567 kib_tx_pool_t *tx_pool; /* pool I'm from */
568 struct kib_conn *tx_conn; /* owning conn */
569 short tx_sending; /* # tx callbacks outstanding */
570 short tx_queued; /* queued for sending */
571 short tx_waiting; /* waiting for peer */
572 int tx_status; /* LNET completion status */
573 unsigned long tx_deadline; /* completion deadline */
574 __u64 tx_cookie; /* completion cookie */
575 lnet_msg_t *tx_lntmsg[2]; /* lnet msgs to finalize on completion */
576 kib_msg_t *tx_msg; /* message buffer (host vaddr) */
577 __u64 tx_msgaddr; /* message buffer (I/O addr) */
578 DECLARE_PCI_UNMAP_ADDR (tx_msgunmap); /* for dma_unmap_single() */
579 int tx_nwrq; /* # send work items */
580 struct ib_send_wr *tx_wrq; /* send work items... */
581 struct ib_sge *tx_sge; /* ...and their memory */
582 kib_rdma_desc_t *tx_rd; /* rdma descriptor */
583 int tx_nfrags; /* # entries in... */
584 struct scatterlist *tx_frags; /* dma_map_sg descriptor */
585 __u64 *tx_pages; /* rdma phys page addrs */
587 kib_phys_mr_t *pmr; /* MR for physical buffer */
588 kib_fmr_t fmr; /* FMR */
590 int tx_dmadir; /* dma direction */
593 typedef struct kib_connvars
595 /* connection-in-progress variables */
599 typedef struct kib_conn
601 struct kib_sched_info *ibc_sched; /* scheduler information */
602 struct kib_peer *ibc_peer; /* owning peer */
603 kib_hca_dev_t *ibc_hdev; /* HCA bound on */
604 cfs_list_t ibc_list; /* stash on peer's conn list */
605 cfs_list_t ibc_sched_list; /* schedule for attention */
606 __u16 ibc_version; /* version of connection */
607 __u64 ibc_incarnation; /* which instance of the peer */
608 cfs_atomic_t ibc_refcount; /* # users */
609 int ibc_state; /* what's happening */
610 int ibc_nsends_posted; /* # uncompleted sends */
611 int ibc_noops_posted; /* # uncompleted NOOPs */
612 int ibc_credits; /* # credits I have */
613 int ibc_outstanding_credits; /* # credits to return */
614 int ibc_reserved_credits;/* # ACK/DONE msg credits */
615 int ibc_comms_error; /* set on comms error */
616 unsigned int ibc_nrx:16; /* receive buffers owned */
617 unsigned int ibc_scheduled:1; /* scheduled for attention */
618 unsigned int ibc_ready:1; /* CQ callback fired */
619 /* time of last send */
620 unsigned long ibc_last_send;
621 /** link chain for kiblnd_check_conns only */
622 cfs_list_t ibc_connd_list;
623 /** rxs completed before ESTABLISHED */
624 cfs_list_t ibc_early_rxs;
625 /** IBLND_MSG_NOOPs for IBLND_MSG_VERSION_1 */
626 cfs_list_t ibc_tx_noops;
627 cfs_list_t ibc_tx_queue; /* sends that need a credit */
628 cfs_list_t ibc_tx_queue_nocred;/* sends that don't need a credit */
629 cfs_list_t ibc_tx_queue_rsrvd; /* sends that need to reserve an ACK/DONE msg */
630 cfs_list_t ibc_active_txs; /* active tx awaiting completion */
631 spinlock_t ibc_lock; /* serialise */
632 kib_rx_t *ibc_rxs; /* the rx descs */
633 kib_pages_t *ibc_rx_pages; /* premapped rx msg pages */
635 struct rdma_cm_id *ibc_cmid; /* CM id */
636 struct ib_cq *ibc_cq; /* completion queue */
638 kib_connvars_t *ibc_connvars; /* in-progress connection state */
641 #define IBLND_CONN_INIT 0 /* being initialised */
642 #define IBLND_CONN_ACTIVE_CONNECT 1 /* active sending req */
643 #define IBLND_CONN_PASSIVE_WAIT 2 /* passive waiting for rtu */
644 #define IBLND_CONN_ESTABLISHED 3 /* connection established */
645 #define IBLND_CONN_CLOSING 4 /* being closed */
646 #define IBLND_CONN_DISCONNECTED 5 /* disconnected */
648 typedef struct kib_peer
650 cfs_list_t ibp_list; /* stash on global peer list */
651 lnet_nid_t ibp_nid; /* who's on the other end(s) */
652 lnet_ni_t *ibp_ni; /* LNet interface */
653 cfs_atomic_t ibp_refcount; /* # users */
654 cfs_list_t ibp_conns; /* all active connections */
655 cfs_list_t ibp_tx_queue; /* msgs waiting for a conn */
656 __u16 ibp_version; /* version of peer */
657 __u64 ibp_incarnation; /* incarnation of peer */
658 int ibp_connecting; /* current active connection attempts */
659 int ibp_accepting; /* current passive connection attempts */
660 int ibp_error; /* errno on closing this peer */
661 cfs_time_t ibp_last_alive; /* when (in jiffies) I was last alive */
664 extern kib_data_t kiblnd_data;
666 extern void kiblnd_hdev_destroy(kib_hca_dev_t *hdev);
669 kiblnd_hdev_addref_locked(kib_hca_dev_t *hdev)
671 LASSERT (cfs_atomic_read(&hdev->ibh_ref) > 0);
672 cfs_atomic_inc(&hdev->ibh_ref);
676 kiblnd_hdev_decref(kib_hca_dev_t *hdev)
678 LASSERT (cfs_atomic_read(&hdev->ibh_ref) > 0);
679 if (cfs_atomic_dec_and_test(&hdev->ibh_ref))
680 kiblnd_hdev_destroy(hdev);
684 kiblnd_dev_can_failover(kib_dev_t *dev)
686 if (!cfs_list_empty(&dev->ibd_fail_list)) /* already scheduled */
689 if (*kiblnd_tunables.kib_dev_failover == 0) /* disabled */
692 if (*kiblnd_tunables.kib_dev_failover > 1) /* force failover */
695 return dev->ibd_can_failover;
698 #define kiblnd_conn_addref(conn) \
700 CDEBUG(D_NET, "conn[%p] (%d)++\n", \
701 (conn), cfs_atomic_read(&(conn)->ibc_refcount)); \
702 cfs_atomic_inc(&(conn)->ibc_refcount); \
705 #define kiblnd_conn_decref(conn) \
707 unsigned long flags; \
709 CDEBUG(D_NET, "conn[%p] (%d)--\n", \
710 (conn), cfs_atomic_read(&(conn)->ibc_refcount)); \
711 LASSERT_ATOMIC_POS(&(conn)->ibc_refcount); \
712 if (cfs_atomic_dec_and_test(&(conn)->ibc_refcount)) { \
713 spin_lock_irqsave(&kiblnd_data.kib_connd_lock, flags); \
714 cfs_list_add_tail(&(conn)->ibc_list, \
715 &kiblnd_data.kib_connd_zombies); \
716 wake_up(&kiblnd_data.kib_connd_waitq); \
717 spin_unlock_irqrestore(&kiblnd_data.kib_connd_lock, flags);\
721 #define kiblnd_peer_addref(peer) \
723 CDEBUG(D_NET, "peer[%p] -> %s (%d)++\n", \
724 (peer), libcfs_nid2str((peer)->ibp_nid), \
725 cfs_atomic_read (&(peer)->ibp_refcount)); \
726 cfs_atomic_inc(&(peer)->ibp_refcount); \
729 #define kiblnd_peer_decref(peer) \
731 CDEBUG(D_NET, "peer[%p] -> %s (%d)--\n", \
732 (peer), libcfs_nid2str((peer)->ibp_nid), \
733 cfs_atomic_read (&(peer)->ibp_refcount)); \
734 LASSERT_ATOMIC_POS(&(peer)->ibp_refcount); \
735 if (cfs_atomic_dec_and_test(&(peer)->ibp_refcount)) \
736 kiblnd_destroy_peer(peer); \
739 static inline cfs_list_t *
740 kiblnd_nid2peerlist (lnet_nid_t nid)
743 ((unsigned int)nid) % kiblnd_data.kib_peer_hash_size;
745 return (&kiblnd_data.kib_peers [hash]);
749 kiblnd_peer_active (kib_peer_t *peer)
751 /* Am I in the peer hash table? */
752 return (!cfs_list_empty(&peer->ibp_list));
755 static inline kib_conn_t *
756 kiblnd_get_conn_locked (kib_peer_t *peer)
758 LASSERT (!cfs_list_empty(&peer->ibp_conns));
760 /* just return the first connection */
761 return cfs_list_entry(peer->ibp_conns.next, kib_conn_t, ibc_list);
765 kiblnd_send_keepalive(kib_conn_t *conn)
767 return (*kiblnd_tunables.kib_keepalive > 0) &&
768 cfs_time_after(jiffies, conn->ibc_last_send +
769 *kiblnd_tunables.kib_keepalive*HZ);
773 kiblnd_need_noop(kib_conn_t *conn)
775 LASSERT (conn->ibc_state >= IBLND_CONN_ESTABLISHED);
777 if (conn->ibc_outstanding_credits <
778 IBLND_CREDITS_HIGHWATER(conn->ibc_version) &&
779 !kiblnd_send_keepalive(conn))
780 return 0; /* No need to send NOOP */
782 if (IBLND_OOB_CAPABLE(conn->ibc_version)) {
783 if (!cfs_list_empty(&conn->ibc_tx_queue_nocred))
784 return 0; /* NOOP can be piggybacked */
786 /* No tx to piggyback NOOP onto or no credit to send a tx */
787 return (cfs_list_empty(&conn->ibc_tx_queue) ||
788 conn->ibc_credits == 0);
791 if (!cfs_list_empty(&conn->ibc_tx_noops) || /* NOOP already queued */
792 !cfs_list_empty(&conn->ibc_tx_queue_nocred) || /* piggyback NOOP */
793 conn->ibc_credits == 0) /* no credit */
796 if (conn->ibc_credits == 1 && /* last credit reserved for */
797 conn->ibc_outstanding_credits == 0) /* giving back credits */
800 /* No tx to piggyback NOOP onto or no credit to send a tx */
801 return (cfs_list_empty(&conn->ibc_tx_queue) || conn->ibc_credits == 1);
805 kiblnd_abort_receives(kib_conn_t *conn)
807 ib_modify_qp(conn->ibc_cmid->qp,
808 &kiblnd_data.kib_error_qpa, IB_QP_STATE);
811 static inline const char *
812 kiblnd_queue2str (kib_conn_t *conn, cfs_list_t *q)
814 if (q == &conn->ibc_tx_queue)
817 if (q == &conn->ibc_tx_queue_rsrvd)
818 return "tx_queue_rsrvd";
820 if (q == &conn->ibc_tx_queue_nocred)
821 return "tx_queue_nocred";
823 if (q == &conn->ibc_active_txs)
830 /* CAVEAT EMPTOR: We rely on descriptor alignment to allow us to use the
831 * lowest bits of the work request id to stash the work item type. */
833 #define IBLND_WID_TX 0
834 #define IBLND_WID_RDMA 1
835 #define IBLND_WID_RX 2
836 #define IBLND_WID_MASK 3UL
839 kiblnd_ptr2wreqid (void *ptr, int type)
841 unsigned long lptr = (unsigned long)ptr;
843 LASSERT ((lptr & IBLND_WID_MASK) == 0);
844 LASSERT ((type & ~IBLND_WID_MASK) == 0);
845 return (__u64)(lptr | type);
849 kiblnd_wreqid2ptr (__u64 wreqid)
851 return (void *)(((unsigned long)wreqid) & ~IBLND_WID_MASK);
855 kiblnd_wreqid2type (__u64 wreqid)
857 return (wreqid & IBLND_WID_MASK);
861 kiblnd_set_conn_state (kib_conn_t *conn, int state)
863 conn->ibc_state = state;
868 kiblnd_init_msg (kib_msg_t *msg, int type, int body_nob)
870 msg->ibm_type = type;
871 msg->ibm_nob = offsetof(kib_msg_t, ibm_u) + body_nob;
875 kiblnd_rd_size (kib_rdma_desc_t *rd)
880 for (i = size = 0; i < rd->rd_nfrags; i++)
881 size += rd->rd_frags[i].rf_nob;
887 kiblnd_rd_frag_addr(kib_rdma_desc_t *rd, int index)
889 return rd->rd_frags[index].rf_addr;
893 kiblnd_rd_frag_size(kib_rdma_desc_t *rd, int index)
895 return rd->rd_frags[index].rf_nob;
899 kiblnd_rd_frag_key(kib_rdma_desc_t *rd, int index)
905 kiblnd_rd_consume_frag(kib_rdma_desc_t *rd, int index, __u32 nob)
907 if (nob < rd->rd_frags[index].rf_nob) {
908 rd->rd_frags[index].rf_addr += nob;
909 rd->rd_frags[index].rf_nob -= nob;
918 kiblnd_rd_msg_size(kib_rdma_desc_t *rd, int msgtype, int n)
920 LASSERT (msgtype == IBLND_MSG_GET_REQ ||
921 msgtype == IBLND_MSG_PUT_ACK);
923 return msgtype == IBLND_MSG_GET_REQ ?
924 offsetof(kib_get_msg_t, ibgm_rd.rd_frags[n]) :
925 offsetof(kib_putack_msg_t, ibpam_rd.rd_frags[n]);
928 #ifdef HAVE_OFED_IB_DMA_MAP
931 kiblnd_dma_mapping_error(struct ib_device *dev, u64 dma_addr)
933 return ib_dma_mapping_error(dev, dma_addr);
936 static inline __u64 kiblnd_dma_map_single(struct ib_device *dev,
937 void *msg, size_t size,
938 enum dma_data_direction direction)
940 return ib_dma_map_single(dev, msg, size, direction);
943 static inline void kiblnd_dma_unmap_single(struct ib_device *dev,
944 __u64 addr, size_t size,
945 enum dma_data_direction direction)
947 ib_dma_unmap_single(dev, addr, size, direction);
950 #define KIBLND_UNMAP_ADDR_SET(p, m, a) do {} while (0)
951 #define KIBLND_UNMAP_ADDR(p, m, a) (a)
953 static inline int kiblnd_dma_map_sg(struct ib_device *dev,
954 struct scatterlist *sg, int nents,
955 enum dma_data_direction direction)
957 return ib_dma_map_sg(dev, sg, nents, direction);
960 static inline void kiblnd_dma_unmap_sg(struct ib_device *dev,
961 struct scatterlist *sg, int nents,
962 enum dma_data_direction direction)
964 ib_dma_unmap_sg(dev, sg, nents, direction);
967 static inline __u64 kiblnd_sg_dma_address(struct ib_device *dev,
968 struct scatterlist *sg)
970 return ib_sg_dma_address(dev, sg);
973 static inline unsigned int kiblnd_sg_dma_len(struct ib_device *dev,
974 struct scatterlist *sg)
976 return ib_sg_dma_len(dev, sg);
979 /* XXX We use KIBLND_CONN_PARAM(e) as writable buffer, it's not strictly
980 * right because OFED1.2 defines it as const, to use it we have to add
981 * (void *) cast to overcome "const" */
983 #define KIBLND_CONN_PARAM(e) ((e)->param.conn.private_data)
984 #define KIBLND_CONN_PARAM_LEN(e) ((e)->param.conn.private_data_len)
989 kiblnd_dma_mapping_error(struct ib_device *dev, dma_addr_t dma_addr)
991 return dma_mapping_error(dma_addr);
994 static inline dma_addr_t kiblnd_dma_map_single(struct ib_device *dev,
995 void *msg, size_t size,
996 enum dma_data_direction direction)
998 return dma_map_single(dev->dma_device, msg, size, direction);
1001 static inline void kiblnd_dma_unmap_single(struct ib_device *dev,
1002 dma_addr_t addr, size_t size,
1003 enum dma_data_direction direction)
1005 dma_unmap_single(dev->dma_device, addr, size, direction);
1008 #define KIBLND_UNMAP_ADDR_SET(p, m, a) pci_unmap_addr_set(p, m, a)
1009 #define KIBLND_UNMAP_ADDR(p, m, a) pci_unmap_addr(p, m)
1011 static inline int kiblnd_dma_map_sg(struct ib_device *dev,
1012 struct scatterlist *sg, int nents,
1013 enum dma_data_direction direction)
1015 return dma_map_sg(dev->dma_device, sg, nents, direction);
1018 static inline void kiblnd_dma_unmap_sg(struct ib_device *dev,
1019 struct scatterlist *sg, int nents,
1020 enum dma_data_direction direction)
1022 return dma_unmap_sg(dev->dma_device, sg, nents, direction);
1026 static inline dma_addr_t kiblnd_sg_dma_address(struct ib_device *dev,
1027 struct scatterlist *sg)
1029 return sg_dma_address(sg);
1033 static inline unsigned int kiblnd_sg_dma_len(struct ib_device *dev,
1034 struct scatterlist *sg)
1036 return sg_dma_len(sg);
1039 #define KIBLND_CONN_PARAM(e) ((e)->private_data)
1040 #define KIBLND_CONN_PARAM_LEN(e) ((e)->private_data_len)
1044 struct ib_mr *kiblnd_find_rd_dma_mr(kib_hca_dev_t *hdev,
1045 kib_rdma_desc_t *rd);
1046 struct ib_mr *kiblnd_find_dma_mr(kib_hca_dev_t *hdev,
1047 __u64 addr, __u64 size);
1048 void kiblnd_map_rx_descs(kib_conn_t *conn);
1049 void kiblnd_unmap_rx_descs(kib_conn_t *conn);
1050 int kiblnd_map_tx(lnet_ni_t *ni, kib_tx_t *tx,
1051 kib_rdma_desc_t *rd, int nfrags);
1052 void kiblnd_unmap_tx(lnet_ni_t *ni, kib_tx_t *tx);
1053 void kiblnd_pool_free_node(kib_pool_t *pool, cfs_list_t *node);
1054 cfs_list_t *kiblnd_pool_alloc_node(kib_poolset_t *ps);
1056 int kiblnd_fmr_pool_map(kib_fmr_poolset_t *fps, __u64 *pages,
1057 int npages, __u64 iov, kib_fmr_t *fmr);
1058 void kiblnd_fmr_pool_unmap(kib_fmr_t *fmr, int status);
1060 int kiblnd_pmr_pool_map(kib_pmr_poolset_t *pps, kib_hca_dev_t *hdev,
1061 kib_rdma_desc_t *rd, __u64 *iova, kib_phys_mr_t **pp_pmr);
1062 void kiblnd_pmr_pool_unmap(kib_phys_mr_t *pmr);
1064 int kiblnd_startup (lnet_ni_t *ni);
1065 void kiblnd_shutdown (lnet_ni_t *ni);
1066 int kiblnd_ctl (lnet_ni_t *ni, unsigned int cmd, void *arg);
1067 void kiblnd_query (struct lnet_ni *ni, lnet_nid_t nid, cfs_time_t *when);
1069 int kiblnd_tunables_init(void);
1070 void kiblnd_tunables_fini(void);
1072 int kiblnd_connd (void *arg);
1073 int kiblnd_scheduler(void *arg);
1074 int kiblnd_thread_start(int (*fn)(void *arg), void *arg, char *name);
1075 int kiblnd_failover_thread (void *arg);
1077 int kiblnd_alloc_pages(kib_pages_t **pp, int cpt, int npages);
1078 void kiblnd_free_pages (kib_pages_t *p);
1080 int kiblnd_cm_callback(struct rdma_cm_id *cmid,
1081 struct rdma_cm_event *event);
1082 int kiblnd_translate_mtu(int value);
1084 int kiblnd_dev_failover(kib_dev_t *dev);
1085 int kiblnd_create_peer (lnet_ni_t *ni, kib_peer_t **peerp, lnet_nid_t nid);
1086 void kiblnd_destroy_peer (kib_peer_t *peer);
1087 void kiblnd_destroy_dev (kib_dev_t *dev);
1088 void kiblnd_unlink_peer_locked (kib_peer_t *peer);
1089 void kiblnd_peer_alive (kib_peer_t *peer);
1090 kib_peer_t *kiblnd_find_peer_locked (lnet_nid_t nid);
1091 void kiblnd_peer_connect_failed (kib_peer_t *peer, int active, int error);
1092 int kiblnd_close_stale_conns_locked (kib_peer_t *peer,
1093 int version, __u64 incarnation);
1094 int kiblnd_close_peer_conns_locked (kib_peer_t *peer, int why);
1096 void kiblnd_connreq_done(kib_conn_t *conn, int status);
1097 kib_conn_t *kiblnd_create_conn (kib_peer_t *peer, struct rdma_cm_id *cmid,
1098 int state, int version);
1099 void kiblnd_destroy_conn (kib_conn_t *conn);
1100 void kiblnd_close_conn (kib_conn_t *conn, int error);
1101 void kiblnd_close_conn_locked (kib_conn_t *conn, int error);
1103 int kiblnd_init_rdma (kib_conn_t *conn, kib_tx_t *tx, int type,
1104 int nob, kib_rdma_desc_t *dstrd, __u64 dstcookie);
1106 void kiblnd_launch_tx (lnet_ni_t *ni, kib_tx_t *tx, lnet_nid_t nid);
1107 void kiblnd_queue_tx_locked (kib_tx_t *tx, kib_conn_t *conn);
1108 void kiblnd_queue_tx (kib_tx_t *tx, kib_conn_t *conn);
1109 void kiblnd_init_tx_msg (lnet_ni_t *ni, kib_tx_t *tx, int type, int body_nob);
1110 void kiblnd_txlist_done (lnet_ni_t *ni, cfs_list_t *txlist,
1112 void kiblnd_check_sends (kib_conn_t *conn);
1114 void kiblnd_qp_event(struct ib_event *event, void *arg);
1115 void kiblnd_cq_event(struct ib_event *event, void *arg);
1116 void kiblnd_cq_completion(struct ib_cq *cq, void *arg);
1118 void kiblnd_pack_msg (lnet_ni_t *ni, kib_msg_t *msg, int version,
1119 int credits, lnet_nid_t dstnid, __u64 dststamp);
1120 int kiblnd_unpack_msg(kib_msg_t *msg, int nob);
1121 int kiblnd_post_rx (kib_rx_t *rx, int credit);
1123 int kiblnd_send(lnet_ni_t *ni, void *private, lnet_msg_t *lntmsg);
1124 int kiblnd_recv(lnet_ni_t *ni, void *private, lnet_msg_t *lntmsg, int delayed,
1125 unsigned int niov, struct iovec *iov, lnet_kiov_t *kiov,
1126 unsigned int offset, unsigned int mlen, unsigned int rlen);