vrip.c revision 1.20 1 /* $NetBSD: vrip.c,v 1.20 2002/02/11 08:15:41 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 va.va_vc = &sc->sc_chipset;
271 va.va_iot = sc->sc_iot;
272 va.va_unit = cf->cf_loc[VRIPIFCF_UNIT];
273 va.va_addr = cf->cf_loc[VRIPIFCF_ADDR];
274 va.va_size = cf->cf_loc[VRIPIFCF_SIZE];
275 va.va_addr2 = cf->cf_loc[VRIPIFCF_ADDR2];
276 va.va_size2 = cf->cf_loc[VRIPIFCF_SIZE2];
277 va.va_gpio_chips = sc->sc_gpio_chips;
278 va.va_cc = sc->sc_chipset.vc_cc;
279 va.va_ac = sc->sc_chipset.vc_ac;
280 va.va_dc = sc->sc_chipset.vc_dc;
281 if (((*cf->cf_attach->ca_match)(parent, cf, &va) == sc->sc_pri))
282 config_attach(parent, cf, &va, vrip_print);
283
284 return (0);
285 }
286
287 int
288 __vrip_power(vrip_chipset_tag_t vc, int unit, int onoff)
289 {
290 struct vrip_softc *sc = vc->vc_sc;
291 const struct vrip_unit *vu;
292
293 if (sc->sc_chipset.vc_cc == NULL)
294 return (0); /* You have no clock mask unit yet. */
295 if (!VALID_UNIT(sc, unit))
296 return (0);
297 vu = &sc->sc_units[unit];
298
299 return (*sc->sc_chipset.vc_cc->cc_clock)(sc->sc_chipset.vc_cc,
300 vu->vu_clkmask, onoff);
301 }
302
303 vrip_intr_handle_t
304 __vrip_intr_establish(vrip_chipset_tag_t vc, int unit, int line, int level,
305 int (*ih_fun)(void *), void *ih_arg)
306 {
307 struct vrip_softc *sc = vc->vc_sc;
308 const struct vrip_unit *vu;
309 struct intrhand *ih;
310
311 if (!VALID_UNIT(sc, unit))
312 return (NULL);
313 vu = &sc->sc_units[unit];
314 ih = &sc->sc_intrhands[vu->vu_intr[line]];
315 if (ih->ih_fun) /* Can't share level 1 interrupt */
316 return (NULL);
317 ih->ih_fun = ih_fun;
318 ih->ih_arg = ih_arg;
319 ih->ih_unit = vu;
320
321 /* Mask level 2 interrupt mask register. (disable interrupt) */
322 vrip_intr_setmask2(vc, ih, ~0, 0);
323 /* Unmask Level 1 interrupt mask register (enable interrupt) */
324 vrip_intr_setmask1(vc, ih, 1);
325
326 return ((void *)ih);
327 }
328
329 void
330 __vrip_intr_disestablish(vrip_chipset_tag_t vc, vrip_intr_handle_t handle)
331 {
332 struct intrhand *ih = handle;
333
334 ih->ih_fun = NULL;
335 ih->ih_arg = NULL;
336 /* Mask level 2 interrupt mask register(if any). (disable interrupt) */
337 vrip_intr_setmask2(vc, ih, ~0, 0);
338 /* Mask Level 1 interrupt mask register (disable interrupt) */
339 vrip_intr_setmask1(vc, ih, 0);
340 }
341
342 void
343 vrip_intr_suspend()
344 {
345 struct vrip_softc *sc = the_vrip_sc;
346 bus_space_tag_t iot = sc->sc_iot;
347 bus_space_handle_t ioh = sc->sc_ioh;
348
349 bus_space_write_2 (iot, ioh, MSYSINT1_REG_W, (1<<VRIP_INTR_POWER));
350 bus_space_write_2 (iot, ioh, sc->sc_msysint2, 0);
351 }
352
353 void
354 vrip_intr_resume()
355 {
356 struct vrip_softc *sc = the_vrip_sc;
357 u_int32_t reg = sc->sc_intrmask;
358 bus_space_tag_t iot = sc->sc_iot;
359 bus_space_handle_t ioh = sc->sc_ioh;
360
361 bus_space_write_2 (iot, ioh, MSYSINT1_REG_W, reg & 0xffff);
362 bus_space_write_2 (iot, ioh, sc->sc_msysint2, (reg >> 16) & 0xffff);
363 }
364
365 /* Set level 1 interrupt mask. */
366 void
367 __vrip_intr_setmask1(vrip_chipset_tag_t vc, vrip_intr_handle_t handle,
368 int enable)
369 {
370 struct vrip_softc *sc = vc->vc_sc;
371 struct intrhand *ih = handle;
372 int level1 = ih - sc->sc_intrhands;
373 bus_space_tag_t iot = sc->sc_iot;
374 bus_space_handle_t ioh = sc->sc_ioh;
375 u_int32_t reg = sc->sc_intrmask;
376
377 DPRINTF(("__vrip_intr_setmask1: SYSINT: %s %d\n",
378 enable ? "enable" : "disable", level1));
379 reg = (bus_space_read_2 (iot, ioh, MSYSINT1_REG_W)&0xffff) |
380 ((bus_space_read_2 (iot, ioh, sc->sc_msysint2) << 16)&0xffff0000);
381 if (enable)
382 reg |= (1 << level1);
383 else {
384 reg &= ~(1 << level1);
385 }
386 sc->sc_intrmask = reg;
387 bus_space_write_2 (iot, ioh, MSYSINT1_REG_W, reg & 0xffff);
388 bus_space_write_2 (iot, ioh, sc->sc_msysint2, (reg >> 16) & 0xffff);
389 DBG_BIT_PRINT(reg);
390
391 return;
392 }
393
394 void
395 __vrip_dump_level2mask(vrip_chipset_tag_t vc, vrip_intr_handle_t handle)
396 {
397 struct vrip_softc *sc = vc->vc_sc;
398 struct intrhand *ih = handle;
399 const struct vrip_unit *vu = ih->ih_unit;
400 u_int32_t reg;
401
402 if (vu->vu_mlreg) {
403 DPRINTF(("level1[%d] level2 mask:", vu->vu_intr[0]));
404 reg = bus_space_read_2(sc->sc_iot, sc->sc_ioh, vu->vu_mlreg);
405 if (vu->vu_mhreg) { /* GIU [16:31] case only */
406 reg |= (bus_space_read_2(sc->sc_iot, sc->sc_ioh,
407 vu->vu_mhreg) << 16);
408 dbg_bit_print(reg);
409 } else
410 dbg_bit_print(reg);
411 }
412 }
413
414 /* Get level 2 interrupt status */
415 void
416 __vrip_intr_getstatus2(vrip_chipset_tag_t vc, vrip_intr_handle_t handle,
417 u_int32_t *mask /* Level 2 mask */)
418 {
419 struct vrip_softc *sc = vc->vc_sc;
420 struct intrhand *ih = handle;
421 const struct vrip_unit *vu = ih->ih_unit;
422 u_int32_t reg;
423
424 reg = bus_space_read_2(sc->sc_iot, sc->sc_ioh,
425 vu->vu_lreg);
426 reg |= ((bus_space_read_2(sc->sc_iot, sc->sc_ioh,
427 vu->vu_hreg) << 16)&0xffff0000);
428 /* dbg_bit_print(reg);*/
429 *mask = reg;
430 }
431
432 /* Set level 2 interrupt mask. */
433 void
434 __vrip_intr_setmask2(vrip_chipset_tag_t vc, vrip_intr_handle_t handle,
435 u_int32_t mask /* Level 2 mask */, int onoff)
436 {
437 struct vrip_softc *sc = vc->vc_sc;
438 struct intrhand *ih = handle;
439 const struct vrip_unit *vu = ih->ih_unit;
440 u_int16_t reg;
441
442 DPRINTF(("vrip_intr_setmask2:\n"));
443 DUMP_LEVEL2MASK(vc, handle);
444 #ifdef WINCE_DEFAULT_SETTING
445 #warning WINCE_DEFAULT_SETTING
446 #else
447 if (vu->vu_mlreg) {
448 reg = bus_space_read_2(sc->sc_iot, sc->sc_ioh, vu->vu_mlreg);
449 if (onoff)
450 reg |= (mask&0xffff);
451 else
452 reg &= ~(mask&0xffff);
453 bus_space_write_2(sc->sc_iot, sc->sc_ioh, vu->vu_mlreg, reg);
454 if (vu->vu_mhreg != -1) { /* GIU [16:31] case only */
455 reg = bus_space_read_2(sc->sc_iot, sc->sc_ioh,
456 vu->vu_mhreg);
457 if (onoff)
458 reg |= ((mask >> 16) & 0xffff);
459 else
460 reg &= ~((mask >> 16) & 0xffff);
461 bus_space_write_2(sc->sc_iot, sc->sc_ioh,
462 vu->vu_mhreg, reg);
463 }
464 }
465 #endif /* WINCE_DEFAULT_SETTING */
466 DUMP_LEVEL2MASK(vc, handle);
467
468 return;
469 }
470
471 int
472 vrip_intr(void *arg, u_int32_t pc, u_int32_t statusReg)
473 {
474 struct vrip_softc *sc = (struct vrip_softc*)arg;
475 bus_space_tag_t iot = sc->sc_iot;
476 bus_space_handle_t ioh = sc->sc_ioh;
477 int i;
478 u_int32_t reg, mask;
479 /*
480 * Read level1 interrupt status.
481 */
482 reg = (bus_space_read_2 (iot, ioh, SYSINT1_REG_W)&0xffff) |
483 ((bus_space_read_2 (iot, ioh, sc->sc_sysint2)<< 16)&0xffff0000);
484 mask = (bus_space_read_2 (iot, ioh, MSYSINT1_REG_W)&0xffff) |
485 ((bus_space_read_2 (iot, ioh, sc->sc_msysint2)<< 16)&0xffff0000);
486 reg &= mask;
487
488 /*
489 * Dispatch each handler.
490 */
491 for (i = 0; i < 32; i++) {
492 register struct intrhand *ih = &sc->sc_intrhands[i];
493 if (ih->ih_fun && (reg & (1 << i))) {
494 ih->ih_fun(ih->ih_arg);
495 }
496 }
497
498 return (1);
499 }
500
501 void
502 __vrip_register_cmu(vrip_chipset_tag_t vc, vrcmu_chipset_tag_t cmu)
503 {
504 struct vrip_softc *sc = vc->vc_sc;
505
506 sc->sc_chipset.vc_cc = cmu;
507 }
508
509 void
510 __vrip_register_gpio(vrip_chipset_tag_t vc, hpcio_chip_t chip)
511 {
512 struct vrip_softc *sc = vc->vc_sc;
513
514 if (chip->hc_chipid < 0 || VRIP_NIOCHIPS <= chip->hc_chipid)
515 panic("%s: '%s' has unknown id, %d", __FUNCTION__,
516 chip->hc_name, chip->hc_chipid);
517 sc->sc_gpio_chips[chip->hc_chipid] = chip;
518 }
519
520 void
521 __vrip_register_dmaau(vrip_chipset_tag_t vc, vrdmaau_chipset_tag_t dmaau)
522 {
523 struct vrip_softc *sc = vc->vc_sc;
524
525 sc->sc_chipset.vc_ac = dmaau;
526 }
527
528 void
529 __vrip_register_dcu(vrip_chipset_tag_t vc, vrdcu_chipset_tag_t dcu)
530 {
531 struct vrip_softc *sc = vc->vc_sc;
532
533 sc->sc_chipset.vc_dc = dcu;
534 }
535