1 /*
2  * Thomas Horsten <thh@lasat.com>
3  * Copyright (C) 2000 LASAT Networks A/S.
4  *
5  *  This program is free software; you can distribute it and/or modify it
6  *  under the terms of the GNU General Public License (Version 2) as
7  *  published by the Free Software Foundation.
8  *
9  *  This program is distributed in the hope it will be useful, but WITHOUT
10  *  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11  *  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
12  *  for more details.
13  *
14  *  You should have received a copy of the GNU General Public License along
15  *  with this program; if not, write to the Free Software Foundation, Inc.,
16  *  59 Temple Place - Suite 330, Boston MA 02111-1307, USA.
17  *
18  * Routines specific to the LASAT boards
19  */
20 #include <linux/types.h>
21 #include <linux/crc32.h>
22 #include <asm/lasat/lasat.h>
23 #include <linux/kernel.h>
24 #include <linux/string.h>
25 #include <linux/ctype.h>
26 #include <linux/mutex.h>
27 #include <asm/addrspace.h>
28 #include "at93c.h"
29 /* New model description table */
30 #include "lasat_models.h"
31 
32 static DEFINE_MUTEX(lasat_eeprom_mutex);
33 
34 #define EEPROM_CRC(data, len) (~crc32(~0, data, len))
35 
36 struct lasat_info lasat_board_info;
37 
EEPROMRead(unsigned int pos,unsigned char * data,int len)38 int EEPROMRead(unsigned int pos, unsigned char *data, int len)
39 {
40 	int i;
41 
42 	for (i = 0; i < len; i++)
43 		*data++ = at93c_read(pos++);
44 
45 	return 0;
46 }
47 
EEPROMWrite(unsigned int pos,unsigned char * data,int len)48 int EEPROMWrite(unsigned int pos, unsigned char *data, int len)
49 {
50 	int i;
51 
52 	for (i = 0; i < len; i++)
53 		at93c_write(pos++, *data++);
54 
55 	return 0;
56 }
57 
init_flash_sizes(void)58 static void init_flash_sizes(void)
59 {
60 	unsigned long *lb = lasat_board_info.li_flashpart_base;
61 	unsigned long *ls = lasat_board_info.li_flashpart_size;
62 	int i;
63 
64 	ls[LASAT_MTD_BOOTLOADER] = 0x40000;
65 	ls[LASAT_MTD_SERVICE] = 0xC0000;
66 	ls[LASAT_MTD_NORMAL] = 0x100000;
67 
68 	if (!IS_LASAT_200()) {
69 		lasat_board_info.li_flash_base = 0x1e000000;
70 
71 		lb[LASAT_MTD_BOOTLOADER] = 0x1e400000;
72 
73 		if (lasat_board_info.li_flash_size > 0x200000) {
74 			ls[LASAT_MTD_CONFIG] = 0x100000;
75 			ls[LASAT_MTD_FS] = 0x500000;
76 		}
77 	} else {
78 		lasat_board_info.li_flash_base = 0x10000000;
79 
80 		if (lasat_board_info.li_flash_size < 0x1000000) {
81 			lb[LASAT_MTD_BOOTLOADER] = 0x10000000;
82 			ls[LASAT_MTD_CONFIG] = 0x100000;
83 			if (lasat_board_info.li_flash_size >= 0x400000)
84 				ls[LASAT_MTD_FS] =
85 				     lasat_board_info.li_flash_size - 0x300000;
86 		}
87 	}
88 
89 	for (i = 1; i < LASAT_MTD_LAST; i++)
90 		lb[i] = lb[i-1] + ls[i-1];
91 }
92 
lasat_init_board_info(void)93 int lasat_init_board_info(void)
94 {
95 	int c;
96 	unsigned long crc;
97 	unsigned long cfg0, cfg1;
98 	const struct product_info   *ppi;
99 	int i_n_base_models = N_BASE_MODELS;
100 	const char * const * i_txt_base_models = txt_base_models;
101 	int i_n_prids = N_PRIDS;
102 
103 	memset(&lasat_board_info, 0, sizeof(lasat_board_info));
104 
105 	/* First read the EEPROM info */
106 	EEPROMRead(0, (unsigned char *)&lasat_board_info.li_eeprom_info,
107 		   sizeof(struct lasat_eeprom_struct));
108 
109 	/* Check the CRC */
110 	crc = EEPROM_CRC((unsigned char *)(&lasat_board_info.li_eeprom_info),
111 		    sizeof(struct lasat_eeprom_struct) - 4);
112 
113 	if (crc != lasat_board_info.li_eeprom_info.crc32) {
114 		printk(KERN_WARNING "WARNING...\nWARNING...\nEEPROM CRC does "
115 		       "not match calculated, attempting to soldier on...\n");
116 	}
117 
118 	if (lasat_board_info.li_eeprom_info.version != LASAT_EEPROM_VERSION) {
119 		printk(KERN_WARNING "WARNING...\nWARNING...\nEEPROM version "
120 		       "%d, wanted version %d, attempting to soldier on...\n",
121 		       (unsigned int)lasat_board_info.li_eeprom_info.version,
122 		       LASAT_EEPROM_VERSION);
123 	}
124 
125 	cfg0 = lasat_board_info.li_eeprom_info.cfg[0];
126 	cfg1 = lasat_board_info.li_eeprom_info.cfg[1];
127 
128 	if (LASAT_W0_DSCTYPE(cfg0) != 1) {
129 		printk(KERN_WARNING "WARNING...\nWARNING...\n"
130 		       "Invalid configuration read from EEPROM, attempting to "
131 		       "soldier on...");
132 	}
133 	/* We have a valid configuration */
134 
135 	switch (LASAT_W0_SDRAMBANKSZ(cfg0)) {
136 	case 0:
137 		lasat_board_info.li_memsize = 0x0800000;
138 		break;
139 	case 1:
140 		lasat_board_info.li_memsize = 0x1000000;
141 		break;
142 	case 2:
143 		lasat_board_info.li_memsize = 0x2000000;
144 		break;
145 	case 3:
146 		lasat_board_info.li_memsize = 0x4000000;
147 		break;
148 	case 4:
149 		lasat_board_info.li_memsize = 0x8000000;
150 		break;
151 	default:
152 		lasat_board_info.li_memsize = 0;
153 	}
154 
155 	switch (LASAT_W0_SDRAMBANKS(cfg0)) {
156 	case 0:
157 		break;
158 	case 1:
159 		lasat_board_info.li_memsize *= 2;
160 		break;
161 	default:
162 		break;
163 	}
164 
165 	switch (LASAT_W0_BUSSPEED(cfg0)) {
166 	case 0x0:
167 		lasat_board_info.li_bus_hz = 60000000;
168 		break;
169 	case 0x1:
170 		lasat_board_info.li_bus_hz = 66000000;
171 		break;
172 	case 0x2:
173 		lasat_board_info.li_bus_hz = 66666667;
174 		break;
175 	case 0x3:
176 		lasat_board_info.li_bus_hz = 80000000;
177 		break;
178 	case 0x4:
179 		lasat_board_info.li_bus_hz = 83333333;
180 		break;
181 	case 0x5:
182 		lasat_board_info.li_bus_hz = 100000000;
183 		break;
184 	}
185 
186 	switch (LASAT_W0_CPUCLK(cfg0)) {
187 	case 0x0:
188 		lasat_board_info.li_cpu_hz =
189 			lasat_board_info.li_bus_hz;
190 		break;
191 	case 0x1:
192 		lasat_board_info.li_cpu_hz =
193 			lasat_board_info.li_bus_hz +
194 			(lasat_board_info.li_bus_hz >> 1);
195 		break;
196 	case 0x2:
197 		lasat_board_info.li_cpu_hz =
198 			lasat_board_info.li_bus_hz +
199 			lasat_board_info.li_bus_hz;
200 		break;
201 	case 0x3:
202 		lasat_board_info.li_cpu_hz =
203 			lasat_board_info.li_bus_hz +
204 			lasat_board_info.li_bus_hz +
205 			(lasat_board_info.li_bus_hz >> 1);
206 		break;
207 	case 0x4:
208 		lasat_board_info.li_cpu_hz =
209 			lasat_board_info.li_bus_hz +
210 			lasat_board_info.li_bus_hz +
211 			lasat_board_info.li_bus_hz;
212 		break;
213 	}
214 
215 	/* Flash size */
216 	switch (LASAT_W1_FLASHSIZE(cfg1)) {
217 	case 0:
218 		lasat_board_info.li_flash_size = 0x200000;
219 		break;
220 	case 1:
221 		lasat_board_info.li_flash_size = 0x400000;
222 		break;
223 	case 2:
224 		lasat_board_info.li_flash_size = 0x800000;
225 		break;
226 	case 3:
227 		lasat_board_info.li_flash_size = 0x1000000;
228 		break;
229 	case 4:
230 		lasat_board_info.li_flash_size = 0x2000000;
231 		break;
232 	}
233 
234 	init_flash_sizes();
235 
236 	lasat_board_info.li_bmid = LASAT_W0_BMID(cfg0);
237 	lasat_board_info.li_prid = lasat_board_info.li_eeprom_info.prid;
238 	if (lasat_board_info.li_prid == 0xffff || lasat_board_info.li_prid == 0)
239 		lasat_board_info.li_prid = lasat_board_info.li_bmid;
240 
241 	/* Base model stuff */
242 	if (lasat_board_info.li_bmid > i_n_base_models)
243 		lasat_board_info.li_bmid = i_n_base_models;
244 	strcpy(lasat_board_info.li_bmstr,
245 	       i_txt_base_models[lasat_board_info.li_bmid]);
246 
247 	/* Product ID dependent values */
248 	c = lasat_board_info.li_prid;
249 	if (c >= i_n_prids) {
250 		strcpy(lasat_board_info.li_namestr, "Unknown Model");
251 		strcpy(lasat_board_info.li_typestr, "Unknown Type");
252 	} else {
253 		ppi = &vendor_info_table[0].vi_product_info[c];
254 		strcpy(lasat_board_info.li_namestr, ppi->pi_name);
255 		if (ppi->pi_type)
256 			strcpy(lasat_board_info.li_typestr, ppi->pi_type);
257 		else
258 			sprintf(lasat_board_info.li_typestr, "%d", 10 * c);
259 	}
260 
261 	return 0;
262 }
263 
lasat_write_eeprom_info(void)264 void lasat_write_eeprom_info(void)
265 {
266 	unsigned long crc;
267 
268 	mutex_lock(&lasat_eeprom_mutex);
269 
270 	/* Generate the CRC */
271 	crc = EEPROM_CRC((unsigned char *)(&lasat_board_info.li_eeprom_info),
272 		    sizeof(struct lasat_eeprom_struct) - 4);
273 	lasat_board_info.li_eeprom_info.crc32 = crc;
274 
275 	/* Write the EEPROM info */
276 	EEPROMWrite(0, (unsigned char *)&lasat_board_info.li_eeprom_info,
277 		    sizeof(struct lasat_eeprom_struct));
278 
279 	mutex_unlock(&lasat_eeprom_mutex);
280 }
281