1 /*
2 * Copyright (c) 2003-2014 Broadcom Corporation
3 * All Rights Reserved
4 *
5 * This software is available to you under a choice of one of two
6 * licenses. You may choose to be licensed under the terms of the GNU
7 * General Public License (GPL) Version 2, available from the file
8 * COPYING in the main directory of this source tree, or the Broadcom
9 * license below:
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 *
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in
19 * the documentation and/or other materials provided with the
20 * distribution.
21 *
22 * THIS SOFTWARE IS PROVIDED BY BROADCOM ``AS IS'' AND ANY EXPRESS OR
23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
24 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL BROADCOM OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
27 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
28 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
29 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
30 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
31 * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
32 * IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
33 */
34
35 #include <linux/dma-mapping.h>
36 #include <linux/kernel.h>
37 #include <linux/delay.h>
38 #include <linux/init.h>
39 #include <linux/pci.h>
40 #include <linux/irq.h>
41 #include <linux/bitops.h>
42 #include <linux/pci_ids.h>
43 #include <linux/nodemask.h>
44
45 #include <asm/cpu.h>
46 #include <asm/mipsregs.h>
47
48 #include <asm/netlogic/common.h>
49 #include <asm/netlogic/haldefs.h>
50 #include <asm/netlogic/mips-extns.h>
51 #include <asm/netlogic/xlp-hal/xlp.h>
52 #include <asm/netlogic/xlp-hal/iomap.h>
53
54 #define SATA_CTL 0x0
55 #define SATA_STATUS 0x1 /* Status Reg */
56 #define SATA_INT 0x2 /* Interrupt Reg */
57 #define SATA_INT_MASK 0x3 /* Interrupt Mask Reg */
58 #define SATA_BIU_TIMEOUT 0x4
59 #define AXIWRSPERRLOG 0x5
60 #define AXIRDSPERRLOG 0x6
61 #define BiuTimeoutLow 0x7
62 #define BiuTimeoutHi 0x8
63 #define BiuSlvErLow 0x9
64 #define BiuSlvErHi 0xa
65 #define IO_CONFIG_SWAP_DIS 0xb
66 #define CR_REG_TIMER 0xc
67 #define CORE_ID 0xd
68 #define AXI_SLAVE_OPT1 0xe
69 #define PHY_MEM_ACCESS 0xf
70 #define PHY0_CNTRL 0x10
71 #define PHY0_STAT 0x11
72 #define PHY0_RX_ALIGN 0x12
73 #define PHY0_RX_EQ_LO 0x13
74 #define PHY0_RX_EQ_HI 0x14
75 #define PHY0_BIST_LOOP 0x15
76 #define PHY1_CNTRL 0x16
77 #define PHY1_STAT 0x17
78 #define PHY1_RX_ALIGN 0x18
79 #define PHY1_RX_EQ_LO 0x19
80 #define PHY1_RX_EQ_HI 0x1a
81 #define PHY1_BIST_LOOP 0x1b
82 #define RdExBase 0x1c
83 #define RdExLimit 0x1d
84 #define CacheAllocBase 0x1e
85 #define CacheAllocLimit 0x1f
86 #define BiuSlaveCmdGstNum 0x20
87
88 /*SATA_CTL Bits */
89 #define SATA_RST_N BIT(0) /* Active low reset sata_core phy */
90 #define SataCtlReserve0 BIT(1)
91 #define M_CSYSREQ BIT(2) /* AXI master low power, not used */
92 #define S_CSYSREQ BIT(3) /* AXI slave low power, not used */
93 #define P0_CP_DET BIT(8) /* Reserved, bring in from pad */
94 #define P0_MP_SW BIT(9) /* Mech Switch */
95 #define P0_DISABLE BIT(10) /* disable p0 */
96 #define P0_ACT_LED_EN BIT(11) /* Active LED enable */
97 #define P0_IRST_HARD_SYNTH BIT(12) /* PHY hard synth reset */
98 #define P0_IRST_HARD_TXRX BIT(13) /* PHY lane hard reset */
99 #define P0_IRST_POR BIT(14) /* PHY power on reset*/
100 #define P0_IPDTXL BIT(15) /* PHY Tx lane dis/power down */
101 #define P0_IPDRXL BIT(16) /* PHY Rx lane dis/power down */
102 #define P0_IPDIPDMSYNTH BIT(17) /* PHY synthesizer dis/porwer down */
103 #define P0_CP_POD_EN BIT(18) /* CP_POD enable */
104 #define P0_AT_BYPASS BIT(19) /* P0 address translation by pass */
105 #define P1_CP_DET BIT(20) /* Reserved,Cold Detect */
106 #define P1_MP_SW BIT(21) /* Mech Switch */
107 #define P1_DISABLE BIT(22) /* disable p1 */
108 #define P1_ACT_LED_EN BIT(23) /* Active LED enable */
109 #define P1_IRST_HARD_SYNTH BIT(24) /* PHY hard synth reset */
110 #define P1_IRST_HARD_TXRX BIT(25) /* PHY lane hard reset */
111 #define P1_IRST_POR BIT(26) /* PHY power on reset*/
112 #define P1_IPDTXL BIT(27) /* PHY Tx lane dis/porwer down */
113 #define P1_IPDRXL BIT(28) /* PHY Rx lane dis/porwer down */
114 #define P1_IPDIPDMSYNTH BIT(29) /* PHY synthesizer dis/porwer down */
115 #define P1_CP_POD_EN BIT(30)
116 #define P1_AT_BYPASS BIT(31) /* P1 address translation by pass */
117
118 /* Status register */
119 #define M_CACTIVE BIT(0) /* m_cactive, not used */
120 #define S_CACTIVE BIT(1) /* s_cactive, not used */
121 #define P0_PHY_READY BIT(8) /* phy is ready */
122 #define P0_CP_POD BIT(9) /* Cold PowerOn */
123 #define P0_SLUMBER BIT(10) /* power mode slumber */
124 #define P0_PATIAL BIT(11) /* power mode patial */
125 #define P0_PHY_SIG_DET BIT(12) /* phy dignal detect */
126 #define P0_PHY_CALI BIT(13) /* phy calibration done */
127 #define P1_PHY_READY BIT(16) /* phy is ready */
128 #define P1_CP_POD BIT(17) /* Cold PowerOn */
129 #define P1_SLUMBER BIT(18) /* power mode slumber */
130 #define P1_PATIAL BIT(19) /* power mode patial */
131 #define P1_PHY_SIG_DET BIT(20) /* phy dignal detect */
132 #define P1_PHY_CALI BIT(21) /* phy calibration done */
133
134 /* SATA CR_REG_TIMER bits */
135 #define CR_TIME_SCALE (0x1000 << 0)
136
137 /* SATA PHY specific registers start and end address */
138 #define RXCDRCALFOSC0 0x0065
139 #define CALDUTY 0x006e
140 #define RXDPIF 0x8065
141 #define PPMDRIFTMAX_HI 0x80A4
142
143 #define nlm_read_sata_reg(b, r) nlm_read_reg(b, r)
144 #define nlm_write_sata_reg(b, r, v) nlm_write_reg(b, r, v)
145 #define nlm_get_sata_pcibase(node) \
146 nlm_pcicfg_base(XLP9XX_IO_SATA_OFFSET(node))
147 #define nlm_get_sata_regbase(node) \
148 (nlm_get_sata_pcibase(node) + 0x100)
149
150 /* SATA PHY config for register block 1 0x0065 .. 0x006e */
151 static const u8 sata_phy_config1[] = {
152 0xC9, 0xC9, 0x07, 0x07, 0x18, 0x18, 0x01, 0x01, 0x22, 0x00
153 };
154
155 /* SATA PHY config for register block 2 0x8065 .. 0x80A4 */
156 static const u8 sata_phy_config2[] = {
157 0xAA, 0x00, 0x4C, 0xC9, 0xC9, 0x07, 0x07, 0x18,
158 0x18, 0x05, 0x0C, 0x10, 0x00, 0x10, 0x00, 0xFF,
159 0xCF, 0xF7, 0xE1, 0xF5, 0xFD, 0xFD, 0xFF, 0xFF,
160 0xFF, 0xFF, 0xE3, 0xE7, 0xDB, 0xF5, 0xFD, 0xFD,
161 0xF5, 0xF5, 0xFF, 0xFF, 0xE3, 0xE7, 0xDB, 0xF5,
162 0xFD, 0xFD, 0xF5, 0xF5, 0xFF, 0xFF, 0xFF, 0xF5,
163 0x3F, 0x00, 0x32, 0x00, 0x03, 0x01, 0x05, 0x05,
164 0x04, 0x00, 0x00, 0x08, 0x04, 0x00, 0x00, 0x04,
165 };
166
167 const int sata_phy_debug = 0; /* set to verify PHY writes */
168
sata_clear_glue_reg(u64 regbase,u32 off,u32 bit)169 static void sata_clear_glue_reg(u64 regbase, u32 off, u32 bit)
170 {
171 u32 reg_val;
172
173 reg_val = nlm_read_sata_reg(regbase, off);
174 nlm_write_sata_reg(regbase, off, (reg_val & ~bit));
175 }
176
sata_set_glue_reg(u64 regbase,u32 off,u32 bit)177 static void sata_set_glue_reg(u64 regbase, u32 off, u32 bit)
178 {
179 u32 reg_val;
180
181 reg_val = nlm_read_sata_reg(regbase, off);
182 nlm_write_sata_reg(regbase, off, (reg_val | bit));
183 }
184
write_phy_reg(u64 regbase,u32 addr,u32 physel,u8 data)185 static void write_phy_reg(u64 regbase, u32 addr, u32 physel, u8 data)
186 {
187 nlm_write_sata_reg(regbase, PHY_MEM_ACCESS,
188 (1u << 31) | (physel << 24) | (data << 16) | addr);
189 udelay(850);
190 }
191
read_phy_reg(u64 regbase,u32 addr,u32 physel)192 static u8 read_phy_reg(u64 regbase, u32 addr, u32 physel)
193 {
194 u32 val;
195
196 nlm_write_sata_reg(regbase, PHY_MEM_ACCESS,
197 (0 << 31) | (physel << 24) | (0 << 16) | addr);
198 udelay(850);
199 val = nlm_read_sata_reg(regbase, PHY_MEM_ACCESS);
200 return (val >> 16) & 0xff;
201 }
202
config_sata_phy(u64 regbase)203 static void config_sata_phy(u64 regbase)
204 {
205 u32 port, i, reg;
206 u8 val;
207
208 for (port = 0; port < 2; port++) {
209 for (i = 0, reg = RXCDRCALFOSC0; reg <= CALDUTY; reg++, i++)
210 write_phy_reg(regbase, reg, port, sata_phy_config1[i]);
211
212 for (i = 0, reg = RXDPIF; reg <= PPMDRIFTMAX_HI; reg++, i++)
213 write_phy_reg(regbase, reg, port, sata_phy_config2[i]);
214
215 /* Fix for PHY link up failures at lower temperatures */
216 write_phy_reg(regbase, 0x800F, port, 0x1f);
217
218 val = read_phy_reg(regbase, 0x0029, port);
219 write_phy_reg(regbase, 0x0029, port, val | (0x7 << 1));
220
221 val = read_phy_reg(regbase, 0x0056, port);
222 write_phy_reg(regbase, 0x0056, port, val & ~(1 << 3));
223
224 val = read_phy_reg(regbase, 0x0018, port);
225 write_phy_reg(regbase, 0x0018, port, val & ~(0x7 << 0));
226 }
227 }
228
check_phy_register(u64 regbase,u32 addr,u32 physel,u8 xdata)229 static void check_phy_register(u64 regbase, u32 addr, u32 physel, u8 xdata)
230 {
231 u8 data;
232
233 data = read_phy_reg(regbase, addr, physel);
234 pr_info("PHY read addr = 0x%x physel = %d data = 0x%x %s\n",
235 addr, physel, data, data == xdata ? "TRUE" : "FALSE");
236 }
237
verify_sata_phy_config(u64 regbase)238 static void verify_sata_phy_config(u64 regbase)
239 {
240 u32 port, i, reg;
241
242 for (port = 0; port < 2; port++) {
243 for (i = 0, reg = RXCDRCALFOSC0; reg <= CALDUTY; reg++, i++)
244 check_phy_register(regbase, reg, port,
245 sata_phy_config1[i]);
246
247 for (i = 0, reg = RXDPIF; reg <= PPMDRIFTMAX_HI; reg++, i++)
248 check_phy_register(regbase, reg, port,
249 sata_phy_config2[i]);
250 }
251 }
252
nlm_sata_firmware_init(int node)253 static void nlm_sata_firmware_init(int node)
254 {
255 u32 reg_val;
256 u64 regbase;
257 int n;
258
259 pr_info("Initializing XLP9XX On-chip AHCI...\n");
260 regbase = nlm_get_sata_regbase(node);
261
262 /* Reset port0 */
263 sata_clear_glue_reg(regbase, SATA_CTL, P0_IRST_POR);
264 sata_clear_glue_reg(regbase, SATA_CTL, P0_IRST_HARD_TXRX);
265 sata_clear_glue_reg(regbase, SATA_CTL, P0_IRST_HARD_SYNTH);
266 sata_clear_glue_reg(regbase, SATA_CTL, P0_IPDTXL);
267 sata_clear_glue_reg(regbase, SATA_CTL, P0_IPDRXL);
268 sata_clear_glue_reg(regbase, SATA_CTL, P0_IPDIPDMSYNTH);
269
270 /* port1 */
271 sata_clear_glue_reg(regbase, SATA_CTL, P1_IRST_POR);
272 sata_clear_glue_reg(regbase, SATA_CTL, P1_IRST_HARD_TXRX);
273 sata_clear_glue_reg(regbase, SATA_CTL, P1_IRST_HARD_SYNTH);
274 sata_clear_glue_reg(regbase, SATA_CTL, P1_IPDTXL);
275 sata_clear_glue_reg(regbase, SATA_CTL, P1_IPDRXL);
276 sata_clear_glue_reg(regbase, SATA_CTL, P1_IPDIPDMSYNTH);
277 udelay(300);
278
279 /* Set PHY */
280 sata_set_glue_reg(regbase, SATA_CTL, P0_IPDTXL);
281 sata_set_glue_reg(regbase, SATA_CTL, P0_IPDRXL);
282 sata_set_glue_reg(regbase, SATA_CTL, P0_IPDIPDMSYNTH);
283 sata_set_glue_reg(regbase, SATA_CTL, P1_IPDTXL);
284 sata_set_glue_reg(regbase, SATA_CTL, P1_IPDRXL);
285 sata_set_glue_reg(regbase, SATA_CTL, P1_IPDIPDMSYNTH);
286
287 udelay(1000);
288 sata_set_glue_reg(regbase, SATA_CTL, P0_IRST_POR);
289 udelay(1000);
290 sata_set_glue_reg(regbase, SATA_CTL, P1_IRST_POR);
291 udelay(1000);
292
293 /* setup PHY */
294 config_sata_phy(regbase);
295 if (sata_phy_debug)
296 verify_sata_phy_config(regbase);
297
298 udelay(1000);
299 sata_set_glue_reg(regbase, SATA_CTL, P0_IRST_HARD_TXRX);
300 sata_set_glue_reg(regbase, SATA_CTL, P0_IRST_HARD_SYNTH);
301 sata_set_glue_reg(regbase, SATA_CTL, P1_IRST_HARD_TXRX);
302 sata_set_glue_reg(regbase, SATA_CTL, P1_IRST_HARD_SYNTH);
303 udelay(300);
304
305 /* Override reset in serial PHY mode */
306 sata_set_glue_reg(regbase, CR_REG_TIMER, CR_TIME_SCALE);
307 /* Set reset SATA */
308 sata_set_glue_reg(regbase, SATA_CTL, SATA_RST_N);
309 sata_set_glue_reg(regbase, SATA_CTL, M_CSYSREQ);
310 sata_set_glue_reg(regbase, SATA_CTL, S_CSYSREQ);
311
312 pr_debug("Waiting for PHYs to come up.\n");
313 n = 10000;
314 do {
315 reg_val = nlm_read_sata_reg(regbase, SATA_STATUS);
316 if ((reg_val & P1_PHY_READY) && (reg_val & P0_PHY_READY))
317 break;
318 udelay(10);
319 } while (--n > 0);
320
321 if (reg_val & P0_PHY_READY)
322 pr_info("PHY0 is up.\n");
323 else
324 pr_info("PHY0 is down.\n");
325 if (reg_val & P1_PHY_READY)
326 pr_info("PHY1 is up.\n");
327 else
328 pr_info("PHY1 is down.\n");
329
330 pr_info("XLP AHCI Init Done.\n");
331 }
332
nlm_ahci_init(void)333 static int __init nlm_ahci_init(void)
334 {
335 int node;
336
337 if (!cpu_is_xlp9xx())
338 return 0;
339 for (node = 0; node < NLM_NR_NODES; node++)
340 if (nlm_node_present(node))
341 nlm_sata_firmware_init(node);
342 return 0;
343 }
344
nlm_sata_intr_ack(struct irq_data * data)345 static void nlm_sata_intr_ack(struct irq_data *data)
346 {
347 u64 regbase;
348 u32 val;
349 int node;
350
351 node = data->irq / NLM_IRQS_PER_NODE;
352 regbase = nlm_get_sata_regbase(node);
353 val = nlm_read_sata_reg(regbase, SATA_INT);
354 sata_set_glue_reg(regbase, SATA_INT, val);
355 }
356
nlm_sata_fixup_bar(struct pci_dev * dev)357 static void nlm_sata_fixup_bar(struct pci_dev *dev)
358 {
359 dev->resource[5] = dev->resource[0];
360 memset(&dev->resource[0], 0, sizeof(dev->resource[0]));
361 }
362
nlm_sata_fixup_final(struct pci_dev * dev)363 static void nlm_sata_fixup_final(struct pci_dev *dev)
364 {
365 u32 val;
366 u64 regbase;
367 int node;
368
369 /* Find end bridge function to find node */
370 node = xlp_socdev_to_node(dev);
371 regbase = nlm_get_sata_regbase(node);
372
373 /* clear pending interrupts and then enable them */
374 val = nlm_read_sata_reg(regbase, SATA_INT);
375 sata_set_glue_reg(regbase, SATA_INT, val);
376
377 /* Enable only the core interrupt */
378 sata_set_glue_reg(regbase, SATA_INT_MASK, 0x1);
379
380 dev->irq = nlm_irq_to_xirq(node, PIC_SATA_IRQ);
381 nlm_set_pic_extra_ack(node, PIC_SATA_IRQ, nlm_sata_intr_ack);
382 }
383
384 arch_initcall(nlm_ahci_init);
385
386 DECLARE_PCI_FIXUP_HEADER(PCI_VENDOR_ID_BROADCOM, PCI_DEVICE_ID_XLP9XX_SATA,
387 nlm_sata_fixup_bar);
388
389 DECLARE_PCI_FIXUP_FINAL(PCI_VENDOR_ID_BROADCOM, PCI_DEVICE_ID_XLP9XX_SATA,
390 nlm_sata_fixup_final);
391