drivers/infiniband/hw/nes/nes_verbs.c

   1 /*
   2  * Copyright (c) 2006 - 2011 Intel Corporation.  All rights reserved.
   3  *
   4  * This software is available to you under a choice of one of two
   5  * licenses.  You may choose to be licensed under the terms of the GNU
   6  * General Public License (GPL) Version 2, available from the file
   7  * COPYING in the main directory of this source tree, or the
   8  * OpenIB.org BSD license below:
   9  *
  10  *     Redistribution and use in source and binary forms, with or
  11  *     without modification, are permitted provided that the following
  12  *     conditions are met:
  13  *
  14  *      - Redistributions of source code must retain the above
  15  *        copyright notice, this list of conditions and the following
  16  *        disclaimer.
  17  *
  18  *      - Redistributions in binary form must reproduce the above
  19  *        copyright notice, this list of conditions and the following
  20  *        disclaimer in the documentation and/or other materials
  21  *        provided with the distribution.
  22  *
  23  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  24  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  25  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  26  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
  27  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
  28  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
  29  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  30  * SOFTWARE.
  31  *
  32  */
  33
  34 #include <linux/module.h>
  35 #include <linux/moduleparam.h>
  36 #include <linux/random.h>
  37 #include <linux/highmem.h>
  38 #include <linux/slab.h>
  39 #include <asm/byteorder.h>
  40
  41 #include <rdma/ib_verbs.h>
  42 #include <rdma/iw_cm.h>
  43 #include <rdma/ib_user_verbs.h>
  44 #include <rdma/uverbs_ioctl.h>
  45
  46 #include "nes.h"
  47
  48 #include <rdma/ib_umem.h>
  49
  50 atomic_t mod_qp_timouts;
  51 atomic_t qps_created;
  52 atomic_t sw_qps_destroyed;
  53
  54 static void nes_unregister_ofa_device(struct nes_ib_device *nesibdev);
  55 static int nes_dereg_mr(struct ib_mr *ib_mr);
  56
  57 /**
  58  * nes_alloc_mw
  59  */
  60 static struct ib_mw *nes_alloc_mw(struct ib_pd *ibpd, enum ib_mw_type type,
  61                                   struct ib_udata *udata)
  62 {
  63         struct nes_pd *nespd = to_nespd(ibpd);
  64         struct nes_vnic *nesvnic = to_nesvnic(ibpd->device);
  65         struct nes_device *nesdev = nesvnic->nesdev;
  66         struct nes_adapter *nesadapter = nesdev->nesadapter;
  67         struct nes_cqp_request *cqp_request;
  68         struct nes_mr *nesmr;
  69         struct ib_mw *ibmw;
  70         struct nes_hw_cqp_wqe *cqp_wqe;
  71         int ret;
  72         u32 stag;
  73         u32 stag_index = 0;
  74         u32 next_stag_index = 0;
  75         u32 driver_key = 0;
  76         u8 stag_key = 0;
  77
  78         if (type != IB_MW_TYPE_1)
  79                 return ERR_PTR(-EINVAL);
  80
  81         get_random_bytes(&next_stag_index, sizeof(next_stag_index));
  82         stag_key = (u8)next_stag_index;
  83
  84         driver_key = 0;
  85
  86         next_stag_index >>= 8;
  87         next_stag_index %= nesadapter->max_mr;
  88
  89         ret = nes_alloc_resource(nesadapter, nesadapter->allocated_mrs,
  90                         nesadapter->max_mr, &stag_index, &next_stag_index, NES_RESOURCE_MW);
  91         if (ret) {
  92                 return ERR_PTR(ret);
  93         }
  94
  95         nesmr = kzalloc(sizeof(*nesmr), GFP_KERNEL);
  96         if (!nesmr) {
  97                 nes_free_resource(nesadapter, nesadapter->allocated_mrs, stag_index);
  98                 return ERR_PTR(-ENOMEM);
  99         }
 100
 101         stag = stag_index << 8;
 102         stag |= driver_key;
 103         stag += (u32)stag_key;
 104
 105         nes_debug(NES_DBG_MR, "Registering STag 0x%08X, index = 0x%08X\n",
 106                         stag, stag_index);
 107
 108         /* Register the region with the adapter */
 109         cqp_request = nes_get_cqp_request(nesdev);
 110         if (cqp_request == NULL) {
 111                 kfree(nesmr);
 112                 nes_free_resource(nesadapter, nesadapter->allocated_mrs, stag_index);
 113                 return ERR_PTR(-ENOMEM);
 114         }
 115
 116         cqp_request->waiting = 1;
 117         cqp_wqe = &cqp_request->cqp_wqe;
 118
 119         cqp_wqe->wqe_words[NES_CQP_WQE_OPCODE_IDX] =
 120                         cpu_to_le32( NES_CQP_ALLOCATE_STAG | NES_CQP_STAG_RIGHTS_REMOTE_READ |
 121                         NES_CQP_STAG_RIGHTS_REMOTE_WRITE | NES_CQP_STAG_VA_TO |
 122                         NES_CQP_STAG_REM_ACC_EN);
 123
 124         nes_fill_init_cqp_wqe(cqp_wqe, nesdev);
 125         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_LEN_HIGH_PD_IDX, (nespd->pd_id & 0x00007fff));
 126         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_STAG_IDX, stag);
 127
 128         atomic_set(&cqp_request->refcount, 2);
 129         nes_post_cqp_request(nesdev, cqp_request);
 130
 131         /* Wait for CQP */
 132         ret = wait_event_timeout(cqp_request->waitq, (cqp_request->request_done != 0),
 133                         NES_EVENT_TIMEOUT);
 134         nes_debug(NES_DBG_MR, "Register STag 0x%08X completed, wait_event_timeout ret = %u,"
 135                         " CQP Major:Minor codes = 0x%04X:0x%04X.\n",
 136                         stag, ret, cqp_request->major_code, cqp_request->minor_code);
 137         if ((!ret) || (cqp_request->major_code)) {
 138                 nes_put_cqp_request(nesdev, cqp_request);
 139                 kfree(nesmr);
 140                 nes_free_resource(nesadapter, nesadapter->allocated_mrs, stag_index);
 141                 if (!ret) {
 142                         return ERR_PTR(-ETIME);
 143                 } else {
 144                         return ERR_PTR(-ENOMEM);
 145                 }
 146         }
 147         nes_put_cqp_request(nesdev, cqp_request);
 148
 149         nesmr->ibmw.rkey = stag;
 150         nesmr->mode = IWNES_MEMREG_TYPE_MW;
 151         ibmw = &nesmr->ibmw;
 152         nesmr->pbl_4k = 0;
 153         nesmr->pbls_used = 0;
 154
 155         return ibmw;
 156 }
 157
 158
 159 /**
 160  * nes_dealloc_mw
 161  */
 162 static int nes_dealloc_mw(struct ib_mw *ibmw)
 163 {
 164         struct nes_mr *nesmr = to_nesmw(ibmw);
 165         struct nes_vnic *nesvnic = to_nesvnic(ibmw->device);
 166         struct nes_device *nesdev = nesvnic->nesdev;
 167         struct nes_adapter *nesadapter = nesdev->nesadapter;
 168         struct nes_hw_cqp_wqe *cqp_wqe;
 169         struct nes_cqp_request *cqp_request;
 170         int err = 0;
 171         int ret;
 172
 173         /* Deallocate the window with the adapter */
 174         cqp_request = nes_get_cqp_request(nesdev);
 175         if (cqp_request == NULL) {
 176                 nes_debug(NES_DBG_MR, "Failed to get a cqp_request.\n");
 177                 return -ENOMEM;
 178         }
 179         cqp_request->waiting = 1;
 180         cqp_wqe = &cqp_request->cqp_wqe;
 181         nes_fill_init_cqp_wqe(cqp_wqe, nesdev);
 182         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_WQE_OPCODE_IDX, NES_CQP_DEALLOCATE_STAG);
 183         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_STAG_IDX, ibmw->rkey);
 184
 185         atomic_set(&cqp_request->refcount, 2);
 186         nes_post_cqp_request(nesdev, cqp_request);
 187
 188         /* Wait for CQP */
 189         nes_debug(NES_DBG_MR, "Waiting for deallocate STag 0x%08X to complete.\n",
 190                         ibmw->rkey);
 191         ret = wait_event_timeout(cqp_request->waitq, (0 != cqp_request->request_done),
 192                         NES_EVENT_TIMEOUT);
 193         nes_debug(NES_DBG_MR, "Deallocate STag completed, wait_event_timeout ret = %u,"
 194                         " CQP Major:Minor codes = 0x%04X:0x%04X.\n",
 195                         ret, cqp_request->major_code, cqp_request->minor_code);
 196         if (!ret)
 197                 err = -ETIME;
 198         else if (cqp_request->major_code)
 199                 err = -EIO;
 200
 201         nes_put_cqp_request(nesdev, cqp_request);
 202
 203         nes_free_resource(nesadapter, nesadapter->allocated_mrs,
 204                         (ibmw->rkey & 0x0fffff00) >> 8);
 205         kfree(nesmr);
 206
 207         return err;
 208 }
 209
 210
 211 /*
 212  * nes_alloc_fast_mr
 213  */
 214 static int alloc_fast_reg_mr(struct nes_device *nesdev, struct nes_pd *nespd,
 215                              u32 stag, u32 page_count)
 216 {
 217         struct nes_hw_cqp_wqe *cqp_wqe;
 218         struct nes_cqp_request *cqp_request;
 219         unsigned long flags;
 220         int ret;
 221         struct nes_adapter *nesadapter = nesdev->nesadapter;
 222         u32 opcode = 0;
 223         u16 major_code;
 224         u64 region_length = page_count * PAGE_SIZE;
 225
 226
 227         cqp_request = nes_get_cqp_request(nesdev);
 228         if (cqp_request == NULL) {
 229                 nes_debug(NES_DBG_MR, "Failed to get a cqp_request.\n");
 230                 return -ENOMEM;
 231         }
 232         nes_debug(NES_DBG_MR, "alloc_fast_reg_mr: page_count = %d, "
 233                               "region_length = %llu\n",
 234                               page_count, region_length);
 235         cqp_request->waiting = 1;
 236         cqp_wqe = &cqp_request->cqp_wqe;
 237
 238         spin_lock_irqsave(&nesadapter->pbl_lock, flags);
 239         if (nesadapter->free_4kpbl > 0) {
 240                 nesadapter->free_4kpbl--;
 241                 spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
 242         } else {
 243                 /* No 4kpbl's available: */
 244                 spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
 245                 nes_debug(NES_DBG_MR, "Out of Pbls\n");
 246                 nes_free_cqp_request(nesdev, cqp_request);
 247                 return -ENOMEM;
 248         }
 249
 250         opcode = NES_CQP_ALLOCATE_STAG | NES_CQP_STAG_MR |
 251                  NES_CQP_STAG_PBL_BLK_SIZE | NES_CQP_STAG_VA_TO |
 252                  NES_CQP_STAG_REM_ACC_EN;
 253         /*
 254          * The current OFED API does not support the zero based TO option.
 255          * If added then need to changed the NES_CQP_STAG_VA* option.  Also,
 256          * the API does not support that ability to have the MR set for local
 257          * access only when created and not allow the SQ op to override. Given
 258          * this the remote enable must be set here.
 259          */
 260
 261         nes_fill_init_cqp_wqe(cqp_wqe, nesdev);
 262         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_WQE_OPCODE_IDX, opcode);
 263         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_PBL_BLK_COUNT_IDX, 1);
 264
 265         cqp_wqe->wqe_words[NES_CQP_STAG_WQE_LEN_HIGH_PD_IDX] =
 266                         cpu_to_le32((u32)(region_length >> 8) & 0xff000000);
 267         cqp_wqe->wqe_words[NES_CQP_STAG_WQE_LEN_HIGH_PD_IDX] |=
 268                         cpu_to_le32(nespd->pd_id & 0x00007fff);
 269
 270         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_STAG_IDX, stag);
 271         set_wqe_64bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_VA_LOW_IDX, 0);
 272         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_LEN_LOW_IDX, 0);
 273         set_wqe_64bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_PA_LOW_IDX, 0);
 274         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_PBL_LEN_IDX, (page_count * 8));
 275         cqp_wqe->wqe_words[NES_CQP_WQE_OPCODE_IDX] |= cpu_to_le32(NES_CQP_STAG_PBL_BLK_SIZE);
 276         barrier();
 277
 278         atomic_set(&cqp_request->refcount, 2);
 279         nes_post_cqp_request(nesdev, cqp_request);
 280
 281         /* Wait for CQP */
 282         ret = wait_event_timeout(cqp_request->waitq,
 283                                  (0 != cqp_request->request_done),
 284                                  NES_EVENT_TIMEOUT);
 285
 286         nes_debug(NES_DBG_MR, "Allocate STag 0x%08X completed, "
 287                   "wait_event_timeout ret = %u, CQP Major:Minor codes = "
 288                   "0x%04X:0x%04X.\n", stag, ret, cqp_request->major_code,
 289                   cqp_request->minor_code);
 290         major_code = cqp_request->major_code;
 291         nes_put_cqp_request(nesdev, cqp_request);
 292
 293         if (!ret || major_code) {
 294                 spin_lock_irqsave(&nesadapter->pbl_lock, flags);
 295                 nesadapter->free_4kpbl++;
 296                 spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
 297         }
 298
 299         if (!ret)
 300                 return -ETIME;
 301         else if (major_code)
 302                 return -EIO;
 303         return 0;
 304 }
 305
 306 /*
 307  * nes_alloc_mr
 308  */
 309 static struct ib_mr *nes_alloc_mr(struct ib_pd *ibpd,
 310                                   enum ib_mr_type mr_type,
 311                                   u32 max_num_sg)
 312 {
 313         struct nes_pd *nespd = to_nespd(ibpd);
 314         struct nes_vnic *nesvnic = to_nesvnic(ibpd->device);
 315         struct nes_device *nesdev = nesvnic->nesdev;
 316         struct nes_adapter *nesadapter = nesdev->nesadapter;
 317
 318         u32 next_stag_index;
 319         u8 stag_key = 0;
 320         u32 driver_key = 0;
 321         int err = 0;
 322         u32 stag_index = 0;
 323         struct nes_mr *nesmr;
 324         u32 stag;
 325         int ret;
 326         struct ib_mr *ibmr;
 327
 328         if (mr_type != IB_MR_TYPE_MEM_REG)
 329                 return ERR_PTR(-EINVAL);
 330
 331         if (max_num_sg > (NES_4K_PBL_CHUNK_SIZE / sizeof(u64)))
 332                 return ERR_PTR(-E2BIG);
 333
 334 /*
 335  * Note:  Set to always use a fixed length single page entry PBL.  This is to allow
 336  *       for the fast_reg_mr operation to always know the size of the PBL.
 337  */
 338         if (max_num_sg > (NES_4K_PBL_CHUNK_SIZE / sizeof(u64)))
 339                 return ERR_PTR(-E2BIG);
 340
 341         get_random_bytes(&next_stag_index, sizeof(next_stag_index));
 342         stag_key = (u8)next_stag_index;
 343         next_stag_index >>= 8;
 344         next_stag_index %= nesadapter->max_mr;
 345
 346         err = nes_alloc_resource(nesadapter, nesadapter->allocated_mrs,
 347                                  nesadapter->max_mr, &stag_index,
 348                                  &next_stag_index, NES_RESOURCE_FAST_MR);
 349         if (err)
 350                 return ERR_PTR(err);
 351
 352         nesmr = kzalloc(sizeof(*nesmr), GFP_KERNEL);
 353         if (!nesmr) {
 354                 nes_free_resource(nesadapter, nesadapter->allocated_mrs, stag_index);
 355                 return ERR_PTR(-ENOMEM);
 356         }
 357
 358         stag = stag_index << 8;
 359         stag |= driver_key;
 360         stag += (u32)stag_key;
 361
 362         nes_debug(NES_DBG_MR, "Allocating STag 0x%08X index = 0x%08X\n",
 363                   stag, stag_index);
 364
 365         ret = alloc_fast_reg_mr(nesdev, nespd, stag, max_num_sg);
 366
 367         if (ret == 0) {
 368                 nesmr->ibmr.rkey = stag;
 369                 nesmr->ibmr.lkey = stag;
 370                 nesmr->mode = IWNES_MEMREG_TYPE_FMEM;
 371                 ibmr = &nesmr->ibmr;
 372         } else {
 373                 kfree(nesmr);
 374                 nes_free_resource(nesadapter, nesadapter->allocated_mrs, stag_index);
 375                 return ERR_PTR(-ENOMEM);
 376         }
 377
 378         nesmr->pages = pci_alloc_consistent(nesdev->pcidev,
 379                                             max_num_sg * sizeof(u64),
 380                                             &nesmr->paddr);
 381         if (!nesmr->paddr)
 382                 goto err;
 383
 384         nesmr->max_pages = max_num_sg;
 385
 386         return ibmr;
 387
 388 err:
 389         nes_dereg_mr(ibmr);
 390
 391         return ERR_PTR(-ENOMEM);
 392 }
 393
 394 static int nes_set_page(struct ib_mr *ibmr, u64 addr)
 395 {
 396         struct nes_mr *nesmr = to_nesmr(ibmr);
 397
 398         if (unlikely(nesmr->npages == nesmr->max_pages))
 399                 return -ENOMEM;
 400
 401         nesmr->pages[nesmr->npages++] = cpu_to_le64(addr);
 402
 403         return 0;
 404 }
 405
 406 static int nes_map_mr_sg(struct ib_mr *ibmr, struct scatterlist *sg,
 407                          int sg_nents, unsigned int *sg_offset)
 408 {
 409         struct nes_mr *nesmr = to_nesmr(ibmr);
 410
 411         nesmr->npages = 0;
 412
 413         return ib_sg_to_pages(ibmr, sg, sg_nents, sg_offset, nes_set_page);
 414 }
 415
 416 /**
 417  * nes_query_device
 418  */
 419 static int nes_query_device(struct ib_device *ibdev, struct ib_device_attr *props,
 420                             struct ib_udata *uhw)
 421 {
 422         struct nes_vnic *nesvnic = to_nesvnic(ibdev);
 423         struct nes_device *nesdev = nesvnic->nesdev;
 424         struct nes_ib_device *nesibdev = nesvnic->nesibdev;
 425
 426         if (uhw->inlen || uhw->outlen)
 427                 return -EINVAL;
 428
 429         memset(props, 0, sizeof(*props));
 430         memcpy(&props->sys_image_guid, nesvnic->netdev->dev_addr, 6);
 431
 432         props->fw_ver = nesdev->nesadapter->firmware_version;
 433         props->device_cap_flags = nesdev->nesadapter->device_cap_flags;
 434         props->vendor_id = nesdev->nesadapter->vendor_id;
 435         props->vendor_part_id = nesdev->nesadapter->vendor_part_id;
 436         props->hw_ver = nesdev->nesadapter->hw_rev;
 437         props->max_mr_size = 0x80000000;
 438         props->max_qp = nesibdev->max_qp;
 439         props->max_qp_wr = nesdev->nesadapter->max_qp_wr - 2;
 440         props->max_send_sge = nesdev->nesadapter->max_sge;
 441         props->max_recv_sge = nesdev->nesadapter->max_sge;
 442         props->max_cq = nesibdev->max_cq;
 443         props->max_cqe = nesdev->nesadapter->max_cqe;
 444         props->max_mr = nesibdev->max_mr;
 445         props->max_mw = nesibdev->max_mr;
 446         props->max_pd = nesibdev->max_pd;
 447         props->max_sge_rd = 1;
 448         switch (nesdev->nesadapter->max_irrq_wr) {
 449                 case 0:
 450                         props->max_qp_rd_atom = 2;
 451                         break;
 452                 case 1:
 453                         props->max_qp_rd_atom = 8;
 454                         break;
 455                 case 2:
 456                         props->max_qp_rd_atom = 32;
 457                         break;
 458                 case 3:
 459                         props->max_qp_rd_atom = 64;
 460                         break;
 461                 default:
 462                         props->max_qp_rd_atom = 0;
 463         }
 464         props->max_qp_init_rd_atom = props->max_qp_rd_atom;
 465         props->atomic_cap = IB_ATOMIC_NONE;
 466         props->max_map_per_fmr = 1;
 467
 468         return 0;
 469 }
 470
 471
 472 /**
 473  * nes_query_port
 474  */
 475 static int nes_query_port(struct ib_device *ibdev, u8 port, struct ib_port_attr *props)
 476 {
 477         struct nes_vnic *nesvnic = to_nesvnic(ibdev);
 478         struct net_device *netdev = nesvnic->netdev;
 479
 480         /* props being zeroed by the caller, avoid zeroing it here */
 481
 482         props->max_mtu = IB_MTU_4096;
 483         props->active_mtu = ib_mtu_int_to_enum(netdev->mtu);
 484
 485         props->lid = 1;
 486         if (netif_queue_stopped(netdev))
 487                 props->state = IB_PORT_DOWN;
 488         else if (nesvnic->linkup)
 489                 props->state = IB_PORT_ACTIVE;
 490         else
 491                 props->state = IB_PORT_DOWN;
 492         props->port_cap_flags = IB_PORT_CM_SUP | IB_PORT_REINIT_SUP |
 493                         IB_PORT_VENDOR_CLASS_SUP | IB_PORT_BOOT_MGMT_SUP;
 494         props->gid_tbl_len = 1;
 495         props->pkey_tbl_len = 1;
 496         props->active_width = IB_WIDTH_4X;
 497         props->active_speed = IB_SPEED_SDR;
 498         props->max_msg_sz = 0x80000000;
 499
 500         return 0;
 501 }
 502
 503 /**
 504  * nes_query_pkey
 505  */
 506 static int nes_query_pkey(struct ib_device *ibdev, u8 port, u16 index, u16 *pkey)
 507 {
 508         *pkey = 0;
 509         return 0;
 510 }
 511
 512
 513 /**
 514  * nes_query_gid
 515  */
 516 static int nes_query_gid(struct ib_device *ibdev, u8 port,
 517                 int index, union ib_gid *gid)
 518 {
 519         struct nes_vnic *nesvnic = to_nesvnic(ibdev);
 520
 521         memset(&(gid->raw[0]), 0, sizeof(gid->raw));
 522         memcpy(&(gid->raw[0]), nesvnic->netdev->dev_addr, 6);
 523
 524         return 0;
 525 }
 526
 527
 528 /**
 529  * nes_alloc_ucontext - Allocate the user context data structure. This keeps track
 530  * of all objects associated with a particular user-mode client.
 531  */
 532 static struct ib_ucontext *nes_alloc_ucontext(struct ib_device *ibdev,
 533                 struct ib_udata *udata)
 534 {
 535         struct nes_vnic *nesvnic = to_nesvnic(ibdev);
 536         struct nes_device *nesdev = nesvnic->nesdev;
 537         struct nes_adapter *nesadapter = nesdev->nesadapter;
 538         struct nes_alloc_ucontext_req req;
 539         struct nes_alloc_ucontext_resp uresp;
 540         struct nes_ucontext *nes_ucontext;
 541         struct nes_ib_device *nesibdev = nesvnic->nesibdev;
 542
 543
 544         if (ib_copy_from_udata(&req, udata, sizeof(struct nes_alloc_ucontext_req))) {
 545                 printk(KERN_ERR PFX "Invalid structure size on allocate user context.\n");
 546                 return ERR_PTR(-EINVAL);
 547         }
 548
 549         if (req.userspace_ver != NES_ABI_USERSPACE_VER) {
 550                 printk(KERN_ERR PFX "Invalid userspace driver version detected. Detected version %d, should be %d\n",
 551                         req.userspace_ver, NES_ABI_USERSPACE_VER);
 552                 return ERR_PTR(-EINVAL);
 553         }
 554
 555
 556         memset(&uresp, 0, sizeof uresp);
 557
 558         uresp.max_qps = nesibdev->max_qp;
 559         uresp.max_pds = nesibdev->max_pd;
 560         uresp.wq_size = nesdev->nesadapter->max_qp_wr * 2;
 561         uresp.virtwq = nesadapter->virtwq;
 562         uresp.kernel_ver = NES_ABI_KERNEL_VER;
 563
 564         nes_ucontext = kzalloc(sizeof *nes_ucontext, GFP_KERNEL);
 565         if (!nes_ucontext)
 566                 return ERR_PTR(-ENOMEM);
 567
 568         nes_ucontext->nesdev = nesdev;
 569         nes_ucontext->mmap_wq_offset = uresp.max_pds;
 570         nes_ucontext->mmap_cq_offset = nes_ucontext->mmap_wq_offset +
 571                         ((sizeof(struct nes_hw_qp_wqe) * uresp.max_qps * 2) + PAGE_SIZE-1) /
 572                         PAGE_SIZE;
 573
 574
 575         if (ib_copy_to_udata(udata, &uresp, sizeof uresp)) {
 576                 kfree(nes_ucontext);
 577                 return ERR_PTR(-EFAULT);
 578         }
 579
 580         INIT_LIST_HEAD(&nes_ucontext->cq_reg_mem_list);
 581         INIT_LIST_HEAD(&nes_ucontext->qp_reg_mem_list);
 582         atomic_set(&nes_ucontext->usecnt, 1);
 583         return &nes_ucontext->ibucontext;
 584 }
 585
 586
 587 /**
 588  * nes_dealloc_ucontext
 589  */
 590 static int nes_dealloc_ucontext(struct ib_ucontext *context)
 591 {
 592         /* struct nes_vnic *nesvnic = to_nesvnic(context->device); */
 593         /* struct nes_device *nesdev = nesvnic->nesdev; */
 594         struct nes_ucontext *nes_ucontext = to_nesucontext(context);
 595
 596         if (!atomic_dec_and_test(&nes_ucontext->usecnt))
 597           return 0;
 598         kfree(nes_ucontext);
 599         return 0;
 600 }
 601
 602
 603 /**
 604  * nes_mmap
 605  */
 606 static int nes_mmap(struct ib_ucontext *context, struct vm_area_struct *vma)
 607 {
 608         unsigned long index;
 609         struct nes_vnic *nesvnic = to_nesvnic(context->device);
 610         struct nes_device *nesdev = nesvnic->nesdev;
 611         /* struct nes_adapter *nesadapter = nesdev->nesadapter; */
 612         struct nes_ucontext *nes_ucontext;
 613         struct nes_qp *nesqp;
 614
 615         nes_ucontext = to_nesucontext(context);
 616
 617
 618         if (vma->vm_pgoff >= nes_ucontext->mmap_wq_offset) {
 619                 index = (vma->vm_pgoff - nes_ucontext->mmap_wq_offset) * PAGE_SIZE;
 620                 index /= ((sizeof(struct nes_hw_qp_wqe) * nesdev->nesadapter->max_qp_wr * 2) +
 621                                 PAGE_SIZE-1) & (~(PAGE_SIZE-1));
 622                 if (!test_bit(index, nes_ucontext->allocated_wqs)) {
 623                         nes_debug(NES_DBG_MMAP, "wq %lu not allocated\n", index);
 624                         return -EFAULT;
 625                 }
 626                 nesqp = nes_ucontext->mmap_nesqp[index];
 627                 if (nesqp == NULL) {
 628                         nes_debug(NES_DBG_MMAP, "wq %lu has a NULL QP base.\n", index);
 629                         return -EFAULT;
 630                 }
 631                 if (remap_pfn_range(vma, vma->vm_start,
 632                                 virt_to_phys(nesqp->hwqp.sq_vbase) >> PAGE_SHIFT,
 633                                 vma->vm_end - vma->vm_start,
 634                                 vma->vm_page_prot)) {
 635                         nes_debug(NES_DBG_MMAP, "remap_pfn_range failed.\n");
 636                         return -EAGAIN;
 637                 }
 638                 vma->vm_private_data = nesqp;
 639                 return 0;
 640         } else {
 641                 index = vma->vm_pgoff;
 642                 if (!test_bit(index, nes_ucontext->allocated_doorbells))
 643                         return -EFAULT;
 644
 645                 vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot);
 646                 if (io_remap_pfn_range(vma, vma->vm_start,
 647                                 (nesdev->doorbell_start +
 648                                 ((nes_ucontext->mmap_db_index[index] - nesdev->base_doorbell_index) * 4096))
 649                                 >> PAGE_SHIFT, PAGE_SIZE, vma->vm_page_prot))
 650                         return -EAGAIN;
 651                 vma->vm_private_data = nes_ucontext;
 652                 return 0;
 653         }
 654
 655         return -ENOSYS;
 656 }
 657
 658
 659 /**
 660  * nes_alloc_pd
 661  */
 662 static int nes_alloc_pd(struct ib_pd *pd, struct ib_ucontext *context,
 663                         struct ib_udata *udata)
 664 {
 665         struct ib_device *ibdev = pd->device;
 666         struct nes_pd *nespd = to_nespd(pd);
 667         struct nes_vnic *nesvnic = to_nesvnic(ibdev);
 668         struct nes_device *nesdev = nesvnic->nesdev;
 669         struct nes_adapter *nesadapter = nesdev->nesadapter;
 670         struct nes_ucontext *nesucontext;
 671         struct nes_alloc_pd_resp uresp;
 672         u32 pd_num = 0;
 673         int err;
 674
 675         nes_debug(NES_DBG_PD, "nesvnic=%p, netdev=%p %s, ibdev=%p, context=%p, netdev refcnt=%u\n",
 676                         nesvnic, nesdev->netdev[0], nesdev->netdev[0]->name, ibdev, context,
 677                         netdev_refcnt_read(nesvnic->netdev));
 678
 679         err = nes_alloc_resource(nesadapter, nesadapter->allocated_pds,
 680                         nesadapter->max_pd, &pd_num, &nesadapter->next_pd, NES_RESOURCE_PD);
 681         if (err)
 682                 return err;
 683
 684         nes_debug(NES_DBG_PD, "Allocating PD (%p) for ib device %s\n",
 685                         nespd, dev_name(&nesvnic->nesibdev->ibdev.dev));
 686
 687         nespd->pd_id = (pd_num << (PAGE_SHIFT-12)) + nesadapter->base_pd;
 688
 689         if (context) {
 690                 nesucontext = to_nesucontext(context);
 691                 nespd->mmap_db_index = find_next_zero_bit(nesucontext->allocated_doorbells,
 692                                 NES_MAX_USER_DB_REGIONS, nesucontext->first_free_db);
 693                 nes_debug(NES_DBG_PD, "find_first_zero_biton doorbells returned %u, mapping pd_id %u.\n",
 694                                 nespd->mmap_db_index, nespd->pd_id);
 695                 if (nespd->mmap_db_index >= NES_MAX_USER_DB_REGIONS) {
 696                         nes_debug(NES_DBG_PD, "mmap_db_index > MAX\n");
 697                         nes_free_resource(nesadapter, nesadapter->allocated_pds, pd_num);
 698                         return -ENOMEM;
 699                 }
 700
 701                 uresp.pd_id = nespd->pd_id;
 702                 uresp.mmap_db_index = nespd->mmap_db_index;
 703                 if (ib_copy_to_udata(udata, &uresp, sizeof (struct nes_alloc_pd_resp))) {
 704                         nes_free_resource(nesadapter, nesadapter->allocated_pds, pd_num);
 705                         return -EFAULT;
 706                 }
 707
 708                 set_bit(nespd->mmap_db_index, nesucontext->allocated_doorbells);
 709                 nesucontext->mmap_db_index[nespd->mmap_db_index] = nespd->pd_id;
 710                 nesucontext->first_free_db = nespd->mmap_db_index + 1;
 711         }
 712
 713         nes_debug(NES_DBG_PD, "PD%u structure located @%p.\n", nespd->pd_id, nespd);
 714         return 0;
 715 }
 716
 717
 718 /**
 719  * nes_dealloc_pd
 720  */
 721 static void nes_dealloc_pd(struct ib_pd *ibpd)
 722 {
 723         struct nes_ucontext *nesucontext;
 724         struct nes_pd *nespd = to_nespd(ibpd);
 725         struct nes_vnic *nesvnic = to_nesvnic(ibpd->device);
 726         struct nes_device *nesdev = nesvnic->nesdev;
 727         struct nes_adapter *nesadapter = nesdev->nesadapter;
 728
 729         if ((ibpd->uobject) && (ibpd->uobject->context)) {
 730                 nesucontext = to_nesucontext(ibpd->uobject->context);
 731                 nes_debug(NES_DBG_PD, "Clearing bit %u from allocated doorbells\n",
 732                                 nespd->mmap_db_index);
 733                 clear_bit(nespd->mmap_db_index, nesucontext->allocated_doorbells);
 734                 nesucontext->mmap_db_index[nespd->mmap_db_index] = 0;
 735                 if (nesucontext->first_free_db > nespd->mmap_db_index) {
 736                         nesucontext->first_free_db = nespd->mmap_db_index;
 737                 }
 738         }
 739
 740         nes_debug(NES_DBG_PD, "Deallocating PD%u structure located @%p.\n",
 741                         nespd->pd_id, nespd);
 742         nes_free_resource(nesadapter, nesadapter->allocated_pds,
 743                         (nespd->pd_id-nesadapter->base_pd)>>(PAGE_SHIFT-12));
 744 }
 745
 746
 747 /**
 748  * nes_get_encoded_size
 749  */
 750 static inline u8 nes_get_encoded_size(int *size)
 751 {
 752         u8 encoded_size = 0;
 753         if (*size <= 32) {
 754                 *size = 32;
 755                 encoded_size = 1;
 756         } else if (*size <= 128) {
 757                 *size = 128;
 758                 encoded_size = 2;
 759         } else if (*size <= 512) {
 760                 *size = 512;
 761                 encoded_size = 3;
 762         }
 763         return (encoded_size);
 764 }
 765
 766
 767
 768 /**
 769  * nes_setup_virt_qp
 770  */
 771 static int nes_setup_virt_qp(struct nes_qp *nesqp, struct nes_pbl *nespbl,
 772                 struct nes_vnic *nesvnic, int sq_size, int rq_size)
 773 {
 774         unsigned long flags;
 775         void *mem;
 776         __le64 *pbl = NULL;
 777         __le64 *tpbl;
 778         __le64 *pblbuffer;
 779         struct nes_device *nesdev = nesvnic->nesdev;
 780         struct nes_adapter *nesadapter = nesdev->nesadapter;
 781         u32 pbl_entries;
 782         u8 rq_pbl_entries;
 783         u8 sq_pbl_entries;
 784
 785         pbl_entries = nespbl->pbl_size >> 3;
 786         nes_debug(NES_DBG_QP, "Userspace PBL, pbl_size=%u, pbl_entries = %d pbl_vbase=%p, pbl_pbase=%lx\n",
 787                         nespbl->pbl_size, pbl_entries,
 788                         (void *)nespbl->pbl_vbase,
 789                         (unsigned long) nespbl->pbl_pbase);
 790         pbl = (__le64 *) nespbl->pbl_vbase; /* points to first pbl entry */
 791         /* now lets set the sq_vbase as well as rq_vbase addrs we will assign */
 792         /* the first pbl to be fro the rq_vbase... */
 793         rq_pbl_entries = (rq_size * sizeof(struct nes_hw_qp_wqe)) >> 12;
 794         sq_pbl_entries = (sq_size * sizeof(struct nes_hw_qp_wqe)) >> 12;
 795         nesqp->hwqp.sq_pbase = (le32_to_cpu(((__le32 *)pbl)[0])) | ((u64)((le32_to_cpu(((__le32 *)pbl)[1]))) << 32);
 796         if (!nespbl->page) {
 797                 nes_debug(NES_DBG_QP, "QP nespbl->page is NULL \n");
 798                 kfree(nespbl);
 799                 return -ENOMEM;
 800         }
 801
 802         nesqp->hwqp.sq_vbase = kmap(nespbl->page);
 803         nesqp->page = nespbl->page;
 804         if (!nesqp->hwqp.sq_vbase) {
 805                 nes_debug(NES_DBG_QP, "QP sq_vbase kmap failed\n");
 806                 kfree(nespbl);
 807                 return -ENOMEM;
 808         }
 809
 810         /* Now to get to sq.. we need to calculate how many */
 811         /* PBL entries were used by the rq.. */
 812         pbl += sq_pbl_entries;
 813         nesqp->hwqp.rq_pbase = (le32_to_cpu(((__le32 *)pbl)[0])) | ((u64)((le32_to_cpu(((__le32 *)pbl)[1]))) << 32);
 814         /* nesqp->hwqp.rq_vbase = bus_to_virt(*pbl); */
 815         /*nesqp->hwqp.rq_vbase = phys_to_virt(*pbl); */
 816
 817         nes_debug(NES_DBG_QP, "QP sq_vbase= %p sq_pbase=%lx rq_vbase=%p rq_pbase=%lx\n",
 818                   nesqp->hwqp.sq_vbase, (unsigned long) nesqp->hwqp.sq_pbase,
 819                   nesqp->hwqp.rq_vbase, (unsigned long) nesqp->hwqp.rq_pbase);
 820         spin_lock_irqsave(&nesadapter->pbl_lock, flags);
 821         if (!nesadapter->free_256pbl) {
 822                 pci_free_consistent(nesdev->pcidev, nespbl->pbl_size, nespbl->pbl_vbase,
 823                                 nespbl->pbl_pbase);
 824                 spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
 825                 kunmap(nesqp->page);
 826                 kfree(nespbl);
 827                 return -ENOMEM;
 828         }
 829         nesadapter->free_256pbl--;
 830         spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
 831
 832         nesqp->pbl_vbase = pci_alloc_consistent(nesdev->pcidev, 256, &nesqp->pbl_pbase);
 833         pblbuffer = nesqp->pbl_vbase;
 834         if (!nesqp->pbl_vbase) {
 835                 /* memory allocated during nes_reg_user_mr() */
 836                 pci_free_consistent(nesdev->pcidev, nespbl->pbl_size, nespbl->pbl_vbase,
 837                                     nespbl->pbl_pbase);
 838                 kfree(nespbl);
 839                 spin_lock_irqsave(&nesadapter->pbl_lock, flags);
 840                 nesadapter->free_256pbl++;
 841                 spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
 842                 kunmap(nesqp->page);
 843                 return -ENOMEM;
 844         }
 845         memset(nesqp->pbl_vbase, 0, 256);
 846         /* fill in the page address in the pbl buffer.. */
 847         tpbl = pblbuffer + 16;
 848         pbl = (__le64 *)nespbl->pbl_vbase;
 849         while (sq_pbl_entries--)
 850                 *tpbl++ = *pbl++;
 851         tpbl = pblbuffer;
 852         while (rq_pbl_entries--)
 853                 *tpbl++ = *pbl++;
 854
 855         /* done with memory allocated during nes_reg_user_mr() */
 856         pci_free_consistent(nesdev->pcidev, nespbl->pbl_size, nespbl->pbl_vbase,
 857                             nespbl->pbl_pbase);
 858         kfree(nespbl);
 859
 860         nesqp->qp_mem_size =
 861                         max((u32)sizeof(struct nes_qp_context), ((u32)256)) + 256;     /* this is Q2 */
 862         /* Round up to a multiple of a page */
 863         nesqp->qp_mem_size += PAGE_SIZE - 1;
 864         nesqp->qp_mem_size &= ~(PAGE_SIZE - 1);
 865
 866         mem = pci_alloc_consistent(nesdev->pcidev, nesqp->qp_mem_size,
 867                         &nesqp->hwqp.q2_pbase);
 868
 869         if (!mem) {
 870                 pci_free_consistent(nesdev->pcidev, 256, nesqp->pbl_vbase, nesqp->pbl_pbase);
 871                 nesqp->pbl_vbase = NULL;
 872                 spin_lock_irqsave(&nesadapter->pbl_lock, flags);
 873                 nesadapter->free_256pbl++;
 874                 spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
 875                 kunmap(nesqp->page);
 876                 return -ENOMEM;
 877         }
 878         nesqp->sq_kmapped = 1;
 879         nesqp->hwqp.q2_vbase = mem;
 880         mem += 256;
 881         memset(nesqp->hwqp.q2_vbase, 0, 256);
 882         nesqp->nesqp_context = mem;
 883         memset(nesqp->nesqp_context, 0, sizeof(*nesqp->nesqp_context));
 884         nesqp->nesqp_context_pbase = nesqp->hwqp.q2_pbase + 256;
 885
 886         return 0;
 887 }
 888
 889
 890 /**
 891  * nes_setup_mmap_qp
 892  */
 893 static int nes_setup_mmap_qp(struct nes_qp *nesqp, struct nes_vnic *nesvnic,
 894                 int sq_size, int rq_size)
 895 {
 896         void *mem;
 897         struct nes_device *nesdev = nesvnic->nesdev;
 898
 899         nesqp->qp_mem_size = (sizeof(struct nes_hw_qp_wqe) * sq_size) +
 900                         (sizeof(struct nes_hw_qp_wqe) * rq_size) +
 901                         max((u32)sizeof(struct nes_qp_context), ((u32)256)) +
 902                         256; /* this is Q2 */
 903         /* Round up to a multiple of a page */
 904         nesqp->qp_mem_size += PAGE_SIZE - 1;
 905         nesqp->qp_mem_size &= ~(PAGE_SIZE - 1);
 906
 907         mem = pci_alloc_consistent(nesdev->pcidev, nesqp->qp_mem_size,
 908                         &nesqp->hwqp.sq_pbase);
 909         if (!mem)
 910                 return -ENOMEM;
 911         nes_debug(NES_DBG_QP, "PCI consistent memory for "
 912                         "host descriptor rings located @ %p (pa = 0x%08lX.) size = %u.\n",
 913                         mem, (unsigned long)nesqp->hwqp.sq_pbase, nesqp->qp_mem_size);
 914
 915         memset(mem, 0, nesqp->qp_mem_size);
 916
 917         nesqp->hwqp.sq_vbase = mem;
 918         mem += sizeof(struct nes_hw_qp_wqe) * sq_size;
 919
 920         nesqp->hwqp.rq_vbase = mem;
 921         nesqp->hwqp.rq_pbase = nesqp->hwqp.sq_pbase +
 922                         sizeof(struct nes_hw_qp_wqe) * sq_size;
 923         mem += sizeof(struct nes_hw_qp_wqe) * rq_size;
 924
 925         nesqp->hwqp.q2_vbase = mem;
 926         nesqp->hwqp.q2_pbase = nesqp->hwqp.rq_pbase +
 927                         sizeof(struct nes_hw_qp_wqe) * rq_size;
 928         mem += 256;
 929         memset(nesqp->hwqp.q2_vbase, 0, 256);
 930
 931         nesqp->nesqp_context = mem;
 932         nesqp->nesqp_context_pbase = nesqp->hwqp.q2_pbase + 256;
 933         memset(nesqp->nesqp_context, 0, sizeof(*nesqp->nesqp_context));
 934         return 0;
 935 }
 936
 937
 938 /**
 939  * nes_free_qp_mem() is to free up the qp's pci_alloc_consistent() memory.
 940  */
 941 static void nes_free_qp_mem(struct nes_device *nesdev,
 942                 struct nes_qp *nesqp, int virt_wqs)
 943 {
 944         unsigned long flags;
 945         struct nes_adapter *nesadapter = nesdev->nesadapter;
 946         if (!virt_wqs) {
 947                 pci_free_consistent(nesdev->pcidev, nesqp->qp_mem_size,
 948                                 nesqp->hwqp.sq_vbase, nesqp->hwqp.sq_pbase);
 949         }else {
 950                 spin_lock_irqsave(&nesadapter->pbl_lock, flags);
 951                 nesadapter->free_256pbl++;
 952                 spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
 953                 pci_free_consistent(nesdev->pcidev, nesqp->qp_mem_size, nesqp->hwqp.q2_vbase, nesqp->hwqp.q2_pbase);
 954                 pci_free_consistent(nesdev->pcidev, 256, nesqp->pbl_vbase, nesqp->pbl_pbase );
 955                 nesqp->pbl_vbase = NULL;
 956                 if (nesqp->sq_kmapped) {
 957                         nesqp->sq_kmapped = 0;
 958                         kunmap(nesqp->page);
 959                 }
 960         }
 961 }
 962
 963
 964 /**
 965  * nes_create_qp
 966  */
 967 static struct ib_qp *nes_create_qp(struct ib_pd *ibpd,
 968                 struct ib_qp_init_attr *init_attr, struct ib_udata *udata)
 969 {
 970         u64 u64temp= 0;
 971         u64 u64nesqp = 0;
 972         struct nes_pd *nespd = to_nespd(ibpd);
 973         struct nes_vnic *nesvnic = to_nesvnic(ibpd->device);
 974         struct nes_device *nesdev = nesvnic->nesdev;
 975         struct nes_adapter *nesadapter = nesdev->nesadapter;
 976         struct nes_qp *nesqp;
 977         struct nes_cq *nescq;
 978         struct nes_ucontext *nes_ucontext = rdma_udata_to_drv_context(
 979                 udata, struct nes_ucontext, ibucontext);
 980         struct nes_hw_cqp_wqe *cqp_wqe;
 981         struct nes_cqp_request *cqp_request;
 982         struct nes_create_qp_req req;
 983         struct nes_create_qp_resp uresp;
 984         struct nes_pbl  *nespbl = NULL;
 985         u32 qp_num = 0;
 986         u32 opcode = 0;
 987         /* u32 counter = 0; */
 988         void *mem;
 989         unsigned long flags;
 990         int ret;
 991         int err;
 992         int virt_wqs = 0;
 993         int sq_size;
 994         int rq_size;
 995         u8 sq_encoded_size;
 996         u8 rq_encoded_size;
 997         /* int counter; */
 998
 999         if (init_attr->create_flags)
1000                 return ERR_PTR(-EINVAL);
1001
1002         atomic_inc(&qps_created);
1003         switch (init_attr->qp_type) {
1004                 case IB_QPT_RC:
1005                         if (nes_drv_opt & NES_DRV_OPT_NO_INLINE_DATA) {
1006                                 init_attr->cap.max_inline_data = 0;
1007                         } else {
1008                                 init_attr->cap.max_inline_data = 64;
1009                         }
1010                         sq_size = init_attr->cap.max_send_wr;
1011                         rq_size = init_attr->cap.max_recv_wr;
1012
1013                         /* check if the encoded sizes are OK or not... */
1014                         sq_encoded_size = nes_get_encoded_size(&sq_size);
1015                         rq_encoded_size = nes_get_encoded_size(&rq_size);
1016
1017                         if ((!sq_encoded_size) || (!rq_encoded_size)) {
1018                                 nes_debug(NES_DBG_QP, "ERROR bad rq (%u) or sq (%u) size\n",
1019                                                 rq_size, sq_size);
1020                                 return ERR_PTR(-EINVAL);
1021                         }
1022
1023                         init_attr->cap.max_send_wr = sq_size -2;
1024                         init_attr->cap.max_recv_wr = rq_size -1;
1025                         nes_debug(NES_DBG_QP, "RQ size=%u, SQ Size=%u\n", rq_size, sq_size);
1026
1027                         ret = nes_alloc_resource(nesadapter, nesadapter->allocated_qps,
1028                                         nesadapter->max_qp, &qp_num, &nesadapter->next_qp, NES_RESOURCE_QP);
1029                         if (ret) {
1030                                 return ERR_PTR(ret);
1031                         }
1032
1033                         /* Need 512 (actually now 1024) byte alignment on this structure */
1034                         mem = kzalloc(sizeof(*nesqp)+NES_SW_CONTEXT_ALIGN-1, GFP_KERNEL);
1035                         if (!mem) {
1036                                 nes_free_resource(nesadapter, nesadapter->allocated_qps, qp_num);
1037                                 return ERR_PTR(-ENOMEM);
1038                         }
1039                         u64nesqp = (unsigned long)mem;
1040                         u64nesqp += ((u64)NES_SW_CONTEXT_ALIGN) - 1;
1041                         u64temp = ((u64)NES_SW_CONTEXT_ALIGN) - 1;
1042                         u64nesqp &= ~u64temp;
1043                         nesqp = (struct nes_qp *)(unsigned long)u64nesqp;
1044                         /* nes_debug(NES_DBG_QP, "nesqp=%p, allocated buffer=%p.  Rounded to closest %u\n",
1045                                         nesqp, mem, NES_SW_CONTEXT_ALIGN); */
1046                         nesqp->allocated_buffer = mem;
1047
1048                         if (udata) {
1049                                 if (ib_copy_from_udata(&req, udata, sizeof(struct nes_create_qp_req))) {
1050                                         nes_free_resource(nesadapter, nesadapter->allocated_qps, qp_num);
1051                                         kfree(nesqp->allocated_buffer);
1052                                         nes_debug(NES_DBG_QP, "ib_copy_from_udata() Failed \n");
1053                                         return ERR_PTR(-EFAULT);
1054                                 }
1055                                 if (req.user_wqe_buffers) {
1056                                         virt_wqs = 1;
1057                                 }
1058                                 if (req.user_qp_buffer)
1059                                         nesqp->nesuqp_addr = req.user_qp_buffer;
1060                                 if (udata) {
1061                                         nesqp->user_mode = 1;
1062                                         if (virt_wqs) {
1063                                                 err = 1;
1064                                                 list_for_each_entry(nespbl, &nes_ucontext->qp_reg_mem_list, list) {
1065                                                         if (nespbl->user_base == (unsigned long )req.user_wqe_buffers) {
1066                                                                 list_del(&nespbl->list);
1067                                                                 err = 0;
1068                                                                 nes_debug(NES_DBG_QP, "Found PBL for virtual QP. nespbl=%p. user_base=0x%lx\n",
1069                                                                           nespbl, nespbl->user_base);
1070                                                                 break;
1071                                                         }
1072                                                 }
1073                                                 if (err) {
1074                                                         nes_debug(NES_DBG_QP, "Didn't Find PBL for virtual QP. address = %llx.\n",
1075                                                                   (long long unsigned int)req.user_wqe_buffers);
1076                                                         nes_free_resource(nesadapter, nesadapter->allocated_qps, qp_num);
1077                                                         kfree(nesqp->allocated_buffer);
1078                                                         return ERR_PTR(-EFAULT);
1079                                                 }
1080                                         }
1081
1082                                         nesqp->mmap_sq_db_index =
1083                                                 find_next_zero_bit(nes_ucontext->allocated_wqs,
1084                                                                    NES_MAX_USER_WQ_REGIONS, nes_ucontext->first_free_wq);
1085                                         /* nes_debug(NES_DBG_QP, "find_first_zero_biton wqs returned %u\n",
1086                                                         nespd->mmap_db_index); */
1087                                         if (nesqp->mmap_sq_db_index >= NES_MAX_USER_WQ_REGIONS) {
1088                                                 nes_debug(NES_DBG_QP,
1089                                                           "db index > max user regions, failing create QP\n");
1090                                                 nes_free_resource(nesadapter, nesadapter->allocated_qps, qp_num);
1091                                                 if (virt_wqs) {
1092                                                         pci_free_consistent(nesdev->pcidev, nespbl->pbl_size, nespbl->pbl_vbase,
1093                                                                             nespbl->pbl_pbase);
1094                                                         kfree(nespbl);
1095                                                 }
1096                                                 kfree(nesqp->allocated_buffer);
1097                                                 return ERR_PTR(-ENOMEM);
1098                                         }
1099                                         set_bit(nesqp->mmap_sq_db_index, nes_ucontext->allocated_wqs);
1100                                         nes_ucontext->mmap_nesqp[nesqp->mmap_sq_db_index] = nesqp;
1101                                         nes_ucontext->first_free_wq = nesqp->mmap_sq_db_index + 1;
1102                                 } else {
1103                                         nes_free_resource(nesadapter, nesadapter->allocated_qps, qp_num);
1104                                         kfree(nesqp->allocated_buffer);
1105                                         return ERR_PTR(-EFAULT);
1106                                 }
1107                         }
1108                         err = (!virt_wqs) ? nes_setup_mmap_qp(nesqp, nesvnic, sq_size, rq_size) :
1109                                         nes_setup_virt_qp(nesqp, nespbl, nesvnic, sq_size, rq_size);
1110                         if (err) {
1111                                 nes_debug(NES_DBG_QP,
1112                                           "error geting qp mem code = %d\n", err);
1113                                 nes_free_resource(nesadapter, nesadapter->allocated_qps, qp_num);
1114                                 kfree(nesqp->allocated_buffer);
1115                                 return ERR_PTR(-ENOMEM);
1116                         }
1117
1118                         nesqp->hwqp.sq_size = sq_size;
1119                         nesqp->hwqp.sq_encoded_size = sq_encoded_size;
1120                         nesqp->hwqp.sq_head = 1;
1121                         nesqp->hwqp.rq_size = rq_size;
1122                         nesqp->hwqp.rq_encoded_size = rq_encoded_size;
1123                         /* nes_debug(NES_DBG_QP, "nesqp->nesqp_context_pbase = %p\n",
1124                                         (void *)nesqp->nesqp_context_pbase);
1125                         */
1126                         nesqp->hwqp.qp_id = qp_num;
1127                         nesqp->ibqp.qp_num = nesqp->hwqp.qp_id;
1128                         nesqp->nespd = nespd;
1129
1130                         nescq = to_nescq(init_attr->send_cq);
1131                         nesqp->nesscq = nescq;
1132                         nescq = to_nescq(init_attr->recv_cq);
1133                         nesqp->nesrcq = nescq;
1134
1135                         nesqp->nesqp_context->misc |= cpu_to_le32((u32)PCI_FUNC(nesdev->pcidev->devfn) <<
1136                                         NES_QPCONTEXT_MISC_PCI_FCN_SHIFT);
1137                         nesqp->nesqp_context->misc |= cpu_to_le32((u32)nesqp->hwqp.rq_encoded_size <<
1138                                         NES_QPCONTEXT_MISC_RQ_SIZE_SHIFT);
1139                         nesqp->nesqp_context->misc |= cpu_to_le32((u32)nesqp->hwqp.sq_encoded_size <<
1140                                         NES_QPCONTEXT_MISC_SQ_SIZE_SHIFT);
1141                         if (!udata) {
1142                                 nesqp->nesqp_context->misc |= cpu_to_le32(NES_QPCONTEXT_MISC_PRIV_EN);
1143                                 nesqp->nesqp_context->misc |= cpu_to_le32(NES_QPCONTEXT_MISC_FAST_REGISTER_EN);
1144                         }
1145                         nesqp->nesqp_context->cqs = cpu_to_le32(nesqp->nesscq->hw_cq.cq_number +
1146                                         ((u32)nesqp->nesrcq->hw_cq.cq_number << 16));
1147                         u64temp = (u64)nesqp->hwqp.sq_pbase;
1148                         nesqp->nesqp_context->sq_addr_low = cpu_to_le32((u32)u64temp);
1149                         nesqp->nesqp_context->sq_addr_high = cpu_to_le32((u32)(u64temp >> 32));
1150
1151
1152                         if (!virt_wqs) {
1153                                 u64temp = (u64)nesqp->hwqp.sq_pbase;
1154                                 nesqp->nesqp_context->sq_addr_low = cpu_to_le32((u32)u64temp);
1155                                 nesqp->nesqp_context->sq_addr_high = cpu_to_le32((u32)(u64temp >> 32));
1156                                 u64temp = (u64)nesqp->hwqp.rq_pbase;
1157                                 nesqp->nesqp_context->rq_addr_low = cpu_to_le32((u32)u64temp);
1158                                 nesqp->nesqp_context->rq_addr_high = cpu_to_le32((u32)(u64temp >> 32));
1159                         } else {
1160                                 u64temp = (u64)nesqp->pbl_pbase;
1161                                 nesqp->nesqp_context->rq_addr_low = cpu_to_le32((u32)u64temp);
1162                                 nesqp->nesqp_context->rq_addr_high = cpu_to_le32((u32)(u64temp >> 32));
1163                         }
1164
1165                         /* nes_debug(NES_DBG_QP, "next_qp_nic_index=%u, using nic_index=%d\n",
1166                                         nesvnic->next_qp_nic_index,
1167                                         nesvnic->qp_nic_index[nesvnic->next_qp_nic_index]); */
1168                         spin_lock_irqsave(&nesdev->cqp.lock, flags);
1169                         nesqp->nesqp_context->misc2 |= cpu_to_le32(
1170                                         (u32)nesvnic->qp_nic_index[nesvnic->next_qp_nic_index] <<
1171                                         NES_QPCONTEXT_MISC2_NIC_INDEX_SHIFT);
1172                         nesvnic->next_qp_nic_index++;
1173                         if ((nesvnic->next_qp_nic_index > 3) ||
1174                                         (nesvnic->qp_nic_index[nesvnic->next_qp_nic_index] == 0xf)) {
1175                                 nesvnic->next_qp_nic_index = 0;
1176                         }
1177                         spin_unlock_irqrestore(&nesdev->cqp.lock, flags);
1178
1179                         nesqp->nesqp_context->pd_index_wscale |= cpu_to_le32((u32)nesqp->nespd->pd_id << 16);
1180                         u64temp = (u64)nesqp->hwqp.q2_pbase;
1181                         nesqp->nesqp_context->q2_addr_low = cpu_to_le32((u32)u64temp);
1182                         nesqp->nesqp_context->q2_addr_high = cpu_to_le32((u32)(u64temp >> 32));
1183                         nesqp->nesqp_context->aeq_token_low =  cpu_to_le32((u32)((unsigned long)(nesqp)));
1184                         nesqp->nesqp_context->aeq_token_high =  cpu_to_le32((u32)(upper_32_bits((unsigned long)(nesqp))));
1185                         nesqp->nesqp_context->ird_ord_sizes = cpu_to_le32(NES_QPCONTEXT_ORDIRD_ALSMM |
1186                                         NES_QPCONTEXT_ORDIRD_AAH |
1187                                         ((((u32)nesadapter->max_irrq_wr) <<
1188                                         NES_QPCONTEXT_ORDIRD_IRDSIZE_SHIFT) & NES_QPCONTEXT_ORDIRD_IRDSIZE_MASK));
1189                         if (disable_mpa_crc) {
1190                                 nes_debug(NES_DBG_QP, "Disabling MPA crc checking due to module option.\n");
1191                                 nesqp->nesqp_context->ird_ord_sizes |= cpu_to_le32(NES_QPCONTEXT_ORDIRD_RNMC);
1192                         }
1193
1194
1195                         /* Create the QP */
1196                         cqp_request = nes_get_cqp_request(nesdev);
1197                         if (cqp_request == NULL) {
1198                                 nes_debug(NES_DBG_QP, "Failed to get a cqp_request\n");
1199                                 nes_free_resource(nesadapter, nesadapter->allocated_qps, qp_num);
1200                                 nes_free_qp_mem(nesdev, nesqp,virt_wqs);
1201                                 kfree(nesqp->allocated_buffer);
1202                                 return ERR_PTR(-ENOMEM);
1203                         }
1204                         cqp_request->waiting = 1;
1205                         cqp_wqe = &cqp_request->cqp_wqe;
1206
1207                         if (!virt_wqs) {
1208                                 opcode = NES_CQP_CREATE_QP | NES_CQP_QP_TYPE_IWARP |
1209                                         NES_CQP_QP_IWARP_STATE_IDLE;
1210                         } else {
1211                                 opcode = NES_CQP_CREATE_QP | NES_CQP_QP_TYPE_IWARP | NES_CQP_QP_VIRT_WQS |
1212                                         NES_CQP_QP_IWARP_STATE_IDLE;
1213                         }
1214                         opcode |= NES_CQP_QP_CQS_VALID;
1215                         nes_fill_init_cqp_wqe(cqp_wqe, nesdev);
1216                         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_WQE_OPCODE_IDX, opcode);
1217                         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_WQE_ID_IDX, nesqp->hwqp.qp_id);
1218
1219                         u64temp = (u64)nesqp->nesqp_context_pbase;
1220                         set_wqe_64bit_value(cqp_wqe->wqe_words, NES_CQP_QP_WQE_CONTEXT_LOW_IDX, u64temp);
1221
1222                         atomic_set(&cqp_request->refcount, 2);
1223                         nes_post_cqp_request(nesdev, cqp_request);
1224
1225                         /* Wait for CQP */
1226                         nes_debug(NES_DBG_QP, "Waiting for create iWARP QP%u to complete.\n",
1227                                         nesqp->hwqp.qp_id);
1228                         ret = wait_event_timeout(cqp_request->waitq,
1229                                         (cqp_request->request_done != 0), NES_EVENT_TIMEOUT);
1230                         nes_debug(NES_DBG_QP, "Create iwarp QP%u completed, wait_event_timeout ret=%u,"
1231                                         " nesdev->cqp_head = %u, nesdev->cqp.sq_tail = %u,"
1232                                         " CQP Major:Minor codes = 0x%04X:0x%04X.\n",
1233                                         nesqp->hwqp.qp_id, ret, nesdev->cqp.sq_head, nesdev->cqp.sq_tail,
1234                                         cqp_request->major_code, cqp_request->minor_code);
1235                         if ((!ret) || (cqp_request->major_code)) {
1236                                 nes_put_cqp_request(nesdev, cqp_request);
1237                                 nes_free_resource(nesadapter, nesadapter->allocated_qps, qp_num);
1238                                 nes_free_qp_mem(nesdev, nesqp,virt_wqs);
1239                                 kfree(nesqp->allocated_buffer);
1240                                 if (!ret) {
1241                                         return ERR_PTR(-ETIME);
1242                                 } else {
1243                                         return ERR_PTR(-EIO);
1244                                 }
1245                         }
1246
1247                         nes_put_cqp_request(nesdev, cqp_request);
1248
1249                         if (udata) {
1250                                 uresp.mmap_sq_db_index = nesqp->mmap_sq_db_index;
1251                                 uresp.mmap_rq_db_index = 0;
1252                                 uresp.actual_sq_size = sq_size;
1253                                 uresp.actual_rq_size = rq_size;
1254                                 uresp.qp_id = nesqp->hwqp.qp_id;
1255                                 uresp.nes_drv_opt = nes_drv_opt;
1256                                 if (ib_copy_to_udata(udata, &uresp, sizeof uresp)) {
1257                                         nes_free_resource(nesadapter, nesadapter->allocated_qps, qp_num);
1258                                         nes_free_qp_mem(nesdev, nesqp,virt_wqs);
1259                                         kfree(nesqp->allocated_buffer);
1260                                         return ERR_PTR(-EFAULT);
1261                                 }
1262                         }
1263
1264                         nes_debug(NES_DBG_QP, "QP%u structure located @%p.Size = %u.\n",
1265                                         nesqp->hwqp.qp_id, nesqp, (u32)sizeof(*nesqp));
1266                         spin_lock_init(&nesqp->lock);
1267                         nes_add_ref(&nesqp->ibqp);
1268                         break;
1269                 default:
1270                         nes_debug(NES_DBG_QP, "Invalid QP type: %d\n", init_attr->qp_type);
1271                         return ERR_PTR(-EINVAL);
1272         }
1273         init_completion(&nesqp->sq_drained);
1274         init_completion(&nesqp->rq_drained);
1275
1276         nesqp->sig_all = (init_attr->sq_sig_type == IB_SIGNAL_ALL_WR);
1277         timer_setup(&nesqp->terminate_timer, nes_terminate_timeout, 0);
1278
1279         /* update the QP table */
1280         nesdev->nesadapter->qp_table[nesqp->hwqp.qp_id-NES_FIRST_QPN] = nesqp;
1281         nes_debug(NES_DBG_QP, "netdev refcnt=%u\n",
1282                         netdev_refcnt_read(nesvnic->netdev));
1283
1284         return &nesqp->ibqp;
1285 }
1286
1287 /**
1288  * nes_clean_cq
1289  */
1290 static void nes_clean_cq(struct nes_qp *nesqp, struct nes_cq *nescq)
1291 {
1292         u32 cq_head;
1293         u32 lo;
1294         u32 hi;
1295         u64 u64temp;
1296         unsigned long flags = 0;
1297
1298         spin_lock_irqsave(&nescq->lock, flags);
1299
1300         cq_head = nescq->hw_cq.cq_head;
1301         while (le32_to_cpu(nescq->hw_cq.cq_vbase[cq_head].cqe_words[NES_CQE_OPCODE_IDX]) & NES_CQE_VALID) {
1302                 rmb();
1303                 lo = le32_to_cpu(nescq->hw_cq.cq_vbase[cq_head].cqe_words[NES_CQE_COMP_COMP_CTX_LOW_IDX]);
1304                 hi = le32_to_cpu(nescq->hw_cq.cq_vbase[cq_head].cqe_words[NES_CQE_COMP_COMP_CTX_HIGH_IDX]);
1305                 u64temp = (((u64)hi) << 32) | ((u64)lo);
1306                 u64temp &= ~(NES_SW_CONTEXT_ALIGN-1);
1307                 if (u64temp == (u64)(unsigned long)nesqp) {
1308                         /* Zero the context value so cqe will be ignored */
1309                         nescq->hw_cq.cq_vbase[cq_head].cqe_words[NES_CQE_COMP_COMP_CTX_LOW_IDX] = 0;
1310                         nescq->hw_cq.cq_vbase[cq_head].cqe_words[NES_CQE_COMP_COMP_CTX_HIGH_IDX] = 0;
1311                 }
1312
1313                 if (++cq_head >= nescq->hw_cq.cq_size)
1314                         cq_head = 0;
1315         }
1316
1317         spin_unlock_irqrestore(&nescq->lock, flags);
1318 }
1319
1320
1321 /**
1322  * nes_destroy_qp
1323  */
1324 static int nes_destroy_qp(struct ib_qp *ibqp)
1325 {
1326         struct nes_qp *nesqp = to_nesqp(ibqp);
1327         struct nes_ucontext *nes_ucontext;
1328         struct ib_qp_attr attr;
1329         struct iw_cm_id *cm_id;
1330         struct iw_cm_event cm_event;
1331         int ret = 0;
1332
1333         atomic_inc(&sw_qps_destroyed);
1334         nesqp->destroyed = 1;
1335
1336         /* Blow away the connection if it exists. */
1337         if (nesqp->ibqp_state >= IB_QPS_INIT && nesqp->ibqp_state <= IB_QPS_RTS) {
1338                 /* if (nesqp->ibqp_state == IB_QPS_RTS) { */
1339                 attr.qp_state = IB_QPS_ERR;
1340                 nes_modify_qp(&nesqp->ibqp, &attr, IB_QP_STATE, NULL);
1341         }
1342
1343         if (((nesqp->ibqp_state == IB_QPS_INIT) ||
1344                         (nesqp->ibqp_state == IB_QPS_RTR)) && (nesqp->cm_id)) {
1345                 cm_id = nesqp->cm_id;
1346                 cm_event.event = IW_CM_EVENT_CONNECT_REPLY;
1347                 cm_event.status = -ETIMEDOUT;
1348                 cm_event.local_addr = cm_id->local_addr;
1349                 cm_event.remote_addr = cm_id->remote_addr;
1350                 cm_event.private_data = NULL;
1351                 cm_event.private_data_len = 0;
1352
1353                 nes_debug(NES_DBG_QP, "Generating a CM Timeout Event for "
1354                                 "QP%u. cm_id = %p, refcount = %u. \n",
1355                                 nesqp->hwqp.qp_id, cm_id, atomic_read(&nesqp->refcount));
1356
1357                 cm_id->rem_ref(cm_id);
1358                 ret = cm_id->event_handler(cm_id, &cm_event);
1359                 if (ret)
1360                         nes_debug(NES_DBG_QP, "OFA CM event_handler returned, ret=%d\n", ret);
1361         }
1362
1363         if (nesqp->user_mode) {
1364                 if ((ibqp->uobject)&&(ibqp->uobject->context)) {
1365                         nes_ucontext = to_nesucontext(ibqp->uobject->context);
1366                         clear_bit(nesqp->mmap_sq_db_index, nes_ucontext->allocated_wqs);
1367                         nes_ucontext->mmap_nesqp[nesqp->mmap_sq_db_index] = NULL;
1368                         if (nes_ucontext->first_free_wq > nesqp->mmap_sq_db_index) {
1369                                 nes_ucontext->first_free_wq = nesqp->mmap_sq_db_index;
1370                         }
1371                 }
1372                 if (nesqp->pbl_pbase && nesqp->sq_kmapped) {
1373                         nesqp->sq_kmapped = 0;
1374                         kunmap(nesqp->page);
1375                 }
1376         } else {
1377                 /* Clean any pending completions from the cq(s) */
1378                 if (nesqp->nesscq)
1379                         nes_clean_cq(nesqp, nesqp->nesscq);
1380
1381                 if ((nesqp->nesrcq) && (nesqp->nesrcq != nesqp->nesscq))
1382                         nes_clean_cq(nesqp, nesqp->nesrcq);
1383         }
1384         nes_rem_ref(&nesqp->ibqp);
1385         return 0;
1386 }
1387
1388
1389 /**
1390  * nes_create_cq
1391  */
1392 static struct ib_cq *nes_create_cq(struct ib_device *ibdev,
1393                                    const struct ib_cq_init_attr *attr,
1394                                    struct ib_ucontext *context,
1395                                    struct ib_udata *udata)
1396 {
1397         int entries = attr->cqe;
1398         u64 u64temp;
1399         struct nes_vnic *nesvnic = to_nesvnic(ibdev);
1400         struct nes_device *nesdev = nesvnic->nesdev;
1401         struct nes_adapter *nesadapter = nesdev->nesadapter;
1402         struct nes_cq *nescq;
1403         struct nes_ucontext *nes_ucontext = NULL;
1404         struct nes_cqp_request *cqp_request;
1405         void *mem = NULL;
1406         struct nes_hw_cqp_wqe *cqp_wqe;
1407         struct nes_pbl *nespbl = NULL;
1408         struct nes_create_cq_req req;
1409         struct nes_create_cq_resp resp;
1410         u32 cq_num = 0;
1411         u32 opcode = 0;
1412         u32 pbl_entries = 1;
1413         int err;
1414         unsigned long flags;
1415         int ret;
1416
1417         if (attr->flags)
1418                 return ERR_PTR(-EINVAL);
1419
1420         if (entries > nesadapter->max_cqe)
1421                 return ERR_PTR(-EINVAL);
1422
1423         err = nes_alloc_resource(nesadapter, nesadapter->allocated_cqs,
1424                         nesadapter->max_cq, &cq_num, &nesadapter->next_cq, NES_RESOURCE_CQ);
1425         if (err) {
1426                 return ERR_PTR(err);
1427         }
1428
1429         nescq = kzalloc(sizeof(struct nes_cq), GFP_KERNEL);
1430         if (!nescq) {
1431                 nes_free_resource(nesadapter, nesadapter->allocated_cqs, cq_num);
1432                 return ERR_PTR(-ENOMEM);
1433         }
1434
1435         nescq->hw_cq.cq_size = max(entries + 1, 5);
1436         nescq->hw_cq.cq_number = cq_num;
1437         nescq->ibcq.cqe = nescq->hw_cq.cq_size - 1;
1438
1439
1440         if (context) {
1441                 nes_ucontext = to_nesucontext(context);
1442                 if (ib_copy_from_udata(&req, udata, sizeof (struct nes_create_cq_req))) {
1443                         nes_free_resource(nesadapter, nesadapter->allocated_cqs, cq_num);
1444                         kfree(nescq);
1445                         return ERR_PTR(-EFAULT);
1446                 }
1447                 nesvnic->mcrq_ucontext = nes_ucontext;
1448                 nes_ucontext->mcrqf = req.mcrqf;
1449                 if (nes_ucontext->mcrqf) {
1450                         if (nes_ucontext->mcrqf & 0x80000000)
1451                                 nescq->hw_cq.cq_number = nesvnic->nic.qp_id + 28 + 2 * ((nes_ucontext->mcrqf & 0xf) - 1);
1452                         else if (nes_ucontext->mcrqf & 0x40000000)
1453                                 nescq->hw_cq.cq_number = nes_ucontext->mcrqf & 0xffff;
1454                         else
1455                                 nescq->hw_cq.cq_number = nesvnic->mcrq_qp_id + nes_ucontext->mcrqf-1;
1456                         nescq->mcrqf = nes_ucontext->mcrqf;
1457                         nes_free_resource(nesadapter, nesadapter->allocated_cqs, cq_num);
1458                 }
1459                 nes_debug(NES_DBG_CQ, "CQ Virtual Address = %08lX, size = %u.\n",
1460                                 (unsigned long)req.user_cq_buffer, entries);
1461                 err = 1;
1462                 list_for_each_entry(nespbl, &nes_ucontext->cq_reg_mem_list, list) {
1463                         if (nespbl->user_base == (unsigned long )req.user_cq_buffer) {
1464                                 list_del(&nespbl->list);
1465                                 err = 0;
1466                                 nes_debug(NES_DBG_CQ, "Found PBL for virtual CQ. nespbl=%p.\n",
1467                                                 nespbl);
1468                                 break;
1469                         }
1470                 }
1471                 if (err) {
1472                         nes_free_resource(nesadapter, nesadapter->allocated_cqs, cq_num);
1473                         kfree(nescq);
1474                         return ERR_PTR(-EFAULT);
1475                 }
1476
1477                 pbl_entries = nespbl->pbl_size >> 3;
1478                 nescq->cq_mem_size = 0;
1479         } else {
1480                 nescq->cq_mem_size = nescq->hw_cq.cq_size * sizeof(struct nes_hw_cqe);
1481                 nes_debug(NES_DBG_CQ, "Attempting to allocate pci memory (%u entries, %u bytes) for CQ%u.\n",
1482                                 entries, nescq->cq_mem_size, nescq->hw_cq.cq_number);
1483
1484                 /* allocate the physical buffer space */
1485                 mem = pci_zalloc_consistent(nesdev->pcidev, nescq->cq_mem_size,
1486                                             &nescq->hw_cq.cq_pbase);
1487                 if (!mem) {
1488                         printk(KERN_ERR PFX "Unable to allocate pci memory for cq\n");
1489                         nes_free_resource(nesadapter, nesadapter->allocated_cqs, cq_num);
1490                         kfree(nescq);
1491                         return ERR_PTR(-ENOMEM);
1492                 }
1493
1494                 nescq->hw_cq.cq_vbase = mem;
1495                 nescq->hw_cq.cq_head = 0;
1496                 nes_debug(NES_DBG_CQ, "CQ%u virtual address @ %p, phys = 0x%08X\n",
1497                                 nescq->hw_cq.cq_number, nescq->hw_cq.cq_vbase,
1498                                 (u32)nescq->hw_cq.cq_pbase);
1499         }
1500
1501         nescq->hw_cq.ce_handler = nes_iwarp_ce_handler;
1502         spin_lock_init(&nescq->lock);
1503
1504         /* send CreateCQ request to CQP */
1505         cqp_request = nes_get_cqp_request(nesdev);
1506         if (cqp_request == NULL) {
1507                 nes_debug(NES_DBG_CQ, "Failed to get a cqp_request.\n");
1508                 if (!context)
1509                         pci_free_consistent(nesdev->pcidev, nescq->cq_mem_size, mem,
1510                                         nescq->hw_cq.cq_pbase);
1511                 else {
1512                         pci_free_consistent(nesdev->pcidev, nespbl->pbl_size,
1513                                             nespbl->pbl_vbase, nespbl->pbl_pbase);
1514                         kfree(nespbl);
1515                 }
1516
1517                 nes_free_resource(nesadapter, nesadapter->allocated_cqs, cq_num);
1518                 kfree(nescq);
1519                 return ERR_PTR(-ENOMEM);
1520         }
1521         cqp_request->waiting = 1;
1522         cqp_wqe = &cqp_request->cqp_wqe;
1523
1524         opcode = NES_CQP_CREATE_CQ | NES_CQP_CQ_CEQ_VALID |
1525                         NES_CQP_CQ_CHK_OVERFLOW |
1526                         NES_CQP_CQ_CEQE_MASK | ((u32)nescq->hw_cq.cq_size << 16);
1527
1528         spin_lock_irqsave(&nesadapter->pbl_lock, flags);
1529
1530         if (pbl_entries != 1) {
1531                 if (pbl_entries > 32) {
1532                         /* use 4k pbl */
1533                         nes_debug(NES_DBG_CQ, "pbl_entries=%u, use a 4k PBL\n", pbl_entries);
1534                         if (nesadapter->free_4kpbl == 0) {
1535                                 spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
1536                                 nes_free_cqp_request(nesdev, cqp_request);
1537                                 if (!context)
1538                                         pci_free_consistent(nesdev->pcidev, nescq->cq_mem_size, mem,
1539                                                         nescq->hw_cq.cq_pbase);
1540                                 else {
1541                                         pci_free_consistent(nesdev->pcidev, nespbl->pbl_size,
1542                                                             nespbl->pbl_vbase, nespbl->pbl_pbase);
1543                                         kfree(nespbl);
1544                                 }
1545                                 nes_free_resource(nesadapter, nesadapter->allocated_cqs, cq_num);
1546                                 kfree(nescq);
1547                                 return ERR_PTR(-ENOMEM);
1548                         } else {
1549                                 opcode |= (NES_CQP_CQ_VIRT | NES_CQP_CQ_4KB_CHUNK);
1550                                 nescq->virtual_cq = 2;
1551                                 nesadapter->free_4kpbl--;
1552                         }
1553                 } else {
1554                         /* use 256 byte pbl */
1555                         nes_debug(NES_DBG_CQ, "pbl_entries=%u, use a 256 byte PBL\n", pbl_entries);
1556                         if (nesadapter->free_256pbl == 0) {
1557                                 spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
1558                                 nes_free_cqp_request(nesdev, cqp_request);
1559                                 if (!context)
1560                                         pci_free_consistent(nesdev->pcidev, nescq->cq_mem_size, mem,
1561                                                         nescq->hw_cq.cq_pbase);
1562                                 else {
1563                                         pci_free_consistent(nesdev->pcidev, nespbl->pbl_size,
1564                                                             nespbl->pbl_vbase, nespbl->pbl_pbase);
1565                                         kfree(nespbl);
1566                                 }
1567                                 nes_free_resource(nesadapter, nesadapter->allocated_cqs, cq_num);
1568                                 kfree(nescq);
1569                                 return ERR_PTR(-ENOMEM);
1570                         } else {
1571                                 opcode |= NES_CQP_CQ_VIRT;
1572                                 nescq->virtual_cq = 1;
1573                                 nesadapter->free_256pbl--;
1574                         }
1575                 }
1576         }
1577
1578         spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
1579
1580         nes_fill_init_cqp_wqe(cqp_wqe, nesdev);
1581         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_WQE_OPCODE_IDX, opcode);
1582         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_WQE_ID_IDX,
1583                         (nescq->hw_cq.cq_number | ((u32)nesdev->ceq_index << 16)));
1584
1585         if (context) {
1586                 if (pbl_entries != 1)
1587                         u64temp = (u64)nespbl->pbl_pbase;
1588                 else
1589                         u64temp = le64_to_cpu(nespbl->pbl_vbase[0]);
1590                 set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_CQ_WQE_DOORBELL_INDEX_HIGH_IDX,
1591                                 nes_ucontext->mmap_db_index[0]);
1592         } else {
1593                 u64temp = (u64)nescq->hw_cq.cq_pbase;
1594                 cqp_wqe->wqe_words[NES_CQP_CQ_WQE_DOORBELL_INDEX_HIGH_IDX] = 0;
1595         }
1596         set_wqe_64bit_value(cqp_wqe->wqe_words, NES_CQP_CQ_WQE_PBL_LOW_IDX, u64temp);
1597         cqp_wqe->wqe_words[NES_CQP_CQ_WQE_CQ_CONTEXT_HIGH_IDX] = 0;
1598         u64temp = (u64)(unsigned long)&nescq->hw_cq;
1599         cqp_wqe->wqe_words[NES_CQP_CQ_WQE_CQ_CONTEXT_LOW_IDX] =
1600                         cpu_to_le32((u32)(u64temp >> 1));
1601         cqp_wqe->wqe_words[NES_CQP_CQ_WQE_CQ_CONTEXT_HIGH_IDX] =
1602                         cpu_to_le32(((u32)((u64temp) >> 33)) & 0x7FFFFFFF);
1603
1604         atomic_set(&cqp_request->refcount, 2);
1605         nes_post_cqp_request(nesdev, cqp_request);
1606
1607         /* Wait for CQP */
1608         nes_debug(NES_DBG_CQ, "Waiting for create iWARP CQ%u to complete.\n",
1609                         nescq->hw_cq.cq_number);
1610         ret = wait_event_timeout(cqp_request->waitq, (0 != cqp_request->request_done),
1611                         NES_EVENT_TIMEOUT * 2);
1612         nes_debug(NES_DBG_CQ, "Create iWARP CQ%u completed, wait_event_timeout ret = %d.\n",
1613                         nescq->hw_cq.cq_number, ret);
1614         if ((!ret) || (cqp_request->major_code)) {
1615                 nes_put_cqp_request(nesdev, cqp_request);
1616                 if (!context)
1617                         pci_free_consistent(nesdev->pcidev, nescq->cq_mem_size, mem,
1618                                         nescq->hw_cq.cq_pbase);
1619                 else {
1620                         pci_free_consistent(nesdev->pcidev, nespbl->pbl_size,
1621                                             nespbl->pbl_vbase, nespbl->pbl_pbase);
1622                         kfree(nespbl);
1623                 }
1624                 nes_free_resource(nesadapter, nesadapter->allocated_cqs, cq_num);
1625                 kfree(nescq);
1626                 return ERR_PTR(-EIO);
1627         }
1628         nes_put_cqp_request(nesdev, cqp_request);
1629
1630         if (context) {
1631                 /* free the nespbl */
1632                 pci_free_consistent(nesdev->pcidev, nespbl->pbl_size, nespbl->pbl_vbase,
1633                                 nespbl->pbl_pbase);
1634                 kfree(nespbl);
1635                 resp.cq_id = nescq->hw_cq.cq_number;
1636                 resp.cq_size = nescq->hw_cq.cq_size;
1637                 resp.mmap_db_index = 0;
1638                 if (ib_copy_to_udata(udata, &resp, sizeof resp - sizeof resp.reserved)) {
1639                         nes_free_resource(nesadapter, nesadapter->allocated_cqs, cq_num);
1640                         kfree(nescq);
1641                         return ERR_PTR(-EFAULT);
1642                 }
1643         }
1644
1645         return &nescq->ibcq;
1646 }
1647
1648
1649 /**
1650  * nes_destroy_cq
1651  */
1652 static int nes_destroy_cq(struct ib_cq *ib_cq)
1653 {
1654         struct nes_cq *nescq;
1655         struct nes_device *nesdev;
1656         struct nes_vnic *nesvnic;
1657         struct nes_adapter *nesadapter;
1658         struct nes_hw_cqp_wqe *cqp_wqe;
1659         struct nes_cqp_request *cqp_request;
1660         unsigned long flags;
1661         u32 opcode = 0;
1662         int ret;
1663
1664         if (ib_cq == NULL)
1665                 return 0;
1666
1667         nescq = to_nescq(ib_cq);
1668         nesvnic = to_nesvnic(ib_cq->device);
1669         nesdev = nesvnic->nesdev;
1670         nesadapter = nesdev->nesadapter;
1671
1672         nes_debug(NES_DBG_CQ, "Destroy CQ%u\n", nescq->hw_cq.cq_number);
1673
1674         /* Send DestroyCQ request to CQP */
1675         cqp_request = nes_get_cqp_request(nesdev);
1676         if (cqp_request == NULL) {
1677                 nes_debug(NES_DBG_CQ, "Failed to get a cqp_request.\n");
1678                 return -ENOMEM;
1679         }
1680         cqp_request->waiting = 1;
1681         cqp_wqe = &cqp_request->cqp_wqe;
1682         opcode = NES_CQP_DESTROY_CQ | (nescq->hw_cq.cq_size << 16);
1683         spin_lock_irqsave(&nesadapter->pbl_lock, flags);
1684         if (nescq->virtual_cq == 1) {
1685                 nesadapter->free_256pbl++;
1686                 if (nesadapter->free_256pbl > nesadapter->max_256pbl) {
1687                         printk(KERN_ERR PFX "%s: free 256B PBLs(%u) has exceeded the max(%u)\n",
1688                                         __func__, nesadapter->free_256pbl, nesadapter->max_256pbl);
1689                 }
1690         } else if (nescq->virtual_cq == 2) {
1691                 nesadapter->free_4kpbl++;
1692                 if (nesadapter->free_4kpbl > nesadapter->max_4kpbl) {
1693                         printk(KERN_ERR PFX "%s: free 4K PBLs(%u) has exceeded the max(%u)\n",
1694                                         __func__, nesadapter->free_4kpbl, nesadapter->max_4kpbl);
1695                 }
1696                 opcode |= NES_CQP_CQ_4KB_CHUNK;
1697         }
1698
1699         spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
1700
1701         nes_fill_init_cqp_wqe(cqp_wqe, nesdev);
1702         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_WQE_OPCODE_IDX, opcode);
1703         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_WQE_ID_IDX,
1704                 (nescq->hw_cq.cq_number | ((u32)PCI_FUNC(nesdev->pcidev->devfn) << 16)));
1705         if (!nescq->mcrqf)
1706                 nes_free_resource(nesadapter, nesadapter->allocated_cqs, nescq->hw_cq.cq_number);
1707
1708         atomic_set(&cqp_request->refcount, 2);
1709         nes_post_cqp_request(nesdev, cqp_request);
1710
1711         /* Wait for CQP */
1712         nes_debug(NES_DBG_CQ, "Waiting for destroy iWARP CQ%u to complete.\n",
1713                         nescq->hw_cq.cq_number);
1714         ret = wait_event_timeout(cqp_request->waitq, (0 != cqp_request->request_done),
1715                         NES_EVENT_TIMEOUT);
1716         nes_debug(NES_DBG_CQ, "Destroy iWARP CQ%u completed, wait_event_timeout ret = %u,"
1717                         " CQP Major:Minor codes = 0x%04X:0x%04X.\n",
1718                         nescq->hw_cq.cq_number, ret, cqp_request->major_code,
1719                         cqp_request->minor_code);
1720         if (!ret) {
1721                 nes_debug(NES_DBG_CQ, "iWARP CQ%u destroy timeout expired\n",
1722                                         nescq->hw_cq.cq_number);
1723                 ret = -ETIME;
1724         } else if (cqp_request->major_code) {
1725                 nes_debug(NES_DBG_CQ, "iWARP CQ%u destroy failed\n",
1726                                         nescq->hw_cq.cq_number);
1727                 ret = -EIO;
1728         } else {
1729                 ret = 0;
1730         }
1731         nes_put_cqp_request(nesdev, cqp_request);
1732
1733         if (nescq->cq_mem_size)
1734                 pci_free_consistent(nesdev->pcidev, nescq->cq_mem_size,
1735                                     nescq->hw_cq.cq_vbase, nescq->hw_cq.cq_pbase);
1736         kfree(nescq);
1737
1738         return ret;
1739 }
1740
1741 /**
1742  * root_256
1743  */
1744 static u32 root_256(struct nes_device *nesdev,
1745                     struct nes_root_vpbl *root_vpbl,
1746                     struct nes_root_vpbl *new_root,
1747                     u16 pbl_count_4k)
1748 {
1749         u64 leaf_pbl;
1750         int i, j, k;
1751
1752         if (pbl_count_4k == 1) {
1753                 new_root->pbl_vbase = pci_alloc_consistent(nesdev->pcidev,
1754                                                 512, &new_root->pbl_pbase);
1755
1756                 if (new_root->pbl_vbase == NULL)
1757                         return 0;
1758
1759                 leaf_pbl = (u64)root_vpbl->pbl_pbase;
1760                 for (i = 0; i < 16; i++) {
1761                         new_root->pbl_vbase[i].pa_low =
1762                                 cpu_to_le32((u32)leaf_pbl);
1763                         new_root->pbl_vbase[i].pa_high =
1764                                 cpu_to_le32((u32)((((u64)leaf_pbl) >> 32)));
1765                         leaf_pbl += 256;
1766                 }
1767         } else {
1768                 for (i = 3; i >= 0; i--) {
1769                         j = i * 16;
1770                         root_vpbl->pbl_vbase[j] = root_vpbl->pbl_vbase[i];
1771                         leaf_pbl = le32_to_cpu(root_vpbl->pbl_vbase[j].pa_low) +
1772                             (((u64)le32_to_cpu(root_vpbl->pbl_vbase[j].pa_high))
1773                                 << 32);
1774                         for (k = 1; k < 16; k++) {
1775                                 leaf_pbl += 256;
1776                                 root_vpbl->pbl_vbase[j + k].pa_low =
1777                                                 cpu_to_le32((u32)leaf_pbl);
1778                                 root_vpbl->pbl_vbase[j + k].pa_high =
1779                                     cpu_to_le32((u32)((((u64)leaf_pbl) >> 32)));
1780                         }
1781                 }
1782         }
1783
1784         return 1;
1785 }
1786
1787
1788 /**
1789  * nes_reg_mr
1790  */
1791 static int nes_reg_mr(struct nes_device *nesdev, struct nes_pd *nespd,
1792                 u32 stag, u64 region_length, struct nes_root_vpbl *root_vpbl,
1793                 dma_addr_t single_buffer, u16 pbl_count_4k,
1794                 u16 residual_page_count_4k, int acc, u64 *iova_start,
1795                 u16 *actual_pbl_cnt, u8 *used_4k_pbls)
1796 {
1797         struct nes_hw_cqp_wqe *cqp_wqe;
1798         struct nes_cqp_request *cqp_request;
1799         unsigned long flags;
1800         int ret;
1801         struct nes_adapter *nesadapter = nesdev->nesadapter;
1802         uint pg_cnt = 0;
1803         u16 pbl_count_256 = 0;
1804         u16 pbl_count = 0;
1805         u8  use_256_pbls = 0;
1806         u8  use_4k_pbls = 0;
1807         u16 use_two_level = (pbl_count_4k > 1) ? 1 : 0;
1808         struct nes_root_vpbl new_root = { 0, NULL, NULL };
1809         u32 opcode = 0;
1810         u16 major_code;
1811
1812         /* Register the region with the adapter */
1813         cqp_request = nes_get_cqp_request(nesdev);
1814         if (cqp_request == NULL) {
1815                 nes_debug(NES_DBG_MR, "Failed to get a cqp_request.\n");
1816                 return -ENOMEM;
1817         }
1818         cqp_request->waiting = 1;
1819         cqp_wqe = &cqp_request->cqp_wqe;
1820
1821         if (pbl_count_4k) {
1822                 spin_lock_irqsave(&nesadapter->pbl_lock, flags);
1823
1824                 pg_cnt = ((pbl_count_4k - 1) * 512) + residual_page_count_4k;
1825                 pbl_count_256 = (pg_cnt + 31) / 32;
1826                 if (pg_cnt <= 32) {
1827                         if (pbl_count_256 <= nesadapter->free_256pbl)
1828                                 use_256_pbls = 1;
1829                         else if (pbl_count_4k <= nesadapter->free_4kpbl)
1830                                 use_4k_pbls = 1;
1831                 } else if (pg_cnt <= 2048) {
1832                         if (((pbl_count_4k + use_two_level) <= nesadapter->free_4kpbl) &&
1833                             (nesadapter->free_4kpbl > (nesadapter->max_4kpbl >> 1))) {
1834                                 use_4k_pbls = 1;
1835                         } else if ((pbl_count_256 + 1) <= nesadapter->free_256pbl) {
1836                                 use_256_pbls = 1;
1837                                 use_two_level = 1;
1838                         } else if ((pbl_count_4k + use_two_level) <= nesadapter->free_4kpbl) {
1839                                 use_4k_pbls = 1;
1840                         }
1841                 } else {
1842                         if ((pbl_count_4k + 1) <= nesadapter->free_4kpbl)
1843                                 use_4k_pbls = 1;
1844                 }
1845
1846                 if (use_256_pbls) {
1847                         pbl_count = pbl_count_256;
1848                         nesadapter->free_256pbl -= pbl_count + use_two_level;
1849                 } else if (use_4k_pbls) {
1850                         pbl_count =  pbl_count_4k;
1851                         nesadapter->free_4kpbl -= pbl_count + use_two_level;
1852                 } else {
1853                         spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
1854                         nes_debug(NES_DBG_MR, "Out of Pbls\n");
1855                         nes_free_cqp_request(nesdev, cqp_request);
1856                         return -ENOMEM;
1857                 }
1858
1859                 spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
1860         }
1861
1862         if (use_256_pbls && use_two_level) {
1863                 if (root_256(nesdev, root_vpbl, &new_root, pbl_count_4k) == 1) {
1864                         if (new_root.pbl_pbase != 0)
1865                                 root_vpbl = &new_root;
1866                 } else {
1867                         spin_lock_irqsave(&nesadapter->pbl_lock, flags);
1868                         nesadapter->free_256pbl += pbl_count_256 + use_two_level;
1869                         use_256_pbls = 0;
1870
1871                         if (pbl_count_4k == 1)
1872                                 use_two_level = 0;
1873                         pbl_count = pbl_count_4k;
1874
1875                         if ((pbl_count_4k + use_two_level) <= nesadapter->free_4kpbl) {
1876                                 nesadapter->free_4kpbl -= pbl_count + use_two_level;
1877                                 use_4k_pbls = 1;
1878                         }
1879                         spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
1880
1881                         if (use_4k_pbls == 0)
1882                                 return -ENOMEM;
1883                 }
1884         }
1885
1886         opcode = NES_CQP_REGISTER_STAG | NES_CQP_STAG_RIGHTS_LOCAL_READ |
1887                                         NES_CQP_STAG_VA_TO | NES_CQP_STAG_MR;
1888         if (acc & IB_ACCESS_LOCAL_WRITE)
1889                 opcode |= NES_CQP_STAG_RIGHTS_LOCAL_WRITE;
1890         if (acc & IB_ACCESS_REMOTE_WRITE)
1891                 opcode |= NES_CQP_STAG_RIGHTS_REMOTE_WRITE | NES_CQP_STAG_REM_ACC_EN;
1892         if (acc & IB_ACCESS_REMOTE_READ)
1893                 opcode |= NES_CQP_STAG_RIGHTS_REMOTE_READ | NES_CQP_STAG_REM_ACC_EN;
1894         if (acc & IB_ACCESS_MW_BIND)
1895                 opcode |= NES_CQP_STAG_RIGHTS_WINDOW_BIND | NES_CQP_STAG_REM_ACC_EN;
1896
1897         nes_fill_init_cqp_wqe(cqp_wqe, nesdev);
1898         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_WQE_OPCODE_IDX, opcode);
1899         set_wqe_64bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_VA_LOW_IDX, *iova_start);
1900         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_LEN_LOW_IDX, region_length);
1901
1902         cqp_wqe->wqe_words[NES_CQP_STAG_WQE_LEN_HIGH_PD_IDX] =
1903                         cpu_to_le32((u32)(region_length >> 8) & 0xff000000);
1904         cqp_wqe->wqe_words[NES_CQP_STAG_WQE_LEN_HIGH_PD_IDX] |=
1905                         cpu_to_le32(nespd->pd_id & 0x00007fff);
1906         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_STAG_IDX, stag);
1907
1908         if (pbl_count == 0) {
1909                 set_wqe_64bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_PA_LOW_IDX, single_buffer);
1910         } else {
1911                 set_wqe_64bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_PA_LOW_IDX, root_vpbl->pbl_pbase);
1912                 set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_PBL_BLK_COUNT_IDX, pbl_count);
1913                 set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_PBL_LEN_IDX, (pg_cnt * 8));
1914
1915                 if (use_4k_pbls)
1916                         cqp_wqe->wqe_words[NES_CQP_WQE_OPCODE_IDX] |= cpu_to_le32(NES_CQP_STAG_PBL_BLK_SIZE);
1917         }
1918         barrier();
1919
1920         atomic_set(&cqp_request->refcount, 2);
1921         nes_post_cqp_request(nesdev, cqp_request);
1922
1923         /* Wait for CQP */
1924         ret = wait_event_timeout(cqp_request->waitq, (0 != cqp_request->request_done),
1925                         NES_EVENT_TIMEOUT);
1926         nes_debug(NES_DBG_MR, "Register STag 0x%08X completed, wait_event_timeout ret = %u,"
1927                         " CQP Major:Minor codes = 0x%04X:0x%04X.\n",
1928                         stag, ret, cqp_request->major_code, cqp_request->minor_code);
1929         major_code = cqp_request->major_code;
1930         nes_put_cqp_request(nesdev, cqp_request);
1931
1932         if ((!ret || major_code) && pbl_count != 0) {
1933                 spin_lock_irqsave(&nesadapter->pbl_lock, flags);
1934                 if (use_256_pbls)
1935                         nesadapter->free_256pbl += pbl_count + use_two_level;
1936                 else if (use_4k_pbls)
1937                         nesadapter->free_4kpbl += pbl_count + use_two_level;
1938                 spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
1939         }
1940         if (new_root.pbl_pbase)
1941                 pci_free_consistent(nesdev->pcidev, 512, new_root.pbl_vbase,
1942                                     new_root.pbl_pbase);
1943
1944         if (!ret)
1945                 return -ETIME;
1946         else if (major_code)
1947                 return -EIO;
1948
1949         *actual_pbl_cnt = pbl_count + use_two_level;
1950         *used_4k_pbls = use_4k_pbls;
1951         return 0;
1952 }
1953
1954
1955 /**
1956  * nes_reg_phys_mr
1957  */
1958 struct ib_mr *nes_reg_phys_mr(struct ib_pd *ib_pd, u64 addr, u64 size,
1959                 int acc, u64 *iova_start)
1960 {
1961         u64 region_length;
1962         struct nes_pd *nespd = to_nespd(ib_pd);
1963         struct nes_vnic *nesvnic = to_nesvnic(ib_pd->device);
1964         struct nes_device *nesdev = nesvnic->nesdev;
1965         struct nes_adapter *nesadapter = nesdev->nesadapter;
1966         struct nes_mr *nesmr;
1967         struct ib_mr *ibmr;
1968         struct nes_vpbl vpbl;
1969         struct nes_root_vpbl root_vpbl;
1970         u32 stag;
1971         unsigned long mask;
1972         u32 stag_index = 0;
1973         u32 next_stag_index = 0;
1974         u32 driver_key = 0;
1975         int err = 0;
1976         int ret = 0;
1977         u16 pbl_count = 0;
1978         u8 single_page = 1;
1979         u8 stag_key = 0;
1980
1981         region_length = 0;
1982         vpbl.pbl_vbase = NULL;
1983         root_vpbl.pbl_vbase = NULL;
1984         root_vpbl.pbl_pbase = 0;
1985
1986         get_random_bytes(&next_stag_index, sizeof(next_stag_index));
1987         stag_key = (u8)next_stag_index;
1988
1989         driver_key = 0;
1990
1991         next_stag_index >>= 8;
1992         next_stag_index %= nesadapter->max_mr;
1993
1994         if ((addr ^ *iova_start) & ~PAGE_MASK)
1995                 return ERR_PTR(-EINVAL);
1996
1997         err = nes_alloc_resource(nesadapter, nesadapter->allocated_mrs, nesadapter->max_mr,
1998                         &stag_index, &next_stag_index, NES_RESOURCE_PHYS_MR);
1999         if (err) {
2000                 return ERR_PTR(err);
2001         }
2002
2003         nesmr = kzalloc(sizeof(*nesmr), GFP_KERNEL);
2004         if (!nesmr) {
2005                 nes_free_resource(nesadapter, nesadapter->allocated_mrs, stag_index);
2006                 return ERR_PTR(-ENOMEM);
2007         }
2008
2009         /* Allocate a 4K buffer for the PBL */
2010         vpbl.pbl_vbase = pci_alloc_consistent(nesdev->pcidev, 4096,
2011                         &vpbl.pbl_pbase);
2012         nes_debug(NES_DBG_MR, "Allocating leaf PBL, va = %p, pa = 0x%016lX\n",
2013                         vpbl.pbl_vbase, (unsigned long)vpbl.pbl_pbase);
2014         if (!vpbl.pbl_vbase) {
2015                 nes_free_resource(nesadapter, nesadapter->allocated_mrs, stag_index);
2016                 ibmr = ERR_PTR(-ENOMEM);
2017                 kfree(nesmr);
2018                 goto reg_phys_err;
2019         }
2020
2021
2022         mask = !size;
2023
2024         if (mask & ~PAGE_MASK) {
2025                 nes_free_resource(nesadapter, nesadapter->allocated_mrs, stag_index);
2026                 nes_debug(NES_DBG_MR, "Invalid buffer addr or size\n");
2027                 ibmr = ERR_PTR(-EINVAL);
2028                 kfree(nesmr);
2029                 goto reg_phys_err;
2030         }
2031
2032         region_length += size;
2033         vpbl.pbl_vbase[0].pa_low = cpu_to_le32((u32)addr & PAGE_MASK);
2034         vpbl.pbl_vbase[0].pa_high = cpu_to_le32((u32)((((u64)addr) >> 32)));
2035
2036         stag = stag_index << 8;
2037         stag |= driver_key;
2038         stag += (u32)stag_key;
2039
2040         nes_debug(NES_DBG_MR, "Registering STag 0x%08X, VA = 0x%016lX,"
2041                         " length = 0x%016lX, index = 0x%08X\n",
2042                         stag, (unsigned long)*iova_start, (unsigned long)region_length, stag_index);
2043
2044         /* Make the leaf PBL the root if only one PBL */
2045         root_vpbl.pbl_pbase = vpbl.pbl_pbase;
2046
2047         if (single_page) {
2048                 pbl_count = 0;
2049         } else {
2050                 pbl_count = 1;
2051         }
2052         ret = nes_reg_mr(nesdev, nespd, stag, region_length, &root_vpbl,
2053                         addr, pbl_count, 1, acc, iova_start,
2054                         &nesmr->pbls_used, &nesmr->pbl_4k);
2055
2056         if (ret == 0) {
2057                 nesmr->ibmr.rkey = stag;
2058                 nesmr->ibmr.lkey = stag;
2059                 nesmr->mode = IWNES_MEMREG_TYPE_MEM;
2060                 ibmr = &nesmr->ibmr;
2061         } else {
2062                 kfree(nesmr);
2063                 ibmr = ERR_PTR(-ENOMEM);
2064         }
2065
2066 reg_phys_err:
2067         /* single PBL case */
2068         pci_free_consistent(nesdev->pcidev, 4096, vpbl.pbl_vbase, vpbl.pbl_pbase);
2069         return ibmr;
2070 }
2071
2072
2073 /**
2074  * nes_get_dma_mr
2075  */
2076 static struct ib_mr *nes_get_dma_mr(struct ib_pd *pd, int acc)
2077 {
2078         u64 kva = 0;
2079
2080         nes_debug(NES_DBG_MR, "\n");
2081
2082         return nes_reg_phys_mr(pd, 0, 0xffffffffffULL, acc, &kva);
2083 }
2084
2085 /**
2086  * nes_reg_user_mr
2087  */
2088 static struct ib_mr *nes_reg_user_mr(struct ib_pd *pd, u64 start, u64 length,
2089                 u64 virt, int acc, struct ib_udata *udata)
2090 {
2091         u64 iova_start;
2092         __le64 *pbl;
2093         u64 region_length;
2094         dma_addr_t last_dma_addr = 0;
2095         dma_addr_t first_dma_addr = 0;
2096         struct nes_pd *nespd = to_nespd(pd);
2097         struct nes_vnic *nesvnic = to_nesvnic(pd->device);
2098         struct nes_device *nesdev = nesvnic->nesdev;
2099         struct nes_adapter *nesadapter = nesdev->nesadapter;
2100         struct ib_mr *ibmr = ERR_PTR(-EINVAL);
2101         struct sg_dma_page_iter dma_iter;
2102         struct nes_ucontext *nes_ucontext = rdma_udata_to_drv_context(
2103                 udata, struct nes_ucontext, ibucontext);
2104         struct nes_pbl *nespbl;
2105         struct nes_mr *nesmr;
2106         struct ib_umem *region;
2107         struct nes_mem_reg_req req;
2108         struct nes_vpbl vpbl;
2109         struct nes_root_vpbl root_vpbl;
2110         int page_index;
2111         int page_count = 0;
2112         int err, pbl_depth = 0;
2113         int ret;
2114         u32 stag;
2115         u32 stag_index = 0;
2116         u32 next_stag_index;
2117         u32 driver_key;
2118         u32 root_pbl_index = 0;
2119         u32 cur_pbl_index = 0;
2120         u32 skip_pages;
2121         u16 pbl_count;
2122         u8 single_page = 1;
2123         u8 stag_key;
2124
2125         region = ib_umem_get(udata, start, length, acc, 0);
2126         if (IS_ERR(region)) {
2127                 return (struct ib_mr *)region;
2128         }
2129
2130         nes_debug(NES_DBG_MR, "User base = 0x%lX, Virt base = 0x%lX, length = %u,"
2131                         " offset = %u, page size = %lu.\n",
2132                         (unsigned long int)start, (unsigned long int)virt, (u32)length,
2133                         ib_umem_offset(region), BIT(region->page_shift));
2134
2135         skip_pages = ((u32)ib_umem_offset(region)) >> 12;
2136
2137         if (ib_copy_from_udata(&req, udata, sizeof(req))) {
2138                 ib_umem_release(region);
2139                 return ERR_PTR(-EFAULT);
2140         }
2141         nes_debug(NES_DBG_MR, "Memory Registration type = %08X.\n", req.reg_type);
2142
2143         switch (req.reg_type) {
2144                 case IWNES_MEMREG_TYPE_MEM:
2145                         pbl_depth = 0;
2146                         region_length = 0;
2147                         vpbl.pbl_vbase = NULL;
2148                         root_vpbl.pbl_vbase = NULL;
2149                         root_vpbl.pbl_pbase = 0;
2150
2151                         get_random_bytes(&next_stag_index, sizeof(next_stag_index));
2152                         stag_key = (u8)next_stag_index;
2153
2154                         driver_key = next_stag_index & 0x70000000;
2155
2156                         next_stag_index >>= 8;
2157                         next_stag_index %= nesadapter->max_mr;
2158
2159                         err = nes_alloc_resource(nesadapter, nesadapter->allocated_mrs,
2160                                         nesadapter->max_mr, &stag_index, &next_stag_index, NES_RESOURCE_USER_MR);
2161                         if (err) {
2162                                 ib_umem_release(region);
2163                                 return ERR_PTR(err);
2164                         }
2165
2166                         nesmr = kzalloc(sizeof(*nesmr), GFP_KERNEL);
2167                         if (!nesmr) {
2168                                 ib_umem_release(region);
2169                                 nes_free_resource(nesadapter, nesadapter->allocated_mrs, stag_index);
2170                                 return ERR_PTR(-ENOMEM);
2171                         }
2172                         nesmr->region = region;
2173
2174                         for_each_sg_dma_page (region->sg_head.sgl, &dma_iter, region->nmap, 0) {
2175
2176                                 region_length += PAGE_SIZE;
2177                                 region_length -= skip_pages << 12;
2178                                 skip_pages = 0;
2179                                 if ((page_count != 0) && (page_count << 12) - (ib_umem_offset(region) & (4096 - 1)) >= region->length)
2180                                         goto enough_pages;
2181                                 if ((page_count & 0x01FF) == 0) {
2182                                         if (page_count >= 1024 * 512) {
2183                                                 ib_umem_release(region);
2184                                                 nes_free_resource(nesadapter,
2185                                                                   nesadapter->allocated_mrs, stag_index);
2186                                                 kfree(nesmr);
2187                                                 ibmr = ERR_PTR(-E2BIG);
2188                                                 goto reg_user_mr_err;
2189                                         }
2190                                         if (root_pbl_index == 1) {
2191                                                 root_vpbl.pbl_vbase = pci_alloc_consistent(nesdev->pcidev,
2192                                                                 8192, &root_vpbl.pbl_pbase);
2193                                                 nes_debug(NES_DBG_MR, "Allocating root PBL, va = %p, pa = 0x%08X\n",
2194                                                           root_vpbl.pbl_vbase, (unsigned int)root_vpbl.pbl_pbase);
2195                                                 if (!root_vpbl.pbl_vbase) {
2196                                                         ib_umem_release(region);
2197                                                         pci_free_consistent(nesdev->pcidev, 4096, vpbl.pbl_vbase,
2198                                                                             vpbl.pbl_pbase);
2199                                                         nes_free_resource(nesadapter, nesadapter->allocated_mrs,
2200                                                                           stag_index);
2201                                                         kfree(nesmr);
2202                                                         ibmr = ERR_PTR(-ENOMEM);
2203                                                         goto reg_user_mr_err;
2204                                                 }
2205                                                 root_vpbl.leaf_vpbl = kcalloc(1024,
2206                                                                               sizeof(*root_vpbl.leaf_vpbl),
2207                                                                               GFP_KERNEL);
2208                                                 if (!root_vpbl.leaf_vpbl) {
2209                                                         ib_umem_release(region);
2210                                                         pci_free_consistent(nesdev->pcidev, 8192, root_vpbl.pbl_vbase,
2211                                                                             root_vpbl.pbl_pbase);
2212                                                         pci_free_consistent(nesdev->pcidev, 4096, vpbl.pbl_vbase,
2213                                                                             vpbl.pbl_pbase);
2214                                                         nes_free_resource(nesadapter, nesadapter->allocated_mrs,
2215                                                                           stag_index);
2216                                                         kfree(nesmr);
2217                                                         ibmr = ERR_PTR(-ENOMEM);
2218                                                         goto reg_user_mr_err;
2219                                                 }
2220                                                 root_vpbl.pbl_vbase[0].pa_low =
2221                                                                 cpu_to_le32((u32)vpbl.pbl_pbase);
2222                                                 root_vpbl.pbl_vbase[0].pa_high =
2223                                                                 cpu_to_le32((u32)((((u64)vpbl.pbl_pbase) >> 32)));
2224                                                 root_vpbl.leaf_vpbl[0] = vpbl;
2225                                         }
2226                                         vpbl.pbl_vbase = pci_alloc_consistent(nesdev->pcidev, 4096,
2227                                                         &vpbl.pbl_pbase);
2228                                         nes_debug(NES_DBG_MR, "Allocating leaf PBL, va = %p, pa = 0x%08X\n",
2229                                                   vpbl.pbl_vbase, (unsigned int)vpbl.pbl_pbase);
2230                                         if (!vpbl.pbl_vbase) {
2231                                                 ib_umem_release(region);
2232                                                 nes_free_resource(nesadapter, nesadapter->allocated_mrs, stag_index);
2233                                                 ibmr = ERR_PTR(-ENOMEM);
2234                                                 kfree(nesmr);
2235                                                 goto reg_user_mr_err;
2236                                         }
2237                                         if (1 <= root_pbl_index) {
2238                                                 root_vpbl.pbl_vbase[root_pbl_index].pa_low =
2239                                                                 cpu_to_le32((u32)vpbl.pbl_pbase);
2240                                                 root_vpbl.pbl_vbase[root_pbl_index].pa_high =
2241                                                                 cpu_to_le32((u32)((((u64)vpbl.pbl_pbase) >> 32)));
2242                                                 root_vpbl.leaf_vpbl[root_pbl_index] = vpbl;
2243                                         }
2244                                         root_pbl_index++;
2245                                         cur_pbl_index = 0;
2246                                 }
2247                                 if (single_page) {
2248                                         if (page_count != 0) {
2249                                                 if ((last_dma_addr + 4096) != sg_page_iter_dma_address(&dma_iter))
2250                                                         single_page = 0;
2251                                                 last_dma_addr = sg_page_iter_dma_address(&dma_iter);
2252                                         } else {
2253                                                 first_dma_addr = sg_page_iter_dma_address(&dma_iter);
2254                                                 last_dma_addr = first_dma_addr;
2255                                         }
2256                                 }
2257
2258                                 vpbl.pbl_vbase[cur_pbl_index].pa_low =
2259                                                 cpu_to_le32((u32)(sg_page_iter_dma_address(&dma_iter)));
2260                                 vpbl.pbl_vbase[cur_pbl_index].pa_high =
2261                                                 cpu_to_le32((u32)((u64)(sg_page_iter_dma_address(&dma_iter))));
2262                                 cur_pbl_index++;
2263                                 page_count++;
2264                         }
2265
2266 enough_pages:
2267                         nes_debug(NES_DBG_MR, "calculating stag, stag_index=0x%08x, driver_key=0x%08x,"
2268                                         " stag_key=0x%08x\n",
2269                                         stag_index, driver_key, stag_key);
2270                         stag = stag_index << 8;
2271                         stag |= driver_key;
2272                         stag += (u32)stag_key;
2273
2274                         iova_start = virt;
2275                         /* Make the leaf PBL the root if only one PBL */
2276                         if (root_pbl_index == 1) {
2277                                 root_vpbl.pbl_pbase = vpbl.pbl_pbase;
2278                         }
2279
2280                         if (single_page) {
2281                                 pbl_count = 0;
2282                         } else {
2283                                 pbl_count = root_pbl_index;
2284                                 first_dma_addr = 0;
2285                         }
2286                         nes_debug(NES_DBG_MR, "Registering STag 0x%08X, VA = 0x%08X, length = 0x%08X,"
2287                                         " index = 0x%08X, region->length=0x%08llx, pbl_count = %u\n",
2288                                         stag, (unsigned int)iova_start,
2289                                         (unsigned int)region_length, stag_index,
2290                                         (unsigned long long)region->length, pbl_count);
2291                         ret = nes_reg_mr(nesdev, nespd, stag, region->length, &root_vpbl,
2292                                          first_dma_addr, pbl_count, (u16)cur_pbl_index, acc,
2293                                          &iova_start, &nesmr->pbls_used, &nesmr->pbl_4k);
2294
2295                         nes_debug(NES_DBG_MR, "ret=%d\n", ret);
2296
2297                         if (ret == 0) {
2298                                 nesmr->ibmr.rkey = stag;
2299                                 nesmr->ibmr.lkey = stag;
2300                                 nesmr->mode = IWNES_MEMREG_TYPE_MEM;
2301                                 ibmr = &nesmr->ibmr;
2302                         } else {
2303                                 ib_umem_release(region);
2304                                 kfree(nesmr);
2305                                 ibmr = ERR_PTR(-ENOMEM);
2306                         }
2307
2308 reg_user_mr_err:
2309                         /* free the resources */
2310                         if (root_pbl_index == 1) {
2311                                 pci_free_consistent(nesdev->pcidev, 4096, vpbl.pbl_vbase,
2312                                                 vpbl.pbl_pbase);
2313                         } else {
2314                                 for (page_index=0; page_index<root_pbl_index; page_index++) {
2315                                         pci_free_consistent(nesdev->pcidev, 4096,
2316                                                         root_vpbl.leaf_vpbl[page_index].pbl_vbase,
2317                                                         root_vpbl.leaf_vpbl[page_index].pbl_pbase);
2318                                 }
2319                                 kfree(root_vpbl.leaf_vpbl);
2320                                 pci_free_consistent(nesdev->pcidev, 8192, root_vpbl.pbl_vbase,
2321                                                 root_vpbl.pbl_pbase);
2322                         }
2323
2324                         nes_debug(NES_DBG_MR, "Leaving, ibmr=%p", ibmr);
2325
2326                         return ibmr;
2327                 case IWNES_MEMREG_TYPE_QP:
2328                 case IWNES_MEMREG_TYPE_CQ:
2329                         if (!region->length) {
2330                                 nes_debug(NES_DBG_MR, "Unable to register zero length region for CQ\n");
2331                                 ib_umem_release(region);
2332                                 return ERR_PTR(-EINVAL);
2333                         }
2334                         nespbl = kzalloc(sizeof(*nespbl), GFP_KERNEL);
2335                         if (!nespbl) {
2336                                 ib_umem_release(region);
2337                                 return ERR_PTR(-ENOMEM);
2338                         }
2339                         nesmr = kzalloc(sizeof(*nesmr), GFP_KERNEL);
2340                         if (!nesmr) {
2341                                 ib_umem_release(region);
2342                                 kfree(nespbl);
2343                                 return ERR_PTR(-ENOMEM);
2344                         }
2345                         nesmr->region = region;
2346                         pbl_depth = region->length >> 12;
2347                         pbl_depth += (region->length & (4096-1)) ? 1 : 0;
2348                         nespbl->pbl_size = pbl_depth*sizeof(u64);
2349                         if (req.reg_type == IWNES_MEMREG_TYPE_QP) {
2350                                 nes_debug(NES_DBG_MR, "Attempting to allocate QP PBL memory");
2351                         } else {
2352                                 nes_debug(NES_DBG_MR, "Attempting to allocate CP PBL memory");
2353                         }
2354
2355                         nes_debug(NES_DBG_MR, " %u bytes, %u entries.\n",
2356                                         nespbl->pbl_size, pbl_depth);
2357                         pbl = pci_alloc_consistent(nesdev->pcidev, nespbl->pbl_size,
2358                                         &nespbl->pbl_pbase);
2359                         if (!pbl) {
2360                                 ib_umem_release(region);
2361                                 kfree(nesmr);
2362                                 kfree(nespbl);
2363                                 nes_debug(NES_DBG_MR, "Unable to allocate PBL memory\n");
2364                                 return ERR_PTR(-ENOMEM);
2365                         }
2366
2367                         nespbl->pbl_vbase = (u64 *)pbl;
2368                         nespbl->user_base = start;
2369                         nes_debug(NES_DBG_MR, "Allocated PBL memory, %u bytes, pbl_pbase=%lx,"
2370                                         " pbl_vbase=%p user_base=0x%lx\n",
2371                                   nespbl->pbl_size, (unsigned long) nespbl->pbl_pbase,
2372                                   (void *) nespbl->pbl_vbase, nespbl->user_base);
2373
2374                         nespbl->page = sg_page(region->sg_head.sgl);
2375                         for_each_sg_dma_page(region->sg_head.sgl, &dma_iter, region->nmap, 0) {
2376                                 ((__le32 *)pbl)[0] = cpu_to_le32((u32)(sg_page_iter_dma_address(&dma_iter)));
2377                                 ((__le32 *)pbl)[1] = cpu_to_le32(((u64)(sg_page_iter_dma_address(&dma_iter)))>>32);
2378                                 nes_debug(NES_DBG_MR, "pbl=%p, *pbl=0x%016llx, 0x%08x%08x\n", pbl,
2379                                           (unsigned long long)*pbl,
2380                                           le32_to_cpu(((__le32 *)pbl)[1]), le32_to_cpu(((__le32 *)pbl)[0]));
2381                                 pbl++;
2382                         }
2383
2384                         if (req.reg_type == IWNES_MEMREG_TYPE_QP) {
2385                                 list_add_tail(&nespbl->list, &nes_ucontext->qp_reg_mem_list);
2386                         } else {
2387                                 list_add_tail(&nespbl->list, &nes_ucontext->cq_reg_mem_list);
2388                         }
2389                         nesmr->ibmr.rkey = -1;
2390                         nesmr->ibmr.lkey = -1;
2391                         nesmr->mode = req.reg_type;
2392                         return &nesmr->ibmr;
2393         }
2394
2395         ib_umem_release(region);
2396         return ERR_PTR(-ENOSYS);
2397 }
2398
2399
2400 /**
2401  * nes_dereg_mr
2402  */
2403 static int nes_dereg_mr(struct ib_mr *ib_mr)
2404 {
2405         struct nes_mr *nesmr = to_nesmr(ib_mr);
2406         struct nes_vnic *nesvnic = to_nesvnic(ib_mr->device);
2407         struct nes_device *nesdev = nesvnic->nesdev;
2408         struct nes_adapter *nesadapter = nesdev->nesadapter;
2409         struct nes_hw_cqp_wqe *cqp_wqe;
2410         struct nes_cqp_request *cqp_request;
2411         unsigned long flags;
2412         int ret;
2413         u16 major_code;
2414         u16 minor_code;
2415
2416
2417         if (nesmr->pages)
2418                 pci_free_consistent(nesdev->pcidev,
2419                                     nesmr->max_pages * sizeof(u64),
2420                                     nesmr->pages,
2421                                     nesmr->paddr);
2422
2423         if (nesmr->region) {
2424                 ib_umem_release(nesmr->region);
2425         }
2426         if (nesmr->mode != IWNES_MEMREG_TYPE_MEM) {
2427                 kfree(nesmr);
2428                 return 0;
2429         }
2430
2431         /* Deallocate the region with the adapter */
2432
2433         cqp_request = nes_get_cqp_request(nesdev);
2434         if (cqp_request == NULL) {
2435                 nes_debug(NES_DBG_MR, "Failed to get a cqp_request.\n");
2436                 return -ENOMEM;
2437         }
2438         cqp_request->waiting = 1;
2439         cqp_wqe = &cqp_request->cqp_wqe;
2440
2441         nes_fill_init_cqp_wqe(cqp_wqe, nesdev);
2442         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_WQE_OPCODE_IDX,
2443                         NES_CQP_DEALLOCATE_STAG | NES_CQP_STAG_VA_TO |
2444                         NES_CQP_STAG_DEALLOC_PBLS | NES_CQP_STAG_MR);
2445         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_STAG_WQE_STAG_IDX, ib_mr->rkey);
2446
2447         atomic_set(&cqp_request->refcount, 2);
2448         nes_post_cqp_request(nesdev, cqp_request);
2449
2450         /* Wait for CQP */
2451         nes_debug(NES_DBG_MR, "Waiting for deallocate STag 0x%08X completed\n", ib_mr->rkey);
2452         ret = wait_event_timeout(cqp_request->waitq, (cqp_request->request_done != 0),
2453                         NES_EVENT_TIMEOUT);
2454         nes_debug(NES_DBG_MR, "Deallocate STag 0x%08X completed, wait_event_timeout ret = %u,"
2455                         " CQP Major:Minor codes = 0x%04X:0x%04X\n",
2456                         ib_mr->rkey, ret, cqp_request->major_code, cqp_request->minor_code);
2457
2458         major_code = cqp_request->major_code;
2459         minor_code = cqp_request->minor_code;
2460
2461         nes_put_cqp_request(nesdev, cqp_request);
2462
2463         if (!ret) {
2464                 nes_debug(NES_DBG_MR, "Timeout waiting to destroy STag,"
2465                                 " ib_mr=%p, rkey = 0x%08X\n",
2466                                 ib_mr, ib_mr->rkey);
2467                 return -ETIME;
2468         } else if (major_code) {
2469                 nes_debug(NES_DBG_MR, "Error (0x%04X:0x%04X) while attempting"
2470                                 " to destroy STag, ib_mr=%p, rkey = 0x%08X\n",
2471                                 major_code, minor_code, ib_mr, ib_mr->rkey);
2472                 return -EIO;
2473         }
2474
2475         if (nesmr->pbls_used != 0) {
2476                 spin_lock_irqsave(&nesadapter->pbl_lock, flags);
2477                 if (nesmr->pbl_4k) {
2478                         nesadapter->free_4kpbl += nesmr->pbls_used;
2479                         if (nesadapter->free_4kpbl > nesadapter->max_4kpbl)
2480                                 printk(KERN_ERR PFX "free 4KB PBLs(%u) has "
2481                                         "exceeded the max(%u)\n",
2482                                         nesadapter->free_4kpbl,
2483                                         nesadapter->max_4kpbl);
2484                 } else {
2485                         nesadapter->free_256pbl += nesmr->pbls_used;
2486                         if (nesadapter->free_256pbl > nesadapter->max_256pbl)
2487                                 printk(KERN_ERR PFX "free 256B PBLs(%u) has "
2488                                         "exceeded the max(%u)\n",
2489                                         nesadapter->free_256pbl,
2490                                         nesadapter->max_256pbl);
2491                 }
2492                 spin_unlock_irqrestore(&nesadapter->pbl_lock, flags);
2493         }
2494         nes_free_resource(nesadapter, nesadapter->allocated_mrs,
2495                         (ib_mr->rkey & 0x0fffff00) >> 8);
2496
2497         kfree(nesmr);
2498
2499         return 0;
2500 }
2501
2502
2503 /**
2504  * show_rev
2505  */
2506 static ssize_t hw_rev_show(struct device *dev,
2507                            struct device_attribute *attr, char *buf)
2508 {
2509         struct nes_ib_device *nesibdev =
2510                 rdma_device_to_drv_device(dev, struct nes_ib_device, ibdev);
2511         struct nes_vnic *nesvnic = nesibdev->nesvnic;
2512
2513         nes_debug(NES_DBG_INIT, "\n");
2514         return sprintf(buf, "%x\n", nesvnic->nesdev->nesadapter->hw_rev);
2515 }
2516 static DEVICE_ATTR_RO(hw_rev);
2517
2518 /**
2519  * show_hca
2520  */
2521 static ssize_t hca_type_show(struct device *dev,
2522                              struct device_attribute *attr, char *buf)
2523 {
2524         nes_debug(NES_DBG_INIT, "\n");
2525         return sprintf(buf, "NES020\n");
2526 }
2527 static DEVICE_ATTR_RO(hca_type);
2528
2529 /**
2530  * show_board
2531  */
2532 static ssize_t board_id_show(struct device *dev,
2533                              struct device_attribute *attr, char *buf)
2534 {
2535         nes_debug(NES_DBG_INIT, "\n");
2536         return sprintf(buf, "%.*s\n", 32, "NES020 Board ID");
2537 }
2538 static DEVICE_ATTR_RO(board_id);
2539
2540 static struct attribute *nes_dev_attributes[] = {
2541         &dev_attr_hw_rev.attr,
2542         &dev_attr_hca_type.attr,
2543         &dev_attr_board_id.attr,
2544         NULL
2545 };
2546
2547 static const struct attribute_group nes_attr_group = {
2548         .attrs = nes_dev_attributes,
2549 };
2550
2551 /**
2552  * nes_query_qp
2553  */
2554 static int nes_query_qp(struct ib_qp *ibqp, struct ib_qp_attr *attr,
2555                 int attr_mask, struct ib_qp_init_attr *init_attr)
2556 {
2557         struct nes_qp *nesqp = to_nesqp(ibqp);
2558
2559         nes_debug(NES_DBG_QP, "\n");
2560
2561         attr->qp_access_flags = 0;
2562         attr->cap.max_send_wr = nesqp->hwqp.sq_size;
2563         attr->cap.max_recv_wr = nesqp->hwqp.rq_size;
2564         attr->cap.max_recv_sge = 1;
2565         if (nes_drv_opt & NES_DRV_OPT_NO_INLINE_DATA)
2566                 attr->cap.max_inline_data = 0;
2567         else
2568                 attr->cap.max_inline_data = 64;
2569
2570         init_attr->event_handler = nesqp->ibqp.event_handler;
2571         init_attr->qp_context = nesqp->ibqp.qp_context;
2572         init_attr->send_cq = nesqp->ibqp.send_cq;
2573         init_attr->recv_cq = nesqp->ibqp.recv_cq;
2574         init_attr->srq = nesqp->ibqp.srq;
2575         init_attr->cap = attr->cap;
2576
2577         return 0;
2578 }
2579
2580
2581 /**
2582  * nes_hw_modify_qp
2583  */
2584 int nes_hw_modify_qp(struct nes_device *nesdev, struct nes_qp *nesqp,
2585                 u32 next_iwarp_state, u32 termlen, u32 wait_completion)
2586 {
2587         struct nes_hw_cqp_wqe *cqp_wqe;
2588         /* struct iw_cm_id *cm_id = nesqp->cm_id; */
2589         /* struct iw_cm_event cm_event; */
2590         struct nes_cqp_request *cqp_request;
2591         int ret;
2592         u16 major_code;
2593
2594         nes_debug(NES_DBG_MOD_QP, "QP%u, refcount=%d\n",
2595                         nesqp->hwqp.qp_id, atomic_read(&nesqp->refcount));
2596
2597         cqp_request = nes_get_cqp_request(nesdev);
2598         if (cqp_request == NULL) {
2599                 nes_debug(NES_DBG_MOD_QP, "Failed to get a cqp_request.\n");
2600                 return -ENOMEM;
2601         }
2602         if (wait_completion) {
2603                 cqp_request->waiting = 1;
2604         } else {
2605                 cqp_request->waiting = 0;
2606         }
2607         cqp_wqe = &cqp_request->cqp_wqe;
2608
2609         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_WQE_OPCODE_IDX,
2610                         NES_CQP_MODIFY_QP | NES_CQP_QP_TYPE_IWARP | next_iwarp_state);
2611         nes_debug(NES_DBG_MOD_QP, "using next_iwarp_state=%08x, wqe_words=%08x\n",
2612                         next_iwarp_state, le32_to_cpu(cqp_wqe->wqe_words[NES_CQP_WQE_OPCODE_IDX]));
2613         nes_fill_init_cqp_wqe(cqp_wqe, nesdev);
2614         set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_WQE_ID_IDX, nesqp->hwqp.qp_id);
2615         set_wqe_64bit_value(cqp_wqe->wqe_words, NES_CQP_QP_WQE_CONTEXT_LOW_IDX, (u64)nesqp->nesqp_context_pbase);
2616
2617         /* If sending a terminate message, fill in the length (in words) */
2618         if (((next_iwarp_state & NES_CQP_QP_IWARP_STATE_MASK) == NES_CQP_QP_IWARP_STATE_TERMINATE) &&
2619             !(next_iwarp_state & NES_CQP_QP_TERM_DONT_SEND_TERM_MSG)) {
2620                 termlen = ((termlen + 3) >> 2) << NES_CQP_OP_TERMLEN_SHIFT;
2621                 set_wqe_32bit_value(cqp_wqe->wqe_words, NES_CQP_QP_WQE_NEW_MSS_IDX, termlen);
2622         }
2623
2624         atomic_set(&cqp_request->refcount, 2);
2625         nes_post_cqp_request(nesdev, cqp_request);
2626
2627         /* Wait for CQP */
2628         if (wait_completion) {
2629                 /* nes_debug(NES_DBG_MOD_QP, "Waiting for modify iWARP QP%u to complete.\n",
2630                                 nesqp->hwqp.qp_id); */
2631                 ret = wait_event_timeout(cqp_request->waitq, (cqp_request->request_done != 0),
2632                                 NES_EVENT_TIMEOUT);
2633                 nes_debug(NES_DBG_MOD_QP, "Modify iwarp QP%u completed, wait_event_timeout ret=%u, "
2634                                 "CQP Major:Minor codes = 0x%04X:0x%04X.\n",
2635                                 nesqp->hwqp.qp_id, ret, cqp_request->major_code, cqp_request->minor_code);
2636                 major_code = cqp_request->major_code;
2637                 if (major_code) {
2638                         nes_debug(NES_DBG_MOD_QP, "Modify iwarp QP%u failed"
2639                                         "CQP Major:Minor codes = 0x%04X:0x%04X, intended next state = 0x%08X.\n",
2640                                         nesqp->hwqp.qp_id, cqp_request->major_code,
2641                                         cqp_request->minor_code, next_iwarp_state);
2642                 }
2643
2644                 nes_put_cqp_request(nesdev, cqp_request);
2645
2646                 if (!ret)
2647                         return -ETIME;
2648                 else if (major_code)
2649                         return -EIO;
2650                 else
2651                         return 0;
2652         } else {
2653                 return 0;
2654         }
2655 }
2656
2657
2658 /**
2659  * nes_modify_qp
2660  */
2661 int nes_modify_qp(struct ib_qp *ibqp, struct ib_qp_attr *attr,
2662                 int attr_mask, struct ib_udata *udata)
2663 {
2664         struct nes_qp *nesqp = to_nesqp(ibqp);
2665         struct nes_vnic *nesvnic = to_nesvnic(ibqp->device);
2666         struct nes_device *nesdev = nesvnic->nesdev;
2667         /* u32 cqp_head; */
2668         /* u32 counter; */
2669         u32 next_iwarp_state = 0;
2670         int err;
2671         unsigned long qplockflags;
2672         int ret;
2673         u16 original_last_aeq;
2674         u8 issue_modify_qp = 0;
2675         u8 dont_wait = 0;
2676
2677         nes_debug(NES_DBG_MOD_QP, "QP%u: QP State=%u, cur QP State=%u,"
2678                         " iwarp_state=0x%X, refcount=%d\n",
2679                         nesqp->hwqp.qp_id, attr->qp_state, nesqp->ibqp_state,
2680                         nesqp->iwarp_state, atomic_read(&nesqp->refcount));
2681
2682         spin_lock_irqsave(&nesqp->lock, qplockflags);
2683
2684         nes_debug(NES_DBG_MOD_QP, "QP%u: hw_iwarp_state=0x%X, hw_tcp_state=0x%X,"
2685                         " QP Access Flags=0x%X, attr_mask = 0x%0x\n",
2686                         nesqp->hwqp.qp_id, nesqp->hw_iwarp_state,
2687                         nesqp->hw_tcp_state, attr->qp_access_flags, attr_mask);
2688
2689         if (attr_mask & IB_QP_STATE) {
2690                 switch (attr->qp_state) {
2691                         case IB_QPS_INIT:
2692                                 nes_debug(NES_DBG_MOD_QP, "QP%u: new state = init\n",
2693                                                 nesqp->hwqp.qp_id);
2694                                 if (nesqp->iwarp_state > (u32)NES_CQP_QP_IWARP_STATE_IDLE) {
2695                                         spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2696                                         return -EINVAL;
2697                                 }
2698                                 next_iwarp_state = NES_CQP_QP_IWARP_STATE_IDLE;
2699                                 issue_modify_qp = 1;
2700                                 break;
2701                         case IB_QPS_RTR:
2702                                 nes_debug(NES_DBG_MOD_QP, "QP%u: new state = rtr\n",
2703                                                 nesqp->hwqp.qp_id);
2704                                 if (nesqp->iwarp_state>(u32)NES_CQP_QP_IWARP_STATE_IDLE) {
2705                                         spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2706                                         return -EINVAL;
2707                                 }
2708                                 next_iwarp_state = NES_CQP_QP_IWARP_STATE_IDLE;
2709                                 issue_modify_qp = 1;
2710                                 break;
2711                         case IB_QPS_RTS:
2712                                 nes_debug(NES_DBG_MOD_QP, "QP%u: new state = rts\n",
2713                                                 nesqp->hwqp.qp_id);
2714                                 if (nesqp->iwarp_state>(u32)NES_CQP_QP_IWARP_STATE_RTS) {
2715                                         spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2716                                         return -EINVAL;
2717                                 }
2718                                 if (nesqp->cm_id == NULL) {
2719                                         nes_debug(NES_DBG_MOD_QP, "QP%u: Failing attempt to move QP to RTS without a CM_ID. \n",
2720                                                         nesqp->hwqp.qp_id );
2721                                         spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2722                                         return -EINVAL;
2723                                 }
2724                                 next_iwarp_state = NES_CQP_QP_IWARP_STATE_RTS;
2725                                 if (nesqp->iwarp_state != NES_CQP_QP_IWARP_STATE_RTS)
2726                                         next_iwarp_state |= NES_CQP_QP_CONTEXT_VALID |
2727                                                         NES_CQP_QP_ARP_VALID | NES_CQP_QP_ORD_VALID;
2728                                 issue_modify_qp = 1;
2729                                 nesqp->hw_tcp_state = NES_AEQE_TCP_STATE_ESTABLISHED;
2730                                 nesqp->hw_iwarp_state = NES_AEQE_IWARP_STATE_RTS;
2731                                 nesqp->hte_added = 1;
2732                                 break;
2733                         case IB_QPS_SQD:
2734                                 issue_modify_qp = 1;
2735                                 nes_debug(NES_DBG_MOD_QP, "QP%u: new state=closing. SQ head=%u, SQ tail=%u\n",
2736                                                 nesqp->hwqp.qp_id, nesqp->hwqp.sq_head, nesqp->hwqp.sq_tail);
2737                                 if (nesqp->iwarp_state == (u32)NES_CQP_QP_IWARP_STATE_CLOSING) {
2738                                         spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2739                                         return 0;
2740                                 } else {
2741                                         if (nesqp->iwarp_state > (u32)NES_CQP_QP_IWARP_STATE_CLOSING) {
2742                                                 nes_debug(NES_DBG_MOD_QP, "QP%u: State change to closing"
2743                                                                 " ignored due to current iWARP state\n",
2744                                                                 nesqp->hwqp.qp_id);
2745                                                 spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2746                                                 return -EINVAL;
2747                                         }
2748                                         if (nesqp->hw_iwarp_state != NES_AEQE_IWARP_STATE_RTS) {
2749                                                 nes_debug(NES_DBG_MOD_QP, "QP%u: State change to closing"
2750                                                                 " already done based on hw state.\n",
2751                                                                 nesqp->hwqp.qp_id);
2752                                                 issue_modify_qp = 0;
2753                                         }
2754                                         switch (nesqp->hw_iwarp_state) {
2755                                                 case NES_AEQE_IWARP_STATE_CLOSING:
2756                                                         next_iwarp_state = NES_CQP_QP_IWARP_STATE_CLOSING;
2757                                                         break;
2758                                                 case NES_AEQE_IWARP_STATE_TERMINATE:
2759                                                         next_iwarp_state = NES_CQP_QP_IWARP_STATE_TERMINATE;
2760                                                         break;
2761                                                 case NES_AEQE_IWARP_STATE_ERROR:
2762                                                         next_iwarp_state = NES_CQP_QP_IWARP_STATE_ERROR;
2763                                                         break;
2764                                                 default:
2765                                                         next_iwarp_state = NES_CQP_QP_IWARP_STATE_CLOSING;
2766                                                         nesqp->hw_iwarp_state = NES_AEQE_IWARP_STATE_CLOSING;
2767                                                         break;
2768                                         }
2769                                 }
2770                                 break;
2771                         case IB_QPS_SQE:
2772                                 nes_debug(NES_DBG_MOD_QP, "QP%u: new state = terminate\n",
2773                                                 nesqp->hwqp.qp_id);
2774                                 if (nesqp->iwarp_state>=(u32)NES_CQP_QP_IWARP_STATE_TERMINATE) {
2775                                         spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2776                                         return -EINVAL;
2777                                 }
2778                                 /* next_iwarp_state = (NES_CQP_QP_IWARP_STATE_TERMINATE | 0x02000000); */
2779                                 next_iwarp_state = NES_CQP_QP_IWARP_STATE_TERMINATE;
2780                                 nesqp->hw_iwarp_state = NES_AEQE_IWARP_STATE_TERMINATE;
2781                                 issue_modify_qp = 1;
2782                                 break;
2783                         case IB_QPS_ERR:
2784                         case IB_QPS_RESET:
2785                                 if (nesqp->iwarp_state == (u32)NES_CQP_QP_IWARP_STATE_ERROR) {
2786                                         spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2787                                         return -EINVAL;
2788                                 }
2789                                 nes_debug(NES_DBG_MOD_QP, "QP%u: new state = error\n",
2790                                                 nesqp->hwqp.qp_id);
2791                                 if (nesqp->term_flags)
2792                                         del_timer(&nesqp->terminate_timer);
2793
2794                                 next_iwarp_state = NES_CQP_QP_IWARP_STATE_ERROR;
2795                                 /* next_iwarp_state = (NES_CQP_QP_IWARP_STATE_TERMINATE | 0x02000000); */
2796                                 if (nesqp->hte_added) {
2797                                         nes_debug(NES_DBG_MOD_QP, "set CQP_QP_DEL_HTE\n");
2798                                         next_iwarp_state |= NES_CQP_QP_DEL_HTE;
2799                                         nesqp->hte_added = 0;
2800                                 }
2801                                 if ((nesqp->hw_tcp_state > NES_AEQE_TCP_STATE_CLOSED) &&
2802                                                 (nesdev->iw_status) &&
2803                                                 (nesqp->hw_tcp_state != NES_AEQE_TCP_STATE_TIME_WAIT)) {
2804                                         next_iwarp_state |= NES_CQP_QP_RESET;
2805                                 } else {
2806                                         nes_debug(NES_DBG_MOD_QP, "QP%u NOT setting NES_CQP_QP_RESET since TCP state = %u\n",
2807                                                         nesqp->hwqp.qp_id, nesqp->hw_tcp_state);
2808                                         dont_wait = 1;
2809                                 }
2810                                 issue_modify_qp = 1;
2811                                 nesqp->hw_iwarp_state = NES_AEQE_IWARP_STATE_ERROR;
2812                                 break;
2813                         default:
2814                                 spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2815                                 return -EINVAL;
2816                                 break;
2817                 }
2818
2819                 nesqp->ibqp_state = attr->qp_state;
2820                 nesqp->iwarp_state = next_iwarp_state & NES_CQP_QP_IWARP_STATE_MASK;
2821                 nes_debug(NES_DBG_MOD_QP, "Change nesqp->iwarp_state=%08x\n",
2822                                 nesqp->iwarp_state);
2823         }
2824
2825         if (attr_mask & IB_QP_ACCESS_FLAGS) {
2826                 if (attr->qp_access_flags & IB_ACCESS_LOCAL_WRITE) {
2827                         nesqp->nesqp_context->misc |= cpu_to_le32(NES_QPCONTEXT_MISC_RDMA_WRITE_EN |
2828                                         NES_QPCONTEXT_MISC_RDMA_READ_EN);
2829                         issue_modify_qp = 1;
2830                 }
2831                 if (attr->qp_access_flags & IB_ACCESS_REMOTE_WRITE) {
2832                         nesqp->nesqp_context->misc |= cpu_to_le32(NES_QPCONTEXT_MISC_RDMA_WRITE_EN);
2833                         issue_modify_qp = 1;
2834                 }
2835                 if (attr->qp_access_flags & IB_ACCESS_REMOTE_READ) {
2836                         nesqp->nesqp_context->misc |= cpu_to_le32(NES_QPCONTEXT_MISC_RDMA_READ_EN);
2837                         issue_modify_qp = 1;
2838                 }
2839                 if (attr->qp_access_flags & IB_ACCESS_MW_BIND) {
2840                         nesqp->nesqp_context->misc |= cpu_to_le32(NES_QPCONTEXT_MISC_WBIND_EN);
2841                         issue_modify_qp = 1;
2842                 }
2843
2844                 if (nesqp->user_mode) {
2845                         nesqp->nesqp_context->misc |= cpu_to_le32(NES_QPCONTEXT_MISC_RDMA_WRITE_EN |
2846                                         NES_QPCONTEXT_MISC_RDMA_READ_EN);
2847                         issue_modify_qp = 1;
2848                 }
2849         }
2850
2851         original_last_aeq = nesqp->last_aeq;
2852         spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2853
2854         nes_debug(NES_DBG_MOD_QP, "issue_modify_qp=%u\n", issue_modify_qp);
2855
2856         ret = 0;
2857
2858
2859         if (issue_modify_qp) {
2860                 nes_debug(NES_DBG_MOD_QP, "call nes_hw_modify_qp\n");
2861                 ret = nes_hw_modify_qp(nesdev, nesqp, next_iwarp_state, 0, 1);
2862                 if (ret)
2863                         nes_debug(NES_DBG_MOD_QP, "nes_hw_modify_qp (next_iwarp_state = 0x%08X)"
2864                                         " failed for QP%u.\n",
2865                                         next_iwarp_state, nesqp->hwqp.qp_id);
2866
2867         }
2868
2869         if ((issue_modify_qp) && (nesqp->ibqp_state > IB_QPS_RTS)) {
2870                 nes_debug(NES_DBG_MOD_QP, "QP%u Issued ModifyQP refcount (%d),"
2871                                 " original_last_aeq = 0x%04X. last_aeq = 0x%04X.\n",
2872                                 nesqp->hwqp.qp_id, atomic_read(&nesqp->refcount),
2873                                 original_last_aeq, nesqp->last_aeq);
2874                 if (!ret || original_last_aeq != NES_AEQE_AEID_RDMAP_ROE_BAD_LLP_CLOSE) {
2875                         if (dont_wait) {
2876                                 if (nesqp->cm_id && nesqp->hw_tcp_state != 0) {
2877                                         nes_debug(NES_DBG_MOD_QP, "QP%u Queuing fake disconnect for QP refcount (%d),"
2878                                                         " original_last_aeq = 0x%04X. last_aeq = 0x%04X.\n",
2879                                                         nesqp->hwqp.qp_id, atomic_read(&nesqp->refcount),
2880                                                         original_last_aeq, nesqp->last_aeq);
2881                                         /* this one is for the cm_disconnect thread */
2882                                         spin_lock_irqsave(&nesqp->lock, qplockflags);
2883                                         nesqp->hw_tcp_state = NES_AEQE_TCP_STATE_CLOSED;
2884                                         nesqp->last_aeq = NES_AEQE_AEID_RESET_SENT;
2885                                         spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2886                                         nes_cm_disconn(nesqp);
2887                                 } else {
2888                                         nes_debug(NES_DBG_MOD_QP, "QP%u No fake disconnect, QP refcount=%d\n",
2889                                                         nesqp->hwqp.qp_id, atomic_read(&nesqp->refcount));
2890                                 }
2891                         } else {
2892                                 spin_lock_irqsave(&nesqp->lock, qplockflags);
2893                                 if (nesqp->cm_id) {
2894                                         /* These two are for the timer thread */
2895                                         if (atomic_inc_return(&nesqp->close_timer_started) == 1) {
2896                                                 nesqp->cm_id->add_ref(nesqp->cm_id);
2897                                                 nes_debug(NES_DBG_MOD_QP, "QP%u Not decrementing QP refcount (%d),"
2898                                                                 " need ae to finish up, original_last_aeq = 0x%04X."
2899                                                                 " last_aeq = 0x%04X, scheduling timer.\n",
2900                                                                 nesqp->hwqp.qp_id, atomic_read(&nesqp->refcount),
2901                                                                 original_last_aeq, nesqp->last_aeq);
2902                                                 schedule_nes_timer(nesqp->cm_node, (struct sk_buff *) nesqp, NES_TIMER_TYPE_CLOSE, 1, 0);
2903                                         }
2904                                         spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2905                                 } else {
2906                                         spin_unlock_irqrestore(&nesqp->lock, qplockflags);
2907                                         nes_debug(NES_DBG_MOD_QP, "QP%u Not decrementing QP refcount (%d),"
2908                                                         " need ae to finish up, original_last_aeq = 0x%04X."
2909                                                         " last_aeq = 0x%04X.\n",
2910                                                         nesqp->hwqp.qp_id, atomic_read(&nesqp->refcount),
2911                                                         original_last_aeq, nesqp->last_aeq);
2912                                 }
2913                         }
2914                 } else {
2915                         nes_debug(NES_DBG_MOD_QP, "QP%u Decrementing QP refcount (%d), No ae to finish up,"
2916                                         " original_last_aeq = 0x%04X. last_aeq = 0x%04X.\n",
2917                                         nesqp->hwqp.qp_id, atomic_read(&nesqp->refcount),
2918                                         original_last_aeq, nesqp->last_aeq);
2919                 }
2920         } else {
2921                 nes_debug(NES_DBG_MOD_QP, "QP%u Decrementing QP refcount (%d), No ae to finish up,"
2922                                 " original_last_aeq = 0x%04X. last_aeq = 0x%04X.\n",
2923                                 nesqp->hwqp.qp_id, atomic_read(&nesqp->refcount),
2924                                 original_last_aeq, nesqp->last_aeq);
2925         }
2926
2927         err = 0;
2928
2929         nes_debug(NES_DBG_MOD_QP, "QP%u Leaving, refcount=%d\n",
2930                         nesqp->hwqp.qp_id, atomic_read(&nesqp->refcount));
2931
2932         return err;
2933 }
2934
2935 static inline void
2936 fill_wqe_sg_send(struct nes_hw_qp_wqe *wqe, const struct ib_send_wr *ib_wr,
2937                  u32 uselkey)
2938 {
2939         int sge_index;
2940         int total_payload_length = 0;
2941         for (sge_index = 0; sge_index < ib_wr->num_sge; sge_index++) {
2942                 set_wqe_64bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_FRAG0_LOW_IDX+(sge_index*4),
2943                         ib_wr->sg_list[sge_index].addr);
2944                 set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_LENGTH0_IDX + (sge_index*4),
2945                         ib_wr->sg_list[sge_index].length);
2946                 if (uselkey)
2947                         set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_STAG0_IDX + (sge_index*4),
2948                                                 (ib_wr->sg_list[sge_index].lkey));
2949                 else
2950                         set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_STAG0_IDX + (sge_index*4), 0);
2951
2952                 total_payload_length += ib_wr->sg_list[sge_index].length;
2953         }
2954         nes_debug(NES_DBG_IW_TX, "UC UC UC, sending total_payload_length=%u \n",
2955                         total_payload_length);
2956         set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_TOTAL_PAYLOAD_IDX,
2957                                 total_payload_length);
2958 }
2959
2960 /**
2961  * nes_post_send
2962  */
2963 static int nes_post_send(struct ib_qp *ibqp, const struct ib_send_wr *ib_wr,
2964                          const struct ib_send_wr **bad_wr)
2965 {
2966         u64 u64temp;
2967         unsigned long flags = 0;
2968         struct nes_vnic *nesvnic = to_nesvnic(ibqp->device);
2969         struct nes_device *nesdev = nesvnic->nesdev;
2970         struct nes_qp *nesqp = to_nesqp(ibqp);
2971         struct nes_hw_qp_wqe *wqe;
2972         int err = 0;
2973         u32 qsize = nesqp->hwqp.sq_size;
2974         u32 head;
2975         u32 wqe_misc = 0;
2976         u32 wqe_count = 0;
2977         u32 counter;
2978
2979         if (nesqp->ibqp_state > IB_QPS_RTS) {
2980                 err = -EINVAL;
2981                 goto out;
2982         }
2983
2984         spin_lock_irqsave(&nesqp->lock, flags);
2985
2986         head = nesqp->hwqp.sq_head;
2987
2988         while (ib_wr) {
2989                 /* Check for QP error */
2990                 if (nesqp->term_flags) {
2991                         err = -EINVAL;
2992                         break;
2993                 }
2994
2995                 /* Check for SQ overflow */
2996                 if (((head + (2 * qsize) - nesqp->hwqp.sq_tail) % qsize) == (qsize - 1)) {
2997                         err = -ENOMEM;
2998                         break;
2999                 }
3000
3001                 wqe = &nesqp->hwqp.sq_vbase[head];
3002                 /* nes_debug(NES_DBG_IW_TX, "processing sq wqe for QP%u at %p, head = %u.\n",
3003                                 nesqp->hwqp.qp_id, wqe, head); */
3004                 nes_fill_init_qp_wqe(wqe, nesqp, head);
3005                 u64temp = (u64)(ib_wr->wr_id);
3006                 set_wqe_64bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_COMP_SCRATCH_LOW_IDX,
3007                                         u64temp);
3008                 switch (ib_wr->opcode) {
3009                 case IB_WR_SEND:
3010                 case IB_WR_SEND_WITH_INV:
3011                         if (IB_WR_SEND == ib_wr->opcode) {
3012                                 if (ib_wr->send_flags & IB_SEND_SOLICITED)
3013                                         wqe_misc = NES_IWARP_SQ_OP_SENDSE;
3014                                 else
3015                                         wqe_misc = NES_IWARP_SQ_OP_SEND;
3016                         } else {
3017                                 if (ib_wr->send_flags & IB_SEND_SOLICITED)
3018                                         wqe_misc = NES_IWARP_SQ_OP_SENDSEINV;
3019                                 else
3020                                         wqe_misc = NES_IWARP_SQ_OP_SENDINV;
3021
3022                                 set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_INV_STAG_LOW_IDX,
3023                                                     ib_wr->ex.invalidate_rkey);
3024                         }
3025
3026                         if (ib_wr->num_sge > nesdev->nesadapter->max_sge) {
3027                                 err = -EINVAL;
3028                                 break;
3029                         }
3030
3031                         if (ib_wr->send_flags & IB_SEND_FENCE)
3032                                 wqe_misc |= NES_IWARP_SQ_WQE_LOCAL_FENCE;
3033
3034                         if ((ib_wr->send_flags & IB_SEND_INLINE) &&
3035                             ((nes_drv_opt & NES_DRV_OPT_NO_INLINE_DATA) == 0) &&
3036                              (ib_wr->sg_list[0].length <= 64)) {
3037                                 memcpy(&wqe->wqe_words[NES_IWARP_SQ_WQE_IMM_DATA_START_IDX],
3038                                        (void *)(unsigned long)ib_wr->sg_list[0].addr, ib_wr->sg_list[0].length);
3039                                 set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_TOTAL_PAYLOAD_IDX,
3040                                                     ib_wr->sg_list[0].length);
3041                                 wqe_misc |= NES_IWARP_SQ_WQE_IMM_DATA;
3042                         } else {
3043                                 fill_wqe_sg_send(wqe, ib_wr, 1);
3044                         }
3045
3046                         break;
3047                 case IB_WR_RDMA_WRITE:
3048                         wqe_misc = NES_IWARP_SQ_OP_RDMAW;
3049                         if (ib_wr->num_sge > nesdev->nesadapter->max_sge) {
3050                                 nes_debug(NES_DBG_IW_TX, "Exceeded max sge, ib_wr=%u, max=%u\n",
3051                                           ib_wr->num_sge, nesdev->nesadapter->max_sge);
3052                                 err = -EINVAL;
3053                                 break;
3054                         }
3055
3056                         if (ib_wr->send_flags & IB_SEND_FENCE)
3057                                 wqe_misc |= NES_IWARP_SQ_WQE_LOCAL_FENCE;
3058
3059                         set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_RDMA_STAG_IDX,
3060                                             rdma_wr(ib_wr)->rkey);
3061                         set_wqe_64bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_RDMA_TO_LOW_IDX,
3062                                             rdma_wr(ib_wr)->remote_addr);
3063
3064                         if ((ib_wr->send_flags & IB_SEND_INLINE) &&
3065                             ((nes_drv_opt & NES_DRV_OPT_NO_INLINE_DATA) == 0) &&
3066                              (ib_wr->sg_list[0].length <= 64)) {
3067                                 memcpy(&wqe->wqe_words[NES_IWARP_SQ_WQE_IMM_DATA_START_IDX],
3068                                        (void *)(unsigned long)ib_wr->sg_list[0].addr, ib_wr->sg_list[0].length);
3069                                 set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_TOTAL_PAYLOAD_IDX,
3070                                                     ib_wr->sg_list[0].length);
3071                                 wqe_misc |= NES_IWARP_SQ_WQE_IMM_DATA;
3072                         } else {
3073                                 fill_wqe_sg_send(wqe, ib_wr, 1);
3074                         }
3075
3076                         wqe->wqe_words[NES_IWARP_SQ_WQE_RDMA_LENGTH_IDX] =
3077                                 wqe->wqe_words[NES_IWARP_SQ_WQE_TOTAL_PAYLOAD_IDX];
3078                         break;
3079                 case IB_WR_RDMA_READ:
3080                 case IB_WR_RDMA_READ_WITH_INV:
3081                         /* iWARP only supports 1 sge for RDMA reads */
3082                         if (ib_wr->num_sge > 1) {
3083                                 nes_debug(NES_DBG_IW_TX, "Exceeded max sge, ib_wr=%u, max=1\n",
3084                                           ib_wr->num_sge);
3085                                 err = -EINVAL;
3086                                 break;
3087                         }
3088                         if (ib_wr->opcode == IB_WR_RDMA_READ) {
3089                                 wqe_misc = NES_IWARP_SQ_OP_RDMAR;
3090                         } else {
3091                                 wqe_misc = NES_IWARP_SQ_OP_RDMAR_LOCINV;
3092                                 set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_INV_STAG_LOW_IDX,
3093                                                     ib_wr->ex.invalidate_rkey);
3094                         }
3095
3096                         set_wqe_64bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_RDMA_TO_LOW_IDX,
3097                                             rdma_wr(ib_wr)->remote_addr);
3098                         set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_RDMA_STAG_IDX,
3099                                             rdma_wr(ib_wr)->rkey);
3100                         set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_RDMA_LENGTH_IDX,
3101                                             ib_wr->sg_list->length);
3102                         set_wqe_64bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_FRAG0_LOW_IDX,
3103                                             ib_wr->sg_list->addr);
3104                         set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_STAG0_IDX,
3105                                             ib_wr->sg_list->lkey);
3106                         break;
3107                 case IB_WR_LOCAL_INV:
3108                         wqe_misc = NES_IWARP_SQ_OP_LOCINV;
3109                         set_wqe_32bit_value(wqe->wqe_words,
3110                                             NES_IWARP_SQ_LOCINV_WQE_INV_STAG_IDX,
3111                                             ib_wr->ex.invalidate_rkey);
3112                         break;
3113                 case IB_WR_REG_MR:
3114                 {
3115                         struct nes_mr *mr = to_nesmr(reg_wr(ib_wr)->mr);
3116                         int page_shift = ilog2(reg_wr(ib_wr)->mr->page_size);
3117                         int flags = reg_wr(ib_wr)->access;
3118
3119                         if (mr->npages > (NES_4K_PBL_CHUNK_SIZE / sizeof(u64))) {
3120                                 nes_debug(NES_DBG_IW_TX, "SQ_FMR: bad page_list_len\n");
3121                                 err = -EINVAL;
3122                                 break;
3123                         }
3124                         wqe_misc = NES_IWARP_SQ_OP_FAST_REG;
3125                         set_wqe_64bit_value(wqe->wqe_words,
3126                                             NES_IWARP_SQ_FMR_WQE_VA_FBO_LOW_IDX,
3127                                             mr->ibmr.iova);
3128                         set_wqe_32bit_value(wqe->wqe_words,
3129                                             NES_IWARP_SQ_FMR_WQE_LENGTH_LOW_IDX,
3130                                             lower_32_bits(mr->ibmr.length));
3131                         set_wqe_32bit_value(wqe->wqe_words,
3132                                             NES_IWARP_SQ_FMR_WQE_LENGTH_HIGH_IDX, 0);
3133                         set_wqe_32bit_value(wqe->wqe_words,
3134                                             NES_IWARP_SQ_FMR_WQE_MR_STAG_IDX,
3135                                             reg_wr(ib_wr)->key);
3136
3137                         if (page_shift == 12) {
3138                                 wqe_misc |= NES_IWARP_SQ_FMR_WQE_PAGE_SIZE_4K;
3139                         } else if (page_shift == 21) {
3140                                 wqe_misc |= NES_IWARP_SQ_FMR_WQE_PAGE_SIZE_2M;
3141                         } else {
3142                                 nes_debug(NES_DBG_IW_TX, "Invalid page shift,"
3143                                           " ib_wr=%u, max=1\n", ib_wr->num_sge);
3144                                 err = -EINVAL;
3145                                 break;
3146                         }
3147
3148                         /* Set access_flags */
3149                         wqe_misc |= NES_IWARP_SQ_FMR_WQE_RIGHTS_ENABLE_LOCAL_READ;
3150                         if (flags & IB_ACCESS_LOCAL_WRITE)
3151                                 wqe_misc |= NES_IWARP_SQ_FMR_WQE_RIGHTS_ENABLE_LOCAL_WRITE;
3152
3153                         if (flags & IB_ACCESS_REMOTE_WRITE)
3154                                 wqe_misc |= NES_IWARP_SQ_FMR_WQE_RIGHTS_ENABLE_REMOTE_WRITE;
3155
3156                         if (flags & IB_ACCESS_REMOTE_READ)
3157                                 wqe_misc |= NES_IWARP_SQ_FMR_WQE_RIGHTS_ENABLE_REMOTE_READ;
3158
3159                         if (flags & IB_ACCESS_MW_BIND)
3160                                 wqe_misc |= NES_IWARP_SQ_FMR_WQE_RIGHTS_ENABLE_WINDOW_BIND;
3161
3162                         /* Fill in PBL info: */
3163                         set_wqe_64bit_value(wqe->wqe_words,
3164                                             NES_IWARP_SQ_FMR_WQE_PBL_ADDR_LOW_IDX,
3165                                             mr->paddr);
3166
3167                         set_wqe_32bit_value(wqe->wqe_words,
3168                                             NES_IWARP_SQ_FMR_WQE_PBL_LENGTH_IDX,
3169                                             mr->npages * 8);
3170
3171                         nes_debug(NES_DBG_IW_TX, "SQ_REG_MR: iova_start: %llx, "
3172                                   "length: %lld, rkey: %0x, pgl_paddr: %llx, "
3173                                   "page_list_len: %u, wqe_misc: %x\n",
3174                                   (unsigned long long) mr->ibmr.iova,
3175                                   mr->ibmr.length,
3176                                   reg_wr(ib_wr)->key,
3177                                   (unsigned long long) mr->paddr,
3178                                   mr->npages,
3179                                   wqe_misc);
3180                         break;
3181                 }
3182                 default:
3183                         /* error */
3184                         err = -EINVAL;
3185                         break;
3186                 }
3187
3188                 if (err)
3189                         break;
3190
3191                 if ((ib_wr->send_flags & IB_SEND_SIGNALED) || nesqp->sig_all)
3192                         wqe_misc |= NES_IWARP_SQ_WQE_SIGNALED_COMPL;
3193
3194                 wqe->wqe_words[NES_IWARP_SQ_WQE_MISC_IDX] = cpu_to_le32(wqe_misc);
3195
3196                 ib_wr = ib_wr->next;
3197                 head++;
3198                 wqe_count++;
3199                 if (head >= qsize)
3200                         head = 0;
3201
3202         }
3203
3204         nesqp->hwqp.sq_head = head;
3205         barrier();
3206         while (wqe_count) {
3207                 counter = min(wqe_count, ((u32)255));
3208                 wqe_count -= counter;
3209                 nes_write32(nesdev->regs + NES_WQE_ALLOC,
3210                                 (counter << 24) | 0x00800000 | nesqp->hwqp.qp_id);
3211         }
3212
3213         spin_unlock_irqrestore(&nesqp->lock, flags);
3214
3215 out:
3216         if (err)
3217                 *bad_wr = ib_wr;
3218         return err;
3219 }
3220
3221
3222 /**
3223  * nes_post_recv
3224  */
3225 static int nes_post_recv(struct ib_qp *ibqp, const struct ib_recv_wr *ib_wr,
3226                          const struct ib_recv_wr **bad_wr)
3227 {
3228         u64 u64temp;
3229         unsigned long flags = 0;
3230         struct nes_vnic *nesvnic = to_nesvnic(ibqp->device);
3231         struct nes_device *nesdev = nesvnic->nesdev;
3232         struct nes_qp *nesqp = to_nesqp(ibqp);
3233         struct nes_hw_qp_wqe *wqe;
3234         int err = 0;
3235         int sge_index;
3236         u32 qsize = nesqp->hwqp.rq_size;
3237         u32 head;
3238         u32 wqe_count = 0;
3239         u32 counter;
3240         u32 total_payload_length;
3241
3242         if (nesqp->ibqp_state > IB_QPS_RTS) {
3243                 err = -EINVAL;
3244                 goto out;
3245         }
3246
3247         spin_lock_irqsave(&nesqp->lock, flags);
3248
3249         head = nesqp->hwqp.rq_head;
3250
3251         while (ib_wr) {
3252                 /* Check for QP error */
3253                 if (nesqp->term_flags) {
3254                         err = -EINVAL;
3255                         break;
3256                 }
3257
3258                 if (ib_wr->num_sge > nesdev->nesadapter->max_sge) {
3259                         err = -EINVAL;
3260                         break;
3261                 }
3262                 /* Check for RQ overflow */
3263                 if (((head + (2 * qsize) - nesqp->hwqp.rq_tail) % qsize) == (qsize - 1)) {
3264                         err = -ENOMEM;
3265                         break;
3266                 }
3267
3268                 nes_debug(NES_DBG_IW_RX, "ibwr sge count = %u.\n", ib_wr->num_sge);
3269                 wqe = &nesqp->hwqp.rq_vbase[head];
3270
3271                 /* nes_debug(NES_DBG_IW_RX, "QP%u:processing rq wqe at %p, head = %u.\n",
3272                                 nesqp->hwqp.qp_id, wqe, head); */
3273                 nes_fill_init_qp_wqe(wqe, nesqp, head);
3274                 u64temp = (u64)(ib_wr->wr_id);
3275                 set_wqe_64bit_value(wqe->wqe_words, NES_IWARP_SQ_WQE_COMP_SCRATCH_LOW_IDX,
3276                                         u64temp);
3277                 total_payload_length = 0;
3278                 for (sge_index=0; sge_index < ib_wr->num_sge; sge_index++) {
3279                         set_wqe_64bit_value(wqe->wqe_words, NES_IWARP_RQ_WQE_FRAG0_LOW_IDX+(sge_index*4),
3280                                         ib_wr->sg_list[sge_index].addr);
3281                         set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_RQ_WQE_LENGTH0_IDX+(sge_index*4),
3282                                         ib_wr->sg_list[sge_index].length);
3283                         set_wqe_32bit_value(wqe->wqe_words,NES_IWARP_RQ_WQE_STAG0_IDX+(sge_index*4),
3284                                         ib_wr->sg_list[sge_index].lkey);
3285
3286                         total_payload_length += ib_wr->sg_list[sge_index].length;
3287                 }
3288                 set_wqe_32bit_value(wqe->wqe_words, NES_IWARP_RQ_WQE_TOTAL_PAYLOAD_IDX,
3289                                         total_payload_length);
3290
3291                 ib_wr = ib_wr->next;
3292                 head++;
3293                 wqe_count++;
3294                 if (head >= qsize)
3295                         head = 0;
3296         }
3297
3298         nesqp->hwqp.rq_head = head;
3299         barrier();
3300         while (wqe_count) {
3301                 counter = min(wqe_count, ((u32)255));
3302                 wqe_count -= counter;
3303                 nes_write32(nesdev->regs+NES_WQE_ALLOC, (counter<<24) | nesqp->hwqp.qp_id);
3304         }
3305
3306         spin_unlock_irqrestore(&nesqp->lock, flags);
3307
3308 out:
3309         if (err)
3310                 *bad_wr = ib_wr;
3311         return err;
3312 }
3313
3314 /**
3315  * nes_drain_sq - drain sq
3316  * @ibqp: pointer to ibqp
3317  */
3318 static void nes_drain_sq(struct ib_qp *ibqp)
3319 {
3320         struct nes_qp *nesqp = to_nesqp(ibqp);
3321
3322         if (nesqp->hwqp.sq_tail != nesqp->hwqp.sq_head)
3323                 wait_for_completion(&nesqp->sq_drained);
3324 }
3325
3326 /**
3327  * nes_drain_rq - drain rq
3328  * @ibqp: pointer to ibqp
3329  */
3330 static void nes_drain_rq(struct ib_qp *ibqp)
3331 {
3332         struct nes_qp *nesqp = to_nesqp(ibqp);
3333
3334         if (nesqp->hwqp.rq_tail != nesqp->hwqp.rq_head)
3335                 wait_for_completion(&nesqp->rq_drained);
3336 }
3337
3338 /**
3339  * nes_poll_cq
3340  */
3341 static int nes_poll_cq(struct ib_cq *ibcq, int num_entries, struct ib_wc *entry)
3342 {
3343         u64 u64temp;
3344         u64 wrid;
3345         unsigned long flags = 0;
3346         struct nes_vnic *nesvnic = to_nesvnic(ibcq->device);
3347         struct nes_device *nesdev = nesvnic->nesdev;
3348         struct nes_cq *nescq = to_nescq(ibcq);
3349         struct nes_qp *nesqp;
3350         struct nes_hw_cqe cqe;
3351         u32 head;
3352         u32 wq_tail = 0;
3353         u32 cq_size;
3354         u32 cqe_count = 0;
3355         u32 wqe_index;
3356         u32 u32temp;
3357         u32 move_cq_head = 1;
3358         u32 err_code;
3359
3360         nes_debug(NES_DBG_CQ, "\n");
3361
3362         spin_lock_irqsave(&nescq->lock, flags);
3363
3364         head = nescq->hw_cq.cq_head;
3365         cq_size = nescq->hw_cq.cq_size;
3366
3367         while (cqe_count < num_entries) {
3368                 if ((le32_to_cpu(nescq->hw_cq.cq_vbase[head].cqe_words[NES_CQE_OPCODE_IDX]) &
3369                                 NES_CQE_VALID) == 0)
3370                         break;
3371
3372                 /*
3373                  * Make sure we read CQ entry contents *after*
3374                  * we've checked the valid bit.
3375                  */
3376                 rmb();
3377
3378                 cqe = nescq->hw_cq.cq_vbase[head];
3379                 u32temp = le32_to_cpu(cqe.cqe_words[NES_CQE_COMP_COMP_CTX_LOW_IDX]);
3380                 wqe_index = u32temp & (nesdev->nesadapter->max_qp_wr - 1);
3381                 u32temp &= ~(NES_SW_CONTEXT_ALIGN-1);
3382                 /* parse CQE, get completion context from WQE (either rq or sq) */
3383                 u64temp = (((u64)(le32_to_cpu(cqe.cqe_words[NES_CQE_COMP_COMP_CTX_HIGH_IDX])))<<32) |
3384                                 ((u64)u32temp);
3385
3386                 if (u64temp) {
3387                         nesqp = (struct nes_qp *)(unsigned long)u64temp;
3388                         memset(entry, 0, sizeof *entry);
3389                         if (cqe.cqe_words[NES_CQE_ERROR_CODE_IDX] == 0) {
3390                                 entry->status = IB_WC_SUCCESS;
3391                         } else {
3392                                 err_code = le32_to_cpu(cqe.cqe_words[NES_CQE_ERROR_CODE_IDX]);
3393                                 if (NES_IWARP_CQE_MAJOR_DRV == (err_code >> 16)) {
3394                                         entry->status = err_code & 0x0000ffff;
3395
3396                                         /* The rest of the cqe's will be marked as flushed */
3397                                         nescq->hw_cq.cq_vbase[head].cqe_words[NES_CQE_ERROR_CODE_IDX] =
3398                                                 cpu_to_le32((NES_IWARP_CQE_MAJOR_FLUSH << 16) |
3399                                                             NES_IWARP_CQE_MINOR_FLUSH);
3400                                 } else
3401                                         entry->status = IB_WC_WR_FLUSH_ERR;
3402                         }
3403
3404                         entry->qp = &nesqp->ibqp;
3405                         entry->src_qp = nesqp->hwqp.qp_id;
3406
3407                         if (le32_to_cpu(cqe.cqe_words[NES_CQE_OPCODE_IDX]) & NES_CQE_SQ) {
3408                                 if (nesqp->skip_lsmm) {
3409                                         nesqp->skip_lsmm = 0;
3410                                         nesqp->hwqp.sq_tail++;
3411                                 }
3412
3413                                 /* Working on a SQ Completion*/
3414                                 wrid = (((u64)(cpu_to_le32((u32)nesqp->hwqp.sq_vbase[wqe_index].
3415                                                 wqe_words[NES_IWARP_SQ_WQE_COMP_SCRATCH_HIGH_IDX]))) << 32) |
3416                                                 ((u64)(cpu_to_le32((u32)nesqp->hwqp.sq_vbase[wqe_index].
3417                                                 wqe_words[NES_IWARP_SQ_WQE_COMP_SCRATCH_LOW_IDX])));
3418                                 entry->byte_len = le32_to_cpu(nesqp->hwqp.sq_vbase[wqe_index].
3419                                                 wqe_words[NES_IWARP_SQ_WQE_TOTAL_PAYLOAD_IDX]);
3420
3421                                 switch (le32_to_cpu(nesqp->hwqp.sq_vbase[wqe_index].
3422                                                 wqe_words[NES_IWARP_SQ_WQE_MISC_IDX]) & 0x3f) {
3423                                         case NES_IWARP_SQ_OP_RDMAW:
3424                                                 nes_debug(NES_DBG_CQ, "Operation = RDMA WRITE.\n");
3425                                                 entry->opcode = IB_WC_RDMA_WRITE;
3426                                                 break;
3427                                         case NES_IWARP_SQ_OP_RDMAR:
3428                                                 nes_debug(NES_DBG_CQ, "Operation = RDMA READ.\n");
3429                                                 entry->opcode = IB_WC_RDMA_READ;
3430                                                 entry->byte_len = le32_to_cpu(nesqp->hwqp.sq_vbase[wqe_index].
3431                                                                 wqe_words[NES_IWARP_SQ_WQE_RDMA_LENGTH_IDX]);
3432                                                 break;
3433                                         case NES_IWARP_SQ_OP_SENDINV:
3434                                         case NES_IWARP_SQ_OP_SENDSEINV:
3435                                         case NES_IWARP_SQ_OP_SEND:
3436                                         case NES_IWARP_SQ_OP_SENDSE:
3437                                                 nes_debug(NES_DBG_CQ, "Operation = Send.\n");
3438                                                 entry->opcode = IB_WC_SEND;
3439                                                 break;
3440                                         case NES_IWARP_SQ_OP_LOCINV:
3441                                                 entry->opcode = IB_WC_LOCAL_INV;
3442                                                 break;
3443                                         case NES_IWARP_SQ_OP_FAST_REG:
3444                                                 entry->opcode = IB_WC_REG_MR;
3445                                                 break;
3446                                 }
3447
3448                                 nesqp->hwqp.sq_tail = (wqe_index+1)&(nesqp->hwqp.sq_size - 1);
3449                                 if ((entry->status != IB_WC_SUCCESS) && (nesqp->hwqp.sq_tail != nesqp->hwqp.sq_head)) {
3450                                         move_cq_head = 0;
3451                                         wq_tail = nesqp->hwqp.sq_tail;
3452                                 }
3453                         } else {
3454                                 /* Working on a RQ Completion*/
3455                                 entry->byte_len = le32_to_cpu(cqe.cqe_words[NES_CQE_PAYLOAD_LENGTH_IDX]);
3456                                 wrid = ((u64)(le32_to_cpu(nesqp->hwqp.rq_vbase[wqe_index].wqe_words[NES_IWARP_RQ_WQE_COMP_SCRATCH_LOW_IDX]))) |
3457                                         ((u64)(le32_to_cpu(nesqp->hwqp.rq_vbase[wqe_index].wqe_words[NES_IWARP_RQ_WQE_COMP_SCRATCH_HIGH_IDX]))<<32);
3458                                 entry->opcode = IB_WC_RECV;
3459
3460                                 nesqp->hwqp.rq_tail = (wqe_index+1)&(nesqp->hwqp.rq_size - 1);
3461                                 if ((entry->status != IB_WC_SUCCESS) && (nesqp->hwqp.rq_tail != nesqp->hwqp.rq_head)) {
3462                                         move_cq_head = 0;
3463                                         wq_tail = nesqp->hwqp.rq_tail;
3464                                 }
3465                         }
3466
3467                         if (nesqp->iwarp_state > NES_CQP_QP_IWARP_STATE_RTS) {
3468                                 if (nesqp->hwqp.sq_tail == nesqp->hwqp.sq_head)
3469                                         complete(&nesqp->sq_drained);
3470                                 if (nesqp->hwqp.rq_tail == nesqp->hwqp.rq_head)
3471                                         complete(&nesqp->rq_drained);
3472                         }
3473
3474                         entry->wr_id = wrid;
3475                         entry++;
3476                         cqe_count++;
3477                 }
3478
3479                 if (move_cq_head) {
3480                         nescq->hw_cq.cq_vbase[head].cqe_words[NES_CQE_OPCODE_IDX] = 0;
3481                         if (++head >= cq_size)
3482                                 head = 0;
3483                         nescq->polled_completions++;
3484
3485                         if ((nescq->polled_completions > (cq_size / 2)) ||
3486                                         (nescq->polled_completions == 255)) {
3487                                 nes_debug(NES_DBG_CQ, "CQ%u Issuing CQE Allocate since more than half of cqes"
3488                                         " are pending %u of %u.\n",
3489                                         nescq->hw_cq.cq_number, nescq->polled_completions, cq_size);
3490                                 nes_write32(nesdev->regs+NES_CQE_ALLOC,
3491                                         nescq->hw_cq.cq_number | (nescq->polled_completions << 16));
3492                                 nescq->polled_completions = 0;
3493                         }
3494                 } else {
3495                         /* Update the wqe index and set status to flush */
3496                         wqe_index = le32_to_cpu(cqe.cqe_words[NES_CQE_COMP_COMP_CTX_LOW_IDX]);
3497                         wqe_index = (wqe_index & (~(nesdev->nesadapter->max_qp_wr - 1))) | wq_tail;
3498                         nescq->hw_cq.cq_vbase[head].cqe_words[NES_CQE_COMP_COMP_CTX_LOW_IDX] =
3499                                 cpu_to_le32(wqe_index);
3500                         move_cq_head = 1; /* ready for next pass */
3501                 }
3502         }
3503
3504         if (nescq->polled_completions) {
3505                 nes_write32(nesdev->regs+NES_CQE_ALLOC,
3506                                 nescq->hw_cq.cq_number | (nescq->polled_completions << 16));
3507                 nescq->polled_completions = 0;
3508         }
3509
3510         nescq->hw_cq.cq_head = head;
3511         nes_debug(NES_DBG_CQ, "Reporting %u completions for CQ%u.\n",
3512                         cqe_count, nescq->hw_cq.cq_number);
3513
3514         spin_unlock_irqrestore(&nescq->lock, flags);
3515
3516         return cqe_count;
3517 }
3518
3519
3520 /**
3521  * nes_req_notify_cq
3522  */
3523 static int nes_req_notify_cq(struct ib_cq *ibcq, enum ib_cq_notify_flags notify_flags)
3524                 {
3525         struct nes_vnic *nesvnic = to_nesvnic(ibcq->device);
3526         struct nes_device *nesdev = nesvnic->nesdev;
3527         struct nes_cq *nescq = to_nescq(ibcq);
3528         u32 cq_arm;
3529
3530         nes_debug(NES_DBG_CQ, "Requesting notification for CQ%u.\n",
3531                         nescq->hw_cq.cq_number);
3532
3533         cq_arm = nescq->hw_cq.cq_number;
3534         if ((notify_flags & IB_CQ_SOLICITED_MASK) == IB_CQ_NEXT_COMP)
3535                 cq_arm |= NES_CQE_ALLOC_NOTIFY_NEXT;
3536         else if ((notify_flags & IB_CQ_SOLICITED_MASK) == IB_CQ_SOLICITED)
3537                 cq_arm |= NES_CQE_ALLOC_NOTIFY_SE;
3538         else
3539                 return -EINVAL;
3540
3541         nes_write32(nesdev->regs+NES_CQE_ALLOC, cq_arm);
3542         nes_read32(nesdev->regs+NES_CQE_ALLOC);
3543
3544         return 0;
3545 }
3546
3547 static int nes_port_immutable(struct ib_device *ibdev, u8 port_num,
3548                               struct ib_port_immutable *immutable)
3549 {
3550         struct ib_port_attr attr;
3551         int err;
3552
3553         immutable->core_cap_flags = RDMA_CORE_PORT_IWARP;
3554
3555         err = nes_query_port(ibdev, port_num, &attr);
3556         if (err)
3557                 return err;
3558
3559         immutable->pkey_tbl_len = attr.pkey_tbl_len;
3560         immutable->gid_tbl_len = attr.gid_tbl_len;
3561
3562         return 0;
3563 }
3564
3565 static void get_dev_fw_str(struct ib_device *dev, char *str)
3566 {
3567         struct nes_ib_device *nesibdev =
3568                         container_of(dev, struct nes_ib_device, ibdev);
3569         struct nes_vnic *nesvnic = nesibdev->nesvnic;
3570
3571         nes_debug(NES_DBG_INIT, "\n");
3572         snprintf(str, IB_FW_VERSION_NAME_MAX, "%u.%u",
3573                  (nesvnic->nesdev->nesadapter->firmware_version >> 16),
3574                  (nesvnic->nesdev->nesadapter->firmware_version & 0x000000ff));
3575 }
3576
3577 static const struct ib_device_ops nes_dev_ops = {
3578         .alloc_mr = nes_alloc_mr,
3579         .alloc_mw = nes_alloc_mw,
3580         .alloc_pd = nes_alloc_pd,
3581         .alloc_ucontext = nes_alloc_ucontext,
3582         .create_cq = nes_create_cq,
3583         .create_qp = nes_create_qp,
3584         .dealloc_mw = nes_dealloc_mw,
3585         .dealloc_pd = nes_dealloc_pd,
3586         .dealloc_ucontext = nes_dealloc_ucontext,
3587         .dereg_mr = nes_dereg_mr,
3588         .destroy_cq = nes_destroy_cq,
3589         .destroy_qp = nes_destroy_qp,
3590         .drain_rq = nes_drain_rq,
3591         .drain_sq = nes_drain_sq,
3592         .get_dev_fw_str = get_dev_fw_str,
3593         .get_dma_mr = nes_get_dma_mr,
3594         .get_port_immutable = nes_port_immutable,
3595         .map_mr_sg = nes_map_mr_sg,
3596         .mmap = nes_mmap,
3597         .modify_qp = nes_modify_qp,
3598         .poll_cq = nes_poll_cq,
3599         .post_recv = nes_post_recv,
3600         .post_send = nes_post_send,
3601         .query_device = nes_query_device,
3602         .query_gid = nes_query_gid,
3603         .query_pkey = nes_query_pkey,
3604         .query_port = nes_query_port,
3605         .query_qp = nes_query_qp,
3606         .reg_user_mr = nes_reg_user_mr,
3607         .req_notify_cq = nes_req_notify_cq,
3608         INIT_RDMA_OBJ_SIZE(ib_pd, nes_pd, ibpd),
3609 };
3610
3611 /**
3612  * nes_init_ofa_device
3613  */
3614 struct nes_ib_device *nes_init_ofa_device(struct net_device *netdev)
3615 {
3616         struct nes_ib_device *nesibdev;
3617         struct nes_vnic *nesvnic = netdev_priv(netdev);
3618         struct nes_device *nesdev = nesvnic->nesdev;
3619
3620         nesibdev = ib_alloc_device(nes_ib_device, ibdev);
3621         if (nesibdev == NULL) {
3622                 return NULL;
3623         }
3624         nesibdev->ibdev.owner = THIS_MODULE;
3625
3626         nesibdev->ibdev.node_type = RDMA_NODE_RNIC;
3627         memset(&nesibdev->ibdev.node_guid, 0, sizeof(nesibdev->ibdev.node_guid));
3628         memcpy(&nesibdev->ibdev.node_guid, netdev->dev_addr, 6);
3629
3630         nesibdev->ibdev.uverbs_cmd_mask =
3631                         (1ull << IB_USER_VERBS_CMD_GET_CONTEXT) |
3632                         (1ull << IB_USER_VERBS_CMD_QUERY_DEVICE) |
3633                         (1ull << IB_USER_VERBS_CMD_QUERY_PORT) |
3634                         (1ull << IB_USER_VERBS_CMD_ALLOC_PD) |
3635                         (1ull << IB_USER_VERBS_CMD_DEALLOC_PD) |
3636                         (1ull << IB_USER_VERBS_CMD_REG_MR) |
3637                         (1ull << IB_USER_VERBS_CMD_DEREG_MR) |
3638                         (1ull << IB_USER_VERBS_CMD_CREATE_COMP_CHANNEL) |
3639                         (1ull << IB_USER_VERBS_CMD_CREATE_CQ) |
3640                         (1ull << IB_USER_VERBS_CMD_DESTROY_CQ) |
3641                         (1ull << IB_USER_VERBS_CMD_CREATE_AH) |
3642                         (1ull << IB_USER_VERBS_CMD_DESTROY_AH) |
3643                         (1ull << IB_USER_VERBS_CMD_REQ_NOTIFY_CQ) |
3644                         (1ull << IB_USER_VERBS_CMD_CREATE_QP) |
3645                         (1ull << IB_USER_VERBS_CMD_MODIFY_QP) |
3646                         (1ull << IB_USER_VERBS_CMD_POLL_CQ) |
3647                         (1ull << IB_USER_VERBS_CMD_DESTROY_QP) |
3648                         (1ull << IB_USER_VERBS_CMD_ALLOC_MW) |
3649                         (1ull << IB_USER_VERBS_CMD_BIND_MW) |
3650                         (1ull << IB_USER_VERBS_CMD_DEALLOC_MW) |
3651                         (1ull << IB_USER_VERBS_CMD_POST_RECV) |
3652                         (1ull << IB_USER_VERBS_CMD_POST_SEND);
3653
3654         nesibdev->ibdev.phys_port_cnt = 1;
3655         nesibdev->ibdev.num_comp_vectors = 1;
3656         nesibdev->ibdev.dev.parent = &nesdev->pcidev->dev;
3657
3658         nesibdev->ibdev.iwcm = kzalloc(sizeof(*nesibdev->ibdev.iwcm), GFP_KERNEL);
3659         if (nesibdev->ibdev.iwcm == NULL) {
3660                 ib_dealloc_device(&nesibdev->ibdev);
3661                 return NULL;
3662         }
3663         nesibdev->ibdev.iwcm->add_ref = nes_add_ref;
3664         nesibdev->ibdev.iwcm->rem_ref = nes_rem_ref;
3665         nesibdev->ibdev.iwcm->get_qp = nes_get_qp;
3666         nesibdev->ibdev.iwcm->connect = nes_connect;
3667         nesibdev->ibdev.iwcm->accept = nes_accept;
3668         nesibdev->ibdev.iwcm->reject = nes_reject;
3669         nesibdev->ibdev.iwcm->create_listen = nes_create_listen;
3670         nesibdev->ibdev.iwcm->destroy_listen = nes_destroy_listen;
3671
3672         ib_set_device_ops(&nesibdev->ibdev, &nes_dev_ops);
3673         memcpy(nesibdev->ibdev.iwcm->ifname, netdev->name,
3674                sizeof(nesibdev->ibdev.iwcm->ifname));
3675
3676         return nesibdev;
3677 }
3678
3679
3680 /**
3681  * nes_handle_delayed_event
3682  */
3683 static void nes_handle_delayed_event(struct timer_list *t)
3684 {
3685         struct nes_vnic *nesvnic = from_timer(nesvnic, t, event_timer);
3686
3687         if (nesvnic->delayed_event != nesvnic->last_dispatched_event) {
3688                 struct ib_event event;
3689
3690                 event.device = &nesvnic->nesibdev->ibdev;
3691                 if (!event.device)
3692                         goto stop_timer;
3693                 event.event = nesvnic->delayed_event;
3694                 event.element.port_num = nesvnic->logical_port + 1;
3695                 ib_dispatch_event(&event);
3696         }
3697
3698 stop_timer:
3699         nesvnic->event_timer.function = NULL;
3700 }
3701
3702
3703 void  nes_port_ibevent(struct nes_vnic *nesvnic)
3704 {
3705         struct nes_ib_device *nesibdev = nesvnic->nesibdev;
3706         struct nes_device *nesdev = nesvnic->nesdev;
3707         struct ib_event event;
3708         event.device = &nesibdev->ibdev;
3709         event.element.port_num = nesvnic->logical_port + 1;
3710         event.event = nesdev->iw_status ? IB_EVENT_PORT_ACTIVE : IB_EVENT_PORT_ERR;
3711
3712         if (!nesvnic->event_timer.function) {
3713                 ib_dispatch_event(&event);
3714                 nesvnic->last_dispatched_event = event.event;
3715                 nesvnic->event_timer.function = nes_handle_delayed_event;
3716                 nesvnic->event_timer.expires = jiffies + NES_EVENT_DELAY;
3717                 add_timer(&nesvnic->event_timer);
3718         } else {
3719                 mod_timer(&nesvnic->event_timer, jiffies + NES_EVENT_DELAY);
3720         }
3721         nesvnic->delayed_event = event.event;
3722 }
3723
3724
3725 /**
3726  * nes_destroy_ofa_device
3727  */
3728 void nes_destroy_ofa_device(struct nes_ib_device *nesibdev)
3729 {
3730         if (nesibdev == NULL)
3731                 return;
3732
3733         nes_unregister_ofa_device(nesibdev);
3734
3735         kfree(nesibdev->ibdev.iwcm);
3736         ib_dealloc_device(&nesibdev->ibdev);
3737 }
3738
3739
3740 /**
3741  * nes_register_ofa_device
3742  */
3743 int nes_register_ofa_device(struct nes_ib_device *nesibdev)
3744 {
3745         struct nes_vnic *nesvnic = nesibdev->nesvnic;
3746         struct nes_device *nesdev = nesvnic->nesdev;
3747         struct nes_adapter *nesadapter = nesdev->nesadapter;
3748         int ret;
3749
3750         rdma_set_device_sysfs_group(&nesvnic->nesibdev->ibdev, &nes_attr_group);
3751         nesvnic->nesibdev->ibdev.driver_id = RDMA_DRIVER_NES;
3752         ret = ib_register_device(&nesvnic->nesibdev->ibdev, "nes%d");
3753         if (ret) {
3754                 return ret;
3755         }
3756
3757         /* Get the resources allocated to this device */
3758         nesibdev->max_cq = (nesadapter->max_cq-NES_FIRST_QPN) / nesadapter->port_count;
3759         nesibdev->max_mr = nesadapter->max_mr / nesadapter->port_count;
3760         nesibdev->max_qp = (nesadapter->max_qp-NES_FIRST_QPN) / nesadapter->port_count;
3761         nesibdev->max_pd = nesadapter->max_pd / nesadapter->port_count;
3762
3763         nesvnic->of_device_registered = 1;
3764
3765         return 0;
3766 }
3767
3768
3769 /**
3770  * nes_unregister_ofa_device
3771  */
3772 static void nes_unregister_ofa_device(struct nes_ib_device *nesibdev)
3773 {
3774         struct nes_vnic *nesvnic = nesibdev->nesvnic;
3775
3776         if (nesvnic->of_device_registered)
3777                 ib_unregister_device(&nesibdev->ibdev);
3778
3779         nesvnic->of_device_registered = 0;
3780 }