Home | History | Annotate | Line # | Download | only in sa11x0
sa1111.c revision 1.14
      1 /*      $NetBSD: sa1111.c,v 1.14 2005/12/11 12:16:51 christos 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 SA1101
     42  */
     43 
     44 #include <sys/cdefs.h>
     45 __KERNEL_RCSID(0, "$NetBSD: sa1111.c,v 1.14 2005/12/11 12:16:51 christos 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 #ifdef hpcarm
     58 #include <machine/platid.h>
     59 #include <machine/platid_mask.h>
     60 #endif
     61 
     62 #include <arm/sa11x0/sa11x0_reg.h>
     63 #include <arm/sa11x0/sa11x0_var.h>
     64 #include <arm/sa11x0/sa11x0_gpioreg.h>
     65 #include <arm/sa11x0/sa1111_reg.h>
     66 #include <arm/sa11x0/sa1111_var.h>
     67 
     68 #include "locators.h"
     69 
     70 static	int	sa1111_print(void *, const char *);
     71 
     72 static void	sacc_intr_calculatemasks(struct sacc_softc *);
     73 static void	sacc_intr_setpolarity(sacc_chipset_tag_t *, int , int);
     74 int		sacc_intr(void *);
     75 
     76 #if !defined(__HAVE_GENERIC_SOFT_INTERRUPTS)
     77 void *softintr_establish(int, int (*)(void *), void *);
     78 void softintr_schedule(void *);
     79 #endif
     80 
     81 #ifdef INTR_DEBUG
     82 #define DPRINTF(arg)	printf arg
     83 #else
     84 #define DPRINTF(arg)
     85 #endif
     86 
     87 int
     88 sacc_probe(parent, match, aux)
     89 	struct device *parent;
     90 	struct cfdata *match;
     91 	void *aux;
     92 {
     93 	struct sa11x0_attach_args *sa = aux;
     94 	bus_space_handle_t ioh;
     95 	u_int32_t skid;
     96 
     97 	if (bus_space_map(sa->sa_iot, sa->sa_addr, sa->sa_size, 0, &ioh))
     98 		return (0);
     99 
    100 	skid = bus_space_read_4(sa->sa_iot, ioh, SACCSBI_SKID);
    101 	bus_space_unmap(sa->sa_iot, ioh, sa->sa_size);
    102 
    103 	if ((skid & 0xffffff00) != 0x690cc200)
    104 		return (0);
    105 
    106 	return (1);
    107 }
    108 
    109 
    110 int
    111 sa1111_search(parent, cf, ldesc, aux)
    112 	struct device *parent;
    113 	struct cfdata *cf;
    114 	const int *ldesc;
    115 	void *aux;
    116 {
    117 	struct sa1111_attach_args aa;
    118 
    119 	aa.sa_addr = cf->cf_loc[SACCCF_ADDR];
    120 	aa.sa_size = cf->cf_loc[SACCCF_SIZE];
    121 	aa.sa_intr = cf->cf_loc[SACCCF_INTR];
    122 #if 0
    123 	aa.sa_membase = cf->cf_loc[SACCCF_MEMBASE];
    124 	aa.sa_memsize = cf->cf_loc[SACCCF_MEMSIZE];
    125 #endif
    126 
    127         if (config_match(parent, cf, &aa) > 0)
    128                 config_attach(parent, cf, &aa, sa1111_print);
    129 
    130         return 0;
    131 }
    132 
    133 static int
    134 sa1111_print(aux, name)
    135 	void *aux;
    136 	const char *name;
    137 {
    138 	return (UNCONF);
    139 }
    140 
    141 
    142 void *
    143 sacc_intr_establish(ic, irq, type, level, ih_fun, ih_arg)
    144 	sacc_chipset_tag_t *ic;
    145 	int irq, type, level;
    146 	int (*ih_fun)(void *);
    147 	void *ih_arg;
    148 {
    149 	int s;
    150 	struct sacc_softc *sc = (struct sacc_softc *)ic;
    151 	struct sacc_intrhand **p, *ih;
    152 
    153 	/* no point in sleeping unless someone can free memory. */
    154 	ih = malloc(sizeof *ih, M_DEVBUF, cold ? M_NOWAIT : M_WAITOK);
    155 	if (ih == NULL)
    156 		panic("sacc_intr_establish: can't malloc handler info");
    157 
    158 	if (irq < 0 || irq > SACCIC_LEN ||
    159 	    ! (type == IST_EDGE_RAISE || type == IST_EDGE_FALL))
    160 		panic("sacc_intr_establish: bogus irq or type");
    161 
    162 	if (sc->sc_intrhand[irq] == NULL) {
    163 		sacc_intr_setpolarity(ic, irq, type);
    164 		sc->sc_intrtype[irq] = type;
    165 	} else if (sc->sc_intrtype[irq] != type)
    166 		/* XXX we should be able to share raising and
    167 		 * falling edge intrs */
    168 		panic("sacc_intr_establish: type must be unique");
    169 
    170 	/* install intr handler */
    171 #if defined(__GENERIC_SOFT_INTERRUPTS_ALL_LEVELS) || \
    172 	!defined(__HAVE_GENERIC_SOFT_INTERRUPTS)
    173 
    174 	ih->ih_soft = softintr_establish(level, (void (*)(void *)) ih_fun,
    175 					 ih_arg);
    176 #else
    177 	/* map interrupt level to appropriate softinterrupt level */
    178 	if (level >= IPL_SOFTSERIAL)
    179 		level = IPL_SOFTSERIAL;
    180 	else if(level >= IPL_SOFTNET)
    181 		level = IPL_SOFTNET;
    182 	ih->ih_soft = softintr_establish(level, (void (*)(void *)) ih_fun,
    183 					 ih_arg);
    184 #endif
    185 	ih->ih_irq = irq;
    186 	ih->ih_next = NULL;
    187 
    188 	s = splhigh();
    189 	for(p = &sc->sc_intrhand[irq]; *p; p = &(*p)->ih_next)
    190 		;
    191 
    192 	*p = ih;
    193 
    194 	sacc_intr_calculatemasks(sc);
    195 	splx(s);
    196 
    197 	return(ih);
    198 }
    199 
    200 void
    201 sacc_intr_disestablish(ic, arg)
    202 	sacc_chipset_tag_t *ic;
    203 	void *arg;
    204 {
    205 	int irq, s;
    206 	struct sacc_softc *sc = (struct sacc_softc *)ic;
    207 	struct sacc_intrhand *ih, **p;
    208 
    209 	ih = (struct sacc_intrhand *)arg;
    210 	irq = ih->ih_irq;
    211 
    212 #ifdef DIAGNOSTIC
    213 	if (irq < 0 || irq > SACCIC_LEN)
    214 		panic("sacc_intr_disestablish: bogus irq");
    215 #endif
    216 
    217 	s = splhigh();
    218 
    219 	for(p = &sc->sc_intrhand[irq];; p = &(*p)->ih_next) {
    220 		if (*p == NULL)
    221 			panic("sacc_intr_disestablish: handler not registered");
    222 		if (*p == ih)
    223 			break;
    224 	}
    225 	*p = (*p)->ih_next;
    226 
    227 	sacc_intr_calculatemasks(sc);
    228 	splx(s);
    229 
    230 	free(ih, M_DEVBUF);
    231 }
    232 
    233 void
    234 sacc_intr_setpolarity(ic, irq, type)
    235 	sacc_chipset_tag_t *ic;
    236 	int irq;
    237 	int type;
    238 {
    239 	struct sacc_softc *sc = (struct sacc_softc *)ic;
    240 	int s;
    241 	u_int32_t pol, mask;
    242 	int addr;
    243 
    244 	if (irq >= 32) {
    245 		addr = SACCIC_INTPOL1;
    246 		irq -= 32;
    247 	} else
    248 		addr = SACCIC_INTPOL0;
    249 
    250 	mask = (1 << irq);
    251 
    252 	s = splhigh();
    253 	pol = bus_space_read_4(sc->sc_iot, sc->sc_ioh, addr);
    254 	if (type == IST_EDGE_RAISE)
    255 		pol &= ~mask;
    256 	else
    257 		pol |= mask;
    258 	bus_space_write_4(sc->sc_iot, sc->sc_ioh, addr, pol);
    259 	splx(s);
    260 }
    261 
    262 void
    263 sacc_intr_calculatemasks(sc)
    264 	struct sacc_softc *sc;
    265 {
    266 	int irq;
    267 
    268 	sc->sc_imask.lo = 0;
    269 	sc->sc_imask.hi = 0;
    270 	for(irq = 0; irq < 32; irq++)
    271 		if (sc->sc_intrhand[irq])
    272 			sc->sc_imask.lo |= (1 << irq);
    273 	for(irq = 0; irq < SACCIC_LEN - 32; irq++)
    274 		if (sc->sc_intrhand[irq + 32])
    275 			sc->sc_imask.hi |= (1 << irq);
    276 
    277 
    278 	/* XXX this should not be done here */
    279 	bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACCIC_INTEN0,
    280 			  sc->sc_imask.lo);
    281 	bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACCIC_INTEN1,
    282 			  sc->sc_imask.hi);
    283 	DPRINTF(("sacc_intr_calculatemasks: %x %x\n", sc->sc_imask.lo,
    284 	    sc->sc_imask.hi));
    285 }
    286