drivers/infiniband/hw/ocrdma/ocrdma_verbs.c

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