/*
 * Copyright(c) 2011-2017 Intel Corporation. All rights reserved.
 *
 * 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 (including the next
 * paragraph) 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 AUTHORS OR COPYRIGHT HOLDERS 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/list_sort.h>
#include "i915_drv.h"
#include "gvt.h"

struct mmio_diff_param {
        struct intel_vgpu *vgpu;
        int total;
        int diff;
        struct list_head diff_mmio_list;
};

struct diff_mmio {
        struct list_head node;
        u32 offset;
        u32 preg;
        u32 vreg;
};

/* Compare two diff_mmio items. */
static int mmio_offset_compare(void *priv,
        const struct list_head *a, const struct list_head *b)
{
        struct diff_mmio *ma;
        struct diff_mmio *mb;

        ma = container_of(a, struct diff_mmio, node);
        mb = container_of(b, struct diff_mmio, node);
        if (ma->offset < mb->offset)
                return -1;
        else if (ma->offset > mb->offset)
                return 1;
        return 0;
}

static inline int mmio_diff_handler(struct intel_gvt *gvt,
                                    u32 offset, void *data)
{
        struct mmio_diff_param *param = data;
        struct diff_mmio *node;
        u32 preg, vreg;

        preg = intel_uncore_read_notrace(gvt->gt->uncore, _MMIO(offset));
        vreg = vgpu_vreg(param->vgpu, offset);

        if (preg != vreg) {
                node = kmalloc(sizeof(*node), GFP_ATOMIC);
                if (!node)
                        return -ENOMEM;

                node->offset = offset;
                node->preg = preg;
                node->vreg = vreg;
                list_add(&node->node, &param->diff_mmio_list);
                param->diff++;
        }
        param->total++;
        return 0;
}

/* Show the all the different values of tracked mmio. */
static int vgpu_mmio_diff_show(struct seq_file *s, void *unused)
{
        struct intel_vgpu *vgpu = s->private;
        struct intel_gvt *gvt = vgpu->gvt;
        struct mmio_diff_param param = {
                .vgpu = vgpu,
                .total = 0,
                .diff = 0,
        };
        struct diff_mmio *node, *next;
        intel_wakeref_t wakeref;

        INIT_LIST_HEAD(&param.diff_mmio_list);

        mutex_lock(&gvt->lock);
        spin_lock_bh(&gvt->scheduler.mmio_context_lock);

        wakeref = mmio_hw_access_pre(gvt->gt);
        /* Recognize all the diff mmios to list. */
        intel_gvt_for_each_tracked_mmio(gvt, mmio_diff_handler, &param);
        mmio_hw_access_post(gvt->gt, wakeref);

        spin_unlock_bh(&gvt->scheduler.mmio_context_lock);
        mutex_unlock(&gvt->lock);

        /* In an ascending order by mmio offset. */
        list_sort(NULL, &param.diff_mmio_list, mmio_offset_compare);

        seq_printf(s, "%-8s %-8s %-8s %-8s\n", "Offset", "HW", "vGPU", "Diff");
        list_for_each_entry_safe(node, next, &param.diff_mmio_list, node) {
                u32 diff = node->preg ^ node->vreg;

                seq_printf(s, "%08x %08x %08x %*pbl\n",
                           node->offset, node->preg, node->vreg,
                           32, &diff);
                list_del(&node->node);
                kfree(node);
        }
        seq_printf(s, "Total: %d, Diff: %d\n", param.total, param.diff);
        return 0;
}
DEFINE_SHOW_ATTRIBUTE(vgpu_mmio_diff);

static int
vgpu_scan_nonprivbb_get(void *data, u64 *val)
{
        struct intel_vgpu *vgpu = (struct intel_vgpu *)data;

        *val = vgpu->scan_nonprivbb;
        return 0;
}

/*
 * set/unset bit engine_id of vgpu->scan_nonprivbb to turn on/off scanning
 * of non-privileged batch buffer. e.g.
 * if vgpu->scan_nonprivbb=3, then it will scan non-privileged batch buffer
 * on engine 0 and 1.
 */
static int
vgpu_scan_nonprivbb_set(void *data, u64 val)
{
        struct intel_vgpu *vgpu = (struct intel_vgpu *)data;

        vgpu->scan_nonprivbb = val;
        return 0;
}

DEFINE_DEBUGFS_ATTRIBUTE(vgpu_scan_nonprivbb_fops,
                         vgpu_scan_nonprivbb_get, vgpu_scan_nonprivbb_set,
                         "0x%llx\n");

static int vgpu_status_get(void *data, u64 *val)
{
        struct intel_vgpu *vgpu = (struct intel_vgpu *)data;

        *val = 0;

        if (test_bit(INTEL_VGPU_STATUS_ATTACHED, vgpu->status))
                *val |= (1 << INTEL_VGPU_STATUS_ATTACHED);
        if (test_bit(INTEL_VGPU_STATUS_ACTIVE, vgpu->status))
                *val |= (1 << INTEL_VGPU_STATUS_ACTIVE);

        return 0;
}

DEFINE_DEBUGFS_ATTRIBUTE(vgpu_status_fops, vgpu_status_get, NULL, "0x%llx\n");

/**
 * intel_gvt_debugfs_add_vgpu - register debugfs entries for a vGPU
 * @vgpu: a vGPU
 */
void intel_gvt_debugfs_add_vgpu(struct intel_vgpu *vgpu)
{
        char name[16] = "";

        snprintf(name, 16, "vgpu%d", vgpu->id);
        vgpu->debugfs = debugfs_create_dir(name, vgpu->gvt->debugfs_root);

        debugfs_create_file("mmio_diff", 0444, vgpu->debugfs, vgpu,
                            &vgpu_mmio_diff_fops);
        debugfs_create_file_unsafe("scan_nonprivbb", 0644, vgpu->debugfs, vgpu,
                                   &vgpu_scan_nonprivbb_fops);
        debugfs_create_file_unsafe("status", 0644, vgpu->debugfs, vgpu,
                                   &vgpu_status_fops);
}

/**
 * intel_gvt_debugfs_remove_vgpu - remove debugfs entries of a vGPU
 * @vgpu: a vGPU
 */
void intel_gvt_debugfs_remove_vgpu(struct intel_vgpu *vgpu)
{
        struct intel_gvt *gvt = vgpu->gvt;
        struct dentry *debugfs_root = gvt->gt->i915->drm.debugfs_root;

        if (debugfs_root && gvt->debugfs_root) {
                debugfs_remove_recursive(vgpu->debugfs);
                vgpu->debugfs = NULL;
        }
}

/**
 * intel_gvt_debugfs_init - register gvt debugfs root entry
 * @gvt: GVT device
 */
void intel_gvt_debugfs_init(struct intel_gvt *gvt)
{
        struct dentry *debugfs_root = gvt->gt->i915->drm.debugfs_root;

        gvt->debugfs_root = debugfs_create_dir("gvt", debugfs_root);

        debugfs_create_ulong("num_tracked_mmio", 0444, gvt->debugfs_root,
                             &gvt->mmio.num_tracked_mmio);
}

/**
 * intel_gvt_debugfs_clean - remove debugfs entries
 * @gvt: GVT device
 */
void intel_gvt_debugfs_clean(struct intel_gvt *gvt)
{
        struct dentry *debugfs_root = gvt->gt->i915->drm.debugfs_root;

        if (debugfs_root) {
                debugfs_remove_recursive(gvt->debugfs_root);
                gvt->debugfs_root = NULL;
        }
}