ser_gigaset: convert mutex to completion
[linux-2.6/mini2440.git] / drivers / isdn / gigaset / ser-gigaset.c
blobfceeb1d57682849b3e438e63a265d4fd036efe78
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 * =====================================================================
13 #include "gigaset.h"
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;
51 atomic_t refcnt;
52 struct completion dead_cmp;
55 static struct platform_driver device_driver = {
56 .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;
71 int sent;
73 if (!tty || !tty->driver || !skb)
74 return -EFAULT;
76 if (!skb->len) {
77 dev_kfree_skb_any(skb);
78 bcs->tx_skb = NULL;
79 return -EINVAL;
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);
85 if (sent < 0) {
86 /* error */
87 flush_send_queue(cs);
88 return sent;
90 skb_pull(skb, sent);
91 if (!skb->len) {
92 /* skb sent completely */
93 gigaset_skb_sent(bcs, skb);
95 gig_dbg(DEBUG_INTR, "kfree skb (Adr: %lx)!",
96 (unsigned long) skb);
97 dev_kfree_skb_any(skb);
98 bcs->tx_skb = NULL;
100 return sent;
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;
111 unsigned long flags;
112 int sent = 0;
114 if (!tty || !tty->driver)
115 return -EFAULT;
117 cb = cs->cmdbuf;
118 if (!cb)
119 return 0; /* nothing to do */
121 if (cb->len) {
122 set_bit(TTY_DO_WRITE_WAKEUP, &tty->flags);
123 sent = tty->driver->write(tty, cb->buf + cb->offset, cb->len);
124 if (sent < 0) {
125 /* error */
126 gig_dbg(DEBUG_OUTPUT, "send_cb: write error %d", sent);
127 flush_send_queue(cs);
128 return sent;
130 cb->offset += sent;
131 cb->len -= sent;
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;
139 tcb = cb;
140 cs->cmdbuf = cb = cb->next;
141 if (cb) {
142 cb->prev = NULL;
143 cs->curlen = cb->len;
144 } else {
145 cs->lastcmdbuf = NULL;
146 cs->curlen = 0;
148 spin_unlock_irqrestore(&cs->cmdlock, flags);
150 if (tcb->wake_tasklet)
151 tasklet_schedule(tcb->wake_tasklet);
152 kfree(tcb);
154 return sent;
158 * send queue 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;
167 int sent = 0;
169 if (!cs || !(bcs = cs->bcs)) {
170 gig_dbg(DEBUG_OUTPUT, "%s: no cardstate", __func__);
171 return;
173 if (!bcs->tx_skb) {
174 /* no skb is being sent; send command if any */
175 sent = send_cb(cs);
176 gig_dbg(DEBUG_OUTPUT, "%s: send_cb -> %d", __func__, sent);
177 if (sent)
178 /* something sent or error */
179 return;
181 /* no command to send; get skb */
182 if (!(bcs->tx_skb = skb_dequeue(&bcs->squeue)))
183 /* no skb either, nothing to do */
184 return;
186 gig_dbg(DEBUG_INTR, "Dequeued skb (Adr: %lx)",
187 (unsigned long) bcs->tx_skb);
190 /* send 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)
201 struct sk_buff *skb;
202 struct cmdbuf_t *cb;
203 unsigned long flags;
205 /* command queue */
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);
211 kfree(cb);
213 cs->cmdbuf = cs->lastcmdbuf = NULL;
214 cs->cmdbytes = cs->curlen = 0;
215 spin_unlock_irqrestore(&cs->cmdlock, flags);
217 /* data queue */
218 if (cs->bcs->tx_skb)
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
230 * parameters:
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
235 * return value:
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)
241 struct cmdbuf_t *cb;
242 unsigned long flags;
244 gigaset_dbg_buffer(cs->mstate != MS_LOCKED ?
245 DEBUG_TRANSCMD : DEBUG_LOCKCMD,
246 "CMD Transmit", len, buf);
248 if (len <= 0)
249 return 0;
251 if (!(cb = kmalloc(sizeof(struct cmdbuf_t) + len, GFP_ATOMIC))) {
252 dev_err(cs->dev, "%s: out of memory!\n", __func__);
253 return -ENOMEM;
256 memcpy(cb->buf, buf, len);
257 cb->len = len;
258 cb->offset = 0;
259 cb->next = NULL;
260 cb->wake_tasklet = wake_tasklet;
262 spin_lock_irqsave(&cs->cmdlock, flags);
263 cb->prev = cs->lastcmdbuf;
264 if (cs->lastcmdbuf)
265 cs->lastcmdbuf->next = cb;
266 else {
267 cs->cmdbuf = cb;
268 cs->curlen = len;
270 cs->cmdbytes += len;
271 cs->lastcmdbuf = cb;
272 spin_unlock_irqrestore(&cs->cmdlock, flags);
274 spin_lock_irqsave(&cs->lock, flags);
275 if (cs->connected)
276 tasklet_schedule(&cs->write_tasklet);
277 spin_unlock_irqrestore(&cs->lock, flags);
278 return len;
282 * tty_driver.write_room interface routine
283 * return number of characters the driver will accept to be written
284 * parameter:
285 * controller state structure
286 * return value:
287 * number of characters
289 static int gigaset_write_room(struct cardstate *cs)
291 unsigned bytes;
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
300 * parameter:
301 * controller state structure
302 * return value:
303 * number of characters
305 static int gigaset_chars_in_buffer(struct cardstate *cs)
307 return cs->cmdbytes;
311 * implementation of ioctl(GIGASET_BRKCHARS)
312 * parameter:
313 * controller state structure
314 * return value:
315 * -EINVAL (unimplemented function)
317 static int gigaset_brkchars(struct cardstate *cs, const unsigned char buf[6])
319 /* not implemented */
320 return -EINVAL;
324 * Open B channel
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);
331 return 0;
335 * Close B channel
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);
342 return 0;
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)
351 /* unused */
352 bcs->hw.ser = NULL;
353 return 1;
357 * Free B channel structure
358 * Called by "gigaset_freebcs" in common.c
360 static int gigaset_freebcshw(struct bc_state *bcs)
362 /* unused */
363 return 1;
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);
382 if (!cs->hw.ser)
383 return;
384 dev_set_drvdata(&cs->hw.ser->dev.dev, NULL);
385 platform_device_unregister(&cs->hw.ser->dev);
386 kfree(cs->hw.ser);
387 cs->hw.ser = NULL;
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)
407 int rc;
409 if (!(cs->hw.ser = kzalloc(sizeof(struct ser_cardstate), GFP_KERNEL))) {
410 err("%s: out of memory!", __func__);
411 return 0;
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);
419 kfree(cs->hw.ser);
420 cs->hw.ser = NULL;
421 return 0;
423 dev_set_drvdata(&cs->hw.ser->dev.dev, cs);
425 tasklet_init(&cs->write_tasklet,
426 &gigaset_modem_fill, (unsigned long) cs);
427 return 1;
431 * set modem control lines
432 * Parameters:
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)
444 return -EFAULT;
445 set = new_state & ~old_state;
446 clear = old_state & ~new_state;
447 if (!set && !clear)
448 return 0;
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)
455 return -EINVAL;
458 static int gigaset_set_line_ctrl(struct cardstate *cs, unsigned cflag)
460 return -EINVAL;
463 static const struct gigaset_ops ops = {
464 gigaset_write_cmd,
465 gigaset_write_room,
466 gigaset_chars_in_buffer,
467 gigaset_brkchars,
468 gigaset_init_bchannel,
469 gigaset_close_bchannel,
470 gigaset_initbcshw,
471 gigaset_freebcshw,
472 gigaset_reinitbcshw,
473 gigaset_initcshw,
474 gigaset_freecshw,
475 gigaset_set_modem_ctrl,
476 gigaset_baud_rate,
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__);
493 return NULL;
495 atomic_inc(&cs->hw.ser->refcnt);
496 return cs;
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.
509 static int
510 gigaset_tty_open(struct tty_struct *tty)
512 struct cardstate *cs;
514 gig_dbg(DEBUG_INIT, "Starting HLL for Gigaset M101");
516 info(DRIVER_AUTHOR);
517 info(DRIVER_DESC);
519 if (!driver) {
520 err("%s: no driver structure", __func__);
521 return -ENODEV;
524 /* allocate memory for our device state and intialize it */
525 if (!(cs = gigaset_initcs(driver, 1, 1, 0, cidmode,
526 GIGASET_MODULENAME)))
527 goto error;
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);
534 tty->disc_data = cs;
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);
543 goto error;
546 gig_dbg(DEBUG_INIT, "Startup of HLL done");
547 return 0;
549 error:
550 gig_dbg(DEBUG_INIT, "Startup of HLL failed");
551 tty->disc_data = NULL;
552 gigaset_freecs(cs);
553 return -ENODEV;
557 * Called by the tty driver when the line discipline is removed.
558 * Called from process context.
560 static void
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");
567 if (!cs) {
568 gig_dbg(DEBUG_INIT, "%s: no cardstate", __func__);
569 return;
572 /* prevent other callers from entering ldisc methods */
573 tty->disc_data = NULL;
575 if (!cs->hw.ser)
576 err("%s: no hw cardstate", __func__);
577 else {
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 */
584 gigaset_stop(cs);
585 tasklet_kill(&cs->write_tasklet);
586 flush_send_queue(cs);
587 cs->dev = NULL;
588 gigaset_freecs(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);
602 return 0;
606 * Read on the tty.
607 * Unused, received data goes only to the Gigaset driver.
609 static ssize_t
610 gigaset_tty_read(struct tty_struct *tty, struct file *file,
611 unsigned char __user *buf, size_t count)
613 return -EAGAIN;
617 * Write on the tty.
618 * Unused, transmit data comes only from the Gigaset driver.
620 static ssize_t
621 gigaset_tty_write(struct tty_struct *tty, struct file *file,
622 const unsigned char *buf, size_t count)
624 return -EAGAIN;
628 * Ioctl on the tty.
629 * Called in process context only.
630 * May be re-entered by multiple ioctl calling threads.
632 static int
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);
637 int rc, val;
638 int __user *p = (int __user *)arg;
640 if (!cs)
641 return -ENXIO;
643 switch (cmd) {
644 case TCGETS:
645 case TCGETA:
646 /* pass through to underlying serial device */
647 rc = n_tty_ioctl(tty, file, cmd, arg);
648 break;
650 case TCFLSH:
651 /* flush our buffers and the serial port's buffer */
652 switch (arg) {
653 case TCIFLUSH:
654 /* no own input buffer to flush */
655 break;
656 case TCIOFLUSH:
657 case TCOFLUSH:
658 flush_send_queue(cs);
659 break;
661 /* flush the serial port's buffer */
662 rc = n_tty_ioctl(tty, file, cmd, arg);
663 break;
665 case FIONREAD:
666 /* unused, always return zero */
667 val = 0;
668 rc = put_user(val, p);
669 break;
671 default:
672 rc = -ENOIOCTLCMD;
675 cs_put(cs);
676 return rc;
680 * Poll on the tty.
681 * Unused, always return zero.
683 static unsigned int
684 gigaset_tty_poll(struct tty_struct *tty, struct file *file, poll_table *wait)
686 return 0;
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
694 * level or mainline.
695 * Parameters:
696 * tty tty structure
697 * buf buffer containing received characters
698 * cflags buffer containing error flags for received characters (ignored)
699 * count number of received characters
701 static void
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;
709 if (!cs)
710 return;
711 if (!(inbuf = cs->inbuf)) {
712 dev_err(cs->dev, "%s: no inbuf\n", __func__);
713 cs_put(cs);
714 return;
717 tail = inbuf->tail;
718 head = inbuf->head;
719 gig_dbg(DEBUG_INTR, "buffer state: %u -> %u, receive %u bytes",
720 head, tail, count);
722 if (head <= tail) {
723 /* possible buffer wraparound */
724 n = min_t(unsigned, count, RBUFSIZE - tail);
725 memcpy(inbuf->data + tail, buf, n);
726 tail = (tail + n) % RBUFSIZE;
727 buf += n;
728 count -= n;
731 if (count > 0) {
732 /* tail < head and some data left */
733 n = head - tail - 1;
734 if (count > n) {
735 dev_err(cs->dev,
736 "inbuf overflow, discarding %d bytes\n",
737 count - n);
738 count = n;
740 memcpy(inbuf->data + tail, buf, count);
741 tail += count;
744 gig_dbg(DEBUG_INTR, "setting tail to %u", tail);
745 inbuf->tail = tail;
747 /* Everything was received .. Push data into handler */
748 gig_dbg(DEBUG_INTR, "%s-->BH", __func__);
749 gigaset_schedule_event(cs);
750 cs_put(cs);
754 * Called by the tty driver when there's room for more data to send.
756 static void
757 gigaset_tty_wakeup(struct tty_struct *tty)
759 struct cardstate *cs = cs_get(tty);
761 clear_bit(TTY_DO_WRITE_WAKEUP, &tty->flags);
762 if (!cs)
763 return;
764 tasklet_schedule(&cs->write_tasklet);
765 cs_put(cs);
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)
789 int rc;
791 gig_dbg(DEBUG_INIT, "%s", __func__);
792 if ((rc = platform_driver_register(&device_driver)) != 0) {
793 err("error %d registering platform driver", rc);
794 return 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,
800 &ops, THIS_MODULE)))
801 goto error;
803 if ((rc = tty_register_ldisc(N_GIGASET_M101, &gigaset_ldisc)) != 0) {
804 err("error %d registering line discipline", rc);
805 goto error;
808 return 0;
810 error:
811 if (driver) {
812 gigaset_freedriver(driver);
813 driver = NULL;
815 platform_driver_unregister(&device_driver);
816 return rc;
819 static void __exit ser_gigaset_exit(void)
821 int rc;
823 gig_dbg(DEBUG_INIT, "%s", __func__);
825 if (driver) {
826 gigaset_freedriver(driver);
827 driver = NULL;
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);