1 /* This is the serial hardware link layer (HLL) for the Gigaset 307x isdn
2 * DECT base (aka Sinus 45 isdn) using the RS232 DECT data module M101,
3 * written as a line discipline.
5 * =====================================================================
6 * This program is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU General Public License as
8 * published by the Free Software Foundation; either version 2 of
9 * the License, or (at your option) any later version.
10 * =====================================================================
15 #include <linux/module.h>
16 #include <linux/moduleparam.h>
17 #include <linux/platform_device.h>
18 #include <linux/tty.h>
19 #include <linux/poll.h>
20 #include <linux/completion.h>
22 /* Version Information */
23 #define DRIVER_AUTHOR "Tilman Schmidt"
24 #define DRIVER_DESC "Serial Driver for Gigaset 307x using Siemens M101"
26 #define GIGASET_MINORS 1
27 #define GIGASET_MINOR 0
28 #define GIGASET_MODULENAME "ser_gigaset"
29 #define GIGASET_DEVNAME "ttyGS"
31 /* length limit according to Siemens 3070usb-protokoll.doc ch. 2.1 */
32 #define IF_WRITEBUF 264
34 MODULE_AUTHOR(DRIVER_AUTHOR
);
35 MODULE_DESCRIPTION(DRIVER_DESC
);
36 MODULE_LICENSE("GPL");
37 MODULE_ALIAS_LDISC(N_GIGASET_M101
);
39 static int startmode
= SM_ISDN
;
40 module_param(startmode
, int, S_IRUGO
);
41 MODULE_PARM_DESC(startmode
, "initial operation mode");
42 static int cidmode
= 1;
43 module_param(cidmode
, int, S_IRUGO
);
44 MODULE_PARM_DESC(cidmode
, "stay in CID mode when idle");
46 static struct gigaset_driver
*driver
;
48 struct ser_cardstate
{
49 struct platform_device dev
;
50 struct tty_struct
*tty
;
52 struct completion dead_cmp
;
55 static struct platform_driver device_driver
= {
57 .name
= GIGASET_MODULENAME
,
61 static void flush_send_queue(struct cardstate
*);
63 /* transmit data from current open skb
64 * result: number of bytes sent or error code < 0
66 static int write_modem(struct cardstate
*cs
)
68 struct tty_struct
*tty
= cs
->hw
.ser
->tty
;
69 struct bc_state
*bcs
= &cs
->bcs
[0]; /* only one channel */
70 struct sk_buff
*skb
= bcs
->tx_skb
;
73 if (!tty
|| !tty
->driver
|| !skb
)
77 dev_kfree_skb_any(skb
);
82 set_bit(TTY_DO_WRITE_WAKEUP
, &tty
->flags
);
83 sent
= tty
->driver
->write(tty
, skb
->data
, skb
->len
);
84 gig_dbg(DEBUG_OUTPUT
, "write_modem: sent %d", sent
);
92 /* skb sent completely */
93 gigaset_skb_sent(bcs
, skb
);
95 gig_dbg(DEBUG_INTR
, "kfree skb (Adr: %lx)!",
97 dev_kfree_skb_any(skb
);
104 * transmit first queued command buffer
105 * result: number of bytes sent or error code < 0
107 static int send_cb(struct cardstate
*cs
)
109 struct tty_struct
*tty
= cs
->hw
.ser
->tty
;
110 struct cmdbuf_t
*cb
, *tcb
;
114 if (!tty
|| !tty
->driver
)
119 return 0; /* nothing to do */
122 set_bit(TTY_DO_WRITE_WAKEUP
, &tty
->flags
);
123 sent
= tty
->driver
->write(tty
, cb
->buf
+ cb
->offset
, cb
->len
);
126 gig_dbg(DEBUG_OUTPUT
, "send_cb: write error %d", sent
);
127 flush_send_queue(cs
);
132 gig_dbg(DEBUG_OUTPUT
, "send_cb: sent %d, left %u, queued %u",
133 sent
, cb
->len
, cs
->cmdbytes
);
136 while (cb
&& !cb
->len
) {
137 spin_lock_irqsave(&cs
->cmdlock
, flags
);
138 cs
->cmdbytes
-= cs
->curlen
;
140 cs
->cmdbuf
= cb
= cb
->next
;
143 cs
->curlen
= cb
->len
;
145 cs
->lastcmdbuf
= NULL
;
148 spin_unlock_irqrestore(&cs
->cmdlock
, flags
);
150 if (tcb
->wake_tasklet
)
151 tasklet_schedule(tcb
->wake_tasklet
);
159 * If there is already a skb opened, put data to the transfer buffer
160 * by calling "write_modem".
161 * Otherwise take a new skb out of the queue.
163 static void gigaset_modem_fill(unsigned long data
)
165 struct cardstate
*cs
= (struct cardstate
*) data
;
166 struct bc_state
*bcs
;
169 if (!cs
|| !(bcs
= cs
->bcs
)) {
170 gig_dbg(DEBUG_OUTPUT
, "%s: no cardstate", __func__
);
174 /* no skb is being sent; send command if any */
176 gig_dbg(DEBUG_OUTPUT
, "%s: send_cb -> %d", __func__
, sent
);
178 /* something sent or error */
181 /* no command to send; get skb */
182 if (!(bcs
->tx_skb
= skb_dequeue(&bcs
->squeue
)))
183 /* no skb either, nothing to do */
186 gig_dbg(DEBUG_INTR
, "Dequeued skb (Adr: %lx)",
187 (unsigned long) bcs
->tx_skb
);
191 gig_dbg(DEBUG_OUTPUT
, "%s: tx_skb", __func__
);
192 if (write_modem(cs
) < 0)
193 gig_dbg(DEBUG_OUTPUT
, "%s: write_modem failed", __func__
);
197 * throw away all data queued for sending
199 static void flush_send_queue(struct cardstate
*cs
)
206 spin_lock_irqsave(&cs
->cmdlock
, flags
);
207 while ((cb
= cs
->cmdbuf
) != NULL
) {
208 cs
->cmdbuf
= cb
->next
;
209 if (cb
->wake_tasklet
)
210 tasklet_schedule(cb
->wake_tasklet
);
213 cs
->cmdbuf
= cs
->lastcmdbuf
= NULL
;
214 cs
->cmdbytes
= cs
->curlen
= 0;
215 spin_unlock_irqrestore(&cs
->cmdlock
, flags
);
219 dev_kfree_skb_any(cs
->bcs
->tx_skb
);
220 while ((skb
= skb_dequeue(&cs
->bcs
->squeue
)) != NULL
)
221 dev_kfree_skb_any(skb
);
225 /* Gigaset Driver Interface */
226 /* ======================== */
229 * queue an AT command string for transmission to the Gigaset device
231 * cs controller state structure
232 * buf buffer containing the string to send
233 * len number of characters to send
234 * wake_tasklet tasklet to run when transmission is complete, or NULL
236 * number of bytes queued, or error code < 0
238 static int gigaset_write_cmd(struct cardstate
*cs
, const unsigned char *buf
,
239 int len
, struct tasklet_struct
*wake_tasklet
)
244 gigaset_dbg_buffer(cs
->mstate
!= MS_LOCKED
?
245 DEBUG_TRANSCMD
: DEBUG_LOCKCMD
,
246 "CMD Transmit", len
, buf
);
251 if (!(cb
= kmalloc(sizeof(struct cmdbuf_t
) + len
, GFP_ATOMIC
))) {
252 dev_err(cs
->dev
, "%s: out of memory!\n", __func__
);
256 memcpy(cb
->buf
, buf
, len
);
260 cb
->wake_tasklet
= wake_tasklet
;
262 spin_lock_irqsave(&cs
->cmdlock
, flags
);
263 cb
->prev
= cs
->lastcmdbuf
;
265 cs
->lastcmdbuf
->next
= cb
;
272 spin_unlock_irqrestore(&cs
->cmdlock
, flags
);
274 spin_lock_irqsave(&cs
->lock
, flags
);
276 tasklet_schedule(&cs
->write_tasklet
);
277 spin_unlock_irqrestore(&cs
->lock
, flags
);
282 * tty_driver.write_room interface routine
283 * return number of characters the driver will accept to be written
285 * controller state structure
287 * number of characters
289 static int gigaset_write_room(struct cardstate
*cs
)
293 bytes
= cs
->cmdbytes
;
294 return bytes
< IF_WRITEBUF
? IF_WRITEBUF
- bytes
: 0;
298 * tty_driver.chars_in_buffer interface routine
299 * return number of characters waiting to be sent
301 * controller state structure
303 * number of characters
305 static int gigaset_chars_in_buffer(struct cardstate
*cs
)
311 * implementation of ioctl(GIGASET_BRKCHARS)
313 * controller state structure
315 * -EINVAL (unimplemented function)
317 static int gigaset_brkchars(struct cardstate
*cs
, const unsigned char buf
[6])
319 /* not implemented */
325 * Called by "do_action" in ev-layer.c
327 static int gigaset_init_bchannel(struct bc_state
*bcs
)
329 /* nothing to do for M10x */
330 gigaset_bchannel_up(bcs
);
336 * Called by "do_action" in ev-layer.c
338 static int gigaset_close_bchannel(struct bc_state
*bcs
)
340 /* nothing to do for M10x */
341 gigaset_bchannel_down(bcs
);
346 * Set up B channel structure
347 * This is called by "gigaset_initcs" in common.c
349 static int gigaset_initbcshw(struct bc_state
*bcs
)
357 * Free B channel structure
358 * Called by "gigaset_freebcs" in common.c
360 static int gigaset_freebcshw(struct bc_state
*bcs
)
367 * Reinitialize B channel structure
368 * This is called by "bcs_reinit" in common.c
370 static void gigaset_reinitbcshw(struct bc_state
*bcs
)
372 /* nothing to do for M10x */
376 * Free hardware specific device data
377 * This will be called by "gigaset_freecs" in common.c
379 static void gigaset_freecshw(struct cardstate
*cs
)
381 tasklet_kill(&cs
->write_tasklet
);
384 dev_set_drvdata(&cs
->hw
.ser
->dev
.dev
, NULL
);
385 platform_device_unregister(&cs
->hw
.ser
->dev
);
390 static void gigaset_device_release(struct device
*dev
)
392 struct platform_device
*pdev
=
393 container_of(dev
, struct platform_device
, dev
);
395 /* adapted from platform_device_release() in drivers/base/platform.c */
396 //FIXME is this actually necessary?
397 kfree(dev
->platform_data
);
398 kfree(pdev
->resource
);
402 * Set up hardware specific device data
403 * This is called by "gigaset_initcs" in common.c
405 static int gigaset_initcshw(struct cardstate
*cs
)
409 if (!(cs
->hw
.ser
= kzalloc(sizeof(struct ser_cardstate
), GFP_KERNEL
))) {
410 err("%s: out of memory!", __func__
);
414 cs
->hw
.ser
->dev
.name
= GIGASET_MODULENAME
;
415 cs
->hw
.ser
->dev
.id
= cs
->minor_index
;
416 cs
->hw
.ser
->dev
.dev
.release
= gigaset_device_release
;
417 if ((rc
= platform_device_register(&cs
->hw
.ser
->dev
)) != 0) {
418 err("error %d registering platform device", rc
);
423 dev_set_drvdata(&cs
->hw
.ser
->dev
.dev
, cs
);
425 tasklet_init(&cs
->write_tasklet
,
426 &gigaset_modem_fill
, (unsigned long) cs
);
431 * set modem control lines
433 * card state structure
434 * modem control line state ([TIOCM_DTR]|[TIOCM_RTS])
435 * Called by "gigaset_start" and "gigaset_enterconfigmode" in common.c
436 * and by "if_lock" and "if_termios" in interface.c
438 static int gigaset_set_modem_ctrl(struct cardstate
*cs
, unsigned old_state
, unsigned new_state
)
440 struct tty_struct
*tty
= cs
->hw
.ser
->tty
;
441 unsigned int set
, clear
;
443 if (!tty
|| !tty
->driver
|| !tty
->driver
->tiocmset
)
445 set
= new_state
& ~old_state
;
446 clear
= old_state
& ~new_state
;
449 gig_dbg(DEBUG_IF
, "tiocmset set %x clear %x", set
, clear
);
450 return tty
->driver
->tiocmset(tty
, NULL
, set
, clear
);
453 static int gigaset_baud_rate(struct cardstate
*cs
, unsigned cflag
)
458 static int gigaset_set_line_ctrl(struct cardstate
*cs
, unsigned cflag
)
463 static const struct gigaset_ops ops
= {
466 gigaset_chars_in_buffer
,
468 gigaset_init_bchannel
,
469 gigaset_close_bchannel
,
475 gigaset_set_modem_ctrl
,
477 gigaset_set_line_ctrl
,
478 gigaset_m10x_send_skb
, /* asyncdata.c */
479 gigaset_m10x_input
, /* asyncdata.c */
483 /* Line Discipline Interface */
484 /* ========================= */
486 /* helper functions for cardstate refcounting */
487 static struct cardstate
*cs_get(struct tty_struct
*tty
)
489 struct cardstate
*cs
= tty
->disc_data
;
491 if (!cs
|| !cs
->hw
.ser
) {
492 gig_dbg(DEBUG_ANY
, "%s: no cardstate", __func__
);
495 atomic_inc(&cs
->hw
.ser
->refcnt
);
499 static void cs_put(struct cardstate
*cs
)
501 if (atomic_dec_and_test(&cs
->hw
.ser
->refcnt
))
502 complete(&cs
->hw
.ser
->dead_cmp
);
506 * Called by the tty driver when the line discipline is pushed onto the tty.
507 * Called in process context.
510 gigaset_tty_open(struct tty_struct
*tty
)
512 struct cardstate
*cs
;
514 gig_dbg(DEBUG_INIT
, "Starting HLL for Gigaset M101");
520 err("%s: no driver structure", __func__
);
524 /* allocate memory for our device state and intialize it */
525 if (!(cs
= gigaset_initcs(driver
, 1, 1, 0, cidmode
,
526 GIGASET_MODULENAME
)))
529 cs
->dev
= &cs
->hw
.ser
->dev
.dev
;
530 cs
->hw
.ser
->tty
= tty
;
531 atomic_set(&cs
->hw
.ser
->refcnt
, 1);
532 init_completion(&cs
->hw
.ser
->dead_cmp
);
536 /* OK.. Initialization of the datastructures and the HW is done.. Now
537 * startup system and notify the LL that we are ready to run
539 if (startmode
== SM_LOCKED
)
540 cs
->mstate
= MS_LOCKED
;
541 if (!gigaset_start(cs
)) {
542 tasklet_kill(&cs
->write_tasklet
);
546 gig_dbg(DEBUG_INIT
, "Startup of HLL done");
550 gig_dbg(DEBUG_INIT
, "Startup of HLL failed");
551 tty
->disc_data
= NULL
;
557 * Called by the tty driver when the line discipline is removed.
558 * Called from process context.
561 gigaset_tty_close(struct tty_struct
*tty
)
563 struct cardstate
*cs
= tty
->disc_data
;
565 gig_dbg(DEBUG_INIT
, "Stopping HLL for Gigaset M101");
568 gig_dbg(DEBUG_INIT
, "%s: no cardstate", __func__
);
572 /* prevent other callers from entering ldisc methods */
573 tty
->disc_data
= NULL
;
576 err("%s: no hw cardstate", __func__
);
578 /* wait for running methods to finish */
579 if (!atomic_dec_and_test(&cs
->hw
.ser
->refcnt
))
580 wait_for_completion(&cs
->hw
.ser
->dead_cmp
);
583 /* stop operations */
585 tasklet_kill(&cs
->write_tasklet
);
586 flush_send_queue(cs
);
590 gig_dbg(DEBUG_INIT
, "Shutdown of HLL done");
594 * Called by the tty driver when the tty line is hung up.
595 * Wait for I/O to driver to complete and unregister ISDN device.
596 * This is already done by the close routine, so just call that.
597 * Called from process context.
599 static int gigaset_tty_hangup(struct tty_struct
*tty
)
601 gigaset_tty_close(tty
);
607 * Unused, received data goes only to the Gigaset driver.
610 gigaset_tty_read(struct tty_struct
*tty
, struct file
*file
,
611 unsigned char __user
*buf
, size_t count
)
618 * Unused, transmit data comes only from the Gigaset driver.
621 gigaset_tty_write(struct tty_struct
*tty
, struct file
*file
,
622 const unsigned char *buf
, size_t count
)
629 * Called in process context only.
630 * May be re-entered by multiple ioctl calling threads.
633 gigaset_tty_ioctl(struct tty_struct
*tty
, struct file
*file
,
634 unsigned int cmd
, unsigned long arg
)
636 struct cardstate
*cs
= cs_get(tty
);
638 int __user
*p
= (int __user
*)arg
;
646 /* pass through to underlying serial device */
647 rc
= n_tty_ioctl(tty
, file
, cmd
, arg
);
651 /* flush our buffers and the serial port's buffer */
654 /* no own input buffer to flush */
658 flush_send_queue(cs
);
661 /* flush the serial port's buffer */
662 rc
= n_tty_ioctl(tty
, file
, cmd
, arg
);
666 /* unused, always return zero */
668 rc
= put_user(val
, p
);
681 * Unused, always return zero.
684 gigaset_tty_poll(struct tty_struct
*tty
, struct file
*file
, poll_table
*wait
)
690 * Called by the tty driver when a block of data has been received.
691 * Will not be re-entered while running but other ldisc functions
692 * may be called in parallel.
693 * Can be called from hard interrupt level as well as soft interrupt
697 * buf buffer containing received characters
698 * cflags buffer containing error flags for received characters (ignored)
699 * count number of received characters
702 gigaset_tty_receive(struct tty_struct
*tty
, const unsigned char *buf
,
703 char *cflags
, int count
)
705 struct cardstate
*cs
= cs_get(tty
);
706 unsigned tail
, head
, n
;
707 struct inbuf_t
*inbuf
;
711 if (!(inbuf
= cs
->inbuf
)) {
712 dev_err(cs
->dev
, "%s: no inbuf\n", __func__
);
719 gig_dbg(DEBUG_INTR
, "buffer state: %u -> %u, receive %u bytes",
723 /* possible buffer wraparound */
724 n
= min_t(unsigned, count
, RBUFSIZE
- tail
);
725 memcpy(inbuf
->data
+ tail
, buf
, n
);
726 tail
= (tail
+ n
) % RBUFSIZE
;
732 /* tail < head and some data left */
736 "inbuf overflow, discarding %d bytes\n",
740 memcpy(inbuf
->data
+ tail
, buf
, count
);
744 gig_dbg(DEBUG_INTR
, "setting tail to %u", tail
);
747 /* Everything was received .. Push data into handler */
748 gig_dbg(DEBUG_INTR
, "%s-->BH", __func__
);
749 gigaset_schedule_event(cs
);
754 * Called by the tty driver when there's room for more data to send.
757 gigaset_tty_wakeup(struct tty_struct
*tty
)
759 struct cardstate
*cs
= cs_get(tty
);
761 clear_bit(TTY_DO_WRITE_WAKEUP
, &tty
->flags
);
764 tasklet_schedule(&cs
->write_tasklet
);
768 static struct tty_ldisc gigaset_ldisc
= {
769 .owner
= THIS_MODULE
,
770 .magic
= TTY_LDISC_MAGIC
,
771 .name
= "ser_gigaset",
772 .open
= gigaset_tty_open
,
773 .close
= gigaset_tty_close
,
774 .hangup
= gigaset_tty_hangup
,
775 .read
= gigaset_tty_read
,
776 .write
= gigaset_tty_write
,
777 .ioctl
= gigaset_tty_ioctl
,
778 .poll
= gigaset_tty_poll
,
779 .receive_buf
= gigaset_tty_receive
,
780 .write_wakeup
= gigaset_tty_wakeup
,
784 /* Initialization / Shutdown */
785 /* ========================= */
787 static int __init
ser_gigaset_init(void)
791 gig_dbg(DEBUG_INIT
, "%s", __func__
);
792 if ((rc
= platform_driver_register(&device_driver
)) != 0) {
793 err("error %d registering platform driver", rc
);
797 /* allocate memory for our driver state and intialize it */
798 if (!(driver
= gigaset_initdriver(GIGASET_MINOR
, GIGASET_MINORS
,
799 GIGASET_MODULENAME
, GIGASET_DEVNAME
,
803 if ((rc
= tty_register_ldisc(N_GIGASET_M101
, &gigaset_ldisc
)) != 0) {
804 err("error %d registering line discipline", rc
);
812 gigaset_freedriver(driver
);
815 platform_driver_unregister(&device_driver
);
819 static void __exit
ser_gigaset_exit(void)
823 gig_dbg(DEBUG_INIT
, "%s", __func__
);
826 gigaset_freedriver(driver
);
830 if ((rc
= tty_unregister_ldisc(N_GIGASET_M101
)) != 0)
831 err("error %d unregistering line discipline", rc
);
833 platform_driver_unregister(&device_driver
);
836 module_init(ser_gigaset_init
);
837 module_exit(ser_gigaset_exit
);