]> git.proxmox.com Git - mirror_ubuntu-artful-kernel.git/blob - drivers/infiniband/hw/ehca/ehca_mrmw.c
Pull percpu-dtc into release branch
[mirror_ubuntu-artful-kernel.git] / drivers / infiniband / hw / ehca / ehca_mrmw.c
1 /*
2 * IBM eServer eHCA Infiniband device driver for Linux on POWER
3 *
4 * MR/MW functions
5 *
6 * Authors: Dietmar Decker <ddecker@de.ibm.com>
7 * Christoph Raisch <raisch@de.ibm.com>
8 *
9 * Copyright (c) 2005 IBM Corporation
10 *
11 * All rights reserved.
12 *
13 * This source code is distributed under a dual license of GPL v2.0 and OpenIB
14 * BSD.
15 *
16 * OpenIB BSD License
17 *
18 * Redistribution and use in source and binary forms, with or without
19 * modification, are permitted provided that the following conditions are met:
20 *
21 * Redistributions of source code must retain the above copyright notice, this
22 * list of conditions and the following disclaimer.
23 *
24 * Redistributions in binary form must reproduce the above copyright notice,
25 * this list of conditions and the following disclaimer in the documentation
26 * and/or other materials
27 * provided with the distribution.
28 *
29 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
30 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
31 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
32 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
33 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
34 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
35 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
36 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
37 * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
38 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
39 * POSSIBILITY OF SUCH DAMAGE.
40 */
41
42 #include <asm/current.h>
43
44 #include "ehca_iverbs.h"
45 #include "ehca_mrmw.h"
46 #include "hcp_if.h"
47 #include "hipz_hw.h"
48
49 static struct kmem_cache *mr_cache;
50 static struct kmem_cache *mw_cache;
51
52 static struct ehca_mr *ehca_mr_new(void)
53 {
54 struct ehca_mr *me;
55
56 me = kmem_cache_zalloc(mr_cache, GFP_KERNEL);
57 if (me) {
58 spin_lock_init(&me->mrlock);
59 } else
60 ehca_gen_err("alloc failed");
61
62 return me;
63 }
64
65 static void ehca_mr_delete(struct ehca_mr *me)
66 {
67 kmem_cache_free(mr_cache, me);
68 }
69
70 static struct ehca_mw *ehca_mw_new(void)
71 {
72 struct ehca_mw *me;
73
74 me = kmem_cache_zalloc(mw_cache, GFP_KERNEL);
75 if (me) {
76 spin_lock_init(&me->mwlock);
77 } else
78 ehca_gen_err("alloc failed");
79
80 return me;
81 }
82
83 static void ehca_mw_delete(struct ehca_mw *me)
84 {
85 kmem_cache_free(mw_cache, me);
86 }
87
88 /*----------------------------------------------------------------------*/
89
90 struct ib_mr *ehca_get_dma_mr(struct ib_pd *pd, int mr_access_flags)
91 {
92 struct ib_mr *ib_mr;
93 int ret;
94 struct ehca_mr *e_maxmr;
95 struct ehca_pd *e_pd = container_of(pd, struct ehca_pd, ib_pd);
96 struct ehca_shca *shca =
97 container_of(pd->device, struct ehca_shca, ib_device);
98
99 if (shca->maxmr) {
100 e_maxmr = ehca_mr_new();
101 if (!e_maxmr) {
102 ehca_err(&shca->ib_device, "out of memory");
103 ib_mr = ERR_PTR(-ENOMEM);
104 goto get_dma_mr_exit0;
105 }
106
107 ret = ehca_reg_maxmr(shca, e_maxmr, (u64*)KERNELBASE,
108 mr_access_flags, e_pd,
109 &e_maxmr->ib.ib_mr.lkey,
110 &e_maxmr->ib.ib_mr.rkey);
111 if (ret) {
112 ib_mr = ERR_PTR(ret);
113 goto get_dma_mr_exit0;
114 }
115 ib_mr = &e_maxmr->ib.ib_mr;
116 } else {
117 ehca_err(&shca->ib_device, "no internal max-MR exist!");
118 ib_mr = ERR_PTR(-EINVAL);
119 goto get_dma_mr_exit0;
120 }
121
122 get_dma_mr_exit0:
123 if (IS_ERR(ib_mr))
124 ehca_err(&shca->ib_device, "rc=%lx pd=%p mr_access_flags=%x ",
125 PTR_ERR(ib_mr), pd, mr_access_flags);
126 return ib_mr;
127 } /* end ehca_get_dma_mr() */
128
129 /*----------------------------------------------------------------------*/
130
131 struct ib_mr *ehca_reg_phys_mr(struct ib_pd *pd,
132 struct ib_phys_buf *phys_buf_array,
133 int num_phys_buf,
134 int mr_access_flags,
135 u64 *iova_start)
136 {
137 struct ib_mr *ib_mr;
138 int ret;
139 struct ehca_mr *e_mr;
140 struct ehca_shca *shca =
141 container_of(pd->device, struct ehca_shca, ib_device);
142 struct ehca_pd *e_pd = container_of(pd, struct ehca_pd, ib_pd);
143
144 u64 size;
145 struct ehca_mr_pginfo pginfo={0,0,0,0,0,0,0,NULL,0,NULL,NULL,0,NULL,0};
146 u32 num_pages_mr;
147 u32 num_pages_4k; /* 4k portion "pages" */
148
149 if ((num_phys_buf <= 0) || !phys_buf_array) {
150 ehca_err(pd->device, "bad input values: num_phys_buf=%x "
151 "phys_buf_array=%p", num_phys_buf, phys_buf_array);
152 ib_mr = ERR_PTR(-EINVAL);
153 goto reg_phys_mr_exit0;
154 }
155 if (((mr_access_flags & IB_ACCESS_REMOTE_WRITE) &&
156 !(mr_access_flags & IB_ACCESS_LOCAL_WRITE)) ||
157 ((mr_access_flags & IB_ACCESS_REMOTE_ATOMIC) &&
158 !(mr_access_flags & IB_ACCESS_LOCAL_WRITE))) {
159 /*
160 * Remote Write Access requires Local Write Access
161 * Remote Atomic Access requires Local Write Access
162 */
163 ehca_err(pd->device, "bad input values: mr_access_flags=%x",
164 mr_access_flags);
165 ib_mr = ERR_PTR(-EINVAL);
166 goto reg_phys_mr_exit0;
167 }
168
169 /* check physical buffer list and calculate size */
170 ret = ehca_mr_chk_buf_and_calc_size(phys_buf_array, num_phys_buf,
171 iova_start, &size);
172 if (ret) {
173 ib_mr = ERR_PTR(ret);
174 goto reg_phys_mr_exit0;
175 }
176 if ((size == 0) ||
177 (((u64)iova_start + size) < (u64)iova_start)) {
178 ehca_err(pd->device, "bad input values: size=%lx iova_start=%p",
179 size, iova_start);
180 ib_mr = ERR_PTR(-EINVAL);
181 goto reg_phys_mr_exit0;
182 }
183
184 e_mr = ehca_mr_new();
185 if (!e_mr) {
186 ehca_err(pd->device, "out of memory");
187 ib_mr = ERR_PTR(-ENOMEM);
188 goto reg_phys_mr_exit0;
189 }
190
191 /* determine number of MR pages */
192 num_pages_mr = ((((u64)iova_start % PAGE_SIZE) + size +
193 PAGE_SIZE - 1) / PAGE_SIZE);
194 num_pages_4k = ((((u64)iova_start % EHCA_PAGESIZE) + size +
195 EHCA_PAGESIZE - 1) / EHCA_PAGESIZE);
196
197 /* register MR on HCA */
198 if (ehca_mr_is_maxmr(size, iova_start)) {
199 e_mr->flags |= EHCA_MR_FLAG_MAXMR;
200 ret = ehca_reg_maxmr(shca, e_mr, iova_start, mr_access_flags,
201 e_pd, &e_mr->ib.ib_mr.lkey,
202 &e_mr->ib.ib_mr.rkey);
203 if (ret) {
204 ib_mr = ERR_PTR(ret);
205 goto reg_phys_mr_exit1;
206 }
207 } else {
208 pginfo.type = EHCA_MR_PGI_PHYS;
209 pginfo.num_pages = num_pages_mr;
210 pginfo.num_4k = num_pages_4k;
211 pginfo.num_phys_buf = num_phys_buf;
212 pginfo.phys_buf_array = phys_buf_array;
213 pginfo.next_4k = (((u64)iova_start & ~PAGE_MASK) /
214 EHCA_PAGESIZE);
215
216 ret = ehca_reg_mr(shca, e_mr, iova_start, size, mr_access_flags,
217 e_pd, &pginfo, &e_mr->ib.ib_mr.lkey,
218 &e_mr->ib.ib_mr.rkey);
219 if (ret) {
220 ib_mr = ERR_PTR(ret);
221 goto reg_phys_mr_exit1;
222 }
223 }
224
225 /* successful registration of all pages */
226 return &e_mr->ib.ib_mr;
227
228 reg_phys_mr_exit1:
229 ehca_mr_delete(e_mr);
230 reg_phys_mr_exit0:
231 if (IS_ERR(ib_mr))
232 ehca_err(pd->device, "rc=%lx pd=%p phys_buf_array=%p "
233 "num_phys_buf=%x mr_access_flags=%x iova_start=%p",
234 PTR_ERR(ib_mr), pd, phys_buf_array,
235 num_phys_buf, mr_access_flags, iova_start);
236 return ib_mr;
237 } /* end ehca_reg_phys_mr() */
238
239 /*----------------------------------------------------------------------*/
240
241 struct ib_mr *ehca_reg_user_mr(struct ib_pd *pd,
242 struct ib_umem *region,
243 int mr_access_flags,
244 struct ib_udata *udata)
245 {
246 struct ib_mr *ib_mr;
247 struct ehca_mr *e_mr;
248 struct ehca_shca *shca =
249 container_of(pd->device, struct ehca_shca, ib_device);
250 struct ehca_pd *e_pd = container_of(pd, struct ehca_pd, ib_pd);
251 struct ehca_mr_pginfo pginfo={0,0,0,0,0,0,0,NULL,0,NULL,NULL,0,NULL,0};
252 int ret;
253 u32 num_pages_mr;
254 u32 num_pages_4k; /* 4k portion "pages" */
255
256 if (!pd) {
257 ehca_gen_err("bad pd=%p", pd);
258 return ERR_PTR(-EFAULT);
259 }
260 if (!region) {
261 ehca_err(pd->device, "bad input values: region=%p", region);
262 ib_mr = ERR_PTR(-EINVAL);
263 goto reg_user_mr_exit0;
264 }
265 if (((mr_access_flags & IB_ACCESS_REMOTE_WRITE) &&
266 !(mr_access_flags & IB_ACCESS_LOCAL_WRITE)) ||
267 ((mr_access_flags & IB_ACCESS_REMOTE_ATOMIC) &&
268 !(mr_access_flags & IB_ACCESS_LOCAL_WRITE))) {
269 /*
270 * Remote Write Access requires Local Write Access
271 * Remote Atomic Access requires Local Write Access
272 */
273 ehca_err(pd->device, "bad input values: mr_access_flags=%x",
274 mr_access_flags);
275 ib_mr = ERR_PTR(-EINVAL);
276 goto reg_user_mr_exit0;
277 }
278 if (region->page_size != PAGE_SIZE) {
279 ehca_err(pd->device, "page size not supported, "
280 "region->page_size=%x", region->page_size);
281 ib_mr = ERR_PTR(-EINVAL);
282 goto reg_user_mr_exit0;
283 }
284
285 if ((region->length == 0) ||
286 ((region->virt_base + region->length) < region->virt_base)) {
287 ehca_err(pd->device, "bad input values: length=%lx "
288 "virt_base=%lx", region->length, region->virt_base);
289 ib_mr = ERR_PTR(-EINVAL);
290 goto reg_user_mr_exit0;
291 }
292
293 e_mr = ehca_mr_new();
294 if (!e_mr) {
295 ehca_err(pd->device, "out of memory");
296 ib_mr = ERR_PTR(-ENOMEM);
297 goto reg_user_mr_exit0;
298 }
299
300 /* determine number of MR pages */
301 num_pages_mr = (((region->virt_base % PAGE_SIZE) + region->length +
302 PAGE_SIZE - 1) / PAGE_SIZE);
303 num_pages_4k = (((region->virt_base % EHCA_PAGESIZE) + region->length +
304 EHCA_PAGESIZE - 1) / EHCA_PAGESIZE);
305
306 /* register MR on HCA */
307 pginfo.type = EHCA_MR_PGI_USER;
308 pginfo.num_pages = num_pages_mr;
309 pginfo.num_4k = num_pages_4k;
310 pginfo.region = region;
311 pginfo.next_4k = region->offset / EHCA_PAGESIZE;
312 pginfo.next_chunk = list_prepare_entry(pginfo.next_chunk,
313 (&region->chunk_list),
314 list);
315
316 ret = ehca_reg_mr(shca, e_mr, (u64*)region->virt_base,
317 region->length, mr_access_flags, e_pd, &pginfo,
318 &e_mr->ib.ib_mr.lkey, &e_mr->ib.ib_mr.rkey);
319 if (ret) {
320 ib_mr = ERR_PTR(ret);
321 goto reg_user_mr_exit1;
322 }
323
324 /* successful registration of all pages */
325 return &e_mr->ib.ib_mr;
326
327 reg_user_mr_exit1:
328 ehca_mr_delete(e_mr);
329 reg_user_mr_exit0:
330 if (IS_ERR(ib_mr))
331 ehca_err(pd->device, "rc=%lx pd=%p region=%p mr_access_flags=%x"
332 " udata=%p",
333 PTR_ERR(ib_mr), pd, region, mr_access_flags, udata);
334 return ib_mr;
335 } /* end ehca_reg_user_mr() */
336
337 /*----------------------------------------------------------------------*/
338
339 int ehca_rereg_phys_mr(struct ib_mr *mr,
340 int mr_rereg_mask,
341 struct ib_pd *pd,
342 struct ib_phys_buf *phys_buf_array,
343 int num_phys_buf,
344 int mr_access_flags,
345 u64 *iova_start)
346 {
347 int ret;
348
349 struct ehca_shca *shca =
350 container_of(mr->device, struct ehca_shca, ib_device);
351 struct ehca_mr *e_mr = container_of(mr, struct ehca_mr, ib.ib_mr);
352 struct ehca_pd *my_pd = container_of(mr->pd, struct ehca_pd, ib_pd);
353 u64 new_size;
354 u64 *new_start;
355 u32 new_acl;
356 struct ehca_pd *new_pd;
357 u32 tmp_lkey, tmp_rkey;
358 unsigned long sl_flags;
359 u32 num_pages_mr = 0;
360 u32 num_pages_4k = 0; /* 4k portion "pages" */
361 struct ehca_mr_pginfo pginfo={0,0,0,0,0,0,0,NULL,0,NULL,NULL,0,NULL,0};
362 u32 cur_pid = current->tgid;
363
364 if (my_pd->ib_pd.uobject && my_pd->ib_pd.uobject->context &&
365 (my_pd->ownpid != cur_pid)) {
366 ehca_err(mr->device, "Invalid caller pid=%x ownpid=%x",
367 cur_pid, my_pd->ownpid);
368 ret = -EINVAL;
369 goto rereg_phys_mr_exit0;
370 }
371
372 if (!(mr_rereg_mask & IB_MR_REREG_TRANS)) {
373 /* TODO not supported, because PHYP rereg hCall needs pages */
374 ehca_err(mr->device, "rereg without IB_MR_REREG_TRANS not "
375 "supported yet, mr_rereg_mask=%x", mr_rereg_mask);
376 ret = -EINVAL;
377 goto rereg_phys_mr_exit0;
378 }
379
380 if (mr_rereg_mask & IB_MR_REREG_PD) {
381 if (!pd) {
382 ehca_err(mr->device, "rereg with bad pd, pd=%p "
383 "mr_rereg_mask=%x", pd, mr_rereg_mask);
384 ret = -EINVAL;
385 goto rereg_phys_mr_exit0;
386 }
387 }
388
389 if ((mr_rereg_mask &
390 ~(IB_MR_REREG_TRANS | IB_MR_REREG_PD | IB_MR_REREG_ACCESS)) ||
391 (mr_rereg_mask == 0)) {
392 ret = -EINVAL;
393 goto rereg_phys_mr_exit0;
394 }
395
396 /* check other parameters */
397 if (e_mr == shca->maxmr) {
398 /* should be impossible, however reject to be sure */
399 ehca_err(mr->device, "rereg internal max-MR impossible, mr=%p "
400 "shca->maxmr=%p mr->lkey=%x",
401 mr, shca->maxmr, mr->lkey);
402 ret = -EINVAL;
403 goto rereg_phys_mr_exit0;
404 }
405 if (mr_rereg_mask & IB_MR_REREG_TRANS) { /* transl., i.e. addr/size */
406 if (e_mr->flags & EHCA_MR_FLAG_FMR) {
407 ehca_err(mr->device, "not supported for FMR, mr=%p "
408 "flags=%x", mr, e_mr->flags);
409 ret = -EINVAL;
410 goto rereg_phys_mr_exit0;
411 }
412 if (!phys_buf_array || num_phys_buf <= 0) {
413 ehca_err(mr->device, "bad input values: mr_rereg_mask=%x"
414 " phys_buf_array=%p num_phys_buf=%x",
415 mr_rereg_mask, phys_buf_array, num_phys_buf);
416 ret = -EINVAL;
417 goto rereg_phys_mr_exit0;
418 }
419 }
420 if ((mr_rereg_mask & IB_MR_REREG_ACCESS) && /* change ACL */
421 (((mr_access_flags & IB_ACCESS_REMOTE_WRITE) &&
422 !(mr_access_flags & IB_ACCESS_LOCAL_WRITE)) ||
423 ((mr_access_flags & IB_ACCESS_REMOTE_ATOMIC) &&
424 !(mr_access_flags & IB_ACCESS_LOCAL_WRITE)))) {
425 /*
426 * Remote Write Access requires Local Write Access
427 * Remote Atomic Access requires Local Write Access
428 */
429 ehca_err(mr->device, "bad input values: mr_rereg_mask=%x "
430 "mr_access_flags=%x", mr_rereg_mask, mr_access_flags);
431 ret = -EINVAL;
432 goto rereg_phys_mr_exit0;
433 }
434
435 /* set requested values dependent on rereg request */
436 spin_lock_irqsave(&e_mr->mrlock, sl_flags);
437 new_start = e_mr->start; /* new == old address */
438 new_size = e_mr->size; /* new == old length */
439 new_acl = e_mr->acl; /* new == old access control */
440 new_pd = container_of(mr->pd,struct ehca_pd,ib_pd); /*new == old PD*/
441
442 if (mr_rereg_mask & IB_MR_REREG_TRANS) {
443 new_start = iova_start; /* change address */
444 /* check physical buffer list and calculate size */
445 ret = ehca_mr_chk_buf_and_calc_size(phys_buf_array,
446 num_phys_buf, iova_start,
447 &new_size);
448 if (ret)
449 goto rereg_phys_mr_exit1;
450 if ((new_size == 0) ||
451 (((u64)iova_start + new_size) < (u64)iova_start)) {
452 ehca_err(mr->device, "bad input values: new_size=%lx "
453 "iova_start=%p", new_size, iova_start);
454 ret = -EINVAL;
455 goto rereg_phys_mr_exit1;
456 }
457 num_pages_mr = ((((u64)new_start % PAGE_SIZE) + new_size +
458 PAGE_SIZE - 1) / PAGE_SIZE);
459 num_pages_4k = ((((u64)new_start % EHCA_PAGESIZE) + new_size +
460 EHCA_PAGESIZE - 1) / EHCA_PAGESIZE);
461 pginfo.type = EHCA_MR_PGI_PHYS;
462 pginfo.num_pages = num_pages_mr;
463 pginfo.num_4k = num_pages_4k;
464 pginfo.num_phys_buf = num_phys_buf;
465 pginfo.phys_buf_array = phys_buf_array;
466 pginfo.next_4k = (((u64)iova_start & ~PAGE_MASK) /
467 EHCA_PAGESIZE);
468 }
469 if (mr_rereg_mask & IB_MR_REREG_ACCESS)
470 new_acl = mr_access_flags;
471 if (mr_rereg_mask & IB_MR_REREG_PD)
472 new_pd = container_of(pd, struct ehca_pd, ib_pd);
473
474 ret = ehca_rereg_mr(shca, e_mr, new_start, new_size, new_acl,
475 new_pd, &pginfo, &tmp_lkey, &tmp_rkey);
476 if (ret)
477 goto rereg_phys_mr_exit1;
478
479 /* successful reregistration */
480 if (mr_rereg_mask & IB_MR_REREG_PD)
481 mr->pd = pd;
482 mr->lkey = tmp_lkey;
483 mr->rkey = tmp_rkey;
484
485 rereg_phys_mr_exit1:
486 spin_unlock_irqrestore(&e_mr->mrlock, sl_flags);
487 rereg_phys_mr_exit0:
488 if (ret)
489 ehca_err(mr->device, "ret=%x mr=%p mr_rereg_mask=%x pd=%p "
490 "phys_buf_array=%p num_phys_buf=%x mr_access_flags=%x "
491 "iova_start=%p",
492 ret, mr, mr_rereg_mask, pd, phys_buf_array,
493 num_phys_buf, mr_access_flags, iova_start);
494 return ret;
495 } /* end ehca_rereg_phys_mr() */
496
497 /*----------------------------------------------------------------------*/
498
499 int ehca_query_mr(struct ib_mr *mr, struct ib_mr_attr *mr_attr)
500 {
501 int ret = 0;
502 u64 h_ret;
503 struct ehca_shca *shca =
504 container_of(mr->device, struct ehca_shca, ib_device);
505 struct ehca_mr *e_mr = container_of(mr, struct ehca_mr, ib.ib_mr);
506 struct ehca_pd *my_pd = container_of(mr->pd, struct ehca_pd, ib_pd);
507 u32 cur_pid = current->tgid;
508 unsigned long sl_flags;
509 struct ehca_mr_hipzout_parms hipzout = {{0},0,0,0,0,0};
510
511 if (my_pd->ib_pd.uobject && my_pd->ib_pd.uobject->context &&
512 (my_pd->ownpid != cur_pid)) {
513 ehca_err(mr->device, "Invalid caller pid=%x ownpid=%x",
514 cur_pid, my_pd->ownpid);
515 ret = -EINVAL;
516 goto query_mr_exit0;
517 }
518
519 if ((e_mr->flags & EHCA_MR_FLAG_FMR)) {
520 ehca_err(mr->device, "not supported for FMR, mr=%p e_mr=%p "
521 "e_mr->flags=%x", mr, e_mr, e_mr->flags);
522 ret = -EINVAL;
523 goto query_mr_exit0;
524 }
525
526 memset(mr_attr, 0, sizeof(struct ib_mr_attr));
527 spin_lock_irqsave(&e_mr->mrlock, sl_flags);
528
529 h_ret = hipz_h_query_mr(shca->ipz_hca_handle, e_mr, &hipzout);
530 if (h_ret != H_SUCCESS) {
531 ehca_err(mr->device, "hipz_mr_query failed, h_ret=%lx mr=%p "
532 "hca_hndl=%lx mr_hndl=%lx lkey=%x",
533 h_ret, mr, shca->ipz_hca_handle.handle,
534 e_mr->ipz_mr_handle.handle, mr->lkey);
535 ret = ehca_mrmw_map_hrc_query_mr(h_ret);
536 goto query_mr_exit1;
537 }
538 mr_attr->pd = mr->pd;
539 mr_attr->device_virt_addr = hipzout.vaddr;
540 mr_attr->size = hipzout.len;
541 mr_attr->lkey = hipzout.lkey;
542 mr_attr->rkey = hipzout.rkey;
543 ehca_mrmw_reverse_map_acl(&hipzout.acl, &mr_attr->mr_access_flags);
544
545 query_mr_exit1:
546 spin_unlock_irqrestore(&e_mr->mrlock, sl_flags);
547 query_mr_exit0:
548 if (ret)
549 ehca_err(mr->device, "ret=%x mr=%p mr_attr=%p",
550 ret, mr, mr_attr);
551 return ret;
552 } /* end ehca_query_mr() */
553
554 /*----------------------------------------------------------------------*/
555
556 int ehca_dereg_mr(struct ib_mr *mr)
557 {
558 int ret = 0;
559 u64 h_ret;
560 struct ehca_shca *shca =
561 container_of(mr->device, struct ehca_shca, ib_device);
562 struct ehca_mr *e_mr = container_of(mr, struct ehca_mr, ib.ib_mr);
563 struct ehca_pd *my_pd = container_of(mr->pd, struct ehca_pd, ib_pd);
564 u32 cur_pid = current->tgid;
565
566 if (my_pd->ib_pd.uobject && my_pd->ib_pd.uobject->context &&
567 (my_pd->ownpid != cur_pid)) {
568 ehca_err(mr->device, "Invalid caller pid=%x ownpid=%x",
569 cur_pid, my_pd->ownpid);
570 ret = -EINVAL;
571 goto dereg_mr_exit0;
572 }
573
574 if ((e_mr->flags & EHCA_MR_FLAG_FMR)) {
575 ehca_err(mr->device, "not supported for FMR, mr=%p e_mr=%p "
576 "e_mr->flags=%x", mr, e_mr, e_mr->flags);
577 ret = -EINVAL;
578 goto dereg_mr_exit0;
579 } else if (e_mr == shca->maxmr) {
580 /* should be impossible, however reject to be sure */
581 ehca_err(mr->device, "dereg internal max-MR impossible, mr=%p "
582 "shca->maxmr=%p mr->lkey=%x",
583 mr, shca->maxmr, mr->lkey);
584 ret = -EINVAL;
585 goto dereg_mr_exit0;
586 }
587
588 /* TODO: BUSY: MR still has bound window(s) */
589 h_ret = hipz_h_free_resource_mr(shca->ipz_hca_handle, e_mr);
590 if (h_ret != H_SUCCESS) {
591 ehca_err(mr->device, "hipz_free_mr failed, h_ret=%lx shca=%p "
592 "e_mr=%p hca_hndl=%lx mr_hndl=%lx mr->lkey=%x",
593 h_ret, shca, e_mr, shca->ipz_hca_handle.handle,
594 e_mr->ipz_mr_handle.handle, mr->lkey);
595 ret = ehca_mrmw_map_hrc_free_mr(h_ret);
596 goto dereg_mr_exit0;
597 }
598
599 /* successful deregistration */
600 ehca_mr_delete(e_mr);
601
602 dereg_mr_exit0:
603 if (ret)
604 ehca_err(mr->device, "ret=%x mr=%p", ret, mr);
605 return ret;
606 } /* end ehca_dereg_mr() */
607
608 /*----------------------------------------------------------------------*/
609
610 struct ib_mw *ehca_alloc_mw(struct ib_pd *pd)
611 {
612 struct ib_mw *ib_mw;
613 u64 h_ret;
614 struct ehca_mw *e_mw;
615 struct ehca_pd *e_pd = container_of(pd, struct ehca_pd, ib_pd);
616 struct ehca_shca *shca =
617 container_of(pd->device, struct ehca_shca, ib_device);
618 struct ehca_mw_hipzout_parms hipzout = {{0},0};
619
620 e_mw = ehca_mw_new();
621 if (!e_mw) {
622 ib_mw = ERR_PTR(-ENOMEM);
623 goto alloc_mw_exit0;
624 }
625
626 h_ret = hipz_h_alloc_resource_mw(shca->ipz_hca_handle, e_mw,
627 e_pd->fw_pd, &hipzout);
628 if (h_ret != H_SUCCESS) {
629 ehca_err(pd->device, "hipz_mw_allocate failed, h_ret=%lx "
630 "shca=%p hca_hndl=%lx mw=%p",
631 h_ret, shca, shca->ipz_hca_handle.handle, e_mw);
632 ib_mw = ERR_PTR(ehca_mrmw_map_hrc_alloc(h_ret));
633 goto alloc_mw_exit1;
634 }
635 /* successful MW allocation */
636 e_mw->ipz_mw_handle = hipzout.handle;
637 e_mw->ib_mw.rkey = hipzout.rkey;
638 return &e_mw->ib_mw;
639
640 alloc_mw_exit1:
641 ehca_mw_delete(e_mw);
642 alloc_mw_exit0:
643 if (IS_ERR(ib_mw))
644 ehca_err(pd->device, "rc=%lx pd=%p", PTR_ERR(ib_mw), pd);
645 return ib_mw;
646 } /* end ehca_alloc_mw() */
647
648 /*----------------------------------------------------------------------*/
649
650 int ehca_bind_mw(struct ib_qp *qp,
651 struct ib_mw *mw,
652 struct ib_mw_bind *mw_bind)
653 {
654 /* TODO: not supported up to now */
655 ehca_gen_err("bind MW currently not supported by HCAD");
656
657 return -EPERM;
658 } /* end ehca_bind_mw() */
659
660 /*----------------------------------------------------------------------*/
661
662 int ehca_dealloc_mw(struct ib_mw *mw)
663 {
664 u64 h_ret;
665 struct ehca_shca *shca =
666 container_of(mw->device, struct ehca_shca, ib_device);
667 struct ehca_mw *e_mw = container_of(mw, struct ehca_mw, ib_mw);
668
669 h_ret = hipz_h_free_resource_mw(shca->ipz_hca_handle, e_mw);
670 if (h_ret != H_SUCCESS) {
671 ehca_err(mw->device, "hipz_free_mw failed, h_ret=%lx shca=%p "
672 "mw=%p rkey=%x hca_hndl=%lx mw_hndl=%lx",
673 h_ret, shca, mw, mw->rkey, shca->ipz_hca_handle.handle,
674 e_mw->ipz_mw_handle.handle);
675 return ehca_mrmw_map_hrc_free_mw(h_ret);
676 }
677 /* successful deallocation */
678 ehca_mw_delete(e_mw);
679 return 0;
680 } /* end ehca_dealloc_mw() */
681
682 /*----------------------------------------------------------------------*/
683
684 struct ib_fmr *ehca_alloc_fmr(struct ib_pd *pd,
685 int mr_access_flags,
686 struct ib_fmr_attr *fmr_attr)
687 {
688 struct ib_fmr *ib_fmr;
689 struct ehca_shca *shca =
690 container_of(pd->device, struct ehca_shca, ib_device);
691 struct ehca_pd *e_pd = container_of(pd, struct ehca_pd, ib_pd);
692 struct ehca_mr *e_fmr;
693 int ret;
694 u32 tmp_lkey, tmp_rkey;
695 struct ehca_mr_pginfo pginfo={0,0,0,0,0,0,0,NULL,0,NULL,NULL,0,NULL,0};
696
697 /* check other parameters */
698 if (((mr_access_flags & IB_ACCESS_REMOTE_WRITE) &&
699 !(mr_access_flags & IB_ACCESS_LOCAL_WRITE)) ||
700 ((mr_access_flags & IB_ACCESS_REMOTE_ATOMIC) &&
701 !(mr_access_flags & IB_ACCESS_LOCAL_WRITE))) {
702 /*
703 * Remote Write Access requires Local Write Access
704 * Remote Atomic Access requires Local Write Access
705 */
706 ehca_err(pd->device, "bad input values: mr_access_flags=%x",
707 mr_access_flags);
708 ib_fmr = ERR_PTR(-EINVAL);
709 goto alloc_fmr_exit0;
710 }
711 if (mr_access_flags & IB_ACCESS_MW_BIND) {
712 ehca_err(pd->device, "bad input values: mr_access_flags=%x",
713 mr_access_flags);
714 ib_fmr = ERR_PTR(-EINVAL);
715 goto alloc_fmr_exit0;
716 }
717 if ((fmr_attr->max_pages == 0) || (fmr_attr->max_maps == 0)) {
718 ehca_err(pd->device, "bad input values: fmr_attr->max_pages=%x "
719 "fmr_attr->max_maps=%x fmr_attr->page_shift=%x",
720 fmr_attr->max_pages, fmr_attr->max_maps,
721 fmr_attr->page_shift);
722 ib_fmr = ERR_PTR(-EINVAL);
723 goto alloc_fmr_exit0;
724 }
725 if (((1 << fmr_attr->page_shift) != EHCA_PAGESIZE) &&
726 ((1 << fmr_attr->page_shift) != PAGE_SIZE)) {
727 ehca_err(pd->device, "unsupported fmr_attr->page_shift=%x",
728 fmr_attr->page_shift);
729 ib_fmr = ERR_PTR(-EINVAL);
730 goto alloc_fmr_exit0;
731 }
732
733 e_fmr = ehca_mr_new();
734 if (!e_fmr) {
735 ib_fmr = ERR_PTR(-ENOMEM);
736 goto alloc_fmr_exit0;
737 }
738 e_fmr->flags |= EHCA_MR_FLAG_FMR;
739
740 /* register MR on HCA */
741 ret = ehca_reg_mr(shca, e_fmr, NULL,
742 fmr_attr->max_pages * (1 << fmr_attr->page_shift),
743 mr_access_flags, e_pd, &pginfo,
744 &tmp_lkey, &tmp_rkey);
745 if (ret) {
746 ib_fmr = ERR_PTR(ret);
747 goto alloc_fmr_exit1;
748 }
749
750 /* successful */
751 e_fmr->fmr_page_size = 1 << fmr_attr->page_shift;
752 e_fmr->fmr_max_pages = fmr_attr->max_pages;
753 e_fmr->fmr_max_maps = fmr_attr->max_maps;
754 e_fmr->fmr_map_cnt = 0;
755 return &e_fmr->ib.ib_fmr;
756
757 alloc_fmr_exit1:
758 ehca_mr_delete(e_fmr);
759 alloc_fmr_exit0:
760 if (IS_ERR(ib_fmr))
761 ehca_err(pd->device, "rc=%lx pd=%p mr_access_flags=%x "
762 "fmr_attr=%p", PTR_ERR(ib_fmr), pd,
763 mr_access_flags, fmr_attr);
764 return ib_fmr;
765 } /* end ehca_alloc_fmr() */
766
767 /*----------------------------------------------------------------------*/
768
769 int ehca_map_phys_fmr(struct ib_fmr *fmr,
770 u64 *page_list,
771 int list_len,
772 u64 iova)
773 {
774 int ret;
775 struct ehca_shca *shca =
776 container_of(fmr->device, struct ehca_shca, ib_device);
777 struct ehca_mr *e_fmr = container_of(fmr, struct ehca_mr, ib.ib_fmr);
778 struct ehca_pd *e_pd = container_of(fmr->pd, struct ehca_pd, ib_pd);
779 struct ehca_mr_pginfo pginfo={0,0,0,0,0,0,0,NULL,0,NULL,NULL,0,NULL,0};
780 u32 tmp_lkey, tmp_rkey;
781
782 if (!(e_fmr->flags & EHCA_MR_FLAG_FMR)) {
783 ehca_err(fmr->device, "not a FMR, e_fmr=%p e_fmr->flags=%x",
784 e_fmr, e_fmr->flags);
785 ret = -EINVAL;
786 goto map_phys_fmr_exit0;
787 }
788 ret = ehca_fmr_check_page_list(e_fmr, page_list, list_len);
789 if (ret)
790 goto map_phys_fmr_exit0;
791 if (iova % e_fmr->fmr_page_size) {
792 /* only whole-numbered pages */
793 ehca_err(fmr->device, "bad iova, iova=%lx fmr_page_size=%x",
794 iova, e_fmr->fmr_page_size);
795 ret = -EINVAL;
796 goto map_phys_fmr_exit0;
797 }
798 if (e_fmr->fmr_map_cnt >= e_fmr->fmr_max_maps) {
799 /* HCAD does not limit the maps, however trace this anyway */
800 ehca_info(fmr->device, "map limit exceeded, fmr=%p "
801 "e_fmr->fmr_map_cnt=%x e_fmr->fmr_max_maps=%x",
802 fmr, e_fmr->fmr_map_cnt, e_fmr->fmr_max_maps);
803 }
804
805 pginfo.type = EHCA_MR_PGI_FMR;
806 pginfo.num_pages = list_len;
807 pginfo.num_4k = list_len * (e_fmr->fmr_page_size / EHCA_PAGESIZE);
808 pginfo.page_list = page_list;
809 pginfo.next_4k = ((iova & (e_fmr->fmr_page_size-1)) /
810 EHCA_PAGESIZE);
811
812 ret = ehca_rereg_mr(shca, e_fmr, (u64*)iova,
813 list_len * e_fmr->fmr_page_size,
814 e_fmr->acl, e_pd, &pginfo, &tmp_lkey, &tmp_rkey);
815 if (ret)
816 goto map_phys_fmr_exit0;
817
818 /* successful reregistration */
819 e_fmr->fmr_map_cnt++;
820 e_fmr->ib.ib_fmr.lkey = tmp_lkey;
821 e_fmr->ib.ib_fmr.rkey = tmp_rkey;
822 return 0;
823
824 map_phys_fmr_exit0:
825 if (ret)
826 ehca_err(fmr->device, "ret=%x fmr=%p page_list=%p list_len=%x "
827 "iova=%lx",
828 ret, fmr, page_list, list_len, iova);
829 return ret;
830 } /* end ehca_map_phys_fmr() */
831
832 /*----------------------------------------------------------------------*/
833
834 int ehca_unmap_fmr(struct list_head *fmr_list)
835 {
836 int ret = 0;
837 struct ib_fmr *ib_fmr;
838 struct ehca_shca *shca = NULL;
839 struct ehca_shca *prev_shca;
840 struct ehca_mr *e_fmr;
841 u32 num_fmr = 0;
842 u32 unmap_fmr_cnt = 0;
843
844 /* check all FMR belong to same SHCA, and check internal flag */
845 list_for_each_entry(ib_fmr, fmr_list, list) {
846 prev_shca = shca;
847 if (!ib_fmr) {
848 ehca_gen_err("bad fmr=%p in list", ib_fmr);
849 ret = -EINVAL;
850 goto unmap_fmr_exit0;
851 }
852 shca = container_of(ib_fmr->device, struct ehca_shca,
853 ib_device);
854 e_fmr = container_of(ib_fmr, struct ehca_mr, ib.ib_fmr);
855 if ((shca != prev_shca) && prev_shca) {
856 ehca_err(&shca->ib_device, "SHCA mismatch, shca=%p "
857 "prev_shca=%p e_fmr=%p",
858 shca, prev_shca, e_fmr);
859 ret = -EINVAL;
860 goto unmap_fmr_exit0;
861 }
862 if (!(e_fmr->flags & EHCA_MR_FLAG_FMR)) {
863 ehca_err(&shca->ib_device, "not a FMR, e_fmr=%p "
864 "e_fmr->flags=%x", e_fmr, e_fmr->flags);
865 ret = -EINVAL;
866 goto unmap_fmr_exit0;
867 }
868 num_fmr++;
869 }
870
871 /* loop over all FMRs to unmap */
872 list_for_each_entry(ib_fmr, fmr_list, list) {
873 unmap_fmr_cnt++;
874 e_fmr = container_of(ib_fmr, struct ehca_mr, ib.ib_fmr);
875 shca = container_of(ib_fmr->device, struct ehca_shca,
876 ib_device);
877 ret = ehca_unmap_one_fmr(shca, e_fmr);
878 if (ret) {
879 /* unmap failed, stop unmapping of rest of FMRs */
880 ehca_err(&shca->ib_device, "unmap of one FMR failed, "
881 "stop rest, e_fmr=%p num_fmr=%x "
882 "unmap_fmr_cnt=%x lkey=%x", e_fmr, num_fmr,
883 unmap_fmr_cnt, e_fmr->ib.ib_fmr.lkey);
884 goto unmap_fmr_exit0;
885 }
886 }
887
888 unmap_fmr_exit0:
889 if (ret)
890 ehca_gen_err("ret=%x fmr_list=%p num_fmr=%x unmap_fmr_cnt=%x",
891 ret, fmr_list, num_fmr, unmap_fmr_cnt);
892 return ret;
893 } /* end ehca_unmap_fmr() */
894
895 /*----------------------------------------------------------------------*/
896
897 int ehca_dealloc_fmr(struct ib_fmr *fmr)
898 {
899 int ret;
900 u64 h_ret;
901 struct ehca_shca *shca =
902 container_of(fmr->device, struct ehca_shca, ib_device);
903 struct ehca_mr *e_fmr = container_of(fmr, struct ehca_mr, ib.ib_fmr);
904
905 if (!(e_fmr->flags & EHCA_MR_FLAG_FMR)) {
906 ehca_err(fmr->device, "not a FMR, e_fmr=%p e_fmr->flags=%x",
907 e_fmr, e_fmr->flags);
908 ret = -EINVAL;
909 goto free_fmr_exit0;
910 }
911
912 h_ret = hipz_h_free_resource_mr(shca->ipz_hca_handle, e_fmr);
913 if (h_ret != H_SUCCESS) {
914 ehca_err(fmr->device, "hipz_free_mr failed, h_ret=%lx e_fmr=%p "
915 "hca_hndl=%lx fmr_hndl=%lx fmr->lkey=%x",
916 h_ret, e_fmr, shca->ipz_hca_handle.handle,
917 e_fmr->ipz_mr_handle.handle, fmr->lkey);
918 ret = ehca_mrmw_map_hrc_free_mr(h_ret);
919 goto free_fmr_exit0;
920 }
921 /* successful deregistration */
922 ehca_mr_delete(e_fmr);
923 return 0;
924
925 free_fmr_exit0:
926 if (ret)
927 ehca_err(&shca->ib_device, "ret=%x fmr=%p", ret, fmr);
928 return ret;
929 } /* end ehca_dealloc_fmr() */
930
931 /*----------------------------------------------------------------------*/
932
933 int ehca_reg_mr(struct ehca_shca *shca,
934 struct ehca_mr *e_mr,
935 u64 *iova_start,
936 u64 size,
937 int acl,
938 struct ehca_pd *e_pd,
939 struct ehca_mr_pginfo *pginfo,
940 u32 *lkey, /*OUT*/
941 u32 *rkey) /*OUT*/
942 {
943 int ret;
944 u64 h_ret;
945 u32 hipz_acl;
946 struct ehca_mr_hipzout_parms hipzout = {{0},0,0,0,0,0};
947
948 ehca_mrmw_map_acl(acl, &hipz_acl);
949 ehca_mrmw_set_pgsize_hipz_acl(&hipz_acl);
950 if (ehca_use_hp_mr == 1)
951 hipz_acl |= 0x00000001;
952
953 h_ret = hipz_h_alloc_resource_mr(shca->ipz_hca_handle, e_mr,
954 (u64)iova_start, size, hipz_acl,
955 e_pd->fw_pd, &hipzout);
956 if (h_ret != H_SUCCESS) {
957 ehca_err(&shca->ib_device, "hipz_alloc_mr failed, h_ret=%lx "
958 "hca_hndl=%lx", h_ret, shca->ipz_hca_handle.handle);
959 ret = ehca_mrmw_map_hrc_alloc(h_ret);
960 goto ehca_reg_mr_exit0;
961 }
962
963 e_mr->ipz_mr_handle = hipzout.handle;
964
965 ret = ehca_reg_mr_rpages(shca, e_mr, pginfo);
966 if (ret)
967 goto ehca_reg_mr_exit1;
968
969 /* successful registration */
970 e_mr->num_pages = pginfo->num_pages;
971 e_mr->num_4k = pginfo->num_4k;
972 e_mr->start = iova_start;
973 e_mr->size = size;
974 e_mr->acl = acl;
975 *lkey = hipzout.lkey;
976 *rkey = hipzout.rkey;
977 return 0;
978
979 ehca_reg_mr_exit1:
980 h_ret = hipz_h_free_resource_mr(shca->ipz_hca_handle, e_mr);
981 if (h_ret != H_SUCCESS) {
982 ehca_err(&shca->ib_device, "h_ret=%lx shca=%p e_mr=%p "
983 "iova_start=%p size=%lx acl=%x e_pd=%p lkey=%x "
984 "pginfo=%p num_pages=%lx num_4k=%lx ret=%x",
985 h_ret, shca, e_mr, iova_start, size, acl, e_pd,
986 hipzout.lkey, pginfo, pginfo->num_pages,
987 pginfo->num_4k, ret);
988 ehca_err(&shca->ib_device, "internal error in ehca_reg_mr, "
989 "not recoverable");
990 }
991 ehca_reg_mr_exit0:
992 if (ret)
993 ehca_err(&shca->ib_device, "ret=%x shca=%p e_mr=%p "
994 "iova_start=%p size=%lx acl=%x e_pd=%p pginfo=%p "
995 "num_pages=%lx num_4k=%lx",
996 ret, shca, e_mr, iova_start, size, acl, e_pd, pginfo,
997 pginfo->num_pages, pginfo->num_4k);
998 return ret;
999 } /* end ehca_reg_mr() */
1000
1001 /*----------------------------------------------------------------------*/
1002
1003 int ehca_reg_mr_rpages(struct ehca_shca *shca,
1004 struct ehca_mr *e_mr,
1005 struct ehca_mr_pginfo *pginfo)
1006 {
1007 int ret = 0;
1008 u64 h_ret;
1009 u32 rnum;
1010 u64 rpage;
1011 u32 i;
1012 u64 *kpage;
1013
1014 kpage = ehca_alloc_fw_ctrlblock(GFP_KERNEL);
1015 if (!kpage) {
1016 ehca_err(&shca->ib_device, "kpage alloc failed");
1017 ret = -ENOMEM;
1018 goto ehca_reg_mr_rpages_exit0;
1019 }
1020
1021 /* max 512 pages per shot */
1022 for (i = 0; i < ((pginfo->num_4k + 512 - 1) / 512); i++) {
1023
1024 if (i == ((pginfo->num_4k + 512 - 1) / 512) - 1) {
1025 rnum = pginfo->num_4k % 512; /* last shot */
1026 if (rnum == 0)
1027 rnum = 512; /* last shot is full */
1028 } else
1029 rnum = 512;
1030
1031 if (rnum > 1) {
1032 ret = ehca_set_pagebuf(e_mr, pginfo, rnum, kpage);
1033 if (ret) {
1034 ehca_err(&shca->ib_device, "ehca_set_pagebuf "
1035 "bad rc, ret=%x rnum=%x kpage=%p",
1036 ret, rnum, kpage);
1037 ret = -EFAULT;
1038 goto ehca_reg_mr_rpages_exit1;
1039 }
1040 rpage = virt_to_abs(kpage);
1041 if (!rpage) {
1042 ehca_err(&shca->ib_device, "kpage=%p i=%x",
1043 kpage, i);
1044 ret = -EFAULT;
1045 goto ehca_reg_mr_rpages_exit1;
1046 }
1047 } else { /* rnum==1 */
1048 ret = ehca_set_pagebuf_1(e_mr, pginfo, &rpage);
1049 if (ret) {
1050 ehca_err(&shca->ib_device, "ehca_set_pagebuf_1 "
1051 "bad rc, ret=%x i=%x", ret, i);
1052 ret = -EFAULT;
1053 goto ehca_reg_mr_rpages_exit1;
1054 }
1055 }
1056
1057 h_ret = hipz_h_register_rpage_mr(shca->ipz_hca_handle, e_mr,
1058 0, /* pagesize 4k */
1059 0, rpage, rnum);
1060
1061 if (i == ((pginfo->num_4k + 512 - 1) / 512) - 1) {
1062 /*
1063 * check for 'registration complete'==H_SUCCESS
1064 * and for 'page registered'==H_PAGE_REGISTERED
1065 */
1066 if (h_ret != H_SUCCESS) {
1067 ehca_err(&shca->ib_device, "last "
1068 "hipz_reg_rpage_mr failed, h_ret=%lx "
1069 "e_mr=%p i=%x hca_hndl=%lx mr_hndl=%lx"
1070 " lkey=%x", h_ret, e_mr, i,
1071 shca->ipz_hca_handle.handle,
1072 e_mr->ipz_mr_handle.handle,
1073 e_mr->ib.ib_mr.lkey);
1074 ret = ehca_mrmw_map_hrc_rrpg_last(h_ret);
1075 break;
1076 } else
1077 ret = 0;
1078 } else if (h_ret != H_PAGE_REGISTERED) {
1079 ehca_err(&shca->ib_device, "hipz_reg_rpage_mr failed, "
1080 "h_ret=%lx e_mr=%p i=%x lkey=%x hca_hndl=%lx "
1081 "mr_hndl=%lx", h_ret, e_mr, i,
1082 e_mr->ib.ib_mr.lkey,
1083 shca->ipz_hca_handle.handle,
1084 e_mr->ipz_mr_handle.handle);
1085 ret = ehca_mrmw_map_hrc_rrpg_notlast(h_ret);
1086 break;
1087 } else
1088 ret = 0;
1089 } /* end for(i) */
1090
1091
1092 ehca_reg_mr_rpages_exit1:
1093 ehca_free_fw_ctrlblock(kpage);
1094 ehca_reg_mr_rpages_exit0:
1095 if (ret)
1096 ehca_err(&shca->ib_device, "ret=%x shca=%p e_mr=%p pginfo=%p "
1097 "num_pages=%lx num_4k=%lx", ret, shca, e_mr, pginfo,
1098 pginfo->num_pages, pginfo->num_4k);
1099 return ret;
1100 } /* end ehca_reg_mr_rpages() */
1101
1102 /*----------------------------------------------------------------------*/
1103
1104 inline int ehca_rereg_mr_rereg1(struct ehca_shca *shca,
1105 struct ehca_mr *e_mr,
1106 u64 *iova_start,
1107 u64 size,
1108 u32 acl,
1109 struct ehca_pd *e_pd,
1110 struct ehca_mr_pginfo *pginfo,
1111 u32 *lkey, /*OUT*/
1112 u32 *rkey) /*OUT*/
1113 {
1114 int ret;
1115 u64 h_ret;
1116 u32 hipz_acl;
1117 u64 *kpage;
1118 u64 rpage;
1119 struct ehca_mr_pginfo pginfo_save;
1120 struct ehca_mr_hipzout_parms hipzout = {{0},0,0,0,0,0};
1121
1122 ehca_mrmw_map_acl(acl, &hipz_acl);
1123 ehca_mrmw_set_pgsize_hipz_acl(&hipz_acl);
1124
1125 kpage = ehca_alloc_fw_ctrlblock(GFP_KERNEL);
1126 if (!kpage) {
1127 ehca_err(&shca->ib_device, "kpage alloc failed");
1128 ret = -ENOMEM;
1129 goto ehca_rereg_mr_rereg1_exit0;
1130 }
1131
1132 pginfo_save = *pginfo;
1133 ret = ehca_set_pagebuf(e_mr, pginfo, pginfo->num_4k, kpage);
1134 if (ret) {
1135 ehca_err(&shca->ib_device, "set pagebuf failed, e_mr=%p "
1136 "pginfo=%p type=%x num_pages=%lx num_4k=%lx kpage=%p",
1137 e_mr, pginfo, pginfo->type, pginfo->num_pages,
1138 pginfo->num_4k,kpage);
1139 goto ehca_rereg_mr_rereg1_exit1;
1140 }
1141 rpage = virt_to_abs(kpage);
1142 if (!rpage) {
1143 ehca_err(&shca->ib_device, "kpage=%p", kpage);
1144 ret = -EFAULT;
1145 goto ehca_rereg_mr_rereg1_exit1;
1146 }
1147 h_ret = hipz_h_reregister_pmr(shca->ipz_hca_handle, e_mr,
1148 (u64)iova_start, size, hipz_acl,
1149 e_pd->fw_pd, rpage, &hipzout);
1150 if (h_ret != H_SUCCESS) {
1151 /*
1152 * reregistration unsuccessful, try it again with the 3 hCalls,
1153 * e.g. this is required in case H_MR_CONDITION
1154 * (MW bound or MR is shared)
1155 */
1156 ehca_warn(&shca->ib_device, "hipz_h_reregister_pmr failed "
1157 "(Rereg1), h_ret=%lx e_mr=%p", h_ret, e_mr);
1158 *pginfo = pginfo_save;
1159 ret = -EAGAIN;
1160 } else if ((u64*)hipzout.vaddr != iova_start) {
1161 ehca_err(&shca->ib_device, "PHYP changed iova_start in "
1162 "rereg_pmr, iova_start=%p iova_start_out=%lx e_mr=%p "
1163 "mr_handle=%lx lkey=%x lkey_out=%x", iova_start,
1164 hipzout.vaddr, e_mr, e_mr->ipz_mr_handle.handle,
1165 e_mr->ib.ib_mr.lkey, hipzout.lkey);
1166 ret = -EFAULT;
1167 } else {
1168 /*
1169 * successful reregistration
1170 * note: start and start_out are identical for eServer HCAs
1171 */
1172 e_mr->num_pages = pginfo->num_pages;
1173 e_mr->num_4k = pginfo->num_4k;
1174 e_mr->start = iova_start;
1175 e_mr->size = size;
1176 e_mr->acl = acl;
1177 *lkey = hipzout.lkey;
1178 *rkey = hipzout.rkey;
1179 }
1180
1181 ehca_rereg_mr_rereg1_exit1:
1182 ehca_free_fw_ctrlblock(kpage);
1183 ehca_rereg_mr_rereg1_exit0:
1184 if ( ret && (ret != -EAGAIN) )
1185 ehca_err(&shca->ib_device, "ret=%x lkey=%x rkey=%x "
1186 "pginfo=%p num_pages=%lx num_4k=%lx",
1187 ret, *lkey, *rkey, pginfo, pginfo->num_pages,
1188 pginfo->num_4k);
1189 return ret;
1190 } /* end ehca_rereg_mr_rereg1() */
1191
1192 /*----------------------------------------------------------------------*/
1193
1194 int ehca_rereg_mr(struct ehca_shca *shca,
1195 struct ehca_mr *e_mr,
1196 u64 *iova_start,
1197 u64 size,
1198 int acl,
1199 struct ehca_pd *e_pd,
1200 struct ehca_mr_pginfo *pginfo,
1201 u32 *lkey,
1202 u32 *rkey)
1203 {
1204 int ret = 0;
1205 u64 h_ret;
1206 int rereg_1_hcall = 1; /* 1: use hipz_h_reregister_pmr directly */
1207 int rereg_3_hcall = 0; /* 1: use 3 hipz calls for reregistration */
1208
1209 /* first determine reregistration hCall(s) */
1210 if ((pginfo->num_4k > 512) || (e_mr->num_4k > 512) ||
1211 (pginfo->num_4k > e_mr->num_4k)) {
1212 ehca_dbg(&shca->ib_device, "Rereg3 case, pginfo->num_4k=%lx "
1213 "e_mr->num_4k=%x", pginfo->num_4k, e_mr->num_4k);
1214 rereg_1_hcall = 0;
1215 rereg_3_hcall = 1;
1216 }
1217
1218 if (e_mr->flags & EHCA_MR_FLAG_MAXMR) { /* check for max-MR */
1219 rereg_1_hcall = 0;
1220 rereg_3_hcall = 1;
1221 e_mr->flags &= ~EHCA_MR_FLAG_MAXMR;
1222 ehca_err(&shca->ib_device, "Rereg MR for max-MR! e_mr=%p",
1223 e_mr);
1224 }
1225
1226 if (rereg_1_hcall) {
1227 ret = ehca_rereg_mr_rereg1(shca, e_mr, iova_start, size,
1228 acl, e_pd, pginfo, lkey, rkey);
1229 if (ret) {
1230 if (ret == -EAGAIN)
1231 rereg_3_hcall = 1;
1232 else
1233 goto ehca_rereg_mr_exit0;
1234 }
1235 }
1236
1237 if (rereg_3_hcall) {
1238 struct ehca_mr save_mr;
1239
1240 /* first deregister old MR */
1241 h_ret = hipz_h_free_resource_mr(shca->ipz_hca_handle, e_mr);
1242 if (h_ret != H_SUCCESS) {
1243 ehca_err(&shca->ib_device, "hipz_free_mr failed, "
1244 "h_ret=%lx e_mr=%p hca_hndl=%lx mr_hndl=%lx "
1245 "mr->lkey=%x",
1246 h_ret, e_mr, shca->ipz_hca_handle.handle,
1247 e_mr->ipz_mr_handle.handle,
1248 e_mr->ib.ib_mr.lkey);
1249 ret = ehca_mrmw_map_hrc_free_mr(h_ret);
1250 goto ehca_rereg_mr_exit0;
1251 }
1252 /* clean ehca_mr_t, without changing struct ib_mr and lock */
1253 save_mr = *e_mr;
1254 ehca_mr_deletenew(e_mr);
1255
1256 /* set some MR values */
1257 e_mr->flags = save_mr.flags;
1258 e_mr->fmr_page_size = save_mr.fmr_page_size;
1259 e_mr->fmr_max_pages = save_mr.fmr_max_pages;
1260 e_mr->fmr_max_maps = save_mr.fmr_max_maps;
1261 e_mr->fmr_map_cnt = save_mr.fmr_map_cnt;
1262
1263 ret = ehca_reg_mr(shca, e_mr, iova_start, size, acl,
1264 e_pd, pginfo, lkey, rkey);
1265 if (ret) {
1266 u32 offset = (u64)(&e_mr->flags) - (u64)e_mr;
1267 memcpy(&e_mr->flags, &(save_mr.flags),
1268 sizeof(struct ehca_mr) - offset);
1269 goto ehca_rereg_mr_exit0;
1270 }
1271 }
1272
1273 ehca_rereg_mr_exit0:
1274 if (ret)
1275 ehca_err(&shca->ib_device, "ret=%x shca=%p e_mr=%p "
1276 "iova_start=%p size=%lx acl=%x e_pd=%p pginfo=%p "
1277 "num_pages=%lx lkey=%x rkey=%x rereg_1_hcall=%x "
1278 "rereg_3_hcall=%x", ret, shca, e_mr, iova_start, size,
1279 acl, e_pd, pginfo, pginfo->num_pages, *lkey, *rkey,
1280 rereg_1_hcall, rereg_3_hcall);
1281 return ret;
1282 } /* end ehca_rereg_mr() */
1283
1284 /*----------------------------------------------------------------------*/
1285
1286 int ehca_unmap_one_fmr(struct ehca_shca *shca,
1287 struct ehca_mr *e_fmr)
1288 {
1289 int ret = 0;
1290 u64 h_ret;
1291 int rereg_1_hcall = 1; /* 1: use hipz_mr_reregister directly */
1292 int rereg_3_hcall = 0; /* 1: use 3 hipz calls for unmapping */
1293 struct ehca_pd *e_pd =
1294 container_of(e_fmr->ib.ib_fmr.pd, struct ehca_pd, ib_pd);
1295 struct ehca_mr save_fmr;
1296 u32 tmp_lkey, tmp_rkey;
1297 struct ehca_mr_pginfo pginfo={0,0,0,0,0,0,0,NULL,0,NULL,NULL,0,NULL,0};
1298 struct ehca_mr_hipzout_parms hipzout = {{0},0,0,0,0,0};
1299
1300 /* first check if reregistration hCall can be used for unmap */
1301 if (e_fmr->fmr_max_pages > 512) {
1302 rereg_1_hcall = 0;
1303 rereg_3_hcall = 1;
1304 }
1305
1306 if (rereg_1_hcall) {
1307 /*
1308 * note: after using rereg hcall with len=0,
1309 * rereg hcall must be used again for registering pages
1310 */
1311 h_ret = hipz_h_reregister_pmr(shca->ipz_hca_handle, e_fmr, 0,
1312 0, 0, e_pd->fw_pd, 0, &hipzout);
1313 if (h_ret != H_SUCCESS) {
1314 /*
1315 * should not happen, because length checked above,
1316 * FMRs are not shared and no MW bound to FMRs
1317 */
1318 ehca_err(&shca->ib_device, "hipz_reregister_pmr failed "
1319 "(Rereg1), h_ret=%lx e_fmr=%p hca_hndl=%lx "
1320 "mr_hndl=%lx lkey=%x lkey_out=%x",
1321 h_ret, e_fmr, shca->ipz_hca_handle.handle,
1322 e_fmr->ipz_mr_handle.handle,
1323 e_fmr->ib.ib_fmr.lkey, hipzout.lkey);
1324 rereg_3_hcall = 1;
1325 } else {
1326 /* successful reregistration */
1327 e_fmr->start = NULL;
1328 e_fmr->size = 0;
1329 tmp_lkey = hipzout.lkey;
1330 tmp_rkey = hipzout.rkey;
1331 }
1332 }
1333
1334 if (rereg_3_hcall) {
1335 struct ehca_mr save_mr;
1336
1337 /* first free old FMR */
1338 h_ret = hipz_h_free_resource_mr(shca->ipz_hca_handle, e_fmr);
1339 if (h_ret != H_SUCCESS) {
1340 ehca_err(&shca->ib_device, "hipz_free_mr failed, "
1341 "h_ret=%lx e_fmr=%p hca_hndl=%lx mr_hndl=%lx "
1342 "lkey=%x",
1343 h_ret, e_fmr, shca->ipz_hca_handle.handle,
1344 e_fmr->ipz_mr_handle.handle,
1345 e_fmr->ib.ib_fmr.lkey);
1346 ret = ehca_mrmw_map_hrc_free_mr(h_ret);
1347 goto ehca_unmap_one_fmr_exit0;
1348 }
1349 /* clean ehca_mr_t, without changing lock */
1350 save_fmr = *e_fmr;
1351 ehca_mr_deletenew(e_fmr);
1352
1353 /* set some MR values */
1354 e_fmr->flags = save_fmr.flags;
1355 e_fmr->fmr_page_size = save_fmr.fmr_page_size;
1356 e_fmr->fmr_max_pages = save_fmr.fmr_max_pages;
1357 e_fmr->fmr_max_maps = save_fmr.fmr_max_maps;
1358 e_fmr->fmr_map_cnt = save_fmr.fmr_map_cnt;
1359 e_fmr->acl = save_fmr.acl;
1360
1361 pginfo.type = EHCA_MR_PGI_FMR;
1362 pginfo.num_pages = 0;
1363 pginfo.num_4k = 0;
1364 ret = ehca_reg_mr(shca, e_fmr, NULL,
1365 (e_fmr->fmr_max_pages * e_fmr->fmr_page_size),
1366 e_fmr->acl, e_pd, &pginfo, &tmp_lkey,
1367 &tmp_rkey);
1368 if (ret) {
1369 u32 offset = (u64)(&e_fmr->flags) - (u64)e_fmr;
1370 memcpy(&e_fmr->flags, &(save_mr.flags),
1371 sizeof(struct ehca_mr) - offset);
1372 goto ehca_unmap_one_fmr_exit0;
1373 }
1374 }
1375
1376 ehca_unmap_one_fmr_exit0:
1377 if (ret)
1378 ehca_err(&shca->ib_device, "ret=%x tmp_lkey=%x tmp_rkey=%x "
1379 "fmr_max_pages=%x rereg_1_hcall=%x rereg_3_hcall=%x",
1380 ret, tmp_lkey, tmp_rkey, e_fmr->fmr_max_pages,
1381 rereg_1_hcall, rereg_3_hcall);
1382 return ret;
1383 } /* end ehca_unmap_one_fmr() */
1384
1385 /*----------------------------------------------------------------------*/
1386
1387 int ehca_reg_smr(struct ehca_shca *shca,
1388 struct ehca_mr *e_origmr,
1389 struct ehca_mr *e_newmr,
1390 u64 *iova_start,
1391 int acl,
1392 struct ehca_pd *e_pd,
1393 u32 *lkey, /*OUT*/
1394 u32 *rkey) /*OUT*/
1395 {
1396 int ret = 0;
1397 u64 h_ret;
1398 u32 hipz_acl;
1399 struct ehca_mr_hipzout_parms hipzout = {{0},0,0,0,0,0};
1400
1401 ehca_mrmw_map_acl(acl, &hipz_acl);
1402 ehca_mrmw_set_pgsize_hipz_acl(&hipz_acl);
1403
1404 h_ret = hipz_h_register_smr(shca->ipz_hca_handle, e_newmr, e_origmr,
1405 (u64)iova_start, hipz_acl, e_pd->fw_pd,
1406 &hipzout);
1407 if (h_ret != H_SUCCESS) {
1408 ehca_err(&shca->ib_device, "hipz_reg_smr failed, h_ret=%lx "
1409 "shca=%p e_origmr=%p e_newmr=%p iova_start=%p acl=%x "
1410 "e_pd=%p hca_hndl=%lx mr_hndl=%lx lkey=%x",
1411 h_ret, shca, e_origmr, e_newmr, iova_start, acl, e_pd,
1412 shca->ipz_hca_handle.handle,
1413 e_origmr->ipz_mr_handle.handle,
1414 e_origmr->ib.ib_mr.lkey);
1415 ret = ehca_mrmw_map_hrc_reg_smr(h_ret);
1416 goto ehca_reg_smr_exit0;
1417 }
1418 /* successful registration */
1419 e_newmr->num_pages = e_origmr->num_pages;
1420 e_newmr->num_4k = e_origmr->num_4k;
1421 e_newmr->start = iova_start;
1422 e_newmr->size = e_origmr->size;
1423 e_newmr->acl = acl;
1424 e_newmr->ipz_mr_handle = hipzout.handle;
1425 *lkey = hipzout.lkey;
1426 *rkey = hipzout.rkey;
1427 return 0;
1428
1429 ehca_reg_smr_exit0:
1430 if (ret)
1431 ehca_err(&shca->ib_device, "ret=%x shca=%p e_origmr=%p "
1432 "e_newmr=%p iova_start=%p acl=%x e_pd=%p",
1433 ret, shca, e_origmr, e_newmr, iova_start, acl, e_pd);
1434 return ret;
1435 } /* end ehca_reg_smr() */
1436
1437 /*----------------------------------------------------------------------*/
1438
1439 /* register internal max-MR to internal SHCA */
1440 int ehca_reg_internal_maxmr(
1441 struct ehca_shca *shca,
1442 struct ehca_pd *e_pd,
1443 struct ehca_mr **e_maxmr) /*OUT*/
1444 {
1445 int ret;
1446 struct ehca_mr *e_mr;
1447 u64 *iova_start;
1448 u64 size_maxmr;
1449 struct ehca_mr_pginfo pginfo={0,0,0,0,0,0,0,NULL,0,NULL,NULL,0,NULL,0};
1450 struct ib_phys_buf ib_pbuf;
1451 u32 num_pages_mr;
1452 u32 num_pages_4k; /* 4k portion "pages" */
1453
1454 e_mr = ehca_mr_new();
1455 if (!e_mr) {
1456 ehca_err(&shca->ib_device, "out of memory");
1457 ret = -ENOMEM;
1458 goto ehca_reg_internal_maxmr_exit0;
1459 }
1460 e_mr->flags |= EHCA_MR_FLAG_MAXMR;
1461
1462 /* register internal max-MR on HCA */
1463 size_maxmr = (u64)high_memory - PAGE_OFFSET;
1464 iova_start = (u64*)KERNELBASE;
1465 ib_pbuf.addr = 0;
1466 ib_pbuf.size = size_maxmr;
1467 num_pages_mr = ((((u64)iova_start % PAGE_SIZE) + size_maxmr +
1468 PAGE_SIZE - 1) / PAGE_SIZE);
1469 num_pages_4k = ((((u64)iova_start % EHCA_PAGESIZE) + size_maxmr +
1470 EHCA_PAGESIZE - 1) / EHCA_PAGESIZE);
1471
1472 pginfo.type = EHCA_MR_PGI_PHYS;
1473 pginfo.num_pages = num_pages_mr;
1474 pginfo.num_4k = num_pages_4k;
1475 pginfo.num_phys_buf = 1;
1476 pginfo.phys_buf_array = &ib_pbuf;
1477
1478 ret = ehca_reg_mr(shca, e_mr, iova_start, size_maxmr, 0, e_pd,
1479 &pginfo, &e_mr->ib.ib_mr.lkey,
1480 &e_mr->ib.ib_mr.rkey);
1481 if (ret) {
1482 ehca_err(&shca->ib_device, "reg of internal max MR failed, "
1483 "e_mr=%p iova_start=%p size_maxmr=%lx num_pages_mr=%x "
1484 "num_pages_4k=%x", e_mr, iova_start, size_maxmr,
1485 num_pages_mr, num_pages_4k);
1486 goto ehca_reg_internal_maxmr_exit1;
1487 }
1488
1489 /* successful registration of all pages */
1490 e_mr->ib.ib_mr.device = e_pd->ib_pd.device;
1491 e_mr->ib.ib_mr.pd = &e_pd->ib_pd;
1492 e_mr->ib.ib_mr.uobject = NULL;
1493 atomic_inc(&(e_pd->ib_pd.usecnt));
1494 atomic_set(&(e_mr->ib.ib_mr.usecnt), 0);
1495 *e_maxmr = e_mr;
1496 return 0;
1497
1498 ehca_reg_internal_maxmr_exit1:
1499 ehca_mr_delete(e_mr);
1500 ehca_reg_internal_maxmr_exit0:
1501 if (ret)
1502 ehca_err(&shca->ib_device, "ret=%x shca=%p e_pd=%p e_maxmr=%p",
1503 ret, shca, e_pd, e_maxmr);
1504 return ret;
1505 } /* end ehca_reg_internal_maxmr() */
1506
1507 /*----------------------------------------------------------------------*/
1508
1509 int ehca_reg_maxmr(struct ehca_shca *shca,
1510 struct ehca_mr *e_newmr,
1511 u64 *iova_start,
1512 int acl,
1513 struct ehca_pd *e_pd,
1514 u32 *lkey,
1515 u32 *rkey)
1516 {
1517 u64 h_ret;
1518 struct ehca_mr *e_origmr = shca->maxmr;
1519 u32 hipz_acl;
1520 struct ehca_mr_hipzout_parms hipzout = {{0},0,0,0,0,0};
1521
1522 ehca_mrmw_map_acl(acl, &hipz_acl);
1523 ehca_mrmw_set_pgsize_hipz_acl(&hipz_acl);
1524
1525 h_ret = hipz_h_register_smr(shca->ipz_hca_handle, e_newmr, e_origmr,
1526 (u64)iova_start, hipz_acl, e_pd->fw_pd,
1527 &hipzout);
1528 if (h_ret != H_SUCCESS) {
1529 ehca_err(&shca->ib_device, "hipz_reg_smr failed, h_ret=%lx "
1530 "e_origmr=%p hca_hndl=%lx mr_hndl=%lx lkey=%x",
1531 h_ret, e_origmr, shca->ipz_hca_handle.handle,
1532 e_origmr->ipz_mr_handle.handle,
1533 e_origmr->ib.ib_mr.lkey);
1534 return ehca_mrmw_map_hrc_reg_smr(h_ret);
1535 }
1536 /* successful registration */
1537 e_newmr->num_pages = e_origmr->num_pages;
1538 e_newmr->num_4k = e_origmr->num_4k;
1539 e_newmr->start = iova_start;
1540 e_newmr->size = e_origmr->size;
1541 e_newmr->acl = acl;
1542 e_newmr->ipz_mr_handle = hipzout.handle;
1543 *lkey = hipzout.lkey;
1544 *rkey = hipzout.rkey;
1545 return 0;
1546 } /* end ehca_reg_maxmr() */
1547
1548 /*----------------------------------------------------------------------*/
1549
1550 int ehca_dereg_internal_maxmr(struct ehca_shca *shca)
1551 {
1552 int ret;
1553 struct ehca_mr *e_maxmr;
1554 struct ib_pd *ib_pd;
1555
1556 if (!shca->maxmr) {
1557 ehca_err(&shca->ib_device, "bad call, shca=%p", shca);
1558 ret = -EINVAL;
1559 goto ehca_dereg_internal_maxmr_exit0;
1560 }
1561
1562 e_maxmr = shca->maxmr;
1563 ib_pd = e_maxmr->ib.ib_mr.pd;
1564 shca->maxmr = NULL; /* remove internal max-MR indication from SHCA */
1565
1566 ret = ehca_dereg_mr(&e_maxmr->ib.ib_mr);
1567 if (ret) {
1568 ehca_err(&shca->ib_device, "dereg internal max-MR failed, "
1569 "ret=%x e_maxmr=%p shca=%p lkey=%x",
1570 ret, e_maxmr, shca, e_maxmr->ib.ib_mr.lkey);
1571 shca->maxmr = e_maxmr;
1572 goto ehca_dereg_internal_maxmr_exit0;
1573 }
1574
1575 atomic_dec(&ib_pd->usecnt);
1576
1577 ehca_dereg_internal_maxmr_exit0:
1578 if (ret)
1579 ehca_err(&shca->ib_device, "ret=%x shca=%p shca->maxmr=%p",
1580 ret, shca, shca->maxmr);
1581 return ret;
1582 } /* end ehca_dereg_internal_maxmr() */
1583
1584 /*----------------------------------------------------------------------*/
1585
1586 /*
1587 * check physical buffer array of MR verbs for validness and
1588 * calculates MR size
1589 */
1590 int ehca_mr_chk_buf_and_calc_size(struct ib_phys_buf *phys_buf_array,
1591 int num_phys_buf,
1592 u64 *iova_start,
1593 u64 *size)
1594 {
1595 struct ib_phys_buf *pbuf = phys_buf_array;
1596 u64 size_count = 0;
1597 u32 i;
1598
1599 if (num_phys_buf == 0) {
1600 ehca_gen_err("bad phys buf array len, num_phys_buf=0");
1601 return -EINVAL;
1602 }
1603 /* check first buffer */
1604 if (((u64)iova_start & ~PAGE_MASK) != (pbuf->addr & ~PAGE_MASK)) {
1605 ehca_gen_err("iova_start/addr mismatch, iova_start=%p "
1606 "pbuf->addr=%lx pbuf->size=%lx",
1607 iova_start, pbuf->addr, pbuf->size);
1608 return -EINVAL;
1609 }
1610 if (((pbuf->addr + pbuf->size) % PAGE_SIZE) &&
1611 (num_phys_buf > 1)) {
1612 ehca_gen_err("addr/size mismatch in 1st buf, pbuf->addr=%lx "
1613 "pbuf->size=%lx", pbuf->addr, pbuf->size);
1614 return -EINVAL;
1615 }
1616
1617 for (i = 0; i < num_phys_buf; i++) {
1618 if ((i > 0) && (pbuf->addr % PAGE_SIZE)) {
1619 ehca_gen_err("bad address, i=%x pbuf->addr=%lx "
1620 "pbuf->size=%lx",
1621 i, pbuf->addr, pbuf->size);
1622 return -EINVAL;
1623 }
1624 if (((i > 0) && /* not 1st */
1625 (i < (num_phys_buf - 1)) && /* not last */
1626 (pbuf->size % PAGE_SIZE)) || (pbuf->size == 0)) {
1627 ehca_gen_err("bad size, i=%x pbuf->size=%lx",
1628 i, pbuf->size);
1629 return -EINVAL;
1630 }
1631 size_count += pbuf->size;
1632 pbuf++;
1633 }
1634
1635 *size = size_count;
1636 return 0;
1637 } /* end ehca_mr_chk_buf_and_calc_size() */
1638
1639 /*----------------------------------------------------------------------*/
1640
1641 /* check page list of map FMR verb for validness */
1642 int ehca_fmr_check_page_list(struct ehca_mr *e_fmr,
1643 u64 *page_list,
1644 int list_len)
1645 {
1646 u32 i;
1647 u64 *page;
1648
1649 if ((list_len == 0) || (list_len > e_fmr->fmr_max_pages)) {
1650 ehca_gen_err("bad list_len, list_len=%x "
1651 "e_fmr->fmr_max_pages=%x fmr=%p",
1652 list_len, e_fmr->fmr_max_pages, e_fmr);
1653 return -EINVAL;
1654 }
1655
1656 /* each page must be aligned */
1657 page = page_list;
1658 for (i = 0; i < list_len; i++) {
1659 if (*page % e_fmr->fmr_page_size) {
1660 ehca_gen_err("bad page, i=%x *page=%lx page=%p fmr=%p "
1661 "fmr_page_size=%x", i, *page, page, e_fmr,
1662 e_fmr->fmr_page_size);
1663 return -EINVAL;
1664 }
1665 page++;
1666 }
1667
1668 return 0;
1669 } /* end ehca_fmr_check_page_list() */
1670
1671 /*----------------------------------------------------------------------*/
1672
1673 /* setup page buffer from page info */
1674 int ehca_set_pagebuf(struct ehca_mr *e_mr,
1675 struct ehca_mr_pginfo *pginfo,
1676 u32 number,
1677 u64 *kpage)
1678 {
1679 int ret = 0;
1680 struct ib_umem_chunk *prev_chunk;
1681 struct ib_umem_chunk *chunk;
1682 struct ib_phys_buf *pbuf;
1683 u64 *fmrlist;
1684 u64 num4k, pgaddr, offs4k;
1685 u32 i = 0;
1686 u32 j = 0;
1687
1688 if (pginfo->type == EHCA_MR_PGI_PHYS) {
1689 /* loop over desired phys_buf_array entries */
1690 while (i < number) {
1691 pbuf = pginfo->phys_buf_array + pginfo->next_buf;
1692 num4k = ((pbuf->addr % EHCA_PAGESIZE) + pbuf->size +
1693 EHCA_PAGESIZE - 1) / EHCA_PAGESIZE;
1694 offs4k = (pbuf->addr & ~PAGE_MASK) / EHCA_PAGESIZE;
1695 while (pginfo->next_4k < offs4k + num4k) {
1696 /* sanity check */
1697 if ((pginfo->page_cnt >= pginfo->num_pages) ||
1698 (pginfo->page_4k_cnt >= pginfo->num_4k)) {
1699 ehca_gen_err("page_cnt >= num_pages, "
1700 "page_cnt=%lx "
1701 "num_pages=%lx "
1702 "page_4k_cnt=%lx "
1703 "num_4k=%lx i=%x",
1704 pginfo->page_cnt,
1705 pginfo->num_pages,
1706 pginfo->page_4k_cnt,
1707 pginfo->num_4k, i);
1708 ret = -EFAULT;
1709 goto ehca_set_pagebuf_exit0;
1710 }
1711 *kpage = phys_to_abs(
1712 (pbuf->addr & EHCA_PAGEMASK)
1713 + (pginfo->next_4k * EHCA_PAGESIZE));
1714 if ( !(*kpage) && pbuf->addr ) {
1715 ehca_gen_err("pbuf->addr=%lx "
1716 "pbuf->size=%lx "
1717 "next_4k=%lx", pbuf->addr,
1718 pbuf->size,
1719 pginfo->next_4k);
1720 ret = -EFAULT;
1721 goto ehca_set_pagebuf_exit0;
1722 }
1723 (pginfo->page_4k_cnt)++;
1724 (pginfo->next_4k)++;
1725 if (pginfo->next_4k %
1726 (PAGE_SIZE / EHCA_PAGESIZE) == 0)
1727 (pginfo->page_cnt)++;
1728 kpage++;
1729 i++;
1730 if (i >= number) break;
1731 }
1732 if (pginfo->next_4k >= offs4k + num4k) {
1733 (pginfo->next_buf)++;
1734 pginfo->next_4k = 0;
1735 }
1736 }
1737 } else if (pginfo->type == EHCA_MR_PGI_USER) {
1738 /* loop over desired chunk entries */
1739 chunk = pginfo->next_chunk;
1740 prev_chunk = pginfo->next_chunk;
1741 list_for_each_entry_continue(chunk,
1742 (&(pginfo->region->chunk_list)),
1743 list) {
1744 for (i = pginfo->next_nmap; i < chunk->nmap; ) {
1745 pgaddr = ( page_to_pfn(chunk->page_list[i].page)
1746 << PAGE_SHIFT );
1747 *kpage = phys_to_abs(pgaddr +
1748 (pginfo->next_4k *
1749 EHCA_PAGESIZE));
1750 if ( !(*kpage) ) {
1751 ehca_gen_err("pgaddr=%lx "
1752 "chunk->page_list[i]=%lx "
1753 "i=%x next_4k=%lx mr=%p",
1754 pgaddr,
1755 (u64)sg_dma_address(
1756 &chunk->
1757 page_list[i]),
1758 i, pginfo->next_4k, e_mr);
1759 ret = -EFAULT;
1760 goto ehca_set_pagebuf_exit0;
1761 }
1762 (pginfo->page_4k_cnt)++;
1763 (pginfo->next_4k)++;
1764 kpage++;
1765 if (pginfo->next_4k %
1766 (PAGE_SIZE / EHCA_PAGESIZE) == 0) {
1767 (pginfo->page_cnt)++;
1768 (pginfo->next_nmap)++;
1769 pginfo->next_4k = 0;
1770 i++;
1771 }
1772 j++;
1773 if (j >= number) break;
1774 }
1775 if ((pginfo->next_nmap >= chunk->nmap) &&
1776 (j >= number)) {
1777 pginfo->next_nmap = 0;
1778 prev_chunk = chunk;
1779 break;
1780 } else if (pginfo->next_nmap >= chunk->nmap) {
1781 pginfo->next_nmap = 0;
1782 prev_chunk = chunk;
1783 } else if (j >= number)
1784 break;
1785 else
1786 prev_chunk = chunk;
1787 }
1788 pginfo->next_chunk =
1789 list_prepare_entry(prev_chunk,
1790 (&(pginfo->region->chunk_list)),
1791 list);
1792 } else if (pginfo->type == EHCA_MR_PGI_FMR) {
1793 /* loop over desired page_list entries */
1794 fmrlist = pginfo->page_list + pginfo->next_listelem;
1795 for (i = 0; i < number; i++) {
1796 *kpage = phys_to_abs((*fmrlist & EHCA_PAGEMASK) +
1797 pginfo->next_4k * EHCA_PAGESIZE);
1798 if ( !(*kpage) ) {
1799 ehca_gen_err("*fmrlist=%lx fmrlist=%p "
1800 "next_listelem=%lx next_4k=%lx",
1801 *fmrlist, fmrlist,
1802 pginfo->next_listelem,
1803 pginfo->next_4k);
1804 ret = -EFAULT;
1805 goto ehca_set_pagebuf_exit0;
1806 }
1807 (pginfo->page_4k_cnt)++;
1808 (pginfo->next_4k)++;
1809 kpage++;
1810 if (pginfo->next_4k %
1811 (e_mr->fmr_page_size / EHCA_PAGESIZE) == 0) {
1812 (pginfo->page_cnt)++;
1813 (pginfo->next_listelem)++;
1814 fmrlist++;
1815 pginfo->next_4k = 0;
1816 }
1817 }
1818 } else {
1819 ehca_gen_err("bad pginfo->type=%x", pginfo->type);
1820 ret = -EFAULT;
1821 goto ehca_set_pagebuf_exit0;
1822 }
1823
1824 ehca_set_pagebuf_exit0:
1825 if (ret)
1826 ehca_gen_err("ret=%x e_mr=%p pginfo=%p type=%x num_pages=%lx "
1827 "num_4k=%lx next_buf=%lx next_4k=%lx number=%x "
1828 "kpage=%p page_cnt=%lx page_4k_cnt=%lx i=%x "
1829 "next_listelem=%lx region=%p next_chunk=%p "
1830 "next_nmap=%lx", ret, e_mr, pginfo, pginfo->type,
1831 pginfo->num_pages, pginfo->num_4k,
1832 pginfo->next_buf, pginfo->next_4k, number, kpage,
1833 pginfo->page_cnt, pginfo->page_4k_cnt, i,
1834 pginfo->next_listelem, pginfo->region,
1835 pginfo->next_chunk, pginfo->next_nmap);
1836 return ret;
1837 } /* end ehca_set_pagebuf() */
1838
1839 /*----------------------------------------------------------------------*/
1840
1841 /* setup 1 page from page info page buffer */
1842 int ehca_set_pagebuf_1(struct ehca_mr *e_mr,
1843 struct ehca_mr_pginfo *pginfo,
1844 u64 *rpage)
1845 {
1846 int ret = 0;
1847 struct ib_phys_buf *tmp_pbuf;
1848 u64 *fmrlist;
1849 struct ib_umem_chunk *chunk;
1850 struct ib_umem_chunk *prev_chunk;
1851 u64 pgaddr, num4k, offs4k;
1852
1853 if (pginfo->type == EHCA_MR_PGI_PHYS) {
1854 /* sanity check */
1855 if ((pginfo->page_cnt >= pginfo->num_pages) ||
1856 (pginfo->page_4k_cnt >= pginfo->num_4k)) {
1857 ehca_gen_err("page_cnt >= num_pages, page_cnt=%lx "
1858 "num_pages=%lx page_4k_cnt=%lx num_4k=%lx",
1859 pginfo->page_cnt, pginfo->num_pages,
1860 pginfo->page_4k_cnt, pginfo->num_4k);
1861 ret = -EFAULT;
1862 goto ehca_set_pagebuf_1_exit0;
1863 }
1864 tmp_pbuf = pginfo->phys_buf_array + pginfo->next_buf;
1865 num4k = ((tmp_pbuf->addr % EHCA_PAGESIZE) + tmp_pbuf->size +
1866 EHCA_PAGESIZE - 1) / EHCA_PAGESIZE;
1867 offs4k = (tmp_pbuf->addr & ~PAGE_MASK) / EHCA_PAGESIZE;
1868 *rpage = phys_to_abs((tmp_pbuf->addr & EHCA_PAGEMASK) +
1869 (pginfo->next_4k * EHCA_PAGESIZE));
1870 if ( !(*rpage) && tmp_pbuf->addr ) {
1871 ehca_gen_err("tmp_pbuf->addr=%lx"
1872 " tmp_pbuf->size=%lx next_4k=%lx",
1873 tmp_pbuf->addr, tmp_pbuf->size,
1874 pginfo->next_4k);
1875 ret = -EFAULT;
1876 goto ehca_set_pagebuf_1_exit0;
1877 }
1878 (pginfo->page_4k_cnt)++;
1879 (pginfo->next_4k)++;
1880 if (pginfo->next_4k % (PAGE_SIZE / EHCA_PAGESIZE) == 0)
1881 (pginfo->page_cnt)++;
1882 if (pginfo->next_4k >= offs4k + num4k) {
1883 (pginfo->next_buf)++;
1884 pginfo->next_4k = 0;
1885 }
1886 } else if (pginfo->type == EHCA_MR_PGI_USER) {
1887 chunk = pginfo->next_chunk;
1888 prev_chunk = pginfo->next_chunk;
1889 list_for_each_entry_continue(chunk,
1890 (&(pginfo->region->chunk_list)),
1891 list) {
1892 pgaddr = ( page_to_pfn(chunk->page_list[
1893 pginfo->next_nmap].page)
1894 << PAGE_SHIFT);
1895 *rpage = phys_to_abs(pgaddr +
1896 (pginfo->next_4k * EHCA_PAGESIZE));
1897 if ( !(*rpage) ) {
1898 ehca_gen_err("pgaddr=%lx chunk->page_list[]=%lx"
1899 " next_nmap=%lx next_4k=%lx mr=%p",
1900 pgaddr, (u64)sg_dma_address(
1901 &chunk->page_list[
1902 pginfo->
1903 next_nmap]),
1904 pginfo->next_nmap, pginfo->next_4k,
1905 e_mr);
1906 ret = -EFAULT;
1907 goto ehca_set_pagebuf_1_exit0;
1908 }
1909 (pginfo->page_4k_cnt)++;
1910 (pginfo->next_4k)++;
1911 if (pginfo->next_4k %
1912 (PAGE_SIZE / EHCA_PAGESIZE) == 0) {
1913 (pginfo->page_cnt)++;
1914 (pginfo->next_nmap)++;
1915 pginfo->next_4k = 0;
1916 }
1917 if (pginfo->next_nmap >= chunk->nmap) {
1918 pginfo->next_nmap = 0;
1919 prev_chunk = chunk;
1920 }
1921 break;
1922 }
1923 pginfo->next_chunk =
1924 list_prepare_entry(prev_chunk,
1925 (&(pginfo->region->chunk_list)),
1926 list);
1927 } else if (pginfo->type == EHCA_MR_PGI_FMR) {
1928 fmrlist = pginfo->page_list + pginfo->next_listelem;
1929 *rpage = phys_to_abs((*fmrlist & EHCA_PAGEMASK) +
1930 pginfo->next_4k * EHCA_PAGESIZE);
1931 if ( !(*rpage) ) {
1932 ehca_gen_err("*fmrlist=%lx fmrlist=%p "
1933 "next_listelem=%lx next_4k=%lx",
1934 *fmrlist, fmrlist, pginfo->next_listelem,
1935 pginfo->next_4k);
1936 ret = -EFAULT;
1937 goto ehca_set_pagebuf_1_exit0;
1938 }
1939 (pginfo->page_4k_cnt)++;
1940 (pginfo->next_4k)++;
1941 if (pginfo->next_4k %
1942 (e_mr->fmr_page_size / EHCA_PAGESIZE) == 0) {
1943 (pginfo->page_cnt)++;
1944 (pginfo->next_listelem)++;
1945 pginfo->next_4k = 0;
1946 }
1947 } else {
1948 ehca_gen_err("bad pginfo->type=%x", pginfo->type);
1949 ret = -EFAULT;
1950 goto ehca_set_pagebuf_1_exit0;
1951 }
1952
1953 ehca_set_pagebuf_1_exit0:
1954 if (ret)
1955 ehca_gen_err("ret=%x e_mr=%p pginfo=%p type=%x num_pages=%lx "
1956 "num_4k=%lx next_buf=%lx next_4k=%lx rpage=%p "
1957 "page_cnt=%lx page_4k_cnt=%lx next_listelem=%lx "
1958 "region=%p next_chunk=%p next_nmap=%lx", ret, e_mr,
1959 pginfo, pginfo->type, pginfo->num_pages,
1960 pginfo->num_4k, pginfo->next_buf, pginfo->next_4k,
1961 rpage, pginfo->page_cnt, pginfo->page_4k_cnt,
1962 pginfo->next_listelem, pginfo->region,
1963 pginfo->next_chunk, pginfo->next_nmap);
1964 return ret;
1965 } /* end ehca_set_pagebuf_1() */
1966
1967 /*----------------------------------------------------------------------*/
1968
1969 /*
1970 * check MR if it is a max-MR, i.e. uses whole memory
1971 * in case it's a max-MR 1 is returned, else 0
1972 */
1973 int ehca_mr_is_maxmr(u64 size,
1974 u64 *iova_start)
1975 {
1976 /* a MR is treated as max-MR only if it fits following: */
1977 if ((size == ((u64)high_memory - PAGE_OFFSET)) &&
1978 (iova_start == (void*)KERNELBASE)) {
1979 ehca_gen_dbg("this is a max-MR");
1980 return 1;
1981 } else
1982 return 0;
1983 } /* end ehca_mr_is_maxmr() */
1984
1985 /*----------------------------------------------------------------------*/
1986
1987 /* map access control for MR/MW. This routine is used for MR and MW. */
1988 void ehca_mrmw_map_acl(int ib_acl,
1989 u32 *hipz_acl)
1990 {
1991 *hipz_acl = 0;
1992 if (ib_acl & IB_ACCESS_REMOTE_READ)
1993 *hipz_acl |= HIPZ_ACCESSCTRL_R_READ;
1994 if (ib_acl & IB_ACCESS_REMOTE_WRITE)
1995 *hipz_acl |= HIPZ_ACCESSCTRL_R_WRITE;
1996 if (ib_acl & IB_ACCESS_REMOTE_ATOMIC)
1997 *hipz_acl |= HIPZ_ACCESSCTRL_R_ATOMIC;
1998 if (ib_acl & IB_ACCESS_LOCAL_WRITE)
1999 *hipz_acl |= HIPZ_ACCESSCTRL_L_WRITE;
2000 if (ib_acl & IB_ACCESS_MW_BIND)
2001 *hipz_acl |= HIPZ_ACCESSCTRL_MW_BIND;
2002 } /* end ehca_mrmw_map_acl() */
2003
2004 /*----------------------------------------------------------------------*/
2005
2006 /* sets page size in hipz access control for MR/MW. */
2007 void ehca_mrmw_set_pgsize_hipz_acl(u32 *hipz_acl) /*INOUT*/
2008 {
2009 return; /* HCA supports only 4k */
2010 } /* end ehca_mrmw_set_pgsize_hipz_acl() */
2011
2012 /*----------------------------------------------------------------------*/
2013
2014 /*
2015 * reverse map access control for MR/MW.
2016 * This routine is used for MR and MW.
2017 */
2018 void ehca_mrmw_reverse_map_acl(const u32 *hipz_acl,
2019 int *ib_acl) /*OUT*/
2020 {
2021 *ib_acl = 0;
2022 if (*hipz_acl & HIPZ_ACCESSCTRL_R_READ)
2023 *ib_acl |= IB_ACCESS_REMOTE_READ;
2024 if (*hipz_acl & HIPZ_ACCESSCTRL_R_WRITE)
2025 *ib_acl |= IB_ACCESS_REMOTE_WRITE;
2026 if (*hipz_acl & HIPZ_ACCESSCTRL_R_ATOMIC)
2027 *ib_acl |= IB_ACCESS_REMOTE_ATOMIC;
2028 if (*hipz_acl & HIPZ_ACCESSCTRL_L_WRITE)
2029 *ib_acl |= IB_ACCESS_LOCAL_WRITE;
2030 if (*hipz_acl & HIPZ_ACCESSCTRL_MW_BIND)
2031 *ib_acl |= IB_ACCESS_MW_BIND;
2032 } /* end ehca_mrmw_reverse_map_acl() */
2033
2034
2035 /*----------------------------------------------------------------------*/
2036
2037 /*
2038 * map HIPZ rc to IB retcodes for MR/MW allocations
2039 * Used for hipz_mr_reg_alloc and hipz_mw_alloc.
2040 */
2041 int ehca_mrmw_map_hrc_alloc(const u64 hipz_rc)
2042 {
2043 switch (hipz_rc) {
2044 case H_SUCCESS: /* successful completion */
2045 return 0;
2046 case H_ADAPTER_PARM: /* invalid adapter handle */
2047 case H_RT_PARM: /* invalid resource type */
2048 case H_NOT_ENOUGH_RESOURCES: /* insufficient resources */
2049 case H_MLENGTH_PARM: /* invalid memory length */
2050 case H_MEM_ACCESS_PARM: /* invalid access controls */
2051 case H_CONSTRAINED: /* resource constraint */
2052 return -EINVAL;
2053 case H_BUSY: /* long busy */
2054 return -EBUSY;
2055 default:
2056 return -EINVAL;
2057 }
2058 } /* end ehca_mrmw_map_hrc_alloc() */
2059
2060 /*----------------------------------------------------------------------*/
2061
2062 /*
2063 * map HIPZ rc to IB retcodes for MR register rpage
2064 * Used for hipz_h_register_rpage_mr at registering last page
2065 */
2066 int ehca_mrmw_map_hrc_rrpg_last(const u64 hipz_rc)
2067 {
2068 switch (hipz_rc) {
2069 case H_SUCCESS: /* registration complete */
2070 return 0;
2071 case H_PAGE_REGISTERED: /* page registered */
2072 case H_ADAPTER_PARM: /* invalid adapter handle */
2073 case H_RH_PARM: /* invalid resource handle */
2074 /* case H_QT_PARM: invalid queue type */
2075 case H_PARAMETER: /*
2076 * invalid logical address,
2077 * or count zero or greater 512
2078 */
2079 case H_TABLE_FULL: /* page table full */
2080 case H_HARDWARE: /* HCA not operational */
2081 return -EINVAL;
2082 case H_BUSY: /* long busy */
2083 return -EBUSY;
2084 default:
2085 return -EINVAL;
2086 }
2087 } /* end ehca_mrmw_map_hrc_rrpg_last() */
2088
2089 /*----------------------------------------------------------------------*/
2090
2091 /*
2092 * map HIPZ rc to IB retcodes for MR register rpage
2093 * Used for hipz_h_register_rpage_mr at registering one page, but not last page
2094 */
2095 int ehca_mrmw_map_hrc_rrpg_notlast(const u64 hipz_rc)
2096 {
2097 switch (hipz_rc) {
2098 case H_PAGE_REGISTERED: /* page registered */
2099 return 0;
2100 case H_SUCCESS: /* registration complete */
2101 case H_ADAPTER_PARM: /* invalid adapter handle */
2102 case H_RH_PARM: /* invalid resource handle */
2103 /* case H_QT_PARM: invalid queue type */
2104 case H_PARAMETER: /*
2105 * invalid logical address,
2106 * or count zero or greater 512
2107 */
2108 case H_TABLE_FULL: /* page table full */
2109 case H_HARDWARE: /* HCA not operational */
2110 return -EINVAL;
2111 case H_BUSY: /* long busy */
2112 return -EBUSY;
2113 default:
2114 return -EINVAL;
2115 }
2116 } /* end ehca_mrmw_map_hrc_rrpg_notlast() */
2117
2118 /*----------------------------------------------------------------------*/
2119
2120 /* map HIPZ rc to IB retcodes for MR query. Used for hipz_mr_query. */
2121 int ehca_mrmw_map_hrc_query_mr(const u64 hipz_rc)
2122 {
2123 switch (hipz_rc) {
2124 case H_SUCCESS: /* successful completion */
2125 return 0;
2126 case H_ADAPTER_PARM: /* invalid adapter handle */
2127 case H_RH_PARM: /* invalid resource handle */
2128 return -EINVAL;
2129 case H_BUSY: /* long busy */
2130 return -EBUSY;
2131 default:
2132 return -EINVAL;
2133 }
2134 } /* end ehca_mrmw_map_hrc_query_mr() */
2135
2136 /*----------------------------------------------------------------------*/
2137 /*----------------------------------------------------------------------*/
2138
2139 /*
2140 * map HIPZ rc to IB retcodes for freeing MR resource
2141 * Used for hipz_h_free_resource_mr
2142 */
2143 int ehca_mrmw_map_hrc_free_mr(const u64 hipz_rc)
2144 {
2145 switch (hipz_rc) {
2146 case H_SUCCESS: /* resource freed */
2147 return 0;
2148 case H_ADAPTER_PARM: /* invalid adapter handle */
2149 case H_RH_PARM: /* invalid resource handle */
2150 case H_R_STATE: /* invalid resource state */
2151 case H_HARDWARE: /* HCA not operational */
2152 return -EINVAL;
2153 case H_RESOURCE: /* Resource in use */
2154 case H_BUSY: /* long busy */
2155 return -EBUSY;
2156 default:
2157 return -EINVAL;
2158 }
2159 } /* end ehca_mrmw_map_hrc_free_mr() */
2160
2161 /*----------------------------------------------------------------------*/
2162
2163 /*
2164 * map HIPZ rc to IB retcodes for freeing MW resource
2165 * Used for hipz_h_free_resource_mw
2166 */
2167 int ehca_mrmw_map_hrc_free_mw(const u64 hipz_rc)
2168 {
2169 switch (hipz_rc) {
2170 case H_SUCCESS: /* resource freed */
2171 return 0;
2172 case H_ADAPTER_PARM: /* invalid adapter handle */
2173 case H_RH_PARM: /* invalid resource handle */
2174 case H_R_STATE: /* invalid resource state */
2175 case H_HARDWARE: /* HCA not operational */
2176 return -EINVAL;
2177 case H_RESOURCE: /* Resource in use */
2178 case H_BUSY: /* long busy */
2179 return -EBUSY;
2180 default:
2181 return -EINVAL;
2182 }
2183 } /* end ehca_mrmw_map_hrc_free_mw() */
2184
2185 /*----------------------------------------------------------------------*/
2186
2187 /*
2188 * map HIPZ rc to IB retcodes for SMR registrations
2189 * Used for hipz_h_register_smr.
2190 */
2191 int ehca_mrmw_map_hrc_reg_smr(const u64 hipz_rc)
2192 {
2193 switch (hipz_rc) {
2194 case H_SUCCESS: /* successful completion */
2195 return 0;
2196 case H_ADAPTER_PARM: /* invalid adapter handle */
2197 case H_RH_PARM: /* invalid resource handle */
2198 case H_MEM_PARM: /* invalid MR virtual address */
2199 case H_MEM_ACCESS_PARM: /* invalid access controls */
2200 case H_NOT_ENOUGH_RESOURCES: /* insufficient resources */
2201 return -EINVAL;
2202 case H_BUSY: /* long busy */
2203 return -EBUSY;
2204 default:
2205 return -EINVAL;
2206 }
2207 } /* end ehca_mrmw_map_hrc_reg_smr() */
2208
2209 /*----------------------------------------------------------------------*/
2210
2211 /*
2212 * MR destructor and constructor
2213 * used in Reregister MR verb, sets all fields in ehca_mr_t to 0,
2214 * except struct ib_mr and spinlock
2215 */
2216 void ehca_mr_deletenew(struct ehca_mr *mr)
2217 {
2218 mr->flags = 0;
2219 mr->num_pages = 0;
2220 mr->num_4k = 0;
2221 mr->acl = 0;
2222 mr->start = NULL;
2223 mr->fmr_page_size = 0;
2224 mr->fmr_max_pages = 0;
2225 mr->fmr_max_maps = 0;
2226 mr->fmr_map_cnt = 0;
2227 memset(&mr->ipz_mr_handle, 0, sizeof(mr->ipz_mr_handle));
2228 memset(&mr->galpas, 0, sizeof(mr->galpas));
2229 mr->nr_of_pages = 0;
2230 mr->pagearray = NULL;
2231 } /* end ehca_mr_deletenew() */
2232
2233 int ehca_init_mrmw_cache(void)
2234 {
2235 mr_cache = kmem_cache_create("ehca_cache_mr",
2236 sizeof(struct ehca_mr), 0,
2237 SLAB_HWCACHE_ALIGN,
2238 NULL, NULL);
2239 if (!mr_cache)
2240 return -ENOMEM;
2241 mw_cache = kmem_cache_create("ehca_cache_mw",
2242 sizeof(struct ehca_mw), 0,
2243 SLAB_HWCACHE_ALIGN,
2244 NULL, NULL);
2245 if (!mw_cache) {
2246 kmem_cache_destroy(mr_cache);
2247 mr_cache = NULL;
2248 return -ENOMEM;
2249 }
2250 return 0;
2251 }
2252
2253 void ehca_cleanup_mrmw_cache(void)
2254 {
2255 if (mr_cache)
2256 kmem_cache_destroy(mr_cache);
2257 if (mw_cache)
2258 kmem_cache_destroy(mw_cache);
2259 }