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);