mcbus.c revision 1.5 1 /* $NetBSD: mcbus.c,v 1.5 1999/04/10 01:21:38 cgd 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.5 1999/04/10 01:21:38 cgd 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
60 struct mcbus_cpu_busdep mcbus_primary;
61
62 static int mcbusmatch __P((struct device *, struct cfdata *, void *));
63 static void mcbusattach __P((struct device *, struct device *, void *));
64 static int mcbusprint __P((void *, const char *));
65 static int mcbussubmatch __P((struct device *, struct cfdata *, void *));
66 static char *mcbus_node_type_str __P((u_int8_t));
67
68 typedef struct {
69 struct device mcbus_dev;
70 u_int8_t mcbus_types[MCBUS_MID_MAX];
71 } mcbus_softc_t;
72
73 struct cfattach mcbus_ca = {
74 sizeof (mcbus_softc_t), mcbusmatch, mcbusattach
75 };
76
77 extern void mcpcia_config_cleanup __P((void));
78
79
80 static int
81 mcbusprint(aux, cp)
82 void *aux;
83 const char *cp;
84 {
85 struct mcbus_dev_attach_args *tap = aux;
86 printf(" mid %d: %s", tap->ma_mid, mcbus_node_type_str(tap->ma_type));
87 return (UNCONF);
88 }
89
90 static int
91 mcbussubmatch(parent, cf, aux)
92 struct device *parent;
93 struct cfdata *cf;
94 void *aux;
95 {
96 struct mcbus_dev_attach_args *tap = aux;
97 if (tap->ma_name != mcbus_cd.cd_name)
98 return (0);
99 if (cf->cf_loc[MCBUSCF_MID] != MCBUSCF_MID_DEFAULT &&
100 cf->cf_loc[MCBUSCF_MID] != tap->ma_mid)
101 return (0);
102 return ((*cf->cf_attach->ca_match)(parent, cf, aux));
103 }
104
105 static int
106 mcbusmatch(parent, cf, aux)
107 struct device *parent;
108 struct cfdata *cf;
109 void *aux;
110 {
111 struct mainbus_attach_args *ma = aux;
112
113 /* Make sure we're looking for a MCBUS. */
114 if (strcmp(ma->ma_name, mcbus_cd.cd_name) != 0)
115 return (0);
116
117 /*
118 * Only available on 4100 processor type platforms.
119 */
120 if (cputype != ST_DEC_4100)
121 return (0);
122 return (1);
123 }
124
125 static void
126 mcbusattach(parent, self, aux)
127 struct device *parent;
128 struct device *self;
129 void *aux;
130 {
131 static const char *bcs[8] = {
132 "(no bcache)", "1MB BCache", "2MB BCache", "4MB BCache",
133 "??(4)??", "??(5)??", "??(6)??", "??(7)??"
134 };
135 static const u_int8_t pci_mid_order[4] = { 5, 4, 7, 6 };
136 struct mcbus_dev_attach_args ta;
137 mcbus_softc_t *mbp = (mcbus_softc_t *)self;
138 u_int8_t mid;
139 int i;
140
141 printf("\n");
142
143 mbp->mcbus_types[0] = MCBUS_TYPE_RES;
144 for (mid = 1; mid <= MCBUS_MID_MAX; ++mid) {
145 mbp->mcbus_types[mid] = MCBUS_TYPE_UNK;
146 }
147
148 /*
149 * Find and "configure" memory.
150 */
151 ta.ma_name = mcbus_cd.cd_name;
152 ta.ma_gid = MCBUS_GID_FROM_INSTANCE(self->dv_unit);
153 ta.ma_mid = 1;
154 ta.ma_type = MCBUS_TYPE_MEM;
155 mbp->mcbus_types[1] = MCBUS_TYPE_MEM;
156 config_found_sm(self, &ta, mcbusprint, mcbussubmatch);
157
158 /*
159 * Now find PCI busses. In keeping with Digital's ordering
160 * of things, we'll search in a specific MID order.
161 */
162 for (i = 0; i < MCPCIA_PER_MCBUS; i++) {
163 mid = pci_mid_order[i];
164 ta.ma_name = mcbus_cd.cd_name;
165 ta.ma_gid = MCBUS_GID_FROM_INSTANCE(self->dv_unit);
166 ta.ma_mid = mid;
167 ta.ma_type = MCBUS_TYPE_PCI;
168 /*
169 * Attach any children nodes (PCI busses).
170 */
171 config_found_sm(self, &ta, mcbusprint, mcbussubmatch);
172 }
173
174 /*
175 * Deal with hooking CPU instances to MCBUS module ids.
176 *
177 * Note that we do this here because it's the read of
178 * stupid MCPCIA WHOAMI register that can get us the
179 * module ID and type of the configuring CPU.
180 */
181
182 if (mcbus_primary.mcbus_valid) {
183 mid = mcbus_primary.mcbus_cpu_mid;
184 printf("%s mid %d: %s %s\n", self->dv_xname,
185 mid, mcbus_node_type_str(MCBUS_TYPE_CPU),
186 bcs[mcbus_primary.mcbus_bcache & 0x7]);
187 #if 0
188 ta.ma_name = mcbus_cd.cd_name;
189 ta.ma_gid = MCBUS_GID_FROM_INSTANCE(self->dv_unit);
190 ta.ma_mid = mid;
191 ta.ma_type = MCBUS_TYPE_CPU;
192 mbp->mcbus_types[mid] = MCBUS_TYPE_CPU;
193 config_found_sm(self, &ta, mcbusprint, mcbussubmatch);
194 #endif
195 }
196
197 /*
198 * Now clean up after configuring everything.
199 *
200 * This is an unfortunate layering violation- but
201 * we can't enable interrupts until *all* probing
202 * is done, but the code and knowledge to clean
203 * up after probing and to enable interrupts is
204 * down in the MCPCIA layer.
205 */
206 mcpcia_config_cleanup();
207 }
208
209 static char *
210 mcbus_node_type_str(type)
211 u_int8_t type;
212 {
213 switch (type) {
214 case MCBUS_TYPE_RES:
215 panic ("RESERVED TYPE IN MCBUS_NODE_TYPE_STR");
216 break;
217 case MCBUS_TYPE_UNK:
218 panic ("UNKNOWN TYPE IN MCBUS_NODE_TYPE_STR");
219 break;
220 case MCBUS_TYPE_MEM:
221 return ("Memory");
222 case MCBUS_TYPE_CPU:
223 return ("CPU");
224 case MCBUS_TYPE_PCI:
225 return ("PCI Bridge");
226 default:
227 panic("REALLY UNKNWON (%x) TYPE IN MCBUS_NODE_TYPE_STR", type);
228 break;
229 }
230 }
231