tsc.c revision 1.18 1 /* $NetBSD: tsc.c,v 1.18 2010/10/07 19:55:02 hans Exp $ */
2
3 /*-
4 * Copyright (c) 1999 by Ross Harvey. All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. All advertising materials mentioning features or use of this software
15 * must display the following acknowledgement:
16 * This product includes software developed by Ross Harvey.
17 * 4. The name of Ross Harvey 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 ROSS HARVEY ``AS IS'' AND ANY EXPRESS
21 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
22 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURP0SE
23 * ARE DISCLAIMED. IN NO EVENT SHALL ROSS HARVEY BE LIABLE FOR ANY
24 * 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 #include "opt_dec_6600.h"
35
36 #include <sys/cdefs.h>
37
38 __KERNEL_RCSID(0, "$NetBSD: tsc.c,v 1.18 2010/10/07 19:55:02 hans Exp $");
39
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/device.h>
43 #include <sys/malloc.h>
44
45 #include <machine/autoconf.h>
46 #include <machine/rpb.h>
47 #include <machine/sysarch.h>
48
49 #include <dev/isa/isareg.h>
50 #include <dev/isa/isavar.h>
51 #include <dev/pci/pcireg.h>
52 #include <dev/pci/pcivar.h>
53 #include <alpha/pci/tsreg.h>
54 #include <alpha/pci/tsvar.h>
55
56 #ifdef DEC_6600
57 #include <alpha/pci/pci_6600.h>
58 #endif
59
60 #define tsc() { Generate ctags(1) key. }
61
62 static int tscmatch(device_t, cfdata_t, void *);
63 static void tscattach(device_t, device_t, void *);
64
65 CFATTACH_DECL_NEW(tsc, 0, tscmatch, tscattach, NULL, NULL);
66
67 extern struct cfdriver tsc_cd;
68
69 struct tsp_config tsp_configuration[2];
70
71 static int tscprint(void *, const char *pnp);
72
73 static int tspmatch(device_t, cfdata_t, void *);
74 static void tspattach(device_t, device_t, void *);
75
76 CFATTACH_DECL_NEW(tsp, 0, tspmatch, tspattach, NULL, NULL);
77
78 extern struct cfdriver tsp_cd;
79
80 static int tsp_bus_get_window(int, int,
81 struct alpha_bus_space_translation *);
82
83 /* There can be only one */
84 static int tscfound;
85
86 /* Which hose is the display console connected to? */
87 int tsp_console_hose;
88
89 static int
90 tscmatch(device_t parent, cfdata_t match, void *aux)
91 {
92 struct mainbus_attach_args *ma = aux;
93
94 return cputype == ST_DEC_6600
95 && strcmp(ma->ma_name, tsc_cd.cd_name) == 0
96 && !tscfound;
97 }
98
99 static void
100 tscattach(device_t parent, device_t self, void * aux)
101 {
102 int i;
103 int nbus;
104 uint64_t csc, aar;
105 struct tsp_attach_args tsp;
106 struct mainbus_attach_args *ma = aux;
107
108 tscfound = 1;
109
110 csc = LDQP(TS_C_CSC);
111
112 nbus = 1 + (CSC_BC(csc) >= 2);
113 printf(": 21272 Core Logic Chipset, Cchip rev %d\n"
114 "%s%d: %c Dchips, %d memory bus%s of %d bytes\n",
115 (int)MISC_REV(LDQP(TS_C_MISC)),
116 ma->ma_name, ma->ma_slot, "2448"[CSC_BC(csc)],
117 nbus, nbus > 1 ? "es" : "", 16 + 16 * ((csc & CSC_AW) != 0));
118 printf("%s%d: arrays present: ", ma->ma_name, ma->ma_slot);
119 for(i = 0; i < 4; ++i) {
120 aar = LDQP(TS_C_AAR0 + i * TS_STEP);
121 printf("%s%dMB%s", i ? ", " : "", (8 << AAR_ASIZ(aar)) & ~0xf,
122 aar & AAR_SPLIT ? " (split)" : "");
123 }
124 printf(", Dchip 0 rev %d\n", (int)LDQP(TS_D_DREV) & 0xf);
125
126 memset(&tsp, 0, sizeof tsp);
127 tsp.tsp_name = "tsp";
128 config_found(self, &tsp, NULL);
129
130 if(LDQP(TS_C_CSC) & CSC_P1P) {
131 ++tsp.tsp_slot;
132 config_found(self, &tsp, tscprint);
133 }
134 }
135
136 static int
137 tscprint(void *aux, const char *p)
138 {
139 register struct tsp_attach_args *tsp = aux;
140
141 if(p)
142 aprint_normal("%s%d at %s", tsp->tsp_name, tsp->tsp_slot, p);
143 return UNCONF;
144 }
145
146 #define tsp() { Generate ctags(1) key. }
147
148 static int
149 tspmatch(device_t parent, cfdata_t match, void *aux)
150 {
151 struct tsp_attach_args *t = aux;
152
153 return cputype == ST_DEC_6600
154 && strcmp(t->tsp_name, tsp_cd.cd_name) == 0;
155 }
156
157 static void
158 tspattach(device_t parent, device_t self, void *aux)
159 {
160 struct pcibus_attach_args pba;
161 struct tsp_attach_args *t = aux;
162 struct tsp_config *pcp;
163
164 printf("\n");
165 pcp = tsp_init(1, t->tsp_slot);
166
167 tsp_dma_init(pcp);
168
169 /*
170 * Do PCI memory initialization that needs to be deferred until
171 * malloc is safe. On the Tsunami, we need to do this after
172 * DMA is initialized, as well.
173 */
174 tsp_bus_mem_init2(&pcp->pc_memt, pcp);
175
176 pci_6600_pickintr(pcp);
177
178 pba.pba_iot = &pcp->pc_iot;
179 pba.pba_memt = &pcp->pc_memt;
180 pba.pba_dmat =
181 alphabus_dma_get_tag(&pcp->pc_dmat_direct, ALPHA_BUS_PCI);
182 pba.pba_dmat64 = NULL;
183 pba.pba_pc = &pcp->pc_pc;
184 pba.pba_bus = 0;
185 pba.pba_bridgetag = NULL;
186 pba.pba_flags = PCI_FLAGS_IO_ENABLED | PCI_FLAGS_MEM_ENABLED |
187 PCI_FLAGS_MRL_OKAY | PCI_FLAGS_MRM_OKAY | PCI_FLAGS_MWI_OKAY;
188 config_found_ia(self, "pcibus", &pba, pcibusprint);
189 }
190
191 struct tsp_config *
192 tsp_init(int mallocsafe, int n)
193 /* n: Pchip number */
194 {
195 struct tsp_config *pcp;
196
197 KASSERT((n | 1) == 1);
198 pcp = &tsp_configuration[n];
199 pcp->pc_pslot = n;
200 pcp->pc_iobase = TS_Pn(n, 0);
201 pcp->pc_csr = S_PAGE(TS_Pn(n, P_CSRBASE));
202 if (!pcp->pc_initted) {
203 tsp_bus_io_init(&pcp->pc_iot, pcp);
204 tsp_bus_mem_init(&pcp->pc_memt, pcp);
205
206 alpha_bus_window_count[ALPHA_BUS_TYPE_PCI_IO] = 1;
207 alpha_bus_window_count[ALPHA_BUS_TYPE_PCI_MEM] = 1;
208
209 alpha_bus_get_window = tsp_bus_get_window;
210 }
211 pcp->pc_mallocsafe = mallocsafe;
212 tsp_pci_init(&pcp->pc_pc, pcp);
213 pcp->pc_initted = 1;
214 return pcp;
215 }
216
217 static int
218 tsp_bus_get_window(int type, int window,
219 struct alpha_bus_space_translation *abst)
220 {
221 struct tsp_config *tsp = &tsp_configuration[tsp_console_hose];
222 bus_space_tag_t st;
223 int error;
224
225 switch (type) {
226 case ALPHA_BUS_TYPE_PCI_IO:
227 st = &tsp->pc_iot;
228 break;
229
230 case ALPHA_BUS_TYPE_PCI_MEM:
231 st = &tsp->pc_memt;
232 break;
233
234 default:
235 panic("tsp_bus_get_window");
236 }
237
238 error = alpha_bus_space_get_window(st, window, abst);
239 if (error)
240 return (error);
241
242 abst->abst_sys_start = TS_PHYSADDR(abst->abst_sys_start);
243 abst->abst_sys_end = TS_PHYSADDR(abst->abst_sys_end);
244
245 return (0);
246 }
247
248 void
249 tsc_print_dir(unsigned int indent, unsigned long dir)
250 {
251 char buf[60];
252
253 snprintb(buf, 60,
254 "\177\20"
255 "b\77Internal Cchip asynchronous error\0"
256 "b\76Pchip 0 error\0"
257 "b\75Pchip 1 error\0"
258 "b\74Pchip 2 error\0"
259 "b\73Pchip 3 error\0",
260 dir);
261 IPRINTF(indent, "DIR = %s\n", buf);
262 }
263
264 void
265 tsc_print_misc(unsigned int indent, unsigned long misc)
266 {
267 unsigned long tmp = MISC_NXM_SRC(misc);
268
269 if (!MISC_NXM(misc))
270 return;
271
272 IPRINTF(indent, "NXM address detected\n");
273 IPRINTF(indent, "NXM source = %s %lu\n",
274 tmp <= 3 ? "CPU" : "Pchip", tmp <= 3 ? tmp : tmp - 4);
275 }
276