mlx_eisa.c revision 1.3.2.5
1 1.3.2.5 nathanw /* $NetBSD: mlx_eisa.c,v 1.3.2.5 2002/08/27 23:46:34 nathanw Exp $ */ 2 1.3.2.2 nathanw 3 1.3.2.2 nathanw /*- 4 1.3.2.2 nathanw * Copyright (c) 2001 The NetBSD Foundation, Inc. 5 1.3.2.2 nathanw * All rights reserved. 6 1.3.2.2 nathanw * 7 1.3.2.2 nathanw * This code is derived from software contributed to The NetBSD Foundation 8 1.3.2.2 nathanw * by Andrew Doran. 9 1.3.2.2 nathanw * 10 1.3.2.2 nathanw * Redistribution and use in source and binary forms, with or without 11 1.3.2.2 nathanw * modification, are permitted provided that the following conditions 12 1.3.2.2 nathanw * are met: 13 1.3.2.2 nathanw * 1. Redistributions of source code must retain the above copyright 14 1.3.2.2 nathanw * notice, this list of conditions and the following disclaimer. 15 1.3.2.2 nathanw * 2. Redistributions in binary form must reproduce the above copyright 16 1.3.2.2 nathanw * notice, this list of conditions and the following disclaimer in the 17 1.3.2.2 nathanw * documentation and/or other materials provided with the distribution. 18 1.3.2.2 nathanw * 3. All advertising materials mentioning features or use of this software 19 1.3.2.2 nathanw * must display the following acknowledgement: 20 1.3.2.2 nathanw * This product includes software developed by the NetBSD 21 1.3.2.2 nathanw * Foundation, Inc. and its contributors. 22 1.3.2.2 nathanw * 4. Neither the name of The NetBSD Foundation nor the names of its 23 1.3.2.2 nathanw * contributors may be used to endorse or promote products derived 24 1.3.2.2 nathanw * from this software without specific prior written permission. 25 1.3.2.2 nathanw * 26 1.3.2.2 nathanw * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 27 1.3.2.2 nathanw * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 28 1.3.2.2 nathanw * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 29 1.3.2.2 nathanw * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 30 1.3.2.2 nathanw * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 31 1.3.2.2 nathanw * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 32 1.3.2.2 nathanw * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 33 1.3.2.2 nathanw * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 34 1.3.2.2 nathanw * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 35 1.3.2.2 nathanw * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 36 1.3.2.2 nathanw * POSSIBILITY OF SUCH DAMAGE. 37 1.3.2.2 nathanw */ 38 1.3.2.2 nathanw 39 1.3.2.2 nathanw /* 40 1.3.2.2 nathanw * EISA front-end for mlx(4) driver. 41 1.3.2.2 nathanw */ 42 1.3.2.2 nathanw 43 1.3.2.3 nathanw #include <sys/cdefs.h> 44 1.3.2.5 nathanw __KERNEL_RCSID(0, "$NetBSD: mlx_eisa.c,v 1.3.2.5 2002/08/27 23:46:34 nathanw Exp $"); 45 1.3.2.3 nathanw 46 1.3.2.2 nathanw #include <sys/param.h> 47 1.3.2.2 nathanw #include <sys/systm.h> 48 1.3.2.2 nathanw #include <sys/device.h> 49 1.3.2.2 nathanw 50 1.3.2.2 nathanw #include <machine/bus.h> 51 1.3.2.2 nathanw #include <machine/intr.h> 52 1.3.2.2 nathanw 53 1.3.2.2 nathanw #include <dev/eisa/eisavar.h> 54 1.3.2.2 nathanw #include <dev/eisa/eisadevs.h> 55 1.3.2.2 nathanw 56 1.3.2.2 nathanw #include <dev/ic/mlxreg.h> 57 1.3.2.2 nathanw #include <dev/ic/mlxio.h> 58 1.3.2.2 nathanw #include <dev/ic/mlxvar.h> 59 1.3.2.2 nathanw 60 1.3.2.4 nathanw #define MLX_EISA_SLOT_OFFSET 0x0c80 61 1.3.2.2 nathanw #define MLX_EISA_IOSIZE (0x0ce0 - MLX_EISA_SLOT_OFFSET) 62 1.3.2.2 nathanw #define MLX_EISA_IOCONF1 (0x0cc1 - MLX_EISA_SLOT_OFFSET) 63 1.3.2.2 nathanw #define MLX_EISA_IOCONF2 (0x0cc3 - MLX_EISA_SLOT_OFFSET) 64 1.3.2.2 nathanw 65 1.3.2.2 nathanw static void mlx_eisa_attach(struct device *, struct device *, void *); 66 1.3.2.2 nathanw static int mlx_eisa_match(struct device *, struct cfdata *, void *); 67 1.3.2.2 nathanw 68 1.3.2.2 nathanw static int mlx_v1_submit(struct mlx_softc *, struct mlx_ccb *); 69 1.3.2.2 nathanw static int mlx_v1_findcomplete(struct mlx_softc *, u_int *, u_int *); 70 1.3.2.2 nathanw static void mlx_v1_intaction(struct mlx_softc *, int); 71 1.3.2.2 nathanw static int mlx_v1_fw_handshake(struct mlx_softc *, int *, int *, int *); 72 1.3.2.2 nathanw #ifdef MLX_RESET 73 1.3.2.2 nathanw static int mlx_v1_reset(struct mlx_softc *); 74 1.3.2.2 nathanw #endif 75 1.3.2.2 nathanw 76 1.3.2.2 nathanw struct cfattach mlx_eisa_ca = { 77 1.3.2.2 nathanw sizeof(struct mlx_softc), mlx_eisa_match, mlx_eisa_attach 78 1.3.2.2 nathanw }; 79 1.3.2.2 nathanw 80 1.3.2.5 nathanw struct mlx_eisa_prod { 81 1.3.2.5 nathanw const char *mp_idstr; 82 1.3.2.5 nathanw int mp_nchan; 83 1.3.2.5 nathanw } static const mlx_eisa_prod[] = { 84 1.3.2.5 nathanw { "MLX0070", 1 }, 85 1.3.2.5 nathanw { "MLX0071", 3 }, 86 1.3.2.5 nathanw { "MLX0072", 3 }, 87 1.3.2.5 nathanw { "MLX0073", 2 }, 88 1.3.2.5 nathanw { "MLX0074", 1 }, 89 1.3.2.5 nathanw { "MLX0075", 3 }, 90 1.3.2.5 nathanw { "MLX0076", 2 }, 91 1.3.2.5 nathanw { "MLX0077", 1 }, 92 1.3.2.2 nathanw }; 93 1.3.2.2 nathanw 94 1.3.2.2 nathanw static int 95 1.3.2.2 nathanw mlx_eisa_match(struct device *parent, struct cfdata *match, void *aux) 96 1.3.2.2 nathanw { 97 1.3.2.2 nathanw struct eisa_attach_args *ea; 98 1.3.2.2 nathanw int i; 99 1.3.2.2 nathanw 100 1.3.2.2 nathanw ea = aux; 101 1.3.2.2 nathanw 102 1.3.2.2 nathanw for (i = 0; i < sizeof(mlx_eisa_prod) / sizeof(mlx_eisa_prod[0]); i++) 103 1.3.2.5 nathanw if (strcmp(ea->ea_idstring, mlx_eisa_prod[i].mp_idstr) == 0) 104 1.3.2.2 nathanw return (1); 105 1.3.2.2 nathanw 106 1.3.2.2 nathanw return (0); 107 1.3.2.2 nathanw } 108 1.3.2.2 nathanw 109 1.3.2.2 nathanw static void 110 1.3.2.2 nathanw mlx_eisa_attach(struct device *parent, struct device *self, void *aux) 111 1.3.2.2 nathanw { 112 1.3.2.2 nathanw struct eisa_attach_args *ea; 113 1.3.2.2 nathanw bus_space_handle_t ioh; 114 1.3.2.2 nathanw eisa_chipset_tag_t ec; 115 1.3.2.2 nathanw eisa_intr_handle_t ih; 116 1.3.2.2 nathanw struct mlx_softc *mlx; 117 1.3.2.2 nathanw bus_space_tag_t iot; 118 1.3.2.2 nathanw const char *intrstr; 119 1.3.2.5 nathanw int irq, le, i; 120 1.3.2.2 nathanw 121 1.3.2.2 nathanw ea = aux; 122 1.3.2.2 nathanw mlx = (struct mlx_softc *)self; 123 1.3.2.2 nathanw iot = ea->ea_iot; 124 1.3.2.2 nathanw ec = ea->ea_ec; 125 1.3.2.2 nathanw 126 1.3.2.2 nathanw if (bus_space_map(iot, EISA_SLOT_ADDR(ea->ea_slot) + 127 1.3.2.2 nathanw MLX_EISA_SLOT_OFFSET, MLX_EISA_IOSIZE, 0, &ioh)) { 128 1.3.2.2 nathanw printf("can't map i/o space\n"); 129 1.3.2.2 nathanw return; 130 1.3.2.2 nathanw } 131 1.3.2.2 nathanw 132 1.3.2.2 nathanw mlx->mlx_iot = iot; 133 1.3.2.2 nathanw mlx->mlx_ioh = ioh; 134 1.3.2.2 nathanw mlx->mlx_dmat = ea->ea_dmat; 135 1.3.2.2 nathanw 136 1.3.2.2 nathanw /* 137 1.3.2.2 nathanw * Map and establish the interrupt. 138 1.3.2.2 nathanw */ 139 1.3.2.2 nathanw switch (bus_space_read_1(iot, ioh, MLX_EISA_IOCONF1) & 0xf0) { 140 1.3.2.2 nathanw case 0xa0: 141 1.3.2.2 nathanw irq = 11; 142 1.3.2.2 nathanw break; 143 1.3.2.2 nathanw case 0xc0: 144 1.3.2.2 nathanw irq = 12; 145 1.3.2.2 nathanw break; 146 1.3.2.2 nathanw case 0xe0: 147 1.3.2.2 nathanw irq = 14; 148 1.3.2.2 nathanw break; 149 1.3.2.2 nathanw case 0x80: 150 1.3.2.2 nathanw irq = 15; 151 1.3.2.2 nathanw break; 152 1.3.2.2 nathanw default: 153 1.3.2.2 nathanw printf("controller on invalid IRQ\n"); 154 1.3.2.2 nathanw return; 155 1.3.2.2 nathanw } 156 1.3.2.2 nathanw 157 1.3.2.2 nathanw if (eisa_intr_map(ec, irq, &ih)) { 158 1.3.2.2 nathanw printf("can't map interrupt (%d)\n", irq); 159 1.3.2.2 nathanw return; 160 1.3.2.2 nathanw } 161 1.3.2.2 nathanw 162 1.3.2.2 nathanw if ((bus_space_read_1(iot, ioh, MLX_EISA_IOCONF1) & 0x08) != 0) 163 1.3.2.2 nathanw le = IST_LEVEL; 164 1.3.2.2 nathanw else 165 1.3.2.2 nathanw le = IST_EDGE; 166 1.3.2.2 nathanw 167 1.3.2.2 nathanw intrstr = eisa_intr_string(ec, ih); 168 1.3.2.2 nathanw mlx->mlx_ih = eisa_intr_establish(ec, ih, le, IPL_BIO, mlx_intr, mlx); 169 1.3.2.2 nathanw if (mlx->mlx_ih == NULL) { 170 1.3.2.2 nathanw printf("can't establish interrupt"); 171 1.3.2.2 nathanw if (intrstr != NULL) 172 1.3.2.2 nathanw printf(" at %s", intrstr); 173 1.3.2.2 nathanw printf("\n"); 174 1.3.2.2 nathanw return; 175 1.3.2.2 nathanw } 176 1.3.2.2 nathanw 177 1.3.2.5 nathanw for (i = 0; i < sizeof(mlx_eisa_prod) / sizeof(mlx_eisa_prod[0]); i++) 178 1.3.2.5 nathanw if (strcmp(ea->ea_idstring, mlx_eisa_prod[i].mp_idstr) == 0) { 179 1.3.2.5 nathanw mlx->mlx_ci.ci_nchan = mlx_eisa_prod[i].mp_nchan; 180 1.3.2.5 nathanw break; 181 1.3.2.5 nathanw } 182 1.3.2.5 nathanw mlx->mlx_ci.ci_iftype = 1; 183 1.3.2.2 nathanw 184 1.3.2.2 nathanw mlx->mlx_submit = mlx_v1_submit; 185 1.3.2.2 nathanw mlx->mlx_findcomplete = mlx_v1_findcomplete; 186 1.3.2.2 nathanw mlx->mlx_intaction = mlx_v1_intaction; 187 1.3.2.2 nathanw mlx->mlx_fw_handshake = mlx_v1_fw_handshake; 188 1.3.2.2 nathanw #ifdef MLX_RESET 189 1.3.2.2 nathanw mlx->mlx_reset = mlx_v1_reset; 190 1.3.2.2 nathanw #endif 191 1.3.2.2 nathanw 192 1.3.2.2 nathanw printf(": Mylex RAID\n"); 193 1.3.2.2 nathanw mlx_init(mlx, intrstr); 194 1.3.2.2 nathanw } 195 1.3.2.2 nathanw 196 1.3.2.2 nathanw /* 197 1.3.2.2 nathanw * ================= V1 interface linkage ================= 198 1.3.2.2 nathanw */ 199 1.3.2.2 nathanw 200 1.3.2.2 nathanw /* 201 1.3.2.2 nathanw * Try to give (mc) to the controller. Returns 1 if successful, 0 on 202 1.3.2.2 nathanw * failure (the controller is not ready to take a command). 203 1.3.2.2 nathanw * 204 1.3.2.2 nathanw * Must be called at splbio or in a fashion that prevents reentry. 205 1.3.2.2 nathanw */ 206 1.3.2.2 nathanw static int 207 1.3.2.2 nathanw mlx_v1_submit(struct mlx_softc *mlx, struct mlx_ccb *mc) 208 1.3.2.2 nathanw { 209 1.3.2.2 nathanw 210 1.3.2.2 nathanw /* Ready for our command? */ 211 1.3.2.2 nathanw if ((mlx_inb(mlx, MLX_V1REG_IDB) & MLX_V1_IDB_FULL) == 0) { 212 1.3.2.2 nathanw /* Copy mailbox data to window. */ 213 1.3.2.2 nathanw bus_space_write_region_1(mlx->mlx_iot, mlx->mlx_ioh, 214 1.3.2.2 nathanw MLX_V1REG_MAILBOX, mc->mc_mbox, MLX_V1_MAILBOX_LEN); 215 1.3.2.2 nathanw bus_space_barrier(mlx->mlx_iot, mlx->mlx_ioh, 216 1.3.2.2 nathanw MLX_V1REG_MAILBOX, MLX_V1_MAILBOX_LEN, 217 1.3.2.2 nathanw BUS_SPACE_BARRIER_WRITE); 218 1.3.2.2 nathanw 219 1.3.2.2 nathanw /* Post command. */ 220 1.3.2.5 nathanw mlx_outb(mlx, MLX_V1REG_IDB, MLX_V1_IDB_FULL); 221 1.3.2.2 nathanw return (1); 222 1.3.2.2 nathanw } 223 1.3.2.2 nathanw 224 1.3.2.2 nathanw return (0); 225 1.3.2.2 nathanw } 226 1.3.2.2 nathanw 227 1.3.2.2 nathanw /* 228 1.3.2.2 nathanw * See if a command has been completed, if so acknowledge its completion and 229 1.3.2.2 nathanw * recover the slot number and status code. 230 1.3.2.2 nathanw * 231 1.3.2.2 nathanw * Must be called at splbio or in a fashion that prevents reentry. 232 1.3.2.2 nathanw */ 233 1.3.2.2 nathanw static int 234 1.3.2.2 nathanw mlx_v1_findcomplete(struct mlx_softc *mlx, u_int *slot, u_int *status) 235 1.3.2.2 nathanw { 236 1.3.2.2 nathanw 237 1.3.2.2 nathanw /* Status available? */ 238 1.3.2.5 nathanw if ((mlx_inb(mlx, MLX_V1REG_ODB) & MLX_V1_ODB_SAVAIL) != 0) { 239 1.3.2.2 nathanw *slot = mlx_inb(mlx, MLX_V1REG_MAILBOX + 0x0d); 240 1.3.2.2 nathanw *status = mlx_inw(mlx, MLX_V1REG_MAILBOX + 0x0e); 241 1.3.2.2 nathanw 242 1.3.2.2 nathanw /* Acknowledge completion. */ 243 1.3.2.2 nathanw mlx_outb(mlx, MLX_V1REG_ODB, MLX_V1_ODB_SAVAIL); 244 1.3.2.2 nathanw mlx_outb(mlx, MLX_V1REG_IDB, MLX_V1_IDB_SACK); 245 1.3.2.2 nathanw return (1); 246 1.3.2.2 nathanw } 247 1.3.2.2 nathanw 248 1.3.2.2 nathanw return (0); 249 1.3.2.2 nathanw } 250 1.3.2.2 nathanw 251 1.3.2.2 nathanw /* 252 1.3.2.2 nathanw * Enable/disable interrupts as requested. (No acknowledge required) 253 1.3.2.2 nathanw * 254 1.3.2.2 nathanw * Must be called at splbio or in a fashion that prevents reentry. 255 1.3.2.2 nathanw */ 256 1.3.2.2 nathanw static void 257 1.3.2.2 nathanw mlx_v1_intaction(struct mlx_softc *mlx, int action) 258 1.3.2.2 nathanw { 259 1.3.2.2 nathanw 260 1.3.2.2 nathanw mlx_outb(mlx, MLX_V1REG_IE, action ? 1 : 0); 261 1.3.2.2 nathanw } 262 1.3.2.2 nathanw 263 1.3.2.2 nathanw /* 264 1.3.2.2 nathanw * Poll for firmware error codes during controller initialisation. 265 1.3.2.2 nathanw * 266 1.3.2.2 nathanw * Returns 0 if initialisation is complete, 1 if still in progress but no 267 1.3.2.2 nathanw * error has been fetched, 2 if an error has been retrieved. 268 1.3.2.2 nathanw */ 269 1.3.2.2 nathanw static int 270 1.3.2.2 nathanw mlx_v1_fw_handshake(struct mlx_softc *mlx, int *error, int *param1, int *param2) 271 1.3.2.2 nathanw { 272 1.3.2.2 nathanw u_int8_t fwerror; 273 1.3.2.2 nathanw 274 1.3.2.2 nathanw /* 275 1.3.2.2 nathanw * First time around, enable the IDB interrupt and clear any 276 1.3.2.2 nathanw * hardware completion status. 277 1.3.2.2 nathanw */ 278 1.3.2.2 nathanw if ((mlx->mlx_flags & MLXF_FW_INITTED) == 0) { 279 1.3.2.2 nathanw mlx_outb(mlx, MLX_V1REG_ODB_EN, 1); 280 1.3.2.2 nathanw DELAY(1000); 281 1.3.2.4 nathanw mlx_outb(mlx, MLX_V1REG_ODB, 1); 282 1.3.2.4 nathanw DELAY(1000); 283 1.3.2.2 nathanw mlx_outb(mlx, MLX_V1REG_IDB, MLX_V1_IDB_SACK); 284 1.3.2.2 nathanw DELAY(1000); 285 1.3.2.2 nathanw mlx->mlx_flags |= MLXF_FW_INITTED; 286 1.3.2.2 nathanw } 287 1.3.2.2 nathanw 288 1.3.2.2 nathanw /* Init in progress? */ 289 1.3.2.2 nathanw if ((mlx_inb(mlx, MLX_V1REG_IDB) & MLX_V1_IDB_INIT_BUSY) == 0) 290 1.3.2.2 nathanw return (0); 291 1.3.2.2 nathanw 292 1.3.2.2 nathanw /* Test error value. */ 293 1.3.2.2 nathanw fwerror = mlx_inb(mlx, MLX_V1REG_ODB); 294 1.3.2.2 nathanw 295 1.3.2.2 nathanw if ((fwerror & MLX_V1_FWERROR_PEND) == 0) 296 1.3.2.2 nathanw return (1); 297 1.3.2.2 nathanw 298 1.3.2.2 nathanw /* XXX Fetch status. */ 299 1.3.2.2 nathanw *error = fwerror & 0xf0; 300 1.3.2.2 nathanw *param1 = -1; 301 1.3.2.2 nathanw *param2 = -1; 302 1.3.2.2 nathanw 303 1.3.2.2 nathanw /* Acknowledge. */ 304 1.3.2.2 nathanw mlx_outb(mlx, MLX_V1REG_ODB, fwerror); 305 1.3.2.2 nathanw 306 1.3.2.2 nathanw return (2); 307 1.3.2.2 nathanw } 308 1.3.2.2 nathanw 309 1.3.2.2 nathanw #ifdef MLX_RESET 310 1.3.2.2 nathanw /* 311 1.3.2.2 nathanw * Reset the controller. Return non-zero on failure. 312 1.3.2.2 nathanw */ 313 1.3.2.2 nathanw static int 314 1.3.2.2 nathanw mlx_v1_reset(struct mlx_softc *mlx) 315 1.3.2.2 nathanw { 316 1.3.2.2 nathanw int i; 317 1.3.2.2 nathanw 318 1.3.2.2 nathanw mlx_outb(mlx, MLX_V1REG_IDB, MLX_V1_IDB_SACK); 319 1.3.2.2 nathanw delay(1000000); 320 1.3.2.2 nathanw 321 1.3.2.2 nathanw /* Wait up to 2 minutes for the bit to clear. */ 322 1.3.2.2 nathanw for (i = 120; i != 0; i--) { 323 1.3.2.2 nathanw delay(1000000); 324 1.3.2.2 nathanw if ((mlx_inb(mlx, MLX_V1REG_IDB) & MLX_V1_IDB_SACK) == 0) 325 1.3.2.2 nathanw break; 326 1.3.2.2 nathanw } 327 1.3.2.2 nathanw if (i == 0) 328 1.3.2.2 nathanw return (-1); 329 1.3.2.2 nathanw 330 1.3.2.2 nathanw mlx_outb(mlx, MLX_V1REG_ODB, MLX_V1_ODB_RESET); 331 1.3.2.2 nathanw mlx_outb(mlx, MLX_V1REG_IDB, MLX_V1_IDB_RESET); 332 1.3.2.2 nathanw 333 1.3.2.2 nathanw /* Wait up to 5 seconds for the bit to clear... */ 334 1.3.2.2 nathanw for (i = 5; i != 0; i--) { 335 1.3.2.2 nathanw delay(1000000); 336 1.3.2.2 nathanw if ((mlx_inb(mlx, MLX_V1REG_IDB) & MLX_V1_IDB_RESET) == 0) 337 1.3.2.2 nathanw break; 338 1.3.2.2 nathanw } 339 1.3.2.2 nathanw if (i == 0) 340 1.3.2.2 nathanw return (-1); 341 1.3.2.2 nathanw 342 1.3.2.2 nathanw /* Wait up to 3 seconds for the other bit to clear... */ 343 1.3.2.2 nathanw for (i = 5; i != 0; i--) { 344 1.3.2.2 nathanw delay(1000000); 345 1.3.2.2 nathanw if ((mlx_inb(mlx, MLX_V1REG_ODB) & MLX_V1_ODB_RESET) == 0) 346 1.3.2.2 nathanw break; 347 1.3.2.2 nathanw } 348 1.3.2.2 nathanw if (i == 0) 349 1.3.2.2 nathanw return (-1); 350 1.3.2.2 nathanw 351 1.3.2.2 nathanw return (0); 352 1.3.2.2 nathanw } 353 1.3.2.2 nathanw #endif /* MLX_RESET */ 354
Indexes created Tue Oct 14 11:09:46 GMT 2025