/******************************************************************* * This file is part of the Emulex RoCE Device Driver for * * RoCE (RDMA over Converged Ethernet) adapters. * * Copyright (C) 2008-2012 Emulex. All rights reserved. * * EMULEX and SLI are trademarks of Emulex. * * www.emulex.com * * * * This program is free software; you can redistribute it and/or * * modify it under the terms of version 2 of the GNU General * * Public License as published by the Free Software Foundation. * * This program is distributed in the hope that it will be useful. * * ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND * * WARRANTIES, INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY, * * FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT, ARE * * DISCLAIMED, EXCEPT TO THE EXTENT THAT SUCH DISCLAIMERS ARE HELD * * TO BE LEGALLY INVALID. See the GNU General Public License for * * more details, a copy of which can be found in the file COPYING * * included with this package. * * * Contact Information: * linux-drivers@emulex.com * * Emulex * 3333 Susan Street * Costa Mesa, CA 92626 *******************************************************************/ #include #include #include #include #include #include #include "ocrdma.h" #include "ocrdma_hw.h" #include "ocrdma_verbs.h" #include "ocrdma_abi.h" int ocrdma_query_pkey(struct ib_device *ibdev, u8 port, u16 index, u16 *pkey) { if (index > 1) return -EINVAL; *pkey = 0xffff; return 0; } int ocrdma_query_gid(struct ib_device *ibdev, u8 port, int index, union ib_gid *sgid) { struct ocrdma_dev *dev; dev = get_ocrdma_dev(ibdev); memset(sgid, 0, sizeof(*sgid)); if (index > OCRDMA_MAX_SGID) return -EINVAL; memcpy(sgid, &dev->sgid_tbl[index], sizeof(*sgid)); return 0; } int ocrdma_query_device(struct ib_device *ibdev, struct ib_device_attr *attr) { struct ocrdma_dev *dev = get_ocrdma_dev(ibdev); memset(attr, 0, sizeof *attr); memcpy(&attr->fw_ver, &dev->attr.fw_ver[0], min(sizeof(dev->attr.fw_ver), sizeof(attr->fw_ver))); ocrdma_get_guid(dev, (u8 *)&attr->sys_image_guid); attr->max_mr_size = dev->attr.max_mr_size; attr->page_size_cap = 0xffff000; attr->vendor_id = dev->nic_info.pdev->vendor; attr->vendor_part_id = dev->nic_info.pdev->device; attr->hw_ver = dev->asic_id; attr->max_qp = dev->attr.max_qp; attr->max_ah = OCRDMA_MAX_AH; attr->max_qp_wr = dev->attr.max_wqe; attr->device_cap_flags = IB_DEVICE_CURR_QP_STATE_MOD | IB_DEVICE_RC_RNR_NAK_GEN | IB_DEVICE_SHUTDOWN_PORT | IB_DEVICE_SYS_IMAGE_GUID | IB_DEVICE_LOCAL_DMA_LKEY | IB_DEVICE_MEM_MGT_EXTENSIONS; attr->max_sge = min(dev->attr.max_send_sge, dev->attr.max_srq_sge); attr->max_sge_rd = 0; attr->max_cq = dev->attr.max_cq; attr->max_cqe = dev->attr.max_cqe; attr->max_mr = dev->attr.max_mr; attr->max_mw = dev->attr.max_mw; attr->max_pd = dev->attr.max_pd; attr->atomic_cap = 0; attr->max_fmr = 0; attr->max_map_per_fmr = 0; attr->max_qp_rd_atom = min(dev->attr.max_ord_per_qp, dev->attr.max_ird_per_qp); attr->max_qp_init_rd_atom = dev->attr.max_ord_per_qp; attr->max_srq = dev->attr.max_srq; attr->max_srq_sge = dev->attr.max_srq_sge; attr->max_srq_wr = dev->attr.max_rqe; attr->local_ca_ack_delay = dev->attr.local_ca_ack_delay; attr->max_fast_reg_page_list_len = dev->attr.max_pages_per_frmr; attr->max_pkeys = 1; return 0; } static inline void get_link_speed_and_width(struct ocrdma_dev *dev, u8 *ib_speed, u8 *ib_width) { int status; u8 speed; status = ocrdma_mbx_get_link_speed(dev, &speed); if (status) speed = OCRDMA_PHYS_LINK_SPEED_ZERO; switch (speed) { case OCRDMA_PHYS_LINK_SPEED_1GBPS: *ib_speed = IB_SPEED_SDR; *ib_width = IB_WIDTH_1X; break; case OCRDMA_PHYS_LINK_SPEED_10GBPS: *ib_speed = IB_SPEED_QDR; *ib_width = IB_WIDTH_1X; break; case OCRDMA_PHYS_LINK_SPEED_20GBPS: *ib_speed = IB_SPEED_DDR; *ib_width = IB_WIDTH_4X; break; case OCRDMA_PHYS_LINK_SPEED_40GBPS: *ib_speed = IB_SPEED_QDR; *ib_width = IB_WIDTH_4X; break; default: /* Unsupported */ *ib_speed = IB_SPEED_SDR; *ib_width = IB_WIDTH_1X; } } int ocrdma_query_port(struct ib_device *ibdev, u8 port, struct ib_port_attr *props) { enum ib_port_state port_state; struct ocrdma_dev *dev; struct net_device *netdev; dev = get_ocrdma_dev(ibdev); if (port > 1) { pr_err("%s(%d) invalid_port=0x%x\n", __func__, dev->id, port); return -EINVAL; } netdev = dev->nic_info.netdev; if (netif_running(netdev) && netif_oper_up(netdev)) { port_state = IB_PORT_ACTIVE; props->phys_state = 5; } else { port_state = IB_PORT_DOWN; props->phys_state = 3; } props->max_mtu = IB_MTU_4096; props->active_mtu = iboe_get_mtu(netdev->mtu); props->lid = 0; props->lmc = 0; props->sm_lid = 0; props->sm_sl = 0; props->state = port_state; props->port_cap_flags = IB_PORT_CM_SUP | IB_PORT_REINIT_SUP | IB_PORT_DEVICE_MGMT_SUP | IB_PORT_VENDOR_CLASS_SUP | IB_PORT_IP_BASED_GIDS; props->gid_tbl_len = OCRDMA_MAX_SGID; props->pkey_tbl_len = 1; props->bad_pkey_cntr = 0; props->qkey_viol_cntr = 0; get_link_speed_and_width(dev, &props->active_speed, &props->active_width); props->max_msg_sz = 0x80000000; props->max_vl_num = 4; return 0; } int ocrdma_modify_port(struct ib_device *ibdev, u8 port, int mask, struct ib_port_modify *props) { struct ocrdma_dev *dev; dev = get_ocrdma_dev(ibdev); if (port > 1) { pr_err("%s(%d) invalid_port=0x%x\n", __func__, dev->id, port); return -EINVAL; } return 0; } static int ocrdma_add_mmap(struct ocrdma_ucontext *uctx, u64 phy_addr, unsigned long len) { struct ocrdma_mm *mm; mm = kzalloc(sizeof(*mm), GFP_KERNEL); if (mm == NULL) return -ENOMEM; mm->key.phy_addr = phy_addr; mm->key.len = len; INIT_LIST_HEAD(&mm->entry); mutex_lock(&uctx->mm_list_lock); list_add_tail(&mm->entry, &uctx->mm_head); mutex_unlock(&uctx->mm_list_lock); return 0; } static void ocrdma_del_mmap(struct ocrdma_ucontext *uctx, u64 phy_addr, unsigned long len) { struct ocrdma_mm *mm, *tmp; mutex_lock(&uctx->mm_list_lock); list_for_each_entry_safe(mm, tmp, &uctx->mm_head, entry) { if (len != mm->key.len && phy_addr != mm->key.phy_addr) continue; list_del(&mm->entry); kfree(mm); break; } mutex_unlock(&uctx->mm_list_lock); } static bool ocrdma_search_mmap(struct ocrdma_ucontext *uctx, u64 phy_addr, unsigned long len) { bool found = false; struct ocrdma_mm *mm; mutex_lock(&uctx->mm_list_lock); list_for_each_entry(mm, &uctx->mm_head, entry) { if (len != mm->key.len && phy_addr != mm->key.phy_addr) continue; found = true; break; } mutex_unlock(&uctx->mm_list_lock); return found; } static struct ocrdma_pd *_ocrdma_alloc_pd(struct ocrdma_dev *dev, struct ocrdma_ucontext *uctx, struct ib_udata *udata) { struct ocrdma_pd *pd = NULL; int status = 0; pd = kzalloc(sizeof(*pd), GFP_KERNEL); if (!pd) return ERR_PTR(-ENOMEM); if (udata && uctx) { pd->dpp_enabled = ocrdma_get_asic_type(dev) == OCRDMA_ASIC_GEN_SKH_R; pd->num_dpp_qp = pd->dpp_enabled ? (dev->nic_info.db_page_size / dev->attr.wqe_size) : 0; } retry: status = ocrdma_mbx_alloc_pd(dev, pd); if (status) { if (pd->dpp_enabled) { pd->dpp_enabled = false; pd->num_dpp_qp = 0; goto retry; } else { kfree(pd); return ERR_PTR(status); } } return pd; } static inline int is_ucontext_pd(struct ocrdma_ucontext *uctx, struct ocrdma_pd *pd) { return (uctx->cntxt_pd == pd ? true : false); } static int _ocrdma_dealloc_pd(struct ocrdma_dev *dev, struct ocrdma_pd *pd) { int status = 0; status = ocrdma_mbx_dealloc_pd(dev, pd); kfree(pd); return status; } static int ocrdma_alloc_ucontext_pd(struct ocrdma_dev *dev, struct ocrdma_ucontext *uctx, struct ib_udata *udata) { int status = 0; uctx->cntxt_pd = _ocrdma_alloc_pd(dev, uctx, udata); if (IS_ERR(uctx->cntxt_pd)) { status = PTR_ERR(uctx->cntxt_pd); uctx->cntxt_pd = NULL; goto err; } uctx->cntxt_pd->uctx = uctx; uctx->cntxt_pd->ibpd.device = &dev->ibdev; err: return status; } static int ocrdma_dealloc_ucontext_pd(struct ocrdma_ucontext *uctx) { int status = 0; struct ocrdma_pd *pd = uctx->cntxt_pd; struct ocrdma_dev *dev = get_ocrdma_dev(pd->ibpd.device); if (uctx->pd_in_use) { pr_err("%s(%d) Freeing in use pdid=0x%x.\n", __func__, dev->id, pd->id); } uctx->cntxt_pd = NULL; status = _ocrdma_dealloc_pd(dev, pd); return status; } static struct ocrdma_pd *ocrdma_get_ucontext_pd(struct ocrdma_ucontext *uctx) { struct ocrdma_pd *pd = NULL; mutex_lock(&uctx->mm_list_lock); if (!uctx->pd_in_use) { uctx->pd_in_use = true; pd = uctx->cntxt_pd; } mutex_unlock(&uctx->mm_list_lock); return pd; } static void ocrdma_release_ucontext_pd(struct ocrdma_ucontext *uctx) { mutex_lock(&uctx->mm_list_lock); uctx->pd_in_use = false; mutex_unlock(&uctx->mm_list_lock); } struct ib_ucontext *ocrdma_alloc_ucontext(struct ib_device *ibdev, struct ib_udata *udata) { int status; struct ocrdma_ucontext *ctx; struct ocrdma_alloc_ucontext_resp resp; struct ocrdma_dev *dev = get_ocrdma_dev(ibdev); struct pci_dev *pdev = dev->nic_info.pdev; u32 map_len = roundup(sizeof(u32) * 2048, PAGE_SIZE); if (!udata) return ERR_PTR(-EFAULT); ctx = kzalloc(sizeof(*ctx), GFP_KERNEL); if (!ctx) return ERR_PTR(-ENOMEM); INIT_LIST_HEAD(&ctx->mm_head); mutex_init(&ctx->mm_list_lock); ctx->ah_tbl.va = dma_alloc_coherent(&pdev->dev, map_len, &ctx->ah_tbl.pa, GFP_KERNEL); if (!ctx->ah_tbl.va) { kfree(ctx); return ERR_PTR(-ENOMEM); } memset(ctx->ah_tbl.va, 0, map_len); ctx->ah_tbl.len = map_len; memset(&resp, 0, sizeof(resp)); resp.ah_tbl_len = ctx->ah_tbl.len; resp.ah_tbl_page = ctx->ah_tbl.pa; status = ocrdma_add_mmap(ctx, resp.ah_tbl_page, resp.ah_tbl_len); if (status) goto map_err; status = ocrdma_alloc_ucontext_pd(dev, ctx, udata); if (status) goto pd_err; resp.dev_id = dev->id; resp.max_inline_data = dev->attr.max_inline_data; resp.wqe_size = dev->attr.wqe_size; resp.rqe_size = dev->attr.rqe_size; resp.dpp_wqe_size = dev->attr.wqe_size; memcpy(resp.fw_ver, dev->attr.fw_ver, sizeof(resp.fw_ver)); status = ib_copy_to_udata(udata, &resp, sizeof(resp)); if (status) goto cpy_err; return &ctx->ibucontext; cpy_err: pd_err: ocrdma_del_mmap(ctx, ctx->ah_tbl.pa, ctx->ah_tbl.len); map_err: dma_free_coherent(&pdev->dev, ctx->ah_tbl.len, ctx->ah_tbl.va, ctx->ah_tbl.pa); kfree(ctx); return ERR_PTR(status); } int ocrdma_dealloc_ucontext(struct ib_ucontext *ibctx) { int status = 0; struct ocrdma_mm *mm, *tmp; struct ocrdma_ucontext *uctx = get_ocrdma_ucontext(ibctx); struct ocrdma_dev *dev = get_ocrdma_dev(ibctx->device); struct pci_dev *pdev = dev->nic_info.pdev; status = ocrdma_dealloc_ucontext_pd(uctx); ocrdma_del_mmap(uctx, uctx->ah_tbl.pa, uctx->ah_tbl.len); dma_free_coherent(&pdev->dev, uctx->ah_tbl.len, uctx->ah_tbl.va, uctx->ah_tbl.pa); list_for_each_entry_safe(mm, tmp, &uctx->mm_head, entry) { list_del(&mm->entry); kfree(mm); } kfree(uctx); return status; } int ocrdma_mmap(struct ib_ucontext *context, struct vm_area_struct *vma) { struct ocrdma_ucontext *ucontext = get_ocrdma_ucontext(context); struct ocrdma_dev *dev = get_ocrdma_dev(context->device); unsigned long vm_page = vma->vm_pgoff << PAGE_SHIFT; u64 unmapped_db = (u64) dev->nic_info.unmapped_db; unsigned long len = (vma->vm_end - vma->vm_start); int status = 0; bool found; if (vma->vm_start & (PAGE_SIZE - 1)) return -EINVAL; found = ocrdma_search_mmap(ucontext, vma->vm_pgoff << PAGE_SHIFT, len); if (!found) return -EINVAL; if ((vm_page >= unmapped_db) && (vm_page <= (unmapped_db + dev->nic_info.db_total_size)) && (len <= dev->nic_info.db_page_size)) { if (vma->vm_flags & VM_READ) return -EPERM; vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot); status = io_remap_pfn_range(vma, vma->vm_start, vma->vm_pgoff, len, vma->vm_page_prot); } else if (dev->nic_info.dpp_unmapped_len && (vm_page >= (u64) dev->nic_info.dpp_unmapped_addr) && (vm_page <= (u64) (dev->nic_info.dpp_unmapped_addr + dev->nic_info.dpp_unmapped_len)) && (len <= dev->nic_info.dpp_unmapped_len)) { if (vma->vm_flags & VM_READ) return -EPERM; vma->vm_page_prot = pgprot_writecombine(vma->vm_page_prot); status = io_remap_pfn_range(vma, vma->vm_start, vma->vm_pgoff, len, vma->vm_page_prot); } else { status = remap_pfn_range(vma, vma->vm_start, vma->vm_pgoff, len, vma->vm_page_prot); } return status; } static int ocrdma_copy_pd_uresp(struct ocrdma_dev *dev, struct ocrdma_pd *pd, struct ib_ucontext *ib_ctx, struct ib_udata *udata) { int status; u64 db_page_addr; u64 dpp_page_addr = 0; u32 db_page_size; struct ocrdma_alloc_pd_uresp rsp; struct ocrdma_ucontext *uctx = get_ocrdma_ucontext(ib_ctx); memset(&rsp, 0, sizeof(rsp)); rsp.id = pd->id; rsp.dpp_enabled = pd->dpp_enabled; db_page_addr = ocrdma_get_db_addr(dev, pd->id); db_page_size = dev->nic_info.db_page_size; status = ocrdma_add_mmap(uctx, db_page_addr, db_page_size); if (status) return status; if (pd->dpp_enabled) { dpp_page_addr = dev->nic_info.dpp_unmapped_addr + (pd->id * PAGE_SIZE); status = ocrdma_add_mmap(uctx, dpp_page_addr, PAGE_SIZE); if (status) goto dpp_map_err; rsp.dpp_page_addr_hi = upper_32_bits(dpp_page_addr); rsp.dpp_page_addr_lo = dpp_page_addr; } status = ib_copy_to_udata(udata, &rsp, sizeof(rsp)); if (status) goto ucopy_err; pd->uctx = uctx; return 0; ucopy_err: if (pd->dpp_enabled) ocrdma_del_mmap(pd->uctx, dpp_page_addr, PAGE_SIZE); dpp_map_err: ocrdma_del_mmap(pd->uctx, db_page_addr, db_page_size); return status; } struct ib_pd *ocrdma_alloc_pd(struct ib_device *ibdev, struct ib_ucontext *context, struct ib_udata *udata) { struct ocrdma_dev *dev = get_ocrdma_dev(ibdev); struct ocrdma_pd *pd; struct ocrdma_ucontext *uctx = NULL; int status; u8 is_uctx_pd = false; if (udata && context) { uctx = get_ocrdma_ucontext(context); pd = ocrdma_get_ucontext_pd(uctx); if (pd) { is_uctx_pd = true; goto pd_mapping; } } pd = _ocrdma_alloc_pd(dev, uctx, udata); if (IS_ERR(pd)) { status = PTR_ERR(pd); goto exit; } pd_mapping: if (udata && context) { status = ocrdma_copy_pd_uresp(dev, pd, context, udata); if (status) goto err; } return &pd->ibpd; err: if (is_uctx_pd) { ocrdma_release_ucontext_pd(uctx); } else { status = ocrdma_mbx_dealloc_pd(dev, pd); kfree(pd); } exit: return ERR_PTR(status); } int ocrdma_dealloc_pd(struct ib_pd *ibpd) { struct ocrdma_pd *pd = get_ocrdma_pd(ibpd); struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device); struct ocrdma_ucontext *uctx = NULL; int status = 0; u64 usr_db; uctx = pd->uctx; if (uctx) { u64 dpp_db = dev->nic_info.dpp_unmapped_addr + (pd->id * PAGE_SIZE); if (pd->dpp_enabled) ocrdma_del_mmap(pd->uctx, dpp_db, PAGE_SIZE); usr_db = ocrdma_get_db_addr(dev, pd->id); ocrdma_del_mmap(pd->uctx, usr_db, dev->nic_info.db_page_size); if (is_ucontext_pd(uctx, pd)) { ocrdma_release_ucontext_pd(uctx); return status; } } status = _ocrdma_dealloc_pd(dev, pd); return status; } static int ocrdma_alloc_lkey(struct ocrdma_dev *dev, struct ocrdma_mr *mr, u32 pdid, int acc, u32 num_pbls, u32 addr_check) { int status; mr->hwmr.fr_mr = 0; mr->hwmr.local_rd = 1; mr->hwmr.remote_rd = (acc & IB_ACCESS_REMOTE_READ) ? 1 : 0; mr->hwmr.remote_wr = (acc & IB_ACCESS_REMOTE_WRITE) ? 1 : 0; mr->hwmr.local_wr = (acc & IB_ACCESS_LOCAL_WRITE) ? 1 : 0; mr->hwmr.mw_bind = (acc & IB_ACCESS_MW_BIND) ? 1 : 0; mr->hwmr.remote_atomic = (acc & IB_ACCESS_REMOTE_ATOMIC) ? 1 : 0; mr->hwmr.num_pbls = num_pbls; status = ocrdma_mbx_alloc_lkey(dev, &mr->hwmr, pdid, addr_check); if (status) return status; mr->ibmr.lkey = mr->hwmr.lkey; if (mr->hwmr.remote_wr || mr->hwmr.remote_rd) mr->ibmr.rkey = mr->hwmr.lkey; return 0; } struct ib_mr *ocrdma_get_dma_mr(struct ib_pd *ibpd, int acc) { int status; struct ocrdma_mr *mr; struct ocrdma_pd *pd = get_ocrdma_pd(ibpd); struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device); if (acc & IB_ACCESS_REMOTE_WRITE && !(acc & IB_ACCESS_LOCAL_WRITE)) { pr_err("%s err, invalid access rights\n", __func__); return ERR_PTR(-EINVAL); } mr = kzalloc(sizeof(*mr), GFP_KERNEL); if (!mr) return ERR_PTR(-ENOMEM); status = ocrdma_alloc_lkey(dev, mr, pd->id, acc, 0, OCRDMA_ADDR_CHECK_DISABLE); if (status) { kfree(mr); return ERR_PTR(status); } return &mr->ibmr; } static void ocrdma_free_mr_pbl_tbl(struct ocrdma_dev *dev, struct ocrdma_hw_mr *mr) { struct pci_dev *pdev = dev->nic_info.pdev; int i = 0; if (mr->pbl_table) { for (i = 0; i < mr->num_pbls; i++) { if (!mr->pbl_table[i].va) continue; dma_free_coherent(&pdev->dev, mr->pbl_size, mr->pbl_table[i].va, mr->pbl_table[i].pa); } kfree(mr->pbl_table); mr->pbl_table = NULL; } } static int ocrdma_get_pbl_info(struct ocrdma_dev *dev, struct ocrdma_mr *mr, u32 num_pbes) { u32 num_pbls = 0; u32 idx = 0; int status = 0; u32 pbl_size; do { pbl_size = OCRDMA_MIN_HPAGE_SIZE * (1 << idx); if (pbl_size > MAX_OCRDMA_PBL_SIZE) { status = -EFAULT; break; } num_pbls = roundup(num_pbes, (pbl_size / sizeof(u64))); num_pbls = num_pbls / (pbl_size / sizeof(u64)); idx++; } while (num_pbls >= dev->attr.max_num_mr_pbl); mr->hwmr.num_pbes = num_pbes; mr->hwmr.num_pbls = num_pbls; mr->hwmr.pbl_size = pbl_size; return status; } static int ocrdma_build_pbl_tbl(struct ocrdma_dev *dev, struct ocrdma_hw_mr *mr) { int status = 0; int i; u32 dma_len = mr->pbl_size; struct pci_dev *pdev = dev->nic_info.pdev; void *va; dma_addr_t pa; mr->pbl_table = kzalloc(sizeof(struct ocrdma_pbl) * mr->num_pbls, GFP_KERNEL); if (!mr->pbl_table) return -ENOMEM; for (i = 0; i < mr->num_pbls; i++) { va = dma_alloc_coherent(&pdev->dev, dma_len, &pa, GFP_KERNEL); if (!va) { ocrdma_free_mr_pbl_tbl(dev, mr); status = -ENOMEM; break; } memset(va, 0, dma_len); mr->pbl_table[i].va = va; mr->pbl_table[i].pa = pa; } return status; } static void build_user_pbes(struct ocrdma_dev *dev, struct ocrdma_mr *mr, u32 num_pbes) { struct ocrdma_pbe *pbe; struct scatterlist *sg; struct ocrdma_pbl *pbl_tbl = mr->hwmr.pbl_table; struct ib_umem *umem = mr->umem; int shift, pg_cnt, pages, pbe_cnt, entry, total_num_pbes = 0; if (!mr->hwmr.num_pbes) return; pbe = (struct ocrdma_pbe *)pbl_tbl->va; pbe_cnt = 0; shift = ilog2(umem->page_size); for_each_sg(umem->sg_head.sgl, sg, umem->nmap, entry) { pages = sg_dma_len(sg) >> shift; for (pg_cnt = 0; pg_cnt < pages; pg_cnt++) { /* store the page address in pbe */ pbe->pa_lo = cpu_to_le32(sg_dma_address (sg) + (umem->page_size * pg_cnt)); pbe->pa_hi = cpu_to_le32(upper_32_bits ((sg_dma_address (sg) + umem->page_size * pg_cnt))); pbe_cnt += 1; total_num_pbes += 1; pbe++; /* if done building pbes, issue the mbx cmd. */ if (total_num_pbes == num_pbes) return; /* if the given pbl is full storing the pbes, * move to next pbl. */ if (pbe_cnt == (mr->hwmr.pbl_size / sizeof(u64))) { pbl_tbl++; pbe = (struct ocrdma_pbe *)pbl_tbl->va; pbe_cnt = 0; } } } } struct ib_mr *ocrdma_reg_user_mr(struct ib_pd *ibpd, u64 start, u64 len, u64 usr_addr, int acc, struct ib_udata *udata) { int status = -ENOMEM; struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device); struct ocrdma_mr *mr; struct ocrdma_pd *pd; u32 num_pbes; pd = get_ocrdma_pd(ibpd); if (acc & IB_ACCESS_REMOTE_WRITE && !(acc & IB_ACCESS_LOCAL_WRITE)) return ERR_PTR(-EINVAL); mr = kzalloc(sizeof(*mr), GFP_KERNEL); if (!mr) return ERR_PTR(status); mr->umem = ib_umem_get(ibpd->uobject->context, start, len, acc, 0); if (IS_ERR(mr->umem)) { status = -EFAULT; goto umem_err; } num_pbes = ib_umem_page_count(mr->umem); status = ocrdma_get_pbl_info(dev, mr, num_pbes); if (status) goto umem_err; mr->hwmr.pbe_size = mr->umem->page_size; mr->hwmr.fbo = mr->umem->offset; mr->hwmr.va = usr_addr; mr->hwmr.len = len; mr->hwmr.remote_wr = (acc & IB_ACCESS_REMOTE_WRITE) ? 1 : 0; mr->hwmr.remote_rd = (acc & IB_ACCESS_REMOTE_READ) ? 1 : 0; mr->hwmr.local_wr = (acc & IB_ACCESS_LOCAL_WRITE) ? 1 : 0; mr->hwmr.local_rd = 1; mr->hwmr.remote_atomic = (acc & IB_ACCESS_REMOTE_ATOMIC) ? 1 : 0; status = ocrdma_build_pbl_tbl(dev, &mr->hwmr); if (status) goto umem_err; build_user_pbes(dev, mr, num_pbes); status = ocrdma_reg_mr(dev, &mr->hwmr, pd->id, acc); if (status) goto mbx_err; mr->ibmr.lkey = mr->hwmr.lkey; if (mr->hwmr.remote_wr || mr->hwmr.remote_rd) mr->ibmr.rkey = mr->hwmr.lkey; return &mr->ibmr; mbx_err: ocrdma_free_mr_pbl_tbl(dev, &mr->hwmr); umem_err: kfree(mr); return ERR_PTR(status); } int ocrdma_dereg_mr(struct ib_mr *ib_mr) { struct ocrdma_mr *mr = get_ocrdma_mr(ib_mr); struct ocrdma_dev *dev = get_ocrdma_dev(ib_mr->device); int status; status = ocrdma_mbx_dealloc_lkey(dev, mr->hwmr.fr_mr, mr->hwmr.lkey); ocrdma_free_mr_pbl_tbl(dev, &mr->hwmr); /* it could be user registered memory. */ if (mr->umem) ib_umem_release(mr->umem); kfree(mr); /* Don't stop cleanup, in case FW is unresponsive */ if (dev->mqe_ctx.fw_error_state) { status = 0; pr_err("%s(%d) fw not responding.\n", __func__, dev->id); } return status; } static int ocrdma_copy_cq_uresp(struct ocrdma_dev *dev, struct ocrdma_cq *cq, struct ib_udata *udata, struct ib_ucontext *ib_ctx) { int status; struct ocrdma_ucontext *uctx = get_ocrdma_ucontext(ib_ctx); struct ocrdma_create_cq_uresp uresp; memset(&uresp, 0, sizeof(uresp)); uresp.cq_id = cq->id; uresp.page_size = PAGE_ALIGN(cq->len); uresp.num_pages = 1; uresp.max_hw_cqe = cq->max_hw_cqe; uresp.page_addr[0] = cq->pa; uresp.db_page_addr = ocrdma_get_db_addr(dev, uctx->cntxt_pd->id); uresp.db_page_size = dev->nic_info.db_page_size; uresp.phase_change = cq->phase_change ? 1 : 0; status = ib_copy_to_udata(udata, &uresp, sizeof(uresp)); if (status) { pr_err("%s(%d) copy error cqid=0x%x.\n", __func__, dev->id, cq->id); goto err; } status = ocrdma_add_mmap(uctx, uresp.db_page_addr, uresp.db_page_size); if (status) goto err; status = ocrdma_add_mmap(uctx, uresp.page_addr[0], uresp.page_size); if (status) { ocrdma_del_mmap(uctx, uresp.db_page_addr, uresp.db_page_size); goto err; } cq->ucontext = uctx; err: return status; } struct ib_cq *ocrdma_create_cq(struct ib_device *ibdev, int entries, int vector, struct ib_ucontext *ib_ctx, struct ib_udata *udata) { struct ocrdma_cq *cq; struct ocrdma_dev *dev = get_ocrdma_dev(ibdev); struct ocrdma_ucontext *uctx = NULL; u16 pd_id = 0; int status; struct ocrdma_create_cq_ureq ureq; if (udata) { if (ib_copy_from_udata(&ureq, udata, sizeof(ureq))) return ERR_PTR(-EFAULT); } else ureq.dpp_cq = 0; cq = kzalloc(sizeof(*cq), GFP_KERNEL); if (!cq) return ERR_PTR(-ENOMEM); spin_lock_init(&cq->cq_lock); spin_lock_init(&cq->comp_handler_lock); INIT_LIST_HEAD(&cq->sq_head); INIT_LIST_HEAD(&cq->rq_head); cq->first_arm = true; if (ib_ctx) { uctx = get_ocrdma_ucontext(ib_ctx); pd_id = uctx->cntxt_pd->id; } status = ocrdma_mbx_create_cq(dev, cq, entries, ureq.dpp_cq, pd_id); if (status) { kfree(cq); return ERR_PTR(status); } if (ib_ctx) { status = ocrdma_copy_cq_uresp(dev, cq, udata, ib_ctx); if (status) goto ctx_err; } cq->phase = OCRDMA_CQE_VALID; dev->cq_tbl[cq->id] = cq; return &cq->ibcq; ctx_err: ocrdma_mbx_destroy_cq(dev, cq); kfree(cq); return ERR_PTR(status); } int ocrdma_resize_cq(struct ib_cq *ibcq, int new_cnt, struct ib_udata *udata) { int status = 0; struct ocrdma_cq *cq = get_ocrdma_cq(ibcq); if (new_cnt < 1 || new_cnt > cq->max_hw_cqe) { status = -EINVAL; return status; } ibcq->cqe = new_cnt; return status; } static void ocrdma_flush_cq(struct ocrdma_cq *cq) { int cqe_cnt; int valid_count = 0; unsigned long flags; struct ocrdma_dev *dev = get_ocrdma_dev(cq->ibcq.device); struct ocrdma_cqe *cqe = NULL; cqe = cq->va; cqe_cnt = cq->cqe_cnt; /* Last irq might have scheduled a polling thread * sync-up with it before hard flushing. */ spin_lock_irqsave(&cq->cq_lock, flags); while (cqe_cnt) { if (is_cqe_valid(cq, cqe)) valid_count++; cqe++; cqe_cnt--; } ocrdma_ring_cq_db(dev, cq->id, false, false, valid_count); spin_unlock_irqrestore(&cq->cq_lock, flags); } int ocrdma_destroy_cq(struct ib_cq *ibcq) { int status; struct ocrdma_cq *cq = get_ocrdma_cq(ibcq); struct ocrdma_eq *eq = NULL; struct ocrdma_dev *dev = get_ocrdma_dev(ibcq->device); int pdid = 0; u32 irq, indx; dev->cq_tbl[cq->id] = NULL; indx = ocrdma_get_eq_table_index(dev, cq->eqn); if (indx == -EINVAL) BUG(); eq = &dev->eq_tbl[indx]; irq = ocrdma_get_irq(dev, eq); synchronize_irq(irq); ocrdma_flush_cq(cq); status = ocrdma_mbx_destroy_cq(dev, cq); if (cq->ucontext) { pdid = cq->ucontext->cntxt_pd->id; ocrdma_del_mmap(cq->ucontext, (u64) cq->pa, PAGE_ALIGN(cq->len)); ocrdma_del_mmap(cq->ucontext, ocrdma_get_db_addr(dev, pdid), dev->nic_info.db_page_size); } kfree(cq); return status; } static int ocrdma_add_qpn_map(struct ocrdma_dev *dev, struct ocrdma_qp *qp) { int status = -EINVAL; if (qp->id < OCRDMA_MAX_QP && dev->qp_tbl[qp->id] == NULL) { dev->qp_tbl[qp->id] = qp; status = 0; } return status; } static void ocrdma_del_qpn_map(struct ocrdma_dev *dev, struct ocrdma_qp *qp) { dev->qp_tbl[qp->id] = NULL; } static int ocrdma_check_qp_params(struct ib_pd *ibpd, struct ocrdma_dev *dev, struct ib_qp_init_attr *attrs) { if ((attrs->qp_type != IB_QPT_GSI) && (attrs->qp_type != IB_QPT_RC) && (attrs->qp_type != IB_QPT_UC) && (attrs->qp_type != IB_QPT_UD)) { pr_err("%s(%d) unsupported qp type=0x%x requested\n", __func__, dev->id, attrs->qp_type); return -EINVAL; } /* Skip the check for QP1 to support CM size of 128 */ if ((attrs->qp_type != IB_QPT_GSI) && (attrs->cap.max_send_wr > dev->attr.max_wqe)) { pr_err("%s(%d) unsupported send_wr=0x%x requested\n", __func__, dev->id, attrs->cap.max_send_wr); pr_err("%s(%d) supported send_wr=0x%x\n", __func__, dev->id, dev->attr.max_wqe); return -EINVAL; } if (!attrs->srq && (attrs->cap.max_recv_wr > dev->attr.max_rqe)) { pr_err("%s(%d) unsupported recv_wr=0x%x requested\n", __func__, dev->id, attrs->cap.max_recv_wr); pr_err("%s(%d) supported recv_wr=0x%x\n", __func__, dev->id, dev->attr.max_rqe); return -EINVAL; } if (attrs->cap.max_inline_data > dev->attr.max_inline_data) { pr_err("%s(%d) unsupported inline data size=0x%x requested\n", __func__, dev->id, attrs->cap.max_inline_data); pr_err("%s(%d) supported inline data size=0x%x\n", __func__, dev->id, dev->attr.max_inline_data); return -EINVAL; } if (attrs->cap.max_send_sge > dev->attr.max_send_sge) { pr_err("%s(%d) unsupported send_sge=0x%x requested\n", __func__, dev->id, attrs->cap.max_send_sge); pr_err("%s(%d) supported send_sge=0x%x\n", __func__, dev->id, dev->attr.max_send_sge); return -EINVAL; } if (attrs->cap.max_recv_sge > dev->attr.max_recv_sge) { pr_err("%s(%d) unsupported recv_sge=0x%x requested\n", __func__, dev->id, attrs->cap.max_recv_sge); pr_err("%s(%d) supported recv_sge=0x%x\n", __func__, dev->id, dev->attr.max_recv_sge); return -EINVAL; } /* unprivileged user space cannot create special QP */ if (ibpd->uobject && attrs->qp_type == IB_QPT_GSI) { pr_err ("%s(%d) Userspace can't create special QPs of type=0x%x\n", __func__, dev->id, attrs->qp_type); return -EINVAL; } /* allow creating only one GSI type of QP */ if (attrs->qp_type == IB_QPT_GSI && dev->gsi_qp_created) { pr_err("%s(%d) GSI special QPs already created.\n", __func__, dev->id); return -EINVAL; } /* verify consumer QPs are not trying to use GSI QP's CQ */ if ((attrs->qp_type != IB_QPT_GSI) && (dev->gsi_qp_created)) { if ((dev->gsi_sqcq == get_ocrdma_cq(attrs->send_cq)) || (dev->gsi_rqcq == get_ocrdma_cq(attrs->recv_cq))) { pr_err("%s(%d) Consumer QP cannot use GSI CQs.\n", __func__, dev->id); return -EINVAL; } } return 0; } static int ocrdma_copy_qp_uresp(struct ocrdma_qp *qp, struct ib_udata *udata, int dpp_offset, int dpp_credit_lmt, int srq) { int status = 0; u64 usr_db; struct ocrdma_create_qp_uresp uresp; struct ocrdma_dev *dev = qp->dev; struct ocrdma_pd *pd = qp->pd; memset(&uresp, 0, sizeof(uresp)); usr_db = dev->nic_info.unmapped_db + (pd->id * dev->nic_info.db_page_size); uresp.qp_id = qp->id; uresp.sq_dbid = qp->sq.dbid; uresp.num_sq_pages = 1; uresp.sq_page_size = PAGE_ALIGN(qp->sq.len); uresp.sq_page_addr[0] = qp->sq.pa; uresp.num_wqe_allocated = qp->sq.max_cnt; if (!srq) { uresp.rq_dbid = qp->rq.dbid; uresp.num_rq_pages = 1; uresp.rq_page_size = PAGE_ALIGN(qp->rq.len); uresp.rq_page_addr[0] = qp->rq.pa; uresp.num_rqe_allocated = qp->rq.max_cnt; } uresp.db_page_addr = usr_db; uresp.db_page_size = dev->nic_info.db_page_size; uresp.db_sq_offset = OCRDMA_DB_GEN2_SQ_OFFSET; uresp.db_rq_offset = OCRDMA_DB_GEN2_RQ_OFFSET; uresp.db_shift = OCRDMA_DB_RQ_SHIFT; if (qp->dpp_enabled) { uresp.dpp_credit = dpp_credit_lmt; uresp.dpp_offset = dpp_offset; } status = ib_copy_to_udata(udata, &uresp, sizeof(uresp)); if (status) { pr_err("%s(%d) user copy error.\n", __func__, dev->id); goto err; } status = ocrdma_add_mmap(pd->uctx, uresp.sq_page_addr[0], uresp.sq_page_size); if (status) goto err; if (!srq) { status = ocrdma_add_mmap(pd->uctx, uresp.rq_page_addr[0], uresp.rq_page_size); if (status) goto rq_map_err; } return status; rq_map_err: ocrdma_del_mmap(pd->uctx, uresp.sq_page_addr[0], uresp.sq_page_size); err: return status; } static void ocrdma_set_qp_db(struct ocrdma_dev *dev, struct ocrdma_qp *qp, struct ocrdma_pd *pd) { if (ocrdma_get_asic_type(dev) == OCRDMA_ASIC_GEN_SKH_R) { qp->sq_db = dev->nic_info.db + (pd->id * dev->nic_info.db_page_size) + OCRDMA_DB_GEN2_SQ_OFFSET; qp->rq_db = dev->nic_info.db + (pd->id * dev->nic_info.db_page_size) + OCRDMA_DB_GEN2_RQ_OFFSET; } else { qp->sq_db = dev->nic_info.db + (pd->id * dev->nic_info.db_page_size) + OCRDMA_DB_SQ_OFFSET; qp->rq_db = dev->nic_info.db + (pd->id * dev->nic_info.db_page_size) + OCRDMA_DB_RQ_OFFSET; } } static int ocrdma_alloc_wr_id_tbl(struct ocrdma_qp *qp) { qp->wqe_wr_id_tbl = kzalloc(sizeof(*(qp->wqe_wr_id_tbl)) * qp->sq.max_cnt, GFP_KERNEL); if (qp->wqe_wr_id_tbl == NULL) return -ENOMEM; qp->rqe_wr_id_tbl = kzalloc(sizeof(u64) * qp->rq.max_cnt, GFP_KERNEL); if (qp->rqe_wr_id_tbl == NULL) return -ENOMEM; return 0; } static void ocrdma_set_qp_init_params(struct ocrdma_qp *qp, struct ocrdma_pd *pd, struct ib_qp_init_attr *attrs) { qp->pd = pd; spin_lock_init(&qp->q_lock); INIT_LIST_HEAD(&qp->sq_entry); INIT_LIST_HEAD(&qp->rq_entry); qp->qp_type = attrs->qp_type; qp->cap_flags = OCRDMA_QP_INB_RD | OCRDMA_QP_INB_WR; qp->max_inline_data = attrs->cap.max_inline_data; qp->sq.max_sges = attrs->cap.max_send_sge; qp->rq.max_sges = attrs->cap.max_recv_sge; qp->state = OCRDMA_QPS_RST; qp->signaled = (attrs->sq_sig_type == IB_SIGNAL_ALL_WR) ? true : false; } static void ocrdma_store_gsi_qp_cq(struct ocrdma_dev *dev, struct ib_qp_init_attr *attrs) { if (attrs->qp_type == IB_QPT_GSI) { dev->gsi_qp_created = 1; dev->gsi_sqcq = get_ocrdma_cq(attrs->send_cq); dev->gsi_rqcq = get_ocrdma_cq(attrs->recv_cq); } } struct ib_qp *ocrdma_create_qp(struct ib_pd *ibpd, struct ib_qp_init_attr *attrs, struct ib_udata *udata) { int status; struct ocrdma_pd *pd = get_ocrdma_pd(ibpd); struct ocrdma_qp *qp; struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device); struct ocrdma_create_qp_ureq ureq; u16 dpp_credit_lmt, dpp_offset; status = ocrdma_check_qp_params(ibpd, dev, attrs); if (status) goto gen_err; memset(&ureq, 0, sizeof(ureq)); if (udata) { if (ib_copy_from_udata(&ureq, udata, sizeof(ureq))) return ERR_PTR(-EFAULT); } qp = kzalloc(sizeof(*qp), GFP_KERNEL); if (!qp) { status = -ENOMEM; goto gen_err; } qp->dev = dev; ocrdma_set_qp_init_params(qp, pd, attrs); if (udata == NULL) qp->cap_flags |= (OCRDMA_QP_MW_BIND | OCRDMA_QP_LKEY0 | OCRDMA_QP_FAST_REG); mutex_lock(&dev->dev_lock); status = ocrdma_mbx_create_qp(qp, attrs, ureq.enable_dpp_cq, ureq.dpp_cq_id, &dpp_offset, &dpp_credit_lmt); if (status) goto mbx_err; /* user space QP's wr_id table are managed in library */ if (udata == NULL) { status = ocrdma_alloc_wr_id_tbl(qp); if (status) goto map_err; } status = ocrdma_add_qpn_map(dev, qp); if (status) goto map_err; ocrdma_set_qp_db(dev, qp, pd); if (udata) { status = ocrdma_copy_qp_uresp(qp, udata, dpp_offset, dpp_credit_lmt, (attrs->srq != NULL)); if (status) goto cpy_err; } ocrdma_store_gsi_qp_cq(dev, attrs); qp->ibqp.qp_num = qp->id; mutex_unlock(&dev->dev_lock); return &qp->ibqp; cpy_err: ocrdma_del_qpn_map(dev, qp); map_err: ocrdma_mbx_destroy_qp(dev, qp); mbx_err: mutex_unlock(&dev->dev_lock); kfree(qp->wqe_wr_id_tbl); kfree(qp->rqe_wr_id_tbl); kfree(qp); pr_err("%s(%d) error=%d\n", __func__, dev->id, status); gen_err: return ERR_PTR(status); } int _ocrdma_modify_qp(struct ib_qp *ibqp, struct ib_qp_attr *attr, int attr_mask) { int status = 0; struct ocrdma_qp *qp; struct ocrdma_dev *dev; enum ib_qp_state old_qps; qp = get_ocrdma_qp(ibqp); dev = qp->dev; if (attr_mask & IB_QP_STATE) status = ocrdma_qp_state_change(qp, attr->qp_state, &old_qps); /* if new and previous states are same hw doesn't need to * know about it. */ if (status < 0) return status; status = ocrdma_mbx_modify_qp(dev, qp, attr, attr_mask); return status; } int ocrdma_modify_qp(struct ib_qp *ibqp, struct ib_qp_attr *attr, int attr_mask, struct ib_udata *udata) { unsigned long flags; int status = -EINVAL; struct ocrdma_qp *qp; struct ocrdma_dev *dev; enum ib_qp_state old_qps, new_qps; qp = get_ocrdma_qp(ibqp); dev = qp->dev; /* syncronize with multiple context trying to change, retrive qps */ mutex_lock(&dev->dev_lock); /* syncronize with wqe, rqe posting and cqe processing contexts */ spin_lock_irqsave(&qp->q_lock, flags); old_qps = get_ibqp_state(qp->state); if (attr_mask & IB_QP_STATE) new_qps = attr->qp_state; else new_qps = old_qps; spin_unlock_irqrestore(&qp->q_lock, flags); if (!ib_modify_qp_is_ok(old_qps, new_qps, ibqp->qp_type, attr_mask, IB_LINK_LAYER_ETHERNET)) { pr_err("%s(%d) invalid attribute mask=0x%x specified for\n" "qpn=0x%x of type=0x%x old_qps=0x%x, new_qps=0x%x\n", __func__, dev->id, attr_mask, qp->id, ibqp->qp_type, old_qps, new_qps); goto param_err; } status = _ocrdma_modify_qp(ibqp, attr, attr_mask); if (status > 0) status = 0; param_err: mutex_unlock(&dev->dev_lock); return status; } static enum ib_mtu ocrdma_mtu_int_to_enum(u16 mtu) { switch (mtu) { case 256: return IB_MTU_256; case 512: return IB_MTU_512; case 1024: return IB_MTU_1024; case 2048: return IB_MTU_2048; case 4096: return IB_MTU_4096; default: return IB_MTU_1024; } } static int ocrdma_to_ib_qp_acc_flags(int qp_cap_flags) { int ib_qp_acc_flags = 0; if (qp_cap_flags & OCRDMA_QP_INB_WR) ib_qp_acc_flags |= IB_ACCESS_REMOTE_WRITE; if (qp_cap_flags & OCRDMA_QP_INB_RD) ib_qp_acc_flags |= IB_ACCESS_LOCAL_WRITE; return ib_qp_acc_flags; } int ocrdma_query_qp(struct ib_qp *ibqp, struct ib_qp_attr *qp_attr, int attr_mask, struct ib_qp_init_attr *qp_init_attr) { int status; u32 qp_state; struct ocrdma_qp_params params; struct ocrdma_qp *qp = get_ocrdma_qp(ibqp); struct ocrdma_dev *dev = qp->dev; memset(¶ms, 0, sizeof(params)); mutex_lock(&dev->dev_lock); status = ocrdma_mbx_query_qp(dev, qp, ¶ms); mutex_unlock(&dev->dev_lock); if (status) goto mbx_err; qp_attr->qp_state = get_ibqp_state(IB_QPS_INIT); qp_attr->cur_qp_state = get_ibqp_state(IB_QPS_INIT); qp_attr->path_mtu = ocrdma_mtu_int_to_enum(params.path_mtu_pkey_indx & OCRDMA_QP_PARAMS_PATH_MTU_MASK) >> OCRDMA_QP_PARAMS_PATH_MTU_SHIFT; qp_attr->path_mig_state = IB_MIG_MIGRATED; qp_attr->rq_psn = params.hop_lmt_rq_psn & OCRDMA_QP_PARAMS_RQ_PSN_MASK; qp_attr->sq_psn = params.tclass_sq_psn & OCRDMA_QP_PARAMS_SQ_PSN_MASK; qp_attr->dest_qp_num = params.ack_to_rnr_rtc_dest_qpn & OCRDMA_QP_PARAMS_DEST_QPN_MASK; qp_attr->qp_access_flags = ocrdma_to_ib_qp_acc_flags(qp->cap_flags); qp_attr->cap.max_send_wr = qp->sq.max_cnt - 1; qp_attr->cap.max_recv_wr = qp->rq.max_cnt - 1; qp_attr->cap.max_send_sge = qp->sq.max_sges; qp_attr->cap.max_recv_sge = qp->rq.max_sges; qp_attr->cap.max_inline_data = qp->max_inline_data; qp_init_attr->cap = qp_attr->cap; memcpy(&qp_attr->ah_attr.grh.dgid, ¶ms.dgid[0], sizeof(params.dgid)); qp_attr->ah_attr.grh.flow_label = params.rnt_rc_sl_fl & OCRDMA_QP_PARAMS_FLOW_LABEL_MASK; qp_attr->ah_attr.grh.sgid_index = qp->sgid_idx; qp_attr->ah_attr.grh.hop_limit = (params.hop_lmt_rq_psn & OCRDMA_QP_PARAMS_HOP_LMT_MASK) >> OCRDMA_QP_PARAMS_HOP_LMT_SHIFT; qp_attr->ah_attr.grh.traffic_class = (params.tclass_sq_psn & OCRDMA_QP_PARAMS_TCLASS_MASK) >> OCRDMA_QP_PARAMS_TCLASS_SHIFT; qp_attr->ah_attr.ah_flags = IB_AH_GRH; qp_attr->ah_attr.port_num = 1; qp_attr->ah_attr.sl = (params.rnt_rc_sl_fl & OCRDMA_QP_PARAMS_SL_MASK) >> OCRDMA_QP_PARAMS_SL_SHIFT; qp_attr->timeout = (params.ack_to_rnr_rtc_dest_qpn & OCRDMA_QP_PARAMS_ACK_TIMEOUT_MASK) >> OCRDMA_QP_PARAMS_ACK_TIMEOUT_SHIFT; qp_attr->rnr_retry = (params.ack_to_rnr_rtc_dest_qpn & OCRDMA_QP_PARAMS_RNR_RETRY_CNT_MASK) >> OCRDMA_QP_PARAMS_RNR_RETRY_CNT_SHIFT; qp_attr->retry_cnt = (params.rnt_rc_sl_fl & OCRDMA_QP_PARAMS_RETRY_CNT_MASK) >> OCRDMA_QP_PARAMS_RETRY_CNT_SHIFT; qp_attr->min_rnr_timer = 0; qp_attr->pkey_index = 0; qp_attr->port_num = 1; qp_attr->ah_attr.src_path_bits = 0; qp_attr->ah_attr.static_rate = 0; qp_attr->alt_pkey_index = 0; qp_attr->alt_port_num = 0; qp_attr->alt_timeout = 0; memset(&qp_attr->alt_ah_attr, 0, sizeof(qp_attr->alt_ah_attr)); qp_state = (params.max_sge_recv_flags & OCRDMA_QP_PARAMS_STATE_MASK) >> OCRDMA_QP_PARAMS_STATE_SHIFT; qp_attr->sq_draining = (qp_state == OCRDMA_QPS_SQ_DRAINING) ? 1 : 0; qp_attr->max_dest_rd_atomic = params.max_ord_ird >> OCRDMA_QP_PARAMS_MAX_ORD_SHIFT; qp_attr->max_rd_atomic = params.max_ord_ird & OCRDMA_QP_PARAMS_MAX_IRD_MASK; qp_attr->en_sqd_async_notify = (params.max_sge_recv_flags & OCRDMA_QP_PARAMS_FLAGS_SQD_ASYNC) ? 1 : 0; mbx_err: return status; } static void ocrdma_srq_toggle_bit(struct ocrdma_srq *srq, int idx) { int i = idx / 32; unsigned int mask = (1 << (idx % 32)); if (srq->idx_bit_fields[i] & mask) srq->idx_bit_fields[i] &= ~mask; else srq->idx_bit_fields[i] |= mask; } static int ocrdma_hwq_free_cnt(struct ocrdma_qp_hwq_info *q) { return ((q->max_wqe_idx - q->head) + q->tail) % q->max_cnt; } static int is_hw_sq_empty(struct ocrdma_qp *qp) { return (qp->sq.tail == qp->sq.head); } static int is_hw_rq_empty(struct ocrdma_qp *qp) { return (qp->rq.tail == qp->rq.head); } static void *ocrdma_hwq_head(struct ocrdma_qp_hwq_info *q) { return q->va + (q->head * q->entry_size); } static void *ocrdma_hwq_head_from_idx(struct ocrdma_qp_hwq_info *q, u32 idx) { return q->va + (idx * q->entry_size); } static void ocrdma_hwq_inc_head(struct ocrdma_qp_hwq_info *q) { q->head = (q->head + 1) & q->max_wqe_idx; } static void ocrdma_hwq_inc_tail(struct ocrdma_qp_hwq_info *q) { q->tail = (q->tail + 1) & q->max_wqe_idx; } /* discard the cqe for a given QP */ static void ocrdma_discard_cqes(struct ocrdma_qp *qp, struct ocrdma_cq *cq) { unsigned long cq_flags; unsigned long flags; int discard_cnt = 0; u32 cur_getp, stop_getp; struct ocrdma_cqe *cqe; u32 qpn = 0, wqe_idx = 0; spin_lock_irqsave(&cq->cq_lock, cq_flags); /* traverse through the CQEs in the hw CQ, * find the matching CQE for a given qp, * mark the matching one discarded by clearing qpn. * ring the doorbell in the poll_cq() as * we don't complete out of order cqe. */ cur_getp = cq->getp; /* find upto when do we reap the cq. */ stop_getp = cur_getp; do { if (is_hw_sq_empty(qp) && (!qp->srq && is_hw_rq_empty(qp))) break; cqe = cq->va + cur_getp; /* if (a) done reaping whole hw cq, or * (b) qp_xq becomes empty. * then exit */ qpn = cqe->cmn.qpn & OCRDMA_CQE_QPN_MASK; /* if previously discarded cqe found, skip that too. */ /* check for matching qp */ if (qpn == 0 || qpn != qp->id) goto skip_cqe; if (is_cqe_for_sq(cqe)) { ocrdma_hwq_inc_tail(&qp->sq); } else { if (qp->srq) { wqe_idx = (le32_to_cpu(cqe->rq.buftag_qpn) >> OCRDMA_CQE_BUFTAG_SHIFT) & qp->srq->rq.max_wqe_idx; if (wqe_idx < 1) BUG(); spin_lock_irqsave(&qp->srq->q_lock, flags); ocrdma_hwq_inc_tail(&qp->srq->rq); ocrdma_srq_toggle_bit(qp->srq, wqe_idx - 1); spin_unlock_irqrestore(&qp->srq->q_lock, flags); } else { ocrdma_hwq_inc_tail(&qp->rq); } } /* mark cqe discarded so that it is not picked up later * in the poll_cq(). */ discard_cnt += 1; cqe->cmn.qpn = 0; skip_cqe: cur_getp = (cur_getp + 1) % cq->max_hw_cqe; } while (cur_getp != stop_getp); spin_unlock_irqrestore(&cq->cq_lock, cq_flags); } void ocrdma_del_flush_qp(struct ocrdma_qp *qp) { int found = false; unsigned long flags; struct ocrdma_dev *dev = qp->dev; /* sync with any active CQ poll */ spin_lock_irqsave(&dev->flush_q_lock, flags); found = ocrdma_is_qp_in_sq_flushlist(qp->sq_cq, qp); if (found) list_del(&qp->sq_entry); if (!qp->srq) { found = ocrdma_is_qp_in_rq_flushlist(qp->rq_cq, qp); if (found) list_del(&qp->rq_entry); } spin_unlock_irqrestore(&dev->flush_q_lock, flags); } int ocrdma_destroy_qp(struct ib_qp *ibqp) { int status; struct ocrdma_pd *pd; struct ocrdma_qp *qp; struct ocrdma_dev *dev; struct ib_qp_attr attrs; int attr_mask = IB_QP_STATE; unsigned long flags; qp = get_ocrdma_qp(ibqp); dev = qp->dev; attrs.qp_state = IB_QPS_ERR; pd = qp->pd; /* change the QP state to ERROR */ _ocrdma_modify_qp(ibqp, &attrs, attr_mask); /* ensure that CQEs for newly created QP (whose id may be same with * one which just getting destroyed are same), dont get * discarded until the old CQEs are discarded. */ mutex_lock(&dev->dev_lock); status = ocrdma_mbx_destroy_qp(dev, qp); /* * acquire CQ lock while destroy is in progress, in order to * protect against proessing in-flight CQEs for this QP. */ spin_lock_irqsave(&qp->sq_cq->cq_lock, flags); if (qp->rq_cq && (qp->rq_cq != qp->sq_cq)) spin_lock(&qp->rq_cq->cq_lock); ocrdma_del_qpn_map(dev, qp); if (qp->rq_cq && (qp->rq_cq != qp->sq_cq)) spin_unlock(&qp->rq_cq->cq_lock); spin_unlock_irqrestore(&qp->sq_cq->cq_lock, flags); if (!pd->uctx) { ocrdma_discard_cqes(qp, qp->sq_cq); ocrdma_discard_cqes(qp, qp->rq_cq); } mutex_unlock(&dev->dev_lock); if (pd->uctx) { ocrdma_del_mmap(pd->uctx, (u64) qp->sq.pa, PAGE_ALIGN(qp->sq.len)); if (!qp->srq) ocrdma_del_mmap(pd->uctx, (u64) qp->rq.pa, PAGE_ALIGN(qp->rq.len)); } ocrdma_del_flush_qp(qp); kfree(qp->wqe_wr_id_tbl); kfree(qp->rqe_wr_id_tbl); kfree(qp); return status; } static int ocrdma_copy_srq_uresp(struct ocrdma_dev *dev, struct ocrdma_srq *srq, struct ib_udata *udata) { int status; struct ocrdma_create_srq_uresp uresp; memset(&uresp, 0, sizeof(uresp)); uresp.rq_dbid = srq->rq.dbid; uresp.num_rq_pages = 1; uresp.rq_page_addr[0] = srq->rq.pa; uresp.rq_page_size = srq->rq.len; uresp.db_page_addr = dev->nic_info.unmapped_db + (srq->pd->id * dev->nic_info.db_page_size); uresp.db_page_size = dev->nic_info.db_page_size; uresp.num_rqe_allocated = srq->rq.max_cnt; if (ocrdma_get_asic_type(dev) == OCRDMA_ASIC_GEN_SKH_R) { uresp.db_rq_offset = OCRDMA_DB_GEN2_RQ_OFFSET; uresp.db_shift = 24; } else { uresp.db_rq_offset = OCRDMA_DB_RQ_OFFSET; uresp.db_shift = 16; } status = ib_copy_to_udata(udata, &uresp, sizeof(uresp)); if (status) return status; status = ocrdma_add_mmap(srq->pd->uctx, uresp.rq_page_addr[0], uresp.rq_page_size); if (status) return status; return status; } struct ib_srq *ocrdma_create_srq(struct ib_pd *ibpd, struct ib_srq_init_attr *init_attr, struct ib_udata *udata) { int status = -ENOMEM; struct ocrdma_pd *pd = get_ocrdma_pd(ibpd); struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device); struct ocrdma_srq *srq; if (init_attr->attr.max_sge > dev->attr.max_recv_sge) return ERR_PTR(-EINVAL); if (init_attr->attr.max_wr > dev->attr.max_rqe) return ERR_PTR(-EINVAL); srq = kzalloc(sizeof(*srq), GFP_KERNEL); if (!srq) return ERR_PTR(status); spin_lock_init(&srq->q_lock); srq->pd = pd; srq->db = dev->nic_info.db + (pd->id * dev->nic_info.db_page_size); status = ocrdma_mbx_create_srq(dev, srq, init_attr, pd); if (status) goto err; if (udata == NULL) { srq->rqe_wr_id_tbl = kzalloc(sizeof(u64) * srq->rq.max_cnt, GFP_KERNEL); if (srq->rqe_wr_id_tbl == NULL) goto arm_err; srq->bit_fields_len = (srq->rq.max_cnt / 32) + (srq->rq.max_cnt % 32 ? 1 : 0); srq->idx_bit_fields = kmalloc(srq->bit_fields_len * sizeof(u32), GFP_KERNEL); if (srq->idx_bit_fields == NULL) goto arm_err; memset(srq->idx_bit_fields, 0xff, srq->bit_fields_len * sizeof(u32)); } if (init_attr->attr.srq_limit) { status = ocrdma_mbx_modify_srq(srq, &init_attr->attr); if (status) goto arm_err; } if (udata) { status = ocrdma_copy_srq_uresp(dev, srq, udata); if (status) goto arm_err; } return &srq->ibsrq; arm_err: ocrdma_mbx_destroy_srq(dev, srq); err: kfree(srq->rqe_wr_id_tbl); kfree(srq->idx_bit_fields); kfree(srq); return ERR_PTR(status); } int ocrdma_modify_srq(struct ib_srq *ibsrq, struct ib_srq_attr *srq_attr, enum ib_srq_attr_mask srq_attr_mask, struct ib_udata *udata) { int status = 0; struct ocrdma_srq *srq; srq = get_ocrdma_srq(ibsrq); if (srq_attr_mask & IB_SRQ_MAX_WR) status = -EINVAL; else status = ocrdma_mbx_modify_srq(srq, srq_attr); return status; } int ocrdma_query_srq(struct ib_srq *ibsrq, struct ib_srq_attr *srq_attr) { int status; struct ocrdma_srq *srq; srq = get_ocrdma_srq(ibsrq); status = ocrdma_mbx_query_srq(srq, srq_attr); return status; } int ocrdma_destroy_srq(struct ib_srq *ibsrq) { int status; struct ocrdma_srq *srq; struct ocrdma_dev *dev = get_ocrdma_dev(ibsrq->device); srq = get_ocrdma_srq(ibsrq); status = ocrdma_mbx_destroy_srq(dev, srq); if (srq->pd->uctx) ocrdma_del_mmap(srq->pd->uctx, (u64) srq->rq.pa, PAGE_ALIGN(srq->rq.len)); kfree(srq->idx_bit_fields); kfree(srq->rqe_wr_id_tbl); kfree(srq); return status; } /* unprivileged verbs and their support functions. */ static void ocrdma_build_ud_hdr(struct ocrdma_qp *qp, struct ocrdma_hdr_wqe *hdr, struct ib_send_wr *wr) { struct ocrdma_ewqe_ud_hdr *ud_hdr = (struct ocrdma_ewqe_ud_hdr *)(hdr + 1); struct ocrdma_ah *ah = get_ocrdma_ah(wr->wr.ud.ah); ud_hdr->rsvd_dest_qpn = wr->wr.ud.remote_qpn; if (qp->qp_type == IB_QPT_GSI) ud_hdr->qkey = qp->qkey; else ud_hdr->qkey = wr->wr.ud.remote_qkey; ud_hdr->rsvd_ahid = ah->id; } static void ocrdma_build_sges(struct ocrdma_hdr_wqe *hdr, struct ocrdma_sge *sge, int num_sge, struct ib_sge *sg_list) { int i; for (i = 0; i < num_sge; i++) { sge[i].lrkey = sg_list[i].lkey; sge[i].addr_lo = sg_list[i].addr; sge[i].addr_hi = upper_32_bits(sg_list[i].addr); sge[i].len = sg_list[i].length; hdr->total_len += sg_list[i].length; } if (num_sge == 0) memset(sge, 0, sizeof(*sge)); } static inline uint32_t ocrdma_sglist_len(struct ib_sge *sg_list, int num_sge) { uint32_t total_len = 0, i; for (i = 0; i < num_sge; i++) total_len += sg_list[i].length; return total_len; } static int ocrdma_build_inline_sges(struct ocrdma_qp *qp, struct ocrdma_hdr_wqe *hdr, struct ocrdma_sge *sge, struct ib_send_wr *wr, u32 wqe_size) { int i; char *dpp_addr; if (wr->send_flags & IB_SEND_INLINE && qp->qp_type != IB_QPT_UD) { hdr->total_len = ocrdma_sglist_len(wr->sg_list, wr->num_sge); if (unlikely(hdr->total_len > qp->max_inline_data)) { pr_err("%s() supported_len=0x%x,\n" " unspported len req=0x%x\n", __func__, qp->max_inline_data, hdr->total_len); return -EINVAL; } dpp_addr = (char *)sge; for (i = 0; i < wr->num_sge; i++) { memcpy(dpp_addr, (void *)(unsigned long)wr->sg_list[i].addr, wr->sg_list[i].length); dpp_addr += wr->sg_list[i].length; } wqe_size += roundup(hdr->total_len, OCRDMA_WQE_ALIGN_BYTES); if (0 == hdr->total_len) wqe_size += sizeof(struct ocrdma_sge); hdr->cw |= (OCRDMA_TYPE_INLINE << OCRDMA_WQE_TYPE_SHIFT); } else { ocrdma_build_sges(hdr, sge, wr->num_sge, wr->sg_list); if (wr->num_sge) wqe_size += (wr->num_sge * sizeof(struct ocrdma_sge)); else wqe_size += sizeof(struct ocrdma_sge); hdr->cw |= (OCRDMA_TYPE_LKEY << OCRDMA_WQE_TYPE_SHIFT); } hdr->cw |= ((wqe_size / OCRDMA_WQE_STRIDE) << OCRDMA_WQE_SIZE_SHIFT); return 0; } static int ocrdma_build_send(struct ocrdma_qp *qp, struct ocrdma_hdr_wqe *hdr, struct ib_send_wr *wr) { int status; struct ocrdma_sge *sge; u32 wqe_size = sizeof(*hdr); if (qp->qp_type == IB_QPT_UD || qp->qp_type == IB_QPT_GSI) { ocrdma_build_ud_hdr(qp, hdr, wr); sge = (struct ocrdma_sge *)(hdr + 2); wqe_size += sizeof(struct ocrdma_ewqe_ud_hdr); } else { sge = (struct ocrdma_sge *)(hdr + 1); } status = ocrdma_build_inline_sges(qp, hdr, sge, wr, wqe_size); return status; } static int ocrdma_build_write(struct ocrdma_qp *qp, struct ocrdma_hdr_wqe *hdr, struct ib_send_wr *wr) { int status; struct ocrdma_sge *ext_rw = (struct ocrdma_sge *)(hdr + 1); struct ocrdma_sge *sge = ext_rw + 1; u32 wqe_size = sizeof(*hdr) + sizeof(*ext_rw); status = ocrdma_build_inline_sges(qp, hdr, sge, wr, wqe_size); if (status) return status; ext_rw->addr_lo = wr->wr.rdma.remote_addr; ext_rw->addr_hi = upper_32_bits(wr->wr.rdma.remote_addr); ext_rw->lrkey = wr->wr.rdma.rkey; ext_rw->len = hdr->total_len; return 0; } static void ocrdma_build_read(struct ocrdma_qp *qp, struct ocrdma_hdr_wqe *hdr, struct ib_send_wr *wr) { struct ocrdma_sge *ext_rw = (struct ocrdma_sge *)(hdr + 1); struct ocrdma_sge *sge = ext_rw + 1; u32 wqe_size = ((wr->num_sge + 1) * sizeof(struct ocrdma_sge)) + sizeof(struct ocrdma_hdr_wqe); ocrdma_build_sges(hdr, sge, wr->num_sge, wr->sg_list); hdr->cw |= ((wqe_size / OCRDMA_WQE_STRIDE) << OCRDMA_WQE_SIZE_SHIFT); hdr->cw |= (OCRDMA_READ << OCRDMA_WQE_OPCODE_SHIFT); hdr->cw |= (OCRDMA_TYPE_LKEY << OCRDMA_WQE_TYPE_SHIFT); ext_rw->addr_lo = wr->wr.rdma.remote_addr; ext_rw->addr_hi = upper_32_bits(wr->wr.rdma.remote_addr); ext_rw->lrkey = wr->wr.rdma.rkey; ext_rw->len = hdr->total_len; } static void build_frmr_pbes(struct ib_send_wr *wr, struct ocrdma_pbl *pbl_tbl, struct ocrdma_hw_mr *hwmr) { int i; u64 buf_addr = 0; int num_pbes; struct ocrdma_pbe *pbe; pbe = (struct ocrdma_pbe *)pbl_tbl->va; num_pbes = 0; /* go through the OS phy regions & fill hw pbe entries into pbls. */ for (i = 0; i < wr->wr.fast_reg.page_list_len; i++) { /* number of pbes can be more for one OS buf, when * buffers are of different sizes. * split the ib_buf to one or more pbes. */ buf_addr = wr->wr.fast_reg.page_list->page_list[i]; pbe->pa_lo = cpu_to_le32((u32) (buf_addr & PAGE_MASK)); pbe->pa_hi = cpu_to_le32((u32) upper_32_bits(buf_addr)); num_pbes += 1; pbe++; /* if the pbl is full storing the pbes, * move to next pbl. */ if (num_pbes == (hwmr->pbl_size/sizeof(u64))) { pbl_tbl++; pbe = (struct ocrdma_pbe *)pbl_tbl->va; } } return; } static int get_encoded_page_size(int pg_sz) { /* Max size is 256M 4096 << 16 */ int i = 0; for (; i < 17; i++) if (pg_sz == (4096 << i)) break; return i; } static int ocrdma_build_fr(struct ocrdma_qp *qp, struct ocrdma_hdr_wqe *hdr, struct ib_send_wr *wr) { u64 fbo; struct ocrdma_ewqe_fr *fast_reg = (struct ocrdma_ewqe_fr *)(hdr + 1); struct ocrdma_mr *mr; u32 wqe_size = sizeof(*fast_reg) + sizeof(*hdr); wqe_size = roundup(wqe_size, OCRDMA_WQE_ALIGN_BYTES); if (wr->wr.fast_reg.page_list_len > qp->dev->attr.max_pages_per_frmr) return -EINVAL; hdr->cw |= (OCRDMA_FR_MR << OCRDMA_WQE_OPCODE_SHIFT); hdr->cw |= ((wqe_size / OCRDMA_WQE_STRIDE) << OCRDMA_WQE_SIZE_SHIFT); if (wr->wr.fast_reg.page_list_len == 0) BUG(); if (wr->wr.fast_reg.access_flags & IB_ACCESS_LOCAL_WRITE) hdr->rsvd_lkey_flags |= OCRDMA_LKEY_FLAG_LOCAL_WR; if (wr->wr.fast_reg.access_flags & IB_ACCESS_REMOTE_WRITE) hdr->rsvd_lkey_flags |= OCRDMA_LKEY_FLAG_REMOTE_WR; if (wr->wr.fast_reg.access_flags & IB_ACCESS_REMOTE_READ) hdr->rsvd_lkey_flags |= OCRDMA_LKEY_FLAG_REMOTE_RD; hdr->lkey = wr->wr.fast_reg.rkey; hdr->total_len = wr->wr.fast_reg.length; fbo = wr->wr.fast_reg.iova_start - (wr->wr.fast_reg.page_list->page_list[0] & PAGE_MASK); fast_reg->va_hi = upper_32_bits(wr->wr.fast_reg.iova_start); fast_reg->va_lo = (u32) (wr->wr.fast_reg.iova_start & 0xffffffff); fast_reg->fbo_hi = upper_32_bits(fbo); fast_reg->fbo_lo = (u32) fbo & 0xffffffff; fast_reg->num_sges = wr->wr.fast_reg.page_list_len; fast_reg->size_sge = get_encoded_page_size(1 << wr->wr.fast_reg.page_shift); mr = (struct ocrdma_mr *) (unsigned long) qp->dev->stag_arr[(hdr->lkey >> 8) & (OCRDMA_MAX_STAG - 1)]; build_frmr_pbes(wr, mr->hwmr.pbl_table, &mr->hwmr); return 0; } static void ocrdma_ring_sq_db(struct ocrdma_qp *qp) { u32 val = qp->sq.dbid | (1 << OCRDMA_DB_SQ_SHIFT); iowrite32(val, qp->sq_db); } int ocrdma_post_send(struct ib_qp *ibqp, struct ib_send_wr *wr, struct ib_send_wr **bad_wr) { int status = 0; struct ocrdma_qp *qp = get_ocrdma_qp(ibqp); struct ocrdma_hdr_wqe *hdr; unsigned long flags; spin_lock_irqsave(&qp->q_lock, flags); if (qp->state != OCRDMA_QPS_RTS && qp->state != OCRDMA_QPS_SQD) { spin_unlock_irqrestore(&qp->q_lock, flags); *bad_wr = wr; return -EINVAL; } while (wr) { if (qp->qp_type == IB_QPT_UD && (wr->opcode != IB_WR_SEND && wr->opcode != IB_WR_SEND_WITH_IMM)) { *bad_wr = wr; status = -EINVAL; break; } if (ocrdma_hwq_free_cnt(&qp->sq) == 0 || wr->num_sge > qp->sq.max_sges) { *bad_wr = wr; status = -ENOMEM; break; } hdr = ocrdma_hwq_head(&qp->sq); hdr->cw = 0; if (wr->send_flags & IB_SEND_SIGNALED || qp->signaled) hdr->cw |= (OCRDMA_FLAG_SIG << OCRDMA_WQE_FLAGS_SHIFT); if (wr->send_flags & IB_SEND_FENCE) hdr->cw |= (OCRDMA_FLAG_FENCE_L << OCRDMA_WQE_FLAGS_SHIFT); if (wr->send_flags & IB_SEND_SOLICITED) hdr->cw |= (OCRDMA_FLAG_SOLICIT << OCRDMA_WQE_FLAGS_SHIFT); hdr->total_len = 0; switch (wr->opcode) { case IB_WR_SEND_WITH_IMM: hdr->cw |= (OCRDMA_FLAG_IMM << OCRDMA_WQE_FLAGS_SHIFT); hdr->immdt = ntohl(wr->ex.imm_data); case IB_WR_SEND: hdr->cw |= (OCRDMA_SEND << OCRDMA_WQE_OPCODE_SHIFT); ocrdma_build_send(qp, hdr, wr); break; case IB_WR_SEND_WITH_INV: hdr->cw |= (OCRDMA_FLAG_INV << OCRDMA_WQE_FLAGS_SHIFT); hdr->cw |= (OCRDMA_SEND << OCRDMA_WQE_OPCODE_SHIFT); hdr->lkey = wr->ex.invalidate_rkey; status = ocrdma_build_send(qp, hdr, wr); break; case IB_WR_RDMA_WRITE_WITH_IMM: hdr->cw |= (OCRDMA_FLAG_IMM << OCRDMA_WQE_FLAGS_SHIFT); hdr->immdt = ntohl(wr->ex.imm_data); case IB_WR_RDMA_WRITE: hdr->cw |= (OCRDMA_WRITE << OCRDMA_WQE_OPCODE_SHIFT); status = ocrdma_build_write(qp, hdr, wr); break; case IB_WR_RDMA_READ_WITH_INV: hdr->cw |= (OCRDMA_FLAG_INV << OCRDMA_WQE_FLAGS_SHIFT); case IB_WR_RDMA_READ: ocrdma_build_read(qp, hdr, wr); break; case IB_WR_LOCAL_INV: hdr->cw |= (OCRDMA_LKEY_INV << OCRDMA_WQE_OPCODE_SHIFT); hdr->cw |= ((sizeof(struct ocrdma_hdr_wqe) + sizeof(struct ocrdma_sge)) / OCRDMA_WQE_STRIDE) << OCRDMA_WQE_SIZE_SHIFT; hdr->lkey = wr->ex.invalidate_rkey; break; case IB_WR_FAST_REG_MR: status = ocrdma_build_fr(qp, hdr, wr); break; default: status = -EINVAL; break; } if (status) { *bad_wr = wr; break; } if (wr->send_flags & IB_SEND_SIGNALED || qp->signaled) qp->wqe_wr_id_tbl[qp->sq.head].signaled = 1; else qp->wqe_wr_id_tbl[qp->sq.head].signaled = 0; qp->wqe_wr_id_tbl[qp->sq.head].wrid = wr->wr_id; ocrdma_cpu_to_le32(hdr, ((hdr->cw >> OCRDMA_WQE_SIZE_SHIFT) & OCRDMA_WQE_SIZE_MASK) * OCRDMA_WQE_STRIDE); /* make sure wqe is written before adapter can access it */ wmb(); /* inform hw to start processing it */ ocrdma_ring_sq_db(qp); /* update pointer, counter for next wr */ ocrdma_hwq_inc_head(&qp->sq); wr = wr->next; } spin_unlock_irqrestore(&qp->q_lock, flags); return status; } static void ocrdma_ring_rq_db(struct ocrdma_qp *qp) { u32 val = qp->rq.dbid | (1 << OCRDMA_DB_RQ_SHIFT); iowrite32(val, qp->rq_db); } static void ocrdma_build_rqe(struct ocrdma_hdr_wqe *rqe, struct ib_recv_wr *wr, u16 tag) { u32 wqe_size = 0; struct ocrdma_sge *sge; if (wr->num_sge) wqe_size = (wr->num_sge * sizeof(*sge)) + sizeof(*rqe); else wqe_size = sizeof(*sge) + sizeof(*rqe); rqe->cw = ((wqe_size / OCRDMA_WQE_STRIDE) << OCRDMA_WQE_SIZE_SHIFT); rqe->cw |= (OCRDMA_FLAG_SIG << OCRDMA_WQE_FLAGS_SHIFT); rqe->cw |= (OCRDMA_TYPE_LKEY << OCRDMA_WQE_TYPE_SHIFT); rqe->total_len = 0; rqe->rsvd_tag = tag; sge = (struct ocrdma_sge *)(rqe + 1); ocrdma_build_sges(rqe, sge, wr->num_sge, wr->sg_list); ocrdma_cpu_to_le32(rqe, wqe_size); } int ocrdma_post_recv(struct ib_qp *ibqp, struct ib_recv_wr *wr, struct ib_recv_wr **bad_wr) { int status = 0; unsigned long flags; struct ocrdma_qp *qp = get_ocrdma_qp(ibqp); struct ocrdma_hdr_wqe *rqe; spin_lock_irqsave(&qp->q_lock, flags); if (qp->state == OCRDMA_QPS_RST || qp->state == OCRDMA_QPS_ERR) { spin_unlock_irqrestore(&qp->q_lock, flags); *bad_wr = wr; return -EINVAL; } while (wr) { if (ocrdma_hwq_free_cnt(&qp->rq) == 0 || wr->num_sge > qp->rq.max_sges) { *bad_wr = wr; status = -ENOMEM; break; } rqe = ocrdma_hwq_head(&qp->rq); ocrdma_build_rqe(rqe, wr, 0); qp->rqe_wr_id_tbl[qp->rq.head] = wr->wr_id; /* make sure rqe is written before adapter can access it */ wmb(); /* inform hw to start processing it */ ocrdma_ring_rq_db(qp); /* update pointer, counter for next wr */ ocrdma_hwq_inc_head(&qp->rq); wr = wr->next; } spin_unlock_irqrestore(&qp->q_lock, flags); return status; } /* cqe for srq's rqe can potentially arrive out of order. * index gives the entry in the shadow table where to store * the wr_id. tag/index is returned in cqe to reference back * for a given rqe. */ static int ocrdma_srq_get_idx(struct ocrdma_srq *srq) { int row = 0; int indx = 0; for (row = 0; row < srq->bit_fields_len; row++) { if (srq->idx_bit_fields[row]) { indx = ffs(srq->idx_bit_fields[row]); indx = (row * 32) + (indx - 1); if (indx >= srq->rq.max_cnt) BUG(); ocrdma_srq_toggle_bit(srq, indx); break; } } if (row == srq->bit_fields_len) BUG(); return indx + 1; /* Use from index 1 */ } static void ocrdma_ring_srq_db(struct ocrdma_srq *srq) { u32 val = srq->rq.dbid | (1 << 16); iowrite32(val, srq->db + OCRDMA_DB_GEN2_SRQ_OFFSET); } int ocrdma_post_srq_recv(struct ib_srq *ibsrq, struct ib_recv_wr *wr, struct ib_recv_wr **bad_wr) { int status = 0; unsigned long flags; struct ocrdma_srq *srq; struct ocrdma_hdr_wqe *rqe; u16 tag; srq = get_ocrdma_srq(ibsrq); spin_lock_irqsave(&srq->q_lock, flags); while (wr) { if (ocrdma_hwq_free_cnt(&srq->rq) == 0 || wr->num_sge > srq->rq.max_sges) { status = -ENOMEM; *bad_wr = wr; break; } tag = ocrdma_srq_get_idx(srq); rqe = ocrdma_hwq_head(&srq->rq); ocrdma_build_rqe(rqe, wr, tag); srq->rqe_wr_id_tbl[tag] = wr->wr_id; /* make sure rqe is written before adapter can perform DMA */ wmb(); /* inform hw to start processing it */ ocrdma_ring_srq_db(srq); /* update pointer, counter for next wr */ ocrdma_hwq_inc_head(&srq->rq); wr = wr->next; } spin_unlock_irqrestore(&srq->q_lock, flags); return status; } static enum ib_wc_status ocrdma_to_ibwc_err(u16 status) { enum ib_wc_status ibwc_status; switch (status) { case OCRDMA_CQE_GENERAL_ERR: ibwc_status = IB_WC_GENERAL_ERR; break; case OCRDMA_CQE_LOC_LEN_ERR: ibwc_status = IB_WC_LOC_LEN_ERR; break; case OCRDMA_CQE_LOC_QP_OP_ERR: ibwc_status = IB_WC_LOC_QP_OP_ERR; break; case OCRDMA_CQE_LOC_EEC_OP_ERR: ibwc_status = IB_WC_LOC_EEC_OP_ERR; break; case OCRDMA_CQE_LOC_PROT_ERR: ibwc_status = IB_WC_LOC_PROT_ERR; break; case OCRDMA_CQE_WR_FLUSH_ERR: ibwc_status = IB_WC_WR_FLUSH_ERR; break; case OCRDMA_CQE_MW_BIND_ERR: ibwc_status = IB_WC_MW_BIND_ERR; break; case OCRDMA_CQE_BAD_RESP_ERR: ibwc_status = IB_WC_BAD_RESP_ERR; break; case OCRDMA_CQE_LOC_ACCESS_ERR: ibwc_status = IB_WC_LOC_ACCESS_ERR; break; case OCRDMA_CQE_REM_INV_REQ_ERR: ibwc_status = IB_WC_REM_INV_REQ_ERR; break; case OCRDMA_CQE_REM_ACCESS_ERR: ibwc_status = IB_WC_REM_ACCESS_ERR; break; case OCRDMA_CQE_REM_OP_ERR: ibwc_status = IB_WC_REM_OP_ERR; break; case OCRDMA_CQE_RETRY_EXC_ERR: ibwc_status = IB_WC_RETRY_EXC_ERR; break; case OCRDMA_CQE_RNR_RETRY_EXC_ERR: ibwc_status = IB_WC_RNR_RETRY_EXC_ERR; break; case OCRDMA_CQE_LOC_RDD_VIOL_ERR: ibwc_status = IB_WC_LOC_RDD_VIOL_ERR; break; case OCRDMA_CQE_REM_INV_RD_REQ_ERR: ibwc_status = IB_WC_REM_INV_RD_REQ_ERR; break; case OCRDMA_CQE_REM_ABORT_ERR: ibwc_status = IB_WC_REM_ABORT_ERR; break; case OCRDMA_CQE_INV_EECN_ERR: ibwc_status = IB_WC_INV_EECN_ERR; break; case OCRDMA_CQE_INV_EEC_STATE_ERR: ibwc_status = IB_WC_INV_EEC_STATE_ERR; break; case OCRDMA_CQE_FATAL_ERR: ibwc_status = IB_WC_FATAL_ERR; break; case OCRDMA_CQE_RESP_TIMEOUT_ERR: ibwc_status = IB_WC_RESP_TIMEOUT_ERR; break; default: ibwc_status = IB_WC_GENERAL_ERR; break; } return ibwc_status; } static void ocrdma_update_wc(struct ocrdma_qp *qp, struct ib_wc *ibwc, u32 wqe_idx) { struct ocrdma_hdr_wqe *hdr; struct ocrdma_sge *rw; int opcode; hdr = ocrdma_hwq_head_from_idx(&qp->sq, wqe_idx); ibwc->wr_id = qp->wqe_wr_id_tbl[wqe_idx].wrid; /* Undo the hdr->cw swap */ opcode = le32_to_cpu(hdr->cw) & OCRDMA_WQE_OPCODE_MASK; switch (opcode) { case OCRDMA_WRITE: ibwc->opcode = IB_WC_RDMA_WRITE; break; case OCRDMA_READ: rw = (struct ocrdma_sge *)(hdr + 1); ibwc->opcode = IB_WC_RDMA_READ; ibwc->byte_len = rw->len; break; case OCRDMA_SEND: ibwc->opcode = IB_WC_SEND; break; case OCRDMA_FR_MR: ibwc->opcode = IB_WC_FAST_REG_MR; break; case OCRDMA_LKEY_INV: ibwc->opcode = IB_WC_LOCAL_INV; break; default: ibwc->status = IB_WC_GENERAL_ERR; pr_err("%s() invalid opcode received = 0x%x\n", __func__, hdr->cw & OCRDMA_WQE_OPCODE_MASK); break; } } static void ocrdma_set_cqe_status_flushed(struct ocrdma_qp *qp, struct ocrdma_cqe *cqe) { if (is_cqe_for_sq(cqe)) { cqe->flags_status_srcqpn = cpu_to_le32(le32_to_cpu( cqe->flags_status_srcqpn) & ~OCRDMA_CQE_STATUS_MASK); cqe->flags_status_srcqpn = cpu_to_le32(le32_to_cpu( cqe->flags_status_srcqpn) | (OCRDMA_CQE_WR_FLUSH_ERR << OCRDMA_CQE_STATUS_SHIFT)); } else { if (qp->qp_type == IB_QPT_UD || qp->qp_type == IB_QPT_GSI) { cqe->flags_status_srcqpn = cpu_to_le32(le32_to_cpu( cqe->flags_status_srcqpn) & ~OCRDMA_CQE_UD_STATUS_MASK); cqe->flags_status_srcqpn = cpu_to_le32(le32_to_cpu( cqe->flags_status_srcqpn) | (OCRDMA_CQE_WR_FLUSH_ERR << OCRDMA_CQE_UD_STATUS_SHIFT)); } else { cqe->flags_status_srcqpn = cpu_to_le32(le32_to_cpu( cqe->flags_status_srcqpn) & ~OCRDMA_CQE_STATUS_MASK); cqe->flags_status_srcqpn = cpu_to_le32(le32_to_cpu( cqe->flags_status_srcqpn) | (OCRDMA_CQE_WR_FLUSH_ERR << OCRDMA_CQE_STATUS_SHIFT)); } } } static bool ocrdma_update_err_cqe(struct ib_wc *ibwc, struct ocrdma_cqe *cqe, struct ocrdma_qp *qp, int status) { bool expand = false; ibwc->byte_len = 0; ibwc->qp = &qp->ibqp; ibwc->status = ocrdma_to_ibwc_err(status); ocrdma_flush_qp(qp); ocrdma_qp_state_change(qp, IB_QPS_ERR, NULL); /* if wqe/rqe pending for which cqe needs to be returned, * trigger inflating it. */ if (!is_hw_rq_empty(qp) || !is_hw_sq_empty(qp)) { expand = true; ocrdma_set_cqe_status_flushed(qp, cqe); } return expand; } static int ocrdma_update_err_rcqe(struct ib_wc *ibwc, struct ocrdma_cqe *cqe, struct ocrdma_qp *qp, int status) { ibwc->opcode = IB_WC_RECV; ibwc->wr_id = qp->rqe_wr_id_tbl[qp->rq.tail]; ocrdma_hwq_inc_tail(&qp->rq); return ocrdma_update_err_cqe(ibwc, cqe, qp, status); } static int ocrdma_update_err_scqe(struct ib_wc *ibwc, struct ocrdma_cqe *cqe, struct ocrdma_qp *qp, int status) { ocrdma_update_wc(qp, ibwc, qp->sq.tail); ocrdma_hwq_inc_tail(&qp->sq); return ocrdma_update_err_cqe(ibwc, cqe, qp, status); } static bool ocrdma_poll_err_scqe(struct ocrdma_qp *qp, struct ocrdma_cqe *cqe, struct ib_wc *ibwc, bool *polled, bool *stop) { bool expand; int status = (le32_to_cpu(cqe->flags_status_srcqpn) & OCRDMA_CQE_STATUS_MASK) >> OCRDMA_CQE_STATUS_SHIFT; /* when hw sq is empty, but rq is not empty, so we continue * to keep the cqe in order to get the cq event again. */ if (is_hw_sq_empty(qp) && !is_hw_rq_empty(qp)) { /* when cq for rq and sq is same, it is safe to return * flush cqe for RQEs. */ if (!qp->srq && (qp->sq_cq == qp->rq_cq)) { *polled = true; status = OCRDMA_CQE_WR_FLUSH_ERR; expand = ocrdma_update_err_rcqe(ibwc, cqe, qp, status); } else { /* stop processing further cqe as this cqe is used for * triggering cq event on buddy cq of RQ. * When QP is destroyed, this cqe will be removed * from the cq's hardware q. */ *polled = false; *stop = true; expand = false; } } else if (is_hw_sq_empty(qp)) { /* Do nothing */ expand = false; *polled = false; *stop = false; } else { *polled = true; expand = ocrdma_update_err_scqe(ibwc, cqe, qp, status); } return expand; } static bool ocrdma_poll_success_scqe(struct ocrdma_qp *qp, struct ocrdma_cqe *cqe, struct ib_wc *ibwc, bool *polled) { bool expand = false; int tail = qp->sq.tail; u32 wqe_idx; if (!qp->wqe_wr_id_tbl[tail].signaled) { *polled = false; /* WC cannot be consumed yet */ } else { ibwc->status = IB_WC_SUCCESS; ibwc->wc_flags = 0; ibwc->qp = &qp->ibqp; ocrdma_update_wc(qp, ibwc, tail); *polled = true; } wqe_idx = (le32_to_cpu(cqe->wq.wqeidx) & OCRDMA_CQE_WQEIDX_MASK) & qp->sq.max_wqe_idx; if (tail != wqe_idx) expand = true; /* Coalesced CQE can't be consumed yet */ ocrdma_hwq_inc_tail(&qp->sq); return expand; } static bool ocrdma_poll_scqe(struct ocrdma_qp *qp, struct ocrdma_cqe *cqe, struct ib_wc *ibwc, bool *polled, bool *stop) { int status; bool expand; status = (le32_to_cpu(cqe->flags_status_srcqpn) & OCRDMA_CQE_STATUS_MASK) >> OCRDMA_CQE_STATUS_SHIFT; if (status == OCRDMA_CQE_SUCCESS) expand = ocrdma_poll_success_scqe(qp, cqe, ibwc, polled); else expand = ocrdma_poll_err_scqe(qp, cqe, ibwc, polled, stop); return expand; } static int ocrdma_update_ud_rcqe(struct ib_wc *ibwc, struct ocrdma_cqe *cqe) { int status; status = (le32_to_cpu(cqe->flags_status_srcqpn) & OCRDMA_CQE_UD_STATUS_MASK) >> OCRDMA_CQE_UD_STATUS_SHIFT; ibwc->src_qp = le32_to_cpu(cqe->flags_status_srcqpn) & OCRDMA_CQE_SRCQP_MASK; ibwc->pkey_index = le32_to_cpu(cqe->ud.rxlen_pkey) & OCRDMA_CQE_PKEY_MASK; ibwc->wc_flags = IB_WC_GRH; ibwc->byte_len = (le32_to_cpu(cqe->ud.rxlen_pkey) >> OCRDMA_CQE_UD_XFER_LEN_SHIFT); return status; } static void ocrdma_update_free_srq_cqe(struct ib_wc *ibwc, struct ocrdma_cqe *cqe, struct ocrdma_qp *qp) { unsigned long flags; struct ocrdma_srq *srq; u32 wqe_idx; srq = get_ocrdma_srq(qp->ibqp.srq); wqe_idx = (le32_to_cpu(cqe->rq.buftag_qpn) >> OCRDMA_CQE_BUFTAG_SHIFT) & srq->rq.max_wqe_idx; if (wqe_idx < 1) BUG(); ibwc->wr_id = srq->rqe_wr_id_tbl[wqe_idx]; spin_lock_irqsave(&srq->q_lock, flags); ocrdma_srq_toggle_bit(srq, wqe_idx - 1); spin_unlock_irqrestore(&srq->q_lock, flags); ocrdma_hwq_inc_tail(&srq->rq); } static bool ocrdma_poll_err_rcqe(struct ocrdma_qp *qp, struct ocrdma_cqe *cqe, struct ib_wc *ibwc, bool *polled, bool *stop, int status) { bool expand; /* when hw_rq is empty, but wq is not empty, so continue * to keep the cqe to get the cq event again. */ if (is_hw_rq_empty(qp) && !is_hw_sq_empty(qp)) { if (!qp->srq && (qp->sq_cq == qp->rq_cq)) { *polled = true; status = OCRDMA_CQE_WR_FLUSH_ERR; expand = ocrdma_update_err_scqe(ibwc, cqe, qp, status); } else { *polled = false; *stop = true; expand = false; } } else if (is_hw_rq_empty(qp)) { /* Do nothing */ expand = false; *polled = false; *stop = false; } else { *polled = true; expand = ocrdma_update_err_rcqe(ibwc, cqe, qp, status); } return expand; } static void ocrdma_poll_success_rcqe(struct ocrdma_qp *qp, struct ocrdma_cqe *cqe, struct ib_wc *ibwc) { ibwc->opcode = IB_WC_RECV; ibwc->qp = &qp->ibqp; ibwc->status = IB_WC_SUCCESS; if (qp->qp_type == IB_QPT_UD || qp->qp_type == IB_QPT_GSI) ocrdma_update_ud_rcqe(ibwc, cqe); else ibwc->byte_len = le32_to_cpu(cqe->rq.rxlen); if (is_cqe_imm(cqe)) { ibwc->ex.imm_data = htonl(le32_to_cpu(cqe->rq.lkey_immdt)); ibwc->wc_flags |= IB_WC_WITH_IMM; } else if (is_cqe_wr_imm(cqe)) { ibwc->opcode = IB_WC_RECV_RDMA_WITH_IMM; ibwc->ex.imm_data = htonl(le32_to_cpu(cqe->rq.lkey_immdt)); ibwc->wc_flags |= IB_WC_WITH_IMM; } else if (is_cqe_invalidated(cqe)) { ibwc->ex.invalidate_rkey = le32_to_cpu(cqe->rq.lkey_immdt); ibwc->wc_flags |= IB_WC_WITH_INVALIDATE; } if (qp->ibqp.srq) { ocrdma_update_free_srq_cqe(ibwc, cqe, qp); } else { ibwc->wr_id = qp->rqe_wr_id_tbl[qp->rq.tail]; ocrdma_hwq_inc_tail(&qp->rq); } } static bool ocrdma_poll_rcqe(struct ocrdma_qp *qp, struct ocrdma_cqe *cqe, struct ib_wc *ibwc, bool *polled, bool *stop) { int status; bool expand = false; ibwc->wc_flags = 0; if (qp->qp_type == IB_QPT_UD || qp->qp_type == IB_QPT_GSI) { status = (le32_to_cpu(cqe->flags_status_srcqpn) & OCRDMA_CQE_UD_STATUS_MASK) >> OCRDMA_CQE_UD_STATUS_SHIFT; } else { status = (le32_to_cpu(cqe->flags_status_srcqpn) & OCRDMA_CQE_STATUS_MASK) >> OCRDMA_CQE_STATUS_SHIFT; } if (status == OCRDMA_CQE_SUCCESS) { *polled = true; ocrdma_poll_success_rcqe(qp, cqe, ibwc); } else { expand = ocrdma_poll_err_rcqe(qp, cqe, ibwc, polled, stop, status); } return expand; } static void ocrdma_change_cq_phase(struct ocrdma_cq *cq, struct ocrdma_cqe *cqe, u16 cur_getp) { if (cq->phase_change) { if (cur_getp == 0) cq->phase = (~cq->phase & OCRDMA_CQE_VALID); } else { /* clear valid bit */ cqe->flags_status_srcqpn = 0; } } static int ocrdma_poll_hwcq(struct ocrdma_cq *cq, int num_entries, struct ib_wc *ibwc) { u16 qpn = 0; int i = 0; bool expand = false; int polled_hw_cqes = 0; struct ocrdma_qp *qp = NULL; struct ocrdma_dev *dev = get_ocrdma_dev(cq->ibcq.device); struct ocrdma_cqe *cqe; u16 cur_getp; bool polled = false; bool stop = false; cur_getp = cq->getp; while (num_entries) { cqe = cq->va + cur_getp; /* check whether valid cqe or not */ if (!is_cqe_valid(cq, cqe)) break; qpn = (le32_to_cpu(cqe->cmn.qpn) & OCRDMA_CQE_QPN_MASK); /* ignore discarded cqe */ if (qpn == 0) goto skip_cqe; qp = dev->qp_tbl[qpn]; BUG_ON(qp == NULL); if (is_cqe_for_sq(cqe)) { expand = ocrdma_poll_scqe(qp, cqe, ibwc, &polled, &stop); } else { expand = ocrdma_poll_rcqe(qp, cqe, ibwc, &polled, &stop); } if (expand) goto expand_cqe; if (stop) goto stop_cqe; /* clear qpn to avoid duplicate processing by discard_cqe() */ cqe->cmn.qpn = 0; skip_cqe: polled_hw_cqes += 1; cur_getp = (cur_getp + 1) % cq->max_hw_cqe; ocrdma_change_cq_phase(cq, cqe, cur_getp); expand_cqe: if (polled) { num_entries -= 1; i += 1; ibwc = ibwc + 1; polled = false; } } stop_cqe: cq->getp = cur_getp; if (cq->deferred_arm) { ocrdma_ring_cq_db(dev, cq->id, true, cq->deferred_sol, polled_hw_cqes); cq->deferred_arm = false; cq->deferred_sol = false; } else { /* We need to pop the CQE. No need to arm */ ocrdma_ring_cq_db(dev, cq->id, false, cq->deferred_sol, polled_hw_cqes); cq->deferred_sol = false; } return i; } /* insert error cqe if the QP's SQ or RQ's CQ matches the CQ under poll. */ static int ocrdma_add_err_cqe(struct ocrdma_cq *cq, int num_entries, struct ocrdma_qp *qp, struct ib_wc *ibwc) { int err_cqes = 0; while (num_entries) { if (is_hw_sq_empty(qp) && is_hw_rq_empty(qp)) break; if (!is_hw_sq_empty(qp) && qp->sq_cq == cq) { ocrdma_update_wc(qp, ibwc, qp->sq.tail); ocrdma_hwq_inc_tail(&qp->sq); } else if (!is_hw_rq_empty(qp) && qp->rq_cq == cq) { ibwc->wr_id = qp->rqe_wr_id_tbl[qp->rq.tail]; ocrdma_hwq_inc_tail(&qp->rq); } else { return err_cqes; } ibwc->byte_len = 0; ibwc->status = IB_WC_WR_FLUSH_ERR; ibwc = ibwc + 1; err_cqes += 1; num_entries -= 1; } return err_cqes; } int ocrdma_poll_cq(struct ib_cq *ibcq, int num_entries, struct ib_wc *wc) { int cqes_to_poll = num_entries; struct ocrdma_cq *cq = get_ocrdma_cq(ibcq); struct ocrdma_dev *dev = get_ocrdma_dev(ibcq->device); int num_os_cqe = 0, err_cqes = 0; struct ocrdma_qp *qp; unsigned long flags; /* poll cqes from adapter CQ */ spin_lock_irqsave(&cq->cq_lock, flags); num_os_cqe = ocrdma_poll_hwcq(cq, cqes_to_poll, wc); spin_unlock_irqrestore(&cq->cq_lock, flags); cqes_to_poll -= num_os_cqe; if (cqes_to_poll) { wc = wc + num_os_cqe; /* adapter returns single error cqe when qp moves to * error state. So insert error cqes with wc_status as * FLUSHED for pending WQEs and RQEs of QP's SQ and RQ * respectively which uses this CQ. */ spin_lock_irqsave(&dev->flush_q_lock, flags); list_for_each_entry(qp, &cq->sq_head, sq_entry) { if (cqes_to_poll == 0) break; err_cqes = ocrdma_add_err_cqe(cq, cqes_to_poll, qp, wc); cqes_to_poll -= err_cqes; num_os_cqe += err_cqes; wc = wc + err_cqes; } spin_unlock_irqrestore(&dev->flush_q_lock, flags); } return num_os_cqe; } int ocrdma_arm_cq(struct ib_cq *ibcq, enum ib_cq_notify_flags cq_flags) { struct ocrdma_cq *cq = get_ocrdma_cq(ibcq); struct ocrdma_dev *dev = get_ocrdma_dev(ibcq->device); u16 cq_id; unsigned long flags; bool arm_needed = false, sol_needed = false; cq_id = cq->id; spin_lock_irqsave(&cq->cq_lock, flags); if (cq_flags & IB_CQ_NEXT_COMP || cq_flags & IB_CQ_SOLICITED) arm_needed = true; if (cq_flags & IB_CQ_SOLICITED) sol_needed = true; if (cq->first_arm) { ocrdma_ring_cq_db(dev, cq_id, arm_needed, sol_needed, 0); cq->first_arm = false; goto skip_defer; } cq->deferred_arm = true; skip_defer: cq->deferred_sol = sol_needed; spin_unlock_irqrestore(&cq->cq_lock, flags); return 0; } struct ib_mr *ocrdma_alloc_frmr(struct ib_pd *ibpd, int max_page_list_len) { int status; struct ocrdma_mr *mr; struct ocrdma_pd *pd = get_ocrdma_pd(ibpd); struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device); if (max_page_list_len > dev->attr.max_pages_per_frmr) return ERR_PTR(-EINVAL); mr = kzalloc(sizeof(*mr), GFP_KERNEL); if (!mr) return ERR_PTR(-ENOMEM); status = ocrdma_get_pbl_info(dev, mr, max_page_list_len); if (status) goto pbl_err; mr->hwmr.fr_mr = 1; mr->hwmr.remote_rd = 0; mr->hwmr.remote_wr = 0; mr->hwmr.local_rd = 0; mr->hwmr.local_wr = 0; mr->hwmr.mw_bind = 0; status = ocrdma_build_pbl_tbl(dev, &mr->hwmr); if (status) goto pbl_err; status = ocrdma_reg_mr(dev, &mr->hwmr, pd->id, 0); if (status) goto mbx_err; mr->ibmr.rkey = mr->hwmr.lkey; mr->ibmr.lkey = mr->hwmr.lkey; dev->stag_arr[(mr->hwmr.lkey >> 8) & (OCRDMA_MAX_STAG - 1)] = (unsigned long) mr; return &mr->ibmr; mbx_err: ocrdma_free_mr_pbl_tbl(dev, &mr->hwmr); pbl_err: kfree(mr); return ERR_PTR(-ENOMEM); } struct ib_fast_reg_page_list *ocrdma_alloc_frmr_page_list(struct ib_device *ibdev, int page_list_len) { struct ib_fast_reg_page_list *frmr_list; int size; size = sizeof(*frmr_list) + (page_list_len * sizeof(u64)); frmr_list = kzalloc(size, GFP_KERNEL); if (!frmr_list) return ERR_PTR(-ENOMEM); frmr_list->page_list = (u64 *)(frmr_list + 1); return frmr_list; } void ocrdma_free_frmr_page_list(struct ib_fast_reg_page_list *page_list) { kfree(page_list); } #define MAX_KERNEL_PBE_SIZE 65536 static inline int count_kernel_pbes(struct ib_phys_buf *buf_list, int buf_cnt, u32 *pbe_size) { u64 total_size = 0; u64 buf_size = 0; int i; *pbe_size = roundup(buf_list[0].size, PAGE_SIZE); *pbe_size = roundup_pow_of_two(*pbe_size); /* find the smallest PBE size that we can have */ for (i = 0; i < buf_cnt; i++) { /* first addr may not be page aligned, so ignore checking */ if ((i != 0) && ((buf_list[i].addr & ~PAGE_MASK) || (buf_list[i].size & ~PAGE_MASK))) { return 0; } /* if configured PBE size is greater then the chosen one, * reduce the PBE size. */ buf_size = roundup(buf_list[i].size, PAGE_SIZE); /* pbe_size has to be even multiple of 4K 1,2,4,8...*/ buf_size = roundup_pow_of_two(buf_size); if (*pbe_size > buf_size) *pbe_size = buf_size; total_size += buf_size; } *pbe_size = *pbe_size > MAX_KERNEL_PBE_SIZE ? (MAX_KERNEL_PBE_SIZE) : (*pbe_size); /* num_pbes = total_size / (*pbe_size); this is implemented below. */ return total_size >> ilog2(*pbe_size); } static void build_kernel_pbes(struct ib_phys_buf *buf_list, int ib_buf_cnt, u32 pbe_size, struct ocrdma_pbl *pbl_tbl, struct ocrdma_hw_mr *hwmr) { int i; int idx; int pbes_per_buf = 0; u64 buf_addr = 0; int num_pbes; struct ocrdma_pbe *pbe; int total_num_pbes = 0; if (!hwmr->num_pbes) return; pbe = (struct ocrdma_pbe *)pbl_tbl->va; num_pbes = 0; /* go through the OS phy regions & fill hw pbe entries into pbls. */ for (i = 0; i < ib_buf_cnt; i++) { buf_addr = buf_list[i].addr; pbes_per_buf = roundup_pow_of_two(roundup(buf_list[i].size, PAGE_SIZE)) / pbe_size; hwmr->len += buf_list[i].size; /* number of pbes can be more for one OS buf, when * buffers are of different sizes. * split the ib_buf to one or more pbes. */ for (idx = 0; idx < pbes_per_buf; idx++) { /* we program always page aligned addresses, * first unaligned address is taken care by fbo. */ if (i == 0) { /* for non zero fbo, assign the * start of the page. */ pbe->pa_lo = cpu_to_le32((u32) (buf_addr & PAGE_MASK)); pbe->pa_hi = cpu_to_le32((u32) upper_32_bits(buf_addr)); } else { pbe->pa_lo = cpu_to_le32((u32) (buf_addr & 0xffffffff)); pbe->pa_hi = cpu_to_le32((u32) upper_32_bits(buf_addr)); } buf_addr += pbe_size; num_pbes += 1; total_num_pbes += 1; pbe++; if (total_num_pbes == hwmr->num_pbes) goto mr_tbl_done; /* if the pbl is full storing the pbes, * move to next pbl. */ if (num_pbes == (hwmr->pbl_size/sizeof(u64))) { pbl_tbl++; pbe = (struct ocrdma_pbe *)pbl_tbl->va; num_pbes = 0; } } } mr_tbl_done: return; } struct ib_mr *ocrdma_reg_kernel_mr(struct ib_pd *ibpd, struct ib_phys_buf *buf_list, int buf_cnt, int acc, u64 *iova_start) { int status = -ENOMEM; struct ocrdma_mr *mr; struct ocrdma_pd *pd = get_ocrdma_pd(ibpd); struct ocrdma_dev *dev = get_ocrdma_dev(ibpd->device); u32 num_pbes; u32 pbe_size = 0; if ((acc & IB_ACCESS_REMOTE_WRITE) && !(acc & IB_ACCESS_LOCAL_WRITE)) return ERR_PTR(-EINVAL); mr = kzalloc(sizeof(*mr), GFP_KERNEL); if (!mr) return ERR_PTR(status); num_pbes = count_kernel_pbes(buf_list, buf_cnt, &pbe_size); if (num_pbes == 0) { status = -EINVAL; goto pbl_err; } status = ocrdma_get_pbl_info(dev, mr, num_pbes); if (status) goto pbl_err; mr->hwmr.pbe_size = pbe_size; mr->hwmr.fbo = *iova_start - (buf_list[0].addr & PAGE_MASK); mr->hwmr.va = *iova_start; mr->hwmr.local_rd = 1; mr->hwmr.remote_wr = (acc & IB_ACCESS_REMOTE_WRITE) ? 1 : 0; mr->hwmr.remote_rd = (acc & IB_ACCESS_REMOTE_READ) ? 1 : 0; mr->hwmr.local_wr = (acc & IB_ACCESS_LOCAL_WRITE) ? 1 : 0; mr->hwmr.remote_atomic = (acc & IB_ACCESS_REMOTE_ATOMIC) ? 1 : 0; mr->hwmr.mw_bind = (acc & IB_ACCESS_MW_BIND) ? 1 : 0; status = ocrdma_build_pbl_tbl(dev, &mr->hwmr); if (status) goto pbl_err; build_kernel_pbes(buf_list, buf_cnt, pbe_size, mr->hwmr.pbl_table, &mr->hwmr); status = ocrdma_reg_mr(dev, &mr->hwmr, pd->id, acc); if (status) goto mbx_err; mr->ibmr.lkey = mr->hwmr.lkey; if (mr->hwmr.remote_wr || mr->hwmr.remote_rd) mr->ibmr.rkey = mr->hwmr.lkey; return &mr->ibmr; mbx_err: ocrdma_free_mr_pbl_tbl(dev, &mr->hwmr); pbl_err: kfree(mr); return ERR_PTR(status); }