/* $NetBSD: tcasic.c,v 1.52 2021/08/07 16:18:41 thorpej Exp $ */

/*
 * Copyright (c) 1994, 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_dec_3000_300.h"
#include "opt_dec_3000_500.h"

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

__KERNEL_RCSID(0, "$NetBSD: tcasic.c,v 1.52 2021/08/07 16:18:41 thorpej Exp $");

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

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

#include <dev/tc/tcvar.h>
#include <alpha/tc/tc_conf.h>

/* Definition of the driver for autoconfig. */
static int      tcasicmatch(device_t, cfdata_t, void *);
static void     tcasicattach(device_t, device_t, void *);

CFATTACH_DECL_NEW(tcasic, 0,
    tcasicmatch, tcasicattach, NULL, NULL);

extern struct cfdriver tcasic_cd;

static int      tcasicprint(void *, const char *);

/* There can be only one. */
static int      tcasicfound;

static int
tcasicmatch(device_t parent, cfdata_t cf, void *aux)
{
        struct mainbus_attach_args *ma = aux;

        /* Make sure that we're looking for a TURBOchannel ASIC. */
        if (strcmp(ma->ma_name, tcasic_cd.cd_name))
                return (0);

        /* Make sure that the system supports a TURBOchannel ASIC. */
        if ((cputype != ST_DEC_3000_500) && (cputype != ST_DEC_3000_300))
                return (0);

        if (tcasicfound)
                return (0);

        return (1);
}

static void
tcasicattach(device_t parent, device_t self, void *aux)
{
        struct tcbus_attach_args tba;
        void (*intr_setup)(void);
        void (*iointr)(void *, unsigned long);

        printf("\n");
        tcasicfound = 1;

        switch (cputype) {
#ifdef DEC_3000_500
        case ST_DEC_3000_500:

                intr_setup = tc_3000_500_intr_setup;
                iointr = tc_3000_500_iointr;

                tba.tba_speed = TC_SPEED_25_MHZ;
                tba.tba_nslots = tc_3000_500_nslots;
                tba.tba_slots = tc_3000_500_slots;
                if (hwrpb->rpb_variation & SV_GRAPHICS) {
                        tba.tba_nbuiltins = tc_3000_500_graphics_nbuiltins;
                        tba.tba_builtins = tc_3000_500_graphics_builtins;
                } else {
                        tba.tba_nbuiltins = tc_3000_500_nographics_nbuiltins;
                        tba.tba_builtins = tc_3000_500_nographics_builtins;
                }
                tba.tba_intr_evcnt = tc_3000_500_intr_evcnt;
                tba.tba_intr_establish = tc_3000_500_intr_establish;
                tba.tba_intr_disestablish = tc_3000_500_intr_disestablish;
                tba.tba_get_dma_tag = tc_dma_get_tag_3000_500;

                /* Do 3000/500-specific DMA setup now. */
                tc_dma_init_3000_500(tc_3000_500_nslots);
                break;
#endif /* DEC_3000_500 */

#ifdef DEC_3000_300
        case ST_DEC_3000_300:

                intr_setup = tc_3000_300_intr_setup;
                iointr = tc_3000_300_iointr;

                tba.tba_speed = TC_SPEED_12_5_MHZ;
                tba.tba_nslots = tc_3000_300_nslots;
                tba.tba_slots = tc_3000_300_slots;
                tba.tba_nbuiltins = tc_3000_300_nbuiltins;
                tba.tba_builtins = tc_3000_300_builtins;
                tba.tba_intr_evcnt = tc_3000_300_intr_evcnt;
                tba.tba_intr_establish = tc_3000_300_intr_establish;
                tba.tba_intr_disestablish = tc_3000_300_intr_disestablish;
                tba.tba_get_dma_tag = tc_dma_get_tag_3000_300;
                break;
#endif /* DEC_3000_300 */

        default:
                panic("tcasicattach: bad cputype");
        }

        tba.tba_busname = "tc";
        tba.tba_memt = tc_bus_mem_init(NULL);
        
        tc_dma_init();

        (*intr_setup)();

        /* They all come in at 0x800. */
        mutex_enter(&cpu_lock);
        scb_set(0x800, iointr, NULL);
        mutex_exit(&cpu_lock);

        config_found(self, &tba, tcasicprint, CFARGS_NONE);
}

static int
tcasicprint(void *aux, const char *pnp)
{

        /* only TCs can attach to tcasics; easy. */
        if (pnp)
                aprint_normal("tc at %s", pnp);
        return (UNCONF);
}

#include "wsdisplay.h"

#if NWSDISPLAY > 0

#include "sfb.h"
#include "sfbp.h"
#include "cfb.h"
#include "mfb.h"
#include "tfb.h"
#include "px.h"
#include "pxg.h"

extern void     sfb_cnattach(tc_addr_t);
extern void     sfbp_cnattach(tc_addr_t);
extern void     cfb_cnattach(tc_addr_t);
extern void     mfb_cnattach(tc_addr_t);
extern void     tfb_cnattach(tc_addr_t);
extern void     px_cnattach(tc_addr_t);
extern void     pxg_cnattach(tc_addr_t);

struct cnboards {
        const char      *cb_tcname;
        void    (*cb_cnattach)(tc_addr_t);
} static const cnboards[] = {
#if NSFB > 0
        { "PMAGB-BA", sfb_cnattach },
#endif
#if NSFBP > 0
        { "PMAGD   ", sfbp_cnattach },
#endif
#if NCFB > 0
        { "PMAG-BA ", cfb_cnattach },
#endif
#if NMFB > 0
        { "PMAG-AA ", mfb_cnattach },
#endif
#if NTFB > 0
        { "PMAG-JA ", tfb_cnattach },
#endif
#if NPX > 0
        { "PMAG-CA ", px_cnattach },
#endif
#if NPXG > 0
        { "PMAG-DA ", pxg_cnattach },
        { "PMAG-FA ", pxg_cnattach },
        { "PMAG-FB ", pxg_cnattach },
        { "PMAGB-FA", pxg_cnattach },
        { "PMAGB-FB", pxg_cnattach },
#endif
};

/*
 * tc_fb_cnattach --
 *      Attempt to attach the appropriate display driver to the
 * output console.
 */
int
tc_fb_cnattach(tc_addr_t tcaddr)
{
        char tcname[TC_ROM_LLEN];
        int i;

        if (tc_badaddr(tcaddr) || (tc_checkslot(tcaddr, tcname, NULL) == 0))
                return (EINVAL);

        for (i = 0; i < sizeof(cnboards) / sizeof(cnboards[0]); i++)
                if (strncmp(tcname, cnboards[i].cb_tcname, TC_ROM_LLEN) == 0)
                        break;

        if (i == sizeof(cnboards) / sizeof(cnboards[0]))
                return (ENXIO);

        (cnboards[i].cb_cnattach)(tcaddr);
        return (0);
}
#endif /* if NWSDISPLAY > 0 */