1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * Copyright 2007, 2010 Freescale Semiconductor, Inc.
4  *
5  * Author: Roy Zang <tie-fei.zang@freescale.com>, Sep, 2007
6  *
7  * Description:
8  * ULI 526x Ethernet port driver.
9  * Based on the Linux driver: drivers/net/tulip/uli526x.c
10  */
11 
12 #include <common.h>
13 #include <malloc.h>
14 #include <net.h>
15 #include <netdev.h>
16 #include <asm/io.h>
17 #include <pci.h>
18 #include <miiphy.h>
19 #include <linux/delay.h>
20 
21 /* some kernel function compatible define */
22 
23 #undef DEBUG
24 
25 /* Board/System/Debug information/definition */
26 #define ULI_VENDOR_ID		0x10B9
27 #define ULI5261_DEVICE_ID	0x5261
28 #define ULI5263_DEVICE_ID	0x5263
29 /* ULi M5261 ID*/
30 #define PCI_ULI5261_ID		(ULI5261_DEVICE_ID << 16 | ULI_VENDOR_ID)
31 /* ULi M5263 ID*/
32 #define PCI_ULI5263_ID		(ULI5263_DEVICE_ID << 16 | ULI_VENDOR_ID)
33 
34 #define ULI526X_IO_SIZE	0x100
35 #define TX_DESC_CNT	0x10		/* Allocated Tx descriptors */
36 #define RX_DESC_CNT	PKTBUFSRX	/* Allocated Rx descriptors */
37 #define TX_FREE_DESC_CNT	(TX_DESC_CNT - 2) /* Max TX packet count */
38 #define TX_WAKE_DESC_CNT	(TX_DESC_CNT - 3) /* TX wakeup count */
39 #define DESC_ALL_CNT		(TX_DESC_CNT + RX_DESC_CNT)
40 #define TX_BUF_ALLOC		0x300
41 #define RX_ALLOC_SIZE		PKTSIZE
42 #define ULI526X_RESET		1
43 #define CR0_DEFAULT		0
44 #define CR6_DEFAULT		0x22200000
45 #define CR7_DEFAULT		0x180c1
46 #define CR15_DEFAULT		0x06		/* TxJabber RxWatchdog */
47 #define TDES0_ERR_MASK		0x4302		/* TXJT, LC, EC, FUE */
48 #define MAX_PACKET_SIZE		1514
49 #define ULI5261_MAX_MULTICAST	14
50 #define RX_COPY_SIZE		100
51 #define MAX_CHECK_PACKET	0x8000
52 
53 #define ULI526X_10MHF		0
54 #define ULI526X_100MHF		1
55 #define ULI526X_10MFD		4
56 #define ULI526X_100MFD		5
57 #define ULI526X_AUTO		8
58 
59 #define ULI526X_TXTH_72		0x400000	/* TX TH 72 byte */
60 #define ULI526X_TXTH_96		0x404000	/* TX TH 96 byte */
61 #define ULI526X_TXTH_128	0x0000		/* TX TH 128 byte */
62 #define ULI526X_TXTH_256	0x4000		/* TX TH 256 byte */
63 #define ULI526X_TXTH_512	0x8000		/* TX TH 512 byte */
64 #define ULI526X_TXTH_1K		0xC000		/* TX TH 1K  byte */
65 
66 /* CR9 definition: SROM/MII */
67 #define CR9_SROM_READ		0x4800
68 #define CR9_SRCS		0x1
69 #define CR9_SRCLK		0x2
70 #define CR9_CRDOUT		0x8
71 #define SROM_DATA_0		0x0
72 #define SROM_DATA_1		0x4
73 #define PHY_DATA_1		0x20000
74 #define PHY_DATA_0		0x00000
75 #define MDCLKH			0x10000
76 
77 #define PHY_POWER_DOWN	0x800
78 
79 #define SROM_V41_CODE		0x14
80 
81 #define SROM_CLK_WRITE(data, ioaddr) do {			\
82 	outl(data|CR9_SROM_READ|CR9_SRCS, ioaddr);		\
83 	udelay(5);						\
84 	outl(data|CR9_SROM_READ|CR9_SRCS|CR9_SRCLK, ioaddr);	\
85 	udelay(5);						\
86 	outl(data|CR9_SROM_READ|CR9_SRCS, ioaddr);		\
87 	udelay(5);						\
88 	} while (0)
89 
90 /* Structure/enum declaration */
91 
92 struct tx_desc {
93 	u32 tdes0, tdes1, tdes2, tdes3; /* Data for the card */
94 	char *tx_buf_ptr;		/* Data for us */
95 	struct tx_desc *next_tx_desc;
96 };
97 
98 struct rx_desc {
99 	u32 rdes0, rdes1, rdes2, rdes3;	/* Data for the card */
100 	char *rx_buf_ptr;		/* Data for us */
101 	struct rx_desc *next_rx_desc;
102 };
103 
104 struct uli526x_board_info {
105 	u32 chip_id;	/* Chip vendor/Device ID */
106 	pci_dev_t pdev;
107 
108 	long ioaddr;			/* I/O base address */
109 	u32 cr0_data;
110 	u32 cr5_data;
111 	u32 cr6_data;
112 	u32 cr7_data;
113 	u32 cr15_data;
114 
115 	/* pointer for memory physical address */
116 	dma_addr_t buf_pool_dma_ptr;	/* Tx buffer pool memory */
117 	dma_addr_t buf_pool_dma_start;	/* Tx buffer pool align dword */
118 	dma_addr_t desc_pool_dma_ptr;	/* descriptor pool memory */
119 	dma_addr_t first_tx_desc_dma;
120 	dma_addr_t first_rx_desc_dma;
121 
122 	/* descriptor pointer */
123 	unsigned char *buf_pool_ptr;	/* Tx buffer pool memory */
124 	unsigned char *buf_pool_start;	/* Tx buffer pool align dword */
125 	unsigned char *desc_pool_ptr;	/* descriptor pool memory */
126 	struct tx_desc *first_tx_desc;
127 	struct tx_desc *tx_insert_ptr;
128 	struct tx_desc *tx_remove_ptr;
129 	struct rx_desc *first_rx_desc;
130 	struct rx_desc *rx_ready_ptr;	/* packet come pointer */
131 	unsigned long tx_packet_cnt;	/* transmitted packet count */
132 
133 	u16 PHY_reg4;			/* Saved Phyxcer register 4 value */
134 
135 	u8 media_mode;			/* user specify media mode */
136 	u8 op_mode;			/* real work dedia mode */
137 	u8 phy_addr;
138 
139 	/* NIC SROM data */
140 	unsigned char srom[128];
141 };
142 
143 enum uli526x_offsets {
144 	DCR0 = 0x00, DCR1 = 0x08, DCR2 = 0x10, DCR3 = 0x18, DCR4 = 0x20,
145 	DCR5 = 0x28, DCR6 = 0x30, DCR7 = 0x38, DCR8 = 0x40, DCR9 = 0x48,
146 	DCR10 = 0x50, DCR11 = 0x58, DCR12 = 0x60, DCR13 = 0x68, DCR14 = 0x70,
147 	DCR15 = 0x78
148 };
149 
150 enum uli526x_CR6_bits {
151 	CR6_RXSC = 0x2, CR6_PBF = 0x8, CR6_PM = 0x40, CR6_PAM = 0x80,
152 	CR6_FDM = 0x200, CR6_TXSC = 0x2000, CR6_STI = 0x100000,
153 	CR6_SFT = 0x200000, CR6_RXA = 0x40000000, CR6_NO_PURGE = 0x20000000
154 };
155 
156 /* Global variable declaration -- */
157 
158 static unsigned char uli526x_media_mode = ULI526X_AUTO;
159 
160 static struct tx_desc desc_pool_array[DESC_ALL_CNT + 0x20]
161 	__attribute__ ((aligned(32)));
162 static char buf_pool[TX_BUF_ALLOC * TX_DESC_CNT + 4];
163 
164 /* For module input parameter */
165 static int mode = 8;
166 
167 /* function declaration -- */
168 static int uli526x_start_xmit(struct eth_device *dev, void *packet, int length);
169 static u16 read_srom_word(long, int);
170 static void uli526x_descriptor_init(struct uli526x_board_info *, unsigned long);
171 static void allocate_rx_buffer(struct uli526x_board_info *);
172 static void update_cr6(u32, unsigned long);
173 static u16 uli_phy_read(unsigned long, u8, u8, u32);
174 static u16 phy_readby_cr10(unsigned long, u8, u8);
175 static void uli_phy_write(unsigned long, u8, u8, u16, u32);
176 static void phy_writeby_cr10(unsigned long, u8, u8, u16);
177 static void phy_write_1bit(unsigned long, u32, u32);
178 static u16 phy_read_1bit(unsigned long, u32);
179 static int uli526x_rx_packet(struct eth_device *);
180 static void uli526x_free_tx_pkt(struct eth_device *,
181 		struct uli526x_board_info *);
182 static void uli526x_reuse_buf(struct rx_desc *);
183 static void uli526x_init(struct eth_device *);
184 static void uli526x_set_phyxcer(struct uli526x_board_info *);
185 
186 
187 static int uli526x_init_one(struct eth_device *, struct bd_info *);
188 static void uli526x_disable(struct eth_device *);
189 static void set_mac_addr(struct eth_device *);
190 
191 static struct pci_device_id uli526x_pci_tbl[] = {
192 	{ ULI_VENDOR_ID, ULI5261_DEVICE_ID}, /* 5261 device */
193 	{ ULI_VENDOR_ID, ULI5263_DEVICE_ID}, /* 5263 device */
194 	{}
195 };
196 
197 /* ULI526X network board routine */
198 
199 /*
200  *	Search ULI526X board, register it
201  */
202 
uli526x_initialize(struct bd_info * bis)203 int uli526x_initialize(struct bd_info *bis)
204 {
205 	pci_dev_t devno;
206 	int card_number = 0;
207 	struct eth_device *dev;
208 	struct uli526x_board_info *db;	/* board information structure */
209 
210 	u32 iobase;
211 	int idx = 0;
212 
213 	while (1) {
214 		/* Find PCI device */
215 		devno = pci_find_devices(uli526x_pci_tbl, idx++);
216 		if (devno < 0)
217 			break;
218 
219 		pci_read_config_dword(devno, PCI_BASE_ADDRESS_1, &iobase);
220 		iobase &= ~0xf;
221 
222 		dev = (struct eth_device *)malloc(sizeof *dev);
223 		if (!dev) {
224 			printf("uli526x: Can not allocate memory\n");
225 			break;
226 		}
227 		memset(dev, 0, sizeof(*dev));
228 		sprintf(dev->name, "uli526x#%d", card_number);
229 		db = (struct uli526x_board_info *)
230 			malloc(sizeof(struct uli526x_board_info));
231 
232 		dev->priv = db;
233 		db->pdev = devno;
234 		dev->iobase = iobase;
235 
236 		dev->init = uli526x_init_one;
237 		dev->halt = uli526x_disable;
238 		dev->send = uli526x_start_xmit;
239 		dev->recv = uli526x_rx_packet;
240 
241 		/* init db */
242 		db->ioaddr = dev->iobase;
243 		/* get chip id */
244 
245 		pci_read_config_dword(devno, PCI_VENDOR_ID, &db->chip_id);
246 #ifdef DEBUG
247 		printf("uli526x: uli526x @0x%x\n", iobase);
248 		printf("uli526x: chip_id%x\n", db->chip_id);
249 #endif
250 		eth_register(dev);
251 		card_number++;
252 		pci_write_config_byte(devno, PCI_LATENCY_TIMER, 0x20);
253 		udelay(10 * 1000);
254 	}
255 	return card_number;
256 }
257 
uli526x_init_one(struct eth_device * dev,struct bd_info * bis)258 static int uli526x_init_one(struct eth_device *dev, struct bd_info *bis)
259 {
260 
261 	struct uli526x_board_info *db = dev->priv;
262 	int i;
263 
264 	switch (mode) {
265 	case ULI526X_10MHF:
266 	case ULI526X_100MHF:
267 	case ULI526X_10MFD:
268 	case ULI526X_100MFD:
269 		uli526x_media_mode = mode;
270 		break;
271 	default:
272 		uli526x_media_mode = ULI526X_AUTO;
273 		break;
274 	}
275 
276 	/* Allocate Tx/Rx descriptor memory */
277 	db->desc_pool_ptr = (uchar *)&desc_pool_array[0];
278 	db->desc_pool_dma_ptr = (dma_addr_t)&desc_pool_array[0];
279 	if (db->desc_pool_ptr == NULL)
280 		return -1;
281 
282 	db->buf_pool_ptr = (uchar *)&buf_pool[0];
283 	db->buf_pool_dma_ptr = (dma_addr_t)&buf_pool[0];
284 	if (db->buf_pool_ptr == NULL)
285 		return -1;
286 
287 	db->first_tx_desc = (struct tx_desc *) db->desc_pool_ptr;
288 	db->first_tx_desc_dma = db->desc_pool_dma_ptr;
289 
290 	db->buf_pool_start = db->buf_pool_ptr;
291 	db->buf_pool_dma_start = db->buf_pool_dma_ptr;
292 
293 #ifdef DEBUG
294 	printf("%s(): db->ioaddr= 0x%x\n",
295 		__FUNCTION__, db->ioaddr);
296 	printf("%s(): media_mode= 0x%x\n",
297 		__FUNCTION__, uli526x_media_mode);
298 	printf("%s(): db->desc_pool_ptr= 0x%x\n",
299 		__FUNCTION__, db->desc_pool_ptr);
300 	printf("%s(): db->desc_pool_dma_ptr= 0x%x\n",
301 		__FUNCTION__, db->desc_pool_dma_ptr);
302 	printf("%s(): db->buf_pool_ptr= 0x%x\n",
303 		__FUNCTION__, db->buf_pool_ptr);
304 	printf("%s(): db->buf_pool_dma_ptr= 0x%x\n",
305 		__FUNCTION__, db->buf_pool_dma_ptr);
306 #endif
307 
308 	/* read 64 word srom data */
309 	for (i = 0; i < 64; i++)
310 		((u16 *) db->srom)[i] = cpu_to_le16(read_srom_word(db->ioaddr,
311 			i));
312 
313 	/* Set Node address */
314 	if (((db->srom[0] == 0xff) && (db->srom[1] == 0xff)) ||
315 	    ((db->srom[0] == 0x00) && (db->srom[1] == 0x00)))
316 	/* SROM absent, so write MAC address to ID Table */
317 		set_mac_addr(dev);
318 	else {		/*Exist SROM*/
319 		for (i = 0; i < 6; i++)
320 			dev->enetaddr[i] = db->srom[20 + i];
321 	}
322 #ifdef DEBUG
323 	for (i = 0; i < 6; i++)
324 		printf("%c%02x", i ? ':' : ' ', dev->enetaddr[i]);
325 #endif
326 	db->PHY_reg4 = 0x1e0;
327 
328 	/* system variable init */
329 	db->cr6_data = CR6_DEFAULT ;
330 	db->cr6_data |= ULI526X_TXTH_256;
331 	db->cr0_data = CR0_DEFAULT;
332 	uli526x_init(dev);
333 	return 0;
334 }
335 
uli526x_disable(struct eth_device * dev)336 static void uli526x_disable(struct eth_device *dev)
337 {
338 #ifdef DEBUG
339 	printf("uli526x_disable\n");
340 #endif
341 	struct uli526x_board_info *db = dev->priv;
342 
343 	if (!((inl(db->ioaddr + DCR12)) & 0x8)) {
344 		/* Reset & stop ULI526X board */
345 		outl(ULI526X_RESET, db->ioaddr + DCR0);
346 		udelay(5);
347 		uli_phy_write(db->ioaddr, db->phy_addr, 0, 0x8000, db->chip_id);
348 
349 		/* reset the board */
350 		db->cr6_data &= ~(CR6_RXSC | CR6_TXSC);	/* Disable Tx/Rx */
351 		update_cr6(db->cr6_data, dev->iobase);
352 		outl(0, dev->iobase + DCR7);		/* Disable Interrupt */
353 		outl(inl(dev->iobase + DCR5), dev->iobase + DCR5);
354 	}
355 }
356 
357 /*	Initialize ULI526X board
358  *	Reset ULI526X board
359  *	Initialize TX/Rx descriptor chain structure
360  *	Send the set-up frame
361  *	Enable Tx/Rx machine
362  */
363 
uli526x_init(struct eth_device * dev)364 static void uli526x_init(struct eth_device *dev)
365 {
366 
367 	struct uli526x_board_info *db = dev->priv;
368 	u8	phy_tmp;
369 	u16	phy_value;
370 	u16 phy_reg_reset;
371 
372 	/* Reset M526x MAC controller */
373 	outl(ULI526X_RESET, db->ioaddr + DCR0);	/* RESET MAC */
374 	udelay(100);
375 	outl(db->cr0_data, db->ioaddr + DCR0);
376 	udelay(5);
377 
378 	/* Phy addr : In some boards,M5261/M5263 phy address != 1 */
379 	db->phy_addr = 1;
380 	db->tx_packet_cnt = 0;
381 	for (phy_tmp = 0; phy_tmp < 32; phy_tmp++) {
382 		/* peer add */
383 		phy_value = uli_phy_read(db->ioaddr, phy_tmp, 3, db->chip_id);
384 		if (phy_value != 0xffff && phy_value != 0) {
385 			db->phy_addr = phy_tmp;
386 			break;
387 		}
388 	}
389 
390 #ifdef DEBUG
391 	printf("%s(): db->ioaddr= 0x%x\n", __FUNCTION__, db->ioaddr);
392 	printf("%s(): db->phy_addr= 0x%x\n", __FUNCTION__, db->phy_addr);
393 #endif
394 	if (phy_tmp == 32)
395 		printf("Can not find the phy address!!!");
396 
397 	/* Parser SROM and media mode */
398 	db->media_mode = uli526x_media_mode;
399 
400 	if (!(inl(db->ioaddr + DCR12) & 0x8)) {
401 		/* Phyxcer capability setting */
402 		phy_reg_reset = uli_phy_read(db->ioaddr,
403 			db->phy_addr, 0, db->chip_id);
404 		phy_reg_reset = (phy_reg_reset | 0x8000);
405 		uli_phy_write(db->ioaddr, db->phy_addr, 0,
406 			phy_reg_reset, db->chip_id);
407 		udelay(500);
408 
409 		/* Process Phyxcer Media Mode */
410 		uli526x_set_phyxcer(db);
411 	}
412 	/* Media Mode Process */
413 	if (!(db->media_mode & ULI526X_AUTO))
414 		db->op_mode = db->media_mode;	/* Force Mode */
415 
416 	/* Initialize Transmit/Receive decriptor and CR3/4 */
417 	uli526x_descriptor_init(db, db->ioaddr);
418 
419 	/* Init CR6 to program M526X operation */
420 	update_cr6(db->cr6_data, db->ioaddr);
421 
422 	/* Init CR7, interrupt active bit */
423 	db->cr7_data = CR7_DEFAULT;
424 	outl(db->cr7_data, db->ioaddr + DCR7);
425 
426 	/* Init CR15, Tx jabber and Rx watchdog timer */
427 	outl(db->cr15_data, db->ioaddr + DCR15);
428 
429 	/* Enable ULI526X Tx/Rx function */
430 	db->cr6_data |= CR6_RXSC | CR6_TXSC;
431 	update_cr6(db->cr6_data, db->ioaddr);
432 	while (!(inl(db->ioaddr + DCR12) & 0x8))
433 		udelay(10);
434 }
435 
436 /*
437  *	Hardware start transmission.
438  *	Send a packet to media from the upper layer.
439  */
440 
uli526x_start_xmit(struct eth_device * dev,void * packet,int length)441 static int uli526x_start_xmit(struct eth_device *dev, void *packet, int length)
442 {
443 	struct uli526x_board_info *db = dev->priv;
444 	struct tx_desc *txptr;
445 	unsigned int len = length;
446 	/* Too large packet check */
447 	if (len > MAX_PACKET_SIZE) {
448 		printf(": big packet = %d\n", len);
449 		return 0;
450 	}
451 
452 	/* No Tx resource check, it never happen nromally */
453 	if (db->tx_packet_cnt >= TX_FREE_DESC_CNT) {
454 		printf("No Tx resource %ld\n", db->tx_packet_cnt);
455 		return 0;
456 	}
457 
458 	/* Disable NIC interrupt */
459 	outl(0, dev->iobase + DCR7);
460 
461 	/* transmit this packet */
462 	txptr = db->tx_insert_ptr;
463 	memcpy((char *)txptr->tx_buf_ptr, (char *)packet, (int)length);
464 	txptr->tdes1 = cpu_to_le32(0xe1000000 | length);
465 
466 	/* Point to next transmit free descriptor */
467 	db->tx_insert_ptr = txptr->next_tx_desc;
468 
469 	/* Transmit Packet Process */
470 	if ((db->tx_packet_cnt < TX_DESC_CNT)) {
471 		txptr->tdes0 = cpu_to_le32(0x80000000);	/* Set owner bit */
472 		db->tx_packet_cnt++;			/* Ready to send */
473 		outl(0x1, dev->iobase + DCR1);	/* Issue Tx polling */
474 	}
475 
476 	/* Got ULI526X status */
477 	db->cr5_data = inl(db->ioaddr + DCR5);
478 	outl(db->cr5_data, db->ioaddr + DCR5);
479 
480 #ifdef TX_DEBUG
481 	printf("%s(): length = 0x%x\n", __FUNCTION__, length);
482 	printf("%s(): cr5_data=%x\n", __FUNCTION__, db->cr5_data);
483 #endif
484 
485 	outl(db->cr7_data, dev->iobase + DCR7);
486 	uli526x_free_tx_pkt(dev, db);
487 
488 	return length;
489 }
490 
491 /*
492  *	Free TX resource after TX complete
493  */
494 
uli526x_free_tx_pkt(struct eth_device * dev,struct uli526x_board_info * db)495 static void uli526x_free_tx_pkt(struct eth_device *dev,
496 	struct uli526x_board_info *db)
497 {
498 	struct tx_desc *txptr;
499 	u32 tdes0;
500 
501 	txptr = db->tx_remove_ptr;
502 	while (db->tx_packet_cnt) {
503 		tdes0 = le32_to_cpu(txptr->tdes0);
504 		/* printf(DRV_NAME ": tdes0=%x\n", tdes0); */
505 		if (tdes0 & 0x80000000)
506 			break;
507 
508 		/* A packet sent completed */
509 		db->tx_packet_cnt--;
510 
511 		if (tdes0 != 0x7fffffff) {
512 #ifdef TX_DEBUG
513 			printf("%s()tdes0=%x\n", __FUNCTION__, tdes0);
514 #endif
515 			if (tdes0 & TDES0_ERR_MASK) {
516 				if (tdes0 & 0x0002) {	/* UnderRun */
517 					if (!(db->cr6_data & CR6_SFT)) {
518 						db->cr6_data = db->cr6_data |
519 							CR6_SFT;
520 						update_cr6(db->cr6_data,
521 							db->ioaddr);
522 					}
523 				}
524 			}
525 		}
526 
527 		txptr = txptr->next_tx_desc;
528 	}/* End of while */
529 
530 	/* Update TX remove pointer to next */
531 	db->tx_remove_ptr = txptr;
532 }
533 
534 
535 /*
536  *	Receive the come packet and pass to upper layer
537  */
538 
uli526x_rx_packet(struct eth_device * dev)539 static int uli526x_rx_packet(struct eth_device *dev)
540 {
541 	struct uli526x_board_info *db = dev->priv;
542 	struct rx_desc *rxptr;
543 	int rxlen = 0;
544 	u32 rdes0;
545 
546 	rxptr = db->rx_ready_ptr;
547 
548 	rdes0 = le32_to_cpu(rxptr->rdes0);
549 #ifdef RX_DEBUG
550 	printf("%s(): rxptr->rdes0=%x\n", __FUNCTION__, rxptr->rdes0);
551 #endif
552 	if (!(rdes0 & 0x80000000)) {	/* packet owner check */
553 		if ((rdes0 & 0x300) != 0x300) {
554 			/* A packet without First/Last flag */
555 			/* reuse this buf */
556 			printf("A packet without First/Last flag");
557 			uli526x_reuse_buf(rxptr);
558 		} else {
559 			/* A packet with First/Last flag */
560 			rxlen = ((rdes0 >> 16) & 0x3fff) - 4;
561 #ifdef RX_DEBUG
562 			printf("%s(): rxlen =%x\n", __FUNCTION__, rxlen);
563 #endif
564 			/* error summary bit check */
565 			if (rdes0 & 0x8000) {
566 				/* This is a error packet */
567 				printf("Error: rdes0: %x\n", rdes0);
568 			}
569 
570 			if (!(rdes0 & 0x8000) ||
571 				((db->cr6_data & CR6_PM) && (rxlen > 6))) {
572 
573 #ifdef RX_DEBUG
574 				printf("%s(): rx_skb_ptr =%x\n",
575 					__FUNCTION__, rxptr->rx_buf_ptr);
576 				printf("%s(): rxlen =%x\n",
577 					__FUNCTION__, rxlen);
578 
579 				printf("%s(): buf addr =%x\n",
580 					__FUNCTION__, rxptr->rx_buf_ptr);
581 				printf("%s(): rxlen =%x\n",
582 					__FUNCTION__, rxlen);
583 				int i;
584 				for (i = 0; i < 0x20; i++)
585 					printf("%s(): data[%x] =%x\n",
586 					__FUNCTION__, i, rxptr->rx_buf_ptr[i]);
587 #endif
588 
589 				net_process_received_packet(
590 					(uchar *)rxptr->rx_buf_ptr, rxlen);
591 				uli526x_reuse_buf(rxptr);
592 
593 			} else {
594 				/* Reuse SKB buffer when the packet is error */
595 				printf("Reuse buffer, rdes0");
596 				uli526x_reuse_buf(rxptr);
597 			}
598 		}
599 
600 		rxptr = rxptr->next_rx_desc;
601 	}
602 
603 	db->rx_ready_ptr = rxptr;
604 	return rxlen;
605 }
606 
607 /*
608  *	Reuse the RX buffer
609  */
610 
uli526x_reuse_buf(struct rx_desc * rxptr)611 static void uli526x_reuse_buf(struct rx_desc *rxptr)
612 {
613 
614 	if (!(rxptr->rdes0 & cpu_to_le32(0x80000000)))
615 		rxptr->rdes0 = cpu_to_le32(0x80000000);
616 	else
617 		printf("Buffer reuse method error");
618 }
619 /*
620  *	Initialize transmit/Receive descriptor
621  *	Using Chain structure, and allocate Tx/Rx buffer
622  */
623 
uli526x_descriptor_init(struct uli526x_board_info * db,unsigned long ioaddr)624 static void uli526x_descriptor_init(struct uli526x_board_info *db,
625 	unsigned long ioaddr)
626 {
627 	struct tx_desc *tmp_tx;
628 	struct rx_desc *tmp_rx;
629 	unsigned char *tmp_buf;
630 	dma_addr_t tmp_tx_dma, tmp_rx_dma;
631 	dma_addr_t tmp_buf_dma;
632 	int i;
633 	/* tx descriptor start pointer */
634 	db->tx_insert_ptr = db->first_tx_desc;
635 	db->tx_remove_ptr = db->first_tx_desc;
636 
637 	outl(db->first_tx_desc_dma, ioaddr + DCR4);     /* TX DESC address */
638 
639 	/* rx descriptor start pointer */
640 	db->first_rx_desc = (void *)db->first_tx_desc +
641 		sizeof(struct tx_desc) * TX_DESC_CNT;
642 	db->first_rx_desc_dma =  db->first_tx_desc_dma +
643 		sizeof(struct tx_desc) * TX_DESC_CNT;
644 	db->rx_ready_ptr = db->first_rx_desc;
645 	outl(db->first_rx_desc_dma, ioaddr + DCR3);	/* RX DESC address */
646 #ifdef DEBUG
647 	printf("%s(): db->first_tx_desc= 0x%x\n",
648 		__FUNCTION__, db->first_tx_desc);
649 	printf("%s(): db->first_rx_desc_dma= 0x%x\n",
650 		__FUNCTION__, db->first_rx_desc_dma);
651 #endif
652 	/* Init Transmit chain */
653 	tmp_buf = db->buf_pool_start;
654 	tmp_buf_dma = db->buf_pool_dma_start;
655 	tmp_tx_dma = db->first_tx_desc_dma;
656 	for (tmp_tx = db->first_tx_desc, i = 0;
657 			i < TX_DESC_CNT; i++, tmp_tx++) {
658 		tmp_tx->tx_buf_ptr = (char *)tmp_buf;
659 		tmp_tx->tdes0 = cpu_to_le32(0);
660 		tmp_tx->tdes1 = cpu_to_le32(0x81000000);	/* IC, chain */
661 		tmp_tx->tdes2 = cpu_to_le32(tmp_buf_dma);
662 		tmp_tx_dma += sizeof(struct tx_desc);
663 		tmp_tx->tdes3 = cpu_to_le32(tmp_tx_dma);
664 		tmp_tx->next_tx_desc = tmp_tx + 1;
665 		tmp_buf = tmp_buf + TX_BUF_ALLOC;
666 		tmp_buf_dma = tmp_buf_dma + TX_BUF_ALLOC;
667 	}
668 	(--tmp_tx)->tdes3 = cpu_to_le32(db->first_tx_desc_dma);
669 	tmp_tx->next_tx_desc = db->first_tx_desc;
670 
671 	 /* Init Receive descriptor chain */
672 	tmp_rx_dma = db->first_rx_desc_dma;
673 	for (tmp_rx = db->first_rx_desc, i = 0; i < RX_DESC_CNT;
674 			i++, tmp_rx++) {
675 		tmp_rx->rdes0 = cpu_to_le32(0);
676 		tmp_rx->rdes1 = cpu_to_le32(0x01000600);
677 		tmp_rx_dma += sizeof(struct rx_desc);
678 		tmp_rx->rdes3 = cpu_to_le32(tmp_rx_dma);
679 		tmp_rx->next_rx_desc = tmp_rx + 1;
680 	}
681 	(--tmp_rx)->rdes3 = cpu_to_le32(db->first_rx_desc_dma);
682 	tmp_rx->next_rx_desc = db->first_rx_desc;
683 
684 	/* pre-allocate Rx buffer */
685 	allocate_rx_buffer(db);
686 }
687 
688 /*
689  *	Update CR6 value
690  *	Firstly stop ULI526X, then written value and start
691  */
692 
update_cr6(u32 cr6_data,unsigned long ioaddr)693 static void update_cr6(u32 cr6_data, unsigned long ioaddr)
694 {
695 
696 	outl(cr6_data, ioaddr + DCR6);
697 	udelay(5);
698 }
699 
700 /*
701  *	Allocate rx buffer,
702  */
703 
allocate_rx_buffer(struct uli526x_board_info * db)704 static void allocate_rx_buffer(struct uli526x_board_info *db)
705 {
706 	int index;
707 	struct rx_desc *rxptr;
708 	rxptr = db->first_rx_desc;
709 	u32 addr;
710 
711 	for (index = 0; index < RX_DESC_CNT; index++) {
712 		addr = (u32)net_rx_packets[index];
713 		addr += (16 - (addr & 15));
714 		rxptr->rx_buf_ptr = (char *) addr;
715 		rxptr->rdes2 = cpu_to_le32(addr);
716 		rxptr->rdes0 = cpu_to_le32(0x80000000);
717 #ifdef DEBUG
718 		printf("%s(): Number 0x%x:\n", __FUNCTION__, index);
719 		printf("%s(): addr 0x%x:\n", __FUNCTION__, addr);
720 		printf("%s(): rxptr address = 0x%x\n", __FUNCTION__, rxptr);
721 		printf("%s(): rxptr buf address = 0x%x\n", \
722 			__FUNCTION__, rxptr->rx_buf_ptr);
723 		printf("%s(): rdes2  = 0x%x\n", __FUNCTION__, rxptr->rdes2);
724 #endif
725 		rxptr = rxptr->next_rx_desc;
726 	}
727 }
728 
729 /*
730  *	Read one word data from the serial ROM
731  */
732 
read_srom_word(long ioaddr,int offset)733 static u16 read_srom_word(long ioaddr, int offset)
734 {
735 	int i;
736 	u16 srom_data = 0;
737 	long cr9_ioaddr = ioaddr + DCR9;
738 
739 	outl(CR9_SROM_READ, cr9_ioaddr);
740 	outl(CR9_SROM_READ | CR9_SRCS, cr9_ioaddr);
741 
742 	/* Send the Read Command 110b */
743 	SROM_CLK_WRITE(SROM_DATA_1, cr9_ioaddr);
744 	SROM_CLK_WRITE(SROM_DATA_1, cr9_ioaddr);
745 	SROM_CLK_WRITE(SROM_DATA_0, cr9_ioaddr);
746 
747 	/* Send the offset */
748 	for (i = 5; i >= 0; i--) {
749 		srom_data = (offset & (1 << i)) ? SROM_DATA_1 : SROM_DATA_0;
750 		SROM_CLK_WRITE(srom_data, cr9_ioaddr);
751 	}
752 
753 	outl(CR9_SROM_READ | CR9_SRCS, cr9_ioaddr);
754 
755 	for (i = 16; i > 0; i--) {
756 		outl(CR9_SROM_READ | CR9_SRCS | CR9_SRCLK, cr9_ioaddr);
757 		udelay(5);
758 		srom_data = (srom_data << 1) | ((inl(cr9_ioaddr) & CR9_CRDOUT)
759 			? 1 : 0);
760 		outl(CR9_SROM_READ | CR9_SRCS, cr9_ioaddr);
761 		udelay(5);
762 	}
763 
764 	outl(CR9_SROM_READ, cr9_ioaddr);
765 	return srom_data;
766 }
767 
768 /*
769  *	Set 10/100 phyxcer capability
770  *	AUTO mode : phyxcer register4 is NIC capability
771  *	Force mode: phyxcer register4 is the force media
772  */
773 
uli526x_set_phyxcer(struct uli526x_board_info * db)774 static void uli526x_set_phyxcer(struct uli526x_board_info *db)
775 {
776 	u16 phy_reg;
777 
778 	/* Phyxcer capability setting */
779 	phy_reg = uli_phy_read(db->ioaddr,
780 			db->phy_addr, 4, db->chip_id) & ~0x01e0;
781 
782 	if (db->media_mode & ULI526X_AUTO) {
783 		/* AUTO Mode */
784 		phy_reg |= db->PHY_reg4;
785 	} else {
786 		/* Force Mode */
787 		switch (db->media_mode) {
788 		case ULI526X_10MHF: phy_reg |= 0x20; break;
789 		case ULI526X_10MFD: phy_reg |= 0x40; break;
790 		case ULI526X_100MHF: phy_reg |= 0x80; break;
791 		case ULI526X_100MFD: phy_reg |= 0x100; break;
792 		}
793 
794 	}
795 
796 	/* Write new capability to Phyxcer Reg4 */
797 	if (!(phy_reg & 0x01e0)) {
798 		phy_reg |= db->PHY_reg4;
799 		db->media_mode |= ULI526X_AUTO;
800 	}
801 	uli_phy_write(db->ioaddr, db->phy_addr, 4, phy_reg, db->chip_id);
802 
803 	/* Restart Auto-Negotiation */
804 	uli_phy_write(db->ioaddr, db->phy_addr, 0, 0x1200, db->chip_id);
805 	udelay(50);
806 }
807 
808 /*
809  *	Write a word to Phy register
810  */
811 
uli_phy_write(unsigned long iobase,u8 phy_addr,u8 offset,u16 phy_data,u32 chip_id)812 static void uli_phy_write(unsigned long iobase, u8 phy_addr, u8 offset,
813 	u16 phy_data, u32 chip_id)
814 {
815 	u16 i;
816 	unsigned long ioaddr;
817 
818 	if (chip_id == PCI_ULI5263_ID) {
819 		phy_writeby_cr10(iobase, phy_addr, offset, phy_data);
820 		return;
821 	}
822 	/* M5261/M5263 Chip */
823 	ioaddr = iobase + DCR9;
824 
825 	/* Send 33 synchronization clock to Phy controller */
826 	for (i = 0; i < 35; i++)
827 		phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
828 
829 	/* Send start command(01) to Phy */
830 	phy_write_1bit(ioaddr, PHY_DATA_0, chip_id);
831 	phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
832 
833 	/* Send write command(01) to Phy */
834 	phy_write_1bit(ioaddr, PHY_DATA_0, chip_id);
835 	phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
836 
837 	/* Send Phy address */
838 	for (i = 0x10; i > 0; i = i >> 1)
839 		phy_write_1bit(ioaddr, phy_addr & i ?
840 			PHY_DATA_1 : PHY_DATA_0, chip_id);
841 
842 	/* Send register address */
843 	for (i = 0x10; i > 0; i = i >> 1)
844 		phy_write_1bit(ioaddr, offset & i ?
845 			PHY_DATA_1 : PHY_DATA_0, chip_id);
846 
847 	/* written trasnition */
848 	phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
849 	phy_write_1bit(ioaddr, PHY_DATA_0, chip_id);
850 
851 	/* Write a word data to PHY controller */
852 	for (i = 0x8000; i > 0; i >>= 1)
853 		phy_write_1bit(ioaddr, phy_data & i ?
854 			PHY_DATA_1 : PHY_DATA_0, chip_id);
855 }
856 
857 /*
858  *	Read a word data from phy register
859  */
860 
uli_phy_read(unsigned long iobase,u8 phy_addr,u8 offset,u32 chip_id)861 static u16 uli_phy_read(unsigned long iobase, u8 phy_addr, u8 offset,
862 			u32 chip_id)
863 {
864 	int i;
865 	u16 phy_data;
866 	unsigned long ioaddr;
867 
868 	if (chip_id == PCI_ULI5263_ID)
869 		return phy_readby_cr10(iobase, phy_addr, offset);
870 	/* M5261/M5263 Chip */
871 	ioaddr = iobase + DCR9;
872 
873 	/* Send 33 synchronization clock to Phy controller */
874 	for (i = 0; i < 35; i++)
875 		phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
876 
877 	/* Send start command(01) to Phy */
878 	phy_write_1bit(ioaddr, PHY_DATA_0, chip_id);
879 	phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
880 
881 	/* Send read command(10) to Phy */
882 	phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
883 	phy_write_1bit(ioaddr, PHY_DATA_0, chip_id);
884 
885 	/* Send Phy address */
886 	for (i = 0x10; i > 0; i = i >> 1)
887 		phy_write_1bit(ioaddr, phy_addr & i ?
888 			PHY_DATA_1 : PHY_DATA_0, chip_id);
889 
890 	/* Send register address */
891 	for (i = 0x10; i > 0; i = i >> 1)
892 		phy_write_1bit(ioaddr, offset & i ?
893 			PHY_DATA_1 : PHY_DATA_0, chip_id);
894 
895 	/* Skip transition state */
896 	phy_read_1bit(ioaddr, chip_id);
897 
898 	/* read 16bit data */
899 	for (phy_data = 0, i = 0; i < 16; i++) {
900 		phy_data <<= 1;
901 		phy_data |= phy_read_1bit(ioaddr, chip_id);
902 	}
903 
904 	return phy_data;
905 }
906 
phy_readby_cr10(unsigned long iobase,u8 phy_addr,u8 offset)907 static u16 phy_readby_cr10(unsigned long iobase, u8 phy_addr, u8 offset)
908 {
909 	unsigned long ioaddr, cr10_value;
910 
911 	ioaddr = iobase + DCR10;
912 	cr10_value = phy_addr;
913 	cr10_value = (cr10_value<<5) + offset;
914 	cr10_value = (cr10_value<<16) + 0x08000000;
915 	outl(cr10_value, ioaddr);
916 	udelay(1);
917 	while (1) {
918 		cr10_value = inl(ioaddr);
919 		if (cr10_value & 0x10000000)
920 			break;
921 	}
922 	return (cr10_value&0x0ffff);
923 }
924 
phy_writeby_cr10(unsigned long iobase,u8 phy_addr,u8 offset,u16 phy_data)925 static void phy_writeby_cr10(unsigned long iobase, u8 phy_addr,
926 	u8 offset, u16 phy_data)
927 {
928 	unsigned long ioaddr, cr10_value;
929 
930 	ioaddr = iobase + DCR10;
931 	cr10_value = phy_addr;
932 	cr10_value = (cr10_value<<5) + offset;
933 	cr10_value = (cr10_value<<16) + 0x04000000 + phy_data;
934 	outl(cr10_value, ioaddr);
935 	udelay(1);
936 }
937 /*
938  *	Write one bit data to Phy Controller
939  */
940 
phy_write_1bit(unsigned long ioaddr,u32 phy_data,u32 chip_id)941 static void phy_write_1bit(unsigned long ioaddr, u32 phy_data, u32 chip_id)
942 {
943 	outl(phy_data , ioaddr);			/* MII Clock Low */
944 	udelay(1);
945 	outl(phy_data  | MDCLKH, ioaddr);	/* MII Clock High */
946 	udelay(1);
947 	outl(phy_data , ioaddr);			/* MII Clock Low */
948 	udelay(1);
949 }
950 
951 /*
952  *	Read one bit phy data from PHY controller
953  */
954 
phy_read_1bit(unsigned long ioaddr,u32 chip_id)955 static u16 phy_read_1bit(unsigned long ioaddr, u32 chip_id)
956 {
957 	u16 phy_data;
958 
959 	outl(0x50000 , ioaddr);
960 	udelay(1);
961 	phy_data = (inl(ioaddr) >> 19) & 0x1;
962 	outl(0x40000 , ioaddr);
963 	udelay(1);
964 
965 	return phy_data;
966 }
967 
968 /*
969  * Set MAC address to ID Table
970  */
971 
set_mac_addr(struct eth_device * dev)972 static void set_mac_addr(struct eth_device *dev)
973 {
974 	int i;
975 	u16 addr;
976 	struct uli526x_board_info *db = dev->priv;
977 	outl(0x10000, db->ioaddr + DCR0);	/* Diagnosis mode */
978 	/* Reset dianostic pointer port */
979 	outl(0x1c0, db->ioaddr + DCR13);
980 	outl(0, db->ioaddr + DCR14);	/* Clear reset port */
981 	outl(0x10, db->ioaddr + DCR14);	/* Reset ID Table pointer */
982 	outl(0, db->ioaddr + DCR14);	/* Clear reset port */
983 	outl(0, db->ioaddr + DCR13);	/* Clear CR13 */
984 	/* Select ID Table access port */
985 	outl(0x1b0, db->ioaddr + DCR13);
986 	/* Read MAC address from CR14 */
987 	for (i = 0; i < 3; i++) {
988 		addr = dev->enetaddr[2 * i] | (dev->enetaddr[2 * i + 1] << 8);
989 		outl(addr, db->ioaddr + DCR14);
990 	}
991 	/* write end */
992 	outl(0, db->ioaddr + DCR13);	/* Clear CR13 */
993 	outl(0, db->ioaddr + DCR0);	/* Clear CR0 */
994 	udelay(10);
995 	return;
996 }
997