/*
 * Copyright 2021 Red Hat 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.
 */
#define nvkm_uhead(p) container_of((p), struct nvkm_head, object)
#include "head.h"
#include <core/event.h>

#include <nvif/if0013.h>

#include <nvif/event.h>

static int
nvkm_uhead_uevent(struct nvkm_object *object, void *argv, u32 argc, struct nvkm_uevent *uevent)
{
	struct nvkm_head *head = nvkm_uhead(object);
	union nvif_head_event_args *args = argv;

	if (!uevent)
		return 0;
	if (argc != sizeof(args->vn))
		return -ENOSYS;

	return nvkm_uevent_add(uevent, &head->disp->vblank, head->id,
			       NVKM_DISP_HEAD_EVENT_VBLANK, NULL);
}

static int
nvkm_uhead_mthd_scanoutpos(struct nvkm_head *head, void *argv, u32 argc)
{
	union nvif_head_scanoutpos_args *args = argv;

	if (argc != sizeof(args->v0) || args->v0.version != 0)
		return -ENOSYS;

	head->func->state(head, &head->arm);
	args->v0.vtotal  = head->arm.vtotal;
	args->v0.vblanks = head->arm.vblanks;
	args->v0.vblanke = head->arm.vblanke;
	args->v0.htotal  = head->arm.htotal;
	args->v0.hblanks = head->arm.hblanks;
	args->v0.hblanke = head->arm.hblanke;

	/* We don't support reading htotal/vtotal on pre-NV50 VGA,
	 * so we have to give up and trigger the timestamping
	 * fallback in the drm core.
	 */
	if (!args->v0.vtotal || !args->v0.htotal)
		return -ENOTSUPP;

	args->v0.time[0] = ktime_to_ns(ktime_get());
	head->func->rgpos(head, &args->v0.hline, &args->v0.vline);
	args->v0.time[1] = ktime_to_ns(ktime_get());
	return 0;
}

static int
nvkm_uhead_mthd(struct nvkm_object *object, u32 mthd, void *argv, u32 argc)
{
	struct nvkm_head *head = nvkm_uhead(object);

	switch (mthd) {
	case NVIF_HEAD_V0_SCANOUTPOS: return nvkm_uhead_mthd_scanoutpos(head, argv, argc);
	default:
		return -EINVAL;
	}
}

static void *
nvkm_uhead_dtor(struct nvkm_object *object)
{
	struct nvkm_head *head = nvkm_uhead(object);
	struct nvkm_disp *disp = head->disp;

	spin_lock(&disp->client.lock);
	head->object.func = NULL;
	spin_unlock(&disp->client.lock);
	return NULL;
}

static const struct nvkm_object_func
nvkm_uhead = {
	.dtor = nvkm_uhead_dtor,
	.mthd = nvkm_uhead_mthd,
	.uevent = nvkm_uhead_uevent,
};

int
nvkm_uhead_new(const struct nvkm_oclass *oclass, void *argv, u32 argc, struct nvkm_object **pobject)
{
	struct nvkm_disp *disp = nvkm_udisp(oclass->parent);
	struct nvkm_head *head;
	union nvif_head_args *args = argv;
	int ret;

	if (argc != sizeof(args->v0) || args->v0.version != 0)
		return -ENOSYS;
	if (!(head = nvkm_head_find(disp, args->v0.id)))
		return -EINVAL;

	ret = -EBUSY;
	spin_lock(&disp->client.lock);
	if (!head->object.func) {
		nvkm_object_ctor(&nvkm_uhead, oclass, &head->object);
		*pobject = &head->object;
		ret = 0;
	}
	spin_unlock(&disp->client.lock);
	return ret;
}