/*-
 * (MPSAFE)
 *
 * Copyright (c) 1999 Kazutaka YOKOTA <yokota@zodiac.mech.utsunomiya-u.ac.jp>
 * 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 as
 *    the first lines of this file unmodified.
 * 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.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``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 AUTHORS 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.
 *
 * $FreeBSD: src/sys/isa/atkbd_isa.c,v 1.7.2.3 2001/08/01 10:42:28 yokota Exp $
 */

#include "opt_kbd.h"

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/bus.h>
#include <sys/rman.h>
#include <sys/thread.h>
#include <sys/machintr.h>

#include <sys/kbio.h>
#include <dev/misc/kbd/kbdreg.h>
#include <dev/misc/kbd/atkbdreg.h>
#include <dev/misc/kbd/atkbdcreg.h>

#include <bus/isa/isareg.h>
#include <bus/isa/isavar.h>

#if 0
#define lwkt_gettoken(x)
#define lwkt_reltoken(x)
#endif

typedef struct {
        struct resource *intr;
        void            *ih;
} atkbd_softc_t;

devclass_t      atkbd_devclass;

static int      atkbdprobe(device_t dev);
static int      atkbdattach(device_t dev);
static int      atkbdresume(device_t dev);
static void     atkbd_isa_intr(void *arg);

static device_method_t atkbd_methods[] = {
        DEVMETHOD(device_probe,         atkbdprobe),
        DEVMETHOD(device_attach,        atkbdattach),
        DEVMETHOD(device_resume,        atkbdresume),
        DEVMETHOD_END
};

static driver_t atkbd_driver = {
        ATKBD_DRIVER_NAME,
        atkbd_methods,
        sizeof(atkbd_softc_t),
};

static int
atkbdprobe(device_t dev)
{
        uintptr_t irq;
        uintptr_t flags;

        device_set_desc(dev, "AT Keyboard");

        /* obtain parameters */
        BUS_READ_IVAR(device_get_parent(dev), dev, KBDC_IVAR_IRQ, &irq);
        BUS_READ_IVAR(device_get_parent(dev), dev, KBDC_IVAR_FLAGS, &flags);

        /* probe the device */
        return atkbd_probe_unit(device_get_unit(dev),
                                device_get_unit(device_get_parent(dev)),
                                irq, flags);
}

static int
atkbdattach(device_t dev)
{
        atkbd_softc_t *sc;
        keyboard_t *kbd;
        uintptr_t irq;
        uintptr_t flags;
        int rid;
        int error;

        sc = device_get_softc(dev);

        BUS_READ_IVAR(device_get_parent(dev), dev, KBDC_IVAR_IRQ, &irq);
        BUS_READ_IVAR(device_get_parent(dev), dev, KBDC_IVAR_FLAGS, &flags);

        error = atkbd_attach_unit(device_get_unit(dev), &kbd,
                                  device_get_unit(device_get_parent(dev)),
                                  irq, flags);
        if (error)
                return error;

        /* declare our interrupt handler */
        rid = 0;
        sc->intr = bus_alloc_legacy_irq_resource(dev, &rid, irq, RF_ACTIVE);
        BUS_SETUP_INTR(device_get_parent(dev), dev, sc->intr, INTR_MPSAFE,
                       atkbd_isa_intr, kbd, &sc->ih, NULL, NULL);

        return 0;
}

static int
atkbdresume(device_t dev)
{
        atkbd_softc_t *sc;
        keyboard_t *kbd;
        int args[2];

        lwkt_gettoken(&kbd_token);
        sc = device_get_softc(dev);
        kbd = kbd_get_keyboard(kbd_find_keyboard(ATKBD_DRIVER_NAME,
                                                 device_get_unit(dev)));
        if (kbd) {
                kbd->kb_flags &= ~KB_INITIALIZED;
                args[0] = device_get_unit(device_get_parent(dev));
                args[1] = rman_get_start(sc->intr);
                sw_init(kbdsw[kbd->kb_index], device_get_unit(dev), &kbd,
                                              args, device_get_flags(dev));
                kbd_clear_state(kbd);

        }
        lwkt_reltoken(&kbd_token);
        return 0;
}

static void
atkbd_isa_intr(void *arg)
{
        keyboard_t *kbd;

        lwkt_gettoken(&kbd_token);
        kbd = (keyboard_t *)arg;
        kbd_intr(kbd, NULL);
        lwkt_reltoken(&kbd_token);
}

DRIVER_MODULE(atkbd, atkbdc, atkbd_driver, atkbd_devclass, NULL, NULL);