/*      $NetBSD: apbus_subr.c,v 1.10 2018/09/30 06:14:23 tsutsui Exp $  */

/*-
 * Copyright (C) 1999 SHIMIZU Ryo.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. The name of the author may not be used to endorse or promote products
 *    derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: apbus_subr.c,v 1.10 2018/09/30 06:14:23 tsutsui Exp $");

#include <sys/param.h>
#include <sys/systm.h>

#include <uvm/uvm_extern.h>

#include <mips/locore.h>
#include <mips/pte.h>

#include <machine/wired_map.h>

#include <newsmips/apbus/apbusvar.h>

static void apctl_dump(struct apbus_ctl *);

#define APBUS_ROMWORK_VA        0xfff00000

void
apbus_map_romwork(void)
{
        static bool mapped = false;
        vaddr_t apbd_work_va;
        vsize_t apbd_work_sz;
        paddr_t apbd_work_pa;

        if (!mapped) {
                /* map PROM work RAM into VA 0xFFF00000 - 0xFFFFFFFF */
                apbd_work_va = APBUS_ROMWORK_VA;
                apbd_work_sz = MIPS3_PG_SIZE_MASK_TO_SIZE(MIPS3_PG_SIZE_1M);
                apbd_work_pa = ctob(physmem);

                mapped = mips3_wired_enter_page(apbd_work_va, apbd_work_pa,
                    apbd_work_sz);
                if (!mapped) {
                        printf("%s: cannot allocate APbus PROM work\n",
                            __func__);
                }
        }
}

void *
apbus_device_to_hwaddr(struct apbus_dev *apbus_dev)
{
        struct apbus_ctl *ctl;

        if (apbus_dev == NULL)
                return NULL;

        ctl = apbus_dev->apbd_ctl;
        if (ctl == NULL)
                return NULL;

        return (void *)ctl->apbc_hwbase;
}

struct apbus_dev *
apbus_lookupdev(char *devname)
{
        struct apbus_dev *dp;

        dp = _sip->apbsi_dev;
        if (devname == NULL || *devname == '\0')
                return dp;

        /* search apbus_dev named 'devname' */
        while (dp) {
                if (strcmp(devname, dp->apbd_name) == 0)
                        return dp;

                dp = dp->apbd_link;
        }

        return NULL;
}

static void
apctl_dump(struct apbus_ctl *apctl)
{
        if (!apctl)
                return;

        printf("        apbus_ctl dump (%p)\n", apctl);

        printf("        Num:            %d\n", apctl->apbc_ctlno);
        printf("        HWaddr:         0x%08x\n", apctl->apbc_hwbase);
        printf("        softc:          %p\n", apctl->apbc_softc);
        printf("        Slot:           %d\n", apctl->apbc_sl);
        printf("\n");

        if (apctl->apbc_link)
                apctl_dump(apctl->apbc_link);
}

void
apdevice_dump(struct apbus_dev *apdev)
{
        struct apbus_ctl *apctl;

        if (apdev == NULL)
                return;

        /* only no pseudo device */
        apctl = apdev->apbd_ctl;
        if (apctl == NULL || apctl->apbc_hwbase == 0)
                return;

        printf("apbus_dev dump (%p)\n", apdev);
        printf("name:           %s\n", apdev->apbd_name);
        printf("vendor:         %s\n", apdev->apbd_vendor);
        printf("atr:            %08x\n", apdev->apbd_atr);
        printf("rev:            %d\n", apdev->apbd_rev);
        printf("driver:         0x%08x\n", (unsigned int)apdev->apbd_driver);
        printf("ctl:            0x%08x\n", (unsigned int)apdev->apbd_ctl);
        printf("link:           0x%08x\n", (unsigned int)apdev->apbd_link);
        printf("\n");

        apctl_dump(apctl);
}