/* $NetBSD: dec_2000_300.c,v 1.23 2025/03/09 01:06:41 thorpej Exp $ */

/*-
 * Copyright (c) 2000 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by Jason R. Thorpe.
 *
 * 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.
 *
 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 * ``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 FOUNDATION OR CONTRIBUTORS
 * 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.
 */

/*
 * Copyright (c) 1995, 1996 Carnegie-Mellon University.
 * All rights reserved.
 *
 * Author: Chris G. Demetriou
 *
 * Permission to use, copy, modify and distribute this software and
 * its documentation is hereby granted, provided that both the copyright
 * notice and this permission notice appear in all copies of the
 * software, derivative works or modified versions, and any portions
 * thereof, and that both notices appear in supporting documentation.
 *
 * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
 * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
 * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
 *
 * Carnegie Mellon requests users of this software to return to
 *
 *  Software Distribution Coordinator  or  Software.Distribution@CS.CMU.EDU
 *  School of Computer Science
 *  Carnegie Mellon University
 *  Pittsburgh PA 15213-3890
 *
 * any improvements or extensions that they make and grant Carnegie the
 * rights to redistribute these changes.
 */

#include "opt_kgdb.h"

#include <sys/cdefs.h>                  /* RCS ID & Copyright macro defns */

__KERNEL_RCSID(0, "$NetBSD: dec_2000_300.c,v 1.23 2025/03/09 01:06:41 thorpej Exp $");

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/device.h>
#include <sys/termios.h>
#include <sys/conf.h>

#include <machine/rpb.h>
#include <machine/autoconf.h>
#include <machine/cpuconf.h>

#include <dev/eisa/eisavar.h>
#include <dev/isa/isareg.h>
#include <dev/isa/isavar.h>
#include <dev/ic/i8042reg.h>

#include <dev/ic/comvar.h>
#include <dev/ic/comreg.h>
#include <dev/ic/pckbcvar.h>

#include <alpha/jensenio/jenseniovar.h>

#include <dev/scsipi/scsi_all.h>
#include <dev/scsipi/scsipi_all.h>
#include <dev/scsipi/scsiconf.h>

#include "pckbd.h"

void dec_2000_300_init(void);
static void dec_2000_300_cons_init(void);
static void dec_2000_300_device_register(device_t, void *);

#ifdef KGDB
#include <machine/db_machdep.h>

static const char *kgdb_devlist[] = {
        "com",
        NULL,
};
#endif /* KGDB */

void
dec_2000_300_init(void)
{

        platform.family = "DECpc AXP 150 (\"Jensen\")";

        if ((platform.model = alpha_dsr_sysname()) == NULL) {
                /* XXX Don't know the system variations, yet. */
                platform.model = alpha_unknown_sysname();
        }

        platform.iobus = "jensenio";
        platform.cons_init = dec_2000_300_cons_init;
        platform.device_register = dec_2000_300_device_register;
        platform.page_physload = jensenio_page_physload;
}

static void
dec_2000_300_cons_init(void)
{
        struct ctb_tt *ctb;
        struct jensenio_config *jcp;
        extern struct jensenio_config jensenio_configuration;

        jcp = &jensenio_configuration;
        jensenio_init(jcp);

        ctb = (struct ctb_tt *)(((char *)hwrpb) + hwrpb->rpb_ctb_off);

        /*
         * The Jensen uses an older (pre-Type 4) CTB format.  The
         * console type is specified directly by ctb_type, and only
         * minimal info is given, only for the serial console.
         *
         * Thankfully, the only graphics device we can have is
         * ISA/EISA, so it really doesn't matter too much.
         */

        switch (ctb->ctb_type) {
        case CTB_PRINTERPORT:
                /* serial console... */
                /* XXX */
                {
#if 0
                        printf("CTB CSR = 0x%08lx\n", ctb->ctb_csr);
                        printf("CTB BAUD = %lu\n", ctb->ctb_baud);
#endif
                        /*
                         * Delay to allow PROM putchars to complete.
                         * FIFO depth * character time,
                         * character time = (1000000 / (defaultrate / 10))
                         */
                        DELAY(160000000 / ctb->ctb_baud);

                        if (comcnattach(&jcp->jc_internal_iot, 0x3f8,
                            ctb->ctb_baud, COM_FREQ, COM_TYPE_NORMAL,
                            (TTYDEF_CFLAG & ~(CSIZE | PARENB)) | CS8))
                                panic("can't init serial console");

                        break;
                }

        case CTB_GRAPHICS:
#if NPCKBD > 0
                /* display console... */
                /* XXX */
                (void) pckbc_cnattach(&jcp->jc_internal_iot, IO_KBD, KBCMDP,
                    PCKBC_KBD_SLOT, 0);

                isa_display_console(&jcp->jc_eisa_iot, &jcp->jc_eisa_memt);
#else
                panic("not configured to use display && keyboard console");
#endif
                break;


        default:
                goto badconsole;
        }
#ifdef KGDB
        /* Attach the KGDB device. */
        alpha_kgdb_init(kgdb_devlist, &jcp->jc_internal_iot);
#endif /* KGDB */

        return;
 badconsole:
        printf("ctb->ctb_type = 0x%lx\n", ctb->ctb_type);
        printf("ctb->ctb_csr = 0x%lx\n", ctb->ctb_csr);
        printf("ctb->ctb_baud = %lu\n", ctb->ctb_baud);

        panic("consinit: unknown console type %lu",
            ctb->ctb_type);
}

static void
dec_2000_300_device_register(device_t dev, void *aux)
{
        static device_t eisadev, isadev, scsidev;
        struct bootdev_data *b = bootdev_data;
        device_t parent = device_parent(dev);

        if (booted_device != NULL || b == NULL) {
                return;
        }

        if (eisadev == NULL && device_is_a(dev, "eisa")) {
                eisadev = dev;
        }

        if (isadev == NULL && device_is_a(dev, "isa")) {
                isadev = dev;
        }

        if (bootdev_is_disk && scsidev == NULL) {
                if (eisadev != NULL && parent == eisadev) {
                        struct eisa_attach_args *ea = aux;

                        if (b->slot == ea->ea_slot) {
                                scsidev = dev;
#if 0
                                printf("\nscsidev = %s\n",
                                    device_xname(scsidev));
#endif
                        }
                }
                return;
        }

        if (bootdev_is_disk &&
            (device_is_a(dev, "sd") ||
             device_is_a(dev, "st") ||
             device_is_a(dev, "cd"))) {
                struct scsipibus_attach_args *sa = aux;

                if (device_parent(parent) != scsidev)
                        return;

                if (b->unit / 100 != sa->sa_periph->periph_target)
                        return;

                /* XXX LUN! */

                switch (b->boot_dev_type) {
                case 0:
                        if (!device_is_a(dev, "sd") &&
                            !device_is_a(dev, "cd"))
                                return;
                        break;
                case 1:
                        if (!device_is_a(dev, "st"))
                                return;
                        break;
                default:
                        return;
                }

                goto foundit;
        }

        if (bootdev_is_net) {
                /*
                 * XXX WHAT ABOUT ISA NETWORK CARDS?
                 */
                if (eisadev != NULL && parent == eisadev) {
                        struct eisa_attach_args *ea = aux;

                        if (b->slot == ea->ea_slot) {
                                goto foundit;
                        }
                }
        }

        return;

 foundit:
        booted_device = dev;
#if 0
        printf("\nbooted_device = %s\n", device_xname(booted_device));
#endif
}