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

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