1 /* $NetBSD: cac_eisa.c,v 1.23 2014/03/29 19:28:24 christos Exp $ */ 2 3 /*- 4 * Copyright (c) 2000 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 * 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 * Copyright (c) 2000 Jonathan Lemon 34 * Copyright (c) 1999 by Matthew N. Dodd <winter@jurai.net> 35 * All Rights Reserved. 36 * 37 * Redistribution and use in source and binary forms, with or without 38 * modification, are permitted provided that the following conditions 39 * are met: 40 * 1. Redistributions of source code must retain the above copyright 41 * notice, this list of conditions, and the following disclaimer, 42 * without modification, immediately at the beginning of the file. 43 * 2. The name of the author may not be used to endorse or promote products 44 * derived from this software without specific prior written permission. 45 * 46 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 47 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 48 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 49 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR 50 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 51 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 52 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 53 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 54 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 55 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 56 * SUCH DAMAGE. 57 */ 58 59 /* 60 * EISA front-end for cac(4) driver. 61 */ 62 63 #include <sys/cdefs.h> 64 __KERNEL_RCSID(0, "$NetBSD: cac_eisa.c,v 1.23 2014/03/29 19:28:24 christos Exp $"); 65 66 #include <sys/param.h> 67 #include <sys/systm.h> 68 #include <sys/device.h> 69 70 #include <sys/bus.h> 71 #include <sys/intr.h> 72 73 #include <dev/eisa/eisavar.h> 74 #include <dev/eisa/eisadevs.h> 75 76 #include <dev/ic/cacreg.h> 77 #include <dev/ic/cacvar.h> 78 79 #define CAC_EISA_SLOT_OFFSET 0x0c88 80 #define CAC_EISA_IOSIZE 0x0017 81 #define CAC_EISA_IOCONF 0x38 82 83 static void cac_eisa_attach(device_t, device_t, void *); 84 static int cac_eisa_match(device_t, cfdata_t, void *); 85 86 static struct cac_ccb *cac_eisa_l0_completed(struct cac_softc *); 87 static int cac_eisa_l0_fifo_full(struct cac_softc *); 88 static void cac_eisa_l0_intr_enable(struct cac_softc *, int); 89 static int cac_eisa_l0_intr_pending(struct cac_softc *); 90 static void cac_eisa_l0_submit(struct cac_softc *, struct cac_ccb *); 91 92 CFATTACH_DECL_NEW(cac_eisa, sizeof(struct cac_softc), 93 cac_eisa_match, cac_eisa_attach, NULL, NULL); 94 95 static const struct cac_linkage cac_eisa_l0 = { 96 cac_eisa_l0_completed, 97 cac_eisa_l0_fifo_full, 98 cac_eisa_l0_intr_enable, 99 cac_eisa_l0_intr_pending, 100 cac_eisa_l0_submit 101 }; 102 103 static struct cac_eisa_type { 104 const char *ct_prodstr; 105 const char *ct_typestr; 106 const struct cac_linkage *ct_linkage; 107 } cac_eisa_type[] = { 108 { "CPQ4001", "IDA", &cac_eisa_l0 }, 109 { "CPQ4002", "IDA-2", &cac_eisa_l0 }, 110 { "CPQ4010", "IEAS", &cac_eisa_l0 }, 111 { "CPQ4020", "SMART", &cac_eisa_l0 }, 112 { "CPQ4030", "SMART-2/E", &cac_l0 }, 113 }; 114 115 static int 116 cac_eisa_match(device_t parent, cfdata_t match, 117 void *aux) 118 { 119 struct eisa_attach_args *ea; 120 int i; 121 122 ea = aux; 123 124 for (i = 0; i < sizeof(cac_eisa_type) / sizeof(cac_eisa_type[0]); i++) 125 if (strcmp(ea->ea_idstring, cac_eisa_type[i].ct_prodstr) == 0) 126 return (1); 127 128 return (0); 129 } 130 131 static void 132 cac_eisa_attach(device_t parent, device_t self, void *aux) 133 { 134 struct eisa_attach_args *ea; 135 bus_space_handle_t ioh; 136 eisa_chipset_tag_t ec; 137 eisa_intr_handle_t ih; 138 struct cac_softc *sc; 139 bus_space_tag_t iot; 140 const char *intrstr; 141 int irq, i; 142 char intrbuf[EISA_INTRSTR_LEN]; 143 144 ea = aux; 145 sc = device_private(self); 146 iot = ea->ea_iot; 147 ec = ea->ea_ec; 148 149 if (bus_space_map(iot, EISA_SLOT_ADDR(ea->ea_slot) + 150 CAC_EISA_SLOT_OFFSET, CAC_EISA_IOSIZE, 0, &ioh)) { 151 printf("can't map i/o space\n"); 152 return; 153 } 154 155 sc->sc_dev = self; 156 sc->sc_iot = iot; 157 sc->sc_ioh = ioh; 158 sc->sc_dmat = ea->ea_dmat; 159 160 /* 161 * Map and establish the interrupt. 162 */ 163 switch (bus_space_read_1(iot, ioh, CAC_EISA_IOCONF) & 0xf0) { 164 case 0x20: 165 irq = 10; 166 break; 167 case 0x10: 168 irq = 11; 169 break; 170 case 0x40: 171 irq = 14; 172 break; 173 case 0x80: 174 irq = 15; 175 break; 176 default: 177 printf("controller on invalid IRQ\n"); 178 return; 179 } 180 181 if (eisa_intr_map(ec, irq, &ih)) { 182 printf("can't map interrupt (%d)\n", irq); 183 return; 184 } 185 186 intrstr = eisa_intr_string(ec, ih, intrbuf, sizeof(intrbuf)); 187 if ((sc->sc_ih = eisa_intr_establish(ec, ih, IST_LEVEL, IPL_BIO, 188 cac_intr, sc)) == NULL) { 189 printf("can't establish interrupt"); 190 if (intrstr != NULL) 191 printf(" at %s", intrstr); 192 printf("\n"); 193 return; 194 } 195 196 /* 197 * Print board type and attach to the bus-independent code. 198 */ 199 for (i = 0; i < sizeof(cac_eisa_type) / sizeof(cac_eisa_type[0]); i++) 200 if (strcmp(ea->ea_idstring, cac_eisa_type[i].ct_prodstr) == 0) 201 break; 202 203 printf(": Compaq %s\n", cac_eisa_type[i].ct_typestr); 204 memcpy(&sc->sc_cl, cac_eisa_type[i].ct_linkage, sizeof(sc->sc_cl)); 205 cac_init(sc, intrstr, 0); 206 } 207 208 /* 209 * Linkage specific to EISA boards. 210 */ 211 212 static int 213 cac_eisa_l0_fifo_full(struct cac_softc *sc) 214 { 215 216 return ((cac_inb(sc, CAC_EISAREG_SYSTEM_DOORBELL) & 217 CAC_EISA_CHANNEL_CLEAR) == 0); 218 } 219 220 static void 221 cac_eisa_l0_submit(struct cac_softc *sc, struct cac_ccb *ccb) 222 { 223 u_int16_t size; 224 225 /* 226 * On these boards, `ccb_hdr.size' is actually for control flags. 227 * Set it to zero and pass the value by means of an I/O port. 228 */ 229 size = le16toh(ccb->ccb_hdr.size) << 2; 230 ccb->ccb_hdr.size = 0; 231 232 bus_dmamap_sync(sc->sc_dmat, sc->sc_dmamap, 233 (char *)ccb - (char *)sc->sc_ccbs, 234 sizeof(struct cac_ccb), BUS_DMASYNC_PREWRITE | BUS_DMASYNC_PREREAD); 235 236 cac_outb(sc, CAC_EISAREG_SYSTEM_DOORBELL, CAC_EISA_CHANNEL_CLEAR); 237 cac_outl(sc, CAC_EISAREG_LIST_ADDR, ccb->ccb_paddr); 238 cac_outw(sc, CAC_EISAREG_LIST_LEN, size); 239 cac_outb(sc, CAC_EISAREG_LOCAL_DOORBELL, CAC_EISA_CHANNEL_BUSY); 240 } 241 242 static struct cac_ccb * 243 cac_eisa_l0_completed(struct cac_softc *sc) 244 { 245 struct cac_ccb *ccb; 246 u_int32_t off; 247 u_int8_t status; 248 249 if ((cac_inb(sc, CAC_EISAREG_SYSTEM_DOORBELL) & 250 CAC_EISA_CHANNEL_BUSY) == 0) 251 return (NULL); 252 253 cac_outb(sc, CAC_EISAREG_SYSTEM_DOORBELL, CAC_EISA_CHANNEL_BUSY); 254 off = cac_inl(sc, CAC_EISAREG_COMPLETE_ADDR); 255 status = cac_inb(sc, CAC_EISAREG_LIST_STATUS); 256 cac_outb(sc, CAC_EISAREG_LOCAL_DOORBELL, CAC_EISA_CHANNEL_CLEAR); 257 258 if (off == 0) 259 return (NULL); 260 261 off = (off & ~3) - sc->sc_ccbs_paddr; 262 ccb = (struct cac_ccb *)((char *)sc->sc_ccbs + off); 263 264 bus_dmamap_sync(sc->sc_dmat, sc->sc_dmamap, off, sizeof(struct cac_ccb), 265 BUS_DMASYNC_POSTWRITE | BUS_DMASYNC_POSTREAD); 266 267 ccb->ccb_req.error = status; 268 269 if ((off & 3) != 0 && ccb->ccb_req.error == 0) 270 ccb->ccb_req.error = CAC_RET_CMD_REJECTED; 271 272 return (ccb); 273 } 274 275 static int 276 cac_eisa_l0_intr_pending(struct cac_softc *sc) 277 { 278 279 return (cac_inb(sc, CAC_EISAREG_SYSTEM_DOORBELL) & 280 CAC_EISA_CHANNEL_BUSY); 281 } 282 283 static void 284 cac_eisa_l0_intr_enable(struct cac_softc *sc, int state) 285 { 286 287 if (state) { 288 cac_outb(sc, CAC_EISAREG_SYSTEM_DOORBELL, 289 ~CAC_EISA_CHANNEL_CLEAR); 290 cac_outb(sc, CAC_EISAREG_LOCAL_DOORBELL, 291 CAC_EISA_CHANNEL_BUSY); 292 cac_outb(sc, CAC_EISAREG_INTR_MASK, CAC_INTR_ENABLE); 293 cac_outb(sc, CAC_EISAREG_SYSTEM_MASK, CAC_INTR_ENABLE); 294 } else 295 cac_outb(sc, CAC_EISAREG_SYSTEM_MASK, CAC_INTR_DISABLE); 296 } 297