a10_ahci.c revision 309753
1/*-
2 * Copyright (c) 2014-2015 M. Warner Losh <imp@freebsd.org>
3 * Copyright (c) 2015 Luiz Otavio O Souza <loos@freebsd.org>
4 * 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 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25 * SUCH DAMAGE.
26 *
27 * The magic-bit-bang sequence used in this code may be based on a linux
28 * platform driver in the Allwinner SDK from Allwinner Technology Co., Ltd.
29 * www.allwinnertech.com, by Daniel Wang <danielwang@allwinnertech.com>
30 * though none of the original code was copied.
31 */
32
33#include "opt_bus.h"
34
35#include <sys/cdefs.h>
36__FBSDID("$FreeBSD: stable/11/sys/arm/allwinner/a10_ahci.c 309753 2016-12-09 19:36:13Z manu $");
37
38#include <sys/param.h>
39#include <sys/systm.h>
40#include <sys/bus.h>
41#include <sys/rman.h>
42#include <sys/kernel.h>
43#include <sys/module.h>
44
45#include <machine/bus.h>
46#include <dev/ofw/ofw_bus.h>
47#include <dev/ofw/ofw_bus_subr.h>
48
49#include <dev/ahci/ahci.h>
50#include <dev/extres/clk/clk.h>
51
52/*
53 * Allwinner a1x/a2x/a8x SATA attachment.  This is just the AHCI register
54 * set with a few extra implementation-specific registers that need to
55 * be accounted for.  There's only one PHY in the system, and it needs
56 * to be trained to bring the link up.  In addition, there's some DMA
57 * specific things that need to be done as well.  These things are also
58 * just about completely undocumented, except in ugly code in the Linux
59 * SDK Allwinner releases.
60 */
61
62/* BITx -- Unknown bit that needs to be set/cleared at position x */
63/* UFx -- Uknown multi-bit field frobbed during init */
64#define	AHCI_BISTAFR	0x00A0
65#define	AHCI_BISTCR	0x00A4
66#define	AHCI_BISTFCTR	0x00A8
67#define	AHCI_BISTSR	0x00AC
68#define	AHCI_BISTDECR	0x00B0
69#define	AHCI_DIAGNR	0x00B4
70#define	AHCI_DIAGNR1	0x00B8
71#define	AHCI_OOBR	0x00BC
72#define	AHCI_PHYCS0R	0x00C0
73/* Bits 0..17 are a mystery */
74#define	 PHYCS0R_BIT18			(1 << 18)
75#define	 PHYCS0R_POWER_ENABLE		(1 << 19)
76#define	 PHYCS0R_UF1_MASK		(7 << 20)	/* Unknown Field 1 */
77#define	  PHYCS0R_UF1_INIT		(3 << 20)
78#define	 PHYCS0R_BIT23			(1 << 23)
79#define	 PHYCS0R_UF2_MASK		(7 << 24)	/* Uknown Field 2 */
80#define	  PHYCS0R_UF2_INIT		(5 << 24)
81/* Bit 27 mystery */
82#define	 PHYCS0R_POWER_STATUS_MASK	(7 << 28)
83#define	  PHYCS0R_PS_GOOD		(2 << 28)
84/* Bit 31 mystery */
85#define	AHCI_PHYCS1R	0x00C4
86/* Bits 0..5 are a mystery */
87#define	 PHYCS1R_UF1_MASK		(3 << 6)
88#define	  PHYCS1R_UF1_INIT		(2 << 6)
89#define	 PHYCS1R_UF2_MASK		(0x1f << 8)
90#define	  PHYCS1R_UF2_INIT		(6 << 8)
91/* Bits 13..14 are a mystery */
92#define	 PHYCS1R_BIT15			(1 << 15)
93#define	 PHYCS1R_UF3_MASK		(3 << 16)
94#define	  PHYCS1R_UF3_INIT		(2 << 16)
95/* Bit 18 mystery */
96#define	 PHYCS1R_HIGHZ			(1 << 19)
97/* Bits 20..27 mystery */
98#define	 PHYCS1R_BIT28			(1 << 28)
99/* Bits 29..31 mystery */
100#define	AHCI_PHYCS2R	0x00C8
101/* bits 0..4 mystery */
102#define	 PHYCS2R_UF1_MASK		(0x1f << 5)
103#define	  PHYCS2R_UF1_INIT		(0x19 << 5)
104/* Bits 10..23 mystery */
105#define	 PHYCS2R_CALIBRATE		(1 << 24)
106/* Bits 25..31 mystery */
107#define	AHCI_TIMER1MS	0x00E0
108#define	AHCI_GPARAM1R	0x00E8
109#define	AHCI_GPARAM2R	0x00EC
110#define	AHCI_PPARAMR	0x00F0
111#define	AHCI_TESTR	0x00F4
112#define	AHCI_VERSIONR	0x00F8
113#define	AHCI_IDR	0x00FC
114#define	AHCI_RWCR	0x00FC
115
116#define	AHCI_P0DMACR	0x0070
117#define	AHCI_P0PHYCR	0x0078
118#define	AHCI_P0PHYSR	0x007C
119
120#define	PLL_FREQ	100000000
121
122static void inline
123ahci_set(struct resource *m, bus_size_t off, uint32_t set)
124{
125	uint32_t val = ATA_INL(m, off);
126
127	val |= set;
128	ATA_OUTL(m, off, val);
129}
130
131static void inline
132ahci_clr(struct resource *m, bus_size_t off, uint32_t clr)
133{
134	uint32_t val = ATA_INL(m, off);
135
136	val &= ~clr;
137	ATA_OUTL(m, off, val);
138}
139
140static void inline
141ahci_mask_set(struct resource *m, bus_size_t off, uint32_t mask, uint32_t set)
142{
143	uint32_t val = ATA_INL(m, off);
144
145	val &= mask;
146	val |= set;
147	ATA_OUTL(m, off, val);
148}
149
150/*
151 * Should this be phy_reset or phy_init
152 */
153#define	PHY_RESET_TIMEOUT	1000
154static void
155ahci_a10_phy_reset(device_t dev)
156{
157	uint32_t to, val;
158	struct ahci_controller *ctlr = device_get_softc(dev);
159
160	/*
161	 * Here starts the magic -- most of the comments are based
162	 * on guesswork, names of routines and printf error
163	 * messages.  The code works, but it will do that even if the
164	 * comments are 100% BS.
165	 */
166
167	/*
168	 * Lock out other access while we initialize.  Or at least that
169	 * seems to be the case based on Linux SDK #defines.  Maybe this
170	 * put things into reset?
171	 */
172	ATA_OUTL(ctlr->r_mem, AHCI_RWCR, 0);
173	DELAY(100);
174
175	/*
176	 * Set bit 19 in PHYCS1R.  Guessing this disables driving the PHY
177	 * port for a bit while we reset things.
178	 */
179	ahci_set(ctlr->r_mem, AHCI_PHYCS1R, PHYCS1R_HIGHZ);
180
181	/*
182	 * Frob PHYCS0R...
183	 */
184	ahci_mask_set(ctlr->r_mem, AHCI_PHYCS0R,
185	    ~PHYCS0R_UF2_MASK,
186	    PHYCS0R_UF2_INIT | PHYCS0R_BIT23 | PHYCS0R_BIT18);
187
188	/*
189	 * Set three fields in PHYCS1R
190	 */
191	ahci_mask_set(ctlr->r_mem, AHCI_PHYCS1R,
192	    ~(PHYCS1R_UF1_MASK | PHYCS1R_UF2_MASK | PHYCS1R_UF3_MASK),
193	    PHYCS1R_UF1_INIT | PHYCS1R_UF2_INIT | PHYCS1R_UF3_INIT);
194
195	/*
196	 * Two more mystery bits in PHYCS1R. -- can these be combined above?
197	 */
198	ahci_set(ctlr->r_mem, AHCI_PHYCS1R, PHYCS1R_BIT15 | PHYCS1R_BIT28);
199
200	/*
201	 * Now clear that first mysery bit.  Perhaps this starts
202	 * driving the PHY again so we can power it up and start
203	 * talking to the SATA drive, if any below.
204	 */
205	ahci_clr(ctlr->r_mem, AHCI_PHYCS1R, PHYCS1R_HIGHZ);
206
207	/*
208	 * Frob PHYCS0R again...
209	 */
210	ahci_mask_set(ctlr->r_mem, AHCI_PHYCS0R,
211	    ~PHYCS0R_UF1_MASK, PHYCS0R_UF1_INIT);
212
213	/*
214	 * Frob PHYCS2R, because 25 means something?
215	 */
216	ahci_mask_set(ctlr->r_mem, AHCI_PHYCS2R, ~PHYCS2R_UF1_MASK,
217	    PHYCS2R_UF1_INIT);
218
219	DELAY(100);		/* WAG */
220
221	/*
222	 * Turn on the power to the PHY and wait for it to report back
223	 * good?
224	 */
225	ahci_set(ctlr->r_mem, AHCI_PHYCS0R, PHYCS0R_POWER_ENABLE);
226	for (to = PHY_RESET_TIMEOUT; to > 0; to--) {
227		val = ATA_INL(ctlr->r_mem, AHCI_PHYCS0R);
228		if ((val & PHYCS0R_POWER_STATUS_MASK) == PHYCS0R_PS_GOOD)
229			break;
230		DELAY(10);
231	}
232	if (to == 0 && bootverbose)
233		device_printf(dev, "PHY Power Failed PHYCS0R = %#x\n", val);
234
235	/*
236	 * Calibrate the clocks between the device and the host.  This appears
237	 * to be an automated process that clears the bit when it is done.
238	 */
239	ahci_set(ctlr->r_mem, AHCI_PHYCS2R, PHYCS2R_CALIBRATE);
240	for (to = PHY_RESET_TIMEOUT; to > 0; to--) {
241		val = ATA_INL(ctlr->r_mem, AHCI_PHYCS2R);
242		if ((val & PHYCS2R_CALIBRATE) == 0)
243			break;
244		DELAY(10);
245	}
246	if (to == 0 && bootverbose)
247		device_printf(dev, "PHY Cal Failed PHYCS2R %#x\n", val);
248
249	/*
250	 * OK, let things settle down a bit.
251	 */
252	DELAY(1000);
253
254	/*
255	 * Go back into normal mode now that we've calibrated the PHY.
256	 */
257	ATA_OUTL(ctlr->r_mem, AHCI_RWCR, 7);
258}
259
260static void
261ahci_a10_ch_start(struct ahci_channel *ch)
262{
263	uint32_t reg;
264
265	/*
266	 * Magical values from Allwinner SDK, setup the DMA before start
267	 * operations on this channel.
268	 */
269	reg = ATA_INL(ch->r_mem, AHCI_P0DMACR);
270	reg &= ~0xff00;
271	reg |= 0x4400;
272	ATA_OUTL(ch->r_mem, AHCI_P0DMACR, reg);
273}
274
275static int
276ahci_a10_ctlr_reset(device_t dev)
277{
278
279	ahci_a10_phy_reset(dev);
280
281	return (ahci_ctlr_reset(dev));
282}
283
284static int
285ahci_a10_probe(device_t dev)
286{
287
288	if (!ofw_bus_is_compatible(dev, "allwinner,sun4i-a10-ahci"))
289		return (ENXIO);
290	device_set_desc(dev, "Allwinner Integrated AHCI controller");
291
292	return (BUS_PROBE_DEFAULT);
293}
294
295static int
296ahci_a10_attach(device_t dev)
297{
298	int error;
299	struct ahci_controller *ctlr;
300	clk_t clk_pll, clk_gate;
301
302	ctlr = device_get_softc(dev);
303	clk_pll = clk_gate = NULL;
304
305	ctlr->quirks = AHCI_Q_NOPMP;
306	ctlr->vendorid = 0;
307	ctlr->deviceid = 0;
308	ctlr->subvendorid = 0;
309	ctlr->subdeviceid = 0;
310	ctlr->r_rid = 0;
311	if (!(ctlr->r_mem = bus_alloc_resource_any(dev, SYS_RES_MEMORY,
312	    &ctlr->r_rid, RF_ACTIVE)))
313		return (ENXIO);
314
315	/* Enable clocks */
316	error = clk_get_by_ofw_index(dev, 0, 0, &clk_pll);
317	if (error != 0) {
318		device_printf(dev, "Cannot get PLL clock\n");
319		goto fail;
320	}
321	error = clk_get_by_ofw_index(dev, 0, 1, &clk_gate);
322	if (error != 0) {
323		device_printf(dev, "Cannot get gate clock\n");
324		goto fail;
325	}
326	error = clk_set_freq(clk_pll, PLL_FREQ, CLK_SET_ROUND_DOWN);
327	if (error != 0) {
328		device_printf(dev, "Cannot set PLL frequency\n");
329		goto fail;
330	}
331	error = clk_enable(clk_pll);
332	if (error != 0) {
333		device_printf(dev, "Cannot enable PLL\n");
334		goto fail;
335	}
336	error = clk_enable(clk_gate);
337	if (error != 0) {
338		device_printf(dev, "Cannot enable clk gate\n");
339		goto fail;
340	}
341
342	/* Reset controller */
343	if ((error = ahci_a10_ctlr_reset(dev)) != 0)
344		goto fail;
345
346	/*
347	 * No MSI registers on this platform.
348	 */
349	ctlr->msi = 0;
350	ctlr->numirqs = 1;
351
352	/* Channel start callback(). */
353	ctlr->ch_start = ahci_a10_ch_start;
354
355	/*
356	 * Note: ahci_attach will release ctlr->r_mem on errors automatically
357	 */
358	return (ahci_attach(dev));
359
360fail:
361	if (clk_gate != NULL)
362		clk_release(clk_gate);
363	if (clk_pll != NULL)
364		clk_release(clk_pll);
365	bus_release_resource(dev, SYS_RES_MEMORY, ctlr->r_rid, ctlr->r_mem);
366	return (error);
367}
368
369static int
370ahci_a10_detach(device_t dev)
371{
372
373	return (ahci_detach(dev));
374}
375
376static devclass_t ahci_devclass;
377
378static device_method_t ahci_ata_methods[] = {
379	DEVMETHOD(device_probe,     ahci_a10_probe),
380	DEVMETHOD(device_attach,    ahci_a10_attach),
381	DEVMETHOD(device_detach,    ahci_a10_detach),
382	DEVMETHOD(bus_print_child,  ahci_print_child),
383	DEVMETHOD(bus_alloc_resource,       ahci_alloc_resource),
384	DEVMETHOD(bus_release_resource,     ahci_release_resource),
385	DEVMETHOD(bus_setup_intr,   ahci_setup_intr),
386	DEVMETHOD(bus_teardown_intr,ahci_teardown_intr),
387	DEVMETHOD(bus_child_location_str, ahci_child_location_str),
388	DEVMETHOD_END
389};
390
391static driver_t ahci_ata_driver = {
392        "ahci",
393        ahci_ata_methods,
394        sizeof(struct ahci_controller)
395};
396
397DRIVER_MODULE(ahci, simplebus, ahci_ata_driver, ahci_devclass, 0, 0);
398