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