Home | History | Annotate | Line # | Download | only in mcbus
mcbus.c revision 1.6.8.1
      1  1.6.8.1  wrstuden /* $NetBSD: mcbus.c,v 1.6.8.1 1999/12/27 18:31:26 wrstuden Exp $ */
      2      1.1    mjacob 
      3      1.1    mjacob /*
      4      1.1    mjacob  * Copyright (c) 1998 by Matthew Jacob
      5      1.1    mjacob  * NASA AMES Research Center.
      6      1.1    mjacob  * All rights reserved.
      7      1.1    mjacob  *
      8      1.1    mjacob  * Redistribution and use in source and binary forms, with or without
      9      1.1    mjacob  * modification, are permitted provided that the following conditions
     10      1.1    mjacob  * are met:
     11      1.1    mjacob  * 1. Redistributions of source code must retain the above copyright
     12      1.1    mjacob  *    notice immediately at the beginning of the file, without modification,
     13      1.1    mjacob  *    this list of conditions, and the following disclaimer.
     14      1.1    mjacob  * 2. Redistributions in binary form must reproduce the above copyright
     15      1.1    mjacob  *    notice, this list of conditions and the following disclaimer in the
     16      1.1    mjacob  *    documentation and/or other materials provided with the distribution.
     17      1.1    mjacob  * 3. The name of the author may not be used to endorse or promote products
     18      1.1    mjacob  *    derived from this software without specific prior written permission.
     19      1.1    mjacob  *
     20      1.1    mjacob  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
     21      1.1    mjacob  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     22      1.1    mjacob  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     23      1.1    mjacob  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
     24      1.1    mjacob  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     25      1.1    mjacob  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     26      1.1    mjacob  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     27      1.1    mjacob  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     28      1.1    mjacob  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     29      1.1    mjacob  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     30      1.1    mjacob  * SUCH DAMAGE.
     31      1.1    mjacob  */
     32      1.1    mjacob 
     33      1.1    mjacob /*
     34      1.2    mjacob  * Autoconfiguration routines for the MCBUS system
     35      1.2    mjacob  * bus found on AlphaServer 4100 systems.
     36      1.1    mjacob  */
     37      1.1    mjacob 
     38      1.1    mjacob #include <sys/cdefs.h>			/* RCS ID & Copyright macro defns */
     39      1.1    mjacob 
     40  1.6.8.1  wrstuden __KERNEL_RCSID(0, "$NetBSD: mcbus.c,v 1.6.8.1 1999/12/27 18:31:26 wrstuden Exp $");
     41      1.1    mjacob 
     42      1.1    mjacob #include <sys/param.h>
     43      1.1    mjacob #include <sys/systm.h>
     44      1.1    mjacob #include <sys/device.h>
     45      1.1    mjacob #include <sys/malloc.h>
     46      1.1    mjacob 
     47      1.1    mjacob #include <machine/autoconf.h>
     48      1.1    mjacob #include <machine/rpb.h>
     49      1.1    mjacob #include <machine/pte.h>
     50      1.1    mjacob 
     51      1.1    mjacob #include <alpha/mcbus/mcbusreg.h>
     52      1.1    mjacob #include <alpha/mcbus/mcbusvar.h>
     53      1.1    mjacob 
     54      1.1    mjacob #include "locators.h"
     55      1.1    mjacob 
     56      1.1    mjacob #define KV(_addr)	((caddr_t)ALPHA_PHYS_TO_K0SEG((_addr)))
     57  1.6.8.1  wrstuden #define	MCPCIA_EXISTS(mid, gid)	\
     58  1.6.8.1  wrstuden 	(!badaddr((void *)KV(MCPCIA_BRIDGE_ADDR(gid, mid)), sizeof (u_int32_t)))
     59      1.1    mjacob 
     60      1.1    mjacob extern struct cfdriver mcbus_cd;
     61      1.1    mjacob 
     62      1.1    mjacob struct mcbus_cpu_busdep mcbus_primary;
     63      1.1    mjacob 
     64      1.1    mjacob static int	mcbusmatch __P((struct device *, struct cfdata *, void *));
     65      1.1    mjacob static void	mcbusattach __P((struct device *, struct device *, void *));
     66      1.1    mjacob static int	mcbusprint __P((void *, const char *));
     67  1.6.8.1  wrstuden static int	mcbussbm __P((struct device *, struct cfdata *, void *));
     68      1.1    mjacob static char	*mcbus_node_type_str __P((u_int8_t));
     69      1.1    mjacob 
     70      1.1    mjacob typedef struct {
     71      1.1    mjacob 	struct device	mcbus_dev;
     72      1.1    mjacob 	u_int8_t	mcbus_types[MCBUS_MID_MAX];
     73      1.1    mjacob } mcbus_softc_t;
     74      1.1    mjacob 
     75      1.1    mjacob struct cfattach mcbus_ca = {
     76      1.1    mjacob 	sizeof (mcbus_softc_t), mcbusmatch, mcbusattach
     77      1.1    mjacob };
     78      1.1    mjacob 
     79      1.6   thorpej /*
     80      1.6   thorpej  * Tru64 UNIX (formerly Digital UNIX (formerly DEC OSF/1)) probes for MCPCIAs
     81      1.6   thorpej  * in the following order:
     82      1.6   thorpej  *
     83      1.6   thorpej  *	5, 4, 7, 6
     84      1.6   thorpej  *
     85      1.6   thorpej  * This is so that the built-in CD-ROM on the internal 53c810 is always
     86      1.6   thorpej  * dka500.  We probe them in the same order, for consistency.
     87      1.6   thorpej  */
     88      1.6   thorpej const int mcbus_mcpcia_probe_order[] = { 5, 4, 7, 6 };
     89      1.6   thorpej 
     90      1.1    mjacob extern void mcpcia_config_cleanup __P((void));
     91      1.1    mjacob 
     92      1.1    mjacob static int
     93      1.1    mjacob mcbusprint(aux, cp)
     94      1.1    mjacob 	void *aux;
     95      1.1    mjacob 	const char *cp;
     96      1.1    mjacob {
     97      1.1    mjacob 	struct mcbus_dev_attach_args *tap = aux;
     98      1.1    mjacob 	printf(" mid %d: %s", tap->ma_mid, mcbus_node_type_str(tap->ma_type));
     99      1.1    mjacob 	return (UNCONF);
    100      1.1    mjacob }
    101      1.1    mjacob 
    102      1.1    mjacob static int
    103  1.6.8.1  wrstuden mcbussbm(parent, cf, aux)
    104      1.1    mjacob 	struct device *parent;
    105      1.1    mjacob 	struct cfdata *cf;
    106      1.1    mjacob 	void *aux;
    107      1.1    mjacob {
    108      1.1    mjacob 	struct mcbus_dev_attach_args *tap = aux;
    109      1.1    mjacob 	if (tap->ma_name != mcbus_cd.cd_name)
    110      1.1    mjacob 		return (0);
    111      1.1    mjacob 	if (cf->cf_loc[MCBUSCF_MID] != MCBUSCF_MID_DEFAULT &&
    112      1.1    mjacob 	    cf->cf_loc[MCBUSCF_MID] != tap->ma_mid)
    113      1.1    mjacob 		return (0);
    114      1.1    mjacob 	return ((*cf->cf_attach->ca_match)(parent, cf, aux));
    115      1.1    mjacob }
    116      1.1    mjacob 
    117      1.1    mjacob static int
    118      1.1    mjacob mcbusmatch(parent, cf, aux)
    119      1.1    mjacob 	struct device *parent;
    120      1.1    mjacob 	struct cfdata *cf;
    121      1.1    mjacob 	void *aux;
    122      1.1    mjacob {
    123      1.3   thorpej 	struct mainbus_attach_args *ma = aux;
    124      1.1    mjacob 
    125      1.1    mjacob 	/* Make sure we're looking for a MCBUS. */
    126      1.3   thorpej 	if (strcmp(ma->ma_name, mcbus_cd.cd_name) != 0)
    127      1.1    mjacob 		return (0);
    128      1.1    mjacob 
    129      1.1    mjacob 	/*
    130      1.1    mjacob 	 * Only available on 4100 processor type platforms.
    131      1.1    mjacob 	 */
    132      1.1    mjacob 	if (cputype != ST_DEC_4100)
    133      1.1    mjacob 		return (0);
    134      1.1    mjacob 	return (1);
    135      1.1    mjacob }
    136      1.1    mjacob 
    137      1.1    mjacob static void
    138      1.1    mjacob mcbusattach(parent, self, aux)
    139      1.1    mjacob 	struct device *parent;
    140      1.1    mjacob 	struct device *self;
    141      1.1    mjacob 	void *aux;
    142      1.1    mjacob {
    143      1.4    mjacob 	static const char *bcs[8] = {
    144      1.4    mjacob 		"(no bcache)", "1MB BCache", "2MB BCache", "4MB BCache",
    145      1.4    mjacob 		"??(4)??", "??(5)??", "??(6)??", "??(7)??"
    146      1.1    mjacob 	};
    147      1.1    mjacob 	struct mcbus_dev_attach_args ta;
    148      1.1    mjacob 	mcbus_softc_t *mbp = (mcbus_softc_t *)self;
    149      1.6   thorpej 	int i, mid;
    150      1.1    mjacob 
    151      1.1    mjacob 	printf("\n");
    152      1.1    mjacob 
    153      1.1    mjacob 	mbp->mcbus_types[0] = MCBUS_TYPE_RES;
    154      1.1    mjacob 	for (mid = 1; mid <= MCBUS_MID_MAX; ++mid) {
    155      1.1    mjacob 		mbp->mcbus_types[mid] = MCBUS_TYPE_UNK;
    156      1.1    mjacob 	}
    157      1.1    mjacob 
    158      1.1    mjacob 	/*
    159      1.1    mjacob 	 * Find and "configure" memory.
    160      1.1    mjacob 	 */
    161      1.1    mjacob 	ta.ma_name = mcbus_cd.cd_name;
    162      1.6   thorpej 	/*
    163      1.6   thorpej 	 * XXX If we ever support more than one MCBUS, we'll
    164      1.6   thorpej 	 * XXX have to probe for them, and map them to unit
    165      1.6   thorpej 	 * XXX numbers.
    166      1.6   thorpej 	 */
    167      1.6   thorpej 	ta.ma_gid = MCBUS_GID_FROM_INSTANCE(0);
    168      1.1    mjacob 	ta.ma_mid = 1;
    169      1.1    mjacob 	ta.ma_type = MCBUS_TYPE_MEM;
    170      1.1    mjacob 	mbp->mcbus_types[1] = MCBUS_TYPE_MEM;
    171  1.6.8.1  wrstuden 	(void) config_found_sm(self, &ta, mcbusprint, mcbussbm);
    172      1.1    mjacob 
    173      1.1    mjacob 	/*
    174      1.6   thorpej 	 * Now find PCI busses.
    175      1.1    mjacob 	 */
    176      1.1    mjacob 	for (i = 0; i < MCPCIA_PER_MCBUS; i++) {
    177      1.6   thorpej 		mid = mcbus_mcpcia_probe_order[i];
    178      1.1    mjacob 		ta.ma_name = mcbus_cd.cd_name;
    179      1.6   thorpej 		/*
    180      1.6   thorpej 		 * XXX If we ever support more than one MCBUS, we'll
    181      1.6   thorpej 		 * XXX have to probe for them, and map them to unit
    182      1.6   thorpej 		 * XXX numbers.
    183      1.6   thorpej 		 */
    184      1.6   thorpej 		ta.ma_gid = MCBUS_GID_FROM_INSTANCE(0);
    185      1.1    mjacob 		ta.ma_mid = mid;
    186      1.1    mjacob 		ta.ma_type = MCBUS_TYPE_PCI;
    187  1.6.8.1  wrstuden 		if (MCPCIA_EXISTS(ta.ma_mid, ta.ma_gid)) {
    188  1.6.8.1  wrstuden 			(void) config_found_sm(self, &ta, mcbusprint, mcbussbm);
    189  1.6.8.1  wrstuden 		}
    190      1.1    mjacob 	}
    191      1.1    mjacob 
    192      1.1    mjacob 	/*
    193      1.1    mjacob 	 * Deal with hooking CPU instances to MCBUS module ids.
    194      1.1    mjacob 	 *
    195      1.1    mjacob 	 * Note that we do this here because it's the read of
    196      1.1    mjacob 	 * stupid MCPCIA WHOAMI register that can get us the
    197      1.1    mjacob 	 * module ID and type of the configuring CPU.
    198      1.1    mjacob 	 */
    199      1.1    mjacob 
    200      1.1    mjacob 	if (mcbus_primary.mcbus_valid) {
    201      1.1    mjacob 		mid = mcbus_primary.mcbus_cpu_mid;
    202      1.1    mjacob 		printf("%s mid %d: %s %s\n", self->dv_xname,
    203      1.1    mjacob 		    mid, mcbus_node_type_str(MCBUS_TYPE_CPU),
    204      1.4    mjacob 		    bcs[mcbus_primary.mcbus_bcache & 0x7]);
    205      1.6   thorpej #if 0
    206      1.1    mjacob 		ta.ma_name = mcbus_cd.cd_name;
    207      1.6   thorpej 		/*
    208      1.6   thorpej 		 * XXX If we ever support more than one MCBUS, we'll
    209      1.6   thorpej 		 * XXX have to probe for them, and map them to unit
    210      1.6   thorpej 		 * XXX numbers.
    211      1.6   thorpej 		 */
    212      1.6   thorpej 		ta.ma_gid = MCBUS_GID_FROM_INSTANCE(0);
    213      1.1    mjacob 		ta.ma_mid = mid;
    214      1.1    mjacob 		ta.ma_type = MCBUS_TYPE_CPU;
    215      1.1    mjacob 		mbp->mcbus_types[mid] = MCBUS_TYPE_CPU;
    216  1.6.8.1  wrstuden 		(void) config_found_sm(self, &ta, mcbusprint, mcbussbm);
    217      1.1    mjacob #endif
    218      1.1    mjacob 	}
    219      1.1    mjacob 
    220      1.1    mjacob 	/*
    221      1.1    mjacob 	 * Now clean up after configuring everything.
    222      1.1    mjacob 	 *
    223      1.1    mjacob 	 * This is an unfortunate layering violation- but
    224      1.1    mjacob 	 * we can't enable interrupts until *all* probing
    225      1.1    mjacob 	 * is done, but the code and knowledge to clean
    226      1.1    mjacob 	 * up after probing and to enable interrupts is
    227      1.1    mjacob 	 * down in the MCPCIA layer.
    228      1.1    mjacob 	 */
    229      1.1    mjacob 	mcpcia_config_cleanup();
    230      1.1    mjacob }
    231      1.1    mjacob 
    232      1.1    mjacob static char *
    233      1.1    mjacob mcbus_node_type_str(type)
    234      1.1    mjacob 	u_int8_t type;
    235      1.1    mjacob {
    236      1.1    mjacob 	switch (type) {
    237      1.1    mjacob 	case MCBUS_TYPE_RES:
    238      1.1    mjacob 		panic ("RESERVED TYPE IN MCBUS_NODE_TYPE_STR");
    239      1.1    mjacob 		break;
    240      1.1    mjacob 	case MCBUS_TYPE_UNK:
    241      1.1    mjacob 		panic ("UNKNOWN TYPE IN MCBUS_NODE_TYPE_STR");
    242      1.1    mjacob 		break;
    243      1.1    mjacob 	case MCBUS_TYPE_MEM:
    244      1.1    mjacob 		return ("Memory");
    245      1.1    mjacob 	case MCBUS_TYPE_CPU:
    246      1.1    mjacob 		return ("CPU");
    247      1.1    mjacob 	case MCBUS_TYPE_PCI:
    248      1.1    mjacob 		return ("PCI Bridge");
    249      1.1    mjacob 	default:
    250      1.1    mjacob 		panic("REALLY UNKNWON (%x) TYPE IN MCBUS_NODE_TYPE_STR", type);
    251      1.1    mjacob 		break;
    252      1.1    mjacob 	}
    253      1.1    mjacob }
    254