sacc_obio.c revision 1.9
1/* $NetBSD: sacc_obio.c,v 1.9 2009/03/14 15:36:05 dsl 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 * for SA-1111 companion chip on Intel DBPXA250 evaluation board. 34 */ 35 36#include <sys/cdefs.h> 37__KERNEL_RCSID(0, "$NetBSD: sacc_obio.c,v 1.9 2009/03/14 15:36:05 dsl Exp $"); 38 39#include <sys/param.h> 40#include <sys/systm.h> 41#include <sys/mbuf.h> 42#include <sys/socket.h> 43#include <sys/ioctl.h> 44#include <sys/errno.h> 45#include <sys/syslog.h> 46#include <sys/select.h> 47#include <sys/device.h> 48 49#include <net/if.h> 50#include <net/if_dl.h> 51#include <net/if_ether.h> 52#include <net/if_media.h> 53 54#include <machine/intr.h> 55#include <machine/bus.h> 56 57#include <arm/sa11x0/sa1111_reg.h> 58#include <arm/sa11x0/sa1111_var.h> 59#include <arm/xscale/pxa2x0cpu.h> 60#include <arm/xscale/pxa2x0reg.h> 61#include <arm/xscale/pxa2x0var.h> 62#include <arm/xscale/pxa2x0_gpio.h> 63 64#include <evbarm/lubbock/lubbock_reg.h> 65#include <evbarm/lubbock/lubbock_var.h> 66 67 68static void sacc_obio_attach(struct device *, struct device *, void *); 69static int sacc_obio_intr(void *arg); 70 71CFATTACH_DECL(sacc_obio, sizeof(struct sacc_softc), sacc_probe, 72 sacc_obio_attach, NULL, NULL); 73 74#if 0 75#define DPRINTF(arg) printf arg 76#else 77#define DPRINTF(arg) 78#endif 79 80uint16_t cs2_memctl_init = 0x7ff0; 81 82static void 83sacc_obio_attach(struct device *parent, struct device *self, void *aux) 84{ 85 int i; 86 u_int32_t skid, tmp; 87 struct sacc_softc *sc = (struct sacc_softc *)self; 88 struct obio_softc *psc = (struct obio_softc *)parent; 89 struct obio_attach_args *sa = aux; 90 bus_space_tag_t iot = sa->oba_iot; 91 bus_space_handle_t memctl_ioh; 92 93 printf("\n"); 94 95 /* Set alternative function for GPIO pings 48..57 on PXA2X0 */ 96 for (i=48; i <= 55; ++i) 97 pxa2x0_gpio_set_function(i, GPIO_ALT_FN_2_OUT); 98 pxa2x0_gpio_set_function(56, GPIO_ALT_FN_1_IN); 99 pxa2x0_gpio_set_function(57, GPIO_ALT_FN_1_IN); 100 101 /* XXX */ 102 if (bus_space_map(iot, PXA2X0_MEMCTL_BASE, PXA2X0_MEMCTL_SIZE, 0, 103 &memctl_ioh)) 104 goto fail; 105 106 tmp = bus_space_read_4(iot, memctl_ioh, MEMCTL_MSC2 ); 107 bus_space_write_4(iot, memctl_ioh, MEMCTL_MSC2, 108 (tmp & 0xffff0000) | cs2_memctl_init ); 109 110 bus_space_unmap(iot, memctl_ioh, PXA2X0_MEMCTL_SIZE); 111 112 sc->sc_piot = sc->sc_iot = iot; 113 sc->sc_gpioh = 0; /* not used */ 114 115 if (bus_space_map(iot, sa->oba_addr, 0x2000/*size*/, 0, &sc->sc_ioh)) 116 goto fail; 117 118 skid = bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACCSBI_SKID); 119 120 printf("%s: SA1111 rev %d.%d\n", sc->sc_dev.dv_xname, 121 (skid & 0xf0) >> 4, skid & 0xf); 122 123 tmp = bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACCSBI_SKCR); 124 tmp = (tmp & ~SKCR_VCOOFF) | SKCR_PLLBYPASS; 125 bus_space_write_4( sc->sc_iot, sc->sc_ioh, SACCSBI_SKCR, tmp ); 126 127 delay(100); /* XXX */ 128 129 tmp |= SKCR_RCLKEN; 130 bus_space_write_4( sc->sc_iot, sc->sc_ioh, SACCSBI_SKCR, tmp ); 131 132#if 1 133 if( tmp != bus_space_read_4( sc->sc_iot, sc->sc_ioh, SACCSBI_SKCR ) ) 134 printf( "!!! FAIL SKCR\n" ); 135#endif 136 137 /* PCMCIA socket0 power control */ 138 bus_space_write_4( sc->sc_iot, sc->sc_ioh, SACCGPIOA_DVR, 0 ); 139 bus_space_write_4( sc->sc_iot, sc->sc_ioh, SACCGPIOA_DDR, 0 ); 140 141 for(i = 0; i < SACCIC_LEN; i++) 142 sc->sc_intrhand[i] = NULL; 143 144 /* initialize SA1111 interrupt controller */ 145 bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACCIC_INTEN0, 0); 146 bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACCIC_INTEN1, 0); 147 bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACCIC_INTTSTSEL, 0); 148 bus_space_write_4(sc->sc_iot, sc->sc_ioh, 149 SACCIC_INTSTATCLR0, 0xffffffff); 150 bus_space_write_4(sc->sc_iot, sc->sc_ioh, 151 SACCIC_INTSTATCLR1, 0xffffffff); 152 153 /* connect to On-board peripheral interrupt */ 154 obio_intr_establish(psc, sa->oba_intr, 155 IPL_HIGH, sacc_obio_intr, sc ); 156 /* 157 * Attach each devices 158 */ 159 config_search_ia(sa1111_search, self, "sacc", NULL); 160 161 return; 162 163 fail: 164 printf("%s: unable to map registers\n", sc->sc_dev.dv_xname); 165} 166 167static int 168sacc_obio_intr(void *arg) 169{ 170 int i; 171 struct sacc_intrvec intstat; 172 struct sacc_softc *sc = arg; 173 struct sacc_intrhand *ih; 174 175 intstat.lo = 176 bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACCIC_INTSTATCLR0); 177 intstat.hi = 178 bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACCIC_INTSTATCLR1); 179 DPRINTF(("sacc_obio_intr_dispatch: %x %x\n", intstat.lo, intstat.hi)); 180 181 while ((i = find_first_bit(intstat.lo)) >= 0) { 182 183 /* 184 * Clear intr status before calling intr handlers. 185 * This cause stray interrupts, but clearing 186 * after calling intr handlers cause intr lossage. 187 */ 188 bus_space_write_4(sc->sc_iot, sc->sc_ioh, 189 SACCIC_INTSTATCLR0, 1U<<i ); 190 191 for(ih = sc->sc_intrhand[i]; ih; ih = ih->ih_next) 192 softint_schedule(ih->ih_soft); 193 194 intstat.lo &= ~(1U<<i); 195 } 196 197 while ((i = find_first_bit(intstat.hi)) >= 0) { 198 bus_space_write_4(sc->sc_iot, sc->sc_ioh, 199 SACCIC_INTSTATCLR1, 1U<<i); 200 201 for(ih = sc->sc_intrhand[i + 32]; ih; ih = ih->ih_next) 202 softint_schedule(ih->ih_soft); 203 204 intstat.hi &= ~(1U<<i); 205 } 206 207 return 1; 208} 209