1 /*
2  * GPL HEADER START
3  *
4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5  *
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.
9  *
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).
15  *
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
19  *
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
22  * have any questions.
23  *
24  * GPL HEADER END
25  */
26 /*
27  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2011, 2012, Intel Corporation.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  *
36  * lnet/klnds/o2iblnd/o2iblnd.h
37  *
38  * Author: Eric Barton <eric@bartonsoftware.com>
39  */
40 
41 #include <linux/module.h>
42 #include <linux/kernel.h>
43 #include <linux/mm.h>
44 #include <linux/string.h>
45 #include <linux/stat.h>
46 #include <linux/errno.h>
47 #include <linux/unistd.h>
48 #include <linux/uio.h>
49 #include <linux/uaccess.h>
50 
51 #include <asm/io.h>
52 
53 #include <linux/fs.h>
54 #include <linux/file.h>
55 #include <linux/list.h>
56 #include <linux/kmod.h>
57 #include <linux/sysctl.h>
58 #include <linux/pci.h>
59 
60 #include <net/sock.h>
61 #include <linux/in.h>
62 
63 #define DEBUG_SUBSYSTEM S_LND
64 
65 #include "../../../include/linux/libcfs/libcfs.h"
66 #include "../../../include/linux/lnet/lnet.h"
67 #include "../../../include/linux/lnet/lib-lnet.h"
68 #include "../../../include/linux/lnet/lnet-sysctl.h"
69 
70 #include <rdma/rdma_cm.h>
71 #include <rdma/ib_cm.h>
72 #include <rdma/ib_verbs.h>
73 #include <rdma/ib_fmr_pool.h>
74 
75 #define IBLND_PEER_HASH_SIZE		101	/* # peer lists */
76 /* # scheduler loops before reschedule */
77 #define IBLND_RESCHED			100
78 
79 #define IBLND_N_SCHED			2
80 #define IBLND_N_SCHED_HIGH		4
81 
82 typedef struct {
83 	int	      *kib_dev_failover;     /* HCA failover */
84 	unsigned int     *kib_service;	  /* IB service number */
85 	int	      *kib_min_reconnect_interval; /* first failed connection retry... */
86 	int	      *kib_max_reconnect_interval; /* ...exponentially increasing to this */
87 	int	      *kib_cksum;	    /* checksum kib_msg_t? */
88 	int	      *kib_timeout;	  /* comms timeout (seconds) */
89 	int	      *kib_keepalive;	/* keepalive timeout (seconds) */
90 	int	      *kib_ntx;	      /* # tx descs */
91 	int	      *kib_credits;	  /* # concurrent sends */
92 	int	      *kib_peertxcredits;    /* # concurrent sends to 1 peer */
93 	int	      *kib_peerrtrcredits;   /* # per-peer router buffer credits */
94 	int	      *kib_peercredits_hiw;  /* # when eagerly to return credits */
95 	int	      *kib_peertimeout;      /* seconds to consider peer dead */
96 	char	    **kib_default_ipif;     /* default IPoIB interface */
97 	int	      *kib_retry_count;
98 	int	      *kib_rnr_retry_count;
99 	int	      *kib_concurrent_sends; /* send work queue sizing */
100 	int		 *kib_ib_mtu;		/* IB MTU */
101 	int	      *kib_map_on_demand;    /* map-on-demand if RD has more fragments
102 						 * than this value, 0 disable map-on-demand */
103 	int	      *kib_pmr_pool_size;    /* # physical MR in pool */
104 	int	      *kib_fmr_pool_size;    /* # FMRs in pool */
105 	int	      *kib_fmr_flush_trigger; /* When to trigger FMR flush */
106 	int	      *kib_fmr_cache;	/* enable FMR pool cache? */
107 	int	      *kib_require_priv_port;/* accept only privileged ports */
108 	int	      *kib_use_priv_port;    /* use privileged port for active connect */
109 	/* # threads on each CPT */
110 	int		 *kib_nscheds;
111 } kib_tunables_t;
112 
113 extern kib_tunables_t  kiblnd_tunables;
114 
115 #define IBLND_MSG_QUEUE_SIZE_V1      8	  /* V1 only : # messages/RDMAs in-flight */
116 #define IBLND_CREDIT_HIGHWATER_V1    7	  /* V1 only : when eagerly to return credits */
117 
118 #define IBLND_CREDITS_DEFAULT	8	  /* default # of peer credits */
119 #define IBLND_CREDITS_MAX	  ((typeof(((kib_msg_t*) 0)->ibm_credits)) - 1)  /* Max # of peer credits */
120 
121 #define IBLND_MSG_QUEUE_SIZE(v)    ((v) == IBLND_MSG_VERSION_1 ? \
122 				     IBLND_MSG_QUEUE_SIZE_V1 :   \
123 				     *kiblnd_tunables.kib_peertxcredits) /* # messages/RDMAs in-flight */
124 #define IBLND_CREDITS_HIGHWATER(v) ((v) == IBLND_MSG_VERSION_1 ? \
125 				     IBLND_CREDIT_HIGHWATER_V1 : \
126 				     *kiblnd_tunables.kib_peercredits_hiw) /* when eagerly to return credits */
127 
128 #define kiblnd_rdma_create_id(cb, dev, ps, qpt) rdma_create_id(cb, dev, ps, qpt)
129 
130 static inline int
kiblnd_concurrent_sends_v1(void)131 kiblnd_concurrent_sends_v1(void)
132 {
133 	if (*kiblnd_tunables.kib_concurrent_sends > IBLND_MSG_QUEUE_SIZE_V1 * 2)
134 		return IBLND_MSG_QUEUE_SIZE_V1 * 2;
135 
136 	if (*kiblnd_tunables.kib_concurrent_sends < IBLND_MSG_QUEUE_SIZE_V1 / 2)
137 		return IBLND_MSG_QUEUE_SIZE_V1 / 2;
138 
139 	return *kiblnd_tunables.kib_concurrent_sends;
140 }
141 
142 #define IBLND_CONCURRENT_SENDS(v)  ((v) == IBLND_MSG_VERSION_1 ? \
143 				     kiblnd_concurrent_sends_v1() : \
144 				     *kiblnd_tunables.kib_concurrent_sends)
145 /* 2 OOB shall suffice for 1 keepalive and 1 returning credits */
146 #define IBLND_OOB_CAPABLE(v)       ((v) != IBLND_MSG_VERSION_1)
147 #define IBLND_OOB_MSGS(v)	   (IBLND_OOB_CAPABLE(v) ? 2 : 0)
148 
149 #define IBLND_MSG_SIZE	      (4<<10)		 /* max size of queued messages (inc hdr) */
150 #define IBLND_MAX_RDMA_FRAGS	 LNET_MAX_IOV	   /* max # of fragments supported */
151 #define IBLND_CFG_RDMA_FRAGS       (*kiblnd_tunables.kib_map_on_demand != 0 ? \
152 				    *kiblnd_tunables.kib_map_on_demand :      \
153 				     IBLND_MAX_RDMA_FRAGS)  /* max # of fragments configured by user */
154 #define IBLND_RDMA_FRAGS(v)	((v) == IBLND_MSG_VERSION_1 ? \
155 				     IBLND_MAX_RDMA_FRAGS : IBLND_CFG_RDMA_FRAGS)
156 
157 /************************/
158 /* derived constants... */
159 /* Pools (shared by connections on each CPT) */
160 /* These pools can grow at runtime, so don't need give a very large value */
161 #define IBLND_TX_POOL			256
162 #define IBLND_PMR_POOL			256
163 #define IBLND_FMR_POOL			256
164 #define IBLND_FMR_POOL_FLUSH		192
165 
166 /* TX messages (shared by all connections) */
167 #define IBLND_TX_MSGS()	    (*kiblnd_tunables.kib_ntx)
168 
169 /* RX messages (per connection) */
170 #define IBLND_RX_MSGS(v)	    (IBLND_MSG_QUEUE_SIZE(v) * 2 + IBLND_OOB_MSGS(v))
171 #define IBLND_RX_MSG_BYTES(v)       (IBLND_RX_MSGS(v) * IBLND_MSG_SIZE)
172 #define IBLND_RX_MSG_PAGES(v)      ((IBLND_RX_MSG_BYTES(v) + PAGE_SIZE - 1) / PAGE_SIZE)
173 
174 /* WRs and CQEs (per connection) */
175 #define IBLND_RECV_WRS(v)	    IBLND_RX_MSGS(v)
176 #define IBLND_SEND_WRS(v)	  ((IBLND_RDMA_FRAGS(v) + 1) * IBLND_CONCURRENT_SENDS(v))
177 #define IBLND_CQ_ENTRIES(v)	 (IBLND_RECV_WRS(v) + IBLND_SEND_WRS(v))
178 
179 struct kib_hca_dev;
180 
181 /* o2iblnd can run over aliased interface */
182 #ifdef IFALIASZ
183 #define KIB_IFNAME_SIZE	      IFALIASZ
184 #else
185 #define KIB_IFNAME_SIZE	      256
186 #endif
187 
188 typedef struct {
189 	struct list_head	   ibd_list;	  /* chain on kib_devs */
190 	struct list_head	   ibd_fail_list;     /* chain on kib_failed_devs */
191 	__u32		ibd_ifip;	  /* IPoIB interface IP */
192 	/** IPoIB interface name */
193 	char		 ibd_ifname[KIB_IFNAME_SIZE];
194 	int		  ibd_nnets;	 /* # nets extant */
195 
196 	unsigned long	   ibd_next_failover;
197 	int		  ibd_failed_failover; /* # failover failures */
198 	unsigned int	 ibd_failover;      /* failover in progress */
199 	unsigned int	 ibd_can_failover;  /* IPoIB interface is a bonding master */
200 	struct list_head	   ibd_nets;
201 	struct kib_hca_dev  *ibd_hdev;
202 } kib_dev_t;
203 
204 typedef struct kib_hca_dev {
205 	struct rdma_cm_id   *ibh_cmid;	  /* listener cmid */
206 	struct ib_device    *ibh_ibdev;	 /* IB device */
207 	int		  ibh_page_shift;    /* page shift of current HCA */
208 	int		  ibh_page_size;     /* page size of current HCA */
209 	__u64		ibh_page_mask;     /* page mask of current HCA */
210 	int		  ibh_mr_shift;      /* bits shift of max MR size */
211 	__u64		ibh_mr_size;       /* size of MR */
212 	int		  ibh_nmrs;	  /* # of global MRs */
213 	struct ib_mr       **ibh_mrs;	   /* global MR */
214 	struct ib_pd	*ibh_pd;	    /* PD */
215 	kib_dev_t	   *ibh_dev;	   /* owner */
216 	atomic_t	 ibh_ref;	   /* refcount */
217 } kib_hca_dev_t;
218 
219 /** # of seconds to keep pool alive */
220 #define IBLND_POOL_DEADLINE     300
221 /** # of seconds to retry if allocation failed */
222 #define IBLND_POOL_RETRY	1
223 
224 typedef struct {
225 	int		     ibp_npages;	     /* # pages */
226 	struct page	    *ibp_pages[0];	   /* page array */
227 } kib_pages_t;
228 
229 struct kib_pmr_pool;
230 
231 typedef struct {
232 	struct list_head	      pmr_list;	       /* chain node */
233 	struct ib_phys_buf     *pmr_ipb;		/* physical buffer */
234 	struct ib_mr	   *pmr_mr;		 /* IB MR */
235 	struct kib_pmr_pool    *pmr_pool;	       /* owner of this MR */
236 	__u64		   pmr_iova;	       /* Virtual I/O address */
237 	int		     pmr_refcount;	   /* reference count */
238 } kib_phys_mr_t;
239 
240 struct kib_pool;
241 struct kib_poolset;
242 
243 typedef int  (*kib_ps_pool_create_t)(struct kib_poolset *ps,
244 				     int inc, struct kib_pool **pp_po);
245 typedef void (*kib_ps_pool_destroy_t)(struct kib_pool *po);
246 typedef void (*kib_ps_node_init_t)(struct kib_pool *po, struct list_head *node);
247 typedef void (*kib_ps_node_fini_t)(struct kib_pool *po, struct list_head *node);
248 
249 struct kib_net;
250 
251 #define IBLND_POOL_NAME_LEN     32
252 
253 typedef struct kib_poolset {
254 	spinlock_t		ps_lock;		/* serialize */
255 	struct kib_net	 *ps_net;		 /* network it belongs to */
256 	char		    ps_name[IBLND_POOL_NAME_LEN]; /* pool set name */
257 	struct list_head	      ps_pool_list;	   /* list of pools */
258 	struct list_head	      ps_failed_pool_list;    /* failed pool list */
259 	unsigned long	      ps_next_retry;	  /* time stamp for retry if failed to allocate */
260 	int		     ps_increasing;	  /* is allocating new pool */
261 	int		     ps_pool_size;	   /* new pool size */
262 	int			ps_cpt;			/* CPT id */
263 
264 	kib_ps_pool_create_t    ps_pool_create;	 /* create a new pool */
265 	kib_ps_pool_destroy_t   ps_pool_destroy;	/* destroy a pool */
266 	kib_ps_node_init_t      ps_node_init;	   /* initialize new allocated node */
267 	kib_ps_node_fini_t      ps_node_fini;	   /* finalize node */
268 } kib_poolset_t;
269 
270 typedef struct kib_pool {
271 	struct list_head	      po_list;		/* chain on pool list */
272 	struct list_head	      po_free_list;	   /* pre-allocated node */
273 	kib_poolset_t	  *po_owner;	       /* pool_set of this pool */
274 	unsigned long	      po_deadline;	    /* deadline of this pool */
275 	int		     po_allocated;	   /* # of elements in use */
276 	int		     po_failed;	      /* pool is created on failed HCA */
277 	int		     po_size;		/* # of pre-allocated elements */
278 } kib_pool_t;
279 
280 typedef struct {
281 	kib_poolset_t	   tps_poolset;	    /* pool-set */
282 	__u64		   tps_next_tx_cookie;     /* cookie of TX */
283 } kib_tx_poolset_t;
284 
285 typedef struct {
286 	kib_pool_t	      tpo_pool;	       /* pool */
287 	struct kib_hca_dev     *tpo_hdev;	       /* device for this pool */
288 	struct kib_tx	  *tpo_tx_descs;	   /* all the tx descriptors */
289 	kib_pages_t	    *tpo_tx_pages;	   /* premapped tx msg pages */
290 } kib_tx_pool_t;
291 
292 typedef struct {
293 	kib_poolset_t	   pps_poolset;	    /* pool-set */
294 } kib_pmr_poolset_t;
295 
296 typedef struct kib_pmr_pool {
297 	struct kib_hca_dev     *ppo_hdev;	       /* device for this pool */
298 	kib_pool_t	      ppo_pool;	       /* pool */
299 } kib_pmr_pool_t;
300 
301 typedef struct {
302 	spinlock_t		fps_lock;		/* serialize */
303 	struct kib_net	 *fps_net;		/* IB network */
304 	struct list_head	      fps_pool_list;	  /* FMR pool list */
305 	struct list_head	      fps_failed_pool_list;   /* FMR pool list */
306 	__u64		   fps_version;	    /* validity stamp */
307 	int			fps_cpt;		/* CPT id */
308 	int			fps_pool_size;
309 	int			fps_flush_trigger;
310 	/* is allocating new pool */
311 	int			fps_increasing;
312 	/* time stamp for retry if failed to allocate */
313 	unsigned long		fps_next_retry;
314 } kib_fmr_poolset_t;
315 
316 typedef struct {
317 	struct list_head	      fpo_list;	       /* chain on pool list */
318 	struct kib_hca_dev     *fpo_hdev;	       /* device for this pool */
319 	kib_fmr_poolset_t      *fpo_owner;	      /* owner of this pool */
320 	struct ib_fmr_pool     *fpo_fmr_pool;	   /* IB FMR pool */
321 	unsigned long	      fpo_deadline;	   /* deadline of this pool */
322 	int		     fpo_failed;	     /* fmr pool is failed */
323 	int		     fpo_map_count;	  /* # of mapped FMR */
324 } kib_fmr_pool_t;
325 
326 typedef struct {
327 	struct ib_pool_fmr     *fmr_pfmr;	       /* IB pool fmr */
328 	kib_fmr_pool_t	 *fmr_pool;	       /* pool of FMR */
329 } kib_fmr_t;
330 
331 typedef struct kib_net {
332 	struct list_head	   ibn_list;	  /* chain on kib_dev_t::ibd_nets */
333 	__u64		ibn_incarnation;   /* my epoch */
334 	int		  ibn_init;	  /* initialisation state */
335 	int		  ibn_shutdown;      /* shutting down? */
336 
337 	atomic_t		ibn_npeers;	/* # peers extant */
338 	atomic_t		ibn_nconns;	/* # connections extant */
339 
340 	kib_tx_poolset_t	**ibn_tx_ps;	/* tx pool-set */
341 	kib_fmr_poolset_t	**ibn_fmr_ps;	/* fmr pool-set */
342 	kib_pmr_poolset_t	**ibn_pmr_ps;	/* pmr pool-set */
343 
344 	kib_dev_t		*ibn_dev;	/* underlying IB device */
345 } kib_net_t;
346 
347 #define KIB_THREAD_SHIFT		16
348 #define KIB_THREAD_ID(cpt, tid)		((cpt) << KIB_THREAD_SHIFT | (tid))
349 #define KIB_THREAD_CPT(id)		((id) >> KIB_THREAD_SHIFT)
350 #define KIB_THREAD_TID(id)		((id) & ((1UL << KIB_THREAD_SHIFT) - 1))
351 
352 struct kib_sched_info {
353 	/* serialise */
354 	spinlock_t		ibs_lock;
355 	/* schedulers sleep here */
356 	wait_queue_head_t		ibs_waitq;
357 	/* conns to check for rx completions */
358 	struct list_head		ibs_conns;
359 	/* number of scheduler threads */
360 	int			ibs_nthreads;
361 	/* max allowed scheduler threads */
362 	int			ibs_nthreads_max;
363 	int			ibs_cpt;	/* CPT id */
364 };
365 
366 typedef struct {
367 	int			kib_init;	/* initialisation state */
368 	int			kib_shutdown;	/* shut down? */
369 	struct list_head		kib_devs;	/* IB devices extant */
370 	/* list head of failed devices */
371 	struct list_head		kib_failed_devs;
372 	/* schedulers sleep here */
373 	wait_queue_head_t		kib_failover_waitq;
374 	atomic_t		kib_nthreads;	/* # live threads */
375 	/* stabilize net/dev/peer/conn ops */
376 	rwlock_t		kib_global_lock;
377 	/* hash table of all my known peers */
378 	struct list_head		*kib_peers;
379 	/* size of kib_peers */
380 	int			kib_peer_hash_size;
381 	/* the connd task (serialisation assertions) */
382 	void			*kib_connd;
383 	/* connections to setup/teardown */
384 	struct list_head		kib_connd_conns;
385 	/* connections with zero refcount */
386 	struct list_head		kib_connd_zombies;
387 	/* connection daemon sleeps here */
388 	wait_queue_head_t		kib_connd_waitq;
389 	spinlock_t		kib_connd_lock;	/* serialise */
390 	struct ib_qp_attr	kib_error_qpa;	/* QP->ERROR */
391 	/* percpt data for schedulers */
392 	struct kib_sched_info	**kib_scheds;
393 } kib_data_t;
394 
395 #define IBLND_INIT_NOTHING	 0
396 #define IBLND_INIT_DATA	    1
397 #define IBLND_INIT_ALL	     2
398 
399 /************************************************************************
400  * IB Wire message format.
401  * These are sent in sender's byte order (i.e. receiver flips).
402  */
403 
404 typedef struct kib_connparams {
405 	__u16	     ibcp_queue_depth;
406 	__u16	     ibcp_max_frags;
407 	__u32	     ibcp_max_msg_size;
408 } WIRE_ATTR kib_connparams_t;
409 
410 typedef struct {
411 	lnet_hdr_t	ibim_hdr;	     /* portals header */
412 	char	      ibim_payload[0];      /* piggy-backed payload */
413 } WIRE_ATTR kib_immediate_msg_t;
414 
415 typedef struct {
416 	__u32	     rf_nob;	       /* # bytes this frag */
417 	__u64	     rf_addr;	      /* CAVEAT EMPTOR: misaligned!! */
418 } WIRE_ATTR kib_rdma_frag_t;
419 
420 typedef struct {
421 	__u32	     rd_key;	       /* local/remote key */
422 	__u32	     rd_nfrags;	    /* # fragments */
423 	kib_rdma_frag_t   rd_frags[0];	  /* buffer frags */
424 } WIRE_ATTR kib_rdma_desc_t;
425 
426 typedef struct {
427 	lnet_hdr_t	ibprm_hdr;	    /* portals header */
428 	__u64	     ibprm_cookie;	 /* opaque completion cookie */
429 } WIRE_ATTR kib_putreq_msg_t;
430 
431 typedef struct {
432 	__u64	     ibpam_src_cookie;     /* reflected completion cookie */
433 	__u64	     ibpam_dst_cookie;     /* opaque completion cookie */
434 	kib_rdma_desc_t   ibpam_rd;	     /* sender's sink buffer */
435 } WIRE_ATTR kib_putack_msg_t;
436 
437 typedef struct {
438 	lnet_hdr_t	ibgm_hdr;	     /* portals header */
439 	__u64	     ibgm_cookie;	  /* opaque completion cookie */
440 	kib_rdma_desc_t   ibgm_rd;	      /* rdma descriptor */
441 } WIRE_ATTR kib_get_msg_t;
442 
443 typedef struct {
444 	__u64	     ibcm_cookie;	  /* opaque completion cookie */
445 	__s32	     ibcm_status;	  /* < 0 failure: >= 0 length */
446 } WIRE_ATTR kib_completion_msg_t;
447 
448 typedef struct {
449 	/* First 2 fields fixed FOR ALL TIME */
450 	__u32	     ibm_magic;	    /* I'm an ibnal message */
451 	__u16	     ibm_version;	  /* this is my version number */
452 
453 	__u8	      ibm_type;	     /* msg type */
454 	__u8	      ibm_credits;	  /* returned credits */
455 	__u32	     ibm_nob;	      /* # bytes in whole message */
456 	__u32	     ibm_cksum;	    /* checksum (0 == no checksum) */
457 	__u64	     ibm_srcnid;	   /* sender's NID */
458 	__u64	     ibm_srcstamp;	 /* sender's incarnation */
459 	__u64	     ibm_dstnid;	   /* destination's NID */
460 	__u64	     ibm_dststamp;	 /* destination's incarnation */
461 
462 	union {
463 		kib_connparams_t      connparams;
464 		kib_immediate_msg_t   immediate;
465 		kib_putreq_msg_t      putreq;
466 		kib_putack_msg_t      putack;
467 		kib_get_msg_t	 get;
468 		kib_completion_msg_t  completion;
469 	} WIRE_ATTR ibm_u;
470 } WIRE_ATTR kib_msg_t;
471 
472 #define IBLND_MSG_MAGIC LNET_PROTO_IB_MAGIC	/* unique magic */
473 
474 #define IBLND_MSG_VERSION_1	 0x11
475 #define IBLND_MSG_VERSION_2	 0x12
476 #define IBLND_MSG_VERSION	   IBLND_MSG_VERSION_2
477 
478 #define IBLND_MSG_CONNREQ	   0xc0	/* connection request */
479 #define IBLND_MSG_CONNACK	   0xc1	/* connection acknowledge */
480 #define IBLND_MSG_NOOP	      0xd0	/* nothing (just credits) */
481 #define IBLND_MSG_IMMEDIATE	 0xd1	/* immediate */
482 #define IBLND_MSG_PUT_REQ	   0xd2	/* putreq (src->sink) */
483 #define IBLND_MSG_PUT_NAK	   0xd3	/* completion (sink->src) */
484 #define IBLND_MSG_PUT_ACK	   0xd4	/* putack (sink->src) */
485 #define IBLND_MSG_PUT_DONE	  0xd5	/* completion (src->sink) */
486 #define IBLND_MSG_GET_REQ	   0xd6	/* getreq (sink->src) */
487 #define IBLND_MSG_GET_DONE	  0xd7	/* completion (src->sink: all OK) */
488 
489 typedef struct {
490 	__u32	    ibr_magic;	     /* sender's magic */
491 	__u16	    ibr_version;	   /* sender's version */
492 	__u8	     ibr_why;	       /* reject reason */
493 	__u8	     ibr_padding;	   /* padding */
494 	__u64	    ibr_incarnation;       /* incarnation of peer */
495 	kib_connparams_t ibr_cp;		/* connection parameters */
496 } WIRE_ATTR kib_rej_t;
497 
498 /* connection rejection reasons */
499 #define IBLND_REJECT_CONN_RACE       1	  /* You lost connection race */
500 #define IBLND_REJECT_NO_RESOURCES    2	  /* Out of memory/conns etc */
501 #define IBLND_REJECT_FATAL	   3	  /* Anything else */
502 
503 #define IBLND_REJECT_CONN_UNCOMPAT   4	  /* incompatible version peer */
504 #define IBLND_REJECT_CONN_STALE      5	  /* stale peer */
505 
506 #define IBLND_REJECT_RDMA_FRAGS      6	  /* Fatal: peer's rdma frags can't match mine */
507 #define IBLND_REJECT_MSG_QUEUE_SIZE  7	  /* Fatal: peer's msg queue size can't match mine */
508 
509 /***********************************************************************/
510 
511 typedef struct kib_rx			   /* receive message */
512 {
513 	struct list_head		rx_list;      /* queue for attention */
514 	struct kib_conn	  *rx_conn;      /* owning conn */
515 	int		       rx_nob;       /* # bytes received (-1 while posted) */
516 	enum ib_wc_status	 rx_status;    /* completion status */
517 	kib_msg_t		*rx_msg;       /* message buffer (host vaddr) */
518 	__u64		     rx_msgaddr;   /* message buffer (I/O addr) */
519 	DECLARE_PCI_UNMAP_ADDR   (rx_msgunmap); /* for dma_unmap_single() */
520 	struct ib_recv_wr	 rx_wrq;       /* receive work item... */
521 	struct ib_sge	     rx_sge;       /* ...and its memory */
522 } kib_rx_t;
523 
524 #define IBLND_POSTRX_DONT_POST    0	     /* don't post */
525 #define IBLND_POSTRX_NO_CREDIT    1	     /* post: no credits */
526 #define IBLND_POSTRX_PEER_CREDIT  2	     /* post: give peer back 1 credit */
527 #define IBLND_POSTRX_RSRVD_CREDIT 3	     /* post: give myself back 1 reserved credit */
528 
529 typedef struct kib_tx			   /* transmit message */
530 {
531 	struct list_head		tx_list;      /* queue on idle_txs ibc_tx_queue etc. */
532 	kib_tx_pool_t	    *tx_pool;      /* pool I'm from */
533 	struct kib_conn	  *tx_conn;      /* owning conn */
534 	short		     tx_sending;   /* # tx callbacks outstanding */
535 	short		     tx_queued;    /* queued for sending */
536 	short		     tx_waiting;   /* waiting for peer */
537 	int		       tx_status;    /* LNET completion status */
538 	unsigned long	     tx_deadline;  /* completion deadline */
539 	__u64		     tx_cookie;    /* completion cookie */
540 	lnet_msg_t	       *tx_lntmsg[2]; /* lnet msgs to finalize on completion */
541 	kib_msg_t		*tx_msg;       /* message buffer (host vaddr) */
542 	__u64		     tx_msgaddr;   /* message buffer (I/O addr) */
543 	DECLARE_PCI_UNMAP_ADDR   (tx_msgunmap); /* for dma_unmap_single() */
544 	int		       tx_nwrq;      /* # send work items */
545 	struct ib_send_wr	*tx_wrq;       /* send work items... */
546 	struct ib_sge	    *tx_sge;       /* ...and their memory */
547 	kib_rdma_desc_t	  *tx_rd;	/* rdma descriptor */
548 	int		       tx_nfrags;    /* # entries in... */
549 	struct scatterlist       *tx_frags;     /* dma_map_sg descriptor */
550 	__u64		    *tx_pages;     /* rdma phys page addrs */
551 	union {
552 		kib_phys_mr_t      *pmr;	/* MR for physical buffer */
553 		kib_fmr_t	   fmr;	/* FMR */
554 	}			 tx_u;
555 	int		       tx_dmadir;    /* dma direction */
556 } kib_tx_t;
557 
558 typedef struct kib_connvars {
559 	/* connection-in-progress variables */
560 	kib_msg_t		 cv_msg;
561 } kib_connvars_t;
562 
563 typedef struct kib_conn {
564 	struct kib_sched_info *ibc_sched;	/* scheduler information */
565 	struct kib_peer     *ibc_peer;	  /* owning peer */
566 	kib_hca_dev_t       *ibc_hdev;	  /* HCA bound on */
567 	struct list_head	   ibc_list;	  /* stash on peer's conn list */
568 	struct list_head	   ibc_sched_list;    /* schedule for attention */
569 	__u16		ibc_version;       /* version of connection */
570 	__u64		ibc_incarnation;   /* which instance of the peer */
571 	atomic_t	 ibc_refcount;      /* # users */
572 	int		  ibc_state;	 /* what's happening */
573 	int		  ibc_nsends_posted; /* # uncompleted sends */
574 	int		  ibc_noops_posted;  /* # uncompleted NOOPs */
575 	int		  ibc_credits;       /* # credits I have */
576 	int		  ibc_outstanding_credits; /* # credits to return */
577 	int		  ibc_reserved_credits;/* # ACK/DONE msg credits */
578 	int		  ibc_comms_error;   /* set on comms error */
579 	unsigned int	     ibc_nrx:16;	/* receive buffers owned */
580 	unsigned int	     ibc_scheduled:1;   /* scheduled for attention */
581 	unsigned int	     ibc_ready:1;       /* CQ callback fired */
582 	/* time of last send */
583 	unsigned long	ibc_last_send;
584 	/** link chain for kiblnd_check_conns only */
585 	struct list_head	   ibc_connd_list;
586 	/** rxs completed before ESTABLISHED */
587 	struct list_head	   ibc_early_rxs;
588 	/** IBLND_MSG_NOOPs for IBLND_MSG_VERSION_1 */
589 	struct list_head	   ibc_tx_noops;
590 	struct list_head	   ibc_tx_queue;       /* sends that need a credit */
591 	struct list_head	   ibc_tx_queue_nocred;/* sends that don't need a credit */
592 	struct list_head	   ibc_tx_queue_rsrvd; /* sends that need to reserve an ACK/DONE msg */
593 	struct list_head	   ibc_active_txs;     /* active tx awaiting completion */
594 	spinlock_t	     ibc_lock;		 /* serialise */
595 	kib_rx_t	    *ibc_rxs;	    /* the rx descs */
596 	kib_pages_t	 *ibc_rx_pages;       /* premapped rx msg pages */
597 
598 	struct rdma_cm_id   *ibc_cmid;	   /* CM id */
599 	struct ib_cq	*ibc_cq;	     /* completion queue */
600 
601 	kib_connvars_t      *ibc_connvars;       /* in-progress connection state */
602 } kib_conn_t;
603 
604 #define IBLND_CONN_INIT	       0	 /* being initialised */
605 #define IBLND_CONN_ACTIVE_CONNECT     1	 /* active sending req */
606 #define IBLND_CONN_PASSIVE_WAIT       2	 /* passive waiting for rtu */
607 #define IBLND_CONN_ESTABLISHED	3	 /* connection established */
608 #define IBLND_CONN_CLOSING	    4	 /* being closed */
609 #define IBLND_CONN_DISCONNECTED       5	 /* disconnected */
610 
611 typedef struct kib_peer {
612 	struct list_head	   ibp_list;	   /* stash on global peer list */
613 	lnet_nid_t	   ibp_nid;	    /* who's on the other end(s) */
614 	lnet_ni_t	   *ibp_ni;	     /* LNet interface */
615 	atomic_t	 ibp_refcount;       /* # users */
616 	struct list_head	   ibp_conns;	  /* all active connections */
617 	struct list_head	   ibp_tx_queue;       /* msgs waiting for a conn */
618 	__u16		ibp_version;	/* version of peer */
619 	__u64		ibp_incarnation;    /* incarnation of peer */
620 	int		  ibp_connecting;     /* current active connection attempts */
621 	int		  ibp_accepting;      /* current passive connection attempts */
622 	int		  ibp_error;	  /* errno on closing this peer */
623 	unsigned long	   ibp_last_alive;     /* when (in jiffies) I was last alive */
624 } kib_peer_t;
625 
626 extern kib_data_t      kiblnd_data;
627 
628 extern void kiblnd_hdev_destroy(kib_hca_dev_t *hdev);
629 
630 static inline void
kiblnd_hdev_addref_locked(kib_hca_dev_t * hdev)631 kiblnd_hdev_addref_locked(kib_hca_dev_t *hdev)
632 {
633 	LASSERT (atomic_read(&hdev->ibh_ref) > 0);
634 	atomic_inc(&hdev->ibh_ref);
635 }
636 
637 static inline void
kiblnd_hdev_decref(kib_hca_dev_t * hdev)638 kiblnd_hdev_decref(kib_hca_dev_t *hdev)
639 {
640 	LASSERT (atomic_read(&hdev->ibh_ref) > 0);
641 	if (atomic_dec_and_test(&hdev->ibh_ref))
642 		kiblnd_hdev_destroy(hdev);
643 }
644 
645 static inline int
kiblnd_dev_can_failover(kib_dev_t * dev)646 kiblnd_dev_can_failover(kib_dev_t *dev)
647 {
648 	if (!list_empty(&dev->ibd_fail_list)) /* already scheduled */
649 		return 0;
650 
651 	if (*kiblnd_tunables.kib_dev_failover == 0) /* disabled */
652 		return 0;
653 
654 	if (*kiblnd_tunables.kib_dev_failover > 1) /* force failover */
655 		return 1;
656 
657 	return dev->ibd_can_failover;
658 }
659 
660 #define kiblnd_conn_addref(conn)				\
661 do {							    \
662 	CDEBUG(D_NET, "conn[%p] (%d)++\n",		      \
663 	       (conn), atomic_read(&(conn)->ibc_refcount)); \
664 	atomic_inc(&(conn)->ibc_refcount);		  \
665 } while (0)
666 
667 #define kiblnd_conn_decref(conn)					\
668 do {									\
669 	unsigned long flags;						\
670 									\
671 	CDEBUG(D_NET, "conn[%p] (%d)--\n",				\
672 	       (conn), atomic_read(&(conn)->ibc_refcount));		\
673 	LASSERT_ATOMIC_POS(&(conn)->ibc_refcount);			\
674 	if (atomic_dec_and_test(&(conn)->ibc_refcount)) {		\
675 		spin_lock_irqsave(&kiblnd_data.kib_connd_lock, flags);	\
676 		list_add_tail(&(conn)->ibc_list,			\
677 				  &kiblnd_data.kib_connd_zombies);	\
678 		wake_up(&kiblnd_data.kib_connd_waitq);		\
679 		spin_unlock_irqrestore(&kiblnd_data.kib_connd_lock, flags);\
680 	}								\
681 } while (0)
682 
683 #define kiblnd_peer_addref(peer)				\
684 do {							    \
685 	CDEBUG(D_NET, "peer[%p] -> %s (%d)++\n",		\
686 	       (peer), libcfs_nid2str((peer)->ibp_nid),	 \
687 	       atomic_read (&(peer)->ibp_refcount));	\
688 	atomic_inc(&(peer)->ibp_refcount);		  \
689 } while (0)
690 
691 #define kiblnd_peer_decref(peer)				\
692 do {							    \
693 	CDEBUG(D_NET, "peer[%p] -> %s (%d)--\n",		\
694 	       (peer), libcfs_nid2str((peer)->ibp_nid),	 \
695 	       atomic_read (&(peer)->ibp_refcount));	\
696 	LASSERT_ATOMIC_POS(&(peer)->ibp_refcount);	      \
697 	if (atomic_dec_and_test(&(peer)->ibp_refcount))     \
698 		kiblnd_destroy_peer(peer);		      \
699 } while (0)
700 
701 static inline struct list_head *
kiblnd_nid2peerlist(lnet_nid_t nid)702 kiblnd_nid2peerlist (lnet_nid_t nid)
703 {
704 	unsigned int hash =
705 		((unsigned int)nid) % kiblnd_data.kib_peer_hash_size;
706 
707 	return (&kiblnd_data.kib_peers [hash]);
708 }
709 
710 static inline int
kiblnd_peer_active(kib_peer_t * peer)711 kiblnd_peer_active (kib_peer_t *peer)
712 {
713 	/* Am I in the peer hash table? */
714 	return (!list_empty(&peer->ibp_list));
715 }
716 
717 static inline kib_conn_t *
kiblnd_get_conn_locked(kib_peer_t * peer)718 kiblnd_get_conn_locked (kib_peer_t *peer)
719 {
720 	LASSERT (!list_empty(&peer->ibp_conns));
721 
722 	/* just return the first connection */
723 	return list_entry(peer->ibp_conns.next, kib_conn_t, ibc_list);
724 }
725 
726 static inline int
kiblnd_send_keepalive(kib_conn_t * conn)727 kiblnd_send_keepalive(kib_conn_t *conn)
728 {
729 	return (*kiblnd_tunables.kib_keepalive > 0) &&
730 		cfs_time_after(jiffies, conn->ibc_last_send +
731 			       *kiblnd_tunables.kib_keepalive*HZ);
732 }
733 
734 static inline int
kiblnd_need_noop(kib_conn_t * conn)735 kiblnd_need_noop(kib_conn_t *conn)
736 {
737 	LASSERT (conn->ibc_state >= IBLND_CONN_ESTABLISHED);
738 
739 	if (conn->ibc_outstanding_credits <
740 	    IBLND_CREDITS_HIGHWATER(conn->ibc_version) &&
741 	    !kiblnd_send_keepalive(conn))
742 		return 0; /* No need to send NOOP */
743 
744 	if (IBLND_OOB_CAPABLE(conn->ibc_version)) {
745 		if (!list_empty(&conn->ibc_tx_queue_nocred))
746 			return 0; /* NOOP can be piggybacked */
747 
748 		/* No tx to piggyback NOOP onto or no credit to send a tx */
749 		return (list_empty(&conn->ibc_tx_queue) ||
750 			conn->ibc_credits == 0);
751 	}
752 
753 	if (!list_empty(&conn->ibc_tx_noops) || /* NOOP already queued */
754 	    !list_empty(&conn->ibc_tx_queue_nocred) || /* piggyback NOOP */
755 	    conn->ibc_credits == 0)		    /* no credit */
756 		return 0;
757 
758 	if (conn->ibc_credits == 1 &&      /* last credit reserved for */
759 	    conn->ibc_outstanding_credits == 0) /* giving back credits */
760 		return 0;
761 
762 	/* No tx to piggyback NOOP onto or no credit to send a tx */
763 	return (list_empty(&conn->ibc_tx_queue) || conn->ibc_credits == 1);
764 }
765 
766 static inline void
kiblnd_abort_receives(kib_conn_t * conn)767 kiblnd_abort_receives(kib_conn_t *conn)
768 {
769 	ib_modify_qp(conn->ibc_cmid->qp,
770 		     &kiblnd_data.kib_error_qpa, IB_QP_STATE);
771 }
772 
773 static inline const char *
kiblnd_queue2str(kib_conn_t * conn,struct list_head * q)774 kiblnd_queue2str (kib_conn_t *conn, struct list_head *q)
775 {
776 	if (q == &conn->ibc_tx_queue)
777 		return "tx_queue";
778 
779 	if (q == &conn->ibc_tx_queue_rsrvd)
780 		return "tx_queue_rsrvd";
781 
782 	if (q == &conn->ibc_tx_queue_nocred)
783 		return "tx_queue_nocred";
784 
785 	if (q == &conn->ibc_active_txs)
786 		return "active_txs";
787 
788 	LBUG();
789 	return NULL;
790 }
791 
792 /* CAVEAT EMPTOR: We rely on descriptor alignment to allow us to use the
793  * lowest bits of the work request id to stash the work item type. */
794 
795 #define IBLND_WID_TX    0
796 #define IBLND_WID_RDMA  1
797 #define IBLND_WID_RX    2
798 #define IBLND_WID_MASK  3UL
799 
800 static inline __u64
kiblnd_ptr2wreqid(void * ptr,int type)801 kiblnd_ptr2wreqid (void *ptr, int type)
802 {
803 	unsigned long lptr = (unsigned long)ptr;
804 
805 	LASSERT ((lptr & IBLND_WID_MASK) == 0);
806 	LASSERT ((type & ~IBLND_WID_MASK) == 0);
807 	return (__u64)(lptr | type);
808 }
809 
810 static inline void *
kiblnd_wreqid2ptr(__u64 wreqid)811 kiblnd_wreqid2ptr (__u64 wreqid)
812 {
813 	return (void *)(((unsigned long)wreqid) & ~IBLND_WID_MASK);
814 }
815 
816 static inline int
kiblnd_wreqid2type(__u64 wreqid)817 kiblnd_wreqid2type (__u64 wreqid)
818 {
819 	return (wreqid & IBLND_WID_MASK);
820 }
821 
822 static inline void
kiblnd_set_conn_state(kib_conn_t * conn,int state)823 kiblnd_set_conn_state (kib_conn_t *conn, int state)
824 {
825 	conn->ibc_state = state;
826 	mb();
827 }
828 
829 static inline void
kiblnd_init_msg(kib_msg_t * msg,int type,int body_nob)830 kiblnd_init_msg (kib_msg_t *msg, int type, int body_nob)
831 {
832 	msg->ibm_type = type;
833 	msg->ibm_nob  = offsetof(kib_msg_t, ibm_u) + body_nob;
834 }
835 
836 static inline int
kiblnd_rd_size(kib_rdma_desc_t * rd)837 kiblnd_rd_size (kib_rdma_desc_t *rd)
838 {
839 	int   i;
840 	int   size;
841 
842 	for (i = size = 0; i < rd->rd_nfrags; i++)
843 		size += rd->rd_frags[i].rf_nob;
844 
845 	return size;
846 }
847 
848 static inline __u64
kiblnd_rd_frag_addr(kib_rdma_desc_t * rd,int index)849 kiblnd_rd_frag_addr(kib_rdma_desc_t *rd, int index)
850 {
851 	return rd->rd_frags[index].rf_addr;
852 }
853 
854 static inline __u32
kiblnd_rd_frag_size(kib_rdma_desc_t * rd,int index)855 kiblnd_rd_frag_size(kib_rdma_desc_t *rd, int index)
856 {
857 	return rd->rd_frags[index].rf_nob;
858 }
859 
860 static inline __u32
kiblnd_rd_frag_key(kib_rdma_desc_t * rd,int index)861 kiblnd_rd_frag_key(kib_rdma_desc_t *rd, int index)
862 {
863 	return rd->rd_key;
864 }
865 
866 static inline int
kiblnd_rd_consume_frag(kib_rdma_desc_t * rd,int index,__u32 nob)867 kiblnd_rd_consume_frag(kib_rdma_desc_t *rd, int index, __u32 nob)
868 {
869 	if (nob < rd->rd_frags[index].rf_nob) {
870 		rd->rd_frags[index].rf_addr += nob;
871 		rd->rd_frags[index].rf_nob  -= nob;
872 	} else {
873 		index ++;
874 	}
875 
876 	return index;
877 }
878 
879 static inline int
kiblnd_rd_msg_size(kib_rdma_desc_t * rd,int msgtype,int n)880 kiblnd_rd_msg_size(kib_rdma_desc_t *rd, int msgtype, int n)
881 {
882 	LASSERT (msgtype == IBLND_MSG_GET_REQ ||
883 		 msgtype == IBLND_MSG_PUT_ACK);
884 
885 	return msgtype == IBLND_MSG_GET_REQ ?
886 	       offsetof(kib_get_msg_t, ibgm_rd.rd_frags[n]) :
887 	       offsetof(kib_putack_msg_t, ibpam_rd.rd_frags[n]);
888 }
889 
890 
891 static inline __u64
kiblnd_dma_mapping_error(struct ib_device * dev,u64 dma_addr)892 kiblnd_dma_mapping_error(struct ib_device *dev, u64 dma_addr)
893 {
894 	return ib_dma_mapping_error(dev, dma_addr);
895 }
896 
kiblnd_dma_map_single(struct ib_device * dev,void * msg,size_t size,enum dma_data_direction direction)897 static inline __u64 kiblnd_dma_map_single(struct ib_device *dev,
898 					  void *msg, size_t size,
899 					  enum dma_data_direction direction)
900 {
901 	return ib_dma_map_single(dev, msg, size, direction);
902 }
903 
kiblnd_dma_unmap_single(struct ib_device * dev,__u64 addr,size_t size,enum dma_data_direction direction)904 static inline void kiblnd_dma_unmap_single(struct ib_device *dev,
905 					   __u64 addr, size_t size,
906 					  enum dma_data_direction direction)
907 {
908 	ib_dma_unmap_single(dev, addr, size, direction);
909 }
910 
911 #define KIBLND_UNMAP_ADDR_SET(p, m, a)  do {} while (0)
912 #define KIBLND_UNMAP_ADDR(p, m, a)      (a)
913 
kiblnd_dma_map_sg(struct ib_device * dev,struct scatterlist * sg,int nents,enum dma_data_direction direction)914 static inline int kiblnd_dma_map_sg(struct ib_device *dev,
915 				    struct scatterlist *sg, int nents,
916 				    enum dma_data_direction direction)
917 {
918 	return ib_dma_map_sg(dev, sg, nents, direction);
919 }
920 
kiblnd_dma_unmap_sg(struct ib_device * dev,struct scatterlist * sg,int nents,enum dma_data_direction direction)921 static inline void kiblnd_dma_unmap_sg(struct ib_device *dev,
922 				       struct scatterlist *sg, int nents,
923 				       enum dma_data_direction direction)
924 {
925 	ib_dma_unmap_sg(dev, sg, nents, direction);
926 }
927 
kiblnd_sg_dma_address(struct ib_device * dev,struct scatterlist * sg)928 static inline __u64 kiblnd_sg_dma_address(struct ib_device *dev,
929 					  struct scatterlist *sg)
930 {
931 	return ib_sg_dma_address(dev, sg);
932 }
933 
kiblnd_sg_dma_len(struct ib_device * dev,struct scatterlist * sg)934 static inline unsigned int kiblnd_sg_dma_len(struct ib_device *dev,
935 					     struct scatterlist *sg)
936 {
937 	return ib_sg_dma_len(dev, sg);
938 }
939 
940 /* XXX We use KIBLND_CONN_PARAM(e) as writable buffer, it's not strictly
941  * right because OFED1.2 defines it as const, to use it we have to add
942  * (void *) cast to overcome "const" */
943 
944 #define KIBLND_CONN_PARAM(e)	    ((e)->param.conn.private_data)
945 #define KIBLND_CONN_PARAM_LEN(e)	((e)->param.conn.private_data_len)
946 
947 
948 struct ib_mr *kiblnd_find_rd_dma_mr(kib_hca_dev_t *hdev,
949 				    kib_rdma_desc_t *rd);
950 struct ib_mr *kiblnd_find_dma_mr(kib_hca_dev_t *hdev,
951 				 __u64 addr, __u64 size);
952 void kiblnd_map_rx_descs(kib_conn_t *conn);
953 void kiblnd_unmap_rx_descs(kib_conn_t *conn);
954 int kiblnd_map_tx(lnet_ni_t *ni, kib_tx_t *tx,
955 		  kib_rdma_desc_t *rd, int nfrags);
956 void kiblnd_unmap_tx(lnet_ni_t *ni, kib_tx_t *tx);
957 void kiblnd_pool_free_node(kib_pool_t *pool, struct list_head *node);
958 struct list_head *kiblnd_pool_alloc_node(kib_poolset_t *ps);
959 
960 int  kiblnd_fmr_pool_map(kib_fmr_poolset_t *fps, __u64 *pages,
961 			 int npages, __u64 iov, kib_fmr_t *fmr);
962 void kiblnd_fmr_pool_unmap(kib_fmr_t *fmr, int status);
963 
964 int  kiblnd_pmr_pool_map(kib_pmr_poolset_t *pps, kib_hca_dev_t *hdev,
965 			 kib_rdma_desc_t *rd, __u64 *iova, kib_phys_mr_t **pp_pmr);
966 void kiblnd_pmr_pool_unmap(kib_phys_mr_t *pmr);
967 
968 int  kiblnd_startup (lnet_ni_t *ni);
969 void kiblnd_shutdown (lnet_ni_t *ni);
970 int  kiblnd_ctl (lnet_ni_t *ni, unsigned int cmd, void *arg);
971 void kiblnd_query (struct lnet_ni *ni, lnet_nid_t nid, unsigned long *when);
972 
973 int  kiblnd_tunables_init(void);
974 void kiblnd_tunables_fini(void);
975 
976 int  kiblnd_connd (void *arg);
977 int  kiblnd_scheduler(void *arg);
978 int  kiblnd_thread_start(int (*fn)(void *arg), void *arg, char *name);
979 int  kiblnd_failover_thread (void *arg);
980 
981 int  kiblnd_alloc_pages(kib_pages_t **pp, int cpt, int npages);
982 void kiblnd_free_pages (kib_pages_t *p);
983 
984 int  kiblnd_cm_callback(struct rdma_cm_id *cmid,
985 			struct rdma_cm_event *event);
986 int  kiblnd_translate_mtu(int value);
987 
988 int  kiblnd_dev_failover(kib_dev_t *dev);
989 int  kiblnd_create_peer (lnet_ni_t *ni, kib_peer_t **peerp, lnet_nid_t nid);
990 void kiblnd_destroy_peer (kib_peer_t *peer);
991 void kiblnd_destroy_dev (kib_dev_t *dev);
992 void kiblnd_unlink_peer_locked (kib_peer_t *peer);
993 void kiblnd_peer_alive (kib_peer_t *peer);
994 kib_peer_t *kiblnd_find_peer_locked (lnet_nid_t nid);
995 void kiblnd_peer_connect_failed (kib_peer_t *peer, int active, int error);
996 int  kiblnd_close_stale_conns_locked (kib_peer_t *peer,
997 				      int version, __u64 incarnation);
998 int  kiblnd_close_peer_conns_locked (kib_peer_t *peer, int why);
999 
1000 void kiblnd_connreq_done(kib_conn_t *conn, int status);
1001 kib_conn_t *kiblnd_create_conn (kib_peer_t *peer, struct rdma_cm_id *cmid,
1002 				int state, int version);
1003 void kiblnd_destroy_conn (kib_conn_t *conn);
1004 void kiblnd_close_conn (kib_conn_t *conn, int error);
1005 void kiblnd_close_conn_locked (kib_conn_t *conn, int error);
1006 
1007 int  kiblnd_init_rdma (kib_conn_t *conn, kib_tx_t *tx, int type,
1008 		       int nob, kib_rdma_desc_t *dstrd, __u64 dstcookie);
1009 
1010 void kiblnd_launch_tx (lnet_ni_t *ni, kib_tx_t *tx, lnet_nid_t nid);
1011 void kiblnd_queue_tx_locked (kib_tx_t *tx, kib_conn_t *conn);
1012 void kiblnd_queue_tx (kib_tx_t *tx, kib_conn_t *conn);
1013 void kiblnd_init_tx_msg (lnet_ni_t *ni, kib_tx_t *tx, int type, int body_nob);
1014 void kiblnd_txlist_done (lnet_ni_t *ni, struct list_head *txlist,
1015 			 int status);
1016 void kiblnd_check_sends (kib_conn_t *conn);
1017 
1018 void kiblnd_qp_event(struct ib_event *event, void *arg);
1019 void kiblnd_cq_event(struct ib_event *event, void *arg);
1020 void kiblnd_cq_completion(struct ib_cq *cq, void *arg);
1021 
1022 void kiblnd_pack_msg (lnet_ni_t *ni, kib_msg_t *msg, int version,
1023 		      int credits, lnet_nid_t dstnid, __u64 dststamp);
1024 int  kiblnd_unpack_msg(kib_msg_t *msg, int nob);
1025 int  kiblnd_post_rx (kib_rx_t *rx, int credit);
1026 
1027 int  kiblnd_send(lnet_ni_t *ni, void *private, lnet_msg_t *lntmsg);
1028 int  kiblnd_recv(lnet_ni_t *ni, void *private, lnet_msg_t *lntmsg, int delayed,
1029 		 unsigned int niov, struct kvec *iov, lnet_kiov_t *kiov,
1030 		 unsigned int offset, unsigned int mlen, unsigned int rlen);
1031