// SPDX-License-Identifier: GPL-2.0 OR MIT
/*
 * Copyright 2016-2022 Advanced Micro Devices, Inc.
 *
 * Permission is hereby granted, free of charge, to any person obtaining a
 * copy of this software and associated documentation files (the "Software"),
 * to deal in the Software without restriction, including without limitation
 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
 * and/or sell copies of the Software, and to permit persons to whom the
 * Software is furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
 * THE COPYRIGHT HOLDER(S) OR AUTHOR(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR
 * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 * OTHER DEALINGS IN THE SOFTWARE.
 */

#include <linux/debugfs.h>
#include <linux/uaccess.h>

#include "kfd_priv.h"

static struct dentry *debugfs_root;
static struct dentry *debugfs_proc;
static struct list_head procs;

struct debugfs_proc_entry {
        struct list_head list;
        struct dentry *proc_dentry;
        pid_t pid;
};

#define MAX_DEBUGFS_FILENAME_LEN 32

static int kfd_debugfs_open(struct inode *inode, struct file *file)
{
        int (*show)(struct seq_file *, void *) = inode->i_private;

        return single_open(file, show, NULL);
}
static int kfd_debugfs_hang_hws_read(struct seq_file *m, void *data)
{
        seq_puts(m, "echo gpu_id > hang_hws\n");
        return 0;
}

static ssize_t kfd_debugfs_hang_hws_write(struct file *file,
        const char __user *user_buf, size_t size, loff_t *ppos)
{
        struct kfd_node *dev;
        char tmp[16];
        uint32_t gpu_id;
        int ret = -EINVAL;

        memset(tmp, 0, 16);
        if (size >= 16) {
                pr_err("Invalid input for gpu id.\n");
                goto out;
        }
        if (copy_from_user(tmp, user_buf, size)) {
                ret = -EFAULT;
                goto out;
        }
        if (kstrtoint(tmp, 10, &gpu_id)) {
                pr_err("Invalid input for gpu id.\n");
                goto out;
        }
        dev = kfd_device_by_id(gpu_id);
        if (dev) {
                kfd_debugfs_hang_hws(dev);
                ret = size;
        } else
                pr_err("Cannot find device %d.\n", gpu_id);

out:
        return ret;
}

static const struct file_operations kfd_debugfs_fops = {
        .owner = THIS_MODULE,
        .open = kfd_debugfs_open,
        .read = seq_read,
        .llseek = seq_lseek,
        .release = single_release,
};

static const struct file_operations kfd_debugfs_hang_hws_fops = {
        .owner = THIS_MODULE,
        .open = kfd_debugfs_open,
        .read = seq_read,
        .write = kfd_debugfs_hang_hws_write,
        .llseek = seq_lseek,
        .release = single_release,
};

void kfd_debugfs_init(void)
{
        debugfs_root = debugfs_create_dir("kfd", NULL);
        debugfs_proc = debugfs_create_dir("proc", debugfs_root);
        INIT_LIST_HEAD(&procs);

        debugfs_create_file("mqds", S_IFREG | 0444, debugfs_root,
                            kfd_debugfs_mqds_by_process, &kfd_debugfs_fops);
        debugfs_create_file("hqds", S_IFREG | 0444, debugfs_root,
                            kfd_debugfs_hqds_by_device, &kfd_debugfs_fops);
        debugfs_create_file("rls", S_IFREG | 0444, debugfs_root,
                            kfd_debugfs_rls_by_device, &kfd_debugfs_fops);
        debugfs_create_file("hang_hws", S_IFREG | 0200, debugfs_root,
                            kfd_debugfs_hang_hws_read, &kfd_debugfs_hang_hws_fops);
        debugfs_create_file("mem_limit", S_IFREG | 0200, debugfs_root,
                            kfd_debugfs_kfd_mem_limits, &kfd_debugfs_fops);
}

void kfd_debugfs_fini(void)
{
        debugfs_remove_recursive(debugfs_proc);
        debugfs_remove_recursive(debugfs_root);
}

static ssize_t kfd_debugfs_pasid_read(struct file *file, char __user *buf,
                                      size_t count, loff_t *ppos)
{
        struct kfd_process_device *pdd = file_inode(file)->i_private;
        char tmp[32];
        int len;

        len = snprintf(tmp, sizeof(tmp), "%u\n", pdd->pasid);

        return simple_read_from_buffer(buf, count, ppos, tmp, len);
}

static const struct file_operations kfd_debugfs_pasid_fops = {
        .owner = THIS_MODULE,
        .read = kfd_debugfs_pasid_read,
};

void kfd_debugfs_add_process(struct kfd_process *p)
{
        int i;
        char name[MAX_DEBUGFS_FILENAME_LEN];
        struct debugfs_proc_entry *entry;

        entry = kzalloc_obj(*entry);
        if (!entry)
                return;

        list_add(&entry->list, &procs);
        entry->pid = p->lead_thread->pid;
        snprintf(name, MAX_DEBUGFS_FILENAME_LEN, "%d",
                 (int)entry->pid);
        entry->proc_dentry = debugfs_create_dir(name, debugfs_proc);

        /* Create debugfs files for each GPU:
         * - proc/<pid>/pasid_<gpuid>
         */
        for (i = 0; i < p->n_pdds; i++) {
                struct kfd_process_device *pdd = p->pdds[i];

                snprintf(name, MAX_DEBUGFS_FILENAME_LEN, "pasid_%u",
                         pdd->dev->id);
                debugfs_create_file((const char *)name, S_IFREG | 0444,
                                    entry->proc_dentry, pdd,
                                    &kfd_debugfs_pasid_fops);
        }
}

void kfd_debugfs_remove_process(struct kfd_process *p)
{
        struct debugfs_proc_entry *entry, *next;

        mutex_lock(&kfd_processes_mutex);
        list_for_each_entry_safe(entry, next, &procs, list) {
                if (entry->pid != p->lead_thread->pid)
                        continue;

                debugfs_remove_recursive(entry->proc_dentry);
                list_del(&entry->list);
                kfree(entry);
        }
        mutex_unlock(&kfd_processes_mutex);
}