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/sched.h> 28 #include <linux/slab.h> 29 #include <linux/uaccess.h> 30 #include <linux/compat.h> 31 #include <uapi/linux/kfd_ioctl.h> 32 #include <linux/time.h> 33 #include <linux/mm.h> 34 #include <uapi/asm-generic/mman-common.h> 35 #include <asm/processor.h> 36 #include "kfd_priv.h" 37 #include "kfd_device_queue_manager.h" 38 39 static long kfd_ioctl(struct file *, unsigned int, unsigned long); 40 static int kfd_open(struct inode *, struct file *); 41 static int kfd_mmap(struct file *, struct vm_area_struct *); 42 43 static const char kfd_dev_name[] = "kfd"; 44 45 static const struct file_operations kfd_fops = { 46 .owner = THIS_MODULE, 47 .unlocked_ioctl = kfd_ioctl, 48 .compat_ioctl = kfd_ioctl, 49 .open = kfd_open, 50 .mmap = kfd_mmap, 51 }; 52 53 static int kfd_char_dev_major = -1; 54 static struct class *kfd_class; 55 struct device *kfd_device; 56 57 int kfd_chardev_init(void) 58 { 59 int err = 0; 60 61 kfd_char_dev_major = register_chrdev(0, kfd_dev_name, &kfd_fops); 62 err = kfd_char_dev_major; 63 if (err < 0) 64 goto err_register_chrdev; 65 66 kfd_class = class_create(THIS_MODULE, kfd_dev_name); 67 err = PTR_ERR(kfd_class); 68 if (IS_ERR(kfd_class)) 69 goto err_class_create; 70 71 kfd_device = device_create(kfd_class, NULL, 72 MKDEV(kfd_char_dev_major, 0), 73 NULL, kfd_dev_name); 74 err = PTR_ERR(kfd_device); 75 if (IS_ERR(kfd_device)) 76 goto err_device_create; 77 78 return 0; 79 80 err_device_create: 81 class_destroy(kfd_class); 82 err_class_create: 83 unregister_chrdev(kfd_char_dev_major, kfd_dev_name); 84 err_register_chrdev: 85 return err; 86 } 87 88 void kfd_chardev_exit(void) 89 { 90 device_destroy(kfd_class, MKDEV(kfd_char_dev_major, 0)); 91 class_destroy(kfd_class); 92 unregister_chrdev(kfd_char_dev_major, kfd_dev_name); 93 } 94 95 struct device *kfd_chardev(void) 96 { 97 return kfd_device; 98 } 99 100 101 static int kfd_open(struct inode *inode, struct file *filep) 102 { 103 struct kfd_process *process; 104 bool is_32bit_user_mode; 105 106 if (iminor(inode) != 0) 107 return -ENODEV; 108 109 is_32bit_user_mode = is_compat_task(); 110 111 if (is_32bit_user_mode == true) { 112 dev_warn(kfd_device, 113 "Process %d (32-bit) failed to open /dev/kfd\n" 114 "32-bit processes are not supported by amdkfd\n", 115 current->pid); 116 return -EPERM; 117 } 118 119 process = kfd_create_process(current); 120 if (IS_ERR(process)) 121 return PTR_ERR(process); 122 123 dev_dbg(kfd_device, "process %d opened, compat mode (32 bit) - %d\n", 124 process->pasid, process->is_32bit_user_mode); 125 126 return 0; 127 } 128 129 static int kfd_ioctl_get_version(struct file *filep, struct kfd_process *p, 130 void *data) 131 { 132 struct kfd_ioctl_get_version_args *args = data; 133 int err = 0; 134 135 args->major_version = KFD_IOCTL_MAJOR_VERSION; 136 args->minor_version = KFD_IOCTL_MINOR_VERSION; 137 138 return err; 139 } 140 141 static int set_queue_properties_from_user(struct queue_properties *q_properties, 142 struct kfd_ioctl_create_queue_args *args) 143 { 144 if (args->queue_percentage > KFD_MAX_QUEUE_PERCENTAGE) { 145 pr_err("kfd: queue percentage must be between 0 to KFD_MAX_QUEUE_PERCENTAGE\n"); 146 return -EINVAL; 147 } 148 149 if (args->queue_priority > KFD_MAX_QUEUE_PRIORITY) { 150 pr_err("kfd: queue priority must be between 0 to KFD_MAX_QUEUE_PRIORITY\n"); 151 return -EINVAL; 152 } 153 154 if ((args->ring_base_address) && 155 (!access_ok(VERIFY_WRITE, 156 (const void __user *) args->ring_base_address, 157 sizeof(uint64_t)))) { 158 pr_err("kfd: can't access ring base address\n"); 159 return -EFAULT; 160 } 161 162 if (!is_power_of_2(args->ring_size) && (args->ring_size != 0)) { 163 pr_err("kfd: ring size must be a power of 2 or 0\n"); 164 return -EINVAL; 165 } 166 167 if (!access_ok(VERIFY_WRITE, 168 (const void __user *) args->read_pointer_address, 169 sizeof(uint32_t))) { 170 pr_err("kfd: can't access read pointer\n"); 171 return -EFAULT; 172 } 173 174 if (!access_ok(VERIFY_WRITE, 175 (const void __user *) args->write_pointer_address, 176 sizeof(uint32_t))) { 177 pr_err("kfd: can't access write pointer\n"); 178 return -EFAULT; 179 } 180 181 q_properties->is_interop = false; 182 q_properties->queue_percent = args->queue_percentage; 183 q_properties->priority = args->queue_priority; 184 q_properties->queue_address = args->ring_base_address; 185 q_properties->queue_size = args->ring_size; 186 q_properties->read_ptr = (uint32_t *) args->read_pointer_address; 187 q_properties->write_ptr = (uint32_t *) args->write_pointer_address; 188 if (args->queue_type == KFD_IOC_QUEUE_TYPE_COMPUTE || 189 args->queue_type == KFD_IOC_QUEUE_TYPE_COMPUTE_AQL) 190 q_properties->type = KFD_QUEUE_TYPE_COMPUTE; 191 else 192 return -ENOTSUPP; 193 194 if (args->queue_type == KFD_IOC_QUEUE_TYPE_COMPUTE_AQL) 195 q_properties->format = KFD_QUEUE_FORMAT_AQL; 196 else 197 q_properties->format = KFD_QUEUE_FORMAT_PM4; 198 199 pr_debug("Queue Percentage (%d, %d)\n", 200 q_properties->queue_percent, args->queue_percentage); 201 202 pr_debug("Queue Priority (%d, %d)\n", 203 q_properties->priority, args->queue_priority); 204 205 pr_debug("Queue Address (0x%llX, 0x%llX)\n", 206 q_properties->queue_address, args->ring_base_address); 207 208 pr_debug("Queue Size (0x%llX, %u)\n", 209 q_properties->queue_size, args->ring_size); 210 211 pr_debug("Queue r/w Pointers (0x%llX, 0x%llX)\n", 212 (uint64_t) q_properties->read_ptr, 213 (uint64_t) q_properties->write_ptr); 214 215 pr_debug("Queue Format (%d)\n", q_properties->format); 216 217 return 0; 218 } 219 220 static int kfd_ioctl_create_queue(struct file *filep, struct kfd_process *p, 221 void *data) 222 { 223 struct kfd_ioctl_create_queue_args *args = data; 224 struct kfd_dev *dev; 225 int err = 0; 226 unsigned int queue_id; 227 struct kfd_process_device *pdd; 228 struct queue_properties q_properties; 229 230 memset(&q_properties, 0, sizeof(struct queue_properties)); 231 232 pr_debug("kfd: creating queue ioctl\n"); 233 234 err = set_queue_properties_from_user(&q_properties, args); 235 if (err) 236 return err; 237 238 dev = kfd_device_by_id(args->gpu_id); 239 if (dev == NULL) 240 return -EINVAL; 241 242 mutex_lock(&p->mutex); 243 244 pdd = kfd_bind_process_to_device(dev, p); 245 if (IS_ERR(pdd)) { 246 err = -ESRCH; 247 goto err_bind_process; 248 } 249 250 pr_debug("kfd: creating queue for PASID %d on GPU 0x%x\n", 251 p->pasid, 252 dev->id); 253 254 err = pqm_create_queue(&p->pqm, dev, filep, &q_properties, 0, 255 KFD_QUEUE_TYPE_COMPUTE, &queue_id); 256 if (err != 0) 257 goto err_create_queue; 258 259 args->queue_id = queue_id; 260 261 /* Return gpu_id as doorbell offset for mmap usage */ 262 args->doorbell_offset = args->gpu_id << PAGE_SHIFT; 263 264 mutex_unlock(&p->mutex); 265 266 pr_debug("kfd: queue id %d was created successfully\n", args->queue_id); 267 268 pr_debug("ring buffer address == 0x%016llX\n", 269 args->ring_base_address); 270 271 pr_debug("read ptr address == 0x%016llX\n", 272 args->read_pointer_address); 273 274 pr_debug("write ptr address == 0x%016llX\n", 275 args->write_pointer_address); 276 277 return 0; 278 279 err_create_queue: 280 err_bind_process: 281 mutex_unlock(&p->mutex); 282 return err; 283 } 284 285 static int kfd_ioctl_destroy_queue(struct file *filp, struct kfd_process *p, 286 void *data) 287 { 288 int retval; 289 struct kfd_ioctl_destroy_queue_args *args = data; 290 291 pr_debug("kfd: destroying queue id %d for PASID %d\n", 292 args->queue_id, 293 p->pasid); 294 295 mutex_lock(&p->mutex); 296 297 retval = pqm_destroy_queue(&p->pqm, args->queue_id); 298 299 mutex_unlock(&p->mutex); 300 return retval; 301 } 302 303 static int kfd_ioctl_update_queue(struct file *filp, struct kfd_process *p, 304 void *data) 305 { 306 int retval; 307 struct kfd_ioctl_update_queue_args *args = data; 308 struct queue_properties properties; 309 310 if (args->queue_percentage > KFD_MAX_QUEUE_PERCENTAGE) { 311 pr_err("kfd: queue percentage must be between 0 to KFD_MAX_QUEUE_PERCENTAGE\n"); 312 return -EINVAL; 313 } 314 315 if (args->queue_priority > KFD_MAX_QUEUE_PRIORITY) { 316 pr_err("kfd: queue priority must be between 0 to KFD_MAX_QUEUE_PRIORITY\n"); 317 return -EINVAL; 318 } 319 320 if ((args->ring_base_address) && 321 (!access_ok(VERIFY_WRITE, 322 (const void __user *) args->ring_base_address, 323 sizeof(uint64_t)))) { 324 pr_err("kfd: can't access ring base address\n"); 325 return -EFAULT; 326 } 327 328 if (!is_power_of_2(args->ring_size) && (args->ring_size != 0)) { 329 pr_err("kfd: ring size must be a power of 2 or 0\n"); 330 return -EINVAL; 331 } 332 333 properties.queue_address = args->ring_base_address; 334 properties.queue_size = args->ring_size; 335 properties.queue_percent = args->queue_percentage; 336 properties.priority = args->queue_priority; 337 338 pr_debug("kfd: updating queue id %d for PASID %d\n", 339 args->queue_id, p->pasid); 340 341 mutex_lock(&p->mutex); 342 343 retval = pqm_update_queue(&p->pqm, args->queue_id, &properties); 344 345 mutex_unlock(&p->mutex); 346 347 return retval; 348 } 349 350 static int kfd_ioctl_set_memory_policy(struct file *filep, 351 struct kfd_process *p, void *data) 352 { 353 struct kfd_ioctl_set_memory_policy_args *args = data; 354 struct kfd_dev *dev; 355 int err = 0; 356 struct kfd_process_device *pdd; 357 enum cache_policy default_policy, alternate_policy; 358 359 if (args->default_policy != KFD_IOC_CACHE_POLICY_COHERENT 360 && args->default_policy != KFD_IOC_CACHE_POLICY_NONCOHERENT) { 361 return -EINVAL; 362 } 363 364 if (args->alternate_policy != KFD_IOC_CACHE_POLICY_COHERENT 365 && args->alternate_policy != KFD_IOC_CACHE_POLICY_NONCOHERENT) { 366 return -EINVAL; 367 } 368 369 dev = kfd_device_by_id(args->gpu_id); 370 if (dev == NULL) 371 return -EINVAL; 372 373 mutex_lock(&p->mutex); 374 375 pdd = kfd_bind_process_to_device(dev, p); 376 if (IS_ERR(pdd)) { 377 err = -ESRCH; 378 goto out; 379 } 380 381 default_policy = (args->default_policy == KFD_IOC_CACHE_POLICY_COHERENT) 382 ? cache_policy_coherent : cache_policy_noncoherent; 383 384 alternate_policy = 385 (args->alternate_policy == KFD_IOC_CACHE_POLICY_COHERENT) 386 ? cache_policy_coherent : cache_policy_noncoherent; 387 388 if (!dev->dqm->set_cache_memory_policy(dev->dqm, 389 &pdd->qpd, 390 default_policy, 391 alternate_policy, 392 (void __user *)args->alternate_aperture_base, 393 args->alternate_aperture_size)) 394 err = -EINVAL; 395 396 out: 397 mutex_unlock(&p->mutex); 398 399 return err; 400 } 401 402 static int kfd_ioctl_get_clock_counters(struct file *filep, 403 struct kfd_process *p, void *data) 404 { 405 struct kfd_ioctl_get_clock_counters_args *args = data; 406 struct kfd_dev *dev; 407 struct timespec time; 408 409 dev = kfd_device_by_id(args->gpu_id); 410 if (dev == NULL) 411 return -EINVAL; 412 413 /* Reading GPU clock counter from KGD */ 414 args->gpu_clock_counter = kfd2kgd->get_gpu_clock_counter(dev->kgd); 415 416 /* No access to rdtsc. Using raw monotonic time */ 417 getrawmonotonic(&time); 418 args->cpu_clock_counter = (uint64_t)timespec_to_ns(&time); 419 420 get_monotonic_boottime(&time); 421 args->system_clock_counter = (uint64_t)timespec_to_ns(&time); 422 423 /* Since the counter is in nano-seconds we use 1GHz frequency */ 424 args->system_clock_freq = 1000000000; 425 426 return 0; 427 } 428 429 430 static int kfd_ioctl_get_process_apertures(struct file *filp, 431 struct kfd_process *p, void *data) 432 { 433 struct kfd_ioctl_get_process_apertures_args *args = data; 434 struct kfd_process_device_apertures *pAperture; 435 struct kfd_process_device *pdd; 436 437 dev_dbg(kfd_device, "get apertures for PASID %d", p->pasid); 438 439 args->num_of_nodes = 0; 440 441 mutex_lock(&p->mutex); 442 443 /*if the process-device list isn't empty*/ 444 if (kfd_has_process_device_data(p)) { 445 /* Run over all pdd of the process */ 446 pdd = kfd_get_first_process_device_data(p); 447 do { 448 pAperture = 449 &args->process_apertures[args->num_of_nodes]; 450 pAperture->gpu_id = pdd->dev->id; 451 pAperture->lds_base = pdd->lds_base; 452 pAperture->lds_limit = pdd->lds_limit; 453 pAperture->gpuvm_base = pdd->gpuvm_base; 454 pAperture->gpuvm_limit = pdd->gpuvm_limit; 455 pAperture->scratch_base = pdd->scratch_base; 456 pAperture->scratch_limit = pdd->scratch_limit; 457 458 dev_dbg(kfd_device, 459 "node id %u\n", args->num_of_nodes); 460 dev_dbg(kfd_device, 461 "gpu id %u\n", pdd->dev->id); 462 dev_dbg(kfd_device, 463 "lds_base %llX\n", pdd->lds_base); 464 dev_dbg(kfd_device, 465 "lds_limit %llX\n", pdd->lds_limit); 466 dev_dbg(kfd_device, 467 "gpuvm_base %llX\n", pdd->gpuvm_base); 468 dev_dbg(kfd_device, 469 "gpuvm_limit %llX\n", pdd->gpuvm_limit); 470 dev_dbg(kfd_device, 471 "scratch_base %llX\n", pdd->scratch_base); 472 dev_dbg(kfd_device, 473 "scratch_limit %llX\n", pdd->scratch_limit); 474 475 args->num_of_nodes++; 476 } while ((pdd = kfd_get_next_process_device_data(p, pdd)) != NULL && 477 (args->num_of_nodes < NUM_OF_SUPPORTED_GPUS)); 478 } 479 480 mutex_unlock(&p->mutex); 481 482 return 0; 483 } 484 485 #define AMDKFD_IOCTL_DEF(ioctl, _func, _flags) \ 486 [_IOC_NR(ioctl)] = {.cmd = ioctl, .func = _func, .flags = _flags, .cmd_drv = 0, .name = #ioctl} 487 488 /** Ioctl table */ 489 static const struct amdkfd_ioctl_desc amdkfd_ioctls[] = { 490 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_VERSION, 491 kfd_ioctl_get_version, 0), 492 493 AMDKFD_IOCTL_DEF(AMDKFD_IOC_CREATE_QUEUE, 494 kfd_ioctl_create_queue, 0), 495 496 AMDKFD_IOCTL_DEF(AMDKFD_IOC_DESTROY_QUEUE, 497 kfd_ioctl_destroy_queue, 0), 498 499 AMDKFD_IOCTL_DEF(AMDKFD_IOC_SET_MEMORY_POLICY, 500 kfd_ioctl_set_memory_policy, 0), 501 502 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_CLOCK_COUNTERS, 503 kfd_ioctl_get_clock_counters, 0), 504 505 AMDKFD_IOCTL_DEF(AMDKFD_IOC_GET_PROCESS_APERTURES, 506 kfd_ioctl_get_process_apertures, 0), 507 508 AMDKFD_IOCTL_DEF(AMDKFD_IOC_UPDATE_QUEUE, 509 kfd_ioctl_update_queue, 0), 510 }; 511 512 #define AMDKFD_CORE_IOCTL_COUNT ARRAY_SIZE(amdkfd_ioctls) 513 514 static long kfd_ioctl(struct file *filep, unsigned int cmd, unsigned long arg) 515 { 516 struct kfd_process *process; 517 amdkfd_ioctl_t *func; 518 const struct amdkfd_ioctl_desc *ioctl = NULL; 519 unsigned int nr = _IOC_NR(cmd); 520 char stack_kdata[128]; 521 char *kdata = NULL; 522 unsigned int usize, asize; 523 int retcode = -EINVAL; 524 525 if (nr >= AMDKFD_CORE_IOCTL_COUNT) 526 goto err_i1; 527 528 if ((nr >= AMDKFD_COMMAND_START) && (nr < AMDKFD_COMMAND_END)) { 529 u32 amdkfd_size; 530 531 ioctl = &amdkfd_ioctls[nr]; 532 533 amdkfd_size = _IOC_SIZE(ioctl->cmd); 534 usize = asize = _IOC_SIZE(cmd); 535 if (amdkfd_size > asize) 536 asize = amdkfd_size; 537 538 cmd = ioctl->cmd; 539 } else 540 goto err_i1; 541 542 dev_dbg(kfd_device, "ioctl cmd 0x%x (#%d), arg 0x%lx\n", cmd, nr, arg); 543 544 process = kfd_get_process(current); 545 if (IS_ERR(process)) { 546 dev_dbg(kfd_device, "no process\n"); 547 goto err_i1; 548 } 549 550 /* Do not trust userspace, use our own definition */ 551 func = ioctl->func; 552 553 if (unlikely(!func)) { 554 dev_dbg(kfd_device, "no function\n"); 555 retcode = -EINVAL; 556 goto err_i1; 557 } 558 559 if (cmd & (IOC_IN | IOC_OUT)) { 560 if (asize <= sizeof(stack_kdata)) { 561 kdata = stack_kdata; 562 } else { 563 kdata = kmalloc(asize, GFP_KERNEL); 564 if (!kdata) { 565 retcode = -ENOMEM; 566 goto err_i1; 567 } 568 } 569 if (asize > usize) 570 memset(kdata + usize, 0, asize - usize); 571 } 572 573 if (cmd & IOC_IN) { 574 if (copy_from_user(kdata, (void __user *)arg, usize) != 0) { 575 retcode = -EFAULT; 576 goto err_i1; 577 } 578 } else if (cmd & IOC_OUT) { 579 memset(kdata, 0, usize); 580 } 581 582 retcode = func(filep, process, kdata); 583 584 if (cmd & IOC_OUT) 585 if (copy_to_user((void __user *)arg, kdata, usize) != 0) 586 retcode = -EFAULT; 587 588 err_i1: 589 if (!ioctl) 590 dev_dbg(kfd_device, "invalid ioctl: pid=%d, cmd=0x%02x, nr=0x%02x\n", 591 task_pid_nr(current), cmd, nr); 592 593 if (kdata != stack_kdata) 594 kfree(kdata); 595 596 if (retcode) 597 dev_dbg(kfd_device, "ret = %d\n", retcode); 598 599 return retcode; 600 } 601 602 static int kfd_mmap(struct file *filp, struct vm_area_struct *vma) 603 { 604 struct kfd_process *process; 605 606 process = kfd_get_process(current); 607 if (IS_ERR(process)) 608 return PTR_ERR(process); 609 610 return kfd_doorbell_mmap(process, vma); 611 } 612