kernel/drivers/net/ethernet/ibm/ehea/ehea_qmr.c

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