1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * Copyright (C) 2007,2010 Freescale Semiconductor, Inc.
4  * Dave Liu <daveliu@freescale.com>
5  */
6 
7 #include <common.h>
8 #include <hwconfig.h>
9 #include <i2c.h>
10 #include <asm/io.h>
11 #include <asm/fsl_mpc83xx_serdes.h>
12 #include <spd_sdram.h>
13 #include <tsec.h>
14 #include <linux/libfdt.h>
15 #include <fdt_support.h>
16 #include <fsl_esdhc.h>
17 #include <fsl_mdio.h>
18 #include <phy.h>
19 #include "pci.h"
20 #include "../common/pq-mds-pib.h"
21 
22 DECLARE_GLOBAL_DATA_PTR;
23 
board_early_init_f(void)24 int board_early_init_f(void)
25 {
26 	u8 *bcsr = (u8 *)CONFIG_SYS_BCSR;
27 
28 	/* Enable flash write */
29 	bcsr[0x9] &= ~0x04;
30 	/* Clear all of the interrupt of BCSR */
31 	bcsr[0xe] = 0xff;
32 
33 #ifdef CONFIG_FSL_SERDES
34 	immap_t *immr = (immap_t *)CONFIG_SYS_IMMR;
35 	u32 spridr = in_be32(&immr->sysconf.spridr);
36 
37 	/* we check only part num, and don't look for CPU revisions */
38 	switch (PARTID_NO_E(spridr)) {
39 	case SPR_8377:
40 		fsl_setup_serdes(CONFIG_FSL_SERDES1, FSL_SERDES_PROTO_SATA,
41 				FSL_SERDES_CLK_100, FSL_SERDES_VDD_1V);
42 		break;
43 	case SPR_8378:
44 		fsl_setup_serdes(CONFIG_FSL_SERDES1, FSL_SERDES_PROTO_SGMII,
45 				FSL_SERDES_CLK_125, FSL_SERDES_VDD_1V);
46 		break;
47 	case SPR_8379:
48 		fsl_setup_serdes(CONFIG_FSL_SERDES1, FSL_SERDES_PROTO_SATA,
49 				FSL_SERDES_CLK_100, FSL_SERDES_VDD_1V);
50 		fsl_setup_serdes(CONFIG_FSL_SERDES2, FSL_SERDES_PROTO_SATA,
51 				FSL_SERDES_CLK_100, FSL_SERDES_VDD_1V);
52 		break;
53 	default:
54 		printf("serdes not configured: unknown CPU part number: "
55 				"%04x\n", spridr >> 16);
56 		break;
57 	}
58 #endif /* CONFIG_FSL_SERDES */
59 	return 0;
60 }
61 
62 #ifdef CONFIG_FSL_ESDHC
board_mmc_init(bd_t * bd)63 int board_mmc_init(bd_t *bd)
64 {
65 	struct immap __iomem *im = (struct immap __iomem *)CONFIG_SYS_IMMR;
66 	u8 *bcsr = (u8 *)CONFIG_SYS_BCSR;
67 
68 	if (!hwconfig("esdhc"))
69 		return 0;
70 
71 	/* Set SPI_SD, SER_SD, and IRQ4_WP so that SD signals go through */
72 	bcsr[0xc] |= 0x4c;
73 
74 	/* Set proper bits in SICR to allow SD signals through */
75 	clrsetbits_be32(&im->sysconf.sicrl, SICRL_USB_B, SICRL_USB_B_SD);
76 	clrsetbits_be32(&im->sysconf.sicrh, SICRH_GPIO2_E | SICRH_SPI,
77 			SICRH_GPIO2_E_SD | SICRH_SPI_SD);
78 
79 	return fsl_esdhc_mmc_init(bd);
80 }
81 #endif
82 
83 #if defined(CONFIG_TSEC1) || defined(CONFIG_TSEC2)
board_eth_init(bd_t * bd)84 int board_eth_init(bd_t *bd)
85 {
86 	struct fsl_pq_mdio_info mdio_info;
87 	struct tsec_info_struct tsec_info[2];
88 	struct immap __iomem *im = (struct immap __iomem *)CONFIG_SYS_IMMR;
89 	u32 rcwh = in_be32(&im->reset.rcwh);
90 	u32 tsec_mode;
91 	int num = 0;
92 
93 	/* New line after Net: */
94 	printf("\n");
95 
96 #ifdef CONFIG_TSEC1
97 	SET_STD_TSEC_INFO(tsec_info[num], 1);
98 
99 	printf(CONFIG_TSEC1_NAME ": ");
100 
101 	tsec_mode = rcwh & HRCWH_TSEC1M_MASK;
102 	if (tsec_mode == HRCWH_TSEC1M_IN_RGMII) {
103 		printf("RGMII\n");
104 		/* this is default, no need to fixup */
105 	} else if (tsec_mode == HRCWH_TSEC1M_IN_SGMII) {
106 		printf("SGMII\n");
107 		tsec_info[num].phyaddr = TSEC1_PHY_ADDR_SGMII;
108 		tsec_info[num].flags = TSEC_GIGABIT;
109 	} else {
110 		printf("unsupported PHY type\n");
111 	}
112 	num++;
113 #endif
114 #ifdef CONFIG_TSEC2
115 	SET_STD_TSEC_INFO(tsec_info[num], 2);
116 
117 	printf(CONFIG_TSEC2_NAME ": ");
118 
119 	tsec_mode = rcwh & HRCWH_TSEC2M_MASK;
120 	if (tsec_mode == HRCWH_TSEC2M_IN_RGMII) {
121 		printf("RGMII\n");
122 		/* this is default, no need to fixup */
123 	} else if (tsec_mode == HRCWH_TSEC2M_IN_SGMII) {
124 		printf("SGMII\n");
125 		tsec_info[num].phyaddr = TSEC2_PHY_ADDR_SGMII;
126 		tsec_info[num].flags = TSEC_GIGABIT;
127 	} else {
128 		printf("unsupported PHY type\n");
129 	}
130 	num++;
131 #endif
132 
133 	mdio_info.regs = (struct tsec_mii_mng *)CONFIG_SYS_MDIO_BASE_ADDR;
134 	mdio_info.name = DEFAULT_MII_NAME;
135 	fsl_pq_mdio_init(bd, &mdio_info);
136 
137 	return tsec_eth_init(bd, tsec_info, num);
138 }
139 
__ft_tsec_fixup(void * blob,bd_t * bd,const char * alias,int phy_addr)140 static void __ft_tsec_fixup(void *blob, bd_t *bd, const char *alias,
141 			    int phy_addr)
142 {
143 	const u32 *ph;
144 	int off;
145 	int err;
146 
147 	off = fdt_path_offset(blob, alias);
148 	if (off < 0) {
149 		printf("WARNING: could not find %s alias: %s.\n", alias,
150 			fdt_strerror(off));
151 		return;
152 	}
153 
154 	err = fdt_fixup_phy_connection(blob, off, PHY_INTERFACE_MODE_SGMII);
155 
156 	if (err) {
157 		printf("WARNING: could not set phy-connection-type for %s: "
158 			"%s.\n", alias, fdt_strerror(err));
159 		return;
160 	}
161 
162 	ph = (u32 *)fdt_getprop(blob, off, "phy-handle", 0);
163 	if (!ph) {
164 		printf("WARNING: could not get phy-handle for %s.\n",
165 			alias);
166 		return;
167 	}
168 
169 	off = fdt_node_offset_by_phandle(blob, *ph);
170 	if (off < 0) {
171 		printf("WARNING: could not get phy node for %s: %s\n", alias,
172 			fdt_strerror(off));
173 		return;
174 	}
175 
176 	phy_addr = cpu_to_fdt32(phy_addr);
177 	err = fdt_setprop(blob, off, "reg", &phy_addr, sizeof(phy_addr));
178 	if (err < 0) {
179 		printf("WARNING: could not set phy node's reg for %s: "
180 			"%s.\n", alias, fdt_strerror(err));
181 		return;
182 	}
183 }
184 
ft_tsec_fixup(void * blob,bd_t * bd)185 static void ft_tsec_fixup(void *blob, bd_t *bd)
186 {
187 	struct immap __iomem *im = (struct immap __iomem *)CONFIG_SYS_IMMR;
188 	u32 rcwh = in_be32(&im->reset.rcwh);
189 	u32 tsec_mode;
190 
191 #ifdef CONFIG_TSEC1
192 	tsec_mode = rcwh & HRCWH_TSEC1M_MASK;
193 	if (tsec_mode == HRCWH_TSEC1M_IN_SGMII)
194 		__ft_tsec_fixup(blob, bd, "ethernet0", TSEC1_PHY_ADDR_SGMII);
195 #endif
196 
197 #ifdef CONFIG_TSEC2
198 	tsec_mode = rcwh & HRCWH_TSEC2M_MASK;
199 	if (tsec_mode == HRCWH_TSEC2M_IN_SGMII)
200 		__ft_tsec_fixup(blob, bd, "ethernet1", TSEC2_PHY_ADDR_SGMII);
201 #endif
202 }
203 #else
ft_tsec_fixup(void * blob,bd_t * bd)204 static inline void ft_tsec_fixup(void *blob, bd_t *bd) {}
205 #endif /* defined(CONFIG_TSEC1) || defined(CONFIG_TSEC2) */
206 
board_early_init_r(void)207 int board_early_init_r(void)
208 {
209 #ifdef CONFIG_PQ_MDS_PIB
210 	pib_init();
211 #endif
212 	return 0;
213 }
214 
215 #if defined(CONFIG_DDR_ECC) && !defined(CONFIG_ECC_INIT_VIA_DDRCONTROLLER)
216 extern void ddr_enable_ecc(unsigned int dram_size);
217 #endif
218 int fixed_sdram(void);
219 
dram_init(void)220 int dram_init(void)
221 {
222 	volatile immap_t *im = (immap_t *) CONFIG_SYS_IMMR;
223 	u32 msize = 0;
224 
225 	if ((im->sysconf.immrbar & IMMRBAR_BASE_ADDR) != (u32) im)
226 		return -ENXIO;
227 
228 #if defined(CONFIG_SPD_EEPROM)
229 	msize = spd_sdram();
230 #else
231 	msize = fixed_sdram();
232 #endif
233 
234 #if defined(CONFIG_DDR_ECC) && !defined(CONFIG_ECC_INIT_VIA_DDRCONTROLLER)
235 	/* Initialize DDR ECC byte */
236 	ddr_enable_ecc(msize * 1024 * 1024);
237 #endif
238 
239 	/* return total bus DDR size(bytes) */
240 	gd->ram_size = msize * 1024 * 1024;
241 
242 	return 0;
243 }
244 
245 #if !defined(CONFIG_SPD_EEPROM)
246 /*************************************************************************
247  *  fixed sdram init -- doesn't use serial presence detect.
248  ************************************************************************/
fixed_sdram(void)249 int fixed_sdram(void)
250 {
251 	volatile immap_t *im = (immap_t *) CONFIG_SYS_IMMR;
252 	u32 msize = CONFIG_SYS_DDR_SIZE * 1024 * 1024;
253 	u32 msize_log2 = __ilog2(msize);
254 
255 	im->sysconf.ddrlaw[0].bar = CONFIG_SYS_DDR_SDRAM_BASE & 0xfffff000;
256 	im->sysconf.ddrlaw[0].ar = LBLAWAR_EN | (msize_log2 - 1);
257 
258 #if (CONFIG_SYS_DDR_SIZE != 512)
259 #warning Currenly any ddr size other than 512 is not supported
260 #endif
261 	im->sysconf.ddrcdr = CONFIG_SYS_DDRCDR_VALUE;
262 	udelay(50000);
263 
264 	im->ddr.sdram_clk_cntl = CONFIG_SYS_DDR_SDRAM_CLK_CNTL;
265 	udelay(1000);
266 
267 	im->ddr.csbnds[0].csbnds = CONFIG_SYS_DDR_CS0_BNDS;
268 	im->ddr.cs_config[0] = CONFIG_SYS_DDR_CS0_CONFIG;
269 	udelay(1000);
270 
271 	im->ddr.timing_cfg_0 = CONFIG_SYS_DDR_TIMING_0;
272 	im->ddr.timing_cfg_1 = CONFIG_SYS_DDR_TIMING_1;
273 	im->ddr.timing_cfg_2 = CONFIG_SYS_DDR_TIMING_2;
274 	im->ddr.timing_cfg_3 = CONFIG_SYS_DDR_TIMING_3;
275 	im->ddr.sdram_cfg = CONFIG_SYS_DDR_SDRAM_CFG;
276 	im->ddr.sdram_cfg2 = CONFIG_SYS_DDR_SDRAM_CFG2;
277 	im->ddr.sdram_mode = CONFIG_SYS_DDR_MODE;
278 	im->ddr.sdram_mode2 = CONFIG_SYS_DDR_MODE2;
279 	im->ddr.sdram_interval = CONFIG_SYS_DDR_INTERVAL;
280 	__asm__ __volatile__("sync");
281 	udelay(1000);
282 
283 	im->ddr.sdram_cfg |= SDRAM_CFG_MEM_EN;
284 	udelay(2000);
285 	return CONFIG_SYS_DDR_SIZE;
286 }
287 #endif /*!CONFIG_SYS_SPD_EEPROM */
288 
checkboard(void)289 int checkboard(void)
290 {
291 	puts("Board: Freescale MPC837xEMDS\n");
292 	return 0;
293 }
294 
295 #ifdef CONFIG_PCI
board_pci_host_broken(void)296 int board_pci_host_broken(void)
297 {
298 	struct immap __iomem *im = (struct immap __iomem *)CONFIG_SYS_IMMR;
299 	const u32 rcw_mask = HRCWH_PCI1_ARBITER_ENABLE | HRCWH_PCI_HOST;
300 
301 	/* It's always OK in case of external arbiter. */
302 	if (hwconfig_subarg_cmp("pci", "arbiter", "external"))
303 		return 0;
304 
305 	if ((in_be32(&im->reset.rcwh) & rcw_mask) != rcw_mask)
306 		return 1;
307 
308 	return 0;
309 }
310 
ft_pci_fixup(void * blob,bd_t * bd)311 static void ft_pci_fixup(void *blob, bd_t *bd)
312 {
313 	const char *status = "broken (no arbiter)";
314 	int off;
315 	int err;
316 
317 	off = fdt_path_offset(blob, "pci0");
318 	if (off < 0) {
319 		printf("WARNING: could not find pci0 alias: %s.\n",
320 			fdt_strerror(off));
321 		return;
322 	}
323 
324 	err = fdt_setprop(blob, off, "status", status, strlen(status) + 1);
325 	if (err) {
326 		printf("WARNING: could not set status for pci0: %s.\n",
327 			fdt_strerror(err));
328 		return;
329 	}
330 }
331 #endif
332 
333 #if defined(CONFIG_OF_BOARD_SETUP)
ft_board_setup(void * blob,bd_t * bd)334 int ft_board_setup(void *blob, bd_t *bd)
335 {
336 	ft_cpu_setup(blob, bd);
337 	ft_tsec_fixup(blob, bd);
338 	fsl_fdt_fixup_dr_usb(blob, bd);
339 	fdt_fixup_esdhc(blob, bd);
340 #ifdef CONFIG_PCI
341 	ft_pci_setup(blob, bd);
342 	if (board_pci_host_broken())
343 		ft_pci_fixup(blob, bd);
344 	ft_pcie_fixup(blob, bd);
345 #endif
346 
347 	return 0;
348 }
349 #endif /* CONFIG_OF_BOARD_SETUP */
350