1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * Copyright (C) 2012-2015 Panasonic Corporation
4  * Copyright (C) 2015-2016 Socionext Inc.
5  *   Author: Masahiro Yamada <yamada.masahiro@socionext.com>
6  */
7 
8 #include <common.h>
9 #include <linux/ctype.h>
10 #include <linux/io.h>
11 
12 #include "micro-support-card.h"
13 
14 #define MICRO_SUPPORT_CARD_BASE		0x43f00000
15 #define SMC911X_BASE			((MICRO_SUPPORT_CARD_BASE) + 0x00000)
16 #define LED_BASE			((MICRO_SUPPORT_CARD_BASE) + 0x90000)
17 #define NS16550A_BASE			((MICRO_SUPPORT_CARD_BASE) + 0xb0000)
18 #define MICRO_SUPPORT_CARD_RESET	((MICRO_SUPPORT_CARD_BASE) + 0xd0034)
19 #define MICRO_SUPPORT_CARD_REVISION	((MICRO_SUPPORT_CARD_BASE) + 0xd00E0)
20 
21 /*
22  * 0: reset deassert, 1: reset
23  *
24  * bit[0]: LAN, I2C, LED
25  * bit[1]: UART
26  */
support_card_reset_deassert(void)27 static void support_card_reset_deassert(void)
28 {
29 	writel(0x00010000, MICRO_SUPPORT_CARD_RESET);
30 }
31 
support_card_reset(void)32 static void support_card_reset(void)
33 {
34 	writel(0x00020003, MICRO_SUPPORT_CARD_RESET);
35 }
36 
support_card_show_revision(void)37 static int support_card_show_revision(void)
38 {
39 	u32 revision;
40 
41 	revision = readl(MICRO_SUPPORT_CARD_REVISION);
42 	revision &= 0xff;
43 
44 	/* revision 3.6.x card changed the revision format */
45 	printf("SC:    Micro Support Card (CPLD version %s%d.%d)\n",
46 	       revision >> 4 == 6 ? "3." : "",
47 	       revision >> 4, revision & 0xf);
48 
49 	return 0;
50 }
51 
support_card_init(void)52 void support_card_init(void)
53 {
54 	support_card_reset();
55 	/*
56 	 * After power on, we need to keep the LAN controller in reset state
57 	 * for a while. (200 usec)
58 	 */
59 	udelay(200);
60 	support_card_reset_deassert();
61 
62 	support_card_show_revision();
63 }
64 
65 #if defined(CONFIG_SMC911X)
66 #include <netdev.h>
67 
board_eth_init(bd_t * bis)68 int board_eth_init(bd_t *bis)
69 {
70 	return smc911x_initialize(0, SMC911X_BASE);
71 }
72 #endif
73 
74 #if defined(CONFIG_MTD_NOR_FLASH)
75 
76 #include <mtd/cfi_flash.h>
77 
78 struct memory_bank {
79 	phys_addr_t base;
80 	unsigned long size;
81 };
82 
mem_is_flash(const struct memory_bank * mem)83 static int mem_is_flash(const struct memory_bank *mem)
84 {
85 	const int loop = 128;
86 	u32 *scratch_addr;
87 	u32 saved_value;
88 	int ret = 1;
89 	int i;
90 
91 	/* just in case, use the tail of the memory bank */
92 	scratch_addr = map_physmem(mem->base + mem->size - sizeof(u32) * loop,
93 				   sizeof(u32) * loop, MAP_NOCACHE);
94 
95 	for (i = 0; i < loop; i++, scratch_addr++) {
96 		saved_value = readl(scratch_addr);
97 		writel(~saved_value, scratch_addr);
98 		if (readl(scratch_addr) != saved_value) {
99 			/* We assume no memory or SRAM here. */
100 			writel(saved_value, scratch_addr);
101 			ret = 0;
102 			break;
103 		}
104 	}
105 
106 	unmap_physmem(scratch_addr, MAP_NOCACHE);
107 
108 	return ret;
109 }
110 
111 /* {address, size} */
112 static const struct memory_bank memory_banks[] = {
113 	{0x42000000, 0x01f00000},
114 };
115 
116 static const struct memory_bank
117 *flash_banks_list[CONFIG_SYS_MAX_FLASH_BANKS_DETECT];
118 
cfi_flash_bank_addr(int i)119 phys_addr_t cfi_flash_bank_addr(int i)
120 {
121 	return flash_banks_list[i]->base;
122 }
123 
cfi_flash_bank_size(int i)124 unsigned long cfi_flash_bank_size(int i)
125 {
126 	return flash_banks_list[i]->size;
127 }
128 
detect_num_flash_banks(void)129 static void detect_num_flash_banks(void)
130 {
131 	const struct memory_bank *memory_bank, *end;
132 
133 	cfi_flash_num_flash_banks = 0;
134 
135 	memory_bank = memory_banks;
136 	end = memory_bank + ARRAY_SIZE(memory_banks);
137 
138 	for (; memory_bank < end; memory_bank++) {
139 		if (cfi_flash_num_flash_banks >=
140 		    CONFIG_SYS_MAX_FLASH_BANKS_DETECT)
141 			break;
142 
143 		if (mem_is_flash(memory_bank)) {
144 			flash_banks_list[cfi_flash_num_flash_banks] =
145 								memory_bank;
146 
147 			debug("flash bank found: base = 0x%lx, size = 0x%lx\n",
148 			      (unsigned long)memory_bank->base,
149 			      (unsigned long)memory_bank->size);
150 			cfi_flash_num_flash_banks++;
151 		}
152 	}
153 
154 	debug("number of flash banks: %d\n", cfi_flash_num_flash_banks);
155 }
156 #else /* CONFIG_MTD_NOR_FLASH */
detect_num_flash_banks(void)157 static void detect_num_flash_banks(void)
158 {
159 };
160 #endif /* CONFIG_MTD_NOR_FLASH */
161 
support_card_late_init(void)162 void support_card_late_init(void)
163 {
164 	detect_num_flash_banks();
165 }
166 
167 static const u8 ledval_num[] = {
168 	0x7e, /* 0 */
169 	0x0c, /* 1 */
170 	0xb6, /* 2 */
171 	0x9e, /* 3 */
172 	0xcc, /* 4 */
173 	0xda, /* 5 */
174 	0xfa, /* 6 */
175 	0x4e, /* 7 */
176 	0xfe, /* 8 */
177 	0xde, /* 9 */
178 };
179 
180 static const u8 ledval_alpha[] = {
181 	0xee, /* A */
182 	0xf8, /* B */
183 	0x72, /* C */
184 	0xbc, /* D */
185 	0xf2, /* E */
186 	0xe2, /* F */
187 	0x7a, /* G */
188 	0xe8, /* H */
189 	0x08, /* I */
190 	0x3c, /* J */
191 	0xea, /* K */
192 	0x70, /* L */
193 	0x6e, /* M */
194 	0xa8, /* N */
195 	0xb8, /* O */
196 	0xe6, /* P */
197 	0xce, /* Q */
198 	0xa0, /* R */
199 	0xc8, /* S */
200 	0x8c, /* T */
201 	0x7c, /* U */
202 	0x54, /* V */
203 	0xfc, /* W */
204 	0xec, /* X */
205 	0xdc, /* Y */
206 	0xa4, /* Z */
207 };
208 
char2ledval(char c)209 static u8 char2ledval(char c)
210 {
211 	if (isdigit(c))
212 		return ledval_num[c - '0'];
213 	else if (isalpha(c))
214 		return ledval_alpha[toupper(c) - 'A'];
215 
216 	return 0;
217 }
218 
led_puts(const char * s)219 void led_puts(const char *s)
220 {
221 	int i;
222 	u32 val = 0;
223 
224 	if (!s)
225 		return;
226 
227 	for (i = 0; i < 4; i++) {
228 		val <<= 8;
229 		val |= char2ledval(*s);
230 		if (*s != '\0')
231 			s++;
232 	}
233 
234 	writel(~val, LED_BASE);
235 }
236