1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27#include <common.h>
28
29#include <malloc.h>
30#include <net.h>
31#include <netdev.h>
32#include <asm/inca-ip.h>
33#include <asm/addrspace.h>
34
35
36#define NUM_RX_DESC PKTBUFSRX
37#define NUM_TX_DESC 3
38#define TOUT_LOOP 1000000
39
40
41#define DELAY udelay(10000)
42
43
44
45
46static void SWORD(volatile u32 * reg, u32 value)
47{
48 *reg = value;
49}
50
51#define DMA_WRITE_REG(reg, value) *((volatile u32 *)reg) = (u32)value;
52#define DMA_READ_REG(reg, value) value = (u32)*((volatile u32*)reg)
53#define SW_WRITE_REG(reg, value) \
54 SWORD(reg, value);\
55 DELAY;\
56 SWORD(reg, value);
57
58#define SW_READ_REG(reg, value) \
59 value = (u32)*((volatile u32*)reg);\
60 DELAY;\
61 value = (u32)*((volatile u32*)reg);
62
63#define INCA_DMA_TX_POLLING_TIME 0x07
64#define INCA_DMA_RX_POLLING_TIME 0x07
65
66#define INCA_DMA_TX_HOLD 0x80000000
67#define INCA_DMA_TX_EOP 0x40000000
68#define INCA_DMA_TX_SOP 0x20000000
69#define INCA_DMA_TX_ICPT 0x10000000
70#define INCA_DMA_TX_IEOP 0x08000000
71
72#define INCA_DMA_RX_C 0x80000000
73#define INCA_DMA_RX_SOP 0x40000000
74#define INCA_DMA_RX_EOP 0x20000000
75
76#define INCA_SWITCH_PHY_SPEED_10H 0x1
77#define INCA_SWITCH_PHY_SPEED_10F 0x5
78#define INCA_SWITCH_PHY_SPEED_100H 0x2
79#define INCA_SWITCH_PHY_SPEED_100F 0x6
80
81
82#define INCA_IP_AUTO_MDIX_LAN_PORTS_DIR INCA_IP_Ports_P1_DIR
83#define INCA_IP_AUTO_MDIX_LAN_PORTS_ALTSEL INCA_IP_Ports_P1_ALTSEL
84#define INCA_IP_AUTO_MDIX_LAN_PORTS_OUT INCA_IP_Ports_P1_OUT
85#define INCA_IP_AUTO_MDIX_LAN_GPIO_PIN_RXTX 16
86
87#define WAIT_SIGNAL_RETRIES 100
88#define WAIT_LINK_RETRIES 100
89#define LINK_RETRY_DELAY 2000
90
91
92typedef struct
93{
94 union {
95 struct {
96 volatile u32 HOLD :1;
97 volatile u32 ICpt :1;
98 volatile u32 IEop :1;
99 volatile u32 offset :3;
100 volatile u32 reserved0 :4;
101 volatile u32 NFB :22;
102 }field;
103
104 volatile u32 word;
105 }params;
106
107 volatile u32 nextRxDescPtr;
108
109 volatile u32 RxDataPtr;
110
111 union {
112 struct {
113 volatile u32 C :1;
114 volatile u32 Sop :1;
115 volatile u32 Eop :1;
116 volatile u32 reserved3 :12;
117 volatile u32 NBT :17;
118 }field;
119
120 volatile u32 word;
121 }status;
122
123} inca_rx_descriptor_t;
124
125
126typedef struct
127{
128 union {
129 struct {
130 volatile u32 HOLD :1;
131 volatile u32 Eop :1;
132 volatile u32 Sop :1;
133 volatile u32 ICpt :1;
134 volatile u32 IEop :1;
135 volatile u32 reserved0 :5;
136 volatile u32 NBA :22;
137 }field;
138
139 volatile u32 word;
140 }params;
141
142 volatile u32 nextTxDescPtr;
143
144 volatile u32 TxDataPtr;
145
146 volatile u32 C :1;
147 volatile u32 reserved3 :31;
148
149} inca_tx_descriptor_t;
150
151
152static inca_rx_descriptor_t rx_ring[NUM_RX_DESC] __attribute__ ((aligned(16)));
153static inca_tx_descriptor_t tx_ring[NUM_TX_DESC] __attribute__ ((aligned(16)));
154
155static int tx_new, rx_new, tx_hold, rx_hold;
156static int tx_old_hold = -1;
157static int initialized = 0;
158
159
160static int inca_switch_init(struct eth_device *dev, bd_t * bis);
161static int inca_switch_send(struct eth_device *dev, volatile void *packet, int length);
162static int inca_switch_recv(struct eth_device *dev);
163static void inca_switch_halt(struct eth_device *dev);
164static void inca_init_switch_chip(void);
165static void inca_dma_init(void);
166static int inca_amdix(void);
167
168
169int inca_switch_initialize(bd_t * bis)
170{
171 struct eth_device *dev;
172
173#if 0
174 printf("Entered inca_switch_initialize()\n");
175#endif
176
177 if (!(dev = (struct eth_device *) malloc (sizeof *dev))) {
178 printf("Failed to allocate memory\n");
179 return 0;
180 }
181 memset(dev, 0, sizeof(*dev));
182
183 inca_dma_init();
184
185 inca_init_switch_chip();
186
187#if defined(CONFIG_INCA_IP_SWITCH_AMDIX)
188 inca_amdix();
189#endif
190
191 sprintf(dev->name, "INCA-IP Switch");
192 dev->init = inca_switch_init;
193 dev->halt = inca_switch_halt;
194 dev->send = inca_switch_send;
195 dev->recv = inca_switch_recv;
196
197 eth_register(dev);
198
199#if 0
200 printf("Leaving inca_switch_initialize()\n");
201#endif
202
203 return 0;
204}
205
206
207static int inca_switch_init(struct eth_device *dev, bd_t * bis)
208{
209 int i;
210 u32 v, regValue;
211 u16 wTmp;
212
213#if 0
214 printf("Entering inca_switch_init()\n");
215#endif
216
217
218
219 wTmp = (u16)dev->enetaddr[0];
220 regValue = (wTmp << 8) | dev->enetaddr[1];
221
222 SW_WRITE_REG(INCA_IP_Switch_PMAC_SA1, regValue);
223
224 wTmp = (u16)dev->enetaddr[2];
225 regValue = (wTmp << 8) | dev->enetaddr[3];
226 regValue = regValue << 16;
227 wTmp = (u16)dev->enetaddr[4];
228 regValue |= (wTmp<<8) | dev->enetaddr[5];
229
230 SW_WRITE_REG(INCA_IP_Switch_PMAC_SA2, regValue);
231
232
233
234 for (i = 0; i < NUM_RX_DESC; i++) {
235 inca_rx_descriptor_t * rx_desc = (inca_rx_descriptor_t *)CKSEG1ADDR(&rx_ring[i]);
236 memset(rx_desc, 0, sizeof(rx_ring[i]));
237
238
239
240 rx_desc->params.field.NFB = PKTSIZE_ALIGN;
241
242
243
244
245 rx_desc->params.field.offset = 0;
246
247
248
249 if (i == (NUM_RX_DESC - 1)) {
250
251
252
253 rx_desc->nextRxDescPtr = (u32)CKSEG1ADDR(rx_ring);
254 } else {
255
256
257 rx_desc->nextRxDescPtr = (u32)CKSEG1ADDR(&rx_ring[i+1]);
258 }
259
260 rx_desc->RxDataPtr = (u32)CKSEG1ADDR(NetRxPackets[i]);
261 }
262
263#if 0
264 printf("rx_ring = 0x%08X 0x%08X\n", (u32)rx_ring, (u32)&rx_ring[0]);
265 printf("tx_ring = 0x%08X 0x%08X\n", (u32)tx_ring, (u32)&tx_ring[0]);
266#endif
267
268 for (i = 0; i < NUM_TX_DESC; i++) {
269 inca_tx_descriptor_t * tx_desc = (inca_tx_descriptor_t *)CKSEG1ADDR(&tx_ring[i]);
270
271 memset(tx_desc, 0, sizeof(tx_ring[i]));
272
273 tx_desc->params.word = 0;
274 tx_desc->params.field.HOLD = 1;
275 tx_desc->C = 1;
276
277
278
279 if (i == (NUM_TX_DESC - 1)) {
280
281
282
283 tx_desc->nextTxDescPtr = (u32)CKSEG1ADDR(tx_ring);
284 } else {
285
286
287 tx_desc->nextTxDescPtr = (u32)CKSEG1ADDR(&tx_ring[i+1]);
288 }
289 }
290
291
292
293 DMA_READ_REG(INCA_IP_DMA_DMA_RXISR, v);
294#if 0
295 printf("RX status = 0x%08X\n", v);
296#endif
297
298
299
300 DMA_WRITE_REG(INCA_IP_DMA_DMA_RXFRDA0, (u32)rx_ring);
301
302
303
304 DMA_WRITE_REG(INCA_IP_DMA_DMA_RXCCR0, INCA_IP_DMA_DMA_RXCCR0_INIT);
305
306
307
308 DMA_READ_REG(INCA_IP_DMA_DMA_TXISR, v);
309#if 0
310 printf("TX status = 0x%08X\n", v);
311#endif
312
313
314
315 DMA_WRITE_REG(INCA_IP_DMA_DMA_TXFRDA0, (u32)tx_ring);
316
317 tx_new = rx_new = 0;
318
319 tx_hold = NUM_TX_DESC - 1;
320 rx_hold = NUM_RX_DESC - 1;
321
322#if 0
323 rx_ring[rx_hold].params.field.HOLD = 1;
324#endif
325
326
327
328
329
330
331 SW_WRITE_REG(INCA_IP_Switch_ST_PT,0x3f);
332
333#if 0
334 printf("Leaving inca_switch_init()\n");
335#endif
336
337 return 0;
338}
339
340
341static int inca_switch_send(struct eth_device *dev, volatile void *packet, int length)
342{
343 int i;
344 int res = -1;
345 u32 command;
346 u32 regValue;
347 inca_tx_descriptor_t * tx_desc = (inca_tx_descriptor_t *)CKSEG1ADDR(&tx_ring[tx_new]);
348
349#if 0
350 printf("Entered inca_switch_send()\n");
351#endif
352
353 if (length <= 0) {
354 printf ("%s: bad packet size: %d\n", dev->name, length);
355 goto Done;
356 }
357
358 for(i = 0; tx_desc->C == 0; i++) {
359 if (i >= TOUT_LOOP) {
360 printf("%s: tx error buffer not ready\n", dev->name);
361 goto Done;
362 }
363 }
364
365 if (tx_old_hold >= 0) {
366 ((inca_tx_descriptor_t *)CKSEG1ADDR(&tx_ring[tx_old_hold]))->params.field.HOLD = 1;
367 }
368 tx_old_hold = tx_hold;
369
370 tx_desc->params.word =
371 (INCA_DMA_TX_SOP | INCA_DMA_TX_EOP | INCA_DMA_TX_HOLD);
372
373 tx_desc->C = 0;
374 tx_desc->TxDataPtr = (u32)packet;
375 tx_desc->params.field.NBA = length;
376
377 ((inca_tx_descriptor_t *)CKSEG1ADDR(&tx_ring[tx_hold]))->params.field.HOLD = 0;
378
379 tx_hold = tx_new;
380 tx_new = (tx_new + 1) % NUM_TX_DESC;
381
382
383 if (! initialized) {
384 command = INCA_IP_DMA_DMA_TXCCR0_INIT;
385 initialized = 1;
386 } else {
387 command = INCA_IP_DMA_DMA_TXCCR0_HR;
388 }
389
390 DMA_READ_REG(INCA_IP_DMA_DMA_TXCCR0, regValue);
391 regValue |= command;
392#if 0
393 printf("regValue = 0x%x\n", regValue);
394#endif
395 DMA_WRITE_REG(INCA_IP_DMA_DMA_TXCCR0, regValue);
396
397#if 1
398 for(i = 0; ((inca_tx_descriptor_t *)CKSEG1ADDR(&tx_ring[tx_hold]))->C == 0; i++) {
399 if (i >= TOUT_LOOP) {
400 printf("%s: tx buffer not ready\n", dev->name);
401 goto Done;
402 }
403 }
404#endif
405 res = length;
406Done:
407#if 0
408 printf("Leaving inca_switch_send()\n");
409#endif
410 return res;
411}
412
413
414static int inca_switch_recv(struct eth_device *dev)
415{
416 int length = 0;
417 inca_rx_descriptor_t * rx_desc;
418
419#if 0
420 printf("Entered inca_switch_recv()\n");
421#endif
422
423 for (;;) {
424 rx_desc = (inca_rx_descriptor_t *)CKSEG1ADDR(&rx_ring[rx_new]);
425
426 if (rx_desc->status.field.C == 0) {
427 break;
428 }
429
430#if 0
431 rx_ring[rx_new].params.field.HOLD = 1;
432#endif
433
434 if (! rx_desc->status.field.Eop) {
435 printf("Partly received packet!!!\n");
436 break;
437 }
438
439 length = rx_desc->status.field.NBT;
440 rx_desc->status.word &=
441 ~(INCA_DMA_RX_EOP | INCA_DMA_RX_SOP | INCA_DMA_RX_C);
442#if 0
443{
444 int i;
445 for (i=0;i<length - 4;i++) {
446 if (i % 16 == 0) printf("\n%04x: ", i);
447 printf("%02X ", NetRxPackets[rx_new][i]);
448 }
449 printf("\n");
450}
451#endif
452
453 if (length) {
454#if 0
455 printf("Received %d bytes\n", length);
456#endif
457 NetReceive((void*)CKSEG1ADDR(NetRxPackets[rx_new]), length - 4);
458 } else {
459#if 1
460 printf("Zero length!!!\n");
461#endif
462 }
463
464
465 ((inca_rx_descriptor_t *)CKSEG1ADDR(&rx_ring[rx_hold]))->params.field.HOLD = 0;
466
467 rx_hold = rx_new;
468
469 rx_new = (rx_new + 1) % NUM_RX_DESC;
470 }
471
472#if 0
473 printf("Leaving inca_switch_recv()\n");
474#endif
475
476 return length;
477}
478
479
480static void inca_switch_halt(struct eth_device *dev)
481{
482#if 0
483 printf("Entered inca_switch_halt()\n");
484#endif
485
486#if 1
487 initialized = 0;
488#endif
489#if 1
490
491
492 SW_WRITE_REG(INCA_IP_Switch_ST_PT,0xf);
493
494
495
496 DMA_WRITE_REG(INCA_IP_DMA_DMA_RXCCR0, INCA_IP_DMA_DMA_RXCCR0_OFF);
497
498
499
500 DMA_WRITE_REG(INCA_IP_DMA_DMA_TXCCR0, INCA_IP_DMA_DMA_TXCCR0_OFF);
501
502
503#endif
504#if 0
505 printf("Leaving inca_switch_halt()\n");
506#endif
507}
508
509
510static void inca_init_switch_chip(void)
511{
512 u32 regValue;
513
514
515
516
517 SW_WRITE_REG(INCA_IP_Switch_PC_TX_CTL, 0x00000001);
518 SW_WRITE_REG(INCA_IP_Switch_LAN_TX_CTL, 0x00000001);
519
520#if 1
521
522
523
524
525
526
527
528
529
530 SW_WRITE_REG(INCA_IP_Switch_MDIO_CFG, 0x4c50);
531
532
533
534
535
536
537
538
539
540
541
542 SW_WRITE_REG (INCA_IP_Switch_EPHY, 0xff);
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560 SW_WRITE_REG(INCA_IP_Switch_MDIO_ACC, 0xc0a09000);
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578 SW_WRITE_REG(INCA_IP_Switch_MDIO_ACC, 0xc0c09000);
579
580#endif
581
582
583
584
585
586 SW_WRITE_REG(INCA_IP_Switch_ST_PT,0xf);
587
588 SW_READ_REG(INCA_IP_Switch_ARL_CTL, regValue);
589
590
591
592 regValue |= 0x00000200;
593 SW_WRITE_REG(INCA_IP_Switch_ARL_CTL, regValue);
594
595
596
597 SW_READ_REG(INCA_IP_Switch_PMAC_HD_CTL, regValue);
598 regValue &= ~0x00000002;
599 SW_WRITE_REG(INCA_IP_Switch_PMAC_HD_CTL, regValue);
600}
601
602
603static void inca_dma_init(void)
604{
605
606
607 DMA_WRITE_REG(INCA_IP_DMA_DMA_RXCCR0, INCA_IP_DMA_DMA_RXCCR0_OFF);
608 DMA_WRITE_REG(INCA_IP_DMA_DMA_RXCCR1, INCA_IP_DMA_DMA_RXCCR1_OFF);
609
610 DMA_WRITE_REG(INCA_IP_DMA_DMA_TXCCR0, INCA_IP_DMA_DMA_RXCCR0_OFF);
611 DMA_WRITE_REG(INCA_IP_DMA_DMA_TXCCR1, INCA_IP_DMA_DMA_TXCCR1_OFF);
612 DMA_WRITE_REG(INCA_IP_DMA_DMA_TXCCR2, INCA_IP_DMA_DMA_TXCCR2_OFF);
613
614
615
616 DMA_WRITE_REG(INCA_IP_DMA_DMA_TXPOLL, INCA_DMA_TX_POLLING_TIME);
617
618
619
620 DMA_WRITE_REG(INCA_IP_DMA_DMA_RXPOLL, INCA_DMA_RX_POLLING_TIME);
621
622
623
624 DMA_WRITE_REG(INCA_IP_DMA_DMA_RXIMR, 0xFFFFFFFF);
625
626
627
628 DMA_WRITE_REG(INCA_IP_DMA_DMA_TXIMR, 0xFFFFFFFF);
629
630 DMA_WRITE_REG(INCA_IP_DMA_DMA_TXISR, 0xFFFFFFFF);
631 DMA_WRITE_REG(INCA_IP_DMA_DMA_RXISR, 0xFFFFFFFF);
632}
633
634#if defined(CONFIG_INCA_IP_SWITCH_AMDIX)
635static int inca_amdix(void)
636{
637 u32 phyReg1 = 0;
638 u32 phyReg4 = 0;
639 u32 phyReg5 = 0;
640 u32 phyReg6 = 0;
641 u32 phyReg31 = 0;
642 u32 regEphy = 0;
643 int mdi_flag;
644 int retries;
645
646
647
648 *INCA_IP_AUTO_MDIX_LAN_PORTS_DIR |= (1 << INCA_IP_AUTO_MDIX_LAN_GPIO_PIN_RXTX);
649 *INCA_IP_AUTO_MDIX_LAN_PORTS_ALTSEL |= (1 << INCA_IP_AUTO_MDIX_LAN_GPIO_PIN_RXTX);
650
651#if 0
652
653
654 retries = WAIT_SIGNAL_RETRIES;
655 while (--retries) {
656 SW_WRITE_REG(INCA_IP_Switch_MDIO_ACC,
657 (0x1 << 31) |
658 (0x0 << 30) |
659 (0x6 << 21) |
660 (17 << 16));
661 do {
662 SW_READ_REG(INCA_IP_Switch_MDIO_ACC, phyReg1);
663 } while (phyReg1 & (1 << 31));
664
665 if (phyReg1 & (1 << 1)) {
666
667 break;
668 }
669 }
670
671 if (!retries)
672 goto Fail;
673#endif
674
675
676
677 *INCA_IP_AUTO_MDIX_LAN_PORTS_OUT &= ~(1 << INCA_IP_AUTO_MDIX_LAN_GPIO_PIN_RXTX);
678 mdi_flag = 1;
679
680
681
682 retries = WAIT_LINK_RETRIES;
683 while (--retries) {
684 udelay(LINK_RETRY_DELAY * 1000);
685 SW_WRITE_REG(INCA_IP_Switch_MDIO_ACC,
686 (0x1 << 31) |
687 (0x0 << 30) |
688 (0x6 << 21) |
689 (1 << 16));
690 do {
691 SW_READ_REG(INCA_IP_Switch_MDIO_ACC, phyReg1);
692 } while (phyReg1 & (1 << 31));
693
694 if (phyReg1 & (1 << 2)) {
695
696 break;
697 } else if (mdi_flag) {
698
699 *INCA_IP_AUTO_MDIX_LAN_PORTS_OUT |= (1 << INCA_IP_AUTO_MDIX_LAN_GPIO_PIN_RXTX);
700 mdi_flag = 0;
701 } else {
702
703 *INCA_IP_AUTO_MDIX_LAN_PORTS_OUT &= ~(1 << INCA_IP_AUTO_MDIX_LAN_GPIO_PIN_RXTX);
704 mdi_flag = 1;
705 }
706 }
707
708 if (!retries) {
709 goto Fail;
710 } else {
711 SW_WRITE_REG(INCA_IP_Switch_MDIO_ACC,
712 (0x1 << 31) |
713 (0x0 << 30) |
714 (0x6 << 21) |
715 (1 << 16));
716 do {
717 SW_READ_REG(INCA_IP_Switch_MDIO_ACC, phyReg1);
718 } while (phyReg1 & (1 << 31));
719
720
721
722 if (phyReg1 & (1 << 5)) {
723 SW_WRITE_REG(INCA_IP_Switch_MDIO_ACC,
724 (0x1 << 31) |
725 (0x0 << 30) |
726 (0x6 << 21) |
727 (31 << 16));
728 do {
729 SW_READ_REG(INCA_IP_Switch_MDIO_ACC, phyReg31);
730 } while (phyReg31 & (1 << 31));
731
732 switch ((phyReg31 >> 2) & 0x7) {
733 case INCA_SWITCH_PHY_SPEED_10H:
734
735 regEphy = 0;
736 break;
737 case INCA_SWITCH_PHY_SPEED_10F:
738
739 regEphy = INCA_IP_Switch_EPHY_DL;
740 break;
741 case INCA_SWITCH_PHY_SPEED_100H:
742
743 regEphy = INCA_IP_Switch_EPHY_SL;
744 break;
745 case INCA_SWITCH_PHY_SPEED_100F:
746
747 regEphy = INCA_IP_Switch_EPHY_SL | INCA_IP_Switch_EPHY_DL;
748 break;
749 }
750
751
752
753
754 if (phyReg1 & (1 << 3)) {
755 SW_WRITE_REG(INCA_IP_Switch_MDIO_ACC,
756 (0x1 << 31) |
757 (0x0 << 30) |
758 (0x6 << 21) |
759 (6 << 16));
760 do {
761 SW_READ_REG(INCA_IP_Switch_MDIO_ACC, phyReg6);
762 } while (phyReg6 & (1 << 31));
763
764
765
766
767 if (phyReg6 & (1 << 0)) {
768 SW_WRITE_REG(INCA_IP_Switch_MDIO_ACC,
769 (0x1 << 31) |
770 (0x0 << 30) |
771 (0x6 << 21) |
772 (4 << 16));
773 do {
774 SW_READ_REG(INCA_IP_Switch_MDIO_ACC, phyReg4);
775 } while (phyReg4 & (1 << 31));
776
777
778
779
780 if (phyReg4 & (1 << 10)) {
781 SW_WRITE_REG(INCA_IP_Switch_MDIO_ACC,
782 (0x1 << 31) |
783 (0x0 << 30) |
784 (0x6 << 21) |
785 (5 << 16));
786 do {
787 SW_READ_REG(INCA_IP_Switch_MDIO_ACC, phyReg5);
788 } while (phyReg5 & (1 << 31));
789
790
791
792 if (phyReg5 & (1 << 10)) {
793 regEphy |= INCA_IP_Switch_EPHY_PL;
794 }
795 }
796 }
797
798 }
799
800
801 regEphy |= INCA_IP_Switch_EPHY_LL;
802
803 SW_WRITE_REG(INCA_IP_Switch_EPHY, regEphy);
804 }
805 }
806
807 return 0;
808
809Fail:
810 printf("No Link on LAN port\n");
811 return -1;
812}
813#endif
814