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