bandit.c revision 1.30 1 /* $NetBSD: bandit.c,v 1.30 2011/10/26 04:56:23 macallan Exp $ */
2
3 /*-
4 * Copyright (c) 2000 Tsubai Masanari. 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. The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
26 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 */
28
29 #include <sys/cdefs.h>
30 __KERNEL_RCSID(0, "$NetBSD: bandit.c,v 1.30 2011/10/26 04:56:23 macallan Exp $");
31
32 #include <sys/param.h>
33 #include <sys/device.h>
34 #include <sys/systm.h>
35
36 #include <dev/pci/pcivar.h>
37 #include <dev/ofw/openfirm.h>
38 #include <dev/ofw/ofw_pci.h>
39
40 #include <machine/autoconf.h>
41 #include <machine/pci_machdep.h>
42 #include <machine/pio.h>
43
44 struct bandit_softc {
45 device_t sc_dev;
46 struct genppc_pci_chipset sc_pc;
47 struct powerpc_bus_space sc_iot;
48 struct powerpc_bus_space sc_memt;
49 };
50
51 static void bandit_attach(device_t, device_t, void *);
52 static int bandit_match(device_t, cfdata_t, void *);
53
54 static pcireg_t bandit_conf_read(void *, pcitag_t, int);
55 static void bandit_conf_write(void *, pcitag_t, int, pcireg_t);
56
57 static void bandit_init(struct bandit_softc *);
58
59 CFATTACH_DECL_NEW(bandit, sizeof(struct bandit_softc),
60 bandit_match, bandit_attach, NULL, NULL);
61
62 static int
63 bandit_match(device_t parent, cfdata_t cf, void *aux)
64 {
65 struct confargs *ca = aux;
66
67 if (strcmp(ca->ca_name, "bandit") == 0 ||
68 strcmp(ca->ca_name, "chaos") == 0)
69 return 1;
70
71 return 0;
72 }
73
74 static void
75 bandit_attach(device_t parent, device_t self, void *aux)
76 {
77 struct bandit_softc *sc = device_private(self);
78 pci_chipset_tag_t pc = &sc->sc_pc;
79 struct confargs *ca = aux;
80 struct pcibus_attach_args pba;
81 int len, node = ca->ca_node;
82 uint32_t reg[2], busrange[2];
83 struct range {
84 uint32_t pci_hi, pci_mid, pci_lo;
85 uint32_t host;
86 uint32_t size_hi, size_lo;
87 } ranges[6], *rp = ranges;
88
89 aprint_normal("\n");
90 sc->sc_dev = self;
91
92 /* Bandit address */
93 if (OF_getprop(node, "reg", reg, sizeof(reg)) < 8)
94 return;
95
96 /* PCI bus number */
97 if (OF_getprop(node, "bus-range", busrange, sizeof(busrange)) != 8)
98 return;
99
100 /* find i/o tag */
101 len = OF_getprop(node, "ranges", ranges, sizeof(ranges));
102 if (len == -1)
103 return;
104 while (len >= sizeof(ranges[0])) {
105 if ((rp->pci_hi & OFW_PCI_PHYS_HI_SPACEMASK) ==
106 OFW_PCI_PHYS_HI_SPACE_IO) {
107 sc->sc_iot.pbs_base = rp->host;
108 sc->sc_iot.pbs_limit = rp->host + rp->size_lo;
109 break;
110 }
111 len -= sizeof(ranges[0]);
112 rp++;
113 }
114 memset(&sc->sc_iot, 0, sizeof(struct powerpc_bus_space));
115 memset(&sc->sc_memt, 0, sizeof(struct powerpc_bus_space));
116 sc->sc_iot.pbs_flags = _BUS_SPACE_LITTLE_ENDIAN|_BUS_SPACE_IO_TYPE;
117 if (ofwoea_map_space(RANGE_TYPE_PCI, RANGE_IO, node, &sc->sc_iot,
118 "bandit io-space") != 0)
119 panic("Can't init bandit io tag");
120
121 sc->sc_memt.pbs_flags = _BUS_SPACE_LITTLE_ENDIAN|_BUS_SPACE_MEM_TYPE;
122 if (ofwoea_map_space(RANGE_TYPE_PCI, RANGE_MEM, node, &sc->sc_memt,
123 "bandit mem-space") != 0)
124 panic("Can't init bandit mem tag");
125
126 macppc_pci_get_chipset_tag(pc);
127 pc->pc_node = node;
128 pc->pc_iot = &sc->sc_iot;
129 pc->pc_memt = &sc->sc_memt;
130 pc->pc_addr = mapiodev(reg[0] + 0x800000, 4, false);
131 pc->pc_data = mapiodev(reg[0] + 0xc00000, 8, false);
132 pc->pc_bus = busrange[0];
133 pc->pc_conf_read = bandit_conf_read;
134 pc->pc_conf_write = bandit_conf_write;
135
136 bandit_init(sc);
137
138 memset(&pba, 0, sizeof(pba));
139 pba.pba_memt = pc->pc_memt;
140 pba.pba_iot = pc->pc_iot;
141 pba.pba_dmat = &pci_bus_dma_tag;
142 pba.pba_dmat64 = NULL;
143 pba.pba_bus = pc->pc_bus;
144 pba.pba_bridgetag = NULL;
145 pba.pba_pc = pc;
146 pba.pba_flags = PCI_FLAGS_IO_OKAY | PCI_FLAGS_MEM_OKAY;
147
148 config_found_ia(self, "pcibus", &pba, pcibusprint);
149 }
150
151 static pcireg_t
152 bandit_conf_read(void *cookie, pcitag_t tag, int reg)
153 {
154 pci_chipset_tag_t pc = cookie;
155 pcireg_t data;
156 int bus, dev, func, s;
157 uint32_t x;
158
159 pci_decompose_tag(pc, tag, &bus, &dev, &func);
160
161 /*
162 * bandit's minimum device number of the first bus is 11.
163 * So we behave as if there is no device when dev < 11.
164 */
165 if (func > 7)
166 panic("pci_conf_read: func > 7");
167
168 if (bus == pc->pc_bus) {
169 if (dev < 11)
170 return 0xffffffff;
171 x = (1 << dev) | (func << 8) | reg;
172 } else
173 x = tag | reg | 1;
174
175 s = splhigh();
176
177 out32rb(pc->pc_addr, x);
178 DELAY(10);
179 data = 0xffffffff;
180 if (!badaddr(pc->pc_data, 4))
181 data = in32rb(pc->pc_data);
182 DELAY(10);
183 out32rb(pc->pc_addr, 0);
184 DELAY(10);
185
186 splx(s);
187
188 return data;
189 }
190
191 static void
192 bandit_conf_write(void *cookie, pcitag_t tag, int reg, pcireg_t data)
193 {
194 pci_chipset_tag_t pc = cookie;
195 int bus, dev, func, s;
196 u_int32_t x;
197
198 pci_decompose_tag(pc, tag, &bus, &dev, &func);
199
200 if (func > 7)
201 panic("pci_conf_write: func > 7");
202
203 if (bus == pc->pc_bus) {
204 if (dev < 11)
205 panic("pci_conf_write: dev < 11");
206 x = (1 << dev) | (func << 8) | reg;
207 } else
208 x = tag | reg | 1;
209
210 s = splhigh();
211
212 out32rb(pc->pc_addr, x);
213 DELAY(10);
214 out32rb(pc->pc_data, data);
215 DELAY(10);
216 out32rb(pc->pc_addr, 0);
217 DELAY(10);
218
219 splx(s);
220 }
221
222 #define PCI_BANDIT 11
223
224 #define PCI_REG_MODE_SELECT 0x50
225
226 #define PCI_MODE_IO_COHERENT 0x040 /* I/O coherent */
227
228 static void
229 bandit_init(struct bandit_softc *sc)
230 {
231 pci_chipset_tag_t pc = &sc->sc_pc;
232 pcitag_t tag;
233 u_int mode;
234
235 tag = pci_make_tag(pc, pc->pc_bus, PCI_BANDIT, 0);
236 if ((pci_conf_read(pc, tag, PCI_ID_REG) & 0xffff) == 0xffff)
237 return;
238
239 mode = pci_conf_read(pc, tag, PCI_REG_MODE_SELECT);
240
241 if ((mode & PCI_MODE_IO_COHERENT) == 0) {
242 mode |= PCI_MODE_IO_COHERENT;
243 pci_conf_write(pc, tag, PCI_REG_MODE_SELECT, mode);
244 }
245 }
246