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