| /***************************************************************************** | 
 | * | 
 | * Filename:      mcs7780.c | 
 | * Version:       0.4-alpha | 
 | * Description:   Irda MosChip USB Dongle Driver | 
 | * Authors:       Lukasz Stelmach <stlman@poczta.fm> | 
 | * 		 Brian Pugh <bpugh@cs.pdx.edu> | 
 | *		 Judy Fischbach <jfisch@cs.pdx.edu> | 
 | * | 
 | *       Based on stir4200 driver, but some things done differently. | 
 | *       Based on earlier driver by Paul Stewart <stewart@parc.com> | 
 | * | 
 | *       Copyright (C) 2000, Roman Weissgaerber <weissg@vienna.at> | 
 | *       Copyright (C) 2001, Dag Brattli <dag@brattli.net> | 
 | *       Copyright (C) 2001, Jean Tourrilhes <jt@hpl.hp.com> | 
 | *       Copyright (C) 2004, Stephen Hemminger <shemminger@osdl.org> | 
 | *       Copyright (C) 2005, Lukasz Stelmach <stlman@poczta.fm> | 
 | *       Copyright (C) 2005, Brian Pugh <bpugh@cs.pdx.edu> | 
 | *       Copyright (C) 2005, Judy Fischbach <jfisch@cs.pdx.edu> | 
 | * | 
 | *       This program is free software; you can redistribute it and/or modify | 
 | *       it under the terms of the GNU General Public License as published by | 
 | *       the Free Software Foundation; either version 2 of the License, or | 
 | *       (at your option) any later version. | 
 | * | 
 | *       This program is distributed in the hope that it will be useful, | 
 | *       but WITHOUT ANY WARRANTY; without even the implied warranty of | 
 | *       MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
 | *       GNU General Public License for more details. | 
 | * | 
 | *       You should have received a copy of the GNU General Public License | 
 | *       along with this program; if not, write to the Free Software | 
 | *       Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. | 
 | * | 
 | *****************************************************************************/ | 
 |  | 
 | /* | 
 |  * MCS7780 is a simple USB to IrDA bridge by MosChip. It is neither | 
 |  * compatibile with irda-usb nor with stir4200. Although it is quite | 
 |  * similar to the later as far as general idea of operation is concerned. | 
 |  * That is it requires the software to do all the framing job at SIR speeds. | 
 |  * The hardware does take care of the framing at MIR and FIR speeds. | 
 |  * It supports all speeds from 2400 through 4Mbps | 
 |  */ | 
 |  | 
 | #include <linux/module.h> | 
 | #include <linux/moduleparam.h> | 
 | #include <linux/kernel.h> | 
 | #include <linux/types.h> | 
 | #include <linux/errno.h> | 
 | #include <linux/init.h> | 
 | #include <linux/slab.h> | 
 | #include <linux/usb.h> | 
 | #include <linux/device.h> | 
 | #include <linux/crc32.h> | 
 |  | 
 | #include <asm/unaligned.h> | 
 | #include <asm/byteorder.h> | 
 | #include <asm/uaccess.h> | 
 |  | 
 | #include <net/irda/irda.h> | 
 | #include <net/irda/wrapper.h> | 
 | #include <net/irda/crc.h> | 
 |  | 
 | #include "mcs7780.h" | 
 |  | 
 | #define MCS_VENDOR_ID 0x9710 | 
 | #define MCS_PRODUCT_ID 0x7780 | 
 |  | 
 | static struct usb_device_id mcs_table[] = { | 
 | 	/* MosChip Corp.,  MCS7780 FIR-USB Adapter */ | 
 | 	{USB_DEVICE(MCS_VENDOR_ID, MCS_PRODUCT_ID)}, | 
 | 	{}, | 
 | }; | 
 |  | 
 | MODULE_AUTHOR("Brian Pugh <bpugh@cs.pdx.edu>"); | 
 | MODULE_DESCRIPTION("IrDA-USB Dongle Driver for MosChip MCS7780"); | 
 | MODULE_VERSION("0.3alpha"); | 
 | MODULE_LICENSE("GPL"); | 
 |  | 
 | MODULE_DEVICE_TABLE(usb, mcs_table); | 
 |  | 
 | static int qos_mtt_bits = 0x07 /* > 1ms */ ; | 
 | module_param(qos_mtt_bits, int, 0); | 
 | MODULE_PARM_DESC(qos_mtt_bits, "Minimum Turn Time"); | 
 |  | 
 | static int receive_mode = 0x1; | 
 | module_param(receive_mode, int, 0); | 
 | MODULE_PARM_DESC(receive_mode, | 
 | 		 "Receive mode of the device (1:fast, 0:slow, default:1)"); | 
 |  | 
 | static int sir_tweak = 1; | 
 | module_param(sir_tweak, int, 0444); | 
 | MODULE_PARM_DESC(sir_tweak, | 
 | 		 "Default pulse width (1:1.6us, 0:3/16 bit, default:1)."); | 
 |  | 
 | static int transceiver_type = MCS_TSC_VISHAY; | 
 | module_param(transceiver_type, int, 0444); | 
 | MODULE_PARM_DESC(transceiver_type, "IR transceiver type, see mcs7780.h."); | 
 |  | 
 | static struct usb_driver mcs_driver = { | 
 | 	.name = "mcs7780", | 
 | 	.probe = mcs_probe, | 
 | 	.disconnect = mcs_disconnect, | 
 | 	.id_table = mcs_table, | 
 | }; | 
 |  | 
 | /* speed flag selection by direct addressing. | 
 | addr = (speed >> 8) & 0x0f | 
 |  | 
 | 0x1   57600	 0x2  115200	 0x4 1152000	 0x5    9600 | 
 | 0x6   38400	 0x9    2400	 0xa  576000	 0xb   19200 | 
 |  | 
 | 4Mbps (or 2400) must be checked separately. Since it also has | 
 | to be programmed in a different manner that is not a big problem. | 
 | */ | 
 | static __u16 mcs_speed_set[16] = { 0, | 
 | 	MCS_SPEED_57600, | 
 | 	MCS_SPEED_115200, | 
 | 	0, | 
 | 	MCS_SPEED_1152000, | 
 | 	MCS_SPEED_9600, | 
 | 	MCS_SPEED_38400, | 
 | 	0, 0, | 
 | 	MCS_SPEED_2400, | 
 | 	MCS_SPEED_576000, | 
 | 	MCS_SPEED_19200, | 
 | 	0, 0, 0, | 
 | }; | 
 |  | 
 | /* Set given 16 bit register with a 16 bit value. Send control message | 
 |  * to set dongle register. */ | 
 | static int mcs_set_reg(struct mcs_cb *mcs, __u16 reg, __u16 val) | 
 | { | 
 | 	struct usb_device *dev = mcs->usbdev; | 
 | 	return usb_control_msg(dev, usb_sndctrlpipe(dev, 0), MCS_WRREQ, | 
 | 			       MCS_WR_RTYPE, val, reg, NULL, 0, | 
 | 			       msecs_to_jiffies(MCS_CTRL_TIMEOUT)); | 
 | } | 
 |  | 
 | /* Get 16 bit register value. Send contol message to read dongle register. */ | 
 | static int mcs_get_reg(struct mcs_cb *mcs, __u16 reg, __u16 * val) | 
 | { | 
 | 	struct usb_device *dev = mcs->usbdev; | 
 | 	int ret = usb_control_msg(dev, usb_rcvctrlpipe(dev, 0), MCS_RDREQ, | 
 | 				  MCS_RD_RTYPE, 0, reg, val, 2, | 
 | 				  msecs_to_jiffies(MCS_CTRL_TIMEOUT)); | 
 |  | 
 | 	return ret; | 
 | } | 
 |  | 
 | /* Setup a communication between mcs7780 and TFDU chips.  It is described | 
 |  * in more detail in the data sheet.  The setup sequence puts the the | 
 |  * vishay tranceiver into high speed mode.  It will also receive SIR speed | 
 |  * packets but at reduced sensitivity. | 
 |  */ | 
 |  | 
 | /* 0: OK 1:ERROR */ | 
 | static inline int mcs_setup_transceiver_vishay(struct mcs_cb *mcs) | 
 | { | 
 | 	int ret = 0; | 
 | 	__u16 rval; | 
 |  | 
 | 	/* mcs_get_reg should read exactly two bytes from the dongle */ | 
 | 	ret = mcs_get_reg(mcs, MCS_XCVR_REG, &rval); | 
 | 	if (unlikely(ret != 2)) { | 
 | 		ret = -EIO; | 
 | 		goto error; | 
 | 	} | 
 |  | 
 | 	/* The MCS_XCVR_CONF bit puts the transceiver into configuration | 
 | 	 * mode.  The MCS_MODE0 bit must start out high (1) and then | 
 | 	 * transition to low and the MCS_STFIR and MCS_MODE1 bits must | 
 | 	 * be low. | 
 | 	 */ | 
 | 	rval |= (MCS_MODE0 | MCS_XCVR_CONF); | 
 | 	rval &= ~MCS_STFIR; | 
 | 	rval &= ~MCS_MODE1; | 
 | 	ret = mcs_set_reg(mcs, MCS_XCVR_REG, rval); | 
 | 	if (unlikely(ret)) | 
 | 		goto error; | 
 |  | 
 | 	rval &= ~MCS_MODE0; | 
 | 	ret = mcs_set_reg(mcs, MCS_XCVR_REG, rval); | 
 | 	if (unlikely(ret)) | 
 | 		goto error; | 
 |  | 
 | 	rval &= ~MCS_XCVR_CONF; | 
 | 	ret = mcs_set_reg(mcs, MCS_XCVR_REG, rval); | 
 | 	if (unlikely(ret)) | 
 | 		goto error; | 
 |  | 
 | 	ret = 0; | 
 | 	error: | 
 | 		return ret; | 
 | } | 
 |  | 
 | /* Setup a communication between mcs7780 and agilent chip. */ | 
 | static inline int mcs_setup_transceiver_agilent(struct mcs_cb *mcs) | 
 | { | 
 | 	IRDA_WARNING("This transceiver type is not supported yet.\n"); | 
 | 	return 1; | 
 | } | 
 |  | 
 | /* Setup a communication between mcs7780 and sharp chip. */ | 
 | static inline int mcs_setup_transceiver_sharp(struct mcs_cb *mcs) | 
 | { | 
 | 	IRDA_WARNING("This transceiver type is not supported yet.\n"); | 
 | 	return 1; | 
 | } | 
 |  | 
 | /* Common setup for all transceivers */ | 
 | static inline int mcs_setup_transceiver(struct mcs_cb *mcs) | 
 | { | 
 | 	int ret = 0; | 
 | 	__u16 rval; | 
 | 	char *msg; | 
 |  | 
 | 	msg = "Basic transceiver setup error."; | 
 |  | 
 | 	/* read value of MODE Register, set the DRIVER and RESET bits | 
 | 	* and write value back out to MODE Register | 
 | 	*/ | 
 | 	ret = mcs_get_reg(mcs, MCS_MODE_REG, &rval); | 
 | 	if(unlikely(ret != 2)) | 
 | 		goto error; | 
 | 	rval |= MCS_DRIVER;	/* put the mcs7780 into configuration mode. */ | 
 | 	ret = mcs_set_reg(mcs, MCS_MODE_REG, rval); | 
 | 	if(unlikely(ret)) | 
 | 		goto error; | 
 |  | 
 | 	rval = 0;		/* set min pulse width to 0 initially. */ | 
 | 	ret = mcs_set_reg(mcs, MCS_MINRXPW_REG, rval); | 
 | 	if(unlikely(ret)) | 
 | 		goto error; | 
 |  | 
 | 	ret = mcs_get_reg(mcs, MCS_MODE_REG, &rval); | 
 | 	if(unlikely(ret != 2)) | 
 | 		goto error; | 
 |  | 
 | 	rval &= ~MCS_FIR;	/* turn off fir mode. */ | 
 | 	if(mcs->sir_tweak) | 
 | 		rval |= MCS_SIR16US;	/* 1.6us pulse width */ | 
 | 	else | 
 | 		rval &= ~MCS_SIR16US;	/* 3/16 bit time pulse width */ | 
 |  | 
 | 	/* make sure ask mode and back to back packets are off. */ | 
 | 	rval &= ~(MCS_BBTG | MCS_ASK); | 
 |  | 
 | 	rval &= ~MCS_SPEED_MASK; | 
 | 	rval |= MCS_SPEED_9600;		/* make sure initial speed is 9600. */ | 
 | 	mcs->speed = 9600; | 
 | 	mcs->new_speed = 0;		/* new_speed is set to 0 */ | 
 | 	rval &= ~MCS_PLLPWDN;		/* disable power down. */ | 
 |  | 
 | 	/* make sure device determines direction and that the auto send sip | 
 | 	 * pulse are on. | 
 | 	 */ | 
 | 	rval |= MCS_DTD | MCS_SIPEN; | 
 |  | 
 | 	ret = mcs_set_reg(mcs, MCS_MODE_REG, rval); | 
 | 	if(unlikely(ret)) | 
 | 		goto error; | 
 |  | 
 | 	msg = "transceiver model specific setup error."; | 
 | 	switch (mcs->transceiver_type) { | 
 | 	case MCS_TSC_VISHAY: | 
 | 		ret = mcs_setup_transceiver_vishay(mcs); | 
 | 		break; | 
 |  | 
 | 	case MCS_TSC_SHARP: | 
 | 		ret = mcs_setup_transceiver_sharp(mcs); | 
 | 		break; | 
 |  | 
 | 	case MCS_TSC_AGILENT: | 
 | 		ret = mcs_setup_transceiver_agilent(mcs); | 
 | 		break; | 
 |  | 
 | 	default: | 
 | 		IRDA_WARNING("Unknown transceiver type: %d\n", | 
 | 			     mcs->transceiver_type); | 
 | 		ret = 1; | 
 | 	} | 
 | 	if (unlikely(ret)) | 
 | 		goto error; | 
 |  | 
 | 	/* If transceiver is not SHARP, then if receive mode set | 
 | 	* on the RXFAST bit in the XCVR Register otherwise unset it | 
 | 	*/ | 
 | 	if (mcs->transceiver_type != MCS_TSC_SHARP) { | 
 |  | 
 | 		ret = mcs_get_reg(mcs, MCS_XCVR_REG, &rval); | 
 | 		if (unlikely(ret != 2)) | 
 | 			goto error; | 
 | 		if (mcs->receive_mode) | 
 | 			rval |= MCS_RXFAST; | 
 | 		else | 
 | 			rval &= ~MCS_RXFAST; | 
 | 		ret = mcs_set_reg(mcs, MCS_XCVR_REG, rval); | 
 | 		if (unlikely(ret)) | 
 | 			goto error; | 
 | 	} | 
 |  | 
 | 	msg = "transceiver reset."; | 
 |  | 
 | 	ret = mcs_get_reg(mcs, MCS_MODE_REG, &rval); | 
 | 	if (unlikely(ret != 2)) | 
 | 		goto error; | 
 |  | 
 | 	/* reset the mcs7780 so all changes take effect. */ | 
 | 	rval &= ~MCS_RESET; | 
 | 	ret = mcs_set_reg(mcs, MCS_MODE_REG, rval); | 
 | 	if (unlikely(ret)) | 
 | 		goto error; | 
 | 	else | 
 | 		return ret; | 
 |  | 
 | error: | 
 | 	IRDA_ERROR("%s\n", msg); | 
 | 	return ret; | 
 | } | 
 |  | 
 | /* Wraps the data in format for SIR */ | 
 | static inline int mcs_wrap_sir_skb(struct sk_buff *skb, __u8 * buf) | 
 | { | 
 | 	int wraplen; | 
 |  | 
 | 	/* 2: full frame length, including "the length" */ | 
 | 	wraplen = async_wrap_skb(skb, buf + 2, 4094); | 
 |  | 
 | 	wraplen += 2; | 
 | 	buf[0] = wraplen & 0xff; | 
 | 	buf[1] = (wraplen >> 8) & 0xff; | 
 |  | 
 | 	return wraplen; | 
 | } | 
 |  | 
 | /* Wraps the data in format for FIR */ | 
 | static unsigned mcs_wrap_fir_skb(const struct sk_buff *skb, __u8 *buf) | 
 | { | 
 | 	unsigned int len = 0; | 
 | 	__u32 fcs = ~(crc32_le(~0, skb->data, skb->len)); | 
 |  | 
 | 	/* add 2 bytes for length value and 4 bytes for fcs. */ | 
 | 	len = skb->len + 6; | 
 |  | 
 | 	/* The mcs7780 requires that the first two bytes are the packet | 
 | 	 * length in little endian order.  Note: the length value includes | 
 | 	 * the two bytes for the length value itself. | 
 | 	 */ | 
 | 	buf[0] = len & 0xff; | 
 | 	buf[1] = (len >> 8) & 0xff; | 
 | 	/* copy the data into the tx buffer. */ | 
 | 	skb_copy_from_linear_data(skb, buf + 2, skb->len); | 
 | 	/* put the fcs in the last four bytes in little endian order. */ | 
 | 	buf[len - 4] = fcs & 0xff; | 
 | 	buf[len - 3] = (fcs >> 8) & 0xff; | 
 | 	buf[len - 2] = (fcs >> 16) & 0xff; | 
 | 	buf[len - 1] = (fcs >> 24) & 0xff; | 
 |  | 
 | 	return len; | 
 | } | 
 |  | 
 | /* Wraps the data in format for MIR */ | 
 | static unsigned mcs_wrap_mir_skb(const struct sk_buff *skb, __u8 *buf) | 
 | { | 
 | 	__u16 fcs = 0; | 
 | 	int len = skb->len + 4; | 
 |  | 
 | 	fcs = ~(irda_calc_crc16(~fcs, skb->data, skb->len)); | 
 | 	/* put the total packet length in first.  Note: packet length | 
 | 	 * value includes the two bytes that hold the packet length | 
 | 	 * itself. | 
 | 	 */ | 
 | 	buf[0] = len & 0xff; | 
 | 	buf[1] = (len >> 8) & 0xff; | 
 | 	/* copy the data */ | 
 | 	skb_copy_from_linear_data(skb, buf + 2, skb->len); | 
 | 	/* put the fcs in last two bytes in little endian order. */ | 
 | 	buf[len - 2] = fcs & 0xff; | 
 | 	buf[len - 1] = (fcs >> 8) & 0xff; | 
 |  | 
 | 	return len; | 
 | } | 
 |  | 
 | /* Unwrap received packets at MIR speed.  A 16 bit crc_ccitt checksum is | 
 |  * used for the fcs.  When performed over the entire packet the result | 
 |  * should be GOOD_FCS = 0xf0b8.  Hands the unwrapped data off to the IrDA | 
 |  * layer via a sk_buff. | 
 |  */ | 
 | static void mcs_unwrap_mir(struct mcs_cb *mcs, __u8 *buf, int len) | 
 | { | 
 | 	__u16 fcs; | 
 | 	int new_len; | 
 | 	struct sk_buff *skb; | 
 |  | 
 | 	/* Assume that the frames are going to fill a single packet | 
 | 	 * rather than span multiple packets. | 
 | 	 */ | 
 |  | 
 | 	new_len = len - 2; | 
 | 	if(unlikely(new_len <= 0)) { | 
 | 		IRDA_ERROR("%s short frame length %d\n", | 
 | 			     mcs->netdev->name, new_len); | 
 | 		++mcs->netdev->stats.rx_errors; | 
 | 		++mcs->netdev->stats.rx_length_errors; | 
 | 		return; | 
 | 	} | 
 | 	fcs = 0; | 
 | 	fcs = irda_calc_crc16(~fcs, buf, len); | 
 |  | 
 | 	if(fcs != GOOD_FCS) { | 
 | 		IRDA_ERROR("crc error calc 0x%x len %d\n", | 
 | 			   fcs, new_len); | 
 | 		mcs->netdev->stats.rx_errors++; | 
 | 		mcs->netdev->stats.rx_crc_errors++; | 
 | 		return; | 
 | 	} | 
 |  | 
 | 	skb = dev_alloc_skb(new_len + 1); | 
 | 	if(unlikely(!skb)) { | 
 | 		++mcs->netdev->stats.rx_dropped; | 
 | 		return; | 
 | 	} | 
 |  | 
 | 	skb_reserve(skb, 1); | 
 | 	skb_copy_to_linear_data(skb, buf, new_len); | 
 | 	skb_put(skb, new_len); | 
 | 	skb_reset_mac_header(skb); | 
 | 	skb->protocol = htons(ETH_P_IRDA); | 
 | 	skb->dev = mcs->netdev; | 
 |  | 
 | 	netif_rx(skb); | 
 |  | 
 | 	mcs->netdev->stats.rx_packets++; | 
 | 	mcs->netdev->stats.rx_bytes += new_len; | 
 | } | 
 |  | 
 | /* Unwrap received packets at FIR speed.  A 32 bit crc_ccitt checksum is | 
 |  * used for the fcs.  Hands the unwrapped data off to the IrDA | 
 |  * layer via a sk_buff. | 
 |  */ | 
 | static void mcs_unwrap_fir(struct mcs_cb *mcs, __u8 *buf, int len) | 
 | { | 
 | 	__u32 fcs; | 
 | 	int new_len; | 
 | 	struct sk_buff *skb; | 
 |  | 
 | 	/* Assume that the frames are going to fill a single packet | 
 | 	 * rather than span multiple packets.  This is most likely a false | 
 | 	 * assumption. | 
 | 	 */ | 
 |  | 
 | 	new_len = len - 4; | 
 | 	if(unlikely(new_len <= 0)) { | 
 | 		IRDA_ERROR("%s short frame length %d\n", | 
 | 			   mcs->netdev->name, new_len); | 
 | 		++mcs->netdev->stats.rx_errors; | 
 | 		++mcs->netdev->stats.rx_length_errors; | 
 | 		return; | 
 | 	} | 
 |  | 
 | 	fcs = ~(crc32_le(~0, buf, new_len)); | 
 | 	if(fcs != get_unaligned_le32(buf + new_len)) { | 
 | 		IRDA_ERROR("crc error calc 0x%x len %d\n", fcs, new_len); | 
 | 		mcs->netdev->stats.rx_errors++; | 
 | 		mcs->netdev->stats.rx_crc_errors++; | 
 | 		return; | 
 | 	} | 
 |  | 
 | 	skb = dev_alloc_skb(new_len + 1); | 
 | 	if(unlikely(!skb)) { | 
 | 		++mcs->netdev->stats.rx_dropped; | 
 | 		return; | 
 | 	} | 
 |  | 
 | 	skb_reserve(skb, 1); | 
 | 	skb_copy_to_linear_data(skb, buf, new_len); | 
 | 	skb_put(skb, new_len); | 
 | 	skb_reset_mac_header(skb); | 
 | 	skb->protocol = htons(ETH_P_IRDA); | 
 | 	skb->dev = mcs->netdev; | 
 |  | 
 | 	netif_rx(skb); | 
 |  | 
 | 	mcs->netdev->stats.rx_packets++; | 
 | 	mcs->netdev->stats.rx_bytes += new_len; | 
 | } | 
 |  | 
 |  | 
 | /* Allocates urbs for both receive and transmit. | 
 |  * If alloc fails return error code 0 (fail) otherwise | 
 |  * return error code 1 (success). | 
 |  */ | 
 | static inline int mcs_setup_urbs(struct mcs_cb *mcs) | 
 | { | 
 | 	mcs->rx_urb = NULL; | 
 |  | 
 | 	mcs->tx_urb = usb_alloc_urb(0, GFP_KERNEL); | 
 | 	if (!mcs->tx_urb) | 
 | 		return 0; | 
 |  | 
 | 	mcs->rx_urb = usb_alloc_urb(0, GFP_KERNEL); | 
 | 	if (!mcs->rx_urb) | 
 | 		return 0; | 
 |  | 
 | 	return 1; | 
 | } | 
 |  | 
 | /* Sets up state to be initially outside frame, gets receive urb, | 
 |  * sets status to successful and then submits the urb to start | 
 |  * receiving the data. | 
 |  */ | 
 | static inline int mcs_receive_start(struct mcs_cb *mcs) | 
 | { | 
 | 	mcs->rx_buff.in_frame = FALSE; | 
 | 	mcs->rx_buff.state = OUTSIDE_FRAME; | 
 |  | 
 | 	usb_fill_bulk_urb(mcs->rx_urb, mcs->usbdev, | 
 | 			  usb_rcvbulkpipe(mcs->usbdev, mcs->ep_in), | 
 | 			  mcs->in_buf, 4096, mcs_receive_irq, mcs); | 
 |  | 
 | 	mcs->rx_urb->status = 0; | 
 | 	return usb_submit_urb(mcs->rx_urb, GFP_KERNEL); | 
 | } | 
 |  | 
 | /* Finds the in and out endpoints for the mcs control block */ | 
 | static inline int mcs_find_endpoints(struct mcs_cb *mcs, | 
 | 				     struct usb_host_endpoint *ep, int epnum) | 
 | { | 
 | 	int i; | 
 | 	int ret = 0; | 
 |  | 
 | 	/* If no place to store the endpoints just return */ | 
 | 	if (!ep) | 
 | 		return ret; | 
 |  | 
 | 	/* cycle through all endpoints, find the first two that are DIR_IN */ | 
 | 	for (i = 0; i < epnum; i++) { | 
 | 		if (ep[i].desc.bEndpointAddress & USB_DIR_IN) | 
 | 			mcs->ep_in = ep[i].desc.bEndpointAddress; | 
 | 		else | 
 | 			mcs->ep_out = ep[i].desc.bEndpointAddress; | 
 |  | 
 | 		/* MosChip says that the chip has only two bulk | 
 | 		 * endpoints. Find one for each direction and move on. | 
 | 		 */ | 
 | 		if ((mcs->ep_in != 0) && (mcs->ep_out != 0)) { | 
 | 			ret = 1; | 
 | 			break; | 
 | 		} | 
 | 	} | 
 |  | 
 | 	return ret; | 
 | } | 
 |  | 
 | static void mcs_speed_work(struct work_struct *work) | 
 | { | 
 | 	struct mcs_cb *mcs = container_of(work, struct mcs_cb, work); | 
 | 	struct net_device *netdev = mcs->netdev; | 
 |  | 
 | 	mcs_speed_change(mcs); | 
 | 	netif_wake_queue(netdev); | 
 | } | 
 |  | 
 | /* Function to change the speed of the mcs7780.  Fully supports SIR, | 
 |  * MIR, and FIR speeds. | 
 |  */ | 
 | static int mcs_speed_change(struct mcs_cb *mcs) | 
 | { | 
 | 	int ret = 0; | 
 | 	int rst = 0; | 
 | 	int cnt = 0; | 
 | 	__u16 nspeed; | 
 | 	__u16 rval; | 
 |  | 
 | 	nspeed = mcs_speed_set[(mcs->new_speed >> 8) & 0x0f]; | 
 |  | 
 | 	do { | 
 | 		mcs_get_reg(mcs, MCS_RESV_REG, &rval); | 
 | 	} while(cnt++ < 100 && (rval & MCS_IRINTX)); | 
 |  | 
 | 	if (cnt > 100) { | 
 | 		IRDA_ERROR("unable to change speed\n"); | 
 | 		ret = -EIO; | 
 | 		goto error; | 
 | 	} | 
 |  | 
 | 	mcs_get_reg(mcs, MCS_MODE_REG, &rval); | 
 |  | 
 | 	/* MINRXPW values recommended by MosChip */ | 
 | 	if (mcs->new_speed <= 115200) { | 
 | 		rval &= ~MCS_FIR; | 
 |  | 
 | 		if ((rst = (mcs->speed > 115200))) | 
 | 			mcs_set_reg(mcs, MCS_MINRXPW_REG, 0); | 
 |  | 
 | 	} else if (mcs->new_speed <= 1152000) { | 
 | 		rval &= ~MCS_FIR; | 
 |  | 
 | 		if ((rst = !(mcs->speed == 576000 || mcs->speed == 1152000))) | 
 | 			mcs_set_reg(mcs, MCS_MINRXPW_REG, 5); | 
 |  | 
 | 	} else { | 
 | 		rval |= MCS_FIR; | 
 |  | 
 | 		if ((rst = (mcs->speed != 4000000))) | 
 | 			mcs_set_reg(mcs, MCS_MINRXPW_REG, 5); | 
 |  | 
 | 	} | 
 |  | 
 | 	rval &= ~MCS_SPEED_MASK; | 
 | 	rval |= nspeed; | 
 |  | 
 | 	ret = mcs_set_reg(mcs, MCS_MODE_REG, rval); | 
 | 	if (unlikely(ret)) | 
 | 		goto error; | 
 |  | 
 | 	if (rst) | 
 | 		switch (mcs->transceiver_type) { | 
 | 		case MCS_TSC_VISHAY: | 
 | 			ret = mcs_setup_transceiver_vishay(mcs); | 
 | 			break; | 
 |  | 
 | 		case MCS_TSC_SHARP: | 
 | 			ret = mcs_setup_transceiver_sharp(mcs); | 
 | 			break; | 
 |  | 
 | 		case MCS_TSC_AGILENT: | 
 | 			ret = mcs_setup_transceiver_agilent(mcs); | 
 | 			break; | 
 |  | 
 | 		default: | 
 | 			ret = 1; | 
 | 			IRDA_WARNING("Unknown transceiver type: %d\n", | 
 | 				     mcs->transceiver_type); | 
 | 		} | 
 | 	if (unlikely(ret)) | 
 | 		goto error; | 
 |  | 
 | 	mcs_get_reg(mcs, MCS_MODE_REG, &rval); | 
 | 	rval &= ~MCS_RESET; | 
 | 	ret = mcs_set_reg(mcs, MCS_MODE_REG, rval); | 
 |  | 
 | 	mcs->speed = mcs->new_speed; | 
 | 	error: | 
 | 		mcs->new_speed = 0; | 
 | 		return ret; | 
 | } | 
 |  | 
 | /* Ioctl calls not supported at this time.  Can be an area of future work. */ | 
 | static int mcs_net_ioctl(struct net_device *netdev, struct ifreq *rq, int cmd) | 
 | { | 
 | 	/* struct if_irda_req *irq = (struct if_irda_req *)rq; */ | 
 | 	/* struct mcs_cb *mcs = netdev_priv(netdev); */ | 
 | 	int ret = 0; | 
 |  | 
 | 	switch (cmd) { | 
 | 	default: | 
 | 		ret = -EOPNOTSUPP; | 
 | 	} | 
 |  | 
 | 	return ret; | 
 | } | 
 |  | 
 | /* Network device is taken down, done by "ifconfig irda0 down" */ | 
 | static int mcs_net_close(struct net_device *netdev) | 
 | { | 
 | 	int ret = 0; | 
 | 	struct mcs_cb *mcs = netdev_priv(netdev); | 
 |  | 
 | 	/* Stop transmit processing */ | 
 | 	netif_stop_queue(netdev); | 
 |  | 
 | 	kfree_skb(mcs->rx_buff.skb); | 
 |  | 
 | 	/* kill and free the receive and transmit URBs */ | 
 | 	usb_kill_urb(mcs->rx_urb); | 
 | 	usb_free_urb(mcs->rx_urb); | 
 | 	usb_kill_urb(mcs->tx_urb); | 
 | 	usb_free_urb(mcs->tx_urb); | 
 |  | 
 | 	/* Stop and remove instance of IrLAP */ | 
 | 	if (mcs->irlap) | 
 | 		irlap_close(mcs->irlap); | 
 |  | 
 | 	mcs->irlap = NULL; | 
 | 	return ret; | 
 | } | 
 |  | 
 | /* Network device is taken up, done by "ifconfig irda0 up" */ | 
 | static int mcs_net_open(struct net_device *netdev) | 
 | { | 
 | 	struct mcs_cb *mcs = netdev_priv(netdev); | 
 | 	char hwname[16]; | 
 | 	int ret = 0; | 
 |  | 
 | 	ret = usb_clear_halt(mcs->usbdev, | 
 | 			     usb_sndbulkpipe(mcs->usbdev, mcs->ep_in)); | 
 | 	if (ret) | 
 | 		goto error1; | 
 | 	ret = usb_clear_halt(mcs->usbdev, | 
 | 			     usb_rcvbulkpipe(mcs->usbdev, mcs->ep_out)); | 
 | 	if (ret) | 
 | 		goto error1; | 
 |  | 
 | 	ret = mcs_setup_transceiver(mcs); | 
 | 	if (ret) | 
 | 		goto error1; | 
 |  | 
 | 	ret = -ENOMEM; | 
 |  | 
 | 	/* Initialize for SIR/FIR to copy data directly into skb.  */ | 
 | 	mcs->receiving = 0; | 
 | 	mcs->rx_buff.truesize = IRDA_SKB_MAX_MTU; | 
 | 	mcs->rx_buff.skb = dev_alloc_skb(IRDA_SKB_MAX_MTU); | 
 | 	if (!mcs->rx_buff.skb) | 
 | 		goto error1; | 
 |  | 
 | 	skb_reserve(mcs->rx_buff.skb, 1); | 
 | 	mcs->rx_buff.head = mcs->rx_buff.skb->data; | 
 | 	do_gettimeofday(&mcs->rx_time); | 
 |  | 
 | 	/* | 
 | 	 * Now that everything should be initialized properly, | 
 | 	 * Open new IrLAP layer instance to take care of us... | 
 | 	 * Note : will send immediately a speed change... | 
 | 	 */ | 
 | 	sprintf(hwname, "usb#%d", mcs->usbdev->devnum); | 
 | 	mcs->irlap = irlap_open(netdev, &mcs->qos, hwname); | 
 | 	if (!mcs->irlap) { | 
 | 		IRDA_ERROR("mcs7780: irlap_open failed\n"); | 
 | 		goto error2; | 
 | 	} | 
 |  | 
 | 	if (!mcs_setup_urbs(mcs)) | 
 | 		goto error3; | 
 |  | 
 | 	ret = mcs_receive_start(mcs); | 
 | 	if (ret) | 
 | 		goto error3; | 
 |  | 
 | 	netif_start_queue(netdev); | 
 | 	return 0; | 
 |  | 
 | 	error3: | 
 | 		irlap_close(mcs->irlap); | 
 | 	error2: | 
 | 		kfree_skb(mcs->rx_buff.skb); | 
 | 	error1: | 
 | 		return ret; | 
 | } | 
 |  | 
 | /* Receive callback function.  */ | 
 | static void mcs_receive_irq(struct urb *urb) | 
 | { | 
 | 	__u8 *bytes; | 
 | 	struct mcs_cb *mcs = urb->context; | 
 | 	int i; | 
 | 	int ret; | 
 |  | 
 | 	if (!netif_running(mcs->netdev)) | 
 | 		return; | 
 |  | 
 | 	if (urb->status) | 
 | 		return; | 
 |  | 
 | 	if (urb->actual_length > 0) { | 
 | 		bytes = urb->transfer_buffer; | 
 |  | 
 | 		/* MCS returns frames without BOF and EOF | 
 | 		 * I assume it returns whole frames. | 
 | 		 */ | 
 | 		/* SIR speed */ | 
 | 		if(mcs->speed < 576000) { | 
 | 			async_unwrap_char(mcs->netdev, &mcs->netdev->stats, | 
 | 				  &mcs->rx_buff, 0xc0); | 
 |  | 
 | 			for (i = 0; i < urb->actual_length; i++) | 
 | 				async_unwrap_char(mcs->netdev, &mcs->netdev->stats, | 
 | 					  &mcs->rx_buff, bytes[i]); | 
 |  | 
 | 			async_unwrap_char(mcs->netdev, &mcs->netdev->stats, | 
 | 				  &mcs->rx_buff, 0xc1); | 
 | 		} | 
 | 		/* MIR speed */ | 
 | 		else if(mcs->speed == 576000 || mcs->speed == 1152000) { | 
 | 			mcs_unwrap_mir(mcs, urb->transfer_buffer, | 
 | 				urb->actual_length); | 
 | 		} | 
 | 		/* FIR speed */ | 
 | 		else { | 
 | 			mcs_unwrap_fir(mcs, urb->transfer_buffer, | 
 | 				urb->actual_length); | 
 | 		} | 
 | 		do_gettimeofday(&mcs->rx_time); | 
 | 	} | 
 |  | 
 | 	ret = usb_submit_urb(urb, GFP_ATOMIC); | 
 | } | 
 |  | 
 | /* Transmit callback function.  */ | 
 | static void mcs_send_irq(struct urb *urb) | 
 | { | 
 | 	struct mcs_cb *mcs = urb->context; | 
 | 	struct net_device *ndev = mcs->netdev; | 
 |  | 
 | 	if (unlikely(mcs->new_speed)) | 
 | 		schedule_work(&mcs->work); | 
 | 	else | 
 | 		netif_wake_queue(ndev); | 
 | } | 
 |  | 
 | /* Transmit callback function.  */ | 
 | static netdev_tx_t mcs_hard_xmit(struct sk_buff *skb, | 
 | 				       struct net_device *ndev) | 
 | { | 
 | 	unsigned long flags; | 
 | 	struct mcs_cb *mcs; | 
 | 	int wraplen; | 
 | 	int ret = 0; | 
 |  | 
 | 	netif_stop_queue(ndev); | 
 | 	mcs = netdev_priv(ndev); | 
 |  | 
 | 	spin_lock_irqsave(&mcs->lock, flags); | 
 |  | 
 | 	mcs->new_speed = irda_get_next_speed(skb); | 
 | 	if (likely(mcs->new_speed == mcs->speed)) | 
 | 		mcs->new_speed = 0; | 
 |  | 
 | 	/* SIR speed */ | 
 | 	if(mcs->speed < 576000) { | 
 | 		wraplen = mcs_wrap_sir_skb(skb, mcs->out_buf); | 
 | 	} | 
 | 	/* MIR speed */ | 
 | 	else if(mcs->speed == 576000 || mcs->speed == 1152000) { | 
 | 		wraplen = mcs_wrap_mir_skb(skb, mcs->out_buf); | 
 | 	} | 
 | 	/* FIR speed */ | 
 | 	else { | 
 | 		wraplen = mcs_wrap_fir_skb(skb, mcs->out_buf); | 
 | 	} | 
 | 	usb_fill_bulk_urb(mcs->tx_urb, mcs->usbdev, | 
 | 			  usb_sndbulkpipe(mcs->usbdev, mcs->ep_out), | 
 | 			  mcs->out_buf, wraplen, mcs_send_irq, mcs); | 
 |  | 
 | 	if ((ret = usb_submit_urb(mcs->tx_urb, GFP_ATOMIC))) { | 
 | 		IRDA_ERROR("failed tx_urb: %d\n", ret); | 
 | 		switch (ret) { | 
 | 		case -ENODEV: | 
 | 		case -EPIPE: | 
 | 			break; | 
 | 		default: | 
 | 			mcs->netdev->stats.tx_errors++; | 
 | 			netif_start_queue(ndev); | 
 | 		} | 
 | 	} else { | 
 | 		mcs->netdev->stats.tx_packets++; | 
 | 		mcs->netdev->stats.tx_bytes += skb->len; | 
 | 	} | 
 |  | 
 | 	dev_kfree_skb(skb); | 
 | 	spin_unlock_irqrestore(&mcs->lock, flags); | 
 | 	return NETDEV_TX_OK; | 
 | } | 
 |  | 
 | static const struct net_device_ops mcs_netdev_ops = { | 
 | 	.ndo_open = mcs_net_open, | 
 | 	.ndo_stop = mcs_net_close, | 
 | 	.ndo_start_xmit = mcs_hard_xmit, | 
 | 	.ndo_do_ioctl = mcs_net_ioctl, | 
 | }; | 
 |  | 
 | /* | 
 |  * This function is called by the USB subsystem for each new device in the | 
 |  * system.  Need to verify the device and if it is, then start handling it. | 
 |  */ | 
 | static int mcs_probe(struct usb_interface *intf, | 
 | 		     const struct usb_device_id *id) | 
 | { | 
 | 	struct usb_device *udev = interface_to_usbdev(intf); | 
 | 	struct net_device *ndev = NULL; | 
 | 	struct mcs_cb *mcs; | 
 | 	int ret = -ENOMEM; | 
 |  | 
 | 	ndev = alloc_irdadev(sizeof(*mcs)); | 
 | 	if (!ndev) | 
 | 		goto error1; | 
 |  | 
 | 	IRDA_DEBUG(1, "MCS7780 USB-IrDA bridge found at %d.\n", udev->devnum); | 
 |  | 
 | 	SET_NETDEV_DEV(ndev, &intf->dev); | 
 |  | 
 | 	ret = usb_reset_configuration(udev); | 
 | 	if (ret != 0) { | 
 | 		IRDA_ERROR("mcs7780: usb reset configuration failed\n"); | 
 | 		goto error2; | 
 | 	} | 
 |  | 
 | 	mcs = netdev_priv(ndev); | 
 | 	mcs->usbdev = udev; | 
 | 	mcs->netdev = ndev; | 
 | 	spin_lock_init(&mcs->lock); | 
 |  | 
 | 	/* Initialize QoS for this device */ | 
 | 	irda_init_max_qos_capabilies(&mcs->qos); | 
 |  | 
 | 	/* That's the Rx capability. */ | 
 | 	mcs->qos.baud_rate.bits &= | 
 | 	    IR_2400 | IR_9600 | IR_19200 | IR_38400 | IR_57600 | IR_115200 | 
 | 		| IR_576000 | IR_1152000 | (IR_4000000 << 8); | 
 |  | 
 |  | 
 | 	mcs->qos.min_turn_time.bits &= qos_mtt_bits; | 
 | 	irda_qos_bits_to_value(&mcs->qos); | 
 |  | 
 | 	/* Speed change work initialisation*/ | 
 | 	INIT_WORK(&mcs->work, mcs_speed_work); | 
 |  | 
 | 	ndev->netdev_ops = &mcs_netdev_ops; | 
 |  | 
 | 	if (!intf->cur_altsetting) { | 
 | 		ret = -ENOMEM; | 
 | 		goto error2; | 
 | 	} | 
 |  | 
 | 	ret = mcs_find_endpoints(mcs, intf->cur_altsetting->endpoint, | 
 | 				 intf->cur_altsetting->desc.bNumEndpoints); | 
 | 	if (!ret) { | 
 | 		ret = -ENODEV; | 
 | 		goto error2; | 
 | 	} | 
 |  | 
 | 	ret = register_netdev(ndev); | 
 | 	if (ret != 0) | 
 | 		goto error2; | 
 |  | 
 | 	IRDA_DEBUG(1, "IrDA: Registered MosChip MCS7780 device as %s\n", | 
 | 		   ndev->name); | 
 |  | 
 | 	mcs->transceiver_type = transceiver_type; | 
 | 	mcs->sir_tweak = sir_tweak; | 
 | 	mcs->receive_mode = receive_mode; | 
 |  | 
 | 	usb_set_intfdata(intf, mcs); | 
 | 	return 0; | 
 |  | 
 | 	error2: | 
 | 		free_netdev(ndev); | 
 |  | 
 | 	error1: | 
 | 		return ret; | 
 | } | 
 |  | 
 | /* The current device is removed, the USB layer tells us to shut down. */ | 
 | static void mcs_disconnect(struct usb_interface *intf) | 
 | { | 
 | 	struct mcs_cb *mcs = usb_get_intfdata(intf); | 
 |  | 
 | 	if (!mcs) | 
 | 		return; | 
 |  | 
 | 	cancel_work_sync(&mcs->work); | 
 |  | 
 | 	unregister_netdev(mcs->netdev); | 
 | 	free_netdev(mcs->netdev); | 
 |  | 
 | 	usb_set_intfdata(intf, NULL); | 
 | 	IRDA_DEBUG(0, "MCS7780 now disconnected.\n"); | 
 | } | 
 |  | 
 | module_usb_driver(mcs_driver); |