svwsata.c revision 1.4 
1/*	$NetBSD: svwsata.c,v 1.4 2006/10/12 01:31:33 christos Exp $	*/
2
3/*
4 * Copyright (c) 2005 Mark Kettenis
5 *
6 * Permission to use, copy, modify, and distribute this software for any
7 * purpose with or without fee is hereby granted, provided that the above
8 * copyright notice and this permission notice appear in all copies.
9 *
10 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17 */
18
19#include <sys/cdefs.h>
20__KERNEL_RCSID(0, "$NetBSD: svwsata.c,v 1.4 2006/10/12 01:31:33 christos Exp $");
21
22#include <sys/param.h>
23#include <sys/systm.h>
24
25#include <dev/ata/atareg.h>
26#include <dev/ata/satareg.h>
27#include <dev/ata/satavar.h>
28#include <dev/pci/pcivar.h>
29#include <dev/pci/pcidevs.h>
30#include <dev/pci/pciidereg.h>
31#include <dev/pci/pciidevar.h>
32#include <dev/pci/pciide_svwsata_reg.h>
33
34static int  svwsata_match(struct device *, struct cfdata *, void *);
35static void svwsata_attach(struct device *, struct device *, void *);
36
37static void svwsata_chip_map(struct pciide_softc *, struct pci_attach_args *) __unused;
38static void svwsata_mapreg_dma(struct pciide_softc *, struct pci_attach_args *);
39static void svwsata_mapchan(struct pciide_channel *);
40static void svwsata_drv_probe(struct ata_channel *chp);
41
42CFATTACH_DECL(svwsata, sizeof(struct pciide_softc),
43    svwsata_match, svwsata_attach, NULL, NULL);
44
45static const struct pciide_product_desc pciide_svwsata_products[] =  {
46	{ PCI_PRODUCT_SERVERWORKS_K2_SATA,
47	  0,
48	  "ServerWorks K2 SATA Controller",
49	  svwsata_chip_map
50	},
51	{ PCI_PRODUCT_SERVERWORKS_FRODO4_SATA,
52	  0,
53	  "ServerWorks Frodo4 SATA Controller",
54	  svwsata_chip_map
55	},
56	{ PCI_PRODUCT_SERVERWORKS_FRODO8_SATA,
57	  0,
58	  "ServerWorks Frodo8 SATA Controller",
59	  svwsata_chip_map
60	},
61	{ PCI_PRODUCT_SERVERWORKS_HT1000_SATA,
62	  0,
63	  "ServerWorks HT-1000 SATA Controller",
64	  svwsata_chip_map
65	},
66	{ 0,
67	  0,
68	  NULL,
69	  NULL,
70	}
71};
72
73static int
74svwsata_match(struct device *parent __unused, struct cfdata *match __unused,
75    void *aux)
76{
77	struct pci_attach_args *pa = aux;
78
79	if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_SERVERWORKS) {
80		if (pciide_lookup_product(pa->pa_id,
81		    pciide_svwsata_products))
82			return (2);
83	}
84	return (0);
85}
86
87static void
88svwsata_attach(struct device *parent __unused, struct device *self, void *aux)
89{
90	struct pci_attach_args *pa = aux;
91	struct pciide_softc *sc = (void *)self;
92
93	pciide_common_attach(sc, pa,
94	    pciide_lookup_product(pa->pa_id, pciide_svwsata_products));
95}
96
97static void
98svwsata_chip_map(struct pciide_softc *sc, struct pci_attach_args *pa)
99{
100	struct pciide_channel *cp;
101	pci_intr_handle_t intrhandle;
102	pcireg_t interface;
103	const char *intrstr;
104	int channel;
105
106	if (pciide_chipen(sc, pa) == 0)
107		return;
108
109	/* The 4-port version has a dummy second function. */
110	if (pci_conf_read(sc->sc_pc, sc->sc_tag,
111	    PCI_MAPREG_START + 0x14) == 0) {
112		aprint_normal("\n");
113		return;
114	}
115
116	if (pci_mapreg_map(pa, PCI_MAPREG_START + 0x14,
117			   PCI_MAPREG_TYPE_MEM |
118			   PCI_MAPREG_MEM_TYPE_32BIT, 0,
119			   &sc->sc_ba5_st, &sc->sc_ba5_sh,
120			   NULL, NULL) != 0) {
121		aprint_error(": unable to map BA5 register space\n");
122		return;
123	}
124
125	aprint_normal(": DMA");
126	svwsata_mapreg_dma(sc, pa);
127	aprint_normal("\n");
128
129	sc->sc_wdcdev.sc_atac.atac_cap |= ATAC_CAP_DATA16 | ATAC_CAP_DATA32;
130	sc->sc_wdcdev.sc_atac.atac_pio_cap = 4;
131	if (sc->sc_dma_ok) {
132		sc->sc_wdcdev.sc_atac.atac_cap |= ATAC_CAP_DMA | ATAC_CAP_UDMA;
133		sc->sc_wdcdev.irqack = pciide_irqack;
134		sc->sc_wdcdev.sc_atac.atac_dma_cap = 2;
135		sc->sc_wdcdev.sc_atac.atac_udma_cap = 6;
136	}
137
138	sc->sc_wdcdev.sc_atac.atac_channels = sc->wdc_chanarray;
139	sc->sc_wdcdev.sc_atac.atac_nchannels = 4;
140	sc->sc_wdcdev.sc_atac.atac_set_modes = sata_setup_channel;
141
142	/* We can use SControl and SStatus to probe for drives. */
143	sc->sc_wdcdev.sc_atac.atac_probe = svwsata_drv_probe;
144
145	wdc_allocate_regs(&sc->sc_wdcdev);
146
147	/* Map and establish the interrupt handler. */
148	if(pci_intr_map(pa, &intrhandle) != 0) {
149		aprint_error("%s: couldn't map native-PCI interrupt\n",
150		    sc->sc_wdcdev.sc_atac.atac_dev.dv_xname);
151		return;
152	}
153	intrstr = pci_intr_string(pa->pa_pc, intrhandle);
154	sc->sc_pci_ih = pci_intr_establish(pa->pa_pc, intrhandle, IPL_BIO,
155	    pciide_pci_intr, sc);
156	if (sc->sc_pci_ih != NULL) {
157		aprint_normal("%s: using %s for native-PCI interrupt\n",
158		    sc->sc_wdcdev.sc_atac.atac_dev.dv_xname,
159		    intrstr ? intrstr : "unknown interrupt");
160	} else {
161		aprint_error("%s: couldn't establish native-PCI interrupt",
162		    sc->sc_wdcdev.sc_atac.atac_dev.dv_xname);
163		if (intrstr != NULL)
164			aprint_normal(" at %s", intrstr);
165		aprint_normal("\n");
166		return;
167	}
168
169	interface = PCIIDE_INTERFACE_BUS_MASTER_DMA |
170	    PCIIDE_INTERFACE_PCI(0) | PCIIDE_INTERFACE_PCI(1);
171
172
173	for (channel = 0; channel < sc->sc_wdcdev.sc_atac.atac_nchannels;
174	     channel++) {
175		cp = &sc->pciide_channels[channel];
176
177		if (pciide_chansetup(sc, channel, interface) == 0)
178			continue;
179		svwsata_mapchan(cp);
180	}
181}
182
183static void
184svwsata_mapreg_dma(struct pciide_softc *sc, struct pci_attach_args *pa)
185{
186	struct pciide_channel *pc;
187	int chan, reg;
188	bus_size_t size;
189
190	sc->sc_wdcdev.dma_arg = sc;
191	sc->sc_wdcdev.dma_init = pciide_dma_init;
192	sc->sc_wdcdev.dma_start = pciide_dma_start;
193	sc->sc_wdcdev.dma_finish = pciide_dma_finish;
194
195	if (device_cfdata(&sc->sc_wdcdev.sc_atac.atac_dev)->cf_flags &
196	    PCIIDE_OPTIONS_NODMA) {
197		aprint_normal(
198		    ", but unused (forced off by config file)");
199		sc->sc_dma_ok = 0;
200		return;
201	}
202
203	/*
204	 * Slice off a subregion of BA5 for each of the channel's DMA
205	 * registers.
206	 */
207
208	sc->sc_dma_iot = sc->sc_ba5_st;
209	for (chan = 0; chan < 4; chan++) {
210		pc = &sc->pciide_channels[chan];
211		for (reg = 0; reg < IDEDMA_NREGS; reg++) {
212			size = 4;
213			if (size > (IDEDMA_SCH_OFFSET - reg))
214				size = IDEDMA_SCH_OFFSET - reg;
215			if (bus_space_subregion(sc->sc_ba5_st,
216			    sc->sc_ba5_sh,
217			    (chan << 8) + SVWSATA_DMA + reg,
218			    size, &pc->dma_iohs[reg]) != 0) {
219				sc->sc_dma_ok = 0;
220				aprint_normal(", but can't subregion offset "
221				    "%lu size %lu",
222				    (u_long) (chan << 8) + SVWSATA_DMA + reg,
223				    (u_long) size);
224				return;
225			}
226		}
227	}
228
229	/* DMA registers all set up! */
230	sc->sc_dmat = pa->pa_dmat;
231	sc->sc_dma_ok = 1;
232}
233
234static void
235svwsata_mapchan(struct pciide_channel *cp)
236{
237	struct ata_channel *wdc_cp = &cp->ata_channel;
238	struct pciide_softc *sc = CHAN_TO_PCIIDE(wdc_cp);
239	struct wdc_regs *wdr = CHAN_TO_WDC_REGS(wdc_cp);
240	int i;
241
242	cp->compat = 0;
243	cp->ih = sc->sc_pci_ih;
244
245	wdr->cmd_iot = sc->sc_ba5_st;
246	if (bus_space_subregion(sc->sc_ba5_st, sc->sc_ba5_sh,
247		(wdc_cp->ch_channel << 8) + SVWSATA_TF0,
248		SVWSATA_TF8 - SVWSATA_TF0, &wdr->cmd_baseioh) != 0) {
249		aprint_error("%s: couldn't map %s cmd regs\n",
250		       sc->sc_wdcdev.sc_atac.atac_dev.dv_xname, cp->name);
251		goto bad;
252	}
253
254	wdr->ctl_iot = sc->sc_ba5_st;
255	if (bus_space_subregion(sc->sc_ba5_st, sc->sc_ba5_sh,
256		(wdc_cp->ch_channel << 8) + SVWSATA_TF8, 4,
257		&cp->ctl_baseioh) != 0) {
258		aprint_error("%s: couldn't map %s ctl regs\n",
259		       sc->sc_wdcdev.sc_atac.atac_dev.dv_xname, cp->name);
260		goto bad;
261	}
262	wdr->ctl_ioh = cp->ctl_baseioh;
263
264	for (i = 0; i < WDC_NREG; i++) {
265		if (bus_space_subregion(wdr->cmd_iot, wdr->cmd_baseioh,
266					i << 2, i == 0 ? 4 : 1,
267					&wdr->cmd_iohs[i]) != 0) {
268			aprint_error("%s: couldn't subregion %s channel "
269				     "cmd regs\n",
270			    sc->sc_wdcdev.sc_atac.atac_dev.dv_xname, cp->name);
271			goto bad;
272		}
273	}
274	wdc_init_shadow_regs(wdc_cp);
275	wdr->data32iot = wdr->cmd_iot;
276	wdr->data32ioh = wdr->cmd_iohs[0];
277
278	wdcattach(wdc_cp);
279	return;
280
281 bad:
282	cp->ata_channel.ch_flags |= ATACH_DISABLED;
283}
284
285static void
286svwsata_drv_probe(struct ata_channel *chp)
287{
288	struct pciide_softc *sc = CHAN_TO_PCIIDE(chp);
289	struct wdc_regs *wdr = CHAN_TO_WDC_REGS(chp);
290	int channel = chp->ch_channel;
291	uint32_t scontrol, sstatus;
292	uint8_t scnt, sn, cl, ch;
293	int i, s;
294
295	/* XXX This should be done by other code. */
296	for (i = 0; i < 2; i++) {
297		chp->ch_drive[i].chnl_softc = chp;
298		chp->ch_drive[i].drive = i;
299	}
300
301	/*
302	 * Request communication initialization sequence, any speed.
303	 * Performing this is the equivalent of an ATA Reset.
304	 */
305	scontrol = SControl_DET_INIT | SControl_SPD_ANY;
306
307	/*
308	 * XXX We don't yet support SATA power management; disable all
309	 * power management state transitions.
310	 */
311	scontrol |= SControl_IPM_NONE;
312
313	bus_space_write_4(sc->sc_ba5_st, sc->sc_ba5_sh,
314	    (channel << 8) + SVWSATA_SCONTROL, scontrol);
315	delay(50 * 1000);
316	scontrol &= ~SControl_DET_INIT;
317	bus_space_write_4(sc->sc_ba5_st, sc->sc_ba5_sh,
318	    (channel << 8) + SVWSATA_SCONTROL, scontrol);
319	delay(50 * 1000);
320
321	sstatus = bus_space_read_4(sc->sc_ba5_st, sc->sc_ba5_sh,
322	    (channel << 8) + SVWSATA_SSTATUS);
323#if 0
324	printf("%s: port %d: SStatus=0x%08x, SControl=0x%08x\n",
325	    sc->sc_wdcdev.sc_atac.atac_dev.dv_xname, chp->ch_channel, sstatus,
326	    bus_space_read_4(sc->sc_ba5_st, sc->sc_ba5_sh,
327	        (channel << 8) + SVWSATA_SSTATUS));
328#endif
329	switch (sstatus & SStatus_DET_mask) {
330	case SStatus_DET_NODEV:
331		/* No device; be silent. */
332		break;
333
334	case SStatus_DET_DEV_NE:
335		aprint_error("%s: port %d: device connected, but "
336		    "communication not established\n",
337		    sc->sc_wdcdev.sc_atac.atac_dev.dv_xname, chp->ch_channel);
338		break;
339
340	case SStatus_DET_OFFLINE:
341		aprint_error("%s: port %d: PHY offline\n",
342		    sc->sc_wdcdev.sc_atac.atac_dev.dv_xname, chp->ch_channel);
343		break;
344
345	case SStatus_DET_DEV:
346		/*
347		 * XXX ATAPI detection doesn't currently work.  Don't
348		 * XXX know why.  But, it's not like the standard method
349		 * XXX can detect an ATAPI device connected via a SATA/PATA
350		 * XXX bridge, so at least this is no worse.  --thorpej
351		 */
352		bus_space_write_1(wdr->cmd_iot, wdr->cmd_iohs[wd_sdh], 0,
353		    WDSD_IBM | (0 << 4));
354		delay(10);	/* 400ns delay */
355		/* Save register contents. */
356		scnt = bus_space_read_1(wdr->cmd_iot,
357				        wdr->cmd_iohs[wd_seccnt], 0);
358		sn = bus_space_read_1(wdr->cmd_iot,
359				      wdr->cmd_iohs[wd_sector], 0);
360		cl = bus_space_read_1(wdr->cmd_iot,
361				      wdr->cmd_iohs[wd_cyl_lo], 0);
362		ch = bus_space_read_1(wdr->cmd_iot,
363				      wdr->cmd_iohs[wd_cyl_hi], 0);
364#if 0
365		printf("%s: port %d: scnt=0x%x sn=0x%x cl=0x%x ch=0x%x\n",
366		    sc->sc_wdcdev.sc_atac.atac_dev.dv_xname, chp->ch_channel,
367		    scnt, sn, cl, ch);
368#endif
369		/*
370		 * scnt and sn are supposed to be 0x1 for ATAPI, but in some
371		 * cases we get wrong values here, so ignore it.
372		 */
373		s = splbio();
374		if (cl == 0x14 && ch == 0xeb)
375			chp->ch_drive[0].drive_flags |= DRIVE_ATAPI;
376		else
377			chp->ch_drive[0].drive_flags |= DRIVE_ATA;
378		splx(s);
379
380		aprint_normal("%s: port %d: device present, speed: %s\n",
381		    sc->sc_wdcdev.sc_atac.atac_dev.dv_xname, chp->ch_channel,
382		    sata_speed(sstatus));
383		break;
384
385	default:
386		aprint_error("%s: port %d: unknown SStatus: 0x%08x\n",
387		    sc->sc_wdcdev.sc_atac.atac_dev.dv_xname, chp->ch_channel, sstatus);
388	}
389}
390