mirror of
https://mirrors.bfsu.edu.cn/git/linux.git
synced 2024-11-18 17:54:13 +08:00
1010 lines
24 KiB
C
1010 lines
24 KiB
C
|
/*****************************************************************************
|
||
|
*
|
||
|
* 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/config.h>
|
||
|
#include <linux/kernel.h>
|
||
|
#include <linux/types.h>
|
||
|
#include <linux/errno.h>
|
||
|
#include <linux/init.h>
|
||
|
#include <linux/slab.h>
|
||
|
#include <linux/module.h>
|
||
|
#include <linux/kref.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.");
|
||
|
|
||
|
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.");
|
||
|
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.");
|
||
|
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",
|
||
|
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", 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. */
|
||
|
memcpy(buf+2, skb->data, 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 */
|
||
|
memcpy(buf+2, skb->data, 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->stats.rx_errors;
|
||
|
++mcs->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->stats.rx_errors++;
|
||
|
mcs->stats.rx_crc_errors++;
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
skb = dev_alloc_skb(new_len + 1);
|
||
|
if(unlikely(!skb)) {
|
||
|
++mcs->stats.rx_dropped;
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
skb_reserve(skb, 1);
|
||
|
memcpy(skb->data, buf, new_len);
|
||
|
skb_put(skb, new_len);
|
||
|
skb->mac.raw = skb->data;
|
||
|
skb->protocol = htons(ETH_P_IRDA);
|
||
|
skb->dev = mcs->netdev;
|
||
|
|
||
|
netif_rx(skb);
|
||
|
|
||
|
mcs->stats.rx_packets++;
|
||
|
mcs->stats.rx_bytes += new_len;
|
||
|
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
/* 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->stats.rx_errors;
|
||
|
++mcs->stats.rx_length_errors;
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
fcs = ~(crc32_le(~0, buf, new_len));
|
||
|
if(fcs != le32_to_cpu(get_unaligned((u32 *)(buf+new_len)))) {
|
||
|
IRDA_ERROR("crc error calc 0x%x len %d\n", fcs, new_len);
|
||
|
mcs->stats.rx_errors++;
|
||
|
mcs->stats.rx_crc_errors++;
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
skb = dev_alloc_skb(new_len + 1);
|
||
|
if(unlikely(!skb)) {
|
||
|
++mcs->stats.rx_dropped;
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
skb_reserve(skb, 1);
|
||
|
memcpy(skb->data, buf, new_len);
|
||
|
skb_put(skb, new_len);
|
||
|
skb->mac.raw = skb->data;
|
||
|
skb->protocol = htons(ETH_P_IRDA);
|
||
|
skb->dev = mcs->netdev;
|
||
|
|
||
|
netif_rx(skb);
|
||
|
|
||
|
mcs->stats.rx_packets++;
|
||
|
mcs->stats.rx_bytes += new_len;
|
||
|
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
|
||
|
/* 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(void *arg)
|
||
|
{
|
||
|
struct mcs_cb *mcs = arg;
|
||
|
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");
|
||
|
ret = -EIO;
|
||
|
goto error;
|
||
|
}
|
||
|
|
||
|
mcs_get_reg(mcs, MCS_MODE_REG, &rval);
|
||
|
|
||
|
/* MINRXPW values recomended 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",
|
||
|
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);
|
||
|
|
||
|
/* 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");
|
||
|
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;
|
||
|
}
|
||
|
|
||
|
|
||
|
/* Get device stats for /proc/net/dev and ifconfig */
|
||
|
static struct net_device_stats *mcs_net_get_stats(struct net_device *netdev)
|
||
|
{
|
||
|
struct mcs_cb *mcs = netdev_priv(netdev);
|
||
|
return &mcs->stats;
|
||
|
}
|
||
|
|
||
|
/* Receive callback function. */
|
||
|
static void mcs_receive_irq(struct urb *urb, struct pt_regs *regs)
|
||
|
{
|
||
|
__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->stats,
|
||
|
&mcs->rx_buff, 0xc0);
|
||
|
|
||
|
for (i = 0; i < urb->actual_length; i++)
|
||
|
async_unwrap_char(mcs->netdev, &mcs->stats,
|
||
|
&mcs->rx_buff, bytes[i]);
|
||
|
|
||
|
async_unwrap_char(mcs->netdev, &mcs->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);
|
||
|
}
|
||
|
mcs->netdev->last_rx = jiffies;
|
||
|
do_gettimeofday(&mcs->rx_time);
|
||
|
}
|
||
|
|
||
|
ret = usb_submit_urb(urb, GFP_ATOMIC);
|
||
|
}
|
||
|
|
||
|
/* Transmit callback funtion. */
|
||
|
static void mcs_send_irq(struct urb *urb, struct pt_regs *regs)
|
||
|
{
|
||
|
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 funtion. */
|
||
|
static int mcs_hard_xmit(struct sk_buff *skb, struct net_device *ndev)
|
||
|
{
|
||
|
unsigned long flags;
|
||
|
struct mcs_cb *mcs;
|
||
|
int wraplen;
|
||
|
int ret = 0;
|
||
|
|
||
|
|
||
|
if (skb == NULL || ndev == NULL)
|
||
|
return -EINVAL;
|
||
|
|
||
|
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", ret);
|
||
|
switch (ret) {
|
||
|
case -ENODEV:
|
||
|
case -EPIPE:
|
||
|
break;
|
||
|
default:
|
||
|
mcs->stats.tx_errors++;
|
||
|
netif_start_queue(ndev);
|
||
|
}
|
||
|
} else {
|
||
|
mcs->stats.tx_packets++;
|
||
|
mcs->stats.tx_bytes += skb->len;
|
||
|
}
|
||
|
|
||
|
dev_kfree_skb(skb);
|
||
|
spin_unlock_irqrestore(&mcs->lock, flags);
|
||
|
return ret;
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* 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.", udev->devnum);
|
||
|
|
||
|
/* what is it realy for? */
|
||
|
SET_MODULE_OWNER(ndev);
|
||
|
SET_NETDEV_DEV(ndev, &intf->dev);
|
||
|
|
||
|
ret = usb_reset_configuration(udev);
|
||
|
if (ret != 0) {
|
||
|
IRDA_ERROR("mcs7780: usb reset configuration failed");
|
||
|
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, mcs);
|
||
|
|
||
|
/* Override the network functions we need to use */
|
||
|
ndev->hard_start_xmit = mcs_hard_xmit;
|
||
|
ndev->open = mcs_net_open;
|
||
|
ndev->stop = mcs_net_close;
|
||
|
ndev->get_stats = mcs_net_get_stats;
|
||
|
ndev->do_ioctl = mcs_net_ioctl;
|
||
|
|
||
|
if (!intf->cur_altsetting)
|
||
|
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",
|
||
|
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;
|
||
|
|
||
|
flush_scheduled_work();
|
||
|
|
||
|
unregister_netdev(mcs->netdev);
|
||
|
free_netdev(mcs->netdev);
|
||
|
|
||
|
usb_set_intfdata(intf, NULL);
|
||
|
IRDA_DEBUG(0, "MCS7780 now disconnected.");
|
||
|
}
|
||
|
|
||
|
/* Module insertion */
|
||
|
static int __init mcs_init(void)
|
||
|
{
|
||
|
int result;
|
||
|
|
||
|
/* register this driver with the USB subsystem */
|
||
|
result = usb_register(&mcs_driver);
|
||
|
if (result)
|
||
|
IRDA_ERROR("usb_register failed. Error number %d", result);
|
||
|
|
||
|
return result;
|
||
|
}
|
||
|
module_init(mcs_init);
|
||
|
|
||
|
/* Module removal */
|
||
|
static void __exit mcs_exit(void)
|
||
|
{
|
||
|
/* deregister this driver with the USB subsystem */
|
||
|
usb_deregister(&mcs_driver);
|
||
|
}
|
||
|
module_exit(mcs_exit);
|
||
|
|