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