pci_mace.c revision 1.18 1 /* $NetBSD: pci_mace.c,v 1.18 2015/02/18 16:47:59 macallan Exp $ */
2
3 /*
4 * Copyright (c) 2001,2003 Christopher Sekiya
5 * Copyright (c) 2000 Soren S. Jorvang
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, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed for the
19 * NetBSD Project. See http://www.NetBSD.org/ for
20 * information about NetBSD.
21 * 4. The name of the author may not be used to endorse or promote products
22 * derived from this software without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
25 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
26 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
27 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
28 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
29 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
30 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
31 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
32 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
33 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 */
35
36 #include <sys/cdefs.h>
37 __KERNEL_RCSID(0, "$NetBSD: pci_mace.c,v 1.18 2015/02/18 16:47:59 macallan Exp $");
38
39 #include "opt_pci.h"
40 #include "pci.h"
41
42 #include <sys/param.h>
43 #include <sys/device.h>
44 #include <sys/systm.h>
45
46 #include <machine/cpu.h>
47 #include <machine/locore.h>
48 #include <machine/autoconf.h>
49 #include <machine/vmparam.h>
50 #include <sys/bus.h>
51 #include <machine/machtype.h>
52
53 #include <mips/cache.h>
54
55 #include <dev/pci/pcivar.h>
56 #include <dev/pci/pcireg.h>
57 #include <dev/pci/pcidevs.h>
58
59 #include <sys/extent.h>
60 #include <sys/malloc.h>
61 #include <dev/pci/pciconf.h>
62
63 #include <sgimips/mace/macereg.h>
64 #include <sgimips/mace/macevar.h>
65
66 #include <sgimips/mace/pcireg_mace.h>
67
68 struct macepci_softc {
69 struct sgimips_pci_chipset sc_pc;
70 };
71
72 static int macepci_match(device_t, cfdata_t, void *);
73 static void macepci_attach(device_t, device_t, void *);
74 static int macepci_bus_maxdevs(pci_chipset_tag_t, int);
75 static pcireg_t macepci_conf_read(pci_chipset_tag_t, pcitag_t, int);
76 static void macepci_conf_write(pci_chipset_tag_t, pcitag_t, int, pcireg_t);
77 static int macepci_intr_map(const struct pci_attach_args *,
78 pci_intr_handle_t *);
79 static const char *
80 macepci_intr_string(pci_chipset_tag_t, pci_intr_handle_t,
81 char *, size_t);
82 static int macepci_intr(void *);
83
84 CFATTACH_DECL_NEW(macepci, sizeof(struct macepci_softc),
85 macepci_match, macepci_attach, NULL, NULL);
86
87 static void pcimem_bus_mem_init(bus_space_tag_t, void *);
88 static void pciio_bus_mem_init(bus_space_tag_t, void *);
89 static struct mips_bus_space pcimem_mbst;
90 static struct mips_bus_space pciio_mbst;
91 bus_space_tag_t mace_pci_memt = NULL;
92 bus_space_tag_t mace_pci_iot = NULL;
93
94 static int
95 macepci_match(device_t parent, cfdata_t match, void *aux)
96 {
97
98 return (1);
99 }
100
101 static void
102 macepci_attach(device_t parent, device_t self, void *aux)
103 {
104 struct macepci_softc *sc = device_private(self);
105 pci_chipset_tag_t pc = &sc->sc_pc;
106 struct mace_attach_args *maa = aux;
107 struct pcibus_attach_args pba;
108 u_int32_t control;
109 int rev;
110
111 if (bus_space_subregion(maa->maa_st, maa->maa_sh,
112 maa->maa_offset, 0, &pc->ioh) )
113 panic("macepci_attach: couldn't map");
114
115 pc->iot = maa->maa_st;
116
117 rev = bus_space_read_4(pc->iot, pc->ioh, MACEPCI_REVISION);
118 printf(": rev %d\n", rev);
119
120 pcimem_bus_mem_init(&pcimem_mbst, NULL);
121 mace_pci_memt = &pcimem_mbst;
122 pciio_bus_mem_init(&pciio_mbst, NULL);
123 mace_pci_iot = &pciio_mbst;
124
125 pc->pc_bus_maxdevs = macepci_bus_maxdevs;
126 pc->pc_conf_read = macepci_conf_read;
127 pc->pc_conf_write = macepci_conf_write;
128 pc->pc_intr_map = macepci_intr_map;
129 pc->pc_intr_string = macepci_intr_string;
130 pc->intr_establish = mace_intr_establish;
131 pc->intr_disestablish = mace_intr_disestablish;
132
133 bus_space_write_4(pc->iot, pc->ioh, MACE_PCI_ERROR_ADDR, 0);
134 bus_space_write_4(pc->iot, pc->ioh, MACE_PCI_ERROR_FLAGS, 0);
135
136 /* Turn on PCI error interrupts */
137 bus_space_write_4(pc->iot, pc->ioh, MACE_PCI_CONTROL,
138 MACE_PCI_CONTROL_SERR_ENA |
139 MACE_PCI_CONTROL_PARITY_ERR |
140 MACE_PCI_CONTROL_PARK_LIU |
141 MACE_PCI_CONTROL_OVERRUN_INT |
142 MACE_PCI_CONTROL_PARITY_INT |
143 MACE_PCI_CONTROL_SERR_INT |
144 MACE_PCI_CONTROL_IT_INT |
145 MACE_PCI_CONTROL_RE_INT |
146 MACE_PCI_CONTROL_DPED_INT |
147 MACE_PCI_CONTROL_TAR_INT |
148 MACE_PCI_CONTROL_MAR_INT);
149
150 /*
151 * Enable all MACE PCI interrupts. They will be masked by
152 * the CRIME code.
153 */
154 control = bus_space_read_4(pc->iot, pc->ioh, MACEPCI_CONTROL);
155 control |= CONTROL_INT_MASK;
156 bus_space_write_4(pc->iot, pc->ioh, MACEPCI_CONTROL, control);
157
158 #if NPCI > 0
159 pc->pc_ioext = extent_create("macepciio", 0x00001000, 0x01ffffff,
160 NULL, 0, EX_NOWAIT);
161 pc->pc_memext = extent_create("macepcimem", 0x80100000, 0x81ffffff,
162 NULL, 0, EX_NOWAIT);
163 pci_configure_bus(pc, pc->pc_ioext, pc->pc_memext, NULL, 0,
164 mips_cache_info.mci_dcache_align);
165 memset(&pba, 0, sizeof pba);
166 /*XXX*/ pba.pba_iot = mace_pci_iot;
167 /*XXX*/ pba.pba_memt = mace_pci_memt;
168 pba.pba_dmat = &pci_bus_dma_tag;
169 pba.pba_dmat64 = NULL;
170 pba.pba_bus = 0;
171 pba.pba_bridgetag = NULL;
172 pba.pba_flags = PCI_FLAGS_IO_OKAY | PCI_FLAGS_MEM_OKAY |
173 PCI_FLAGS_MRL_OKAY | PCI_FLAGS_MRM_OKAY | PCI_FLAGS_MWI_OKAY;
174 pba.pba_pc = pc;
175
176 #ifdef MACEPCI_IO_WAS_BUGGY
177 if (rev == 0)
178 pba.pba_flags &= ~PCI_FLAGS_IO_OKAY; /* Buggy? */
179 #endif
180
181 cpu_intr_establish(maa->maa_intr, IPL_NONE, macepci_intr, sc);
182
183 config_found_ia(self, "pcibus", &pba, pcibusprint);
184 #endif
185 }
186
187 int
188 macepci_bus_maxdevs(pci_chipset_tag_t pc, int busno)
189 {
190
191 if (busno == 0)
192 return 5; /* 2 on-board SCSI chips, slots 0, 1 and 2 */
193 else
194 return 0; /* XXX */
195 }
196
197 pcireg_t
198 macepci_conf_read(pci_chipset_tag_t pc, pcitag_t tag, int reg)
199 {
200 pcireg_t data;
201
202 bus_space_write_4(pc->iot, pc->ioh, MACE_PCI_CONFIG_ADDR, (tag | reg));
203 data = bus_space_read_4(pc->iot, pc->ioh, MACE_PCI_CONFIG_DATA);
204 bus_space_write_4(pc->iot, pc->ioh, MACE_PCI_CONFIG_ADDR, 0);
205
206 return data;
207 }
208
209 void
210 macepci_conf_write(pci_chipset_tag_t pc, pcitag_t tag, int reg, pcireg_t data)
211 {
212 /* XXX O2 soren */
213 if (tag == 0)
214 return;
215
216 bus_space_write_4(pc->iot, pc->ioh, MACE_PCI_CONFIG_ADDR, (tag | reg));
217 bus_space_write_4(pc->iot, pc->ioh, MACE_PCI_CONFIG_DATA, data);
218 bus_space_write_4(pc->iot, pc->ioh, MACE_PCI_CONFIG_ADDR, 0);
219 }
220
221 int
222 macepci_intr_map(const struct pci_attach_args *pa, pci_intr_handle_t *ihp)
223 {
224 pci_chipset_tag_t pc = pa->pa_pc;
225 pcitag_t intrtag = pa->pa_intrtag;
226 int pin = pa->pa_intrpin;
227 int bus, dev, func, start;
228
229 pci_decompose_tag(pc, intrtag, &bus, &dev, &func);
230
231 if (dev < 3 && pin != PCI_INTERRUPT_PIN_A)
232 panic("SCSI0 and SCSI1 must be hardwired!");
233
234 switch (pin) {
235 default:
236 case PCI_INTERRUPT_PIN_NONE:
237 return -1;
238
239 case PCI_INTERRUPT_PIN_A:
240 /*
241 * Each of SCSI{0,1}, & slots 0 - 2 has dedicated interrupt
242 * for pin A?
243 */
244 *ihp = dev + 7;
245 return 0;
246
247 case PCI_INTERRUPT_PIN_B:
248 start = 0;
249 break;
250 case PCI_INTERRUPT_PIN_C:
251 start = 1;
252 break;
253 case PCI_INTERRUPT_PIN_D:
254 start = 2;
255 break;
256 }
257
258 /* Pins B,C,D are mapped to PCI_SHARED0 - PCI_SHARED2 interrupts */
259 *ihp = 13 /* PCI_SHARED0 */ + (start + dev - 3) % 3;
260 return 0;
261 }
262
263 const char *
264 macepci_intr_string(pci_chipset_tag_t pc, pci_intr_handle_t ih, char *buf,
265 size_t len)
266 {
267 snprintf(buf, len, "crime interrupt %d", ih);
268 return buf;
269 }
270
271
272 /*
273 * Handle PCI error interrupts.
274 */
275 int
276 macepci_intr(void *arg)
277 {
278 struct macepci_softc *sc = (struct macepci_softc *)arg;
279 pci_chipset_tag_t pc = &sc->sc_pc;
280 u_int32_t error, address;
281
282 error = bus_space_read_4(pc->iot, pc->ioh, MACE_PCI_ERROR_FLAGS);
283 address = bus_space_read_4(pc->iot, pc->ioh, MACE_PCI_ERROR_ADDR);
284 while (error & 0xffc00000) {
285 if (error & MACE_PERR_MASTER_ABORT) {
286 /*
287 * this seems to be a more-or-less normal error
288 * condition (e.g., "pcictl pci0 list" generates
289 * a _lot_ of these errors, so no message for now
290 * while I figure out if I missed a trick somewhere.
291 */
292 error &= ~MACE_PERR_MASTER_ABORT;
293 bus_space_write_4(pc->iot, pc->ioh,
294 MACE_PCI_ERROR_FLAGS, error);
295 }
296
297 if (error & MACE_PERR_TARGET_ABORT) {
298 printf("mace: target abort at %x\n", address);
299 error &= ~MACE_PERR_TARGET_ABORT;
300 bus_space_write_4(pc->iot, pc->ioh,
301 MACE_PCI_ERROR_FLAGS, error);
302 }
303
304 if (error & MACE_PERR_DATA_PARITY_ERR) {
305 printf("mace: parity error at %x\n", address);
306 error &= ~MACE_PERR_DATA_PARITY_ERR;
307 bus_space_write_4(pc->iot, pc->ioh,
308 MACE_PCI_ERROR_FLAGS, error);
309 }
310
311 if (error & MACE_PERR_RETRY_ERR) {
312 printf("mace: retry error at %x\n", address);
313 error &= ~MACE_PERR_RETRY_ERR;
314 bus_space_write_4(pc->iot, pc->ioh,
315 MACE_PCI_ERROR_FLAGS, error);
316 }
317
318 if (error & MACE_PERR_ILLEGAL_CMD) {
319 printf("mace: illegal command at %x\n", address);
320 error &= ~MACE_PERR_ILLEGAL_CMD;
321 bus_space_write_4(pc->iot, pc->ioh,
322 MACE_PCI_ERROR_FLAGS, error);
323 }
324
325 if (error & MACE_PERR_SYSTEM_ERR) {
326 printf("mace: system error at %x\n", address);
327 error &= ~MACE_PERR_SYSTEM_ERR;
328 bus_space_write_4(pc->iot, pc->ioh,
329 MACE_PCI_ERROR_FLAGS, error);
330 }
331
332 if (error & MACE_PERR_INTERRUPT_TEST) {
333 printf("mace: interrupt test at %x\n", address);
334 error &= ~MACE_PERR_INTERRUPT_TEST;
335 bus_space_write_4(pc->iot, pc->ioh,
336 MACE_PCI_ERROR_FLAGS, error);
337 }
338
339 if (error & MACE_PERR_PARITY_ERR) {
340 printf("mace: parity error at %x\n", address);
341 error &= ~MACE_PERR_PARITY_ERR;
342 bus_space_write_4(pc->iot, pc->ioh,
343 MACE_PCI_ERROR_FLAGS, error);
344 }
345
346 if (error & MACE_PERR_RSVD) {
347 printf("mace: reserved condition at %x\n", address);
348 error &= ~MACE_PERR_RSVD;
349 bus_space_write_4(pc->iot, pc->ioh,
350 MACE_PCI_ERROR_FLAGS, error);
351 }
352
353 if (error & MACE_PERR_OVERRUN) {
354 printf("mace: overrun at %x\n", address);
355 error &= ~MACE_PERR_OVERRUN;
356 bus_space_write_4(pc->iot, pc->ioh,
357 MACE_PCI_ERROR_FLAGS, error);
358 }
359 }
360 return 0;
361 }
362
363 /*
364 * use the 32MB windows to access PCI space when running a 32bit kernel,
365 * use full views at >4GB in LP64
366 * XXX access to PCI space is endian-twiddled which can't be turned off so we
367 * need to instruct bus_space to un-twiddle them for us so 8bit and 16bit
368 * accesses look little-endian
369 */
370 #define CHIP pcimem
371 #define CHIP_MEM /* defined */
372 #define CHIP_WRONG_ENDIAN
373
374 /*
375 * the lower 2GB of PCI space are two views of system memory, with and without
376 * endianness twiddling
377 */
378 #define CHIP_W1_BUS_START(v) 0x80000000UL
379 #define CHIP_W1_BUS_END(v) 0xffffffffUL
380 #ifdef _LP64
381 #define CHIP_W1_SYS_START(v) MACE_PCI_HI_MEMORY
382 #define CHIP_W1_SYS_END(v) MACE_PCI_HI_MEMORY + 0x7fffffffUL
383 #else
384 #define CHIP_W1_SYS_START(v) MACE_PCI_LOW_MEMORY
385 #define CHIP_W1_SYS_END(v) MACE_PCI_LOW_MEMORY + 0x01ffffffUL
386 #endif
387
388 #include <mips/mips/bus_space_alignstride_chipdep.c>
389
390 #undef CHIP
391 #undef CHIP_W1_BUS_START
392 #undef CHIP_W1_BUS_END
393 #undef CHIP_W1_SYS_START
394 #undef CHIP_W1_SYS_END
395
396 #define CHIP pciio
397 /*
398 * Even though it's PCI IO space, it's memory mapped so there is no reason not
399 * to allow linear mappings or mmapings into userland. In fact we may need to
400 * do just that in order to use things like PCI graphics cards in X.
401 */
402 #define CHIP_MEM /* defined */
403 #define CHIP_W1_BUS_START(v) 0x00000000UL
404 #define CHIP_W1_BUS_END(v) 0xffffffffUL
405 #ifdef _LP64
406 #define CHIP_W1_SYS_START(v) MACE_PCI_HI_IO
407 #define CHIP_W1_SYS_END(v) MACE_PCI_HI_IO + 0xffffffffUL
408 #else
409 #define CHIP_W1_SYS_START(v) MACE_PCI_LOW_IO
410 #define CHIP_W1_SYS_END(v) MACE_PCI_LOW_IO + 0x01ffffffUL
411 #endif
412
413 #include <mips/mips/bus_space_alignstride_chipdep.c>
414