vrip.c revision 1.21 1 /* $NetBSD: vrip.c,v 1.21 2002/03/10 07:24:54 takemura Exp $ */
2
3 /*-
4 * Copyright (c) 1999, 2002
5 * Shin Takemura and PocketBSD Project. All rights reserved.
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. Neither the name of the project nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 *
31 */
32 #include "opt_vr41xx.h"
33 #include "opt_tx39xx.h"
34
35 #include <sys/param.h>
36 #include <sys/systm.h>
37 #include <sys/device.h>
38 #include <sys/reboot.h>
39
40 #include <machine/cpu.h>
41 #include <machine/bus.h>
42 #include <machine/autoconf.h>
43 #include <machine/platid.h>
44 #include <machine/platid_mask.h>
45
46 #include <hpcmips/vr/vr.h>
47 #include <hpcmips/vr/vrcpudef.h>
48 #include <hpcmips/vr/vripunit.h>
49 #include <hpcmips/vr/vripif.h>
50 #include <hpcmips/vr/vripreg.h>
51 #include <hpcmips/vr/vripvar.h>
52 #include <hpcmips/vr/icureg.h>
53 #include <hpcmips/vr/cmureg.h>
54 #include "locators.h"
55
56 #ifdef VRIP_DEBUG
57 #define DPRINTF_ENABLE
58 #define DPRINTF_DEBUG vrip_debug
59 #endif
60 #define USE_HPC_DPRINTF
61 #include <machine/debug.h>
62
63 #ifdef VRIP_DEBUG
64 #define DBG_BIT_PRINT(reg) if (vrip_debug) dbg_bit_print(reg);
65 #define DUMP_LEVEL2MASK(sc,arg) if (vrip_debug) __vrip_dump_level2mask(sc,arg)
66 #else
67 #define DBG_BIT_PRINT(arg)
68 #define DUMP_LEVEL2MASK(sc,arg)
69 #endif
70
71 #define VALID_UNIT(sc, unit) (0 <= (unit) && (unit) < (sc)->sc_nunits)
72
73 #ifdef SINGLE_VRIP_BASE
74 int vripmatch(struct device *, struct cfdata *, void *);
75 void vripattach(struct device *, struct device *, void *);
76 #endif
77 int vrip_print(void *, const char *);
78 int vrip_search(struct device *, struct cfdata *, void *);
79 int vrip_intr(void *, u_int32_t, u_int32_t);
80
81 int __vrip_power(vrip_chipset_tag_t, int, int);
82 vrip_intr_handle_t __vrip_intr_establish(vrip_chipset_tag_t, int, int,
83 int, int(*)(void*), void*);
84 void __vrip_intr_disestablish(vrip_chipset_tag_t, vrip_intr_handle_t);
85 void __vrip_intr_setmask1(vrip_chipset_tag_t, vrip_intr_handle_t, int);
86 void __vrip_intr_setmask2(vrip_chipset_tag_t, vrip_intr_handle_t,
87 u_int32_t, int);
88 void __vrip_intr_getstatus2(vrip_chipset_tag_t, vrip_intr_handle_t,
89 u_int32_t*);
90 void __vrip_register_cmu(vrip_chipset_tag_t, vrcmu_chipset_tag_t);
91 void __vrip_register_gpio(vrip_chipset_tag_t, hpcio_chip_t);
92 void __vrip_register_dmaau(vrip_chipset_tag_t, vrdmaau_chipset_tag_t);
93 void __vrip_register_dcu(vrip_chipset_tag_t, vrdcu_chipset_tag_t);
94 void __vrip_dump_level2mask(vrip_chipset_tag_t, void *);
95
96 struct vrip_softc *the_vrip_sc = NULL;
97
98 static const struct vrip_chipset_tag vrip_chipset_methods = {
99 .vc_power = __vrip_power,
100 .vc_intr_establish = __vrip_intr_establish,
101 .vc_intr_disestablish = __vrip_intr_disestablish,
102 .vc_intr_setmask1 = __vrip_intr_setmask1,
103 .vc_intr_setmask2 = __vrip_intr_setmask2,
104 .vc_intr_getstatus2 = __vrip_intr_getstatus2,
105 .vc_register_cmu = __vrip_register_cmu,
106 .vc_register_gpio = __vrip_register_gpio,
107 .vc_register_dmaau = __vrip_register_dmaau,
108 .vc_register_dcu = __vrip_register_dcu,
109 };
110
111 #ifdef SINGLE_VRIP_BASE
112 struct cfattach vrip_ca = {
113 sizeof(struct vrip_softc), vripmatch, vripattach
114 };
115
116 static const struct vrip_unit vrip_units[] = {
117 [VRIP_UNIT_PMU] = { "pmu",
118 { VRIP_INTR_POWER, VRIP_INTR_BAT, }, },
119 [VRIP_UNIT_RTC] = { "rtc",
120 { VRIP_INTR_RTCL1, }, },
121 [VRIP_UNIT_PIU] = { "piu",
122 { VRIP_INTR_PIU, },
123 CMUMASK_PIU,
124 ICUPIUINT_REG_W, MPIUINT_REG_W },
125 [VRIP_UNIT_KIU] = { "kiu",
126 { VRIP_INTR_KIU, },
127 CMUMASK_KIU,
128 KIUINT_REG_W, MKIUINT_REG_W },
129 [VRIP_UNIT_SIU] = { "siu",
130 { VRIP_INTR_SIU, }, },
131 [VRIP_UNIT_GIU] = { "giu",
132 { VRIP_INTR_GIU, },
133 0,
134 GIUINT_L_REG_W,MGIUINT_L_REG_W,
135 GIUINT_H_REG_W, MGIUINT_H_REG_W },
136 [VRIP_UNIT_LED] = { "led",
137 { VRIP_INTR_LED, }, },
138 [VRIP_UNIT_AIU] = { "aiu",
139 { VRIP_INTR_AIU, },
140 CMUMASK_AIU,
141 AIUINT_REG_W, MAIUINT_REG_W },
142 [VRIP_UNIT_FIR] = { "fir",
143 { VRIP_INTR_FIR, },
144 CMUMASK_FIR,
145 FIRINT_REG_W, MFIRINT_REG_W },
146 [VRIP_UNIT_DSIU]= { "dsiu",
147 { VRIP_INTR_DSIU, },
148 CMUMASK_DSIU,
149 DSIUINT_REG_W, MDSIUINT_REG_W },
150 [VRIP_UNIT_PCIU]= { "pciu",
151 { VRIP_INTR_PCI, },
152 CMUMASK_PCIU,
153 PCIINT_REG_W, MPCIINT_REG_W },
154 [VRIP_UNIT_SCU] = { "scu",
155 { VRIP_INTR_SCU, },
156 0,
157 SCUINT_REG_W, MSCUINT_REG_W },
158 [VRIP_UNIT_CSI] = { "csi",
159 { VRIP_INTR_CSI, },
160 CMUMASK_CSI,
161 CSIINT_REG_W, MCSIINT_REG_W },
162 [VRIP_UNIT_BCU] = { "bcu",
163 { VRIP_INTR_BCU, },
164 0,
165 BCUINT_REG_W, MBCUINT_REG_W },
166 };
167
168 void
169 vripattach(struct device *parent, struct device *self, void *aux)
170 {
171 struct vrip_softc *sc = (struct vrip_softc*)self;
172
173 printf("\n");
174
175 sc->sc_units = vrip_units;
176 sc->sc_nunits = sizeof(vrip_units)/sizeof(struct vrip_unit);
177 sc->sc_icu_addr = VRIP_ICU_ADDR;
178 sc->sc_sysint2 = SYSINT2_REG_W;
179 sc->sc_msysint2 = MSYSINT2_REG_W;
180
181 vripattach_common(parent, self, aux);
182 }
183 #endif /* SINGLE_VRIP_BASE */
184
185 int
186 vripmatch(struct device *parent, struct cfdata *match, void *aux)
187 {
188 struct mainbus_attach_args *ma = aux;
189
190 #if defined(SINGLE_VRIP_BASE) && defined(TX39XX)
191 if (!platid_match(&platid, &platid_mask_CPU_MIPS_VR_41XX))
192 return (0);
193 #endif /* SINGLE_VRIP_BASE && TX39XX */
194 if (strcmp(ma->ma_name, match->cf_driver->cd_name))
195 return (0);
196
197 return (1);
198 }
199
200 void
201 vripattach_common(struct device *parent, struct device *self, void *aux)
202 {
203 struct mainbus_attach_args *ma = aux;
204 struct vrip_softc *sc = (struct vrip_softc*)self;
205
206 sc->sc_chipset = vrip_chipset_methods; /* structure assignment */
207 sc->sc_chipset.vc_sc = sc;
208
209 #ifdef DIAGNOSTIC
210 if (sc->sc_icu_addr == 0 ||
211 sc->sc_sysint2 == 0 ||
212 sc->sc_msysint2 == 0)
213 panic("vripattach: missing register info.");
214 #endif /* DIAGNOSTIC */
215
216 /*
217 * Map ICU (Interrupt Control Unit) register space.
218 */
219 sc->sc_iot = ma->ma_iot;
220 if (bus_space_map(sc->sc_iot, sc->sc_icu_addr,
221 0x20 /*XXX lower area only*/,
222 0, /* no flags */
223 &sc->sc_ioh)) {
224 printf("vripattach: can't map ICU register.\n");
225 return;
226 }
227
228 /*
229 * Disable all Level 1 interrupts.
230 */
231 sc->sc_intrmask = 0;
232 bus_space_write_2(sc->sc_iot, sc->sc_ioh, MSYSINT1_REG_W, 0x0000);
233 bus_space_write_2(sc->sc_iot, sc->sc_ioh, sc->sc_msysint2, 0x0000);
234 /*
235 * Level 1 interrupts are redirected to HwInt0
236 */
237 vr_intr_establish(VR_INTR0, vrip_intr, self);
238 the_vrip_sc = sc;
239 /*
240 * Attach each devices
241 * GIU CMU DMAAU DCU interface interface is used by other system
242 * device. so attach first
243 */
244 sc->sc_pri = 2;
245 config_search(vrip_search, self, vrip_print);
246 /* Other system devices. */
247 sc->sc_pri = 1;
248 config_search(vrip_search, self, vrip_print);
249 }
250
251 int
252 vrip_print(void *aux, const char *hoge)
253 {
254 struct vrip_attach_args *va = (struct vrip_attach_args*)aux;
255
256 if (va->va_addr)
257 printf(" addr 0x%lx", va->va_addr);
258 if (va->va_size > 1)
259 printf("-0x%lx", va->va_addr + va->va_size - 1);
260
261 return (UNCONF);
262 }
263
264 int
265 vrip_search(struct device *parent, struct cfdata *cf, void *aux)
266 {
267 struct vrip_softc *sc = (struct vrip_softc *)parent;
268 struct vrip_attach_args va;
269
270 memset(&va, 0, sizeof(va));
271 va.va_vc = &sc->sc_chipset;
272 va.va_iot = sc->sc_iot;
273 va.va_unit = cf->cf_loc[VRIPIFCF_UNIT];
274 va.va_addr = cf->cf_loc[VRIPIFCF_ADDR];
275 va.va_size = cf->cf_loc[VRIPIFCF_SIZE];
276 va.va_addr2 = cf->cf_loc[VRIPIFCF_ADDR2];
277 va.va_size2 = cf->cf_loc[VRIPIFCF_SIZE2];
278 va.va_gpio_chips = sc->sc_gpio_chips;
279 va.va_cc = sc->sc_chipset.vc_cc;
280 va.va_ac = sc->sc_chipset.vc_ac;
281 va.va_dc = sc->sc_chipset.vc_dc;
282 if (((*cf->cf_attach->ca_match)(parent, cf, &va) == sc->sc_pri))
283 config_attach(parent, cf, &va, vrip_print);
284
285 return (0);
286 }
287
288 int
289 __vrip_power(vrip_chipset_tag_t vc, int unit, int onoff)
290 {
291 struct vrip_softc *sc = vc->vc_sc;
292 const struct vrip_unit *vu;
293
294 if (sc->sc_chipset.vc_cc == NULL)
295 return (0); /* You have no clock mask unit yet. */
296 if (!VALID_UNIT(sc, unit))
297 return (0);
298 vu = &sc->sc_units[unit];
299
300 return (*sc->sc_chipset.vc_cc->cc_clock)(sc->sc_chipset.vc_cc,
301 vu->vu_clkmask, onoff);
302 }
303
304 vrip_intr_handle_t
305 __vrip_intr_establish(vrip_chipset_tag_t vc, int unit, int line, int level,
306 int (*ih_fun)(void *), void *ih_arg)
307 {
308 struct vrip_softc *sc = vc->vc_sc;
309 const struct vrip_unit *vu;
310 struct intrhand *ih;
311
312 if (!VALID_UNIT(sc, unit))
313 return (NULL);
314 vu = &sc->sc_units[unit];
315 ih = &sc->sc_intrhands[vu->vu_intr[line]];
316 if (ih->ih_fun) /* Can't share level 1 interrupt */
317 return (NULL);
318 ih->ih_fun = ih_fun;
319 ih->ih_arg = ih_arg;
320 ih->ih_unit = vu;
321
322 /* Mask level 2 interrupt mask register. (disable interrupt) */
323 vrip_intr_setmask2(vc, ih, ~0, 0);
324 /* Unmask Level 1 interrupt mask register (enable interrupt) */
325 vrip_intr_setmask1(vc, ih, 1);
326
327 return ((void *)ih);
328 }
329
330 void
331 __vrip_intr_disestablish(vrip_chipset_tag_t vc, vrip_intr_handle_t handle)
332 {
333 struct intrhand *ih = handle;
334
335 ih->ih_fun = NULL;
336 ih->ih_arg = NULL;
337 /* Mask level 2 interrupt mask register(if any). (disable interrupt) */
338 vrip_intr_setmask2(vc, ih, ~0, 0);
339 /* Mask Level 1 interrupt mask register (disable interrupt) */
340 vrip_intr_setmask1(vc, ih, 0);
341 }
342
343 void
344 vrip_intr_suspend()
345 {
346 struct vrip_softc *sc = the_vrip_sc;
347 bus_space_tag_t iot = sc->sc_iot;
348 bus_space_handle_t ioh = sc->sc_ioh;
349
350 bus_space_write_2 (iot, ioh, MSYSINT1_REG_W, (1<<VRIP_INTR_POWER));
351 bus_space_write_2 (iot, ioh, sc->sc_msysint2, 0);
352 }
353
354 void
355 vrip_intr_resume()
356 {
357 struct vrip_softc *sc = the_vrip_sc;
358 u_int32_t reg = sc->sc_intrmask;
359 bus_space_tag_t iot = sc->sc_iot;
360 bus_space_handle_t ioh = sc->sc_ioh;
361
362 bus_space_write_2 (iot, ioh, MSYSINT1_REG_W, reg & 0xffff);
363 bus_space_write_2 (iot, ioh, sc->sc_msysint2, (reg >> 16) & 0xffff);
364 }
365
366 /* Set level 1 interrupt mask. */
367 void
368 __vrip_intr_setmask1(vrip_chipset_tag_t vc, vrip_intr_handle_t handle,
369 int enable)
370 {
371 struct vrip_softc *sc = vc->vc_sc;
372 struct intrhand *ih = handle;
373 int level1 = ih - sc->sc_intrhands;
374 bus_space_tag_t iot = sc->sc_iot;
375 bus_space_handle_t ioh = sc->sc_ioh;
376 u_int32_t reg = sc->sc_intrmask;
377
378 DPRINTF(("__vrip_intr_setmask1: SYSINT: %s %d\n",
379 enable ? "enable" : "disable", level1));
380 reg = (bus_space_read_2 (iot, ioh, MSYSINT1_REG_W)&0xffff) |
381 ((bus_space_read_2 (iot, ioh, sc->sc_msysint2) << 16)&0xffff0000);
382 if (enable)
383 reg |= (1 << level1);
384 else {
385 reg &= ~(1 << level1);
386 }
387 sc->sc_intrmask = reg;
388 bus_space_write_2 (iot, ioh, MSYSINT1_REG_W, reg & 0xffff);
389 bus_space_write_2 (iot, ioh, sc->sc_msysint2, (reg >> 16) & 0xffff);
390 DBG_BIT_PRINT(reg);
391
392 return;
393 }
394
395 void
396 __vrip_dump_level2mask(vrip_chipset_tag_t vc, vrip_intr_handle_t handle)
397 {
398 struct vrip_softc *sc = vc->vc_sc;
399 struct intrhand *ih = handle;
400 const struct vrip_unit *vu = ih->ih_unit;
401 u_int32_t reg;
402
403 if (vu->vu_mlreg) {
404 DPRINTF(("level1[%d] level2 mask:", vu->vu_intr[0]));
405 reg = bus_space_read_2(sc->sc_iot, sc->sc_ioh, vu->vu_mlreg);
406 if (vu->vu_mhreg) { /* GIU [16:31] case only */
407 reg |= (bus_space_read_2(sc->sc_iot, sc->sc_ioh,
408 vu->vu_mhreg) << 16);
409 dbg_bit_print(reg);
410 } else
411 dbg_bit_print(reg);
412 }
413 }
414
415 /* Get level 2 interrupt status */
416 void
417 __vrip_intr_getstatus2(vrip_chipset_tag_t vc, vrip_intr_handle_t handle,
418 u_int32_t *mask /* Level 2 mask */)
419 {
420 struct vrip_softc *sc = vc->vc_sc;
421 struct intrhand *ih = handle;
422 const struct vrip_unit *vu = ih->ih_unit;
423 u_int32_t reg;
424
425 reg = bus_space_read_2(sc->sc_iot, sc->sc_ioh,
426 vu->vu_lreg);
427 reg |= ((bus_space_read_2(sc->sc_iot, sc->sc_ioh,
428 vu->vu_hreg) << 16)&0xffff0000);
429 /* dbg_bit_print(reg);*/
430 *mask = reg;
431 }
432
433 /* Set level 2 interrupt mask. */
434 void
435 __vrip_intr_setmask2(vrip_chipset_tag_t vc, vrip_intr_handle_t handle,
436 u_int32_t mask /* Level 2 mask */, int onoff)
437 {
438 struct vrip_softc *sc = vc->vc_sc;
439 struct intrhand *ih = handle;
440 const struct vrip_unit *vu = ih->ih_unit;
441 u_int16_t reg;
442
443 DPRINTF(("vrip_intr_setmask2:\n"));
444 DUMP_LEVEL2MASK(vc, handle);
445 #ifdef WINCE_DEFAULT_SETTING
446 #warning WINCE_DEFAULT_SETTING
447 #else
448 if (vu->vu_mlreg) {
449 reg = bus_space_read_2(sc->sc_iot, sc->sc_ioh, vu->vu_mlreg);
450 if (onoff)
451 reg |= (mask&0xffff);
452 else
453 reg &= ~(mask&0xffff);
454 bus_space_write_2(sc->sc_iot, sc->sc_ioh, vu->vu_mlreg, reg);
455 if (vu->vu_mhreg != 0) { /* GIU [16:31] case only */
456 reg = bus_space_read_2(sc->sc_iot, sc->sc_ioh,
457 vu->vu_mhreg);
458 if (onoff)
459 reg |= ((mask >> 16) & 0xffff);
460 else
461 reg &= ~((mask >> 16) & 0xffff);
462 bus_space_write_2(sc->sc_iot, sc->sc_ioh,
463 vu->vu_mhreg, reg);
464 }
465 }
466 #endif /* WINCE_DEFAULT_SETTING */
467 DUMP_LEVEL2MASK(vc, handle);
468
469 return;
470 }
471
472 int
473 vrip_intr(void *arg, u_int32_t pc, u_int32_t statusReg)
474 {
475 struct vrip_softc *sc = (struct vrip_softc*)arg;
476 bus_space_tag_t iot = sc->sc_iot;
477 bus_space_handle_t ioh = sc->sc_ioh;
478 int i;
479 u_int32_t reg, mask;
480 /*
481 * Read level1 interrupt status.
482 */
483 reg = (bus_space_read_2 (iot, ioh, SYSINT1_REG_W)&0xffff) |
484 ((bus_space_read_2 (iot, ioh, sc->sc_sysint2)<< 16)&0xffff0000);
485 mask = (bus_space_read_2 (iot, ioh, MSYSINT1_REG_W)&0xffff) |
486 ((bus_space_read_2 (iot, ioh, sc->sc_msysint2)<< 16)&0xffff0000);
487 reg &= mask;
488
489 /*
490 * Dispatch each handler.
491 */
492 for (i = 0; i < 32; i++) {
493 register struct intrhand *ih = &sc->sc_intrhands[i];
494 if (ih->ih_fun && (reg & (1 << i))) {
495 ih->ih_fun(ih->ih_arg);
496 }
497 }
498
499 return (1);
500 }
501
502 void
503 __vrip_register_cmu(vrip_chipset_tag_t vc, vrcmu_chipset_tag_t cmu)
504 {
505 struct vrip_softc *sc = vc->vc_sc;
506
507 sc->sc_chipset.vc_cc = cmu;
508 }
509
510 void
511 __vrip_register_gpio(vrip_chipset_tag_t vc, hpcio_chip_t chip)
512 {
513 struct vrip_softc *sc = vc->vc_sc;
514
515 if (chip->hc_chipid < 0 || VRIP_NIOCHIPS <= chip->hc_chipid)
516 panic("%s: '%s' has unknown id, %d", __FUNCTION__,
517 chip->hc_name, chip->hc_chipid);
518 sc->sc_gpio_chips[chip->hc_chipid] = chip;
519 }
520
521 void
522 __vrip_register_dmaau(vrip_chipset_tag_t vc, vrdmaau_chipset_tag_t dmaau)
523 {
524 struct vrip_softc *sc = vc->vc_sc;
525
526 sc->sc_chipset.vc_ac = dmaau;
527 }
528
529 void
530 __vrip_register_dcu(vrip_chipset_tag_t vc, vrdcu_chipset_tag_t dcu)
531 {
532 struct vrip_softc *sc = vc->vc_sc;
533
534 sc->sc_chipset.vc_dc = dcu;
535 }
536