1 /* $NetBSD: hptide.c,v 1.24 2007/02/09 21:55:27 ad Exp $ */ 2 3 /* 4 * Copyright (c) 1999, 2000, 2001 Manuel Bouyer. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * 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 copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. All advertising materials mentioning features or use of this software 15 * must display the following acknowledgement: 16 * This product includes software developed by Manuel Bouyer. 17 * 4. The name of the author may not be used to endorse or promote products 18 * derived from this software without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 #include <sys/cdefs.h> 33 __KERNEL_RCSID(0, "$NetBSD: hptide.c,v 1.24 2007/02/09 21:55:27 ad Exp $"); 34 35 #include <sys/param.h> 36 #include <sys/systm.h> 37 38 #include <dev/pci/pcivar.h> 39 #include <dev/pci/pcidevs.h> 40 #include <dev/pci/pciidereg.h> 41 #include <dev/pci/pciidevar.h> 42 #include <dev/pci/pciide_hpt_reg.h> 43 44 static void hpt_chip_map(struct pciide_softc*, struct pci_attach_args*); 45 static void hpt_setup_channel(struct ata_channel*); 46 static int hpt_pci_intr(void *); 47 48 static int hptide_match(struct device *, struct cfdata *, void *); 49 static void hptide_attach(struct device *, struct device *, void *); 50 51 CFATTACH_DECL(hptide, sizeof(struct pciide_softc), 52 hptide_match, hptide_attach, NULL, NULL); 53 54 static const struct pciide_product_desc pciide_triones_products[] = { 55 { PCI_PRODUCT_TRIONES_HPT302, 56 0, 57 NULL, 58 hpt_chip_map 59 }, 60 { PCI_PRODUCT_TRIONES_HPT366, 61 0, 62 NULL, 63 hpt_chip_map, 64 }, 65 { PCI_PRODUCT_TRIONES_HPT371, 66 0, 67 NULL, 68 hpt_chip_map, 69 }, 70 { PCI_PRODUCT_TRIONES_HPT372A, 71 0, 72 NULL, 73 hpt_chip_map 74 }, 75 { PCI_PRODUCT_TRIONES_HPT374, 76 0, 77 NULL, 78 hpt_chip_map 79 }, 80 { 0, 81 0, 82 NULL, 83 NULL 84 } 85 }; 86 87 static int 88 hptide_match(struct device *parent, struct cfdata *match, 89 void *aux) 90 { 91 struct pci_attach_args *pa = aux; 92 93 if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_TRIONES) { 94 if (pciide_lookup_product(pa->pa_id, pciide_triones_products)) 95 return (2); 96 } 97 return (0); 98 } 99 100 static void 101 hptide_attach(struct device *parent, struct device *self, void *aux) 102 { 103 struct pci_attach_args *pa = aux; 104 struct pciide_softc *sc = (struct pciide_softc *)self; 105 106 pciide_common_attach(sc, pa, 107 pciide_lookup_product(pa->pa_id, pciide_triones_products)); 108 109 } 110 111 static void 112 hpt_chip_map(struct pciide_softc *sc, struct pci_attach_args *pa) 113 { 114 struct pciide_channel *cp; 115 int i, compatchan, revision; 116 pcireg_t interface; 117 bus_size_t cmdsize, ctlsize; 118 119 if (pciide_chipen(sc, pa) == 0) 120 return; 121 122 revision = PCI_REVISION(pa->pa_class); 123 aprint_normal("%s: Triones/Highpoint ", 124 sc->sc_wdcdev.sc_atac.atac_dev.dv_xname); 125 switch (sc->sc_pp->ide_product) { 126 case PCI_PRODUCT_TRIONES_HPT302: 127 aprint_normal("HPT302 IDE Controller\n"); 128 break; 129 case PCI_PRODUCT_TRIONES_HPT371: 130 aprint_normal("HPT371 IDE Controller\n"); 131 break; 132 case PCI_PRODUCT_TRIONES_HPT374: 133 aprint_normal("HPT374 IDE Controller\n"); 134 break; 135 case PCI_PRODUCT_TRIONES_HPT372A: 136 aprint_normal("HPT372A IDE Controller\n"); 137 break; 138 case PCI_PRODUCT_TRIONES_HPT366: 139 if (revision == HPT372_REV) 140 aprint_normal("HPT372 IDE Controller\n"); 141 else if (revision == HPT370_REV) 142 aprint_normal("HPT370 IDE Controller\n"); 143 else if (revision == HPT370A_REV) 144 aprint_normal("HPT370A IDE Controller\n"); 145 else if (revision == HPT368_REV) 146 aprint_normal("HPT368 IDE Controller\n"); 147 else if (revision == HPT366_REV) 148 aprint_normal("HPT366 IDE Controller\n"); 149 else 150 aprint_normal("unknown HPT IDE controller rev %d\n", 151 revision); 152 break; 153 default: 154 aprint_normal("unknown HPT IDE controller 0x%x\n", 155 sc->sc_pp->ide_product); 156 } 157 158 /* 159 * when the chip is in native mode it identifies itself as a 160 * 'misc mass storage'. Fake interface in this case. 161 */ 162 if (PCI_SUBCLASS(pa->pa_class) == PCI_SUBCLASS_MASS_STORAGE_IDE) { 163 interface = PCI_INTERFACE(pa->pa_class); 164 } else { 165 interface = PCIIDE_INTERFACE_BUS_MASTER_DMA | 166 PCIIDE_INTERFACE_PCI(0); 167 if ((sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT366 && 168 (revision == HPT368_REV || revision == HPT370_REV || revision == HPT370A_REV || 169 revision == HPT372_REV)) || 170 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT302 || 171 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT371 || 172 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT372A || 173 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT374) 174 interface |= PCIIDE_INTERFACE_PCI(1); 175 } 176 177 aprint_verbose("%s: bus-master DMA support present", 178 sc->sc_wdcdev.sc_atac.atac_dev.dv_xname); 179 pciide_mapreg_dma(sc, pa); 180 aprint_verbose("\n"); 181 sc->sc_wdcdev.sc_atac.atac_cap = ATAC_CAP_DATA16 | ATAC_CAP_DATA32; 182 if (sc->sc_dma_ok) { 183 sc->sc_wdcdev.sc_atac.atac_cap |= ATAC_CAP_DMA | ATAC_CAP_UDMA; 184 sc->sc_wdcdev.irqack = pciide_irqack; 185 } 186 sc->sc_wdcdev.sc_atac.atac_pio_cap = 4; 187 sc->sc_wdcdev.sc_atac.atac_dma_cap = 2; 188 189 sc->sc_wdcdev.sc_atac.atac_set_modes = hpt_setup_channel; 190 sc->sc_wdcdev.sc_atac.atac_channels = sc->wdc_chanarray; 191 if (sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT366 && 192 (revision == HPT366_REV || revision == HPT368_REV)) { 193 sc->sc_wdcdev.sc_atac.atac_nchannels = 1; 194 sc->sc_wdcdev.sc_atac.atac_udma_cap = 4; 195 } else { 196 sc->sc_wdcdev.sc_atac.atac_nchannels = 2; 197 if (sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT374 || 198 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT372A || 199 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT371 || 200 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT302 || 201 (sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT366 && 202 revision == HPT372_REV)) 203 sc->sc_wdcdev.sc_atac.atac_udma_cap = 6; 204 else 205 sc->sc_wdcdev.sc_atac.atac_udma_cap = 5; 206 } 207 208 wdc_allocate_regs(&sc->sc_wdcdev); 209 210 for (i = 0; i < sc->sc_wdcdev.sc_atac.atac_nchannels; i++) { 211 cp = &sc->pciide_channels[i]; 212 if (sc->sc_wdcdev.sc_atac.atac_nchannels > 1) { 213 compatchan = i; 214 if((pciide_pci_read(sc->sc_pc, sc->sc_tag, 215 HPT370_CTRL1(i)) & HPT370_CTRL1_EN) == 0) { 216 aprint_normal( 217 "%s: %s channel ignored (disabled)\n", 218 sc->sc_wdcdev.sc_atac.atac_dev.dv_xname, cp->name); 219 cp->ata_channel.ch_flags |= ATACH_DISABLED; 220 continue; 221 } 222 } else { 223 /* 224 * The 366 has 2 PCI IDE functions, one for primary and 225 * one for secondary. So we need to call 226 * pciide_mapregs_compat() with the real channel. 227 */ 228 if (pa->pa_function == 0) 229 compatchan = 0; 230 else if (pa->pa_function == 1) 231 compatchan = 1; 232 else { 233 aprint_error("%s: unexpected PCI function %d\n", 234 sc->sc_wdcdev.sc_atac.atac_dev.dv_xname, pa->pa_function); 235 return; 236 } 237 } 238 if (pciide_chansetup(sc, i, interface) == 0) 239 continue; 240 if (interface & PCIIDE_INTERFACE_PCI(i)) { 241 pciide_mapregs_native(pa, cp, &cmdsize, 242 &ctlsize, hpt_pci_intr); 243 } else { 244 pciide_mapregs_compat(pa, cp, compatchan, 245 &cmdsize, &ctlsize); 246 if ((cp->ata_channel.ch_flags & ATACH_DISABLED) == 0) 247 pciide_map_compat_intr(pa, cp, 248 sc->sc_cy_compatchan); 249 } 250 wdcattach(&cp->ata_channel); 251 } 252 if ((sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT366 && 253 (revision == HPT368_REV || revision == HPT370_REV || revision == HPT370A_REV || 254 revision == HPT372_REV)) || 255 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT302 || 256 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT371 || 257 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT372A || 258 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT374) { 259 /* 260 * HPT370_REV and highter has a bit to disable interrupts, 261 * make sure to clear it 262 */ 263 pciide_pci_write(sc->sc_pc, sc->sc_tag, HPT_CSEL, 264 pciide_pci_read(sc->sc_pc, sc->sc_tag, HPT_CSEL) & 265 ~HPT_CSEL_IRQDIS); 266 } 267 /* set clocks, etc (mandatory on 372/4, optional otherwise) */ 268 if ((sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT366 && 269 revision == HPT372_REV ) || 270 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT302 || 271 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT371 || 272 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT372A || 273 sc->sc_pp->ide_product == PCI_PRODUCT_TRIONES_HPT374) 274 pciide_pci_write(sc->sc_pc, sc->sc_tag, HPT_SC2, 275 (pciide_pci_read(sc->sc_pc, sc->sc_tag, HPT_SC2) & 276 HPT_SC2_MAEN) | HPT_SC2_OSC_EN); 277 return; 278 } 279 280 static void 281 hpt_setup_channel(struct ata_channel *chp) 282 { 283 struct ata_drive_datas *drvp; 284 int drive, s; 285 int cable; 286 u_int32_t before, after; 287 u_int32_t idedma_ctl; 288 struct pciide_channel *cp = CHAN_TO_PCHAN(chp); 289 struct pciide_softc *sc = CHAN_TO_PCIIDE(chp); 290 int revision = 291 PCI_REVISION(pci_conf_read(sc->sc_pc, sc->sc_tag, PCI_CLASS_REG)); 292 const u_int32_t *tim_pio, *tim_dma, *tim_udma; 293 294 cable = pciide_pci_read(sc->sc_pc, sc->sc_tag, HPT_CSEL); 295 296 /* setup DMA if needed */ 297 pciide_channel_dma_setup(cp); 298 299 idedma_ctl = 0; 300 301 /* select the timing arrays for the chip */ 302 switch (sc->sc_pp->ide_product) { 303 case PCI_PRODUCT_TRIONES_HPT374: 304 tim_udma = hpt374_udma; 305 tim_dma = hpt374_dma; 306 tim_pio = hpt374_pio; 307 break; 308 case PCI_PRODUCT_TRIONES_HPT302: 309 case PCI_PRODUCT_TRIONES_HPT371: 310 case PCI_PRODUCT_TRIONES_HPT372A: 311 tim_udma = hpt372_udma; 312 tim_dma = hpt372_dma; 313 tim_pio = hpt372_pio; 314 break; 315 case PCI_PRODUCT_TRIONES_HPT366: 316 default: 317 switch (revision) { 318 case HPT372_REV: 319 tim_udma = hpt372_udma; 320 tim_dma = hpt372_dma; 321 tim_pio = hpt372_pio; 322 break; 323 case HPT370_REV: 324 case HPT370A_REV: 325 tim_udma = hpt370_udma; 326 tim_dma = hpt370_dma; 327 tim_pio = hpt370_pio; 328 break; 329 case HPT368_REV: 330 case HPT366_REV: 331 default: 332 tim_udma = hpt366_udma; 333 tim_dma = hpt366_dma; 334 tim_pio = hpt366_pio; 335 break; 336 } 337 } 338 339 /* Per drive settings */ 340 for (drive = 0; drive < chp->ch_ndrive; drive++) { 341 drvp = &chp->ch_drive[drive]; 342 /* If no drive, skip */ 343 if ((drvp->drive_flags & DRIVE) == 0) 344 continue; 345 before = pci_conf_read(sc->sc_pc, sc->sc_tag, 346 HPT_IDETIM(chp->ch_channel, drive)); 347 348 /* add timing values, setup DMA if needed */ 349 if (drvp->drive_flags & DRIVE_UDMA) { 350 /* use Ultra/DMA */ 351 s = splbio(); 352 drvp->drive_flags &= ~DRIVE_DMA; 353 splx(s); 354 if ((cable & HPT_CSEL_CBLID(chp->ch_channel)) != 0 && 355 drvp->UDMA_mode > 2) 356 drvp->UDMA_mode = 2; 357 after = tim_udma[drvp->UDMA_mode]; 358 idedma_ctl |= IDEDMA_CTL_DRV_DMA(drive); 359 } else if (drvp->drive_flags & DRIVE_DMA) { 360 /* 361 * use Multiword DMA. 362 * Timings will be used for both PIO and DMA, so adjust 363 * DMA mode if needed 364 */ 365 if (drvp->PIO_mode >= 3 && 366 (drvp->DMA_mode + 2) > drvp->PIO_mode) { 367 drvp->DMA_mode = drvp->PIO_mode - 2; 368 } 369 after = tim_dma[drvp->DMA_mode]; 370 idedma_ctl |= IDEDMA_CTL_DRV_DMA(drive); 371 } else { 372 /* PIO only */ 373 after = tim_pio[drvp->PIO_mode]; 374 } 375 pci_conf_write(sc->sc_pc, sc->sc_tag, 376 HPT_IDETIM(chp->ch_channel, drive), after); 377 ATADEBUG_PRINT(("%s: bus speed register set to 0x%08x " 378 "(BIOS 0x%08x)\n", drvp->drv_softc->dv_xname, 379 after, before), DEBUG_PROBE); 380 } 381 if (idedma_ctl != 0) { 382 /* Add software bits in status register */ 383 bus_space_write_1(sc->sc_dma_iot, cp->dma_iohs[IDEDMA_CTL], 0, 384 idedma_ctl); 385 } 386 } 387 388 static int 389 hpt_pci_intr(void *arg) 390 { 391 struct pciide_softc *sc = arg; 392 struct pciide_channel *cp; 393 struct ata_channel *wdc_cp; 394 int rv = 0; 395 int dmastat, i, crv; 396 397 for (i = 0; i < sc->sc_wdcdev.sc_atac.atac_nchannels; i++) { 398 cp = &sc->pciide_channels[i]; 399 dmastat = bus_space_read_1(sc->sc_dma_iot, 400 cp->dma_iohs[IDEDMA_CTL], 0); 401 if((dmastat & ( IDEDMA_CTL_ACT | IDEDMA_CTL_INTR)) != 402 IDEDMA_CTL_INTR) 403 continue; 404 wdc_cp = &cp->ata_channel; 405 crv = wdcintr(wdc_cp); 406 if (crv == 0) { 407 printf("%s:%d: bogus intr\n", 408 sc->sc_wdcdev.sc_atac.atac_dev.dv_xname, i); 409 bus_space_write_1(sc->sc_dma_iot, 410 cp->dma_iohs[IDEDMA_CTL], 0, dmastat); 411 } else 412 rv = 1; 413 } 414 return rv; 415 } 416