Home | History | Annotate | Line # | Download | only in adm5120
adm5120_extio.c revision 1.4
      1 /* $NetBSD: adm5120_extio.c,v 1.4 2011/02/20 07:48:35 matt Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 2007 David Young.  All rights reserved.
      5  *
      6  * Redistribution and use in source and binary forms, with or
      7  * without modification, are permitted provided that the following
      8  * conditions are met:
      9  * 1. Redistributions of source code must retain the above copyright
     10  *    notice, this list of conditions and the following disclaimer.
     11  * 2. Redistributions in binary form must reproduce the above
     12  *    copyright notice, this list of conditions and the following
     13  *    disclaimer in the documentation and/or other materials provided
     14  *    with the distribution.
     15  * 3. The name of the author may not be used to endorse or promote
     16  *    products derived from this software without specific prior
     17  *    written permission.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY
     20  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
     21  * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
     22  * PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
     24  * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
     25  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
     26  * OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     27  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
     28  * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
     29  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
     30  * OF SUCH DAMAGE.
     31  */
     32 /*
     33  * Copyright 2002 Wasabi Systems, Inc.
     34  * All rights reserved.
     35  *
     36  * Written by Simon Burge for Wasabi Systems, Inc.
     37  *
     38  * Redistribution and use in source and binary forms, with or without
     39  * modification, are permitted provided that the following conditions
     40  * are met:
     41  * 1. Redistributions of source code must retain the above copyright
     42  *    notice, this list of conditions and the following disclaimer.
     43  * 2. Redistributions in binary form must reproduce the above copyright
     44  *    notice, this list of conditions and the following disclaimer in the
     45  *    documentation and/or other materials provided with the distribution.
     46  * 3. All advertising materials mentioning features or use of this software
     47  *    must display the following acknowledgement:
     48  *      This product includes software developed for the NetBSD Project by
     49  *      Wasabi Systems, Inc.
     50  * 4. The name of Wasabi Systems, Inc. may not be used to endorse
     51  *    or promote products derived from this software without specific prior
     52  *    written permission.
     53  *
     54  * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
     55  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     56  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     57  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL WASABI SYSTEMS, INC
     58  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     59  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     60  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     61  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     62  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     63  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     64  * POSSIBILITY OF SUCH DAMAGE.
     65  */
     66 
     67 #include <sys/cdefs.h>
     68 __KERNEL_RCSID(0, "$NetBSD: adm5120_extio.c,v 1.4 2011/02/20 07:48:35 matt Exp $");
     69 
     70 #include <sys/param.h>
     71 #include <sys/systm.h>
     72 #include <sys/device.h>
     73 
     74 #include <machine/bus.h>
     75 
     76 #include <mips/cache.h>
     77 #include <mips/cpuregs.h>
     78 
     79 #include <mips/adm5120/include/adm5120reg.h>
     80 #include <mips/adm5120/include/adm5120var.h>
     81 #include <mips/adm5120/include/adm5120_mainbusvar.h>
     82 #include <mips/adm5120/include/adm5120_extiovar.h>
     83 
     84 #include "locators.h"
     85 
     86 #ifdef EXTIO_DEBUG
     87 int extio_debug = 1;
     88 #define	EXTIO_DPRINTF(__fmt, ...)		\
     89 do {						\
     90 	if (extio_debug)			\
     91 		printf((__fmt), __VA_ARGS__);	\
     92 } while (/*CONSTCOND*/0)
     93 #else /* !EXTIO_DEBUG */
     94 #define	EXTIO_DPRINTF(__fmt, ...)	do { } while (/*CONSTCOND*/0)
     95 #endif /* EXTIO_DEBUG */
     96 
     97 static int	extio_match(struct device *, struct cfdata *, void *);
     98 static void	extio_attach(struct device *, struct device *, void *);
     99 static int	extio_submatch(struct device *, struct cfdata *,
    100 			       const int *, void *);
    101 static int	extio_print(void *, const char *);
    102 
    103 CFATTACH_DECL(extio, sizeof(struct extio_softc),
    104     extio_match, extio_attach, NULL, NULL);
    105 
    106 /* There can be only one. */
    107 int	extio_found;
    108 
    109 struct extiodev {
    110 	const char	*ed_name;
    111 	bus_addr_t	ed_addr;
    112 	int		ed_irq;
    113 	uint32_t	ed_gpio_mask;
    114 	int		ed_cfio;
    115 };
    116 
    117 struct extiodev extiodevs[] = {
    118 	{"wdc",		ADM5120_BASE_EXTIO0,	0,	__BIT(4),	1},
    119 	{NULL,		0,			0,	0x0,		0},
    120 };
    121 
    122 static int
    123 extio_match(struct device *parent, struct cfdata *match, void *aux)
    124 {
    125 	return !extio_found;
    126 }
    127 
    128 static void
    129 extio_attach_args_create(struct extio_attach_args *ea, struct extiodev *ed,
    130     void *gpio, bus_space_tag_t st)
    131 {
    132 	ea->ea_name = ed->ed_name;
    133 	ea->ea_addr = ed->ed_addr;
    134 	ea->ea_irq = ed->ed_irq;
    135 	ea->ea_st = st;
    136 	ea->ea_gpio = gpio;
    137 	ea->ea_gpio_mask = ed->ed_gpio_mask;
    138 	ea->ea_cfio = ed->ed_cfio;
    139 }
    140 
    141 static void
    142 extio_mpmc_dump(struct extio_softc *sc)
    143 {
    144 	EXTIO_DPRINTF("%s: regs:\n"
    145 	    "  ctl 0x%08" PRIx32 "\n"
    146 	    "  sts 0x%08" PRIx32 "\n"
    147 	    "   sc 0x%08" PRIx32 "\n"
    148 	    "  sww 0x%08" PRIx32 "\n"
    149 	    "  swo 0x%08" PRIx32 "\n"
    150 	    "  swr 0x%08" PRIx32 "\n"
    151 	    "  swp 0x%08" PRIx32 "\n"
    152 	    " swwr 0x%08" PRIx32 "\n"
    153 	    "  swt 0x%08" PRIx32 "\n", __func__,
    154 	    bus_space_read_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_CONTROL),
    155 	    bus_space_read_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_STATUS),
    156 	    bus_space_read_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SC(2)),
    157 	    bus_space_read_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SWW(2)),
    158 	    bus_space_read_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SWO(2)),
    159 	    bus_space_read_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SWR(2)),
    160 	    bus_space_read_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SWP(2)),
    161 	    bus_space_read_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SWWR(2)),
    162 	    bus_space_read_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SWT(2)));
    163 }
    164 
    165 static void
    166 extio_mpmc_init(struct extio_softc *sc)
    167 {
    168 	int i, s;
    169 #if 0
    170 	uint32_t control;
    171 #endif
    172 	uint32_t status;
    173 
    174 	/* Map MultiPort Memory Controller */
    175 	if (bus_space_map(sc->sc_obiot, ADM5120_BASE_MPMC, 0x280, 0,
    176 	                  &sc->sc_mpmch) != 0) {
    177 		aprint_error_dev(&sc->sc_dev, "unable to map MPMC\n");
    178 		return;
    179 	}
    180 
    181 	extio_mpmc_dump(sc);
    182 
    183 #if 0
    184 	control = bus_space_read_4(sc->sc_obiot, sc->sc_mpmch,
    185 	    ADM5120_MPMC_CONTROL) | ADM5120_MPMC_CONTROL_DWB;
    186 	bus_space_write_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_CONTROL,
    187 	    control);
    188 #endif
    189 
    190 	s = splhigh();
    191 	/* I wait for MPMC to become idle, and then I enter low-power mode
    192 	 * so that I can safely set the static configuration.
    193 	 */
    194 	for (i = 1000; --i > 0; ) {
    195 		status = bus_space_read_4(sc->sc_obiot, sc->sc_mpmch,
    196 		    ADM5120_MPMC_STATUS);
    197 		if ((status &
    198 		     (ADM5120_MPMC_STATUS_WBS|ADM5120_MPMC_STATUS_BU)) == 0)
    199 			break;
    200 		delay(10);
    201 	}
    202 
    203 	if (i == 0) {
    204 		aprint_error_dev(&sc->sc_dev,
    205 		    "timeout waiting for MPMC idle\n");
    206 		splx(s);
    207 		return;
    208 	} else
    209 		EXTIO_DPRINTF("%s: MPMC idle\n", device_xname(&sc->sc_dev));
    210 
    211 #if 0
    212 	control = bus_space_read_4(sc->sc_obiot, sc->sc_mpmch,
    213 	    ADM5120_MPMC_CONTROL) | ADM5120_MPMC_CONTROL_ME |
    214 	    ADM5120_MPMC_CONTROL_LPM;
    215 	bus_space_write_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_CONTROL,
    216 	    control);
    217 #endif
    218 
    219 	/*
    220 	 * Configure external I/O to suit the CompactFlash card.
    221 	 *
    222 	 * Static Configuration 2
    223 	 *
    224 	 * 1 Enable 'async page mode four'.
    225 	 * 2 'Byte lane state' bits for active low for both read & write.
    226 	 * 3 No buffer, no write protection.
    227 	 * 4 No extended wait.
    228 	 * 5 Active low chip select.
    229 	 * 7 8-bit memory width.
    230 	 */
    231 	bus_space_write_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SC(2),
    232 	    ADM5120_MPMC_SC_BLS|ADM5120_MPMC_SC_PM|ADM5120_MPMC_SC_MW_8B);
    233 
    234 	/*
    235 	 * Static Wait Wen 2: after asserting chip select, wait 3 HCLK cycles
    236 	 * before asserting write enable.
    237 	 */
    238 	bus_space_write_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SWW(2),
    239 	    __SHIFTIN(2, ADM5120_MPMC_SWW_WWE));
    240 
    241 	/*
    242 	 * Static Wait Oen 2: after selecting chip select, wait 3 HCLK cycles
    243 	 * before asserting output enable.
    244 	 */
    245 	bus_space_write_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SWO(2),
    246 	    __SHIFTIN(3, ADM5120_MPMC_SWO_WOE));
    247 
    248 	/*
    249 	 * Static Wait Rd 2: set wait state time to 27 HCLK cycles.
    250 	 */
    251 	bus_space_write_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SWR(2),
    252 	    __SHIFTIN(26, ADM5120_MPMC_SWR_NMRW));
    253 
    254 	/*
    255 	 * Static Wait Wait Page 2: set wait state time to 30 HCLK cycles.
    256 	 */
    257 	bus_space_write_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SWP(2),
    258 	    __SHIFTIN(29, ADM5120_MPMC_SWP_WPS));
    259 
    260 	/*
    261 	 * Static Wait Wait Wr 2: set wait state time to 22 HCLK cycles.
    262 	 */
    263 	bus_space_write_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SWWR(2),
    264 	    __SHIFTIN(20, ADM5120_MPMC_SWWR_WWS));
    265 
    266 	/*
    267 	 * Static Wait Wait Turn 2: 10 HCLK cycles for turnaround.
    268 	 */
    269 	bus_space_write_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_SWT(2),
    270 	    __SHIFTIN(9, ADM5120_MPMC_SWT_WAITTURN));
    271 
    272 #if 0
    273 	/* Leave low-power mode. */
    274 	control = bus_space_read_4(sc->sc_obiot, sc->sc_mpmch,
    275 	    ADM5120_MPMC_CONTROL) &
    276 	    ~(ADM5120_MPMC_CONTROL_LPM|ADM5120_MPMC_CONTROL_DWB);
    277 	bus_space_write_4(sc->sc_obiot, sc->sc_mpmch, ADM5120_MPMC_CONTROL,
    278 	    control);
    279 	splx(s);
    280 #endif
    281 
    282 	extio_mpmc_dump(sc);
    283 }
    284 
    285 static void
    286 extio_attach(struct device *parent, struct device *self, void *aux)
    287 {
    288 	struct extio_softc *sc = (struct extio_softc *)self;
    289 	struct mainbus_attach_args *ma = (struct mainbus_attach_args *)aux;
    290 	struct extio_attach_args ea;
    291 	struct extiodev *ed;
    292 	struct adm5120_config *admc = &adm5120_configuration;
    293 
    294 	extio_found = 1;
    295 	printf("\n");
    296 
    297 	sc->sc_gpio = ma->ma_gpio;
    298 	sc->sc_obiot = ma->ma_obiot;
    299 	sc->sc_gpioh = ma->ma_gpioh;
    300 
    301 	EXTIO_DPRINTF("%s: %d\n", __func__, __LINE__);
    302 
    303 	sc->sc_pm.pm_map = &sc->sc_map[0];
    304 
    305 	/* Map GPIO[0] (WAIT#) for input.
    306 	 *
    307 	 * If WAIT# is high (inactive), then enable WAIT# handshake for
    308 	 * EXTIO0 accesses.  Otherwise, assume that WAIT# is
    309 	 * stuck low (active), in which case all accesses would timeout
    310 	 * if we enabled WAIT# handshake.
    311 	 *
    312 	 * Map GPIO[1:2].  Program 5120 to treat GPIO[1:2] as
    313 	 * Chip Select / Interrupt pins for External I/O #0.
    314 	 *
    315 	 * Map GPIO[3:4].  Program 5120 to treat GPIO[3:4] as
    316 	 * Chip Select / Interrupt pins for External I/O #1.
    317 	 *
    318 	 * Use GPIO[4] for interrupts.  (Not yet.)
    319 	 */
    320 	if (gpio_pin_map(sc->sc_gpio, 0, __BITS(0, 4), &sc->sc_pm) != 0) {
    321 		aprint_error_dev(&sc->sc_dev, "failed to map GPIO[1:2]\n");
    322 	}
    323 	EXTIO_DPRINTF("%s: %d\n", __func__, __LINE__);
    324 	gpio_pin_ctl(sc->sc_gpio, &sc->sc_pm, 0, GPIO_PIN_INPUT);
    325 	gpio_pin_ctl(sc->sc_gpio, &sc->sc_pm, 1, GPIO_PIN_OUTPUT);
    326 	gpio_pin_ctl(sc->sc_gpio, &sc->sc_pm, 2, GPIO_PIN_INPUT);
    327 	gpio_pin_ctl(sc->sc_gpio, &sc->sc_pm, 3, GPIO_PIN_OUTPUT);
    328 	gpio_pin_ctl(sc->sc_gpio, &sc->sc_pm, 4, GPIO_PIN_INPUT);
    329 	gpio_pin_write(sc->sc_gpio, &sc->sc_pm, 1, 0);
    330 	gpio_pin_write(sc->sc_gpio, &sc->sc_pm, 3, 0);
    331 
    332 	EXTIO_DPRINTF("%s: %d\n", __func__, __LINE__);
    333 
    334 	if (gpio_pin_read(sc->sc_gpio, &sc->sc_pm, 0) == GPIO_PIN_HIGH) {
    335 		EXTIO_DPRINTF("%s: WAIT# inactive\n",
    336 		    device_xname(&sc->sc_dev));
    337 		bus_space_write_4(sc->sc_obiot, sc->sc_gpioh, ADM5120_GPIO2,
    338 		    ADM5120_GPIO2_EW | ADM5120_GPIO2_CSX0 | ADM5120_GPIO2_CSX1);
    339 	} else {
    340 		aprint_error_dev(&sc->sc_dev, "WAIT# active; may be stuck\n");
    341 		bus_space_write_4(sc->sc_obiot, sc->sc_gpioh, ADM5120_GPIO2,
    342 		    ADM5120_GPIO2_CSX0 | ADM5120_GPIO2_CSX1);
    343 	}
    344 	EXTIO_DPRINTF("%s: %d\n", __func__, __LINE__);
    345 
    346 	/* Map MultiPort Memory Controller */
    347 	if (bus_space_map(sc->sc_obiot, ADM5120_BASE_MPMC, 0x280, 0,
    348 	                  &sc->sc_mpmch) != 0) {
    349 		aprint_error_dev(&sc->sc_dev, "unable to map MPMC\n");
    350 		return;
    351 	}
    352 
    353 	extio_mpmc_init(sc);
    354 	EXTIO_DPRINTF("%s: %d\n", __func__, __LINE__);
    355 
    356 	/* Program 5120 for level interrupts on GPIO[4] (INTX1).  (Not yet.)
    357 	 *
    358 	 * Map interrupt.  (Not yet.  In the mean time, use flags 0x1000 in
    359 	 * kernel configuration so that wdc(4) will expect no interrupts.)
    360 	 */
    361 
    362 	cfio_bus_mem_init(&sc->sc_cfio, &admc->extio_space);
    363 
    364 	for (ed = extiodevs; ed->ed_name != NULL; ed++) {
    365 		EXTIO_DPRINTF("%s: %d\n", __func__, __LINE__);
    366 		extio_attach_args_create(&ea, ed, sc->sc_gpio,
    367 		    (ed->ed_cfio) ? &sc->sc_cfio : &admc->extio_space);
    368 		EXTIO_DPRINTF("%s: %d\n", __func__, __LINE__);
    369 		(void)config_found_sm_loc(self, "extio", NULL, &ea, extio_print,
    370 		    extio_submatch);
    371 	}
    372 	EXTIO_DPRINTF("%s: %d\n", __func__, __LINE__);
    373 	extio_mpmc_dump(sc);
    374 }
    375 
    376 static int
    377 extio_submatch(struct device *parent, struct cfdata *cf,
    378 	       const int *ldesc, void *aux)
    379 {
    380 	struct extio_attach_args *ea = aux;
    381 
    382 	if (cf->cf_loc[EXTIOCF_CFIO] != EXTIOCF_CFIO_DEFAULT &&
    383 	    cf->cf_loc[EXTIOCF_CFIO] != ea->ea_cfio)
    384 		return 0;
    385 
    386 	if (cf->cf_loc[EXTIOCF_GPIO_MASK] != EXTIOCF_GPIO_MASK_DEFAULT &&
    387 	    cf->cf_loc[EXTIOCF_GPIO_MASK] != ea->ea_gpio_mask)
    388 		return 0;
    389 
    390 	if (cf->cf_loc[EXTIOCF_IRQ] != EXTIOCF_IRQ_DEFAULT &&
    391 	    cf->cf_loc[EXTIOCF_IRQ] != ea->ea_irq)
    392 		return 0;
    393 
    394 	if (cf->cf_loc[EXTIOCF_ADDR] != EXTIOCF_ADDR_DEFAULT &&
    395 	    cf->cf_loc[EXTIOCF_ADDR] != ea->ea_addr)
    396 		return 0;
    397 
    398 	return config_match(parent, cf, aux);
    399 }
    400 
    401 static int
    402 extio_print(void *aux, const char *pnp)
    403 {
    404 	struct extio_attach_args *ea = aux;
    405 
    406 	if (pnp != NULL)
    407 		aprint_normal("%s at %s", ea->ea_name, pnp);
    408 	if (ea->ea_cfio != EXTIOCF_CFIO_DEFAULT)
    409 		aprint_normal(" cfio");
    410 	if (ea->ea_addr != EXTIOCF_ADDR_DEFAULT)
    411 		aprint_normal(" addr 0x%"PRIxBUSADDR, ea->ea_addr);
    412 	if (ea->ea_gpio_mask != EXTIOCF_GPIO_MASK_DEFAULT)
    413 		aprint_normal(" gpio_mask 0x%02x", ea->ea_gpio_mask);
    414 
    415 	return UNCONF;
    416 }
    417