1 /*
2  * Copyright 2015 Freescale Semiconductor
3  *
4  * SPDX-License-Identifier:	GPL-2.0+
5  */
6 #include <common.h>
7 #include <malloc.h>
8 #include <errno.h>
9 #include <netdev.h>
10 #include <fsl_ifc.h>
11 #include <fsl_ddr.h>
12 #include <asm/io.h>
13 #include <hwconfig.h>
14 #include <fdt_support.h>
15 #include <libfdt.h>
16 #include <fsl_debug_server.h>
17 #include <fsl-mc/fsl_mc.h>
18 #include <environment.h>
19 #include <i2c.h>
20 #include <asm/arch/soc.h>
21 
22 #include "../common/qixis.h"
23 #include "ls2080ardb_qixis.h"
24 
25 #define PIN_MUX_SEL_SDHC	0x00
26 #define PIN_MUX_SEL_DSPI	0x0a
27 
28 #define SET_SDHC_MUX_SEL(reg, value)	((reg & 0xf0) | value)
29 DECLARE_GLOBAL_DATA_PTR;
30 
31 enum {
32 	MUX_TYPE_SDHC,
33 	MUX_TYPE_DSPI,
34 };
35 
36 unsigned long long get_qixis_addr(void)
37 {
38 	unsigned long long addr;
39 
40 	if (gd->flags & GD_FLG_RELOC)
41 		addr = QIXIS_BASE_PHYS;
42 	else
43 		addr = QIXIS_BASE_PHYS_EARLY;
44 
45 	/*
46 	 * IFC address under 256MB is mapped to 0x30000000, any address above
47 	 * is mapped to 0x5_10000000 up to 4GB.
48 	 */
49 	addr = addr  > 0x10000000 ? addr + 0x500000000ULL : addr + 0x30000000;
50 
51 	return addr;
52 }
53 
54 int checkboard(void)
55 {
56 	u8 sw;
57 	char buf[15];
58 
59 	cpu_name(buf);
60 	printf("Board: %s-RDB, ", buf);
61 
62 	sw = QIXIS_READ(arch);
63 	printf("Board Arch: V%d, ", sw >> 4);
64 	printf("Board version: %c, boot from ", (sw & 0xf) + 'A');
65 
66 	sw = QIXIS_READ(brdcfg[0]);
67 	sw = (sw & QIXIS_LBMAP_MASK) >> QIXIS_LBMAP_SHIFT;
68 
69 	if (sw < 0x8)
70 		printf("vBank: %d\n", sw);
71 	else if (sw == 0x9)
72 		puts("NAND\n");
73 	else
74 		printf("invalid setting of SW%u\n", QIXIS_LBMAP_SWITCH);
75 
76 	printf("FPGA: v%d.%d\n", QIXIS_READ(scver), QIXIS_READ(tagdata));
77 
78 	puts("SERDES1 Reference : ");
79 	printf("Clock1 = 156.25MHz ");
80 	printf("Clock2 = 156.25MHz");
81 
82 	puts("\nSERDES2 Reference : ");
83 	printf("Clock1 = 100MHz ");
84 	printf("Clock2 = 100MHz\n");
85 
86 	return 0;
87 }
88 
89 unsigned long get_board_sys_clk(void)
90 {
91 	u8 sysclk_conf = QIXIS_READ(brdcfg[1]);
92 
93 	switch (sysclk_conf & 0x0F) {
94 	case QIXIS_SYSCLK_83:
95 		return 83333333;
96 	case QIXIS_SYSCLK_100:
97 		return 100000000;
98 	case QIXIS_SYSCLK_125:
99 		return 125000000;
100 	case QIXIS_SYSCLK_133:
101 		return 133333333;
102 	case QIXIS_SYSCLK_150:
103 		return 150000000;
104 	case QIXIS_SYSCLK_160:
105 		return 160000000;
106 	case QIXIS_SYSCLK_166:
107 		return 166666666;
108 	}
109 	return 66666666;
110 }
111 
112 int select_i2c_ch_pca9547(u8 ch)
113 {
114 	int ret;
115 
116 	ret = i2c_write(I2C_MUX_PCA_ADDR_PRI, 0, 1, &ch, 1);
117 	if (ret) {
118 		puts("PCA: failed to select proper channel\n");
119 		return ret;
120 	}
121 
122 	return 0;
123 }
124 
125 int config_board_mux(int ctrl_type)
126 {
127 	u8 reg5;
128 
129 	reg5 = QIXIS_READ(brdcfg[5]);
130 
131 	switch (ctrl_type) {
132 	case MUX_TYPE_SDHC:
133 		reg5 = SET_SDHC_MUX_SEL(reg5, PIN_MUX_SEL_SDHC);
134 		break;
135 	case MUX_TYPE_DSPI:
136 		reg5 = SET_SDHC_MUX_SEL(reg5, PIN_MUX_SEL_DSPI);
137 		break;
138 	default:
139 		printf("Wrong mux interface type\n");
140 		return -1;
141 	}
142 
143 	QIXIS_WRITE(brdcfg[5], reg5);
144 
145 	return 0;
146 }
147 
148 int board_init(void)
149 {
150 	char *env_hwconfig;
151 	u32 __iomem *dcfg_ccsr = (u32 __iomem *)DCFG_BASE;
152 	u32 val;
153 
154 	init_final_memctl_regs();
155 
156 	val = in_le32(dcfg_ccsr + DCFG_RCWSR13 / 4);
157 
158 	env_hwconfig = getenv("hwconfig");
159 
160 	if (hwconfig_f("dspi", env_hwconfig) &&
161 	    DCFG_RCWSR13_DSPI == (val & (u32)(0xf << 8)))
162 		config_board_mux(MUX_TYPE_DSPI);
163 	else
164 		config_board_mux(MUX_TYPE_SDHC);
165 
166 #ifdef CONFIG_ENV_IS_NOWHERE
167 	gd->env_addr = (ulong)&default_environment[0];
168 #endif
169 	select_i2c_ch_pca9547(I2C_MUX_CH_DEFAULT);
170 
171 	QIXIS_WRITE(rst_ctl, QIXIS_RST_CTL_RESET_EN);
172 
173 	return 0;
174 }
175 
176 int board_early_init_f(void)
177 {
178 	fsl_lsch3_early_init_f();
179 	return 0;
180 }
181 
182 int misc_init_r(void)
183 {
184 	if (hwconfig("sdhc"))
185 		config_board_mux(MUX_TYPE_SDHC);
186 
187 	return 0;
188 }
189 
190 void detail_board_ddr_info(void)
191 {
192 	puts("\nDDR    ");
193 	print_size(gd->bd->bi_dram[0].size + gd->bd->bi_dram[1].size, "");
194 	print_ddr_info(0);
195 #ifdef CONFIG_SYS_FSL_HAS_DP_DDR
196 	if (gd->bd->bi_dram[2].size) {
197 		puts("\nDP-DDR ");
198 		print_size(gd->bd->bi_dram[2].size, "");
199 		print_ddr_info(CONFIG_DP_DDR_CTRL);
200 	}
201 #endif
202 }
203 
204 int dram_init(void)
205 {
206 	gd->ram_size = initdram(0);
207 
208 	return 0;
209 }
210 
211 #if defined(CONFIG_ARCH_MISC_INIT)
212 int arch_misc_init(void)
213 {
214 #ifdef CONFIG_FSL_DEBUG_SERVER
215 	debug_server_init();
216 #endif
217 
218 	return 0;
219 }
220 #endif
221 
222 unsigned long get_dram_size_to_hide(void)
223 {
224 	unsigned long dram_to_hide = 0;
225 
226 /* Carve the Debug Server private DRAM block from the end of DRAM */
227 #ifdef CONFIG_FSL_DEBUG_SERVER
228 	dram_to_hide += debug_server_get_dram_block_size();
229 #endif
230 
231 /* Carve the MC private DRAM block from the end of DRAM */
232 #ifdef CONFIG_FSL_MC_ENET
233 	dram_to_hide += mc_get_dram_block_size();
234 #endif
235 
236 	return roundup(dram_to_hide, CONFIG_SYS_MEM_TOP_HIDE_MIN);
237 }
238 
239 #ifdef CONFIG_FSL_MC_ENET
240 void fdt_fixup_board_enet(void *fdt)
241 {
242 	int offset;
243 
244 	offset = fdt_path_offset(fdt, "/fsl-mc");
245 
246 	if (offset < 0)
247 		offset = fdt_path_offset(fdt, "/fsl,dprc@0");
248 
249 	if (offset < 0) {
250 		printf("%s: ERROR: fsl-mc node not found in device tree (error %d)\n",
251 		       __func__, offset);
252 		return;
253 	}
254 
255 	if (get_mc_boot_status() == 0)
256 		fdt_status_okay(fdt, offset);
257 	else
258 		fdt_status_fail(fdt, offset);
259 }
260 #endif
261 
262 #ifdef CONFIG_OF_BOARD_SETUP
263 int ft_board_setup(void *blob, bd_t *bd)
264 {
265 	int err;
266 	u64 base[CONFIG_NR_DRAM_BANKS];
267 	u64 size[CONFIG_NR_DRAM_BANKS];
268 
269 	ft_cpu_setup(blob, bd);
270 
271 	/* fixup DT for the two GPP DDR banks */
272 	base[0] = gd->bd->bi_dram[0].start;
273 	size[0] = gd->bd->bi_dram[0].size;
274 	base[1] = gd->bd->bi_dram[1].start;
275 	size[1] = gd->bd->bi_dram[1].size;
276 
277 	fdt_fixup_memory_banks(blob, base, size, 2);
278 
279 #ifdef CONFIG_FSL_MC_ENET
280 	fdt_fixup_board_enet(blob);
281 	err = fsl_mc_ldpaa_exit(bd);
282 	if (err)
283 		return err;
284 #endif
285 
286 	return 0;
287 }
288 #endif
289 
290 void qixis_dump_switch(void)
291 {
292 	int i, nr_of_cfgsw;
293 
294 	QIXIS_WRITE(cms[0], 0x00);
295 	nr_of_cfgsw = QIXIS_READ(cms[1]);
296 
297 	puts("DIP switch settings dump:\n");
298 	for (i = 1; i <= nr_of_cfgsw; i++) {
299 		QIXIS_WRITE(cms[0], i);
300 		printf("SW%d = (0x%02x)\n", i, QIXIS_READ(cms[1]));
301 	}
302 }
303 
304 /*
305  * Board rev C and earlier has duplicated I2C addresses for 2nd controller.
306  * Both slots has 0x54, resulting 2nd slot unusable.
307  */
308 void update_spd_address(unsigned int ctrl_num,
309 			unsigned int slot,
310 			unsigned int *addr)
311 {
312 	u8 sw;
313 
314 	sw = QIXIS_READ(arch);
315 	if ((sw & 0xf) < 0x3) {
316 		if (ctrl_num == 1 && slot == 0)
317 			*addr = SPD_EEPROM_ADDRESS4;
318 		else if (ctrl_num == 1 && slot == 1)
319 			*addr = SPD_EEPROM_ADDRESS3;
320 	}
321 }
322