1 /* This file is part of the Emulex RoCE Device Driver for
2  * RoCE (RDMA over Converged Ethernet) adapters.
3  * Copyright (C) 2012-2015 Emulex. All rights reserved.
4  * EMULEX and SLI are trademarks of Emulex.
5  * www.emulex.com
6  *
7  * This software is available to you under a choice of one of two licenses.
8  * You may choose to be licensed under the terms of the GNU General Public
9  * License (GPL) Version 2, available from the file COPYING in the main
10  * directory of this source tree, or the BSD license below:
11  *
12  * Redistribution and use in source and binary forms, with or without
13  * modification, are permitted provided that the following conditions
14  * are met:
15  *
16  * - Redistributions of source code must retain the above copyright notice,
17  *   this list of conditions and the following disclaimer.
18  *
19  * - Redistributions in binary form must reproduce the above copyright
20  *   notice, this list of conditions and the following disclaimer in
21  *   the documentation and/or other materials provided with the distribution.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
24  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,THE
25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
27  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
28  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
29  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
30  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
31  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
32  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
33  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34  *
35  * Contact Information:
36  * linux-drivers@emulex.com
37  *
38  * Emulex
39  * 3333 Susan Street
40  * Costa Mesa, CA 92626
41  */
42 
43 #include <linux/dma-mapping.h>
44 #include <rdma/ib_verbs.h>
45 #include <rdma/ib_user_verbs.h>
46 #include <rdma/iw_cm.h>
47 #include <rdma/ib_umem.h>
48 #include <rdma/ib_addr.h>
49 #include <rdma/ib_cache.h>
50 
51 #include "ocrdma.h"
52 #include "ocrdma_hw.h"
53 #include "ocrdma_verbs.h"
54 #include "ocrdma_abi.h"
55 
56 int ocrdma_query_pkey(struct ib_device *ibdev, u8 port, u16 index, u16 *pkey)
57 {
58 	if (index > 1)
59 		return -EINVAL;
60 
61 	*pkey = 0xffff;
62 	return 0;
63 }
64 
65 int ocrdma_query_gid(struct ib_device *ibdev, u8 port,
66 		     int index, union ib_gid *sgid)
67 {
68 	int ret;
69 	struct ocrdma_dev *dev;
70 
71 	dev = get_ocrdma_dev(ibdev);
72 	memset(sgid, 0, sizeof(*sgid));
73 	if (index >= OCRDMA_MAX_SGID)
74 		return -EINVAL;
75 
76 	ret = ib_get_cached_gid(ibdev, port, index, sgid, NULL);
77 	if (ret == -EAGAIN) {
78 		memcpy(sgid, &zgid, sizeof(*sgid));
79 		return 0;
80 	}
81 
82 	return ret;
83 }
84 
85 int ocrdma_add_gid(struct ib_device *device,
86 		   u8 port_num,
87 		   unsigned int index,
88 		   const union ib_gid *gid,
89 		   const struct ib_gid_attr *attr,
90 		   void **context) {
91 	return  0;
92 }
93 
94 int  ocrdma_del_gid(struct ib_device *device,
95 		    u8 port_num,
96 		    unsigned int index,
97 		    void **context) {
98 	return 0;
99 }
100 
101 int ocrdma_query_device(struct ib_device *ibdev, struct ib_device_attr *attr,
102 			struct ib_udata *uhw)
103 {
104 	struct ocrdma_dev *dev = get_ocrdma_dev(ibdev);
105 
106 	if (uhw->inlen || uhw->outlen)
107 		return -EINVAL;
108 
109 	memset(attr, 0, sizeof *attr);
110 	memcpy(&attr->fw_ver, &dev->attr.fw_ver[0],
111 	       min(sizeof(dev->attr.fw_ver), sizeof(attr->fw_ver)));
112 	ocrdma_get_guid(dev, (u8 *)&attr->sys_image_guid);
113 	attr->max_mr_size = dev->attr.max_mr_size;
114 	attr->page_size_cap = 0xffff000;
115 	attr->vendor_id = dev->nic_info.pdev->vendor;
116 	attr->vendor_part_id = dev->nic_info.pdev->device;
117 	attr->hw_ver = dev->asic_id;
118 	attr->max_qp = dev->attr.max_qp;
119 	attr->max_ah = OCRDMA_MAX_AH;
120 	attr->max_qp_wr = dev->attr.max_wqe;
121 
122 	attr->device_cap_flags = IB_DEVICE_CURR_QP_STATE_MOD |
123 					IB_DEVICE_RC_RNR_NAK_GEN |
124 					IB_DEVICE_SHUTDOWN_PORT |
125 					IB_DEVICE_SYS_IMAGE_GUID |
126 					IB_DEVICE_LOCAL_DMA_LKEY |
127 					IB_DEVICE_MEM_MGT_EXTENSIONS;
128 	attr->max_sge = dev->attr.max_send_sge;
129 	attr->max_sge_rd = attr->max_sge;
130 	attr->max_cq = dev->attr.max_cq;
131 	attr->max_cqe = dev->attr.max_cqe;
132 	attr->max_mr = dev->attr.max_mr;
133 	attr->max_mw = dev->attr.max_mw;
134 	attr->max_pd = dev->attr.max_pd;
135 	attr->atomic_cap = 0;
136 	attr->max_fmr = 0;
137 	attr->max_map_per_fmr = 0;
138 	attr->max_qp_rd_atom =
139 	    min(dev->attr.max_ord_per_qp, dev->attr.max_ird_per_qp);
140 	attr->max_qp_init_rd_atom = dev->attr.max_ord_per_qp;
141 	attr->max_srq = dev->attr.max_srq;
142 	attr->max_srq_sge = dev->attr.max_srq_sge;
143 	attr->max_srq_wr = dev->attr.max_rqe;
144 	attr->local_ca_ack_delay = dev->attr.local_ca_ack_delay;
145 	attr->max_fast_reg_page_list_len = dev->attr.max_pages_per_frmr;
146 	attr->max_pkeys = 1;
147 	return 0;
148 }
149 
150 struct net_device *ocrdma_get_netdev(struct ib_device *ibdev, u8 port_num)
151 {
152 	struct ocrdma_dev *dev;
153 	struct net_device *ndev = NULL;
154 
155 	rcu_read_lock();
156 
157 	dev = get_ocrdma_dev(ibdev);
158 	if (dev)
159 		ndev = dev->nic_info.netdev;
160 	if (ndev)
161 		dev_hold(ndev);
162 
163 	rcu_read_unlock();
164 
165 	return ndev;
166 }
167 
168 static inline void get_link_speed_and_width(struct ocrdma_dev *dev,
169 					    u8 *ib_speed, u8 *ib_width)
170 {
171 	int status;
172 	u8 speed;
173 
174 	status = ocrdma_mbx_get_link_speed(dev, &speed, NULL);
175 	if (status)
176 		speed = OCRDMA_PHYS_LINK_SPEED_ZERO;
177 
178 	switch (speed) {
179 	case OCRDMA_PHYS_LINK_SPEED_1GBPS:
180 		*ib_speed = IB_SPEED_SDR;
181 		*ib_width = IB_WIDTH_1X;
182 		break;
183 
184 	case OCRDMA_PHYS_LINK_SPEED_10GBPS:
185 		*ib_speed = IB_SPEED_QDR;
186 		*ib_width = IB_WIDTH_1X;
187 		break;
188 
189 	case OCRDMA_PHYS_LINK_SPEED_20GBPS:
190 		*ib_speed = IB_SPEED_DDR;
191 		*ib_width = IB_WIDTH_4X;
192 		break;
193 
194 	case OCRDMA_PHYS_LINK_SPEED_40GBPS:
195 		*ib_speed = IB_SPEED_QDR;
196 		*ib_width = IB_WIDTH_4X;
197 		break;
198 
199 	default:
200 		/* Unsupported */
201 		*ib_speed = IB_SPEED_SDR;
202 		*ib_width = IB_WIDTH_1X;
203 	}
204 }
205 
206 int ocrdma_query_port(struct ib_device *ibdev,
207 		      u8 port, struct ib_port_attr *props)
208 {
209 	enum ib_port_state port_state;
210 	struct ocrdma_dev *dev;
211 	struct net_device *netdev;
212 
213 	dev = get_ocrdma_dev(ibdev);
214 	if (port > 1) {
215 		pr_err("%s(%d) invalid_port=0x%x\n", __func__,
216 		       dev->id, port);
217 		return -EINVAL;
218 	}
219 	netdev = dev->nic_info.netdev;
220 	if (netif_running(netdev) && netif_oper_up(netdev)) {
221 		port_state = IB_PORT_ACTIVE;
222 		props->phys_state = 5;
223 	} else {
224 		port_state = IB_PORT_DOWN;
225 		props->phys_state = 3;
226 	}
227 	props->max_mtu = IB_MTU_4096;
228 	props->active_mtu = iboe_get_mtu(netdev->mtu);
229 	props->lid = 0;
230 	props->lmc = 0;
231 	props->sm_lid = 0;
232 	props->sm_sl = 0;
233 	props->state = port_state;
234 	props->port_cap_flags =
235 	    IB_PORT_CM_SUP |
236 	    IB_PORT_REINIT_SUP |
237 	    IB_PORT_DEVICE_MGMT_SUP | IB_PORT_VENDOR_CLASS_SUP |
238 	    IB_PORT_IP_BASED_GIDS;
239 	props->gid_tbl_len = OCRDMA_MAX_SGID;
240 	props->pkey_tbl_len = 1;
241 	props->bad_pkey_cntr = 0;
242 	props->qkey_viol_cntr = 0;
243 	get_link_speed_and_width(dev, &props->active_speed,
244 				 &props->active_width);
245 	props->max_msg_sz = 0x80000000;
246 	props->max_vl_num = 4;
247 	return 0;
248 }
249 
250 int ocrdma_modify_port(struct ib_device *ibdev, u8 port, int mask,
251 		       struct ib_port_modify *props)
252 {
253 	struct ocrdma_dev *dev;
254 
255 	dev = get_ocrdma_dev(ibdev);
256 	if (port > 1) {
257 		pr_err("%s(%d) invalid_port=0x%x\n", __func__, dev->id, port);
258 		return -EINVAL;
259 	}
260 	return 0;
261 }
262 
263 static int ocrdma_add_mmap(struct ocrdma_ucontext *uctx, u64 phy_addr,
264 			   unsigned long len)
265 {
266 	struct ocrdma_mm *mm;
267 
268 	mm = kzalloc(sizeof(*mm), GFP_KERNEL);
269 	if (mm == NULL)
270 		return -ENOMEM;
271 	mm->key.phy_addr = phy_addr;
272 	mm->key.len = len;
273 	INIT_LIST_HEAD(&mm->entry);
274 
275 	mutex_lock(&uctx->mm_list_lock);
276 	list_add_tail(&mm->entry, &uctx->mm_head);
277 	mutex_unlock(&uctx->mm_list_lock);
278 	return 0;
279 }
280 
281 static void ocrdma_del_mmap(struct ocrdma_ucontext *uctx, u64 phy_addr,
282 			    unsigned long len)
283 {
284 	struct ocrdma_mm *mm, *tmp;
285 
286 	mutex_lock(&uctx->mm_list_lock);
287 	list_for_each_entry_safe(mm, tmp, &uctx->mm_head, entry) {
288 		if (len != mm->key.len && phy_addr != mm->key.phy_addr)
289 			continue;
290 
291 		list_del(&mm->entry);
292 		kfree(mm);
293 		break;
294 	}
295 	mutex_unlock(&uctx->mm_list_lock);
296 }
297 
298 static bool ocrdma_search_mmap(struct ocrdma_ucontext *uctx, u64 phy_addr,
299 			      unsigned long len)
300 {
301 	bool found = false;
302 	struct ocrdma_mm *mm;
303 
304 	mutex_lock(&uctx->mm_list_lock);
305 	list_for_each_entry(mm, &uctx->mm_head, entry) {
306 		if (len != mm->key.len && phy_addr != mm->key.phy_addr)
307 			continue;
308 
309 		found = true;
310 		break;
311 	}
312 	mutex_unlock(&uctx->mm_list_lock);
313 	return found;
314 }
315 
316 
317 static u16 _ocrdma_pd_mgr_get_bitmap(struct ocrdma_dev *dev, bool dpp_pool)
318 {
319 	u16 pd_bitmap_idx = 0;
320 	const unsigned long *pd_bitmap;
321 
322 	if (dpp_pool) {
323 		pd_bitmap = dev->pd_mgr->pd_dpp_bitmap;
324 		pd_bitmap_idx = find_first_zero_bit(pd_bitmap,
325 						    dev->pd_mgr->max_dpp_pd);
326 		__set_bit(pd_bitmap_idx, dev->pd_mgr->pd_dpp_bitmap);
327 		dev->pd_mgr->pd_dpp_count++;
328 		if (dev->pd_mgr->pd_dpp_count > dev->pd_mgr->pd_dpp_thrsh)
329 			dev->pd_mgr->pd_dpp_thrsh = dev->pd_mgr->pd_dpp_count;
330 	} else {
331 		pd_bitmap = dev->pd_mgr->pd_norm_bitmap;
332 		pd_bitmap_idx = find_first_zero_bit(pd_bitmap,
333 						    dev->pd_mgr->max_normal_pd);
334 		__set_bit(pd_bitmap_idx, dev->pd_mgr->pd_norm_bitmap);
335 		dev->pd_mgr->pd_norm_count++;
336 		if (dev->pd_mgr->pd_norm_count > dev->pd_mgr->pd_norm_thrsh)
337 			dev->pd_mgr->pd_norm_thrsh = dev->pd_mgr->pd_norm_count;
338 	}
339 	return pd_bitmap_idx;
340 }
341 
342 static int _ocrdma_pd_mgr_put_bitmap(struct ocrdma_dev *dev, u16 pd_id,
343 					bool dpp_pool)
344 {
345 	u16 pd_count;
346 	u16 pd_bit_index;
347 
348 	pd_count = dpp_pool ? dev->pd_mgr->pd_dpp_count :
349 			      dev->pd_mgr->pd_norm_count;
350 	if (pd_count == 0)
351 		return -EINVAL;
352 
353 	if (dpp_pool) {
354 		pd_bit_index = pd_id - dev->pd_mgr->pd_dpp_start;
355 		if (pd_bit_index >= dev->pd_mgr->max_dpp_pd) {
356 			return -EINVAL;
357 		} else {
358 			__clear_bit(pd_bit_index, dev->pd_mgr->pd_dpp_bitmap);
359 			dev->pd_mgr->pd_dpp_count--;
360 		}
361 	} else {
362 		pd_bit_index = pd_id - dev->pd_mgr->pd_norm_start;
363 		if (pd_bit_index >= dev->pd_mgr->max_normal_pd) {
364 			return -EINVAL;
365 		} else {
366 			__clear_bit(pd_bit_index, dev->pd_mgr->pd_norm_bitmap);
367 			dev->pd_mgr->pd_norm_count--;
368 		}
369 	}
370 
371 	return 0;
372 }
373 
374 static u8 ocrdma_put_pd_num(struct ocrdma_dev *dev, u16 pd_id,
375 				   bool dpp_pool)
376 {
377 	int status;
378 
379 	mutex_lock(&dev->dev_lock);
380 	status = _ocrdma_pd_mgr_put_bitmap(dev, pd_id, dpp_pool);
381 	mutex_unlock(&dev->dev_lock);
382 	return status;
383 }
384 
385 static int ocrdma_get_pd_num(struct ocrdma_dev *dev, struct ocrdma_pd *pd)
386 {
387 	u16 pd_idx = 0;
388 	int status = 0;
389 
390 	mutex_lock(&dev->dev_lock);
391 	if (pd->dpp_enabled) {
392 		/* try allocating DPP PD, if not available then normal PD */
393 		if (dev->pd_mgr->pd_dpp_count < dev->pd_mgr->max_dpp_pd) {
394 			pd_idx = _ocrdma_pd_mgr_get_bitmap(dev, true);
395 			pd->id = dev->pd_mgr->pd_dpp_start + pd_idx;
396 			pd->dpp_page = dev->pd_mgr->dpp_page_index + pd_idx;
397 		} else if (dev->pd_mgr->pd_norm_count <
398 			   dev->pd_mgr->max_normal_pd) {
399 			pd_idx = _ocrdma_pd_mgr_get_bitmap(dev, false);
400 			pd->id = dev->pd_mgr->pd_norm_start + pd_idx;
401 			pd->dpp_enabled = false;
402 		} else {
403 			status = -EINVAL;
404 		}
405 	} else {
406 		if (dev->pd_mgr->pd_norm_count < dev->pd_mgr->max_normal_pd) {
407 			pd_idx = _ocrdma_pd_mgr_get_bitmap(dev, false);
408 			pd->id = dev->pd_mgr->pd_norm_start + pd_idx;
409 		} else {
410 			status = -EINVAL;
411 		}
412 	}
413 	mutex_unlock(&dev->dev_lock);
414 	return status;
415 }
416 
417 static struct ocrdma_pd *_ocrdma_alloc_pd(struct ocrdma_dev *dev,
418 					  struct ocrdma_ucontext *uctx,
419 					  struct ib_udata *udata)
420 {
421 	struct ocrdma_pd *pd = NULL;
422 	int status = 0;
423 
424 	pd = kzalloc(sizeof(*pd), GFP_KERNEL);
425 	if (!pd)
426 		return ERR_PTR(-ENOMEM);
427 
428 	if (udata && uctx && dev->attr.max_dpp_pds) {
429 		pd->dpp_enabled =
430 			ocrdma_get_asic_type(dev) == OCRDMA_ASIC_GEN_SKH_R;
431 		pd->num_dpp_qp =
432 			pd->dpp_enabled ? (dev->nic_info.db_page_size /
433 					   dev->attr.wqe_size) : 0;
434 	}
435 
436 	if (dev->pd_mgr->pd_prealloc_valid) {
437 		status = ocrdma_get_pd_num(dev, pd);
438 		if (status == 0) {
439 			return pd;
440 		} else {
441 			kfree(pd);
442 			return ERR_PTR(status);
443 		}
444 	}
445 
446 retry:
447 	status = ocrdma_mbx_alloc_pd(dev, pd);
448 	if (status) {
449 		if (pd->dpp_enabled) {
450 			pd->dpp_enabled = false;
451 			pd->num_dpp_qp = 0;
452 			goto retry;
453 		} else {
454 			kfree(pd);
455 			return ERR_PTR(status);
456 		}
457 	}
458 
459 	return pd;
460 }
461 
462 static inline int is_ucontext_pd(struct ocrdma_ucontext *uctx,
463 				 struct ocrdma_pd *pd)
464 {
465 	return (uctx->cntxt_pd == pd ? true : false);
466 }
467 
468 static int _ocrdma_dealloc_pd(struct ocrdma_dev *dev,
469 			      struct ocrdma_pd *pd)
470 {
471 	int status = 0;
472 
473 	if (dev->pd_mgr->pd_prealloc_valid)
474 		status = ocrdma_put_pd_num(dev, pd->id, pd->dpp_enabled);
475 	else
476 		status = ocrdma_mbx_dealloc_pd(dev, pd);
477 
478 	kfree(pd);
479 	return status;
480 }
481 
482 static int ocrdma_alloc_ucontext_pd(struct ocrdma_dev *dev,
483 				    struct ocrdma_ucontext *uctx,
484 				    struct ib_udata *udata)
485 {
486 	int status = 0;
487 
488 	uctx->cntxt_pd = _ocrdma_alloc_pd(dev, uctx, udata);
489 	if (IS_ERR(uctx->cntxt_pd)) {
490 		status = PTR_ERR(uctx->cntxt_pd);
491 		uctx->cntxt_pd = NULL;
492 		goto err;
493 	}
494 
495 	uctx->cntxt_pd->uctx = uctx;
496 	uctx->cntxt_pd->ibpd.device = &dev->ibdev;
497 err:
498 	return status;
499 }
500 
501 static int ocrdma_dealloc_ucontext_pd(struct ocrdma_ucontext *uctx)
502 {
503 	struct ocrdma_pd *pd = uctx->cntxt_pd;
504 	struct ocrdma_dev *dev = get_ocrdma_dev(pd->ibpd.device);
505 
506 	if (uctx->pd_in_use) {
507 		pr_err("%s(%d) Freeing in use pdid=0x%x.\n",
508 		       __func__, dev->id, pd->id);
509 	}
510 	uctx->cntxt_pd = NULL;
511 	(void)_ocrdma_dealloc_pd(dev, pd);
512 	return 0;
513 }
514 
515 static struct ocrdma_pd *ocrdma_get_ucontext_pd(struct ocrdma_ucontext *uctx)
516 {
517 	struct ocrdma_pd *pd = NULL;
518 
519 	mutex_lock(&uctx->mm_list_lock);
520 	if (!uctx->pd_in_use) {
521 		uctx->pd_in_use = true;
522 		pd = uctx->cntxt_pd;
523 	}
524 	mutex_unlock(&uctx->mm_list_lock);
525 
526 	return pd;
527 }
528 
529 static void ocrdma_release_ucontext_pd(struct ocrdma_ucontext *uctx)
530 {
531 	mutex_lock(&uctx->mm_list_lock);
532 	uctx->pd_in_use = false;
533 	mutex_unlock(&uctx->mm_list_lock);
534 }
535 
536 struct ib_ucontext *ocrdma_alloc_ucontext(struct ib_device *ibdev,
537 					  struct ib_udata *udata)
538 {
539 	int status;
540 	struct ocrdma_ucontext *ctx;
541 	struct ocrdma_alloc_ucontext_resp resp;
542 	struct ocrdma_dev *dev = get_ocrdma_dev(ibdev);
543 	struct pci_dev *pdev = dev->nic_info.pdev;
544 	u32 map_len = roundup(sizeof(u32) * 2048, PAGE_SIZE);
545 
546 	if (!udata)
547 		return ERR_PTR(-EFAULT);
548 	ctx = kzalloc(sizeof(*ctx), GFP_KERNEL);
549 	if (!ctx)
550 		return ERR_PTR(-ENOMEM);
551 	INIT_LIST_HEAD(&ctx->mm_head);
552 	mutex_init(&ctx->mm_list_lock);
553 
554 	ctx->ah_tbl.va = dma_alloc_coherent(&pdev->dev, map_len,
555 					    &ctx->ah_tbl.pa, GFP_KERNEL);
556 	if (!ctx->ah_tbl.va) {
557 		kfree(ctx);
558 		return ERR_PTR(-ENOMEM);
559 	}
560 	memset(ctx->ah_tbl.va, 0, map_len);
561 	ctx->ah_tbl.len = map_len;
562 
563 	memset(&resp, 0, sizeof(resp));
564 	resp.ah_tbl_len = ctx->ah_tbl.len;
565 	resp.ah_tbl_page = virt_to_phys(ctx->ah_tbl.va);
566 
567 	status = ocrdma_add_mmap(ctx, resp.ah_tbl_page, resp.ah_tbl_len);
568 	if (status)
569 		goto map_err;
570 
571 	status = ocrdma_alloc_ucontext_pd(dev, ctx, udata);
572 	if (status)
573 		goto pd_err;
574 
575 	resp.dev_id = dev->id;
576 	resp.max_inline_data = dev->attr.max_inline_data;
577 	resp.wqe_size = dev->attr.wqe_size;
578 	resp.rqe_size = dev->attr.rqe_size;
579 	resp.dpp_wqe_size = dev->attr.wqe_size;
580 
581 	memcpy(resp.fw_ver, dev->attr.fw_ver, sizeof(resp.fw_ver));
582 	status = ib_copy_to_udata(udata, &resp, sizeof(resp));
583 	if (status)
584 		goto cpy_err;
585 	return &ctx->ibucontext;
586 
587 cpy_err:
588 pd_err:
589 	ocrdma_del_mmap(ctx, ctx->ah_tbl.pa, ctx->ah_tbl.len);
590 map_err:
591 	dma_free_coherent(&pdev->dev, ctx->ah_tbl.len, ctx->ah_tbl.va,
592 			  ctx->ah_tbl.pa);
593 	kfree(ctx);
594 	return ERR_PTR(status);
595 }
596 
597 int ocrdma_dealloc_ucontext(struct ib_ucontext *ibctx)
598 {
599 	int status = 0;
600 	struct ocrdma_mm *mm, *tmp;
601 	struct ocrdma_ucontext *uctx = get_ocrdma_ucontext(ibctx);
602 	struct ocrdma_dev *dev = get_ocrdma_dev(ibctx->device);
603 	struct pci_dev *pdev = dev->nic_info.pdev;
604 
605 	status = ocrdma_dealloc_ucontext_pd(uctx);
606 
607 	ocrdma_del_mmap(uctx, uctx->ah_tbl.pa, uctx->ah_tbl.len);
608 	dma_free_coherent(&pdev->dev, uctx->ah_tbl.len, uctx->ah_tbl.va,
609 			  uctx->ah_tbl.pa);
610 
611 	list_for_each_entry_safe(mm, tmp, &uctx->mm_head, entry) {
612 		list_del(&mm->entry);
613 		kfree(mm);
614 	}
615 	kfree(uctx);
616 	return status;
617 }
618 
619 int ocrdma_mmap(struct ib_ucontext *context, struct vm_area_struct *vma)
620 {
621 	struct ocrdma_ucontext *ucontext = get_ocrdma_ucontext(context);
622 	struct ocrdma_dev *dev = get_ocrdma_dev(context->device);
623 	unsigned long vm_page = vma->vm_pgoff << PAGE_SHIFT;
624 	u64 unmapped_db = (u64) dev->nic_info.unmapped_db;
625 	unsigned long len = (vma->vm_end - vma->vm_start);
626 	int status = 0;
627 	bool found;
628 
629 	if (vma->vm_start & (PAGE_SIZE - 1))
630 		return -EINVAL;
631 	found = ocrdma_search_mmap(ucontext, vma->vm_pgoff << PAGE_SHIFT, len);
632 	if (!found)
633 		return -EINVAL;
634 
635 	if ((vm_page >= unmapped_db) && (vm_page <= (unmapped_db +
636 		dev->nic_info.db_total_size)) &&
637 		(len <=	dev->nic_info.db_page_size)) {
638 		if (vma->vm_flags & VM_READ)
639 			return -EPERM;
640 
641 		vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot);
642 		status = io_remap_pfn_range(vma, vma->vm_start, vma->vm_pgoff,
643 					    len, vma->vm_page_prot);
644 	} else if (dev->nic_info.dpp_unmapped_len &&
645 		(vm_page >= (u64) dev->nic_info.dpp_unmapped_addr) &&
646 		(vm_page <= (u64) (dev->nic_info.dpp_unmapped_addr +
647 			dev->nic_info.dpp_unmapped_len)) &&
648 		(len <= dev->nic_info.dpp_unmapped_len)) {
649 		if (vma->vm_flags & VM_READ)
650 			return -EPERM;
651 
652 		vma->vm_page_prot = pgprot_writecombine(vma->vm_page_prot);
653 		status = io_remap_pfn_range(vma, vma->vm_start, vma->vm_pgoff,
654 					    len, vma->vm_page_prot);
655 	} else {
656 		status = remap_pfn_range(vma, vma->vm_start,
657 					 vma->vm_pgoff, len, vma->vm_page_prot);
658 	}
659 	return status;
660 }
661 
662 static int ocrdma_copy_pd_uresp(struct ocrdma_dev *dev, struct ocrdma_pd *pd,
663 				struct ib_ucontext *ib_ctx,
664 				struct ib_udata *udata)
665 {
666 	int status;
667 	u64 db_page_addr;
668 	u64 dpp_page_addr = 0;
669 	u32 db_page_size;
670 	struct ocrdma_alloc_pd_uresp rsp;
671 	struct ocrdma_ucontext *uctx = get_ocrdma_ucontext(ib_ctx);
672 
673 	memset(&rsp, 0, sizeof(rsp));
674 	rsp.id = pd->id;
675 	rsp.dpp_enabled = pd->dpp_enabled;
676 	db_page_addr = ocrdma_get_db_addr(dev, pd->id);
677 	db_page_size = dev->nic_info.db_page_size;
678 
679 	status = ocrdma_add_mmap(uctx, db_page_addr, db_page_size);
680 	if (status)
681 		return status;
682 
683 	if (pd->dpp_enabled) {
684 		dpp_page_addr = dev->nic_info.dpp_unmapped_addr +
685 				(pd->id * PAGE_SIZE);
686 		status = ocrdma_add_mmap(uctx, dpp_page_addr,
687 				 PAGE_SIZE);
688 		if (status)
689 			goto dpp_map_err;
690 		rsp.dpp_page_addr_hi = upper_32_bits(dpp_page_addr);
691 		rsp.dpp_page_addr_lo = dpp_page_addr;
692 	}
693 
694 	status = ib_copy_to_udata(udata, &rsp, sizeof(rsp));
695 	if (status)
696 		goto ucopy_err;
697 
698 	pd->uctx = uctx;
699 	return 0;
700 
701 ucopy_err:
702 	if (pd->dpp_enabled)
703 		ocrdma_del_mmap(pd->uctx, dpp_page_addr, PAGE_SIZE);
704 dpp_map_err:
705 	ocrdma_del_mmap(pd->uctx, db_page_addr, db_page_size);
706 	return status;
707 }
708 
709 struct ib_pd *ocrdma_alloc_pd(struct ib_device *ibdev,
710 			      struct ib_ucontext *context,
711 			      struct ib_udata *udata)
712 {
713 	struct ocrdma_dev *dev = get_ocrdma_dev(ibdev);
714 	struct ocrdma_pd *pd;
715 	struct ocrdma_ucontext *uctx = NULL;
716 	int status;
717 	u8 is_uctx_pd = false;
718 
719 	if (udata && context) {
720 		uctx = get_ocrdma_ucontext(context);
721 		pd = ocrdma_get_ucontext_pd(uctx);
722 		if (pd) {
723 			is_uctx_pd = true;
724 			goto pd_mapping;
725 		}
726 	}
727 
728 	pd = _ocrdma_alloc_pd(dev, uctx, udata);
729 	if (IS_ERR(pd)) {
730 		status = PTR_ERR(pd);
731 		goto exit;
732 	}
733 
734 pd_mapping:
735 	if (udata && context) {
736 		status = ocrdma_copy_pd_uresp(dev, pd, context, udata);
737 		if (status)
738 			goto err;
739 	}
740 	return &pd->ibpd;
741 
742 err:
743 	if (is_uctx_pd) {
744 		ocrdma_release_ucontext_pd(uctx);
745 	} else {
746 		status = _ocrdma_dealloc_pd(dev, pd);
747 	}
748 exit:
749 	return ERR_PTR(status);
750 }
751 
752 int ocrdma_dealloc_pd(struct ib_pd *ibpd)
753 {
754 	struct ocrdma_pd *pd = get_ocrdma_pd(ibpd);
755 	struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device);
756 	struct ocrdma_ucontext *uctx = NULL;
757 	int status = 0;
758 	u64 usr_db;
759 
760 	uctx = pd->uctx;
761 	if (uctx) {
762 		u64 dpp_db = dev->nic_info.dpp_unmapped_addr +
763 			(pd->id * PAGE_SIZE);
764 		if (pd->dpp_enabled)
765 			ocrdma_del_mmap(pd->uctx, dpp_db, PAGE_SIZE);
766 		usr_db = ocrdma_get_db_addr(dev, pd->id);
767 		ocrdma_del_mmap(pd->uctx, usr_db, dev->nic_info.db_page_size);
768 
769 		if (is_ucontext_pd(uctx, pd)) {
770 			ocrdma_release_ucontext_pd(uctx);
771 			return status;
772 		}
773 	}
774 	status = _ocrdma_dealloc_pd(dev, pd);
775 	return status;
776 }
777 
778 static int ocrdma_alloc_lkey(struct ocrdma_dev *dev, struct ocrdma_mr *mr,
779 			    u32 pdid, int acc, u32 num_pbls, u32 addr_check)
780 {
781 	int status;
782 
783 	mr->hwmr.fr_mr = 0;
784 	mr->hwmr.local_rd = 1;
785 	mr->hwmr.remote_rd = (acc & IB_ACCESS_REMOTE_READ) ? 1 : 0;
786 	mr->hwmr.remote_wr = (acc & IB_ACCESS_REMOTE_WRITE) ? 1 : 0;
787 	mr->hwmr.local_wr = (acc & IB_ACCESS_LOCAL_WRITE) ? 1 : 0;
788 	mr->hwmr.mw_bind = (acc & IB_ACCESS_MW_BIND) ? 1 : 0;
789 	mr->hwmr.remote_atomic = (acc & IB_ACCESS_REMOTE_ATOMIC) ? 1 : 0;
790 	mr->hwmr.num_pbls = num_pbls;
791 
792 	status = ocrdma_mbx_alloc_lkey(dev, &mr->hwmr, pdid, addr_check);
793 	if (status)
794 		return status;
795 
796 	mr->ibmr.lkey = mr->hwmr.lkey;
797 	if (mr->hwmr.remote_wr || mr->hwmr.remote_rd)
798 		mr->ibmr.rkey = mr->hwmr.lkey;
799 	return 0;
800 }
801 
802 struct ib_mr *ocrdma_get_dma_mr(struct ib_pd *ibpd, int acc)
803 {
804 	int status;
805 	struct ocrdma_mr *mr;
806 	struct ocrdma_pd *pd = get_ocrdma_pd(ibpd);
807 	struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device);
808 
809 	if (acc & IB_ACCESS_REMOTE_WRITE && !(acc & IB_ACCESS_LOCAL_WRITE)) {
810 		pr_err("%s err, invalid access rights\n", __func__);
811 		return ERR_PTR(-EINVAL);
812 	}
813 
814 	mr = kzalloc(sizeof(*mr), GFP_KERNEL);
815 	if (!mr)
816 		return ERR_PTR(-ENOMEM);
817 
818 	status = ocrdma_alloc_lkey(dev, mr, pd->id, acc, 0,
819 				   OCRDMA_ADDR_CHECK_DISABLE);
820 	if (status) {
821 		kfree(mr);
822 		return ERR_PTR(status);
823 	}
824 
825 	return &mr->ibmr;
826 }
827 
828 static void ocrdma_free_mr_pbl_tbl(struct ocrdma_dev *dev,
829 				   struct ocrdma_hw_mr *mr)
830 {
831 	struct pci_dev *pdev = dev->nic_info.pdev;
832 	int i = 0;
833 
834 	if (mr->pbl_table) {
835 		for (i = 0; i < mr->num_pbls; i++) {
836 			if (!mr->pbl_table[i].va)
837 				continue;
838 			dma_free_coherent(&pdev->dev, mr->pbl_size,
839 					  mr->pbl_table[i].va,
840 					  mr->pbl_table[i].pa);
841 		}
842 		kfree(mr->pbl_table);
843 		mr->pbl_table = NULL;
844 	}
845 }
846 
847 static int ocrdma_get_pbl_info(struct ocrdma_dev *dev, struct ocrdma_mr *mr,
848 			      u32 num_pbes)
849 {
850 	u32 num_pbls = 0;
851 	u32 idx = 0;
852 	int status = 0;
853 	u32 pbl_size;
854 
855 	do {
856 		pbl_size = OCRDMA_MIN_HPAGE_SIZE * (1 << idx);
857 		if (pbl_size > MAX_OCRDMA_PBL_SIZE) {
858 			status = -EFAULT;
859 			break;
860 		}
861 		num_pbls = roundup(num_pbes, (pbl_size / sizeof(u64)));
862 		num_pbls = num_pbls / (pbl_size / sizeof(u64));
863 		idx++;
864 	} while (num_pbls >= dev->attr.max_num_mr_pbl);
865 
866 	mr->hwmr.num_pbes = num_pbes;
867 	mr->hwmr.num_pbls = num_pbls;
868 	mr->hwmr.pbl_size = pbl_size;
869 	return status;
870 }
871 
872 static int ocrdma_build_pbl_tbl(struct ocrdma_dev *dev, struct ocrdma_hw_mr *mr)
873 {
874 	int status = 0;
875 	int i;
876 	u32 dma_len = mr->pbl_size;
877 	struct pci_dev *pdev = dev->nic_info.pdev;
878 	void *va;
879 	dma_addr_t pa;
880 
881 	mr->pbl_table = kzalloc(sizeof(struct ocrdma_pbl) *
882 				mr->num_pbls, GFP_KERNEL);
883 
884 	if (!mr->pbl_table)
885 		return -ENOMEM;
886 
887 	for (i = 0; i < mr->num_pbls; i++) {
888 		va = dma_alloc_coherent(&pdev->dev, dma_len, &pa, GFP_KERNEL);
889 		if (!va) {
890 			ocrdma_free_mr_pbl_tbl(dev, mr);
891 			status = -ENOMEM;
892 			break;
893 		}
894 		memset(va, 0, dma_len);
895 		mr->pbl_table[i].va = va;
896 		mr->pbl_table[i].pa = pa;
897 	}
898 	return status;
899 }
900 
901 static void build_user_pbes(struct ocrdma_dev *dev, struct ocrdma_mr *mr,
902 			    u32 num_pbes)
903 {
904 	struct ocrdma_pbe *pbe;
905 	struct scatterlist *sg;
906 	struct ocrdma_pbl *pbl_tbl = mr->hwmr.pbl_table;
907 	struct ib_umem *umem = mr->umem;
908 	int shift, pg_cnt, pages, pbe_cnt, entry, total_num_pbes = 0;
909 
910 	if (!mr->hwmr.num_pbes)
911 		return;
912 
913 	pbe = (struct ocrdma_pbe *)pbl_tbl->va;
914 	pbe_cnt = 0;
915 
916 	shift = ilog2(umem->page_size);
917 
918 	for_each_sg(umem->sg_head.sgl, sg, umem->nmap, entry) {
919 		pages = sg_dma_len(sg) >> shift;
920 		for (pg_cnt = 0; pg_cnt < pages; pg_cnt++) {
921 			/* store the page address in pbe */
922 			pbe->pa_lo =
923 			    cpu_to_le32(sg_dma_address
924 					(sg) +
925 					(umem->page_size * pg_cnt));
926 			pbe->pa_hi =
927 			    cpu_to_le32(upper_32_bits
928 					((sg_dma_address
929 					  (sg) +
930 					  umem->page_size * pg_cnt)));
931 			pbe_cnt += 1;
932 			total_num_pbes += 1;
933 			pbe++;
934 
935 			/* if done building pbes, issue the mbx cmd. */
936 			if (total_num_pbes == num_pbes)
937 				return;
938 
939 			/* if the given pbl is full storing the pbes,
940 			 * move to next pbl.
941 			 */
942 			if (pbe_cnt ==
943 				(mr->hwmr.pbl_size / sizeof(u64))) {
944 				pbl_tbl++;
945 				pbe = (struct ocrdma_pbe *)pbl_tbl->va;
946 				pbe_cnt = 0;
947 			}
948 
949 		}
950 	}
951 }
952 
953 struct ib_mr *ocrdma_reg_user_mr(struct ib_pd *ibpd, u64 start, u64 len,
954 				 u64 usr_addr, int acc, struct ib_udata *udata)
955 {
956 	int status = -ENOMEM;
957 	struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device);
958 	struct ocrdma_mr *mr;
959 	struct ocrdma_pd *pd;
960 	u32 num_pbes;
961 
962 	pd = get_ocrdma_pd(ibpd);
963 
964 	if (acc & IB_ACCESS_REMOTE_WRITE && !(acc & IB_ACCESS_LOCAL_WRITE))
965 		return ERR_PTR(-EINVAL);
966 
967 	mr = kzalloc(sizeof(*mr), GFP_KERNEL);
968 	if (!mr)
969 		return ERR_PTR(status);
970 	mr->umem = ib_umem_get(ibpd->uobject->context, start, len, acc, 0);
971 	if (IS_ERR(mr->umem)) {
972 		status = -EFAULT;
973 		goto umem_err;
974 	}
975 	num_pbes = ib_umem_page_count(mr->umem);
976 	status = ocrdma_get_pbl_info(dev, mr, num_pbes);
977 	if (status)
978 		goto umem_err;
979 
980 	mr->hwmr.pbe_size = mr->umem->page_size;
981 	mr->hwmr.fbo = ib_umem_offset(mr->umem);
982 	mr->hwmr.va = usr_addr;
983 	mr->hwmr.len = len;
984 	mr->hwmr.remote_wr = (acc & IB_ACCESS_REMOTE_WRITE) ? 1 : 0;
985 	mr->hwmr.remote_rd = (acc & IB_ACCESS_REMOTE_READ) ? 1 : 0;
986 	mr->hwmr.local_wr = (acc & IB_ACCESS_LOCAL_WRITE) ? 1 : 0;
987 	mr->hwmr.local_rd = 1;
988 	mr->hwmr.remote_atomic = (acc & IB_ACCESS_REMOTE_ATOMIC) ? 1 : 0;
989 	status = ocrdma_build_pbl_tbl(dev, &mr->hwmr);
990 	if (status)
991 		goto umem_err;
992 	build_user_pbes(dev, mr, num_pbes);
993 	status = ocrdma_reg_mr(dev, &mr->hwmr, pd->id, acc);
994 	if (status)
995 		goto mbx_err;
996 	mr->ibmr.lkey = mr->hwmr.lkey;
997 	if (mr->hwmr.remote_wr || mr->hwmr.remote_rd)
998 		mr->ibmr.rkey = mr->hwmr.lkey;
999 
1000 	return &mr->ibmr;
1001 
1002 mbx_err:
1003 	ocrdma_free_mr_pbl_tbl(dev, &mr->hwmr);
1004 umem_err:
1005 	kfree(mr);
1006 	return ERR_PTR(status);
1007 }
1008 
1009 int ocrdma_dereg_mr(struct ib_mr *ib_mr)
1010 {
1011 	struct ocrdma_mr *mr = get_ocrdma_mr(ib_mr);
1012 	struct ocrdma_dev *dev = get_ocrdma_dev(ib_mr->device);
1013 
1014 	(void) ocrdma_mbx_dealloc_lkey(dev, mr->hwmr.fr_mr, mr->hwmr.lkey);
1015 
1016 	kfree(mr->pages);
1017 	ocrdma_free_mr_pbl_tbl(dev, &mr->hwmr);
1018 
1019 	/* it could be user registered memory. */
1020 	if (mr->umem)
1021 		ib_umem_release(mr->umem);
1022 	kfree(mr);
1023 
1024 	/* Don't stop cleanup, in case FW is unresponsive */
1025 	if (dev->mqe_ctx.fw_error_state) {
1026 		pr_err("%s(%d) fw not responding.\n",
1027 		       __func__, dev->id);
1028 	}
1029 	return 0;
1030 }
1031 
1032 static int ocrdma_copy_cq_uresp(struct ocrdma_dev *dev, struct ocrdma_cq *cq,
1033 				struct ib_udata *udata,
1034 				struct ib_ucontext *ib_ctx)
1035 {
1036 	int status;
1037 	struct ocrdma_ucontext *uctx = get_ocrdma_ucontext(ib_ctx);
1038 	struct ocrdma_create_cq_uresp uresp;
1039 
1040 	memset(&uresp, 0, sizeof(uresp));
1041 	uresp.cq_id = cq->id;
1042 	uresp.page_size = PAGE_ALIGN(cq->len);
1043 	uresp.num_pages = 1;
1044 	uresp.max_hw_cqe = cq->max_hw_cqe;
1045 	uresp.page_addr[0] = virt_to_phys(cq->va);
1046 	uresp.db_page_addr =  ocrdma_get_db_addr(dev, uctx->cntxt_pd->id);
1047 	uresp.db_page_size = dev->nic_info.db_page_size;
1048 	uresp.phase_change = cq->phase_change ? 1 : 0;
1049 	status = ib_copy_to_udata(udata, &uresp, sizeof(uresp));
1050 	if (status) {
1051 		pr_err("%s(%d) copy error cqid=0x%x.\n",
1052 		       __func__, dev->id, cq->id);
1053 		goto err;
1054 	}
1055 	status = ocrdma_add_mmap(uctx, uresp.db_page_addr, uresp.db_page_size);
1056 	if (status)
1057 		goto err;
1058 	status = ocrdma_add_mmap(uctx, uresp.page_addr[0], uresp.page_size);
1059 	if (status) {
1060 		ocrdma_del_mmap(uctx, uresp.db_page_addr, uresp.db_page_size);
1061 		goto err;
1062 	}
1063 	cq->ucontext = uctx;
1064 err:
1065 	return status;
1066 }
1067 
1068 struct ib_cq *ocrdma_create_cq(struct ib_device *ibdev,
1069 			       const struct ib_cq_init_attr *attr,
1070 			       struct ib_ucontext *ib_ctx,
1071 			       struct ib_udata *udata)
1072 {
1073 	int entries = attr->cqe;
1074 	struct ocrdma_cq *cq;
1075 	struct ocrdma_dev *dev = get_ocrdma_dev(ibdev);
1076 	struct ocrdma_ucontext *uctx = NULL;
1077 	u16 pd_id = 0;
1078 	int status;
1079 	struct ocrdma_create_cq_ureq ureq;
1080 
1081 	if (attr->flags)
1082 		return ERR_PTR(-EINVAL);
1083 
1084 	if (udata) {
1085 		if (ib_copy_from_udata(&ureq, udata, sizeof(ureq)))
1086 			return ERR_PTR(-EFAULT);
1087 	} else
1088 		ureq.dpp_cq = 0;
1089 	cq = kzalloc(sizeof(*cq), GFP_KERNEL);
1090 	if (!cq)
1091 		return ERR_PTR(-ENOMEM);
1092 
1093 	spin_lock_init(&cq->cq_lock);
1094 	spin_lock_init(&cq->comp_handler_lock);
1095 	INIT_LIST_HEAD(&cq->sq_head);
1096 	INIT_LIST_HEAD(&cq->rq_head);
1097 
1098 	if (ib_ctx) {
1099 		uctx = get_ocrdma_ucontext(ib_ctx);
1100 		pd_id = uctx->cntxt_pd->id;
1101 	}
1102 
1103 	status = ocrdma_mbx_create_cq(dev, cq, entries, ureq.dpp_cq, pd_id);
1104 	if (status) {
1105 		kfree(cq);
1106 		return ERR_PTR(status);
1107 	}
1108 	if (ib_ctx) {
1109 		status = ocrdma_copy_cq_uresp(dev, cq, udata, ib_ctx);
1110 		if (status)
1111 			goto ctx_err;
1112 	}
1113 	cq->phase = OCRDMA_CQE_VALID;
1114 	dev->cq_tbl[cq->id] = cq;
1115 	return &cq->ibcq;
1116 
1117 ctx_err:
1118 	ocrdma_mbx_destroy_cq(dev, cq);
1119 	kfree(cq);
1120 	return ERR_PTR(status);
1121 }
1122 
1123 int ocrdma_resize_cq(struct ib_cq *ibcq, int new_cnt,
1124 		     struct ib_udata *udata)
1125 {
1126 	int status = 0;
1127 	struct ocrdma_cq *cq = get_ocrdma_cq(ibcq);
1128 
1129 	if (new_cnt < 1 || new_cnt > cq->max_hw_cqe) {
1130 		status = -EINVAL;
1131 		return status;
1132 	}
1133 	ibcq->cqe = new_cnt;
1134 	return status;
1135 }
1136 
1137 static void ocrdma_flush_cq(struct ocrdma_cq *cq)
1138 {
1139 	int cqe_cnt;
1140 	int valid_count = 0;
1141 	unsigned long flags;
1142 
1143 	struct ocrdma_dev *dev = get_ocrdma_dev(cq->ibcq.device);
1144 	struct ocrdma_cqe *cqe = NULL;
1145 
1146 	cqe = cq->va;
1147 	cqe_cnt = cq->cqe_cnt;
1148 
1149 	/* Last irq might have scheduled a polling thread
1150 	 * sync-up with it before hard flushing.
1151 	 */
1152 	spin_lock_irqsave(&cq->cq_lock, flags);
1153 	while (cqe_cnt) {
1154 		if (is_cqe_valid(cq, cqe))
1155 			valid_count++;
1156 		cqe++;
1157 		cqe_cnt--;
1158 	}
1159 	ocrdma_ring_cq_db(dev, cq->id, false, false, valid_count);
1160 	spin_unlock_irqrestore(&cq->cq_lock, flags);
1161 }
1162 
1163 int ocrdma_destroy_cq(struct ib_cq *ibcq)
1164 {
1165 	struct ocrdma_cq *cq = get_ocrdma_cq(ibcq);
1166 	struct ocrdma_eq *eq = NULL;
1167 	struct ocrdma_dev *dev = get_ocrdma_dev(ibcq->device);
1168 	int pdid = 0;
1169 	u32 irq, indx;
1170 
1171 	dev->cq_tbl[cq->id] = NULL;
1172 	indx = ocrdma_get_eq_table_index(dev, cq->eqn);
1173 	if (indx == -EINVAL)
1174 		BUG();
1175 
1176 	eq = &dev->eq_tbl[indx];
1177 	irq = ocrdma_get_irq(dev, eq);
1178 	synchronize_irq(irq);
1179 	ocrdma_flush_cq(cq);
1180 
1181 	(void)ocrdma_mbx_destroy_cq(dev, cq);
1182 	if (cq->ucontext) {
1183 		pdid = cq->ucontext->cntxt_pd->id;
1184 		ocrdma_del_mmap(cq->ucontext, (u64) cq->pa,
1185 				PAGE_ALIGN(cq->len));
1186 		ocrdma_del_mmap(cq->ucontext,
1187 				ocrdma_get_db_addr(dev, pdid),
1188 				dev->nic_info.db_page_size);
1189 	}
1190 
1191 	kfree(cq);
1192 	return 0;
1193 }
1194 
1195 static int ocrdma_add_qpn_map(struct ocrdma_dev *dev, struct ocrdma_qp *qp)
1196 {
1197 	int status = -EINVAL;
1198 
1199 	if (qp->id < OCRDMA_MAX_QP && dev->qp_tbl[qp->id] == NULL) {
1200 		dev->qp_tbl[qp->id] = qp;
1201 		status = 0;
1202 	}
1203 	return status;
1204 }
1205 
1206 static void ocrdma_del_qpn_map(struct ocrdma_dev *dev, struct ocrdma_qp *qp)
1207 {
1208 	dev->qp_tbl[qp->id] = NULL;
1209 }
1210 
1211 static int ocrdma_check_qp_params(struct ib_pd *ibpd, struct ocrdma_dev *dev,
1212 				  struct ib_qp_init_attr *attrs)
1213 {
1214 	if ((attrs->qp_type != IB_QPT_GSI) &&
1215 	    (attrs->qp_type != IB_QPT_RC) &&
1216 	    (attrs->qp_type != IB_QPT_UC) &&
1217 	    (attrs->qp_type != IB_QPT_UD)) {
1218 		pr_err("%s(%d) unsupported qp type=0x%x requested\n",
1219 		       __func__, dev->id, attrs->qp_type);
1220 		return -EINVAL;
1221 	}
1222 	/* Skip the check for QP1 to support CM size of 128 */
1223 	if ((attrs->qp_type != IB_QPT_GSI) &&
1224 	    (attrs->cap.max_send_wr > dev->attr.max_wqe)) {
1225 		pr_err("%s(%d) unsupported send_wr=0x%x requested\n",
1226 		       __func__, dev->id, attrs->cap.max_send_wr);
1227 		pr_err("%s(%d) supported send_wr=0x%x\n",
1228 		       __func__, dev->id, dev->attr.max_wqe);
1229 		return -EINVAL;
1230 	}
1231 	if (!attrs->srq && (attrs->cap.max_recv_wr > dev->attr.max_rqe)) {
1232 		pr_err("%s(%d) unsupported recv_wr=0x%x requested\n",
1233 		       __func__, dev->id, attrs->cap.max_recv_wr);
1234 		pr_err("%s(%d) supported recv_wr=0x%x\n",
1235 		       __func__, dev->id, dev->attr.max_rqe);
1236 		return -EINVAL;
1237 	}
1238 	if (attrs->cap.max_inline_data > dev->attr.max_inline_data) {
1239 		pr_err("%s(%d) unsupported inline data size=0x%x requested\n",
1240 		       __func__, dev->id, attrs->cap.max_inline_data);
1241 		pr_err("%s(%d) supported inline data size=0x%x\n",
1242 		       __func__, dev->id, dev->attr.max_inline_data);
1243 		return -EINVAL;
1244 	}
1245 	if (attrs->cap.max_send_sge > dev->attr.max_send_sge) {
1246 		pr_err("%s(%d) unsupported send_sge=0x%x requested\n",
1247 		       __func__, dev->id, attrs->cap.max_send_sge);
1248 		pr_err("%s(%d) supported send_sge=0x%x\n",
1249 		       __func__, dev->id, dev->attr.max_send_sge);
1250 		return -EINVAL;
1251 	}
1252 	if (attrs->cap.max_recv_sge > dev->attr.max_recv_sge) {
1253 		pr_err("%s(%d) unsupported recv_sge=0x%x requested\n",
1254 		       __func__, dev->id, attrs->cap.max_recv_sge);
1255 		pr_err("%s(%d) supported recv_sge=0x%x\n",
1256 		       __func__, dev->id, dev->attr.max_recv_sge);
1257 		return -EINVAL;
1258 	}
1259 	/* unprivileged user space cannot create special QP */
1260 	if (ibpd->uobject && attrs->qp_type == IB_QPT_GSI) {
1261 		pr_err
1262 		    ("%s(%d) Userspace can't create special QPs of type=0x%x\n",
1263 		     __func__, dev->id, attrs->qp_type);
1264 		return -EINVAL;
1265 	}
1266 	/* allow creating only one GSI type of QP */
1267 	if (attrs->qp_type == IB_QPT_GSI && dev->gsi_qp_created) {
1268 		pr_err("%s(%d) GSI special QPs already created.\n",
1269 		       __func__, dev->id);
1270 		return -EINVAL;
1271 	}
1272 	/* verify consumer QPs are not trying to use GSI QP's CQ */
1273 	if ((attrs->qp_type != IB_QPT_GSI) && (dev->gsi_qp_created)) {
1274 		if ((dev->gsi_sqcq == get_ocrdma_cq(attrs->send_cq)) ||
1275 			(dev->gsi_rqcq == get_ocrdma_cq(attrs->recv_cq))) {
1276 			pr_err("%s(%d) Consumer QP cannot use GSI CQs.\n",
1277 				__func__, dev->id);
1278 			return -EINVAL;
1279 		}
1280 	}
1281 	return 0;
1282 }
1283 
1284 static int ocrdma_copy_qp_uresp(struct ocrdma_qp *qp,
1285 				struct ib_udata *udata, int dpp_offset,
1286 				int dpp_credit_lmt, int srq)
1287 {
1288 	int status = 0;
1289 	u64 usr_db;
1290 	struct ocrdma_create_qp_uresp uresp;
1291 	struct ocrdma_pd *pd = qp->pd;
1292 	struct ocrdma_dev *dev = get_ocrdma_dev(pd->ibpd.device);
1293 
1294 	memset(&uresp, 0, sizeof(uresp));
1295 	usr_db = dev->nic_info.unmapped_db +
1296 			(pd->id * dev->nic_info.db_page_size);
1297 	uresp.qp_id = qp->id;
1298 	uresp.sq_dbid = qp->sq.dbid;
1299 	uresp.num_sq_pages = 1;
1300 	uresp.sq_page_size = PAGE_ALIGN(qp->sq.len);
1301 	uresp.sq_page_addr[0] = virt_to_phys(qp->sq.va);
1302 	uresp.num_wqe_allocated = qp->sq.max_cnt;
1303 	if (!srq) {
1304 		uresp.rq_dbid = qp->rq.dbid;
1305 		uresp.num_rq_pages = 1;
1306 		uresp.rq_page_size = PAGE_ALIGN(qp->rq.len);
1307 		uresp.rq_page_addr[0] = virt_to_phys(qp->rq.va);
1308 		uresp.num_rqe_allocated = qp->rq.max_cnt;
1309 	}
1310 	uresp.db_page_addr = usr_db;
1311 	uresp.db_page_size = dev->nic_info.db_page_size;
1312 	uresp.db_sq_offset = OCRDMA_DB_GEN2_SQ_OFFSET;
1313 	uresp.db_rq_offset = OCRDMA_DB_GEN2_RQ_OFFSET;
1314 	uresp.db_shift = OCRDMA_DB_RQ_SHIFT;
1315 
1316 	if (qp->dpp_enabled) {
1317 		uresp.dpp_credit = dpp_credit_lmt;
1318 		uresp.dpp_offset = dpp_offset;
1319 	}
1320 	status = ib_copy_to_udata(udata, &uresp, sizeof(uresp));
1321 	if (status) {
1322 		pr_err("%s(%d) user copy error.\n", __func__, dev->id);
1323 		goto err;
1324 	}
1325 	status = ocrdma_add_mmap(pd->uctx, uresp.sq_page_addr[0],
1326 				 uresp.sq_page_size);
1327 	if (status)
1328 		goto err;
1329 
1330 	if (!srq) {
1331 		status = ocrdma_add_mmap(pd->uctx, uresp.rq_page_addr[0],
1332 					 uresp.rq_page_size);
1333 		if (status)
1334 			goto rq_map_err;
1335 	}
1336 	return status;
1337 rq_map_err:
1338 	ocrdma_del_mmap(pd->uctx, uresp.sq_page_addr[0], uresp.sq_page_size);
1339 err:
1340 	return status;
1341 }
1342 
1343 static void ocrdma_set_qp_db(struct ocrdma_dev *dev, struct ocrdma_qp *qp,
1344 			     struct ocrdma_pd *pd)
1345 {
1346 	if (ocrdma_get_asic_type(dev) == OCRDMA_ASIC_GEN_SKH_R) {
1347 		qp->sq_db = dev->nic_info.db +
1348 			(pd->id * dev->nic_info.db_page_size) +
1349 			OCRDMA_DB_GEN2_SQ_OFFSET;
1350 		qp->rq_db = dev->nic_info.db +
1351 			(pd->id * dev->nic_info.db_page_size) +
1352 			OCRDMA_DB_GEN2_RQ_OFFSET;
1353 	} else {
1354 		qp->sq_db = dev->nic_info.db +
1355 			(pd->id * dev->nic_info.db_page_size) +
1356 			OCRDMA_DB_SQ_OFFSET;
1357 		qp->rq_db = dev->nic_info.db +
1358 			(pd->id * dev->nic_info.db_page_size) +
1359 			OCRDMA_DB_RQ_OFFSET;
1360 	}
1361 }
1362 
1363 static int ocrdma_alloc_wr_id_tbl(struct ocrdma_qp *qp)
1364 {
1365 	qp->wqe_wr_id_tbl =
1366 	    kzalloc(sizeof(*(qp->wqe_wr_id_tbl)) * qp->sq.max_cnt,
1367 		    GFP_KERNEL);
1368 	if (qp->wqe_wr_id_tbl == NULL)
1369 		return -ENOMEM;
1370 	qp->rqe_wr_id_tbl =
1371 	    kzalloc(sizeof(u64) * qp->rq.max_cnt, GFP_KERNEL);
1372 	if (qp->rqe_wr_id_tbl == NULL)
1373 		return -ENOMEM;
1374 
1375 	return 0;
1376 }
1377 
1378 static void ocrdma_set_qp_init_params(struct ocrdma_qp *qp,
1379 				      struct ocrdma_pd *pd,
1380 				      struct ib_qp_init_attr *attrs)
1381 {
1382 	qp->pd = pd;
1383 	spin_lock_init(&qp->q_lock);
1384 	INIT_LIST_HEAD(&qp->sq_entry);
1385 	INIT_LIST_HEAD(&qp->rq_entry);
1386 
1387 	qp->qp_type = attrs->qp_type;
1388 	qp->cap_flags = OCRDMA_QP_INB_RD | OCRDMA_QP_INB_WR;
1389 	qp->max_inline_data = attrs->cap.max_inline_data;
1390 	qp->sq.max_sges = attrs->cap.max_send_sge;
1391 	qp->rq.max_sges = attrs->cap.max_recv_sge;
1392 	qp->state = OCRDMA_QPS_RST;
1393 	qp->signaled = (attrs->sq_sig_type == IB_SIGNAL_ALL_WR) ? true : false;
1394 }
1395 
1396 static void ocrdma_store_gsi_qp_cq(struct ocrdma_dev *dev,
1397 				   struct ib_qp_init_attr *attrs)
1398 {
1399 	if (attrs->qp_type == IB_QPT_GSI) {
1400 		dev->gsi_qp_created = 1;
1401 		dev->gsi_sqcq = get_ocrdma_cq(attrs->send_cq);
1402 		dev->gsi_rqcq = get_ocrdma_cq(attrs->recv_cq);
1403 	}
1404 }
1405 
1406 struct ib_qp *ocrdma_create_qp(struct ib_pd *ibpd,
1407 			       struct ib_qp_init_attr *attrs,
1408 			       struct ib_udata *udata)
1409 {
1410 	int status;
1411 	struct ocrdma_pd *pd = get_ocrdma_pd(ibpd);
1412 	struct ocrdma_qp *qp;
1413 	struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device);
1414 	struct ocrdma_create_qp_ureq ureq;
1415 	u16 dpp_credit_lmt, dpp_offset;
1416 
1417 	status = ocrdma_check_qp_params(ibpd, dev, attrs);
1418 	if (status)
1419 		goto gen_err;
1420 
1421 	memset(&ureq, 0, sizeof(ureq));
1422 	if (udata) {
1423 		if (ib_copy_from_udata(&ureq, udata, sizeof(ureq)))
1424 			return ERR_PTR(-EFAULT);
1425 	}
1426 	qp = kzalloc(sizeof(*qp), GFP_KERNEL);
1427 	if (!qp) {
1428 		status = -ENOMEM;
1429 		goto gen_err;
1430 	}
1431 	ocrdma_set_qp_init_params(qp, pd, attrs);
1432 	if (udata == NULL)
1433 		qp->cap_flags |= (OCRDMA_QP_MW_BIND | OCRDMA_QP_LKEY0 |
1434 					OCRDMA_QP_FAST_REG);
1435 
1436 	mutex_lock(&dev->dev_lock);
1437 	status = ocrdma_mbx_create_qp(qp, attrs, ureq.enable_dpp_cq,
1438 					ureq.dpp_cq_id,
1439 					&dpp_offset, &dpp_credit_lmt);
1440 	if (status)
1441 		goto mbx_err;
1442 
1443 	/* user space QP's wr_id table are managed in library */
1444 	if (udata == NULL) {
1445 		status = ocrdma_alloc_wr_id_tbl(qp);
1446 		if (status)
1447 			goto map_err;
1448 	}
1449 
1450 	status = ocrdma_add_qpn_map(dev, qp);
1451 	if (status)
1452 		goto map_err;
1453 	ocrdma_set_qp_db(dev, qp, pd);
1454 	if (udata) {
1455 		status = ocrdma_copy_qp_uresp(qp, udata, dpp_offset,
1456 					      dpp_credit_lmt,
1457 					      (attrs->srq != NULL));
1458 		if (status)
1459 			goto cpy_err;
1460 	}
1461 	ocrdma_store_gsi_qp_cq(dev, attrs);
1462 	qp->ibqp.qp_num = qp->id;
1463 	mutex_unlock(&dev->dev_lock);
1464 	return &qp->ibqp;
1465 
1466 cpy_err:
1467 	ocrdma_del_qpn_map(dev, qp);
1468 map_err:
1469 	ocrdma_mbx_destroy_qp(dev, qp);
1470 mbx_err:
1471 	mutex_unlock(&dev->dev_lock);
1472 	kfree(qp->wqe_wr_id_tbl);
1473 	kfree(qp->rqe_wr_id_tbl);
1474 	kfree(qp);
1475 	pr_err("%s(%d) error=%d\n", __func__, dev->id, status);
1476 gen_err:
1477 	return ERR_PTR(status);
1478 }
1479 
1480 int _ocrdma_modify_qp(struct ib_qp *ibqp, struct ib_qp_attr *attr,
1481 		      int attr_mask)
1482 {
1483 	int status = 0;
1484 	struct ocrdma_qp *qp;
1485 	struct ocrdma_dev *dev;
1486 	enum ib_qp_state old_qps;
1487 
1488 	qp = get_ocrdma_qp(ibqp);
1489 	dev = get_ocrdma_dev(ibqp->device);
1490 	if (attr_mask & IB_QP_STATE)
1491 		status = ocrdma_qp_state_change(qp, attr->qp_state, &old_qps);
1492 	/* if new and previous states are same hw doesn't need to
1493 	 * know about it.
1494 	 */
1495 	if (status < 0)
1496 		return status;
1497 	status = ocrdma_mbx_modify_qp(dev, qp, attr, attr_mask);
1498 
1499 	return status;
1500 }
1501 
1502 int ocrdma_modify_qp(struct ib_qp *ibqp, struct ib_qp_attr *attr,
1503 		     int attr_mask, struct ib_udata *udata)
1504 {
1505 	unsigned long flags;
1506 	int status = -EINVAL;
1507 	struct ocrdma_qp *qp;
1508 	struct ocrdma_dev *dev;
1509 	enum ib_qp_state old_qps, new_qps;
1510 
1511 	qp = get_ocrdma_qp(ibqp);
1512 	dev = get_ocrdma_dev(ibqp->device);
1513 
1514 	/* syncronize with multiple context trying to change, retrive qps */
1515 	mutex_lock(&dev->dev_lock);
1516 	/* syncronize with wqe, rqe posting and cqe processing contexts */
1517 	spin_lock_irqsave(&qp->q_lock, flags);
1518 	old_qps = get_ibqp_state(qp->state);
1519 	if (attr_mask & IB_QP_STATE)
1520 		new_qps = attr->qp_state;
1521 	else
1522 		new_qps = old_qps;
1523 	spin_unlock_irqrestore(&qp->q_lock, flags);
1524 
1525 	if (!ib_modify_qp_is_ok(old_qps, new_qps, ibqp->qp_type, attr_mask,
1526 				IB_LINK_LAYER_ETHERNET)) {
1527 		pr_err("%s(%d) invalid attribute mask=0x%x specified for\n"
1528 		       "qpn=0x%x of type=0x%x old_qps=0x%x, new_qps=0x%x\n",
1529 		       __func__, dev->id, attr_mask, qp->id, ibqp->qp_type,
1530 		       old_qps, new_qps);
1531 		goto param_err;
1532 	}
1533 
1534 	status = _ocrdma_modify_qp(ibqp, attr, attr_mask);
1535 	if (status > 0)
1536 		status = 0;
1537 param_err:
1538 	mutex_unlock(&dev->dev_lock);
1539 	return status;
1540 }
1541 
1542 static enum ib_mtu ocrdma_mtu_int_to_enum(u16 mtu)
1543 {
1544 	switch (mtu) {
1545 	case 256:
1546 		return IB_MTU_256;
1547 	case 512:
1548 		return IB_MTU_512;
1549 	case 1024:
1550 		return IB_MTU_1024;
1551 	case 2048:
1552 		return IB_MTU_2048;
1553 	case 4096:
1554 		return IB_MTU_4096;
1555 	default:
1556 		return IB_MTU_1024;
1557 	}
1558 }
1559 
1560 static int ocrdma_to_ib_qp_acc_flags(int qp_cap_flags)
1561 {
1562 	int ib_qp_acc_flags = 0;
1563 
1564 	if (qp_cap_flags & OCRDMA_QP_INB_WR)
1565 		ib_qp_acc_flags |= IB_ACCESS_REMOTE_WRITE;
1566 	if (qp_cap_flags & OCRDMA_QP_INB_RD)
1567 		ib_qp_acc_flags |= IB_ACCESS_LOCAL_WRITE;
1568 	return ib_qp_acc_flags;
1569 }
1570 
1571 int ocrdma_query_qp(struct ib_qp *ibqp,
1572 		    struct ib_qp_attr *qp_attr,
1573 		    int attr_mask, struct ib_qp_init_attr *qp_init_attr)
1574 {
1575 	int status;
1576 	u32 qp_state;
1577 	struct ocrdma_qp_params params;
1578 	struct ocrdma_qp *qp = get_ocrdma_qp(ibqp);
1579 	struct ocrdma_dev *dev = get_ocrdma_dev(ibqp->device);
1580 
1581 	memset(&params, 0, sizeof(params));
1582 	mutex_lock(&dev->dev_lock);
1583 	status = ocrdma_mbx_query_qp(dev, qp, &params);
1584 	mutex_unlock(&dev->dev_lock);
1585 	if (status)
1586 		goto mbx_err;
1587 	if (qp->qp_type == IB_QPT_UD)
1588 		qp_attr->qkey = params.qkey;
1589 	qp_attr->path_mtu =
1590 		ocrdma_mtu_int_to_enum(params.path_mtu_pkey_indx &
1591 				OCRDMA_QP_PARAMS_PATH_MTU_MASK) >>
1592 				OCRDMA_QP_PARAMS_PATH_MTU_SHIFT;
1593 	qp_attr->path_mig_state = IB_MIG_MIGRATED;
1594 	qp_attr->rq_psn = params.hop_lmt_rq_psn & OCRDMA_QP_PARAMS_RQ_PSN_MASK;
1595 	qp_attr->sq_psn = params.tclass_sq_psn & OCRDMA_QP_PARAMS_SQ_PSN_MASK;
1596 	qp_attr->dest_qp_num =
1597 	    params.ack_to_rnr_rtc_dest_qpn & OCRDMA_QP_PARAMS_DEST_QPN_MASK;
1598 
1599 	qp_attr->qp_access_flags = ocrdma_to_ib_qp_acc_flags(qp->cap_flags);
1600 	qp_attr->cap.max_send_wr = qp->sq.max_cnt - 1;
1601 	qp_attr->cap.max_recv_wr = qp->rq.max_cnt - 1;
1602 	qp_attr->cap.max_send_sge = qp->sq.max_sges;
1603 	qp_attr->cap.max_recv_sge = qp->rq.max_sges;
1604 	qp_attr->cap.max_inline_data = qp->max_inline_data;
1605 	qp_init_attr->cap = qp_attr->cap;
1606 	memcpy(&qp_attr->ah_attr.grh.dgid, &params.dgid[0],
1607 	       sizeof(params.dgid));
1608 	qp_attr->ah_attr.grh.flow_label = params.rnt_rc_sl_fl &
1609 	    OCRDMA_QP_PARAMS_FLOW_LABEL_MASK;
1610 	qp_attr->ah_attr.grh.sgid_index = qp->sgid_idx;
1611 	qp_attr->ah_attr.grh.hop_limit = (params.hop_lmt_rq_psn &
1612 					  OCRDMA_QP_PARAMS_HOP_LMT_MASK) >>
1613 						OCRDMA_QP_PARAMS_HOP_LMT_SHIFT;
1614 	qp_attr->ah_attr.grh.traffic_class = (params.tclass_sq_psn &
1615 					      OCRDMA_QP_PARAMS_TCLASS_MASK) >>
1616 						OCRDMA_QP_PARAMS_TCLASS_SHIFT;
1617 
1618 	qp_attr->ah_attr.ah_flags = IB_AH_GRH;
1619 	qp_attr->ah_attr.port_num = 1;
1620 	qp_attr->ah_attr.sl = (params.rnt_rc_sl_fl &
1621 			       OCRDMA_QP_PARAMS_SL_MASK) >>
1622 				OCRDMA_QP_PARAMS_SL_SHIFT;
1623 	qp_attr->timeout = (params.ack_to_rnr_rtc_dest_qpn &
1624 			    OCRDMA_QP_PARAMS_ACK_TIMEOUT_MASK) >>
1625 				OCRDMA_QP_PARAMS_ACK_TIMEOUT_SHIFT;
1626 	qp_attr->rnr_retry = (params.ack_to_rnr_rtc_dest_qpn &
1627 			      OCRDMA_QP_PARAMS_RNR_RETRY_CNT_MASK) >>
1628 				OCRDMA_QP_PARAMS_RNR_RETRY_CNT_SHIFT;
1629 	qp_attr->retry_cnt =
1630 	    (params.rnt_rc_sl_fl & OCRDMA_QP_PARAMS_RETRY_CNT_MASK) >>
1631 		OCRDMA_QP_PARAMS_RETRY_CNT_SHIFT;
1632 	qp_attr->min_rnr_timer = 0;
1633 	qp_attr->pkey_index = 0;
1634 	qp_attr->port_num = 1;
1635 	qp_attr->ah_attr.src_path_bits = 0;
1636 	qp_attr->ah_attr.static_rate = 0;
1637 	qp_attr->alt_pkey_index = 0;
1638 	qp_attr->alt_port_num = 0;
1639 	qp_attr->alt_timeout = 0;
1640 	memset(&qp_attr->alt_ah_attr, 0, sizeof(qp_attr->alt_ah_attr));
1641 	qp_state = (params.max_sge_recv_flags & OCRDMA_QP_PARAMS_STATE_MASK) >>
1642 		    OCRDMA_QP_PARAMS_STATE_SHIFT;
1643 	qp_attr->qp_state = get_ibqp_state(qp_state);
1644 	qp_attr->cur_qp_state = qp_attr->qp_state;
1645 	qp_attr->sq_draining = (qp_state == OCRDMA_QPS_SQ_DRAINING) ? 1 : 0;
1646 	qp_attr->max_dest_rd_atomic =
1647 	    params.max_ord_ird >> OCRDMA_QP_PARAMS_MAX_ORD_SHIFT;
1648 	qp_attr->max_rd_atomic =
1649 	    params.max_ord_ird & OCRDMA_QP_PARAMS_MAX_IRD_MASK;
1650 	qp_attr->en_sqd_async_notify = (params.max_sge_recv_flags &
1651 				OCRDMA_QP_PARAMS_FLAGS_SQD_ASYNC) ? 1 : 0;
1652 	/* Sync driver QP state with FW */
1653 	ocrdma_qp_state_change(qp, qp_attr->qp_state, NULL);
1654 mbx_err:
1655 	return status;
1656 }
1657 
1658 static void ocrdma_srq_toggle_bit(struct ocrdma_srq *srq, unsigned int idx)
1659 {
1660 	unsigned int i = idx / 32;
1661 	u32 mask = (1U << (idx % 32));
1662 
1663 	srq->idx_bit_fields[i] ^= mask;
1664 }
1665 
1666 static int ocrdma_hwq_free_cnt(struct ocrdma_qp_hwq_info *q)
1667 {
1668 	return ((q->max_wqe_idx - q->head) + q->tail) % q->max_cnt;
1669 }
1670 
1671 static int is_hw_sq_empty(struct ocrdma_qp *qp)
1672 {
1673 	return (qp->sq.tail == qp->sq.head);
1674 }
1675 
1676 static int is_hw_rq_empty(struct ocrdma_qp *qp)
1677 {
1678 	return (qp->rq.tail == qp->rq.head);
1679 }
1680 
1681 static void *ocrdma_hwq_head(struct ocrdma_qp_hwq_info *q)
1682 {
1683 	return q->va + (q->head * q->entry_size);
1684 }
1685 
1686 static void *ocrdma_hwq_head_from_idx(struct ocrdma_qp_hwq_info *q,
1687 				      u32 idx)
1688 {
1689 	return q->va + (idx * q->entry_size);
1690 }
1691 
1692 static void ocrdma_hwq_inc_head(struct ocrdma_qp_hwq_info *q)
1693 {
1694 	q->head = (q->head + 1) & q->max_wqe_idx;
1695 }
1696 
1697 static void ocrdma_hwq_inc_tail(struct ocrdma_qp_hwq_info *q)
1698 {
1699 	q->tail = (q->tail + 1) & q->max_wqe_idx;
1700 }
1701 
1702 /* discard the cqe for a given QP */
1703 static void ocrdma_discard_cqes(struct ocrdma_qp *qp, struct ocrdma_cq *cq)
1704 {
1705 	unsigned long cq_flags;
1706 	unsigned long flags;
1707 	int discard_cnt = 0;
1708 	u32 cur_getp, stop_getp;
1709 	struct ocrdma_cqe *cqe;
1710 	u32 qpn = 0, wqe_idx = 0;
1711 
1712 	spin_lock_irqsave(&cq->cq_lock, cq_flags);
1713 
1714 	/* traverse through the CQEs in the hw CQ,
1715 	 * find the matching CQE for a given qp,
1716 	 * mark the matching one discarded by clearing qpn.
1717 	 * ring the doorbell in the poll_cq() as
1718 	 * we don't complete out of order cqe.
1719 	 */
1720 
1721 	cur_getp = cq->getp;
1722 	/* find upto when do we reap the cq. */
1723 	stop_getp = cur_getp;
1724 	do {
1725 		if (is_hw_sq_empty(qp) && (!qp->srq && is_hw_rq_empty(qp)))
1726 			break;
1727 
1728 		cqe = cq->va + cur_getp;
1729 		/* if (a) done reaping whole hw cq, or
1730 		 *    (b) qp_xq becomes empty.
1731 		 * then exit
1732 		 */
1733 		qpn = cqe->cmn.qpn & OCRDMA_CQE_QPN_MASK;
1734 		/* if previously discarded cqe found, skip that too. */
1735 		/* check for matching qp */
1736 		if (qpn == 0 || qpn != qp->id)
1737 			goto skip_cqe;
1738 
1739 		if (is_cqe_for_sq(cqe)) {
1740 			ocrdma_hwq_inc_tail(&qp->sq);
1741 		} else {
1742 			if (qp->srq) {
1743 				wqe_idx = (le32_to_cpu(cqe->rq.buftag_qpn) >>
1744 					OCRDMA_CQE_BUFTAG_SHIFT) &
1745 					qp->srq->rq.max_wqe_idx;
1746 				if (wqe_idx < 1)
1747 					BUG();
1748 				spin_lock_irqsave(&qp->srq->q_lock, flags);
1749 				ocrdma_hwq_inc_tail(&qp->srq->rq);
1750 				ocrdma_srq_toggle_bit(qp->srq, wqe_idx - 1);
1751 				spin_unlock_irqrestore(&qp->srq->q_lock, flags);
1752 
1753 			} else {
1754 				ocrdma_hwq_inc_tail(&qp->rq);
1755 			}
1756 		}
1757 		/* mark cqe discarded so that it is not picked up later
1758 		 * in the poll_cq().
1759 		 */
1760 		discard_cnt += 1;
1761 		cqe->cmn.qpn = 0;
1762 skip_cqe:
1763 		cur_getp = (cur_getp + 1) % cq->max_hw_cqe;
1764 	} while (cur_getp != stop_getp);
1765 	spin_unlock_irqrestore(&cq->cq_lock, cq_flags);
1766 }
1767 
1768 void ocrdma_del_flush_qp(struct ocrdma_qp *qp)
1769 {
1770 	int found = false;
1771 	unsigned long flags;
1772 	struct ocrdma_dev *dev = get_ocrdma_dev(qp->ibqp.device);
1773 	/* sync with any active CQ poll */
1774 
1775 	spin_lock_irqsave(&dev->flush_q_lock, flags);
1776 	found = ocrdma_is_qp_in_sq_flushlist(qp->sq_cq, qp);
1777 	if (found)
1778 		list_del(&qp->sq_entry);
1779 	if (!qp->srq) {
1780 		found = ocrdma_is_qp_in_rq_flushlist(qp->rq_cq, qp);
1781 		if (found)
1782 			list_del(&qp->rq_entry);
1783 	}
1784 	spin_unlock_irqrestore(&dev->flush_q_lock, flags);
1785 }
1786 
1787 int ocrdma_destroy_qp(struct ib_qp *ibqp)
1788 {
1789 	struct ocrdma_pd *pd;
1790 	struct ocrdma_qp *qp;
1791 	struct ocrdma_dev *dev;
1792 	struct ib_qp_attr attrs;
1793 	int attr_mask;
1794 	unsigned long flags;
1795 
1796 	qp = get_ocrdma_qp(ibqp);
1797 	dev = get_ocrdma_dev(ibqp->device);
1798 
1799 	pd = qp->pd;
1800 
1801 	/* change the QP state to ERROR */
1802 	if (qp->state != OCRDMA_QPS_RST) {
1803 		attrs.qp_state = IB_QPS_ERR;
1804 		attr_mask = IB_QP_STATE;
1805 		_ocrdma_modify_qp(ibqp, &attrs, attr_mask);
1806 	}
1807 	/* ensure that CQEs for newly created QP (whose id may be same with
1808 	 * one which just getting destroyed are same), dont get
1809 	 * discarded until the old CQEs are discarded.
1810 	 */
1811 	mutex_lock(&dev->dev_lock);
1812 	(void) ocrdma_mbx_destroy_qp(dev, qp);
1813 
1814 	/*
1815 	 * acquire CQ lock while destroy is in progress, in order to
1816 	 * protect against proessing in-flight CQEs for this QP.
1817 	 */
1818 	spin_lock_irqsave(&qp->sq_cq->cq_lock, flags);
1819 	if (qp->rq_cq && (qp->rq_cq != qp->sq_cq))
1820 		spin_lock(&qp->rq_cq->cq_lock);
1821 
1822 	ocrdma_del_qpn_map(dev, qp);
1823 
1824 	if (qp->rq_cq && (qp->rq_cq != qp->sq_cq))
1825 		spin_unlock(&qp->rq_cq->cq_lock);
1826 	spin_unlock_irqrestore(&qp->sq_cq->cq_lock, flags);
1827 
1828 	if (!pd->uctx) {
1829 		ocrdma_discard_cqes(qp, qp->sq_cq);
1830 		ocrdma_discard_cqes(qp, qp->rq_cq);
1831 	}
1832 	mutex_unlock(&dev->dev_lock);
1833 
1834 	if (pd->uctx) {
1835 		ocrdma_del_mmap(pd->uctx, (u64) qp->sq.pa,
1836 				PAGE_ALIGN(qp->sq.len));
1837 		if (!qp->srq)
1838 			ocrdma_del_mmap(pd->uctx, (u64) qp->rq.pa,
1839 					PAGE_ALIGN(qp->rq.len));
1840 	}
1841 
1842 	ocrdma_del_flush_qp(qp);
1843 
1844 	kfree(qp->wqe_wr_id_tbl);
1845 	kfree(qp->rqe_wr_id_tbl);
1846 	kfree(qp);
1847 	return 0;
1848 }
1849 
1850 static int ocrdma_copy_srq_uresp(struct ocrdma_dev *dev, struct ocrdma_srq *srq,
1851 				struct ib_udata *udata)
1852 {
1853 	int status;
1854 	struct ocrdma_create_srq_uresp uresp;
1855 
1856 	memset(&uresp, 0, sizeof(uresp));
1857 	uresp.rq_dbid = srq->rq.dbid;
1858 	uresp.num_rq_pages = 1;
1859 	uresp.rq_page_addr[0] = virt_to_phys(srq->rq.va);
1860 	uresp.rq_page_size = srq->rq.len;
1861 	uresp.db_page_addr = dev->nic_info.unmapped_db +
1862 	    (srq->pd->id * dev->nic_info.db_page_size);
1863 	uresp.db_page_size = dev->nic_info.db_page_size;
1864 	uresp.num_rqe_allocated = srq->rq.max_cnt;
1865 	if (ocrdma_get_asic_type(dev) == OCRDMA_ASIC_GEN_SKH_R) {
1866 		uresp.db_rq_offset = OCRDMA_DB_GEN2_RQ_OFFSET;
1867 		uresp.db_shift = 24;
1868 	} else {
1869 		uresp.db_rq_offset = OCRDMA_DB_RQ_OFFSET;
1870 		uresp.db_shift = 16;
1871 	}
1872 
1873 	status = ib_copy_to_udata(udata, &uresp, sizeof(uresp));
1874 	if (status)
1875 		return status;
1876 	status = ocrdma_add_mmap(srq->pd->uctx, uresp.rq_page_addr[0],
1877 				 uresp.rq_page_size);
1878 	if (status)
1879 		return status;
1880 	return status;
1881 }
1882 
1883 struct ib_srq *ocrdma_create_srq(struct ib_pd *ibpd,
1884 				 struct ib_srq_init_attr *init_attr,
1885 				 struct ib_udata *udata)
1886 {
1887 	int status = -ENOMEM;
1888 	struct ocrdma_pd *pd = get_ocrdma_pd(ibpd);
1889 	struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device);
1890 	struct ocrdma_srq *srq;
1891 
1892 	if (init_attr->attr.max_sge > dev->attr.max_recv_sge)
1893 		return ERR_PTR(-EINVAL);
1894 	if (init_attr->attr.max_wr > dev->attr.max_rqe)
1895 		return ERR_PTR(-EINVAL);
1896 
1897 	srq = kzalloc(sizeof(*srq), GFP_KERNEL);
1898 	if (!srq)
1899 		return ERR_PTR(status);
1900 
1901 	spin_lock_init(&srq->q_lock);
1902 	srq->pd = pd;
1903 	srq->db = dev->nic_info.db + (pd->id * dev->nic_info.db_page_size);
1904 	status = ocrdma_mbx_create_srq(dev, srq, init_attr, pd);
1905 	if (status)
1906 		goto err;
1907 
1908 	if (udata == NULL) {
1909 		srq->rqe_wr_id_tbl = kzalloc(sizeof(u64) * srq->rq.max_cnt,
1910 			    GFP_KERNEL);
1911 		if (srq->rqe_wr_id_tbl == NULL)
1912 			goto arm_err;
1913 
1914 		srq->bit_fields_len = (srq->rq.max_cnt / 32) +
1915 		    (srq->rq.max_cnt % 32 ? 1 : 0);
1916 		srq->idx_bit_fields =
1917 		    kmalloc(srq->bit_fields_len * sizeof(u32), GFP_KERNEL);
1918 		if (srq->idx_bit_fields == NULL)
1919 			goto arm_err;
1920 		memset(srq->idx_bit_fields, 0xff,
1921 		       srq->bit_fields_len * sizeof(u32));
1922 	}
1923 
1924 	if (init_attr->attr.srq_limit) {
1925 		status = ocrdma_mbx_modify_srq(srq, &init_attr->attr);
1926 		if (status)
1927 			goto arm_err;
1928 	}
1929 
1930 	if (udata) {
1931 		status = ocrdma_copy_srq_uresp(dev, srq, udata);
1932 		if (status)
1933 			goto arm_err;
1934 	}
1935 
1936 	return &srq->ibsrq;
1937 
1938 arm_err:
1939 	ocrdma_mbx_destroy_srq(dev, srq);
1940 err:
1941 	kfree(srq->rqe_wr_id_tbl);
1942 	kfree(srq->idx_bit_fields);
1943 	kfree(srq);
1944 	return ERR_PTR(status);
1945 }
1946 
1947 int ocrdma_modify_srq(struct ib_srq *ibsrq,
1948 		      struct ib_srq_attr *srq_attr,
1949 		      enum ib_srq_attr_mask srq_attr_mask,
1950 		      struct ib_udata *udata)
1951 {
1952 	int status = 0;
1953 	struct ocrdma_srq *srq;
1954 
1955 	srq = get_ocrdma_srq(ibsrq);
1956 	if (srq_attr_mask & IB_SRQ_MAX_WR)
1957 		status = -EINVAL;
1958 	else
1959 		status = ocrdma_mbx_modify_srq(srq, srq_attr);
1960 	return status;
1961 }
1962 
1963 int ocrdma_query_srq(struct ib_srq *ibsrq, struct ib_srq_attr *srq_attr)
1964 {
1965 	int status;
1966 	struct ocrdma_srq *srq;
1967 
1968 	srq = get_ocrdma_srq(ibsrq);
1969 	status = ocrdma_mbx_query_srq(srq, srq_attr);
1970 	return status;
1971 }
1972 
1973 int ocrdma_destroy_srq(struct ib_srq *ibsrq)
1974 {
1975 	int status;
1976 	struct ocrdma_srq *srq;
1977 	struct ocrdma_dev *dev = get_ocrdma_dev(ibsrq->device);
1978 
1979 	srq = get_ocrdma_srq(ibsrq);
1980 
1981 	status = ocrdma_mbx_destroy_srq(dev, srq);
1982 
1983 	if (srq->pd->uctx)
1984 		ocrdma_del_mmap(srq->pd->uctx, (u64) srq->rq.pa,
1985 				PAGE_ALIGN(srq->rq.len));
1986 
1987 	kfree(srq->idx_bit_fields);
1988 	kfree(srq->rqe_wr_id_tbl);
1989 	kfree(srq);
1990 	return status;
1991 }
1992 
1993 /* unprivileged verbs and their support functions. */
1994 static void ocrdma_build_ud_hdr(struct ocrdma_qp *qp,
1995 				struct ocrdma_hdr_wqe *hdr,
1996 				struct ib_send_wr *wr)
1997 {
1998 	struct ocrdma_ewqe_ud_hdr *ud_hdr =
1999 		(struct ocrdma_ewqe_ud_hdr *)(hdr + 1);
2000 	struct ocrdma_ah *ah = get_ocrdma_ah(ud_wr(wr)->ah);
2001 
2002 	ud_hdr->rsvd_dest_qpn = ud_wr(wr)->remote_qpn;
2003 	if (qp->qp_type == IB_QPT_GSI)
2004 		ud_hdr->qkey = qp->qkey;
2005 	else
2006 		ud_hdr->qkey = ud_wr(wr)->remote_qkey;
2007 	ud_hdr->rsvd_ahid = ah->id;
2008 	if (ah->av->valid & OCRDMA_AV_VLAN_VALID)
2009 		hdr->cw |= (OCRDMA_FLAG_AH_VLAN_PR << OCRDMA_WQE_FLAGS_SHIFT);
2010 }
2011 
2012 static void ocrdma_build_sges(struct ocrdma_hdr_wqe *hdr,
2013 			      struct ocrdma_sge *sge, int num_sge,
2014 			      struct ib_sge *sg_list)
2015 {
2016 	int i;
2017 
2018 	for (i = 0; i < num_sge; i++) {
2019 		sge[i].lrkey = sg_list[i].lkey;
2020 		sge[i].addr_lo = sg_list[i].addr;
2021 		sge[i].addr_hi = upper_32_bits(sg_list[i].addr);
2022 		sge[i].len = sg_list[i].length;
2023 		hdr->total_len += sg_list[i].length;
2024 	}
2025 	if (num_sge == 0)
2026 		memset(sge, 0, sizeof(*sge));
2027 }
2028 
2029 static inline uint32_t ocrdma_sglist_len(struct ib_sge *sg_list, int num_sge)
2030 {
2031 	uint32_t total_len = 0, i;
2032 
2033 	for (i = 0; i < num_sge; i++)
2034 		total_len += sg_list[i].length;
2035 	return total_len;
2036 }
2037 
2038 
2039 static int ocrdma_build_inline_sges(struct ocrdma_qp *qp,
2040 				    struct ocrdma_hdr_wqe *hdr,
2041 				    struct ocrdma_sge *sge,
2042 				    struct ib_send_wr *wr, u32 wqe_size)
2043 {
2044 	int i;
2045 	char *dpp_addr;
2046 
2047 	if (wr->send_flags & IB_SEND_INLINE && qp->qp_type != IB_QPT_UD) {
2048 		hdr->total_len = ocrdma_sglist_len(wr->sg_list, wr->num_sge);
2049 		if (unlikely(hdr->total_len > qp->max_inline_data)) {
2050 			pr_err("%s() supported_len=0x%x,\n"
2051 			       " unsupported len req=0x%x\n", __func__,
2052 				qp->max_inline_data, hdr->total_len);
2053 			return -EINVAL;
2054 		}
2055 		dpp_addr = (char *)sge;
2056 		for (i = 0; i < wr->num_sge; i++) {
2057 			memcpy(dpp_addr,
2058 			       (void *)(unsigned long)wr->sg_list[i].addr,
2059 			       wr->sg_list[i].length);
2060 			dpp_addr += wr->sg_list[i].length;
2061 		}
2062 
2063 		wqe_size += roundup(hdr->total_len, OCRDMA_WQE_ALIGN_BYTES);
2064 		if (0 == hdr->total_len)
2065 			wqe_size += sizeof(struct ocrdma_sge);
2066 		hdr->cw |= (OCRDMA_TYPE_INLINE << OCRDMA_WQE_TYPE_SHIFT);
2067 	} else {
2068 		ocrdma_build_sges(hdr, sge, wr->num_sge, wr->sg_list);
2069 		if (wr->num_sge)
2070 			wqe_size += (wr->num_sge * sizeof(struct ocrdma_sge));
2071 		else
2072 			wqe_size += sizeof(struct ocrdma_sge);
2073 		hdr->cw |= (OCRDMA_TYPE_LKEY << OCRDMA_WQE_TYPE_SHIFT);
2074 	}
2075 	hdr->cw |= ((wqe_size / OCRDMA_WQE_STRIDE) << OCRDMA_WQE_SIZE_SHIFT);
2076 	return 0;
2077 }
2078 
2079 static int ocrdma_build_send(struct ocrdma_qp *qp, struct ocrdma_hdr_wqe *hdr,
2080 			     struct ib_send_wr *wr)
2081 {
2082 	int status;
2083 	struct ocrdma_sge *sge;
2084 	u32 wqe_size = sizeof(*hdr);
2085 
2086 	if (qp->qp_type == IB_QPT_UD || qp->qp_type == IB_QPT_GSI) {
2087 		ocrdma_build_ud_hdr(qp, hdr, wr);
2088 		sge = (struct ocrdma_sge *)(hdr + 2);
2089 		wqe_size += sizeof(struct ocrdma_ewqe_ud_hdr);
2090 	} else {
2091 		sge = (struct ocrdma_sge *)(hdr + 1);
2092 	}
2093 
2094 	status = ocrdma_build_inline_sges(qp, hdr, sge, wr, wqe_size);
2095 	return status;
2096 }
2097 
2098 static int ocrdma_build_write(struct ocrdma_qp *qp, struct ocrdma_hdr_wqe *hdr,
2099 			      struct ib_send_wr *wr)
2100 {
2101 	int status;
2102 	struct ocrdma_sge *ext_rw = (struct ocrdma_sge *)(hdr + 1);
2103 	struct ocrdma_sge *sge = ext_rw + 1;
2104 	u32 wqe_size = sizeof(*hdr) + sizeof(*ext_rw);
2105 
2106 	status = ocrdma_build_inline_sges(qp, hdr, sge, wr, wqe_size);
2107 	if (status)
2108 		return status;
2109 	ext_rw->addr_lo = rdma_wr(wr)->remote_addr;
2110 	ext_rw->addr_hi = upper_32_bits(rdma_wr(wr)->remote_addr);
2111 	ext_rw->lrkey = rdma_wr(wr)->rkey;
2112 	ext_rw->len = hdr->total_len;
2113 	return 0;
2114 }
2115 
2116 static void ocrdma_build_read(struct ocrdma_qp *qp, struct ocrdma_hdr_wqe *hdr,
2117 			      struct ib_send_wr *wr)
2118 {
2119 	struct ocrdma_sge *ext_rw = (struct ocrdma_sge *)(hdr + 1);
2120 	struct ocrdma_sge *sge = ext_rw + 1;
2121 	u32 wqe_size = ((wr->num_sge + 1) * sizeof(struct ocrdma_sge)) +
2122 	    sizeof(struct ocrdma_hdr_wqe);
2123 
2124 	ocrdma_build_sges(hdr, sge, wr->num_sge, wr->sg_list);
2125 	hdr->cw |= ((wqe_size / OCRDMA_WQE_STRIDE) << OCRDMA_WQE_SIZE_SHIFT);
2126 	hdr->cw |= (OCRDMA_READ << OCRDMA_WQE_OPCODE_SHIFT);
2127 	hdr->cw |= (OCRDMA_TYPE_LKEY << OCRDMA_WQE_TYPE_SHIFT);
2128 
2129 	ext_rw->addr_lo = rdma_wr(wr)->remote_addr;
2130 	ext_rw->addr_hi = upper_32_bits(rdma_wr(wr)->remote_addr);
2131 	ext_rw->lrkey = rdma_wr(wr)->rkey;
2132 	ext_rw->len = hdr->total_len;
2133 }
2134 
2135 static int get_encoded_page_size(int pg_sz)
2136 {
2137 	/* Max size is 256M 4096 << 16 */
2138 	int i = 0;
2139 	for (; i < 17; i++)
2140 		if (pg_sz == (4096 << i))
2141 			break;
2142 	return i;
2143 }
2144 
2145 static int ocrdma_build_reg(struct ocrdma_qp *qp,
2146 			    struct ocrdma_hdr_wqe *hdr,
2147 			    struct ib_reg_wr *wr)
2148 {
2149 	u64 fbo;
2150 	struct ocrdma_ewqe_fr *fast_reg = (struct ocrdma_ewqe_fr *)(hdr + 1);
2151 	struct ocrdma_mr *mr = get_ocrdma_mr(wr->mr);
2152 	struct ocrdma_pbl *pbl_tbl = mr->hwmr.pbl_table;
2153 	struct ocrdma_pbe *pbe;
2154 	u32 wqe_size = sizeof(*fast_reg) + sizeof(*hdr);
2155 	int num_pbes = 0, i;
2156 
2157 	wqe_size = roundup(wqe_size, OCRDMA_WQE_ALIGN_BYTES);
2158 
2159 	hdr->cw |= (OCRDMA_FR_MR << OCRDMA_WQE_OPCODE_SHIFT);
2160 	hdr->cw |= ((wqe_size / OCRDMA_WQE_STRIDE) << OCRDMA_WQE_SIZE_SHIFT);
2161 
2162 	if (wr->access & IB_ACCESS_LOCAL_WRITE)
2163 		hdr->rsvd_lkey_flags |= OCRDMA_LKEY_FLAG_LOCAL_WR;
2164 	if (wr->access & IB_ACCESS_REMOTE_WRITE)
2165 		hdr->rsvd_lkey_flags |= OCRDMA_LKEY_FLAG_REMOTE_WR;
2166 	if (wr->access & IB_ACCESS_REMOTE_READ)
2167 		hdr->rsvd_lkey_flags |= OCRDMA_LKEY_FLAG_REMOTE_RD;
2168 	hdr->lkey = wr->key;
2169 	hdr->total_len = mr->ibmr.length;
2170 
2171 	fbo = mr->ibmr.iova - mr->pages[0];
2172 
2173 	fast_reg->va_hi = upper_32_bits(mr->ibmr.iova);
2174 	fast_reg->va_lo = (u32) (mr->ibmr.iova & 0xffffffff);
2175 	fast_reg->fbo_hi = upper_32_bits(fbo);
2176 	fast_reg->fbo_lo = (u32) fbo & 0xffffffff;
2177 	fast_reg->num_sges = mr->npages;
2178 	fast_reg->size_sge = get_encoded_page_size(mr->ibmr.page_size);
2179 
2180 	pbe = pbl_tbl->va;
2181 	for (i = 0; i < mr->npages; i++) {
2182 		u64 buf_addr = mr->pages[i];
2183 
2184 		pbe->pa_lo = cpu_to_le32((u32) (buf_addr & PAGE_MASK));
2185 		pbe->pa_hi = cpu_to_le32((u32) upper_32_bits(buf_addr));
2186 		num_pbes += 1;
2187 		pbe++;
2188 
2189 		/* if the pbl is full storing the pbes,
2190 		 * move to next pbl.
2191 		*/
2192 		if (num_pbes == (mr->hwmr.pbl_size/sizeof(u64))) {
2193 			pbl_tbl++;
2194 			pbe = (struct ocrdma_pbe *)pbl_tbl->va;
2195 		}
2196 	}
2197 
2198 	return 0;
2199 }
2200 
2201 static void ocrdma_ring_sq_db(struct ocrdma_qp *qp)
2202 {
2203 	u32 val = qp->sq.dbid | (1 << OCRDMA_DB_SQ_SHIFT);
2204 
2205 	iowrite32(val, qp->sq_db);
2206 }
2207 
2208 int ocrdma_post_send(struct ib_qp *ibqp, struct ib_send_wr *wr,
2209 		     struct ib_send_wr **bad_wr)
2210 {
2211 	int status = 0;
2212 	struct ocrdma_qp *qp = get_ocrdma_qp(ibqp);
2213 	struct ocrdma_hdr_wqe *hdr;
2214 	unsigned long flags;
2215 
2216 	spin_lock_irqsave(&qp->q_lock, flags);
2217 	if (qp->state != OCRDMA_QPS_RTS && qp->state != OCRDMA_QPS_SQD) {
2218 		spin_unlock_irqrestore(&qp->q_lock, flags);
2219 		*bad_wr = wr;
2220 		return -EINVAL;
2221 	}
2222 
2223 	while (wr) {
2224 		if (qp->qp_type == IB_QPT_UD &&
2225 		    (wr->opcode != IB_WR_SEND &&
2226 		     wr->opcode != IB_WR_SEND_WITH_IMM)) {
2227 			*bad_wr = wr;
2228 			status = -EINVAL;
2229 			break;
2230 		}
2231 		if (ocrdma_hwq_free_cnt(&qp->sq) == 0 ||
2232 		    wr->num_sge > qp->sq.max_sges) {
2233 			*bad_wr = wr;
2234 			status = -ENOMEM;
2235 			break;
2236 		}
2237 		hdr = ocrdma_hwq_head(&qp->sq);
2238 		hdr->cw = 0;
2239 		if (wr->send_flags & IB_SEND_SIGNALED || qp->signaled)
2240 			hdr->cw |= (OCRDMA_FLAG_SIG << OCRDMA_WQE_FLAGS_SHIFT);
2241 		if (wr->send_flags & IB_SEND_FENCE)
2242 			hdr->cw |=
2243 			    (OCRDMA_FLAG_FENCE_L << OCRDMA_WQE_FLAGS_SHIFT);
2244 		if (wr->send_flags & IB_SEND_SOLICITED)
2245 			hdr->cw |=
2246 			    (OCRDMA_FLAG_SOLICIT << OCRDMA_WQE_FLAGS_SHIFT);
2247 		hdr->total_len = 0;
2248 		switch (wr->opcode) {
2249 		case IB_WR_SEND_WITH_IMM:
2250 			hdr->cw |= (OCRDMA_FLAG_IMM << OCRDMA_WQE_FLAGS_SHIFT);
2251 			hdr->immdt = ntohl(wr->ex.imm_data);
2252 		case IB_WR_SEND:
2253 			hdr->cw |= (OCRDMA_SEND << OCRDMA_WQE_OPCODE_SHIFT);
2254 			ocrdma_build_send(qp, hdr, wr);
2255 			break;
2256 		case IB_WR_SEND_WITH_INV:
2257 			hdr->cw |= (OCRDMA_FLAG_INV << OCRDMA_WQE_FLAGS_SHIFT);
2258 			hdr->cw |= (OCRDMA_SEND << OCRDMA_WQE_OPCODE_SHIFT);
2259 			hdr->lkey = wr->ex.invalidate_rkey;
2260 			status = ocrdma_build_send(qp, hdr, wr);
2261 			break;
2262 		case IB_WR_RDMA_WRITE_WITH_IMM:
2263 			hdr->cw |= (OCRDMA_FLAG_IMM << OCRDMA_WQE_FLAGS_SHIFT);
2264 			hdr->immdt = ntohl(wr->ex.imm_data);
2265 		case IB_WR_RDMA_WRITE:
2266 			hdr->cw |= (OCRDMA_WRITE << OCRDMA_WQE_OPCODE_SHIFT);
2267 			status = ocrdma_build_write(qp, hdr, wr);
2268 			break;
2269 		case IB_WR_RDMA_READ:
2270 			ocrdma_build_read(qp, hdr, wr);
2271 			break;
2272 		case IB_WR_LOCAL_INV:
2273 			hdr->cw |=
2274 			    (OCRDMA_LKEY_INV << OCRDMA_WQE_OPCODE_SHIFT);
2275 			hdr->cw |= ((sizeof(struct ocrdma_hdr_wqe) +
2276 					sizeof(struct ocrdma_sge)) /
2277 				OCRDMA_WQE_STRIDE) << OCRDMA_WQE_SIZE_SHIFT;
2278 			hdr->lkey = wr->ex.invalidate_rkey;
2279 			break;
2280 		case IB_WR_REG_MR:
2281 			status = ocrdma_build_reg(qp, hdr, reg_wr(wr));
2282 			break;
2283 		default:
2284 			status = -EINVAL;
2285 			break;
2286 		}
2287 		if (status) {
2288 			*bad_wr = wr;
2289 			break;
2290 		}
2291 		if (wr->send_flags & IB_SEND_SIGNALED || qp->signaled)
2292 			qp->wqe_wr_id_tbl[qp->sq.head].signaled = 1;
2293 		else
2294 			qp->wqe_wr_id_tbl[qp->sq.head].signaled = 0;
2295 		qp->wqe_wr_id_tbl[qp->sq.head].wrid = wr->wr_id;
2296 		ocrdma_cpu_to_le32(hdr, ((hdr->cw >> OCRDMA_WQE_SIZE_SHIFT) &
2297 				   OCRDMA_WQE_SIZE_MASK) * OCRDMA_WQE_STRIDE);
2298 		/* make sure wqe is written before adapter can access it */
2299 		wmb();
2300 		/* inform hw to start processing it */
2301 		ocrdma_ring_sq_db(qp);
2302 
2303 		/* update pointer, counter for next wr */
2304 		ocrdma_hwq_inc_head(&qp->sq);
2305 		wr = wr->next;
2306 	}
2307 	spin_unlock_irqrestore(&qp->q_lock, flags);
2308 	return status;
2309 }
2310 
2311 static void ocrdma_ring_rq_db(struct ocrdma_qp *qp)
2312 {
2313 	u32 val = qp->rq.dbid | (1 << OCRDMA_DB_RQ_SHIFT);
2314 
2315 	iowrite32(val, qp->rq_db);
2316 }
2317 
2318 static void ocrdma_build_rqe(struct ocrdma_hdr_wqe *rqe, struct ib_recv_wr *wr,
2319 			     u16 tag)
2320 {
2321 	u32 wqe_size = 0;
2322 	struct ocrdma_sge *sge;
2323 	if (wr->num_sge)
2324 		wqe_size = (wr->num_sge * sizeof(*sge)) + sizeof(*rqe);
2325 	else
2326 		wqe_size = sizeof(*sge) + sizeof(*rqe);
2327 
2328 	rqe->cw = ((wqe_size / OCRDMA_WQE_STRIDE) <<
2329 				OCRDMA_WQE_SIZE_SHIFT);
2330 	rqe->cw |= (OCRDMA_FLAG_SIG << OCRDMA_WQE_FLAGS_SHIFT);
2331 	rqe->cw |= (OCRDMA_TYPE_LKEY << OCRDMA_WQE_TYPE_SHIFT);
2332 	rqe->total_len = 0;
2333 	rqe->rsvd_tag = tag;
2334 	sge = (struct ocrdma_sge *)(rqe + 1);
2335 	ocrdma_build_sges(rqe, sge, wr->num_sge, wr->sg_list);
2336 	ocrdma_cpu_to_le32(rqe, wqe_size);
2337 }
2338 
2339 int ocrdma_post_recv(struct ib_qp *ibqp, struct ib_recv_wr *wr,
2340 		     struct ib_recv_wr **bad_wr)
2341 {
2342 	int status = 0;
2343 	unsigned long flags;
2344 	struct ocrdma_qp *qp = get_ocrdma_qp(ibqp);
2345 	struct ocrdma_hdr_wqe *rqe;
2346 
2347 	spin_lock_irqsave(&qp->q_lock, flags);
2348 	if (qp->state == OCRDMA_QPS_RST || qp->state == OCRDMA_QPS_ERR) {
2349 		spin_unlock_irqrestore(&qp->q_lock, flags);
2350 		*bad_wr = wr;
2351 		return -EINVAL;
2352 	}
2353 	while (wr) {
2354 		if (ocrdma_hwq_free_cnt(&qp->rq) == 0 ||
2355 		    wr->num_sge > qp->rq.max_sges) {
2356 			*bad_wr = wr;
2357 			status = -ENOMEM;
2358 			break;
2359 		}
2360 		rqe = ocrdma_hwq_head(&qp->rq);
2361 		ocrdma_build_rqe(rqe, wr, 0);
2362 
2363 		qp->rqe_wr_id_tbl[qp->rq.head] = wr->wr_id;
2364 		/* make sure rqe is written before adapter can access it */
2365 		wmb();
2366 
2367 		/* inform hw to start processing it */
2368 		ocrdma_ring_rq_db(qp);
2369 
2370 		/* update pointer, counter for next wr */
2371 		ocrdma_hwq_inc_head(&qp->rq);
2372 		wr = wr->next;
2373 	}
2374 	spin_unlock_irqrestore(&qp->q_lock, flags);
2375 	return status;
2376 }
2377 
2378 /* cqe for srq's rqe can potentially arrive out of order.
2379  * index gives the entry in the shadow table where to store
2380  * the wr_id. tag/index is returned in cqe to reference back
2381  * for a given rqe.
2382  */
2383 static int ocrdma_srq_get_idx(struct ocrdma_srq *srq)
2384 {
2385 	int row = 0;
2386 	int indx = 0;
2387 
2388 	for (row = 0; row < srq->bit_fields_len; row++) {
2389 		if (srq->idx_bit_fields[row]) {
2390 			indx = ffs(srq->idx_bit_fields[row]);
2391 			indx = (row * 32) + (indx - 1);
2392 			if (indx >= srq->rq.max_cnt)
2393 				BUG();
2394 			ocrdma_srq_toggle_bit(srq, indx);
2395 			break;
2396 		}
2397 	}
2398 
2399 	if (row == srq->bit_fields_len)
2400 		BUG();
2401 	return indx + 1; /* Use from index 1 */
2402 }
2403 
2404 static void ocrdma_ring_srq_db(struct ocrdma_srq *srq)
2405 {
2406 	u32 val = srq->rq.dbid | (1 << 16);
2407 
2408 	iowrite32(val, srq->db + OCRDMA_DB_GEN2_SRQ_OFFSET);
2409 }
2410 
2411 int ocrdma_post_srq_recv(struct ib_srq *ibsrq, struct ib_recv_wr *wr,
2412 			 struct ib_recv_wr **bad_wr)
2413 {
2414 	int status = 0;
2415 	unsigned long flags;
2416 	struct ocrdma_srq *srq;
2417 	struct ocrdma_hdr_wqe *rqe;
2418 	u16 tag;
2419 
2420 	srq = get_ocrdma_srq(ibsrq);
2421 
2422 	spin_lock_irqsave(&srq->q_lock, flags);
2423 	while (wr) {
2424 		if (ocrdma_hwq_free_cnt(&srq->rq) == 0 ||
2425 		    wr->num_sge > srq->rq.max_sges) {
2426 			status = -ENOMEM;
2427 			*bad_wr = wr;
2428 			break;
2429 		}
2430 		tag = ocrdma_srq_get_idx(srq);
2431 		rqe = ocrdma_hwq_head(&srq->rq);
2432 		ocrdma_build_rqe(rqe, wr, tag);
2433 
2434 		srq->rqe_wr_id_tbl[tag] = wr->wr_id;
2435 		/* make sure rqe is written before adapter can perform DMA */
2436 		wmb();
2437 		/* inform hw to start processing it */
2438 		ocrdma_ring_srq_db(srq);
2439 		/* update pointer, counter for next wr */
2440 		ocrdma_hwq_inc_head(&srq->rq);
2441 		wr = wr->next;
2442 	}
2443 	spin_unlock_irqrestore(&srq->q_lock, flags);
2444 	return status;
2445 }
2446 
2447 static enum ib_wc_status ocrdma_to_ibwc_err(u16 status)
2448 {
2449 	enum ib_wc_status ibwc_status;
2450 
2451 	switch (status) {
2452 	case OCRDMA_CQE_GENERAL_ERR:
2453 		ibwc_status = IB_WC_GENERAL_ERR;
2454 		break;
2455 	case OCRDMA_CQE_LOC_LEN_ERR:
2456 		ibwc_status = IB_WC_LOC_LEN_ERR;
2457 		break;
2458 	case OCRDMA_CQE_LOC_QP_OP_ERR:
2459 		ibwc_status = IB_WC_LOC_QP_OP_ERR;
2460 		break;
2461 	case OCRDMA_CQE_LOC_EEC_OP_ERR:
2462 		ibwc_status = IB_WC_LOC_EEC_OP_ERR;
2463 		break;
2464 	case OCRDMA_CQE_LOC_PROT_ERR:
2465 		ibwc_status = IB_WC_LOC_PROT_ERR;
2466 		break;
2467 	case OCRDMA_CQE_WR_FLUSH_ERR:
2468 		ibwc_status = IB_WC_WR_FLUSH_ERR;
2469 		break;
2470 	case OCRDMA_CQE_MW_BIND_ERR:
2471 		ibwc_status = IB_WC_MW_BIND_ERR;
2472 		break;
2473 	case OCRDMA_CQE_BAD_RESP_ERR:
2474 		ibwc_status = IB_WC_BAD_RESP_ERR;
2475 		break;
2476 	case OCRDMA_CQE_LOC_ACCESS_ERR:
2477 		ibwc_status = IB_WC_LOC_ACCESS_ERR;
2478 		break;
2479 	case OCRDMA_CQE_REM_INV_REQ_ERR:
2480 		ibwc_status = IB_WC_REM_INV_REQ_ERR;
2481 		break;
2482 	case OCRDMA_CQE_REM_ACCESS_ERR:
2483 		ibwc_status = IB_WC_REM_ACCESS_ERR;
2484 		break;
2485 	case OCRDMA_CQE_REM_OP_ERR:
2486 		ibwc_status = IB_WC_REM_OP_ERR;
2487 		break;
2488 	case OCRDMA_CQE_RETRY_EXC_ERR:
2489 		ibwc_status = IB_WC_RETRY_EXC_ERR;
2490 		break;
2491 	case OCRDMA_CQE_RNR_RETRY_EXC_ERR:
2492 		ibwc_status = IB_WC_RNR_RETRY_EXC_ERR;
2493 		break;
2494 	case OCRDMA_CQE_LOC_RDD_VIOL_ERR:
2495 		ibwc_status = IB_WC_LOC_RDD_VIOL_ERR;
2496 		break;
2497 	case OCRDMA_CQE_REM_INV_RD_REQ_ERR:
2498 		ibwc_status = IB_WC_REM_INV_RD_REQ_ERR;
2499 		break;
2500 	case OCRDMA_CQE_REM_ABORT_ERR:
2501 		ibwc_status = IB_WC_REM_ABORT_ERR;
2502 		break;
2503 	case OCRDMA_CQE_INV_EECN_ERR:
2504 		ibwc_status = IB_WC_INV_EECN_ERR;
2505 		break;
2506 	case OCRDMA_CQE_INV_EEC_STATE_ERR:
2507 		ibwc_status = IB_WC_INV_EEC_STATE_ERR;
2508 		break;
2509 	case OCRDMA_CQE_FATAL_ERR:
2510 		ibwc_status = IB_WC_FATAL_ERR;
2511 		break;
2512 	case OCRDMA_CQE_RESP_TIMEOUT_ERR:
2513 		ibwc_status = IB_WC_RESP_TIMEOUT_ERR;
2514 		break;
2515 	default:
2516 		ibwc_status = IB_WC_GENERAL_ERR;
2517 		break;
2518 	}
2519 	return ibwc_status;
2520 }
2521 
2522 static void ocrdma_update_wc(struct ocrdma_qp *qp, struct ib_wc *ibwc,
2523 		      u32 wqe_idx)
2524 {
2525 	struct ocrdma_hdr_wqe *hdr;
2526 	struct ocrdma_sge *rw;
2527 	int opcode;
2528 
2529 	hdr = ocrdma_hwq_head_from_idx(&qp->sq, wqe_idx);
2530 
2531 	ibwc->wr_id = qp->wqe_wr_id_tbl[wqe_idx].wrid;
2532 	/* Undo the hdr->cw swap */
2533 	opcode = le32_to_cpu(hdr->cw) & OCRDMA_WQE_OPCODE_MASK;
2534 	switch (opcode) {
2535 	case OCRDMA_WRITE:
2536 		ibwc->opcode = IB_WC_RDMA_WRITE;
2537 		break;
2538 	case OCRDMA_READ:
2539 		rw = (struct ocrdma_sge *)(hdr + 1);
2540 		ibwc->opcode = IB_WC_RDMA_READ;
2541 		ibwc->byte_len = rw->len;
2542 		break;
2543 	case OCRDMA_SEND:
2544 		ibwc->opcode = IB_WC_SEND;
2545 		break;
2546 	case OCRDMA_FR_MR:
2547 		ibwc->opcode = IB_WC_REG_MR;
2548 		break;
2549 	case OCRDMA_LKEY_INV:
2550 		ibwc->opcode = IB_WC_LOCAL_INV;
2551 		break;
2552 	default:
2553 		ibwc->status = IB_WC_GENERAL_ERR;
2554 		pr_err("%s() invalid opcode received = 0x%x\n",
2555 		       __func__, hdr->cw & OCRDMA_WQE_OPCODE_MASK);
2556 		break;
2557 	}
2558 }
2559 
2560 static void ocrdma_set_cqe_status_flushed(struct ocrdma_qp *qp,
2561 						struct ocrdma_cqe *cqe)
2562 {
2563 	if (is_cqe_for_sq(cqe)) {
2564 		cqe->flags_status_srcqpn = cpu_to_le32(le32_to_cpu(
2565 				cqe->flags_status_srcqpn) &
2566 					~OCRDMA_CQE_STATUS_MASK);
2567 		cqe->flags_status_srcqpn = cpu_to_le32(le32_to_cpu(
2568 				cqe->flags_status_srcqpn) |
2569 				(OCRDMA_CQE_WR_FLUSH_ERR <<
2570 					OCRDMA_CQE_STATUS_SHIFT));
2571 	} else {
2572 		if (qp->qp_type == IB_QPT_UD || qp->qp_type == IB_QPT_GSI) {
2573 			cqe->flags_status_srcqpn = cpu_to_le32(le32_to_cpu(
2574 					cqe->flags_status_srcqpn) &
2575 						~OCRDMA_CQE_UD_STATUS_MASK);
2576 			cqe->flags_status_srcqpn = cpu_to_le32(le32_to_cpu(
2577 					cqe->flags_status_srcqpn) |
2578 					(OCRDMA_CQE_WR_FLUSH_ERR <<
2579 						OCRDMA_CQE_UD_STATUS_SHIFT));
2580 		} else {
2581 			cqe->flags_status_srcqpn = cpu_to_le32(le32_to_cpu(
2582 					cqe->flags_status_srcqpn) &
2583 						~OCRDMA_CQE_STATUS_MASK);
2584 			cqe->flags_status_srcqpn = cpu_to_le32(le32_to_cpu(
2585 					cqe->flags_status_srcqpn) |
2586 					(OCRDMA_CQE_WR_FLUSH_ERR <<
2587 						OCRDMA_CQE_STATUS_SHIFT));
2588 		}
2589 	}
2590 }
2591 
2592 static bool ocrdma_update_err_cqe(struct ib_wc *ibwc, struct ocrdma_cqe *cqe,
2593 				  struct ocrdma_qp *qp, int status)
2594 {
2595 	bool expand = false;
2596 
2597 	ibwc->byte_len = 0;
2598 	ibwc->qp = &qp->ibqp;
2599 	ibwc->status = ocrdma_to_ibwc_err(status);
2600 
2601 	ocrdma_flush_qp(qp);
2602 	ocrdma_qp_state_change(qp, IB_QPS_ERR, NULL);
2603 
2604 	/* if wqe/rqe pending for which cqe needs to be returned,
2605 	 * trigger inflating it.
2606 	 */
2607 	if (!is_hw_rq_empty(qp) || !is_hw_sq_empty(qp)) {
2608 		expand = true;
2609 		ocrdma_set_cqe_status_flushed(qp, cqe);
2610 	}
2611 	return expand;
2612 }
2613 
2614 static int ocrdma_update_err_rcqe(struct ib_wc *ibwc, struct ocrdma_cqe *cqe,
2615 				  struct ocrdma_qp *qp, int status)
2616 {
2617 	ibwc->opcode = IB_WC_RECV;
2618 	ibwc->wr_id = qp->rqe_wr_id_tbl[qp->rq.tail];
2619 	ocrdma_hwq_inc_tail(&qp->rq);
2620 
2621 	return ocrdma_update_err_cqe(ibwc, cqe, qp, status);
2622 }
2623 
2624 static int ocrdma_update_err_scqe(struct ib_wc *ibwc, struct ocrdma_cqe *cqe,
2625 				  struct ocrdma_qp *qp, int status)
2626 {
2627 	ocrdma_update_wc(qp, ibwc, qp->sq.tail);
2628 	ocrdma_hwq_inc_tail(&qp->sq);
2629 
2630 	return ocrdma_update_err_cqe(ibwc, cqe, qp, status);
2631 }
2632 
2633 
2634 static bool ocrdma_poll_err_scqe(struct ocrdma_qp *qp,
2635 				 struct ocrdma_cqe *cqe, struct ib_wc *ibwc,
2636 				 bool *polled, bool *stop)
2637 {
2638 	bool expand;
2639 	struct ocrdma_dev *dev = get_ocrdma_dev(qp->ibqp.device);
2640 	int status = (le32_to_cpu(cqe->flags_status_srcqpn) &
2641 		OCRDMA_CQE_STATUS_MASK) >> OCRDMA_CQE_STATUS_SHIFT;
2642 	if (status < OCRDMA_MAX_CQE_ERR)
2643 		atomic_inc(&dev->cqe_err_stats[status]);
2644 
2645 	/* when hw sq is empty, but rq is not empty, so we continue
2646 	 * to keep the cqe in order to get the cq event again.
2647 	 */
2648 	if (is_hw_sq_empty(qp) && !is_hw_rq_empty(qp)) {
2649 		/* when cq for rq and sq is same, it is safe to return
2650 		 * flush cqe for RQEs.
2651 		 */
2652 		if (!qp->srq && (qp->sq_cq == qp->rq_cq)) {
2653 			*polled = true;
2654 			status = OCRDMA_CQE_WR_FLUSH_ERR;
2655 			expand = ocrdma_update_err_rcqe(ibwc, cqe, qp, status);
2656 		} else {
2657 			/* stop processing further cqe as this cqe is used for
2658 			 * triggering cq event on buddy cq of RQ.
2659 			 * When QP is destroyed, this cqe will be removed
2660 			 * from the cq's hardware q.
2661 			 */
2662 			*polled = false;
2663 			*stop = true;
2664 			expand = false;
2665 		}
2666 	} else if (is_hw_sq_empty(qp)) {
2667 		/* Do nothing */
2668 		expand = false;
2669 		*polled = false;
2670 		*stop = false;
2671 	} else {
2672 		*polled = true;
2673 		expand = ocrdma_update_err_scqe(ibwc, cqe, qp, status);
2674 	}
2675 	return expand;
2676 }
2677 
2678 static bool ocrdma_poll_success_scqe(struct ocrdma_qp *qp,
2679 				     struct ocrdma_cqe *cqe,
2680 				     struct ib_wc *ibwc, bool *polled)
2681 {
2682 	bool expand = false;
2683 	int tail = qp->sq.tail;
2684 	u32 wqe_idx;
2685 
2686 	if (!qp->wqe_wr_id_tbl[tail].signaled) {
2687 		*polled = false;    /* WC cannot be consumed yet */
2688 	} else {
2689 		ibwc->status = IB_WC_SUCCESS;
2690 		ibwc->wc_flags = 0;
2691 		ibwc->qp = &qp->ibqp;
2692 		ocrdma_update_wc(qp, ibwc, tail);
2693 		*polled = true;
2694 	}
2695 	wqe_idx = (le32_to_cpu(cqe->wq.wqeidx) &
2696 			OCRDMA_CQE_WQEIDX_MASK) & qp->sq.max_wqe_idx;
2697 	if (tail != wqe_idx)
2698 		expand = true; /* Coalesced CQE can't be consumed yet */
2699 
2700 	ocrdma_hwq_inc_tail(&qp->sq);
2701 	return expand;
2702 }
2703 
2704 static bool ocrdma_poll_scqe(struct ocrdma_qp *qp, struct ocrdma_cqe *cqe,
2705 			     struct ib_wc *ibwc, bool *polled, bool *stop)
2706 {
2707 	int status;
2708 	bool expand;
2709 
2710 	status = (le32_to_cpu(cqe->flags_status_srcqpn) &
2711 		OCRDMA_CQE_STATUS_MASK) >> OCRDMA_CQE_STATUS_SHIFT;
2712 
2713 	if (status == OCRDMA_CQE_SUCCESS)
2714 		expand = ocrdma_poll_success_scqe(qp, cqe, ibwc, polled);
2715 	else
2716 		expand = ocrdma_poll_err_scqe(qp, cqe, ibwc, polled, stop);
2717 	return expand;
2718 }
2719 
2720 static int ocrdma_update_ud_rcqe(struct ib_wc *ibwc, struct ocrdma_cqe *cqe)
2721 {
2722 	int status;
2723 
2724 	status = (le32_to_cpu(cqe->flags_status_srcqpn) &
2725 		OCRDMA_CQE_UD_STATUS_MASK) >> OCRDMA_CQE_UD_STATUS_SHIFT;
2726 	ibwc->src_qp = le32_to_cpu(cqe->flags_status_srcqpn) &
2727 						OCRDMA_CQE_SRCQP_MASK;
2728 	ibwc->pkey_index = 0;
2729 	ibwc->wc_flags = IB_WC_GRH;
2730 	ibwc->byte_len = (le32_to_cpu(cqe->ud.rxlen_pkey) >>
2731 					OCRDMA_CQE_UD_XFER_LEN_SHIFT);
2732 	return status;
2733 }
2734 
2735 static void ocrdma_update_free_srq_cqe(struct ib_wc *ibwc,
2736 				       struct ocrdma_cqe *cqe,
2737 				       struct ocrdma_qp *qp)
2738 {
2739 	unsigned long flags;
2740 	struct ocrdma_srq *srq;
2741 	u32 wqe_idx;
2742 
2743 	srq = get_ocrdma_srq(qp->ibqp.srq);
2744 	wqe_idx = (le32_to_cpu(cqe->rq.buftag_qpn) >>
2745 		OCRDMA_CQE_BUFTAG_SHIFT) & srq->rq.max_wqe_idx;
2746 	if (wqe_idx < 1)
2747 		BUG();
2748 
2749 	ibwc->wr_id = srq->rqe_wr_id_tbl[wqe_idx];
2750 	spin_lock_irqsave(&srq->q_lock, flags);
2751 	ocrdma_srq_toggle_bit(srq, wqe_idx - 1);
2752 	spin_unlock_irqrestore(&srq->q_lock, flags);
2753 	ocrdma_hwq_inc_tail(&srq->rq);
2754 }
2755 
2756 static bool ocrdma_poll_err_rcqe(struct ocrdma_qp *qp, struct ocrdma_cqe *cqe,
2757 				struct ib_wc *ibwc, bool *polled, bool *stop,
2758 				int status)
2759 {
2760 	bool expand;
2761 	struct ocrdma_dev *dev = get_ocrdma_dev(qp->ibqp.device);
2762 
2763 	if (status < OCRDMA_MAX_CQE_ERR)
2764 		atomic_inc(&dev->cqe_err_stats[status]);
2765 
2766 	/* when hw_rq is empty, but wq is not empty, so continue
2767 	 * to keep the cqe to get the cq event again.
2768 	 */
2769 	if (is_hw_rq_empty(qp) && !is_hw_sq_empty(qp)) {
2770 		if (!qp->srq && (qp->sq_cq == qp->rq_cq)) {
2771 			*polled = true;
2772 			status = OCRDMA_CQE_WR_FLUSH_ERR;
2773 			expand = ocrdma_update_err_scqe(ibwc, cqe, qp, status);
2774 		} else {
2775 			*polled = false;
2776 			*stop = true;
2777 			expand = false;
2778 		}
2779 	} else if (is_hw_rq_empty(qp)) {
2780 		/* Do nothing */
2781 		expand = false;
2782 		*polled = false;
2783 		*stop = false;
2784 	} else {
2785 		*polled = true;
2786 		expand = ocrdma_update_err_rcqe(ibwc, cqe, qp, status);
2787 	}
2788 	return expand;
2789 }
2790 
2791 static void ocrdma_poll_success_rcqe(struct ocrdma_qp *qp,
2792 				     struct ocrdma_cqe *cqe, struct ib_wc *ibwc)
2793 {
2794 	ibwc->opcode = IB_WC_RECV;
2795 	ibwc->qp = &qp->ibqp;
2796 	ibwc->status = IB_WC_SUCCESS;
2797 
2798 	if (qp->qp_type == IB_QPT_UD || qp->qp_type == IB_QPT_GSI)
2799 		ocrdma_update_ud_rcqe(ibwc, cqe);
2800 	else
2801 		ibwc->byte_len = le32_to_cpu(cqe->rq.rxlen);
2802 
2803 	if (is_cqe_imm(cqe)) {
2804 		ibwc->ex.imm_data = htonl(le32_to_cpu(cqe->rq.lkey_immdt));
2805 		ibwc->wc_flags |= IB_WC_WITH_IMM;
2806 	} else if (is_cqe_wr_imm(cqe)) {
2807 		ibwc->opcode = IB_WC_RECV_RDMA_WITH_IMM;
2808 		ibwc->ex.imm_data = htonl(le32_to_cpu(cqe->rq.lkey_immdt));
2809 		ibwc->wc_flags |= IB_WC_WITH_IMM;
2810 	} else if (is_cqe_invalidated(cqe)) {
2811 		ibwc->ex.invalidate_rkey = le32_to_cpu(cqe->rq.lkey_immdt);
2812 		ibwc->wc_flags |= IB_WC_WITH_INVALIDATE;
2813 	}
2814 	if (qp->ibqp.srq) {
2815 		ocrdma_update_free_srq_cqe(ibwc, cqe, qp);
2816 	} else {
2817 		ibwc->wr_id = qp->rqe_wr_id_tbl[qp->rq.tail];
2818 		ocrdma_hwq_inc_tail(&qp->rq);
2819 	}
2820 }
2821 
2822 static bool ocrdma_poll_rcqe(struct ocrdma_qp *qp, struct ocrdma_cqe *cqe,
2823 			     struct ib_wc *ibwc, bool *polled, bool *stop)
2824 {
2825 	int status;
2826 	bool expand = false;
2827 
2828 	ibwc->wc_flags = 0;
2829 	if (qp->qp_type == IB_QPT_UD || qp->qp_type == IB_QPT_GSI) {
2830 		status = (le32_to_cpu(cqe->flags_status_srcqpn) &
2831 					OCRDMA_CQE_UD_STATUS_MASK) >>
2832 					OCRDMA_CQE_UD_STATUS_SHIFT;
2833 	} else {
2834 		status = (le32_to_cpu(cqe->flags_status_srcqpn) &
2835 			     OCRDMA_CQE_STATUS_MASK) >> OCRDMA_CQE_STATUS_SHIFT;
2836 	}
2837 
2838 	if (status == OCRDMA_CQE_SUCCESS) {
2839 		*polled = true;
2840 		ocrdma_poll_success_rcqe(qp, cqe, ibwc);
2841 	} else {
2842 		expand = ocrdma_poll_err_rcqe(qp, cqe, ibwc, polled, stop,
2843 					      status);
2844 	}
2845 	return expand;
2846 }
2847 
2848 static void ocrdma_change_cq_phase(struct ocrdma_cq *cq, struct ocrdma_cqe *cqe,
2849 				   u16 cur_getp)
2850 {
2851 	if (cq->phase_change) {
2852 		if (cur_getp == 0)
2853 			cq->phase = (~cq->phase & OCRDMA_CQE_VALID);
2854 	} else {
2855 		/* clear valid bit */
2856 		cqe->flags_status_srcqpn = 0;
2857 	}
2858 }
2859 
2860 static int ocrdma_poll_hwcq(struct ocrdma_cq *cq, int num_entries,
2861 			    struct ib_wc *ibwc)
2862 {
2863 	u16 qpn = 0;
2864 	int i = 0;
2865 	bool expand = false;
2866 	int polled_hw_cqes = 0;
2867 	struct ocrdma_qp *qp = NULL;
2868 	struct ocrdma_dev *dev = get_ocrdma_dev(cq->ibcq.device);
2869 	struct ocrdma_cqe *cqe;
2870 	u16 cur_getp; bool polled = false; bool stop = false;
2871 
2872 	cur_getp = cq->getp;
2873 	while (num_entries) {
2874 		cqe = cq->va + cur_getp;
2875 		/* check whether valid cqe or not */
2876 		if (!is_cqe_valid(cq, cqe))
2877 			break;
2878 		qpn = (le32_to_cpu(cqe->cmn.qpn) & OCRDMA_CQE_QPN_MASK);
2879 		/* ignore discarded cqe */
2880 		if (qpn == 0)
2881 			goto skip_cqe;
2882 		qp = dev->qp_tbl[qpn];
2883 		BUG_ON(qp == NULL);
2884 
2885 		if (is_cqe_for_sq(cqe)) {
2886 			expand = ocrdma_poll_scqe(qp, cqe, ibwc, &polled,
2887 						  &stop);
2888 		} else {
2889 			expand = ocrdma_poll_rcqe(qp, cqe, ibwc, &polled,
2890 						  &stop);
2891 		}
2892 		if (expand)
2893 			goto expand_cqe;
2894 		if (stop)
2895 			goto stop_cqe;
2896 		/* clear qpn to avoid duplicate processing by discard_cqe() */
2897 		cqe->cmn.qpn = 0;
2898 skip_cqe:
2899 		polled_hw_cqes += 1;
2900 		cur_getp = (cur_getp + 1) % cq->max_hw_cqe;
2901 		ocrdma_change_cq_phase(cq, cqe, cur_getp);
2902 expand_cqe:
2903 		if (polled) {
2904 			num_entries -= 1;
2905 			i += 1;
2906 			ibwc = ibwc + 1;
2907 			polled = false;
2908 		}
2909 	}
2910 stop_cqe:
2911 	cq->getp = cur_getp;
2912 
2913 	if (polled_hw_cqes)
2914 		ocrdma_ring_cq_db(dev, cq->id, false, false, polled_hw_cqes);
2915 
2916 	return i;
2917 }
2918 
2919 /* insert error cqe if the QP's SQ or RQ's CQ matches the CQ under poll. */
2920 static int ocrdma_add_err_cqe(struct ocrdma_cq *cq, int num_entries,
2921 			      struct ocrdma_qp *qp, struct ib_wc *ibwc)
2922 {
2923 	int err_cqes = 0;
2924 
2925 	while (num_entries) {
2926 		if (is_hw_sq_empty(qp) && is_hw_rq_empty(qp))
2927 			break;
2928 		if (!is_hw_sq_empty(qp) && qp->sq_cq == cq) {
2929 			ocrdma_update_wc(qp, ibwc, qp->sq.tail);
2930 			ocrdma_hwq_inc_tail(&qp->sq);
2931 		} else if (!is_hw_rq_empty(qp) && qp->rq_cq == cq) {
2932 			ibwc->wr_id = qp->rqe_wr_id_tbl[qp->rq.tail];
2933 			ocrdma_hwq_inc_tail(&qp->rq);
2934 		} else {
2935 			return err_cqes;
2936 		}
2937 		ibwc->byte_len = 0;
2938 		ibwc->status = IB_WC_WR_FLUSH_ERR;
2939 		ibwc = ibwc + 1;
2940 		err_cqes += 1;
2941 		num_entries -= 1;
2942 	}
2943 	return err_cqes;
2944 }
2945 
2946 int ocrdma_poll_cq(struct ib_cq *ibcq, int num_entries, struct ib_wc *wc)
2947 {
2948 	int cqes_to_poll = num_entries;
2949 	struct ocrdma_cq *cq = get_ocrdma_cq(ibcq);
2950 	struct ocrdma_dev *dev = get_ocrdma_dev(ibcq->device);
2951 	int num_os_cqe = 0, err_cqes = 0;
2952 	struct ocrdma_qp *qp;
2953 	unsigned long flags;
2954 
2955 	/* poll cqes from adapter CQ */
2956 	spin_lock_irqsave(&cq->cq_lock, flags);
2957 	num_os_cqe = ocrdma_poll_hwcq(cq, cqes_to_poll, wc);
2958 	spin_unlock_irqrestore(&cq->cq_lock, flags);
2959 	cqes_to_poll -= num_os_cqe;
2960 
2961 	if (cqes_to_poll) {
2962 		wc = wc + num_os_cqe;
2963 		/* adapter returns single error cqe when qp moves to
2964 		 * error state. So insert error cqes with wc_status as
2965 		 * FLUSHED for pending WQEs and RQEs of QP's SQ and RQ
2966 		 * respectively which uses this CQ.
2967 		 */
2968 		spin_lock_irqsave(&dev->flush_q_lock, flags);
2969 		list_for_each_entry(qp, &cq->sq_head, sq_entry) {
2970 			if (cqes_to_poll == 0)
2971 				break;
2972 			err_cqes = ocrdma_add_err_cqe(cq, cqes_to_poll, qp, wc);
2973 			cqes_to_poll -= err_cqes;
2974 			num_os_cqe += err_cqes;
2975 			wc = wc + err_cqes;
2976 		}
2977 		spin_unlock_irqrestore(&dev->flush_q_lock, flags);
2978 	}
2979 	return num_os_cqe;
2980 }
2981 
2982 int ocrdma_arm_cq(struct ib_cq *ibcq, enum ib_cq_notify_flags cq_flags)
2983 {
2984 	struct ocrdma_cq *cq = get_ocrdma_cq(ibcq);
2985 	struct ocrdma_dev *dev = get_ocrdma_dev(ibcq->device);
2986 	u16 cq_id;
2987 	unsigned long flags;
2988 	bool arm_needed = false, sol_needed = false;
2989 
2990 	cq_id = cq->id;
2991 
2992 	spin_lock_irqsave(&cq->cq_lock, flags);
2993 	if (cq_flags & IB_CQ_NEXT_COMP || cq_flags & IB_CQ_SOLICITED)
2994 		arm_needed = true;
2995 	if (cq_flags & IB_CQ_SOLICITED)
2996 		sol_needed = true;
2997 
2998 	ocrdma_ring_cq_db(dev, cq_id, arm_needed, sol_needed, 0);
2999 	spin_unlock_irqrestore(&cq->cq_lock, flags);
3000 
3001 	return 0;
3002 }
3003 
3004 struct ib_mr *ocrdma_alloc_mr(struct ib_pd *ibpd,
3005 			      enum ib_mr_type mr_type,
3006 			      u32 max_num_sg)
3007 {
3008 	int status;
3009 	struct ocrdma_mr *mr;
3010 	struct ocrdma_pd *pd = get_ocrdma_pd(ibpd);
3011 	struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device);
3012 
3013 	if (mr_type != IB_MR_TYPE_MEM_REG)
3014 		return ERR_PTR(-EINVAL);
3015 
3016 	if (max_num_sg > dev->attr.max_pages_per_frmr)
3017 		return ERR_PTR(-EINVAL);
3018 
3019 	mr = kzalloc(sizeof(*mr), GFP_KERNEL);
3020 	if (!mr)
3021 		return ERR_PTR(-ENOMEM);
3022 
3023 	mr->pages = kcalloc(max_num_sg, sizeof(u64), GFP_KERNEL);
3024 	if (!mr->pages) {
3025 		status = -ENOMEM;
3026 		goto pl_err;
3027 	}
3028 
3029 	status = ocrdma_get_pbl_info(dev, mr, max_num_sg);
3030 	if (status)
3031 		goto pbl_err;
3032 	mr->hwmr.fr_mr = 1;
3033 	mr->hwmr.remote_rd = 0;
3034 	mr->hwmr.remote_wr = 0;
3035 	mr->hwmr.local_rd = 0;
3036 	mr->hwmr.local_wr = 0;
3037 	mr->hwmr.mw_bind = 0;
3038 	status = ocrdma_build_pbl_tbl(dev, &mr->hwmr);
3039 	if (status)
3040 		goto pbl_err;
3041 	status = ocrdma_reg_mr(dev, &mr->hwmr, pd->id, 0);
3042 	if (status)
3043 		goto mbx_err;
3044 	mr->ibmr.rkey = mr->hwmr.lkey;
3045 	mr->ibmr.lkey = mr->hwmr.lkey;
3046 	dev->stag_arr[(mr->hwmr.lkey >> 8) & (OCRDMA_MAX_STAG - 1)] =
3047 		(unsigned long) mr;
3048 	return &mr->ibmr;
3049 mbx_err:
3050 	ocrdma_free_mr_pbl_tbl(dev, &mr->hwmr);
3051 pbl_err:
3052 	kfree(mr->pages);
3053 pl_err:
3054 	kfree(mr);
3055 	return ERR_PTR(-ENOMEM);
3056 }
3057 
3058 static int ocrdma_set_page(struct ib_mr *ibmr, u64 addr)
3059 {
3060 	struct ocrdma_mr *mr = get_ocrdma_mr(ibmr);
3061 
3062 	if (unlikely(mr->npages == mr->hwmr.num_pbes))
3063 		return -ENOMEM;
3064 
3065 	mr->pages[mr->npages++] = addr;
3066 
3067 	return 0;
3068 }
3069 
3070 int ocrdma_map_mr_sg(struct ib_mr *ibmr,
3071 		     struct scatterlist *sg,
3072 		     int sg_nents)
3073 {
3074 	struct ocrdma_mr *mr = get_ocrdma_mr(ibmr);
3075 
3076 	mr->npages = 0;
3077 
3078 	return ib_sg_to_pages(ibmr, sg, sg_nents, ocrdma_set_page);
3079 }
3080