Loading...
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/device.h>
24#include <linux/export.h>
25#include <linux/err.h>
26#include <linux/fs.h>
27#include <linux/file.h>
28#include <linux/sched.h>
29#include <linux/slab.h>
30#include <linux/uaccess.h>
31#include <linux/compat.h>
32#include <uapi/linux/kfd_ioctl.h>
33#include <linux/time.h>
34#include <linux/mm.h>
35#include <linux/mman.h>
36#include <linux/dma-buf.h>
37#include <asm/processor.h>
38#include "kfd_priv.h"
39#include "kfd_device_queue_manager.h"
40#include "kfd_dbgmgr.h"
41#include "amdgpu_amdkfd.h"
42#include "kfd_smi_events.h"
43
44static long kfd_ioctl(struct file *, unsigned int, unsigned long);
45static int kfd_open(struct inode *, struct file *);
46static int kfd_release(struct inode *, struct file *);
47static int kfd_mmap(struct file *, struct vm_area_struct *);
48
49static const char kfd_dev_name[] = "kfd";
50
51static const struct file_operations kfd_fops = {
52 .owner = THIS_MODULE,
53 .unlocked_ioctl = kfd_ioctl,
54 .compat_ioctl = compat_ptr_ioctl,
55 .open = kfd_open,
56 .release = kfd_release,
57 .mmap = kfd_mmap,
58};
59
60static int kfd_char_dev_major = -1;
61static struct class *kfd_class;
62struct device *kfd_device;
63
64int kfd_chardev_init(void)
65{
66 int err = 0;
67
68 kfd_char_dev_major = register_chrdev(0, kfd_dev_name, &kfd_fops);
69 err = kfd_char_dev_major;
70 if (err < 0)
71 goto err_register_chrdev;
72
73 kfd_class = class_create(THIS_MODULE, kfd_dev_name);
74 err = PTR_ERR(kfd_class);
75 if (IS_ERR(kfd_class))
76 goto err_class_create;
77
78 kfd_device = device_create(kfd_class, NULL,
79 MKDEV(kfd_char_dev_major, 0),
80 NULL, kfd_dev_name);
81 err = PTR_ERR(kfd_device);
82 if (IS_ERR(kfd_device))
83 goto err_device_create;
84
85 return 0;
86
87err_device_create:
88 class_destroy(kfd_class);
89err_class_create:
90 unregister_chrdev(kfd_char_dev_major, kfd_dev_name);
91err_register_chrdev:
92 return err;
93}
94
95void kfd_chardev_exit(void)
96{
97 device_destroy(kfd_class, MKDEV(kfd_char_dev_major, 0));
98 class_destroy(kfd_class);
99 unregister_chrdev(kfd_char_dev_major, kfd_dev_name);
100}
101
102struct device *kfd_chardev(void)
103{
104 return kfd_device;
105}
106
107
108static int kfd_open(struct inode *inode, struct file *filep)
109{
110 struct kfd_process *process;
111 bool is_32bit_user_mode;
112
113 if (iminor(inode) != 0)
114 return -ENODEV;
115
116 is_32bit_user_mode = in_compat_syscall();
117
118 if (is_32bit_user_mode) {
119 dev_warn(kfd_device,
120 "Process %d (32-bit) failed to open /dev/kfd\n"
121 "32-bit processes are not supported by amdkfd\n",
122 current->pid);
123 return -EPERM;
124 }
125
126 process = kfd_create_process(filep);
127 if (IS_ERR(process))
128 return PTR_ERR(process);
129
130 if (kfd_is_locked()) {
131 dev_dbg(kfd_device, "kfd is locked!\n"
132 "process %d unreferenced", process->pasid);
133 kfd_unref_process(process);
134 return -EAGAIN;
135 }
136
137 /* filep now owns the reference returned by kfd_create_process */
138 filep->private_data = process;
139
140 dev_dbg(kfd_device, "process %d opened, compat mode (32 bit) - %d\n",
141 process->pasid, process->is_32bit_user_mode);
142
143 return 0;
144}
145
146static int kfd_release(struct inode *inode, struct file *filep)
147{
148 struct kfd_process *process = filep->private_data;
149
150 if (process)
151 kfd_unref_process(process);
152
153 return 0;
154}
155
156static int kfd_ioctl_get_version(struct file *filep, struct kfd_process *p,
157 void *data)
158{
159 struct kfd_ioctl_get_version_args *args = data;
160
161 args->major_version = KFD_IOCTL_MAJOR_VERSION;
162 args->minor_version = KFD_IOCTL_MINOR_VERSION;
163
164 return 0;
165}
166
167static int set_queue_properties_from_user(struct queue_properties *q_properties,
168 struct kfd_ioctl_create_queue_args *args)
169{
170 if (args->queue_percentage > KFD_MAX_QUEUE_PERCENTAGE) {
171 pr_err("Queue percentage must be between 0 to KFD_MAX_QUEUE_PERCENTAGE\n");
172 return -EINVAL;
173 }
174
175 if (args->queue_priority > KFD_MAX_QUEUE_PRIORITY) {
176 pr_err("Queue priority must be between 0 to KFD_MAX_QUEUE_PRIORITY\n");
177 return -EINVAL;
178 }
179
180 if ((args->ring_base_address) &&
181 (!access_ok((const void __user *) args->ring_base_address,
182 sizeof(uint64_t)))) {
183 pr_err("Can't access ring base address\n");
184 return -EFAULT;
185 }
186
187 if (!is_power_of_2(args->ring_size) && (args->ring_size != 0)) {
188 pr_err("Ring size must be a power of 2 or 0\n");
189 return -EINVAL;
190 }
191
192 if (!access_ok((const void __user *) args->read_pointer_address,
193 sizeof(uint32_t))) {
194 pr_err("Can't access read pointer\n");
195 return -EFAULT;
196 }
197
198 if (!access_ok((const void __user *) args->write_pointer_address,
199 sizeof(uint32_t))) {
200 pr_err("Can't access write pointer\n");
201 return -EFAULT;
202 }
203
204 if (args->eop_buffer_address &&
205 !access_ok((const void __user *) args->eop_buffer_address,
206 sizeof(uint32_t))) {
207 pr_debug("Can't access eop buffer");
208 return -EFAULT;
209 }
210
211 if (args->ctx_save_restore_address &&
212 !access_ok((const void __user *) args->ctx_save_restore_address,
213 sizeof(uint32_t))) {
214 pr_debug("Can't access ctx save restore buffer");
215 return -EFAULT;
216 }
217
218 q_properties->is_interop = false;
219 q_properties->is_gws = false;
220 q_properties->queue_percent = args->queue_percentage;
221 q_properties->priority = args->queue_priority;
222 q_properties->queue_address = args->ring_base_address;
223 q_properties->queue_size = args->ring_size;
224 q_properties->read_ptr = (uint32_t *) args->read_pointer_address;
225 q_properties->write_ptr = (uint32_t *) args->write_pointer_address;
226 q_properties->eop_ring_buffer_address = args->eop_buffer_address;
227 q_properties->eop_ring_buffer_size = args->eop_buffer_size;
228 q_properties->ctx_save_restore_area_address =
229 args->ctx_save_restore_address;
230 q_properties->ctx_save_restore_area_size = args->ctx_save_restore_size;
231 q_properties->ctl_stack_size = args->ctl_stack_size;
232 if (args->queue_type == KFD_IOC_QUEUE_TYPE_COMPUTE ||
233 args->queue_type == KFD_IOC_QUEUE_TYPE_COMPUTE_AQL)
234 q_properties->type = KFD_QUEUE_TYPE_COMPUTE;
235 else if (args->queue_type == KFD_IOC_QUEUE_TYPE_SDMA)
236 q_properties->type = KFD_QUEUE_TYPE_SDMA;
237 else if (args->queue_type == KFD_IOC_QUEUE_TYPE_SDMA_XGMI)
238 q_properties->type = KFD_QUEUE_TYPE_SDMA_XGMI;
239 else
240 return -ENOTSUPP;
241
242 if (args->queue_type == KFD_IOC_QUEUE_TYPE_COMPUTE_AQL)
243 q_properties->format = KFD_QUEUE_FORMAT_AQL;
244 else
245 q_properties->format = KFD_QUEUE_FORMAT_PM4;
246
247 pr_debug("Queue Percentage: %d, %d\n",
248 q_properties->queue_percent, args->queue_percentage);
249
250 pr_debug("Queue Priority: %d, %d\n",
251 q_properties->priority, args->queue_priority);
252
253 pr_debug("Queue Address: 0x%llX, 0x%llX\n",
254 q_properties->queue_address, args->ring_base_address);
255
256 pr_debug("Queue Size: 0x%llX, %u\n",
257 q_properties->queue_size, args->ring_size);
258
259 pr_debug("Queue r/w Pointers: %px, %px\n",
260 q_properties->read_ptr,
261 q_properties->write_ptr);
262
263 pr_debug("Queue Format: %d\n", q_properties->format);
264
265 pr_debug("Queue EOP: 0x%llX\n", q_properties->eop_ring_buffer_address);
266
267 pr_debug("Queue CTX save area: 0x%llX\n",
268 q_properties->ctx_save_restore_area_address);
269
270 return 0;
271}
272
273static int kfd_ioctl_create_queue(struct file *filep, struct kfd_process *p,
274 void *data)
275{
276 struct kfd_ioctl_create_queue_args *args = data;
277 struct kfd_dev *dev;
278 int err = 0;
279 unsigned int queue_id;
280 struct kfd_process_device *pdd;
281 struct queue_properties q_properties;
282 uint32_t doorbell_offset_in_process = 0;
283
284 memset(&q_properties, 0, sizeof(struct queue_properties));
285
286 pr_debug("Creating queue ioctl\n");
287
288 err = set_queue_properties_from_user(&q_properties, args);
289 if (err)
290 return err;
291
292 pr_debug("Looking for gpu id 0x%x\n", args->gpu_id);
293 dev = kfd_device_by_id(args->gpu_id);
294 if (!dev) {
295 pr_debug("Could not find gpu id 0x%x\n", args->gpu_id);
296 return -EINVAL;
297 }
298
299 mutex_lock(&p->mutex);
300
301 pdd = kfd_bind_process_to_device(dev, p);
302 if (IS_ERR(pdd)) {
303 err = -ESRCH;
304 goto err_bind_process;
305 }
306
307 pr_debug("Creating queue for PASID 0x%x on gpu 0x%x\n",
308 p->pasid,
309 dev->id);
310
311 err = pqm_create_queue(&p->pqm, dev, filep, &q_properties, &queue_id,
312 &doorbell_offset_in_process);
313 if (err != 0)
314 goto err_create_queue;
315
316 args->queue_id = queue_id;
317
318
319 /* Return gpu_id as doorbell offset for mmap usage */
320 args->doorbell_offset = KFD_MMAP_TYPE_DOORBELL;
321 args->doorbell_offset |= KFD_MMAP_GPU_ID(args->gpu_id);
322 if (KFD_IS_SOC15(dev->device_info->asic_family))
323 /* On SOC15 ASICs, include the doorbell offset within the
324 * process doorbell frame, which is 2 pages.
325 */
326 args->doorbell_offset |= doorbell_offset_in_process;
327
328 mutex_unlock(&p->mutex);
329
330 pr_debug("Queue id %d was created successfully\n", args->queue_id);
331
332 pr_debug("Ring buffer address == 0x%016llX\n",
333 args->ring_base_address);
334
335 pr_debug("Read ptr address == 0x%016llX\n",
336 args->read_pointer_address);
337
338 pr_debug("Write ptr address == 0x%016llX\n",
339 args->write_pointer_address);
340
341 return 0;
342
343err_create_queue:
344err_bind_process:
345 mutex_unlock(&p->mutex);
346 return err;
347}
348
349static int kfd_ioctl_destroy_queue(struct file *filp, struct kfd_process *p,
350 void *data)
351{
352 int retval;
353 struct kfd_ioctl_destroy_queue_args *args = data;
354
355 pr_debug("Destroying queue id %d for pasid 0x%x\n",
356 args->queue_id,
357 p->pasid);
358
359 mutex_lock(&p->mutex);
360
361 retval = pqm_destroy_queue(&p->pqm, args->queue_id);
362
363 mutex_unlock(&p->mutex);
364 return retval;
365}
366
367static int kfd_ioctl_update_queue(struct file *filp, struct kfd_process *p,
368 void *data)
369{
370 int retval;
371 struct kfd_ioctl_update_queue_args *args = data;
372 struct queue_properties properties;
373
374 if (args->queue_percentage > KFD_MAX_QUEUE_PERCENTAGE) {
375 pr_err("Queue percentage must be between 0 to KFD_MAX_QUEUE_PERCENTAGE\n");
376 return -EINVAL;
377 }
378
379 if (args->queue_priority > KFD_MAX_QUEUE_PRIORITY) {
380 pr_err("Queue priority must be between 0 to KFD_MAX_QUEUE_PRIORITY\n");
381 return -EINVAL;
382 }
383
384 if ((args->ring_base_address) &&
385 (!access_ok((const void __user *) args->ring_base_address,
386 sizeof(uint64_t)))) {
387 pr_err("Can't access ring base address\n");
388 return -EFAULT;
389 }
390
391 if (!is_power_of_2(args->ring_size) && (args->ring_size != 0)) {
392 pr_err("Ring size must be a power of 2 or 0\n");
393 return -EINVAL;
394 }
395
396 properties.queue_address = args->ring_base_address;
397 properties.queue_size = args->ring_size;
398 properties.queue_percent = args->queue_percentage;
399 properties.priority = args->queue_priority;
400
401 pr_debug("Updating queue id %d for pasid 0x%x\n",
402 args->queue_id, p->pasid);
403
404 mutex_lock(&p->mutex);
405
406 retval = pqm_update_queue(&p->pqm, args->queue_id, &properties);
407
408 mutex_unlock(&p->mutex);
409
410 return retval;
411}
412
413static int kfd_ioctl_set_cu_mask(struct file *filp, struct kfd_process *p,
414 void *data)
415{
416 int retval;
417 const int max_num_cus = 1024;
418 struct kfd_ioctl_set_cu_mask_args *args = data;
419 struct queue_properties properties;
420 uint32_t __user *cu_mask_ptr = (uint32_t __user *)args->cu_mask_ptr;
421 size_t cu_mask_size = sizeof(uint32_t) * (args->num_cu_mask / 32);
422
423 if ((args->num_cu_mask % 32) != 0) {
424 pr_debug("num_cu_mask 0x%x must be a multiple of 32",
425 args->num_cu_mask);
426 return -EINVAL;
427 }
428
429 properties.cu_mask_count = args->num_cu_mask;
430 if (properties.cu_mask_count == 0) {
431 pr_debug("CU mask cannot be 0");
432 return -EINVAL;
433 }
434
435 /* To prevent an unreasonably large CU mask size, set an arbitrary
436 * limit of max_num_cus bits. We can then just drop any CU mask bits
437 * past max_num_cus bits and just use the first max_num_cus bits.
438 */
439 if (properties.cu_mask_count > max_num_cus) {
440 pr_debug("CU mask cannot be greater than 1024 bits");
441 properties.cu_mask_count = max_num_cus;
442 cu_mask_size = sizeof(uint32_t) * (max_num_cus/32);
443 }
444
445 properties.cu_mask = kzalloc(cu_mask_size, GFP_KERNEL);
446 if (!properties.cu_mask)
447 return -ENOMEM;
448
449 retval = copy_from_user(properties.cu_mask, cu_mask_ptr, cu_mask_size);
450 if (retval) {
451 pr_debug("Could not copy CU mask from userspace");
452 kfree(properties.cu_mask);
453 return -EFAULT;
454 }
455
456 mutex_lock(&p->mutex);
457
458 retval = pqm_set_cu_mask(&p->pqm, args->queue_id, &properties);
459
460 mutex_unlock(&p->mutex);
461
462 if (retval)
463 kfree(properties.cu_mask);
464
465 return retval;
466}
467
468static int kfd_ioctl_get_queue_wave_state(struct file *filep,
469 struct kfd_process *p, void *data)
470{
471 struct kfd_ioctl_get_queue_wave_state_args *args = data;
472 int r;
473
474 mutex_lock(&p->mutex);
475
476 r = pqm_get_wave_state(&p->pqm, args->queue_id,
477 (void __user *)args->ctl_stack_address,
478 &args->ctl_stack_used_size,
479 &args->save_area_used_size);
480
481 mutex_unlock(&p->mutex);
482
483 return r;
484}
485
486static int kfd_ioctl_set_memory_policy(struct file *filep,
487 struct kfd_process *p, void *data)
488{
489 struct kfd_ioctl_set_memory_policy_args *args = data;
490 struct kfd_dev *dev;
491 int err = 0;
492 struct kfd_process_device *pdd;
493 enum cache_policy default_policy, alternate_policy;
494
495 if (args->default_policy != KFD_IOC_CACHE_POLICY_COHERENT
496 && args->default_policy != KFD_IOC_CACHE_POLICY_NONCOHERENT) {
497 return -EINVAL;
498 }
499
500 if (args->alternate_policy != KFD_IOC_CACHE_POLICY_COHERENT
501 && args->alternate_policy != KFD_IOC_CACHE_POLICY_NONCOHERENT) {
502 return -EINVAL;
503 }
504
505 dev = kfd_device_by_id(args->gpu_id);
506 if (!dev)
507 return -EINVAL;
508
509 mutex_lock(&p->mutex);
510
511 pdd = kfd_bind_process_to_device(dev, p);
512 if (IS_ERR(pdd)) {
513 err = -ESRCH;
514 goto out;
515 }
516
517 default_policy = (args->default_policy == KFD_IOC_CACHE_POLICY_COHERENT)
518 ? cache_policy_coherent : cache_policy_noncoherent;
519
520 alternate_policy =
521 (args->alternate_policy == KFD_IOC_CACHE_POLICY_COHERENT)
522 ? cache_policy_coherent : cache_policy_noncoherent;
523
524 if (!dev->dqm->ops.set_cache_memory_policy(dev->dqm,
525 &pdd->qpd,
526 default_policy,
527 alternate_policy,
528 (void __user *)args->alternate_aperture_base,
529 args->alternate_aperture_size))
530 err = -EINVAL;
531
532out:
533 mutex_unlock(&p->mutex);
534
535 return err;
536}
537
538static int kfd_ioctl_set_trap_handler(struct file *filep,
539 struct kfd_process *p, void *data)
540{
541 struct kfd_ioctl_set_trap_handler_args *args = data;
542 struct kfd_dev *dev;
543 int err = 0;
544 struct kfd_process_device *pdd;
545
546 dev = kfd_device_by_id(args->gpu_id);
547 if (!dev)
548 return -EINVAL;
549
550 mutex_lock(&p->mutex);
551
552 pdd = kfd_bind_process_to_device(dev, p);
553 if (IS_ERR(pdd)) {
554 err = -ESRCH;
555 goto out;
556 }
557
558 if (dev->dqm->ops.set_trap_handler(dev->dqm,
559 &pdd->qpd,
560 args->tba_addr,
561 args->tma_addr))
562 err = -EINVAL;
563
564out:
565 mutex_unlock(&p->mutex);
566
567 return err;
568}
569
570static int kfd_ioctl_dbg_register(struct file *filep,
571 struct kfd_process *p, void *data)
572{
573 struct kfd_ioctl_dbg_register_args *args = data;
574 struct kfd_dev *dev;
575 struct kfd_dbgmgr *dbgmgr_ptr;
576 struct kfd_process_device *pdd;
577 bool create_ok;
578 long status = 0;
579
580 dev = kfd_device_by_id(args->gpu_id);
581 if (!dev)
582 return -EINVAL;
583
584 if (dev->device_info->asic_family == CHIP_CARRIZO) {
585 pr_debug("kfd_ioctl_dbg_register not supported on CZ\n");
586 return -EINVAL;
587 }
588
589 mutex_lock(&p->mutex);
590 mutex_lock(kfd_get_dbgmgr_mutex());
591
592 /*
593 * make sure that we have pdd, if this the first queue created for
594 * this process
595 */
596 pdd = kfd_bind_process_to_device(dev, p);
597 if (IS_ERR(pdd)) {
598 status = PTR_ERR(pdd);
599 goto out;
600 }
601
602 if (!dev->dbgmgr) {
603 /* In case of a legal call, we have no dbgmgr yet */
604 create_ok = kfd_dbgmgr_create(&dbgmgr_ptr, dev);
605 if (create_ok) {
606 status = kfd_dbgmgr_register(dbgmgr_ptr, p);
607 if (status != 0)
608 kfd_dbgmgr_destroy(dbgmgr_ptr);
609 else
610 dev->dbgmgr = dbgmgr_ptr;
611 }
612 } else {
613 pr_debug("debugger already registered\n");
614 status = -EINVAL;
615 }
616
617out:
618 mutex_unlock(kfd_get_dbgmgr_mutex());
619 mutex_unlock(&p->mutex);
620
621 return status;
622}
623
624static int kfd_ioctl_dbg_unregister(struct file *filep,
625 struct kfd_process *p, void *data)
626{
627 struct kfd_ioctl_dbg_unregister_args *args = data;
628 struct kfd_dev *dev;
629 long status;
630
631 dev = kfd_device_by_id(args->gpu_id);
632 if (!dev || !dev->dbgmgr)
633 return -EINVAL;
634
635 if (dev->device_info->asic_family == CHIP_CARRIZO) {
636 pr_debug("kfd_ioctl_dbg_unregister not supported on CZ\n");
637 return -EINVAL;
638 }
639
640 mutex_lock(kfd_get_dbgmgr_mutex());
641
642 status = kfd_dbgmgr_unregister(dev->dbgmgr, p);
643 if (!status) {
644 kfd_dbgmgr_destroy(dev->dbgmgr);
645 dev->dbgmgr = NULL;
646 }
647
648 mutex_unlock(kfd_get_dbgmgr_mutex());
649
650 return status;
651}
652
653/*
654 * Parse and generate variable size data structure for address watch.
655 * Total size of the buffer and # watch points is limited in order
656 * to prevent kernel abuse. (no bearing to the much smaller HW limitation
657 * which is enforced by dbgdev module)
658 * please also note that the watch address itself are not "copied from user",
659 * since it be set into the HW in user mode values.
660 *
661 */
662static int kfd_ioctl_dbg_address_watch(struct file *filep,
663 struct kfd_process *p, void *data)
664{
665 struct kfd_ioctl_dbg_address_watch_args *args = data;
666 struct kfd_dev *dev;
667 struct dbg_address_watch_info aw_info;
668 unsigned char *args_buff;
669 long status;
670 void __user *cmd_from_user;
671 uint64_t watch_mask_value = 0;
672 unsigned int args_idx = 0;
673
674 memset((void *) &aw_info, 0, sizeof(struct dbg_address_watch_info));
675
676 dev = kfd_device_by_id(args->gpu_id);
677 if (!dev)
678 return -EINVAL;
679
680 if (dev->device_info->asic_family == CHIP_CARRIZO) {
681 pr_debug("kfd_ioctl_dbg_wave_control not supported on CZ\n");
682 return -EINVAL;
683 }
684
685 cmd_from_user = (void __user *) args->content_ptr;
686
687 /* Validate arguments */
688
689 if ((args->buf_size_in_bytes > MAX_ALLOWED_AW_BUFF_SIZE) ||
690 (args->buf_size_in_bytes <= sizeof(*args) + sizeof(int) * 2) ||
691 (cmd_from_user == NULL))
692 return -EINVAL;
693
694 /* this is the actual buffer to work with */
695 args_buff = memdup_user(cmd_from_user,
696 args->buf_size_in_bytes - sizeof(*args));
697 if (IS_ERR(args_buff))
698 return PTR_ERR(args_buff);
699
700 aw_info.process = p;
701
702 aw_info.num_watch_points = *((uint32_t *)(&args_buff[args_idx]));
703 args_idx += sizeof(aw_info.num_watch_points);
704
705 aw_info.watch_mode = (enum HSA_DBG_WATCH_MODE *) &args_buff[args_idx];
706 args_idx += sizeof(enum HSA_DBG_WATCH_MODE) * aw_info.num_watch_points;
707
708 /*
709 * set watch address base pointer to point on the array base
710 * within args_buff
711 */
712 aw_info.watch_address = (uint64_t *) &args_buff[args_idx];
713
714 /* skip over the addresses buffer */
715 args_idx += sizeof(aw_info.watch_address) * aw_info.num_watch_points;
716
717 if (args_idx >= args->buf_size_in_bytes - sizeof(*args)) {
718 status = -EINVAL;
719 goto out;
720 }
721
722 watch_mask_value = (uint64_t) args_buff[args_idx];
723
724 if (watch_mask_value > 0) {
725 /*
726 * There is an array of masks.
727 * set watch mask base pointer to point on the array base
728 * within args_buff
729 */
730 aw_info.watch_mask = (uint64_t *) &args_buff[args_idx];
731
732 /* skip over the masks buffer */
733 args_idx += sizeof(aw_info.watch_mask) *
734 aw_info.num_watch_points;
735 } else {
736 /* just the NULL mask, set to NULL and skip over it */
737 aw_info.watch_mask = NULL;
738 args_idx += sizeof(aw_info.watch_mask);
739 }
740
741 if (args_idx >= args->buf_size_in_bytes - sizeof(args)) {
742 status = -EINVAL;
743 goto out;
744 }
745
746 /* Currently HSA Event is not supported for DBG */
747 aw_info.watch_event = NULL;
748
749 mutex_lock(kfd_get_dbgmgr_mutex());
750
751 status = kfd_dbgmgr_address_watch(dev->dbgmgr, &aw_info);
752
753 mutex_unlock(kfd_get_dbgmgr_mutex());
754
755out:
756 kfree(args_buff);
757
758 return status;
759}
760
761/* Parse and generate fixed size data structure for wave control */
762static int kfd_ioctl_dbg_wave_control(struct file *filep,
763 struct kfd_process *p, void *data)
764{
765 struct kfd_ioctl_dbg_wave_control_args *args = data;
766 struct kfd_dev *dev;
767 struct dbg_wave_control_info wac_info;
768 unsigned char *args_buff;
769 uint32_t computed_buff_size;
770 long status;
771 void __user *cmd_from_user;
772 unsigned int args_idx = 0;
773
774 memset((void *) &wac_info, 0, sizeof(struct dbg_wave_control_info));
775
776 /* we use compact form, independent of the packing attribute value */
777 computed_buff_size = sizeof(*args) +
778 sizeof(wac_info.mode) +
779 sizeof(wac_info.operand) +
780 sizeof(wac_info.dbgWave_msg.DbgWaveMsg) +
781 sizeof(wac_info.dbgWave_msg.MemoryVA) +
782 sizeof(wac_info.trapId);
783
784 dev = kfd_device_by_id(args->gpu_id);
785 if (!dev)
786 return -EINVAL;
787
788 if (dev->device_info->asic_family == CHIP_CARRIZO) {
789 pr_debug("kfd_ioctl_dbg_wave_control not supported on CZ\n");
790 return -EINVAL;
791 }
792
793 /* input size must match the computed "compact" size */
794 if (args->buf_size_in_bytes != computed_buff_size) {
795 pr_debug("size mismatch, computed : actual %u : %u\n",
796 args->buf_size_in_bytes, computed_buff_size);
797 return -EINVAL;
798 }
799
800 cmd_from_user = (void __user *) args->content_ptr;
801
802 if (cmd_from_user == NULL)
803 return -EINVAL;
804
805 /* copy the entire buffer from user */
806
807 args_buff = memdup_user(cmd_from_user,
808 args->buf_size_in_bytes - sizeof(*args));
809 if (IS_ERR(args_buff))
810 return PTR_ERR(args_buff);
811
812 /* move ptr to the start of the "pay-load" area */
813 wac_info.process = p;
814
815 wac_info.operand = *((enum HSA_DBG_WAVEOP *)(&args_buff[args_idx]));
816 args_idx += sizeof(wac_info.operand);
817
818 wac_info.mode = *((enum HSA_DBG_WAVEMODE *)(&args_buff[args_idx]));
819 args_idx += sizeof(wac_info.mode);
820
821 wac_info.trapId = *((uint32_t *)(&args_buff[args_idx]));
822 args_idx += sizeof(wac_info.trapId);
823
824 wac_info.dbgWave_msg.DbgWaveMsg.WaveMsgInfoGen2.Value =
825 *((uint32_t *)(&args_buff[args_idx]));
826 wac_info.dbgWave_msg.MemoryVA = NULL;
827
828 mutex_lock(kfd_get_dbgmgr_mutex());
829
830 pr_debug("Calling dbg manager process %p, operand %u, mode %u, trapId %u, message %u\n",
831 wac_info.process, wac_info.operand,
832 wac_info.mode, wac_info.trapId,
833 wac_info.dbgWave_msg.DbgWaveMsg.WaveMsgInfoGen2.Value);
834
835 status = kfd_dbgmgr_wave_control(dev->dbgmgr, &wac_info);
836
837 pr_debug("Returned status of dbg manager is %ld\n", status);
838
839 mutex_unlock(kfd_get_dbgmgr_mutex());
840
841 kfree(args_buff);
842
843 return status;
844}
845
846static int kfd_ioctl_get_clock_counters(struct file *filep,
847 struct kfd_process *p, void *data)
848{
849 struct kfd_ioctl_get_clock_counters_args *args = data;
850 struct kfd_dev *dev;
851
852 dev = kfd_device_by_id(args->gpu_id);
853 if (dev)
854 /* Reading GPU clock counter from KGD */
855 args->gpu_clock_counter = amdgpu_amdkfd_get_gpu_clock_counter(dev->kgd);
856 else
857 /* Node without GPU resource */
858 args->gpu_clock_counter = 0;
859
860 /* No access to rdtsc. Using raw monotonic time */
861 args->cpu_clock_counter = ktime_get_raw_ns();
862 args->system_clock_counter = ktime_get_boottime_ns();
863
864 /* Since the counter is in nano-seconds we use 1GHz frequency */
865 args->system_clock_freq = 1000000000;
866
867 return 0;
868}
869
870
871static int kfd_ioctl_get_process_apertures(struct file *filp,
872 struct kfd_process *p, void *data)
873{
874 struct kfd_ioctl_get_process_apertures_args *args = data;
875 struct kfd_process_device_apertures *pAperture;
876 struct kfd_process_device *pdd;
877
878 dev_dbg(kfd_device, "get apertures for PASID 0x%x", p->pasid);
879
880 args->num_of_nodes = 0;
881
882 mutex_lock(&p->mutex);
883
884 /*if the process-device list isn't empty*/
885 if (kfd_has_process_device_data(p)) {
886 /* Run over all pdd of the process */
887 pdd = kfd_get_first_process_device_data(p);
888 do {
889 pAperture =
890 &args->process_apertures[args->num_of_nodes];
891 pAperture->gpu_id = pdd->dev->id;
892 pAperture->lds_base = pdd->lds_base;
893 pAperture->lds_limit = pdd->lds_limit;
894 pAperture->gpuvm_base = pdd->gpuvm_base;
895 pAperture->gpuvm_limit = pdd->gpuvm_limit;
896 pAperture->scratch_base = pdd->scratch_base;
897 pAperture->scratch_limit = pdd->scratch_limit;
898
899 dev_dbg(kfd_device,
900 "node id %u\n", args->num_of_nodes);
901 dev_dbg(kfd_device,
902 "gpu id %u\n", pdd->dev->id);
903 dev_dbg(kfd_device,
904 "lds_base %llX\n", pdd->lds_base);
905 dev_dbg(kfd_device,
906 "lds_limit %llX\n", pdd->lds_limit);
907 dev_dbg(kfd_device,
908 "gpuvm_base %llX\n", pdd->gpuvm_base);
909 dev_dbg(kfd_device,
910 "gpuvm_limit %llX\n", pdd->gpuvm_limit);
911 dev_dbg(kfd_device,
912 "scratch_base %llX\n", pdd->scratch_base);
913 dev_dbg(kfd_device,
914 "scratch_limit %llX\n", pdd->scratch_limit);
915
916 args->num_of_nodes++;
917
918 pdd = kfd_get_next_process_device_data(p, pdd);
919 } while (pdd && (args->num_of_nodes < NUM_OF_SUPPORTED_GPUS));
920 }
921
922 mutex_unlock(&p->mutex);
923
924 return 0;
925}
926
927static int kfd_ioctl_get_process_apertures_new(struct file *filp,
928 struct kfd_process *p, void *data)
929{
930 struct kfd_ioctl_get_process_apertures_new_args *args = data;
931 struct kfd_process_device_apertures *pa;
932 struct kfd_process_device *pdd;
933 uint32_t nodes = 0;
934 int ret;
935
936 dev_dbg(kfd_device, "get apertures for PASID 0x%x", p->pasid);
937
938 if (args->num_of_nodes == 0) {
939 /* Return number of nodes, so that user space can alloacate
940 * sufficient memory
941 */
942 mutex_lock(&p->mutex);
943
944 if (!kfd_has_process_device_data(p))
945 goto out_unlock;
946
947 /* Run over all pdd of the process */
948 pdd = kfd_get_first_process_device_data(p);
949 do {
950 args->num_of_nodes++;
951 pdd = kfd_get_next_process_device_data(p, pdd);
952 } while (pdd);
953
954 goto out_unlock;
955 }
956
957 /* Fill in process-aperture information for all available
958 * nodes, but not more than args->num_of_nodes as that is
959 * the amount of memory allocated by user
960 */
961 pa = kzalloc((sizeof(struct kfd_process_device_apertures) *
962 args->num_of_nodes), GFP_KERNEL);
963 if (!pa)
964 return -ENOMEM;
965
966 mutex_lock(&p->mutex);
967
968 if (!kfd_has_process_device_data(p)) {
969 args->num_of_nodes = 0;
970 kfree(pa);
971 goto out_unlock;
972 }
973
974 /* Run over all pdd of the process */
975 pdd = kfd_get_first_process_device_data(p);
976 do {
977 pa[nodes].gpu_id = pdd->dev->id;
978 pa[nodes].lds_base = pdd->lds_base;
979 pa[nodes].lds_limit = pdd->lds_limit;
980 pa[nodes].gpuvm_base = pdd->gpuvm_base;
981 pa[nodes].gpuvm_limit = pdd->gpuvm_limit;
982 pa[nodes].scratch_base = pdd->scratch_base;
983 pa[nodes].scratch_limit = pdd->scratch_limit;
984
985 dev_dbg(kfd_device,
986 "gpu id %u\n", pdd->dev->id);
987 dev_dbg(kfd_device,
988 "lds_base %llX\n", pdd->lds_base);
989 dev_dbg(kfd_device,
990 "lds_limit %llX\n", pdd->lds_limit);
991 dev_dbg(kfd_device,
992 "gpuvm_base %llX\n", pdd->gpuvm_base);
993 dev_dbg(kfd_device,
994 "gpuvm_limit %llX\n", pdd->gpuvm_limit);
995 dev_dbg(kfd_device,
996 "scratch_base %llX\n", pdd->scratch_base);
997 dev_dbg(kfd_device,
998 "scratch_limit %llX\n", pdd->scratch_limit);
999 nodes++;
1000
1001 pdd = kfd_get_next_process_device_data(p, pdd);
1002 } while (pdd && (nodes < args->num_of_nodes));
1003 mutex_unlock(&p->mutex);
1004
1005 args->num_of_nodes = nodes;
1006 ret = copy_to_user(
1007 (void __user *)args->kfd_process_device_apertures_ptr,
1008 pa,
1009 (nodes * sizeof(struct kfd_process_device_apertures)));
1010 kfree(pa);
1011 return ret ? -EFAULT : 0;
1012
1013out_unlock:
1014 mutex_unlock(&p->mutex);
1015 return 0;
1016}
1017
1018static int kfd_ioctl_create_event(struct file *filp, struct kfd_process *p,
1019 void *data)
1020{
1021 struct kfd_ioctl_create_event_args *args = data;
1022 int err;
1023
1024 /* For dGPUs the event page is allocated in user mode. The
1025 * handle is passed to KFD with the first call to this IOCTL
1026 * through the event_page_offset field.
1027 */
1028 if (args->event_page_offset) {
1029 struct kfd_dev *kfd;
1030 struct kfd_process_device *pdd;
1031 void *mem, *kern_addr;
1032 uint64_t size;
1033
1034 if (p->signal_page) {
1035 pr_err("Event page is already set\n");
1036 return -EINVAL;
1037 }
1038
1039 kfd = kfd_device_by_id(GET_GPU_ID(args->event_page_offset));
1040 if (!kfd) {
1041 pr_err("Getting device by id failed in %s\n", __func__);
1042 return -EINVAL;
1043 }
1044
1045 mutex_lock(&p->mutex);
1046 pdd = kfd_bind_process_to_device(kfd, p);
1047 if (IS_ERR(pdd)) {
1048 err = PTR_ERR(pdd);
1049 goto out_unlock;
1050 }
1051
1052 mem = kfd_process_device_translate_handle(pdd,
1053 GET_IDR_HANDLE(args->event_page_offset));
1054 if (!mem) {
1055 pr_err("Can't find BO, offset is 0x%llx\n",
1056 args->event_page_offset);
1057 err = -EINVAL;
1058 goto out_unlock;
1059 }
1060 mutex_unlock(&p->mutex);
1061
1062 err = amdgpu_amdkfd_gpuvm_map_gtt_bo_to_kernel(kfd->kgd,
1063 mem, &kern_addr, &size);
1064 if (err) {
1065 pr_err("Failed to map event page to kernel\n");
1066 return err;
1067 }
1068
1069 err = kfd_event_page_set(p, kern_addr, size);
1070 if (err) {
1071 pr_err("Failed to set event page\n");
1072 return err;
1073 }
1074 }
1075
1076 err = kfd_event_create(filp, p, args->event_type,
1077 args->auto_reset != 0, args->node_id,
1078 &args->event_id, &args->event_trigger_data,
1079 &args->event_page_offset,
1080 &args->event_slot_index);
1081
1082 return err;
1083
1084out_unlock:
1085 mutex_unlock(&p->mutex);
1086 return err;
1087}
1088
1089static int kfd_ioctl_destroy_event(struct file *filp, struct kfd_process *p,
1090 void *data)
1091{
1092 struct kfd_ioctl_destroy_event_args *args = data;
1093
1094 return kfd_event_destroy(p, args->event_id);
1095}
1096
1097static int kfd_ioctl_set_event(struct file *filp, struct kfd_process *p,
1098 void *data)
1099{
1100 struct kfd_ioctl_set_event_args *args = data;
1101
1102 return kfd_set_event(p, args->event_id);
1103}
1104
1105static int kfd_ioctl_reset_event(struct file *filp, struct kfd_process *p,
1106 void *data)
1107{
1108 struct kfd_ioctl_reset_event_args *args = data;
1109
1110 return kfd_reset_event(p, args->event_id);
1111}
1112
1113static int kfd_ioctl_wait_events(struct file *filp, struct kfd_process *p,
1114 void *data)
1115{
1116 struct kfd_ioctl_wait_events_args *args = data;
1117 int err;
1118
1119 err = kfd_wait_on_events(p, args->num_events,
1120 (void __user *)args->events_ptr,
1121 (args->wait_for_all != 0),
1122 args->timeout, &args->wait_result);
1123
1124 return err;
1125}
1126static int kfd_ioctl_set_scratch_backing_va(struct file *filep,
1127 struct kfd_process *p, void *data)
1128{
1129 struct kfd_ioctl_set_scratch_backing_va_args *args = data;
1130 struct kfd_process_device *pdd;
1131 struct kfd_dev *dev;
1132 long err;
1133
1134 dev = kfd_device_by_id(args->gpu_id);
1135 if (!dev)
1136 return -EINVAL;
1137
1138 mutex_lock(&p->mutex);
1139
1140 pdd = kfd_bind_process_to_device(dev, p);
1141 if (IS_ERR(pdd)) {
1142 err = PTR_ERR(pdd);
1143 goto bind_process_to_device_fail;
1144 }
1145
1146 pdd->qpd.sh_hidden_private_base = args->va_addr;
1147
1148 mutex_unlock(&p->mutex);
1149
1150 if (dev->dqm->sched_policy == KFD_SCHED_POLICY_NO_HWS &&
1151 pdd->qpd.vmid != 0 && dev->kfd2kgd->set_scratch_backing_va)
1152 dev->kfd2kgd->set_scratch_backing_va(
1153 dev->kgd, args->va_addr, pdd->qpd.vmid);
1154
1155 return 0;
1156
1157bind_process_to_device_fail:
1158 mutex_unlock(&p->mutex);
1159 return err;
1160}
1161
1162static int kfd_ioctl_get_tile_config(struct file *filep,
1163 struct kfd_process *p, void *data)
1164{
1165 struct kfd_ioctl_get_tile_config_args *args = data;
1166 struct kfd_dev *dev;
1167 struct tile_config config;
1168 int err = 0;
1169
1170 dev = kfd_device_by_id(args->gpu_id);
1171 if (!dev)
1172 return -EINVAL;
1173
1174 amdgpu_amdkfd_get_tile_config(dev->kgd, &config);
1175
1176 args->gb_addr_config = config.gb_addr_config;
1177 args->num_banks = config.num_banks;
1178 args->num_ranks = config.num_ranks;
1179
1180 if (args->num_tile_configs > config.num_tile_configs)
1181 args->num_tile_configs = config.num_tile_configs;
1182 err = copy_to_user((void __user *)args->tile_config_ptr,
1183 config.tile_config_ptr,
1184 args->num_tile_configs * sizeof(uint32_t));
1185 if (err) {
1186 args->num_tile_configs = 0;
1187 return -EFAULT;
1188 }
1189
1190 if (args->num_macro_tile_configs > config.num_macro_tile_configs)
1191 args->num_macro_tile_configs =
1192 config.num_macro_tile_configs;
1193 err = copy_to_user((void __user *)args->macro_tile_config_ptr,
1194 config.macro_tile_config_ptr,
1195 args->num_macro_tile_configs * sizeof(uint32_t));
1196 if (err) {
1197 args->num_macro_tile_configs = 0;
1198 return -EFAULT;
1199 }
1200
1201 return 0;
1202}
1203
1204static int kfd_ioctl_acquire_vm(struct file *filep, struct kfd_process *p,
1205 void *data)
1206{
1207 struct kfd_ioctl_acquire_vm_args *args = data;
1208 struct kfd_process_device *pdd;
1209 struct kfd_dev *dev;
1210 struct file *drm_file;
1211 int ret;
1212
1213 dev = kfd_device_by_id(args->gpu_id);
1214 if (!dev)
1215 return -EINVAL;
1216
1217 drm_file = fget(args->drm_fd);
1218 if (!drm_file)
1219 return -EINVAL;
1220
1221 mutex_lock(&p->mutex);
1222
1223 pdd = kfd_get_process_device_data(dev, p);
1224 if (!pdd) {
1225 ret = -EINVAL;
1226 goto err_unlock;
1227 }
1228
1229 if (pdd->drm_file) {
1230 ret = pdd->drm_file == drm_file ? 0 : -EBUSY;
1231 goto err_unlock;
1232 }
1233
1234 ret = kfd_process_device_init_vm(pdd, drm_file);
1235 if (ret)
1236 goto err_unlock;
1237 /* On success, the PDD keeps the drm_file reference */
1238 mutex_unlock(&p->mutex);
1239
1240 return 0;
1241
1242err_unlock:
1243 mutex_unlock(&p->mutex);
1244 fput(drm_file);
1245 return ret;
1246}
1247
1248bool kfd_dev_is_large_bar(struct kfd_dev *dev)
1249{
1250 struct kfd_local_mem_info mem_info;
1251
1252 if (debug_largebar) {
1253 pr_debug("Simulate large-bar allocation on non large-bar machine\n");
1254 return true;
1255 }
1256
1257 if (dev->device_info->needs_iommu_device)
1258 return false;
1259
1260 amdgpu_amdkfd_get_local_mem_info(dev->kgd, &mem_info);
1261 if (mem_info.local_mem_size_private == 0 &&
1262 mem_info.local_mem_size_public > 0)
1263 return true;
1264 return false;
1265}
1266
1267static int kfd_ioctl_alloc_memory_of_gpu(struct file *filep,
1268 struct kfd_process *p, void *data)
1269{
1270 struct kfd_ioctl_alloc_memory_of_gpu_args *args = data;
1271 struct kfd_process_device *pdd;
1272 void *mem;
1273 struct kfd_dev *dev;
1274 int idr_handle;
1275 long err;
1276 uint64_t offset = args->mmap_offset;
1277 uint32_t flags = args->flags;
1278
1279 if (args->size == 0)
1280 return -EINVAL;
1281
1282 dev = kfd_device_by_id(args->gpu_id);
1283 if (!dev)
1284 return -EINVAL;
1285
1286 if ((flags & KFD_IOC_ALLOC_MEM_FLAGS_PUBLIC) &&
1287 (flags & KFD_IOC_ALLOC_MEM_FLAGS_VRAM) &&
1288 !kfd_dev_is_large_bar(dev)) {
1289 pr_err("Alloc host visible vram on small bar is not allowed\n");
1290 return -EINVAL;
1291 }
1292
1293 if (flags & KFD_IOC_ALLOC_MEM_FLAGS_DOORBELL) {
1294 if (args->size != kfd_doorbell_process_slice(dev))
1295 return -EINVAL;
1296 offset = kfd_get_process_doorbells(dev, p);
1297 } else if (flags & KFD_IOC_ALLOC_MEM_FLAGS_MMIO_REMAP) {
1298 if (args->size != PAGE_SIZE)
1299 return -EINVAL;
1300 offset = amdgpu_amdkfd_get_mmio_remap_phys_addr(dev->kgd);
1301 if (!offset)
1302 return -ENOMEM;
1303 }
1304
1305 mutex_lock(&p->mutex);
1306
1307 pdd = kfd_bind_process_to_device(dev, p);
1308 if (IS_ERR(pdd)) {
1309 err = PTR_ERR(pdd);
1310 goto err_unlock;
1311 }
1312
1313 err = amdgpu_amdkfd_gpuvm_alloc_memory_of_gpu(
1314 dev->kgd, args->va_addr, args->size,
1315 pdd->vm, (struct kgd_mem **) &mem, &offset,
1316 flags);
1317
1318 if (err)
1319 goto err_unlock;
1320
1321 idr_handle = kfd_process_device_create_obj_handle(pdd, mem);
1322 if (idr_handle < 0) {
1323 err = -EFAULT;
1324 goto err_free;
1325 }
1326
1327 /* Update the VRAM usage count */
1328 if (flags & KFD_IOC_ALLOC_MEM_FLAGS_VRAM)
1329 WRITE_ONCE(pdd->vram_usage, pdd->vram_usage + args->size);
1330
1331 mutex_unlock(&p->mutex);
1332
1333 args->handle = MAKE_HANDLE(args->gpu_id, idr_handle);
1334 args->mmap_offset = offset;
1335
1336 /* MMIO is mapped through kfd device
1337 * Generate a kfd mmap offset
1338 */
1339 if (flags & KFD_IOC_ALLOC_MEM_FLAGS_MMIO_REMAP)
1340 args->mmap_offset = KFD_MMAP_TYPE_MMIO
1341 | KFD_MMAP_GPU_ID(args->gpu_id);
1342
1343 return 0;
1344
1345err_free:
1346 amdgpu_amdkfd_gpuvm_free_memory_of_gpu(dev->kgd, (struct kgd_mem *)mem, NULL);
1347err_unlock:
1348 mutex_unlock(&p->mutex);
1349 return err;
1350}
1351
1352static int kfd_ioctl_free_memory_of_gpu(struct file *filep,
1353 struct kfd_process *p, void *data)
1354{
1355 struct kfd_ioctl_free_memory_of_gpu_args *args = data;
1356 struct kfd_process_device *pdd;
1357 void *mem;
1358 struct kfd_dev *dev;
1359 int ret;
1360 uint64_t size = 0;
1361
1362 dev = kfd_device_by_id(GET_GPU_ID(args->handle));
1363 if (!dev)
1364 return -EINVAL;
1365
1366 mutex_lock(&p->mutex);
1367
1368 pdd = kfd_get_process_device_data(dev, p);
1369 if (!pdd) {
1370 pr_err("Process device data doesn't exist\n");
1371 ret = -EINVAL;
1372 goto err_unlock;
1373 }
1374
1375 mem = kfd_process_device_translate_handle(
1376 pdd, GET_IDR_HANDLE(args->handle));
1377 if (!mem) {
1378 ret = -EINVAL;
1379 goto err_unlock;
1380 }
1381
1382 ret = amdgpu_amdkfd_gpuvm_free_memory_of_gpu(dev->kgd,
1383 (struct kgd_mem *)mem, &size);
1384
1385 /* If freeing the buffer failed, leave the handle in place for
1386 * clean-up during process tear-down.
1387 */
1388 if (!ret)
1389 kfd_process_device_remove_obj_handle(
1390 pdd, GET_IDR_HANDLE(args->handle));
1391
1392 WRITE_ONCE(pdd->vram_usage, pdd->vram_usage - size);
1393
1394err_unlock:
1395 mutex_unlock(&p->mutex);
1396 return ret;
1397}
1398
1399static int kfd_ioctl_map_memory_to_gpu(struct file *filep,
1400 struct kfd_process *p, void *data)
1401{
1402 struct kfd_ioctl_map_memory_to_gpu_args *args = data;
1403 struct kfd_process_device *pdd, *peer_pdd;
1404 void *mem;
1405 struct kfd_dev *dev, *peer;
1406 long err = 0;
1407 int i;
1408 uint32_t *devices_arr = NULL;
1409
1410 dev = kfd_device_by_id(GET_GPU_ID(args->handle));
1411 if (!dev)
1412 return -EINVAL;
1413
1414 if (!args->n_devices) {
1415 pr_debug("Device IDs array empty\n");
1416 return -EINVAL;
1417 }
1418 if (args->n_success > args->n_devices) {
1419 pr_debug("n_success exceeds n_devices\n");
1420 return -EINVAL;
1421 }
1422
1423 devices_arr = kmalloc_array(args->n_devices, sizeof(*devices_arr),
1424 GFP_KERNEL);
1425 if (!devices_arr)
1426 return -ENOMEM;
1427
1428 err = copy_from_user(devices_arr,
1429 (void __user *)args->device_ids_array_ptr,
1430 args->n_devices * sizeof(*devices_arr));
1431 if (err != 0) {
1432 err = -EFAULT;
1433 goto copy_from_user_failed;
1434 }
1435
1436 mutex_lock(&p->mutex);
1437
1438 pdd = kfd_bind_process_to_device(dev, p);
1439 if (IS_ERR(pdd)) {
1440 err = PTR_ERR(pdd);
1441 goto bind_process_to_device_failed;
1442 }
1443
1444 mem = kfd_process_device_translate_handle(pdd,
1445 GET_IDR_HANDLE(args->handle));
1446 if (!mem) {
1447 err = -ENOMEM;
1448 goto get_mem_obj_from_handle_failed;
1449 }
1450
1451 for (i = args->n_success; i < args->n_devices; i++) {
1452 peer = kfd_device_by_id(devices_arr[i]);
1453 if (!peer) {
1454 pr_debug("Getting device by id failed for 0x%x\n",
1455 devices_arr[i]);
1456 err = -EINVAL;
1457 goto get_mem_obj_from_handle_failed;
1458 }
1459
1460 peer_pdd = kfd_bind_process_to_device(peer, p);
1461 if (IS_ERR(peer_pdd)) {
1462 err = PTR_ERR(peer_pdd);
1463 goto get_mem_obj_from_handle_failed;
1464 }
1465 err = amdgpu_amdkfd_gpuvm_map_memory_to_gpu(
1466 peer->kgd, (struct kgd_mem *)mem, peer_pdd->vm);
1467 if (err) {
1468 pr_err("Failed to map to gpu %d/%d\n",
1469 i, args->n_devices);
1470 goto map_memory_to_gpu_failed;
1471 }
1472 args->n_success = i+1;
1473 }
1474
1475 mutex_unlock(&p->mutex);
1476
1477 err = amdgpu_amdkfd_gpuvm_sync_memory(dev->kgd, (struct kgd_mem *) mem, true);
1478 if (err) {
1479 pr_debug("Sync memory failed, wait interrupted by user signal\n");
1480 goto sync_memory_failed;
1481 }
1482
1483 /* Flush TLBs after waiting for the page table updates to complete */
1484 for (i = 0; i < args->n_devices; i++) {
1485 peer = kfd_device_by_id(devices_arr[i]);
1486 if (WARN_ON_ONCE(!peer))
1487 continue;
1488 peer_pdd = kfd_get_process_device_data(peer, p);
1489 if (WARN_ON_ONCE(!peer_pdd))
1490 continue;
1491 kfd_flush_tlb(peer_pdd);
1492 }
1493
1494 kfree(devices_arr);
1495
1496 return err;
1497
1498bind_process_to_device_failed:
1499get_mem_obj_from_handle_failed:
1500map_memory_to_gpu_failed:
1501 mutex_unlock(&p->mutex);
1502copy_from_user_failed:
1503sync_memory_failed:
1504 kfree(devices_arr);
1505
1506 return err;
1507}
1508
1509static int kfd_ioctl_unmap_memory_from_gpu(struct file *filep,
1510 struct kfd_process *p, void *data)
1511{
1512 struct kfd_ioctl_unmap_memory_from_gpu_args *args = data;
1513 struct kfd_process_device *pdd, *peer_pdd;
1514 void *mem;
1515 struct kfd_dev *dev, *peer;
1516 long err = 0;
1517 uint32_t *devices_arr = NULL, i;
1518
1519 dev = kfd_device_by_id(GET_GPU_ID(args->handle));
1520 if (!dev)
1521 return -EINVAL;
1522
1523 if (!args->n_devices) {
1524 pr_debug("Device IDs array empty\n");
1525 return -EINVAL;
1526 }
1527 if (args->n_success > args->n_devices) {
1528 pr_debug("n_success exceeds n_devices\n");
1529 return -EINVAL;
1530 }
1531
1532 devices_arr = kmalloc_array(args->n_devices, sizeof(*devices_arr),
1533 GFP_KERNEL);
1534 if (!devices_arr)
1535 return -ENOMEM;
1536
1537 err = copy_from_user(devices_arr,
1538 (void __user *)args->device_ids_array_ptr,
1539 args->n_devices * sizeof(*devices_arr));
1540 if (err != 0) {
1541 err = -EFAULT;
1542 goto copy_from_user_failed;
1543 }
1544
1545 mutex_lock(&p->mutex);
1546
1547 pdd = kfd_get_process_device_data(dev, p);
1548 if (!pdd) {
1549 err = -EINVAL;
1550 goto bind_process_to_device_failed;
1551 }
1552
1553 mem = kfd_process_device_translate_handle(pdd,
1554 GET_IDR_HANDLE(args->handle));
1555 if (!mem) {
1556 err = -ENOMEM;
1557 goto get_mem_obj_from_handle_failed;
1558 }
1559
1560 for (i = args->n_success; i < args->n_devices; i++) {
1561 peer = kfd_device_by_id(devices_arr[i]);
1562 if (!peer) {
1563 err = -EINVAL;
1564 goto get_mem_obj_from_handle_failed;
1565 }
1566
1567 peer_pdd = kfd_get_process_device_data(peer, p);
1568 if (!peer_pdd) {
1569 err = -ENODEV;
1570 goto get_mem_obj_from_handle_failed;
1571 }
1572 err = amdgpu_amdkfd_gpuvm_unmap_memory_from_gpu(
1573 peer->kgd, (struct kgd_mem *)mem, peer_pdd->vm);
1574 if (err) {
1575 pr_err("Failed to unmap from gpu %d/%d\n",
1576 i, args->n_devices);
1577 goto unmap_memory_from_gpu_failed;
1578 }
1579 args->n_success = i+1;
1580 }
1581 kfree(devices_arr);
1582
1583 mutex_unlock(&p->mutex);
1584
1585 return 0;
1586
1587bind_process_to_device_failed:
1588get_mem_obj_from_handle_failed:
1589unmap_memory_from_gpu_failed:
1590 mutex_unlock(&p->mutex);
1591copy_from_user_failed:
1592 kfree(devices_arr);
1593 return err;
1594}
1595
1596static int kfd_ioctl_alloc_queue_gws(struct file *filep,
1597 struct kfd_process *p, void *data)
1598{
1599 int retval;
1600 struct kfd_ioctl_alloc_queue_gws_args *args = data;
1601 struct queue *q;
1602 struct kfd_dev *dev;
1603
1604 mutex_lock(&p->mutex);
1605 q = pqm_get_user_queue(&p->pqm, args->queue_id);
1606
1607 if (q) {
1608 dev = q->device;
1609 } else {
1610 retval = -EINVAL;
1611 goto out_unlock;
1612 }
1613
1614 if (!dev->gws) {
1615 retval = -ENODEV;
1616 goto out_unlock;
1617 }
1618
1619 if (dev->dqm->sched_policy == KFD_SCHED_POLICY_NO_HWS) {
1620 retval = -ENODEV;
1621 goto out_unlock;
1622 }
1623
1624 retval = pqm_set_gws(&p->pqm, args->queue_id, args->num_gws ? dev->gws : NULL);
1625 mutex_unlock(&p->mutex);
1626
1627 args->first_gws = 0;
1628 return retval;
1629
1630out_unlock:
1631 mutex_unlock(&p->mutex);
1632 return retval;
1633}
1634
1635static int kfd_ioctl_get_dmabuf_info(struct file *filep,
1636 struct kfd_process *p, void *data)
1637{
1638 struct kfd_ioctl_get_dmabuf_info_args *args = data;
1639 struct kfd_dev *dev = NULL;
1640 struct kgd_dev *dma_buf_kgd;
1641 void *metadata_buffer = NULL;
1642 uint32_t flags;
1643 unsigned int i;
1644 int r;
1645
1646 /* Find a KFD GPU device that supports the get_dmabuf_info query */
1647 for (i = 0; kfd_topology_enum_kfd_devices(i, &dev) == 0; i++)
1648 if (dev)
1649 break;
1650 if (!dev)
1651 return -EINVAL;
1652
1653 if (args->metadata_ptr) {
1654 metadata_buffer = kzalloc(args->metadata_size, GFP_KERNEL);
1655 if (!metadata_buffer)
1656 return -ENOMEM;
1657 }
1658
1659 /* Get dmabuf info from KGD */
1660 r = amdgpu_amdkfd_get_dmabuf_info(dev->kgd, args->dmabuf_fd,
1661 &dma_buf_kgd, &args->size,
1662 metadata_buffer, args->metadata_size,
1663 &args->metadata_size, &flags);
1664 if (r)
1665 goto exit;
1666
1667 /* Reverse-lookup gpu_id from kgd pointer */
1668 dev = kfd_device_by_kgd(dma_buf_kgd);
1669 if (!dev) {
1670 r = -EINVAL;
1671 goto exit;
1672 }
1673 args->gpu_id = dev->id;
1674 args->flags = flags;
1675
1676 /* Copy metadata buffer to user mode */
1677 if (metadata_buffer) {
1678 r = copy_to_user((void __user *)args->metadata_ptr,
1679 metadata_buffer, args->metadata_size);
1680 if (r != 0)
1681 r = -EFAULT;
1682 }
1683
1684exit:
1685 kfree(metadata_buffer);
1686
1687 return r;
1688}
1689
1690static int kfd_ioctl_import_dmabuf(struct file *filep,
1691 struct kfd_process *p, void *data)
1692{
1693 struct kfd_ioctl_import_dmabuf_args *args = data;
1694 struct kfd_process_device *pdd;
1695 struct dma_buf *dmabuf;
1696 struct kfd_dev *dev;
1697 int idr_handle;
1698 uint64_t size;
1699 void *mem;
1700 int r;
1701
1702 dev = kfd_device_by_id(args->gpu_id);
1703 if (!dev)
1704 return -EINVAL;
1705
1706 dmabuf = dma_buf_get(args->dmabuf_fd);
1707 if (IS_ERR(dmabuf))
1708 return PTR_ERR(dmabuf);
1709
1710 mutex_lock(&p->mutex);
1711
1712 pdd = kfd_bind_process_to_device(dev, p);
1713 if (IS_ERR(pdd)) {
1714 r = PTR_ERR(pdd);
1715 goto err_unlock;
1716 }
1717
1718 r = amdgpu_amdkfd_gpuvm_import_dmabuf(dev->kgd, dmabuf,
1719 args->va_addr, pdd->vm,
1720 (struct kgd_mem **)&mem, &size,
1721 NULL);
1722 if (r)
1723 goto err_unlock;
1724
1725 idr_handle = kfd_process_device_create_obj_handle(pdd, mem);
1726 if (idr_handle < 0) {
1727 r = -EFAULT;
1728 goto err_free;
1729 }
1730
1731 mutex_unlock(&p->mutex);
1732
1733 args->handle = MAKE_HANDLE(args->gpu_id, idr_handle);
1734
1735 return 0;
1736
1737err_free:
1738 amdgpu_amdkfd_gpuvm_free_memory_of_gpu(dev->kgd, (struct kgd_mem *)mem, NULL);
1739err_unlock:
1740 mutex_unlock(&p->mutex);
1741 return r;
1742}
1743
1744/* Handle requests for watching SMI events */
1745static int kfd_ioctl_smi_events(struct file *filep,
1746 struct kfd_process *p, void *data)
1747{
1748 struct kfd_ioctl_smi_events_args *args = data;
1749 struct kfd_dev *dev;
1750
1751 dev = kfd_device_by_id(args->gpuid);
1752 if (!dev)
1753 return -EINVAL;
1754
1755 return kfd_smi_event_open(dev, &args->anon_fd);
1756}
1757
1758#define AMDKFD_IOCTL_DEF(ioctl, _func, _flags) \
1759 [_IOC_NR(ioctl)] = {.cmd = ioctl, .func = _func, .flags = _flags, \
1760 .cmd_drv = 0, .name = #ioctl}
1761
1762/** Ioctl table */
1763static const struct amdkfd_ioctl_desc amdkfd_ioctls[] = {
1764 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_VERSION,
1765 kfd_ioctl_get_version, 0),
1766
1767 AMDKFD_IOCTL_DEF(AMDKFD_IOC_CREATE_QUEUE,
1768 kfd_ioctl_create_queue, 0),
1769
1770 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DESTROY_QUEUE,
1771 kfd_ioctl_destroy_queue, 0),
1772
1773 AMDKFD_IOCTL_DEF(AMDKFD_IOC_SET_MEMORY_POLICY,
1774 kfd_ioctl_set_memory_policy, 0),
1775
1776 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_CLOCK_COUNTERS,
1777 kfd_ioctl_get_clock_counters, 0),
1778
1779 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_PROCESS_APERTURES,
1780 kfd_ioctl_get_process_apertures, 0),
1781
1782 AMDKFD_IOCTL_DEF(AMDKFD_IOC_UPDATE_QUEUE,
1783 kfd_ioctl_update_queue, 0),
1784
1785 AMDKFD_IOCTL_DEF(AMDKFD_IOC_CREATE_EVENT,
1786 kfd_ioctl_create_event, 0),
1787
1788 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DESTROY_EVENT,
1789 kfd_ioctl_destroy_event, 0),
1790
1791 AMDKFD_IOCTL_DEF(AMDKFD_IOC_SET_EVENT,
1792 kfd_ioctl_set_event, 0),
1793
1794 AMDKFD_IOCTL_DEF(AMDKFD_IOC_RESET_EVENT,
1795 kfd_ioctl_reset_event, 0),
1796
1797 AMDKFD_IOCTL_DEF(AMDKFD_IOC_WAIT_EVENTS,
1798 kfd_ioctl_wait_events, 0),
1799
1800 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DBG_REGISTER,
1801 kfd_ioctl_dbg_register, 0),
1802
1803 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DBG_UNREGISTER,
1804 kfd_ioctl_dbg_unregister, 0),
1805
1806 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DBG_ADDRESS_WATCH,
1807 kfd_ioctl_dbg_address_watch, 0),
1808
1809 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DBG_WAVE_CONTROL,
1810 kfd_ioctl_dbg_wave_control, 0),
1811
1812 AMDKFD_IOCTL_DEF(AMDKFD_IOC_SET_SCRATCH_BACKING_VA,
1813 kfd_ioctl_set_scratch_backing_va, 0),
1814
1815 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_TILE_CONFIG,
1816 kfd_ioctl_get_tile_config, 0),
1817
1818 AMDKFD_IOCTL_DEF(AMDKFD_IOC_SET_TRAP_HANDLER,
1819 kfd_ioctl_set_trap_handler, 0),
1820
1821 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_PROCESS_APERTURES_NEW,
1822 kfd_ioctl_get_process_apertures_new, 0),
1823
1824 AMDKFD_IOCTL_DEF(AMDKFD_IOC_ACQUIRE_VM,
1825 kfd_ioctl_acquire_vm, 0),
1826
1827 AMDKFD_IOCTL_DEF(AMDKFD_IOC_ALLOC_MEMORY_OF_GPU,
1828 kfd_ioctl_alloc_memory_of_gpu, 0),
1829
1830 AMDKFD_IOCTL_DEF(AMDKFD_IOC_FREE_MEMORY_OF_GPU,
1831 kfd_ioctl_free_memory_of_gpu, 0),
1832
1833 AMDKFD_IOCTL_DEF(AMDKFD_IOC_MAP_MEMORY_TO_GPU,
1834 kfd_ioctl_map_memory_to_gpu, 0),
1835
1836 AMDKFD_IOCTL_DEF(AMDKFD_IOC_UNMAP_MEMORY_FROM_GPU,
1837 kfd_ioctl_unmap_memory_from_gpu, 0),
1838
1839 AMDKFD_IOCTL_DEF(AMDKFD_IOC_SET_CU_MASK,
1840 kfd_ioctl_set_cu_mask, 0),
1841
1842 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_QUEUE_WAVE_STATE,
1843 kfd_ioctl_get_queue_wave_state, 0),
1844
1845 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_DMABUF_INFO,
1846 kfd_ioctl_get_dmabuf_info, 0),
1847
1848 AMDKFD_IOCTL_DEF(AMDKFD_IOC_IMPORT_DMABUF,
1849 kfd_ioctl_import_dmabuf, 0),
1850
1851 AMDKFD_IOCTL_DEF(AMDKFD_IOC_ALLOC_QUEUE_GWS,
1852 kfd_ioctl_alloc_queue_gws, 0),
1853
1854 AMDKFD_IOCTL_DEF(AMDKFD_IOC_SMI_EVENTS,
1855 kfd_ioctl_smi_events, 0),
1856};
1857
1858#define AMDKFD_CORE_IOCTL_COUNT ARRAY_SIZE(amdkfd_ioctls)
1859
1860static long kfd_ioctl(struct file *filep, unsigned int cmd, unsigned long arg)
1861{
1862 struct kfd_process *process;
1863 amdkfd_ioctl_t *func;
1864 const struct amdkfd_ioctl_desc *ioctl = NULL;
1865 unsigned int nr = _IOC_NR(cmd);
1866 char stack_kdata[128];
1867 char *kdata = NULL;
1868 unsigned int usize, asize;
1869 int retcode = -EINVAL;
1870
1871 if (nr >= AMDKFD_CORE_IOCTL_COUNT)
1872 goto err_i1;
1873
1874 if ((nr >= AMDKFD_COMMAND_START) && (nr < AMDKFD_COMMAND_END)) {
1875 u32 amdkfd_size;
1876
1877 ioctl = &amdkfd_ioctls[nr];
1878
1879 amdkfd_size = _IOC_SIZE(ioctl->cmd);
1880 usize = asize = _IOC_SIZE(cmd);
1881 if (amdkfd_size > asize)
1882 asize = amdkfd_size;
1883
1884 cmd = ioctl->cmd;
1885 } else
1886 goto err_i1;
1887
1888 dev_dbg(kfd_device, "ioctl cmd 0x%x (#0x%x), arg 0x%lx\n", cmd, nr, arg);
1889
1890 /* Get the process struct from the filep. Only the process
1891 * that opened /dev/kfd can use the file descriptor. Child
1892 * processes need to create their own KFD device context.
1893 */
1894 process = filep->private_data;
1895 if (process->lead_thread != current->group_leader) {
1896 dev_dbg(kfd_device, "Using KFD FD in wrong process\n");
1897 retcode = -EBADF;
1898 goto err_i1;
1899 }
1900
1901 /* Do not trust userspace, use our own definition */
1902 func = ioctl->func;
1903
1904 if (unlikely(!func)) {
1905 dev_dbg(kfd_device, "no function\n");
1906 retcode = -EINVAL;
1907 goto err_i1;
1908 }
1909
1910 if (cmd & (IOC_IN | IOC_OUT)) {
1911 if (asize <= sizeof(stack_kdata)) {
1912 kdata = stack_kdata;
1913 } else {
1914 kdata = kmalloc(asize, GFP_KERNEL);
1915 if (!kdata) {
1916 retcode = -ENOMEM;
1917 goto err_i1;
1918 }
1919 }
1920 if (asize > usize)
1921 memset(kdata + usize, 0, asize - usize);
1922 }
1923
1924 if (cmd & IOC_IN) {
1925 if (copy_from_user(kdata, (void __user *)arg, usize) != 0) {
1926 retcode = -EFAULT;
1927 goto err_i1;
1928 }
1929 } else if (cmd & IOC_OUT) {
1930 memset(kdata, 0, usize);
1931 }
1932
1933 retcode = func(filep, process, kdata);
1934
1935 if (cmd & IOC_OUT)
1936 if (copy_to_user((void __user *)arg, kdata, usize) != 0)
1937 retcode = -EFAULT;
1938
1939err_i1:
1940 if (!ioctl)
1941 dev_dbg(kfd_device, "invalid ioctl: pid=%d, cmd=0x%02x, nr=0x%02x\n",
1942 task_pid_nr(current), cmd, nr);
1943
1944 if (kdata != stack_kdata)
1945 kfree(kdata);
1946
1947 if (retcode)
1948 dev_dbg(kfd_device, "ioctl cmd (#0x%x), arg 0x%lx, ret = %d\n",
1949 nr, arg, retcode);
1950
1951 return retcode;
1952}
1953
1954static int kfd_mmio_mmap(struct kfd_dev *dev, struct kfd_process *process,
1955 struct vm_area_struct *vma)
1956{
1957 phys_addr_t address;
1958 int ret;
1959
1960 if (vma->vm_end - vma->vm_start != PAGE_SIZE)
1961 return -EINVAL;
1962
1963 address = amdgpu_amdkfd_get_mmio_remap_phys_addr(dev->kgd);
1964
1965 vma->vm_flags |= VM_IO | VM_DONTCOPY | VM_DONTEXPAND | VM_NORESERVE |
1966 VM_DONTDUMP | VM_PFNMAP;
1967
1968 vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot);
1969
1970 pr_debug("pasid 0x%x mapping mmio page\n"
1971 " target user address == 0x%08llX\n"
1972 " physical address == 0x%08llX\n"
1973 " vm_flags == 0x%04lX\n"
1974 " size == 0x%04lX\n",
1975 process->pasid, (unsigned long long) vma->vm_start,
1976 address, vma->vm_flags, PAGE_SIZE);
1977
1978 ret = io_remap_pfn_range(vma,
1979 vma->vm_start,
1980 address >> PAGE_SHIFT,
1981 PAGE_SIZE,
1982 vma->vm_page_prot);
1983 return ret;
1984}
1985
1986
1987static int kfd_mmap(struct file *filp, struct vm_area_struct *vma)
1988{
1989 struct kfd_process *process;
1990 struct kfd_dev *dev = NULL;
1991 unsigned long mmap_offset;
1992 unsigned int gpu_id;
1993
1994 process = kfd_get_process(current);
1995 if (IS_ERR(process))
1996 return PTR_ERR(process);
1997
1998 mmap_offset = vma->vm_pgoff << PAGE_SHIFT;
1999 gpu_id = KFD_MMAP_GET_GPU_ID(mmap_offset);
2000 if (gpu_id)
2001 dev = kfd_device_by_id(gpu_id);
2002
2003 switch (mmap_offset & KFD_MMAP_TYPE_MASK) {
2004 case KFD_MMAP_TYPE_DOORBELL:
2005 if (!dev)
2006 return -ENODEV;
2007 return kfd_doorbell_mmap(dev, process, vma);
2008
2009 case KFD_MMAP_TYPE_EVENTS:
2010 return kfd_event_mmap(process, vma);
2011
2012 case KFD_MMAP_TYPE_RESERVED_MEM:
2013 if (!dev)
2014 return -ENODEV;
2015 return kfd_reserved_mem_mmap(dev, process, vma);
2016 case KFD_MMAP_TYPE_MMIO:
2017 if (!dev)
2018 return -ENODEV;
2019 return kfd_mmio_mmap(dev, process, vma);
2020 }
2021
2022 return -EFAULT;
2023}
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/device.h>
24#include <linux/export.h>
25#include <linux/err.h>
26#include <linux/fs.h>
27#include <linux/file.h>
28#include <linux/sched.h>
29#include <linux/slab.h>
30#include <linux/uaccess.h>
31#include <linux/compat.h>
32#include <uapi/linux/kfd_ioctl.h>
33#include <linux/time.h>
34#include <linux/mm.h>
35#include <linux/mman.h>
36#include <linux/dma-buf.h>
37#include <asm/processor.h>
38#include "kfd_priv.h"
39#include "kfd_device_queue_manager.h"
40#include "kfd_dbgmgr.h"
41#include "amdgpu_amdkfd.h"
42
43static long kfd_ioctl(struct file *, unsigned int, unsigned long);
44static int kfd_open(struct inode *, struct file *);
45static int kfd_mmap(struct file *, struct vm_area_struct *);
46
47static const char kfd_dev_name[] = "kfd";
48
49static const struct file_operations kfd_fops = {
50 .owner = THIS_MODULE,
51 .unlocked_ioctl = kfd_ioctl,
52 .compat_ioctl = kfd_ioctl,
53 .open = kfd_open,
54 .mmap = kfd_mmap,
55};
56
57static int kfd_char_dev_major = -1;
58static struct class *kfd_class;
59struct device *kfd_device;
60
61int kfd_chardev_init(void)
62{
63 int err = 0;
64
65 kfd_char_dev_major = register_chrdev(0, kfd_dev_name, &kfd_fops);
66 err = kfd_char_dev_major;
67 if (err < 0)
68 goto err_register_chrdev;
69
70 kfd_class = class_create(THIS_MODULE, kfd_dev_name);
71 err = PTR_ERR(kfd_class);
72 if (IS_ERR(kfd_class))
73 goto err_class_create;
74
75 kfd_device = device_create(kfd_class, NULL,
76 MKDEV(kfd_char_dev_major, 0),
77 NULL, kfd_dev_name);
78 err = PTR_ERR(kfd_device);
79 if (IS_ERR(kfd_device))
80 goto err_device_create;
81
82 return 0;
83
84err_device_create:
85 class_destroy(kfd_class);
86err_class_create:
87 unregister_chrdev(kfd_char_dev_major, kfd_dev_name);
88err_register_chrdev:
89 return err;
90}
91
92void kfd_chardev_exit(void)
93{
94 device_destroy(kfd_class, MKDEV(kfd_char_dev_major, 0));
95 class_destroy(kfd_class);
96 unregister_chrdev(kfd_char_dev_major, kfd_dev_name);
97}
98
99struct device *kfd_chardev(void)
100{
101 return kfd_device;
102}
103
104
105static int kfd_open(struct inode *inode, struct file *filep)
106{
107 struct kfd_process *process;
108 bool is_32bit_user_mode;
109
110 if (iminor(inode) != 0)
111 return -ENODEV;
112
113 is_32bit_user_mode = in_compat_syscall();
114
115 if (is_32bit_user_mode) {
116 dev_warn(kfd_device,
117 "Process %d (32-bit) failed to open /dev/kfd\n"
118 "32-bit processes are not supported by amdkfd\n",
119 current->pid);
120 return -EPERM;
121 }
122
123 process = kfd_create_process(filep);
124 if (IS_ERR(process))
125 return PTR_ERR(process);
126
127 if (kfd_is_locked())
128 return -EAGAIN;
129
130 dev_dbg(kfd_device, "process %d opened, compat mode (32 bit) - %d\n",
131 process->pasid, process->is_32bit_user_mode);
132
133 return 0;
134}
135
136static int kfd_ioctl_get_version(struct file *filep, struct kfd_process *p,
137 void *data)
138{
139 struct kfd_ioctl_get_version_args *args = data;
140
141 args->major_version = KFD_IOCTL_MAJOR_VERSION;
142 args->minor_version = KFD_IOCTL_MINOR_VERSION;
143
144 return 0;
145}
146
147static int set_queue_properties_from_user(struct queue_properties *q_properties,
148 struct kfd_ioctl_create_queue_args *args)
149{
150 if (args->queue_percentage > KFD_MAX_QUEUE_PERCENTAGE) {
151 pr_err("Queue percentage must be between 0 to KFD_MAX_QUEUE_PERCENTAGE\n");
152 return -EINVAL;
153 }
154
155 if (args->queue_priority > KFD_MAX_QUEUE_PRIORITY) {
156 pr_err("Queue priority must be between 0 to KFD_MAX_QUEUE_PRIORITY\n");
157 return -EINVAL;
158 }
159
160 if ((args->ring_base_address) &&
161 (!access_ok((const void __user *) args->ring_base_address,
162 sizeof(uint64_t)))) {
163 pr_err("Can't access ring base address\n");
164 return -EFAULT;
165 }
166
167 if (!is_power_of_2(args->ring_size) && (args->ring_size != 0)) {
168 pr_err("Ring size must be a power of 2 or 0\n");
169 return -EINVAL;
170 }
171
172 if (!access_ok((const void __user *) args->read_pointer_address,
173 sizeof(uint32_t))) {
174 pr_err("Can't access read pointer\n");
175 return -EFAULT;
176 }
177
178 if (!access_ok((const void __user *) args->write_pointer_address,
179 sizeof(uint32_t))) {
180 pr_err("Can't access write pointer\n");
181 return -EFAULT;
182 }
183
184 if (args->eop_buffer_address &&
185 !access_ok((const void __user *) args->eop_buffer_address,
186 sizeof(uint32_t))) {
187 pr_debug("Can't access eop buffer");
188 return -EFAULT;
189 }
190
191 if (args->ctx_save_restore_address &&
192 !access_ok((const void __user *) args->ctx_save_restore_address,
193 sizeof(uint32_t))) {
194 pr_debug("Can't access ctx save restore buffer");
195 return -EFAULT;
196 }
197
198 q_properties->is_interop = false;
199 q_properties->queue_percent = args->queue_percentage;
200 q_properties->priority = args->queue_priority;
201 q_properties->queue_address = args->ring_base_address;
202 q_properties->queue_size = args->ring_size;
203 q_properties->read_ptr = (uint32_t *) args->read_pointer_address;
204 q_properties->write_ptr = (uint32_t *) args->write_pointer_address;
205 q_properties->eop_ring_buffer_address = args->eop_buffer_address;
206 q_properties->eop_ring_buffer_size = args->eop_buffer_size;
207 q_properties->ctx_save_restore_area_address =
208 args->ctx_save_restore_address;
209 q_properties->ctx_save_restore_area_size = args->ctx_save_restore_size;
210 q_properties->ctl_stack_size = args->ctl_stack_size;
211 if (args->queue_type == KFD_IOC_QUEUE_TYPE_COMPUTE ||
212 args->queue_type == KFD_IOC_QUEUE_TYPE_COMPUTE_AQL)
213 q_properties->type = KFD_QUEUE_TYPE_COMPUTE;
214 else if (args->queue_type == KFD_IOC_QUEUE_TYPE_SDMA)
215 q_properties->type = KFD_QUEUE_TYPE_SDMA;
216 else if (args->queue_type == KFD_IOC_QUEUE_TYPE_SDMA_XGMI)
217 q_properties->type = KFD_QUEUE_TYPE_SDMA_XGMI;
218 else
219 return -ENOTSUPP;
220
221 if (args->queue_type == KFD_IOC_QUEUE_TYPE_COMPUTE_AQL)
222 q_properties->format = KFD_QUEUE_FORMAT_AQL;
223 else
224 q_properties->format = KFD_QUEUE_FORMAT_PM4;
225
226 pr_debug("Queue Percentage: %d, %d\n",
227 q_properties->queue_percent, args->queue_percentage);
228
229 pr_debug("Queue Priority: %d, %d\n",
230 q_properties->priority, args->queue_priority);
231
232 pr_debug("Queue Address: 0x%llX, 0x%llX\n",
233 q_properties->queue_address, args->ring_base_address);
234
235 pr_debug("Queue Size: 0x%llX, %u\n",
236 q_properties->queue_size, args->ring_size);
237
238 pr_debug("Queue r/w Pointers: %px, %px\n",
239 q_properties->read_ptr,
240 q_properties->write_ptr);
241
242 pr_debug("Queue Format: %d\n", q_properties->format);
243
244 pr_debug("Queue EOP: 0x%llX\n", q_properties->eop_ring_buffer_address);
245
246 pr_debug("Queue CTX save area: 0x%llX\n",
247 q_properties->ctx_save_restore_area_address);
248
249 return 0;
250}
251
252static int kfd_ioctl_create_queue(struct file *filep, struct kfd_process *p,
253 void *data)
254{
255 struct kfd_ioctl_create_queue_args *args = data;
256 struct kfd_dev *dev;
257 int err = 0;
258 unsigned int queue_id;
259 struct kfd_process_device *pdd;
260 struct queue_properties q_properties;
261
262 memset(&q_properties, 0, sizeof(struct queue_properties));
263
264 pr_debug("Creating queue ioctl\n");
265
266 err = set_queue_properties_from_user(&q_properties, args);
267 if (err)
268 return err;
269
270 pr_debug("Looking for gpu id 0x%x\n", args->gpu_id);
271 dev = kfd_device_by_id(args->gpu_id);
272 if (!dev) {
273 pr_debug("Could not find gpu id 0x%x\n", args->gpu_id);
274 return -EINVAL;
275 }
276
277 mutex_lock(&p->mutex);
278
279 pdd = kfd_bind_process_to_device(dev, p);
280 if (IS_ERR(pdd)) {
281 err = -ESRCH;
282 goto err_bind_process;
283 }
284
285 pr_debug("Creating queue for PASID %d on gpu 0x%x\n",
286 p->pasid,
287 dev->id);
288
289 err = pqm_create_queue(&p->pqm, dev, filep, &q_properties, &queue_id);
290 if (err != 0)
291 goto err_create_queue;
292
293 args->queue_id = queue_id;
294
295
296 /* Return gpu_id as doorbell offset for mmap usage */
297 args->doorbell_offset = KFD_MMAP_TYPE_DOORBELL;
298 args->doorbell_offset |= KFD_MMAP_GPU_ID(args->gpu_id);
299 args->doorbell_offset <<= PAGE_SHIFT;
300 if (KFD_IS_SOC15(dev->device_info->asic_family))
301 /* On SOC15 ASICs, doorbell allocation must be
302 * per-device, and independent from the per-process
303 * queue_id. Return the doorbell offset within the
304 * doorbell aperture to user mode.
305 */
306 args->doorbell_offset |= q_properties.doorbell_off;
307
308 mutex_unlock(&p->mutex);
309
310 pr_debug("Queue id %d was created successfully\n", args->queue_id);
311
312 pr_debug("Ring buffer address == 0x%016llX\n",
313 args->ring_base_address);
314
315 pr_debug("Read ptr address == 0x%016llX\n",
316 args->read_pointer_address);
317
318 pr_debug("Write ptr address == 0x%016llX\n",
319 args->write_pointer_address);
320
321 return 0;
322
323err_create_queue:
324err_bind_process:
325 mutex_unlock(&p->mutex);
326 return err;
327}
328
329static int kfd_ioctl_destroy_queue(struct file *filp, struct kfd_process *p,
330 void *data)
331{
332 int retval;
333 struct kfd_ioctl_destroy_queue_args *args = data;
334
335 pr_debug("Destroying queue id %d for pasid %d\n",
336 args->queue_id,
337 p->pasid);
338
339 mutex_lock(&p->mutex);
340
341 retval = pqm_destroy_queue(&p->pqm, args->queue_id);
342
343 mutex_unlock(&p->mutex);
344 return retval;
345}
346
347static int kfd_ioctl_update_queue(struct file *filp, struct kfd_process *p,
348 void *data)
349{
350 int retval;
351 struct kfd_ioctl_update_queue_args *args = data;
352 struct queue_properties properties;
353
354 if (args->queue_percentage > KFD_MAX_QUEUE_PERCENTAGE) {
355 pr_err("Queue percentage must be between 0 to KFD_MAX_QUEUE_PERCENTAGE\n");
356 return -EINVAL;
357 }
358
359 if (args->queue_priority > KFD_MAX_QUEUE_PRIORITY) {
360 pr_err("Queue priority must be between 0 to KFD_MAX_QUEUE_PRIORITY\n");
361 return -EINVAL;
362 }
363
364 if ((args->ring_base_address) &&
365 (!access_ok((const void __user *) args->ring_base_address,
366 sizeof(uint64_t)))) {
367 pr_err("Can't access ring base address\n");
368 return -EFAULT;
369 }
370
371 if (!is_power_of_2(args->ring_size) && (args->ring_size != 0)) {
372 pr_err("Ring size must be a power of 2 or 0\n");
373 return -EINVAL;
374 }
375
376 properties.queue_address = args->ring_base_address;
377 properties.queue_size = args->ring_size;
378 properties.queue_percent = args->queue_percentage;
379 properties.priority = args->queue_priority;
380
381 pr_debug("Updating queue id %d for pasid %d\n",
382 args->queue_id, p->pasid);
383
384 mutex_lock(&p->mutex);
385
386 retval = pqm_update_queue(&p->pqm, args->queue_id, &properties);
387
388 mutex_unlock(&p->mutex);
389
390 return retval;
391}
392
393static int kfd_ioctl_set_cu_mask(struct file *filp, struct kfd_process *p,
394 void *data)
395{
396 int retval;
397 const int max_num_cus = 1024;
398 struct kfd_ioctl_set_cu_mask_args *args = data;
399 struct queue_properties properties;
400 uint32_t __user *cu_mask_ptr = (uint32_t __user *)args->cu_mask_ptr;
401 size_t cu_mask_size = sizeof(uint32_t) * (args->num_cu_mask / 32);
402
403 if ((args->num_cu_mask % 32) != 0) {
404 pr_debug("num_cu_mask 0x%x must be a multiple of 32",
405 args->num_cu_mask);
406 return -EINVAL;
407 }
408
409 properties.cu_mask_count = args->num_cu_mask;
410 if (properties.cu_mask_count == 0) {
411 pr_debug("CU mask cannot be 0");
412 return -EINVAL;
413 }
414
415 /* To prevent an unreasonably large CU mask size, set an arbitrary
416 * limit of max_num_cus bits. We can then just drop any CU mask bits
417 * past max_num_cus bits and just use the first max_num_cus bits.
418 */
419 if (properties.cu_mask_count > max_num_cus) {
420 pr_debug("CU mask cannot be greater than 1024 bits");
421 properties.cu_mask_count = max_num_cus;
422 cu_mask_size = sizeof(uint32_t) * (max_num_cus/32);
423 }
424
425 properties.cu_mask = kzalloc(cu_mask_size, GFP_KERNEL);
426 if (!properties.cu_mask)
427 return -ENOMEM;
428
429 retval = copy_from_user(properties.cu_mask, cu_mask_ptr, cu_mask_size);
430 if (retval) {
431 pr_debug("Could not copy CU mask from userspace");
432 kfree(properties.cu_mask);
433 return -EFAULT;
434 }
435
436 mutex_lock(&p->mutex);
437
438 retval = pqm_set_cu_mask(&p->pqm, args->queue_id, &properties);
439
440 mutex_unlock(&p->mutex);
441
442 if (retval)
443 kfree(properties.cu_mask);
444
445 return retval;
446}
447
448static int kfd_ioctl_get_queue_wave_state(struct file *filep,
449 struct kfd_process *p, void *data)
450{
451 struct kfd_ioctl_get_queue_wave_state_args *args = data;
452 int r;
453
454 mutex_lock(&p->mutex);
455
456 r = pqm_get_wave_state(&p->pqm, args->queue_id,
457 (void __user *)args->ctl_stack_address,
458 &args->ctl_stack_used_size,
459 &args->save_area_used_size);
460
461 mutex_unlock(&p->mutex);
462
463 return r;
464}
465
466static int kfd_ioctl_set_memory_policy(struct file *filep,
467 struct kfd_process *p, void *data)
468{
469 struct kfd_ioctl_set_memory_policy_args *args = data;
470 struct kfd_dev *dev;
471 int err = 0;
472 struct kfd_process_device *pdd;
473 enum cache_policy default_policy, alternate_policy;
474
475 if (args->default_policy != KFD_IOC_CACHE_POLICY_COHERENT
476 && args->default_policy != KFD_IOC_CACHE_POLICY_NONCOHERENT) {
477 return -EINVAL;
478 }
479
480 if (args->alternate_policy != KFD_IOC_CACHE_POLICY_COHERENT
481 && args->alternate_policy != KFD_IOC_CACHE_POLICY_NONCOHERENT) {
482 return -EINVAL;
483 }
484
485 dev = kfd_device_by_id(args->gpu_id);
486 if (!dev)
487 return -EINVAL;
488
489 mutex_lock(&p->mutex);
490
491 pdd = kfd_bind_process_to_device(dev, p);
492 if (IS_ERR(pdd)) {
493 err = -ESRCH;
494 goto out;
495 }
496
497 default_policy = (args->default_policy == KFD_IOC_CACHE_POLICY_COHERENT)
498 ? cache_policy_coherent : cache_policy_noncoherent;
499
500 alternate_policy =
501 (args->alternate_policy == KFD_IOC_CACHE_POLICY_COHERENT)
502 ? cache_policy_coherent : cache_policy_noncoherent;
503
504 if (!dev->dqm->ops.set_cache_memory_policy(dev->dqm,
505 &pdd->qpd,
506 default_policy,
507 alternate_policy,
508 (void __user *)args->alternate_aperture_base,
509 args->alternate_aperture_size))
510 err = -EINVAL;
511
512out:
513 mutex_unlock(&p->mutex);
514
515 return err;
516}
517
518static int kfd_ioctl_set_trap_handler(struct file *filep,
519 struct kfd_process *p, void *data)
520{
521 struct kfd_ioctl_set_trap_handler_args *args = data;
522 struct kfd_dev *dev;
523 int err = 0;
524 struct kfd_process_device *pdd;
525
526 dev = kfd_device_by_id(args->gpu_id);
527 if (!dev)
528 return -EINVAL;
529
530 mutex_lock(&p->mutex);
531
532 pdd = kfd_bind_process_to_device(dev, p);
533 if (IS_ERR(pdd)) {
534 err = -ESRCH;
535 goto out;
536 }
537
538 if (dev->dqm->ops.set_trap_handler(dev->dqm,
539 &pdd->qpd,
540 args->tba_addr,
541 args->tma_addr))
542 err = -EINVAL;
543
544out:
545 mutex_unlock(&p->mutex);
546
547 return err;
548}
549
550static int kfd_ioctl_dbg_register(struct file *filep,
551 struct kfd_process *p, void *data)
552{
553 struct kfd_ioctl_dbg_register_args *args = data;
554 struct kfd_dev *dev;
555 struct kfd_dbgmgr *dbgmgr_ptr;
556 struct kfd_process_device *pdd;
557 bool create_ok;
558 long status = 0;
559
560 dev = kfd_device_by_id(args->gpu_id);
561 if (!dev)
562 return -EINVAL;
563
564 if (dev->device_info->asic_family == CHIP_CARRIZO) {
565 pr_debug("kfd_ioctl_dbg_register not supported on CZ\n");
566 return -EINVAL;
567 }
568
569 mutex_lock(&p->mutex);
570 mutex_lock(kfd_get_dbgmgr_mutex());
571
572 /*
573 * make sure that we have pdd, if this the first queue created for
574 * this process
575 */
576 pdd = kfd_bind_process_to_device(dev, p);
577 if (IS_ERR(pdd)) {
578 status = PTR_ERR(pdd);
579 goto out;
580 }
581
582 if (!dev->dbgmgr) {
583 /* In case of a legal call, we have no dbgmgr yet */
584 create_ok = kfd_dbgmgr_create(&dbgmgr_ptr, dev);
585 if (create_ok) {
586 status = kfd_dbgmgr_register(dbgmgr_ptr, p);
587 if (status != 0)
588 kfd_dbgmgr_destroy(dbgmgr_ptr);
589 else
590 dev->dbgmgr = dbgmgr_ptr;
591 }
592 } else {
593 pr_debug("debugger already registered\n");
594 status = -EINVAL;
595 }
596
597out:
598 mutex_unlock(kfd_get_dbgmgr_mutex());
599 mutex_unlock(&p->mutex);
600
601 return status;
602}
603
604static int kfd_ioctl_dbg_unregister(struct file *filep,
605 struct kfd_process *p, void *data)
606{
607 struct kfd_ioctl_dbg_unregister_args *args = data;
608 struct kfd_dev *dev;
609 long status;
610
611 dev = kfd_device_by_id(args->gpu_id);
612 if (!dev || !dev->dbgmgr)
613 return -EINVAL;
614
615 if (dev->device_info->asic_family == CHIP_CARRIZO) {
616 pr_debug("kfd_ioctl_dbg_unregister not supported on CZ\n");
617 return -EINVAL;
618 }
619
620 mutex_lock(kfd_get_dbgmgr_mutex());
621
622 status = kfd_dbgmgr_unregister(dev->dbgmgr, p);
623 if (!status) {
624 kfd_dbgmgr_destroy(dev->dbgmgr);
625 dev->dbgmgr = NULL;
626 }
627
628 mutex_unlock(kfd_get_dbgmgr_mutex());
629
630 return status;
631}
632
633/*
634 * Parse and generate variable size data structure for address watch.
635 * Total size of the buffer and # watch points is limited in order
636 * to prevent kernel abuse. (no bearing to the much smaller HW limitation
637 * which is enforced by dbgdev module)
638 * please also note that the watch address itself are not "copied from user",
639 * since it be set into the HW in user mode values.
640 *
641 */
642static int kfd_ioctl_dbg_address_watch(struct file *filep,
643 struct kfd_process *p, void *data)
644{
645 struct kfd_ioctl_dbg_address_watch_args *args = data;
646 struct kfd_dev *dev;
647 struct dbg_address_watch_info aw_info;
648 unsigned char *args_buff;
649 long status;
650 void __user *cmd_from_user;
651 uint64_t watch_mask_value = 0;
652 unsigned int args_idx = 0;
653
654 memset((void *) &aw_info, 0, sizeof(struct dbg_address_watch_info));
655
656 dev = kfd_device_by_id(args->gpu_id);
657 if (!dev)
658 return -EINVAL;
659
660 if (dev->device_info->asic_family == CHIP_CARRIZO) {
661 pr_debug("kfd_ioctl_dbg_wave_control not supported on CZ\n");
662 return -EINVAL;
663 }
664
665 cmd_from_user = (void __user *) args->content_ptr;
666
667 /* Validate arguments */
668
669 if ((args->buf_size_in_bytes > MAX_ALLOWED_AW_BUFF_SIZE) ||
670 (args->buf_size_in_bytes <= sizeof(*args) + sizeof(int) * 2) ||
671 (cmd_from_user == NULL))
672 return -EINVAL;
673
674 /* this is the actual buffer to work with */
675 args_buff = memdup_user(cmd_from_user,
676 args->buf_size_in_bytes - sizeof(*args));
677 if (IS_ERR(args_buff))
678 return PTR_ERR(args_buff);
679
680 aw_info.process = p;
681
682 aw_info.num_watch_points = *((uint32_t *)(&args_buff[args_idx]));
683 args_idx += sizeof(aw_info.num_watch_points);
684
685 aw_info.watch_mode = (enum HSA_DBG_WATCH_MODE *) &args_buff[args_idx];
686 args_idx += sizeof(enum HSA_DBG_WATCH_MODE) * aw_info.num_watch_points;
687
688 /*
689 * set watch address base pointer to point on the array base
690 * within args_buff
691 */
692 aw_info.watch_address = (uint64_t *) &args_buff[args_idx];
693
694 /* skip over the addresses buffer */
695 args_idx += sizeof(aw_info.watch_address) * aw_info.num_watch_points;
696
697 if (args_idx >= args->buf_size_in_bytes - sizeof(*args)) {
698 status = -EINVAL;
699 goto out;
700 }
701
702 watch_mask_value = (uint64_t) args_buff[args_idx];
703
704 if (watch_mask_value > 0) {
705 /*
706 * There is an array of masks.
707 * set watch mask base pointer to point on the array base
708 * within args_buff
709 */
710 aw_info.watch_mask = (uint64_t *) &args_buff[args_idx];
711
712 /* skip over the masks buffer */
713 args_idx += sizeof(aw_info.watch_mask) *
714 aw_info.num_watch_points;
715 } else {
716 /* just the NULL mask, set to NULL and skip over it */
717 aw_info.watch_mask = NULL;
718 args_idx += sizeof(aw_info.watch_mask);
719 }
720
721 if (args_idx >= args->buf_size_in_bytes - sizeof(args)) {
722 status = -EINVAL;
723 goto out;
724 }
725
726 /* Currently HSA Event is not supported for DBG */
727 aw_info.watch_event = NULL;
728
729 mutex_lock(kfd_get_dbgmgr_mutex());
730
731 status = kfd_dbgmgr_address_watch(dev->dbgmgr, &aw_info);
732
733 mutex_unlock(kfd_get_dbgmgr_mutex());
734
735out:
736 kfree(args_buff);
737
738 return status;
739}
740
741/* Parse and generate fixed size data structure for wave control */
742static int kfd_ioctl_dbg_wave_control(struct file *filep,
743 struct kfd_process *p, void *data)
744{
745 struct kfd_ioctl_dbg_wave_control_args *args = data;
746 struct kfd_dev *dev;
747 struct dbg_wave_control_info wac_info;
748 unsigned char *args_buff;
749 uint32_t computed_buff_size;
750 long status;
751 void __user *cmd_from_user;
752 unsigned int args_idx = 0;
753
754 memset((void *) &wac_info, 0, sizeof(struct dbg_wave_control_info));
755
756 /* we use compact form, independent of the packing attribute value */
757 computed_buff_size = sizeof(*args) +
758 sizeof(wac_info.mode) +
759 sizeof(wac_info.operand) +
760 sizeof(wac_info.dbgWave_msg.DbgWaveMsg) +
761 sizeof(wac_info.dbgWave_msg.MemoryVA) +
762 sizeof(wac_info.trapId);
763
764 dev = kfd_device_by_id(args->gpu_id);
765 if (!dev)
766 return -EINVAL;
767
768 if (dev->device_info->asic_family == CHIP_CARRIZO) {
769 pr_debug("kfd_ioctl_dbg_wave_control not supported on CZ\n");
770 return -EINVAL;
771 }
772
773 /* input size must match the computed "compact" size */
774 if (args->buf_size_in_bytes != computed_buff_size) {
775 pr_debug("size mismatch, computed : actual %u : %u\n",
776 args->buf_size_in_bytes, computed_buff_size);
777 return -EINVAL;
778 }
779
780 cmd_from_user = (void __user *) args->content_ptr;
781
782 if (cmd_from_user == NULL)
783 return -EINVAL;
784
785 /* copy the entire buffer from user */
786
787 args_buff = memdup_user(cmd_from_user,
788 args->buf_size_in_bytes - sizeof(*args));
789 if (IS_ERR(args_buff))
790 return PTR_ERR(args_buff);
791
792 /* move ptr to the start of the "pay-load" area */
793 wac_info.process = p;
794
795 wac_info.operand = *((enum HSA_DBG_WAVEOP *)(&args_buff[args_idx]));
796 args_idx += sizeof(wac_info.operand);
797
798 wac_info.mode = *((enum HSA_DBG_WAVEMODE *)(&args_buff[args_idx]));
799 args_idx += sizeof(wac_info.mode);
800
801 wac_info.trapId = *((uint32_t *)(&args_buff[args_idx]));
802 args_idx += sizeof(wac_info.trapId);
803
804 wac_info.dbgWave_msg.DbgWaveMsg.WaveMsgInfoGen2.Value =
805 *((uint32_t *)(&args_buff[args_idx]));
806 wac_info.dbgWave_msg.MemoryVA = NULL;
807
808 mutex_lock(kfd_get_dbgmgr_mutex());
809
810 pr_debug("Calling dbg manager process %p, operand %u, mode %u, trapId %u, message %u\n",
811 wac_info.process, wac_info.operand,
812 wac_info.mode, wac_info.trapId,
813 wac_info.dbgWave_msg.DbgWaveMsg.WaveMsgInfoGen2.Value);
814
815 status = kfd_dbgmgr_wave_control(dev->dbgmgr, &wac_info);
816
817 pr_debug("Returned status of dbg manager is %ld\n", status);
818
819 mutex_unlock(kfd_get_dbgmgr_mutex());
820
821 kfree(args_buff);
822
823 return status;
824}
825
826static int kfd_ioctl_get_clock_counters(struct file *filep,
827 struct kfd_process *p, void *data)
828{
829 struct kfd_ioctl_get_clock_counters_args *args = data;
830 struct kfd_dev *dev;
831
832 dev = kfd_device_by_id(args->gpu_id);
833 if (dev)
834 /* Reading GPU clock counter from KGD */
835 args->gpu_clock_counter = amdgpu_amdkfd_get_gpu_clock_counter(dev->kgd);
836 else
837 /* Node without GPU resource */
838 args->gpu_clock_counter = 0;
839
840 /* No access to rdtsc. Using raw monotonic time */
841 args->cpu_clock_counter = ktime_get_raw_ns();
842 args->system_clock_counter = ktime_get_boottime_ns();
843
844 /* Since the counter is in nano-seconds we use 1GHz frequency */
845 args->system_clock_freq = 1000000000;
846
847 return 0;
848}
849
850
851static int kfd_ioctl_get_process_apertures(struct file *filp,
852 struct kfd_process *p, void *data)
853{
854 struct kfd_ioctl_get_process_apertures_args *args = data;
855 struct kfd_process_device_apertures *pAperture;
856 struct kfd_process_device *pdd;
857
858 dev_dbg(kfd_device, "get apertures for PASID %d", p->pasid);
859
860 args->num_of_nodes = 0;
861
862 mutex_lock(&p->mutex);
863
864 /*if the process-device list isn't empty*/
865 if (kfd_has_process_device_data(p)) {
866 /* Run over all pdd of the process */
867 pdd = kfd_get_first_process_device_data(p);
868 do {
869 pAperture =
870 &args->process_apertures[args->num_of_nodes];
871 pAperture->gpu_id = pdd->dev->id;
872 pAperture->lds_base = pdd->lds_base;
873 pAperture->lds_limit = pdd->lds_limit;
874 pAperture->gpuvm_base = pdd->gpuvm_base;
875 pAperture->gpuvm_limit = pdd->gpuvm_limit;
876 pAperture->scratch_base = pdd->scratch_base;
877 pAperture->scratch_limit = pdd->scratch_limit;
878
879 dev_dbg(kfd_device,
880 "node id %u\n", args->num_of_nodes);
881 dev_dbg(kfd_device,
882 "gpu id %u\n", pdd->dev->id);
883 dev_dbg(kfd_device,
884 "lds_base %llX\n", pdd->lds_base);
885 dev_dbg(kfd_device,
886 "lds_limit %llX\n", pdd->lds_limit);
887 dev_dbg(kfd_device,
888 "gpuvm_base %llX\n", pdd->gpuvm_base);
889 dev_dbg(kfd_device,
890 "gpuvm_limit %llX\n", pdd->gpuvm_limit);
891 dev_dbg(kfd_device,
892 "scratch_base %llX\n", pdd->scratch_base);
893 dev_dbg(kfd_device,
894 "scratch_limit %llX\n", pdd->scratch_limit);
895
896 args->num_of_nodes++;
897
898 pdd = kfd_get_next_process_device_data(p, pdd);
899 } while (pdd && (args->num_of_nodes < NUM_OF_SUPPORTED_GPUS));
900 }
901
902 mutex_unlock(&p->mutex);
903
904 return 0;
905}
906
907static int kfd_ioctl_get_process_apertures_new(struct file *filp,
908 struct kfd_process *p, void *data)
909{
910 struct kfd_ioctl_get_process_apertures_new_args *args = data;
911 struct kfd_process_device_apertures *pa;
912 struct kfd_process_device *pdd;
913 uint32_t nodes = 0;
914 int ret;
915
916 dev_dbg(kfd_device, "get apertures for PASID %d", p->pasid);
917
918 if (args->num_of_nodes == 0) {
919 /* Return number of nodes, so that user space can alloacate
920 * sufficient memory
921 */
922 mutex_lock(&p->mutex);
923
924 if (!kfd_has_process_device_data(p))
925 goto out_unlock;
926
927 /* Run over all pdd of the process */
928 pdd = kfd_get_first_process_device_data(p);
929 do {
930 args->num_of_nodes++;
931 pdd = kfd_get_next_process_device_data(p, pdd);
932 } while (pdd);
933
934 goto out_unlock;
935 }
936
937 /* Fill in process-aperture information for all available
938 * nodes, but not more than args->num_of_nodes as that is
939 * the amount of memory allocated by user
940 */
941 pa = kzalloc((sizeof(struct kfd_process_device_apertures) *
942 args->num_of_nodes), GFP_KERNEL);
943 if (!pa)
944 return -ENOMEM;
945
946 mutex_lock(&p->mutex);
947
948 if (!kfd_has_process_device_data(p)) {
949 args->num_of_nodes = 0;
950 kfree(pa);
951 goto out_unlock;
952 }
953
954 /* Run over all pdd of the process */
955 pdd = kfd_get_first_process_device_data(p);
956 do {
957 pa[nodes].gpu_id = pdd->dev->id;
958 pa[nodes].lds_base = pdd->lds_base;
959 pa[nodes].lds_limit = pdd->lds_limit;
960 pa[nodes].gpuvm_base = pdd->gpuvm_base;
961 pa[nodes].gpuvm_limit = pdd->gpuvm_limit;
962 pa[nodes].scratch_base = pdd->scratch_base;
963 pa[nodes].scratch_limit = pdd->scratch_limit;
964
965 dev_dbg(kfd_device,
966 "gpu id %u\n", pdd->dev->id);
967 dev_dbg(kfd_device,
968 "lds_base %llX\n", pdd->lds_base);
969 dev_dbg(kfd_device,
970 "lds_limit %llX\n", pdd->lds_limit);
971 dev_dbg(kfd_device,
972 "gpuvm_base %llX\n", pdd->gpuvm_base);
973 dev_dbg(kfd_device,
974 "gpuvm_limit %llX\n", pdd->gpuvm_limit);
975 dev_dbg(kfd_device,
976 "scratch_base %llX\n", pdd->scratch_base);
977 dev_dbg(kfd_device,
978 "scratch_limit %llX\n", pdd->scratch_limit);
979 nodes++;
980
981 pdd = kfd_get_next_process_device_data(p, pdd);
982 } while (pdd && (nodes < args->num_of_nodes));
983 mutex_unlock(&p->mutex);
984
985 args->num_of_nodes = nodes;
986 ret = copy_to_user(
987 (void __user *)args->kfd_process_device_apertures_ptr,
988 pa,
989 (nodes * sizeof(struct kfd_process_device_apertures)));
990 kfree(pa);
991 return ret ? -EFAULT : 0;
992
993out_unlock:
994 mutex_unlock(&p->mutex);
995 return 0;
996}
997
998static int kfd_ioctl_create_event(struct file *filp, struct kfd_process *p,
999 void *data)
1000{
1001 struct kfd_ioctl_create_event_args *args = data;
1002 int err;
1003
1004 /* For dGPUs the event page is allocated in user mode. The
1005 * handle is passed to KFD with the first call to this IOCTL
1006 * through the event_page_offset field.
1007 */
1008 if (args->event_page_offset) {
1009 struct kfd_dev *kfd;
1010 struct kfd_process_device *pdd;
1011 void *mem, *kern_addr;
1012 uint64_t size;
1013
1014 if (p->signal_page) {
1015 pr_err("Event page is already set\n");
1016 return -EINVAL;
1017 }
1018
1019 kfd = kfd_device_by_id(GET_GPU_ID(args->event_page_offset));
1020 if (!kfd) {
1021 pr_err("Getting device by id failed in %s\n", __func__);
1022 return -EINVAL;
1023 }
1024
1025 mutex_lock(&p->mutex);
1026 pdd = kfd_bind_process_to_device(kfd, p);
1027 if (IS_ERR(pdd)) {
1028 err = PTR_ERR(pdd);
1029 goto out_unlock;
1030 }
1031
1032 mem = kfd_process_device_translate_handle(pdd,
1033 GET_IDR_HANDLE(args->event_page_offset));
1034 if (!mem) {
1035 pr_err("Can't find BO, offset is 0x%llx\n",
1036 args->event_page_offset);
1037 err = -EINVAL;
1038 goto out_unlock;
1039 }
1040 mutex_unlock(&p->mutex);
1041
1042 err = amdgpu_amdkfd_gpuvm_map_gtt_bo_to_kernel(kfd->kgd,
1043 mem, &kern_addr, &size);
1044 if (err) {
1045 pr_err("Failed to map event page to kernel\n");
1046 return err;
1047 }
1048
1049 err = kfd_event_page_set(p, kern_addr, size);
1050 if (err) {
1051 pr_err("Failed to set event page\n");
1052 return err;
1053 }
1054 }
1055
1056 err = kfd_event_create(filp, p, args->event_type,
1057 args->auto_reset != 0, args->node_id,
1058 &args->event_id, &args->event_trigger_data,
1059 &args->event_page_offset,
1060 &args->event_slot_index);
1061
1062 return err;
1063
1064out_unlock:
1065 mutex_unlock(&p->mutex);
1066 return err;
1067}
1068
1069static int kfd_ioctl_destroy_event(struct file *filp, struct kfd_process *p,
1070 void *data)
1071{
1072 struct kfd_ioctl_destroy_event_args *args = data;
1073
1074 return kfd_event_destroy(p, args->event_id);
1075}
1076
1077static int kfd_ioctl_set_event(struct file *filp, struct kfd_process *p,
1078 void *data)
1079{
1080 struct kfd_ioctl_set_event_args *args = data;
1081
1082 return kfd_set_event(p, args->event_id);
1083}
1084
1085static int kfd_ioctl_reset_event(struct file *filp, struct kfd_process *p,
1086 void *data)
1087{
1088 struct kfd_ioctl_reset_event_args *args = data;
1089
1090 return kfd_reset_event(p, args->event_id);
1091}
1092
1093static int kfd_ioctl_wait_events(struct file *filp, struct kfd_process *p,
1094 void *data)
1095{
1096 struct kfd_ioctl_wait_events_args *args = data;
1097 int err;
1098
1099 err = kfd_wait_on_events(p, args->num_events,
1100 (void __user *)args->events_ptr,
1101 (args->wait_for_all != 0),
1102 args->timeout, &args->wait_result);
1103
1104 return err;
1105}
1106static int kfd_ioctl_set_scratch_backing_va(struct file *filep,
1107 struct kfd_process *p, void *data)
1108{
1109 struct kfd_ioctl_set_scratch_backing_va_args *args = data;
1110 struct kfd_process_device *pdd;
1111 struct kfd_dev *dev;
1112 long err;
1113
1114 dev = kfd_device_by_id(args->gpu_id);
1115 if (!dev)
1116 return -EINVAL;
1117
1118 mutex_lock(&p->mutex);
1119
1120 pdd = kfd_bind_process_to_device(dev, p);
1121 if (IS_ERR(pdd)) {
1122 err = PTR_ERR(pdd);
1123 goto bind_process_to_device_fail;
1124 }
1125
1126 pdd->qpd.sh_hidden_private_base = args->va_addr;
1127
1128 mutex_unlock(&p->mutex);
1129
1130 if (dev->dqm->sched_policy == KFD_SCHED_POLICY_NO_HWS &&
1131 pdd->qpd.vmid != 0)
1132 dev->kfd2kgd->set_scratch_backing_va(
1133 dev->kgd, args->va_addr, pdd->qpd.vmid);
1134
1135 return 0;
1136
1137bind_process_to_device_fail:
1138 mutex_unlock(&p->mutex);
1139 return err;
1140}
1141
1142static int kfd_ioctl_get_tile_config(struct file *filep,
1143 struct kfd_process *p, void *data)
1144{
1145 struct kfd_ioctl_get_tile_config_args *args = data;
1146 struct kfd_dev *dev;
1147 struct tile_config config;
1148 int err = 0;
1149
1150 dev = kfd_device_by_id(args->gpu_id);
1151 if (!dev)
1152 return -EINVAL;
1153
1154 dev->kfd2kgd->get_tile_config(dev->kgd, &config);
1155
1156 args->gb_addr_config = config.gb_addr_config;
1157 args->num_banks = config.num_banks;
1158 args->num_ranks = config.num_ranks;
1159
1160 if (args->num_tile_configs > config.num_tile_configs)
1161 args->num_tile_configs = config.num_tile_configs;
1162 err = copy_to_user((void __user *)args->tile_config_ptr,
1163 config.tile_config_ptr,
1164 args->num_tile_configs * sizeof(uint32_t));
1165 if (err) {
1166 args->num_tile_configs = 0;
1167 return -EFAULT;
1168 }
1169
1170 if (args->num_macro_tile_configs > config.num_macro_tile_configs)
1171 args->num_macro_tile_configs =
1172 config.num_macro_tile_configs;
1173 err = copy_to_user((void __user *)args->macro_tile_config_ptr,
1174 config.macro_tile_config_ptr,
1175 args->num_macro_tile_configs * sizeof(uint32_t));
1176 if (err) {
1177 args->num_macro_tile_configs = 0;
1178 return -EFAULT;
1179 }
1180
1181 return 0;
1182}
1183
1184static int kfd_ioctl_acquire_vm(struct file *filep, struct kfd_process *p,
1185 void *data)
1186{
1187 struct kfd_ioctl_acquire_vm_args *args = data;
1188 struct kfd_process_device *pdd;
1189 struct kfd_dev *dev;
1190 struct file *drm_file;
1191 int ret;
1192
1193 dev = kfd_device_by_id(args->gpu_id);
1194 if (!dev)
1195 return -EINVAL;
1196
1197 drm_file = fget(args->drm_fd);
1198 if (!drm_file)
1199 return -EINVAL;
1200
1201 mutex_lock(&p->mutex);
1202
1203 pdd = kfd_get_process_device_data(dev, p);
1204 if (!pdd) {
1205 ret = -EINVAL;
1206 goto err_unlock;
1207 }
1208
1209 if (pdd->drm_file) {
1210 ret = pdd->drm_file == drm_file ? 0 : -EBUSY;
1211 goto err_unlock;
1212 }
1213
1214 ret = kfd_process_device_init_vm(pdd, drm_file);
1215 if (ret)
1216 goto err_unlock;
1217 /* On success, the PDD keeps the drm_file reference */
1218 mutex_unlock(&p->mutex);
1219
1220 return 0;
1221
1222err_unlock:
1223 mutex_unlock(&p->mutex);
1224 fput(drm_file);
1225 return ret;
1226}
1227
1228bool kfd_dev_is_large_bar(struct kfd_dev *dev)
1229{
1230 struct kfd_local_mem_info mem_info;
1231
1232 if (debug_largebar) {
1233 pr_debug("Simulate large-bar allocation on non large-bar machine\n");
1234 return true;
1235 }
1236
1237 if (dev->device_info->needs_iommu_device)
1238 return false;
1239
1240 amdgpu_amdkfd_get_local_mem_info(dev->kgd, &mem_info);
1241 if (mem_info.local_mem_size_private == 0 &&
1242 mem_info.local_mem_size_public > 0)
1243 return true;
1244 return false;
1245}
1246
1247static int kfd_ioctl_alloc_memory_of_gpu(struct file *filep,
1248 struct kfd_process *p, void *data)
1249{
1250 struct kfd_ioctl_alloc_memory_of_gpu_args *args = data;
1251 struct kfd_process_device *pdd;
1252 void *mem;
1253 struct kfd_dev *dev;
1254 int idr_handle;
1255 long err;
1256 uint64_t offset = args->mmap_offset;
1257 uint32_t flags = args->flags;
1258
1259 if (args->size == 0)
1260 return -EINVAL;
1261
1262 dev = kfd_device_by_id(args->gpu_id);
1263 if (!dev)
1264 return -EINVAL;
1265
1266 if ((flags & KFD_IOC_ALLOC_MEM_FLAGS_PUBLIC) &&
1267 (flags & KFD_IOC_ALLOC_MEM_FLAGS_VRAM) &&
1268 !kfd_dev_is_large_bar(dev)) {
1269 pr_err("Alloc host visible vram on small bar is not allowed\n");
1270 return -EINVAL;
1271 }
1272
1273 if (flags & KFD_IOC_ALLOC_MEM_FLAGS_DOORBELL) {
1274 if (args->size != kfd_doorbell_process_slice(dev))
1275 return -EINVAL;
1276 offset = kfd_get_process_doorbells(dev, p);
1277 } else if (flags & KFD_IOC_ALLOC_MEM_FLAGS_MMIO_REMAP) {
1278 if (args->size != PAGE_SIZE)
1279 return -EINVAL;
1280 offset = amdgpu_amdkfd_get_mmio_remap_phys_addr(dev->kgd);
1281 if (!offset)
1282 return -ENOMEM;
1283 }
1284
1285 mutex_lock(&p->mutex);
1286
1287 pdd = kfd_bind_process_to_device(dev, p);
1288 if (IS_ERR(pdd)) {
1289 err = PTR_ERR(pdd);
1290 goto err_unlock;
1291 }
1292
1293 err = amdgpu_amdkfd_gpuvm_alloc_memory_of_gpu(
1294 dev->kgd, args->va_addr, args->size,
1295 pdd->vm, (struct kgd_mem **) &mem, &offset,
1296 flags);
1297
1298 if (err)
1299 goto err_unlock;
1300
1301 idr_handle = kfd_process_device_create_obj_handle(pdd, mem);
1302 if (idr_handle < 0) {
1303 err = -EFAULT;
1304 goto err_free;
1305 }
1306
1307 mutex_unlock(&p->mutex);
1308
1309 args->handle = MAKE_HANDLE(args->gpu_id, idr_handle);
1310 args->mmap_offset = offset;
1311
1312 /* MMIO is mapped through kfd device
1313 * Generate a kfd mmap offset
1314 */
1315 if (flags & KFD_IOC_ALLOC_MEM_FLAGS_MMIO_REMAP) {
1316 args->mmap_offset = KFD_MMAP_TYPE_MMIO | KFD_MMAP_GPU_ID(args->gpu_id);
1317 args->mmap_offset <<= PAGE_SHIFT;
1318 }
1319
1320 return 0;
1321
1322err_free:
1323 amdgpu_amdkfd_gpuvm_free_memory_of_gpu(dev->kgd, (struct kgd_mem *)mem);
1324err_unlock:
1325 mutex_unlock(&p->mutex);
1326 return err;
1327}
1328
1329static int kfd_ioctl_free_memory_of_gpu(struct file *filep,
1330 struct kfd_process *p, void *data)
1331{
1332 struct kfd_ioctl_free_memory_of_gpu_args *args = data;
1333 struct kfd_process_device *pdd;
1334 void *mem;
1335 struct kfd_dev *dev;
1336 int ret;
1337
1338 dev = kfd_device_by_id(GET_GPU_ID(args->handle));
1339 if (!dev)
1340 return -EINVAL;
1341
1342 mutex_lock(&p->mutex);
1343
1344 pdd = kfd_get_process_device_data(dev, p);
1345 if (!pdd) {
1346 pr_err("Process device data doesn't exist\n");
1347 ret = -EINVAL;
1348 goto err_unlock;
1349 }
1350
1351 mem = kfd_process_device_translate_handle(
1352 pdd, GET_IDR_HANDLE(args->handle));
1353 if (!mem) {
1354 ret = -EINVAL;
1355 goto err_unlock;
1356 }
1357
1358 ret = amdgpu_amdkfd_gpuvm_free_memory_of_gpu(dev->kgd,
1359 (struct kgd_mem *)mem);
1360
1361 /* If freeing the buffer failed, leave the handle in place for
1362 * clean-up during process tear-down.
1363 */
1364 if (!ret)
1365 kfd_process_device_remove_obj_handle(
1366 pdd, GET_IDR_HANDLE(args->handle));
1367
1368err_unlock:
1369 mutex_unlock(&p->mutex);
1370 return ret;
1371}
1372
1373static int kfd_ioctl_map_memory_to_gpu(struct file *filep,
1374 struct kfd_process *p, void *data)
1375{
1376 struct kfd_ioctl_map_memory_to_gpu_args *args = data;
1377 struct kfd_process_device *pdd, *peer_pdd;
1378 void *mem;
1379 struct kfd_dev *dev, *peer;
1380 long err = 0;
1381 int i;
1382 uint32_t *devices_arr = NULL;
1383
1384 dev = kfd_device_by_id(GET_GPU_ID(args->handle));
1385 if (!dev)
1386 return -EINVAL;
1387
1388 if (!args->n_devices) {
1389 pr_debug("Device IDs array empty\n");
1390 return -EINVAL;
1391 }
1392 if (args->n_success > args->n_devices) {
1393 pr_debug("n_success exceeds n_devices\n");
1394 return -EINVAL;
1395 }
1396
1397 devices_arr = kmalloc_array(args->n_devices, sizeof(*devices_arr),
1398 GFP_KERNEL);
1399 if (!devices_arr)
1400 return -ENOMEM;
1401
1402 err = copy_from_user(devices_arr,
1403 (void __user *)args->device_ids_array_ptr,
1404 args->n_devices * sizeof(*devices_arr));
1405 if (err != 0) {
1406 err = -EFAULT;
1407 goto copy_from_user_failed;
1408 }
1409
1410 mutex_lock(&p->mutex);
1411
1412 pdd = kfd_bind_process_to_device(dev, p);
1413 if (IS_ERR(pdd)) {
1414 err = PTR_ERR(pdd);
1415 goto bind_process_to_device_failed;
1416 }
1417
1418 mem = kfd_process_device_translate_handle(pdd,
1419 GET_IDR_HANDLE(args->handle));
1420 if (!mem) {
1421 err = -ENOMEM;
1422 goto get_mem_obj_from_handle_failed;
1423 }
1424
1425 for (i = args->n_success; i < args->n_devices; i++) {
1426 peer = kfd_device_by_id(devices_arr[i]);
1427 if (!peer) {
1428 pr_debug("Getting device by id failed for 0x%x\n",
1429 devices_arr[i]);
1430 err = -EINVAL;
1431 goto get_mem_obj_from_handle_failed;
1432 }
1433
1434 peer_pdd = kfd_bind_process_to_device(peer, p);
1435 if (IS_ERR(peer_pdd)) {
1436 err = PTR_ERR(peer_pdd);
1437 goto get_mem_obj_from_handle_failed;
1438 }
1439 err = amdgpu_amdkfd_gpuvm_map_memory_to_gpu(
1440 peer->kgd, (struct kgd_mem *)mem, peer_pdd->vm);
1441 if (err) {
1442 pr_err("Failed to map to gpu %d/%d\n",
1443 i, args->n_devices);
1444 goto map_memory_to_gpu_failed;
1445 }
1446 args->n_success = i+1;
1447 }
1448
1449 mutex_unlock(&p->mutex);
1450
1451 err = amdgpu_amdkfd_gpuvm_sync_memory(dev->kgd, (struct kgd_mem *) mem, true);
1452 if (err) {
1453 pr_debug("Sync memory failed, wait interrupted by user signal\n");
1454 goto sync_memory_failed;
1455 }
1456
1457 /* Flush TLBs after waiting for the page table updates to complete */
1458 for (i = 0; i < args->n_devices; i++) {
1459 peer = kfd_device_by_id(devices_arr[i]);
1460 if (WARN_ON_ONCE(!peer))
1461 continue;
1462 peer_pdd = kfd_get_process_device_data(peer, p);
1463 if (WARN_ON_ONCE(!peer_pdd))
1464 continue;
1465 kfd_flush_tlb(peer_pdd);
1466 }
1467
1468 kfree(devices_arr);
1469
1470 return err;
1471
1472bind_process_to_device_failed:
1473get_mem_obj_from_handle_failed:
1474map_memory_to_gpu_failed:
1475 mutex_unlock(&p->mutex);
1476copy_from_user_failed:
1477sync_memory_failed:
1478 kfree(devices_arr);
1479
1480 return err;
1481}
1482
1483static int kfd_ioctl_unmap_memory_from_gpu(struct file *filep,
1484 struct kfd_process *p, void *data)
1485{
1486 struct kfd_ioctl_unmap_memory_from_gpu_args *args = data;
1487 struct kfd_process_device *pdd, *peer_pdd;
1488 void *mem;
1489 struct kfd_dev *dev, *peer;
1490 long err = 0;
1491 uint32_t *devices_arr = NULL, i;
1492
1493 dev = kfd_device_by_id(GET_GPU_ID(args->handle));
1494 if (!dev)
1495 return -EINVAL;
1496
1497 if (!args->n_devices) {
1498 pr_debug("Device IDs array empty\n");
1499 return -EINVAL;
1500 }
1501 if (args->n_success > args->n_devices) {
1502 pr_debug("n_success exceeds n_devices\n");
1503 return -EINVAL;
1504 }
1505
1506 devices_arr = kmalloc_array(args->n_devices, sizeof(*devices_arr),
1507 GFP_KERNEL);
1508 if (!devices_arr)
1509 return -ENOMEM;
1510
1511 err = copy_from_user(devices_arr,
1512 (void __user *)args->device_ids_array_ptr,
1513 args->n_devices * sizeof(*devices_arr));
1514 if (err != 0) {
1515 err = -EFAULT;
1516 goto copy_from_user_failed;
1517 }
1518
1519 mutex_lock(&p->mutex);
1520
1521 pdd = kfd_get_process_device_data(dev, p);
1522 if (!pdd) {
1523 err = -EINVAL;
1524 goto bind_process_to_device_failed;
1525 }
1526
1527 mem = kfd_process_device_translate_handle(pdd,
1528 GET_IDR_HANDLE(args->handle));
1529 if (!mem) {
1530 err = -ENOMEM;
1531 goto get_mem_obj_from_handle_failed;
1532 }
1533
1534 for (i = args->n_success; i < args->n_devices; i++) {
1535 peer = kfd_device_by_id(devices_arr[i]);
1536 if (!peer) {
1537 err = -EINVAL;
1538 goto get_mem_obj_from_handle_failed;
1539 }
1540
1541 peer_pdd = kfd_get_process_device_data(peer, p);
1542 if (!peer_pdd) {
1543 err = -ENODEV;
1544 goto get_mem_obj_from_handle_failed;
1545 }
1546 err = amdgpu_amdkfd_gpuvm_unmap_memory_from_gpu(
1547 peer->kgd, (struct kgd_mem *)mem, peer_pdd->vm);
1548 if (err) {
1549 pr_err("Failed to unmap from gpu %d/%d\n",
1550 i, args->n_devices);
1551 goto unmap_memory_from_gpu_failed;
1552 }
1553 args->n_success = i+1;
1554 }
1555 kfree(devices_arr);
1556
1557 mutex_unlock(&p->mutex);
1558
1559 return 0;
1560
1561bind_process_to_device_failed:
1562get_mem_obj_from_handle_failed:
1563unmap_memory_from_gpu_failed:
1564 mutex_unlock(&p->mutex);
1565copy_from_user_failed:
1566 kfree(devices_arr);
1567 return err;
1568}
1569
1570static int kfd_ioctl_get_dmabuf_info(struct file *filep,
1571 struct kfd_process *p, void *data)
1572{
1573 struct kfd_ioctl_get_dmabuf_info_args *args = data;
1574 struct kfd_dev *dev = NULL;
1575 struct kgd_dev *dma_buf_kgd;
1576 void *metadata_buffer = NULL;
1577 uint32_t flags;
1578 unsigned int i;
1579 int r;
1580
1581 /* Find a KFD GPU device that supports the get_dmabuf_info query */
1582 for (i = 0; kfd_topology_enum_kfd_devices(i, &dev) == 0; i++)
1583 if (dev)
1584 break;
1585 if (!dev)
1586 return -EINVAL;
1587
1588 if (args->metadata_ptr) {
1589 metadata_buffer = kzalloc(args->metadata_size, GFP_KERNEL);
1590 if (!metadata_buffer)
1591 return -ENOMEM;
1592 }
1593
1594 /* Get dmabuf info from KGD */
1595 r = amdgpu_amdkfd_get_dmabuf_info(dev->kgd, args->dmabuf_fd,
1596 &dma_buf_kgd, &args->size,
1597 metadata_buffer, args->metadata_size,
1598 &args->metadata_size, &flags);
1599 if (r)
1600 goto exit;
1601
1602 /* Reverse-lookup gpu_id from kgd pointer */
1603 dev = kfd_device_by_kgd(dma_buf_kgd);
1604 if (!dev) {
1605 r = -EINVAL;
1606 goto exit;
1607 }
1608 args->gpu_id = dev->id;
1609 args->flags = flags;
1610
1611 /* Copy metadata buffer to user mode */
1612 if (metadata_buffer) {
1613 r = copy_to_user((void __user *)args->metadata_ptr,
1614 metadata_buffer, args->metadata_size);
1615 if (r != 0)
1616 r = -EFAULT;
1617 }
1618
1619exit:
1620 kfree(metadata_buffer);
1621
1622 return r;
1623}
1624
1625static int kfd_ioctl_import_dmabuf(struct file *filep,
1626 struct kfd_process *p, void *data)
1627{
1628 struct kfd_ioctl_import_dmabuf_args *args = data;
1629 struct kfd_process_device *pdd;
1630 struct dma_buf *dmabuf;
1631 struct kfd_dev *dev;
1632 int idr_handle;
1633 uint64_t size;
1634 void *mem;
1635 int r;
1636
1637 dev = kfd_device_by_id(args->gpu_id);
1638 if (!dev)
1639 return -EINVAL;
1640
1641 dmabuf = dma_buf_get(args->dmabuf_fd);
1642 if (IS_ERR(dmabuf))
1643 return PTR_ERR(dmabuf);
1644
1645 mutex_lock(&p->mutex);
1646
1647 pdd = kfd_bind_process_to_device(dev, p);
1648 if (IS_ERR(pdd)) {
1649 r = PTR_ERR(pdd);
1650 goto err_unlock;
1651 }
1652
1653 r = amdgpu_amdkfd_gpuvm_import_dmabuf(dev->kgd, dmabuf,
1654 args->va_addr, pdd->vm,
1655 (struct kgd_mem **)&mem, &size,
1656 NULL);
1657 if (r)
1658 goto err_unlock;
1659
1660 idr_handle = kfd_process_device_create_obj_handle(pdd, mem);
1661 if (idr_handle < 0) {
1662 r = -EFAULT;
1663 goto err_free;
1664 }
1665
1666 mutex_unlock(&p->mutex);
1667
1668 args->handle = MAKE_HANDLE(args->gpu_id, idr_handle);
1669
1670 return 0;
1671
1672err_free:
1673 amdgpu_amdkfd_gpuvm_free_memory_of_gpu(dev->kgd, (struct kgd_mem *)mem);
1674err_unlock:
1675 mutex_unlock(&p->mutex);
1676 return r;
1677}
1678
1679#define AMDKFD_IOCTL_DEF(ioctl, _func, _flags) \
1680 [_IOC_NR(ioctl)] = {.cmd = ioctl, .func = _func, .flags = _flags, \
1681 .cmd_drv = 0, .name = #ioctl}
1682
1683/** Ioctl table */
1684static const struct amdkfd_ioctl_desc amdkfd_ioctls[] = {
1685 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_VERSION,
1686 kfd_ioctl_get_version, 0),
1687
1688 AMDKFD_IOCTL_DEF(AMDKFD_IOC_CREATE_QUEUE,
1689 kfd_ioctl_create_queue, 0),
1690
1691 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DESTROY_QUEUE,
1692 kfd_ioctl_destroy_queue, 0),
1693
1694 AMDKFD_IOCTL_DEF(AMDKFD_IOC_SET_MEMORY_POLICY,
1695 kfd_ioctl_set_memory_policy, 0),
1696
1697 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_CLOCK_COUNTERS,
1698 kfd_ioctl_get_clock_counters, 0),
1699
1700 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_PROCESS_APERTURES,
1701 kfd_ioctl_get_process_apertures, 0),
1702
1703 AMDKFD_IOCTL_DEF(AMDKFD_IOC_UPDATE_QUEUE,
1704 kfd_ioctl_update_queue, 0),
1705
1706 AMDKFD_IOCTL_DEF(AMDKFD_IOC_CREATE_EVENT,
1707 kfd_ioctl_create_event, 0),
1708
1709 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DESTROY_EVENT,
1710 kfd_ioctl_destroy_event, 0),
1711
1712 AMDKFD_IOCTL_DEF(AMDKFD_IOC_SET_EVENT,
1713 kfd_ioctl_set_event, 0),
1714
1715 AMDKFD_IOCTL_DEF(AMDKFD_IOC_RESET_EVENT,
1716 kfd_ioctl_reset_event, 0),
1717
1718 AMDKFD_IOCTL_DEF(AMDKFD_IOC_WAIT_EVENTS,
1719 kfd_ioctl_wait_events, 0),
1720
1721 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DBG_REGISTER,
1722 kfd_ioctl_dbg_register, 0),
1723
1724 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DBG_UNREGISTER,
1725 kfd_ioctl_dbg_unregister, 0),
1726
1727 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DBG_ADDRESS_WATCH,
1728 kfd_ioctl_dbg_address_watch, 0),
1729
1730 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DBG_WAVE_CONTROL,
1731 kfd_ioctl_dbg_wave_control, 0),
1732
1733 AMDKFD_IOCTL_DEF(AMDKFD_IOC_SET_SCRATCH_BACKING_VA,
1734 kfd_ioctl_set_scratch_backing_va, 0),
1735
1736 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_TILE_CONFIG,
1737 kfd_ioctl_get_tile_config, 0),
1738
1739 AMDKFD_IOCTL_DEF(AMDKFD_IOC_SET_TRAP_HANDLER,
1740 kfd_ioctl_set_trap_handler, 0),
1741
1742 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_PROCESS_APERTURES_NEW,
1743 kfd_ioctl_get_process_apertures_new, 0),
1744
1745 AMDKFD_IOCTL_DEF(AMDKFD_IOC_ACQUIRE_VM,
1746 kfd_ioctl_acquire_vm, 0),
1747
1748 AMDKFD_IOCTL_DEF(AMDKFD_IOC_ALLOC_MEMORY_OF_GPU,
1749 kfd_ioctl_alloc_memory_of_gpu, 0),
1750
1751 AMDKFD_IOCTL_DEF(AMDKFD_IOC_FREE_MEMORY_OF_GPU,
1752 kfd_ioctl_free_memory_of_gpu, 0),
1753
1754 AMDKFD_IOCTL_DEF(AMDKFD_IOC_MAP_MEMORY_TO_GPU,
1755 kfd_ioctl_map_memory_to_gpu, 0),
1756
1757 AMDKFD_IOCTL_DEF(AMDKFD_IOC_UNMAP_MEMORY_FROM_GPU,
1758 kfd_ioctl_unmap_memory_from_gpu, 0),
1759
1760 AMDKFD_IOCTL_DEF(AMDKFD_IOC_SET_CU_MASK,
1761 kfd_ioctl_set_cu_mask, 0),
1762
1763 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_QUEUE_WAVE_STATE,
1764 kfd_ioctl_get_queue_wave_state, 0),
1765
1766 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_DMABUF_INFO,
1767 kfd_ioctl_get_dmabuf_info, 0),
1768
1769 AMDKFD_IOCTL_DEF(AMDKFD_IOC_IMPORT_DMABUF,
1770 kfd_ioctl_import_dmabuf, 0),
1771
1772};
1773
1774#define AMDKFD_CORE_IOCTL_COUNT ARRAY_SIZE(amdkfd_ioctls)
1775
1776static long kfd_ioctl(struct file *filep, unsigned int cmd, unsigned long arg)
1777{
1778 struct kfd_process *process;
1779 amdkfd_ioctl_t *func;
1780 const struct amdkfd_ioctl_desc *ioctl = NULL;
1781 unsigned int nr = _IOC_NR(cmd);
1782 char stack_kdata[128];
1783 char *kdata = NULL;
1784 unsigned int usize, asize;
1785 int retcode = -EINVAL;
1786
1787 if (nr >= AMDKFD_CORE_IOCTL_COUNT)
1788 goto err_i1;
1789
1790 if ((nr >= AMDKFD_COMMAND_START) && (nr < AMDKFD_COMMAND_END)) {
1791 u32 amdkfd_size;
1792
1793 ioctl = &amdkfd_ioctls[nr];
1794
1795 amdkfd_size = _IOC_SIZE(ioctl->cmd);
1796 usize = asize = _IOC_SIZE(cmd);
1797 if (amdkfd_size > asize)
1798 asize = amdkfd_size;
1799
1800 cmd = ioctl->cmd;
1801 } else
1802 goto err_i1;
1803
1804 dev_dbg(kfd_device, "ioctl cmd 0x%x (#%d), arg 0x%lx\n", cmd, nr, arg);
1805
1806 process = kfd_get_process(current);
1807 if (IS_ERR(process)) {
1808 dev_dbg(kfd_device, "no process\n");
1809 goto err_i1;
1810 }
1811
1812 /* Do not trust userspace, use our own definition */
1813 func = ioctl->func;
1814
1815 if (unlikely(!func)) {
1816 dev_dbg(kfd_device, "no function\n");
1817 retcode = -EINVAL;
1818 goto err_i1;
1819 }
1820
1821 if (cmd & (IOC_IN | IOC_OUT)) {
1822 if (asize <= sizeof(stack_kdata)) {
1823 kdata = stack_kdata;
1824 } else {
1825 kdata = kmalloc(asize, GFP_KERNEL);
1826 if (!kdata) {
1827 retcode = -ENOMEM;
1828 goto err_i1;
1829 }
1830 }
1831 if (asize > usize)
1832 memset(kdata + usize, 0, asize - usize);
1833 }
1834
1835 if (cmd & IOC_IN) {
1836 if (copy_from_user(kdata, (void __user *)arg, usize) != 0) {
1837 retcode = -EFAULT;
1838 goto err_i1;
1839 }
1840 } else if (cmd & IOC_OUT) {
1841 memset(kdata, 0, usize);
1842 }
1843
1844 retcode = func(filep, process, kdata);
1845
1846 if (cmd & IOC_OUT)
1847 if (copy_to_user((void __user *)arg, kdata, usize) != 0)
1848 retcode = -EFAULT;
1849
1850err_i1:
1851 if (!ioctl)
1852 dev_dbg(kfd_device, "invalid ioctl: pid=%d, cmd=0x%02x, nr=0x%02x\n",
1853 task_pid_nr(current), cmd, nr);
1854
1855 if (kdata != stack_kdata)
1856 kfree(kdata);
1857
1858 if (retcode)
1859 dev_dbg(kfd_device, "ret = %d\n", retcode);
1860
1861 return retcode;
1862}
1863
1864static int kfd_mmio_mmap(struct kfd_dev *dev, struct kfd_process *process,
1865 struct vm_area_struct *vma)
1866{
1867 phys_addr_t address;
1868 int ret;
1869
1870 if (vma->vm_end - vma->vm_start != PAGE_SIZE)
1871 return -EINVAL;
1872
1873 address = amdgpu_amdkfd_get_mmio_remap_phys_addr(dev->kgd);
1874
1875 vma->vm_flags |= VM_IO | VM_DONTCOPY | VM_DONTEXPAND | VM_NORESERVE |
1876 VM_DONTDUMP | VM_PFNMAP;
1877
1878 vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot);
1879
1880 pr_debug("Process %d mapping mmio page\n"
1881 " target user address == 0x%08llX\n"
1882 " physical address == 0x%08llX\n"
1883 " vm_flags == 0x%04lX\n"
1884 " size == 0x%04lX\n",
1885 process->pasid, (unsigned long long) vma->vm_start,
1886 address, vma->vm_flags, PAGE_SIZE);
1887
1888 ret = io_remap_pfn_range(vma,
1889 vma->vm_start,
1890 address >> PAGE_SHIFT,
1891 PAGE_SIZE,
1892 vma->vm_page_prot);
1893 return ret;
1894}
1895
1896
1897static int kfd_mmap(struct file *filp, struct vm_area_struct *vma)
1898{
1899 struct kfd_process *process;
1900 struct kfd_dev *dev = NULL;
1901 unsigned long vm_pgoff;
1902 unsigned int gpu_id;
1903
1904 process = kfd_get_process(current);
1905 if (IS_ERR(process))
1906 return PTR_ERR(process);
1907
1908 vm_pgoff = vma->vm_pgoff;
1909 vma->vm_pgoff = KFD_MMAP_OFFSET_VALUE_GET(vm_pgoff);
1910 gpu_id = KFD_MMAP_GPU_ID_GET(vm_pgoff);
1911 if (gpu_id)
1912 dev = kfd_device_by_id(gpu_id);
1913
1914 switch (vm_pgoff & KFD_MMAP_TYPE_MASK) {
1915 case KFD_MMAP_TYPE_DOORBELL:
1916 if (!dev)
1917 return -ENODEV;
1918 return kfd_doorbell_mmap(dev, process, vma);
1919
1920 case KFD_MMAP_TYPE_EVENTS:
1921 return kfd_event_mmap(process, vma);
1922
1923 case KFD_MMAP_TYPE_RESERVED_MEM:
1924 if (!dev)
1925 return -ENODEV;
1926 return kfd_reserved_mem_mmap(dev, process, vma);
1927 case KFD_MMAP_TYPE_MMIO:
1928 if (!dev)
1929 return -ENODEV;
1930 return kfd_mmio_mmap(dev, process, vma);
1931 }
1932
1933 return -EFAULT;
1934}