1 /*
2  * Copyright 2014-2015 Freescale Semiconductor
3  *
4  * SPDX-License-Identifier:	GPL-2.0+
5  */
6 
7 #include <common.h>
8 #include <fsl_ifc.h>
9 #include <ahci.h>
10 #include <scsi.h>
11 #include <asm/arch/fsl_serdes.h>
12 #include <asm/arch/soc.h>
13 #include <asm/io.h>
14 #include <asm/global_data.h>
15 #include <asm/arch-fsl-layerscape/config.h>
16 #ifdef CONFIG_LAYERSCAPE_NS_ACCESS
17 #include <fsl_csu.h>
18 #endif
19 #ifdef CONFIG_SYS_FSL_DDR
20 #include <fsl_ddr_sdram.h>
21 #include <fsl_ddr.h>
22 #endif
23 #ifdef CONFIG_CHAIN_OF_TRUST
24 #include <fsl_validate.h>
25 #endif
26 
27 DECLARE_GLOBAL_DATA_PTR;
28 
29 bool soc_has_dp_ddr(void)
30 {
31 	struct ccsr_gur __iomem *gur = (void *)(CONFIG_SYS_FSL_GUTS_ADDR);
32 	u32 svr = gur_in32(&gur->svr);
33 
34 	/* LS2085A, LS2088A, LS2048A has DP_DDR */
35 	if ((SVR_SOC_VER(svr) == SVR_LS2085A) ||
36 	    (SVR_SOC_VER(svr) == SVR_LS2088A) ||
37 	    (SVR_SOC_VER(svr) == SVR_LS2048A))
38 		return true;
39 
40 	return false;
41 }
42 
43 bool soc_has_aiop(void)
44 {
45 	struct ccsr_gur __iomem *gur = (void *)(CONFIG_SYS_FSL_GUTS_ADDR);
46 	u32 svr = gur_in32(&gur->svr);
47 
48 	/* LS2085A has AIOP */
49 	if (SVR_SOC_VER(svr) == SVR_LS2085A)
50 		return true;
51 
52 	return false;
53 }
54 
55 #if defined(CONFIG_FSL_LSCH3)
56 /*
57  * This erratum requires setting a value to eddrtqcr1 to
58  * optimal the DDR performance.
59  */
60 static void erratum_a008336(void)
61 {
62 #ifdef CONFIG_SYS_FSL_ERRATUM_A008336
63 	u32 *eddrtqcr1;
64 
65 #ifdef CONFIG_SYS_FSL_DCSR_DDR_ADDR
66 	eddrtqcr1 = (void *)CONFIG_SYS_FSL_DCSR_DDR_ADDR + 0x800;
67 	if (fsl_ddr_get_version(0) == 0x50200)
68 		out_le32(eddrtqcr1, 0x63b30002);
69 #endif
70 #ifdef CONFIG_SYS_FSL_DCSR_DDR2_ADDR
71 	eddrtqcr1 = (void *)CONFIG_SYS_FSL_DCSR_DDR2_ADDR + 0x800;
72 	if (fsl_ddr_get_version(0) == 0x50200)
73 		out_le32(eddrtqcr1, 0x63b30002);
74 #endif
75 #endif
76 }
77 
78 /*
79  * This erratum requires a register write before being Memory
80  * controller 3 being enabled.
81  */
82 static void erratum_a008514(void)
83 {
84 #ifdef CONFIG_SYS_FSL_ERRATUM_A008514
85 	u32 *eddrtqcr1;
86 
87 #ifdef CONFIG_SYS_FSL_DCSR_DDR3_ADDR
88 	eddrtqcr1 = (void *)CONFIG_SYS_FSL_DCSR_DDR3_ADDR + 0x800;
89 	out_le32(eddrtqcr1, 0x63b20002);
90 #endif
91 #endif
92 }
93 #ifdef CONFIG_SYS_FSL_ERRATUM_A009635
94 #define PLATFORM_CYCLE_ENV_VAR	"a009635_interval_val"
95 
96 static unsigned long get_internval_val_mhz(void)
97 {
98 	char *interval = getenv(PLATFORM_CYCLE_ENV_VAR);
99 	/*
100 	 *  interval is the number of platform cycles(MHz) between
101 	 *  wake up events generated by EPU.
102 	 */
103 	ulong interval_mhz = get_bus_freq(0) / (1000 * 1000);
104 
105 	if (interval)
106 		interval_mhz = simple_strtoul(interval, NULL, 10);
107 
108 	return interval_mhz;
109 }
110 
111 void erratum_a009635(void)
112 {
113 	u32 val;
114 	unsigned long interval_mhz = get_internval_val_mhz();
115 
116 	if (!interval_mhz)
117 		return;
118 
119 	val = in_le32(DCSR_CGACRE5);
120 	writel(val | 0x00000200, DCSR_CGACRE5);
121 
122 	val = in_le32(EPU_EPCMPR5);
123 	writel(interval_mhz, EPU_EPCMPR5);
124 	val = in_le32(EPU_EPCCR5);
125 	writel(val | 0x82820000, EPU_EPCCR5);
126 	val = in_le32(EPU_EPSMCR5);
127 	writel(val | 0x002f0000, EPU_EPSMCR5);
128 	val = in_le32(EPU_EPECR5);
129 	writel(val | 0x20000000, EPU_EPECR5);
130 	val = in_le32(EPU_EPGCR);
131 	writel(val | 0x80000000, EPU_EPGCR);
132 }
133 #endif	/* CONFIG_SYS_FSL_ERRATUM_A009635 */
134 
135 static void erratum_rcw_src(void)
136 {
137 #if defined(CONFIG_SPL)
138 	u32 __iomem *dcfg_ccsr = (u32 __iomem *)DCFG_BASE;
139 	u32 __iomem *dcfg_dcsr = (u32 __iomem *)DCFG_DCSR_BASE;
140 	u32 val;
141 
142 	val = in_le32(dcfg_ccsr + DCFG_PORSR1 / 4);
143 	val &= ~DCFG_PORSR1_RCW_SRC;
144 	val |= DCFG_PORSR1_RCW_SRC_NOR;
145 	out_le32(dcfg_dcsr + DCFG_DCSR_PORCR1 / 4, val);
146 #endif
147 }
148 
149 #define I2C_DEBUG_REG 0x6
150 #define I2C_GLITCH_EN 0x8
151 /*
152  * This erratum requires setting glitch_en bit to enable
153  * digital glitch filter to improve clock stability.
154  */
155 static void erratum_a009203(void)
156 {
157 	u8 __iomem *ptr;
158 #ifdef CONFIG_SYS_I2C
159 #ifdef I2C1_BASE_ADDR
160 	ptr = (u8 __iomem *)(I2C1_BASE_ADDR + I2C_DEBUG_REG);
161 
162 	writeb(I2C_GLITCH_EN, ptr);
163 #endif
164 #ifdef I2C2_BASE_ADDR
165 	ptr = (u8 __iomem *)(I2C2_BASE_ADDR + I2C_DEBUG_REG);
166 
167 	writeb(I2C_GLITCH_EN, ptr);
168 #endif
169 #ifdef I2C3_BASE_ADDR
170 	ptr = (u8 __iomem *)(I2C3_BASE_ADDR + I2C_DEBUG_REG);
171 
172 	writeb(I2C_GLITCH_EN, ptr);
173 #endif
174 #ifdef I2C4_BASE_ADDR
175 	ptr = (u8 __iomem *)(I2C4_BASE_ADDR + I2C_DEBUG_REG);
176 
177 	writeb(I2C_GLITCH_EN, ptr);
178 #endif
179 #endif
180 }
181 
182 void bypass_smmu(void)
183 {
184 	u32 val;
185 	val = (in_le32(SMMU_SCR0) | SCR0_CLIENTPD_MASK) & ~(SCR0_USFCFG_MASK);
186 	out_le32(SMMU_SCR0, val);
187 	val = (in_le32(SMMU_NSCR0) | SCR0_CLIENTPD_MASK) & ~(SCR0_USFCFG_MASK);
188 	out_le32(SMMU_NSCR0, val);
189 }
190 void fsl_lsch3_early_init_f(void)
191 {
192 	erratum_rcw_src();
193 	init_early_memctl_regs();	/* tighten IFC timing */
194 	erratum_a009203();
195 	erratum_a008514();
196 	erratum_a008336();
197 #ifdef CONFIG_CHAIN_OF_TRUST
198 	/* In case of Secure Boot, the IBR configures the SMMU
199 	* to allow only Secure transactions.
200 	* SMMU must be reset in bypass mode.
201 	* Set the ClientPD bit and Clear the USFCFG Bit
202 	*/
203 	if (fsl_check_boot_mode_secure() == 1)
204 		bypass_smmu();
205 #endif
206 }
207 
208 #ifdef CONFIG_SCSI_AHCI_PLAT
209 int sata_init(void)
210 {
211 	struct ccsr_ahci __iomem *ccsr_ahci;
212 
213 	ccsr_ahci  = (void *)CONFIG_SYS_SATA2;
214 	out_le32(&ccsr_ahci->ppcfg, AHCI_PORT_PHY_1_CFG);
215 	out_le32(&ccsr_ahci->ptc, AHCI_PORT_TRANS_CFG);
216 
217 	ccsr_ahci  = (void *)CONFIG_SYS_SATA1;
218 	out_le32(&ccsr_ahci->ppcfg, AHCI_PORT_PHY_1_CFG);
219 	out_le32(&ccsr_ahci->ptc, AHCI_PORT_TRANS_CFG);
220 
221 	ahci_init((void __iomem *)CONFIG_SYS_SATA1);
222 	scsi_scan(0);
223 
224 	return 0;
225 }
226 #endif
227 
228 #elif defined(CONFIG_FSL_LSCH2)
229 #ifdef CONFIG_SCSI_AHCI_PLAT
230 int sata_init(void)
231 {
232 	struct ccsr_ahci __iomem *ccsr_ahci = (void *)CONFIG_SYS_SATA;
233 
234 #ifdef CONFIG_ARCH_LS1046A
235 	/* Disable SATA ECC */
236 	out_le32((void *)CONFIG_SYS_DCSR_DCFG_ADDR + 0x520, 0x80000000);
237 #endif
238 	out_le32(&ccsr_ahci->ppcfg, AHCI_PORT_PHY_1_CFG);
239 	out_le32(&ccsr_ahci->ptc, AHCI_PORT_TRANS_CFG);
240 	out_le32(&ccsr_ahci->axicc, AHCI_PORT_AXICC_CFG);
241 
242 	ahci_init((void __iomem *)CONFIG_SYS_SATA);
243 	scsi_scan(0);
244 
245 	return 0;
246 }
247 #endif
248 
249 static void erratum_a009929(void)
250 {
251 #ifdef CONFIG_SYS_FSL_ERRATUM_A009929
252 	struct ccsr_gur *gur = (void *)CONFIG_SYS_FSL_GUTS_ADDR;
253 	u32 __iomem *dcsr_cop_ccp = (void *)CONFIG_SYS_DCSR_COP_CCP_ADDR;
254 	u32 rstrqmr1 = gur_in32(&gur->rstrqmr1);
255 
256 	rstrqmr1 |= 0x00000400;
257 	gur_out32(&gur->rstrqmr1, rstrqmr1);
258 	writel(0x01000000, dcsr_cop_ccp);
259 #endif
260 }
261 
262 /*
263  * This erratum requires setting a value to eddrtqcr1 to optimal
264  * the DDR performance. The eddrtqcr1 register is in SCFG space
265  * of LS1043A and the offset is 0x157_020c.
266  */
267 #if defined(CONFIG_SYS_FSL_ERRATUM_A009660) \
268 	&& defined(CONFIG_SYS_FSL_ERRATUM_A008514)
269 #error A009660 and A008514 can not be both enabled.
270 #endif
271 
272 static void erratum_a009660(void)
273 {
274 #ifdef CONFIG_SYS_FSL_ERRATUM_A009660
275 	u32 *eddrtqcr1 = (void *)CONFIG_SYS_FSL_SCFG_ADDR + 0x20c;
276 	out_be32(eddrtqcr1, 0x63b20042);
277 #endif
278 }
279 
280 static void erratum_a008850_early(void)
281 {
282 #ifdef CONFIG_SYS_FSL_ERRATUM_A008850
283 	/* part 1 of 2 */
284 	struct ccsr_cci400 __iomem *cci = (void *)CONFIG_SYS_CCI400_ADDR;
285 	struct ccsr_ddr __iomem *ddr = (void *)CONFIG_SYS_FSL_DDR_ADDR;
286 
287 	/* disables propagation of barrier transactions to DDRC from CCI400 */
288 	out_le32(&cci->ctrl_ord, CCI400_CTRLORD_TERM_BARRIER);
289 
290 	/* disable the re-ordering in DDRC */
291 	ddr_out32(&ddr->eor, DDR_EOR_RD_REOD_DIS | DDR_EOR_WD_REOD_DIS);
292 #endif
293 }
294 
295 void erratum_a008850_post(void)
296 {
297 #ifdef CONFIG_SYS_FSL_ERRATUM_A008850
298 	/* part 2 of 2 */
299 	struct ccsr_cci400 __iomem *cci = (void *)CONFIG_SYS_CCI400_ADDR;
300 	struct ccsr_ddr __iomem *ddr = (void *)CONFIG_SYS_FSL_DDR_ADDR;
301 	u32 tmp;
302 
303 	/* enable propagation of barrier transactions to DDRC from CCI400 */
304 	out_le32(&cci->ctrl_ord, CCI400_CTRLORD_EN_BARRIER);
305 
306 	/* enable the re-ordering in DDRC */
307 	tmp = ddr_in32(&ddr->eor);
308 	tmp &= ~(DDR_EOR_RD_REOD_DIS | DDR_EOR_WD_REOD_DIS);
309 	ddr_out32(&ddr->eor, tmp);
310 #endif
311 }
312 
313 #ifdef CONFIG_SYS_FSL_ERRATUM_A010315
314 void erratum_a010315(void)
315 {
316 	int i;
317 
318 	for (i = PCIE1; i <= PCIE4; i++)
319 		if (!is_serdes_configured(i)) {
320 			debug("PCIe%d: disabled all R/W permission!\n", i);
321 			set_pcie_ns_access(i, 0);
322 		}
323 }
324 #endif
325 
326 static void erratum_a010539(void)
327 {
328 #if defined(CONFIG_SYS_FSL_ERRATUM_A010539) && defined(CONFIG_QSPI_BOOT)
329 	struct ccsr_gur __iomem *gur = (void *)(CONFIG_SYS_FSL_GUTS_ADDR);
330 	u32 porsr1;
331 
332 	porsr1 = in_be32(&gur->porsr1);
333 	porsr1 &= ~FSL_CHASSIS2_CCSR_PORSR1_RCW_MASK;
334 	out_be32((void *)(CONFIG_SYS_DCSR_DCFG_ADDR + DCFG_DCSR_PORCR1),
335 		 porsr1);
336 #endif
337 }
338 
339 void fsl_lsch2_early_init_f(void)
340 {
341 	struct ccsr_cci400 *cci = (struct ccsr_cci400 *)CONFIG_SYS_CCI400_ADDR;
342 	struct ccsr_scfg *scfg = (struct ccsr_scfg *)CONFIG_SYS_FSL_SCFG_ADDR;
343 
344 #ifdef CONFIG_LAYERSCAPE_NS_ACCESS
345 	enable_layerscape_ns_access();
346 #endif
347 
348 #ifdef CONFIG_FSL_IFC
349 	init_early_memctl_regs();	/* tighten IFC timing */
350 #endif
351 
352 #if defined(CONFIG_FSL_QSPI) && !defined(CONFIG_QSPI_BOOT)
353 	out_be32(&scfg->qspi_cfg, SCFG_QSPI_CLKSEL);
354 #endif
355 	/* Make SEC reads and writes snoopable */
356 	setbits_be32(&scfg->snpcnfgcr, SCFG_SNPCNFGCR_SECRDSNP |
357 		     SCFG_SNPCNFGCR_SECWRSNP |
358 		     SCFG_SNPCNFGCR_SATARDSNP |
359 		     SCFG_SNPCNFGCR_SATAWRSNP);
360 
361 	/*
362 	 * Enable snoop requests and DVM message requests for
363 	 * Slave insterface S4 (A53 core cluster)
364 	 */
365 	out_le32(&cci->slave[4].snoop_ctrl,
366 		 CCI400_DVM_MESSAGE_REQ_EN | CCI400_SNOOP_REQ_EN);
367 
368 	/* Erratum */
369 	erratum_a008850_early(); /* part 1 of 2 */
370 	erratum_a009929();
371 	erratum_a009660();
372 	erratum_a010539();
373 }
374 #endif
375 
376 #ifdef CONFIG_QSPI_AHB_INIT
377 /* Enable 4bytes address support and fast read */
378 int qspi_ahb_init(void)
379 {
380 	u32 *qspi_lut, lut_key, *qspi_key;
381 
382 	qspi_key = (void *)SYS_FSL_QSPI_ADDR + 0x300;
383 	qspi_lut = (void *)SYS_FSL_QSPI_ADDR + 0x310;
384 
385 	lut_key = in_be32(qspi_key);
386 
387 	if (lut_key == 0x5af05af0) {
388 		/* That means the register is BE */
389 		out_be32(qspi_key, 0x5af05af0);
390 		/* Unlock the lut table */
391 		out_be32(qspi_key + 1, 0x00000002);
392 		out_be32(qspi_lut, 0x0820040c);
393 		out_be32(qspi_lut + 1, 0x1c080c08);
394 		out_be32(qspi_lut + 2, 0x00002400);
395 		/* Lock the lut table */
396 		out_be32(qspi_key, 0x5af05af0);
397 		out_be32(qspi_key + 1, 0x00000001);
398 	} else {
399 		/* That means the register is LE */
400 		out_le32(qspi_key, 0x5af05af0);
401 		/* Unlock the lut table */
402 		out_le32(qspi_key + 1, 0x00000002);
403 		out_le32(qspi_lut, 0x0820040c);
404 		out_le32(qspi_lut + 1, 0x1c080c08);
405 		out_le32(qspi_lut + 2, 0x00002400);
406 		/* Lock the lut table */
407 		out_le32(qspi_key, 0x5af05af0);
408 		out_le32(qspi_key + 1, 0x00000001);
409 	}
410 
411 	return 0;
412 }
413 #endif
414 
415 #ifdef CONFIG_BOARD_LATE_INIT
416 int board_late_init(void)
417 {
418 #ifdef CONFIG_SCSI_AHCI_PLAT
419 	sata_init();
420 #endif
421 #ifdef CONFIG_CHAIN_OF_TRUST
422 	fsl_setenv_chain_of_trust();
423 #endif
424 #ifdef CONFIG_QSPI_AHB_INIT
425 	qspi_ahb_init();
426 #endif
427 
428 	return 0;
429 }
430 #endif
431