git.oblomov.eu Git - linux-2.6/blob - drivers/net/irda/stir4200.c

   1 /*****************************************************************************
   2 *
   3 * Filename:      stir4200.c
   4 * Version:       0.4
   5 * Description:   Irda SigmaTel USB Dongle
   6 * Status:        Experimental
   7 * Author:        Stephen Hemminger <shemminger@osdl.org>
   8 *
   9 *       Based on earlier driver by Paul Stewart <stewart@parc.com>
  10 *
  11 *       Copyright (C) 2000, Roman Weissgaerber <weissg@vienna.at>
  12 *       Copyright (C) 2001, Dag Brattli <dag@brattli.net>
  13 *       Copyright (C) 2001, Jean Tourrilhes <jt@hpl.hp.com>
  14 *       Copyright (C) 2004, Stephen Hemminger <shemminger@osdl.org>
  15 *
  16 *       This program is free software; you can redistribute it and/or modify
  17 *       it under the terms of the GNU General Public License as published by
  18 *       the Free Software Foundation; either version 2 of the License.
  19 *
  20 *       This program is distributed in the hope that it will be useful,
  21 *       but WITHOUT ANY WARRANTY; without even the implied warranty of
  22 *       MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  23 *       GNU General Public License for more details.
  24 *
  25 *       You should have received a copy of the GNU General Public License
  26 *       along with this program; if not, write to the Free Software
  27 *       Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  28 *
  29 *****************************************************************************/
  30
  31 /*
  32  * This dongle does no framing, and requires polling to receive the
  33  * data.  The STIr4200 has bulk in and out endpoints just like
  34  * usr-irda devices, but the data it sends and receives is raw; like
  35  * irtty, it needs to call the wrap and unwrap functions to add and
  36  * remove SOF/BOF and escape characters to/from the frame.
  37  */
  38
  39 #include <linux/module.h>
  40 #include <linux/moduleparam.h>
  41
  42 #include <linux/kernel.h>
  43 #include <linux/types.h>
  44 #include <linux/init.h>
  45 #include <linux/time.h>
  46 #include <linux/skbuff.h>
  47 #include <linux/netdevice.h>
  48 #include <linux/slab.h>
  49 #include <linux/delay.h>
  50 #include <linux/usb.h>
  51 #include <linux/crc32.h>
  52 #include <linux/kthread.h>
  53 #include <linux/freezer.h>
  54 #include <net/irda/irda.h>
  55 #include <net/irda/irda_device.h>
  56 #include <net/irda/wrapper.h>
  57 #include <net/irda/crc.h>
  58 #include <asm/byteorder.h>
  59 #include <asm/unaligned.h>
  60
  61 MODULE_AUTHOR("Stephen Hemminger <shemminger@linux-foundation.org>");
  62 MODULE_DESCRIPTION("IrDA-USB Dongle Driver for SigmaTel STIr4200");
  63 MODULE_LICENSE("GPL");
  64
  65 static int qos_mtt_bits = 0x07; /* 1 ms or more */
  66 module_param(qos_mtt_bits, int, 0);
  67 MODULE_PARM_DESC(qos_mtt_bits, "Minimum Turn Time");
  68
  69 static int rx_sensitivity = 1;  /* FIR 0..4, SIR 0..6 */
  70 module_param(rx_sensitivity, int, 0);
  71 MODULE_PARM_DESC(rx_sensitivity, "Set Receiver sensitivity (0-6, 0 is most sensitive)");
  72
  73 static int tx_power = 0;        /* 0 = highest ... 3 = lowest */
  74 module_param(tx_power, int, 0);
  75 MODULE_PARM_DESC(tx_power, "Set Transmitter power (0-3, 0 is highest power)");
  76
  77 #define STIR_IRDA_HEADER        4
  78 #define CTRL_TIMEOUT            100        /* milliseconds */
  79 #define TRANSMIT_TIMEOUT        200        /* milliseconds */
  80 #define STIR_FIFO_SIZE          4096
  81 #define FIFO_REGS_SIZE          3
  82
  83 enum FirChars {
  84         FIR_CE   = 0x7d,
  85         FIR_XBOF = 0x7f,
  86         FIR_EOF  = 0x7e,
  87 };
  88
  89 enum StirRequests {
  90         REQ_WRITE_REG =         0x00,
  91         REQ_READ_REG =          0x01,
  92         REQ_READ_ROM =          0x02,
  93         REQ_WRITE_SINGLE =      0x03,
  94 };
  95
  96 /* Register offsets */
  97 enum StirRegs {
  98         REG_RSVD=0,
  99         REG_MODE,
 100         REG_PDCLK,
 101         REG_CTRL1,
 102         REG_CTRL2,
 103         REG_FIFOCTL,
 104         REG_FIFOLSB,
 105         REG_FIFOMSB,
 106         REG_DPLL,
 107         REG_IRDIG,
 108         REG_TEST=15,
 109 };
 110
 111 enum StirModeMask {
 112         MODE_FIR = 0x80,
 113         MODE_SIR = 0x20,
 114         MODE_ASK = 0x10,
 115         MODE_FASTRX = 0x08,
 116         MODE_FFRSTEN = 0x04,
 117         MODE_NRESET = 0x02,
 118         MODE_2400 = 0x01,
 119 };
 120
 121 enum StirPdclkMask {
 122         PDCLK_4000000 = 0x02,
 123         PDCLK_115200 = 0x09,
 124         PDCLK_57600 = 0x13,
 125         PDCLK_38400 = 0x1D,
 126         PDCLK_19200 = 0x3B,
 127         PDCLK_9600 = 0x77,
 128         PDCLK_2400 = 0xDF,
 129 };
 130
 131 enum StirCtrl1Mask {
 132         CTRL1_SDMODE = 0x80,
 133         CTRL1_RXSLOW = 0x40,
 134         CTRL1_TXPWD = 0x10,
 135         CTRL1_RXPWD = 0x08,
 136         CTRL1_SRESET = 0x01,
 137 };
 138
 139 enum StirCtrl2Mask {
 140         CTRL2_SPWIDTH = 0x08,
 141         CTRL2_REVID = 0x03,
 142 };
 143
 144 enum StirFifoCtlMask {
 145         FIFOCTL_EOF = 0x80,
 146         FIFOCTL_UNDER = 0x40,
 147         FIFOCTL_OVER = 0x20,
 148         FIFOCTL_DIR = 0x10,
 149         FIFOCTL_CLR = 0x08,
 150         FIFOCTL_EMPTY = 0x04,
 151 };
 152
 153 enum StirDiagMask {
 154         IRDIG_RXHIGH = 0x80,
 155         IRDIG_RXLOW = 0x40,
 156 };
 157
 158 enum StirTestMask {
 159         TEST_PLLDOWN = 0x80,
 160         TEST_LOOPIR = 0x40,
 161         TEST_LOOPUSB = 0x20,
 162         TEST_TSTENA = 0x10,
 163         TEST_TSTOSC = 0x0F,
 164 };
 165
 166 struct stir_cb {
 167         struct usb_device *usbdev;      /* init: probe_irda */
 168         struct net_device *netdev;      /* network layer */
 169         struct irlap_cb   *irlap;       /* The link layer we are binded to */
 170         struct net_device_stats stats;  /* network statistics */
 171         struct qos_info   qos;
 172         unsigned          speed;        /* Current speed */
 173
 174         struct task_struct *thread;     /* transmit thread */
 175
 176         struct sk_buff    *tx_pending;
 177         void              *io_buf;      /* transmit/receive buffer */
 178         __u8              *fifo_status;
 179
 180         iobuff_t          rx_buff;      /* receive unwrap state machine */
 181         struct timeval    rx_time;
 182         int               receiving;
 183         struct urb       *rx_urb;
 184 };
 185
 186
 187 /* These are the currently known USB ids */
 188 static struct usb_device_id dongles[] = {
 189     /* SigmaTel, Inc,  STIr4200 IrDA/USB Bridge */
 190     { USB_DEVICE(0x066f, 0x4200) },
 191     { }
 192 };
 193
 194 MODULE_DEVICE_TABLE(usb, dongles);
 195
 196 /* Send control message to set dongle register */
 197 static int write_reg(struct stir_cb *stir, __u16 reg, __u8 value)
 198 {
 199         struct usb_device *dev = stir->usbdev;
 200
 201         pr_debug("%s: write reg %d = 0x%x\n",
 202                  stir->netdev->name, reg, value);
 203         return usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
 204                                REQ_WRITE_SINGLE,
 205                                USB_DIR_OUT|USB_TYPE_VENDOR|USB_RECIP_DEVICE,
 206                                value, reg, NULL, 0,
 207                                CTRL_TIMEOUT);
 208 }
 209
 210 /* Send control message to read multiple registers */
 211 static inline int read_reg(struct stir_cb *stir, __u16 reg,
 212                     __u8 *data, __u16 count)
 213 {
 214         struct usb_device *dev = stir->usbdev;
 215
 216         return usb_control_msg(dev, usb_rcvctrlpipe(dev, 0),
 217                                REQ_READ_REG,
 218                                USB_DIR_IN | USB_TYPE_VENDOR | USB_RECIP_DEVICE,
 219                                0, reg, data, count,
 220                                CTRL_TIMEOUT);
 221 }
 222
 223 static inline int isfir(u32 speed)
 224 {
 225         return (speed == 4000000);
 226 }
 227
 228 /*
 229  * Prepare a FIR IrDA frame for transmission to the USB dongle.  The
 230  * FIR transmit frame is documented in the datasheet.  It consists of
 231  * a two byte 0x55 0xAA sequence, two little-endian length bytes, a
 232  * sequence of exactly 16 XBOF bytes of 0x7E, two BOF bytes of 0x7E,
 233  * then the data escaped as follows:
 234  *
 235  *    0x7D -> 0x7D 0x5D
 236  *    0x7E -> 0x7D 0x5E
 237  *    0x7F -> 0x7D 0x5F
 238  *
 239  * Then, 4 bytes of little endian (stuffed) FCS follow, then two
 240  * trailing EOF bytes of 0x7E.
 241  */
 242 static inline __u8 *stuff_fir(__u8 *p, __u8 c)
 243 {
 244         switch(c) {
 245         case 0x7d:
 246         case 0x7e:
 247         case 0x7f:
 248                 *p++ = 0x7d;
 249                 c ^= IRDA_TRANS;
 250                 /* fall through */
 251         default:
 252                 *p++ = c;
 253         }
 254         return p;
 255 }
 256
 257 /* Take raw data in skb and put it wrapped into buf */
 258 static unsigned wrap_fir_skb(const struct sk_buff *skb, __u8 *buf)
 259 {
 260         __u8 *ptr = buf;
 261         __u32 fcs = ~(crc32_le(~0, skb->data, skb->len));
 262         __u16 wraplen;
 263         int i;
 264
 265         /* Header */
 266         buf[0] = 0x55;
 267         buf[1] = 0xAA;
 268
 269         ptr = buf + STIR_IRDA_HEADER;
 270         memset(ptr, 0x7f, 16);
 271         ptr += 16;
 272
 273         /* BOF */
 274         *ptr++  = 0x7e;
 275         *ptr++  = 0x7e;
 276
 277         /* Address / Control / Information */
 278         for (i = 0; i < skb->len; i++)
 279                 ptr = stuff_fir(ptr, skb->data[i]);
 280
 281         /* FCS */
 282         ptr = stuff_fir(ptr, fcs & 0xff);
 283         ptr = stuff_fir(ptr, (fcs >> 8) & 0xff);
 284         ptr = stuff_fir(ptr, (fcs >> 16) & 0xff);
 285         ptr = stuff_fir(ptr, (fcs >> 24) & 0xff);
 286
 287         /* EOFs */
 288         *ptr++ = 0x7e;
 289         *ptr++ = 0x7e;
 290
 291         /* Total length, minus the header */
 292         wraplen = (ptr - buf) - STIR_IRDA_HEADER;
 293         buf[2] = wraplen & 0xff;
 294         buf[3] = (wraplen >> 8) & 0xff;
 295
 296         return wraplen + STIR_IRDA_HEADER;
 297 }
 298
 299 static unsigned wrap_sir_skb(struct sk_buff *skb, __u8 *buf)
 300 {
 301         __u16 wraplen;
 302
 303         wraplen = async_wrap_skb(skb, buf + STIR_IRDA_HEADER,
 304                                  STIR_FIFO_SIZE - STIR_IRDA_HEADER);
 305         buf[0] = 0x55;
 306         buf[1] = 0xAA;
 307         buf[2] = wraplen & 0xff;
 308         buf[3] = (wraplen >> 8) & 0xff;
 309
 310         return wraplen + STIR_IRDA_HEADER;
 311 }
 312
 313 /*
 314  * Frame is fully formed in the rx_buff so check crc
 315  * and pass up to irlap
 316  * setup for next receive
 317  */
 318 static void fir_eof(struct stir_cb *stir)
 319 {
 320         iobuff_t *rx_buff = &stir->rx_buff;
 321         int len = rx_buff->len - 4;
 322         struct sk_buff *skb, *nskb;
 323         __u32 fcs;
 324
 325         if (unlikely(len <= 0)) {
 326                 pr_debug("%s: short frame len %d\n",
 327                          stir->netdev->name, len);
 328
 329                 ++stir->stats.rx_errors;
 330                 ++stir->stats.rx_length_errors;
 331                 return;
 332         }
 333
 334         fcs = ~(crc32_le(~0, rx_buff->data, len));
 335         if (fcs != le32_to_cpu(get_unaligned((__le32 *)(rx_buff->data+len)))) {
 336                 pr_debug("crc error calc 0x%x len %d\n", fcs, len);
 337                 stir->stats.rx_errors++;
 338                 stir->stats.rx_crc_errors++;
 339                 return;
 340         }
 341
 342         /* if frame is short then just copy it */
 343         if (len < IRDA_RX_COPY_THRESHOLD) {
 344                 nskb = dev_alloc_skb(len + 1);
 345                 if (unlikely(!nskb)) {
 346                         ++stir->stats.rx_dropped;
 347                         return;
 348                 }
 349                 skb_reserve(nskb, 1);
 350                 skb = nskb;
 351                 skb_copy_to_linear_data(nskb, rx_buff->data, len);
 352         } else {
 353                 nskb = dev_alloc_skb(rx_buff->truesize);
 354                 if (unlikely(!nskb)) {
 355                         ++stir->stats.rx_dropped;
 356                         return;
 357                 }
 358                 skb_reserve(nskb, 1);
 359                 skb = rx_buff->skb;
 360                 rx_buff->skb = nskb;
 361                 rx_buff->head = nskb->data;
 362         }
 363
 364         skb_put(skb, len);
 365
 366         skb_reset_mac_header(skb);
 367         skb->protocol = htons(ETH_P_IRDA);
 368         skb->dev = stir->netdev;
 369
 370         netif_rx(skb);
 371
 372         stir->stats.rx_packets++;
 373         stir->stats.rx_bytes += len;
 374
 375         rx_buff->data = rx_buff->head;
 376         rx_buff->len = 0;
 377 }
 378
 379 /* Unwrap FIR stuffed data and bump it to IrLAP */
 380 static void stir_fir_chars(struct stir_cb *stir,
 381                             const __u8 *bytes, int len)
 382 {
 383         iobuff_t *rx_buff = &stir->rx_buff;
 384         int     i;
 385
 386         for (i = 0; i < len; i++) {
 387                 __u8    byte = bytes[i];
 388
 389                 switch(rx_buff->state) {
 390                 case OUTSIDE_FRAME:
 391                         /* ignore garbage till start of frame */
 392                         if (unlikely(byte != FIR_EOF))
 393                                 continue;
 394                         /* Now receiving frame */
 395                         rx_buff->state = BEGIN_FRAME;
 396
 397                         /* Time to initialize receive buffer */
 398                         rx_buff->data = rx_buff->head;
 399                         rx_buff->len = 0;
 400                         continue;
 401
 402                 case LINK_ESCAPE:
 403                         if (byte == FIR_EOF) {
 404                                 pr_debug("%s: got EOF after escape\n",
 405                                          stir->netdev->name);
 406                                 goto frame_error;
 407                         }
 408                         rx_buff->state = INSIDE_FRAME;
 409                         byte ^= IRDA_TRANS;
 410                         break;
 411
 412                 case BEGIN_FRAME:
 413                         /* ignore multiple BOF/EOF */
 414                         if (byte == FIR_EOF)
 415                                 continue;
 416                         rx_buff->state = INSIDE_FRAME;
 417                         rx_buff->in_frame = TRUE;
 418
 419                         /* fall through */
 420                 case INSIDE_FRAME:
 421                         switch(byte) {
 422                         case FIR_CE:
 423                                 rx_buff->state = LINK_ESCAPE;
 424                                 continue;
 425                         case FIR_XBOF:
 426                                 /* 0x7f is not used in this framing */
 427                                 pr_debug("%s: got XBOF without escape\n",
 428                                          stir->netdev->name);
 429                                 goto frame_error;
 430                         case FIR_EOF:
 431                                 rx_buff->state = OUTSIDE_FRAME;
 432                                 rx_buff->in_frame = FALSE;
 433                                 fir_eof(stir);
 434                                 continue;
 435                         }
 436                         break;
 437                 }
 438
 439                 /* add byte to rx buffer */
 440                 if (unlikely(rx_buff->len >= rx_buff->truesize)) {
 441                         pr_debug("%s: fir frame exceeds %d\n",
 442                                  stir->netdev->name, rx_buff->truesize);
 443                         ++stir->stats.rx_over_errors;
 444                         goto error_recovery;
 445                 }
 446
 447                 rx_buff->data[rx_buff->len++] = byte;
 448                 continue;
 449
 450         frame_error:
 451                 ++stir->stats.rx_frame_errors;
 452
 453         error_recovery:
 454                 ++stir->stats.rx_errors;
 455                 rx_buff->state = OUTSIDE_FRAME;
 456                 rx_buff->in_frame = FALSE;
 457         }
 458 }
 459
 460 /* Unwrap SIR stuffed data and bump it up to IrLAP */
 461 static void stir_sir_chars(struct stir_cb *stir,
 462                             const __u8 *bytes, int len)
 463 {
 464         int i;
 465
 466         for (i = 0; i < len; i++)
 467                 async_unwrap_char(stir->netdev, &stir->stats,
 468                                   &stir->rx_buff, bytes[i]);
 469 }
 470
 471 static inline void unwrap_chars(struct stir_cb *stir,
 472                                 const __u8 *bytes, int length)
 473 {
 474         if (isfir(stir->speed))
 475                 stir_fir_chars(stir, bytes, length);
 476         else
 477                 stir_sir_chars(stir, bytes, length);
 478 }
 479
 480 /* Mode parameters for each speed */
 481 static const struct {
 482         unsigned speed;
 483         __u8 pdclk;
 484 } stir_modes[] = {
 485         { 2400,    PDCLK_2400 },
 486         { 9600,    PDCLK_9600 },
 487         { 19200,   PDCLK_19200 },
 488         { 38400,   PDCLK_38400 },
 489         { 57600,   PDCLK_57600 },
 490         { 115200,  PDCLK_115200 },
 491         { 4000000, PDCLK_4000000 },
 492 };
 493
 494
 495 /*
 496  * Setup chip for speed.
 497  *  Called at startup to initialize the chip
 498  *  and on speed changes.
 499  *
 500  * Note: Write multiple registers doesn't appear to work
 501  */
 502 static int change_speed(struct stir_cb *stir, unsigned speed)
 503 {
 504         int i, err;
 505         __u8 mode;
 506
 507         for (i = 0; i < ARRAY_SIZE(stir_modes); ++i) {
 508                 if (speed == stir_modes[i].speed)
 509                         goto found;
 510         }
 511
 512         warn("%s: invalid speed %d", stir->netdev->name, speed);
 513         return -EINVAL;
 514
 515  found:
 516         pr_debug("speed change from %d to %d\n", stir->speed, speed);
 517
 518         /* Reset modulator */
 519         err = write_reg(stir, REG_CTRL1, CTRL1_SRESET);
 520         if (err)
 521                 goto out;
 522
 523         /* Undocumented magic to tweak the DPLL */
 524         err = write_reg(stir, REG_DPLL, 0x15);
 525         if (err)
 526                 goto out;
 527
 528         /* Set clock */
 529         err = write_reg(stir, REG_PDCLK, stir_modes[i].pdclk);
 530         if (err)
 531                 goto out;
 532
 533         mode = MODE_NRESET | MODE_FASTRX;
 534         if (isfir(speed))
 535                 mode |= MODE_FIR | MODE_FFRSTEN;
 536         else
 537                 mode |= MODE_SIR;
 538
 539         if (speed == 2400)
 540                 mode |= MODE_2400;
 541
 542         err = write_reg(stir, REG_MODE, mode);
 543         if (err)
 544                 goto out;
 545
 546         /* This resets TEMIC style transceiver if any. */
 547         err = write_reg(stir, REG_CTRL1,
 548                         CTRL1_SDMODE | (tx_power & 3) << 1);
 549         if (err)
 550                 goto out;
 551
 552         err = write_reg(stir, REG_CTRL1, (tx_power & 3) << 1);
 553         if (err)
 554                 goto out;
 555
 556         /* Reset sensitivity */
 557         err = write_reg(stir, REG_CTRL2, (rx_sensitivity & 7) << 5);
 558  out:
 559         stir->speed = speed;
 560         return err;
 561 }
 562
 563 /*
 564  * Called from net/core when new frame is available.
 565  */
 566 static int stir_hard_xmit(struct sk_buff *skb, struct net_device *netdev)
 567 {
 568         struct stir_cb *stir = netdev_priv(netdev);
 569
 570         netif_stop_queue(netdev);
 571
 572         /* the IRDA wrapping routines don't deal with non linear skb */
 573         SKB_LINEAR_ASSERT(skb);
 574
 575         skb = xchg(&stir->tx_pending, skb);
 576         wake_up_process(stir->thread);
 577
 578         /* this should never happen unless stop/wakeup problem */
 579         if (unlikely(skb)) {
 580                 WARN_ON(1);
 581                 dev_kfree_skb(skb);
 582         }
 583
 584         return 0;
 585 }
 586
 587 /*
 588  * Wait for the transmit FIFO to have space for next data
 589  *
 590  * If space < 0 then wait till FIFO completely drains.
 591  * FYI: can take up to 13 seconds at 2400baud.
 592  */
 593 static int fifo_txwait(struct stir_cb *stir, int space)
 594 {
 595         int err;
 596         unsigned long count, status;
 597
 598         /* Read FIFO status and count */
 599         for(;;) {
 600                 err = read_reg(stir, REG_FIFOCTL, stir->fifo_status,
 601                                    FIFO_REGS_SIZE);
 602                 if (unlikely(err != FIFO_REGS_SIZE)) {
 603                         warn("%s: FIFO register read error: %d",
 604                              stir->netdev->name, err);
 605
 606                         return err;
 607                 }
 608
 609                 status = stir->fifo_status[0];
 610                 count = (unsigned)(stir->fifo_status[2] & 0x1f) << 8
 611                         | stir->fifo_status[1];
 612
 613                 pr_debug("fifo status 0x%lx count %lu\n", status, count);
 614
 615                 /* is fifo receiving already, or empty */
 616                 if (!(status & FIFOCTL_DIR)
 617                     || (status & FIFOCTL_EMPTY))
 618                         return 0;
 619
 620                 if (signal_pending(current))
 621                         return -EINTR;
 622
 623                 /* shutting down? */
 624                 if (!netif_running(stir->netdev)
 625                     || !netif_device_present(stir->netdev))
 626                         return -ESHUTDOWN;
 627
 628                 /* only waiting for some space */
 629                 if (space >= 0 && STIR_FIFO_SIZE - 4 > space + count)
 630                         return 0;
 631
 632                 /* estimate transfer time for remaining chars */
 633                 msleep((count * 8000) / stir->speed);
 634         }
 635
 636         err = write_reg(stir, REG_FIFOCTL, FIFOCTL_CLR);
 637         if (err)
 638                 return err;
 639         err = write_reg(stir, REG_FIFOCTL, 0);
 640         if (err)
 641                 return err;
 642
 643         return 0;
 644 }
 645
 646
 647 /* Wait for turnaround delay before starting transmit.  */
 648 static void turnaround_delay(const struct stir_cb *stir, long us)
 649 {
 650         long ticks;
 651         struct timeval now;
 652
 653         if (us <= 0)
 654                 return;
 655
 656         do_gettimeofday(&now);
 657         if (now.tv_sec - stir->rx_time.tv_sec > 0)
 658                 us -= USEC_PER_SEC;
 659         us -= now.tv_usec - stir->rx_time.tv_usec;
 660         if (us < 10)
 661                 return;
 662
 663         ticks = us / (1000000 / HZ);
 664         if (ticks > 0)
 665                 schedule_timeout_interruptible(1 + ticks);
 666         else
 667                 udelay(us);
 668 }
 669
 670 /*
 671  * Start receiver by submitting a request to the receive pipe.
 672  * If nothing is available it will return after rx_interval.
 673  */
 674 static int receive_start(struct stir_cb *stir)
 675 {
 676         /* reset state */
 677         stir->receiving = 1;
 678
 679         stir->rx_buff.in_frame = FALSE;
 680         stir->rx_buff.state = OUTSIDE_FRAME;
 681
 682         stir->rx_urb->status = 0;
 683         return usb_submit_urb(stir->rx_urb, GFP_KERNEL);
 684 }
 685
 686 /* Stop all pending receive Urb's */
 687 static void receive_stop(struct stir_cb *stir)
 688 {
 689         stir->receiving = 0;
 690         usb_kill_urb(stir->rx_urb);
 691
 692         if (stir->rx_buff.in_frame)
 693                 stir->stats.collisions++;
 694 }
 695 /*
 696  * Wrap data in socket buffer and send it.
 697  */
 698 static void stir_send(struct stir_cb *stir, struct sk_buff *skb)
 699 {
 700         unsigned wraplen;
 701         int first_frame = 0;
 702
 703         /* if receiving, need to turnaround */
 704         if (stir->receiving) {
 705                 receive_stop(stir);
 706                 turnaround_delay(stir, irda_get_mtt(skb));
 707                 first_frame = 1;
 708         }
 709
 710         if (isfir(stir->speed))
 711                 wraplen = wrap_fir_skb(skb, stir->io_buf);
 712         else
 713                 wraplen = wrap_sir_skb(skb, stir->io_buf);
 714
 715         /* check for space available in fifo */
 716         if (!first_frame)
 717                 fifo_txwait(stir, wraplen);
 718
 719         stir->stats.tx_packets++;
 720         stir->stats.tx_bytes += skb->len;
 721         stir->netdev->trans_start = jiffies;
 722         pr_debug("send %d (%d)\n", skb->len, wraplen);
 723
 724         if (usb_bulk_msg(stir->usbdev, usb_sndbulkpipe(stir->usbdev, 1),
 725                          stir->io_buf, wraplen,
 726                          NULL, TRANSMIT_TIMEOUT))
 727                 stir->stats.tx_errors++;
 728 }
 729
 730 /*
 731  * Transmit state machine thread
 732  */
 733 static int stir_transmit_thread(void *arg)
 734 {
 735         struct stir_cb *stir = arg;
 736         struct net_device *dev = stir->netdev;
 737         struct sk_buff *skb;
 738
 739         while (!kthread_should_stop()) {
 740 #ifdef CONFIG_PM
 741                 /* if suspending, then power off and wait */
 742                 if (unlikely(freezing(current))) {
 743                         if (stir->receiving)
 744                                 receive_stop(stir);
 745                         else
 746                                 fifo_txwait(stir, -1);
 747
 748                         write_reg(stir, REG_CTRL1, CTRL1_TXPWD|CTRL1_RXPWD);
 749
 750                         refrigerator();
 751
 752                         if (change_speed(stir, stir->speed))
 753                                 break;
 754                 }
 755 #endif
 756
 757                 /* if something to send? */
 758                 skb = xchg(&stir->tx_pending, NULL);
 759                 if (skb) {
 760                         unsigned new_speed = irda_get_next_speed(skb);
 761                         netif_wake_queue(dev);
 762
 763                         if (skb->len > 0)
 764                                 stir_send(stir, skb);
 765                         dev_kfree_skb(skb);
 766
 767                         if ((new_speed != -1) && (stir->speed != new_speed)) {
 768                                 if (fifo_txwait(stir, -1) ||
 769                                     change_speed(stir, new_speed))
 770                                         break;
 771                         }
 772                         continue;
 773                 }
 774
 775                 /* nothing to send? start receiving */
 776                 if (!stir->receiving
 777                     && irda_device_txqueue_empty(dev)) {
 778                         /* Wait otherwise chip gets confused. */
 779                         if (fifo_txwait(stir, -1))
 780                                 break;
 781
 782                         if (unlikely(receive_start(stir))) {
 783                                 if (net_ratelimit())
 784                                         info("%s: receive usb submit failed",
 785                                              stir->netdev->name);
 786                                 stir->receiving = 0;
 787                                 msleep(10);
 788                                 continue;
 789                         }
 790                 }
 791
 792                 /* sleep if nothing to send */
 793                 set_current_state(TASK_INTERRUPTIBLE);
 794                 schedule();
 795
 796         }
 797         return 0;
 798 }
 799
 800
 801 /*
 802  * USB bulk receive completion callback.
 803  * Wakes up every ms (usb round trip) with wrapped
 804  * data.
 805  */
 806 static void stir_rcv_irq(struct urb *urb)
 807 {
 808         struct stir_cb *stir = urb->context;
 809         int err;
 810
 811         /* in process of stopping, just drop data */
 812         if (!netif_running(stir->netdev))
 813                 return;
 814
 815         /* unlink, shutdown, unplug, other nasties */
 816         if (urb->status != 0)
 817                 return;
 818
 819         if (urb->actual_length > 0) {
 820                 pr_debug("receive %d\n", urb->actual_length);
 821                 unwrap_chars(stir, urb->transfer_buffer,
 822                              urb->actual_length);
 823
 824                 stir->netdev->last_rx = jiffies;
 825                 do_gettimeofday(&stir->rx_time);
 826         }
 827
 828         /* kernel thread is stopping receiver don't resubmit */
 829         if (!stir->receiving)
 830                 return;
 831
 832         /* resubmit existing urb */
 833         err = usb_submit_urb(urb, GFP_ATOMIC);
 834
 835         /* in case of error, the kernel thread will restart us */
 836         if (err) {
 837                 warn("%s: usb receive submit error: %d",
 838                         stir->netdev->name, err);
 839                 stir->receiving = 0;
 840                 wake_up_process(stir->thread);
 841         }
 842 }
 843
 844 /*
 845  * Function stir_net_open (dev)
 846  *
 847  *    Network device is taken up. Usually this is done by "ifconfig irda0 up"
 848  */
 849 static int stir_net_open(struct net_device *netdev)
 850 {
 851         struct stir_cb *stir = netdev_priv(netdev);
 852         int err;
 853         char hwname[16];
 854
 855         err = usb_clear_halt(stir->usbdev, usb_sndbulkpipe(stir->usbdev, 1));
 856         if (err)
 857                 goto err_out1;
 858         err = usb_clear_halt(stir->usbdev, usb_rcvbulkpipe(stir->usbdev, 2));
 859         if (err)
 860                 goto err_out1;
 861
 862         err = change_speed(stir, 9600);
 863         if (err)
 864                 goto err_out1;
 865
 866         err = -ENOMEM;
 867
 868         /* Initialize for SIR/FIR to copy data directly into skb.  */
 869         stir->receiving = 0;
 870         stir->rx_buff.truesize = IRDA_SKB_MAX_MTU;
 871         stir->rx_buff.skb = dev_alloc_skb(IRDA_SKB_MAX_MTU);
 872         if (!stir->rx_buff.skb)
 873                 goto err_out1;
 874
 875         skb_reserve(stir->rx_buff.skb, 1);
 876         stir->rx_buff.head = stir->rx_buff.skb->data;
 877         do_gettimeofday(&stir->rx_time);
 878
 879         stir->rx_urb = usb_alloc_urb(0, GFP_KERNEL);
 880         if (!stir->rx_urb)
 881                 goto err_out2;
 882
 883         stir->io_buf = kmalloc(STIR_FIFO_SIZE, GFP_KERNEL);
 884         if (!stir->io_buf)
 885                 goto err_out3;
 886
 887         usb_fill_bulk_urb(stir->rx_urb, stir->usbdev,
 888                           usb_rcvbulkpipe(stir->usbdev, 2),
 889                           stir->io_buf, STIR_FIFO_SIZE,
 890                           stir_rcv_irq, stir);
 891
 892         stir->fifo_status = kmalloc(FIFO_REGS_SIZE, GFP_KERNEL);
 893         if (!stir->fifo_status)
 894                 goto err_out4;
 895
 896         /*
 897          * Now that everything should be initialized properly,
 898          * Open new IrLAP layer instance to take care of us...
 899          * Note : will send immediately a speed change...
 900          */
 901         sprintf(hwname, "usb#%d", stir->usbdev->devnum);
 902         stir->irlap = irlap_open(netdev, &stir->qos, hwname);
 903         if (!stir->irlap) {
 904                 err("stir4200: irlap_open failed");
 905                 goto err_out5;
 906         }
 907
 908         /** Start kernel thread for transmit.  */
 909         stir->thread = kthread_run(stir_transmit_thread, stir,
 910                                    "%s", stir->netdev->name);
 911         if (IS_ERR(stir->thread)) {
 912                 err = PTR_ERR(stir->thread);
 913                 err("stir4200: unable to start kernel thread");
 914                 goto err_out6;
 915         }
 916
 917         netif_start_queue(netdev);
 918
 919         return 0;
 920
 921  err_out6:
 922         irlap_close(stir->irlap);
 923  err_out5:
 924         kfree(stir->fifo_status);
 925  err_out4:
 926         kfree(stir->io_buf);
 927  err_out3:
 928         usb_free_urb(stir->rx_urb);
 929  err_out2:
 930         kfree_skb(stir->rx_buff.skb);
 931  err_out1:
 932         return err;
 933 }
 934
 935 /*
 936  * Function stir_net_close (stir)
 937  *
 938  *    Network device is taken down. Usually this is done by
 939  *    "ifconfig irda0 down"
 940  */
 941 static int stir_net_close(struct net_device *netdev)
 942 {
 943         struct stir_cb *stir = netdev_priv(netdev);
 944
 945         /* Stop transmit processing */
 946         netif_stop_queue(netdev);
 947
 948         /* Kill transmit thread */
 949         kthread_stop(stir->thread);
 950         kfree(stir->fifo_status);
 951
 952         /* Mop up receive urb's */
 953         usb_kill_urb(stir->rx_urb);
 954
 955         kfree(stir->io_buf);
 956         usb_free_urb(stir->rx_urb);
 957         kfree_skb(stir->rx_buff.skb);
 958
 959         /* Stop and remove instance of IrLAP */
 960         if (stir->irlap)
 961                 irlap_close(stir->irlap);
 962
 963         stir->irlap = NULL;
 964
 965         return 0;
 966 }
 967
 968 /*
 969  * IOCTLs : Extra out-of-band network commands...
 970  */
 971 static int stir_net_ioctl(struct net_device *netdev, struct ifreq *rq, int cmd)
 972 {
 973         struct if_irda_req *irq = (struct if_irda_req *) rq;
 974         struct stir_cb *stir = netdev_priv(netdev);
 975         int ret = 0;
 976
 977         switch (cmd) {
 978         case SIOCSBANDWIDTH: /* Set bandwidth */
 979                 if (!capable(CAP_NET_ADMIN))
 980                         return -EPERM;
 981
 982                 /* Check if the device is still there */
 983                 if (netif_device_present(stir->netdev))
 984                         ret = change_speed(stir, irq->ifr_baudrate);
 985                 break;
 986
 987         case SIOCSMEDIABUSY: /* Set media busy */
 988                 if (!capable(CAP_NET_ADMIN))
 989                         return -EPERM;
 990
 991                 /* Check if the IrDA stack is still there */
 992                 if (netif_running(stir->netdev))
 993                         irda_device_set_media_busy(stir->netdev, TRUE);
 994                 break;
 995
 996         case SIOCGRECEIVING:
 997                 /* Only approximately true */
 998                 irq->ifr_receiving = stir->receiving;
 999                 break;
1000
1001         default:
1002                 ret = -EOPNOTSUPP;
1003         }
1004
1005         return ret;
1006 }
1007
1008 /*
1009  * Get device stats (for /proc/net/dev and ifconfig)
1010  */
1011 static struct net_device_stats *stir_net_get_stats(struct net_device *netdev)
1012 {
1013         struct stir_cb *stir = netdev_priv(netdev);
1014         return &stir->stats;
1015 }
1016
1017 /*
1018  * This routine is called by the USB subsystem for each new device
1019  * in the system. We need to check if the device is ours, and in
1020  * this case start handling it.
1021  * Note : it might be worth protecting this function by a global
1022  * spinlock... Or not, because maybe USB already deal with that...
1023  */
1024 static int stir_probe(struct usb_interface *intf,
1025                       const struct usb_device_id *id)
1026 {
1027         struct usb_device *dev = interface_to_usbdev(intf);
1028         struct stir_cb *stir = NULL;
1029         struct net_device *net;
1030         int ret = -ENOMEM;
1031
1032         /* Allocate network device container. */
1033         net = alloc_irdadev(sizeof(*stir));
1034         if(!net)
1035                 goto err_out1;
1036
1037         SET_NETDEV_DEV(net, &intf->dev);
1038         stir = netdev_priv(net);
1039         stir->netdev = net;
1040         stir->usbdev = dev;
1041
1042         ret = usb_reset_configuration(dev);
1043         if (ret != 0) {
1044                 err("stir4200: usb reset configuration failed");
1045                 goto err_out2;
1046         }
1047
1048         printk(KERN_INFO "SigmaTel STIr4200 IRDA/USB found at address %d, "
1049                 "Vendor: %x, Product: %x\n",
1050                dev->devnum, le16_to_cpu(dev->descriptor.idVendor),
1051                le16_to_cpu(dev->descriptor.idProduct));
1052
1053         /* Initialize QoS for this device */
1054         irda_init_max_qos_capabilies(&stir->qos);
1055
1056         /* That's the Rx capability. */
1057         stir->qos.baud_rate.bits       &= IR_2400 | IR_9600 | IR_19200 |
1058                                          IR_38400 | IR_57600 | IR_115200 |
1059                                          (IR_4000000 << 8);
1060         stir->qos.min_turn_time.bits   &= qos_mtt_bits;
1061         irda_qos_bits_to_value(&stir->qos);
1062
1063         /* Override the network functions we need to use */
1064         net->hard_start_xmit = stir_hard_xmit;
1065         net->open            = stir_net_open;
1066         net->stop            = stir_net_close;
1067         net->get_stats       = stir_net_get_stats;
1068         net->do_ioctl        = stir_net_ioctl;
1069
1070         ret = register_netdev(net);
1071         if (ret != 0)
1072                 goto err_out2;
1073
1074         info("IrDA: Registered SigmaTel device %s", net->name);
1075
1076         usb_set_intfdata(intf, stir);
1077
1078         return 0;
1079
1080 err_out2:
1081         free_netdev(net);
1082 err_out1:
1083         return ret;
1084 }
1085
1086 /*
1087  * The current device is removed, the USB layer tell us to shut it down...
1088  */
1089 static void stir_disconnect(struct usb_interface *intf)
1090 {
1091         struct stir_cb *stir = usb_get_intfdata(intf);
1092
1093         if (!stir)
1094                 return;
1095
1096         unregister_netdev(stir->netdev);
1097         free_netdev(stir->netdev);
1098
1099         usb_set_intfdata(intf, NULL);
1100 }
1101
1102 #ifdef CONFIG_PM
1103 /* USB suspend, so power off the transmitter/receiver */
1104 static int stir_suspend(struct usb_interface *intf, pm_message_t message)
1105 {
1106         struct stir_cb *stir = usb_get_intfdata(intf);
1107
1108         netif_device_detach(stir->netdev);
1109         return 0;
1110 }
1111
1112 /* Coming out of suspend, so reset hardware */
1113 static int stir_resume(struct usb_interface *intf)
1114 {
1115         struct stir_cb *stir = usb_get_intfdata(intf);
1116
1117         netif_device_attach(stir->netdev);
1118
1119         /* receiver restarted when send thread wakes up */
1120         return 0;
1121 }
1122 #endif
1123
1124 /*
1125  * USB device callbacks
1126  */
1127 static struct usb_driver irda_driver = {
1128         .name           = "stir4200",
1129         .probe          = stir_probe,
1130         .disconnect     = stir_disconnect,
1131         .id_table       = dongles,
1132 #ifdef CONFIG_PM
1133         .suspend        = stir_suspend,
1134         .resume         = stir_resume,
1135 #endif
1136 };
1137
1138 /*
1139  * Module insertion
1140  */
1141 static int __init stir_init(void)
1142 {
1143         return usb_register(&irda_driver);
1144 }
1145 module_init(stir_init);
1146
1147 /*
1148  * Module removal
1149  */
1150 static void __exit stir_cleanup(void)
1151 {
1152         /* Deregister the driver and remove all pending instances */
1153         usb_deregister(&irda_driver);
1154 }
1155 module_exit(stir_cleanup);