xref: /linux/drivers/infiniband/ulp/rtrs/rtrs-clt.c (revision 01414b70cb6f7a5911b65de0cc97225061f60a59)
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3  * RDMA Transport Layer
4  *
5  * Copyright (c) 2014 - 2018 ProfitBricks GmbH. All rights reserved.
6  * Copyright (c) 2018 - 2019 1&1 IONOS Cloud GmbH. All rights reserved.
7  * Copyright (c) 2019 - 2020 1&1 IONOS SE. All rights reserved.
8  */
9 
10 #undef pr_fmt
11 #define pr_fmt(fmt) KBUILD_MODNAME " L" __stringify(__LINE__) ": " fmt
12 
13 #include <linux/module.h>
14 #include <linux/rculist.h>
15 #include <linux/random.h>
16 
17 #include "rtrs-clt.h"
18 #include "rtrs-log.h"
19 #include "rtrs-clt-trace.h"
20 
21 #define RTRS_CONNECT_TIMEOUT_MS 30000
22 /*
23  * Wait a bit before trying to reconnect after a failure
24  * in order to give server time to finish clean up which
25  * leads to "false positives" failed reconnect attempts
26  */
27 #define RTRS_RECONNECT_BACKOFF 1000
28 /*
29  * Wait for additional random time between 0 and 8 seconds
30  * before starting to reconnect to avoid clients reconnecting
31  * all at once in case of a major network outage
32  */
33 #define RTRS_RECONNECT_SEED 8
34 
35 #define FIRST_CONN 0x01
36 /* limit to 128 * 4k = 512k max IO */
37 #define RTRS_MAX_SEGMENTS          128
38 
39 MODULE_DESCRIPTION("RDMA Transport Client");
40 MODULE_LICENSE("GPL");
41 
42 static const struct rtrs_rdma_dev_pd_ops dev_pd_ops;
43 static struct rtrs_rdma_dev_pd dev_pd = {
44 	.ops = &dev_pd_ops
45 };
46 
47 static struct workqueue_struct *rtrs_wq;
48 static const struct class rtrs_clt_dev_class = {
49 	.name = "rtrs-client",
50 };
51 
rtrs_clt_is_connected(const struct rtrs_clt_sess * clt)52 static inline bool rtrs_clt_is_connected(const struct rtrs_clt_sess *clt)
53 {
54 	struct rtrs_clt_path *clt_path;
55 	bool connected = false;
56 
57 	rcu_read_lock();
58 	list_for_each_entry_rcu(clt_path, &clt->paths_list, s.entry)
59 		if (READ_ONCE(clt_path->state) == RTRS_CLT_CONNECTED) {
60 			connected = true;
61 			break;
62 		}
63 	rcu_read_unlock();
64 
65 	return connected;
66 }
67 
68 static struct rtrs_permit *
__rtrs_get_permit(struct rtrs_clt_sess * clt,enum rtrs_clt_con_type con_type)69 __rtrs_get_permit(struct rtrs_clt_sess *clt, enum rtrs_clt_con_type con_type)
70 {
71 	size_t max_depth = clt->queue_depth;
72 	struct rtrs_permit *permit;
73 	int bit;
74 
75 	/*
76 	 * Adapted from null_blk get_tag(). Callers from different cpus may
77 	 * grab the same bit, since find_first_zero_bit is not atomic.
78 	 * But then the test_and_set_bit_lock will fail for all the
79 	 * callers but one, so that they will loop again.
80 	 * This way an explicit spinlock is not required.
81 	 */
82 	do {
83 		bit = find_first_zero_bit(clt->permits_map, max_depth);
84 		if (bit >= max_depth)
85 			return NULL;
86 	} while (test_and_set_bit_lock(bit, clt->permits_map));
87 
88 	permit = get_permit(clt, bit);
89 	WARN_ON(permit->mem_id != bit);
90 	permit->cpu_id = raw_smp_processor_id();
91 	permit->con_type = con_type;
92 
93 	return permit;
94 }
95 
__rtrs_put_permit(struct rtrs_clt_sess * clt,struct rtrs_permit * permit)96 static inline void __rtrs_put_permit(struct rtrs_clt_sess *clt,
97 				      struct rtrs_permit *permit)
98 {
99 	clear_bit_unlock(permit->mem_id, clt->permits_map);
100 }
101 
102 /**
103  * rtrs_clt_get_permit() - allocates permit for future RDMA operation
104  * @clt:	Current session
105  * @con_type:	Type of connection to use with the permit
106  * @can_wait:	Wait type
107  *
108  * Description:
109  *    Allocates permit for the following RDMA operation.  Permit is used
110  *    to preallocate all resources and to propagate memory pressure
111  *    up earlier.
112  *
113  * Context:
114  *    Can sleep if @wait == RTRS_PERMIT_WAIT
115  */
rtrs_clt_get_permit(struct rtrs_clt_sess * clt,enum rtrs_clt_con_type con_type,enum wait_type can_wait)116 struct rtrs_permit *rtrs_clt_get_permit(struct rtrs_clt_sess *clt,
117 					  enum rtrs_clt_con_type con_type,
118 					  enum wait_type can_wait)
119 {
120 	struct rtrs_permit *permit;
121 	DEFINE_WAIT(wait);
122 
123 	permit = __rtrs_get_permit(clt, con_type);
124 	if (permit || !can_wait)
125 		return permit;
126 
127 	do {
128 		prepare_to_wait(&clt->permits_wait, &wait,
129 				TASK_UNINTERRUPTIBLE);
130 		permit = __rtrs_get_permit(clt, con_type);
131 		if (permit)
132 			break;
133 
134 		io_schedule();
135 	} while (1);
136 
137 	finish_wait(&clt->permits_wait, &wait);
138 
139 	return permit;
140 }
141 EXPORT_SYMBOL(rtrs_clt_get_permit);
142 
143 /**
144  * rtrs_clt_put_permit() - puts allocated permit
145  * @clt:	Current session
146  * @permit:	Permit to be freed
147  *
148  * Context:
149  *    Does not matter
150  */
rtrs_clt_put_permit(struct rtrs_clt_sess * clt,struct rtrs_permit * permit)151 void rtrs_clt_put_permit(struct rtrs_clt_sess *clt,
152 			 struct rtrs_permit *permit)
153 {
154 	if (WARN_ON(!test_bit(permit->mem_id, clt->permits_map)))
155 		return;
156 
157 	__rtrs_put_permit(clt, permit);
158 
159 	/*
160 	 * rtrs_clt_get_permit() adds itself to the &clt->permits_wait list
161 	 * before calling schedule(). So if rtrs_clt_get_permit() is sleeping
162 	 * it must have added itself to &clt->permits_wait before
163 	 * __rtrs_put_permit() finished.
164 	 * Hence it is safe to guard wake_up() with a waitqueue_active() test.
165 	 */
166 	if (waitqueue_active(&clt->permits_wait))
167 		wake_up(&clt->permits_wait);
168 }
169 EXPORT_SYMBOL(rtrs_clt_put_permit);
170 
171 /**
172  * rtrs_permit_to_clt_con() - returns RDMA connection pointer by the permit
173  * @clt_path: client path pointer
174  * @permit: permit for the allocation of the RDMA buffer
175  * Note:
176  *     IO connection starts from 1.
177  *     0 connection is for user messages.
178  */
179 static
rtrs_permit_to_clt_con(struct rtrs_clt_path * clt_path,struct rtrs_permit * permit)180 struct rtrs_clt_con *rtrs_permit_to_clt_con(struct rtrs_clt_path *clt_path,
181 					    struct rtrs_permit *permit)
182 {
183 	int id = 0;
184 
185 	if (permit->con_type == RTRS_IO_CON)
186 		id = (permit->cpu_id % (clt_path->s.irq_con_num - 1)) + 1;
187 
188 	return to_clt_con(clt_path->s.con[id]);
189 }
190 
191 /**
192  * rtrs_clt_change_state() - change the session state through session state
193  * machine.
194  *
195  * @clt_path: client path to change the state of.
196  * @new_state: state to change to.
197  *
198  * returns true if sess's state is changed to new state, otherwise return false.
199  *
200  * Locks:
201  * state_wq lock must be hold.
202  */
rtrs_clt_change_state(struct rtrs_clt_path * clt_path,enum rtrs_clt_state new_state)203 static bool rtrs_clt_change_state(struct rtrs_clt_path *clt_path,
204 				     enum rtrs_clt_state new_state)
205 {
206 	enum rtrs_clt_state old_state;
207 	bool changed = false;
208 
209 	lockdep_assert_held(&clt_path->state_wq.lock);
210 
211 	old_state = clt_path->state;
212 	switch (new_state) {
213 	case RTRS_CLT_CONNECTING:
214 		switch (old_state) {
215 		case RTRS_CLT_RECONNECTING:
216 			changed = true;
217 			fallthrough;
218 		default:
219 			break;
220 		}
221 		break;
222 	case RTRS_CLT_RECONNECTING:
223 		switch (old_state) {
224 		case RTRS_CLT_CONNECTED:
225 		case RTRS_CLT_CONNECTING_ERR:
226 		case RTRS_CLT_CLOSED:
227 			changed = true;
228 			fallthrough;
229 		default:
230 			break;
231 		}
232 		break;
233 	case RTRS_CLT_CONNECTED:
234 		switch (old_state) {
235 		case RTRS_CLT_CONNECTING:
236 			changed = true;
237 			fallthrough;
238 		default:
239 			break;
240 		}
241 		break;
242 	case RTRS_CLT_CONNECTING_ERR:
243 		switch (old_state) {
244 		case RTRS_CLT_CONNECTING:
245 			changed = true;
246 			fallthrough;
247 		default:
248 			break;
249 		}
250 		break;
251 	case RTRS_CLT_CLOSING:
252 		switch (old_state) {
253 		case RTRS_CLT_CONNECTING:
254 		case RTRS_CLT_CONNECTING_ERR:
255 		case RTRS_CLT_RECONNECTING:
256 		case RTRS_CLT_CONNECTED:
257 			changed = true;
258 			fallthrough;
259 		default:
260 			break;
261 		}
262 		break;
263 	case RTRS_CLT_CLOSED:
264 		switch (old_state) {
265 		case RTRS_CLT_CLOSING:
266 			changed = true;
267 			fallthrough;
268 		default:
269 			break;
270 		}
271 		break;
272 	case RTRS_CLT_DEAD:
273 		switch (old_state) {
274 		case RTRS_CLT_CLOSED:
275 			changed = true;
276 			fallthrough;
277 		default:
278 			break;
279 		}
280 		break;
281 	default:
282 		break;
283 	}
284 	if (changed) {
285 		clt_path->state = new_state;
286 		wake_up_locked(&clt_path->state_wq);
287 	}
288 
289 	return changed;
290 }
291 
rtrs_clt_change_state_from_to(struct rtrs_clt_path * clt_path,enum rtrs_clt_state old_state,enum rtrs_clt_state new_state)292 static bool rtrs_clt_change_state_from_to(struct rtrs_clt_path *clt_path,
293 					   enum rtrs_clt_state old_state,
294 					   enum rtrs_clt_state new_state)
295 {
296 	bool changed = false;
297 
298 	spin_lock_irq(&clt_path->state_wq.lock);
299 	if (clt_path->state == old_state)
300 		changed = rtrs_clt_change_state(clt_path, new_state);
301 	spin_unlock_irq(&clt_path->state_wq.lock);
302 
303 	return changed;
304 }
305 
306 static void rtrs_clt_stop_and_destroy_conns(struct rtrs_clt_path *clt_path);
rtrs_rdma_error_recovery(struct rtrs_clt_con * con)307 static void rtrs_rdma_error_recovery(struct rtrs_clt_con *con)
308 {
309 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
310 
311 	trace_rtrs_rdma_error_recovery(clt_path);
312 
313 	if (rtrs_clt_change_state_from_to(clt_path,
314 					   RTRS_CLT_CONNECTED,
315 					   RTRS_CLT_RECONNECTING)) {
316 		queue_work(rtrs_wq, &clt_path->err_recovery_work);
317 	} else {
318 		/*
319 		 * Error can happen just on establishing new connection,
320 		 * so notify waiter with error state, waiter is responsible
321 		 * for cleaning the rest and reconnect if needed.
322 		 */
323 		rtrs_clt_change_state_from_to(clt_path,
324 					       RTRS_CLT_CONNECTING,
325 					       RTRS_CLT_CONNECTING_ERR);
326 	}
327 }
328 
rtrs_clt_fast_reg_done(struct ib_cq * cq,struct ib_wc * wc)329 static void rtrs_clt_fast_reg_done(struct ib_cq *cq, struct ib_wc *wc)
330 {
331 	struct rtrs_clt_con *con = to_clt_con(wc->qp->qp_context);
332 
333 	if (wc->status != IB_WC_SUCCESS) {
334 		rtrs_err_rl(con->c.path, "Failed IB_WR_REG_MR: %s\n",
335 			  ib_wc_status_msg(wc->status));
336 		rtrs_rdma_error_recovery(con);
337 	}
338 }
339 
340 static struct ib_cqe fast_reg_cqe = {
341 	.done = rtrs_clt_fast_reg_done
342 };
343 
344 static void complete_rdma_req(struct rtrs_clt_io_req *req, int errno,
345 			      bool notify, bool can_wait);
346 
rtrs_clt_inv_rkey_done(struct ib_cq * cq,struct ib_wc * wc)347 static void rtrs_clt_inv_rkey_done(struct ib_cq *cq, struct ib_wc *wc)
348 {
349 	struct rtrs_clt_io_req *req =
350 		container_of(wc->wr_cqe, typeof(*req), inv_cqe);
351 	struct rtrs_clt_con *con = to_clt_con(wc->qp->qp_context);
352 
353 	if (wc->status != IB_WC_SUCCESS) {
354 		rtrs_err_rl(con->c.path, "Failed IB_WR_LOCAL_INV: %s\n",
355 			  ib_wc_status_msg(wc->status));
356 		rtrs_rdma_error_recovery(con);
357 	}
358 	req->mr->need_inval = false;
359 	if (req->need_inv_comp)
360 		complete(&req->inv_comp);
361 	else
362 		/* Complete request from INV callback */
363 		complete_rdma_req(req, req->inv_errno, true, false);
364 }
365 
rtrs_inv_rkey(struct rtrs_clt_io_req * req)366 static int rtrs_inv_rkey(struct rtrs_clt_io_req *req)
367 {
368 	struct rtrs_clt_con *con = req->con;
369 	struct ib_send_wr wr = {
370 		.opcode		    = IB_WR_LOCAL_INV,
371 		.wr_cqe		    = &req->inv_cqe,
372 		.send_flags	    = IB_SEND_SIGNALED,
373 		.ex.invalidate_rkey = req->mr->rkey,
374 	};
375 	req->inv_cqe.done = rtrs_clt_inv_rkey_done;
376 
377 	return ib_post_send(con->c.qp, &wr, NULL);
378 }
379 
complete_rdma_req(struct rtrs_clt_io_req * req,int errno,bool notify,bool can_wait)380 static void complete_rdma_req(struct rtrs_clt_io_req *req, int errno,
381 			      bool notify, bool can_wait)
382 {
383 	struct rtrs_clt_con *con = req->con;
384 	struct rtrs_clt_path *clt_path;
385 	int err;
386 
387 	if (!req->in_use)
388 		return;
389 	if (WARN_ON(!req->con))
390 		return;
391 	clt_path = to_clt_path(con->c.path);
392 
393 	if (req->sg_cnt) {
394 		if (req->mr->need_inval) {
395 			/*
396 			 * We are here to invalidate read/write requests
397 			 * ourselves.  In normal scenario server should
398 			 * send INV for all read requests, we do local
399 			 * invalidate for write requests ourselves, but
400 			 * we are here, thus three things could happen:
401 			 *
402 			 *    1.  this is failover, when errno != 0
403 			 *        and can_wait == 1,
404 			 *
405 			 *    2.  something totally bad happened and
406 			 *        server forgot to send INV, so we
407 			 *        should do that ourselves.
408 			 *
409 			 *    3.  write request finishes, we need to do local
410 			 *        invalidate
411 			 */
412 
413 			if (can_wait) {
414 				req->need_inv_comp = true;
415 			} else {
416 				/* This should be IO path, so always notify */
417 				WARN_ON(!notify);
418 				/* Save errno for INV callback */
419 				req->inv_errno = errno;
420 			}
421 
422 			refcount_inc(&req->ref);
423 			err = rtrs_inv_rkey(req);
424 			if (err) {
425 				rtrs_err_rl(con->c.path, "Send INV WR key=%#x: %pe\n",
426 					    req->mr->rkey, ERR_PTR(err));
427 			} else if (can_wait) {
428 				wait_for_completion(&req->inv_comp);
429 			}
430 			if (!refcount_dec_and_test(&req->ref))
431 				return;
432 		}
433 		ib_dma_unmap_sg(clt_path->s.dev->ib_dev, req->sglist,
434 				req->sg_cnt, req->dir);
435 	}
436 	if (!refcount_dec_and_test(&req->ref))
437 		return;
438 	if (req->mp_policy == MP_POLICY_MIN_INFLIGHT)
439 		atomic_dec(&clt_path->stats->inflight);
440 
441 	req->in_use = false;
442 	req->con = NULL;
443 
444 	if (errno) {
445 		rtrs_err_rl(con->c.path,
446 			    "IO %s request failed: error=%pe path=%s [%s:%u] notify=%d\n",
447 			    req->dir == DMA_TO_DEVICE ? "write" : "read", ERR_PTR(errno),
448 			    kobject_name(&clt_path->kobj), clt_path->hca_name,
449 			    clt_path->hca_port, notify);
450 	}
451 
452 	if (notify)
453 		req->conf(req->priv, errno);
454 }
455 
rtrs_post_send_rdma(struct rtrs_clt_con * con,struct rtrs_clt_io_req * req,struct rtrs_rbuf * rbuf,u32 off,u32 imm,struct ib_send_wr * wr)456 static int rtrs_post_send_rdma(struct rtrs_clt_con *con,
457 				struct rtrs_clt_io_req *req,
458 				struct rtrs_rbuf *rbuf, u32 off,
459 				u32 imm, struct ib_send_wr *wr)
460 {
461 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
462 	enum ib_send_flags flags;
463 	struct ib_sge sge;
464 
465 	if (!req->sg_size) {
466 		rtrs_wrn(con->c.path,
467 			 "Doing RDMA Write failed, no data supplied\n");
468 		return -EINVAL;
469 	}
470 
471 	/* user data and user message in the first list element */
472 	sge.addr   = req->iu->dma_addr;
473 	sge.length = req->sg_size;
474 	sge.lkey   = clt_path->s.dev->ib_pd->local_dma_lkey;
475 
476 	/*
477 	 * From time to time we have to post signalled sends,
478 	 * or send queue will fill up and only QP reset can help.
479 	 */
480 	flags = atomic_inc_return(&con->c.wr_cnt) % clt_path->s.signal_interval ?
481 			0 : IB_SEND_SIGNALED;
482 
483 	ib_dma_sync_single_for_device(clt_path->s.dev->ib_dev,
484 				      req->iu->dma_addr,
485 				      req->sg_size, DMA_TO_DEVICE);
486 
487 	return rtrs_iu_post_rdma_write_imm(&con->c, req->iu, &sge, 1,
488 					    rbuf->rkey, rbuf->addr + off,
489 					    imm, flags, wr, NULL);
490 }
491 
process_io_rsp(struct rtrs_clt_path * clt_path,u32 msg_id,s16 errno,bool w_inval)492 static void process_io_rsp(struct rtrs_clt_path *clt_path, u32 msg_id,
493 			   s16 errno, bool w_inval)
494 {
495 	struct rtrs_clt_io_req *req;
496 
497 	if (WARN_ON(msg_id >= clt_path->queue_depth))
498 		return;
499 
500 	req = &clt_path->reqs[msg_id];
501 	/* Drop need_inv if server responded with send with invalidation */
502 	req->mr->need_inval &= !w_inval;
503 	complete_rdma_req(req, errno, true, false);
504 }
505 
rtrs_clt_recv_done(struct rtrs_clt_con * con,struct ib_wc * wc)506 static void rtrs_clt_recv_done(struct rtrs_clt_con *con, struct ib_wc *wc)
507 {
508 	struct rtrs_iu *iu;
509 	int err;
510 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
511 
512 	WARN_ON((clt_path->flags & RTRS_MSG_NEW_RKEY_F) == 0);
513 	iu = container_of(wc->wr_cqe, struct rtrs_iu,
514 			  cqe);
515 	err = rtrs_iu_post_recv(&con->c, iu);
516 	if (err) {
517 		rtrs_err(con->c.path, "post iu failed %pe\n", ERR_PTR(err));
518 		rtrs_rdma_error_recovery(con);
519 	}
520 }
521 
rtrs_clt_rkey_rsp_done(struct rtrs_clt_con * con,struct ib_wc * wc)522 static void rtrs_clt_rkey_rsp_done(struct rtrs_clt_con *con, struct ib_wc *wc)
523 {
524 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
525 	struct rtrs_msg_rkey_rsp *msg;
526 	u32 imm_type, imm_payload;
527 	bool w_inval = false;
528 	struct rtrs_iu *iu;
529 	u32 buf_id;
530 	int err;
531 
532 	WARN_ON((clt_path->flags & RTRS_MSG_NEW_RKEY_F) == 0);
533 
534 	iu = container_of(wc->wr_cqe, struct rtrs_iu, cqe);
535 
536 	if (wc->byte_len < sizeof(*msg)) {
537 		rtrs_err(con->c.path, "rkey response is malformed: size %d\n",
538 			  wc->byte_len);
539 		goto out;
540 	}
541 	ib_dma_sync_single_for_cpu(clt_path->s.dev->ib_dev, iu->dma_addr,
542 				   iu->size, DMA_FROM_DEVICE);
543 	msg = iu->buf;
544 	if (le16_to_cpu(msg->type) != RTRS_MSG_RKEY_RSP) {
545 		rtrs_err(clt_path->clt,
546 			  "rkey response is malformed: type %d\n",
547 			  le16_to_cpu(msg->type));
548 		goto out;
549 	}
550 	buf_id = le16_to_cpu(msg->buf_id);
551 	if (WARN_ON(buf_id >= clt_path->queue_depth))
552 		goto out;
553 
554 	rtrs_from_imm(be32_to_cpu(wc->ex.imm_data), &imm_type, &imm_payload);
555 	if (imm_type == RTRS_IO_RSP_IMM ||
556 	    imm_type == RTRS_IO_RSP_W_INV_IMM) {
557 		u32 msg_id;
558 
559 		w_inval = (imm_type == RTRS_IO_RSP_W_INV_IMM);
560 		rtrs_from_io_rsp_imm(imm_payload, &msg_id, &err);
561 
562 		if (WARN_ON(buf_id != msg_id))
563 			goto out;
564 		clt_path->rbufs[buf_id].rkey = le32_to_cpu(msg->rkey);
565 		process_io_rsp(clt_path, msg_id, err, w_inval);
566 	}
567 	ib_dma_sync_single_for_device(clt_path->s.dev->ib_dev, iu->dma_addr,
568 				      iu->size, DMA_FROM_DEVICE);
569 	return rtrs_clt_recv_done(con, wc);
570 out:
571 	rtrs_rdma_error_recovery(con);
572 }
573 
574 static void rtrs_clt_rdma_done(struct ib_cq *cq, struct ib_wc *wc);
575 
576 static struct ib_cqe io_comp_cqe = {
577 	.done = rtrs_clt_rdma_done
578 };
579 
580 /*
581  * Post x2 empty WRs: first is for this RDMA with IMM,
582  * second is for RECV with INV, which happened earlier.
583  */
rtrs_post_recv_empty_x2(struct rtrs_con * con,struct ib_cqe * cqe)584 static int rtrs_post_recv_empty_x2(struct rtrs_con *con, struct ib_cqe *cqe)
585 {
586 	struct ib_recv_wr wr_arr[2], *wr;
587 	int i;
588 
589 	memset(wr_arr, 0, sizeof(wr_arr));
590 	for (i = 0; i < ARRAY_SIZE(wr_arr); i++) {
591 		wr = &wr_arr[i];
592 		wr->wr_cqe  = cqe;
593 		if (i)
594 			/* Chain backwards */
595 			wr->next = &wr_arr[i - 1];
596 	}
597 
598 	return ib_post_recv(con->qp, wr, NULL);
599 }
600 
rtrs_clt_rdma_done(struct ib_cq * cq,struct ib_wc * wc)601 static void rtrs_clt_rdma_done(struct ib_cq *cq, struct ib_wc *wc)
602 {
603 	struct rtrs_clt_con *con = to_clt_con(wc->qp->qp_context);
604 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
605 	u32 imm_type, imm_payload;
606 	bool w_inval = false;
607 	int err;
608 
609 	if (wc->status != IB_WC_SUCCESS) {
610 		if (wc->status != IB_WC_WR_FLUSH_ERR) {
611 			rtrs_err(clt_path->clt, "RDMA failed: %s\n",
612 				  ib_wc_status_msg(wc->status));
613 			rtrs_rdma_error_recovery(con);
614 		}
615 		return;
616 	}
617 	rtrs_clt_update_wc_stats(con);
618 
619 	switch (wc->opcode) {
620 	case IB_WC_RECV_RDMA_WITH_IMM:
621 		/*
622 		 * post_recv() RDMA write completions of IO reqs (read/write)
623 		 * and hb
624 		 */
625 		if (WARN_ON(wc->wr_cqe->done != rtrs_clt_rdma_done))
626 			return;
627 		clt_path->s.hb_missed_cnt = 0;
628 		rtrs_from_imm(be32_to_cpu(wc->ex.imm_data),
629 			       &imm_type, &imm_payload);
630 		if (imm_type == RTRS_IO_RSP_IMM ||
631 		    imm_type == RTRS_IO_RSP_W_INV_IMM) {
632 			u32 msg_id;
633 
634 			w_inval = (imm_type == RTRS_IO_RSP_W_INV_IMM);
635 			rtrs_from_io_rsp_imm(imm_payload, &msg_id, &err);
636 
637 			process_io_rsp(clt_path, msg_id, err, w_inval);
638 		} else if (imm_type == RTRS_HB_MSG_IMM) {
639 			WARN_ON(con->c.cid);
640 			rtrs_send_hb_ack(&clt_path->s);
641 			if (clt_path->flags & RTRS_MSG_NEW_RKEY_F)
642 				return  rtrs_clt_recv_done(con, wc);
643 		} else if (imm_type == RTRS_HB_ACK_IMM) {
644 			WARN_ON(con->c.cid);
645 			clt_path->s.hb_cur_latency =
646 				ktime_sub(ktime_get(), clt_path->s.hb_last_sent);
647 			if (clt_path->flags & RTRS_MSG_NEW_RKEY_F)
648 				return  rtrs_clt_recv_done(con, wc);
649 		} else {
650 			rtrs_wrn(con->c.path, "Unknown IMM type %u\n",
651 				  imm_type);
652 		}
653 		if (w_inval)
654 			/*
655 			 * Post x2 empty WRs: first is for this RDMA with IMM,
656 			 * second is for RECV with INV, which happened earlier.
657 			 */
658 			err = rtrs_post_recv_empty_x2(&con->c, &io_comp_cqe);
659 		else
660 			err = rtrs_post_recv_empty(&con->c, &io_comp_cqe);
661 		if (err) {
662 			rtrs_err(con->c.path, "rtrs_post_recv_empty(): %pe\n",
663 				 ERR_PTR(err));
664 			rtrs_rdma_error_recovery(con);
665 		}
666 		break;
667 	case IB_WC_RECV:
668 		/*
669 		 * Key invalidations from server side
670 		 */
671 		clt_path->s.hb_missed_cnt = 0;
672 		WARN_ON(!(wc->wc_flags & IB_WC_WITH_INVALIDATE ||
673 			  wc->wc_flags & IB_WC_WITH_IMM));
674 		WARN_ON(wc->wr_cqe->done != rtrs_clt_rdma_done);
675 		if (clt_path->flags & RTRS_MSG_NEW_RKEY_F) {
676 			if (wc->wc_flags & IB_WC_WITH_INVALIDATE)
677 				return  rtrs_clt_recv_done(con, wc);
678 
679 			return  rtrs_clt_rkey_rsp_done(con, wc);
680 		}
681 		break;
682 	case IB_WC_RDMA_WRITE:
683 		/*
684 		 * post_send() RDMA write completions of IO reqs (read/write)
685 		 * and hb.
686 		 */
687 		break;
688 
689 	default:
690 		rtrs_wrn(clt_path->clt, "Unexpected WC type: %d\n", wc->opcode);
691 		return;
692 	}
693 }
694 
post_recv_io(struct rtrs_clt_con * con,size_t q_size)695 static int post_recv_io(struct rtrs_clt_con *con, size_t q_size)
696 {
697 	int err, i;
698 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
699 
700 	for (i = 0; i < q_size; i++) {
701 		if (clt_path->flags & RTRS_MSG_NEW_RKEY_F) {
702 			struct rtrs_iu *iu = &con->rsp_ius[i];
703 
704 			err = rtrs_iu_post_recv(&con->c, iu);
705 		} else {
706 			err = rtrs_post_recv_empty(&con->c, &io_comp_cqe);
707 		}
708 		if (err)
709 			return err;
710 	}
711 
712 	return 0;
713 }
714 
post_recv_path(struct rtrs_clt_path * clt_path)715 static int post_recv_path(struct rtrs_clt_path *clt_path)
716 {
717 	size_t q_size = 0;
718 	int err, cid;
719 
720 	for (cid = 0; cid < clt_path->s.con_num; cid++) {
721 		if (cid == 0)
722 			q_size = SERVICE_CON_QUEUE_DEPTH;
723 		else
724 			q_size = clt_path->queue_depth;
725 
726 		/*
727 		 * x2 for RDMA read responses + FR key invalidations,
728 		 * RDMA writes do not require any FR registrations.
729 		 */
730 		q_size *= 2;
731 
732 		err = post_recv_io(to_clt_con(clt_path->s.con[cid]), q_size);
733 		if (err) {
734 			rtrs_err(clt_path->clt, "post_recv_io(), err: %pe\n",
735 				 ERR_PTR(err));
736 			return err;
737 		}
738 	}
739 
740 	return 0;
741 }
742 
743 struct path_it {
744 	int i;
745 	struct list_head skip_list;
746 	struct rtrs_clt_sess *clt;
747 	struct rtrs_clt_path *(*next_path)(struct path_it *it);
748 };
749 
750 /*
751  * rtrs_clt_get_next_path_or_null - get clt path from the list or return NULL
752  * @head:	the head for the list.
753  * @clt_path:	The element to take the next clt_path from.
754  *
755  * Next clt path returned in round-robin fashion, i.e. head will be skipped,
756  * but if list is observed as empty, NULL will be returned.
757  *
758  * This function may safely run concurrently with the _rcu list-mutation
759  * primitives such as list_add_rcu() as long as it's guarded by rcu_read_lock().
760  */
761 static inline struct rtrs_clt_path *
rtrs_clt_get_next_path_or_null(struct list_head * head,struct rtrs_clt_path * clt_path)762 rtrs_clt_get_next_path_or_null(struct list_head *head, struct rtrs_clt_path *clt_path)
763 {
764 	return list_next_or_null_rcu(head, &clt_path->s.entry, typeof(*clt_path), s.entry) ?:
765 				     list_next_or_null_rcu(head,
766 							   READ_ONCE((&clt_path->s.entry)->next),
767 							   typeof(*clt_path), s.entry);
768 }
769 
770 /**
771  * get_next_path_rr() - Returns path in round-robin fashion.
772  * @it:	the path pointer
773  *
774  * Related to @MP_POLICY_RR
775  *
776  * Locks:
777  *    rcu_read_lock() must be held.
778  */
get_next_path_rr(struct path_it * it)779 static struct rtrs_clt_path *get_next_path_rr(struct path_it *it)
780 {
781 	struct rtrs_clt_path __rcu **ppcpu_path;
782 	struct rtrs_clt_path *path;
783 	struct rtrs_clt_sess *clt;
784 
785 	/*
786 	 * Assert that rcu lock must be held
787 	 */
788 	RCU_LOCKDEP_WARN(!rcu_read_lock_held(), "no rcu read lock held");
789 
790 	clt = it->clt;
791 
792 	/*
793 	 * Here we use two RCU objects: @paths_list and @pcpu_path
794 	 * pointer.  See rtrs_clt_remove_path_from_arr() for details
795 	 * how that is handled.
796 	 */
797 
798 	ppcpu_path = this_cpu_ptr(clt->pcpu_path);
799 	path = rcu_dereference(*ppcpu_path);
800 	if (!path)
801 		path = list_first_or_null_rcu(&clt->paths_list,
802 					      typeof(*path), s.entry);
803 	else
804 		path = rtrs_clt_get_next_path_or_null(&clt->paths_list, path);
805 
806 	rcu_assign_pointer(*ppcpu_path, path);
807 
808 	return path;
809 }
810 
811 /**
812  * get_next_path_min_inflight() - Returns path with minimal inflight count.
813  * @it:	the path pointer
814  *
815  * Related to @MP_POLICY_MIN_INFLIGHT
816  *
817  * Locks:
818  *    rcu_read_lock() must be hold.
819  */
get_next_path_min_inflight(struct path_it * it)820 static struct rtrs_clt_path *get_next_path_min_inflight(struct path_it *it)
821 {
822 	struct rtrs_clt_path *min_path = NULL;
823 	struct rtrs_clt_sess *clt = it->clt;
824 	struct rtrs_clt_path *clt_path;
825 	int min_inflight = INT_MAX;
826 	int inflight;
827 
828 	list_for_each_entry_rcu(clt_path, &clt->paths_list, s.entry) {
829 		if (READ_ONCE(clt_path->state) != RTRS_CLT_CONNECTED)
830 			continue;
831 
832 		if (!list_empty(raw_cpu_ptr(clt_path->mp_skip_entry)))
833 			continue;
834 
835 		inflight = atomic_read(&clt_path->stats->inflight);
836 
837 		if (inflight < min_inflight) {
838 			min_inflight = inflight;
839 			min_path = clt_path;
840 		}
841 	}
842 
843 	/*
844 	 * add the path to the skip list, so that next time we can get
845 	 * a different one
846 	 */
847 	if (min_path)
848 		list_add(raw_cpu_ptr(min_path->mp_skip_entry), &it->skip_list);
849 
850 	return min_path;
851 }
852 
853 /**
854  * get_next_path_min_latency() - Returns path with minimal latency.
855  * @it:	the path pointer
856  *
857  * Return: a path with the lowest latency or NULL if all paths are tried
858  *
859  * Locks:
860  *    rcu_read_lock() must be hold.
861  *
862  * Related to @MP_POLICY_MIN_LATENCY
863  *
864  * This DOES skip an already-tried path.
865  * There is a skip-list to skip a path if the path has tried but failed.
866  * It will try the minimum latency path and then the second minimum latency
867  * path and so on. Finally it will return NULL if all paths are tried.
868  * Therefore the caller MUST check the returned
869  * path is NULL and trigger the IO error.
870  */
get_next_path_min_latency(struct path_it * it)871 static struct rtrs_clt_path *get_next_path_min_latency(struct path_it *it)
872 {
873 	struct rtrs_clt_path *min_path = NULL;
874 	struct rtrs_clt_sess *clt = it->clt;
875 	struct rtrs_clt_path *clt_path;
876 	ktime_t min_latency = KTIME_MAX;
877 	ktime_t latency;
878 
879 	list_for_each_entry_rcu(clt_path, &clt->paths_list, s.entry) {
880 		if (READ_ONCE(clt_path->state) != RTRS_CLT_CONNECTED)
881 			continue;
882 
883 		if (!list_empty(raw_cpu_ptr(clt_path->mp_skip_entry)))
884 			continue;
885 
886 		latency = clt_path->s.hb_cur_latency;
887 
888 		if (latency < min_latency) {
889 			min_latency = latency;
890 			min_path = clt_path;
891 		}
892 	}
893 
894 	/*
895 	 * add the path to the skip list, so that next time we can get
896 	 * a different one
897 	 */
898 	if (min_path)
899 		list_add(raw_cpu_ptr(min_path->mp_skip_entry), &it->skip_list);
900 
901 	return min_path;
902 }
903 
path_it_init(struct path_it * it,struct rtrs_clt_sess * clt)904 static inline void path_it_init(struct path_it *it, struct rtrs_clt_sess *clt)
905 {
906 	INIT_LIST_HEAD(&it->skip_list);
907 	it->clt = clt;
908 	it->i = 0;
909 
910 	if (clt->mp_policy == MP_POLICY_RR)
911 		it->next_path = get_next_path_rr;
912 	else if (clt->mp_policy == MP_POLICY_MIN_INFLIGHT)
913 		it->next_path = get_next_path_min_inflight;
914 	else
915 		it->next_path = get_next_path_min_latency;
916 }
917 
path_it_deinit(struct path_it * it)918 static inline void path_it_deinit(struct path_it *it)
919 {
920 	struct list_head *skip, *tmp;
921 	/*
922 	 * The skip_list is used only for the MIN_INFLIGHT and MIN_LATENCY policies.
923 	 * We need to remove paths from it, so that next IO can insert
924 	 * paths (->mp_skip_entry) into a skip_list again.
925 	 */
926 	list_for_each_safe(skip, tmp, &it->skip_list)
927 		list_del_init(skip);
928 }
929 
930 /**
931  * rtrs_clt_init_req() - Initialize an rtrs_clt_io_req holding information
932  * about an inflight IO.
933  * The user buffer holding user control message (not data) is copied into
934  * the corresponding buffer of rtrs_iu (req->iu->buf), which later on will
935  * also hold the control message of rtrs.
936  * @req: an io request holding information about IO.
937  * @clt_path: client path
938  * @conf: conformation callback function to notify upper layer.
939  * @permit: permit for allocation of RDMA remote buffer
940  * @priv: private pointer
941  * @vec: kernel vector containing control message
942  * @usr_len: length of the user message
943  * @sg: scater list for IO data
944  * @sg_cnt: number of scater list entries
945  * @data_len: length of the IO data
946  * @dir: direction of the IO.
947  */
rtrs_clt_init_req(struct rtrs_clt_io_req * req,struct rtrs_clt_path * clt_path,void (* conf)(void * priv,int errno),struct rtrs_permit * permit,void * priv,const struct kvec * vec,size_t usr_len,struct scatterlist * sg,size_t sg_cnt,size_t data_len,int dir)948 static void rtrs_clt_init_req(struct rtrs_clt_io_req *req,
949 			      struct rtrs_clt_path *clt_path,
950 			      void (*conf)(void *priv, int errno),
951 			      struct rtrs_permit *permit, void *priv,
952 			      const struct kvec *vec, size_t usr_len,
953 			      struct scatterlist *sg, size_t sg_cnt,
954 			      size_t data_len, int dir)
955 {
956 	struct iov_iter iter;
957 	size_t len;
958 
959 	req->permit = permit;
960 	req->in_use = true;
961 	req->usr_len = usr_len;
962 	req->data_len = data_len;
963 	req->sglist = sg;
964 	req->sg_cnt = sg_cnt;
965 	req->priv = priv;
966 	req->dir = dir;
967 	req->con = rtrs_permit_to_clt_con(clt_path, permit);
968 	req->conf = conf;
969 	req->mr->need_inval = false;
970 	req->need_inv_comp = false;
971 	req->inv_errno = 0;
972 	refcount_set(&req->ref, 1);
973 	req->mp_policy = clt_path->clt->mp_policy;
974 
975 	iov_iter_kvec(&iter, ITER_SOURCE, vec, 1, usr_len);
976 	len = _copy_from_iter(req->iu->buf, usr_len, &iter);
977 	WARN_ON(len != usr_len);
978 
979 	reinit_completion(&req->inv_comp);
980 }
981 
982 static struct rtrs_clt_io_req *
rtrs_clt_get_req(struct rtrs_clt_path * clt_path,void (* conf)(void * priv,int errno),struct rtrs_permit * permit,void * priv,const struct kvec * vec,size_t usr_len,struct scatterlist * sg,size_t sg_cnt,size_t data_len,int dir)983 rtrs_clt_get_req(struct rtrs_clt_path *clt_path,
984 		 void (*conf)(void *priv, int errno),
985 		 struct rtrs_permit *permit, void *priv,
986 		 const struct kvec *vec, size_t usr_len,
987 		 struct scatterlist *sg, size_t sg_cnt,
988 		 size_t data_len, int dir)
989 {
990 	struct rtrs_clt_io_req *req;
991 
992 	req = &clt_path->reqs[permit->mem_id];
993 	rtrs_clt_init_req(req, clt_path, conf, permit, priv, vec, usr_len,
994 			   sg, sg_cnt, data_len, dir);
995 	return req;
996 }
997 
998 static struct rtrs_clt_io_req *
rtrs_clt_get_copy_req(struct rtrs_clt_path * alive_path,struct rtrs_clt_io_req * fail_req)999 rtrs_clt_get_copy_req(struct rtrs_clt_path *alive_path,
1000 		       struct rtrs_clt_io_req *fail_req)
1001 {
1002 	struct rtrs_clt_io_req *req;
1003 	struct kvec vec = {
1004 		.iov_base = fail_req->iu->buf,
1005 		.iov_len  = fail_req->usr_len
1006 	};
1007 
1008 	req = &alive_path->reqs[fail_req->permit->mem_id];
1009 	rtrs_clt_init_req(req, alive_path, fail_req->conf, fail_req->permit,
1010 			   fail_req->priv, &vec, fail_req->usr_len,
1011 			   fail_req->sglist, fail_req->sg_cnt,
1012 			   fail_req->data_len, fail_req->dir);
1013 	return req;
1014 }
1015 
rtrs_post_rdma_write_sg(struct rtrs_clt_con * con,struct rtrs_clt_io_req * req,struct rtrs_rbuf * rbuf,bool fr_en,u32 count,u32 size,u32 imm,struct ib_send_wr * wr,struct ib_send_wr * tail)1016 static int rtrs_post_rdma_write_sg(struct rtrs_clt_con *con,
1017 				   struct rtrs_clt_io_req *req,
1018 				   struct rtrs_rbuf *rbuf, bool fr_en,
1019 				   u32 count, u32 size, u32 imm,
1020 				   struct ib_send_wr *wr,
1021 				   struct ib_send_wr *tail)
1022 {
1023 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
1024 	struct ib_sge *sge = req->sge;
1025 	enum ib_send_flags flags;
1026 	struct scatterlist *sg;
1027 	size_t num_sge;
1028 	int i;
1029 	struct ib_send_wr *ptail = NULL;
1030 
1031 	if (fr_en) {
1032 		i = 0;
1033 		sge[i].addr   = req->mr->iova;
1034 		sge[i].length = req->mr->length;
1035 		sge[i].lkey   = req->mr->lkey;
1036 		i++;
1037 		num_sge = 2;
1038 		ptail = tail;
1039 	} else {
1040 		for_each_sg(req->sglist, sg, count, i) {
1041 			sge[i].addr   = sg_dma_address(sg);
1042 			sge[i].length = sg_dma_len(sg);
1043 			sge[i].lkey   = clt_path->s.dev->ib_pd->local_dma_lkey;
1044 		}
1045 		num_sge = 1 + count;
1046 	}
1047 	sge[i].addr   = req->iu->dma_addr;
1048 	sge[i].length = size;
1049 	sge[i].lkey   = clt_path->s.dev->ib_pd->local_dma_lkey;
1050 
1051 	/*
1052 	 * From time to time we have to post signalled sends,
1053 	 * or send queue will fill up and only QP reset can help.
1054 	 */
1055 	flags = atomic_inc_return(&con->c.wr_cnt) % clt_path->s.signal_interval ?
1056 			0 : IB_SEND_SIGNALED;
1057 
1058 	ib_dma_sync_single_for_device(clt_path->s.dev->ib_dev,
1059 				      req->iu->dma_addr,
1060 				      size, DMA_TO_DEVICE);
1061 
1062 	return rtrs_iu_post_rdma_write_imm(&con->c, req->iu, sge, num_sge,
1063 					    rbuf->rkey, rbuf->addr, imm,
1064 					    flags, wr, ptail);
1065 }
1066 
rtrs_map_sg_fr(struct rtrs_clt_io_req * req,size_t count)1067 static int rtrs_map_sg_fr(struct rtrs_clt_io_req *req, size_t count)
1068 {
1069 	int nr;
1070 
1071 	/* Align the MR to a 4K page size to match the block virt boundary */
1072 	nr = ib_map_mr_sg(req->mr, req->sglist, count, NULL, SZ_4K);
1073 	if (nr != count)
1074 		return nr < 0 ? nr : -EINVAL;
1075 	ib_update_fast_reg_key(req->mr, ib_inc_rkey(req->mr->rkey));
1076 
1077 	return nr;
1078 }
1079 
rtrs_clt_write_req(struct rtrs_clt_io_req * req)1080 static int rtrs_clt_write_req(struct rtrs_clt_io_req *req)
1081 {
1082 	struct rtrs_clt_con *con = req->con;
1083 	struct rtrs_path *s = con->c.path;
1084 	struct rtrs_clt_path *clt_path = to_clt_path(s);
1085 	struct rtrs_msg_rdma_write *msg;
1086 
1087 	struct rtrs_rbuf *rbuf;
1088 	int ret, count = 0;
1089 	u32 imm, buf_id;
1090 	struct ib_reg_wr rwr;
1091 	struct ib_send_wr *wr = NULL;
1092 	bool fr_en = false;
1093 
1094 	const size_t tsize = sizeof(*msg) + req->data_len + req->usr_len;
1095 
1096 	if (tsize > clt_path->chunk_size) {
1097 		rtrs_wrn(s, "Write request failed, size too big %zu > %d\n",
1098 			  tsize, clt_path->chunk_size);
1099 		return -EMSGSIZE;
1100 	}
1101 	if (req->sg_cnt) {
1102 		count = ib_dma_map_sg(clt_path->s.dev->ib_dev, req->sglist,
1103 				      req->sg_cnt, req->dir);
1104 		if (!count) {
1105 			rtrs_wrn(s, "Write request failed, map failed\n");
1106 			return -EINVAL;
1107 		}
1108 	}
1109 	/* put rtrs msg after sg and user message */
1110 	msg = req->iu->buf + req->usr_len;
1111 	msg->type = cpu_to_le16(RTRS_MSG_WRITE);
1112 	msg->usr_len = cpu_to_le16(req->usr_len);
1113 
1114 	/* rtrs message on server side will be after user data and message */
1115 	imm = req->permit->mem_off + req->data_len + req->usr_len;
1116 	imm = rtrs_to_io_req_imm(imm);
1117 	buf_id = req->permit->mem_id;
1118 	req->sg_size = tsize;
1119 	rbuf = &clt_path->rbufs[buf_id];
1120 
1121 	if (count) {
1122 		ret = rtrs_map_sg_fr(req, count);
1123 		if (ret < 0) {
1124 			rtrs_err_rl(s,
1125 				    "Write request failed, failed to map fast reg. data, err: %pe\n",
1126 				    ERR_PTR(ret));
1127 			ib_dma_unmap_sg(clt_path->s.dev->ib_dev, req->sglist,
1128 					req->sg_cnt, req->dir);
1129 			return ret;
1130 		}
1131 		rwr = (struct ib_reg_wr) {
1132 			.wr.opcode = IB_WR_REG_MR,
1133 			.wr.wr_cqe = &fast_reg_cqe,
1134 			.mr = req->mr,
1135 			.key = req->mr->rkey,
1136 			.access = (IB_ACCESS_LOCAL_WRITE),
1137 		};
1138 		wr = &rwr.wr;
1139 		fr_en = true;
1140 		req->mr->need_inval = true;
1141 	}
1142 	/*
1143 	 * Update stats now, after request is successfully sent it is not
1144 	 * safe anymore to touch it.
1145 	 */
1146 	rtrs_clt_update_all_stats(req, WRITE);
1147 
1148 	ret = rtrs_post_rdma_write_sg(req->con, req, rbuf, fr_en, count,
1149 				      req->usr_len + sizeof(*msg),
1150 				      imm, wr, NULL);
1151 	if (ret) {
1152 		rtrs_err_rl(s,
1153 			    "Write request failed: error=%pe path=%s [%s:%u]\n",
1154 			    ERR_PTR(ret), kobject_name(&clt_path->kobj),
1155 			    clt_path->hca_name, clt_path->hca_port);
1156 		if (req->mp_policy == MP_POLICY_MIN_INFLIGHT)
1157 			atomic_dec(&clt_path->stats->inflight);
1158 		if (req->mr->need_inval) {
1159 			req->mr->need_inval = false;
1160 			refcount_dec(&req->ref);
1161 		}
1162 		if (req->sg_cnt)
1163 			ib_dma_unmap_sg(clt_path->s.dev->ib_dev, req->sglist,
1164 					req->sg_cnt, req->dir);
1165 	}
1166 
1167 	return ret;
1168 }
1169 
rtrs_clt_read_req(struct rtrs_clt_io_req * req)1170 static int rtrs_clt_read_req(struct rtrs_clt_io_req *req)
1171 {
1172 	struct rtrs_clt_con *con = req->con;
1173 	struct rtrs_path *s = con->c.path;
1174 	struct rtrs_clt_path *clt_path = to_clt_path(s);
1175 	struct rtrs_msg_rdma_read *msg;
1176 	struct rtrs_ib_dev *dev = clt_path->s.dev;
1177 
1178 	struct ib_reg_wr rwr;
1179 	struct ib_send_wr *wr = NULL;
1180 
1181 	int ret, count = 0;
1182 	u32 imm, buf_id;
1183 
1184 	const size_t tsize = sizeof(*msg) + req->data_len + req->usr_len;
1185 
1186 	if (tsize > clt_path->chunk_size) {
1187 		rtrs_wrn(s,
1188 			  "Read request failed, message size is %zu, bigger than CHUNK_SIZE %d\n",
1189 			  tsize, clt_path->chunk_size);
1190 		return -EMSGSIZE;
1191 	}
1192 
1193 	if (req->sg_cnt) {
1194 		count = ib_dma_map_sg(dev->ib_dev, req->sglist, req->sg_cnt,
1195 				      req->dir);
1196 		if (!count) {
1197 			rtrs_wrn(s,
1198 				  "Read request failed, dma map failed\n");
1199 			return -EINVAL;
1200 		}
1201 	}
1202 	/* put our message into req->buf after user message*/
1203 	msg = req->iu->buf + req->usr_len;
1204 	msg->type = cpu_to_le16(RTRS_MSG_READ);
1205 	msg->usr_len = cpu_to_le16(req->usr_len);
1206 
1207 	if (count) {
1208 		ret = rtrs_map_sg_fr(req, count);
1209 		if (ret < 0) {
1210 			rtrs_err_rl(s,
1211 				     "Read request failed, failed to map fast reg. data, err: %pe\n",
1212 				     ERR_PTR(ret));
1213 			ib_dma_unmap_sg(dev->ib_dev, req->sglist, req->sg_cnt,
1214 					req->dir);
1215 			return ret;
1216 		}
1217 		rwr = (struct ib_reg_wr) {
1218 			.wr.opcode = IB_WR_REG_MR,
1219 			.wr.wr_cqe = &fast_reg_cqe,
1220 			.mr = req->mr,
1221 			.key = req->mr->rkey,
1222 			.access = (IB_ACCESS_LOCAL_WRITE |
1223 				   IB_ACCESS_REMOTE_WRITE),
1224 		};
1225 		wr = &rwr.wr;
1226 
1227 		msg->sg_cnt = cpu_to_le16(1);
1228 		msg->flags = cpu_to_le16(RTRS_MSG_NEED_INVAL_F);
1229 
1230 		msg->desc[0].addr = cpu_to_le64(req->mr->iova);
1231 		msg->desc[0].key = cpu_to_le32(req->mr->rkey);
1232 		msg->desc[0].len = cpu_to_le32(req->mr->length);
1233 
1234 		/* Further invalidation is required */
1235 		req->mr->need_inval = !!RTRS_MSG_NEED_INVAL_F;
1236 
1237 	} else {
1238 		msg->sg_cnt = 0;
1239 		msg->flags = 0;
1240 	}
1241 	/*
1242 	 * rtrs message will be after the space reserved for disk data and
1243 	 * user message
1244 	 */
1245 	imm = req->permit->mem_off + req->data_len + req->usr_len;
1246 	imm = rtrs_to_io_req_imm(imm);
1247 	buf_id = req->permit->mem_id;
1248 
1249 	req->sg_size  = sizeof(*msg);
1250 	req->sg_size += le16_to_cpu(msg->sg_cnt) * sizeof(struct rtrs_sg_desc);
1251 	req->sg_size += req->usr_len;
1252 
1253 	/*
1254 	 * Update stats now, after request is successfully sent it is not
1255 	 * safe anymore to touch it.
1256 	 */
1257 	rtrs_clt_update_all_stats(req, READ);
1258 
1259 	ret = rtrs_post_send_rdma(req->con, req, &clt_path->rbufs[buf_id],
1260 				   req->data_len, imm, wr);
1261 	if (ret) {
1262 		rtrs_err_rl(s,
1263 			    "Read request failed: error=%pe path=%s [%s:%u]\n",
1264 			    ERR_PTR(ret), kobject_name(&clt_path->kobj),
1265 			    clt_path->hca_name, clt_path->hca_port);
1266 		if (req->mp_policy == MP_POLICY_MIN_INFLIGHT)
1267 			atomic_dec(&clt_path->stats->inflight);
1268 		req->mr->need_inval = false;
1269 		if (req->sg_cnt)
1270 			ib_dma_unmap_sg(dev->ib_dev, req->sglist,
1271 					req->sg_cnt, req->dir);
1272 	}
1273 
1274 	return ret;
1275 }
1276 
1277 /**
1278  * rtrs_clt_failover_req() - Try to find an active path for a failed request
1279  * @clt: clt context
1280  * @fail_req: a failed io request.
1281  */
rtrs_clt_failover_req(struct rtrs_clt_sess * clt,struct rtrs_clt_io_req * fail_req)1282 static int rtrs_clt_failover_req(struct rtrs_clt_sess *clt,
1283 				 struct rtrs_clt_io_req *fail_req)
1284 {
1285 	struct rtrs_clt_path *alive_path;
1286 	struct rtrs_clt_io_req *req;
1287 	int err = -ECONNABORTED;
1288 	struct path_it it;
1289 
1290 	rcu_read_lock();
1291 	for (path_it_init(&it, clt);
1292 	     (alive_path = it.next_path(&it)) && it.i < it.clt->paths_num;
1293 	     it.i++) {
1294 		if (READ_ONCE(alive_path->state) != RTRS_CLT_CONNECTED)
1295 			continue;
1296 		req = rtrs_clt_get_copy_req(alive_path, fail_req);
1297 		if (req->dir == DMA_TO_DEVICE)
1298 			err = rtrs_clt_write_req(req);
1299 		else
1300 			err = rtrs_clt_read_req(req);
1301 		if (err) {
1302 			req->in_use = false;
1303 			continue;
1304 		}
1305 		/* Success path */
1306 		rtrs_clt_inc_failover_cnt(alive_path->stats);
1307 		break;
1308 	}
1309 	path_it_deinit(&it);
1310 	rcu_read_unlock();
1311 
1312 	return err;
1313 }
1314 
fail_all_outstanding_reqs(struct rtrs_clt_path * clt_path)1315 static void fail_all_outstanding_reqs(struct rtrs_clt_path *clt_path)
1316 {
1317 	struct rtrs_clt_sess *clt = clt_path->clt;
1318 	struct rtrs_clt_io_req *req;
1319 	int i, err;
1320 
1321 	if (!clt_path->reqs)
1322 		return;
1323 	for (i = 0; i < clt_path->queue_depth; ++i) {
1324 		req = &clt_path->reqs[i];
1325 		if (!req->in_use)
1326 			continue;
1327 
1328 		/*
1329 		 * Safely (without notification) complete failed request.
1330 		 * After completion this request is still useble and can
1331 		 * be failovered to another path.
1332 		 */
1333 		complete_rdma_req(req, -ECONNABORTED, false, true);
1334 
1335 		err = rtrs_clt_failover_req(clt, req);
1336 		if (err)
1337 			/* Failover failed, notify anyway */
1338 			req->conf(req->priv, err);
1339 	}
1340 }
1341 
free_path_reqs(struct rtrs_clt_path * clt_path)1342 static void free_path_reqs(struct rtrs_clt_path *clt_path)
1343 {
1344 	struct rtrs_clt_io_req *req;
1345 	int i;
1346 
1347 	if (!clt_path->reqs)
1348 		return;
1349 	for (i = 0; i < clt_path->queue_depth; ++i) {
1350 		req = &clt_path->reqs[i];
1351 		if (req->mr)
1352 			ib_dereg_mr(req->mr);
1353 		kfree(req->sge);
1354 		rtrs_iu_free(req->iu, clt_path->s.dev->ib_dev, 1);
1355 	}
1356 	kfree(clt_path->reqs);
1357 	clt_path->reqs = NULL;
1358 }
1359 
alloc_path_reqs(struct rtrs_clt_path * clt_path)1360 static int alloc_path_reqs(struct rtrs_clt_path *clt_path)
1361 {
1362 	struct ib_device *ib_dev = clt_path->s.dev->ib_dev;
1363 	struct rtrs_clt_io_req *req;
1364 	enum ib_mr_type mr_type;
1365 	int i, err = -ENOMEM;
1366 
1367 	clt_path->reqs = kzalloc_objs(*clt_path->reqs, clt_path->queue_depth);
1368 	if (!clt_path->reqs)
1369 		return -ENOMEM;
1370 
1371 	if (ib_dev->attrs.kernel_cap_flags & IBK_SG_GAPS_REG)
1372 		mr_type = IB_MR_TYPE_SG_GAPS;
1373 	else
1374 		mr_type = IB_MR_TYPE_MEM_REG;
1375 
1376 	for (i = 0; i < clt_path->queue_depth; ++i) {
1377 		req = &clt_path->reqs[i];
1378 		req->iu = rtrs_iu_alloc(1, clt_path->max_hdr_size, GFP_KERNEL,
1379 					 clt_path->s.dev->ib_dev,
1380 					 DMA_TO_DEVICE,
1381 					 rtrs_clt_rdma_done);
1382 		if (!req->iu)
1383 			goto out;
1384 
1385 		req->sge = kzalloc_objs(*req->sge, 2);
1386 		if (!req->sge)
1387 			goto out;
1388 
1389 		req->mr = ib_alloc_mr(clt_path->s.dev->ib_pd, mr_type,
1390 				      clt_path->max_pages_per_mr);
1391 		if (IS_ERR(req->mr)) {
1392 			err = PTR_ERR(req->mr);
1393 			pr_err("Failed to alloc clt_path->max_pages_per_mr %d: %pe\n",
1394 			       clt_path->max_pages_per_mr, req->mr);
1395 			req->mr = NULL;
1396 			goto out;
1397 		}
1398 
1399 		init_completion(&req->inv_comp);
1400 	}
1401 
1402 	return 0;
1403 
1404 out:
1405 	free_path_reqs(clt_path);
1406 
1407 	return err;
1408 }
1409 
alloc_permits(struct rtrs_clt_sess * clt)1410 static int alloc_permits(struct rtrs_clt_sess *clt)
1411 {
1412 	unsigned int chunk_bits;
1413 	int err, i;
1414 
1415 	clt->permits_map = bitmap_zalloc(clt->queue_depth, GFP_KERNEL);
1416 	if (!clt->permits_map) {
1417 		err = -ENOMEM;
1418 		goto out_err;
1419 	}
1420 	clt->permits = kcalloc(clt->queue_depth, permit_size(clt), GFP_KERNEL);
1421 	if (!clt->permits) {
1422 		err = -ENOMEM;
1423 		goto err_map;
1424 	}
1425 	chunk_bits = ilog2(clt->queue_depth - 1) + 1;
1426 	for (i = 0; i < clt->queue_depth; i++) {
1427 		struct rtrs_permit *permit;
1428 
1429 		permit = get_permit(clt, i);
1430 		permit->mem_id = i;
1431 		permit->mem_off = i << (MAX_IMM_PAYL_BITS - chunk_bits);
1432 	}
1433 
1434 	return 0;
1435 
1436 err_map:
1437 	bitmap_free(clt->permits_map);
1438 	clt->permits_map = NULL;
1439 out_err:
1440 	return err;
1441 }
1442 
free_permits(struct rtrs_clt_sess * clt)1443 static void free_permits(struct rtrs_clt_sess *clt)
1444 {
1445 	if (clt->permits_map)
1446 		wait_event(clt->permits_wait,
1447 			   bitmap_empty(clt->permits_map, clt->queue_depth));
1448 
1449 	bitmap_free(clt->permits_map);
1450 	clt->permits_map = NULL;
1451 	kfree(clt->permits);
1452 	clt->permits = NULL;
1453 }
1454 
query_fast_reg_mode(struct rtrs_clt_path * clt_path)1455 static void query_fast_reg_mode(struct rtrs_clt_path *clt_path)
1456 {
1457 	struct ib_device *ib_dev;
1458 	u64 max_pages_per_mr;
1459 	int mr_page_shift;
1460 
1461 	ib_dev = clt_path->s.dev->ib_dev;
1462 
1463 	/*
1464 	 * Use the smallest page size supported by the HCA, down to a
1465 	 * minimum of 4096 bytes. We're unlikely to build large sglists
1466 	 * out of smaller entries.
1467 	 */
1468 	mr_page_shift      = max(12, ffs(ib_dev->attrs.page_size_cap) - 1);
1469 	max_pages_per_mr   = ib_dev->attrs.max_mr_size;
1470 	do_div(max_pages_per_mr, (1ull << mr_page_shift));
1471 	max_pages_per_mr = min_not_zero((u32)max_pages_per_mr, U32_MAX);
1472 	clt_path->max_pages_per_mr =
1473 		min3(clt_path->max_pages_per_mr, (u32)max_pages_per_mr,
1474 		     ib_dev->attrs.max_fast_reg_page_list_len);
1475 	clt_path->clt->max_segments =
1476 		min(clt_path->max_pages_per_mr, clt_path->clt->max_segments);
1477 }
1478 
rtrs_clt_change_state_get_old(struct rtrs_clt_path * clt_path,enum rtrs_clt_state new_state,enum rtrs_clt_state * old_state)1479 static bool rtrs_clt_change_state_get_old(struct rtrs_clt_path *clt_path,
1480 					   enum rtrs_clt_state new_state,
1481 					   enum rtrs_clt_state *old_state)
1482 {
1483 	bool changed;
1484 
1485 	spin_lock_irq(&clt_path->state_wq.lock);
1486 	if (old_state)
1487 		*old_state = clt_path->state;
1488 	changed = rtrs_clt_change_state(clt_path, new_state);
1489 	spin_unlock_irq(&clt_path->state_wq.lock);
1490 
1491 	return changed;
1492 }
1493 
rtrs_clt_hb_err_handler(struct rtrs_con * c)1494 static void rtrs_clt_hb_err_handler(struct rtrs_con *c)
1495 {
1496 	struct rtrs_clt_con *con = container_of(c, typeof(*con), c);
1497 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
1498 
1499 	rtrs_err(con->c.path, "HB err handler for path=%s\n", kobject_name(&clt_path->kobj));
1500 	rtrs_rdma_error_recovery(con);
1501 }
1502 
rtrs_clt_init_hb(struct rtrs_clt_path * clt_path)1503 static void rtrs_clt_init_hb(struct rtrs_clt_path *clt_path)
1504 {
1505 	rtrs_init_hb(&clt_path->s, &io_comp_cqe,
1506 		      RTRS_HB_INTERVAL_MS,
1507 		      RTRS_HB_MISSED_MAX,
1508 		      rtrs_clt_hb_err_handler,
1509 		      rtrs_wq);
1510 }
1511 
1512 static void rtrs_clt_reconnect_work(struct work_struct *work);
1513 static void rtrs_clt_close_work(struct work_struct *work);
1514 
rtrs_clt_err_recovery_work(struct work_struct * work)1515 static void rtrs_clt_err_recovery_work(struct work_struct *work)
1516 {
1517 	struct rtrs_clt_path *clt_path;
1518 	struct rtrs_clt_sess *clt;
1519 	int delay_ms;
1520 
1521 	clt_path = container_of(work, struct rtrs_clt_path, err_recovery_work);
1522 	clt = clt_path->clt;
1523 	delay_ms = clt->reconnect_delay_sec * 1000;
1524 	rtrs_clt_stop_and_destroy_conns(clt_path);
1525 	queue_delayed_work(rtrs_wq, &clt_path->reconnect_dwork,
1526 			   msecs_to_jiffies(delay_ms +
1527 					    get_random_u32_below(RTRS_RECONNECT_SEED)));
1528 }
1529 
alloc_path(struct rtrs_clt_sess * clt,const struct rtrs_addr * path,size_t con_num,u32 nr_poll_queues)1530 static struct rtrs_clt_path *alloc_path(struct rtrs_clt_sess *clt,
1531 					const struct rtrs_addr *path,
1532 					size_t con_num, u32 nr_poll_queues)
1533 {
1534 	struct rtrs_clt_path *clt_path;
1535 	int err = -ENOMEM;
1536 	int cpu;
1537 	size_t total_con;
1538 
1539 	clt_path = kzalloc_flex(*clt_path, stats, 1);
1540 	if (!clt_path)
1541 		goto err;
1542 
1543 	/*
1544 	 * irqmode and poll
1545 	 * +1: Extra connection for user messages
1546 	 */
1547 	total_con = con_num + nr_poll_queues + 1;
1548 	clt_path->s.con = kzalloc_objs(*clt_path->s.con, total_con);
1549 	if (!clt_path->s.con)
1550 		goto err_free_path;
1551 
1552 	clt_path->s.con_num = total_con;
1553 	clt_path->s.irq_con_num = con_num + 1;
1554 
1555 	mutex_init(&clt_path->init_mutex);
1556 	uuid_gen(&clt_path->s.uuid);
1557 	memcpy(&clt_path->s.dst_addr, path->dst,
1558 	       rdma_addr_size((struct sockaddr *)path->dst));
1559 
1560 	/*
1561 	 * rdma_resolve_addr() passes src_addr to cma_bind_addr, which
1562 	 * checks the sa_family to be non-zero. If user passed src_addr=NULL
1563 	 * the sess->src_addr will contain only zeros, which is then fine.
1564 	 */
1565 	if (path->src)
1566 		memcpy(&clt_path->s.src_addr, path->src,
1567 		       rdma_addr_size((struct sockaddr *)path->src));
1568 	strscpy(clt_path->s.sessname, clt->sessname,
1569 		sizeof(clt_path->s.sessname));
1570 	clt_path->clt = clt;
1571 	clt_path->max_pages_per_mr = RTRS_MAX_SEGMENTS;
1572 	init_waitqueue_head(&clt_path->state_wq);
1573 	clt_path->state = RTRS_CLT_CONNECTING;
1574 	atomic_set(&clt_path->connected_cnt, 0);
1575 	INIT_WORK(&clt_path->close_work, rtrs_clt_close_work);
1576 	INIT_WORK(&clt_path->err_recovery_work, rtrs_clt_err_recovery_work);
1577 	INIT_DELAYED_WORK(&clt_path->reconnect_dwork, rtrs_clt_reconnect_work);
1578 	rtrs_clt_init_hb(clt_path);
1579 
1580 	clt_path->mp_skip_entry = alloc_percpu(typeof(*clt_path->mp_skip_entry));
1581 	if (!clt_path->mp_skip_entry)
1582 		goto err_free_con;
1583 
1584 	for_each_possible_cpu(cpu)
1585 		INIT_LIST_HEAD(per_cpu_ptr(clt_path->mp_skip_entry, cpu));
1586 
1587 	err = rtrs_clt_init_stats(clt_path->stats);
1588 	if (err)
1589 		goto err_free_percpu;
1590 
1591 	return clt_path;
1592 
1593 err_free_percpu:
1594 	free_percpu(clt_path->mp_skip_entry);
1595 err_free_con:
1596 	kfree(clt_path->s.con);
1597 err_free_path:
1598 	kfree(clt_path);
1599 err:
1600 	return ERR_PTR(err);
1601 }
1602 
free_path(struct rtrs_clt_path * clt_path)1603 void free_path(struct rtrs_clt_path *clt_path)
1604 {
1605 	free_percpu(clt_path->mp_skip_entry);
1606 	mutex_destroy(&clt_path->init_mutex);
1607 	kfree(clt_path->s.con);
1608 	kfree(clt_path->rbufs);
1609 	kfree(clt_path);
1610 }
1611 
create_con(struct rtrs_clt_path * clt_path,unsigned int cid)1612 static int create_con(struct rtrs_clt_path *clt_path, unsigned int cid)
1613 {
1614 	struct rtrs_clt_con *con;
1615 
1616 	con = kzalloc_obj(*con);
1617 	if (!con)
1618 		return -ENOMEM;
1619 
1620 	/* Map first two connections to the first CPU */
1621 	con->cpu  = (cid ? cid - 1 : 0) % nr_cpu_ids;
1622 	con->c.cid = cid;
1623 	con->c.path = &clt_path->s;
1624 	/* Align with srv, init as 1 */
1625 	atomic_set(&con->c.wr_cnt, 1);
1626 	mutex_init(&con->con_mutex);
1627 
1628 	clt_path->s.con[cid] = &con->c;
1629 
1630 	return 0;
1631 }
1632 
destroy_con(struct rtrs_clt_con * con)1633 static void destroy_con(struct rtrs_clt_con *con)
1634 {
1635 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
1636 
1637 	clt_path->s.con[con->c.cid] = NULL;
1638 	mutex_destroy(&con->con_mutex);
1639 	kfree(con);
1640 }
1641 
create_con_cq_qp(struct rtrs_clt_con * con)1642 static int create_con_cq_qp(struct rtrs_clt_con *con)
1643 {
1644 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
1645 	u32 max_send_wr, max_recv_wr, cq_num, max_send_sge, wr_limit;
1646 	int err, cq_vector;
1647 	struct rtrs_msg_rkey_rsp *rsp;
1648 
1649 	lockdep_assert_held(&con->con_mutex);
1650 	if (con->c.cid == 0) {
1651 		max_send_sge = 1;
1652 		/* We must be the first here */
1653 		if (WARN_ON(clt_path->s.dev))
1654 			return -EINVAL;
1655 
1656 		/*
1657 		 * The whole session uses device from user connection.
1658 		 * Be careful not to close user connection before ib dev
1659 		 * is gracefully put.
1660 		 */
1661 		clt_path->s.dev = rtrs_ib_dev_find_or_add(con->c.cm_id->device,
1662 						       &dev_pd);
1663 		if (!clt_path->s.dev) {
1664 			rtrs_wrn(clt_path->clt,
1665 				  "rtrs_ib_dev_find_get_or_add(): no memory\n");
1666 			return -ENOMEM;
1667 		}
1668 		clt_path->s.dev_ref = 1;
1669 		query_fast_reg_mode(clt_path);
1670 		wr_limit = clt_path->s.dev->ib_dev->attrs.max_qp_wr;
1671 		/*
1672 		 * Two (request + registration) completion for send
1673 		 * Two for recv if always_invalidate is set on server
1674 		 * or one for recv.
1675 		 * + 2 for drain and heartbeat
1676 		 * in case qp gets into error state.
1677 		 */
1678 		max_send_wr = min(wr_limit, SERVICE_CON_QUEUE_DEPTH * 2 + 2);
1679 		max_recv_wr = max_send_wr;
1680 	} else {
1681 		/*
1682 		 * Here we assume that session members are correctly set.
1683 		 * This is always true if user connection (cid == 0) is
1684 		 * established first.
1685 		 */
1686 		if (WARN_ON(!clt_path->s.dev))
1687 			return -EINVAL;
1688 		if (WARN_ON(!clt_path->queue_depth))
1689 			return -EINVAL;
1690 
1691 		wr_limit = clt_path->s.dev->ib_dev->attrs.max_qp_wr;
1692 		/* Shared between connections */
1693 		clt_path->s.dev_ref++;
1694 		/* QD * (REQ + RSP + FR REGS or INVS) + drain */
1695 		max_send_wr = min(wr_limit, clt_path->queue_depth * 4 + 1);
1696 		max_recv_wr = min(wr_limit, clt_path->queue_depth * 3 + 1);
1697 		max_send_sge = 2;
1698 	}
1699 	atomic_set(&con->c.sq_wr_avail, max_send_wr);
1700 	cq_num = max_send_wr + max_recv_wr;
1701 	/* alloc iu to recv new rkey reply when server reports flags set */
1702 	if (clt_path->flags & RTRS_MSG_NEW_RKEY_F || con->c.cid == 0) {
1703 		con->rsp_ius = rtrs_iu_alloc(cq_num, sizeof(*rsp),
1704 					      GFP_KERNEL,
1705 					      clt_path->s.dev->ib_dev,
1706 					      DMA_FROM_DEVICE,
1707 					      rtrs_clt_rdma_done);
1708 		if (!con->rsp_ius)
1709 			return -ENOMEM;
1710 		con->queue_num = cq_num;
1711 	}
1712 	cq_vector = con->cpu % clt_path->s.dev->ib_dev->num_comp_vectors;
1713 	if (con->c.cid >= clt_path->s.irq_con_num)
1714 		err = rtrs_cq_qp_create(&clt_path->s, &con->c, max_send_sge,
1715 					cq_vector, cq_num, max_send_wr,
1716 					max_recv_wr, IB_POLL_DIRECT);
1717 	else
1718 		err = rtrs_cq_qp_create(&clt_path->s, &con->c, max_send_sge,
1719 					cq_vector, cq_num, max_send_wr,
1720 					max_recv_wr, IB_POLL_SOFTIRQ);
1721 	/*
1722 	 * In case of error we do not bother to clean previous allocations,
1723 	 * since destroy_con_cq_qp() must be called.
1724 	 */
1725 	return err;
1726 }
1727 
destroy_con_cq_qp(struct rtrs_clt_con * con)1728 static void destroy_con_cq_qp(struct rtrs_clt_con *con)
1729 {
1730 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
1731 
1732 	/*
1733 	 * Be careful here: destroy_con_cq_qp() can be called even
1734 	 * create_con_cq_qp() failed, see comments there.
1735 	 * Caller must set con->destroyed under this lock first so a
1736 	 * racing ADDR_RESOLVED cannot ib_cq_pool_get() after we PUT/SKIP.
1737 	 */
1738 	lockdep_assert_held(&con->con_mutex);
1739 	rtrs_cq_qp_destroy(&con->c);
1740 	if (con->rsp_ius) {
1741 		rtrs_iu_free(con->rsp_ius, clt_path->s.dev->ib_dev,
1742 			     con->queue_num);
1743 		con->rsp_ius = NULL;
1744 		con->queue_num = 0;
1745 	}
1746 	if (clt_path->s.dev_ref && !--clt_path->s.dev_ref) {
1747 		rtrs_ib_dev_put(clt_path->s.dev);
1748 		clt_path->s.dev = NULL;
1749 	}
1750 }
1751 
stop_cm(struct rtrs_clt_con * con)1752 static void stop_cm(struct rtrs_clt_con *con)
1753 {
1754 	rdma_disconnect(con->c.cm_id);
1755 	if (con->c.qp)
1756 		ib_drain_qp(con->c.qp);
1757 }
1758 
destroy_cm(struct rtrs_clt_con * con)1759 static void destroy_cm(struct rtrs_clt_con *con)
1760 {
1761 	rdma_destroy_id(con->c.cm_id);
1762 	con->c.cm_id = NULL;
1763 }
1764 
rtrs_rdma_addr_resolved(struct rtrs_clt_con * con)1765 static int rtrs_rdma_addr_resolved(struct rtrs_clt_con *con)
1766 {
1767 	struct rtrs_path *s = con->c.path;
1768 	int err;
1769 
1770 	mutex_lock(&con->con_mutex);
1771 	if (con->destroyed) {
1772 		mutex_unlock(&con->con_mutex);
1773 		return -ECONNABORTED;
1774 	}
1775 	err = create_con_cq_qp(con);
1776 	mutex_unlock(&con->con_mutex);
1777 	if (err) {
1778 		rtrs_err(s, "create_con_cq_qp(), err: %pe\n", ERR_PTR(err));
1779 		return err;
1780 	}
1781 	err = rdma_resolve_route(con->c.cm_id, RTRS_CONNECT_TIMEOUT_MS);
1782 	if (err)
1783 		rtrs_err(s, "Resolving route failed, err: %pe\n", ERR_PTR(err));
1784 
1785 	return err;
1786 }
1787 
rtrs_rdma_route_resolved(struct rtrs_clt_con * con)1788 static int rtrs_rdma_route_resolved(struct rtrs_clt_con *con)
1789 {
1790 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
1791 	struct rtrs_clt_sess *clt = clt_path->clt;
1792 	struct rtrs_msg_conn_req msg;
1793 	struct rdma_conn_param param;
1794 
1795 	int err;
1796 
1797 	param = (struct rdma_conn_param) {
1798 		.retry_count = 7,
1799 		.rnr_retry_count = 7,
1800 		.private_data = &msg,
1801 		.private_data_len = sizeof(msg),
1802 	};
1803 
1804 	msg = (struct rtrs_msg_conn_req) {
1805 		.magic = cpu_to_le16(RTRS_MAGIC),
1806 		.version = cpu_to_le16(RTRS_PROTO_VER),
1807 		.cid = cpu_to_le16(con->c.cid),
1808 		.cid_num = cpu_to_le16(clt_path->s.con_num),
1809 		.recon_cnt = cpu_to_le16(clt_path->s.recon_cnt),
1810 	};
1811 	msg.first_conn = clt_path->for_new_clt ? FIRST_CONN : 0;
1812 	uuid_copy(&msg.sess_uuid, &clt_path->s.uuid);
1813 	uuid_copy(&msg.paths_uuid, &clt->paths_uuid);
1814 
1815 	err = rdma_connect_locked(con->c.cm_id, &param);
1816 	if (err)
1817 		rtrs_err(clt, "rdma_connect_locked(): %pe\n", ERR_PTR(err));
1818 
1819 	return err;
1820 }
1821 
rtrs_rdma_conn_established(struct rtrs_clt_con * con,struct rdma_cm_event * ev)1822 static int rtrs_rdma_conn_established(struct rtrs_clt_con *con,
1823 				       struct rdma_cm_event *ev)
1824 {
1825 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
1826 	struct rtrs_clt_sess *clt = clt_path->clt;
1827 	const struct rtrs_msg_conn_rsp *msg;
1828 	u16 version, queue_depth;
1829 	int errno;
1830 	u8 len;
1831 
1832 	msg = ev->param.conn.private_data;
1833 	len = ev->param.conn.private_data_len;
1834 	if (len < sizeof(*msg)) {
1835 		rtrs_err(clt, "Invalid RTRS connection response\n");
1836 		return -ECONNRESET;
1837 	}
1838 	if (le16_to_cpu(msg->magic) != RTRS_MAGIC) {
1839 		rtrs_err(clt, "Invalid RTRS magic\n");
1840 		return -ECONNRESET;
1841 	}
1842 	version = le16_to_cpu(msg->version);
1843 	if (version >> 8 != RTRS_PROTO_VER_MAJOR) {
1844 		rtrs_err(clt, "Unsupported major RTRS version: %d, expected %d\n",
1845 			  version >> 8, RTRS_PROTO_VER_MAJOR);
1846 		return -ECONNRESET;
1847 	}
1848 	errno = le16_to_cpu(msg->errno);
1849 	if (errno) {
1850 		rtrs_err(clt, "Invalid RTRS message: errno %pe\n",
1851 			 ERR_PTR(errno));
1852 		return -ECONNRESET;
1853 	}
1854 	if (con->c.cid == 0) {
1855 		queue_depth = le16_to_cpu(msg->queue_depth);
1856 
1857 		if (clt_path->queue_depth > 0 && queue_depth != clt_path->queue_depth) {
1858 			rtrs_err(clt, "Error: queue depth changed\n");
1859 
1860 			/*
1861 			 * Stop any more reconnection attempts
1862 			 */
1863 			clt_path->reconnect_attempts = -1;
1864 			rtrs_err(clt,
1865 				"Disabling auto-reconnect. Trigger a manual reconnect after issue is resolved\n");
1866 			return -ECONNRESET;
1867 		}
1868 
1869 		if (!clt_path->rbufs) {
1870 			clt_path->rbufs = kzalloc_objs(*clt_path->rbufs,
1871 						       queue_depth);
1872 			if (!clt_path->rbufs)
1873 				return -ENOMEM;
1874 		}
1875 		clt_path->queue_depth = queue_depth;
1876 		clt_path->s.signal_interval = min_not_zero(queue_depth,
1877 						(unsigned short) SERVICE_CON_QUEUE_DEPTH);
1878 		clt_path->max_hdr_size = le32_to_cpu(msg->max_hdr_size);
1879 		clt_path->max_io_size = le32_to_cpu(msg->max_io_size);
1880 		clt_path->flags = le32_to_cpu(msg->flags);
1881 		clt_path->chunk_size = clt_path->max_io_size + clt_path->max_hdr_size;
1882 
1883 		/*
1884 		 * Global IO size is always a minimum.
1885 		 * If while a reconnection server sends us a value a bit
1886 		 * higher - client does not care and uses cached minimum.
1887 		 *
1888 		 * Since we can have several sessions (paths) restablishing
1889 		 * connections in parallel, use lock.
1890 		 */
1891 		mutex_lock(&clt->paths_mutex);
1892 		clt->queue_depth = clt_path->queue_depth;
1893 		clt->max_io_size = min_not_zero(clt_path->max_io_size,
1894 						clt->max_io_size);
1895 		mutex_unlock(&clt->paths_mutex);
1896 
1897 		/*
1898 		 * Cache the hca_port and hca_name for sysfs
1899 		 */
1900 		clt_path->hca_port = con->c.cm_id->port_num;
1901 		scnprintf(clt_path->hca_name, sizeof(clt_path->hca_name),
1902 			  clt_path->s.dev->ib_dev->name);
1903 		clt_path->s.src_addr = con->c.cm_id->route.addr.src_addr;
1904 		/* set for_new_clt, to allow future reconnect on any path */
1905 		clt_path->for_new_clt = 1;
1906 	}
1907 
1908 	return 0;
1909 }
1910 
flag_success_on_conn(struct rtrs_clt_con * con)1911 static inline void flag_success_on_conn(struct rtrs_clt_con *con)
1912 {
1913 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
1914 
1915 	atomic_inc(&clt_path->connected_cnt);
1916 	con->cm_err = 1;
1917 }
1918 
rtrs_rdma_conn_rejected(struct rtrs_clt_con * con,struct rdma_cm_event * ev)1919 static int rtrs_rdma_conn_rejected(struct rtrs_clt_con *con,
1920 				    struct rdma_cm_event *ev)
1921 {
1922 	struct rtrs_path *s = con->c.path;
1923 	const struct rtrs_msg_conn_rsp *msg;
1924 	const char *rej_msg;
1925 	int status, errno = -ECONNRESET;
1926 	u8 data_len;
1927 
1928 	status = ev->status;
1929 	rej_msg = rdma_reject_msg(con->c.cm_id, status);
1930 	msg = rdma_consumer_reject_data(con->c.cm_id, ev, &data_len);
1931 
1932 	if (msg && data_len >= sizeof(*msg)) {
1933 		errno = (int16_t)le16_to_cpu(msg->errno);
1934 		if (errno == -EBUSY)
1935 			rtrs_err(s,
1936 				  "Previous session is still exists on the server, please reconnect later\n");
1937 		else
1938 			rtrs_err(s,
1939 				  "Connect rejected: status %d (%s), rtrs errno %pe\n",
1940 				  status, rej_msg, ERR_PTR(errno));
1941 	} else {
1942 		rtrs_err(s,
1943 			  "Connect rejected but with malformed message: status %d (%s)\n",
1944 			  status, rej_msg);
1945 	}
1946 
1947 	return errno;
1948 }
1949 
rtrs_clt_close_conns(struct rtrs_clt_path * clt_path,bool wait)1950 void rtrs_clt_close_conns(struct rtrs_clt_path *clt_path, bool wait)
1951 {
1952 	trace_rtrs_clt_close_conns(clt_path);
1953 
1954 	if (rtrs_clt_change_state_get_old(clt_path, RTRS_CLT_CLOSING, NULL))
1955 		queue_work(rtrs_wq, &clt_path->close_work);
1956 	if (wait)
1957 		flush_work(&clt_path->close_work);
1958 }
1959 
flag_error_on_conn(struct rtrs_clt_con * con,int cm_err)1960 static inline void flag_error_on_conn(struct rtrs_clt_con *con, int cm_err)
1961 {
1962 	if (con->cm_err == 1) {
1963 		struct rtrs_clt_path *clt_path;
1964 
1965 		clt_path = to_clt_path(con->c.path);
1966 		if (atomic_dec_and_test(&clt_path->connected_cnt))
1967 
1968 			wake_up(&clt_path->state_wq);
1969 	}
1970 	con->cm_err = cm_err;
1971 }
1972 
rtrs_clt_rdma_cm_handler(struct rdma_cm_id * cm_id,struct rdma_cm_event * ev)1973 static int rtrs_clt_rdma_cm_handler(struct rdma_cm_id *cm_id,
1974 				     struct rdma_cm_event *ev)
1975 {
1976 	struct rtrs_clt_con *con = cm_id->context;
1977 	struct rtrs_path *s = con->c.path;
1978 	struct rtrs_clt_path *clt_path = to_clt_path(s);
1979 	int cm_err = 0;
1980 
1981 	switch (ev->event) {
1982 	case RDMA_CM_EVENT_ADDR_RESOLVED:
1983 		cm_err = rtrs_rdma_addr_resolved(con);
1984 		break;
1985 	case RDMA_CM_EVENT_ROUTE_RESOLVED:
1986 		cm_err = rtrs_rdma_route_resolved(con);
1987 		break;
1988 	case RDMA_CM_EVENT_ESTABLISHED:
1989 		cm_err = rtrs_rdma_conn_established(con, ev);
1990 		if (!cm_err) {
1991 			/*
1992 			 * Report success and wake up. Here we abuse state_wq,
1993 			 * i.e. wake up without state change, but we set cm_err.
1994 			 */
1995 			flag_success_on_conn(con);
1996 			wake_up(&clt_path->state_wq);
1997 			return 0;
1998 		}
1999 		break;
2000 	case RDMA_CM_EVENT_REJECTED:
2001 		cm_err = rtrs_rdma_conn_rejected(con, ev);
2002 		break;
2003 	case RDMA_CM_EVENT_DISCONNECTED:
2004 		/* No message for disconnecting */
2005 		cm_err = -ECONNRESET;
2006 		break;
2007 	case RDMA_CM_EVENT_CONNECT_ERROR:
2008 	case RDMA_CM_EVENT_UNREACHABLE:
2009 	case RDMA_CM_EVENT_ADDR_CHANGE:
2010 	case RDMA_CM_EVENT_TIMEWAIT_EXIT:
2011 		if (ev->status < 0) {
2012 			rtrs_wrn(s, "CM error (CM event: %s, err: %pe)\n",
2013 				rdma_event_msg(ev->event), ERR_PTR(ev->status));
2014 		} else if (ev->status > 0) {
2015 			rtrs_wrn(s, "CM error (CM event: %s, err: %s)\n",
2016 				rdma_event_msg(ev->event),
2017 				rdma_reject_msg(cm_id, ev->status));
2018 		}
2019 		cm_err = -ECONNRESET;
2020 		break;
2021 	case RDMA_CM_EVENT_ADDR_ERROR:
2022 	case RDMA_CM_EVENT_ROUTE_ERROR:
2023 		if (ev->status < 0) {
2024 			rtrs_wrn(s, "CM error (CM event: %s, err: %pe)\n",
2025 				rdma_event_msg(ev->event),
2026 				ERR_PTR(ev->status));
2027 		} else if (ev->status > 0) {
2028 			rtrs_wrn(s, "CM error (CM event: %s, err: %s)\n",
2029 				rdma_event_msg(ev->event),
2030 				rdma_reject_msg(cm_id, ev->status));
2031 		}
2032 		cm_err = -EHOSTUNREACH;
2033 		break;
2034 	case RDMA_CM_EVENT_DEVICE_REMOVAL:
2035 		/*
2036 		 * Device removal is a special case.  Queue close and return 0.
2037 		 */
2038 		if (ev->status < 0) {
2039 			rtrs_wrn_rl(s, "CM event: %s, status: %pe\n",
2040 					rdma_event_msg(ev->event),
2041 					ERR_PTR(ev->status));
2042 		} else if (ev->status > 0) {
2043 			rtrs_wrn_rl(s, "CM event: %s, status: %s\n",
2044 					rdma_event_msg(ev->event),
2045 					rdma_reject_msg(cm_id, ev->status));
2046 		}
2047 		rtrs_clt_close_conns(clt_path, false);
2048 		return 0;
2049 	default:
2050 		if (ev->status < 0) {
2051 			rtrs_err(s, "Unexpected RDMA CM error (CM event: %s, err: %pe)\n",
2052 				rdma_event_msg(ev->event), ERR_PTR(ev->status));
2053 		} else if (ev->status > 0) {
2054 			rtrs_err(s, "Unexpected RDMA CM error (CM event: %s, err: %s)\n",
2055 				rdma_event_msg(ev->event),
2056 				rdma_reject_msg(cm_id, ev->status));
2057 		}
2058 		cm_err = -ECONNRESET;
2059 		break;
2060 	}
2061 
2062 	if (cm_err) {
2063 		/*
2064 		 * cm error makes sense only on connection establishing,
2065 		 * in other cases we rely on normal procedure of reconnecting.
2066 		 */
2067 		flag_error_on_conn(con, cm_err);
2068 		rtrs_rdma_error_recovery(con);
2069 	}
2070 
2071 	return 0;
2072 }
2073 
2074 /* The caller should do the cleanup in case of error */
create_cm(struct rtrs_clt_con * con)2075 static int create_cm(struct rtrs_clt_con *con)
2076 {
2077 	struct rtrs_path *s = con->c.path;
2078 	struct rtrs_clt_path *clt_path = to_clt_path(s);
2079 	struct rdma_cm_id *cm_id;
2080 	int err;
2081 
2082 	cm_id = rdma_create_id(&init_net, rtrs_clt_rdma_cm_handler, con,
2083 			       clt_path->s.dst_addr.ss_family == AF_IB ?
2084 			       RDMA_PS_IB : RDMA_PS_TCP, IB_QPT_RC);
2085 	if (IS_ERR(cm_id)) {
2086 		rtrs_err(s, "Failed to create CM ID, err: %pe\n", cm_id);
2087 		return PTR_ERR(cm_id);
2088 	}
2089 	con->c.cm_id = cm_id;
2090 	con->cm_err = 0;
2091 	/* allow the port to be reused */
2092 	err = rdma_set_reuseaddr(cm_id, 1);
2093 	if (err != 0) {
2094 		rtrs_err(s, "Set address reuse failed, err: %pe\n", ERR_PTR(err));
2095 		return err;
2096 	}
2097 	err = rdma_resolve_addr(cm_id, (struct sockaddr *)&clt_path->s.src_addr,
2098 				(struct sockaddr *)&clt_path->s.dst_addr,
2099 				RTRS_CONNECT_TIMEOUT_MS);
2100 	if (err) {
2101 		rtrs_err(s, "Failed to resolve address, err: %pe\n", ERR_PTR(err));
2102 		return err;
2103 	}
2104 	/*
2105 	 * Combine connection status and session events. This is needed
2106 	 * for waiting two possible cases: cm_err has something meaningful
2107 	 * or session state was really changed to error by device removal.
2108 	 */
2109 	err = wait_event_interruptible_timeout(
2110 			clt_path->state_wq,
2111 			con->cm_err || clt_path->state != RTRS_CLT_CONNECTING,
2112 			msecs_to_jiffies(RTRS_CONNECT_TIMEOUT_MS));
2113 	if (err == 0 || err == -ERESTARTSYS) {
2114 		if (err == 0)
2115 			err = -ETIMEDOUT;
2116 		/* Timedout or interrupted */
2117 		return err;
2118 	}
2119 	if (con->cm_err < 0)
2120 		return con->cm_err;
2121 	if (READ_ONCE(clt_path->state) != RTRS_CLT_CONNECTING)
2122 		/* Device removal */
2123 		return -ECONNABORTED;
2124 
2125 	return 0;
2126 }
2127 
rtrs_clt_path_up(struct rtrs_clt_path * clt_path)2128 static void rtrs_clt_path_up(struct rtrs_clt_path *clt_path)
2129 {
2130 	struct rtrs_clt_sess *clt = clt_path->clt;
2131 	int up;
2132 
2133 	/*
2134 	 * We can fire RECONNECTED event only when all paths were
2135 	 * connected on rtrs_clt_open(), then each was disconnected
2136 	 * and the first one connected again.  That's why this nasty
2137 	 * game with counter value.
2138 	 */
2139 
2140 	mutex_lock(&clt->paths_ev_mutex);
2141 	up = ++clt->paths_up;
2142 	/*
2143 	 * Here it is safe to access paths num directly since up counter
2144 	 * is greater than MAX_PATHS_NUM only while rtrs_clt_open() is
2145 	 * in progress, thus paths removals are impossible.
2146 	 */
2147 	if (up > MAX_PATHS_NUM && up == MAX_PATHS_NUM + clt->paths_num)
2148 		clt->paths_up = clt->paths_num;
2149 	else if (up == 1)
2150 		clt->link_ev(clt->priv, RTRS_CLT_LINK_EV_RECONNECTED);
2151 	mutex_unlock(&clt->paths_ev_mutex);
2152 
2153 	/* Mark session as established */
2154 	clt_path->established = true;
2155 	clt_path->reconnect_attempts = 0;
2156 	clt_path->stats->reconnects.successful_cnt++;
2157 }
2158 
rtrs_clt_path_down(struct rtrs_clt_path * clt_path)2159 static void rtrs_clt_path_down(struct rtrs_clt_path *clt_path)
2160 {
2161 	struct rtrs_clt_sess *clt = clt_path->clt;
2162 
2163 	if (!clt_path->established)
2164 		return;
2165 
2166 	clt_path->established = false;
2167 	mutex_lock(&clt->paths_ev_mutex);
2168 	WARN_ON(!clt->paths_up);
2169 	if (--clt->paths_up == 0)
2170 		clt->link_ev(clt->priv, RTRS_CLT_LINK_EV_DISCONNECTED);
2171 	mutex_unlock(&clt->paths_ev_mutex);
2172 }
2173 
rtrs_clt_stop_and_destroy_conns(struct rtrs_clt_path * clt_path)2174 static void rtrs_clt_stop_and_destroy_conns(struct rtrs_clt_path *clt_path)
2175 {
2176 	struct rtrs_clt_con *con;
2177 	unsigned int cid;
2178 
2179 	WARN_ON(READ_ONCE(clt_path->state) == RTRS_CLT_CONNECTED);
2180 
2181 	/*
2182 	 * Possible race with rtrs_clt_open(), when DEVICE_REMOVAL comes
2183 	 * exactly in between.  Start destroying after it finishes.
2184 	 */
2185 	mutex_lock(&clt_path->init_mutex);
2186 	mutex_unlock(&clt_path->init_mutex);
2187 
2188 	/*
2189 	 * All IO paths must observe !CONNECTED state before we
2190 	 * free everything.
2191 	 */
2192 	synchronize_rcu();
2193 
2194 	rtrs_stop_hb(&clt_path->s);
2195 
2196 	/*
2197 	 * The order it utterly crucial: firstly disconnect and complete all
2198 	 * rdma requests with error (thus set in_use=false for requests),
2199 	 * then fail outstanding requests checking in_use for each, and
2200 	 * eventually notify upper layer about session disconnection.
2201 	 */
2202 
2203 	for (cid = 0; cid < clt_path->s.con_num; cid++) {
2204 		if (!clt_path->s.con[cid])
2205 			break;
2206 		con = to_clt_con(clt_path->s.con[cid]);
2207 		stop_cm(con);
2208 	}
2209 	fail_all_outstanding_reqs(clt_path);
2210 	free_path_reqs(clt_path);
2211 	rtrs_clt_path_down(clt_path);
2212 
2213 	/*
2214 	 * Wait for graceful shutdown, namely when peer side invokes
2215 	 * rdma_disconnect(). 'connected_cnt' is decremented only on
2216 	 * CM events, thus if other side had crashed and hb has detected
2217 	 * something is wrong, here we will stuck for exactly timeout ms,
2218 	 * since CM does not fire anything.  That is fine, we are not in
2219 	 * hurry.
2220 	 */
2221 	wait_event_timeout(clt_path->state_wq,
2222 			   !atomic_read(&clt_path->connected_cnt),
2223 			   msecs_to_jiffies(RTRS_CONNECT_TIMEOUT_MS));
2224 
2225 	for (cid = 0; cid < clt_path->s.con_num; cid++) {
2226 		if (!clt_path->s.con[cid])
2227 			break;
2228 		con = to_clt_con(clt_path->s.con[cid]);
2229 		mutex_lock(&con->con_mutex);
2230 		con->destroyed = true;
2231 		destroy_con_cq_qp(con);
2232 		mutex_unlock(&con->con_mutex);
2233 		destroy_cm(con);
2234 		destroy_con(con);
2235 	}
2236 }
2237 
rtrs_clt_remove_path_from_arr(struct rtrs_clt_path * clt_path)2238 static void rtrs_clt_remove_path_from_arr(struct rtrs_clt_path *clt_path)
2239 {
2240 	struct rtrs_clt_sess *clt = clt_path->clt;
2241 	struct rtrs_clt_path *next;
2242 	bool wait_for_grace = false;
2243 	int cpu;
2244 
2245 	mutex_lock(&clt->paths_mutex);
2246 	list_del_rcu(&clt_path->s.entry);
2247 
2248 	/* Make sure everybody observes path removal. */
2249 	synchronize_rcu();
2250 
2251 	/*
2252 	 * At this point nobody sees @sess in the list, but still we have
2253 	 * dangling pointer @pcpu_path which _can_ point to @sess.  Since
2254 	 * nobody can observe @sess in the list, we guarantee that IO path
2255 	 * will not assign @sess to @pcpu_path, i.e. @pcpu_path can be equal
2256 	 * to @sess, but can never again become @sess.
2257 	 */
2258 
2259 	/*
2260 	 * Decrement paths number only after grace period, because
2261 	 * caller of do_each_path() must firstly observe list without
2262 	 * path and only then decremented paths number.
2263 	 *
2264 	 * Otherwise there can be the following situation:
2265 	 *    o Two paths exist and IO is coming.
2266 	 *    o One path is removed:
2267 	 *      CPU#0                          CPU#1
2268 	 *      do_each_path():                rtrs_clt_remove_path_from_arr():
2269 	 *          path = get_next_path()
2270 	 *          ^^^                            list_del_rcu(path)
2271 	 *          [!CONNECTED path]              clt->paths_num--
2272 	 *                                              ^^^^^^^^^
2273 	 *          load clt->paths_num                 from 2 to 1
2274 	 *                    ^^^^^^^^^
2275 	 *                    sees 1
2276 	 *
2277 	 *      path is observed as !CONNECTED, but do_each_path() loop
2278 	 *      ends, because expression i < clt->paths_num is false.
2279 	 */
2280 	clt->paths_num--;
2281 
2282 	/*
2283 	 * Get @next connection from current @sess which is going to be
2284 	 * removed.  If @sess is the last element, then @next is NULL.
2285 	 */
2286 	rcu_read_lock();
2287 	next = rtrs_clt_get_next_path_or_null(&clt->paths_list, clt_path);
2288 	rcu_read_unlock();
2289 
2290 	/*
2291 	 * @pcpu paths can still point to the path which is going to be
2292 	 * removed, so change the pointer manually.
2293 	 */
2294 	for_each_possible_cpu(cpu) {
2295 		struct rtrs_clt_path __rcu **ppcpu_path;
2296 
2297 		ppcpu_path = per_cpu_ptr(clt->pcpu_path, cpu);
2298 		if (rcu_dereference_protected(*ppcpu_path,
2299 			lockdep_is_held(&clt->paths_mutex)) != clt_path)
2300 			/*
2301 			 * synchronize_rcu() was called just after deleting
2302 			 * entry from the list, thus IO code path cannot
2303 			 * change pointer back to the pointer which is going
2304 			 * to be removed, we are safe here.
2305 			 */
2306 			continue;
2307 
2308 		/*
2309 		 * We race with IO code path, which also changes pointer,
2310 		 * thus we have to be careful not to overwrite it.
2311 		 */
2312 		if (try_cmpxchg((struct rtrs_clt_path **)ppcpu_path, &clt_path,
2313 				next))
2314 			/*
2315 			 * @ppcpu_path was successfully replaced with @next,
2316 			 * that means that someone could also pick up the
2317 			 * @sess and dereferencing it right now, so wait for
2318 			 * a grace period is required.
2319 			 */
2320 			wait_for_grace = true;
2321 	}
2322 	if (wait_for_grace)
2323 		synchronize_rcu();
2324 
2325 	mutex_unlock(&clt->paths_mutex);
2326 }
2327 
rtrs_clt_add_path_to_arr(struct rtrs_clt_path * clt_path)2328 static void rtrs_clt_add_path_to_arr(struct rtrs_clt_path *clt_path)
2329 {
2330 	struct rtrs_clt_sess *clt = clt_path->clt;
2331 
2332 	mutex_lock(&clt->paths_mutex);
2333 	clt->paths_num++;
2334 
2335 	list_add_tail_rcu(&clt_path->s.entry, &clt->paths_list);
2336 	mutex_unlock(&clt->paths_mutex);
2337 }
2338 
rtrs_clt_close_work(struct work_struct * work)2339 static void rtrs_clt_close_work(struct work_struct *work)
2340 {
2341 	struct rtrs_clt_path *clt_path;
2342 
2343 	clt_path = container_of(work, struct rtrs_clt_path, close_work);
2344 
2345 	cancel_work_sync(&clt_path->err_recovery_work);
2346 	cancel_delayed_work_sync(&clt_path->reconnect_dwork);
2347 	rtrs_clt_stop_and_destroy_conns(clt_path);
2348 	rtrs_clt_change_state_get_old(clt_path, RTRS_CLT_CLOSED, NULL);
2349 }
2350 
init_conns(struct rtrs_clt_path * clt_path)2351 static int init_conns(struct rtrs_clt_path *clt_path)
2352 {
2353 	unsigned int cid;
2354 	int err, i;
2355 
2356 	/*
2357 	 * On every new session connections increase reconnect counter
2358 	 * to avoid clashes with previous sessions not yet closed
2359 	 * sessions on a server side.
2360 	 */
2361 	clt_path->s.recon_cnt++;
2362 
2363 	/* Establish all RDMA connections  */
2364 	for (cid = 0; cid < clt_path->s.con_num; cid++) {
2365 		err = create_con(clt_path, cid);
2366 		if (err)
2367 			goto destroy;
2368 
2369 		err = create_cm(to_clt_con(clt_path->s.con[cid]));
2370 		if (err)
2371 			goto destroy;
2372 	}
2373 
2374 	/*
2375 	 * Set the cid to con_num - 1, since if we fail later, we want to stay in bounds.
2376 	 */
2377 	cid = clt_path->s.con_num - 1;
2378 
2379 	err = alloc_path_reqs(clt_path);
2380 	if (err)
2381 		goto destroy;
2382 
2383 	return 0;
2384 
2385 destroy:
2386 	/* Make sure we do the cleanup in the order they are created */
2387 	for (i = 0; i <= cid; i++) {
2388 		struct rtrs_clt_con *con;
2389 
2390 		if (!clt_path->s.con[i])
2391 			break;
2392 
2393 		con = to_clt_con(clt_path->s.con[i]);
2394 		if (con->c.cm_id) {
2395 			stop_cm(con);
2396 			mutex_lock(&con->con_mutex);
2397 			con->destroyed = true;
2398 			destroy_con_cq_qp(con);
2399 			mutex_unlock(&con->con_mutex);
2400 			destroy_cm(con);
2401 		}
2402 		destroy_con(con);
2403 	}
2404 	/*
2405 	 * If we've never taken async path and got an error, say,
2406 	 * doing rdma_resolve_addr(), switch to CONNECTION_ERR state
2407 	 * manually to keep reconnecting.
2408 	 */
2409 	rtrs_clt_change_state_get_old(clt_path, RTRS_CLT_CONNECTING_ERR, NULL);
2410 
2411 	return err;
2412 }
2413 
rtrs_clt_info_req_done(struct ib_cq * cq,struct ib_wc * wc)2414 static void rtrs_clt_info_req_done(struct ib_cq *cq, struct ib_wc *wc)
2415 {
2416 	struct rtrs_clt_con *con = to_clt_con(wc->qp->qp_context);
2417 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
2418 	struct rtrs_iu *iu;
2419 
2420 	iu = container_of(wc->wr_cqe, struct rtrs_iu, cqe);
2421 	rtrs_iu_free(iu, clt_path->s.dev->ib_dev, 1);
2422 
2423 	if (wc->status != IB_WC_SUCCESS) {
2424 		rtrs_err(clt_path->clt, "Path info request send failed: %s\n",
2425 			  ib_wc_status_msg(wc->status));
2426 		rtrs_clt_change_state_get_old(clt_path, RTRS_CLT_CONNECTING_ERR, NULL);
2427 		return;
2428 	}
2429 
2430 	rtrs_clt_update_wc_stats(con);
2431 }
2432 
process_info_rsp(struct rtrs_clt_path * clt_path,const struct rtrs_msg_info_rsp * msg)2433 static int process_info_rsp(struct rtrs_clt_path *clt_path,
2434 			    const struct rtrs_msg_info_rsp *msg)
2435 {
2436 	unsigned int sg_cnt, total_len;
2437 	int i, sgi;
2438 
2439 	sg_cnt = le16_to_cpu(msg->sg_cnt);
2440 	if (!sg_cnt || (clt_path->queue_depth % sg_cnt)) {
2441 		rtrs_err(clt_path->clt,
2442 			  "Incorrect sg_cnt %d, is not multiple\n",
2443 			  sg_cnt);
2444 		return -EINVAL;
2445 	}
2446 
2447 	/*
2448 	 * Check if IB immediate data size is enough to hold the mem_id and
2449 	 * the offset inside the memory chunk.
2450 	 */
2451 	if ((ilog2(sg_cnt - 1) + 1) + (ilog2(clt_path->chunk_size - 1) + 1) >
2452 	    MAX_IMM_PAYL_BITS) {
2453 		rtrs_err(clt_path->clt,
2454 			  "RDMA immediate size (%db) not enough to encode %d buffers of size %dB\n",
2455 			  MAX_IMM_PAYL_BITS, sg_cnt, clt_path->chunk_size);
2456 		return -EINVAL;
2457 	}
2458 	total_len = 0;
2459 	for (sgi = 0, i = 0; sgi < sg_cnt && i < clt_path->queue_depth; sgi++) {
2460 		const struct rtrs_sg_desc *desc = &msg->desc[sgi];
2461 		u32 len, rkey;
2462 		u64 addr;
2463 
2464 		addr = le64_to_cpu(desc->addr);
2465 		rkey = le32_to_cpu(desc->key);
2466 		len  = le32_to_cpu(desc->len);
2467 
2468 		total_len += len;
2469 
2470 		if (!len || (len % clt_path->chunk_size)) {
2471 			rtrs_err(clt_path->clt, "Incorrect [%d].len %d\n",
2472 				  sgi,
2473 				  len);
2474 			return -EINVAL;
2475 		}
2476 		for ( ; len && i < clt_path->queue_depth; i++) {
2477 			clt_path->rbufs[i].addr = addr;
2478 			clt_path->rbufs[i].rkey = rkey;
2479 
2480 			len  -= clt_path->chunk_size;
2481 			addr += clt_path->chunk_size;
2482 		}
2483 	}
2484 	/* Sanity check */
2485 	if (sgi != sg_cnt || i != clt_path->queue_depth) {
2486 		rtrs_err(clt_path->clt,
2487 			 "Incorrect sg vector, not fully mapped\n");
2488 		return -EINVAL;
2489 	}
2490 	if (total_len != clt_path->chunk_size * clt_path->queue_depth) {
2491 		rtrs_err(clt_path->clt, "Incorrect total_len %d\n", total_len);
2492 		return -EINVAL;
2493 	}
2494 
2495 	return 0;
2496 }
2497 
rtrs_clt_info_rsp_done(struct ib_cq * cq,struct ib_wc * wc)2498 static void rtrs_clt_info_rsp_done(struct ib_cq *cq, struct ib_wc *wc)
2499 {
2500 	struct rtrs_clt_con *con = to_clt_con(wc->qp->qp_context);
2501 	struct rtrs_clt_path *clt_path = to_clt_path(con->c.path);
2502 	struct rtrs_msg_info_rsp *msg;
2503 	enum rtrs_clt_state state;
2504 	struct rtrs_iu *iu;
2505 	size_t rx_sz;
2506 	int err;
2507 
2508 	state = RTRS_CLT_CONNECTING_ERR;
2509 
2510 	WARN_ON(con->c.cid);
2511 	iu = container_of(wc->wr_cqe, struct rtrs_iu, cqe);
2512 	if (wc->status != IB_WC_SUCCESS) {
2513 		rtrs_err(clt_path->clt, "Path info response recv failed: %s\n",
2514 			  ib_wc_status_msg(wc->status));
2515 		goto out;
2516 	}
2517 	WARN_ON(wc->opcode != IB_WC_RECV);
2518 
2519 	if (wc->byte_len < sizeof(*msg)) {
2520 		rtrs_err(clt_path->clt, "Path info response is malformed: size %d\n",
2521 			  wc->byte_len);
2522 		goto out;
2523 	}
2524 	ib_dma_sync_single_for_cpu(clt_path->s.dev->ib_dev, iu->dma_addr,
2525 				   iu->size, DMA_FROM_DEVICE);
2526 	msg = iu->buf;
2527 	if (le16_to_cpu(msg->type) != RTRS_MSG_INFO_RSP) {
2528 		rtrs_err(clt_path->clt, "Path info response is malformed: type %d\n",
2529 			  le16_to_cpu(msg->type));
2530 		goto out;
2531 	}
2532 	rx_sz  = sizeof(*msg);
2533 	rx_sz += sizeof(msg->desc[0]) * le16_to_cpu(msg->sg_cnt);
2534 	if (wc->byte_len < rx_sz) {
2535 		rtrs_err(clt_path->clt, "Path info response is malformed: size %d\n",
2536 			  wc->byte_len);
2537 		goto out;
2538 	}
2539 	err = process_info_rsp(clt_path, msg);
2540 	if (err)
2541 		goto out;
2542 
2543 	err = post_recv_path(clt_path);
2544 	if (err)
2545 		goto out;
2546 
2547 	state = RTRS_CLT_CONNECTED;
2548 
2549 out:
2550 	rtrs_clt_update_wc_stats(con);
2551 	rtrs_iu_free(iu, clt_path->s.dev->ib_dev, 1);
2552 	rtrs_clt_change_state_get_old(clt_path, state, NULL);
2553 }
2554 
rtrs_send_path_info(struct rtrs_clt_path * clt_path)2555 static int rtrs_send_path_info(struct rtrs_clt_path *clt_path)
2556 {
2557 	struct rtrs_clt_con *usr_con = to_clt_con(clt_path->s.con[0]);
2558 	struct rtrs_msg_info_req *msg;
2559 	struct rtrs_iu *tx_iu, *rx_iu;
2560 	size_t rx_sz;
2561 	int err;
2562 
2563 	rx_sz  = sizeof(struct rtrs_msg_info_rsp);
2564 	rx_sz += sizeof(struct rtrs_sg_desc) * clt_path->queue_depth;
2565 
2566 	tx_iu = rtrs_iu_alloc(1, sizeof(struct rtrs_msg_info_req), GFP_KERNEL,
2567 			       clt_path->s.dev->ib_dev, DMA_TO_DEVICE,
2568 			       rtrs_clt_info_req_done);
2569 	rx_iu = rtrs_iu_alloc(1, rx_sz, GFP_KERNEL, clt_path->s.dev->ib_dev,
2570 			       DMA_FROM_DEVICE, rtrs_clt_info_rsp_done);
2571 	if (!tx_iu || !rx_iu) {
2572 		err = -ENOMEM;
2573 		goto out;
2574 	}
2575 	/* Prepare for getting info response */
2576 	err = rtrs_iu_post_recv(&usr_con->c, rx_iu);
2577 	if (err) {
2578 		rtrs_err(clt_path->clt, "rtrs_iu_post_recv(), err: %pe\n", ERR_PTR(err));
2579 		goto out;
2580 	}
2581 	rx_iu = NULL;
2582 
2583 	msg = tx_iu->buf;
2584 	msg->type = cpu_to_le16(RTRS_MSG_INFO_REQ);
2585 	memcpy(msg->pathname, clt_path->s.sessname, sizeof(msg->pathname));
2586 
2587 	ib_dma_sync_single_for_device(clt_path->s.dev->ib_dev,
2588 				      tx_iu->dma_addr,
2589 				      tx_iu->size, DMA_TO_DEVICE);
2590 
2591 	/* Send info request */
2592 	err = rtrs_iu_post_send(&usr_con->c, tx_iu, sizeof(*msg), NULL);
2593 	if (err) {
2594 		rtrs_err(clt_path->clt, "rtrs_iu_post_send(), err: %pe\n", ERR_PTR(err));
2595 		goto out;
2596 	}
2597 	tx_iu = NULL;
2598 
2599 	/* Wait for state change */
2600 	wait_event_interruptible_timeout(clt_path->state_wq,
2601 					 clt_path->state != RTRS_CLT_CONNECTING,
2602 					 msecs_to_jiffies(
2603 						 RTRS_CONNECT_TIMEOUT_MS));
2604 	if (READ_ONCE(clt_path->state) != RTRS_CLT_CONNECTED) {
2605 		if (READ_ONCE(clt_path->state) == RTRS_CLT_CONNECTING_ERR)
2606 			err = -ECONNRESET;
2607 		else
2608 			err = -ETIMEDOUT;
2609 	}
2610 
2611 out:
2612 	if (tx_iu)
2613 		rtrs_iu_free(tx_iu, clt_path->s.dev->ib_dev, 1);
2614 	if (rx_iu)
2615 		rtrs_iu_free(rx_iu, clt_path->s.dev->ib_dev, 1);
2616 	if (err)
2617 		/* If we've never taken async path because of malloc problems */
2618 		rtrs_clt_change_state_get_old(clt_path,
2619 					      RTRS_CLT_CONNECTING_ERR, NULL);
2620 
2621 	return err;
2622 }
2623 
2624 /**
2625  * init_path() - establishes all path connections and does handshake
2626  * @clt_path: client path.
2627  * In case of error full close or reconnect procedure should be taken,
2628  * because reconnect or close async works can be started.
2629  */
init_path(struct rtrs_clt_path * clt_path)2630 static int init_path(struct rtrs_clt_path *clt_path)
2631 {
2632 	int err;
2633 	char str[NAME_MAX];
2634 	struct rtrs_addr path = {
2635 		.src = &clt_path->s.src_addr,
2636 		.dst = &clt_path->s.dst_addr,
2637 	};
2638 
2639 	rtrs_addr_to_str(&path, str, sizeof(str));
2640 
2641 	mutex_lock(&clt_path->init_mutex);
2642 	err = init_conns(clt_path);
2643 	if (err) {
2644 		rtrs_err(clt_path->clt,
2645 			 "init_conns() failed: err=%pe path=%s [%s:%u]\n",
2646 			 ERR_PTR(err), str, clt_path->hca_name, clt_path->hca_port);
2647 		goto out;
2648 	}
2649 	err = rtrs_send_path_info(clt_path);
2650 	if (err) {
2651 		rtrs_err(clt_path->clt,
2652 			 "rtrs_send_path_info() failed: err=%pe path=%s [%s:%u]\n",
2653 			 ERR_PTR(err), str, clt_path->hca_name, clt_path->hca_port);
2654 		goto out;
2655 	}
2656 	rtrs_clt_path_up(clt_path);
2657 	rtrs_start_hb(&clt_path->s);
2658 out:
2659 	mutex_unlock(&clt_path->init_mutex);
2660 
2661 	return err;
2662 }
2663 
rtrs_clt_reconnect_work(struct work_struct * work)2664 static void rtrs_clt_reconnect_work(struct work_struct *work)
2665 {
2666 	struct rtrs_clt_path *clt_path;
2667 	struct rtrs_clt_sess *clt;
2668 	int err;
2669 
2670 	clt_path = container_of(to_delayed_work(work), struct rtrs_clt_path,
2671 				reconnect_dwork);
2672 	clt = clt_path->clt;
2673 
2674 	trace_rtrs_clt_reconnect_work(clt_path);
2675 
2676 	if (READ_ONCE(clt_path->state) != RTRS_CLT_RECONNECTING)
2677 		return;
2678 
2679 	if (clt_path->reconnect_attempts >= clt->max_reconnect_attempts) {
2680 		/* Close a path completely if max attempts is reached */
2681 		rtrs_clt_close_conns(clt_path, false);
2682 		return;
2683 	}
2684 	clt_path->reconnect_attempts++;
2685 
2686 	msleep(RTRS_RECONNECT_BACKOFF);
2687 	if (rtrs_clt_change_state_get_old(clt_path, RTRS_CLT_CONNECTING, NULL)) {
2688 		err = init_path(clt_path);
2689 		if (err)
2690 			goto reconnect_again;
2691 	}
2692 
2693 	return;
2694 
2695 reconnect_again:
2696 	if (rtrs_clt_change_state_get_old(clt_path, RTRS_CLT_RECONNECTING, NULL)) {
2697 		clt_path->stats->reconnects.fail_cnt++;
2698 		queue_work(rtrs_wq, &clt_path->err_recovery_work);
2699 	}
2700 }
2701 
rtrs_clt_dev_release(struct device * dev)2702 static void rtrs_clt_dev_release(struct device *dev)
2703 {
2704 	struct rtrs_clt_sess *clt = container_of(dev, struct rtrs_clt_sess,
2705 						 dev);
2706 
2707 	mutex_destroy(&clt->paths_ev_mutex);
2708 	mutex_destroy(&clt->paths_mutex);
2709 	kfree(clt);
2710 }
2711 
alloc_clt(const char * sessname,size_t paths_num,u16 port,size_t pdu_sz,void * priv,void (* link_ev)(void * priv,enum rtrs_clt_link_ev ev),unsigned int reconnect_delay_sec,unsigned int max_reconnect_attempts)2712 static struct rtrs_clt_sess *alloc_clt(const char *sessname, size_t paths_num,
2713 				  u16 port, size_t pdu_sz, void *priv,
2714 				  void	(*link_ev)(void *priv,
2715 						   enum rtrs_clt_link_ev ev),
2716 				  unsigned int reconnect_delay_sec,
2717 				  unsigned int max_reconnect_attempts)
2718 {
2719 	struct rtrs_clt_sess *clt;
2720 	int err;
2721 
2722 	if (!paths_num || paths_num > MAX_PATHS_NUM)
2723 		return ERR_PTR(-EINVAL);
2724 
2725 	if (strlen(sessname) >= sizeof(clt->sessname))
2726 		return ERR_PTR(-EINVAL);
2727 
2728 	clt = kzalloc_obj(*clt);
2729 	if (!clt)
2730 		return ERR_PTR(-ENOMEM);
2731 
2732 	clt->pcpu_path = alloc_percpu(typeof(*clt->pcpu_path));
2733 	if (!clt->pcpu_path) {
2734 		kfree(clt);
2735 		return ERR_PTR(-ENOMEM);
2736 	}
2737 
2738 	clt->dev.class = &rtrs_clt_dev_class;
2739 	clt->dev.release = rtrs_clt_dev_release;
2740 	uuid_gen(&clt->paths_uuid);
2741 	INIT_LIST_HEAD_RCU(&clt->paths_list);
2742 	clt->paths_num = paths_num;
2743 	clt->paths_up = MAX_PATHS_NUM;
2744 	clt->port = port;
2745 	clt->pdu_sz = pdu_sz;
2746 	clt->max_segments = RTRS_MAX_SEGMENTS;
2747 	clt->reconnect_delay_sec = reconnect_delay_sec;
2748 	clt->max_reconnect_attempts = max_reconnect_attempts;
2749 	clt->priv = priv;
2750 	clt->link_ev = link_ev;
2751 	clt->mp_policy = MP_POLICY_MIN_INFLIGHT;
2752 	strscpy(clt->sessname, sessname, sizeof(clt->sessname));
2753 	init_waitqueue_head(&clt->permits_wait);
2754 	mutex_init(&clt->paths_ev_mutex);
2755 	mutex_init(&clt->paths_mutex);
2756 	device_initialize(&clt->dev);
2757 
2758 	err = dev_set_name(&clt->dev, "%s", sessname);
2759 	if (err)
2760 		goto err_put;
2761 
2762 	/*
2763 	 * Suppress user space notification until
2764 	 * sysfs files are created
2765 	 */
2766 	dev_set_uevent_suppress(&clt->dev, true);
2767 	err = device_add(&clt->dev);
2768 	if (err)
2769 		goto err_put;
2770 
2771 	clt->kobj_paths = kobject_create_and_add("paths", &clt->dev.kobj);
2772 	if (!clt->kobj_paths) {
2773 		err = -ENOMEM;
2774 		goto err_del;
2775 	}
2776 	err = rtrs_clt_create_sysfs_root_files(clt);
2777 	if (err) {
2778 		kobject_del(clt->kobj_paths);
2779 		kobject_put(clt->kobj_paths);
2780 		goto err_del;
2781 	}
2782 	dev_set_uevent_suppress(&clt->dev, false);
2783 	kobject_uevent(&clt->dev.kobj, KOBJ_ADD);
2784 
2785 	return clt;
2786 err_del:
2787 	device_del(&clt->dev);
2788 err_put:
2789 	free_percpu(clt->pcpu_path);
2790 	put_device(&clt->dev);
2791 	return ERR_PTR(err);
2792 }
2793 
free_clt(struct rtrs_clt_sess * clt)2794 static void free_clt(struct rtrs_clt_sess *clt)
2795 {
2796 	free_percpu(clt->pcpu_path);
2797 
2798 	/*
2799 	 * release callback will free clt and destroy mutexes in last put
2800 	 */
2801 	device_unregister(&clt->dev);
2802 }
2803 
2804 /**
2805  * rtrs_clt_open() - Open a path to an RTRS server
2806  * @ops: holds the link event callback and the private pointer.
2807  * @pathname: name of the path to an RTRS server
2808  * @paths: Paths to be established defined by their src and dst addresses
2809  * @paths_num: Number of elements in the @paths array
2810  * @port: port to be used by the RTRS session
2811  * @pdu_sz: Size of extra payload which can be accessed after permit allocation.
2812  * @reconnect_delay_sec: time between reconnect tries
2813  * @max_reconnect_attempts: Number of times to reconnect on error before giving
2814  *			    up, 0 for * disabled, -1 for forever
2815  * @nr_poll_queues: number of polling mode connection using IB_POLL_DIRECT flag
2816  *
2817  * Starts session establishment with the rtrs_server. The function can block
2818  * up to ~2000ms before it returns.
2819  *
2820  * Return a valid pointer on success otherwise PTR_ERR.
2821  */
rtrs_clt_open(struct rtrs_clt_ops * ops,const char * pathname,const struct rtrs_addr * paths,size_t paths_num,u16 port,size_t pdu_sz,u8 reconnect_delay_sec,s16 max_reconnect_attempts,u32 nr_poll_queues)2822 struct rtrs_clt_sess *rtrs_clt_open(struct rtrs_clt_ops *ops,
2823 				 const char *pathname,
2824 				 const struct rtrs_addr *paths,
2825 				 size_t paths_num, u16 port,
2826 				 size_t pdu_sz, u8 reconnect_delay_sec,
2827 				 s16 max_reconnect_attempts, u32 nr_poll_queues)
2828 {
2829 	struct rtrs_clt_path *clt_path, *tmp;
2830 	struct rtrs_clt_sess *clt;
2831 	int err, i;
2832 
2833 	if (strchr(pathname, '/') || strchr(pathname, '.')) {
2834 		pr_err("pathname cannot contain / and .\n");
2835 		err = -EINVAL;
2836 		goto out;
2837 	}
2838 
2839 	clt = alloc_clt(pathname, paths_num, port, pdu_sz, ops->priv,
2840 			ops->link_ev,
2841 			reconnect_delay_sec,
2842 			max_reconnect_attempts);
2843 	if (IS_ERR(clt)) {
2844 		err = PTR_ERR(clt);
2845 		goto out;
2846 	}
2847 	for (i = 0; i < paths_num; i++) {
2848 		struct rtrs_clt_path *clt_path;
2849 
2850 		clt_path = alloc_path(clt, &paths[i], nr_cpu_ids,
2851 				  nr_poll_queues);
2852 		if (IS_ERR(clt_path)) {
2853 			err = PTR_ERR(clt_path);
2854 			goto close_all_path;
2855 		}
2856 		if (!i)
2857 			clt_path->for_new_clt = 1;
2858 		list_add_tail_rcu(&clt_path->s.entry, &clt->paths_list);
2859 
2860 		err = init_path(clt_path);
2861 		if (err) {
2862 			list_del_rcu(&clt_path->s.entry);
2863 			rtrs_clt_close_conns(clt_path, true);
2864 			free_percpu(clt_path->stats->pcpu_stats);
2865 			free_path(clt_path);
2866 			goto close_all_path;
2867 		}
2868 
2869 		err = rtrs_clt_create_path_files(clt_path);
2870 		if (err) {
2871 			list_del_rcu(&clt_path->s.entry);
2872 			rtrs_clt_close_conns(clt_path, true);
2873 			free_percpu(clt_path->stats->pcpu_stats);
2874 			free_path(clt_path);
2875 			goto close_all_path;
2876 		}
2877 	}
2878 	err = alloc_permits(clt);
2879 	if (err)
2880 		goto close_all_path;
2881 
2882 	return clt;
2883 
2884 close_all_path:
2885 	list_for_each_entry_safe(clt_path, tmp, &clt->paths_list, s.entry) {
2886 		rtrs_clt_destroy_path_files(clt_path, NULL);
2887 		rtrs_clt_close_conns(clt_path, true);
2888 		kobject_put(&clt_path->kobj);
2889 	}
2890 	rtrs_clt_destroy_sysfs_root(clt);
2891 	free_clt(clt);
2892 
2893 out:
2894 	return ERR_PTR(err);
2895 }
2896 EXPORT_SYMBOL(rtrs_clt_open);
2897 
2898 /**
2899  * rtrs_clt_close() - Close a path
2900  * @clt: Session handle. Session is freed upon return.
2901  */
rtrs_clt_close(struct rtrs_clt_sess * clt)2902 void rtrs_clt_close(struct rtrs_clt_sess *clt)
2903 {
2904 	struct rtrs_clt_path *clt_path, *tmp;
2905 
2906 	/* Firstly forbid sysfs access */
2907 	rtrs_clt_destroy_sysfs_root(clt);
2908 
2909 	/* Now it is safe to iterate over all paths without locks */
2910 	list_for_each_entry_safe(clt_path, tmp, &clt->paths_list, s.entry) {
2911 		rtrs_clt_close_conns(clt_path, true);
2912 		rtrs_clt_destroy_path_files(clt_path, NULL);
2913 		kobject_put(&clt_path->kobj);
2914 	}
2915 	free_permits(clt);
2916 	free_clt(clt);
2917 }
2918 EXPORT_SYMBOL(rtrs_clt_close);
2919 
rtrs_clt_reconnect_from_sysfs(struct rtrs_clt_path * clt_path)2920 int rtrs_clt_reconnect_from_sysfs(struct rtrs_clt_path *clt_path)
2921 {
2922 	enum rtrs_clt_state old_state;
2923 	int err = -EBUSY;
2924 	bool changed;
2925 
2926 	changed = rtrs_clt_change_state_get_old(clt_path,
2927 						 RTRS_CLT_RECONNECTING,
2928 						 &old_state);
2929 	if (changed) {
2930 		clt_path->reconnect_attempts = 0;
2931 		rtrs_clt_stop_and_destroy_conns(clt_path);
2932 		queue_delayed_work(rtrs_wq, &clt_path->reconnect_dwork, 0);
2933 	}
2934 	if (changed || old_state == RTRS_CLT_RECONNECTING) {
2935 		/*
2936 		 * flush_delayed_work() queues pending work for immediate
2937 		 * execution, so do the flush if we have queued something
2938 		 * right now or work is pending.
2939 		 */
2940 		flush_delayed_work(&clt_path->reconnect_dwork);
2941 		err = (READ_ONCE(clt_path->state) ==
2942 		       RTRS_CLT_CONNECTED ? 0 : -ENOTCONN);
2943 	}
2944 
2945 	return err;
2946 }
2947 
rtrs_clt_remove_path_from_sysfs(struct rtrs_clt_path * clt_path,const struct attribute * sysfs_self)2948 int rtrs_clt_remove_path_from_sysfs(struct rtrs_clt_path *clt_path,
2949 				     const struct attribute *sysfs_self)
2950 {
2951 	enum rtrs_clt_state old_state;
2952 	bool changed;
2953 
2954 	/*
2955 	 * Continue stopping path till state was changed to DEAD or
2956 	 * state was observed as DEAD:
2957 	 * 1. State was changed to DEAD - we were fast and nobody
2958 	 *    invoked rtrs_clt_reconnect(), which can again start
2959 	 *    reconnecting.
2960 	 * 2. State was observed as DEAD - we have someone in parallel
2961 	 *    removing the path.
2962 	 */
2963 	do {
2964 		rtrs_clt_close_conns(clt_path, true);
2965 		changed = rtrs_clt_change_state_get_old(clt_path,
2966 							RTRS_CLT_DEAD,
2967 							&old_state);
2968 	} while (!changed && old_state != RTRS_CLT_DEAD);
2969 
2970 	if (changed) {
2971 		rtrs_clt_remove_path_from_arr(clt_path);
2972 		rtrs_clt_destroy_path_files(clt_path, sysfs_self);
2973 		kobject_put(&clt_path->kobj);
2974 	}
2975 
2976 	return 0;
2977 }
2978 
rtrs_clt_set_max_reconnect_attempts(struct rtrs_clt_sess * clt,int value)2979 void rtrs_clt_set_max_reconnect_attempts(struct rtrs_clt_sess *clt, int value)
2980 {
2981 	clt->max_reconnect_attempts = (unsigned int)value;
2982 }
2983 
rtrs_clt_get_max_reconnect_attempts(const struct rtrs_clt_sess * clt)2984 int rtrs_clt_get_max_reconnect_attempts(const struct rtrs_clt_sess *clt)
2985 {
2986 	return (int)clt->max_reconnect_attempts;
2987 }
2988 
2989 /**
2990  * rtrs_clt_request() - Request data transfer to/from server via RDMA.
2991  *
2992  * @dir:	READ/WRITE
2993  * @ops:	callback function to be called as confirmation, and the pointer.
2994  * @clt:	Session
2995  * @permit:	Preallocated permit
2996  * @vec:	Message that is sent to server together with the request.
2997  *		Sum of len of all @vec elements limited to <= IO_MSG_SIZE.
2998  *		Since the msg is copied internally it can be allocated on stack.
2999  * @nr:		Number of elements in @vec.
3000  * @data_len:	length of data sent to/from server
3001  * @sg:		Pages to be sent/received to/from server.
3002  * @sg_cnt:	Number of elements in the @sg
3003  *
3004  * Return:
3005  * 0:		Success
3006  * <0:		Error
3007  *
3008  * On dir=READ rtrs client will request a data transfer from Server to client.
3009  * The data that the server will respond with will be stored in @sg when
3010  * the user receives an %RTRS_CLT_RDMA_EV_RDMA_REQUEST_WRITE_COMPL event.
3011  * On dir=WRITE rtrs client will rdma write data in sg to server side.
3012  */
rtrs_clt_request(int dir,struct rtrs_clt_req_ops * ops,struct rtrs_clt_sess * clt,struct rtrs_permit * permit,const struct kvec * vec,size_t nr,size_t data_len,struct scatterlist * sg,unsigned int sg_cnt)3013 int rtrs_clt_request(int dir, struct rtrs_clt_req_ops *ops,
3014 		     struct rtrs_clt_sess *clt, struct rtrs_permit *permit,
3015 		     const struct kvec *vec, size_t nr, size_t data_len,
3016 		     struct scatterlist *sg, unsigned int sg_cnt)
3017 {
3018 	struct rtrs_clt_io_req *req;
3019 	struct rtrs_clt_path *clt_path;
3020 
3021 	enum dma_data_direction dma_dir;
3022 	int err = -ECONNABORTED, i;
3023 	size_t usr_len, hdr_len;
3024 	struct path_it it;
3025 
3026 	/* Get kvec length */
3027 	for (i = 0, usr_len = 0; i < nr; i++)
3028 		usr_len += vec[i].iov_len;
3029 
3030 	if (dir == READ) {
3031 		hdr_len = sizeof(struct rtrs_msg_rdma_read) +
3032 			  sg_cnt * sizeof(struct rtrs_sg_desc);
3033 		dma_dir = DMA_FROM_DEVICE;
3034 	} else {
3035 		hdr_len = sizeof(struct rtrs_msg_rdma_write);
3036 		dma_dir = DMA_TO_DEVICE;
3037 	}
3038 
3039 	rcu_read_lock();
3040 	for (path_it_init(&it, clt);
3041 	     (clt_path = it.next_path(&it)) && it.i < it.clt->paths_num; it.i++) {
3042 		if (READ_ONCE(clt_path->state) != RTRS_CLT_CONNECTED)
3043 			continue;
3044 
3045 		if (usr_len + hdr_len > clt_path->max_hdr_size) {
3046 			rtrs_wrn_rl(clt_path->clt,
3047 				     "%s request failed, user message size is %zu and header length %zu, but max size is %u\n",
3048 				     dir == READ ? "Read" : "Write",
3049 				     usr_len, hdr_len, clt_path->max_hdr_size);
3050 			err = -EMSGSIZE;
3051 			break;
3052 		}
3053 		req = rtrs_clt_get_req(clt_path, ops->conf_fn, permit, ops->priv,
3054 				       vec, usr_len, sg, sg_cnt, data_len,
3055 				       dma_dir);
3056 		if (dir == READ)
3057 			err = rtrs_clt_read_req(req);
3058 		else
3059 			err = rtrs_clt_write_req(req);
3060 		if (err) {
3061 			req->in_use = false;
3062 			continue;
3063 		}
3064 		/* Success path */
3065 		break;
3066 	}
3067 	path_it_deinit(&it);
3068 	rcu_read_unlock();
3069 
3070 	return err;
3071 }
3072 EXPORT_SYMBOL(rtrs_clt_request);
3073 
rtrs_clt_rdma_cq_direct(struct rtrs_clt_sess * clt,unsigned int index)3074 int rtrs_clt_rdma_cq_direct(struct rtrs_clt_sess *clt, unsigned int index)
3075 {
3076 	/* If no path, return -1 for block layer not to try again */
3077 	int cnt = -1;
3078 	struct rtrs_con *con;
3079 	struct rtrs_clt_path *clt_path;
3080 	struct path_it it;
3081 
3082 	rcu_read_lock();
3083 	for (path_it_init(&it, clt);
3084 	     (clt_path = it.next_path(&it)) && it.i < it.clt->paths_num; it.i++) {
3085 		if (READ_ONCE(clt_path->state) != RTRS_CLT_CONNECTED)
3086 			continue;
3087 
3088 		con = clt_path->s.con[index + 1];
3089 		cnt = ib_process_cq_direct(con->cq, -1);
3090 		if (cnt)
3091 			break;
3092 	}
3093 	path_it_deinit(&it);
3094 	rcu_read_unlock();
3095 
3096 	return cnt;
3097 }
3098 EXPORT_SYMBOL(rtrs_clt_rdma_cq_direct);
3099 
3100 /**
3101  * rtrs_clt_query() - queries RTRS session attributes
3102  *@clt: session pointer
3103  *@attr: query results for session attributes.
3104  * Returns:
3105  *    0 on success
3106  *    -ECOMM		no connection to the server
3107  */
rtrs_clt_query(struct rtrs_clt_sess * clt,struct rtrs_attrs * attr)3108 int rtrs_clt_query(struct rtrs_clt_sess *clt, struct rtrs_attrs *attr)
3109 {
3110 	if (!rtrs_clt_is_connected(clt))
3111 		return -ECOMM;
3112 
3113 	attr->queue_depth      = clt->queue_depth;
3114 	attr->max_segments     = clt->max_segments;
3115 	/* Cap max_io_size to min of remote buffer size and the fr pages */
3116 	attr->max_io_size = min_t(int, clt->max_io_size,
3117 				  clt->max_segments * SZ_4K);
3118 
3119 	return 0;
3120 }
3121 EXPORT_SYMBOL(rtrs_clt_query);
3122 
rtrs_clt_create_path_from_sysfs(struct rtrs_clt_sess * clt,struct rtrs_addr * addr)3123 int rtrs_clt_create_path_from_sysfs(struct rtrs_clt_sess *clt,
3124 				     struct rtrs_addr *addr)
3125 {
3126 	struct rtrs_clt_path *clt_path;
3127 	int err;
3128 
3129 	clt_path = alloc_path(clt, addr, nr_cpu_ids, 0);
3130 	if (IS_ERR(clt_path))
3131 		return PTR_ERR(clt_path);
3132 
3133 	mutex_lock(&clt->paths_mutex);
3134 	if (clt->paths_num == 0) {
3135 		/*
3136 		 * When all the paths are removed for a session,
3137 		 * the addition of the first path is like a new session for
3138 		 * the storage server
3139 		 */
3140 		clt_path->for_new_clt = 1;
3141 	}
3142 
3143 	mutex_unlock(&clt->paths_mutex);
3144 
3145 	/*
3146 	 * It is totally safe to add path in CONNECTING state: coming
3147 	 * IO will never grab it.  Also it is very important to add
3148 	 * path before init, since init fires LINK_CONNECTED event.
3149 	 */
3150 	rtrs_clt_add_path_to_arr(clt_path);
3151 
3152 	err = init_path(clt_path);
3153 	if (err)
3154 		goto close_path;
3155 
3156 	err = rtrs_clt_create_path_files(clt_path);
3157 	if (err)
3158 		goto close_path;
3159 
3160 	return 0;
3161 
3162 close_path:
3163 	rtrs_clt_remove_path_from_arr(clt_path);
3164 	rtrs_clt_close_conns(clt_path, true);
3165 	free_percpu(clt_path->stats->pcpu_stats);
3166 	free_path(clt_path);
3167 
3168 	return err;
3169 }
3170 
rtrs_clt_ib_event_handler(struct ib_event_handler * handler,struct ib_event * ibevent)3171 void rtrs_clt_ib_event_handler(struct ib_event_handler *handler,
3172 			       struct ib_event *ibevent)
3173 {
3174 	struct ib_device *idev = ibevent->device;
3175 	u32 port_num = ibevent->element.port_num;
3176 
3177 	pr_info("Handling event: %s (%d). HCA name: %s, port num: %u\n",
3178 			ib_event_msg(ibevent->event), ibevent->event, idev->name, port_num);
3179 }
3180 
3181 
rtrs_clt_ib_dev_init(struct rtrs_ib_dev * dev)3182 static int rtrs_clt_ib_dev_init(struct rtrs_ib_dev *dev)
3183 {
3184 	INIT_IB_EVENT_HANDLER(&dev->event_handler, dev->ib_dev,
3185 			      rtrs_clt_ib_event_handler);
3186 	ib_register_event_handler(&dev->event_handler);
3187 
3188 	if (!(dev->ib_dev->attrs.device_cap_flags &
3189 	      IB_DEVICE_MEM_MGT_EXTENSIONS)) {
3190 		pr_err("Memory registrations not supported.\n");
3191 		return -ENOTSUPP;
3192 	}
3193 
3194 	return 0;
3195 }
3196 
rtrs_clt_ib_dev_deinit(struct rtrs_ib_dev * dev)3197 static void rtrs_clt_ib_dev_deinit(struct rtrs_ib_dev *dev)
3198 {
3199 	ib_unregister_event_handler(&dev->event_handler);
3200 }
3201 
3202 
3203 static const struct rtrs_rdma_dev_pd_ops dev_pd_ops = {
3204 	.init = rtrs_clt_ib_dev_init,
3205 	.deinit = rtrs_clt_ib_dev_deinit
3206 };
3207 
rtrs_client_init(void)3208 static int __init rtrs_client_init(void)
3209 {
3210 	int ret = 0;
3211 
3212 	rtrs_rdma_dev_pd_init(0, &dev_pd);
3213 	ret = class_register(&rtrs_clt_dev_class);
3214 	if (ret) {
3215 		pr_err("Failed to create rtrs-client dev class\n");
3216 		return ret;
3217 	}
3218 	rtrs_wq = alloc_workqueue("rtrs_client_wq", WQ_PERCPU, 0);
3219 	if (!rtrs_wq) {
3220 		class_unregister(&rtrs_clt_dev_class);
3221 		return -ENOMEM;
3222 	}
3223 
3224 	return 0;
3225 }
3226 
rtrs_client_exit(void)3227 static void __exit rtrs_client_exit(void)
3228 {
3229 	destroy_workqueue(rtrs_wq);
3230 	class_unregister(&rtrs_clt_dev_class);
3231 	rtrs_rdma_dev_pd_deinit(&dev_pd);
3232 }
3233 
3234 module_init(rtrs_client_init);
3235 module_exit(rtrs_client_exit);
3236