]> Git Repo - u-boot.git/blame - examples/82559_eeprom.c
* Implement new mechanism to export U-Boot's functions to standalone
[u-boot.git] / examples / 82559_eeprom.c
CommitLineData
7a8e9bed
WD
1
2/*
3 * Copyright 1998-2001 by Donald Becker.
4 * This software may be used and distributed according to the terms of
5 * the GNU General Public License (GPL), incorporated herein by reference.
6 * Contact the author for use under other terms.
7 *
8 * This program must be compiled with "-O"!
9 * See the bottom of this file for the suggested compile-command.
10 *
11 * The author may be reached as [email protected], or C/O
12 * Scyld Computing Corporation
13 * 410 Severn Ave., Suite 210
14 * Annapolis MD 21403
15 *
16 * Common-sense licensing statement: Using any portion of this program in
17 * your own program means that you must give credit to the original author
18 * and release the resulting code under the GPL.
19 */
20
21#define _PPC_STRING_H_ /* avoid unnecessary str/mem functions */
22#define _LINUX_STRING_H_ /* avoid unnecessary str/mem functions */
23
24#include <common.h>
27b207fd 25#include <exports.h>
7a8e9bed
WD
26#include <asm/io.h>
27
28
29/* Default EEPROM for i82559 */
30static unsigned short default_eeprom[64] = {
31 0x0100, 0x0302, 0x0504, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
32 0xffff, 0xffff, 0x40c0, 0x0000, 0x0000, 0xffff, 0xffff, 0xffff,
33 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
34 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
35 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
36 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
37 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
38 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff
39};
40
41static unsigned short eeprom[256];
42
43static int eeprom_size = 64;
44static int eeprom_addr_size = 6;
45
46static int debug = 0;
47
48static inline unsigned short swap16(unsigned short x)
49{
50 return (((x & 0xff) << 8) | ((x & 0xff00) >> 8));
51}
52
53
54static inline void *memcpy(void *dst, const void *src, unsigned int len)
55{
56 void * ret = dst;
57 while (len-- > 0) *((char *)dst)++ = *((char *)src)++;
58 return ret;
59}
60
61/* The EEPROM commands include the alway-set leading bit. */
62#define EE_WRITE_CMD (5)
63#define EE_READ_CMD (6)
64#define EE_ERASE_CMD (7)
65
66/* Serial EEPROM section. */
67#define EE_SHIFT_CLK 0x01 /* EEPROM shift clock. */
68#define EE_CS 0x02 /* EEPROM chip select. */
69#define EE_DATA_WRITE 0x04 /* EEPROM chip data in. */
70#define EE_DATA_READ 0x08 /* EEPROM chip data out. */
71#define EE_ENB (0x4800 | EE_CS)
72#define EE_WRITE_0 0x4802
73#define EE_WRITE_1 0x4806
74#define EE_OFFSET 14
75
76/* Delay between EEPROM clock transitions. */
77#define eeprom_delay(ee_addr) inw(ee_addr)
78
79/* Wait for the EEPROM to finish the previous operation. */
80static int eeprom_busy_poll(long ee_ioaddr)
81{
82 int i;
83 outw(EE_ENB, ee_ioaddr);
84 for (i = 0; i < 10000; i++) /* Typical 2000 ticks */
85 if (inw(ee_ioaddr) & EE_DATA_READ)
86 break;
87 return i;
88}
89
90/* This executes a generic EEPROM command, typically a write or write enable.
91 It returns the data output from the EEPROM, and thus may also be used for
92 reads. */
93static int do_eeprom_cmd(long ioaddr, int cmd, int cmd_len)
94{
95 unsigned retval = 0;
96 long ee_addr = ioaddr + EE_OFFSET;
97
98 if (debug > 1)
27b207fd 99 printf(" EEPROM op 0x%x: ", cmd);
7a8e9bed
WD
100
101 outw(EE_ENB | EE_SHIFT_CLK, ee_addr);
102
103 /* Shift the command bits out. */
104 do {
105 short dataval = (cmd & (1 << cmd_len)) ? EE_WRITE_1 : EE_WRITE_0;
106 outw(dataval, ee_addr);
107 eeprom_delay(ee_addr);
108 if (debug > 2)
27b207fd 109 printf("%X", inw(ee_addr) & 15);
7a8e9bed
WD
110 outw(dataval | EE_SHIFT_CLK, ee_addr);
111 eeprom_delay(ee_addr);
112 retval = (retval << 1) | ((inw(ee_addr) & EE_DATA_READ) ? 1 : 0);
113 } while (--cmd_len >= 0);
114#if 0
115 outw(EE_ENB, ee_addr);
116#endif
117 /* Terminate the EEPROM access. */
118 outw(EE_ENB & ~EE_CS, ee_addr);
119 if (debug > 1)
27b207fd 120 printf(" EEPROM result is 0x%5.5x.\n", retval);
7a8e9bed
WD
121 return retval;
122}
123
124static int read_eeprom(long ioaddr, int location, int addr_len)
125{
126 return do_eeprom_cmd(ioaddr, ((EE_READ_CMD << addr_len) | location)
127 << 16 , 3 + addr_len + 16) & 0xffff;
128}
129
130static void write_eeprom(long ioaddr, int index, int value, int addr_len)
131{
132 long ee_ioaddr = ioaddr + EE_OFFSET;
133 int i;
134
135 /* Poll for previous op finished. */
136 eeprom_busy_poll(ee_ioaddr); /* Typical 0 ticks */
137 /* Enable programming modes. */
138 do_eeprom_cmd(ioaddr, (0x4f << (addr_len-4)), 3 + addr_len);
139 /* Do the actual write. */
140 do_eeprom_cmd(ioaddr,
141 (((EE_WRITE_CMD<<addr_len) | index)<<16) | (value & 0xffff),
142 3 + addr_len + 16);
143 /* Poll for write finished. */
144 i = eeprom_busy_poll(ee_ioaddr); /* Typical 2000 ticks */
145 if (debug)
27b207fd 146 printf(" Write finished after %d ticks.\n", i);
7a8e9bed
WD
147 /* Disable programming. This command is not instantaneous, so we check
148 for busy before the next op. */
149 do_eeprom_cmd(ioaddr, (0x40 << (addr_len-4)), 3 + addr_len);
150 eeprom_busy_poll(ee_ioaddr);
151}
152
153static int reset_eeprom(unsigned long ioaddr, unsigned char *hwaddr)
154{
155 unsigned short checksum = 0;
156 int size_test;
157 int i;
158
27b207fd 159 printf("Resetting i82559 EEPROM @ 0x%08x ... ", ioaddr);
7a8e9bed
WD
160
161 size_test = do_eeprom_cmd(ioaddr, (EE_READ_CMD << 8) << 16, 27);
162 eeprom_addr_size = (size_test & 0xffe0000) == 0xffe0000 ? 8 : 6;
163 eeprom_size = 1 << eeprom_addr_size;
164
165 memcpy(eeprom, default_eeprom, sizeof default_eeprom);
166
167 for (i = 0; i < 3; i++)
168 eeprom[i] = (hwaddr[i*2+1]<<8) + hwaddr[i*2];
169
170 /* Recalculate the checksum. */
171 for (i = 0; i < eeprom_size - 1; i++)
172 checksum += eeprom[i];
173 eeprom[i] = 0xBABA - checksum;
174
175 for (i = 0; i < eeprom_size; i++)
176 write_eeprom(ioaddr, i, eeprom[i], eeprom_addr_size);
177
178 for (i = 0; i < eeprom_size; i++)
179 if (read_eeprom(ioaddr, i, eeprom_addr_size) != eeprom[i]) {
27b207fd 180 printf("failed\n");
7a8e9bed
WD
181 return 1;
182 }
183
27b207fd 184 printf("done\n");
7a8e9bed
WD
185 return 0;
186}
187
188static unsigned int hatoi(char *p, char **errp)
189{
190 unsigned int res = 0;
8bde7f77 191
7a8e9bed
WD
192 while (1) {
193 switch (*p) {
194 case 'a':
195 case 'b':
196 case 'c':
197 case 'd':
198 case 'e':
199 case 'f':
200 res |= (*p - 'a' + 10);
201 break;
202 case 'A':
203 case 'B':
204 case 'C':
205 case 'D':
206 case 'E':
207 case 'F':
208 res |= (*p - 'A' + 10);
209 break;
210 case '0':
211 case '1':
212 case '2':
213 case '3':
214 case '4':
215 case '5':
216 case '6':
217 case '7':
218 case '8':
219 case '9':
220 res |= (*p - '0');
8bde7f77 221 break;
7a8e9bed
WD
222 default:
223 if (errp) {
224 *errp = p;
225 }
226 return res;
227 }
228 p++;
229 if (*p == 0) {
230 break;
231 }
232 res <<= 4;
233 }
8bde7f77 234
7a8e9bed
WD
235 if (errp) {
236 *errp = NULL;
237 }
8bde7f77 238
7a8e9bed
WD
239 return res;
240}
241
242static unsigned char *gethwaddr(char *in, unsigned char *out)
243{
244 char tmp[3];
245 int i;
246 char *err;
8bde7f77 247
7a8e9bed
WD
248 for (i=0;i<6;i++) {
249 if (in[i*3+2] == 0 && i == 5) {
250 out[i] = hatoi(&in[i*3], &err);
251 if (err) {
252 return NULL;
253 }
254 } else if (in[i*3+2] == ':' && i < 5) {
255 tmp[0] = in[i*3];
256 tmp[1] = in[i*3+1];
257 tmp[2] = 0;
258 out[i] = hatoi(tmp, &err);
259 if (err) {
260 return NULL;
261 }
262 } else {
263 return NULL;
8bde7f77 264 }
7a8e9bed 265 }
8bde7f77 266
7a8e9bed
WD
267 return out;
268}
269
270static u32
271read_config_dword(int bus, int dev, int func, int reg)
8bde7f77 272{
7a8e9bed 273 u32 res;
8bde7f77 274
7a8e9bed
WD
275 outl(0x80000000|(bus&0xff)<<16|(dev&0x1f)<<11|(func&7)<<8|(reg&0xfc),
276 0xcf8);
277 res = inl(0xcfc);
8bde7f77
WD
278 outl(0, 0xcf8);
279 return res;
7a8e9bed
WD
280}
281
282static u16
283read_config_word(int bus, int dev, int func, int reg)
8bde7f77 284{
7a8e9bed 285 u32 res;
8bde7f77 286
7a8e9bed
WD
287 outl(0x80000000|(bus&0xff)<<16|(dev&0x1f)<<11|(func&7)<<8|(reg&0xfc),
288 0xcf8);
289 res = inw(0xcfc + (reg & 2));
8bde7f77
WD
290 outl(0, 0xcf8);
291 return res;
7a8e9bed
WD
292}
293
294static void
295write_config_word(int bus, int dev, int func, int reg, u16 data)
8bde7f77
WD
296{
297
7a8e9bed
WD
298 outl(0x80000000|(bus&0xff)<<16|(dev&0x1f)<<11|(func&7)<<8|(reg&0xfc),
299 0xcf8);
300 outw(data, 0xcfc + (reg & 2));
8bde7f77 301 outl(0, 0xcf8);
7a8e9bed
WD
302}
303
304
7a8e9bed
WD
305int main (int argc, char *argv[])
306{
307 unsigned char *eth_addr;
308 char buf[6];
309 int instance;
8bde7f77 310
27b207fd 311 app_startup(argv);
7a8e9bed 312 if (argc != 2) {
27b207fd 313 printf ("call with base Ethernet address\n");
7a8e9bed
WD
314 return 1;
315 }
8bde7f77
WD
316
317
7a8e9bed
WD
318 eth_addr = gethwaddr(argv[1], buf);
319 if (NULL == eth_addr) {
27b207fd 320 printf ("Can not parse ethernet address\n");
7a8e9bed
WD
321 return 1;
322 }
323 if (eth_addr[5] & 0x01) {
27b207fd 324 printf("Base Ethernet address must be even\n");
7a8e9bed 325 }
8bde7f77
WD
326
327
7a8e9bed
WD
328 for (instance = 0; instance < 2; instance ++) {
329 unsigned int io_addr;
330 unsigned char mac[6];
331 int bar1 = read_config_dword(0, 6+instance, 0, 0x14);
332 if (! (bar1 & 1)) {
27b207fd 333 printf("ETH%d is disabled %x\n", instance, bar1);
7a8e9bed 334 } else {
27b207fd 335 printf("ETH%d IO=0x%04x\n", instance, bar1 & ~3);
7a8e9bed
WD
336 }
337 io_addr = (bar1 & (~3L));
8bde7f77
WD
338
339
340 write_config_word(0, 6+instance, 0, 4,
7a8e9bed 341 read_config_word(0, 6+instance, 0, 4) | 1);
27b207fd 342 printf("ETH%d CMD %04x\n", instance,
7a8e9bed 343 read_config_word(0, 6+instance, 0, 4));
8bde7f77 344
7a8e9bed
WD
345 memcpy(mac, eth_addr, 6);
346 mac[5] += instance;
8bde7f77 347
27b207fd 348 printf("got io=%04x, ha=%02x:%02x:%02x:%02x:%02x:%02x\n",
8bde7f77
WD
349 io_addr, mac[0], mac[1], mac[2],
350 mac[3], mac[4], mac[5]);
7a8e9bed
WD
351 reset_eeprom(io_addr, mac);
352 }
353 return 0;
354}
This page took 0.064698 seconds and 4 git commands to generate.