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 }