sys/arch/arm/sa11x0/sa1111.c

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