Merge master.kernel.org:/pub/scm/linux/kernel/git/dtor/input
[linux-2.6] / drivers / net / irda / sir_dev.c
1 /*********************************************************************
2  *
3  *      sir_dev.c:      irda sir network device
4  * 
5  *      Copyright (c) 2002 Martin Diehl
6  * 
7  *      This program is free software; you can redistribute it and/or 
8  *      modify it under the terms of the GNU General Public License as 
9  *      published by the Free Software Foundation; either version 2 of 
10  *      the License, or (at your option) any later version.
11  *
12  ********************************************************************/    
13
14 #include <linux/module.h>
15 #include <linux/kernel.h>
16 #include <linux/init.h>
17 #include <linux/delay.h>
18
19 #include <net/irda/irda.h>
20 #include <net/irda/wrapper.h>
21 #include <net/irda/irda_device.h>
22
23 #include "sir-dev.h"
24
25
26 static struct workqueue_struct *irda_sir_wq;
27
28 /* STATE MACHINE */
29
30 /* substate handler of the config-fsm to handle the cases where we want
31  * to wait for transmit completion before changing the port configuration
32  */
33
34 static int sirdev_tx_complete_fsm(struct sir_dev *dev)
35 {
36         struct sir_fsm *fsm = &dev->fsm;
37         unsigned next_state, delay;
38         unsigned bytes_left;
39
40         do {
41                 next_state = fsm->substate;     /* default: stay in current substate */
42                 delay = 0;
43
44                 switch(fsm->substate) {
45
46                 case SIRDEV_STATE_WAIT_XMIT:
47                         if (dev->drv->chars_in_buffer)
48                                 bytes_left = dev->drv->chars_in_buffer(dev);
49                         else
50                                 bytes_left = 0;
51                         if (!bytes_left) {
52                                 next_state = SIRDEV_STATE_WAIT_UNTIL_SENT;
53                                 break;
54                         }
55
56                         if (dev->speed > 115200)
57                                 delay = (bytes_left*8*10000) / (dev->speed/100);
58                         else if (dev->speed > 0)
59                                 delay = (bytes_left*10*10000) / (dev->speed/100);
60                         else
61                                 delay = 0;
62                         /* expected delay (usec) until remaining bytes are sent */
63                         if (delay < 100) {
64                                 udelay(delay);
65                                 delay = 0;
66                                 break;
67                         }
68                         /* sleep some longer delay (msec) */
69                         delay = (delay+999) / 1000;
70                         break;
71
72                 case SIRDEV_STATE_WAIT_UNTIL_SENT:
73                         /* block until underlaying hardware buffer are empty */
74                         if (dev->drv->wait_until_sent)
75                                 dev->drv->wait_until_sent(dev);
76                         next_state = SIRDEV_STATE_TX_DONE;
77                         break;
78
79                 case SIRDEV_STATE_TX_DONE:
80                         return 0;
81
82                 default:
83                         IRDA_ERROR("%s - undefined state\n", __FUNCTION__);
84                         return -EINVAL;
85                 }
86                 fsm->substate = next_state;
87         } while (delay == 0);
88         return delay;
89 }
90
91 /*
92  * Function sirdev_config_fsm
93  *
94  * State machine to handle the configuration of the device (and attached dongle, if any).
95  * This handler is scheduled for execution in kIrDAd context, so we can sleep.
96  * however, kIrDAd is shared by all sir_dev devices so we better don't sleep there too
97  * long. Instead, for longer delays we start a timer to reschedule us later.
98  * On entry, fsm->sem is always locked and the netdev xmit queue stopped.
99  * Both must be unlocked/restarted on completion - but only on final exit.
100  */
101
102 static void sirdev_config_fsm(struct work_struct *work)
103 {
104         struct sir_dev *dev = container_of(work, struct sir_dev, fsm.work.work);
105         struct sir_fsm *fsm = &dev->fsm;
106         int next_state;
107         int ret = -1;
108         unsigned delay;
109
110         IRDA_DEBUG(2, "%s(), <%ld>\n", __FUNCTION__, jiffies);
111
112         do {
113                 IRDA_DEBUG(3, "%s - state=0x%04x / substate=0x%04x\n",
114                         __FUNCTION__, fsm->state, fsm->substate);
115
116                 next_state = fsm->state;
117                 delay = 0;
118
119                 switch(fsm->state) {
120
121                 case SIRDEV_STATE_DONGLE_OPEN:
122                         if (dev->dongle_drv != NULL) {
123                                 ret = sirdev_put_dongle(dev);
124                                 if (ret) {
125                                         fsm->result = -EINVAL;
126                                         next_state = SIRDEV_STATE_ERROR;
127                                         break;
128                                 }
129                         }
130
131                         /* Initialize dongle */
132                         ret = sirdev_get_dongle(dev, fsm->param);
133                         if (ret) {
134                                 fsm->result = ret;
135                                 next_state = SIRDEV_STATE_ERROR;
136                                 break;
137                         }
138
139                         /* Dongles are powered through the modem control lines which
140                          * were just set during open. Before resetting, let's wait for
141                          * the power to stabilize. This is what some dongle drivers did
142                          * in open before, while others didn't - should be safe anyway.
143                          */
144
145                         delay = 50;
146                         fsm->substate = SIRDEV_STATE_DONGLE_RESET;
147                         next_state = SIRDEV_STATE_DONGLE_RESET;
148
149                         fsm->param = 9600;
150
151                         break;
152
153                 case SIRDEV_STATE_DONGLE_CLOSE:
154                         /* shouldn't we just treat this as success=? */
155                         if (dev->dongle_drv == NULL) {
156                                 fsm->result = -EINVAL;
157                                 next_state = SIRDEV_STATE_ERROR;
158                                 break;
159                         }
160
161                         ret = sirdev_put_dongle(dev);
162                         if (ret) {
163                                 fsm->result = ret;
164                                 next_state = SIRDEV_STATE_ERROR;
165                                 break;
166                         }
167                         next_state = SIRDEV_STATE_DONE;
168                         break;
169
170                 case SIRDEV_STATE_SET_DTR_RTS:
171                         ret = sirdev_set_dtr_rts(dev,
172                                 (fsm->param&0x02) ? TRUE : FALSE,
173                                 (fsm->param&0x01) ? TRUE : FALSE);
174                         next_state = SIRDEV_STATE_DONE;
175                         break;
176
177                 case SIRDEV_STATE_SET_SPEED:
178                         fsm->substate = SIRDEV_STATE_WAIT_XMIT;
179                         next_state = SIRDEV_STATE_DONGLE_CHECK;
180                         break;
181
182                 case SIRDEV_STATE_DONGLE_CHECK:
183                         ret = sirdev_tx_complete_fsm(dev);
184                         if (ret < 0) {
185                                 fsm->result = ret;
186                                 next_state = SIRDEV_STATE_ERROR;
187                                 break;
188                         }
189                         if ((delay=ret) != 0)
190                                 break;
191
192                         if (dev->dongle_drv) {
193                                 fsm->substate = SIRDEV_STATE_DONGLE_RESET;
194                                 next_state = SIRDEV_STATE_DONGLE_RESET;
195                         }
196                         else {
197                                 dev->speed = fsm->param;
198                                 next_state = SIRDEV_STATE_PORT_SPEED;
199                         }
200                         break;
201
202                 case SIRDEV_STATE_DONGLE_RESET:
203                         if (dev->dongle_drv->reset) {
204                                 ret = dev->dongle_drv->reset(dev);
205                                 if (ret < 0) {
206                                         fsm->result = ret;
207                                         next_state = SIRDEV_STATE_ERROR;
208                                         break;
209                                 }
210                         }
211                         else
212                                 ret = 0;
213                         if ((delay=ret) == 0) {
214                                 /* set serial port according to dongle default speed */
215                                 if (dev->drv->set_speed)
216                                         dev->drv->set_speed(dev, dev->speed);
217                                 fsm->substate = SIRDEV_STATE_DONGLE_SPEED;
218                                 next_state = SIRDEV_STATE_DONGLE_SPEED;
219                         }
220                         break;
221
222                 case SIRDEV_STATE_DONGLE_SPEED:
223                         if (dev->dongle_drv->reset) {
224                                 ret = dev->dongle_drv->set_speed(dev, fsm->param);
225                                 if (ret < 0) {
226                                         fsm->result = ret;
227                                         next_state = SIRDEV_STATE_ERROR;
228                                         break;
229                                 }
230                         }
231                         else
232                                 ret = 0;
233                         if ((delay=ret) == 0)
234                                 next_state = SIRDEV_STATE_PORT_SPEED;
235                         break;
236
237                 case SIRDEV_STATE_PORT_SPEED:
238                         /* Finally we are ready to change the serial port speed */
239                         if (dev->drv->set_speed)
240                                 dev->drv->set_speed(dev, dev->speed);
241                         dev->new_speed = 0;
242                         next_state = SIRDEV_STATE_DONE;
243                         break;
244
245                 case SIRDEV_STATE_DONE:
246                         /* Signal network layer so it can send more frames */
247                         netif_wake_queue(dev->netdev);
248                         next_state = SIRDEV_STATE_COMPLETE;
249                         break;
250
251                 default:
252                         IRDA_ERROR("%s - undefined state\n", __FUNCTION__);
253                         fsm->result = -EINVAL;
254                         /* fall thru */
255
256                 case SIRDEV_STATE_ERROR:
257                         IRDA_ERROR("%s - error: %d\n", __FUNCTION__, fsm->result);
258
259 #if 0   /* don't enable this before we have netdev->tx_timeout to recover */
260                         netif_stop_queue(dev->netdev);
261 #else
262                         netif_wake_queue(dev->netdev);
263 #endif
264                         /* fall thru */
265
266                 case SIRDEV_STATE_COMPLETE:
267                         /* config change finished, so we are not busy any longer */
268                         sirdev_enable_rx(dev);
269                         up(&fsm->sem);
270                         return;
271                 }
272                 fsm->state = next_state;
273         } while(!delay);
274
275         queue_delayed_work(irda_sir_wq, &fsm->work, msecs_to_jiffies(delay));
276 }
277
278 /* schedule some device configuration task for execution by kIrDAd
279  * on behalf of the above state machine.
280  * can be called from process or interrupt/tasklet context.
281  */
282
283 int sirdev_schedule_request(struct sir_dev *dev, int initial_state, unsigned param)
284 {
285         struct sir_fsm *fsm = &dev->fsm;
286
287         IRDA_DEBUG(2, "%s - state=0x%04x / param=%u\n", __FUNCTION__, initial_state, param);
288
289         if (down_trylock(&fsm->sem)) {
290                 if (in_interrupt()  ||  in_atomic()  ||  irqs_disabled()) {
291                         IRDA_DEBUG(1, "%s(), state machine busy!\n", __FUNCTION__);
292                         return -EWOULDBLOCK;
293                 } else
294                         down(&fsm->sem);
295         }
296
297         if (fsm->state == SIRDEV_STATE_DEAD) {
298                 /* race with sirdev_close should never happen */
299                 IRDA_ERROR("%s(), instance staled!\n", __FUNCTION__);
300                 up(&fsm->sem);
301                 return -ESTALE;         /* or better EPIPE? */
302         }
303
304         netif_stop_queue(dev->netdev);
305         atomic_set(&dev->enable_rx, 0);
306
307         fsm->state = initial_state;
308         fsm->param = param;
309         fsm->result = 0;
310
311         INIT_DELAYED_WORK(&fsm->work, sirdev_config_fsm);
312         queue_delayed_work(irda_sir_wq, &fsm->work, 0);
313         return 0;
314 }
315
316
317 /***************************************************************************/
318
319 void sirdev_enable_rx(struct sir_dev *dev)
320 {
321         if (unlikely(atomic_read(&dev->enable_rx)))
322                 return;
323
324         /* flush rx-buffer - should also help in case of problems with echo cancelation */
325         dev->rx_buff.data = dev->rx_buff.head;
326         dev->rx_buff.len = 0;
327         dev->rx_buff.in_frame = FALSE;
328         dev->rx_buff.state = OUTSIDE_FRAME;
329         atomic_set(&dev->enable_rx, 1);
330 }
331
332 static int sirdev_is_receiving(struct sir_dev *dev)
333 {
334         if (!atomic_read(&dev->enable_rx))
335                 return 0;
336
337         return (dev->rx_buff.state != OUTSIDE_FRAME);
338 }
339
340 int sirdev_set_dongle(struct sir_dev *dev, IRDA_DONGLE type)
341 {
342         int err;
343
344         IRDA_DEBUG(3, "%s : requesting dongle %d.\n", __FUNCTION__, type);
345
346         err = sirdev_schedule_dongle_open(dev, type);
347         if (unlikely(err))
348                 return err;
349         down(&dev->fsm.sem);            /* block until config change completed */
350         err = dev->fsm.result;
351         up(&dev->fsm.sem);
352         return err;
353 }
354 EXPORT_SYMBOL(sirdev_set_dongle);
355
356 /* used by dongle drivers for dongle programming */
357
358 int sirdev_raw_write(struct sir_dev *dev, const char *buf, int len)
359 {
360         unsigned long flags;
361         int ret;
362
363         if (unlikely(len > dev->tx_buff.truesize))
364                 return -ENOSPC;
365
366         spin_lock_irqsave(&dev->tx_lock, flags);        /* serialize with other tx operations */
367         while (dev->tx_buff.len > 0) {                  /* wait until tx idle */
368                 spin_unlock_irqrestore(&dev->tx_lock, flags);
369                 msleep(10);
370                 spin_lock_irqsave(&dev->tx_lock, flags);
371         }
372
373         dev->tx_buff.data = dev->tx_buff.head;
374         memcpy(dev->tx_buff.data, buf, len);    
375         dev->tx_buff.len = len;
376
377         ret = dev->drv->do_write(dev, dev->tx_buff.data, dev->tx_buff.len);
378         if (ret > 0) {
379                 IRDA_DEBUG(3, "%s(), raw-tx started\n", __FUNCTION__);
380
381                 dev->tx_buff.data += ret;
382                 dev->tx_buff.len -= ret;
383                 dev->raw_tx = 1;
384                 ret = len;              /* all data is going to be sent */
385         }
386         spin_unlock_irqrestore(&dev->tx_lock, flags);
387         return ret;
388 }
389 EXPORT_SYMBOL(sirdev_raw_write);
390
391 /* seems some dongle drivers may need this */
392
393 int sirdev_raw_read(struct sir_dev *dev, char *buf, int len)
394 {
395         int count;
396
397         if (atomic_read(&dev->enable_rx))
398                 return -EIO;            /* fail if we expect irda-frames */
399
400         count = (len < dev->rx_buff.len) ? len : dev->rx_buff.len;
401
402         if (count > 0) {
403                 memcpy(buf, dev->rx_buff.data, count);
404                 dev->rx_buff.data += count;
405                 dev->rx_buff.len -= count;
406         }
407
408         /* remaining stuff gets flushed when re-enabling normal rx */
409
410         return count;
411 }
412 EXPORT_SYMBOL(sirdev_raw_read);
413
414 int sirdev_set_dtr_rts(struct sir_dev *dev, int dtr, int rts)
415 {
416         int ret = -ENXIO;
417         if (dev->drv->set_dtr_rts != 0)
418                 ret =  dev->drv->set_dtr_rts(dev, dtr, rts);
419         return ret;
420 }
421 EXPORT_SYMBOL(sirdev_set_dtr_rts);
422
423 /**********************************************************************/
424
425 /* called from client driver - likely with bh-context - to indicate
426  * it made some progress with transmission. Hence we send the next
427  * chunk, if any, or complete the skb otherwise
428  */
429
430 void sirdev_write_complete(struct sir_dev *dev)
431 {
432         unsigned long flags;
433         struct sk_buff *skb;
434         int actual = 0;
435         int err;
436         
437         spin_lock_irqsave(&dev->tx_lock, flags);
438
439         IRDA_DEBUG(3, "%s() - dev->tx_buff.len = %d\n",
440                    __FUNCTION__, dev->tx_buff.len);
441
442         if (likely(dev->tx_buff.len > 0))  {
443                 /* Write data left in transmit buffer */
444                 actual = dev->drv->do_write(dev, dev->tx_buff.data, dev->tx_buff.len);
445
446                 if (likely(actual>0)) {
447                         dev->tx_buff.data += actual;
448                         dev->tx_buff.len  -= actual;
449                 }
450                 else if (unlikely(actual<0)) {
451                         /* could be dropped later when we have tx_timeout to recover */
452                         IRDA_ERROR("%s: drv->do_write failed (%d)\n",
453                                    __FUNCTION__, actual);
454                         if ((skb=dev->tx_skb) != NULL) {
455                                 dev->tx_skb = NULL;
456                                 dev_kfree_skb_any(skb);
457                                 dev->stats.tx_errors++;               
458                                 dev->stats.tx_dropped++;                      
459                         }
460                         dev->tx_buff.len = 0;
461                 }
462                 if (dev->tx_buff.len > 0)
463                         goto done;      /* more data to send later */
464         }
465
466         if (unlikely(dev->raw_tx != 0)) {
467                 /* in raw mode we are just done now after the buffer was sent
468                  * completely. Since this was requested by some dongle driver
469                  * running under the control of the irda-thread we must take
470                  * care here not to re-enable the queue. The queue will be
471                  * restarted when the irda-thread has completed the request.
472                  */
473
474                 IRDA_DEBUG(3, "%s(), raw-tx done\n", __FUNCTION__);
475                 dev->raw_tx = 0;
476                 goto done;      /* no post-frame handling in raw mode */
477         }
478
479         /* we have finished now sending this skb.
480          * update statistics and free the skb.
481          * finally we check and trigger a pending speed change, if any.
482          * if not we switch to rx mode and wake the queue for further
483          * packets.
484          * note the scheduled speed request blocks until the lower
485          * client driver and the corresponding hardware has really
486          * finished sending all data (xmit fifo drained f.e.)
487          * before the speed change gets finally done and the queue
488          * re-activated.
489          */
490
491         IRDA_DEBUG(5, "%s(), finished with frame!\n", __FUNCTION__);
492                 
493         if ((skb=dev->tx_skb) != NULL) {
494                 dev->tx_skb = NULL;
495                 dev->stats.tx_packets++;                      
496                 dev->stats.tx_bytes += skb->len;
497                 dev_kfree_skb_any(skb);
498         }
499
500         if (unlikely(dev->new_speed > 0)) {
501                 IRDA_DEBUG(5, "%s(), Changing speed!\n", __FUNCTION__);
502                 err = sirdev_schedule_speed(dev, dev->new_speed);
503                 if (unlikely(err)) {
504                         /* should never happen
505                          * forget the speed change and hope the stack recovers
506                          */
507                         IRDA_ERROR("%s - schedule speed change failed: %d\n",
508                                    __FUNCTION__, err);
509                         netif_wake_queue(dev->netdev);
510                 }
511                 /* else: success
512                  *      speed change in progress now
513                  *      on completion dev->new_speed gets cleared,
514                  *      rx-reenabled and the queue restarted
515                  */
516         }
517         else {
518                 sirdev_enable_rx(dev);
519                 netif_wake_queue(dev->netdev);
520         }
521
522 done:
523         spin_unlock_irqrestore(&dev->tx_lock, flags);
524 }
525 EXPORT_SYMBOL(sirdev_write_complete);
526
527 /* called from client driver - likely with bh-context - to give us
528  * some more received bytes. We put them into the rx-buffer,
529  * normally unwrapping and building LAP-skb's (unless rx disabled)
530  */
531
532 int sirdev_receive(struct sir_dev *dev, const unsigned char *cp, size_t count) 
533 {
534         if (!dev || !dev->netdev) {
535                 IRDA_WARNING("%s(), not ready yet!\n", __FUNCTION__);
536                 return -1;
537         }
538
539         if (!dev->irlap) {
540                 IRDA_WARNING("%s - too early: %p / %zd!\n",
541                              __FUNCTION__, cp, count);
542                 return -1;
543         }
544
545         if (cp==NULL) {
546                 /* error already at lower level receive
547                  * just update stats and set media busy
548                  */
549                 irda_device_set_media_busy(dev->netdev, TRUE);
550                 dev->stats.rx_dropped++;
551                 IRDA_DEBUG(0, "%s; rx-drop: %zd\n", __FUNCTION__, count);
552                 return 0;
553         }
554
555         /* Read the characters into the buffer */
556         if (likely(atomic_read(&dev->enable_rx))) {
557                 while (count--)
558                         /* Unwrap and destuff one byte */
559                         async_unwrap_char(dev->netdev, &dev->stats, 
560                                           &dev->rx_buff, *cp++);
561         } else {
562                 while (count--) {
563                         /* rx not enabled: save the raw bytes and never
564                          * trigger any netif_rx. The received bytes are flushed
565                          * later when we re-enable rx but might be read meanwhile
566                          * by the dongle driver.
567                          */
568                         dev->rx_buff.data[dev->rx_buff.len++] = *cp++;
569
570                         /* What should we do when the buffer is full? */
571                         if (unlikely(dev->rx_buff.len == dev->rx_buff.truesize))
572                                 dev->rx_buff.len = 0;
573                 }
574         }
575
576         return 0;
577 }
578 EXPORT_SYMBOL(sirdev_receive);
579
580 /**********************************************************************/
581
582 /* callbacks from network layer */
583
584 static struct net_device_stats *sirdev_get_stats(struct net_device *ndev)
585 {
586         struct sir_dev *dev = ndev->priv;
587
588         return (dev) ? &dev->stats : NULL;
589 }
590
591 static int sirdev_hard_xmit(struct sk_buff *skb, struct net_device *ndev)
592 {
593         struct sir_dev *dev = ndev->priv;
594         unsigned long flags;
595         int actual = 0;
596         int err;
597         s32 speed;
598
599         IRDA_ASSERT(dev != NULL, return 0;);
600
601         netif_stop_queue(ndev);
602
603         IRDA_DEBUG(3, "%s(), skb->len = %d\n", __FUNCTION__, skb->len);
604
605         speed = irda_get_next_speed(skb);
606         if ((speed != dev->speed) && (speed != -1)) {
607                 if (!skb->len) {
608                         err = sirdev_schedule_speed(dev, speed);
609                         if (unlikely(err == -EWOULDBLOCK)) {
610                                 /* Failed to initiate the speed change, likely the fsm
611                                  * is still busy (pretty unlikely, but...)
612                                  * We refuse to accept the skb and return with the queue
613                                  * stopped so the network layer will retry after the
614                                  * fsm completes and wakes the queue.
615                                  */
616                                  return 1;
617                         }
618                         else if (unlikely(err)) {
619                                 /* other fatal error - forget the speed change and
620                                  * hope the stack will recover somehow
621                                  */
622                                  netif_start_queue(ndev);
623                         }
624                         /* else: success
625                          *      speed change in progress now
626                          *      on completion the queue gets restarted
627                          */
628
629                         dev_kfree_skb_any(skb);
630                         return 0;
631                 } else
632                         dev->new_speed = speed;
633         }
634
635         /* Init tx buffer*/
636         dev->tx_buff.data = dev->tx_buff.head;
637
638         /* Check problems */
639         if(spin_is_locked(&dev->tx_lock)) {
640                 IRDA_DEBUG(3, "%s(), write not completed\n", __FUNCTION__);
641         }
642
643         /* serialize with write completion */
644         spin_lock_irqsave(&dev->tx_lock, flags);
645
646         /* Copy skb to tx_buff while wrapping, stuffing and making CRC */
647         dev->tx_buff.len = async_wrap_skb(skb, dev->tx_buff.data, dev->tx_buff.truesize); 
648
649         /* transmission will start now - disable receive.
650          * if we are just in the middle of an incoming frame,
651          * treat it as collision. probably it's a good idea to
652          * reset the rx_buf OUTSIDE_FRAME in this case too?
653          */
654         atomic_set(&dev->enable_rx, 0);
655         if (unlikely(sirdev_is_receiving(dev)))
656                 dev->stats.collisions++;
657
658         actual = dev->drv->do_write(dev, dev->tx_buff.data, dev->tx_buff.len);
659
660         if (likely(actual > 0)) {
661                 dev->tx_skb = skb;
662                 ndev->trans_start = jiffies;
663                 dev->tx_buff.data += actual;
664                 dev->tx_buff.len -= actual;
665         }
666         else if (unlikely(actual < 0)) {
667                 /* could be dropped later when we have tx_timeout to recover */
668                 IRDA_ERROR("%s: drv->do_write failed (%d)\n",
669                            __FUNCTION__, actual);
670                 dev_kfree_skb_any(skb);
671                 dev->stats.tx_errors++;               
672                 dev->stats.tx_dropped++;                      
673                 netif_wake_queue(ndev);
674         }
675         spin_unlock_irqrestore(&dev->tx_lock, flags);
676
677         return 0;
678 }
679
680 /* called from network layer with rtnl hold */
681
682 static int sirdev_ioctl(struct net_device *ndev, struct ifreq *rq, int cmd)
683 {
684         struct if_irda_req *irq = (struct if_irda_req *) rq;
685         struct sir_dev *dev = ndev->priv;
686         int ret = 0;
687
688         IRDA_ASSERT(dev != NULL, return -1;);
689
690         IRDA_DEBUG(3, "%s(), %s, (cmd=0x%X)\n", __FUNCTION__, ndev->name, cmd);
691         
692         switch (cmd) {
693         case SIOCSBANDWIDTH: /* Set bandwidth */
694                 if (!capable(CAP_NET_ADMIN))
695                         ret = -EPERM;
696                 else
697                         ret = sirdev_schedule_speed(dev, irq->ifr_baudrate);
698                 /* cannot sleep here for completion
699                  * we are called from network layer with rtnl hold
700                  */
701                 break;
702
703         case SIOCSDONGLE: /* Set dongle */
704                 if (!capable(CAP_NET_ADMIN))
705                         ret = -EPERM;
706                 else
707                         ret = sirdev_schedule_dongle_open(dev, irq->ifr_dongle);
708                 /* cannot sleep here for completion
709                  * we are called from network layer with rtnl hold
710                  */
711                 break;
712
713         case SIOCSMEDIABUSY: /* Set media busy */
714                 if (!capable(CAP_NET_ADMIN))
715                         ret = -EPERM;
716                 else
717                         irda_device_set_media_busy(dev->netdev, TRUE);
718                 break;
719
720         case SIOCGRECEIVING: /* Check if we are receiving right now */
721                 irq->ifr_receiving = sirdev_is_receiving(dev);
722                 break;
723
724         case SIOCSDTRRTS:
725                 if (!capable(CAP_NET_ADMIN))
726                         ret = -EPERM;
727                 else
728                         ret = sirdev_schedule_dtr_rts(dev, irq->ifr_dtr, irq->ifr_rts);
729                 /* cannot sleep here for completion
730                  * we are called from network layer with rtnl hold
731                  */
732                 break;
733
734         case SIOCSMODE:
735 #if 0
736                 if (!capable(CAP_NET_ADMIN))
737                         ret = -EPERM;
738                 else
739                         ret = sirdev_schedule_mode(dev, irq->ifr_mode);
740                 /* cannot sleep here for completion
741                  * we are called from network layer with rtnl hold
742                  */
743                 break;
744 #endif
745         default:
746                 ret = -EOPNOTSUPP;
747         }
748         
749         return ret;
750 }
751
752 /* ----------------------------------------------------------------------------- */
753
754 #define SIRBUF_ALLOCSIZE 4269   /* worst case size of a wrapped IrLAP frame */
755
756 static int sirdev_alloc_buffers(struct sir_dev *dev)
757 {
758         dev->tx_buff.truesize = SIRBUF_ALLOCSIZE;
759         dev->rx_buff.truesize = IRDA_SKB_MAX_MTU; 
760
761         /* Bootstrap ZeroCopy Rx */
762         dev->rx_buff.skb = __dev_alloc_skb(dev->rx_buff.truesize, GFP_KERNEL);
763         if (dev->rx_buff.skb == NULL)
764                 return -ENOMEM;
765         skb_reserve(dev->rx_buff.skb, 1);
766         dev->rx_buff.head = dev->rx_buff.skb->data;
767
768         dev->tx_buff.head = kmalloc(dev->tx_buff.truesize, GFP_KERNEL);
769         if (dev->tx_buff.head == NULL) {
770                 kfree_skb(dev->rx_buff.skb);
771                 dev->rx_buff.skb = NULL;
772                 dev->rx_buff.head = NULL;
773                 return -ENOMEM;
774         }
775
776         dev->tx_buff.data = dev->tx_buff.head;
777         dev->rx_buff.data = dev->rx_buff.head;
778         dev->tx_buff.len = 0;
779         dev->rx_buff.len = 0;
780
781         dev->rx_buff.in_frame = FALSE;
782         dev->rx_buff.state = OUTSIDE_FRAME;
783         return 0;
784 };
785
786 static void sirdev_free_buffers(struct sir_dev *dev)
787 {
788         if (dev->rx_buff.skb)
789                 kfree_skb(dev->rx_buff.skb);
790         kfree(dev->tx_buff.head);
791         dev->rx_buff.head = dev->tx_buff.head = NULL;
792         dev->rx_buff.skb = NULL;
793 }
794
795 static int sirdev_open(struct net_device *ndev)
796 {
797         struct sir_dev *dev = ndev->priv;
798         const struct sir_driver *drv = dev->drv;
799
800         if (!drv)
801                 return -ENODEV;
802
803         /* increase the reference count of the driver module before doing serious stuff */
804         if (!try_module_get(drv->owner))
805                 return -ESTALE;
806
807         IRDA_DEBUG(2, "%s()\n", __FUNCTION__);
808
809         if (sirdev_alloc_buffers(dev))
810                 goto errout_dec;
811
812         if (!dev->drv->start_dev  ||  dev->drv->start_dev(dev))
813                 goto errout_free;
814
815         sirdev_enable_rx(dev);
816         dev->raw_tx = 0;
817
818         netif_start_queue(ndev);
819         dev->irlap = irlap_open(ndev, &dev->qos, dev->hwname);
820         if (!dev->irlap)
821                 goto errout_stop;
822
823         netif_wake_queue(ndev);
824
825         IRDA_DEBUG(2, "%s - done, speed = %d\n", __FUNCTION__, dev->speed);
826
827         return 0;
828
829 errout_stop:
830         atomic_set(&dev->enable_rx, 0);
831         if (dev->drv->stop_dev)
832                 dev->drv->stop_dev(dev);
833 errout_free:
834         sirdev_free_buffers(dev);
835 errout_dec:
836         module_put(drv->owner);
837         return -EAGAIN;
838 }
839
840 static int sirdev_close(struct net_device *ndev)
841 {
842         struct sir_dev *dev = ndev->priv;
843         const struct sir_driver *drv;
844
845 //      IRDA_DEBUG(0, "%s\n", __FUNCTION__);
846
847         netif_stop_queue(ndev);
848
849         down(&dev->fsm.sem);            /* block on pending config completion */
850
851         atomic_set(&dev->enable_rx, 0);
852
853         if (unlikely(!dev->irlap))
854                 goto out;
855         irlap_close(dev->irlap);
856         dev->irlap = NULL;
857
858         drv = dev->drv;
859         if (unlikely(!drv  ||  !dev->priv))
860                 goto out;
861
862         if (drv->stop_dev)
863                 drv->stop_dev(dev);
864
865         sirdev_free_buffers(dev);
866         module_put(drv->owner);
867
868 out:
869         dev->speed = 0;
870         up(&dev->fsm.sem);
871         return 0;
872 }
873
874 /* ----------------------------------------------------------------------------- */
875
876 struct sir_dev * sirdev_get_instance(const struct sir_driver *drv, const char *name)
877 {
878         struct net_device *ndev;
879         struct sir_dev *dev;
880
881         IRDA_DEBUG(0, "%s - %s\n", __FUNCTION__, name);
882
883         /* instead of adding tests to protect against drv->do_write==NULL
884          * at several places we refuse to create a sir_dev instance for
885          * drivers which don't implement do_write.
886          */
887         if (!drv ||  !drv->do_write)
888                 return NULL;
889
890         /*
891          *  Allocate new instance of the device
892          */
893         ndev = alloc_irdadev(sizeof(*dev));
894         if (ndev == NULL) {
895                 IRDA_ERROR("%s - Can't allocate memory for IrDA control block!\n", __FUNCTION__);
896                 goto out;
897         }
898         dev = ndev->priv;
899
900         irda_init_max_qos_capabilies(&dev->qos);
901         dev->qos.baud_rate.bits = IR_9600|IR_19200|IR_38400|IR_57600|IR_115200;
902         dev->qos.min_turn_time.bits = drv->qos_mtt_bits;
903         irda_qos_bits_to_value(&dev->qos);
904
905         strncpy(dev->hwname, name, sizeof(dev->hwname)-1);
906
907         atomic_set(&dev->enable_rx, 0);
908         dev->tx_skb = NULL;
909
910         spin_lock_init(&dev->tx_lock);
911         init_MUTEX(&dev->fsm.sem);
912
913         dev->drv = drv;
914         dev->netdev = ndev;
915
916         SET_MODULE_OWNER(ndev);
917
918         /* Override the network functions we need to use */
919         ndev->hard_start_xmit = sirdev_hard_xmit;
920         ndev->open = sirdev_open;
921         ndev->stop = sirdev_close;
922         ndev->get_stats = sirdev_get_stats;
923         ndev->do_ioctl = sirdev_ioctl;
924
925         if (register_netdev(ndev)) {
926                 IRDA_ERROR("%s(), register_netdev() failed!\n", __FUNCTION__);
927                 goto out_freenetdev;
928         }
929
930         return dev;
931
932 out_freenetdev:
933         free_netdev(ndev);
934 out:
935         return NULL;
936 }
937 EXPORT_SYMBOL(sirdev_get_instance);
938
939 int sirdev_put_instance(struct sir_dev *dev)
940 {
941         int err = 0;
942
943         IRDA_DEBUG(0, "%s\n", __FUNCTION__);
944
945         atomic_set(&dev->enable_rx, 0);
946
947         netif_carrier_off(dev->netdev);
948         netif_device_detach(dev->netdev);
949
950         if (dev->dongle_drv)
951                 err = sirdev_schedule_dongle_close(dev);
952         if (err)
953                 IRDA_ERROR("%s - error %d\n", __FUNCTION__, err);
954
955         sirdev_close(dev->netdev);
956
957         down(&dev->fsm.sem);
958         dev->fsm.state = SIRDEV_STATE_DEAD;     /* mark staled */
959         dev->dongle_drv = NULL;
960         dev->priv = NULL;
961         up(&dev->fsm.sem);
962
963         /* Remove netdevice */
964         unregister_netdev(dev->netdev);
965
966         free_netdev(dev->netdev);
967
968         return 0;
969 }
970 EXPORT_SYMBOL(sirdev_put_instance);
971
972 static int __init sir_wq_init(void)
973 {
974         irda_sir_wq = create_singlethread_workqueue("irda_sir_wq");
975         if (!irda_sir_wq)
976                 return -ENOMEM;
977         return 0;
978 }
979
980 static void __exit sir_wq_exit(void)
981 {
982         destroy_workqueue(irda_sir_wq);
983 }
984
985 module_init(sir_wq_init);
986 module_exit(sir_wq_exit);
987
988 MODULE_AUTHOR("Martin Diehl <info@mdiehl.de>");
989 MODULE_DESCRIPTION("IrDA SIR core");
990 MODULE_LICENSE("GPL");