1/*
2 * ASIX AX8817X based USB 2.0 Ethernet Devices
3 * Copyright (C) 2003-2006 David Hollis <dhollis@davehollis.com>
4 * Copyright (C) 2005 Phil Chang <pchang23@sbcglobal.net>
5 * Copyright (C) 2006 James Painter <jamie.painter@iname.com>
6 * Copyright (c) 2002-2003 TiVo Inc.
7 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (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, see <http://www.gnu.org/licenses/>.
20 */
21
22#include "asix.h"
23
24int asix_read_cmd(struct usbnet *dev, u8 cmd, u16 value, u16 index,
25		  u16 size, void *data)
26{
27	int ret;
28	ret = usbnet_read_cmd(dev, cmd,
29			       USB_DIR_IN | USB_TYPE_VENDOR | USB_RECIP_DEVICE,
30			       value, index, data, size);
31
32	if (ret != size && ret >= 0)
33		return -EINVAL;
34	return ret;
35}
36
37int asix_write_cmd(struct usbnet *dev, u8 cmd, u16 value, u16 index,
38		   u16 size, void *data)
39{
40	return usbnet_write_cmd(dev, cmd,
41				USB_DIR_OUT | USB_TYPE_VENDOR | USB_RECIP_DEVICE,
42				value, index, data, size);
43}
44
45void asix_write_cmd_async(struct usbnet *dev, u8 cmd, u16 value, u16 index,
46			  u16 size, void *data)
47{
48	usbnet_write_cmd_async(dev, cmd,
49			       USB_DIR_OUT | USB_TYPE_VENDOR | USB_RECIP_DEVICE,
50			       value, index, data, size);
51}
52
53int asix_rx_fixup_internal(struct usbnet *dev, struct sk_buff *skb,
54			   struct asix_rx_fixup_info *rx)
55{
56	int offset = 0;
57	u16 size;
58
59	/* When an Ethernet frame spans multiple URB socket buffers,
60	 * do a sanity test for the Data header synchronisation.
61	 * Attempt to detect the situation of the previous socket buffer having
62	 * been truncated or a socket buffer was missing. These situations
63	 * cause a discontinuity in the data stream and therefore need to avoid
64	 * appending bad data to the end of the current netdev socket buffer.
65	 * Also avoid unnecessarily discarding a good current netdev socket
66	 * buffer.
67	 */
68	if (rx->remaining && (rx->remaining + sizeof(u32) <= skb->len)) {
69		offset = ((rx->remaining + 1) & 0xfffe);
70		rx->header = get_unaligned_le32(skb->data + offset);
71		offset = 0;
72
73		size = (u16)(rx->header & 0x7ff);
74		if (size != ((~rx->header >> 16) & 0x7ff)) {
75			netdev_err(dev->net, "asix_rx_fixup() Data Header synchronisation was lost, remaining %d\n",
76				   rx->remaining);
77			if (rx->ax_skb) {
78				kfree_skb(rx->ax_skb);
79				rx->ax_skb = NULL;
80				/* Discard the incomplete netdev Ethernet frame
81				 * and assume the Data header is at the start of
82				 * the current URB socket buffer.
83				 */
84			}
85			rx->remaining = 0;
86		}
87	}
88
89	while (offset + sizeof(u16) <= skb->len) {
90		u16 copy_length;
91		unsigned char *data;
92
93		if (!rx->remaining) {
94			if (skb->len - offset == sizeof(u16)) {
95				rx->header = get_unaligned_le16(
96						skb->data + offset);
97				rx->split_head = true;
98				offset += sizeof(u16);
99				break;
100			}
101
102			if (rx->split_head == true) {
103				rx->header |= (get_unaligned_le16(
104						skb->data + offset) << 16);
105				rx->split_head = false;
106				offset += sizeof(u16);
107			} else {
108				rx->header = get_unaligned_le32(skb->data +
109								offset);
110				offset += sizeof(u32);
111			}
112
113			/* take frame length from Data header 32-bit word */
114			size = (u16)(rx->header & 0x7ff);
115			if (size != ((~rx->header >> 16) & 0x7ff)) {
116				netdev_err(dev->net, "asix_rx_fixup() Bad Header Length 0x%x, offset %d\n",
117					   rx->header, offset);
118				return 0;
119			}
120			if (size > dev->net->mtu + ETH_HLEN + VLAN_HLEN) {
121				netdev_err(dev->net, "asix_rx_fixup() Bad RX Length %d\n",
122					   size);
123				return 0;
124			}
125
126			/* Sometimes may fail to get a netdev socket buffer but
127			 * continue to process the URB socket buffer so that
128			 * synchronisation of the Ethernet frame Data header
129			 * word is maintained.
130			 */
131			rx->ax_skb = netdev_alloc_skb_ip_align(dev->net, size);
132
133			rx->remaining = size;
134		}
135
136		if (rx->remaining > skb->len - offset) {
137			copy_length = skb->len - offset;
138			rx->remaining -= copy_length;
139		} else {
140			copy_length = rx->remaining;
141			rx->remaining = 0;
142		}
143
144		if (rx->ax_skb) {
145			data = skb_put(rx->ax_skb, copy_length);
146			memcpy(data, skb->data + offset, copy_length);
147			if (!rx->remaining)
148				usbnet_skb_return(dev, rx->ax_skb);
149		}
150
151		offset += (copy_length + 1) & 0xfffe;
152	}
153
154	if (skb->len != offset) {
155		netdev_err(dev->net, "asix_rx_fixup() Bad SKB Length %d, %d\n",
156			   skb->len, offset);
157		return 0;
158	}
159
160	return 1;
161}
162
163int asix_rx_fixup_common(struct usbnet *dev, struct sk_buff *skb)
164{
165	struct asix_common_private *dp = dev->driver_priv;
166	struct asix_rx_fixup_info *rx = &dp->rx_fixup_info;
167
168	return asix_rx_fixup_internal(dev, skb, rx);
169}
170
171struct sk_buff *asix_tx_fixup(struct usbnet *dev, struct sk_buff *skb,
172			      gfp_t flags)
173{
174	int padlen;
175	int headroom = skb_headroom(skb);
176	int tailroom = skb_tailroom(skb);
177	u32 packet_len;
178	u32 padbytes = 0xffff0000;
179
180	padlen = ((skb->len + 4) & (dev->maxpacket - 1)) ? 0 : 4;
181
182	/* We need to push 4 bytes in front of frame (packet_len)
183	 * and maybe add 4 bytes after the end (if padlen is 4)
184	 *
185	 * Avoid skb_copy_expand() expensive call, using following rules :
186	 * - We are allowed to push 4 bytes in headroom if skb_header_cloned()
187	 *   is false (and if we have 4 bytes of headroom)
188	 * - We are allowed to put 4 bytes at tail if skb_cloned()
189	 *   is false (and if we have 4 bytes of tailroom)
190	 *
191	 * TCP packets for example are cloned, but skb_header_release()
192	 * was called in tcp stack, allowing us to use headroom for our needs.
193	 */
194	if (!skb_header_cloned(skb) &&
195	    !(padlen && skb_cloned(skb)) &&
196	    headroom + tailroom >= 4 + padlen) {
197		/* following should not happen, but better be safe */
198		if (headroom < 4 ||
199		    tailroom < padlen) {
200			skb->data = memmove(skb->head + 4, skb->data, skb->len);
201			skb_set_tail_pointer(skb, skb->len);
202		}
203	} else {
204		struct sk_buff *skb2;
205
206		skb2 = skb_copy_expand(skb, 4, padlen, flags);
207		dev_kfree_skb_any(skb);
208		skb = skb2;
209		if (!skb)
210			return NULL;
211	}
212
213	packet_len = ((skb->len ^ 0x0000ffff) << 16) + skb->len;
214	skb_push(skb, 4);
215	cpu_to_le32s(&packet_len);
216	skb_copy_to_linear_data(skb, &packet_len, sizeof(packet_len));
217
218	if (padlen) {
219		cpu_to_le32s(&padbytes);
220		memcpy(skb_tail_pointer(skb), &padbytes, sizeof(padbytes));
221		skb_put(skb, sizeof(padbytes));
222	}
223
224	usbnet_set_skb_tx_stats(skb, 1, 0);
225	return skb;
226}
227
228int asix_set_sw_mii(struct usbnet *dev)
229{
230	int ret;
231	ret = asix_write_cmd(dev, AX_CMD_SET_SW_MII, 0x0000, 0, 0, NULL);
232	if (ret < 0)
233		netdev_err(dev->net, "Failed to enable software MII access\n");
234	return ret;
235}
236
237int asix_set_hw_mii(struct usbnet *dev)
238{
239	int ret;
240	ret = asix_write_cmd(dev, AX_CMD_SET_HW_MII, 0x0000, 0, 0, NULL);
241	if (ret < 0)
242		netdev_err(dev->net, "Failed to enable hardware MII access\n");
243	return ret;
244}
245
246int asix_read_phy_addr(struct usbnet *dev, int internal)
247{
248	int offset = (internal ? 1 : 0);
249	u8 buf[2];
250	int ret = asix_read_cmd(dev, AX_CMD_READ_PHY_ID, 0, 0, 2, buf);
251
252	netdev_dbg(dev->net, "asix_get_phy_addr()\n");
253
254	if (ret < 0) {
255		netdev_err(dev->net, "Error reading PHYID register: %02x\n", ret);
256		goto out;
257	}
258	netdev_dbg(dev->net, "asix_get_phy_addr() returning 0x%04x\n",
259		   *((__le16 *)buf));
260	ret = buf[offset];
261
262out:
263	return ret;
264}
265
266int asix_get_phy_addr(struct usbnet *dev)
267{
268	/* return the address of the internal phy */
269	return asix_read_phy_addr(dev, 1);
270}
271
272
273int asix_sw_reset(struct usbnet *dev, u8 flags)
274{
275	int ret;
276
277        ret = asix_write_cmd(dev, AX_CMD_SW_RESET, flags, 0, 0, NULL);
278	if (ret < 0)
279		netdev_err(dev->net, "Failed to send software reset: %02x\n", ret);
280
281	return ret;
282}
283
284u16 asix_read_rx_ctl(struct usbnet *dev)
285{
286	__le16 v;
287	int ret = asix_read_cmd(dev, AX_CMD_READ_RX_CTL, 0, 0, 2, &v);
288
289	if (ret < 0) {
290		netdev_err(dev->net, "Error reading RX_CTL register: %02x\n", ret);
291		goto out;
292	}
293	ret = le16_to_cpu(v);
294out:
295	return ret;
296}
297
298int asix_write_rx_ctl(struct usbnet *dev, u16 mode)
299{
300	int ret;
301
302	netdev_dbg(dev->net, "asix_write_rx_ctl() - mode = 0x%04x\n", mode);
303	ret = asix_write_cmd(dev, AX_CMD_WRITE_RX_CTL, mode, 0, 0, NULL);
304	if (ret < 0)
305		netdev_err(dev->net, "Failed to write RX_CTL mode to 0x%04x: %02x\n",
306			   mode, ret);
307
308	return ret;
309}
310
311u16 asix_read_medium_status(struct usbnet *dev)
312{
313	__le16 v;
314	int ret = asix_read_cmd(dev, AX_CMD_READ_MEDIUM_STATUS, 0, 0, 2, &v);
315
316	if (ret < 0) {
317		netdev_err(dev->net, "Error reading Medium Status register: %02x\n",
318			   ret);
319		return ret;	/* TODO: callers not checking for error ret */
320	}
321
322	return le16_to_cpu(v);
323
324}
325
326int asix_write_medium_mode(struct usbnet *dev, u16 mode)
327{
328	int ret;
329
330	netdev_dbg(dev->net, "asix_write_medium_mode() - mode = 0x%04x\n", mode);
331	ret = asix_write_cmd(dev, AX_CMD_WRITE_MEDIUM_MODE, mode, 0, 0, NULL);
332	if (ret < 0)
333		netdev_err(dev->net, "Failed to write Medium Mode mode to 0x%04x: %02x\n",
334			   mode, ret);
335
336	return ret;
337}
338
339int asix_write_gpio(struct usbnet *dev, u16 value, int sleep)
340{
341	int ret;
342
343	netdev_dbg(dev->net, "asix_write_gpio() - value = 0x%04x\n", value);
344	ret = asix_write_cmd(dev, AX_CMD_WRITE_GPIOS, value, 0, 0, NULL);
345	if (ret < 0)
346		netdev_err(dev->net, "Failed to write GPIO value 0x%04x: %02x\n",
347			   value, ret);
348
349	if (sleep)
350		msleep(sleep);
351
352	return ret;
353}
354
355/*
356 * AX88772 & AX88178 have a 16-bit RX_CTL value
357 */
358void asix_set_multicast(struct net_device *net)
359{
360	struct usbnet *dev = netdev_priv(net);
361	struct asix_data *data = (struct asix_data *)&dev->data;
362	u16 rx_ctl = AX_DEFAULT_RX_CTL;
363
364	if (net->flags & IFF_PROMISC) {
365		rx_ctl |= AX_RX_CTL_PRO;
366	} else if (net->flags & IFF_ALLMULTI ||
367		   netdev_mc_count(net) > AX_MAX_MCAST) {
368		rx_ctl |= AX_RX_CTL_AMALL;
369	} else if (netdev_mc_empty(net)) {
370		/* just broadcast and directed */
371	} else {
372		/* We use the 20 byte dev->data
373		 * for our 8 byte filter buffer
374		 * to avoid allocating memory that
375		 * is tricky to free later */
376		struct netdev_hw_addr *ha;
377		u32 crc_bits;
378
379		memset(data->multi_filter, 0, AX_MCAST_FILTER_SIZE);
380
381		/* Build the multicast hash filter. */
382		netdev_for_each_mc_addr(ha, net) {
383			crc_bits = ether_crc(ETH_ALEN, ha->addr) >> 26;
384			data->multi_filter[crc_bits >> 3] |=
385			    1 << (crc_bits & 7);
386		}
387
388		asix_write_cmd_async(dev, AX_CMD_WRITE_MULTI_FILTER, 0, 0,
389				   AX_MCAST_FILTER_SIZE, data->multi_filter);
390
391		rx_ctl |= AX_RX_CTL_AM;
392	}
393
394	asix_write_cmd_async(dev, AX_CMD_WRITE_RX_CTL, rx_ctl, 0, 0, NULL);
395}
396
397int asix_mdio_read(struct net_device *netdev, int phy_id, int loc)
398{
399	struct usbnet *dev = netdev_priv(netdev);
400	__le16 res;
401
402	mutex_lock(&dev->phy_mutex);
403	asix_set_sw_mii(dev);
404	asix_read_cmd(dev, AX_CMD_READ_MII_REG, phy_id,
405				(__u16)loc, 2, &res);
406	asix_set_hw_mii(dev);
407	mutex_unlock(&dev->phy_mutex);
408
409	netdev_dbg(dev->net, "asix_mdio_read() phy_id=0x%02x, loc=0x%02x, returns=0x%04x\n",
410		   phy_id, loc, le16_to_cpu(res));
411
412	return le16_to_cpu(res);
413}
414
415void asix_mdio_write(struct net_device *netdev, int phy_id, int loc, int val)
416{
417	struct usbnet *dev = netdev_priv(netdev);
418	__le16 res = cpu_to_le16(val);
419
420	netdev_dbg(dev->net, "asix_mdio_write() phy_id=0x%02x, loc=0x%02x, val=0x%04x\n",
421		   phy_id, loc, val);
422	mutex_lock(&dev->phy_mutex);
423	asix_set_sw_mii(dev);
424	asix_write_cmd(dev, AX_CMD_WRITE_MII_REG, phy_id, (__u16)loc, 2, &res);
425	asix_set_hw_mii(dev);
426	mutex_unlock(&dev->phy_mutex);
427}
428
429void asix_get_wol(struct net_device *net, struct ethtool_wolinfo *wolinfo)
430{
431	struct usbnet *dev = netdev_priv(net);
432	u8 opt;
433
434	if (asix_read_cmd(dev, AX_CMD_READ_MONITOR_MODE, 0, 0, 1, &opt) < 0) {
435		wolinfo->supported = 0;
436		wolinfo->wolopts = 0;
437		return;
438	}
439	wolinfo->supported = WAKE_PHY | WAKE_MAGIC;
440	wolinfo->wolopts = 0;
441	if (opt & AX_MONITOR_LINK)
442		wolinfo->wolopts |= WAKE_PHY;
443	if (opt & AX_MONITOR_MAGIC)
444		wolinfo->wolopts |= WAKE_MAGIC;
445}
446
447int asix_set_wol(struct net_device *net, struct ethtool_wolinfo *wolinfo)
448{
449	struct usbnet *dev = netdev_priv(net);
450	u8 opt = 0;
451
452	if (wolinfo->wolopts & WAKE_PHY)
453		opt |= AX_MONITOR_LINK;
454	if (wolinfo->wolopts & WAKE_MAGIC)
455		opt |= AX_MONITOR_MAGIC;
456
457	if (asix_write_cmd(dev, AX_CMD_WRITE_MONITOR_MODE,
458			      opt, 0, 0, NULL) < 0)
459		return -EINVAL;
460
461	return 0;
462}
463
464int asix_get_eeprom_len(struct net_device *net)
465{
466	return AX_EEPROM_LEN;
467}
468
469int asix_get_eeprom(struct net_device *net, struct ethtool_eeprom *eeprom,
470		    u8 *data)
471{
472	struct usbnet *dev = netdev_priv(net);
473	u16 *eeprom_buff;
474	int first_word, last_word;
475	int i;
476
477	if (eeprom->len == 0)
478		return -EINVAL;
479
480	eeprom->magic = AX_EEPROM_MAGIC;
481
482	first_word = eeprom->offset >> 1;
483	last_word = (eeprom->offset + eeprom->len - 1) >> 1;
484
485	eeprom_buff = kmalloc(sizeof(u16) * (last_word - first_word + 1),
486			      GFP_KERNEL);
487	if (!eeprom_buff)
488		return -ENOMEM;
489
490	/* ax8817x returns 2 bytes from eeprom on read */
491	for (i = first_word; i <= last_word; i++) {
492		if (asix_read_cmd(dev, AX_CMD_READ_EEPROM, i, 0, 2,
493				  &(eeprom_buff[i - first_word])) < 0) {
494			kfree(eeprom_buff);
495			return -EIO;
496		}
497	}
498
499	memcpy(data, (u8 *)eeprom_buff + (eeprom->offset & 1), eeprom->len);
500	kfree(eeprom_buff);
501	return 0;
502}
503
504int asix_set_eeprom(struct net_device *net, struct ethtool_eeprom *eeprom,
505		    u8 *data)
506{
507	struct usbnet *dev = netdev_priv(net);
508	u16 *eeprom_buff;
509	int first_word, last_word;
510	int i;
511	int ret;
512
513	netdev_dbg(net, "write EEPROM len %d, offset %d, magic 0x%x\n",
514		   eeprom->len, eeprom->offset, eeprom->magic);
515
516	if (eeprom->len == 0)
517		return -EINVAL;
518
519	if (eeprom->magic != AX_EEPROM_MAGIC)
520		return -EINVAL;
521
522	first_word = eeprom->offset >> 1;
523	last_word = (eeprom->offset + eeprom->len - 1) >> 1;
524
525	eeprom_buff = kmalloc(sizeof(u16) * (last_word - first_word + 1),
526			      GFP_KERNEL);
527	if (!eeprom_buff)
528		return -ENOMEM;
529
530	/* align data to 16 bit boundaries, read the missing data from
531	   the EEPROM */
532	if (eeprom->offset & 1) {
533		ret = asix_read_cmd(dev, AX_CMD_READ_EEPROM, first_word, 0, 2,
534				    &(eeprom_buff[0]));
535		if (ret < 0) {
536			netdev_err(net, "Failed to read EEPROM at offset 0x%02x.\n", first_word);
537			goto free;
538		}
539	}
540
541	if ((eeprom->offset + eeprom->len) & 1) {
542		ret = asix_read_cmd(dev, AX_CMD_READ_EEPROM, last_word, 0, 2,
543				    &(eeprom_buff[last_word - first_word]));
544		if (ret < 0) {
545			netdev_err(net, "Failed to read EEPROM at offset 0x%02x.\n", last_word);
546			goto free;
547		}
548	}
549
550	memcpy((u8 *)eeprom_buff + (eeprom->offset & 1), data, eeprom->len);
551
552	/* write data to EEPROM */
553	ret = asix_write_cmd(dev, AX_CMD_WRITE_ENABLE, 0x0000, 0, 0, NULL);
554	if (ret < 0) {
555		netdev_err(net, "Failed to enable EEPROM write\n");
556		goto free;
557	}
558	msleep(20);
559
560	for (i = first_word; i <= last_word; i++) {
561		netdev_dbg(net, "write to EEPROM at offset 0x%02x, data 0x%04x\n",
562			   i, eeprom_buff[i - first_word]);
563		ret = asix_write_cmd(dev, AX_CMD_WRITE_EEPROM, i,
564				     eeprom_buff[i - first_word], 0, NULL);
565		if (ret < 0) {
566			netdev_err(net, "Failed to write EEPROM at offset 0x%02x.\n",
567				   i);
568			goto free;
569		}
570		msleep(20);
571	}
572
573	ret = asix_write_cmd(dev, AX_CMD_WRITE_DISABLE, 0x0000, 0, 0, NULL);
574	if (ret < 0) {
575		netdev_err(net, "Failed to disable EEPROM write\n");
576		goto free;
577	}
578
579	ret = 0;
580free:
581	kfree(eeprom_buff);
582	return ret;
583}
584
585void asix_get_drvinfo(struct net_device *net, struct ethtool_drvinfo *info)
586{
587	/* Inherit standard device info */
588	usbnet_get_drvinfo(net, info);
589	strlcpy(info->driver, DRIVER_NAME, sizeof(info->driver));
590	strlcpy(info->version, DRIVER_VERSION, sizeof(info->version));
591}
592
593int asix_set_mac_address(struct net_device *net, void *p)
594{
595	struct usbnet *dev = netdev_priv(net);
596	struct asix_data *data = (struct asix_data *)&dev->data;
597	struct sockaddr *addr = p;
598
599	if (netif_running(net))
600		return -EBUSY;
601	if (!is_valid_ether_addr(addr->sa_data))
602		return -EADDRNOTAVAIL;
603
604	memcpy(net->dev_addr, addr->sa_data, ETH_ALEN);
605
606	/* We use the 20 byte dev->data
607	 * for our 6 byte mac buffer
608	 * to avoid allocating memory that
609	 * is tricky to free later */
610	memcpy(data->mac_addr, addr->sa_data, ETH_ALEN);
611	asix_write_cmd_async(dev, AX_CMD_WRITE_NODE_ID, 0, 0, ETH_ALEN,
612							data->mac_addr);
613
614	return 0;
615}
616