xref: /netbsd-src/sys/arch/mips/adm5120/dev/wdc_extio.c (revision 8b0f9554ff8762542c4defc4f70e1eb76fb508fa)
1 /*	$NetBSD: wdc_extio.c,v 1.1 2007/03/20 08:52:02 dyoung Exp $ */
2 
3 /*-
4  * Copyright (c) 2007 David Young.  All rights reserved.
5  *
6  * CompactFlash attachment for RouterBoard 153.  Derived from
7  * the NetBSD/mac68k OBIO-IDE attachment.
8  *
9  * Redistribution and use in source and binary forms, with or
10  * without modification, are permitted provided that the following
11  * conditions are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above
15  *    copyright notice, this list of conditions and the following
16  *    disclaimer in the documentation and/or other materials provided
17  *    with the distribution.
18  * 3. The name of the author may not be used to endorse or promote
19  *    products derived from this software without specific prior
20  *    written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY
23  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
24  * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
25  * PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR
26  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
27  * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
28  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
29  * OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
30  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
31  * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
32  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
33  * OF SUCH DAMAGE.
34  */
35 /*
36  * Copyright (c) 2002 Takeshi Shibagaki  All rights reserved.
37  *
38  * mac68k OBIO-IDE attachment created by Takeshi Shibagaki
39  *
40  * Redistribution and use in source and binary forms, with or without
41  * modification, are permitted provided that the following conditions
42  * are met:
43  * 1. Redistributions of source code must retain the above copyright
44  *    notice, this list of conditions and the following disclaimer.
45  * 2. Redistributions in binary form must reproduce the above copyright
46  *    notice, this list of conditions and the following disclaimer in the
47  *    documentation and/or other materials provided with the distribution.
48  * 3. All advertising materials mentioning features or use of this software
49  *    must display the following acknowledgement:
50  *	This product includes software developed by Charles M. Hannum.
51  * 4. The name of the author may not be used to endorse or promote products
52  *    derived from this software without specific prior written permission.
53  *
54  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
55  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
56  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
57  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
58  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
59  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
60  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
61  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
62  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
63  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
64  */
65 
66 #include <sys/cdefs.h>
67 __KERNEL_RCSID(0, "$NetBSD: wdc_extio.c,v 1.1 2007/03/20 08:52:02 dyoung Exp $");
68 
69 #include <sys/types.h>
70 #include <sys/param.h>
71 #include <sys/systm.h>
72 #include <sys/device.h>
73 #include <sys/malloc.h>
74 #include <sys/kernel.h>
75 #include <sys/callout.h>
76 
77 #include <machine/bus.h>
78 #include <machine/intr.h>
79 #include <machine/cpu.h>
80 
81 #include <mips/adm5120/include/adm5120_extiovar.h>
82 
83 #include <dev/ata/atareg.h>
84 #include <dev/ata/atavar.h>
85 #include <dev/ic/wdcvar.h>
86 
87 #ifdef WDC_EXTIO_DEBUG
88 int wdc_extio_debug = 1;
89 #define	WDC_EXTIO_DPRINTF(__fmt, ...)		\
90 do {						\
91 	if (wdc_extio_debug)			\
92 		printf((__fmt), __VA_ARGS__);	\
93 } while (/*CONSTCOND*/0)
94 #else /* !WDC_EXTIO_DEBUG */
95 #define	WDC_EXTIO_DPRINTF(__fmt, ...)	do { } while (/*CONSTCOND*/0)
96 #endif /* WDC_EXTIO_DEBUG */
97 
98 #define	WDC_OBIO_CF_WINSIZE	0x1000
99 #define	WDC_OBIO_REG_OFFSET	0x0800
100 #define	WDC_OBIO_DATA_OFFSET	0x0808
101 #define	WDC_OBIO_AUXREG_OFFSET	0x080e
102 
103 struct wdc_extio_softc {
104 	struct wdc_softc	sc_wdcdev;
105 	struct ata_channel	*sc_chanlist[1];
106 	struct ata_channel	sc_channel;
107 	struct ata_queue	sc_chqueue;
108 	struct wdc_regs		sc_wdc_regs;
109 	void			*sc_gpio;
110 	int			sc_map;
111 	struct gpio_pinmap	sc_pinmap;
112 };
113 
114 int	wdc_extio_match(struct device *, struct cfdata *, void *);
115 void	wdc_extio_attach(struct device *, struct device *, void *);
116 
117 CFATTACH_DECL(wdc_extio, sizeof(struct wdc_extio_softc),
118     wdc_extio_match, wdc_extio_attach, NULL, NULL);
119 
120 #if 0
121 void	wdc_extio_reset(struct ata_channel *, int);
122 void
123 wdc_extio_reset(struct ata_channel *chp, int poll)
124 {
125 	struct wdc_softc *wdc = CHAN_TO_WDC(chp);
126 	struct wdc_regs *wdr = &wdc->regs[chp->ch_channel];
127 	uint8_t st0;
128 	int i, s = 0;
129 
130 	if (poll)
131 		s = splbio();
132 	if (wdc->select)
133 		wdc->select(chp,0);
134 	/* assert SRST, wait for reset to complete */
135 	bus_space_write_1(wdr->ctl_iot, wdr->ctl_ioh, wd_aux_ctlr, WDCTL_RST);
136 	delay(2000);
137 	(void) bus_space_read_1(wdr->cmd_iot, wdr->cmd_iohs[wd_error], 0);
138 	bus_space_write_1(wdr->ctl_iot, wdr->ctl_ioh, wd_aux_ctlr, 0);
139 	delay(10);	/* 400ns delay */
140 	for (i = 3100000; --i > 0; ) {
141 		st0 = bus_space_read_1(wdr->cmd_iot,
142 		    wdr->cmd_iohs[wd_status], 0);
143 		if ((st0 & WDCS_BSY) == 0)
144 			break;
145 		delay(10);
146 	}
147 	if (i == 0)
148 		printf("%s: reset failed\n", __func__);
149 	else
150 		WDC_EXTIO_DPRINTF("%s: reset in %d.%02dms\n", __func__,
151 		    (3100000 - i) / 100,
152 		    (3100000 - i) % 100);
153 
154 	if (poll) {
155 		/* ACK interrupt in case there is one pending left */
156 		if (wdc->irqack)
157 			wdc->irqack(chp);
158 		splx(s);
159 	}
160 }
161 #endif
162 
163 static int
164 wdc_extio_map(struct extio_attach_args *ea, struct wdc_regs *wdr,
165     struct ata_channel *chp, void **gpio, struct gpio_pinmap *pinmap)
166 {
167 	int i;
168 
169 	*gpio = ea->ea_gpio;
170 	wdr->cmd_iot = wdr->ctl_iot = ea->ea_st;
171 
172 #if 0
173 	if (gpio_pin_map(ea->ea_gpio, 0, ea->ea_gpio_mask, pinmap) != 0) {
174 		printf("%s: couldn't map GPIO\n", __func__);
175 		return -1;
176 	}
177 #endif
178 
179 	if (bus_space_map(wdr->cmd_iot, ea->ea_addr, WDC_OBIO_CF_WINSIZE, 0,
180 	                  &wdr->cmd_baseioh)) {
181 		printf("%s: couldn't map registers\n", __func__);
182 		goto post_gpio_err;
183 	}
184 
185 	for (i = 1; i < WDC_NREG; i++) {
186 		if (bus_space_subregion(wdr->cmd_iot, wdr->cmd_baseioh,
187 		                        WDC_OBIO_REG_OFFSET + i, 1,
188 					&wdr->cmd_iohs[i]) != 0) {
189 			printf("%s: unable to subregion control register\n",
190 			    __func__);
191 			goto post_bus_err;
192 		}
193 	}
194 	if (bus_space_subregion(wdr->cmd_iot, wdr->cmd_baseioh,
195 				WDC_OBIO_DATA_OFFSET, 2,
196 				&wdr->cmd_iohs[wd_data]) != 0) {
197 		printf("%s: unable to subregion data register\n", __func__);
198 		goto post_bus_err;
199 	}
200 	if (bus_space_subregion(wdr->cmd_iot, wdr->cmd_baseioh,
201 				WDC_OBIO_AUXREG_OFFSET, 1, &wdr->ctl_ioh)) {
202 		printf("%s: unable to subregion aux register\n", __func__);
203 		goto post_bus_err;
204 	}
205 
206 	wdc_init_shadow_regs(chp);
207 
208 	return 0;
209 post_bus_err:
210 	bus_space_unmap(wdr->cmd_iot, wdr->cmd_baseioh, WDC_OBIO_CF_WINSIZE);
211 post_gpio_err:
212 #if 0
213 	gpio_pin_unmap(ea->ea_gpio, pinmap);
214 #endif
215 	return -1;
216 }
217 
218 static void
219 wdc_extio_dataout(struct ata_channel *chp, int flags, void *bf, size_t len)
220 {
221 	struct wdc_regs *wdr = CHAN_TO_WDC_REGS(chp);
222 
223 	bus_space_write_multi_1(
224 	    wdr->cmd_iot, wdr->cmd_iohs[wd_data], 0, bf, len);
225 }
226 
227 static void
228 wdc_extio_datain(struct ata_channel *chp, int flags, void *bf, size_t len)
229 {
230 	struct wdc_regs *wdr = CHAN_TO_WDC_REGS(chp);
231 
232 	bus_space_read_multi_1(
233 	    wdr->cmd_iot, wdr->cmd_iohs[wd_data], 0, bf, len);
234 }
235 
236 int
237 wdc_extio_match(struct device *parent, struct cfdata *cf, void *aux)
238 {
239 	struct extio_attach_args *ea = (struct extio_attach_args *)aux;
240 	struct ata_channel ch;
241 	struct wdc_softc wdc;
242 	struct wdc_regs wdr;
243 	int result = 0;
244 	void *gpio;
245 	int map;
246 	struct gpio_pinmap pm = {.pm_map = &map};
247 
248 	if (strcmp(ea->ea_name, cf->cf_name) != 0)
249 		return 0;
250 
251 	WDC_EXTIO_DPRINTF("%s: enter\n", __func__);
252 
253 	memset(&wdc, 0, sizeof(wdc));
254 	memset(&ch, 0, sizeof(ch));
255 	ch.ch_atac = &wdc.sc_atac;
256 	wdc.regs = &wdr;
257 	wdc.datain_pio = wdc_extio_datain;
258 	wdc.dataout_pio = wdc_extio_dataout;
259 	if (cf->cf_flags != -1) {
260 		wdc.sc_atac.atac_cap |= cf->cf_flags &
261 		    (ATAC_CAP_NOIRQ|ATAC_CAP_DATA32|ATAC_CAP_DATA16);
262 		wdc.cap |= cf->cf_flags &
263 		    (WDC_CAPABILITY_PREATA|WDC_CAPABILITY_NO_EXTRA_RESETS);
264 	}
265 
266 	if (wdc_extio_map(ea, &wdr, &ch, &gpio, &pm) == -1)
267 		return 0;
268 
269 	result = wdcprobe(&ch);
270 
271 	bus_space_unmap(wdr.cmd_iot, wdr.cmd_baseioh, WDC_OBIO_CF_WINSIZE);
272 #if 0
273 	gpio_pin_unmap(ea->ea_gpio, &pm);
274 #endif
275 
276 	return result;
277 }
278 
279 void
280 wdc_extio_attach(struct device *parent, struct device *self, void *aux)
281 {
282 	struct wdc_extio_softc *sc = (void *)self;
283 	struct wdc_regs *wdr;
284 	struct extio_attach_args *ea = aux;
285 	struct ata_channel *chp = &sc->sc_channel;
286 	struct cfdata *cf;
287 
288 	WDC_EXTIO_DPRINTF("%s: enter\n", __func__);
289 
290 	sc->sc_pinmap.pm_map = &sc->sc_map;
291 	sc->sc_wdcdev.regs = wdr = &sc->sc_wdc_regs;
292 	chp->ch_atac = &sc->sc_wdcdev.sc_atac;
293 
294 	if (wdc_extio_map(ea, wdr, chp, &sc->sc_gpio, &sc->sc_pinmap) == -1)
295 		return;
296 
297 	cf = device_cfdata(&sc->sc_wdcdev.sc_atac.atac_dev);
298 	if (cf->cf_flags != -1) {
299 		printf(" flags %04x", cf->cf_flags);
300 		sc->sc_wdcdev.sc_atac.atac_cap |= cf->cf_flags &
301 		    (ATAC_CAP_NOIRQ|ATAC_CAP_DATA32|ATAC_CAP_DATA16);
302 		sc->sc_wdcdev.cap |= cf->cf_flags &
303 		    (WDC_CAPABILITY_PREATA|WDC_CAPABILITY_NO_EXTRA_RESETS);
304 	}
305 	sc->sc_wdcdev.datain_pio = wdc_extio_datain;
306 	sc->sc_wdcdev.dataout_pio = wdc_extio_dataout;
307 	sc->sc_wdcdev.sc_atac.atac_pio_cap = 0;
308 	sc->sc_chanlist[0] = chp;
309 	sc->sc_wdcdev.sc_atac.atac_channels = sc->sc_chanlist;
310 	sc->sc_wdcdev.sc_atac.atac_nchannels = 1;
311 	chp->ch_channel = 0;
312 	chp->ch_atac = &sc->sc_wdcdev.sc_atac;
313 	chp->ch_queue = &sc->sc_chqueue;
314 	chp->ch_ndrive = 2;
315 
316 	printf("\n");
317 
318 	wdcattach(chp);
319 }
320