pxa2x0.c revision 1.16 1 /* $NetBSD: pxa2x0.c,v 1.16 2007/02/21 22:59:39 thorpej Exp $ */
2
3 /*
4 * Copyright (c) 2002, 2005 Genetec Corporation. All rights reserved.
5 * Written by Hiroyuki Bessho for Genetec Corporation.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed for the NetBSD Project by
18 * Genetec Corporation.
19 * 4. The name of Genetec Corporation may not be used to endorse or
20 * promote products derived from this software without specific prior
21 * written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY GENETEC CORPORATION ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
25 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
26 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL GENETEC CORPORATION
27 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
28 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
29 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
30 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
31 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
32 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
33 * POSSIBILITY OF SUCH DAMAGE.
34 *
35 *
36 * Autoconfiguration support for the Intel PXA2[15]0 application
37 * processor. This code is derived from arm/sa11x0/sa11x0.c
38 */
39
40 /*-
41 * Copyright (c) 2001, The NetBSD Foundation, Inc. All rights reserved.
42 *
43 * This code is derived from software contributed to The NetBSD Foundation
44 * by IWAMOTO Toshihiro and Ichiro FUKUHARA.
45 *
46 * Redistribution and use in source and binary forms, with or without
47 * modification, are permitted provided that the following conditions
48 * are met:
49 * 1. Redistributions of source code must retain the above copyright
50 * notice, this list of conditions and the following disclaimer.
51 * 2. Redistributions in binary form must reproduce the above copyright
52 * notice, this list of conditions and the following disclaimer in the
53 * documentation and/or other materials provided with the distribution.
54 * 3. All advertising materials mentioning features or use of this software
55 * must display the following acknowledgement:
56 * This product includes software developed by the NetBSD
57 * Foundation, Inc. and its contributors.
58 * 4. Neither the name of The NetBSD Foundation nor the names of its
59 * contributors may be used to endorse or promote products derived
60 * from this software without specific prior written permission.
61 */
62 /*-
63 * Copyright (c) 1999
64 * Shin Takemura and PocketBSD Project. All rights reserved.
65 *
66 * Redistribution and use in source and binary forms, with or without
67 * modification, are permitted provided that the following conditions
68 * are met:
69 * 1. Redistributions of source code must retain the above copyright
70 * notice, this list of conditions and the following disclaimer.
71 * 2. Redistributions in binary form must reproduce the above copyright
72 * notice, this list of conditions and the following disclaimer in the
73 * documentation and/or other materials provided with the distribution.
74 * 3. All advertising materials mentioning features or use of this software
75 * must display the following acknowledgement:
76 * This product includes software developed by the PocketBSD project
77 * and its contributors.
78 * 4. Neither the name of the project nor the names of its contributors
79 * may be used to endorse or promote products derived from this software
80 * without specific prior written permission.
81 *
82 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
83 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
84 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
85 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
86 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
87 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
88 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
89 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
90 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
91 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
92 * SUCH DAMAGE.
93 *
94 */
95
96 #include <sys/cdefs.h>
97 __KERNEL_RCSID(0, "$NetBSD: pxa2x0.c,v 1.16 2007/02/21 22:59:39 thorpej Exp $");
98
99 #include "pxaintc.h"
100 #include "pxagpio.h"
101 #if 0
102 #include "pxadmac.h" /* Not yet */
103 #endif
104
105 #include "locators.h"
106
107 #include <sys/param.h>
108 #include <sys/systm.h>
109 #include <sys/device.h>
110 #include <sys/kernel.h>
111 #include <sys/reboot.h>
112
113 #include <machine/cpu.h>
114 #include <machine/bus.h>
115
116 #include <arm/cpufunc.h>
117 #include <arm/mainbus/mainbus.h>
118 #include <arm/xscale/pxa2x0cpu.h>
119 #include <arm/xscale/pxa2x0reg.h>
120 #include <arm/xscale/pxa2x0var.h>
121 #include <arm/xscale/xscalereg.h>
122
123 struct pxaip_softc {
124 struct device sc_dev;
125 bus_space_tag_t sc_bust;
126 bus_dma_tag_t sc_dmat;
127 bus_space_handle_t sc_bush_clk;
128 bus_space_handle_t sc_bush_mem;
129 };
130
131 /* prototypes */
132 static int pxaip_match(struct device *, struct cfdata *, void *);
133 static void pxaip_attach(struct device *, struct device *, void *);
134 static int pxaip_search(struct device *, struct cfdata *,
135 const int *, void *);
136 static void pxaip_attach_critical(struct pxaip_softc *);
137 static int pxaip_print(void *, const char *);
138
139 static int pxaip_measure_cpuclock(struct pxaip_softc *);
140
141 #if defined(CPU_XSCALE_PXA250) && defined(CPU_XSCALE_PXA270)
142 # define SUPPORTED_CPU "PXA250 and PXA270"
143 #elif defined(CPU_XSCALE_PXA250)
144 # define SUPPORTED_CPU "PXA250"
145 #elif defined(CPU_XSCALE_PXA270)
146 # define SUPPORTED_CPU "PXA270"
147 #else
148 # define SUPPORTED_CPU "none of PXA2xx"
149 #endif
150
151 /* attach structures */
152 CFATTACH_DECL(pxaip, sizeof(struct pxaip_softc),
153 pxaip_match, pxaip_attach, NULL, NULL);
154
155 static struct pxaip_softc *pxaip_sc;
156 static vaddr_t pxamemctl_regs;
157 #define MEMCTL_BOOTSTRAP_REG(reg) \
158 (*((volatile uint32_t *)(pxamemctl_regs + (reg))))
159 static vaddr_t pxaclkman_regs;
160 #define CLKMAN_BOOTSTRAP_REG(reg) \
161 (*((volatile uint32_t *)(pxaclkman_regs + (reg))))
162
163 static int
164 pxaip_match(struct device *parent, struct cfdata *match, void *aux)
165 {
166
167 #if !defined(CPU_XSCALE_PXA270)
168 if (__CPU_IS_PXA270)
169 goto bad_config;
170 #endif
171
172 #if !defined(CPU_XSCALE_PXA250)
173 if (__CPU_IS_PXA250)
174 goto bad_config;
175 #endif
176
177 return 1;
178
179 #if defined(CPU_XSCALE_PXA250) + defined(CPU_XSCALE_PXA270) != 2
180 bad_config:
181 aprint_error("Kernel is configured for %s, but CPU is %s\n",
182 SUPPORTED_CPU, __CPU_IS_PXA270 ? "PXA270" : "PXA250");
183 return 0;
184 #endif
185 }
186
187 static void
188 pxaip_attach(struct device *parent, struct device *self, void *aux)
189 {
190 struct pxaip_softc *sc = (struct pxaip_softc *)self;
191 int cpuclock;
192
193 pxaip_sc = sc;
194 sc->sc_bust = &pxa2x0_bs_tag;
195 sc->sc_dmat = &pxa2x0_bus_dma_tag;
196
197 aprint_normal(": PXA2x0 Onchip Peripheral Bus\n");
198
199 if (bus_space_map(sc->sc_bust, PXA2X0_CLKMAN_BASE, PXA2X0_CLKMAN_SIZE,
200 0, &sc->sc_bush_clk))
201 panic("pxaip_attach: failed to map CLKMAN");
202
203 if (bus_space_map(sc->sc_bust, PXA2X0_MEMCTL_BASE, PXA2X0_MEMCTL_SIZE,
204 0, &sc->sc_bush_mem))
205 panic("pxaip_attach: failed to map MEMCTL");
206
207 /*
208 * Calculate clock speed
209 * This takes 2 secs at most.
210 */
211 cpuclock = pxaip_measure_cpuclock(sc) / 1000;
212 printf("%s: CPU clock = %d.%03d MHz\n", self->dv_xname,
213 cpuclock/1000, cpuclock%1000 );
214
215 aprint_normal("%s: kernel is configured for " SUPPORTED_CPU
216 ", cpu type is %s\n",
217 self->dv_xname,
218 __CPU_IS_PXA270 ? "PXA270" : "PXA250");
219
220 /*
221 * Attach critical devices
222 */
223 pxaip_attach_critical(sc);
224
225 /*
226 * Attach all other devices
227 */
228 config_search_ia(pxaip_search, self, "pxaip", sc);
229 }
230
231 static int
232 pxaip_search(struct device *parent, struct cfdata *cf,
233 const int *ldesc, void *aux)
234 {
235 struct pxaip_softc *sc = aux;
236 struct pxaip_attach_args aa;
237
238 aa.pxa_iot = sc->sc_bust;
239 aa.pxa_dmat = sc->sc_dmat;
240 aa.pxa_addr = cf->cf_loc[PXAIPCF_ADDR];
241 aa.pxa_size = cf->cf_loc[PXAIPCF_SIZE];
242 aa.pxa_index = cf->cf_loc[PXAIPCF_INDEX];
243 aa.pxa_intr = cf->cf_loc[PXAIPCF_INTR];
244
245 if (config_match(parent, cf, &aa))
246 config_attach(parent, cf, &aa, pxaip_print);
247
248 return 0;
249 }
250
251 static void
252 pxaip_attach_critical(struct pxaip_softc *sc)
253 {
254 struct pxaip_attach_args aa;
255
256 aa.pxa_iot = sc->sc_bust;
257 aa.pxa_dmat = sc->sc_dmat;
258 aa.pxa_addr = PXA2X0_INTCTL_BASE;
259 aa.pxa_size = PXA2X0_INTCTL_SIZE;
260 aa.pxa_intr = PXAIPCF_INTR_DEFAULT;
261 if (config_found(&sc->sc_dev, &aa, pxaip_print) == NULL)
262 panic("pxaip_attach_critical: failed to attach INTC!");
263
264 #if NPXAGPIO > 0
265 aa.pxa_iot = sc->sc_bust;
266 aa.pxa_dmat = sc->sc_dmat;
267 aa.pxa_addr = PXA2X0_GPIO_BASE;
268 aa.pxa_size = PXA2X0_GPIO_SIZE;
269 aa.pxa_intr = PXAIPCF_INTR_DEFAULT;
270 if (config_found(&sc->sc_dev, &aa, pxaip_print) == NULL)
271 panic("pxaip_attach_critical: failed to attach GPIO!");
272 #endif
273
274 #if NPXADMAC > 0
275 aa.pxa_iot = sc->sc_bust;
276 aa.pxa_dmat = sc->sc_dmat;
277 aa.pxa_addr = PXA2X0_DMAC_BASE;
278 aa.pxa_size = PXA2X0_DMAC_SIZE;
279 aa.pxa_intr = PXA2X0_INT_DMA;
280 if (config_found(&sc->sc_dev, &aa, pxaip_print) == NULL)
281 panic("pxaip_attach_critical: failed to attach DMAC!");
282 #endif
283 }
284
285 static int
286 pxaip_print(void *aux, const char *name)
287 {
288 struct pxaip_attach_args *sa = (struct pxaip_attach_args*)aux;
289
290 if (sa->pxa_addr != PXAIPCF_ADDR_DEFAULT) {
291 aprint_normal(" addr 0x%lx", sa->pxa_addr);
292 if (sa->pxa_size > PXAIPCF_SIZE_DEFAULT)
293 aprint_normal("-0x%lx", sa->pxa_addr + sa->pxa_size-1);
294 }
295 if (sa->pxa_intr != PXAIPCF_INTR_DEFAULT)
296 aprint_normal(" intr %d", sa->pxa_intr);
297
298 return (UNCONF);
299 }
300
301 static inline uint32_t
302 read_clock_counter_xsc1(void)
303 {
304 uint32_t x;
305 __asm volatile("mrc p14, 0, %0, c1, c0, 0" : "=r" (x) );
306
307 return x;
308 }
309
310 static inline uint32_t
311 read_clock_counter_xsc2(void)
312 {
313 uint32_t x;
314 __asm volatile("mrc p14, 0, %0, c1, c1, 0" : "=r" (x) );
315
316 return x;
317 }
318
319 static int
320 pxaip_measure_cpuclock(struct pxaip_softc *sc)
321 {
322 uint32_t rtc0, rtc1, start, end;
323 uint32_t pmcr_save;
324 bus_space_handle_t ioh;
325 int irq;
326 int is_xsc2 = CPU_IS_PXA270;
327 #define read_clock_counter() (is_xsc2 ? read_clock_counter_xsc2() : \
328 read_clock_counter_xsc1())
329
330 if (bus_space_map(sc->sc_bust, PXA2X0_RTC_BASE, PXA2X0_RTC_SIZE, 0,
331 &ioh))
332 panic("pxaip_measure_cpuclock: can't map RTC");
333
334 irq = disable_interrupts(I32_bit|F32_bit);
335
336 if (is_xsc2) {
337 __asm volatile(
338 "mrc p14, 0, %0, c0, c1, 0" : "=r" (pmcr_save));
339 /* Enable clock counter */
340 __asm volatile(
341 "mcr p14, 0, %0, c0, c1, 0" : : "r" (PMNC_E|PMNC_C));
342 }
343 else {
344 __asm volatile(
345 "mrc p14, 0, %0, c0, c0, 0" : "=r" (pmcr_save));
346 /* Enable clock counter */
347 __asm volatile(
348 "mcr p14, 0, %0, c0, c0, 0" : : "r" (PMNC_E|PMNC_C));
349 }
350
351 rtc0 = bus_space_read_4(sc->sc_bust, ioh, RTC_RCNR);
352 /* Wait for next second starts */
353 while ((rtc1 = bus_space_read_4(sc->sc_bust, ioh, RTC_RCNR)) == rtc0)
354 ;
355 start = read_clock_counter();
356 while(rtc1 == bus_space_read_4(sc->sc_bust, ioh, RTC_RCNR))
357 ; /* Wait for 1sec */
358 end = read_clock_counter();
359
360 if (is_xsc2)
361 __asm volatile(
362 "mcr p14, 0, %0, c0, c1, 0" : : "r" (pmcr_save));
363 else
364 __asm volatile(
365 "mcr p14, 0, %0, c0, c0, 0" : : "r" (pmcr_save));
366 restore_interrupts(irq);
367
368 bus_space_unmap(sc->sc_bust, ioh, PXA2X0_RTC_SIZE);
369
370 return end - start;
371 }
372
373 void
374 pxa2x0_turbo_mode(int f)
375 {
376 __asm volatile("mcr p14, 0, %0, c6, c0, 0" : : "r" (f));
377 }
378
379 void
380 pxa2x0_probe_sdram(vaddr_t memctl_va, paddr_t *start, paddr_t *size)
381 {
382 u_int32_t mdcnfg, dwid, dcac, drac, dnb;
383 int i;
384
385 mdcnfg = *((volatile u_int32_t *)(memctl_va + MEMCTL_MDCNFG));
386
387 /*
388 * Scan all 4 SDRAM banks
389 */
390 for (i = 0; i < PXA2X0_SDRAM_BANKS; i++) {
391 start[i] = 0;
392 size[i] = 0;
393
394 switch (i) {
395 case 0:
396 case 1:
397 if ((i == 0 && (mdcnfg & MDCNFG_DE0) == 0) ||
398 (i == 1 && (mdcnfg & MDCNFG_DE1) == 0))
399 continue;
400 dwid = mdcnfg >> MDCNFD_DWID01_SHIFT;
401 dcac = mdcnfg >> MDCNFD_DCAC01_SHIFT;
402 drac = mdcnfg >> MDCNFD_DRAC01_SHIFT;
403 dnb = mdcnfg >> MDCNFD_DNB01_SHIFT;
404 break;
405
406 case 2:
407 case 3:
408 if ((i == 2 && (mdcnfg & MDCNFG_DE2) == 0) ||
409 (i == 3 && (mdcnfg & MDCNFG_DE3) == 0))
410 continue;
411 dwid = mdcnfg >> MDCNFD_DWID23_SHIFT;
412 dcac = mdcnfg >> MDCNFD_DCAC23_SHIFT;
413 drac = mdcnfg >> MDCNFD_DRAC23_SHIFT;
414 dnb = mdcnfg >> MDCNFD_DNB23_SHIFT;
415 break;
416 default:
417 panic("pxa2x0_probe_sdram: impossible");
418 }
419
420 dwid = 2 << (1 - (dwid & MDCNFD_DWID_MASK)); /* 16/32 width */
421 dcac = 1 << ((dcac & MDCNFD_DCAC_MASK) + 8); /* 8-11 columns */
422 drac = 1 << ((drac & MDCNFD_DRAC_MASK) + 11); /* 11-13 rows */
423 dnb = 2 << (dnb & MDCNFD_DNB_MASK); /* # of banks */
424
425 size[i] = (paddr_t)(dwid * dcac * drac * dnb);
426 start[i] = PXA2X0_SDRAM0_START + (i * PXA2X0_SDRAM_BANK_SIZE);
427 }
428 }
429
430 void
431 pxa2x0_memctl_bootstrap(vaddr_t va)
432 {
433
434 pxamemctl_regs = va;
435 }
436
437 uint32_t
438 pxa2x0_memctl_read(int reg)
439 {
440 struct pxaip_softc *sc;
441 bus_space_tag_t iot;
442 bus_space_handle_t ioh;
443
444 if (__predict_true(pxaip_sc != NULL)) {
445 sc = pxaip_sc;
446 iot = sc->sc_bust;
447 ioh = sc->sc_bush_mem;
448 return (bus_space_read_4(iot, ioh, reg));
449 } else if (__predict_true(pxamemctl_regs != 0)) {
450 return (MEMCTL_BOOTSTRAP_REG(reg));
451 }
452 panic("pxa2x0_memctl_read: not bootstrapped");
453 /*NOTREACHED*/
454 }
455
456 void
457 pxa2x0_memctl_write(int reg, uint32_t val)
458 {
459 struct pxaip_softc *sc;
460 bus_space_tag_t iot;
461 bus_space_handle_t ioh;
462
463 if (__predict_true(pxaip_sc != NULL)) {
464 sc = pxaip_sc;
465 iot = sc->sc_bust;
466 ioh = sc->sc_bush_mem;
467 bus_space_write_4(iot, ioh, reg, val);
468 } else if (__predict_true(pxamemctl_regs != 0)) {
469 MEMCTL_BOOTSTRAP_REG(reg) = val;
470 } else {
471 panic("pxa2x0_memctl_write: not bootstrapped");
472 }
473 return;
474 }
475
476 void
477 pxa2x0_clkman_bootstrap(vaddr_t va)
478 {
479
480 pxaclkman_regs = va;
481 }
482
483 void
484 pxa2x0_clkman_config(u_int clk, bool enable)
485 {
486 struct pxaip_softc *sc;
487 bus_space_tag_t iot;
488 bus_space_handle_t ioh;
489 uint32_t rv;
490
491 if (__predict_true(pxaip_sc != NULL)) {
492 sc = pxaip_sc;
493 iot = sc->sc_bust;
494 ioh = sc->sc_bush_clk;
495
496 rv = bus_space_read_4(iot, ioh, CLKMAN_CKEN);
497 rv &= ~clk;
498 if (enable)
499 rv |= clk;
500 bus_space_write_4(iot, ioh, CLKMAN_CKEN, rv);
501 return;
502 } else if (__predict_true(pxaclkman_regs != 0)) {
503 rv = CLKMAN_BOOTSTRAP_REG(CLKMAN_CKEN);
504 rv &= ~clk;
505 if (enable)
506 rv |= clk;
507 CLKMAN_BOOTSTRAP_REG(CLKMAN_CKEN) = rv;
508 return;
509 }
510 panic("pxa2x0_clkman_config: not bootstrapped");
511 }
512