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