drivers/gpu/drm/amd/amdkfd/kfd_events.c

   1 /*
   2  * Copyright 2014 Advanced Micro Devices, Inc.
   3  *
   4  * Permission is hereby granted, free of charge, to any person obtaining a
   5  * copy of this software and associated documentation files (the "Software"),
   6  * to deal in the Software without restriction, including without limitation
   7  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
   8  * and/or sell copies of the Software, and to permit persons to whom the
   9  * Software is furnished to do so, subject to the following conditions:
  10  *
  11  * The above copyright notice and this permission notice shall be included in
  12  * all copies or substantial portions of the Software.
  13  *
  14  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  15  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  16  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
  17  * THE COPYRIGHT HOLDER(S) OR AUTHOR(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR
  18  * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
  19  * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
  20  * OTHER DEALINGS IN THE SOFTWARE.
  21  */
  22
  23 #include <linux/mm_types.h>
  24 #include <linux/slab.h>
  25 #include <linux/types.h>
  26 #include <linux/sched/signal.h>
  27 #include <linux/sched/mm.h>
  28 #include <linux/uaccess.h>
  29 #include <linux/mman.h>
  30 #include <linux/memory.h>
  31 #include "kfd_priv.h"
  32 #include "kfd_events.h"
  33 #include "kfd_iommu.h"
  34 #include <linux/device.h>
  35
  36 /*
  37  * Wrapper around wait_queue_entry_t
  38  */
  39 struct kfd_event_waiter {
  40         wait_queue_entry_t wait;
  41         struct kfd_event *event; /* Event to wait for */
  42         bool activated;          /* Becomes true when event is signaled */
  43 };
  44
  45 /*
  46  * Each signal event needs a 64-bit signal slot where the signaler will write
  47  * a 1 before sending an interrupt. (This is needed because some interrupts
  48  * do not contain enough spare data bits to identify an event.)
  49  * We get whole pages and map them to the process VA.
  50  * Individual signal events use their event_id as slot index.
  51  */
  52 struct kfd_signal_page {
  53         uint64_t *kernel_address;
  54         uint64_t __user *user_address;
  55         bool need_to_free_pages;
  56 };
  57
  58
  59 static uint64_t *page_slots(struct kfd_signal_page *page)
  60 {
  61         return page->kernel_address;
  62 }
  63
  64 static struct kfd_signal_page *allocate_signal_page(struct kfd_process *p)
  65 {
  66         void *backing_store;
  67         struct kfd_signal_page *page;
  68
  69         page = kzalloc(sizeof(*page), GFP_KERNEL);
  70         if (!page)
  71                 return NULL;
  72
  73         backing_store = (void *) __get_free_pages(GFP_KERNEL,
  74                                         get_order(KFD_SIGNAL_EVENT_LIMIT * 8));
  75         if (!backing_store)
  76                 goto fail_alloc_signal_store;
  77
  78         /* Initialize all events to unsignaled */
  79         memset(backing_store, (uint8_t) UNSIGNALED_EVENT_SLOT,
  80                KFD_SIGNAL_EVENT_LIMIT * 8);
  81
  82         page->kernel_address = backing_store;
  83         page->need_to_free_pages = true;
  84         pr_debug("Allocated new event signal page at %p, for process %p\n",
  85                         page, p);
  86
  87         return page;
  88
  89 fail_alloc_signal_store:
  90         kfree(page);
  91         return NULL;
  92 }
  93
  94 static int allocate_event_notification_slot(struct kfd_process *p,
  95                                             struct kfd_event *ev)
  96 {
  97         int id;
  98
  99         if (!p->signal_page) {
 100                 p->signal_page = allocate_signal_page(p);
 101                 if (!p->signal_page)
 102                         return -ENOMEM;
 103                 /* Oldest user mode expects 256 event slots */
 104                 p->signal_mapped_size = 256*8;
 105         }
 106
 107         /*
 108          * Compatibility with old user mode: Only use signal slots
 109          * user mode has mapped, may be less than
 110          * KFD_SIGNAL_EVENT_LIMIT. This also allows future increase
 111          * of the event limit without breaking user mode.
 112          */
 113         id = idr_alloc(&p->event_idr, ev, 0, p->signal_mapped_size / 8,
 114                        GFP_KERNEL);
 115         if (id < 0)
 116                 return id;
 117
 118         ev->event_id = id;
 119         page_slots(p->signal_page)[id] = UNSIGNALED_EVENT_SLOT;
 120
 121         return 0;
 122 }
 123
 124 /*
 125  * Assumes that p->event_mutex is held and of course that p is not going
 126  * away (current or locked).
 127  */
 128 static struct kfd_event *lookup_event_by_id(struct kfd_process *p, uint32_t id)
 129 {
 130         return idr_find(&p->event_idr, id);
 131 }
 132
 133 /**
 134  * lookup_signaled_event_by_partial_id - Lookup signaled event from partial ID
 135  * @p:     Pointer to struct kfd_process
 136  * @id:    ID to look up
 137  * @bits:  Number of valid bits in @id
 138  *
 139  * Finds the first signaled event with a matching partial ID. If no
 140  * matching signaled event is found, returns NULL. In that case the
 141  * caller should assume that the partial ID is invalid and do an
 142  * exhaustive search of all siglaned events.
 143  *
 144  * If multiple events with the same partial ID signal at the same
 145  * time, they will be found one interrupt at a time, not necessarily
 146  * in the same order the interrupts occurred. As long as the number of
 147  * interrupts is correct, all signaled events will be seen by the
 148  * driver.
 149  */
 150 static struct kfd_event *lookup_signaled_event_by_partial_id(
 151         struct kfd_process *p, uint32_t id, uint32_t bits)
 152 {
 153         struct kfd_event *ev;
 154
 155         if (!p->signal_page || id >= KFD_SIGNAL_EVENT_LIMIT)
 156                 return NULL;
 157
 158         /* Fast path for the common case that @id is not a partial ID
 159          * and we only need a single lookup.
 160          */
 161         if (bits > 31 || (1U << bits) >= KFD_SIGNAL_EVENT_LIMIT) {
 162                 if (page_slots(p->signal_page)[id] == UNSIGNALED_EVENT_SLOT)
 163                         return NULL;
 164
 165                 return idr_find(&p->event_idr, id);
 166         }
 167
 168         /* General case for partial IDs: Iterate over all matching IDs
 169          * and find the first one that has signaled.
 170          */
 171         for (ev = NULL; id < KFD_SIGNAL_EVENT_LIMIT && !ev; id += 1U << bits) {
 172                 if (page_slots(p->signal_page)[id] == UNSIGNALED_EVENT_SLOT)
 173                         continue;
 174
 175                 ev = idr_find(&p->event_idr, id);
 176         }
 177
 178         return ev;
 179 }
 180
 181 static int create_signal_event(struct file *devkfd,
 182                                 struct kfd_process *p,
 183                                 struct kfd_event *ev)
 184 {
 185         int ret;
 186
 187         if (p->signal_mapped_size &&
 188             p->signal_event_count == p->signal_mapped_size / 8) {
 189                 if (!p->signal_event_limit_reached) {
 190                         pr_warn("Signal event wasn't created because limit was reached\n");
 191                         p->signal_event_limit_reached = true;
 192                 }
 193                 return -ENOSPC;
 194         }
 195
 196         ret = allocate_event_notification_slot(p, ev);
 197         if (ret) {
 198                 pr_warn("Signal event wasn't created because out of kernel memory\n");
 199                 return ret;
 200         }
 201
 202         p->signal_event_count++;
 203
 204         ev->user_signal_address = &p->signal_page->user_address[ev->event_id];
 205         pr_debug("Signal event number %zu created with id %d, address %p\n",
 206                         p->signal_event_count, ev->event_id,
 207                         ev->user_signal_address);
 208
 209         return 0;
 210 }
 211
 212 static int create_other_event(struct kfd_process *p, struct kfd_event *ev)
 213 {
 214         /* Cast KFD_LAST_NONSIGNAL_EVENT to uint32_t. This allows an
 215          * intentional integer overflow to -1 without a compiler
 216          * warning. idr_alloc treats a negative value as "maximum
 217          * signed integer".
 218          */
 219         int id = idr_alloc(&p->event_idr, ev, KFD_FIRST_NONSIGNAL_EVENT_ID,
 220                            (uint32_t)KFD_LAST_NONSIGNAL_EVENT_ID + 1,
 221                            GFP_KERNEL);
 222
 223         if (id < 0)
 224                 return id;
 225         ev->event_id = id;
 226
 227         return 0;
 228 }
 229
 230 void kfd_event_init_process(struct kfd_process *p)
 231 {
 232         mutex_init(&p->event_mutex);
 233         idr_init(&p->event_idr);
 234         p->signal_page = NULL;
 235         p->signal_event_count = 0;
 236 }
 237
 238 static void destroy_event(struct kfd_process *p, struct kfd_event *ev)
 239 {
 240         struct kfd_event_waiter *waiter;
 241
 242         /* Wake up pending waiters. They will return failure */
 243         list_for_each_entry(waiter, &ev->wq.head, wait.entry)
 244                 waiter->event = NULL;
 245         wake_up_all(&ev->wq);
 246
 247         if (ev->type == KFD_EVENT_TYPE_SIGNAL ||
 248             ev->type == KFD_EVENT_TYPE_DEBUG)
 249                 p->signal_event_count--;
 250
 251         idr_remove(&p->event_idr, ev->event_id);
 252         kfree(ev);
 253 }
 254
 255 static void destroy_events(struct kfd_process *p)
 256 {
 257         struct kfd_event *ev;
 258         uint32_t id;
 259
 260         idr_for_each_entry(&p->event_idr, ev, id)
 261                 destroy_event(p, ev);
 262         idr_destroy(&p->event_idr);
 263 }
 264
 265 /*
 266  * We assume that the process is being destroyed and there is no need to
 267  * unmap the pages or keep bookkeeping data in order.
 268  */
 269 static void shutdown_signal_page(struct kfd_process *p)
 270 {
 271         struct kfd_signal_page *page = p->signal_page;
 272
 273         if (page) {
 274                 if (page->need_to_free_pages)
 275                         free_pages((unsigned long)page->kernel_address,
 276                                    get_order(KFD_SIGNAL_EVENT_LIMIT * 8));
 277                 kfree(page);
 278         }
 279 }
 280
 281 void kfd_event_free_process(struct kfd_process *p)
 282 {
 283         destroy_events(p);
 284         shutdown_signal_page(p);
 285 }
 286
 287 static bool event_can_be_gpu_signaled(const struct kfd_event *ev)
 288 {
 289         return ev->type == KFD_EVENT_TYPE_SIGNAL ||
 290                                         ev->type == KFD_EVENT_TYPE_DEBUG;
 291 }
 292
 293 static bool event_can_be_cpu_signaled(const struct kfd_event *ev)
 294 {
 295         return ev->type == KFD_EVENT_TYPE_SIGNAL;
 296 }
 297
 298 int kfd_event_page_set(struct kfd_process *p, void *kernel_address,
 299                        uint64_t size)
 300 {
 301         struct kfd_signal_page *page;
 302
 303         if (p->signal_page)
 304                 return -EBUSY;
 305
 306         page = kzalloc(sizeof(*page), GFP_KERNEL);
 307         if (!page)
 308                 return -ENOMEM;
 309
 310         /* Initialize all events to unsignaled */
 311         memset(kernel_address, (uint8_t) UNSIGNALED_EVENT_SLOT,
 312                KFD_SIGNAL_EVENT_LIMIT * 8);
 313
 314         page->kernel_address = kernel_address;
 315
 316         p->signal_page = page;
 317         p->signal_mapped_size = size;
 318
 319         return 0;
 320 }
 321
 322 int kfd_event_create(struct file *devkfd, struct kfd_process *p,
 323                      uint32_t event_type, bool auto_reset, uint32_t node_id,
 324                      uint32_t *event_id, uint32_t *event_trigger_data,
 325                      uint64_t *event_page_offset, uint32_t *event_slot_index)
 326 {
 327         int ret = 0;
 328         struct kfd_event *ev = kzalloc(sizeof(*ev), GFP_KERNEL);
 329
 330         if (!ev)
 331                 return -ENOMEM;
 332
 333         ev->type = event_type;
 334         ev->auto_reset = auto_reset;
 335         ev->signaled = false;
 336
 337         init_waitqueue_head(&ev->wq);
 338
 339         *event_page_offset = 0;
 340
 341         mutex_lock(&p->event_mutex);
 342
 343         switch (event_type) {
 344         case KFD_EVENT_TYPE_SIGNAL:
 345         case KFD_EVENT_TYPE_DEBUG:
 346                 ret = create_signal_event(devkfd, p, ev);
 347                 if (!ret) {
 348                         *event_page_offset = KFD_MMAP_TYPE_EVENTS;
 349                         *event_page_offset <<= PAGE_SHIFT;
 350                         *event_slot_index = ev->event_id;
 351                 }
 352                 break;
 353         default:
 354                 ret = create_other_event(p, ev);
 355                 break;
 356         }
 357
 358         if (!ret) {
 359                 *event_id = ev->event_id;
 360                 *event_trigger_data = ev->event_id;
 361         } else {
 362                 kfree(ev);
 363         }
 364
 365         mutex_unlock(&p->event_mutex);
 366
 367         return ret;
 368 }
 369
 370 /* Assumes that p is current. */
 371 int kfd_event_destroy(struct kfd_process *p, uint32_t event_id)
 372 {
 373         struct kfd_event *ev;
 374         int ret = 0;
 375
 376         mutex_lock(&p->event_mutex);
 377
 378         ev = lookup_event_by_id(p, event_id);
 379
 380         if (ev)
 381                 destroy_event(p, ev);
 382         else
 383                 ret = -EINVAL;
 384
 385         mutex_unlock(&p->event_mutex);
 386         return ret;
 387 }
 388
 389 static void set_event(struct kfd_event *ev)
 390 {
 391         struct kfd_event_waiter *waiter;
 392
 393         /* Auto reset if the list is non-empty and we're waking
 394          * someone. waitqueue_active is safe here because we're
 395          * protected by the p->event_mutex, which is also held when
 396          * updating the wait queues in kfd_wait_on_events.
 397          */
 398         ev->signaled = !ev->auto_reset || !waitqueue_active(&ev->wq);
 399
 400         list_for_each_entry(waiter, &ev->wq.head, wait.entry)
 401                 waiter->activated = true;
 402
 403         wake_up_all(&ev->wq);
 404 }
 405
 406 /* Assumes that p is current. */
 407 int kfd_set_event(struct kfd_process *p, uint32_t event_id)
 408 {
 409         int ret = 0;
 410         struct kfd_event *ev;
 411
 412         mutex_lock(&p->event_mutex);
 413
 414         ev = lookup_event_by_id(p, event_id);
 415
 416         if (ev && event_can_be_cpu_signaled(ev))
 417                 set_event(ev);
 418         else
 419                 ret = -EINVAL;
 420
 421         mutex_unlock(&p->event_mutex);
 422         return ret;
 423 }
 424
 425 static void reset_event(struct kfd_event *ev)
 426 {
 427         ev->signaled = false;
 428 }
 429
 430 /* Assumes that p is current. */
 431 int kfd_reset_event(struct kfd_process *p, uint32_t event_id)
 432 {
 433         int ret = 0;
 434         struct kfd_event *ev;
 435
 436         mutex_lock(&p->event_mutex);
 437
 438         ev = lookup_event_by_id(p, event_id);
 439
 440         if (ev && event_can_be_cpu_signaled(ev))
 441                 reset_event(ev);
 442         else
 443                 ret = -EINVAL;
 444
 445         mutex_unlock(&p->event_mutex);
 446         return ret;
 447
 448 }
 449
 450 static void acknowledge_signal(struct kfd_process *p, struct kfd_event *ev)
 451 {
 452         page_slots(p->signal_page)[ev->event_id] = UNSIGNALED_EVENT_SLOT;
 453 }
 454
 455 static void set_event_from_interrupt(struct kfd_process *p,
 456                                         struct kfd_event *ev)
 457 {
 458         if (ev && event_can_be_gpu_signaled(ev)) {
 459                 acknowledge_signal(p, ev);
 460                 set_event(ev);
 461         }
 462 }
 463
 464 void kfd_signal_event_interrupt(unsigned int pasid, uint32_t partial_id,
 465                                 uint32_t valid_id_bits)
 466 {
 467         struct kfd_event *ev = NULL;
 468
 469         /*
 470          * Because we are called from arbitrary context (workqueue) as opposed
 471          * to process context, kfd_process could attempt to exit while we are
 472          * running so the lookup function increments the process ref count.
 473          */
 474         struct kfd_process *p = kfd_lookup_process_by_pasid(pasid);
 475
 476         if (!p)
 477                 return; /* Presumably process exited. */
 478
 479         mutex_lock(&p->event_mutex);
 480
 481         if (valid_id_bits)
 482                 ev = lookup_signaled_event_by_partial_id(p, partial_id,
 483                                                          valid_id_bits);
 484         if (ev) {
 485                 set_event_from_interrupt(p, ev);
 486         } else if (p->signal_page) {
 487                 /*
 488                  * Partial ID lookup failed. Assume that the event ID
 489                  * in the interrupt payload was invalid and do an
 490                  * exhaustive search of signaled events.
 491                  */
 492                 uint64_t *slots = page_slots(p->signal_page);
 493                 uint32_t id;
 494
 495                 if (valid_id_bits)
 496                         pr_debug_ratelimited("Partial ID invalid: %u (%u valid bits)\n",
 497                                              partial_id, valid_id_bits);
 498
 499                 if (p->signal_event_count < KFD_SIGNAL_EVENT_LIMIT / 64) {
 500                         /* With relatively few events, it's faster to
 501                          * iterate over the event IDR
 502                          */
 503                         idr_for_each_entry(&p->event_idr, ev, id) {
 504                                 if (id >= KFD_SIGNAL_EVENT_LIMIT)
 505                                         break;
 506
 507                                 if (slots[id] != UNSIGNALED_EVENT_SLOT)
 508                                         set_event_from_interrupt(p, ev);
 509                         }
 510                 } else {
 511                         /* With relatively many events, it's faster to
 512                          * iterate over the signal slots and lookup
 513                          * only signaled events from the IDR.
 514                          */
 515                         for (id = 0; id < KFD_SIGNAL_EVENT_LIMIT; id++)
 516                                 if (slots[id] != UNSIGNALED_EVENT_SLOT) {
 517                                         ev = lookup_event_by_id(p, id);
 518                                         set_event_from_interrupt(p, ev);
 519                                 }
 520                 }
 521         }
 522
 523         mutex_unlock(&p->event_mutex);
 524         kfd_unref_process(p);
 525 }
 526
 527 static struct kfd_event_waiter *alloc_event_waiters(uint32_t num_events)
 528 {
 529         struct kfd_event_waiter *event_waiters;
 530         uint32_t i;
 531
 532         event_waiters = kmalloc_array(num_events,
 533                                         sizeof(struct kfd_event_waiter),
 534                                         GFP_KERNEL);
 535         if (!event_waiters)
 536                 return NULL;
 537
 538         for (i = 0; (event_waiters) && (i < num_events) ; i++) {
 539                 init_wait(&event_waiters[i].wait);
 540                 event_waiters[i].activated = false;
 541         }
 542
 543         return event_waiters;
 544 }
 545
 546 static int init_event_waiter_get_status(struct kfd_process *p,
 547                 struct kfd_event_waiter *waiter,
 548                 uint32_t event_id)
 549 {
 550         struct kfd_event *ev = lookup_event_by_id(p, event_id);
 551
 552         if (!ev)
 553                 return -EINVAL;
 554
 555         waiter->event = ev;
 556         waiter->activated = ev->signaled;
 557         ev->signaled = ev->signaled && !ev->auto_reset;
 558
 559         return 0;
 560 }
 561
 562 static void init_event_waiter_add_to_waitlist(struct kfd_event_waiter *waiter)
 563 {
 564         struct kfd_event *ev = waiter->event;
 565
 566         /* Only add to the wait list if we actually need to
 567          * wait on this event.
 568          */
 569         if (!waiter->activated)
 570                 add_wait_queue(&ev->wq, &waiter->wait);
 571 }
 572
 573 /* test_event_condition - Test condition of events being waited for
 574  * @all:           Return completion only if all events have signaled
 575  * @num_events:    Number of events to wait for
 576  * @event_waiters: Array of event waiters, one per event
 577  *
 578  * Returns KFD_IOC_WAIT_RESULT_COMPLETE if all (or one) event(s) have
 579  * signaled. Returns KFD_IOC_WAIT_RESULT_TIMEOUT if no (or not all)
 580  * events have signaled. Returns KFD_IOC_WAIT_RESULT_FAIL if any of
 581  * the events have been destroyed.
 582  */
 583 static uint32_t test_event_condition(bool all, uint32_t num_events,
 584                                 struct kfd_event_waiter *event_waiters)
 585 {
 586         uint32_t i;
 587         uint32_t activated_count = 0;
 588
 589         for (i = 0; i < num_events; i++) {
 590                 if (!event_waiters[i].event)
 591                         return KFD_IOC_WAIT_RESULT_FAIL;
 592
 593                 if (event_waiters[i].activated) {
 594                         if (!all)
 595                                 return KFD_IOC_WAIT_RESULT_COMPLETE;
 596
 597                         activated_count++;
 598                 }
 599         }
 600
 601         return activated_count == num_events ?
 602                 KFD_IOC_WAIT_RESULT_COMPLETE : KFD_IOC_WAIT_RESULT_TIMEOUT;
 603 }
 604
 605 /*
 606  * Copy event specific data, if defined.
 607  * Currently only memory exception events have additional data to copy to user
 608  */
 609 static int copy_signaled_event_data(uint32_t num_events,
 610                 struct kfd_event_waiter *event_waiters,
 611                 struct kfd_event_data __user *data)
 612 {
 613         struct kfd_hsa_memory_exception_data *src;
 614         struct kfd_hsa_memory_exception_data __user *dst;
 615         struct kfd_event_waiter *waiter;
 616         struct kfd_event *event;
 617         uint32_t i;
 618
 619         for (i = 0; i < num_events; i++) {
 620                 waiter = &event_waiters[i];
 621                 event = waiter->event;
 622                 if (waiter->activated && event->type == KFD_EVENT_TYPE_MEMORY) {
 623                         dst = &data[i].memory_exception_data;
 624                         src = &event->memory_exception_data;
 625                         if (copy_to_user(dst, src,
 626                                 sizeof(struct kfd_hsa_memory_exception_data)))
 627                                 return -EFAULT;
 628                 }
 629         }
 630
 631         return 0;
 632
 633 }
 634
 635
 636
 637 static long user_timeout_to_jiffies(uint32_t user_timeout_ms)
 638 {
 639         if (user_timeout_ms == KFD_EVENT_TIMEOUT_IMMEDIATE)
 640                 return 0;
 641
 642         if (user_timeout_ms == KFD_EVENT_TIMEOUT_INFINITE)
 643                 return MAX_SCHEDULE_TIMEOUT;
 644
 645         /*
 646          * msecs_to_jiffies interprets all values above 2^31-1 as infinite,
 647          * but we consider them finite.
 648          * This hack is wrong, but nobody is likely to notice.
 649          */
 650         user_timeout_ms = min_t(uint32_t, user_timeout_ms, 0x7FFFFFFF);
 651
 652         return msecs_to_jiffies(user_timeout_ms) + 1;
 653 }
 654
 655 static void free_waiters(uint32_t num_events, struct kfd_event_waiter *waiters)
 656 {
 657         uint32_t i;
 658
 659         for (i = 0; i < num_events; i++)
 660                 if (waiters[i].event)
 661                         remove_wait_queue(&waiters[i].event->wq,
 662                                           &waiters[i].wait);
 663
 664         kfree(waiters);
 665 }
 666
 667 int kfd_wait_on_events(struct kfd_process *p,
 668                        uint32_t num_events, void __user *data,
 669                        bool all, uint32_t user_timeout_ms,
 670                        uint32_t *wait_result)
 671 {
 672         struct kfd_event_data __user *events =
 673                         (struct kfd_event_data __user *) data;
 674         uint32_t i;
 675         int ret = 0;
 676
 677         struct kfd_event_waiter *event_waiters = NULL;
 678         long timeout = user_timeout_to_jiffies(user_timeout_ms);
 679
 680         event_waiters = alloc_event_waiters(num_events);
 681         if (!event_waiters) {
 682                 ret = -ENOMEM;
 683                 goto out;
 684         }
 685
 686         mutex_lock(&p->event_mutex);
 687
 688         for (i = 0; i < num_events; i++) {
 689                 struct kfd_event_data event_data;
 690
 691                 if (copy_from_user(&event_data, &events[i],
 692                                 sizeof(struct kfd_event_data))) {
 693                         ret = -EFAULT;
 694                         goto out_unlock;
 695                 }
 696
 697                 ret = init_event_waiter_get_status(p, &event_waiters[i],
 698                                 event_data.event_id);
 699                 if (ret)
 700                         goto out_unlock;
 701         }
 702
 703         /* Check condition once. */
 704         *wait_result = test_event_condition(all, num_events, event_waiters);
 705         if (*wait_result == KFD_IOC_WAIT_RESULT_COMPLETE) {
 706                 ret = copy_signaled_event_data(num_events,
 707                                                event_waiters, events);
 708                 goto out_unlock;
 709         } else if (WARN_ON(*wait_result == KFD_IOC_WAIT_RESULT_FAIL)) {
 710                 /* This should not happen. Events shouldn't be
 711                  * destroyed while we're holding the event_mutex
 712                  */
 713                 goto out_unlock;
 714         }
 715
 716         /* Add to wait lists if we need to wait. */
 717         for (i = 0; i < num_events; i++)
 718                 init_event_waiter_add_to_waitlist(&event_waiters[i]);
 719
 720         mutex_unlock(&p->event_mutex);
 721
 722         while (true) {
 723                 if (fatal_signal_pending(current)) {
 724                         ret = -EINTR;
 725                         break;
 726                 }
 727
 728                 if (signal_pending(current)) {
 729                         /*
 730                          * This is wrong when a nonzero, non-infinite timeout
 731                          * is specified. We need to use
 732                          * ERESTARTSYS_RESTARTBLOCK, but struct restart_block
 733                          * contains a union with data for each user and it's
 734                          * in generic kernel code that I don't want to
 735                          * touch yet.
 736                          */
 737                         ret = -ERESTARTSYS;
 738                         break;
 739                 }
 740
 741                 /* Set task state to interruptible sleep before
 742                  * checking wake-up conditions. A concurrent wake-up
 743                  * will put the task back into runnable state. In that
 744                  * case schedule_timeout will not put the task to
 745                  * sleep and we'll get a chance to re-check the
 746                  * updated conditions almost immediately. Otherwise,
 747                  * this race condition would lead to a soft hang or a
 748                  * very long sleep.
 749                  */
 750                 set_current_state(TASK_INTERRUPTIBLE);
 751
 752                 *wait_result = test_event_condition(all, num_events,
 753                                                     event_waiters);
 754                 if (*wait_result != KFD_IOC_WAIT_RESULT_TIMEOUT)
 755                         break;
 756
 757                 if (timeout <= 0)
 758                         break;
 759
 760                 timeout = schedule_timeout(timeout);
 761         }
 762         __set_current_state(TASK_RUNNING);
 763
 764         /* copy_signaled_event_data may sleep. So this has to happen
 765          * after the task state is set back to RUNNING.
 766          */
 767         if (!ret && *wait_result == KFD_IOC_WAIT_RESULT_COMPLETE)
 768                 ret = copy_signaled_event_data(num_events,
 769                                                event_waiters, events);
 770
 771         mutex_lock(&p->event_mutex);
 772 out_unlock:
 773         free_waiters(num_events, event_waiters);
 774         mutex_unlock(&p->event_mutex);
 775 out:
 776         if (ret)
 777                 *wait_result = KFD_IOC_WAIT_RESULT_FAIL;
 778         else if (*wait_result == KFD_IOC_WAIT_RESULT_FAIL)
 779                 ret = -EIO;
 780
 781         return ret;
 782 }
 783
 784 int kfd_event_mmap(struct kfd_process *p, struct vm_area_struct *vma)
 785 {
 786         unsigned long pfn;
 787         struct kfd_signal_page *page;
 788         int ret;
 789
 790         /* check required size doesn't exceed the allocated size */
 791         if (get_order(KFD_SIGNAL_EVENT_LIMIT * 8) <
 792                         get_order(vma->vm_end - vma->vm_start)) {
 793                 pr_err("Event page mmap requested illegal size\n");
 794                 return -EINVAL;
 795         }
 796
 797         page = p->signal_page;
 798         if (!page) {
 799                 /* Probably KFD bug, but mmap is user-accessible. */
 800                 pr_debug("Signal page could not be found\n");
 801                 return -EINVAL;
 802         }
 803
 804         pfn = __pa(page->kernel_address);
 805         pfn >>= PAGE_SHIFT;
 806
 807         vma->vm_flags |= VM_IO | VM_DONTCOPY | VM_DONTEXPAND | VM_NORESERVE
 808                        | VM_DONTDUMP | VM_PFNMAP;
 809
 810         pr_debug("Mapping signal page\n");
 811         pr_debug("     start user address  == 0x%08lx\n", vma->vm_start);
 812         pr_debug("     end user address    == 0x%08lx\n", vma->vm_end);
 813         pr_debug("     pfn                 == 0x%016lX\n", pfn);
 814         pr_debug("     vm_flags            == 0x%08lX\n", vma->vm_flags);
 815         pr_debug("     size                == 0x%08lX\n",
 816                         vma->vm_end - vma->vm_start);
 817
 818         page->user_address = (uint64_t __user *)vma->vm_start;
 819
 820         /* mapping the page to user process */
 821         ret = remap_pfn_range(vma, vma->vm_start, pfn,
 822                         vma->vm_end - vma->vm_start, vma->vm_page_prot);
 823         if (!ret)
 824                 p->signal_mapped_size = vma->vm_end - vma->vm_start;
 825
 826         return ret;
 827 }
 828
 829 /*
 830  * Assumes that p->event_mutex is held and of course
 831  * that p is not going away (current or locked).
 832  */
 833 static void lookup_events_by_type_and_signal(struct kfd_process *p,
 834                 int type, void *event_data)
 835 {
 836         struct kfd_hsa_memory_exception_data *ev_data;
 837         struct kfd_event *ev;
 838         uint32_t id;
 839         bool send_signal = true;
 840
 841         ev_data = (struct kfd_hsa_memory_exception_data *) event_data;
 842
 843         id = KFD_FIRST_NONSIGNAL_EVENT_ID;
 844         idr_for_each_entry_continue(&p->event_idr, ev, id)
 845                 if (ev->type == type) {
 846                         send_signal = false;
 847                         dev_dbg(kfd_device,
 848                                         "Event found: id %X type %d",
 849                                         ev->event_id, ev->type);
 850                         set_event(ev);
 851                         if (ev->type == KFD_EVENT_TYPE_MEMORY && ev_data)
 852                                 ev->memory_exception_data = *ev_data;
 853                 }
 854
 855         if (type == KFD_EVENT_TYPE_MEMORY) {
 856                 dev_warn(kfd_device,
 857                         "Sending SIGSEGV to HSA Process with PID %d ",
 858                                 p->lead_thread->pid);
 859                 send_sig(SIGSEGV, p->lead_thread, 0);
 860         }
 861
 862         /* Send SIGTERM no event of type "type" has been found*/
 863         if (send_signal) {
 864                 if (send_sigterm) {
 865                         dev_warn(kfd_device,
 866                                 "Sending SIGTERM to HSA Process with PID %d ",
 867                                         p->lead_thread->pid);
 868                         send_sig(SIGTERM, p->lead_thread, 0);
 869                 } else {
 870                         dev_err(kfd_device,
 871                                 "HSA Process (PID %d) got unhandled exception",
 872                                 p->lead_thread->pid);
 873                 }
 874         }
 875 }
 876
 877 #ifdef KFD_SUPPORT_IOMMU_V2
 878 void kfd_signal_iommu_event(struct kfd_dev *dev, unsigned int pasid,
 879                 unsigned long address, bool is_write_requested,
 880                 bool is_execute_requested)
 881 {
 882         struct kfd_hsa_memory_exception_data memory_exception_data;
 883         struct vm_area_struct *vma;
 884
 885         /*
 886          * Because we are called from arbitrary context (workqueue) as opposed
 887          * to process context, kfd_process could attempt to exit while we are
 888          * running so the lookup function increments the process ref count.
 889          */
 890         struct kfd_process *p = kfd_lookup_process_by_pasid(pasid);
 891         struct mm_struct *mm;
 892
 893         if (!p)
 894                 return; /* Presumably process exited. */
 895
 896         /* Take a safe reference to the mm_struct, which may otherwise
 897          * disappear even while the kfd_process is still referenced.
 898          */
 899         mm = get_task_mm(p->lead_thread);
 900         if (!mm) {
 901                 kfd_unref_process(p);
 902                 return; /* Process is exiting */
 903         }
 904
 905         memset(&memory_exception_data, 0, sizeof(memory_exception_data));
 906
 907         down_read(&mm->mmap_sem);
 908         vma = find_vma(mm, address);
 909
 910         memory_exception_data.gpu_id = dev->id;
 911         memory_exception_data.va = address;
 912         /* Set failure reason */
 913         memory_exception_data.failure.NotPresent = 1;
 914         memory_exception_data.failure.NoExecute = 0;
 915         memory_exception_data.failure.ReadOnly = 0;
 916         if (vma && address >= vma->vm_start) {
 917                 memory_exception_data.failure.NotPresent = 0;
 918
 919                 if (is_write_requested && !(vma->vm_flags & VM_WRITE))
 920                         memory_exception_data.failure.ReadOnly = 1;
 921                 else
 922                         memory_exception_data.failure.ReadOnly = 0;
 923
 924                 if (is_execute_requested && !(vma->vm_flags & VM_EXEC))
 925                         memory_exception_data.failure.NoExecute = 1;
 926                 else
 927                         memory_exception_data.failure.NoExecute = 0;
 928         }
 929
 930         up_read(&mm->mmap_sem);
 931         mmput(mm);
 932
 933         pr_debug("notpresent %d, noexecute %d, readonly %d\n",
 934                         memory_exception_data.failure.NotPresent,
 935                         memory_exception_data.failure.NoExecute,
 936                         memory_exception_data.failure.ReadOnly);
 937
 938         /* Workaround on Raven to not kill the process when memory is freed
 939          * before IOMMU is able to finish processing all the excessive PPRs
 940          */
 941         if (dev->device_info->asic_family != CHIP_RAVEN) {
 942                 mutex_lock(&p->event_mutex);
 943
 944                 /* Lookup events by type and signal them */
 945                 lookup_events_by_type_and_signal(p, KFD_EVENT_TYPE_MEMORY,
 946                                 &memory_exception_data);
 947
 948                 mutex_unlock(&p->event_mutex);
 949         }
 950
 951         kfd_unref_process(p);
 952 }
 953 #endif /* KFD_SUPPORT_IOMMU_V2 */
 954
 955 void kfd_signal_hw_exception_event(unsigned int pasid)
 956 {
 957         /*
 958          * Because we are called from arbitrary context (workqueue) as opposed
 959          * to process context, kfd_process could attempt to exit while we are
 960          * running so the lookup function increments the process ref count.
 961          */
 962         struct kfd_process *p = kfd_lookup_process_by_pasid(pasid);
 963
 964         if (!p)
 965                 return; /* Presumably process exited. */
 966
 967         mutex_lock(&p->event_mutex);
 968
 969         /* Lookup events by type and signal them */
 970         lookup_events_by_type_and_signal(p, KFD_EVENT_TYPE_HW_EXCEPTION, NULL);
 971
 972         mutex_unlock(&p->event_mutex);
 973         kfd_unref_process(p);
 974 }
 975
 976 void kfd_signal_vm_fault_event(struct kfd_dev *dev, unsigned int pasid,
 977                                 struct kfd_vm_fault_info *info)
 978 {
 979         struct kfd_event *ev;
 980         uint32_t id;
 981         struct kfd_process *p = kfd_lookup_process_by_pasid(pasid);
 982         struct kfd_hsa_memory_exception_data memory_exception_data;
 983
 984         if (!p)
 985                 return; /* Presumably process exited. */
 986         memset(&memory_exception_data, 0, sizeof(memory_exception_data));
 987         memory_exception_data.gpu_id = dev->id;
 988         memory_exception_data.failure.imprecise = 1;
 989         /* Set failure reason */
 990         if (info) {
 991                 memory_exception_data.va = (info->page_addr) << PAGE_SHIFT;
 992                 memory_exception_data.failure.NotPresent =
 993                         info->prot_valid ? 1 : 0;
 994                 memory_exception_data.failure.NoExecute =
 995                         info->prot_exec ? 1 : 0;
 996                 memory_exception_data.failure.ReadOnly =
 997                         info->prot_write ? 1 : 0;
 998                 memory_exception_data.failure.imprecise = 0;
 999         }
1000         mutex_lock(&p->event_mutex);
1001
1002         id = KFD_FIRST_NONSIGNAL_EVENT_ID;
1003         idr_for_each_entry_continue(&p->event_idr, ev, id)
1004                 if (ev->type == KFD_EVENT_TYPE_MEMORY) {
1005                         ev->memory_exception_data = memory_exception_data;
1006                         set_event(ev);
1007                 }
1008
1009         mutex_unlock(&p->event_mutex);
1010         kfd_unref_process(p);
1011 }
1012
1013 void kfd_signal_reset_event(struct kfd_dev *dev)
1014 {
1015         struct kfd_hsa_hw_exception_data hw_exception_data;
1016         struct kfd_process *p;
1017         struct kfd_event *ev;
1018         unsigned int temp;
1019         uint32_t id, idx;
1020
1021         /* Whole gpu reset caused by GPU hang and memory is lost */
1022         memset(&hw_exception_data, 0, sizeof(hw_exception_data));
1023         hw_exception_data.gpu_id = dev->id;
1024         hw_exception_data.memory_lost = 1;
1025
1026         idx = srcu_read_lock(&kfd_processes_srcu);
1027         hash_for_each_rcu(kfd_processes_table, temp, p, kfd_processes) {
1028                 mutex_lock(&p->event_mutex);
1029                 id = KFD_FIRST_NONSIGNAL_EVENT_ID;
1030                 idr_for_each_entry_continue(&p->event_idr, ev, id)
1031                         if (ev->type == KFD_EVENT_TYPE_HW_EXCEPTION) {
1032                                 ev->hw_exception_data = hw_exception_data;
1033                                 set_event(ev);
1034                         }
1035                 mutex_unlock(&p->event_mutex);
1036         }
1037         srcu_read_unlock(&kfd_processes_srcu, idx);
1038 }