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