1 /*********************************************************************
5 * Description: Half duplex serial port SIR driver for IrDA.
6 * Status: Experimental.
7 * Author: Dag Brattli <dagb@cs.uit.no>
8 * Created at: Sun Aug 3 13:49:59 1997
9 * Modified at: Fri Jan 28 20:22:38 2000
10 * Modified by: Dag Brattli <dagb@cs.uit.no>
11 * Sources: serial.c by Linus Torvalds
13 * Copyright (c) 1997, 1998, 1999-2000 Dag Brattli, All Rights Reserved.
14 * Copyright (c) 2000-2003 Jean Tourrilhes, All Rights Reserved.
16 * This program is free software; you can redistribute it and/or
17 * modify it under the terms of the GNU General Public License as
18 * published by the Free Software Foundation; either version 2 of
19 * the License, or (at your option) any later version.
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.
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., 59 Temple Place, Suite 330, Boston,
31 * This driver is ment to be a small half duplex serial driver to be
32 * used for IR-chipsets that has a UART (16550) compatibility mode.
33 * Eventually it will replace irtty, because of irtty has some
34 * problems that is hard to get around when we don't have control
35 * over the serial driver. This driver may also be used by FIR
36 * drivers to handle SIR mode for them.
38 ********************************************************************/
40 #include <linux/module.h>
42 #include <linux/kernel.h>
43 #include <linux/types.h>
44 #include <linux/ioport.h>
45 #include <linux/slab.h>
46 #include <linux/string.h>
47 #include <linux/skbuff.h>
48 #include <linux/serial_reg.h>
49 #include <linux/errno.h>
50 #include <linux/init.h>
51 #include <linux/spinlock.h>
52 #include <linux/delay.h>
53 #include <linux/rtnetlink.h>
54 #include <linux/bitops.h>
56 #include <asm/system.h>
59 #include <net/irda/irda.h>
60 #include <net/irda/wrapper.h>
66 * Currently you'll need to set these values using insmod like this:
67 * insmod irport io=0x3e8 irq=11
69 static unsigned int io
[] = { ~0, ~0, ~0, ~0 };
70 static unsigned int irq
[] = { 0, 0, 0, 0 };
72 static unsigned int qos_mtt_bits
= 0x03;
74 static struct irport_cb
*dev_self
[] = { NULL
, NULL
, NULL
, NULL
};
75 static char *driver_name
= "irport";
77 static inline void irport_write_wakeup(struct irport_cb
*self
);
78 static inline int irport_write(int iobase
, int fifo_size
, __u8
*buf
, int len
);
79 static inline void irport_receive(struct irport_cb
*self
);
81 static int irport_net_ioctl(struct net_device
*dev
, struct ifreq
*rq
,
83 static inline int irport_is_receiving(struct irport_cb
*self
);
84 static int irport_set_dtr_rts(struct net_device
*dev
, int dtr
, int rts
);
85 static int irport_raw_write(struct net_device
*dev
, __u8
*buf
, int len
);
86 static struct net_device_stats
*irport_net_get_stats(struct net_device
*dev
);
87 static int irport_change_speed_complete(struct irda_task
*task
);
88 static void irport_timeout(struct net_device
*dev
);
90 static irqreturn_t
irport_interrupt(int irq
, void *dev_id
,
91 struct pt_regs
*regs
);
92 static int irport_hard_xmit(struct sk_buff
*skb
, struct net_device
*dev
);
93 static void irport_change_speed(void *priv
, __u32 speed
);
94 static int irport_net_open(struct net_device
*dev
);
95 static int irport_net_close(struct net_device
*dev
);
97 static struct irport_cb
*
98 irport_open(int i
, unsigned int iobase
, unsigned int irq
)
100 struct net_device
*dev
;
101 struct irport_cb
*self
;
103 IRDA_DEBUG(1, "%s()\n", __FUNCTION__
);
105 /* Lock the port that we need */
106 if (!request_region(iobase
, IO_EXTENT
, driver_name
)) {
107 IRDA_DEBUG(0, "%s(), can't get iobase of 0x%03x\n",
108 __FUNCTION__
, iobase
);
113 * Allocate new instance of the driver
115 dev
= alloc_irdadev(sizeof(struct irport_cb
));
117 IRDA_ERROR("%s(), can't allocate memory for "
118 "irda device!\n", __FUNCTION__
);
123 spin_lock_init(&self
->lock
);
125 /* Need to store self somewhere */
131 self
->io
.sir_base
= iobase
;
132 self
->io
.sir_ext
= IO_EXTENT
;
134 self
->io
.fifo_size
= 16; /* 16550A and compatible */
136 /* Initialize QoS for this device */
137 irda_init_max_qos_capabilies(&self
->qos
);
139 self
->qos
.baud_rate
.bits
= IR_9600
|IR_19200
|IR_38400
|IR_57600
|
142 self
->qos
.min_turn_time
.bits
= qos_mtt_bits
;
143 irda_qos_bits_to_value(&self
->qos
);
145 /* Bootstrap ZeroCopy Rx */
146 self
->rx_buff
.truesize
= IRDA_SKB_MAX_MTU
;
147 self
->rx_buff
.skb
= __dev_alloc_skb(self
->rx_buff
.truesize
,
149 if (self
->rx_buff
.skb
== NULL
) {
150 IRDA_ERROR("%s(), can't allocate memory for "
151 "receive buffer!\n", __FUNCTION__
);
154 skb_reserve(self
->rx_buff
.skb
, 1);
155 self
->rx_buff
.head
= self
->rx_buff
.skb
->data
;
156 /* No need to memset the buffer, unless you are really pedantic */
158 /* Finish setup the Rx buffer descriptor */
159 self
->rx_buff
.in_frame
= FALSE
;
160 self
->rx_buff
.state
= OUTSIDE_FRAME
;
161 self
->rx_buff
.data
= self
->rx_buff
.head
;
163 /* Specify how much memory we want */
164 self
->tx_buff
.truesize
= 4000;
166 /* Allocate memory if needed */
167 if (self
->tx_buff
.truesize
> 0) {
168 self
->tx_buff
.head
= (__u8
*) kmalloc(self
->tx_buff
.truesize
,
170 if (self
->tx_buff
.head
== NULL
) {
171 IRDA_ERROR("%s(), can't allocate memory for "
172 "transmit buffer!\n", __FUNCTION__
);
175 memset(self
->tx_buff
.head
, 0, self
->tx_buff
.truesize
);
177 self
->tx_buff
.data
= self
->tx_buff
.head
;
180 /* Keep track of module usage */
181 SET_MODULE_OWNER(dev
);
183 /* May be overridden by piggyback drivers */
184 self
->interrupt
= irport_interrupt
;
185 self
->change_speed
= irport_change_speed
;
187 /* Override the network functions we need to use */
188 dev
->hard_start_xmit
= irport_hard_xmit
;
189 dev
->tx_timeout
= irport_timeout
;
190 dev
->watchdog_timeo
= HZ
; /* Allow time enough for speed change */
191 dev
->open
= irport_net_open
;
192 dev
->stop
= irport_net_close
;
193 dev
->get_stats
= irport_net_get_stats
;
194 dev
->do_ioctl
= irport_net_ioctl
;
196 /* Make ifconfig display some details */
197 dev
->base_addr
= iobase
;
200 if (register_netdev(dev
)) {
201 IRDA_ERROR("%s(), register_netdev() failed!\n", __FUNCTION__
);
204 IRDA_MESSAGE("IrDA: Registered device %s (irport io=0x%X irq=%d)\n",
205 dev
->name
, iobase
, irq
);
209 kfree(self
->tx_buff
.head
);
211 kfree_skb(self
->rx_buff
.skb
);
216 release_region(iobase
, IO_EXTENT
);
221 static int irport_close(struct irport_cb
*self
)
223 IRDA_ASSERT(self
!= NULL
, return -1;);
225 /* We are not using any dongle anymore! */
227 irda_device_dongle_cleanup(self
->dongle
);
230 /* Remove netdevice */
231 unregister_netdev(self
->netdev
);
233 /* Release the IO-port that this driver is using */
234 IRDA_DEBUG(0 , "%s(), Releasing Region %03x\n",
235 __FUNCTION__
, self
->io
.sir_base
);
236 release_region(self
->io
.sir_base
, self
->io
.sir_ext
);
238 kfree(self
->tx_buff
.head
);
240 if (self
->rx_buff
.skb
)
241 kfree_skb(self
->rx_buff
.skb
);
242 self
->rx_buff
.skb
= NULL
;
244 /* Remove ourselves */
245 dev_self
[self
->index
] = NULL
;
246 free_netdev(self
->netdev
);
251 static void irport_stop(struct irport_cb
*self
)
255 iobase
= self
->io
.sir_base
;
257 /* We can't lock, we may be called from a FIR driver - Jean II */
259 /* We are not transmitting any more */
260 self
->transmitting
= 0;
263 outb(0, iobase
+UART_MCR
);
265 /* Turn off interrupts */
266 outb(0, iobase
+UART_IER
);
269 static void irport_start(struct irport_cb
*self
)
273 iobase
= self
->io
.sir_base
;
277 /* We can't lock, we may be called from a FIR driver - Jean II */
279 /* Initialize UART */
280 outb(UART_LCR_WLEN8
, iobase
+UART_LCR
); /* Reset DLAB */
281 outb((UART_MCR_DTR
| UART_MCR_RTS
| UART_MCR_OUT2
), iobase
+UART_MCR
);
283 /* Turn on interrups */
284 outb(UART_IER_RLSI
| UART_IER_RDI
|UART_IER_THRI
, iobase
+UART_IER
);
288 * Function irport_probe (void)
293 int irport_probe(int iobase
)
295 IRDA_DEBUG(4, "%s(), iobase=%#x\n", __FUNCTION__
, iobase
);
301 * Function irport_get_fcr (speed)
303 * Compute value of fcr
306 static inline unsigned int irport_get_fcr(__u32 speed
)
308 unsigned int fcr
; /* FIFO control reg */
311 fcr
= UART_FCR_ENABLE_FIFO
;
314 * Use trigger level 1 to avoid 3 ms. timeout delay at 9600 bps, and
315 * almost 1,7 ms at 19200 bps. At speeds above that we can just forget
316 * about this timeout since it will always be fast enough.
319 fcr
|= UART_FCR_TRIGGER_1
;
321 //fcr |= UART_FCR_TRIGGER_14;
322 fcr
|= UART_FCR_TRIGGER_8
;
328 * Function irport_change_speed (self, speed)
330 * Set speed of IrDA port to specified baudrate
332 * This function should be called with irq off and spin-lock.
334 static void irport_change_speed(void *priv
, __u32 speed
)
336 struct irport_cb
*self
= (struct irport_cb
*) priv
;
338 unsigned int fcr
; /* FIFO control reg */
339 unsigned int lcr
; /* Line control reg */
342 IRDA_ASSERT(self
!= NULL
, return;);
343 IRDA_ASSERT(speed
!= 0, return;);
345 IRDA_DEBUG(1, "%s(), Setting speed to: %d - iobase=%#x\n",
346 __FUNCTION__
, speed
, self
->io
.sir_base
);
348 /* We can't lock, we may be called from a FIR driver - Jean II */
350 iobase
= self
->io
.sir_base
;
352 /* Update accounting for new speed */
353 self
->io
.speed
= speed
;
355 /* Turn off interrupts */
356 outb(0, iobase
+UART_IER
);
358 divisor
= SPEED_MAX
/speed
;
360 /* Get proper fifo configuration */
361 fcr
= irport_get_fcr(speed
);
363 /* IrDA ports use 8N1 */
364 lcr
= UART_LCR_WLEN8
;
366 outb(UART_LCR_DLAB
| lcr
, iobase
+UART_LCR
); /* Set DLAB */
367 outb(divisor
& 0xff, iobase
+UART_DLL
); /* Set speed */
368 outb(divisor
>> 8, iobase
+UART_DLM
);
369 outb(lcr
, iobase
+UART_LCR
); /* Set 8N1 */
370 outb(fcr
, iobase
+UART_FCR
); /* Enable FIFO's */
372 /* Turn on interrups */
373 /* This will generate a fatal interrupt storm.
374 * People calling us will do that properly - Jean II */
375 //outb(/*UART_IER_RLSI|*/UART_IER_RDI/*|UART_IER_THRI*/, iobase+UART_IER);
379 * Function __irport_change_speed (instance, state, param)
381 * State machine for changing speed of the device. We do it this way since
382 * we cannot use schedule_timeout() when we are in interrupt context
385 int __irport_change_speed(struct irda_task
*task
)
387 struct irport_cb
*self
;
388 __u32 speed
= (__u32
) task
->param
;
389 unsigned long flags
= 0;
393 IRDA_DEBUG(2, "%s(), <%ld>\n", __FUNCTION__
, jiffies
);
395 self
= (struct irport_cb
*) task
->instance
;
397 IRDA_ASSERT(self
!= NULL
, return -1;);
399 /* Locking notes : this function may be called from irq context with
400 * spinlock, via irport_write_wakeup(), or from non-interrupt without
401 * spinlock (from the task timer). Yuck !
402 * This is ugly, and unsafe is the spinlock is not already aquired.
403 * This will be fixed when irda-task get rewritten.
405 if (!spin_is_locked(&self
->lock
)) {
406 spin_lock_irqsave(&self
->lock
, flags
);
410 switch (task
->state
) {
413 /* Are we ready to change speed yet? */
414 if (self
->tx_buff
.len
> 0) {
415 task
->state
= IRDA_TASK_WAIT
;
417 /* Try again later */
418 ret
= msecs_to_jiffies(20);
423 irda_task_next_state(task
, IRDA_TASK_CHILD_INIT
);
425 irda_task_next_state(task
, IRDA_TASK_CHILD_DONE
);
427 case IRDA_TASK_CHILD_INIT
:
428 /* Go to default speed */
429 self
->change_speed(self
->priv
, 9600);
431 /* Change speed of dongle */
432 if (irda_task_execute(self
->dongle
,
433 self
->dongle
->issue
->change_speed
,
434 NULL
, task
, (void *) speed
))
436 /* Dongle need more time to change its speed */
437 irda_task_next_state(task
, IRDA_TASK_CHILD_WAIT
);
439 /* Give dongle 1 sec to finish */
440 ret
= msecs_to_jiffies(1000);
442 /* Child finished immediately */
443 irda_task_next_state(task
, IRDA_TASK_CHILD_DONE
);
445 case IRDA_TASK_CHILD_WAIT
:
446 IRDA_WARNING("%s(), changing speed of dongle timed out!\n", __FUNCTION__
);
449 case IRDA_TASK_CHILD_DONE
:
450 /* Finally we are ready to change the speed */
451 self
->change_speed(self
->priv
, speed
);
453 irda_task_next_state(task
, IRDA_TASK_DONE
);
456 IRDA_ERROR("%s(), unknown state %d\n",
457 __FUNCTION__
, task
->state
);
458 irda_task_next_state(task
, IRDA_TASK_DONE
);
462 /* Put stuff in the state we found them - Jean II */
464 spin_unlock_irqrestore(&self
->lock
, flags
);
471 * Function irport_change_speed_complete (task)
473 * Called when the change speed operation completes
476 static int irport_change_speed_complete(struct irda_task
*task
)
478 struct irport_cb
*self
;
480 IRDA_DEBUG(1, "%s()\n", __FUNCTION__
);
482 self
= (struct irport_cb
*) task
->instance
;
484 IRDA_ASSERT(self
!= NULL
, return -1;);
485 IRDA_ASSERT(self
->netdev
!= NULL
, return -1;);
487 /* Finished changing speed, so we are not busy any longer */
488 /* Signal network layer so it can try to send the frame */
490 netif_wake_queue(self
->netdev
);
496 * Function irport_timeout (struct net_device *dev)
498 * The networking layer thinks we timed out.
502 static void irport_timeout(struct net_device
*dev
)
504 struct irport_cb
*self
;
509 self
= (struct irport_cb
*) dev
->priv
;
510 IRDA_ASSERT(self
!= NULL
, return;);
511 iobase
= self
->io
.sir_base
;
513 IRDA_WARNING("%s: transmit timed out, jiffies = %ld, trans_start = %ld\n",
514 dev
->name
, jiffies
, dev
->trans_start
);
515 spin_lock_irqsave(&self
->lock
, flags
);
517 /* Debug what's happening... */
519 /* Get interrupt status */
520 lsr
= inb(iobase
+UART_LSR
);
521 /* Read interrupt register */
522 iir
= inb(iobase
+UART_IIR
);
523 IRDA_DEBUG(0, "%s(), iir=%02x, lsr=%02x, iobase=%#x\n",
524 __FUNCTION__
, iir
, lsr
, iobase
);
526 IRDA_DEBUG(0, "%s(), transmitting=%d, remain=%d, done=%d\n",
527 __FUNCTION__
, self
->transmitting
, self
->tx_buff
.len
,
528 self
->tx_buff
.data
- self
->tx_buff
.head
);
530 /* Now, restart the port */
532 self
->change_speed(self
->priv
, self
->io
.speed
);
533 /* This will re-enable irqs */
534 outb(/*UART_IER_RLSI|*/UART_IER_RDI
/*|UART_IER_THRI*/, iobase
+UART_IER
);
535 dev
->trans_start
= jiffies
;
536 spin_unlock_irqrestore(&self
->lock
, flags
);
538 netif_wake_queue(dev
);
542 * Function irport_wait_hw_transmitter_finish ()
544 * Wait for the real end of HW transmission
546 * The UART is a strict FIFO, and we get called only when we have finished
547 * pushing data to the FIFO, so the maximum amount of time we must wait
548 * is only for the FIFO to drain out.
550 * We use a simple calibrated loop. We may need to adjust the loop
551 * delay (udelay) to balance I/O traffic and latency. And we also need to
552 * adjust the maximum timeout.
553 * It would probably be better to wait for the proper interrupt,
554 * but it doesn't seem to be available.
556 * We can't use jiffies or kernel timers because :
557 * 1) We are called from the interrupt handler, which disable softirqs,
558 * so jiffies won't be increased
559 * 2) Jiffies granularity is usually very coarse (10ms), and we don't
560 * want to wait that long to detect stuck hardware.
564 static void irport_wait_hw_transmitter_finish(struct irport_cb
*self
)
567 int count
= 1000; /* 1 ms */
569 iobase
= self
->io
.sir_base
;
571 /* Calibrated busy loop */
572 while((count
-- > 0) && !(inb(iobase
+UART_LSR
) & UART_LSR_TEMT
))
576 IRDA_DEBUG(0, "%s(): stuck transmitter\n", __FUNCTION__
);
580 * Function irport_hard_start_xmit (struct sk_buff *skb, struct net_device *dev)
582 * Transmits the current frame until FIFO is full, then
583 * waits until the next transmitt interrupt, and continues until the
584 * frame is transmitted.
586 static int irport_hard_xmit(struct sk_buff
*skb
, struct net_device
*dev
)
588 struct irport_cb
*self
;
593 IRDA_DEBUG(1, "%s()\n", __FUNCTION__
);
595 IRDA_ASSERT(dev
!= NULL
, return 0;);
597 self
= (struct irport_cb
*) dev
->priv
;
598 IRDA_ASSERT(self
!= NULL
, return 0;);
600 iobase
= self
->io
.sir_base
;
602 netif_stop_queue(dev
);
604 /* Make sure tests & speed change are atomic */
605 spin_lock_irqsave(&self
->lock
, flags
);
607 /* Check if we need to change the speed */
608 speed
= irda_get_next_speed(skb
);
609 if ((speed
!= self
->io
.speed
) && (speed
!= -1)) {
610 /* Check for empty frame */
613 * We send frames one by one in SIR mode (no
614 * pipelining), so at this point, if we were sending
615 * a previous frame, we just received the interrupt
616 * telling us it is finished (UART_IIR_THRI).
617 * Therefore, waiting for the transmitter to really
618 * finish draining the fifo won't take too long.
619 * And the interrupt handler is not expected to run.
621 irport_wait_hw_transmitter_finish(self
);
622 /* Better go there already locked - Jean II */
623 irda_task_execute(self
, __irport_change_speed
,
624 irport_change_speed_complete
,
625 NULL
, (void *) speed
);
626 dev
->trans_start
= jiffies
;
627 spin_unlock_irqrestore(&self
->lock
, flags
);
631 self
->new_speed
= speed
;
635 self
->tx_buff
.data
= self
->tx_buff
.head
;
637 /* Copy skb to tx_buff while wrapping, stuffing and making CRC */
638 self
->tx_buff
.len
= async_wrap_skb(skb
, self
->tx_buff
.data
,
639 self
->tx_buff
.truesize
);
641 self
->stats
.tx_bytes
+= self
->tx_buff
.len
;
643 /* We are transmitting */
644 self
->transmitting
= 1;
646 /* Turn on transmit finished interrupt. Will fire immediately! */
647 outb(UART_IER_THRI
, iobase
+UART_IER
);
649 dev
->trans_start
= jiffies
;
650 spin_unlock_irqrestore(&self
->lock
, flags
);
658 * Function irport_write (driver)
660 * Fill Tx FIFO with transmit data
662 * Called only from irport_write_wakeup()
664 static inline int irport_write(int iobase
, int fifo_size
, __u8
*buf
, int len
)
668 /* Fill FIFO with current frame */
669 while ((actual
< fifo_size
) && (actual
< len
)) {
670 /* Transmit next byte */
671 outb(buf
[actual
], iobase
+UART_TX
);
680 * Function irport_write_wakeup (tty)
682 * Called by the driver when there's room for more data. If we have
683 * more packets to send, we send them here.
685 * Called only from irport_interrupt()
686 * Make sure this function is *not* called while we are receiving,
687 * otherwise we will reset fifo and loose data :-(
689 static inline void irport_write_wakeup(struct irport_cb
*self
)
695 IRDA_ASSERT(self
!= NULL
, return;);
697 IRDA_DEBUG(4, "%s()\n", __FUNCTION__
);
699 iobase
= self
->io
.sir_base
;
701 /* Finished with frame? */
702 if (self
->tx_buff
.len
> 0) {
703 /* Write data left in transmit buffer */
704 actual
= irport_write(iobase
, self
->io
.fifo_size
,
705 self
->tx_buff
.data
, self
->tx_buff
.len
);
706 self
->tx_buff
.data
+= actual
;
707 self
->tx_buff
.len
-= actual
;
710 * Now serial buffer is almost free & we can start
711 * transmission of another packet. But first we must check
712 * if we need to change the speed of the hardware
714 if (self
->new_speed
) {
715 irport_wait_hw_transmitter_finish(self
);
716 irda_task_execute(self
, __irport_change_speed
,
717 irport_change_speed_complete
,
718 NULL
, (void *) self
->new_speed
);
721 /* Tell network layer that we want more frames */
722 netif_wake_queue(self
->netdev
);
724 self
->stats
.tx_packets
++;
727 * Reset Rx FIFO to make sure that all reflected transmit data
728 * is discarded. This is needed for half duplex operation
730 fcr
= irport_get_fcr(self
->io
.speed
);
731 fcr
|= UART_FCR_CLEAR_RCVR
;
732 outb(fcr
, iobase
+UART_FCR
);
734 /* Finished transmitting */
735 self
->transmitting
= 0;
737 /* Turn on receive interrupts */
738 outb(UART_IER_RDI
, iobase
+UART_IER
);
740 IRDA_DEBUG(1, "%s() : finished Tx\n", __FUNCTION__
);
745 * Function irport_receive (self)
747 * Receive one frame from the infrared port
749 * Called only from irport_interrupt()
751 static inline void irport_receive(struct irport_cb
*self
)
756 IRDA_ASSERT(self
!= NULL
, return;);
758 iobase
= self
->io
.sir_base
;
761 * Receive all characters in Rx FIFO, unwrap and unstuff them.
762 * async_unwrap_char will deliver all found frames
765 async_unwrap_char(self
->netdev
, &self
->stats
, &self
->rx_buff
,
766 inb(iobase
+UART_RX
));
768 /* Make sure we don't stay here too long */
769 if (boguscount
++ > 32) {
770 IRDA_DEBUG(2,"%s(), breaking!\n", __FUNCTION__
);
773 } while (inb(iobase
+UART_LSR
) & UART_LSR_DR
);
777 * Function irport_interrupt (irq, dev_id, regs)
781 static irqreturn_t
irport_interrupt(int irq
, void *dev_id
,
782 struct pt_regs
*regs
)
784 struct net_device
*dev
= (struct net_device
*) dev_id
;
785 struct irport_cb
*self
;
792 IRDA_WARNING("%s() irq %d for unknown device.\n", __FUNCTION__
, irq
);
795 self
= (struct irport_cb
*) dev
->priv
;
797 spin_lock(&self
->lock
);
799 iobase
= self
->io
.sir_base
;
801 /* Cut'n'paste interrupt routine from serial.c
802 * This version try to minimise latency and I/O operations.
803 * Simplified and modified to enforce half duplex operation.
806 /* Check status even is iir reg is cleared, more robust and
807 * eliminate a read on the I/O bus - Jean II */
809 /* Get interrupt status ; Clear interrupt */
810 lsr
= inb(iobase
+UART_LSR
);
812 /* Are we receiving or transmitting ? */
813 if(!self
->transmitting
) {
814 /* Received something ? */
815 if (lsr
& UART_LSR_DR
)
816 irport_receive(self
);
818 /* Room in Tx fifo ? */
819 if (lsr
& (UART_LSR_THRE
| UART_LSR_TEMT
))
820 irport_write_wakeup(self
);
823 /* A bit hackish, but working as expected... Jean II */
824 if(lsr
& (UART_LSR_THRE
| UART_LSR_TEMT
| UART_LSR_DR
))
827 /* Make sure we don't stay here to long */
828 if (boguscount
++ > 10) {
829 IRDA_WARNING("%s() irq handler looping : lsr=%02x\n",
834 /* Read interrupt register */
835 iir
= inb(iobase
+UART_IIR
);
837 /* Enable this debug only when no other options and at low
838 * bit rates, otherwise it may cause Rx overruns (lsr=63).
840 IRDA_DEBUG(6, "%s(), iir=%02x, lsr=%02x, iobase=%#x\n",
841 __FUNCTION__
, iir
, lsr
, iobase
);
843 /* As long as interrupt pending... */
844 } while ((iir
& UART_IIR_NO_INT
) == 0);
846 spin_unlock(&self
->lock
);
847 return IRQ_RETVAL(handled
);
851 * Function irport_net_open (dev)
853 * Network device is taken up. Usually this is done by "ifconfig irda0 up"
856 static int irport_net_open(struct net_device
*dev
)
858 struct irport_cb
*self
;
863 IRDA_DEBUG(2, "%s()\n", __FUNCTION__
);
865 IRDA_ASSERT(dev
!= NULL
, return -1;);
866 self
= (struct irport_cb
*) dev
->priv
;
868 iobase
= self
->io
.sir_base
;
870 if (request_irq(self
->io
.irq
, self
->interrupt
, 0, dev
->name
,
872 IRDA_DEBUG(0, "%s(), unable to allocate irq=%d\n",
873 __FUNCTION__
, self
->io
.irq
);
877 spin_lock_irqsave(&self
->lock
, flags
);
880 /* Set 9600 bauds per default, including at the dongle */
881 irda_task_execute(self
, __irport_change_speed
,
882 irport_change_speed_complete
,
883 NULL
, (void *) 9600);
884 spin_unlock_irqrestore(&self
->lock
, flags
);
887 /* Give self a hardware name */
888 sprintf(hwname
, "SIR @ 0x%03x", self
->io
.sir_base
);
891 * Open new IrLAP layer instance, now that everything should be
892 * initialized properly
894 self
->irlap
= irlap_open(dev
, &self
->qos
, hwname
);
898 netif_start_queue(dev
);
904 * Function irport_net_close (self)
906 * Network device is taken down. Usually this is done by
907 * "ifconfig irda0 down"
909 static int irport_net_close(struct net_device
*dev
)
911 struct irport_cb
*self
;
915 IRDA_DEBUG(4, "%s()\n", __FUNCTION__
);
917 IRDA_ASSERT(dev
!= NULL
, return -1;);
918 self
= (struct irport_cb
*) dev
->priv
;
920 IRDA_ASSERT(self
!= NULL
, return -1;);
922 iobase
= self
->io
.sir_base
;
925 netif_stop_queue(dev
);
927 /* Stop and remove instance of IrLAP */
929 irlap_close(self
->irlap
);
932 spin_lock_irqsave(&self
->lock
, flags
);
934 spin_unlock_irqrestore(&self
->lock
, flags
);
936 free_irq(self
->io
.irq
, dev
);
942 * Function irport_is_receiving (self)
944 * Returns true is we are currently receiving data
947 static inline int irport_is_receiving(struct irport_cb
*self
)
949 return (self
->rx_buff
.state
!= OUTSIDE_FRAME
);
953 * Function irport_set_dtr_rts (tty, dtr, rts)
955 * This function can be used by dongles etc. to set or reset the status
956 * of the dtr and rts lines
958 static int irport_set_dtr_rts(struct net_device
*dev
, int dtr
, int rts
)
960 struct irport_cb
*self
= dev
->priv
;
963 IRDA_ASSERT(self
!= NULL
, return -1;);
965 iobase
= self
->io
.sir_base
;
972 outb(dtr
|rts
|UART_MCR_OUT2
, iobase
+UART_MCR
);
977 static int irport_raw_write(struct net_device
*dev
, __u8
*buf
, int len
)
979 struct irport_cb
*self
= (struct irport_cb
*) dev
->priv
;
983 IRDA_ASSERT(self
!= NULL
, return -1;);
985 iobase
= self
->io
.sir_base
;
987 /* Tx FIFO should be empty! */
988 if (!(inb(iobase
+UART_LSR
) & UART_LSR_THRE
)) {
989 IRDA_DEBUG( 0, "%s(), failed, fifo not empty!\n", __FUNCTION__
);
993 /* Fill FIFO with current frame */
994 while (actual
< len
) {
995 /* Transmit next byte */
996 outb(buf
[actual
], iobase
+UART_TX
);
1004 * Function irport_net_ioctl (dev, rq, cmd)
1006 * Process IOCTL commands for this device
1009 static int irport_net_ioctl(struct net_device
*dev
, struct ifreq
*rq
, int cmd
)
1011 struct if_irda_req
*irq
= (struct if_irda_req
*) rq
;
1012 struct irport_cb
*self
;
1014 unsigned long flags
;
1017 IRDA_ASSERT(dev
!= NULL
, return -1;);
1021 IRDA_ASSERT(self
!= NULL
, return -1;);
1023 IRDA_DEBUG(2, "%s(), %s, (cmd=0x%X)\n", __FUNCTION__
, dev
->name
, cmd
);
1026 case SIOCSBANDWIDTH
: /* Set bandwidth */
1027 if (!capable(CAP_NET_ADMIN
))
1030 irda_task_execute(self
, __irport_change_speed
, NULL
,
1031 NULL
, (void *) irq
->ifr_baudrate
);
1033 case SIOCSDONGLE
: /* Set dongle */
1034 if (!capable(CAP_NET_ADMIN
)) {
1040 * irda_device_dongle_init() can't be locked.
1041 * irda_task_execute() doesn't need to be locked.
1045 /* Initialize dongle */
1046 dongle
= irda_device_dongle_init(dev
, irq
->ifr_dongle
);
1050 dongle
->set_mode
= NULL
;
1051 dongle
->read
= NULL
;
1052 dongle
->write
= irport_raw_write
;
1053 dongle
->set_dtr_rts
= irport_set_dtr_rts
;
1055 /* Now initialize the dongle! */
1056 dongle
->issue
->open(dongle
, &self
->qos
);
1059 irda_task_execute(dongle
, dongle
->issue
->reset
, NULL
, NULL
,
1062 /* Make dongle available to driver only now to avoid
1063 * race conditions - Jean II */
1064 self
->dongle
= dongle
;
1066 case SIOCSMEDIABUSY
: /* Set media busy */
1067 if (!capable(CAP_NET_ADMIN
)) {
1072 irda_device_set_media_busy(self
->netdev
, TRUE
);
1074 case SIOCGRECEIVING
: /* Check if we are receiving right now */
1075 irq
->ifr_receiving
= irport_is_receiving(self
);
1078 if (!capable(CAP_NET_ADMIN
)) {
1083 /* No real need to lock... */
1084 spin_lock_irqsave(&self
->lock
, flags
);
1085 irport_set_dtr_rts(dev
, irq
->ifr_dtr
, irq
->ifr_rts
);
1086 spin_unlock_irqrestore(&self
->lock
, flags
);
1095 static struct net_device_stats
*irport_net_get_stats(struct net_device
*dev
)
1097 struct irport_cb
*self
= (struct irport_cb
*) dev
->priv
;
1099 return &self
->stats
;
1102 static int __init
irport_init(void)
1106 for (i
=0; (io
[i
] < 2000) && (i
< 4); i
++) {
1107 if (irport_open(i
, io
[i
], irq
[i
]) != NULL
)
1111 * Maybe something failed, but we can still be usable for FIR drivers
1117 * Function irport_cleanup ()
1119 * Close all configured ports
1122 static void __exit
irport_cleanup(void)
1126 IRDA_DEBUG( 4, "%s()\n", __FUNCTION__
);
1128 for (i
=0; i
< 4; i
++) {
1130 irport_close(dev_self
[i
]);
1134 MODULE_PARM(io
, "1-4i");
1135 MODULE_PARM_DESC(io
, "Base I/O addresses");
1136 MODULE_PARM(irq
, "1-4i");
1137 MODULE_PARM_DESC(irq
, "IRQ lines");
1139 MODULE_AUTHOR("Dag Brattli <dagb@cs.uit.no>");
1140 MODULE_DESCRIPTION("Half duplex serial driver for IrDA SIR mode");
1141 MODULE_LICENSE("GPL");
1143 module_init(irport_init
);
1144 module_exit(irport_cleanup
);