Merge branch 'master' of ssh://master.kernel.org/pub/scm/linux/kernel/git/mason/btrfs...
[GitHub/mt8127/android_kernel_alcatel_ttab.git] / drivers / net / ehea / ehea_qmr.c
1 /*
2 * linux/drivers/net/ehea/ehea_qmr.c
3 *
4 * eHEA ethernet device driver for IBM eServer System p
5 *
6 * (C) Copyright IBM Corp. 2006
7 *
8 * Authors:
9 * Christoph Raisch <raisch@de.ibm.com>
10 * Jan-Bernd Themann <themann@de.ibm.com>
11 * Thomas Klein <tklein@de.ibm.com>
12 *
13 *
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.
18 *
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.
23 *
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.
27 */
28
29 #include <linux/mm.h>
30 #include "ehea.h"
31 #include "ehea_phyp.h"
32 #include "ehea_qmr.h"
33
34 struct ehea_bmap *ehea_bmap = NULL;
35
36
37
38 static void *hw_qpageit_get_inc(struct hw_queue *queue)
39 {
40 void *retvalue = hw_qeit_get(queue);
41
42 queue->current_q_offset += queue->pagesize;
43 if (queue->current_q_offset > queue->queue_length) {
44 queue->current_q_offset -= queue->pagesize;
45 retvalue = NULL;
46 } else if (((u64) retvalue) & (EHEA_PAGESIZE-1)) {
47 ehea_error("not on pageboundary");
48 retvalue = NULL;
49 }
50 return retvalue;
51 }
52
53 static int hw_queue_ctor(struct hw_queue *queue, const u32 nr_of_pages,
54 const u32 pagesize, const u32 qe_size)
55 {
56 int pages_per_kpage = PAGE_SIZE / pagesize;
57 int i, k;
58
59 if ((pagesize > PAGE_SIZE) || (!pages_per_kpage)) {
60 ehea_error("pagesize conflict! kernel pagesize=%d, "
61 "ehea pagesize=%d", (int)PAGE_SIZE, (int)pagesize);
62 return -EINVAL;
63 }
64
65 queue->queue_length = nr_of_pages * pagesize;
66 queue->queue_pages = kmalloc(nr_of_pages * sizeof(void *), GFP_KERNEL);
67 if (!queue->queue_pages) {
68 ehea_error("no mem for queue_pages");
69 return -ENOMEM;
70 }
71
72 /*
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
76 */
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++;
86 }
87 }
88
89 queue->current_q_offset = 0;
90 queue->qe_size = qe_size;
91 queue->pagesize = pagesize;
92 queue->toggle_state = 1;
93
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]);
100 }
101 return -ENOMEM;
102 }
103
104 static void hw_queue_dtor(struct hw_queue *queue)
105 {
106 int pages_per_kpage = PAGE_SIZE / queue->pagesize;
107 int i, nr_pages;
108
109 if (!queue || !queue->queue_pages)
110 return;
111
112 nr_pages = queue->queue_length / queue->pagesize;
113
114 for (i = 0; i < nr_pages; i += pages_per_kpage)
115 free_page((unsigned long)(queue->queue_pages)[i]);
116
117 kfree(queue->queue_pages);
118 }
119
120 struct ehea_cq *ehea_create_cq(struct ehea_adapter *adapter,
121 int nr_of_cqe, u64 eq_handle, u32 cq_token)
122 {
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;
129
130 cq = kzalloc(sizeof(*cq), GFP_KERNEL);
131 if (!cq) {
132 ehea_error("no mem for cq");
133 goto out_nomem;
134 }
135
136 cq->attr.max_nr_of_cqes = nr_of_cqe;
137 cq->attr.cq_token = cq_token;
138 cq->attr.eq_handle = eq_handle;
139
140 cq->adapter = adapter;
141
142 cq_handle_ref = &cq->fw_handle;
143 act_nr_of_entries = 0;
144 act_pages = 0;
145
146 hret = ehea_h_alloc_resource_cq(adapter->handle, &cq->attr,
147 &cq->fw_handle, &cq->epas);
148 if (hret != H_SUCCESS) {
149 ehea_error("alloc_resource_cq failed");
150 goto out_freemem;
151 }
152
153 ret = hw_queue_ctor(&cq->hw_queue, cq->attr.nr_pages,
154 EHEA_PAGESIZE, sizeof(struct ehea_cqe));
155 if (ret)
156 goto out_freeres;
157
158 for (counter = 0; counter < cq->attr.nr_pages; counter++) {
159 vpage = hw_qpageit_get_inc(&cq->hw_queue);
160 if (!vpage) {
161 ehea_error("hw_qpageit_get_inc failed");
162 goto out_kill_hwq;
163 }
164
165 rpage = virt_to_abs(vpage);
166 hret = ehea_h_register_rpage(adapter->handle,
167 0, EHEA_CQ_REGISTER_ORIG,
168 cq->fw_handle, rpage, 1);
169 if (hret < H_SUCCESS) {
170 ehea_error("register_rpage_cq failed ehea_cq=%p "
171 "hret=%llx counter=%i act_pages=%i",
172 cq, hret, counter, cq->attr.nr_pages);
173 goto out_kill_hwq;
174 }
175
176 if (counter == (cq->attr.nr_pages - 1)) {
177 vpage = hw_qpageit_get_inc(&cq->hw_queue);
178
179 if ((hret != H_SUCCESS) || (vpage)) {
180 ehea_error("registration of pages not "
181 "complete hret=%llx\n", hret);
182 goto out_kill_hwq;
183 }
184 } else {
185 if (hret != H_PAGE_REGISTERED) {
186 ehea_error("CQ: registration of page failed "
187 "hret=%llx\n", hret);
188 goto out_kill_hwq;
189 }
190 }
191 }
192
193 hw_qeit_reset(&cq->hw_queue);
194 epa = cq->epas.kernel;
195 ehea_reset_cq_ep(cq);
196 ehea_reset_cq_n1(cq);
197
198 return cq;
199
200 out_kill_hwq:
201 hw_queue_dtor(&cq->hw_queue);
202
203 out_freeres:
204 ehea_h_free_resource(adapter->handle, cq->fw_handle, FORCE_FREE);
205
206 out_freemem:
207 kfree(cq);
208
209 out_nomem:
210 return NULL;
211 }
212
213 u64 ehea_destroy_cq_res(struct ehea_cq *cq, u64 force)
214 {
215 u64 hret;
216 u64 adapter_handle = cq->adapter->handle;
217
218 /* deregister all previous registered pages */
219 hret = ehea_h_free_resource(adapter_handle, cq->fw_handle, force);
220 if (hret != H_SUCCESS)
221 return hret;
222
223 hw_queue_dtor(&cq->hw_queue);
224 kfree(cq);
225
226 return hret;
227 }
228
229 int ehea_destroy_cq(struct ehea_cq *cq)
230 {
231 u64 hret;
232 if (!cq)
233 return 0;
234
235 hcp_epas_dtor(&cq->epas);
236 hret = ehea_destroy_cq_res(cq, NORMAL_FREE);
237 if (hret == H_R_STATE) {
238 ehea_error_data(cq->adapter, cq->fw_handle);
239 hret = ehea_destroy_cq_res(cq, FORCE_FREE);
240 }
241
242 if (hret != H_SUCCESS) {
243 ehea_error("destroy CQ failed");
244 return -EIO;
245 }
246
247 return 0;
248 }
249
250 struct ehea_eq *ehea_create_eq(struct ehea_adapter *adapter,
251 const enum ehea_eq_type type,
252 const u32 max_nr_of_eqes, const u8 eqe_gen)
253 {
254 int ret, i;
255 u64 hret, rpage;
256 void *vpage;
257 struct ehea_eq *eq;
258
259 eq = kzalloc(sizeof(*eq), GFP_KERNEL);
260 if (!eq) {
261 ehea_error("no mem for eq");
262 return NULL;
263 }
264
265 eq->adapter = adapter;
266 eq->attr.type = type;
267 eq->attr.max_nr_of_eqes = max_nr_of_eqes;
268 eq->attr.eqe_gen = eqe_gen;
269 spin_lock_init(&eq->spinlock);
270
271 hret = ehea_h_alloc_resource_eq(adapter->handle,
272 &eq->attr, &eq->fw_handle);
273 if (hret != H_SUCCESS) {
274 ehea_error("alloc_resource_eq failed");
275 goto out_freemem;
276 }
277
278 ret = hw_queue_ctor(&eq->hw_queue, eq->attr.nr_pages,
279 EHEA_PAGESIZE, sizeof(struct ehea_eqe));
280 if (ret) {
281 ehea_error("can't allocate eq pages");
282 goto out_freeres;
283 }
284
285 for (i = 0; i < eq->attr.nr_pages; i++) {
286 vpage = hw_qpageit_get_inc(&eq->hw_queue);
287 if (!vpage) {
288 ehea_error("hw_qpageit_get_inc failed");
289 hret = H_RESOURCE;
290 goto out_kill_hwq;
291 }
292
293 rpage = virt_to_abs(vpage);
294
295 hret = ehea_h_register_rpage(adapter->handle, 0,
296 EHEA_EQ_REGISTER_ORIG,
297 eq->fw_handle, rpage, 1);
298
299 if (i == (eq->attr.nr_pages - 1)) {
300 /* last page */
301 vpage = hw_qpageit_get_inc(&eq->hw_queue);
302 if ((hret != H_SUCCESS) || (vpage))
303 goto out_kill_hwq;
304
305 } else {
306 if (hret != H_PAGE_REGISTERED)
307 goto out_kill_hwq;
308
309 }
310 }
311
312 hw_qeit_reset(&eq->hw_queue);
313 return eq;
314
315 out_kill_hwq:
316 hw_queue_dtor(&eq->hw_queue);
317
318 out_freeres:
319 ehea_h_free_resource(adapter->handle, eq->fw_handle, FORCE_FREE);
320
321 out_freemem:
322 kfree(eq);
323 return NULL;
324 }
325
326 struct ehea_eqe *ehea_poll_eq(struct ehea_eq *eq)
327 {
328 struct ehea_eqe *eqe;
329 unsigned long flags;
330
331 spin_lock_irqsave(&eq->spinlock, flags);
332 eqe = (struct ehea_eqe *)hw_eqit_eq_get_inc_valid(&eq->hw_queue);
333 spin_unlock_irqrestore(&eq->spinlock, flags);
334
335 return eqe;
336 }
337
338 u64 ehea_destroy_eq_res(struct ehea_eq *eq, u64 force)
339 {
340 u64 hret;
341 unsigned long flags;
342
343 spin_lock_irqsave(&eq->spinlock, flags);
344
345 hret = ehea_h_free_resource(eq->adapter->handle, eq->fw_handle, force);
346 spin_unlock_irqrestore(&eq->spinlock, flags);
347
348 if (hret != H_SUCCESS)
349 return hret;
350
351 hw_queue_dtor(&eq->hw_queue);
352 kfree(eq);
353
354 return hret;
355 }
356
357 int ehea_destroy_eq(struct ehea_eq *eq)
358 {
359 u64 hret;
360 if (!eq)
361 return 0;
362
363 hcp_epas_dtor(&eq->epas);
364
365 hret = ehea_destroy_eq_res(eq, NORMAL_FREE);
366 if (hret == H_R_STATE) {
367 ehea_error_data(eq->adapter, eq->fw_handle);
368 hret = ehea_destroy_eq_res(eq, FORCE_FREE);
369 }
370
371 if (hret != H_SUCCESS) {
372 ehea_error("destroy EQ failed");
373 return -EIO;
374 }
375
376 return 0;
377 }
378
379 /**
380 * allocates memory for a queue and registers pages in phyp
381 */
382 int ehea_qp_alloc_register(struct ehea_qp *qp, struct hw_queue *hw_queue,
383 int nr_pages, int wqe_size, int act_nr_sges,
384 struct ehea_adapter *adapter, int h_call_q_selector)
385 {
386 u64 hret, rpage;
387 int ret, cnt;
388 void *vpage;
389
390 ret = hw_queue_ctor(hw_queue, nr_pages, EHEA_PAGESIZE, wqe_size);
391 if (ret)
392 return ret;
393
394 for (cnt = 0; cnt < nr_pages; cnt++) {
395 vpage = hw_qpageit_get_inc(hw_queue);
396 if (!vpage) {
397 ehea_error("hw_qpageit_get_inc failed");
398 goto out_kill_hwq;
399 }
400 rpage = virt_to_abs(vpage);
401 hret = ehea_h_register_rpage(adapter->handle,
402 0, h_call_q_selector,
403 qp->fw_handle, rpage, 1);
404 if (hret < H_SUCCESS) {
405 ehea_error("register_rpage_qp failed");
406 goto out_kill_hwq;
407 }
408 }
409 hw_qeit_reset(hw_queue);
410 return 0;
411
412 out_kill_hwq:
413 hw_queue_dtor(hw_queue);
414 return -EIO;
415 }
416
417 static inline u32 map_wqe_size(u8 wqe_enc_size)
418 {
419 return 128 << wqe_enc_size;
420 }
421
422 struct ehea_qp *ehea_create_qp(struct ehea_adapter *adapter,
423 u32 pd, struct ehea_qp_init_attr *init_attr)
424 {
425 int ret;
426 u64 hret;
427 struct ehea_qp *qp;
428 u32 wqe_size_in_bytes_sq, wqe_size_in_bytes_rq1;
429 u32 wqe_size_in_bytes_rq2, wqe_size_in_bytes_rq3;
430
431
432 qp = kzalloc(sizeof(*qp), GFP_KERNEL);
433 if (!qp) {
434 ehea_error("no mem for qp");
435 return NULL;
436 }
437
438 qp->adapter = adapter;
439
440 hret = ehea_h_alloc_resource_qp(adapter->handle, init_attr, pd,
441 &qp->fw_handle, &qp->epas);
442 if (hret != H_SUCCESS) {
443 ehea_error("ehea_h_alloc_resource_qp failed");
444 goto out_freemem;
445 }
446
447 wqe_size_in_bytes_sq = map_wqe_size(init_attr->act_wqe_size_enc_sq);
448 wqe_size_in_bytes_rq1 = map_wqe_size(init_attr->act_wqe_size_enc_rq1);
449 wqe_size_in_bytes_rq2 = map_wqe_size(init_attr->act_wqe_size_enc_rq2);
450 wqe_size_in_bytes_rq3 = map_wqe_size(init_attr->act_wqe_size_enc_rq3);
451
452 ret = ehea_qp_alloc_register(qp, &qp->hw_squeue, init_attr->nr_sq_pages,
453 wqe_size_in_bytes_sq,
454 init_attr->act_wqe_size_enc_sq, adapter,
455 0);
456 if (ret) {
457 ehea_error("can't register for sq ret=%x", ret);
458 goto out_freeres;
459 }
460
461 ret = ehea_qp_alloc_register(qp, &qp->hw_rqueue1,
462 init_attr->nr_rq1_pages,
463 wqe_size_in_bytes_rq1,
464 init_attr->act_wqe_size_enc_rq1,
465 adapter, 1);
466 if (ret) {
467 ehea_error("can't register for rq1 ret=%x", ret);
468 goto out_kill_hwsq;
469 }
470
471 if (init_attr->rq_count > 1) {
472 ret = ehea_qp_alloc_register(qp, &qp->hw_rqueue2,
473 init_attr->nr_rq2_pages,
474 wqe_size_in_bytes_rq2,
475 init_attr->act_wqe_size_enc_rq2,
476 adapter, 2);
477 if (ret) {
478 ehea_error("can't register for rq2 ret=%x", ret);
479 goto out_kill_hwr1q;
480 }
481 }
482
483 if (init_attr->rq_count > 2) {
484 ret = ehea_qp_alloc_register(qp, &qp->hw_rqueue3,
485 init_attr->nr_rq3_pages,
486 wqe_size_in_bytes_rq3,
487 init_attr->act_wqe_size_enc_rq3,
488 adapter, 3);
489 if (ret) {
490 ehea_error("can't register for rq3 ret=%x", ret);
491 goto out_kill_hwr2q;
492 }
493 }
494
495 qp->init_attr = *init_attr;
496
497 return qp;
498
499 out_kill_hwr2q:
500 hw_queue_dtor(&qp->hw_rqueue2);
501
502 out_kill_hwr1q:
503 hw_queue_dtor(&qp->hw_rqueue1);
504
505 out_kill_hwsq:
506 hw_queue_dtor(&qp->hw_squeue);
507
508 out_freeres:
509 ehea_h_disable_and_get_hea(adapter->handle, qp->fw_handle);
510 ehea_h_free_resource(adapter->handle, qp->fw_handle, FORCE_FREE);
511
512 out_freemem:
513 kfree(qp);
514 return NULL;
515 }
516
517 u64 ehea_destroy_qp_res(struct ehea_qp *qp, u64 force)
518 {
519 u64 hret;
520 struct ehea_qp_init_attr *qp_attr = &qp->init_attr;
521
522
523 ehea_h_disable_and_get_hea(qp->adapter->handle, qp->fw_handle);
524 hret = ehea_h_free_resource(qp->adapter->handle, qp->fw_handle, force);
525 if (hret != H_SUCCESS)
526 return hret;
527
528 hw_queue_dtor(&qp->hw_squeue);
529 hw_queue_dtor(&qp->hw_rqueue1);
530
531 if (qp_attr->rq_count > 1)
532 hw_queue_dtor(&qp->hw_rqueue2);
533 if (qp_attr->rq_count > 2)
534 hw_queue_dtor(&qp->hw_rqueue3);
535 kfree(qp);
536
537 return hret;
538 }
539
540 int ehea_destroy_qp(struct ehea_qp *qp)
541 {
542 u64 hret;
543 if (!qp)
544 return 0;
545
546 hcp_epas_dtor(&qp->epas);
547
548 hret = ehea_destroy_qp_res(qp, NORMAL_FREE);
549 if (hret == H_R_STATE) {
550 ehea_error_data(qp->adapter, qp->fw_handle);
551 hret = ehea_destroy_qp_res(qp, FORCE_FREE);
552 }
553
554 if (hret != H_SUCCESS) {
555 ehea_error("destroy QP failed");
556 return -EIO;
557 }
558
559 return 0;
560 }
561
562 static inline int ehea_calc_index(unsigned long i, unsigned long s)
563 {
564 return (i >> s) & EHEA_INDEX_MASK;
565 }
566
567 static inline int ehea_init_top_bmap(struct ehea_top_bmap *ehea_top_bmap,
568 int dir)
569 {
570 if (!ehea_top_bmap->dir[dir]) {
571 ehea_top_bmap->dir[dir] =
572 kzalloc(sizeof(struct ehea_dir_bmap), GFP_KERNEL);
573 if (!ehea_top_bmap->dir[dir])
574 return -ENOMEM;
575 }
576 return 0;
577 }
578
579 static inline int ehea_init_bmap(struct ehea_bmap *ehea_bmap, int top, int dir)
580 {
581 if (!ehea_bmap->top[top]) {
582 ehea_bmap->top[top] =
583 kzalloc(sizeof(struct ehea_top_bmap), GFP_KERNEL);
584 if (!ehea_bmap->top[top])
585 return -ENOMEM;
586 }
587 return ehea_init_top_bmap(ehea_bmap->top[top], dir);
588 }
589
590 static DEFINE_MUTEX(ehea_busmap_mutex);
591 static unsigned long ehea_mr_len;
592
593 #define EHEA_BUSMAP_ADD_SECT 1
594 #define EHEA_BUSMAP_REM_SECT 0
595
596 static void ehea_rebuild_busmap(void)
597 {
598 u64 vaddr = EHEA_BUSMAP_START;
599 int top, dir, idx;
600
601 for (top = 0; top < EHEA_MAP_ENTRIES; top++) {
602 struct ehea_top_bmap *ehea_top;
603 int valid_dir_entries = 0;
604
605 if (!ehea_bmap->top[top])
606 continue;
607 ehea_top = ehea_bmap->top[top];
608 for (dir = 0; dir < EHEA_MAP_ENTRIES; dir++) {
609 struct ehea_dir_bmap *ehea_dir;
610 int valid_entries = 0;
611
612 if (!ehea_top->dir[dir])
613 continue;
614 valid_dir_entries++;
615 ehea_dir = ehea_top->dir[dir];
616 for (idx = 0; idx < EHEA_MAP_ENTRIES; idx++) {
617 if (!ehea_dir->ent[idx])
618 continue;
619 valid_entries++;
620 ehea_dir->ent[idx] = vaddr;
621 vaddr += EHEA_SECTSIZE;
622 }
623 if (!valid_entries) {
624 ehea_top->dir[dir] = NULL;
625 kfree(ehea_dir);
626 }
627 }
628 if (!valid_dir_entries) {
629 ehea_bmap->top[top] = NULL;
630 kfree(ehea_top);
631 }
632 }
633 }
634
635 static int ehea_update_busmap(unsigned long pfn, unsigned long nr_pages, int add)
636 {
637 unsigned long i, start_section, end_section;
638
639 if (!nr_pages)
640 return 0;
641
642 if (!ehea_bmap) {
643 ehea_bmap = kzalloc(sizeof(struct ehea_bmap), GFP_KERNEL);
644 if (!ehea_bmap)
645 return -ENOMEM;
646 }
647
648 start_section = (pfn * PAGE_SIZE) / EHEA_SECTSIZE;
649 end_section = start_section + ((nr_pages * PAGE_SIZE) / EHEA_SECTSIZE);
650 /* Mark entries as valid or invalid only; address is assigned later */
651 for (i = start_section; i < end_section; i++) {
652 u64 flag;
653 int top = ehea_calc_index(i, EHEA_TOP_INDEX_SHIFT);
654 int dir = ehea_calc_index(i, EHEA_DIR_INDEX_SHIFT);
655 int idx = i & EHEA_INDEX_MASK;
656
657 if (add) {
658 int ret = ehea_init_bmap(ehea_bmap, top, dir);
659 if (ret)
660 return ret;
661 flag = 1; /* valid */
662 ehea_mr_len += EHEA_SECTSIZE;
663 } else {
664 if (!ehea_bmap->top[top])
665 continue;
666 if (!ehea_bmap->top[top]->dir[dir])
667 continue;
668 flag = 0; /* invalid */
669 ehea_mr_len -= EHEA_SECTSIZE;
670 }
671
672 ehea_bmap->top[top]->dir[dir]->ent[idx] = flag;
673 }
674 ehea_rebuild_busmap(); /* Assign contiguous addresses for mr */
675 return 0;
676 }
677
678 int ehea_add_sect_bmap(unsigned long pfn, unsigned long nr_pages)
679 {
680 int ret;
681
682 mutex_lock(&ehea_busmap_mutex);
683 ret = ehea_update_busmap(pfn, nr_pages, EHEA_BUSMAP_ADD_SECT);
684 mutex_unlock(&ehea_busmap_mutex);
685 return ret;
686 }
687
688 int ehea_rem_sect_bmap(unsigned long pfn, unsigned long nr_pages)
689 {
690 int ret;
691
692 mutex_lock(&ehea_busmap_mutex);
693 ret = ehea_update_busmap(pfn, nr_pages, EHEA_BUSMAP_REM_SECT);
694 mutex_unlock(&ehea_busmap_mutex);
695 return ret;
696 }
697
698 static int ehea_is_hugepage(unsigned long pfn)
699 {
700 int page_order;
701
702 if (pfn & EHEA_HUGEPAGE_PFN_MASK)
703 return 0;
704
705 page_order = compound_order(pfn_to_page(pfn));
706 if (page_order + PAGE_SHIFT != EHEA_HUGEPAGESHIFT)
707 return 0;
708
709 return 1;
710 }
711
712 static int ehea_create_busmap_callback(unsigned long initial_pfn,
713 unsigned long total_nr_pages, void *arg)
714 {
715 int ret;
716 unsigned long pfn, start_pfn, end_pfn, nr_pages;
717
718 if ((total_nr_pages * PAGE_SIZE) < EHEA_HUGEPAGE_SIZE)
719 return ehea_update_busmap(initial_pfn, total_nr_pages,
720 EHEA_BUSMAP_ADD_SECT);
721
722 /* Given chunk is >= 16GB -> check for hugepages */
723 start_pfn = initial_pfn;
724 end_pfn = initial_pfn + total_nr_pages;
725 pfn = start_pfn;
726
727 while (pfn < end_pfn) {
728 if (ehea_is_hugepage(pfn)) {
729 /* Add mem found in front of the hugepage */
730 nr_pages = pfn - start_pfn;
731 ret = ehea_update_busmap(start_pfn, nr_pages,
732 EHEA_BUSMAP_ADD_SECT);
733 if (ret)
734 return ret;
735
736 /* Skip the hugepage */
737 pfn += (EHEA_HUGEPAGE_SIZE / PAGE_SIZE);
738 start_pfn = pfn;
739 } else
740 pfn += (EHEA_SECTSIZE / PAGE_SIZE);
741 }
742
743 /* Add mem found behind the hugepage(s) */
744 nr_pages = pfn - start_pfn;
745 return ehea_update_busmap(start_pfn, nr_pages, EHEA_BUSMAP_ADD_SECT);
746 }
747
748 int ehea_create_busmap(void)
749 {
750 int ret;
751
752 mutex_lock(&ehea_busmap_mutex);
753 ehea_mr_len = 0;
754 ret = walk_system_ram_range(0, 1ULL << MAX_PHYSMEM_BITS, NULL,
755 ehea_create_busmap_callback);
756 mutex_unlock(&ehea_busmap_mutex);
757 return ret;
758 }
759
760 void ehea_destroy_busmap(void)
761 {
762 int top, dir;
763 mutex_lock(&ehea_busmap_mutex);
764 if (!ehea_bmap)
765 goto out_destroy;
766
767 for (top = 0; top < EHEA_MAP_ENTRIES; top++) {
768 if (!ehea_bmap->top[top])
769 continue;
770
771 for (dir = 0; dir < EHEA_MAP_ENTRIES; dir++) {
772 if (!ehea_bmap->top[top]->dir[dir])
773 continue;
774
775 kfree(ehea_bmap->top[top]->dir[dir]);
776 }
777
778 kfree(ehea_bmap->top[top]);
779 }
780
781 kfree(ehea_bmap);
782 ehea_bmap = NULL;
783 out_destroy:
784 mutex_unlock(&ehea_busmap_mutex);
785 }
786
787 u64 ehea_map_vaddr(void *caddr)
788 {
789 int top, dir, idx;
790 unsigned long index, offset;
791
792 if (!ehea_bmap)
793 return EHEA_INVAL_ADDR;
794
795 index = virt_to_abs(caddr) >> SECTION_SIZE_BITS;
796 top = (index >> EHEA_TOP_INDEX_SHIFT) & EHEA_INDEX_MASK;
797 if (!ehea_bmap->top[top])
798 return EHEA_INVAL_ADDR;
799
800 dir = (index >> EHEA_DIR_INDEX_SHIFT) & EHEA_INDEX_MASK;
801 if (!ehea_bmap->top[top]->dir[dir])
802 return EHEA_INVAL_ADDR;
803
804 idx = index & EHEA_INDEX_MASK;
805 if (!ehea_bmap->top[top]->dir[dir]->ent[idx])
806 return EHEA_INVAL_ADDR;
807
808 offset = (unsigned long)caddr & (EHEA_SECTSIZE - 1);
809 return ehea_bmap->top[top]->dir[dir]->ent[idx] | offset;
810 }
811
812 static inline void *ehea_calc_sectbase(int top, int dir, int idx)
813 {
814 unsigned long ret = idx;
815 ret |= dir << EHEA_DIR_INDEX_SHIFT;
816 ret |= top << EHEA_TOP_INDEX_SHIFT;
817 return abs_to_virt(ret << SECTION_SIZE_BITS);
818 }
819
820 static u64 ehea_reg_mr_section(int top, int dir, int idx, u64 *pt,
821 struct ehea_adapter *adapter,
822 struct ehea_mr *mr)
823 {
824 void *pg;
825 u64 j, m, hret;
826 unsigned long k = 0;
827 u64 pt_abs = virt_to_abs(pt);
828
829 void *sectbase = ehea_calc_sectbase(top, dir, idx);
830
831 for (j = 0; j < (EHEA_PAGES_PER_SECTION / EHEA_MAX_RPAGE); j++) {
832
833 for (m = 0; m < EHEA_MAX_RPAGE; m++) {
834 pg = sectbase + ((k++) * EHEA_PAGESIZE);
835 pt[m] = virt_to_abs(pg);
836 }
837 hret = ehea_h_register_rpage_mr(adapter->handle, mr->handle, 0,
838 0, pt_abs, EHEA_MAX_RPAGE);
839
840 if ((hret != H_SUCCESS) &&
841 (hret != H_PAGE_REGISTERED)) {
842 ehea_h_free_resource(adapter->handle, mr->handle,
843 FORCE_FREE);
844 ehea_error("register_rpage_mr failed");
845 return hret;
846 }
847 }
848 return hret;
849 }
850
851 static u64 ehea_reg_mr_sections(int top, int dir, u64 *pt,
852 struct ehea_adapter *adapter,
853 struct ehea_mr *mr)
854 {
855 u64 hret = H_SUCCESS;
856 int idx;
857
858 for (idx = 0; idx < EHEA_MAP_ENTRIES; idx++) {
859 if (!ehea_bmap->top[top]->dir[dir]->ent[idx])
860 continue;
861
862 hret = ehea_reg_mr_section(top, dir, idx, pt, adapter, mr);
863 if ((hret != H_SUCCESS) && (hret != H_PAGE_REGISTERED))
864 return hret;
865 }
866 return hret;
867 }
868
869 static u64 ehea_reg_mr_dir_sections(int top, u64 *pt,
870 struct ehea_adapter *adapter,
871 struct ehea_mr *mr)
872 {
873 u64 hret = H_SUCCESS;
874 int dir;
875
876 for (dir = 0; dir < EHEA_MAP_ENTRIES; dir++) {
877 if (!ehea_bmap->top[top]->dir[dir])
878 continue;
879
880 hret = ehea_reg_mr_sections(top, dir, pt, adapter, mr);
881 if ((hret != H_SUCCESS) && (hret != H_PAGE_REGISTERED))
882 return hret;
883 }
884 return hret;
885 }
886
887 int ehea_reg_kernel_mr(struct ehea_adapter *adapter, struct ehea_mr *mr)
888 {
889 int ret;
890 u64 *pt;
891 u64 hret;
892 u32 acc_ctrl = EHEA_MR_ACC_CTRL;
893
894 unsigned long top;
895
896 pt = (void *)get_zeroed_page(GFP_KERNEL);
897 if (!pt) {
898 ehea_error("no mem");
899 ret = -ENOMEM;
900 goto out;
901 }
902
903 hret = ehea_h_alloc_resource_mr(adapter->handle, EHEA_BUSMAP_START,
904 ehea_mr_len, acc_ctrl, adapter->pd,
905 &mr->handle, &mr->lkey);
906
907 if (hret != H_SUCCESS) {
908 ehea_error("alloc_resource_mr failed");
909 ret = -EIO;
910 goto out;
911 }
912
913 if (!ehea_bmap) {
914 ehea_h_free_resource(adapter->handle, mr->handle, FORCE_FREE);
915 ehea_error("no busmap available");
916 ret = -EIO;
917 goto out;
918 }
919
920 for (top = 0; top < EHEA_MAP_ENTRIES; top++) {
921 if (!ehea_bmap->top[top])
922 continue;
923
924 hret = ehea_reg_mr_dir_sections(top, pt, adapter, mr);
925 if((hret != H_PAGE_REGISTERED) && (hret != H_SUCCESS))
926 break;
927 }
928
929 if (hret != H_SUCCESS) {
930 ehea_h_free_resource(adapter->handle, mr->handle, FORCE_FREE);
931 ehea_error("registering mr failed");
932 ret = -EIO;
933 goto out;
934 }
935
936 mr->vaddr = EHEA_BUSMAP_START;
937 mr->adapter = adapter;
938 ret = 0;
939 out:
940 free_page((unsigned long)pt);
941 return ret;
942 }
943
944 int ehea_rem_mr(struct ehea_mr *mr)
945 {
946 u64 hret;
947
948 if (!mr || !mr->adapter)
949 return -EINVAL;
950
951 hret = ehea_h_free_resource(mr->adapter->handle, mr->handle,
952 FORCE_FREE);
953 if (hret != H_SUCCESS) {
954 ehea_error("destroy MR failed");
955 return -EIO;
956 }
957
958 return 0;
959 }
960
961 int ehea_gen_smr(struct ehea_adapter *adapter, struct ehea_mr *old_mr,
962 struct ehea_mr *shared_mr)
963 {
964 u64 hret;
965
966 hret = ehea_h_register_smr(adapter->handle, old_mr->handle,
967 old_mr->vaddr, EHEA_MR_ACC_CTRL,
968 adapter->pd, shared_mr);
969 if (hret != H_SUCCESS)
970 return -EIO;
971
972 shared_mr->adapter = adapter;
973
974 return 0;
975 }
976
977 void print_error_data(u64 *data)
978 {
979 int length;
980 u64 type = EHEA_BMASK_GET(ERROR_DATA_TYPE, data[2]);
981 u64 resource = data[1];
982
983 length = EHEA_BMASK_GET(ERROR_DATA_LENGTH, data[0]);
984
985 if (length > EHEA_PAGESIZE)
986 length = EHEA_PAGESIZE;
987
988 if (type == 0x8) /* Queue Pair */
989 ehea_error("QP (resource=%llX) state: AER=0x%llX, AERR=0x%llX, "
990 "port=%llX", resource, data[6], data[12], data[22]);
991
992 if (type == 0x4) /* Completion Queue */
993 ehea_error("CQ (resource=%llX) state: AER=0x%llX", resource,
994 data[6]);
995
996 if (type == 0x3) /* Event Queue */
997 ehea_error("EQ (resource=%llX) state: AER=0x%llX", resource,
998 data[6]);
999
1000 ehea_dump(data, length, "error data");
1001 }
1002
1003 void ehea_error_data(struct ehea_adapter *adapter, u64 res_handle)
1004 {
1005 unsigned long ret;
1006 u64 *rblock;
1007
1008 rblock = (void *)get_zeroed_page(GFP_KERNEL);
1009 if (!rblock) {
1010 ehea_error("Cannot allocate rblock memory.");
1011 return;
1012 }
1013
1014 ret = ehea_h_error_data(adapter->handle,
1015 res_handle,
1016 rblock);
1017
1018 if (ret == H_R_STATE)
1019 ehea_error("No error data is available: %llX.", res_handle);
1020 else if (ret == H_SUCCESS)
1021 print_error_data(rblock);
1022 else
1023 ehea_error("Error data could not be fetched: %llX", res_handle);
1024
1025 free_page((unsigned long)rblock);
1026 }