Linux 3.11-rc3
[cris-mirror.git] / drivers / net / ethernet / ibm / ehea / ehea_qmr.c
blob9b03033bb5576f52d7c6f687f9e1a99c8e7a21a5
1 /*
2 * linux/drivers/net/ethernet/ibm/ehea/ehea_qmr.c
4 * eHEA ethernet device driver for IBM eServer System p
6 * (C) Copyright IBM Corp. 2006
8 * Authors:
9 * Christoph Raisch <raisch@de.ibm.com>
10 * Jan-Bernd Themann <themann@de.ibm.com>
11 * Thomas Klein <tklein@de.ibm.com>
14 * This program is free software; you can redistribute it and/or modify
15 * it under the terms of the GNU General Public License as published by
16 * the Free Software Foundation; either version 2, or (at your option)
17 * any later version.
19 * This program is distributed in the hope that it will be useful,
20 * but WITHOUT ANY WARRANTY; without even the implied warranty of
21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 * GNU General Public License for more details.
24 * You should have received a copy of the GNU General Public License
25 * along with this program; if not, write to the Free Software
26 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
29 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
31 #include <linux/mm.h>
32 #include <linux/slab.h>
33 #include "ehea.h"
34 #include "ehea_phyp.h"
35 #include "ehea_qmr.h"
37 static struct ehea_bmap *ehea_bmap;
39 static void *hw_qpageit_get_inc(struct hw_queue *queue)
41 void *retvalue = hw_qeit_get(queue);
43 queue->current_q_offset += queue->pagesize;
44 if (queue->current_q_offset > queue->queue_length) {
45 queue->current_q_offset -= queue->pagesize;
46 retvalue = NULL;
47 } else if (((u64) retvalue) & (EHEA_PAGESIZE-1)) {
48 pr_err("not on pageboundary\n");
49 retvalue = NULL;
51 return retvalue;
54 static int hw_queue_ctor(struct hw_queue *queue, const u32 nr_of_pages,
55 const u32 pagesize, const u32 qe_size)
57 int pages_per_kpage = PAGE_SIZE / pagesize;
58 int i, k;
60 if ((pagesize > PAGE_SIZE) || (!pages_per_kpage)) {
61 pr_err("pagesize conflict! kernel pagesize=%d, ehea pagesize=%d\n",
62 (int)PAGE_SIZE, (int)pagesize);
63 return -EINVAL;
66 queue->queue_length = nr_of_pages * pagesize;
67 queue->queue_pages = kmalloc_array(nr_of_pages, sizeof(void *),
68 GFP_KERNEL);
69 if (!queue->queue_pages)
70 return -ENOMEM;
73 * allocate pages for queue:
74 * outer loop allocates whole kernel pages (page aligned) and
75 * inner loop divides a kernel page into smaller hea queue pages
77 i = 0;
78 while (i < nr_of_pages) {
79 u8 *kpage = (u8 *)get_zeroed_page(GFP_KERNEL);
80 if (!kpage)
81 goto out_nomem;
82 for (k = 0; k < pages_per_kpage && i < nr_of_pages; k++) {
83 (queue->queue_pages)[i] = (struct ehea_page *)kpage;
84 kpage += pagesize;
85 i++;
89 queue->current_q_offset = 0;
90 queue->qe_size = qe_size;
91 queue->pagesize = pagesize;
92 queue->toggle_state = 1;
94 return 0;
95 out_nomem:
96 for (i = 0; i < nr_of_pages; i += pages_per_kpage) {
97 if (!(queue->queue_pages)[i])
98 break;
99 free_page((unsigned long)(queue->queue_pages)[i]);
101 return -ENOMEM;
104 static void hw_queue_dtor(struct hw_queue *queue)
106 int pages_per_kpage = PAGE_SIZE / queue->pagesize;
107 int i, nr_pages;
109 if (!queue || !queue->queue_pages)
110 return;
112 nr_pages = queue->queue_length / queue->pagesize;
114 for (i = 0; i < nr_pages; i += pages_per_kpage)
115 free_page((unsigned long)(queue->queue_pages)[i]);
117 kfree(queue->queue_pages);
120 struct ehea_cq *ehea_create_cq(struct ehea_adapter *adapter,
121 int nr_of_cqe, u64 eq_handle, u32 cq_token)
123 struct ehea_cq *cq;
124 struct h_epa epa;
125 u64 *cq_handle_ref, hret, rpage;
126 u32 act_nr_of_entries, act_pages, counter;
127 int ret;
128 void *vpage;
130 cq = kzalloc(sizeof(*cq), GFP_KERNEL);
131 if (!cq)
132 goto out_nomem;
134 cq->attr.max_nr_of_cqes = nr_of_cqe;
135 cq->attr.cq_token = cq_token;
136 cq->attr.eq_handle = eq_handle;
138 cq->adapter = adapter;
140 cq_handle_ref = &cq->fw_handle;
141 act_nr_of_entries = 0;
142 act_pages = 0;
144 hret = ehea_h_alloc_resource_cq(adapter->handle, &cq->attr,
145 &cq->fw_handle, &cq->epas);
146 if (hret != H_SUCCESS) {
147 pr_err("alloc_resource_cq failed\n");
148 goto out_freemem;
151 ret = hw_queue_ctor(&cq->hw_queue, cq->attr.nr_pages,
152 EHEA_PAGESIZE, sizeof(struct ehea_cqe));
153 if (ret)
154 goto out_freeres;
156 for (counter = 0; counter < cq->attr.nr_pages; counter++) {
157 vpage = hw_qpageit_get_inc(&cq->hw_queue);
158 if (!vpage) {
159 pr_err("hw_qpageit_get_inc failed\n");
160 goto out_kill_hwq;
163 rpage = __pa(vpage);
164 hret = ehea_h_register_rpage(adapter->handle,
165 0, EHEA_CQ_REGISTER_ORIG,
166 cq->fw_handle, rpage, 1);
167 if (hret < H_SUCCESS) {
168 pr_err("register_rpage_cq failed ehea_cq=%p hret=%llx counter=%i act_pages=%i\n",
169 cq, hret, counter, cq->attr.nr_pages);
170 goto out_kill_hwq;
173 if (counter == (cq->attr.nr_pages - 1)) {
174 vpage = hw_qpageit_get_inc(&cq->hw_queue);
176 if ((hret != H_SUCCESS) || (vpage)) {
177 pr_err("registration of pages not complete hret=%llx\n",
178 hret);
179 goto out_kill_hwq;
181 } else {
182 if (hret != H_PAGE_REGISTERED) {
183 pr_err("CQ: registration of page failed hret=%llx\n",
184 hret);
185 goto out_kill_hwq;
190 hw_qeit_reset(&cq->hw_queue);
191 epa = cq->epas.kernel;
192 ehea_reset_cq_ep(cq);
193 ehea_reset_cq_n1(cq);
195 return cq;
197 out_kill_hwq:
198 hw_queue_dtor(&cq->hw_queue);
200 out_freeres:
201 ehea_h_free_resource(adapter->handle, cq->fw_handle, FORCE_FREE);
203 out_freemem:
204 kfree(cq);
206 out_nomem:
207 return NULL;
210 static u64 ehea_destroy_cq_res(struct ehea_cq *cq, u64 force)
212 u64 hret;
213 u64 adapter_handle = cq->adapter->handle;
215 /* deregister all previous registered pages */
216 hret = ehea_h_free_resource(adapter_handle, cq->fw_handle, force);
217 if (hret != H_SUCCESS)
218 return hret;
220 hw_queue_dtor(&cq->hw_queue);
221 kfree(cq);
223 return hret;
226 int ehea_destroy_cq(struct ehea_cq *cq)
228 u64 hret, aer, aerr;
229 if (!cq)
230 return 0;
232 hcp_epas_dtor(&cq->epas);
233 hret = ehea_destroy_cq_res(cq, NORMAL_FREE);
234 if (hret == H_R_STATE) {
235 ehea_error_data(cq->adapter, cq->fw_handle, &aer, &aerr);
236 hret = ehea_destroy_cq_res(cq, FORCE_FREE);
239 if (hret != H_SUCCESS) {
240 pr_err("destroy CQ failed\n");
241 return -EIO;
244 return 0;
247 struct ehea_eq *ehea_create_eq(struct ehea_adapter *adapter,
248 const enum ehea_eq_type type,
249 const u32 max_nr_of_eqes, const u8 eqe_gen)
251 int ret, i;
252 u64 hret, rpage;
253 void *vpage;
254 struct ehea_eq *eq;
256 eq = kzalloc(sizeof(*eq), GFP_KERNEL);
257 if (!eq)
258 return NULL;
260 eq->adapter = adapter;
261 eq->attr.type = type;
262 eq->attr.max_nr_of_eqes = max_nr_of_eqes;
263 eq->attr.eqe_gen = eqe_gen;
264 spin_lock_init(&eq->spinlock);
266 hret = ehea_h_alloc_resource_eq(adapter->handle,
267 &eq->attr, &eq->fw_handle);
268 if (hret != H_SUCCESS) {
269 pr_err("alloc_resource_eq failed\n");
270 goto out_freemem;
273 ret = hw_queue_ctor(&eq->hw_queue, eq->attr.nr_pages,
274 EHEA_PAGESIZE, sizeof(struct ehea_eqe));
275 if (ret) {
276 pr_err("can't allocate eq pages\n");
277 goto out_freeres;
280 for (i = 0; i < eq->attr.nr_pages; i++) {
281 vpage = hw_qpageit_get_inc(&eq->hw_queue);
282 if (!vpage) {
283 pr_err("hw_qpageit_get_inc failed\n");
284 hret = H_RESOURCE;
285 goto out_kill_hwq;
288 rpage = __pa(vpage);
290 hret = ehea_h_register_rpage(adapter->handle, 0,
291 EHEA_EQ_REGISTER_ORIG,
292 eq->fw_handle, rpage, 1);
294 if (i == (eq->attr.nr_pages - 1)) {
295 /* last page */
296 vpage = hw_qpageit_get_inc(&eq->hw_queue);
297 if ((hret != H_SUCCESS) || (vpage))
298 goto out_kill_hwq;
300 } else {
301 if (hret != H_PAGE_REGISTERED)
302 goto out_kill_hwq;
307 hw_qeit_reset(&eq->hw_queue);
308 return eq;
310 out_kill_hwq:
311 hw_queue_dtor(&eq->hw_queue);
313 out_freeres:
314 ehea_h_free_resource(adapter->handle, eq->fw_handle, FORCE_FREE);
316 out_freemem:
317 kfree(eq);
318 return NULL;
321 struct ehea_eqe *ehea_poll_eq(struct ehea_eq *eq)
323 struct ehea_eqe *eqe;
324 unsigned long flags;
326 spin_lock_irqsave(&eq->spinlock, flags);
327 eqe = hw_eqit_eq_get_inc_valid(&eq->hw_queue);
328 spin_unlock_irqrestore(&eq->spinlock, flags);
330 return eqe;
333 static u64 ehea_destroy_eq_res(struct ehea_eq *eq, u64 force)
335 u64 hret;
336 unsigned long flags;
338 spin_lock_irqsave(&eq->spinlock, flags);
340 hret = ehea_h_free_resource(eq->adapter->handle, eq->fw_handle, force);
341 spin_unlock_irqrestore(&eq->spinlock, flags);
343 if (hret != H_SUCCESS)
344 return hret;
346 hw_queue_dtor(&eq->hw_queue);
347 kfree(eq);
349 return hret;
352 int ehea_destroy_eq(struct ehea_eq *eq)
354 u64 hret, aer, aerr;
355 if (!eq)
356 return 0;
358 hcp_epas_dtor(&eq->epas);
360 hret = ehea_destroy_eq_res(eq, NORMAL_FREE);
361 if (hret == H_R_STATE) {
362 ehea_error_data(eq->adapter, eq->fw_handle, &aer, &aerr);
363 hret = ehea_destroy_eq_res(eq, FORCE_FREE);
366 if (hret != H_SUCCESS) {
367 pr_err("destroy EQ failed\n");
368 return -EIO;
371 return 0;
374 /* allocates memory for a queue and registers pages in phyp */
375 static int ehea_qp_alloc_register(struct ehea_qp *qp, struct hw_queue *hw_queue,
376 int nr_pages, int wqe_size, int act_nr_sges,
377 struct ehea_adapter *adapter, int h_call_q_selector)
379 u64 hret, rpage;
380 int ret, cnt;
381 void *vpage;
383 ret = hw_queue_ctor(hw_queue, nr_pages, EHEA_PAGESIZE, wqe_size);
384 if (ret)
385 return ret;
387 for (cnt = 0; cnt < nr_pages; cnt++) {
388 vpage = hw_qpageit_get_inc(hw_queue);
389 if (!vpage) {
390 pr_err("hw_qpageit_get_inc failed\n");
391 goto out_kill_hwq;
393 rpage = __pa(vpage);
394 hret = ehea_h_register_rpage(adapter->handle,
395 0, h_call_q_selector,
396 qp->fw_handle, rpage, 1);
397 if (hret < H_SUCCESS) {
398 pr_err("register_rpage_qp failed\n");
399 goto out_kill_hwq;
402 hw_qeit_reset(hw_queue);
403 return 0;
405 out_kill_hwq:
406 hw_queue_dtor(hw_queue);
407 return -EIO;
410 static inline u32 map_wqe_size(u8 wqe_enc_size)
412 return 128 << wqe_enc_size;
415 struct ehea_qp *ehea_create_qp(struct ehea_adapter *adapter,
416 u32 pd, struct ehea_qp_init_attr *init_attr)
418 int ret;
419 u64 hret;
420 struct ehea_qp *qp;
421 u32 wqe_size_in_bytes_sq, wqe_size_in_bytes_rq1;
422 u32 wqe_size_in_bytes_rq2, wqe_size_in_bytes_rq3;
425 qp = kzalloc(sizeof(*qp), GFP_KERNEL);
426 if (!qp)
427 return NULL;
429 qp->adapter = adapter;
431 hret = ehea_h_alloc_resource_qp(adapter->handle, init_attr, pd,
432 &qp->fw_handle, &qp->epas);
433 if (hret != H_SUCCESS) {
434 pr_err("ehea_h_alloc_resource_qp failed\n");
435 goto out_freemem;
438 wqe_size_in_bytes_sq = map_wqe_size(init_attr->act_wqe_size_enc_sq);
439 wqe_size_in_bytes_rq1 = map_wqe_size(init_attr->act_wqe_size_enc_rq1);
440 wqe_size_in_bytes_rq2 = map_wqe_size(init_attr->act_wqe_size_enc_rq2);
441 wqe_size_in_bytes_rq3 = map_wqe_size(init_attr->act_wqe_size_enc_rq3);
443 ret = ehea_qp_alloc_register(qp, &qp->hw_squeue, init_attr->nr_sq_pages,
444 wqe_size_in_bytes_sq,
445 init_attr->act_wqe_size_enc_sq, adapter,
447 if (ret) {
448 pr_err("can't register for sq ret=%x\n", ret);
449 goto out_freeres;
452 ret = ehea_qp_alloc_register(qp, &qp->hw_rqueue1,
453 init_attr->nr_rq1_pages,
454 wqe_size_in_bytes_rq1,
455 init_attr->act_wqe_size_enc_rq1,
456 adapter, 1);
457 if (ret) {
458 pr_err("can't register for rq1 ret=%x\n", ret);
459 goto out_kill_hwsq;
462 if (init_attr->rq_count > 1) {
463 ret = ehea_qp_alloc_register(qp, &qp->hw_rqueue2,
464 init_attr->nr_rq2_pages,
465 wqe_size_in_bytes_rq2,
466 init_attr->act_wqe_size_enc_rq2,
467 adapter, 2);
468 if (ret) {
469 pr_err("can't register for rq2 ret=%x\n", ret);
470 goto out_kill_hwr1q;
474 if (init_attr->rq_count > 2) {
475 ret = ehea_qp_alloc_register(qp, &qp->hw_rqueue3,
476 init_attr->nr_rq3_pages,
477 wqe_size_in_bytes_rq3,
478 init_attr->act_wqe_size_enc_rq3,
479 adapter, 3);
480 if (ret) {
481 pr_err("can't register for rq3 ret=%x\n", ret);
482 goto out_kill_hwr2q;
486 qp->init_attr = *init_attr;
488 return qp;
490 out_kill_hwr2q:
491 hw_queue_dtor(&qp->hw_rqueue2);
493 out_kill_hwr1q:
494 hw_queue_dtor(&qp->hw_rqueue1);
496 out_kill_hwsq:
497 hw_queue_dtor(&qp->hw_squeue);
499 out_freeres:
500 ehea_h_disable_and_get_hea(adapter->handle, qp->fw_handle);
501 ehea_h_free_resource(adapter->handle, qp->fw_handle, FORCE_FREE);
503 out_freemem:
504 kfree(qp);
505 return NULL;
508 static u64 ehea_destroy_qp_res(struct ehea_qp *qp, u64 force)
510 u64 hret;
511 struct ehea_qp_init_attr *qp_attr = &qp->init_attr;
514 ehea_h_disable_and_get_hea(qp->adapter->handle, qp->fw_handle);
515 hret = ehea_h_free_resource(qp->adapter->handle, qp->fw_handle, force);
516 if (hret != H_SUCCESS)
517 return hret;
519 hw_queue_dtor(&qp->hw_squeue);
520 hw_queue_dtor(&qp->hw_rqueue1);
522 if (qp_attr->rq_count > 1)
523 hw_queue_dtor(&qp->hw_rqueue2);
524 if (qp_attr->rq_count > 2)
525 hw_queue_dtor(&qp->hw_rqueue3);
526 kfree(qp);
528 return hret;
531 int ehea_destroy_qp(struct ehea_qp *qp)
533 u64 hret, aer, aerr;
534 if (!qp)
535 return 0;
537 hcp_epas_dtor(&qp->epas);
539 hret = ehea_destroy_qp_res(qp, NORMAL_FREE);
540 if (hret == H_R_STATE) {
541 ehea_error_data(qp->adapter, qp->fw_handle, &aer, &aerr);
542 hret = ehea_destroy_qp_res(qp, FORCE_FREE);
545 if (hret != H_SUCCESS) {
546 pr_err("destroy QP failed\n");
547 return -EIO;
550 return 0;
553 static inline int ehea_calc_index(unsigned long i, unsigned long s)
555 return (i >> s) & EHEA_INDEX_MASK;
558 static inline int ehea_init_top_bmap(struct ehea_top_bmap *ehea_top_bmap,
559 int dir)
561 if (!ehea_top_bmap->dir[dir]) {
562 ehea_top_bmap->dir[dir] =
563 kzalloc(sizeof(struct ehea_dir_bmap), GFP_KERNEL);
564 if (!ehea_top_bmap->dir[dir])
565 return -ENOMEM;
567 return 0;
570 static inline int ehea_init_bmap(struct ehea_bmap *ehea_bmap, int top, int dir)
572 if (!ehea_bmap->top[top]) {
573 ehea_bmap->top[top] =
574 kzalloc(sizeof(struct ehea_top_bmap), GFP_KERNEL);
575 if (!ehea_bmap->top[top])
576 return -ENOMEM;
578 return ehea_init_top_bmap(ehea_bmap->top[top], dir);
581 static DEFINE_MUTEX(ehea_busmap_mutex);
582 static unsigned long ehea_mr_len;
584 #define EHEA_BUSMAP_ADD_SECT 1
585 #define EHEA_BUSMAP_REM_SECT 0
587 static void ehea_rebuild_busmap(void)
589 u64 vaddr = EHEA_BUSMAP_START;
590 int top, dir, idx;
592 for (top = 0; top < EHEA_MAP_ENTRIES; top++) {
593 struct ehea_top_bmap *ehea_top;
594 int valid_dir_entries = 0;
596 if (!ehea_bmap->top[top])
597 continue;
598 ehea_top = ehea_bmap->top[top];
599 for (dir = 0; dir < EHEA_MAP_ENTRIES; dir++) {
600 struct ehea_dir_bmap *ehea_dir;
601 int valid_entries = 0;
603 if (!ehea_top->dir[dir])
604 continue;
605 valid_dir_entries++;
606 ehea_dir = ehea_top->dir[dir];
607 for (idx = 0; idx < EHEA_MAP_ENTRIES; idx++) {
608 if (!ehea_dir->ent[idx])
609 continue;
610 valid_entries++;
611 ehea_dir->ent[idx] = vaddr;
612 vaddr += EHEA_SECTSIZE;
614 if (!valid_entries) {
615 ehea_top->dir[dir] = NULL;
616 kfree(ehea_dir);
619 if (!valid_dir_entries) {
620 ehea_bmap->top[top] = NULL;
621 kfree(ehea_top);
626 static int ehea_update_busmap(unsigned long pfn, unsigned long nr_pages, int add)
628 unsigned long i, start_section, end_section;
630 if (!nr_pages)
631 return 0;
633 if (!ehea_bmap) {
634 ehea_bmap = kzalloc(sizeof(struct ehea_bmap), GFP_KERNEL);
635 if (!ehea_bmap)
636 return -ENOMEM;
639 start_section = (pfn * PAGE_SIZE) / EHEA_SECTSIZE;
640 end_section = start_section + ((nr_pages * PAGE_SIZE) / EHEA_SECTSIZE);
641 /* Mark entries as valid or invalid only; address is assigned later */
642 for (i = start_section; i < end_section; i++) {
643 u64 flag;
644 int top = ehea_calc_index(i, EHEA_TOP_INDEX_SHIFT);
645 int dir = ehea_calc_index(i, EHEA_DIR_INDEX_SHIFT);
646 int idx = i & EHEA_INDEX_MASK;
648 if (add) {
649 int ret = ehea_init_bmap(ehea_bmap, top, dir);
650 if (ret)
651 return ret;
652 flag = 1; /* valid */
653 ehea_mr_len += EHEA_SECTSIZE;
654 } else {
655 if (!ehea_bmap->top[top])
656 continue;
657 if (!ehea_bmap->top[top]->dir[dir])
658 continue;
659 flag = 0; /* invalid */
660 ehea_mr_len -= EHEA_SECTSIZE;
663 ehea_bmap->top[top]->dir[dir]->ent[idx] = flag;
665 ehea_rebuild_busmap(); /* Assign contiguous addresses for mr */
666 return 0;
669 int ehea_add_sect_bmap(unsigned long pfn, unsigned long nr_pages)
671 int ret;
673 mutex_lock(&ehea_busmap_mutex);
674 ret = ehea_update_busmap(pfn, nr_pages, EHEA_BUSMAP_ADD_SECT);
675 mutex_unlock(&ehea_busmap_mutex);
676 return ret;
679 int ehea_rem_sect_bmap(unsigned long pfn, unsigned long nr_pages)
681 int ret;
683 mutex_lock(&ehea_busmap_mutex);
684 ret = ehea_update_busmap(pfn, nr_pages, EHEA_BUSMAP_REM_SECT);
685 mutex_unlock(&ehea_busmap_mutex);
686 return ret;
689 static int ehea_is_hugepage(unsigned long pfn)
691 int page_order;
693 if (pfn & EHEA_HUGEPAGE_PFN_MASK)
694 return 0;
696 page_order = compound_order(pfn_to_page(pfn));
697 if (page_order + PAGE_SHIFT != EHEA_HUGEPAGESHIFT)
698 return 0;
700 return 1;
703 static int ehea_create_busmap_callback(unsigned long initial_pfn,
704 unsigned long total_nr_pages, void *arg)
706 int ret;
707 unsigned long pfn, start_pfn, end_pfn, nr_pages;
709 if ((total_nr_pages * PAGE_SIZE) < EHEA_HUGEPAGE_SIZE)
710 return ehea_update_busmap(initial_pfn, total_nr_pages,
711 EHEA_BUSMAP_ADD_SECT);
713 /* Given chunk is >= 16GB -> check for hugepages */
714 start_pfn = initial_pfn;
715 end_pfn = initial_pfn + total_nr_pages;
716 pfn = start_pfn;
718 while (pfn < end_pfn) {
719 if (ehea_is_hugepage(pfn)) {
720 /* Add mem found in front of the hugepage */
721 nr_pages = pfn - start_pfn;
722 ret = ehea_update_busmap(start_pfn, nr_pages,
723 EHEA_BUSMAP_ADD_SECT);
724 if (ret)
725 return ret;
727 /* Skip the hugepage */
728 pfn += (EHEA_HUGEPAGE_SIZE / PAGE_SIZE);
729 start_pfn = pfn;
730 } else
731 pfn += (EHEA_SECTSIZE / PAGE_SIZE);
734 /* Add mem found behind the hugepage(s) */
735 nr_pages = pfn - start_pfn;
736 return ehea_update_busmap(start_pfn, nr_pages, EHEA_BUSMAP_ADD_SECT);
739 int ehea_create_busmap(void)
741 int ret;
743 mutex_lock(&ehea_busmap_mutex);
744 ehea_mr_len = 0;
745 ret = walk_system_ram_range(0, 1ULL << MAX_PHYSMEM_BITS, NULL,
746 ehea_create_busmap_callback);
747 mutex_unlock(&ehea_busmap_mutex);
748 return ret;
751 void ehea_destroy_busmap(void)
753 int top, dir;
754 mutex_lock(&ehea_busmap_mutex);
755 if (!ehea_bmap)
756 goto out_destroy;
758 for (top = 0; top < EHEA_MAP_ENTRIES; top++) {
759 if (!ehea_bmap->top[top])
760 continue;
762 for (dir = 0; dir < EHEA_MAP_ENTRIES; dir++) {
763 if (!ehea_bmap->top[top]->dir[dir])
764 continue;
766 kfree(ehea_bmap->top[top]->dir[dir]);
769 kfree(ehea_bmap->top[top]);
772 kfree(ehea_bmap);
773 ehea_bmap = NULL;
774 out_destroy:
775 mutex_unlock(&ehea_busmap_mutex);
778 u64 ehea_map_vaddr(void *caddr)
780 int top, dir, idx;
781 unsigned long index, offset;
783 if (!ehea_bmap)
784 return EHEA_INVAL_ADDR;
786 index = __pa(caddr) >> SECTION_SIZE_BITS;
787 top = (index >> EHEA_TOP_INDEX_SHIFT) & EHEA_INDEX_MASK;
788 if (!ehea_bmap->top[top])
789 return EHEA_INVAL_ADDR;
791 dir = (index >> EHEA_DIR_INDEX_SHIFT) & EHEA_INDEX_MASK;
792 if (!ehea_bmap->top[top]->dir[dir])
793 return EHEA_INVAL_ADDR;
795 idx = index & EHEA_INDEX_MASK;
796 if (!ehea_bmap->top[top]->dir[dir]->ent[idx])
797 return EHEA_INVAL_ADDR;
799 offset = (unsigned long)caddr & (EHEA_SECTSIZE - 1);
800 return ehea_bmap->top[top]->dir[dir]->ent[idx] | offset;
803 static inline void *ehea_calc_sectbase(int top, int dir, int idx)
805 unsigned long ret = idx;
806 ret |= dir << EHEA_DIR_INDEX_SHIFT;
807 ret |= top << EHEA_TOP_INDEX_SHIFT;
808 return __va(ret << SECTION_SIZE_BITS);
811 static u64 ehea_reg_mr_section(int top, int dir, int idx, u64 *pt,
812 struct ehea_adapter *adapter,
813 struct ehea_mr *mr)
815 void *pg;
816 u64 j, m, hret;
817 unsigned long k = 0;
818 u64 pt_abs = __pa(pt);
820 void *sectbase = ehea_calc_sectbase(top, dir, idx);
822 for (j = 0; j < (EHEA_PAGES_PER_SECTION / EHEA_MAX_RPAGE); j++) {
824 for (m = 0; m < EHEA_MAX_RPAGE; m++) {
825 pg = sectbase + ((k++) * EHEA_PAGESIZE);
826 pt[m] = __pa(pg);
828 hret = ehea_h_register_rpage_mr(adapter->handle, mr->handle, 0,
829 0, pt_abs, EHEA_MAX_RPAGE);
831 if ((hret != H_SUCCESS) &&
832 (hret != H_PAGE_REGISTERED)) {
833 ehea_h_free_resource(adapter->handle, mr->handle,
834 FORCE_FREE);
835 pr_err("register_rpage_mr failed\n");
836 return hret;
839 return hret;
842 static u64 ehea_reg_mr_sections(int top, int dir, u64 *pt,
843 struct ehea_adapter *adapter,
844 struct ehea_mr *mr)
846 u64 hret = H_SUCCESS;
847 int idx;
849 for (idx = 0; idx < EHEA_MAP_ENTRIES; idx++) {
850 if (!ehea_bmap->top[top]->dir[dir]->ent[idx])
851 continue;
853 hret = ehea_reg_mr_section(top, dir, idx, pt, adapter, mr);
854 if ((hret != H_SUCCESS) && (hret != H_PAGE_REGISTERED))
855 return hret;
857 return hret;
860 static u64 ehea_reg_mr_dir_sections(int top, u64 *pt,
861 struct ehea_adapter *adapter,
862 struct ehea_mr *mr)
864 u64 hret = H_SUCCESS;
865 int dir;
867 for (dir = 0; dir < EHEA_MAP_ENTRIES; dir++) {
868 if (!ehea_bmap->top[top]->dir[dir])
869 continue;
871 hret = ehea_reg_mr_sections(top, dir, pt, adapter, mr);
872 if ((hret != H_SUCCESS) && (hret != H_PAGE_REGISTERED))
873 return hret;
875 return hret;
878 int ehea_reg_kernel_mr(struct ehea_adapter *adapter, struct ehea_mr *mr)
880 int ret;
881 u64 *pt;
882 u64 hret;
883 u32 acc_ctrl = EHEA_MR_ACC_CTRL;
885 unsigned long top;
887 pt = (void *)get_zeroed_page(GFP_KERNEL);
888 if (!pt) {
889 pr_err("no mem\n");
890 ret = -ENOMEM;
891 goto out;
894 hret = ehea_h_alloc_resource_mr(adapter->handle, EHEA_BUSMAP_START,
895 ehea_mr_len, acc_ctrl, adapter->pd,
896 &mr->handle, &mr->lkey);
898 if (hret != H_SUCCESS) {
899 pr_err("alloc_resource_mr failed\n");
900 ret = -EIO;
901 goto out;
904 if (!ehea_bmap) {
905 ehea_h_free_resource(adapter->handle, mr->handle, FORCE_FREE);
906 pr_err("no busmap available\n");
907 ret = -EIO;
908 goto out;
911 for (top = 0; top < EHEA_MAP_ENTRIES; top++) {
912 if (!ehea_bmap->top[top])
913 continue;
915 hret = ehea_reg_mr_dir_sections(top, pt, adapter, mr);
916 if((hret != H_PAGE_REGISTERED) && (hret != H_SUCCESS))
917 break;
920 if (hret != H_SUCCESS) {
921 ehea_h_free_resource(adapter->handle, mr->handle, FORCE_FREE);
922 pr_err("registering mr failed\n");
923 ret = -EIO;
924 goto out;
927 mr->vaddr = EHEA_BUSMAP_START;
928 mr->adapter = adapter;
929 ret = 0;
930 out:
931 free_page((unsigned long)pt);
932 return ret;
935 int ehea_rem_mr(struct ehea_mr *mr)
937 u64 hret;
939 if (!mr || !mr->adapter)
940 return -EINVAL;
942 hret = ehea_h_free_resource(mr->adapter->handle, mr->handle,
943 FORCE_FREE);
944 if (hret != H_SUCCESS) {
945 pr_err("destroy MR failed\n");
946 return -EIO;
949 return 0;
952 int ehea_gen_smr(struct ehea_adapter *adapter, struct ehea_mr *old_mr,
953 struct ehea_mr *shared_mr)
955 u64 hret;
957 hret = ehea_h_register_smr(adapter->handle, old_mr->handle,
958 old_mr->vaddr, EHEA_MR_ACC_CTRL,
959 adapter->pd, shared_mr);
960 if (hret != H_SUCCESS)
961 return -EIO;
963 shared_mr->adapter = adapter;
965 return 0;
968 static void print_error_data(u64 *data)
970 int length;
971 u64 type = EHEA_BMASK_GET(ERROR_DATA_TYPE, data[2]);
972 u64 resource = data[1];
974 length = EHEA_BMASK_GET(ERROR_DATA_LENGTH, data[0]);
976 if (length > EHEA_PAGESIZE)
977 length = EHEA_PAGESIZE;
979 if (type == EHEA_AER_RESTYPE_QP)
980 pr_err("QP (resource=%llX) state: AER=0x%llX, AERR=0x%llX, port=%llX\n",
981 resource, data[6], data[12], data[22]);
982 else if (type == EHEA_AER_RESTYPE_CQ)
983 pr_err("CQ (resource=%llX) state: AER=0x%llX\n",
984 resource, data[6]);
985 else if (type == EHEA_AER_RESTYPE_EQ)
986 pr_err("EQ (resource=%llX) state: AER=0x%llX\n",
987 resource, data[6]);
989 ehea_dump(data, length, "error data");
992 u64 ehea_error_data(struct ehea_adapter *adapter, u64 res_handle,
993 u64 *aer, u64 *aerr)
995 unsigned long ret;
996 u64 *rblock;
997 u64 type = 0;
999 rblock = (void *)get_zeroed_page(GFP_KERNEL);
1000 if (!rblock) {
1001 pr_err("Cannot allocate rblock memory\n");
1002 goto out;
1005 ret = ehea_h_error_data(adapter->handle, res_handle, rblock);
1007 if (ret == H_SUCCESS) {
1008 type = EHEA_BMASK_GET(ERROR_DATA_TYPE, rblock[2]);
1009 *aer = rblock[6];
1010 *aerr = rblock[12];
1011 print_error_data(rblock);
1012 } else if (ret == H_R_STATE) {
1013 pr_err("No error data available: %llX\n", res_handle);
1014 } else
1015 pr_err("Error data could not be fetched: %llX\n", res_handle);
1017 free_page((unsigned long)rblock);
1018 out:
1019 return type;