]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * (C) Copyright 2001-2004 | |
3 | * Wolfgang Denk, DENX Software Engineering, wd@denx.de. | |
4 | * | |
5 | * See file CREDITS for list of people who contributed to this | |
6 | * project. | |
7 | * | |
8 | * This program is free software; you can redistribute it and/or | |
9 | * modify it under the terms of the GNU General Public License as | |
10 | * published by the Free Software Foundation; either version 2 of | |
11 | * the License, or (at your option) any later version. | |
12 | * | |
13 | * This program is distributed in the hope that it will be useful, | |
14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
16 | * GNU General Public License for more details. | |
17 | * | |
18 | * You should have received a copy of the GNU General Public License | |
19 | * along with this program; if not, write to the Free Software | |
20 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, | |
21 | * MA 02111-1307 USA | |
22 | */ | |
23 | ||
24 | #include <common.h> | |
25 | #include <command.h> | |
26 | #include <net.h> | |
27 | #include <miiphy.h> | |
28 | ||
29 | void eth_parse_enetaddr(const char *addr, uchar *enetaddr) | |
30 | { | |
31 | char *end; | |
32 | int i; | |
33 | ||
34 | for (i = 0; i < 6; ++i) { | |
35 | enetaddr[i] = addr ? simple_strtoul(addr, &end, 16) : 0; | |
36 | if (addr) | |
37 | addr = (*end) ? end + 1 : end; | |
38 | } | |
39 | } | |
40 | ||
41 | int eth_getenv_enetaddr(char *name, uchar *enetaddr) | |
42 | { | |
43 | eth_parse_enetaddr(getenv(name), enetaddr); | |
44 | return is_valid_ether_addr(enetaddr); | |
45 | } | |
46 | ||
47 | int eth_setenv_enetaddr(char *name, const uchar *enetaddr) | |
48 | { | |
49 | char buf[20]; | |
50 | ||
51 | sprintf(buf, "%pM", enetaddr); | |
52 | ||
53 | return setenv(name, buf); | |
54 | } | |
55 | ||
56 | int eth_getenv_enetaddr_by_index(int index, uchar *enetaddr) | |
57 | { | |
58 | char enetvar[32]; | |
59 | sprintf(enetvar, index ? "eth%daddr" : "ethaddr", index); | |
60 | return eth_getenv_enetaddr(enetvar, enetaddr); | |
61 | } | |
62 | ||
63 | #ifdef CONFIG_NET_MULTI | |
64 | ||
65 | /* | |
66 | * CPU and board-specific Ethernet initializations. Aliased function | |
67 | * signals caller to move on | |
68 | */ | |
69 | static int __def_eth_init(bd_t *bis) | |
70 | { | |
71 | return -1; | |
72 | } | |
73 | int cpu_eth_init(bd_t *bis) __attribute__((weak, alias("__def_eth_init"))); | |
74 | int board_eth_init(bd_t *bis) __attribute__((weak, alias("__def_eth_init"))); | |
75 | ||
76 | extern int mv6436x_eth_initialize(bd_t *); | |
77 | extern int mv6446x_eth_initialize(bd_t *); | |
78 | ||
79 | #ifdef CONFIG_API | |
80 | extern void (*push_packet)(volatile void *, int); | |
81 | ||
82 | static struct { | |
83 | uchar data[PKTSIZE]; | |
84 | int length; | |
85 | } eth_rcv_bufs[PKTBUFSRX]; | |
86 | ||
87 | static unsigned int eth_rcv_current = 0, eth_rcv_last = 0; | |
88 | #endif | |
89 | ||
90 | static struct eth_device *eth_devices, *eth_current; | |
91 | ||
92 | struct eth_device *eth_get_dev(void) | |
93 | { | |
94 | return eth_current; | |
95 | } | |
96 | ||
97 | struct eth_device *eth_get_dev_by_name(char *devname) | |
98 | { | |
99 | struct eth_device *dev, *target_dev; | |
100 | ||
101 | if (!eth_devices) | |
102 | return NULL; | |
103 | ||
104 | dev = eth_devices; | |
105 | target_dev = NULL; | |
106 | do { | |
107 | if (strcmp(devname, dev->name) == 0) { | |
108 | target_dev = dev; | |
109 | break; | |
110 | } | |
111 | dev = dev->next; | |
112 | } while (dev != eth_devices); | |
113 | ||
114 | return target_dev; | |
115 | } | |
116 | ||
117 | struct eth_device *eth_get_dev_by_index(int index) | |
118 | { | |
119 | struct eth_device *dev, *target_dev; | |
120 | int idx = 0; | |
121 | ||
122 | if (!eth_devices) | |
123 | return NULL; | |
124 | ||
125 | dev = eth_devices; | |
126 | target_dev = NULL; | |
127 | do { | |
128 | if (idx == index) { | |
129 | target_dev = dev; | |
130 | break; | |
131 | } | |
132 | dev = dev->next; | |
133 | idx++; | |
134 | } while (dev != eth_devices); | |
135 | ||
136 | return target_dev; | |
137 | } | |
138 | ||
139 | int eth_get_dev_index (void) | |
140 | { | |
141 | struct eth_device *dev; | |
142 | int num = 0; | |
143 | ||
144 | if (!eth_devices) { | |
145 | return (-1); | |
146 | } | |
147 | ||
148 | for (dev = eth_devices; dev; dev = dev->next) { | |
149 | if (dev == eth_current) | |
150 | break; | |
151 | ++num; | |
152 | } | |
153 | ||
154 | if (dev) { | |
155 | return (num); | |
156 | } | |
157 | ||
158 | return (0); | |
159 | } | |
160 | ||
161 | int eth_register(struct eth_device* dev) | |
162 | { | |
163 | struct eth_device *d; | |
164 | ||
165 | if (!eth_devices) { | |
166 | eth_current = eth_devices = dev; | |
167 | #ifdef CONFIG_NET_MULTI | |
168 | /* update current ethernet name */ | |
169 | { | |
170 | char *act = getenv("ethact"); | |
171 | if (act == NULL || strcmp(act, eth_current->name) != 0) | |
172 | setenv("ethact", eth_current->name); | |
173 | } | |
174 | #endif | |
175 | } else { | |
176 | for (d=eth_devices; d->next!=eth_devices; d=d->next); | |
177 | d->next = dev; | |
178 | } | |
179 | ||
180 | dev->state = ETH_STATE_INIT; | |
181 | dev->next = eth_devices; | |
182 | ||
183 | return 0; | |
184 | } | |
185 | ||
186 | int eth_initialize(bd_t *bis) | |
187 | { | |
188 | unsigned char env_enetaddr[6]; | |
189 | int eth_number = 0; | |
190 | ||
191 | eth_devices = NULL; | |
192 | eth_current = NULL; | |
193 | ||
194 | show_boot_progress (64); | |
195 | #if defined(CONFIG_MII) || defined(CONFIG_CMD_MII) | |
196 | miiphy_init(); | |
197 | #endif | |
198 | /* Try board-specific initialization first. If it fails or isn't | |
199 | * present, try the cpu-specific initialization */ | |
200 | if (board_eth_init(bis) < 0) | |
201 | cpu_eth_init(bis); | |
202 | ||
203 | #if defined(CONFIG_DB64360) || defined(CONFIG_CPCI750) | |
204 | mv6436x_eth_initialize(bis); | |
205 | #endif | |
206 | #if defined(CONFIG_DB64460) || defined(CONFIG_P3Mx) | |
207 | mv6446x_eth_initialize(bis); | |
208 | #endif | |
209 | if (!eth_devices) { | |
210 | puts ("No ethernet found.\n"); | |
211 | show_boot_progress (-64); | |
212 | } else { | |
213 | struct eth_device *dev = eth_devices; | |
214 | char *ethprime = getenv ("ethprime"); | |
215 | ||
216 | show_boot_progress (65); | |
217 | do { | |
218 | if (eth_number) | |
219 | puts (", "); | |
220 | ||
221 | printf("%s", dev->name); | |
222 | ||
223 | if (ethprime && strcmp (dev->name, ethprime) == 0) { | |
224 | eth_current = dev; | |
225 | puts (" [PRIME]"); | |
226 | } | |
227 | ||
228 | eth_getenv_enetaddr_by_index(eth_number, env_enetaddr); | |
229 | ||
230 | if (memcmp(env_enetaddr, "\0\0\0\0\0\0", 6)) { | |
231 | if (memcmp(dev->enetaddr, "\0\0\0\0\0\0", 6) && | |
232 | memcmp(dev->enetaddr, env_enetaddr, 6)) | |
233 | { | |
234 | printf ("\nWarning: %s MAC addresses don't match:\n", | |
235 | dev->name); | |
236 | printf ("Address in SROM is %pM\n", | |
237 | dev->enetaddr); | |
238 | printf ("Address in environment is %pM\n", | |
239 | env_enetaddr); | |
240 | } | |
241 | ||
242 | memcpy(dev->enetaddr, env_enetaddr, 6); | |
243 | } | |
244 | ||
245 | eth_number++; | |
246 | dev = dev->next; | |
247 | } while(dev != eth_devices); | |
248 | ||
249 | #ifdef CONFIG_NET_MULTI | |
250 | /* update current ethernet name */ | |
251 | if (eth_current) { | |
252 | char *act = getenv("ethact"); | |
253 | if (act == NULL || strcmp(act, eth_current->name) != 0) | |
254 | setenv("ethact", eth_current->name); | |
255 | } else | |
256 | setenv("ethact", NULL); | |
257 | #endif | |
258 | ||
259 | putc ('\n'); | |
260 | } | |
261 | ||
262 | return eth_number; | |
263 | } | |
264 | ||
265 | #ifdef CONFIG_MCAST_TFTP | |
266 | /* Multicast. | |
267 | * mcast_addr: multicast ipaddr from which multicast Mac is made | |
268 | * join: 1=join, 0=leave. | |
269 | */ | |
270 | int eth_mcast_join( IPaddr_t mcast_ip, u8 join) | |
271 | { | |
272 | u8 mcast_mac[6]; | |
273 | if (!eth_current || !eth_current->mcast) | |
274 | return -1; | |
275 | mcast_mac[5] = htonl(mcast_ip) & 0xff; | |
276 | mcast_mac[4] = (htonl(mcast_ip)>>8) & 0xff; | |
277 | mcast_mac[3] = (htonl(mcast_ip)>>16) & 0x7f; | |
278 | mcast_mac[2] = 0x5e; | |
279 | mcast_mac[1] = 0x0; | |
280 | mcast_mac[0] = 0x1; | |
281 | return eth_current->mcast(eth_current, mcast_mac, join); | |
282 | } | |
283 | ||
284 | /* the 'way' for ethernet-CRC-32. Spliced in from Linux lib/crc32.c | |
285 | * and this is the ethernet-crc method needed for TSEC -- and perhaps | |
286 | * some other adapter -- hash tables | |
287 | */ | |
288 | #define CRCPOLY_LE 0xedb88320 | |
289 | u32 ether_crc (size_t len, unsigned char const *p) | |
290 | { | |
291 | int i; | |
292 | u32 crc; | |
293 | crc = ~0; | |
294 | while (len--) { | |
295 | crc ^= *p++; | |
296 | for (i = 0; i < 8; i++) | |
297 | crc = (crc >> 1) ^ ((crc & 1) ? CRCPOLY_LE : 0); | |
298 | } | |
299 | /* an reverse the bits, cuz of way they arrive -- last-first */ | |
300 | crc = (crc >> 16) | (crc << 16); | |
301 | crc = (crc >> 8 & 0x00ff00ff) | (crc << 8 & 0xff00ff00); | |
302 | crc = (crc >> 4 & 0x0f0f0f0f) | (crc << 4 & 0xf0f0f0f0); | |
303 | crc = (crc >> 2 & 0x33333333) | (crc << 2 & 0xcccccccc); | |
304 | crc = (crc >> 1 & 0x55555555) | (crc << 1 & 0xaaaaaaaa); | |
305 | return crc; | |
306 | } | |
307 | ||
308 | #endif | |
309 | ||
310 | ||
311 | int eth_init(bd_t *bis) | |
312 | { | |
313 | int eth_number; | |
314 | struct eth_device *old_current, *dev; | |
315 | ||
316 | if (!eth_current) { | |
317 | puts ("No ethernet found.\n"); | |
318 | return -1; | |
319 | } | |
320 | ||
321 | /* Sync environment with network devices */ | |
322 | eth_number = 0; | |
323 | dev = eth_devices; | |
324 | do { | |
325 | uchar env_enetaddr[6]; | |
326 | ||
327 | if (eth_getenv_enetaddr_by_index(eth_number, env_enetaddr)) | |
328 | memcpy(dev->enetaddr, env_enetaddr, 6); | |
329 | ||
330 | ++eth_number; | |
331 | dev = dev->next; | |
332 | } while (dev != eth_devices); | |
333 | ||
334 | old_current = eth_current; | |
335 | do { | |
336 | debug("Trying %s\n", eth_current->name); | |
337 | ||
338 | if (eth_current->init(eth_current,bis) >= 0) { | |
339 | eth_current->state = ETH_STATE_ACTIVE; | |
340 | ||
341 | return 0; | |
342 | } | |
343 | debug("FAIL\n"); | |
344 | ||
345 | eth_try_another(0); | |
346 | } while (old_current != eth_current); | |
347 | ||
348 | return -1; | |
349 | } | |
350 | ||
351 | void eth_halt(void) | |
352 | { | |
353 | if (!eth_current) | |
354 | return; | |
355 | ||
356 | eth_current->halt(eth_current); | |
357 | ||
358 | eth_current->state = ETH_STATE_PASSIVE; | |
359 | } | |
360 | ||
361 | int eth_send(volatile void *packet, int length) | |
362 | { | |
363 | if (!eth_current) | |
364 | return -1; | |
365 | ||
366 | return eth_current->send(eth_current, packet, length); | |
367 | } | |
368 | ||
369 | int eth_rx(void) | |
370 | { | |
371 | if (!eth_current) | |
372 | return -1; | |
373 | ||
374 | return eth_current->recv(eth_current); | |
375 | } | |
376 | ||
377 | #ifdef CONFIG_API | |
378 | static void eth_save_packet(volatile void *packet, int length) | |
379 | { | |
380 | volatile char *p = packet; | |
381 | int i; | |
382 | ||
383 | if ((eth_rcv_last+1) % PKTBUFSRX == eth_rcv_current) | |
384 | return; | |
385 | ||
386 | if (PKTSIZE < length) | |
387 | return; | |
388 | ||
389 | for (i = 0; i < length; i++) | |
390 | eth_rcv_bufs[eth_rcv_last].data[i] = p[i]; | |
391 | ||
392 | eth_rcv_bufs[eth_rcv_last].length = length; | |
393 | eth_rcv_last = (eth_rcv_last + 1) % PKTBUFSRX; | |
394 | } | |
395 | ||
396 | int eth_receive(volatile void *packet, int length) | |
397 | { | |
398 | volatile char *p = packet; | |
399 | void *pp = push_packet; | |
400 | int i; | |
401 | ||
402 | if (eth_rcv_current == eth_rcv_last) { | |
403 | push_packet = eth_save_packet; | |
404 | eth_rx(); | |
405 | push_packet = pp; | |
406 | ||
407 | if (eth_rcv_current == eth_rcv_last) | |
408 | return -1; | |
409 | } | |
410 | ||
411 | if (length < eth_rcv_bufs[eth_rcv_current].length) | |
412 | return -1; | |
413 | ||
414 | length = eth_rcv_bufs[eth_rcv_current].length; | |
415 | ||
416 | for (i = 0; i < length; i++) | |
417 | p[i] = eth_rcv_bufs[eth_rcv_current].data[i]; | |
418 | ||
419 | eth_rcv_current = (eth_rcv_current + 1) % PKTBUFSRX; | |
420 | return length; | |
421 | } | |
422 | #endif /* CONFIG_API */ | |
423 | ||
424 | void eth_try_another(int first_restart) | |
425 | { | |
426 | static struct eth_device *first_failed = NULL; | |
427 | char *ethrotate; | |
428 | ||
429 | /* | |
430 | * Do not rotate between network interfaces when | |
431 | * 'ethrotate' variable is set to 'no'. | |
432 | */ | |
433 | if (((ethrotate = getenv ("ethrotate")) != NULL) && | |
434 | (strcmp(ethrotate, "no") == 0)) | |
435 | return; | |
436 | ||
437 | if (!eth_current) | |
438 | return; | |
439 | ||
440 | if (first_restart) { | |
441 | first_failed = eth_current; | |
442 | } | |
443 | ||
444 | eth_current = eth_current->next; | |
445 | ||
446 | #ifdef CONFIG_NET_MULTI | |
447 | /* update current ethernet name */ | |
448 | { | |
449 | char *act = getenv("ethact"); | |
450 | if (act == NULL || strcmp(act, eth_current->name) != 0) | |
451 | setenv("ethact", eth_current->name); | |
452 | } | |
453 | #endif | |
454 | ||
455 | if (first_failed == eth_current) { | |
456 | NetRestartWrap = 1; | |
457 | } | |
458 | } | |
459 | ||
460 | #ifdef CONFIG_NET_MULTI | |
461 | void eth_set_current(void) | |
462 | { | |
463 | static char *act = NULL; | |
464 | static int env_changed_id = 0; | |
465 | struct eth_device* old_current; | |
466 | int env_id; | |
467 | ||
468 | if (!eth_current) /* XXX no current */ | |
469 | return; | |
470 | ||
471 | env_id = get_env_id(); | |
472 | if ((act == NULL) || (env_changed_id != env_id)) { | |
473 | act = getenv("ethact"); | |
474 | env_changed_id = env_id; | |
475 | } | |
476 | if (act != NULL) { | |
477 | old_current = eth_current; | |
478 | do { | |
479 | if (strcmp(eth_current->name, act) == 0) | |
480 | return; | |
481 | eth_current = eth_current->next; | |
482 | } while (old_current != eth_current); | |
483 | } | |
484 | ||
485 | setenv("ethact", eth_current->name); | |
486 | } | |
487 | #endif | |
488 | ||
489 | char *eth_get_name (void) | |
490 | { | |
491 | return (eth_current ? eth_current->name : "unknown"); | |
492 | } | |
493 | ||
494 | #else /* !CONFIG_NET_MULTI */ | |
495 | ||
496 | #warning Ethernet driver is deprecated. Please update to use CONFIG_NET_MULTI | |
497 | ||
498 | extern int at91rm9200_miiphy_initialize(bd_t *bis); | |
499 | extern int mcf52x2_miiphy_initialize(bd_t *bis); | |
500 | extern int ns7520_miiphy_initialize(bd_t *bis); | |
501 | ||
502 | ||
503 | int eth_initialize(bd_t *bis) | |
504 | { | |
505 | #if defined(CONFIG_MII) || defined(CONFIG_CMD_MII) | |
506 | miiphy_init(); | |
507 | #endif | |
508 | ||
509 | #if defined(CONFIG_AT91RM9200) | |
510 | at91rm9200_miiphy_initialize(bis); | |
511 | #endif | |
512 | #if defined(CONFIG_MCF52x2) | |
513 | mcf52x2_miiphy_initialize(bis); | |
514 | #endif | |
515 | #if defined(CONFIG_DRIVER_NS7520_ETHERNET) | |
516 | ns7520_miiphy_initialize(bis); | |
517 | #endif | |
518 | return 0; | |
519 | } | |
520 | #endif |