acardide.c revision 1.10 1 /* $NetBSD: acardide.c,v 1.10 2004/08/13 03:12:59 thorpej Exp $ */
2
3 /*
4 * Copyright (c) 2001 Izumi Tsutsui.
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 OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 */
28
29 #include <sys/param.h>
30 #include <sys/systm.h>
31
32 #include <dev/pci/pcivar.h>
33 #include <dev/pci/pcidevs.h>
34 #include <dev/pci/pciidereg.h>
35 #include <dev/pci/pciidevar.h>
36 #include <dev/pci/pciide_acard_reg.h>
37
38 static void acard_chip_map(struct pciide_softc*, struct pci_attach_args*);
39 static void acard_setup_channel(struct wdc_channel*);
40 #if 0 /* XXX !! */
41 static int acard_pci_intr(void *);
42 #endif
43
44 static int acardide_match(struct device *, struct cfdata *, void *);
45 static void acardide_attach(struct device *, struct device *, void *);
46
47 CFATTACH_DECL(acardide, sizeof(struct pciide_softc),
48 acardide_match, acardide_attach, NULL, NULL);
49
50 static const struct pciide_product_desc pciide_acard_products[] = {
51 { PCI_PRODUCT_ACARD_ATP850U,
52 0,
53 "Acard ATP850U Ultra33 IDE Controller",
54 acard_chip_map,
55 },
56 { PCI_PRODUCT_ACARD_ATP860,
57 0,
58 "Acard ATP860 Ultra66 IDE Controller",
59 acard_chip_map,
60 },
61 { PCI_PRODUCT_ACARD_ATP860A,
62 0,
63 "Acard ATP860-A Ultra66 IDE Controller",
64 acard_chip_map,
65 },
66 { PCI_PRODUCT_ACARD_ATP865,
67 0,
68 "Acard ATP865 Ultra100 IDE Controller",
69 acard_chip_map,
70 },
71 { PCI_PRODUCT_ACARD_ATP865A,
72 0,
73 "Acard ATP865-A Ultra100 IDE Controller",
74 acard_chip_map,
75 },
76 { 0,
77 0,
78 NULL,
79 NULL
80 }
81 };
82
83 static int
84 acardide_match(struct device *parent, struct cfdata *match, void *aux)
85 {
86 struct pci_attach_args *pa = aux;
87
88 if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_ACARD) {
89 if (pciide_lookup_product(pa->pa_id, pciide_acard_products))
90 return (2);
91 }
92 return (0);
93 }
94
95 static void
96 acardide_attach(struct device *parent, struct device *self, void *aux)
97 {
98 struct pci_attach_args *pa = aux;
99 struct pciide_softc *sc = (struct pciide_softc *)self;
100
101 pciide_common_attach(sc, pa,
102 pciide_lookup_product(pa->pa_id, pciide_acard_products));
103
104 }
105
106 #define ACARD_IS_850(sc) \
107 ((sc)->sc_pp->ide_product == PCI_PRODUCT_ACARD_ATP850U)
108
109 static void
110 acard_chip_map(struct pciide_softc *sc, struct pci_attach_args *pa)
111 {
112 struct pciide_channel *cp;
113 int i;
114 pcireg_t interface;
115 bus_size_t cmdsize, ctlsize;
116
117 if (pciide_chipen(sc, pa) == 0)
118 return;
119
120 /*
121 * when the chip is in native mode it identifies itself as a
122 * 'misc mass storage'. Fake interface in this case.
123 */
124 if (PCI_SUBCLASS(pa->pa_class) == PCI_SUBCLASS_MASS_STORAGE_IDE) {
125 interface = PCI_INTERFACE(pa->pa_class);
126 } else {
127 interface = PCIIDE_INTERFACE_BUS_MASTER_DMA |
128 PCIIDE_INTERFACE_PCI(0) | PCIIDE_INTERFACE_PCI(1);
129 }
130
131 aprint_normal("%s: bus-master DMA support present",
132 sc->sc_wdcdev.sc_dev.dv_xname);
133 pciide_mapreg_dma(sc, pa);
134 aprint_normal("\n");
135 sc->sc_wdcdev.cap = WDC_CAPABILITY_DATA16 | WDC_CAPABILITY_DATA32;
136
137 if (sc->sc_dma_ok) {
138 sc->sc_wdcdev.cap |= WDC_CAPABILITY_DMA | WDC_CAPABILITY_UDMA;
139 sc->sc_wdcdev.irqack = pciide_irqack;
140 }
141 sc->sc_wdcdev.PIO_cap = 4;
142 sc->sc_wdcdev.DMA_cap = 2;
143 switch (sc->sc_pp->ide_product) {
144 case PCI_PRODUCT_ACARD_ATP860:
145 case PCI_PRODUCT_ACARD_ATP860A:
146 sc->sc_wdcdev.UDMA_cap = 4;
147 break;
148 case PCI_PRODUCT_ACARD_ATP865:
149 case PCI_PRODUCT_ACARD_ATP865A:
150 sc->sc_wdcdev.UDMA_cap = 5;
151 break;
152 default:
153 sc->sc_wdcdev.UDMA_cap = 2;
154 break;
155 }
156
157 sc->sc_wdcdev.set_modes = acard_setup_channel;
158 sc->sc_wdcdev.channels = sc->wdc_chanarray;
159 sc->sc_wdcdev.nchannels = 2;
160
161 for (i = 0; i < sc->sc_wdcdev.nchannels; i++) {
162 cp = &sc->pciide_channels[i];
163 if (pciide_chansetup(sc, i, interface) == 0)
164 continue;
165 pciide_mapchan(pa, cp, interface, &cmdsize, &ctlsize,
166 pciide_pci_intr);
167 }
168 if (!ACARD_IS_850(sc)) {
169 u_int32_t reg;
170 reg = pci_conf_read(sc->sc_pc, sc->sc_tag, ATP8x0_CTRL);
171 reg &= ~ATP860_CTRL_INT;
172 pci_conf_write(sc->sc_pc, sc->sc_tag, ATP8x0_CTRL, reg);
173 }
174 }
175
176 static void
177 acard_setup_channel(struct wdc_channel *chp)
178 {
179 struct ata_drive_datas *drvp;
180 struct pciide_channel *cp = (struct pciide_channel*)chp;
181 struct pciide_softc *sc = (struct pciide_softc *)cp->wdc_channel.ch_wdc;
182 struct wdc_softc *wdc = &sc->sc_wdcdev;
183 int channel = chp->ch_channel;
184 int drive;
185 u_int32_t idetime, udma_mode;
186 u_int32_t idedma_ctl;
187
188 /* setup DMA if needed */
189 pciide_channel_dma_setup(cp);
190
191 if (ACARD_IS_850(sc)) {
192 idetime = 0;
193 udma_mode = pci_conf_read(sc->sc_pc, sc->sc_tag, ATP850_UDMA);
194 udma_mode &= ~ATP850_UDMA_MASK(channel);
195 } else {
196 idetime = pci_conf_read(sc->sc_pc, sc->sc_tag, ATP860_IDETIME);
197 idetime &= ~ATP860_SETTIME_MASK(channel);
198 udma_mode = pci_conf_read(sc->sc_pc, sc->sc_tag, ATP860_UDMA);
199 udma_mode &= ~ATP860_UDMA_MASK(channel);
200
201 /* check 80 pins cable */
202 if ((chp->ch_drive[0].drive_flags & DRIVE_UDMA) ||
203 (chp->ch_drive[1].drive_flags & DRIVE_UDMA)) {
204 if (pci_conf_read(sc->sc_pc, sc->sc_tag, ATP8x0_CTRL)
205 & ATP860_CTRL_80P(chp->ch_channel)) {
206 if (chp->ch_drive[0].UDMA_mode > 2)
207 chp->ch_drive[0].UDMA_mode = 2;
208 if (chp->ch_drive[1].UDMA_mode > 2)
209 chp->ch_drive[1].UDMA_mode = 2;
210 }
211 }
212 }
213
214 idedma_ctl = 0;
215
216 /* Per drive settings */
217 for (drive = 0; drive < 2; drive++) {
218 drvp = &chp->ch_drive[drive];
219 /* If no drive, skip */
220 if ((drvp->drive_flags & DRIVE) == 0)
221 continue;
222 /* add timing values, setup DMA if needed */
223 if ((wdc->cap & WDC_CAPABILITY_UDMA) &&
224 (drvp->drive_flags & DRIVE_UDMA)) {
225 /* use Ultra/DMA */
226 if (ACARD_IS_850(sc)) {
227 idetime |= ATP850_SETTIME(drive,
228 acard_act_udma[drvp->UDMA_mode],
229 acard_rec_udma[drvp->UDMA_mode]);
230 udma_mode |= ATP850_UDMA_MODE(channel, drive,
231 acard_udma_conf[drvp->UDMA_mode]);
232 } else {
233 idetime |= ATP860_SETTIME(channel, drive,
234 acard_act_udma[drvp->UDMA_mode],
235 acard_rec_udma[drvp->UDMA_mode]);
236 udma_mode |= ATP860_UDMA_MODE(channel, drive,
237 acard_udma_conf[drvp->UDMA_mode]);
238 }
239 idedma_ctl |= IDEDMA_CTL_DRV_DMA(drive);
240 } else if ((wdc->cap & WDC_CAPABILITY_DMA) &&
241 (drvp->drive_flags & DRIVE_DMA)) {
242 /* use Multiword DMA */
243 drvp->drive_flags &= ~DRIVE_UDMA;
244 if (ACARD_IS_850(sc)) {
245 idetime |= ATP850_SETTIME(drive,
246 acard_act_dma[drvp->DMA_mode],
247 acard_rec_dma[drvp->DMA_mode]);
248 } else {
249 idetime |= ATP860_SETTIME(channel, drive,
250 acard_act_dma[drvp->DMA_mode],
251 acard_rec_dma[drvp->DMA_mode]);
252 }
253 idedma_ctl |= IDEDMA_CTL_DRV_DMA(drive);
254 } else {
255 /* PIO only */
256 drvp->drive_flags &= ~(DRIVE_UDMA | DRIVE_DMA);
257 if (ACARD_IS_850(sc)) {
258 idetime |= ATP850_SETTIME(drive,
259 acard_act_pio[drvp->PIO_mode],
260 acard_rec_pio[drvp->PIO_mode]);
261 } else {
262 idetime |= ATP860_SETTIME(channel, drive,
263 acard_act_pio[drvp->PIO_mode],
264 acard_rec_pio[drvp->PIO_mode]);
265 }
266 pci_conf_write(sc->sc_pc, sc->sc_tag, ATP8x0_CTRL,
267 pci_conf_read(sc->sc_pc, sc->sc_tag, ATP8x0_CTRL)
268 | ATP8x0_CTRL_EN(channel));
269 }
270 }
271
272 if (idedma_ctl != 0) {
273 /* Add software bits in status register */
274 bus_space_write_1(sc->sc_dma_iot, cp->dma_iohs[IDEDMA_CTL], 0,
275 idedma_ctl);
276 }
277
278 if (ACARD_IS_850(sc)) {
279 pci_conf_write(sc->sc_pc, sc->sc_tag,
280 ATP850_IDETIME(channel), idetime);
281 pci_conf_write(sc->sc_pc, sc->sc_tag, ATP850_UDMA, udma_mode);
282 } else {
283 pci_conf_write(sc->sc_pc, sc->sc_tag, ATP860_IDETIME, idetime);
284 pci_conf_write(sc->sc_pc, sc->sc_tag, ATP860_UDMA, udma_mode);
285 }
286 }
287
288 #if 0 /* XXX !! */
289 static int
290 acard_pci_intr(void *arg)
291 {
292 struct pciide_softc *sc = arg;
293 struct pciide_channel *cp;
294 struct wdc_channel *wdc_cp;
295 int rv = 0;
296 int dmastat, i, crv;
297
298 for (i = 0; i < sc->sc_wdcdev.nchannels; i++) {
299 cp = &sc->pciide_channels[i];
300 dmastat = bus_space_read_1(sc->sc_dma_iot,
301 cp->dma_iohs[IDEDMA_CTL], 0);
302 if ((dmastat & IDEDMA_CTL_INTR) == 0)
303 continue;
304 wdc_cp = &cp->wdc_channel;
305 if ((wdc_cp->ch_flags & WDCF_IRQ_WAIT) == 0) {
306 (void)wdcintr(wdc_cp);
307 bus_space_write_1(sc->sc_dma_iot,
308 cp->dma_iohs[IDEDMA_CTL], 0, dmastat);
309 continue;
310 }
311 crv = wdcintr(wdc_cp);
312 if (crv == 0) {
313 printf("%s:%d: bogus intr\n",
314 sc->sc_wdcdev.sc_dev.dv_xname, i);
315 bus_space_write_1(sc->sc_dma_iot,
316 cp->dma_iohs[IDEDMA_CTL], 0, dmastat);
317 } else if (crv == 1)
318 rv = 1;
319 else if (rv == 0)
320 rv = crv;
321 }
322 return rv;
323 }
324 #endif
325