empb.c revision 1.1 1 1.1 rkujawa /* $NetBSD: empb.c,v 1.1 2012/05/30 18:01:51 rkujawa Exp $ */
2 1.1 rkujawa
3 1.1 rkujawa /*-
4 1.1 rkujawa * Copyright (c) 2012 The NetBSD Foundation, Inc.
5 1.1 rkujawa * All rights reserved.
6 1.1 rkujawa *
7 1.1 rkujawa * This code is derived from software contributed to The NetBSD Foundation
8 1.1 rkujawa * by Radoslaw Kujawa.
9 1.1 rkujawa *
10 1.1 rkujawa * Redistribution and use in source and binary forms, with or without
11 1.1 rkujawa * modification, are permitted provided that the following conditions
12 1.1 rkujawa * are met:
13 1.1 rkujawa * 1. Redistributions of source code must retain the above copyright
14 1.1 rkujawa * notice, this list of conditions and the following disclaimer.
15 1.1 rkujawa * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 rkujawa * notice, this list of conditions and the following disclaimer in the
17 1.1 rkujawa * documentation and/or other materials provided with the distribution.
18 1.1 rkujawa *
19 1.1 rkujawa * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 1.1 rkujawa * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 1.1 rkujawa * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 1.1 rkujawa * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 1.1 rkujawa * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 1.1 rkujawa * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 1.1 rkujawa * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 1.1 rkujawa * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 1.1 rkujawa * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 1.1 rkujawa * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 1.1 rkujawa * POSSIBILITY OF SUCH DAMAGE.
30 1.1 rkujawa */
31 1.1 rkujawa
32 1.1 rkujawa /* Elbox Mediator PCI bridge driver. Currently supports Mediator 1200 models.*/
33 1.1 rkujawa
34 1.1 rkujawa #include <sys/types.h>
35 1.1 rkujawa #include <sys/param.h>
36 1.1 rkujawa #include <sys/time.h>
37 1.1 rkujawa #include <sys/systm.h>
38 1.1 rkujawa #include <sys/errno.h>
39 1.1 rkujawa #include <sys/device.h>
40 1.1 rkujawa #include <sys/malloc.h>
41 1.1 rkujawa #include <sys/extent.h>
42 1.1 rkujawa #include <sys/kmem.h>
43 1.1 rkujawa
44 1.1 rkujawa #include <uvm/uvm_extern.h>
45 1.1 rkujawa
46 1.1 rkujawa #include <machine/bus.h>
47 1.1 rkujawa #include <machine/cpu.h>
48 1.1 rkujawa
49 1.1 rkujawa #include <m68k/bus_dma.h>
50 1.1 rkujawa #include <amiga/dev/zbusvar.h>
51 1.1 rkujawa #include <amiga/pci/empbreg.h>
52 1.1 rkujawa #include <amiga/pci/emmemvar.h>
53 1.1 rkujawa
54 1.1 rkujawa #include <dev/pci/pcivar.h>
55 1.1 rkujawa #include <dev/pci/pcireg.h>
56 1.1 rkujawa #include <dev/pci/pcidevs.h>
57 1.1 rkujawa #include <dev/pci/pciconf.h>
58 1.1 rkujawa
59 1.1 rkujawa #include "opt_pci.h"
60 1.1 rkujawa
61 1.1 rkujawa /* #define EMPB_DEBUG 1 */
62 1.1 rkujawa
63 1.1 rkujawa #define PCI_CONF_LOCK(s) (s) = splhigh()
64 1.1 rkujawa #define PCI_CONF_UNLOCK(s) splx((s))
65 1.1 rkujawa
66 1.1 rkujawa struct empb_softc {
67 1.1 rkujawa device_t sc_dev;
68 1.1 rkujawa
69 1.1 rkujawa struct bus_space_tag setup_area;
70 1.1 rkujawa bus_space_tag_t setup_area_t;
71 1.1 rkujawa bus_space_handle_t setup_area_h;
72 1.1 rkujawa
73 1.1 rkujawa struct bus_space_tag pci_confio_area;
74 1.1 rkujawa bus_space_tag_t pci_confio_t;
75 1.1 rkujawa bus_space_handle_t pci_confio_h;
76 1.1 rkujawa uint8_t pci_confio_mode;
77 1.1 rkujawa
78 1.1 rkujawa struct bus_space_tag pci_mem_window;
79 1.1 rkujawa uint32_t pci_mem_window_size;
80 1.1 rkujawa
81 1.1 rkujawa struct amiga_pci_chipset apc;
82 1.1 rkujawa
83 1.1 rkujawa };
84 1.1 rkujawa
85 1.1 rkujawa static int empb_match(struct device *, struct cfdata *, void *);
86 1.1 rkujawa static void empb_attach(struct device *, struct device *, void *);
87 1.1 rkujawa static void empb_callback(device_t self);
88 1.1 rkujawa
89 1.1 rkujawa /*static bool empb_find_mem(struct empb_softc *sc);*/
90 1.1 rkujawa void empb_switch_bridge(struct empb_softc *sc, uint8_t mode);
91 1.1 rkujawa
92 1.1 rkujawa pcireg_t empb_pci_conf_read(pci_chipset_tag_t, pcitag_t, int);
93 1.1 rkujawa void empb_pci_conf_write(pci_chipset_tag_t, pcitag_t, int, pcireg_t);
94 1.1 rkujawa int empb_pci_bus_maxdevs(pci_chipset_tag_t pc, int busno);
95 1.1 rkujawa void empb_pci_attach_hook(struct device *parent,
96 1.1 rkujawa struct device *self, struct pcibus_attach_args *pba);
97 1.1 rkujawa pcitag_t empb_pci_make_tag(pci_chipset_tag_t pc, int bus, int device,
98 1.1 rkujawa int function);
99 1.1 rkujawa void empb_pci_decompose_tag(pci_chipset_tag_t pc, pcitag_t tag,
100 1.1 rkujawa int *bp, int *dp, int *fp);
101 1.1 rkujawa int empb_pci_intr_map(const struct pci_attach_args *pa,
102 1.1 rkujawa pci_intr_handle_t *ihp);
103 1.1 rkujawa const struct evcnt * empb_pci_intr_evcnt(pci_chipset_tag_t pc,
104 1.1 rkujawa pci_intr_handle_t ih);
105 1.1 rkujawa
106 1.1 rkujawa CFATTACH_DECL_NEW(empb, sizeof(struct empb_softc),
107 1.1 rkujawa empb_match, empb_attach, NULL, NULL);
108 1.1 rkujawa
109 1.1 rkujawa static int
110 1.1 rkujawa empb_match(device_t parent, cfdata_t cf, void *aux)
111 1.1 rkujawa {
112 1.1 rkujawa struct zbus_args *zap;
113 1.1 rkujawa
114 1.1 rkujawa zap = aux;
115 1.1 rkujawa
116 1.1 rkujawa if (zap->manid != ZORRO_MANID_ELBOX)
117 1.1 rkujawa return 0;
118 1.1 rkujawa
119 1.1 rkujawa switch (zap->prodid) {
120 1.1 rkujawa case ZORRO_PRODID_MED1K2:
121 1.1 rkujawa case ZORRO_PRODID_MED1K2SX:
122 1.1 rkujawa case ZORRO_PRODID_MED1K2LT2:
123 1.1 rkujawa case ZORRO_PRODID_MED1K2LT4:
124 1.1 rkujawa case ZORRO_PRODID_MED1K2TX:
125 1.1 rkujawa return 1;
126 1.1 rkujawa }
127 1.1 rkujawa
128 1.1 rkujawa return 0;
129 1.1 rkujawa }
130 1.1 rkujawa
131 1.1 rkujawa
132 1.1 rkujawa static void
133 1.1 rkujawa empb_attach(device_t parent, device_t self, void *aux)
134 1.1 rkujawa {
135 1.1 rkujawa struct empb_softc *sc;
136 1.1 rkujawa struct zbus_args *zap;
137 1.1 rkujawa
138 1.1 rkujawa volatile char *ba;
139 1.1 rkujawa
140 1.1 rkujawa zap = aux;
141 1.1 rkujawa sc = device_private(self);
142 1.1 rkujawa sc->sc_dev = self;
143 1.1 rkujawa ba = zap->va;
144 1.1 rkujawa
145 1.1 rkujawa switch (zap->prodid) {
146 1.1 rkujawa case ZORRO_PRODID_MED1K2:
147 1.1 rkujawa aprint_normal(": ELBOX Mediator PCI 1200\n");
148 1.1 rkujawa break;
149 1.1 rkujawa case ZORRO_PRODID_MED1K2SX:
150 1.1 rkujawa aprint_normal(": ELBOX Mediator PCI 1200 SX\n");
151 1.1 rkujawa break;
152 1.1 rkujawa case ZORRO_PRODID_MED1K2LT2:
153 1.1 rkujawa aprint_normal(": ELBOX Mediator PCI 1200 LT2\n");
154 1.1 rkujawa break;
155 1.1 rkujawa case ZORRO_PRODID_MED1K2LT4:
156 1.1 rkujawa aprint_normal(": ELBOX Mediator PCI 1200 LT4\n");
157 1.1 rkujawa break;
158 1.1 rkujawa case ZORRO_PRODID_MED1K2TX:
159 1.1 rkujawa aprint_normal(": ELBOX Mediator PCI 1200 TX\n");
160 1.1 rkujawa break;
161 1.1 rkujawa default:
162 1.1 rkujawa aprint_normal(": ELBOX Mediator PCI (unknown)\n");
163 1.1 rkujawa break;
164 1.1 rkujawa }
165 1.1 rkujawa
166 1.1 rkujawa /* Setup bus space mappings. */
167 1.1 rkujawa sc->pci_confio_area.base = (bus_addr_t) ba + EMPB_BRIDGE_OFF;
168 1.1 rkujawa sc->pci_confio_area.absm = &amiga_bus_stride_1swap;
169 1.1 rkujawa
170 1.1 rkujawa sc->setup_area.base = (bus_addr_t) ba + EMPB_SETUP_OFF;
171 1.1 rkujawa sc->setup_area.absm = &amiga_bus_stride_1;
172 1.1 rkujawa
173 1.1 rkujawa /*
174 1.1 rkujawa * Defer everything until later, we need to wait for possible
175 1.1 rkujawa * emmem attachments.
176 1.1 rkujawa */
177 1.1 rkujawa
178 1.1 rkujawa config_defer(self, empb_callback);
179 1.1 rkujawa }
180 1.1 rkujawa
181 1.1 rkujawa static void
182 1.1 rkujawa empb_callback(device_t self) {
183 1.1 rkujawa
184 1.1 rkujawa struct empb_softc *sc;
185 1.1 rkujawa pci_chipset_tag_t pc;
186 1.1 rkujawa struct pcibus_attach_args pba;
187 1.1 rkujawa
188 1.1 rkujawa sc = device_private(self);
189 1.1 rkujawa pc = &sc->apc;
190 1.1 rkujawa
191 1.1 rkujawa #ifdef EMPB_DEBUG
192 1.1 rkujawa aprint_normal("empb: mapped setup %x->%x, conf/io %x->%x\n",
193 1.1 rkujawa kvtop((void*) sc->setup_area.base), sc->setup_area.base,
194 1.1 rkujawa kvtop((void*) sc->pci_confio_area.base), sc->pci_confio_area.base);
195 1.1 rkujawa #endif
196 1.1 rkujawa
197 1.1 rkujawa sc->pci_confio_t = &(sc->pci_confio_area);
198 1.1 rkujawa
199 1.1 rkujawa if (bus_space_map(sc->pci_confio_t, 0, EMPB_BRIDGE_SIZE, 0,
200 1.1 rkujawa &sc->pci_confio_h))
201 1.1 rkujawa aprint_error_dev(self,
202 1.1 rkujawa "couldn't map PCI configuration & I/O space\n");
203 1.1 rkujawa
204 1.1 rkujawa sc->apc.pci_conf_datat = sc->pci_confio_t;
205 1.1 rkujawa sc->apc.pci_conf_datah = sc->pci_confio_h;
206 1.1 rkujawa
207 1.1 rkujawa sc->setup_area_t = &(sc->setup_area);
208 1.1 rkujawa
209 1.1 rkujawa if (bus_space_map(sc->setup_area_t, 0, EMPB_SETUP_SIZE, 0,
210 1.1 rkujawa &sc->setup_area_h))
211 1.1 rkujawa aprint_error_dev(self,
212 1.1 rkujawa "couldn't map Mediator setup space\n");
213 1.1 rkujawa
214 1.1 rkujawa /* Initialize the PCI chipset tag. */
215 1.1 rkujawa sc->apc.pc_conf_v = (void*) pc;
216 1.1 rkujawa sc->apc.pc_bus_maxdevs = empb_pci_bus_maxdevs;
217 1.1 rkujawa sc->apc.pc_make_tag = amiga_pci_make_tag;
218 1.1 rkujawa sc->apc.pc_decompose_tag = amiga_pci_decompose_tag;
219 1.1 rkujawa sc->apc.pc_conf_read = empb_pci_conf_read;
220 1.1 rkujawa sc->apc.pc_conf_write = empb_pci_conf_write;
221 1.1 rkujawa sc->apc.pc_attach_hook = empb_pci_attach_hook;
222 1.1 rkujawa
223 1.1 rkujawa sc->apc.pc_intr_map = empb_pci_intr_map;
224 1.1 rkujawa sc->apc.pc_intr_string = amiga_pci_intr_string;
225 1.1 rkujawa sc->apc.pc_intr_establish = amiga_pci_intr_establish;
226 1.1 rkujawa sc->apc.pc_intr_disestablish = amiga_pci_intr_disestablish;
227 1.1 rkujawa
228 1.1 rkujawa sc->apc.pc_conf_hook = amiga_pci_conf_hook;
229 1.1 rkujawa sc->apc.pc_conf_interrupt = amiga_pci_conf_interrupt;
230 1.1 rkujawa
231 1.1 rkujawa sc->apc.cookie = sc;
232 1.1 rkujawa
233 1.1 rkujawa pba.pba_iot = &(sc->pci_confio_area);
234 1.1 rkujawa pba.pba_dmat = NULL;
235 1.1 rkujawa pba.pba_dmat64 = NULL;
236 1.1 rkujawa pba.pba_pc = pc;
237 1.1 rkujawa pba.pba_flags = PCI_FLAGS_IO_OKAY;
238 1.1 rkujawa
239 1.1 rkujawa /*if(sc->pci_mem_window_size > 0) {
240 1.1 rkujawa pba.pba_memt = &(sc->pci_mem_window);
241 1.1 rkujawa pba.pba_flags |= PCI_FLAGS_MEM_OKAY;
242 1.1 rkujawa } else */
243 1.1 rkujawa pba.pba_memt = NULL;
244 1.1 rkujawa
245 1.1 rkujawa pba.pba_bus = 0;
246 1.1 rkujawa pba.pba_bridgetag = NULL;
247 1.1 rkujawa
248 1.1 rkujawa config_found_ia(self, "pcibus", &pba, pcibusprint);
249 1.1 rkujawa }
250 1.1 rkujawa
251 1.1 rkujawa /*
252 1.1 rkujawa * Switch between configuration space and I/O space.
253 1.1 rkujawa */
254 1.1 rkujawa void
255 1.1 rkujawa empb_switch_bridge(struct empb_softc *sc, uint8_t mode)
256 1.1 rkujawa {
257 1.1 rkujawa bus_space_write_1(sc->setup_area_t, sc->setup_area_h,
258 1.1 rkujawa EMPB_SETUP_BRIDGE_OFF, mode);
259 1.1 rkujawa }
260 1.1 rkujawa
261 1.1 rkujawa
262 1.1 rkujawa /*
263 1.1 rkujawa * Try to find a (optional) memory window board.
264 1.1 rkujawa */
265 1.1 rkujawa /*bool
266 1.1 rkujawa empb_find_mem(struct empb_softc *sc)
267 1.1 rkujawa {
268 1.1 rkujawa device_t memdev;
269 1.1 rkujawa struct emmem_softc *mem_sc;
270 1.1 rkujawa
271 1.1 rkujawa memdev = device_find_by_xname("emmem0");
272 1.1 rkujawa
273 1.1 rkujawa if(memdev == NULL)
274 1.1 rkujawa return false;
275 1.1 rkujawa
276 1.1 rkujawa mem_sc = device_private(memdev);
277 1.1 rkujawa
278 1.1 rkujawa sc->pci_mem_window.base = (bus_addr_t) mem_sc->sc_base;
279 1.1 rkujawa sc->pci_mem_window.absm = &amiga_bus_stride_1;
280 1.1 rkujawa
281 1.1 rkujawa sc->pci_mem_window_size = mem_sc->sc_size;
282 1.1 rkujawa }*/
283 1.1 rkujawa
284 1.1 rkujawa pcireg_t
285 1.1 rkujawa empb_pci_conf_read(pci_chipset_tag_t pc, pcitag_t tag, int reg)
286 1.1 rkujawa {
287 1.1 rkujawa uint32_t data;
288 1.1 rkujawa uint32_t bus, dev, func;
289 1.1 rkujawa struct empb_softc *sc;
290 1.1 rkujawa int s;
291 1.1 rkujawa
292 1.1 rkujawa sc = pc->cookie;
293 1.1 rkujawa
294 1.1 rkujawa pci_decompose_tag(pc, tag, &bus, &dev, &func);
295 1.1 rkujawa
296 1.1 rkujawa PCI_CONF_LOCK(s);
297 1.1 rkujawa
298 1.1 rkujawa empb_switch_bridge(sc, BRIDGE_CONF);
299 1.1 rkujawa
300 1.1 rkujawa data = bus_space_read_4(pc->pci_conf_datat, pc->pci_conf_datah,
301 1.1 rkujawa EMPB_CONF_DEV_STRIDE*dev + EMPB_CONF_FUNC_STRIDE*func + reg);
302 1.1 rkujawa #ifdef EMPB_DEBUG_CONF
303 1.1 rkujawa aprint_normal("empb conf read va: %lx, bus: %d, dev: %d, "
304 1.1 rkujawa "func: %d, reg: %d -r-> data %x\n",
305 1.1 rkujawa pc->pci_conf_datah, bus, dev, func, reg, data);
306 1.1 rkujawa #endif /* EMPB_DEBUG_CONF */
307 1.1 rkujawa
308 1.1 rkujawa empb_switch_bridge(sc, BRIDGE_IO);
309 1.1 rkujawa
310 1.1 rkujawa PCI_CONF_UNLOCK(s);
311 1.1 rkujawa
312 1.1 rkujawa return data;
313 1.1 rkujawa }
314 1.1 rkujawa
315 1.1 rkujawa void
316 1.1 rkujawa empb_pci_conf_write(pci_chipset_tag_t pc, pcitag_t tag, int reg, pcireg_t val)
317 1.1 rkujawa {
318 1.1 rkujawa uint32_t bus, dev, func;
319 1.1 rkujawa struct empb_softc *sc;
320 1.1 rkujawa int s;
321 1.1 rkujawa
322 1.1 rkujawa sc = pc->cookie;
323 1.1 rkujawa
324 1.1 rkujawa pci_decompose_tag(pc, tag, &bus, &dev, &func);
325 1.1 rkujawa
326 1.1 rkujawa PCI_CONF_LOCK(s);
327 1.1 rkujawa
328 1.1 rkujawa empb_switch_bridge(sc, BRIDGE_CONF);
329 1.1 rkujawa
330 1.1 rkujawa bus_space_write_4(pc->pci_conf_datat, pc->pci_conf_datah,
331 1.1 rkujawa EMPB_CONF_DEV_STRIDE*dev + EMPB_CONF_FUNC_STRIDE*func + reg, val);
332 1.1 rkujawa #ifdef EMPB_DEBUG_CONF
333 1.1 rkujawa aprint_normal("empb conf write va: %lx, bus: %d, dev: %d, "
334 1.1 rkujawa "func: %d, reg: %d -w-> data %x\n",
335 1.1 rkujawa pc->pci_conf_datah, bus, dev, func, reg, val);
336 1.1 rkujawa #endif /* EMPB_DEBUG_CONF */
337 1.1 rkujawa empb_switch_bridge(sc, BRIDGE_IO);
338 1.1 rkujawa
339 1.1 rkujawa PCI_CONF_UNLOCK(s);
340 1.1 rkujawa }
341 1.1 rkujawa
342 1.1 rkujawa int
343 1.1 rkujawa empb_pci_bus_maxdevs(pci_chipset_tag_t pc, int busno)
344 1.1 rkujawa {
345 1.1 rkujawa return 6; /* no Mediator with more than 6 slots? */
346 1.1 rkujawa }
347 1.1 rkujawa
348 1.1 rkujawa void
349 1.1 rkujawa empb_pci_attach_hook(struct device *parent, struct device *self,
350 1.1 rkujawa struct pcibus_attach_args *pba)
351 1.1 rkujawa {
352 1.1 rkujawa }
353 1.1 rkujawa
354 1.1 rkujawa int
355 1.1 rkujawa empb_pci_intr_map(const struct pci_attach_args *pa, pci_intr_handle_t *ihp)
356 1.1 rkujawa {
357 1.1 rkujawa /* TODO: add sanity checking */
358 1.1 rkujawa
359 1.1 rkujawa *ihp = EMPB_INT;
360 1.1 rkujawa return 0;
361 1.1 rkujawa }
362 1.1 rkujawa
363 1.1 rkujawa const struct evcnt *
364 1.1 rkujawa empb_pci_intr_evcnt(pci_chipset_tag_t pc, pci_intr_handle_t ih)
365 1.1 rkujawa {
366 1.1 rkujawa /* TODO: implement */
367 1.1 rkujawa return NULL;
368 1.1 rkujawa }
369 1.1 rkujawa
370