/*
 * Copyright 2012 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.
 *
 */
#include "priv.h"

struct priv {
        struct nvkm_bios *bios;
        u32 bar0;
};

static u32
pramin_read(void *data, u32 offset, u32 length, struct nvkm_bios *bios)
{
        struct nvkm_device *device = bios->subdev.device;
        u32 i;
        if (offset + length <= 0x00100000) {
                for (i = offset; i < offset + length; i += 4)
                        *(u32 *)&bios->data[i] = nvkm_rd32(device, 0x700000 + i);
                return length;
        }
        return 0;
}

static void
pramin_fini(void *data)
{
        struct priv *priv = data;
        if (priv) {
                struct nvkm_device *device = priv->bios->subdev.device;
                nvkm_wr32(device, 0x001700, priv->bar0);
                kfree(priv);
        }
}

static void *
pramin_init(struct nvkm_bios *bios, const char *name)
{
        struct nvkm_subdev *subdev = &bios->subdev;
        struct nvkm_device *device = subdev->device;
        struct priv *priv = NULL;
        u64 addr = 0;

        /* PRAMIN always potentially available prior to nv50 */
        if (device->card_type < NV_50)
                return NULL;

        /* we can't get the bios image pointer without PDISP */
        if (device->card_type >= GA100)
                addr = device->chipset == 0x170; /*XXX: find the fuse reg for this */
        else
        if (device->card_type >= GM100)
                addr = nvkm_rd32(device, 0x021c04);
        else
        if (device->card_type >= NV_C0)
                addr = nvkm_rd32(device, 0x022500);
        if (addr & 0x00000001) {
                nvkm_debug(subdev, "... display disabled\n");
                return ERR_PTR(-ENODEV);
        }

        /* check that the window is enabled and in vram, particularly
         * important as we don't want to be touching vram on an
         * uninitialised board
         */
        if (device->card_type >= GV100)
                addr = nvkm_rd32(device, 0x625f04);
        else
                addr = nvkm_rd32(device, 0x619f04);
        if (!(addr & 0x00000008)) {
                nvkm_debug(subdev, "... not enabled\n");
                return ERR_PTR(-ENODEV);
        }
        if ( (addr & 0x00000003) != 1) {
                nvkm_debug(subdev, "... not in vram\n");
                return ERR_PTR(-ENODEV);
        }

        /* some alternate method inherited from xf86-video-nv... */
        addr = (addr & 0xffffff00) << 8;
        if (!addr) {
                addr  = (u64)nvkm_rd32(device, 0x001700) << 16;
                addr += 0xf0000;
        }

        /* modify bar0 PRAMIN window to cover the bios image */
        if (!(priv = kmalloc_obj(*priv))) {
                nvkm_error(subdev, "... out of memory\n");
                return ERR_PTR(-ENOMEM);
        }

        priv->bios = bios;
        priv->bar0 = nvkm_rd32(device, 0x001700);
        nvkm_wr32(device, 0x001700, addr >> 16);
        return priv;
}

const struct nvbios_source
nvbios_ramin = {
        .name = "PRAMIN",
        .init = pramin_init,
        .fini = pramin_fini,
        .read = pramin_read,
        .rw = true,
};