Home | History | Annotate | Line # | Download | only in sa11x0
sa1111.c revision 1.21
      1 /*      $NetBSD: sa1111.c,v 1.21 2008/01/08 02:07:52 matt Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2001 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by IWAMOTO Toshihiro.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  * 3. All advertising materials mentioning features or use of this software
     19  *    must display the following acknowledgement:
     20  *        This product includes software developed by the NetBSD
     21  *        Foundation, Inc. and its contributors.
     22  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23  *    contributors may be used to endorse or promote products derived
     24  *    from this software without specific prior written permission.
     25  *
     26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36  * POSSIBILITY OF SUCH DAMAGE.
     37  */
     38 
     39 /*
     40  * TODO:
     41  *   - introduce bus abstraction to support SA-1101
     42  */
     43 
     44 #include <sys/cdefs.h>
     45 __KERNEL_RCSID(0, "$NetBSD: sa1111.c,v 1.21 2008/01/08 02:07:52 matt Exp $");
     46 
     47 #include <sys/param.h>
     48 #include <sys/systm.h>
     49 #include <sys/types.h>
     50 #include <sys/conf.h>
     51 #include <sys/device.h>
     52 #include <sys/kernel.h>
     53 #include <sys/malloc.h>
     54 #include <sys/uio.h>
     55 
     56 #include <machine/bus.h>
     57 #include <machine/intr.h>
     58 
     59 #include <arm/sa11x0/sa11x0_reg.h>
     60 #include <arm/sa11x0/sa11x0_var.h>
     61 #include <arm/sa11x0/sa11x0_gpioreg.h>
     62 #include <arm/sa11x0/sa1111_reg.h>
     63 #include <arm/sa11x0/sa1111_var.h>
     64 
     65 #include "locators.h"
     66 
     67 static int	sa1111_print(void *, const char *);
     68 
     69 static void	sacc_intr_calculatemasks(struct sacc_softc *);
     70 static void	sacc_intr_setpolarity(sacc_chipset_tag_t *, int , int);
     71 
     72 #ifdef INTR_DEBUG
     73 #define DPRINTF(arg)	printf arg
     74 #else
     75 #define DPRINTF(arg)
     76 #endif
     77 
     78 int
     79 sacc_probe(struct device *parent, struct cfdata *match, void *aux)
     80 {
     81 	struct sa11x0_attach_args *sa = aux;
     82 	bus_space_handle_t ioh;
     83 	uint32_t skid;
     84 
     85 	if (bus_space_map(sa->sa_iot, sa->sa_addr, sa->sa_size, 0, &ioh))
     86 		return 0;
     87 
     88 	skid = bus_space_read_4(sa->sa_iot, ioh, SACCSBI_SKID);
     89 	bus_space_unmap(sa->sa_iot, ioh, sa->sa_size);
     90 
     91 	if ((skid & 0xffffff00) != 0x690cc200)
     92 		return 0;
     93 
     94 	return 1;
     95 }
     96 
     97 
     98 int
     99 sa1111_search(struct device *parent, struct cfdata *cf, const int *ldesc,
    100     void *aux)
    101 {
    102 	struct sa1111_attach_args aa;
    103 
    104 	aa.sa_addr = cf->cf_loc[SACCCF_ADDR];
    105 	aa.sa_size = cf->cf_loc[SACCCF_SIZE];
    106 	aa.sa_intr = cf->cf_loc[SACCCF_INTR];
    107 #if 0
    108 	aa.sa_membase = cf->cf_loc[SACCCF_MEMBASE];
    109 	aa.sa_memsize = cf->cf_loc[SACCCF_MEMSIZE];
    110 #endif
    111 
    112         if (config_match(parent, cf, &aa) > 0)
    113                 config_attach(parent, cf, &aa, sa1111_print);
    114 
    115         return 0;
    116 }
    117 
    118 static int
    119 sa1111_print(void *aux, const char *name)
    120 {
    121 
    122 	return UNCONF;
    123 }
    124 
    125 
    126 void *
    127 sacc_intr_establish(sacc_chipset_tag_t *ic, int irq, int type, int level,
    128     int (*ih_fun)(void *), void *ih_arg)
    129 {
    130 	int s;
    131 	struct sacc_softc *sc = (struct sacc_softc *)ic;
    132 	struct sacc_intrhand **p, *ih;
    133 
    134 	/* no point in sleeping unless someone can free memory. */
    135 	ih = malloc(sizeof *ih, M_DEVBUF, cold ? M_NOWAIT : M_WAITOK);
    136 	if (ih == NULL)
    137 		panic("sacc_intr_establish: can't malloc handler info");
    138 
    139 	if (irq < 0 || irq > SACCIC_LEN ||
    140 	    !(type == IST_EDGE_RAISE || type == IST_EDGE_FALL))
    141 		panic("sacc_intr_establish: bogus irq or type");
    142 
    143 	if (sc->sc_intrhand[irq] == NULL) {
    144 		sacc_intr_setpolarity(ic, irq, type);
    145 		sc->sc_intrtype[irq] = type;
    146 	} else if (sc->sc_intrtype[irq] != type)
    147 		/* XXX we should be able to share raising and
    148 		 * falling edge intrs */
    149 		panic("sacc_intr_establish: type must be unique");
    150 
    151 	/* install intr handler */
    152 	/* map interrupt level to appropriate softinterrupt level */
    153 	level = SOFTINT_SERIAL;
    154 	ih->ih_soft = softint_establish(level, (void (*)(void *)) ih_fun,
    155 					 ih_arg);
    156 	ih->ih_irq = irq;
    157 	ih->ih_next = NULL;
    158 
    159 	s = splhigh();
    160 	for (p = &sc->sc_intrhand[irq]; *p; p = &(*p)->ih_next)
    161 		continue;
    162 
    163 	*p = ih;
    164 
    165 	sacc_intr_calculatemasks(sc);
    166 	splx(s);
    167 
    168 	return ih;
    169 }
    170 
    171 void
    172 sacc_intr_disestablish(sacc_chipset_tag_t *ic, void *arg)
    173 {
    174 	int irq, s;
    175 	struct sacc_softc *sc = (struct sacc_softc *)ic;
    176 	struct sacc_intrhand *ih, **p;
    177 
    178 	ih = (struct sacc_intrhand *)arg;
    179 	irq = ih->ih_irq;
    180 
    181 #ifdef DIAGNOSTIC
    182 	if (irq < 0 || irq > SACCIC_LEN)
    183 		panic("sacc_intr_disestablish: bogus irq");
    184 #endif
    185 
    186 	s = splhigh();
    187 
    188 	for (p = &sc->sc_intrhand[irq];; p = &(*p)->ih_next) {
    189 		if (*p == NULL)
    190 			panic("sacc_intr_disestablish: handler not registered");
    191 		if (*p == ih)
    192 			break;
    193 	}
    194 	*p = (*p)->ih_next;
    195 
    196 	sacc_intr_calculatemasks(sc);
    197 	splx(s);
    198 
    199 	free(ih, M_DEVBUF);
    200 }
    201 
    202 static void
    203 sacc_intr_setpolarity(sacc_chipset_tag_t *ic, int irq, int type)
    204 {
    205 	struct sacc_softc *sc = (struct sacc_softc *)ic;
    206 	int s;
    207 	uint32_t pol, mask;
    208 	int addr;
    209 
    210 	if (irq >= 32) {
    211 		addr = SACCIC_INTPOL1;
    212 		irq -= 32;
    213 	} else
    214 		addr = SACCIC_INTPOL0;
    215 
    216 	mask = (1 << irq);
    217 
    218 	s = splhigh();
    219 	pol = bus_space_read_4(sc->sc_iot, sc->sc_ioh, addr);
    220 	if (type == IST_EDGE_RAISE)
    221 		pol &= ~mask;
    222 	else
    223 		pol |= mask;
    224 	bus_space_write_4(sc->sc_iot, sc->sc_ioh, addr, pol);
    225 	splx(s);
    226 }
    227 
    228 static void
    229 sacc_intr_calculatemasks(struct sacc_softc *sc)
    230 {
    231 	int irq;
    232 
    233 	sc->sc_imask.lo = 0;
    234 	sc->sc_imask.hi = 0;
    235 	for (irq = 0; irq < 32; irq++)
    236 		if (sc->sc_intrhand[irq])
    237 			sc->sc_imask.lo |= (1 << irq);
    238 	for (irq = 0; irq < SACCIC_LEN - 32; irq++)
    239 		if (sc->sc_intrhand[irq + 32])
    240 			sc->sc_imask.hi |= (1 << irq);
    241 
    242 
    243 	/* XXX this should not be done here */
    244 	bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACCIC_INTEN0,
    245 			  sc->sc_imask.lo);
    246 	bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACCIC_INTEN1,
    247 			  sc->sc_imask.hi);
    248 	DPRINTF(("sacc_intr_calculatemasks: %x %x\n", sc->sc_imask.lo,
    249 	    sc->sc_imask.hi));
    250 }
    251