bandit.c revision 1.30.30.1 1 /* $NetBSD: bandit.c,v 1.30.30.1 2015/12/27 12:09:38 skrll 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.30.1 2015/12/27 12:09:38 skrll 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 if ((unsigned int)reg >= PCI_CONF_SIZE)
160 return (pcireg_t) -1;
161
162 pci_decompose_tag(pc, tag, &bus, &dev, &func);
163
164 /*
165 * bandit's minimum device number of the first bus is 11.
166 * So we behave as if there is no device when dev < 11.
167 */
168 if (func > 7)
169 panic("pci_conf_read: func > 7");
170
171 if (bus == pc->pc_bus) {
172 if (dev < 11)
173 return 0xffffffff;
174 x = (1 << dev) | (func << 8) | reg;
175 } else
176 x = tag | reg | 1;
177
178 s = splhigh();
179
180 out32rb(pc->pc_addr, x);
181 DELAY(10);
182 data = 0xffffffff;
183 if (!badaddr(pc->pc_data, 4))
184 data = in32rb(pc->pc_data);
185 DELAY(10);
186 out32rb(pc->pc_addr, 0);
187 DELAY(10);
188
189 splx(s);
190
191 return data;
192 }
193
194 static void
195 bandit_conf_write(void *cookie, pcitag_t tag, int reg, pcireg_t data)
196 {
197 pci_chipset_tag_t pc = cookie;
198 int bus, dev, func, s;
199 u_int32_t x;
200
201 if ((unsigned int)reg >= PCI_CONF_SIZE)
202 return;
203
204 pci_decompose_tag(pc, tag, &bus, &dev, &func);
205
206 if (func > 7)
207 panic("pci_conf_write: func > 7");
208
209 if (bus == pc->pc_bus) {
210 if (dev < 11)
211 panic("pci_conf_write: dev < 11");
212 x = (1 << dev) | (func << 8) | reg;
213 } else
214 x = tag | reg | 1;
215
216 s = splhigh();
217
218 out32rb(pc->pc_addr, x);
219 DELAY(10);
220 out32rb(pc->pc_data, data);
221 DELAY(10);
222 out32rb(pc->pc_addr, 0);
223 DELAY(10);
224
225 splx(s);
226 }
227
228 #define PCI_BANDIT 11
229
230 #define PCI_REG_MODE_SELECT 0x50
231
232 #define PCI_MODE_IO_COHERENT 0x040 /* I/O coherent */
233
234 static void
235 bandit_init(struct bandit_softc *sc)
236 {
237 pci_chipset_tag_t pc = &sc->sc_pc;
238 pcitag_t tag;
239 u_int mode;
240
241 tag = pci_make_tag(pc, pc->pc_bus, PCI_BANDIT, 0);
242 if ((pci_conf_read(pc, tag, PCI_ID_REG) & 0xffff) == 0xffff)
243 return;
244
245 mode = pci_conf_read(pc, tag, PCI_REG_MODE_SELECT);
246
247 if ((mode & PCI_MODE_IO_COHERENT) == 0) {
248 mode |= PCI_MODE_IO_COHERENT;
249 pci_conf_write(pc, tag, PCI_REG_MODE_SELECT, mode);
250 }
251 }
252