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