Home | History | Annotate | Line # | Download | only in dev
kauai.c revision 1.33
      1 /*	$NetBSD: kauai.c,v 1.33 2012/07/31 15:50:33 bouyer Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2003 Tsubai Masanari.  All rights reserved.
      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. The name of the author may not be used to endorse or promote products
     15  *    derived from this software without specific prior written permission.
     16  *
     17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
     26  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     27  */
     28 
     29 #include <sys/cdefs.h>
     30 __KERNEL_RCSID(0, "$NetBSD: kauai.c,v 1.33 2012/07/31 15:50:33 bouyer Exp $");
     31 
     32 #include <sys/param.h>
     33 #include <sys/systm.h>
     34 #include <sys/device.h>
     35 #include <sys/malloc.h>
     36 
     37 #include <uvm/uvm_extern.h>
     38 
     39 #include <sys/bus.h>
     40 #include <machine/pio.h>
     41 
     42 #include <dev/ata/atareg.h>
     43 #include <dev/ata/atavar.h>
     44 #include <dev/ic/wdcvar.h>
     45 
     46 #include <dev/ofw/openfirm.h>
     47 
     48 #include <dev/pci/pcivar.h>
     49 #include <dev/pci/pcireg.h>
     50 #include <dev/pci/pcidevs.h>
     51 
     52 #include <macppc/dev/dbdma.h>
     53 
     54 #define WDC_REG_NPORTS		8
     55 #define WDC_AUXREG_OFFSET	0x16
     56 #define WDC_AUXREG_NPORTS	1
     57 
     58 #define PIO_CONFIG_REG	0x200	/* PIO and DMA access timing */
     59 #define DMA_CONFIG_REG	0x210	/* UDMA access timing */
     60 
     61 struct kauai_softc {
     62 	struct wdc_softc sc_wdcdev;
     63 	struct ata_channel *sc_chanptr;
     64 	struct ata_channel sc_channel;
     65 	struct wdc_regs sc_wdc_regs;
     66 	struct ata_queue sc_queue;
     67 	dbdma_regmap_t *sc_dmareg;
     68 	dbdma_command_t	*sc_dmacmd;
     69 	u_int sc_piotiming_r[2];
     70 	u_int sc_piotiming_w[2];
     71 	u_int sc_dmatiming_r[2];
     72 	u_int sc_dmatiming_w[2];
     73 	void (*sc_calc_timing)(struct kauai_softc *, int);
     74 };
     75 
     76 static int kauai_match(device_t, cfdata_t, void *);
     77 static void kauai_attach(device_t, device_t, void *);
     78 static int kauai_dma_init(void *, int, int, void *, size_t, int);
     79 static void kauai_dma_start(void *, int, int);
     80 static int kauai_dma_finish(void *, int, int, int);
     81 static void kauai_set_modes(struct ata_channel *);
     82 static void calc_timing_kauai(struct kauai_softc *, int);
     83 
     84 CFATTACH_DECL_NEW(kauai, sizeof(struct kauai_softc),
     85     kauai_match, kauai_attach, NULL, NULL);
     86 
     87 int
     88 kauai_match(device_t parent, cfdata_t match, void *aux)
     89 {
     90 	struct pci_attach_args *pa = aux;
     91 
     92 	if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_APPLE) {
     93 		switch (PCI_PRODUCT(pa->pa_id)) {
     94 		case PCI_PRODUCT_APPLE_KAUAI:
     95 		case PCI_PRODUCT_APPLE_UNINORTH_ATA:
     96 		case PCI_PRODUCT_APPLE_INTREPID2_ATA:
     97 		case PCI_PRODUCT_APPLE_SHASTA_ATA:
     98 		    return 5;
     99 		}
    100 	}
    101 
    102 	return 0;
    103 }
    104 
    105 void
    106 kauai_attach(device_t parent, device_t self, void *aux)
    107 {
    108 	struct kauai_softc *sc = device_private(self);
    109 	struct pci_attach_args *pa = aux;
    110 	struct ata_channel *chp = &sc->sc_channel;
    111 	struct wdc_regs *wdr;
    112 	pci_intr_handle_t ih;
    113 	paddr_t regbase, dmabase;
    114 	int node, reg[5], i;
    115 
    116 	sc->sc_wdcdev.sc_atac.atac_dev = self;
    117 
    118 	sc->sc_dmacmd = dbdma_alloc(sizeof(dbdma_command_t) * 20);
    119 
    120 	node = pcidev_to_ofdev(pa->pa_pc, pa->pa_tag);
    121 	if (node == 0) {
    122 		aprint_error(": cannot find kauai node\n");
    123 		return;
    124 	}
    125 
    126 	if (OF_getprop(node, "assigned-addresses", reg, sizeof reg) < 12) {
    127 		aprint_error(": cannot get address property\n");
    128 		return;
    129 	}
    130 	regbase = reg[2] + 0x2000;
    131 	dmabase = reg[2] + 0x1000;
    132 
    133 	/*
    134 	 * XXX PCI_INTERRUPT_REG seems to be wired to 0.
    135 	 * XXX So use fixed intrpin and intrline values.
    136 	 */
    137 	if (pci_conf_read(pa->pa_pc, pa->pa_tag, PCI_INTERRUPT_REG) == 0) {
    138 		pa->pa_intrpin = 1;
    139 		pa->pa_intrline = 39;
    140 	}
    141 
    142 	if (pci_intr_map(pa, &ih)) {
    143 		aprint_error(": unable to map interrupt\n");
    144 		return;
    145 	}
    146 	aprint_normal(": interrupting at %s\n", pci_intr_string(pa->pa_pc, ih));
    147 
    148 	sc->sc_wdcdev.regs = wdr = &sc->sc_wdc_regs;
    149 
    150 	wdr->cmd_iot = wdr->ctl_iot = pa->pa_memt;
    151 
    152 	if (bus_space_map(wdr->cmd_iot, regbase, WDC_REG_NPORTS << 4, 0,
    153 	    &wdr->cmd_baseioh) ||
    154 	    bus_space_subregion(wdr->cmd_iot, wdr->cmd_baseioh,
    155 			WDC_AUXREG_OFFSET << 4, 1, &wdr->ctl_ioh)) {
    156 		aprint_error_dev(self, "couldn't map registers\n");
    157 		return;
    158 	}
    159 	for (i = 0; i < WDC_NREG; i++) {
    160 		if (bus_space_subregion(wdr->cmd_iot, wdr->cmd_baseioh, i << 4,
    161 		    i == 0 ? 4 : 1, &wdr->cmd_iohs[i]) != 0) {
    162 			bus_space_unmap(wdr->cmd_iot, wdr->cmd_baseioh,
    163 			    WDC_REG_NPORTS << 4);
    164 			aprint_error_dev(self,
    165 			    "couldn't subregion registers\n");
    166 			return;
    167 		}
    168 	}
    169 
    170 	if (pci_intr_establish(pa->pa_pc, ih, IPL_BIO, wdcintr, chp) == NULL) {
    171 		aprint_error_dev(self, "unable to establish interrupt\n");
    172 		return;
    173 	}
    174 
    175 
    176 	sc->sc_wdcdev.sc_atac.atac_pio_cap = 4;
    177 	sc->sc_wdcdev.sc_atac.atac_dma_cap = 2;
    178 	sc->sc_wdcdev.sc_atac.atac_udma_cap = 5;
    179 	sc->sc_wdcdev.sc_atac.atac_cap |= ATAC_CAP_DATA16;
    180 	sc->sc_wdcdev.sc_atac.atac_cap |= ATAC_CAP_DMA | ATAC_CAP_UDMA;
    181 	sc->sc_chanptr = chp;
    182 	sc->sc_wdcdev.sc_atac.atac_channels = &sc->sc_chanptr;
    183 	sc->sc_wdcdev.sc_atac.atac_nchannels = 1;
    184 	sc->sc_wdcdev.wdc_maxdrives = 2;
    185 	sc->sc_wdcdev.dma_arg = sc;
    186 	sc->sc_wdcdev.dma_init = kauai_dma_init;
    187 	sc->sc_wdcdev.dma_start = kauai_dma_start;
    188 	sc->sc_wdcdev.dma_finish = kauai_dma_finish;
    189 	sc->sc_wdcdev.sc_atac.atac_set_modes = kauai_set_modes;
    190 	sc->sc_calc_timing = calc_timing_kauai;
    191 	sc->sc_dmareg = (void *)dmabase;
    192 
    193 	chp->ch_channel = 0;
    194 	chp->ch_atac = &sc->sc_wdcdev.sc_atac;
    195 	chp->ch_queue = &sc->sc_queue;
    196 	wdc_init_shadow_regs(chp);
    197 
    198 	wdcattach(chp);
    199 }
    200 
    201 void
    202 kauai_set_modes(struct ata_channel *chp)
    203 {
    204 	struct kauai_softc *sc = (void *)chp->ch_atac;
    205 	struct wdc_regs *wdr = CHAN_TO_WDC_REGS(chp);
    206 	struct ata_drive_datas *drvp0 = &chp->ch_drive[0];
    207 	struct ata_drive_datas *drvp1 = &chp->ch_drive[1];
    208 	struct ata_drive_datas *drvp;
    209 	int drive;
    210 
    211 	if (drvp0->drive_type != ATA_DRIVET_NONE &&
    212 	    drvp1->drive_type != ATA_DRIVET_NONE) {
    213 		drvp0->PIO_mode = drvp1->PIO_mode =
    214 		    min(drvp0->PIO_mode, drvp1->PIO_mode);
    215 	}
    216 
    217 	for (drive = 0; drive < 2; drive++) {
    218 		drvp = &chp->ch_drive[drive];
    219 		if (drvp->drive_type !=  ATA_DRIVET_NONE) {
    220 			(*sc->sc_calc_timing)(sc, drive);
    221 			bus_space_write_4(wdr->cmd_iot, wdr->cmd_baseioh,
    222 			    PIO_CONFIG_REG, sc->sc_piotiming_r[drive]);
    223 			bus_space_write_4(wdr->cmd_iot, wdr->cmd_baseioh,
    224 			    DMA_CONFIG_REG, sc->sc_dmatiming_r[drive]);
    225 		}
    226 	}
    227 }
    228 
    229 /*
    230  * IDE transfer timings
    231  */
    232 static const u_int pio_timing_kauai[] = {	/* 0xff000fff */
    233 	0x08000a92,	/* Mode 0 */
    234 	0x0800060f,	/*      1 */
    235 	0x0800038b,	/*      2 */
    236 	0x05000249,	/*      3 */
    237 	0x04000148	/*      4 */
    238 };
    239 static const u_int dma_timing_kauai[] = {	/* 0x00fff000 */
    240 	0x00618000,	/* Mode 0 */
    241 	0x00209000,	/*      1 */
    242 	0x00148000	/*      2 */
    243 };
    244 static const u_int udma_timing_kauai[] = {	/* 0x0000ffff */
    245 	0x000070c0,	/* Mode 0 */
    246 	0x00005d80,	/*      1 */
    247 	0x00004a60,	/*      2 */
    248 	0x00003a50,	/*      3 */
    249 	0x00002a30,	/*      4 */
    250 	0x00002921	/*      5 */
    251 };
    252 
    253 /*
    254  * Timing calculation for Kauai.
    255  */
    256 void
    257 calc_timing_kauai(struct kauai_softc *sc, int drive)
    258 {
    259 	struct ata_channel *chp = &sc->sc_channel;
    260 	struct ata_drive_datas *drvp = &chp->ch_drive[drive];
    261 	int piomode = drvp->PIO_mode;
    262 	int dmamode = drvp->DMA_mode;
    263 	int udmamode = drvp->UDMA_mode;
    264 	u_int pioconf, dmaconf;
    265 
    266 	pioconf = pio_timing_kauai[piomode];
    267 
    268 	dmaconf = 0;
    269 	if (drvp->drive_flags & ATA_DRIVE_DMA)
    270 		dmaconf |= dma_timing_kauai[dmamode];
    271 	if (drvp->drive_flags & ATA_DRIVE_UDMA)
    272 		dmaconf |= udma_timing_kauai[udmamode];
    273 
    274 	if (drvp->drive_flags & ATA_DRIVE_UDMA)
    275 		dmaconf |= 1;
    276 
    277 	sc->sc_piotiming_r[drive] = sc->sc_piotiming_w[drive] = pioconf;
    278 	sc->sc_dmatiming_r[drive] = sc->sc_dmatiming_w[drive] = dmaconf;
    279 }
    280 
    281 int
    282 kauai_dma_init(void *v, int channel, int drive, void *databuf,
    283 	size_t datalen, int flags)
    284 {
    285 	struct kauai_softc *sc = v;
    286 	dbdma_command_t *cmdp = sc->sc_dmacmd;
    287 	struct ata_channel *chp = &sc->sc_channel;
    288 	struct wdc_regs *wdr = CHAN_TO_WDC_REGS(chp);
    289 	vaddr_t va = (vaddr_t)databuf;
    290 	int read = flags & WDC_DMA_READ;
    291 	int cmd = read ? DBDMA_CMD_IN_MORE : DBDMA_CMD_OUT_MORE;
    292 	u_int offset;
    293 
    294 	bus_space_write_4(wdr->cmd_iot, wdr->cmd_baseioh, DMA_CONFIG_REG,
    295 	    read ? sc->sc_dmatiming_r[drive] : sc->sc_dmatiming_w[drive]);
    296 	bus_space_read_4(wdr->cmd_iot, wdr->cmd_baseioh, DMA_CONFIG_REG);
    297 
    298 	offset = va & PGOFSET;
    299 
    300 	/* if va is not page-aligned, setup the first page */
    301 	if (offset != 0) {
    302 		int rest = PAGE_SIZE - offset;	/* the rest of the page */
    303 
    304 		if (datalen > rest) {		/* if continues to next page */
    305 			DBDMA_BUILD(cmdp, cmd, 0, rest, vtophys(va),
    306 				DBDMA_INT_NEVER, DBDMA_WAIT_NEVER,
    307 				DBDMA_BRANCH_NEVER);
    308 			datalen -= rest;
    309 			va += rest;
    310 			cmdp++;
    311 		}
    312 	}
    313 
    314 	/* now va is page-aligned */
    315 	while (datalen > PAGE_SIZE) {
    316 		DBDMA_BUILD(cmdp, cmd, 0, PAGE_SIZE, vtophys(va),
    317 			DBDMA_INT_NEVER, DBDMA_WAIT_NEVER, DBDMA_BRANCH_NEVER);
    318 		datalen -= PAGE_SIZE;
    319 		va += PAGE_SIZE;
    320 		cmdp++;
    321 	}
    322 
    323 	/* the last page (datalen <= PAGE_SIZE here) */
    324 	cmd = read ? DBDMA_CMD_IN_LAST : DBDMA_CMD_OUT_LAST;
    325 	DBDMA_BUILD(cmdp, cmd, 0, datalen, vtophys(va),
    326 		DBDMA_INT_NEVER, DBDMA_WAIT_NEVER, DBDMA_BRANCH_NEVER);
    327 	cmdp++;
    328 
    329 	DBDMA_BUILD(cmdp, DBDMA_CMD_STOP, 0, 0, 0,
    330 		DBDMA_INT_NEVER, DBDMA_WAIT_NEVER, DBDMA_BRANCH_NEVER);
    331 
    332 	return 0;
    333 }
    334 
    335 void
    336 kauai_dma_start(void *v, int channel, int drive)
    337 {
    338 	struct kauai_softc *sc = v;
    339 
    340 	dbdma_start(sc->sc_dmareg, sc->sc_dmacmd);
    341 }
    342 
    343 int
    344 kauai_dma_finish(void *v, int channel, int drive, int read)
    345 {
    346 	struct kauai_softc *sc = v;
    347 
    348 	dbdma_stop(sc->sc_dmareg);
    349 	return 0;
    350 }
    351