blob: 771a7e887e4e882340d70c73457f57c926acfadf [file] [log] [blame]
wdenkaffae2b2002-08-17 09:36:01 +00001/*
2 * Copyright 1998-2001 by Donald Becker.
3 * This software may be used and distributed according to the terms of
4 * the GNU General Public License (GPL), incorporated herein by reference.
5 * Contact the author for use under other terms.
6 *
7 * This program must be compiled with "-O"!
8 * See the bottom of this file for the suggested compile-command.
9 *
10 * The author may be reached as becker@scyld.com, or C/O
11 * Scyld Computing Corporation
12 * 410 Severn Ave., Suite 210
13 * Annapolis MD 21403
14 *
15 * Common-sense licensing statement: Using any portion of this program in
16 * your own program means that you must give credit to the original author
17 * and release the resulting code under the GPL.
18 */
19
Marian Balakowiczb97a2a02008-01-08 18:14:09 +010020/* avoid unnecessary memcpy function */
Marian Balakowiczb97a2a02008-01-08 18:14:09 +010021#define _PPC_STRING_H_
wdenkaffae2b2002-08-17 09:36:01 +000022
23#include <common.h>
wdenk27b207f2003-07-24 23:38:38 +000024#include <exports.h>
wdenkaffae2b2002-08-17 09:36:01 +000025
26static int reset_eeprom(unsigned long ioaddr, unsigned char *hwaddr);
27
wdenk27b207f2003-07-24 23:38:38 +000028int eepro100_eeprom(int argc, char *argv[])
wdenkaffae2b2002-08-17 09:36:01 +000029{
30 int ret = 0;
31
32 unsigned char hwaddr1[6] = { 0x00, 0x00, 0x02, 0x03, 0x04, 0x05 };
33 unsigned char hwaddr2[6] = { 0x00, 0x00, 0x02, 0x03, 0x04, 0x06 };
34
wdenk27b207f2003-07-24 23:38:38 +000035 app_startup(argv);
36
wdenkaffae2b2002-08-17 09:36:01 +000037#if defined(CONFIG_OXC)
38 ret |= reset_eeprom(0x80000000, hwaddr1);
39 ret |= reset_eeprom(0x81000000, hwaddr2);
40#endif
41
42 return ret;
43}
44
45/* Default EEPROM for i82559 */
46static unsigned short default_eeprom[64] = {
47 0x0100, 0x0302, 0x0504, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
48 0xffff, 0xffff, 0x40c0, 0x0000, 0x0000, 0xffff, 0xffff, 0xffff,
49 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
50 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
51 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
52 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
53 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff,
54 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff, 0xffff
55};
56
57static unsigned short eeprom[256];
58
59static int eeprom_size = 64;
60static int eeprom_addr_size = 6;
61
62static int debug = 0;
63
64static inline unsigned short swap16(unsigned short x)
65{
66 return (((x & 0xff) << 8) | ((x & 0xff00) >> 8));
67}
68
69static inline void outw(short data, long addr)
70{
71 *(volatile short *)(addr) = swap16(data);
72}
73
74static inline short inw(long addr)
75{
76 return swap16(*(volatile short *)(addr));
77}
78
Wolfgang Denk4e72fb12010-03-12 22:11:00 +010079void *memcpy(void *dst, const void *src, unsigned int len)
wdenkaffae2b2002-08-17 09:36:01 +000080{
Wolfgang Denk77ddac92005-10-13 16:45:02 +020081 char *ret = dst;
Wolfgang Denk74812662005-12-12 16:06:05 +010082 while (len-- > 0) {
83 *ret++ = *((char *)src);
84 src++;
85 }
Wolfgang Denk77ddac92005-10-13 16:45:02 +020086 return (void *)ret;
wdenkaffae2b2002-08-17 09:36:01 +000087}
88
89/* The EEPROM commands include the alway-set leading bit. */
90#define EE_WRITE_CMD (5)
91#define EE_READ_CMD (6)
92#define EE_ERASE_CMD (7)
93
94/* Serial EEPROM section. */
95#define EE_SHIFT_CLK 0x01 /* EEPROM shift clock. */
96#define EE_CS 0x02 /* EEPROM chip select. */
97#define EE_DATA_WRITE 0x04 /* EEPROM chip data in. */
98#define EE_DATA_READ 0x08 /* EEPROM chip data out. */
99#define EE_ENB (0x4800 | EE_CS)
100#define EE_WRITE_0 0x4802
101#define EE_WRITE_1 0x4806
102#define EE_OFFSET 14
103
104/* Delay between EEPROM clock transitions. */
105#define eeprom_delay(ee_addr) inw(ee_addr)
106
107/* Wait for the EEPROM to finish the previous operation. */
108static int eeprom_busy_poll(long ee_ioaddr)
109{
110 int i;
111 outw(EE_ENB, ee_ioaddr);
112 for (i = 0; i < 10000; i++) /* Typical 2000 ticks */
113 if (inw(ee_ioaddr) & EE_DATA_READ)
114 break;
115 return i;
116}
117
118/* This executes a generic EEPROM command, typically a write or write enable.
119 It returns the data output from the EEPROM, and thus may also be used for
120 reads. */
121static int do_eeprom_cmd(long ioaddr, int cmd, int cmd_len)
122{
123 unsigned retval = 0;
124 long ee_addr = ioaddr + EE_OFFSET;
125
126 if (debug > 1)
wdenk27b207f2003-07-24 23:38:38 +0000127 printf(" EEPROM op 0x%x: ", cmd);
wdenkaffae2b2002-08-17 09:36:01 +0000128
129 outw(EE_ENB | EE_SHIFT_CLK, ee_addr);
130
131 /* Shift the command bits out. */
132 do {
133 short dataval = (cmd & (1 << cmd_len)) ? EE_WRITE_1 : EE_WRITE_0;
134 outw(dataval, ee_addr);
135 eeprom_delay(ee_addr);
136 if (debug > 2)
wdenk27b207f2003-07-24 23:38:38 +0000137 printf("%X", inw(ee_addr) & 15);
wdenkaffae2b2002-08-17 09:36:01 +0000138 outw(dataval | EE_SHIFT_CLK, ee_addr);
139 eeprom_delay(ee_addr);
140 retval = (retval << 1) | ((inw(ee_addr) & EE_DATA_READ) ? 1 : 0);
141 } while (--cmd_len >= 0);
142#if 0
143 outw(EE_ENB, ee_addr);
144#endif
145 /* Terminate the EEPROM access. */
146 outw(EE_ENB & ~EE_CS, ee_addr);
147 if (debug > 1)
wdenk27b207f2003-07-24 23:38:38 +0000148 printf(" EEPROM result is 0x%5.5x.\n", retval);
wdenkaffae2b2002-08-17 09:36:01 +0000149 return retval;
150}
151
152static int read_eeprom(long ioaddr, int location, int addr_len)
153{
154 return do_eeprom_cmd(ioaddr, ((EE_READ_CMD << addr_len) | location)
155 << 16 , 3 + addr_len + 16) & 0xffff;
156}
157
158static void write_eeprom(long ioaddr, int index, int value, int addr_len)
159{
160 long ee_ioaddr = ioaddr + EE_OFFSET;
161 int i;
162
163 /* Poll for previous op finished. */
164 eeprom_busy_poll(ee_ioaddr); /* Typical 0 ticks */
165 /* Enable programming modes. */
166 do_eeprom_cmd(ioaddr, (0x4f << (addr_len-4)), 3 + addr_len);
167 /* Do the actual write. */
168 do_eeprom_cmd(ioaddr,
169 (((EE_WRITE_CMD<<addr_len) | index)<<16) | (value & 0xffff),
170 3 + addr_len + 16);
171 /* Poll for write finished. */
172 i = eeprom_busy_poll(ee_ioaddr); /* Typical 2000 ticks */
173 if (debug)
wdenk27b207f2003-07-24 23:38:38 +0000174 printf(" Write finished after %d ticks.\n", i);
wdenkaffae2b2002-08-17 09:36:01 +0000175 /* Disable programming. This command is not instantaneous, so we check
176 for busy before the next op. */
177 do_eeprom_cmd(ioaddr, (0x40 << (addr_len-4)), 3 + addr_len);
178 eeprom_busy_poll(ee_ioaddr);
179}
180
181static int reset_eeprom(unsigned long ioaddr, unsigned char *hwaddr)
182{
183 unsigned short checksum = 0;
184 int size_test;
185 int i;
186
wdenk27b207f2003-07-24 23:38:38 +0000187 printf("Resetting i82559 EEPROM @ 0x%08lX ... ", ioaddr);
wdenkaffae2b2002-08-17 09:36:01 +0000188
189 size_test = do_eeprom_cmd(ioaddr, (EE_READ_CMD << 8) << 16, 27);
190 eeprom_addr_size = (size_test & 0xffe0000) == 0xffe0000 ? 8 : 6;
191 eeprom_size = 1 << eeprom_addr_size;
192
193 memcpy(eeprom, default_eeprom, sizeof default_eeprom);
194
195 for (i = 0; i < 3; i++)
196 eeprom[i] = (hwaddr[i*2+1]<<8) + hwaddr[i*2];
197
198 /* Recalculate the checksum. */
199 for (i = 0; i < eeprom_size - 1; i++)
200 checksum += eeprom[i];
201 eeprom[i] = 0xBABA - checksum;
202
203 for (i = 0; i < eeprom_size; i++)
204 write_eeprom(ioaddr, i, eeprom[i], eeprom_addr_size);
205
206 for (i = 0; i < eeprom_size; i++)
207 if (read_eeprom(ioaddr, i, eeprom_addr_size) != eeprom[i]) {
wdenk27b207f2003-07-24 23:38:38 +0000208 printf("failed\n");
wdenkaffae2b2002-08-17 09:36:01 +0000209 return 1;
210 }
211
wdenk27b207f2003-07-24 23:38:38 +0000212 printf("done\n");
wdenkaffae2b2002-08-17 09:36:01 +0000213 return 0;
214}