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