pq3obio.c revision 1.2 1 /* $NetBSD: pq3obio.c,v 1.2 2011/01/18 01:02:53 matt Exp $ */
2 /*-
3 * Copyright (c) 2010, 2011 The NetBSD Foundation, Inc.
4 * All rights reserved.
5 *
6 * This code is derived from software contributed to The NetBSD Foundation
7 * by Raytheon BBN Technologies Corp and Defense Advanced Research Projects
8 * Agency and which was developed by Matt Thomas of 3am Software Foundry.
9 *
10 * This material is based upon work supported by the Defense Advanced Research
11 * Projects Agency and Space and Naval Warfare Systems Center, Pacific, under
12 * Contract No. N66001-09-C-2073.
13 * Approved for Public Release, Distribution Unlimited
14 *
15 * Redistribution and use in source and binary forms, with or without
16 * modification, are permitted provided that the following conditions
17 * are met:
18 * 1. Redistributions of source code must retain the above copyright
19 * notice, this list of conditions and the following disclaimer.
20 * 2. Redistributions in binary form must reproduce the above copyright
21 * notice, this list of conditions and the following disclaimer in the
22 * documentation and/or other materials provided with the distribution.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
25 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
26 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
27 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
28 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
29 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
30 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
31 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
32 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
33 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
34 * POSSIBILITY OF SUCH DAMAGE.
35 */
36
37 #define LBC_PRIVATE
38
39 #include "locators.h"
40
41 #include <sys/cdefs.h>
42
43 __KERNEL_RCSID(0, "$NetBSD: pq3obio.c,v 1.2 2011/01/18 01:02:53 matt Exp $");
44
45 #include <sys/param.h>
46 #include <sys/device.h>
47 #include <sys/kmem.h>
48 #include <sys/bus.h>
49 #include <sys/extent.h>
50
51 #include <powerpc/booke/cpuvar.h>
52 #include <powerpc/booke/e500var.h>
53 #include <powerpc/booke/e500reg.h>
54
55 struct pq3lbc_softc {
56 bus_addr_t lbc_base;
57 bus_addr_t lbc_limit;
58 uint32_t lbc_br;
59 uint32_t lbc_or;
60 };
61
62 struct pq3obio_softc {
63 device_t sc_dev;
64 bus_space_tag_t sc_bst;
65 bus_space_handle_t sc_bsh;
66 struct pq3lbc_softc sc_lbcs[8];
67 struct powerpc_bus_space sc_obio_bst;
68 };
69
70 static int pq3obio_match(device_t, cfdata_t, void *);
71 static void pq3obio_attach(device_t, device_t, void *);
72
73 CFATTACH_DECL_NEW(pq3obio, sizeof(struct pq3obio_softc),
74 pq3obio_match, pq3obio_attach, NULL, NULL);
75
76 static int
77 pq3obio_match(device_t parent, cfdata_t cf, void *aux)
78 {
79
80 if (!e500_cpunode_submatch(parent, cf, "lbc", aux))
81 return 0;
82
83 return 1;
84 }
85
86 static int
87 pq3obio_print(void *aux, const char *pnp)
88 {
89 struct generic_attach_args * const ga = aux;
90
91 if (pnp)
92 aprint_normal(" at %s", pnp);
93
94 if (ga->ga_cs != OBIOCF_CS_DEFAULT)
95 aprint_normal(" cs %d", ga->ga_cs);
96
97 if (ga->ga_addr != OBIOCF_ADDR_DEFAULT) {
98 aprint_normal(" addr %#x", ga->ga_addr);
99 if (ga->ga_size != OBIOCF_SIZE_DEFAULT)
100 aprint_normal(" size %#x", ga->ga_size);
101 }
102 if (ga->ga_irq != OBIOCF_IRQ_DEFAULT)
103 aprint_normal(" irq %d", ga->ga_irq);
104
105 return UNCONF;
106 }
107
108 static int
109 pq3obio_search(device_t parent, cfdata_t cf, const int *slocs, void *aux)
110 {
111 struct pq3obio_softc * const sc = device_private(parent);
112 struct generic_attach_args ga;
113 bool tryagain;
114
115 do {
116 const struct pq3lbc_softc *lbc;
117 ga.ga_name = "obio";
118 ga.ga_addr = cf->cf_loc[OBIOCF_ADDR];
119 ga.ga_size = cf->cf_loc[OBIOCF_SIZE];
120 ga.ga_irq = cf->cf_loc[OBIOCF_IRQ];
121 ga.ga_cs = cf->cf_loc[OBIOCF_CS];
122 ga.ga_bst = &sc->sc_obio_bst;
123
124 if (ga.ga_cs != OBIOCF_CS_DEFAULT) {
125 lbc = &sc->sc_lbcs[ga.ga_cs];
126 if ((u_int) ga.ga_cs >= __arraycount(sc->sc_lbcs))
127 return 0;
128 if (ga.ga_addr != OBIOCF_ADDR_DEFAULT) {
129 if (ga.ga_addr < lbc->lbc_base
130 || ga.ga_addr > lbc->lbc_limit)
131 return 0;
132 } else {
133 ga.ga_addr = lbc->lbc_base;
134 }
135 } else {
136 u_int cs;
137 if (ga.ga_addr == OBIOCF_ADDR_DEFAULT)
138 return 0;
139 for (cs = 0, lbc = sc->sc_lbcs;
140 cs < __arraycount(sc->sc_lbcs);
141 cs++, lbc++) {
142 if (ga.ga_addr >= lbc->lbc_base
143 && ga.ga_addr <= lbc->lbc_limit) {
144 ga.ga_cs = cs;
145 break;
146 }
147 }
148 if (ga.ga_cs == OBIOCF_CS_DEFAULT)
149 return 0;
150 }
151
152 if (ga.ga_size != OBIOCF_SIZE_DEFAULT) {
153 if (ga.ga_size >= lbc->lbc_limit - ga.ga_addr)
154 return 0;
155 } else {
156 ga.ga_size = lbc->lbc_limit + 1 - lbc->lbc_base;
157 }
158
159 tryagain = false;
160 if (config_match(parent, cf, &ga) > 0) {
161 int floc[OBIOCF_NLOCS] = {
162 [OBIOCF_ADDR] = ga.ga_addr,
163 [OBIOCF_SIZE] = ga.ga_size,
164 [OBIOCF_IRQ] = ga.ga_irq,
165 [OBIOCF_CS] = ga.ga_cs,
166 };
167 config_attach_loc(parent, cf, floc, &ga, pq3obio_print);
168 tryagain = (cf->cf_fstate == FSTATE_STAR);
169 }
170 } while (tryagain);
171
172 return (0);
173 }
174
175 static const char br_msel_strings[8][6] = {
176 [__SHIFTOUT(BR_MSEL_GPCM,BR_MSEL)] = "GPCM",
177 [__SHIFTOUT(BR_MSEL_FCM,BR_MSEL)] = "FCM",
178 [__SHIFTOUT(BR_MSEL_SDRAM,BR_MSEL)] = "SDRAM",
179 [__SHIFTOUT(BR_MSEL_UPMA,BR_MSEL)] = "UPMA",
180 [__SHIFTOUT(BR_MSEL_UPMB,BR_MSEL)] = "UPMB",
181 [__SHIFTOUT(BR_MSEL_UPMC,BR_MSEL)] = "UPMC",
182 };
183
184 static void
185 pq3obio_attach(device_t parent, device_t self, void *aux)
186 {
187 struct cpunode_softc * const psc = device_private(parent);
188 struct pq3obio_softc * const sc = device_private(self);
189 struct cpunode_attach_args * const cna = aux;
190 struct cpunode_locators * const cnl = &cna->cna_locs;
191 struct powerpc_bus_space * const t = &sc->sc_obio_bst;
192 u_int found = 0;
193 int error;
194
195 psc->sc_children |= cna->cna_childmask;
196 sc->sc_dev = self;
197 sc->sc_bst = cna->cna_memt;
198
199 error = bus_space_map(sc->sc_bst, cnl->cnl_addr, cnl->cnl_size, 0,
200 &sc->sc_bsh);
201 if (error) {
202 aprint_error("failed to map registers: %d\n", error);
203 return;
204 }
205
206 for (u_int i = 0; i < 8; i++) {
207 struct pq3lbc_softc * const lbc = &sc->sc_lbcs[i];
208 uint32_t br = bus_space_read_4(sc->sc_bst, sc->sc_bsh, BRn(i));
209 if (br & BR_V) {
210 found++;
211 lbc->lbc_br = br;
212 lbc->lbc_or = bus_space_read_4(sc->sc_bst,
213 sc->sc_bsh, ORn(i));
214 lbc->lbc_base = lbc->lbc_br & BR_BA & lbc->lbc_or;
215 lbc->lbc_limit = lbc->lbc_base + ~(lbc->lbc_or & OR_AM);
216 }
217 }
218
219 aprint_normal(": %u of 8 ports enabled\n", found);
220 if (found == 0)
221 return;
222
223 t->pbs_base = 0xffffffff;
224 t->pbs_limit = 0;
225 t->pbs_flags = _BUS_SPACE_BIG_ENDIAN;
226
227 u_int sorted[found];
228 u_int nsorted = 0;
229
230 for (u_int i = 0; i < 8; i++) {
231 struct pq3lbc_softc * const lbc = &sc->sc_lbcs[i];
232 if ((lbc->lbc_br & BR_V) == 0)
233 continue;
234
235 u_int j;
236 for (j = 0; j < nsorted; j++) {
237 if (lbc->lbc_base < sc->sc_lbcs[sorted[j]].lbc_base)
238 break;
239 }
240 for (u_int k = ++nsorted; k > j; k--) {
241 sorted[k] = sorted[k - 1];
242 }
243 sorted[j] = i;
244
245 if (lbc->lbc_base < t->pbs_base)
246 t->pbs_base = lbc->lbc_base;
247 if (lbc->lbc_limit > t->pbs_limit)
248 t->pbs_limit = lbc->lbc_limit;
249 #if 0
250 aprint_normal_dev(sc->sc_dev,
251 "cs%u: br=%#x or=%#x", i, lbc->lbc_br, lbc->lbc_or);
252 #endif
253 u_int n = ffs(~(lbc->lbc_or & OR_AM) + 1) - 1;
254 aprint_normal_dev(sc->sc_dev,
255 "cs%u: %u%cB %u-bit %s region at %#x\n",
256 i,
257 1 << (n % 10), " KMGTPE"[n / 10],
258 1 << (__SHIFTOUT(lbc->lbc_br, BR_PS) + 2),
259 br_msel_strings[__SHIFTOUT(lbc->lbc_br,BR_MSEL)],
260 lbc->lbc_base);
261 }
262
263 error = bus_space_init(t, device_xname(sc->sc_dev), NULL, 0);
264 if (error) {
265 aprint_error_dev(sc->sc_dev,
266 "failed to initialize obio bus space: %d\n", error);
267 return;
268 }
269
270 /*
271 * We've created a bus space which covers all the chip selects
272 * but there might be gaps inbetween them. We need to make sure
273 * bus_space_map will fail for those. To do that, we reserve
274 * the gaps between the chip-selects.
275 */
276 for (u_int i = 1; i < found; i++) {
277 struct pq3lbc_softc * const lbc_lo = &sc->sc_lbcs[sorted[i-1]];
278 struct pq3lbc_softc * const lbc_hi = &sc->sc_lbcs[sorted[i]];
279 if (lbc_lo->lbc_limit + 1 == lbc_hi->lbc_base)
280 continue;
281 error = extent_alloc_region(t->pbs_extent,
282 lbc_lo->lbc_limit + 1,
283 lbc_hi->lbc_base - (lbc_lo->lbc_limit + 1), 0);
284 if (error) {
285 aprint_error_dev(sc->sc_dev,
286 "failed to reserve %#x..%#x: %d\n",
287 lbc_lo->lbc_limit + 1,
288 lbc_hi->lbc_base - 1,
289 error);
290 return;
291 }
292 }
293
294 /*
295 * Now we can do the device configuration to find what might
296 * be using obio.
297 */
298 int locs[OBIOCF_NLOCS];
299 locs[OBIOCF_ADDR] = OBIOCF_ADDR_DEFAULT;
300 locs[OBIOCF_SIZE] = OBIOCF_SIZE_DEFAULT;
301 locs[OBIOCF_CS] = OBIOCF_CS_DEFAULT;
302 config_search_loc(pq3obio_search, self, "obio", locs, NULL);
303 }
304