Home | History | Annotate | Line # | Download | only in eisa
mlx_eisa.c revision 1.3.2.6
      1 /*	$NetBSD: mlx_eisa.c,v 1.3.2.6 2002/09/17 21:19:31 nathanw 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 Andrew Doran.
      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  * EISA front-end for mlx(4) driver.
     41  */
     42 
     43 #include <sys/cdefs.h>
     44 __KERNEL_RCSID(0, "$NetBSD: mlx_eisa.c,v 1.3.2.6 2002/09/17 21:19:31 nathanw Exp $");
     45 
     46 #include <sys/param.h>
     47 #include <sys/systm.h>
     48 #include <sys/device.h>
     49 
     50 #include <machine/bus.h>
     51 #include <machine/intr.h>
     52 
     53 #include <dev/eisa/eisavar.h>
     54 #include <dev/eisa/eisadevs.h>
     55 
     56 #include <dev/ic/mlxreg.h>
     57 #include <dev/ic/mlxio.h>
     58 #include <dev/ic/mlxvar.h>
     59 
     60 #define MLX_EISA_SLOT_OFFSET		0x0c80
     61 #define MLX_EISA_IOSIZE			(0x0ce0 - MLX_EISA_SLOT_OFFSET)
     62 #define MLX_EISA_IOCONF1		(0x0cc1 - MLX_EISA_SLOT_OFFSET)
     63 #define MLX_EISA_IOCONF2		(0x0cc3 - MLX_EISA_SLOT_OFFSET)
     64 
     65 static void	mlx_eisa_attach(struct device *, struct device *, void *);
     66 static int	mlx_eisa_match(struct device *, struct cfdata *, void *);
     67 
     68 static int	mlx_v1_submit(struct mlx_softc *, struct mlx_ccb *);
     69 static int	mlx_v1_findcomplete(struct mlx_softc *, u_int *, u_int *);
     70 static void	mlx_v1_intaction(struct mlx_softc *, int);
     71 static int	mlx_v1_fw_handshake(struct mlx_softc *, int *, int *, int *);
     72 #ifdef MLX_RESET
     73 static int	mlx_v1_reset(struct mlx_softc *);
     74 #endif
     75 
     76 struct cfattach mlx_eisa_ca = {
     77 	sizeof(struct mlx_softc), mlx_eisa_match, mlx_eisa_attach
     78 };
     79 
     80 struct mlx_eisa_prod {
     81 	const char	*mp_idstr;
     82 	int		mp_nchan;
     83 } static const mlx_eisa_prod[] = {
     84 	{ "MLX0070", 1 },
     85 	{ "MLX0071", 3 },
     86 	{ "MLX0072", 3 },
     87 	{ "MLX0073", 2 },
     88 	{ "MLX0074", 1 },
     89 	{ "MLX0075", 3 },
     90 	{ "MLX0076", 2 },
     91 	{ "MLX0077", 1 },
     92 };
     93 
     94 static int
     95 mlx_eisa_match(struct device *parent, struct cfdata *match, void *aux)
     96 {
     97 	struct eisa_attach_args *ea;
     98 	int i;
     99 
    100 	ea = aux;
    101 
    102 	for (i = 0; i < sizeof(mlx_eisa_prod) / sizeof(mlx_eisa_prod[0]); i++)
    103 		if (strcmp(ea->ea_idstring, mlx_eisa_prod[i].mp_idstr) == 0)
    104 			return (1);
    105 
    106 	return (0);
    107 }
    108 
    109 static void
    110 mlx_eisa_attach(struct device *parent, struct device *self, void *aux)
    111 {
    112 	struct eisa_attach_args *ea;
    113 	bus_space_handle_t ioh;
    114 	eisa_chipset_tag_t ec;
    115 	eisa_intr_handle_t ih;
    116 	struct mlx_softc *mlx;
    117 	bus_space_tag_t iot;
    118 	const char *intrstr;
    119 	int irq, le, i;
    120 
    121 	ea = aux;
    122 	mlx = (struct mlx_softc *)self;
    123 	iot = ea->ea_iot;
    124 	ec = ea->ea_ec;
    125 
    126 	if (bus_space_map(iot, EISA_SLOT_ADDR(ea->ea_slot) +
    127 	    MLX_EISA_SLOT_OFFSET, MLX_EISA_IOSIZE, 0, &ioh)) {
    128 		printf("can't map i/o space\n");
    129 		return;
    130 	}
    131 
    132 	mlx->mlx_iot = iot;
    133 	mlx->mlx_ioh = ioh;
    134 	mlx->mlx_dmat = ea->ea_dmat;
    135 
    136 	/*
    137 	 * Map and establish the interrupt.
    138 	 */
    139 	switch (bus_space_read_1(iot, ioh, MLX_EISA_IOCONF1) & 0xf0) {
    140 	case 0xa0:
    141 		irq = 11;
    142 		break;
    143 	case 0xc0:
    144 		irq = 12;
    145 		break;
    146 	case 0xe0:
    147 		irq = 14;
    148 		break;
    149 	case 0x80:
    150 		irq = 15;
    151 		break;
    152 	default:
    153 		printf("controller on invalid IRQ\n");
    154 		return;
    155 	}
    156 
    157 	if (eisa_intr_map(ec, irq, &ih)) {
    158 		printf("can't map interrupt (%d)\n", irq);
    159 		return;
    160 	}
    161 
    162 	if ((bus_space_read_1(iot, ioh, MLX_EISA_IOCONF1) & 0x08) != 0)
    163 		le = IST_LEVEL;
    164 	else
    165 		le = IST_EDGE;
    166 
    167 	intrstr = eisa_intr_string(ec, ih);
    168 	mlx->mlx_ih = eisa_intr_establish(ec, ih, le, IPL_BIO, mlx_intr, mlx);
    169 	if (mlx->mlx_ih == NULL) {
    170 		printf("can't establish interrupt");
    171 		if (intrstr != NULL)
    172 			printf(" at %s", intrstr);
    173 		printf("\n");
    174 		return;
    175 	}
    176 
    177 	for (i = 0; i < sizeof(mlx_eisa_prod) / sizeof(mlx_eisa_prod[0]); i++)
    178 		if (strcmp(ea->ea_idstring, mlx_eisa_prod[i].mp_idstr) == 0) {
    179 			mlx->mlx_ci.ci_nchan = mlx_eisa_prod[i].mp_nchan;
    180 			break;
    181 		}
    182 	mlx->mlx_ci.ci_iftype = 1;
    183 
    184 	mlx->mlx_submit = mlx_v1_submit;
    185 	mlx->mlx_findcomplete = mlx_v1_findcomplete;
    186 	mlx->mlx_intaction = mlx_v1_intaction;
    187 	mlx->mlx_fw_handshake = mlx_v1_fw_handshake;
    188 #ifdef MLX_RESET
    189 	mlx->mlx_reset = mlx_v1_reset;
    190 #endif
    191 
    192 	printf(": Mylex RAID\n");
    193 	mlx_init(mlx, intrstr);
    194 }
    195 
    196 /*
    197  * ================= V1 interface linkage =================
    198  */
    199 
    200 /*
    201  * Try to give (mc) to the controller.  Returns 1 if successful, 0 on
    202  * failure (the controller is not ready to take a command).
    203  *
    204  * Must be called at splbio or in a fashion that prevents reentry.
    205  */
    206 static int
    207 mlx_v1_submit(struct mlx_softc *mlx, struct mlx_ccb *mc)
    208 {
    209 
    210 	/* Ready for our command? */
    211 	if ((mlx_inb(mlx, MLX_V1REG_IDB) & MLX_V1_IDB_FULL) == 0) {
    212 		/* Copy mailbox data to window. */
    213 		bus_space_write_region_1(mlx->mlx_iot, mlx->mlx_ioh,
    214 		    MLX_V1REG_MAILBOX, mc->mc_mbox, 13);
    215 		bus_space_barrier(mlx->mlx_iot, mlx->mlx_ioh,
    216 		    MLX_V1REG_MAILBOX, 13,
    217 		    BUS_SPACE_BARRIER_WRITE);
    218 
    219 		/* Post command. */
    220 		mlx_outb(mlx, MLX_V1REG_IDB, MLX_V1_IDB_FULL);
    221 		return (1);
    222 	}
    223 
    224 	return (0);
    225 }
    226 
    227 /*
    228  * See if a command has been completed, if so acknowledge its completion and
    229  * recover the slot number and status code.
    230  *
    231  * Must be called at splbio or in a fashion that prevents reentry.
    232  */
    233 static int
    234 mlx_v1_findcomplete(struct mlx_softc *mlx, u_int *slot, u_int *status)
    235 {
    236 
    237 	/* Status available? */
    238 	if ((mlx_inb(mlx, MLX_V1REG_ODB) & MLX_V1_ODB_SAVAIL) != 0) {
    239 		*slot = mlx_inb(mlx, MLX_V1REG_MAILBOX + 0x0d);
    240 		*status = mlx_inw(mlx, MLX_V1REG_MAILBOX + 0x0e);
    241 
    242 		/* Acknowledge completion. */
    243 		mlx_outb(mlx, MLX_V1REG_ODB, MLX_V1_ODB_SAVAIL);
    244 		mlx_outb(mlx, MLX_V1REG_IDB, MLX_V1_IDB_SACK);
    245 		return (1);
    246 	}
    247 
    248 	return (0);
    249 }
    250 
    251 /*
    252  * Enable/disable interrupts as requested. (No acknowledge required)
    253  *
    254  * Must be called at splbio or in a fashion that prevents reentry.
    255  */
    256 static void
    257 mlx_v1_intaction(struct mlx_softc *mlx, int action)
    258 {
    259 
    260 	mlx_outb(mlx, MLX_V1REG_IE, action ? 1 : 0);
    261 }
    262 
    263 /*
    264  * Poll for firmware error codes during controller initialisation.
    265  *
    266  * Returns 0 if initialisation is complete, 1 if still in progress but no
    267  * error has been fetched, 2 if an error has been retrieved.
    268  */
    269 static int
    270 mlx_v1_fw_handshake(struct mlx_softc *mlx, int *error, int *param1, int *param2)
    271 {
    272 	u_int8_t fwerror;
    273 
    274 	/*
    275 	 * First time around, enable the IDB interrupt and clear any
    276 	 * hardware completion status.
    277 	 */
    278 	if ((mlx->mlx_flags & MLXF_FW_INITTED) == 0) {
    279 		mlx_outb(mlx, MLX_V1REG_ODB_EN, 1);
    280 		DELAY(1000);
    281 		mlx_outb(mlx, MLX_V1REG_ODB, 1);
    282 		DELAY(1000);
    283 		mlx_outb(mlx, MLX_V1REG_IDB, MLX_V1_IDB_SACK);
    284 		DELAY(1000);
    285 		mlx->mlx_flags |= MLXF_FW_INITTED;
    286 	}
    287 
    288 	/* Init in progress? */
    289 	if ((mlx_inb(mlx, MLX_V1REG_IDB) & MLX_V1_IDB_INIT_BUSY) == 0)
    290 		return (0);
    291 
    292 	/* Test error value. */
    293 	fwerror = mlx_inb(mlx, MLX_V1REG_ODB);
    294 
    295 	if ((fwerror & MLX_V1_FWERROR_PEND) == 0)
    296 		return (1);
    297 
    298 	/* XXX Fetch status. */
    299 	*error = fwerror & 0xf0;
    300 	*param1 = -1;
    301 	*param2 = -1;
    302 
    303 	/* Acknowledge. */
    304 	mlx_outb(mlx, MLX_V1REG_ODB, fwerror);
    305 
    306 	return (2);
    307 }
    308 
    309 #ifdef MLX_RESET
    310 /*
    311  * Reset the controller.  Return non-zero on failure.
    312  */
    313 static int
    314 mlx_v1_reset(struct mlx_softc *mlx)
    315 {
    316 	int i;
    317 
    318 	mlx_outb(mlx, MLX_V1REG_IDB, MLX_V1_IDB_SACK);
    319 	delay(1000000);
    320 
    321 	/* Wait up to 2 minutes for the bit to clear. */
    322 	for (i = 120; i != 0; i--) {
    323 		delay(1000000);
    324 		if ((mlx_inb(mlx, MLX_V1REG_IDB) & MLX_V1_IDB_SACK) == 0)
    325 			break;
    326 	}
    327 	if (i == 0)
    328 		return (-1);
    329 
    330 	mlx_outb(mlx, MLX_V1REG_ODB, MLX_V1_ODB_RESET);
    331 	mlx_outb(mlx, MLX_V1REG_IDB, MLX_V1_IDB_RESET);
    332 
    333 	/* Wait up to 5 seconds for the bit to clear... */
    334 	for (i = 5; i != 0; i--) {
    335 		delay(1000000);
    336 		if ((mlx_inb(mlx, MLX_V1REG_IDB) & MLX_V1_IDB_RESET) == 0)
    337 			break;
    338 	}
    339 	if (i == 0)
    340 		return (-1);
    341 
    342 	/* Wait up to 3 seconds for the other bit to clear... */
    343 	for (i = 5; i != 0; i--) {
    344 		delay(1000000);
    345 		if ((mlx_inb(mlx, MLX_V1REG_ODB) & MLX_V1_ODB_RESET) == 0)
    346 			break;
    347 	}
    348 	if (i == 0)
    349 		return (-1);
    350 
    351 	return (0);
    352 }
    353 #endif	/* MLX_RESET */
    354