?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/jmorris...
[linux/fpc-iii.git] / drivers / isdn / i4l / isdn_tty.c
blob3c5f2491a16f48f9aa365cef6423e6d8acfd74f5
1 /*
2 * Linux ISDN subsystem, tty functions and AT-command emulator (linklevel).
3 *
4 * Copyright 1994-1999 by Fritz Elfert (fritz@isdn4linux.de)
5 * Copyright 1995,96 by Thinking Objects Software GmbH Wuerzburg
6 *
7 * This software may be used and distributed according to the terms
8 * of the GNU General Public License, incorporated herein by reference.
9 *
10 */
11 #undef ISDN_TTY_STAT_DEBUG
12
13 #include <linux/isdn.h>
14 #include <linux/serial.h> /* ASYNC_* flags */
15 #include <linux/slab.h>
16 #include <linux/delay.h>
17 #include <linux/mutex.h>
18 #include "isdn_common.h"
19 #include "isdn_tty.h"
20 #ifdef CONFIG_ISDN_AUDIO
21 #include "isdn_audio.h"
22 #define VBUF 0x3e0
23 #define VBUFX (VBUF/16)
24 #endif
25
26 #define FIX_FILE_TRANSFER
27 #define DUMMY_HAYES_AT
28
29 /* Prototypes */
30
31 static DEFINE_MUTEX(modem_info_mutex);
32 static int isdn_tty_edit_at(const char *, int, modem_info *);
33 static void isdn_tty_check_esc(const u_char *, u_char, int, int *, u_long *);
34 static void isdn_tty_modem_reset_regs(modem_info *, int);
35 static void isdn_tty_cmd_ATA(modem_info *);
36 static void isdn_tty_flush_buffer(struct tty_struct *);
37 static void isdn_tty_modem_result(int, modem_info *);
38 #ifdef CONFIG_ISDN_AUDIO
39 static int isdn_tty_countDLE(unsigned char *, int);
40 #endif
41
42 /* Leave this unchanged unless you know what you do! */
43 #define MODEM_PARANOIA_CHECK
44 #define MODEM_DO_RESTART
45
46 static int bit2si[8] =
47 {1, 5, 7, 7, 7, 7, 7, 7};
48 static int si2bit[8] =
49 {4, 1, 4, 4, 4, 4, 4, 4};
50
51 /* isdn_tty_try_read() is called from within isdn_tty_rcv_skb()
52 * to stuff incoming data directly into a tty's flip-buffer. This
53 * is done to speed up tty-receiving if the receive-queue is empty.
54 * This routine MUST be called with interrupts off.
55 * Return:
56 * 1 = Success
57 * 0 = Failure, data has to be buffered and later processed by
58 * isdn_tty_readmodem().
59 */
60 static int
61 isdn_tty_try_read(modem_info *info, struct sk_buff *skb)
62 {
63 struct tty_port *port = &info->port;
64 int c;
65 int len;
66 char last;
67
68 if (!info->online)
69 return 0;
70
71 if (!(info->mcr & UART_MCR_RTS))
72 return 0;
73
74 len = skb->len
75 #ifdef CONFIG_ISDN_AUDIO
76 + ISDN_AUDIO_SKB_DLECOUNT(skb)
77 #endif
78 ;
79
80 c = tty_buffer_request_room(port, len);
81 if (c < len)
82 return 0;
83
84 #ifdef CONFIG_ISDN_AUDIO
85 if (ISDN_AUDIO_SKB_DLECOUNT(skb)) {
86 int l = skb->len;
87 unsigned char *dp = skb->data;
88 while (--l) {
89 if (*dp == DLE)
90 tty_insert_flip_char(port, DLE, 0);
91 tty_insert_flip_char(port, *dp++, 0);
92 }
93 if (*dp == DLE)
94 tty_insert_flip_char(port, DLE, 0);
95 last = *dp;
96 } else {
97 #endif
98 if (len > 1)
99 tty_insert_flip_string(port, skb->data, len - 1);
100 last = skb->data[len - 1];
101 #ifdef CONFIG_ISDN_AUDIO
102 }
103 #endif
104 if (info->emu.mdmreg[REG_CPPP] & BIT_CPPP)
105 tty_insert_flip_char(port, last, 0xFF);
106 else
107 tty_insert_flip_char(port, last, TTY_NORMAL);
108 tty_flip_buffer_push(port);
109 kfree_skb(skb);
110
111 return 1;
112 }
113
114 /* isdn_tty_readmodem() is called periodically from within timer-interrupt.
115 * It tries getting received data from the receive queue an stuff it into
116 * the tty's flip-buffer.
117 */
118 void
119 isdn_tty_readmodem(void)
120 {
121 int resched = 0;
122 int midx;
123 int i;
124 int r;
125 modem_info *info;
126
127 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
128 midx = dev->m_idx[i];
129 if (midx < 0)
130 continue;
131
132 info = &dev->mdm.info[midx];
133 if (!info->online)
134 continue;
135
136 r = 0;
137 #ifdef CONFIG_ISDN_AUDIO
138 isdn_audio_eval_dtmf(info);
139 if ((info->vonline & 1) && (info->emu.vpar[1]))
140 isdn_audio_eval_silence(info);
141 #endif
142 if (info->mcr & UART_MCR_RTS) {
143 /* CISCO AsyncPPP Hack */
144 if (!(info->emu.mdmreg[REG_CPPP] & BIT_CPPP))
145 r = isdn_readbchan_tty(info->isdn_driver,
146 info->isdn_channel,
147 &info->port, 0);
148 else
149 r = isdn_readbchan_tty(info->isdn_driver,
150 info->isdn_channel,
151 &info->port, 1);
152 if (r)
153 tty_flip_buffer_push(&info->port);
154 } else
155 r = 1;
156
157 if (r) {
158 info->rcvsched = 0;
159 resched = 1;
160 } else
161 info->rcvsched = 1;
162 }
163 if (!resched)
164 isdn_timer_ctrl(ISDN_TIMER_MODEMREAD, 0);
165 }
166
167 int
168 isdn_tty_rcv_skb(int i, int di, int channel, struct sk_buff *skb)
169 {
170 ulong flags;
171 int midx;
172 #ifdef CONFIG_ISDN_AUDIO
173 int ifmt;
174 #endif
175 modem_info *info;
176
177 if ((midx = dev->m_idx[i]) < 0) {
178 /* if midx is invalid, packet is not for tty */
179 return 0;
180 }
181 info = &dev->mdm.info[midx];
182 #ifdef CONFIG_ISDN_AUDIO
183 ifmt = 1;
184
185 if ((info->vonline) && (!info->emu.vpar[4]))
186 isdn_audio_calc_dtmf(info, skb->data, skb->len, ifmt);
187 if ((info->vonline & 1) && (info->emu.vpar[1]))
188 isdn_audio_calc_silence(info, skb->data, skb->len, ifmt);
189 #endif
190 if ((info->online < 2)
191 #ifdef CONFIG_ISDN_AUDIO
192 && (!(info->vonline & 1))
193 #endif
194 ) {
195 /* If Modem not listening, drop data */
196 kfree_skb(skb);
197 return 1;
198 }
199 if (info->emu.mdmreg[REG_T70] & BIT_T70) {
200 if (info->emu.mdmreg[REG_T70] & BIT_T70_EXT) {
201 /* T.70 decoding: throw away the T.70 header (2 or 4 bytes) */
202 if (skb->data[0] == 3) /* pure data packet -> 4 byte headers */
203 skb_pull(skb, 4);
204 else
205 if (skb->data[0] == 1) /* keepalive packet -> 2 byte hdr */
206 skb_pull(skb, 2);
207 } else
208 /* T.70 decoding: Simply throw away the T.70 header (4 bytes) */
209 if ((skb->data[0] == 1) && ((skb->data[1] == 0) || (skb->data[1] == 1)))
210 skb_pull(skb, 4);
211 }
212 #ifdef CONFIG_ISDN_AUDIO
213 ISDN_AUDIO_SKB_DLECOUNT(skb) = 0;
214 ISDN_AUDIO_SKB_LOCK(skb) = 0;
215 if (info->vonline & 1) {
216 /* voice conversion/compression */
217 switch (info->emu.vpar[3]) {
218 case 2:
219 case 3:
220 case 4:
221 /* adpcm
222 * Since compressed data takes less
223 * space, we can overwrite the buffer.
224 */
225 skb_trim(skb, isdn_audio_xlaw2adpcm(info->adpcmr,
226 ifmt,
227 skb->data,
228 skb->data,
229 skb->len));
230 break;
231 case 5:
232 /* a-law */
233 if (!ifmt)
234 isdn_audio_ulaw2alaw(skb->data, skb->len);
235 break;
236 case 6:
237 /* u-law */
238 if (ifmt)
239 isdn_audio_alaw2ulaw(skb->data, skb->len);
240 break;
241 }
242 ISDN_AUDIO_SKB_DLECOUNT(skb) =
243 isdn_tty_countDLE(skb->data, skb->len);
244 }
245 #ifdef CONFIG_ISDN_TTY_FAX
246 else {
247 if (info->faxonline & 2) {
248 isdn_tty_fax_bitorder(info, skb);
249 ISDN_AUDIO_SKB_DLECOUNT(skb) =
250 isdn_tty_countDLE(skb->data, skb->len);
251 }
252 }
253 #endif
254 #endif
255 /* Try to deliver directly via tty-buf if queue is empty */
256 spin_lock_irqsave(&info->readlock, flags);
257 if (skb_queue_empty(&dev->drv[di]->rpqueue[channel]))
258 if (isdn_tty_try_read(info, skb)) {
259 spin_unlock_irqrestore(&info->readlock, flags);
260 return 1;
261 }
262 /* Direct deliver failed or queue wasn't empty.
263 * Queue up for later dequeueing via timer-irq.
264 */
265 __skb_queue_tail(&dev->drv[di]->rpqueue[channel], skb);
266 dev->drv[di]->rcvcount[channel] +=
267 (skb->len
268 #ifdef CONFIG_ISDN_AUDIO
269 + ISDN_AUDIO_SKB_DLECOUNT(skb)
270 #endif
271 );
272 spin_unlock_irqrestore(&info->readlock, flags);
273 /* Schedule dequeuing */
274 if ((dev->modempoll) && (info->rcvsched))
275 isdn_timer_ctrl(ISDN_TIMER_MODEMREAD, 1);
276 return 1;
277 }
278
279 static void
280 isdn_tty_cleanup_xmit(modem_info *info)
281 {
282 skb_queue_purge(&info->xmit_queue);
283 #ifdef CONFIG_ISDN_AUDIO
284 skb_queue_purge(&info->dtmf_queue);
285 #endif
286 }
287
288 static void
289 isdn_tty_tint(modem_info *info)
290 {
291 struct sk_buff *skb = skb_dequeue(&info->xmit_queue);
292 int len, slen;
293
294 if (!skb)
295 return;
296 len = skb->len;
297 if ((slen = isdn_writebuf_skb_stub(info->isdn_driver,
298 info->isdn_channel, 1, skb)) == len) {
299 struct tty_struct *tty = info->port.tty;
300 info->send_outstanding++;
301 info->msr &= ~UART_MSR_CTS;
302 info->lsr &= ~UART_LSR_TEMT;
303 tty_wakeup(tty);
304 return;
305 }
306 if (slen < 0) {
307 /* Error: no channel, already shutdown, or wrong parameter */
308 dev_kfree_skb(skb);
309 return;
310 }
311 skb_queue_head(&info->xmit_queue, skb);
312 }
313
314 #ifdef CONFIG_ISDN_AUDIO
315 static int
316 isdn_tty_countDLE(unsigned char *buf, int len)
317 {
318 int count = 0;
319
320 while (len--)
321 if (*buf++ == DLE)
322 count++;
323 return count;
324 }
325
326 /* This routine is called from within isdn_tty_write() to perform
327 * DLE-decoding when sending audio-data.
328 */
329 static int
330 isdn_tty_handleDLEdown(modem_info *info, atemu *m, int len)
331 {
332 unsigned char *p = &info->port.xmit_buf[info->xmit_count];
333 int count = 0;
334
335 while (len > 0) {
336 if (m->lastDLE) {
337 m->lastDLE = 0;
338 switch (*p) {
339 case DLE:
340 /* Escape code */
341 if (len > 1)
342 memmove(p, p + 1, len - 1);
343 p--;
344 count++;
345 break;
346 case ETX:
347 /* End of data */
348 info->vonline |= 4;
349 return count;
350 case DC4:
351 /* Abort RX */
352 info->vonline &= ~1;
353 #ifdef ISDN_DEBUG_MODEM_VOICE
354 printk(KERN_DEBUG
355 "DLEdown: got DLE-DC4, send DLE-ETX on ttyI%d\n",
356 info->line);
357 #endif
358 isdn_tty_at_cout("\020\003", info);
359 if (!info->vonline) {
360 #ifdef ISDN_DEBUG_MODEM_VOICE
361 printk(KERN_DEBUG
362 "DLEdown: send VCON on ttyI%d\n",
363 info->line);
364 #endif
365 isdn_tty_at_cout("\r\nVCON\r\n", info);
366 }
367 /* Fall through */
368 case 'q':
369 case 's':
370 /* Silence */
371 if (len > 1)
372 memmove(p, p + 1, len - 1);
373 p--;
374 break;
375 }
376 } else {
377 if (*p == DLE)
378 m->lastDLE = 1;
379 else
380 count++;
381 }
382 p++;
383 len--;
384 }
385 if (len < 0) {
386 printk(KERN_WARNING "isdn_tty: len<0 in DLEdown\n");
387 return 0;
388 }
389 return count;
390 }
391
392 /* This routine is called from within isdn_tty_write() when receiving
393 * audio-data. It interrupts receiving, if an character other than
394 * ^S or ^Q is sent.
395 */
396 static int
397 isdn_tty_end_vrx(const char *buf, int c)
398 {
399 char ch;
400
401 while (c--) {
402 ch = *buf;
403 if ((ch != 0x11) && (ch != 0x13))
404 return 1;
405 buf++;
406 }
407 return 0;
408 }
409
410 static int voice_cf[7] =
411 {0, 0, 4, 3, 2, 0, 0};
412
413 #endif /* CONFIG_ISDN_AUDIO */
414
415 /* isdn_tty_senddown() is called either directly from within isdn_tty_write()
416 * or via timer-interrupt from within isdn_tty_modem_xmit(). It pulls
417 * outgoing data from the tty's xmit-buffer, handles voice-decompression or
418 * T.70 if necessary, and finally queues it up for sending via isdn_tty_tint.
419 */
420 static void
421 isdn_tty_senddown(modem_info *info)
422 {
423 int buflen;
424 int skb_res;
425 #ifdef CONFIG_ISDN_AUDIO
426 int audio_len;
427 #endif
428 struct sk_buff *skb;
429
430 #ifdef CONFIG_ISDN_AUDIO
431 if (info->vonline & 4) {
432 info->vonline &= ~6;
433 if (!info->vonline) {
434 #ifdef ISDN_DEBUG_MODEM_VOICE
435 printk(KERN_DEBUG
436 "senddown: send VCON on ttyI%d\n",
437 info->line);
438 #endif
439 isdn_tty_at_cout("\r\nVCON\r\n", info);
440 }
441 }
442 #endif
443 if (!(buflen = info->xmit_count))
444 return;
445 if ((info->emu.mdmreg[REG_CTS] & BIT_CTS) != 0)
446 info->msr &= ~UART_MSR_CTS;
447 info->lsr &= ~UART_LSR_TEMT;
448 /* info->xmit_count is modified here and in isdn_tty_write().
449 * So we return here if isdn_tty_write() is in the
450 * critical section.
451 */
452 atomic_inc(&info->xmit_lock);
453 if (!(atomic_dec_and_test(&info->xmit_lock)))
454 return;
455 if (info->isdn_driver < 0) {
456 info->xmit_count = 0;
457 return;
458 }
459 skb_res = dev->drv[info->isdn_driver]->interface->hl_hdrlen + 4;
460 #ifdef CONFIG_ISDN_AUDIO
461 if (info->vonline & 2)
462 audio_len = buflen * voice_cf[info->emu.vpar[3]];
463 else
464 audio_len = 0;
465 skb = dev_alloc_skb(skb_res + buflen + audio_len);
466 #else
467 skb = dev_alloc_skb(skb_res + buflen);
468 #endif
469 if (!skb) {
470 printk(KERN_WARNING
471 "isdn_tty: Out of memory in ttyI%d senddown\n",
472 info->line);
473 return;
474 }
475 skb_reserve(skb, skb_res);
476 memcpy(skb_put(skb, buflen), info->port.xmit_buf, buflen);
477 info->xmit_count = 0;
478 #ifdef CONFIG_ISDN_AUDIO
479 if (info->vonline & 2) {
480 /* For now, ifmt is fixed to 1 (alaw), since this
481 * is used with ISDN everywhere in the world, except
482 * US, Canada and Japan.
483 * Later, when US-ISDN protocols are implemented,
484 * this setting will depend on the D-channel protocol.
485 */
486 int ifmt = 1;
487
488 /* voice conversion/decompression */
489 switch (info->emu.vpar[3]) {
490 case 2:
491 case 3:
492 case 4:
493 /* adpcm, compatible to ZyXel 1496 modem
494 * with ROM revision 6.01
495 */
496 audio_len = isdn_audio_adpcm2xlaw(info->adpcms,
497 ifmt,
498 skb->data,
499 skb_put(skb, audio_len),
500 buflen);
501 skb_pull(skb, buflen);
502 skb_trim(skb, audio_len);
503 break;
504 case 5:
505 /* a-law */
506 if (!ifmt)
507 isdn_audio_alaw2ulaw(skb->data,
508 buflen);
509 break;
510 case 6:
511 /* u-law */
512 if (ifmt)
513 isdn_audio_ulaw2alaw(skb->data,
514 buflen);
515 break;
516 }
517 }
518 #endif /* CONFIG_ISDN_AUDIO */
519 if (info->emu.mdmreg[REG_T70] & BIT_T70) {
520 /* Add T.70 simplified header */
521 if (info->emu.mdmreg[REG_T70] & BIT_T70_EXT)
522 memcpy(skb_push(skb, 2), "\1\0", 2);
523 else
524 memcpy(skb_push(skb, 4), "\1\0\1\0", 4);
525 }
526 skb_queue_tail(&info->xmit_queue, skb);
527 }
528
529 /************************************************************
530 *
531 * Modem-functions
532 *
533 * mostly "stolen" from original Linux-serial.c and friends.
534 *
535 ************************************************************/
536
537 /* The next routine is called once from within timer-interrupt
538 * triggered within isdn_tty_modem_ncarrier(). It calls
539 * isdn_tty_modem_result() to stuff a "NO CARRIER" Message
540 * into the tty's buffer.
541 */
542 static void
543 isdn_tty_modem_do_ncarrier(unsigned long data)
544 {
545 modem_info *info = (modem_info *) data;
546 isdn_tty_modem_result(RESULT_NO_CARRIER, info);
547 }
548
549 /* Next routine is called, whenever the DTR-signal is raised.
550 * It checks the ncarrier-flag, and triggers the above routine
551 * when necessary. The ncarrier-flag is set, whenever DTR goes
552 * low.
553 */
554 static void
555 isdn_tty_modem_ncarrier(modem_info *info)
556 {
557 if (info->ncarrier) {
558 info->nc_timer.expires = jiffies + HZ;
559 add_timer(&info->nc_timer);
560 }
561 }
562
563 /*
564 * return the usage calculated by si and layer 2 protocol
565 */
566 static int
567 isdn_calc_usage(int si, int l2)
568 {
569 int usg = ISDN_USAGE_MODEM;
570
571 #ifdef CONFIG_ISDN_AUDIO
572 if (si == 1) {
573 switch (l2) {
574 case ISDN_PROTO_L2_MODEM:
575 usg = ISDN_USAGE_MODEM;
576 break;
577 #ifdef CONFIG_ISDN_TTY_FAX
578 case ISDN_PROTO_L2_FAX:
579 usg = ISDN_USAGE_FAX;
580 break;
581 #endif
582 case ISDN_PROTO_L2_TRANS:
583 default:
584 usg = ISDN_USAGE_VOICE;
585 break;
586 }
587 }
588 #endif
589 return (usg);
590 }
591
592 /* isdn_tty_dial() performs dialing of a tty an the necessary
593 * setup of the lower levels before that.
594 */
595 static void
596 isdn_tty_dial(char *n, modem_info *info, atemu *m)
597 {
598 int usg = ISDN_USAGE_MODEM;
599 int si = 7;
600 int l2 = m->mdmreg[REG_L2PROT];
601 u_long flags;
602 isdn_ctrl cmd;
603 int i;
604 int j;
605
606 for (j = 7; j >= 0; j--)
607 if (m->mdmreg[REG_SI1] & (1 << j)) {
608 si = bit2si[j];
609 break;
610 }
611 usg = isdn_calc_usage(si, l2);
612 #ifdef CONFIG_ISDN_AUDIO
613 if ((si == 1) &&
614 (l2 != ISDN_PROTO_L2_MODEM)
615 #ifdef CONFIG_ISDN_TTY_FAX
616 && (l2 != ISDN_PROTO_L2_FAX)
617 #endif
618 ) {
619 l2 = ISDN_PROTO_L2_TRANS;
620 usg = ISDN_USAGE_VOICE;
621 }
622 #endif
623 m->mdmreg[REG_SI1I] = si2bit[si];
624 spin_lock_irqsave(&dev->lock, flags);
625 i = isdn_get_free_channel(usg, l2, m->mdmreg[REG_L3PROT], -1, -1, m->msn);
626 if (i < 0) {
627 spin_unlock_irqrestore(&dev->lock, flags);
628 isdn_tty_modem_result(RESULT_NO_DIALTONE, info);
629 } else {
630 info->isdn_driver = dev->drvmap[i];
631 info->isdn_channel = dev->chanmap[i];
632 info->drv_index = i;
633 dev->m_idx[i] = info->line;
634 dev->usage[i] |= ISDN_USAGE_OUTGOING;
635 info->last_dir = 1;
636 strcpy(info->last_num, n);
637 isdn_info_update();
638 spin_unlock_irqrestore(&dev->lock, flags);
639 cmd.driver = info->isdn_driver;
640 cmd.arg = info->isdn_channel;
641 cmd.command = ISDN_CMD_CLREAZ;
642 isdn_command(&cmd);
643 strcpy(cmd.parm.num, isdn_map_eaz2msn(m->msn, info->isdn_driver));
644 cmd.driver = info->isdn_driver;
645 cmd.command = ISDN_CMD_SETEAZ;
646 isdn_command(&cmd);
647 cmd.driver = info->isdn_driver;
648 cmd.command = ISDN_CMD_SETL2;
649 info->last_l2 = l2;
650 cmd.arg = info->isdn_channel + (l2 << 8);
651 isdn_command(&cmd);
652 cmd.driver = info->isdn_driver;
653 cmd.command = ISDN_CMD_SETL3;
654 cmd.arg = info->isdn_channel + (m->mdmreg[REG_L3PROT] << 8);
655 #ifdef CONFIG_ISDN_TTY_FAX
656 if (l2 == ISDN_PROTO_L2_FAX) {
657 cmd.parm.fax = info->fax;
658 info->fax->direction = ISDN_TTY_FAX_CONN_OUT;
659 }
660 #endif
661 isdn_command(&cmd);
662 cmd.driver = info->isdn_driver;
663 cmd.arg = info->isdn_channel;
664 sprintf(cmd.parm.setup.phone, "%s", n);
665 sprintf(cmd.parm.setup.eazmsn, "%s",
666 isdn_map_eaz2msn(m->msn, info->isdn_driver));
667 cmd.parm.setup.si1 = si;
668 cmd.parm.setup.si2 = m->mdmreg[REG_SI2];
669 cmd.command = ISDN_CMD_DIAL;
670 info->dialing = 1;
671 info->emu.carrierwait = 0;
672 strcpy(dev->num[i], n);
673 isdn_info_update();
674 isdn_command(&cmd);
675 isdn_timer_ctrl(ISDN_TIMER_CARRIER, 1);
676 }
677 }
678
679 /* isdn_tty_hangup() disassociates a tty from the real
680 * ISDN-line (hangup). The usage-status is cleared
681 * and some cleanup is done also.
682 */
683 void
684 isdn_tty_modem_hup(modem_info *info, int local)
685 {
686 isdn_ctrl cmd;
687 int di, ch;
688
689 if (!info)
690 return;
691
692 di = info->isdn_driver;
693 ch = info->isdn_channel;
694 if (di < 0 || ch < 0)
695 return;
696
697 info->isdn_driver = -1;
698 info->isdn_channel = -1;
699
700 #ifdef ISDN_DEBUG_MODEM_HUP
701 printk(KERN_DEBUG "Mhup ttyI%d\n", info->line);
702 #endif
703 info->rcvsched = 0;
704 isdn_tty_flush_buffer(info->port.tty);
705 if (info->online) {
706 info->last_lhup = local;
707 info->online = 0;
708 isdn_tty_modem_result(RESULT_NO_CARRIER, info);
709 }
710 #ifdef CONFIG_ISDN_AUDIO
711 info->vonline = 0;
712 #ifdef CONFIG_ISDN_TTY_FAX
713 info->faxonline = 0;
714 info->fax->phase = ISDN_FAX_PHASE_IDLE;
715 #endif
716 info->emu.vpar[4] = 0;
717 info->emu.vpar[5] = 8;
718 kfree(info->dtmf_state);
719 info->dtmf_state = NULL;
720 kfree(info->silence_state);
721 info->silence_state = NULL;
722 kfree(info->adpcms);
723 info->adpcms = NULL;
724 kfree(info->adpcmr);
725 info->adpcmr = NULL;
726 #endif
727 if ((info->msr & UART_MSR_RI) &&
728 (info->emu.mdmreg[REG_RUNG] & BIT_RUNG))
729 isdn_tty_modem_result(RESULT_RUNG, info);
730 info->msr &= ~(UART_MSR_DCD | UART_MSR_RI);
731 info->lsr |= UART_LSR_TEMT;
732
733 if (local) {
734 cmd.driver = di;
735 cmd.command = ISDN_CMD_HANGUP;
736 cmd.arg = ch;
737 isdn_command(&cmd);
738 }
739
740 isdn_all_eaz(di, ch);
741 info->emu.mdmreg[REG_RINGCNT] = 0;
742 isdn_free_channel(di, ch, 0);
743
744 if (info->drv_index >= 0) {
745 dev->m_idx[info->drv_index] = -1;
746 info->drv_index = -1;
747 }
748 }
749
750 /*
751 * Begin of a CAPI like interface, currently used only for
752 * supplementary service (CAPI 2.0 part III)
753 */
754 #include <linux/isdn/capicmd.h>
755 #include <linux/module.h>
756
757 int
758 isdn_tty_capi_facility(capi_msg *cm) {
759 return (-1); /* dummy */
760 }
761
762 /* isdn_tty_suspend() tries to suspend the current tty connection
763 */
764 static void
765 isdn_tty_suspend(char *id, modem_info *info, atemu *m)
766 {
767 isdn_ctrl cmd;
768
769 int l;
770
771 if (!info)
772 return;
773
774 #ifdef ISDN_DEBUG_MODEM_SERVICES
775 printk(KERN_DEBUG "Msusp ttyI%d\n", info->line);
776 #endif
777 l = strlen(id);
778 if ((info->isdn_driver >= 0)) {
779 cmd.parm.cmsg.Length = l + 18;
780 cmd.parm.cmsg.Command = CAPI_FACILITY;
781 cmd.parm.cmsg.Subcommand = CAPI_REQ;
782 cmd.parm.cmsg.adr.Controller = info->isdn_driver + 1;
783 cmd.parm.cmsg.para[0] = 3; /* 16 bit 0x0003 suplementary service */
784 cmd.parm.cmsg.para[1] = 0;
785 cmd.parm.cmsg.para[2] = l + 3;
786 cmd.parm.cmsg.para[3] = 4; /* 16 bit 0x0004 Suspend */
787 cmd.parm.cmsg.para[4] = 0;
788 cmd.parm.cmsg.para[5] = l;
789 strncpy(&cmd.parm.cmsg.para[6], id, l);
790 cmd.command = CAPI_PUT_MESSAGE;
791 cmd.driver = info->isdn_driver;
792 cmd.arg = info->isdn_channel;
793 isdn_command(&cmd);
794 }
795 }
796
797 /* isdn_tty_resume() tries to resume a suspended call
798 * setup of the lower levels before that. unfortunately here is no
799 * checking for compatibility of used protocols implemented by Q931
800 * It does the same things like isdn_tty_dial, the last command
801 * is different, may be we can merge it.
802 */
803
804 static void
805 isdn_tty_resume(char *id, modem_info *info, atemu *m)
806 {
807 int usg = ISDN_USAGE_MODEM;
808 int si = 7;
809 int l2 = m->mdmreg[REG_L2PROT];
810 isdn_ctrl cmd;
811 ulong flags;
812 int i;
813 int j;
814 int l;
815
816 l = strlen(id);
817 for (j = 7; j >= 0; j--)
818 if (m->mdmreg[REG_SI1] & (1 << j)) {
819 si = bit2si[j];
820 break;
821 }
822 usg = isdn_calc_usage(si, l2);
823 #ifdef CONFIG_ISDN_AUDIO
824 if ((si == 1) &&
825 (l2 != ISDN_PROTO_L2_MODEM)
826 #ifdef CONFIG_ISDN_TTY_FAX
827 && (l2 != ISDN_PROTO_L2_FAX)
828 #endif
829 ) {
830 l2 = ISDN_PROTO_L2_TRANS;
831 usg = ISDN_USAGE_VOICE;
832 }
833 #endif
834 m->mdmreg[REG_SI1I] = si2bit[si];
835 spin_lock_irqsave(&dev->lock, flags);
836 i = isdn_get_free_channel(usg, l2, m->mdmreg[REG_L3PROT], -1, -1, m->msn);
837 if (i < 0) {
838 spin_unlock_irqrestore(&dev->lock, flags);
839 isdn_tty_modem_result(RESULT_NO_DIALTONE, info);
840 } else {
841 info->isdn_driver = dev->drvmap[i];
842 info->isdn_channel = dev->chanmap[i];
843 info->drv_index = i;
844 dev->m_idx[i] = info->line;
845 dev->usage[i] |= ISDN_USAGE_OUTGOING;
846 info->last_dir = 1;
847 // strcpy(info->last_num, n);
848 isdn_info_update();
849 spin_unlock_irqrestore(&dev->lock, flags);
850 cmd.driver = info->isdn_driver;
851 cmd.arg = info->isdn_channel;
852 cmd.command = ISDN_CMD_CLREAZ;
853 isdn_command(&cmd);
854 strcpy(cmd.parm.num, isdn_map_eaz2msn(m->msn, info->isdn_driver));
855 cmd.driver = info->isdn_driver;
856 cmd.command = ISDN_CMD_SETEAZ;
857 isdn_command(&cmd);
858 cmd.driver = info->isdn_driver;
859 cmd.command = ISDN_CMD_SETL2;
860 info->last_l2 = l2;
861 cmd.arg = info->isdn_channel + (l2 << 8);
862 isdn_command(&cmd);
863 cmd.driver = info->isdn_driver;
864 cmd.command = ISDN_CMD_SETL3;
865 cmd.arg = info->isdn_channel + (m->mdmreg[REG_L3PROT] << 8);
866 isdn_command(&cmd);
867 cmd.driver = info->isdn_driver;
868 cmd.arg = info->isdn_channel;
869 cmd.parm.cmsg.Length = l + 18;
870 cmd.parm.cmsg.Command = CAPI_FACILITY;
871 cmd.parm.cmsg.Subcommand = CAPI_REQ;
872 cmd.parm.cmsg.adr.Controller = info->isdn_driver + 1;
873 cmd.parm.cmsg.para[0] = 3; /* 16 bit 0x0003 suplementary service */
874 cmd.parm.cmsg.para[1] = 0;
875 cmd.parm.cmsg.para[2] = l + 3;
876 cmd.parm.cmsg.para[3] = 5; /* 16 bit 0x0005 Resume */
877 cmd.parm.cmsg.para[4] = 0;
878 cmd.parm.cmsg.para[5] = l;
879 strncpy(&cmd.parm.cmsg.para[6], id, l);
880 cmd.command = CAPI_PUT_MESSAGE;
881 info->dialing = 1;
882 // strcpy(dev->num[i], n);
883 isdn_info_update();
884 isdn_command(&cmd);
885 isdn_timer_ctrl(ISDN_TIMER_CARRIER, 1);
886 }
887 }
888
889 /* isdn_tty_send_msg() sends a message to a HL driver
890 * This is used for hybrid modem cards to send AT commands to it
891 */
892
893 static void
894 isdn_tty_send_msg(modem_info *info, atemu *m, char *msg)
895 {
896 int usg = ISDN_USAGE_MODEM;
897 int si = 7;
898 int l2 = m->mdmreg[REG_L2PROT];
899 isdn_ctrl cmd;
900 ulong flags;
901 int i;
902 int j;
903 int l;
904
905 l = min(strlen(msg), sizeof(cmd.parm) - sizeof(cmd.parm.cmsg)
906 + sizeof(cmd.parm.cmsg.para) - 2);
907
908 if (!l) {
909 isdn_tty_modem_result(RESULT_ERROR, info);
910 return;
911 }
912 for (j = 7; j >= 0; j--)
913 if (m->mdmreg[REG_SI1] & (1 << j)) {
914 si = bit2si[j];
915 break;
916 }
917 usg = isdn_calc_usage(si, l2);
918 #ifdef CONFIG_ISDN_AUDIO
919 if ((si == 1) &&
920 (l2 != ISDN_PROTO_L2_MODEM)
921 #ifdef CONFIG_ISDN_TTY_FAX
922 && (l2 != ISDN_PROTO_L2_FAX)
923 #endif
924 ) {
925 l2 = ISDN_PROTO_L2_TRANS;
926 usg = ISDN_USAGE_VOICE;
927 }
928 #endif
929 m->mdmreg[REG_SI1I] = si2bit[si];
930 spin_lock_irqsave(&dev->lock, flags);
931 i = isdn_get_free_channel(usg, l2, m->mdmreg[REG_L3PROT], -1, -1, m->msn);
932 if (i < 0) {
933 spin_unlock_irqrestore(&dev->lock, flags);
934 isdn_tty_modem_result(RESULT_NO_DIALTONE, info);
935 } else {
936 info->isdn_driver = dev->drvmap[i];
937 info->isdn_channel = dev->chanmap[i];
938 info->drv_index = i;
939 dev->m_idx[i] = info->line;
940 dev->usage[i] |= ISDN_USAGE_OUTGOING;
941 info->last_dir = 1;
942 isdn_info_update();
943 spin_unlock_irqrestore(&dev->lock, flags);
944 cmd.driver = info->isdn_driver;
945 cmd.arg = info->isdn_channel;
946 cmd.command = ISDN_CMD_CLREAZ;
947 isdn_command(&cmd);
948 strcpy(cmd.parm.num, isdn_map_eaz2msn(m->msn, info->isdn_driver));
949 cmd.driver = info->isdn_driver;
950 cmd.command = ISDN_CMD_SETEAZ;
951 isdn_command(&cmd);
952 cmd.driver = info->isdn_driver;
953 cmd.command = ISDN_CMD_SETL2;
954 info->last_l2 = l2;
955 cmd.arg = info->isdn_channel + (l2 << 8);
956 isdn_command(&cmd);
957 cmd.driver = info->isdn_driver;
958 cmd.command = ISDN_CMD_SETL3;
959 cmd.arg = info->isdn_channel + (m->mdmreg[REG_L3PROT] << 8);
960 isdn_command(&cmd);
961 cmd.driver = info->isdn_driver;
962 cmd.arg = info->isdn_channel;
963 cmd.parm.cmsg.Length = l + 14;
964 cmd.parm.cmsg.Command = CAPI_MANUFACTURER;
965 cmd.parm.cmsg.Subcommand = CAPI_REQ;
966 cmd.parm.cmsg.adr.Controller = info->isdn_driver + 1;
967 cmd.parm.cmsg.para[0] = l + 1;
968 strncpy(&cmd.parm.cmsg.para[1], msg, l);
969 cmd.parm.cmsg.para[l + 1] = 0xd;
970 cmd.command = CAPI_PUT_MESSAGE;
971 /* info->dialing = 1;
972 strcpy(dev->num[i], n);
973 isdn_info_update();
974 */
975 isdn_command(&cmd);
976 }
977 }
978
979 static inline int
980 isdn_tty_paranoia_check(modem_info *info, char *name, const char *routine)
981 {
982 #ifdef MODEM_PARANOIA_CHECK
983 if (!info) {
984 printk(KERN_WARNING "isdn_tty: null info_struct for %s in %s\n",
985 name, routine);
986 return 1;
987 }
988 if (info->magic != ISDN_ASYNC_MAGIC) {
989 printk(KERN_WARNING "isdn_tty: bad magic for modem struct %s in %s\n",
990 name, routine);
991 return 1;
992 }
993 #endif
994 return 0;
995 }
996
997 /*
998 * This routine is called to set the UART divisor registers to match
999 * the specified baud rate for a serial port.
1000 */
1001 static void
1002 isdn_tty_change_speed(modem_info *info)
1003 {
1004 struct tty_port *port = &info->port;
1005 uint cflag,
1006 cval,
1007 quot;
1008 int i;
1009
1010 if (!port->tty)
1011 return;
1012 cflag = port->tty->termios.c_cflag;
1013
1014 quot = i = cflag & CBAUD;
1015 if (i & CBAUDEX) {
1016 i &= ~CBAUDEX;
1017 if (i < 1 || i > 2)
1018 port->tty->termios.c_cflag &= ~CBAUDEX;
1019 else
1020 i += 15;
1021 }
1022 if (quot) {
1023 info->mcr |= UART_MCR_DTR;
1024 isdn_tty_modem_ncarrier(info);
1025 } else {
1026 info->mcr &= ~UART_MCR_DTR;
1027 if (info->emu.mdmreg[REG_DTRHUP] & BIT_DTRHUP) {
1028 #ifdef ISDN_DEBUG_MODEM_HUP
1029 printk(KERN_DEBUG "Mhup in changespeed\n");
1030 #endif
1031 if (info->online)
1032 info->ncarrier = 1;
1033 isdn_tty_modem_reset_regs(info, 0);
1034 isdn_tty_modem_hup(info, 1);
1035 }
1036 return;
1037 }
1038 /* byte size and parity */
1039 cval = cflag & (CSIZE | CSTOPB);
1040 cval >>= 4;
1041 if (cflag & PARENB)
1042 cval |= UART_LCR_PARITY;
1043 if (!(cflag & PARODD))
1044 cval |= UART_LCR_EPAR;
1045
1046 /* CTS flow control flag and modem status interrupts */
1047 if (cflag & CRTSCTS) {
1048 port->flags |= ASYNC_CTS_FLOW;
1049 } else
1050 port->flags &= ~ASYNC_CTS_FLOW;
1051 if (cflag & CLOCAL)
1052 port->flags &= ~ASYNC_CHECK_CD;
1053 else {
1054 port->flags |= ASYNC_CHECK_CD;
1055 }
1056 }
1057
1058 static int
1059 isdn_tty_startup(modem_info *info)
1060 {
1061 if (info->port.flags & ASYNC_INITIALIZED)
1062 return 0;
1063 isdn_lock_drivers();
1064 #ifdef ISDN_DEBUG_MODEM_OPEN
1065 printk(KERN_DEBUG "starting up ttyi%d ...\n", info->line);
1066 #endif
1067 /*
1068 * Now, initialize the UART
1069 */
1070 info->mcr = UART_MCR_DTR | UART_MCR_RTS | UART_MCR_OUT2;
1071 if (info->port.tty)
1072 clear_bit(TTY_IO_ERROR, &info->port.tty->flags);
1073 /*
1074 * and set the speed of the serial port
1075 */
1076 isdn_tty_change_speed(info);
1077
1078 info->port.flags |= ASYNC_INITIALIZED;
1079 info->msr |= (UART_MSR_DSR | UART_MSR_CTS);
1080 info->send_outstanding = 0;
1081 return 0;
1082 }
1083
1084 /*
1085 * This routine will shutdown a serial port; interrupts are disabled, and
1086 * DTR is dropped if the hangup on close termio flag is on.
1087 */
1088 static void
1089 isdn_tty_shutdown(modem_info *info)
1090 {
1091 if (!(info->port.flags & ASYNC_INITIALIZED))
1092 return;
1093 #ifdef ISDN_DEBUG_MODEM_OPEN
1094 printk(KERN_DEBUG "Shutting down isdnmodem port %d ....\n", info->line);
1095 #endif
1096 isdn_unlock_drivers();
1097 info->msr &= ~UART_MSR_RI;
1098 if (!info->port.tty || (info->port.tty->termios.c_cflag & HUPCL)) {
1099 info->mcr &= ~(UART_MCR_DTR | UART_MCR_RTS);
1100 if (info->emu.mdmreg[REG_DTRHUP] & BIT_DTRHUP) {
1101 isdn_tty_modem_reset_regs(info, 0);
1102 #ifdef ISDN_DEBUG_MODEM_HUP
1103 printk(KERN_DEBUG "Mhup in isdn_tty_shutdown\n");
1104 #endif
1105 isdn_tty_modem_hup(info, 1);
1106 }
1107 }
1108 if (info->port.tty)
1109 set_bit(TTY_IO_ERROR, &info->port.tty->flags);
1110
1111 info->port.flags &= ~ASYNC_INITIALIZED;
1112 }
1113
1114 /* isdn_tty_write() is the main send-routine. It is called from the upper
1115 * levels within the kernel to perform sending data. Depending on the
1116 * online-flag it either directs output to the at-command-interpreter or
1117 * to the lower level. Additional tasks done here:
1118 * - If online, check for escape-sequence (+++)
1119 * - If sending audio-data, call isdn_tty_DLEdown() to parse DLE-codes.
1120 * - If receiving audio-data, call isdn_tty_end_vrx() to abort if needed.
1121 * - If dialing, abort dial.
1122 */
1123 static int
1124 isdn_tty_write(struct tty_struct *tty, const u_char *buf, int count)
1125 {
1126 int c;
1127 int total = 0;
1128 modem_info *info = (modem_info *) tty->driver_data;
1129 atemu *m = &info->emu;
1130
1131 if (isdn_tty_paranoia_check(info, tty->name, "isdn_tty_write"))
1132 return 0;
1133 /* See isdn_tty_senddown() */
1134 atomic_inc(&info->xmit_lock);
1135 while (1) {
1136 c = count;
1137 if (c > info->xmit_size - info->xmit_count)
1138 c = info->xmit_size - info->xmit_count;
1139 if (info->isdn_driver >= 0 && c > dev->drv[info->isdn_driver]->maxbufsize)
1140 c = dev->drv[info->isdn_driver]->maxbufsize;
1141 if (c <= 0)
1142 break;
1143 if ((info->online > 1)
1144 #ifdef CONFIG_ISDN_AUDIO
1145 || (info->vonline & 3)
1146 #endif
1147 ) {
1148 #ifdef CONFIG_ISDN_AUDIO
1149 if (!info->vonline)
1150 #endif
1151 isdn_tty_check_esc(buf, m->mdmreg[REG_ESC], c,
1152 &(m->pluscount),
1153 &(m->lastplus));
1154 memcpy(&info->port.xmit_buf[info->xmit_count], buf, c);
1155 #ifdef CONFIG_ISDN_AUDIO
1156 if (info->vonline) {
1157 int cc = isdn_tty_handleDLEdown(info, m, c);
1158 if (info->vonline & 2) {
1159 if (!cc) {
1160 /* If DLE decoding results in zero-transmit, but
1161 * c originally was non-zero, do a wakeup.
1162 */
1163 tty_wakeup(tty);
1164 info->msr |= UART_MSR_CTS;
1165 info->lsr |= UART_LSR_TEMT;
1166 }
1167 info->xmit_count += cc;
1168 }
1169 if ((info->vonline & 3) == 1) {
1170 /* Do NOT handle Ctrl-Q or Ctrl-S
1171 * when in full-duplex audio mode.
1172 */
1173 if (isdn_tty_end_vrx(buf, c)) {
1174 info->vonline &= ~1;
1175 #ifdef ISDN_DEBUG_MODEM_VOICE
1176 printk(KERN_DEBUG
1177 "got !^Q/^S, send DLE-ETX,VCON on ttyI%d\n",
1178 info->line);
1179 #endif
1180 isdn_tty_at_cout("\020\003\r\nVCON\r\n", info);
1181 }
1182 }
1183 } else
1184 if (TTY_IS_FCLASS1(info)) {
1185 int cc = isdn_tty_handleDLEdown(info, m, c);
1186
1187 if (info->vonline & 4) { /* ETX seen */
1188 isdn_ctrl c;
1189
1190 c.command = ISDN_CMD_FAXCMD;
1191 c.driver = info->isdn_driver;
1192 c.arg = info->isdn_channel;
1193 c.parm.aux.cmd = ISDN_FAX_CLASS1_CTRL;
1194 c.parm.aux.subcmd = ETX;
1195 isdn_command(&c);
1196 }
1197 info->vonline = 0;
1198 #ifdef ISDN_DEBUG_MODEM_VOICE
1199 printk(KERN_DEBUG "fax dle cc/c %d/%d\n", cc, c);
1200 #endif
1201 info->xmit_count += cc;
1202 } else
1203 #endif
1204 info->xmit_count += c;
1205 } else {
1206 info->msr |= UART_MSR_CTS;
1207 info->lsr |= UART_LSR_TEMT;
1208 if (info->dialing) {
1209 info->dialing = 0;
1210 #ifdef ISDN_DEBUG_MODEM_HUP
1211 printk(KERN_DEBUG "Mhup in isdn_tty_write\n");
1212 #endif
1213 isdn_tty_modem_result(RESULT_NO_CARRIER, info);
1214 isdn_tty_modem_hup(info, 1);
1215 } else
1216 c = isdn_tty_edit_at(buf, c, info);
1217 }
1218 buf += c;
1219 count -= c;
1220 total += c;
1221 }
1222 atomic_dec(&info->xmit_lock);
1223 if ((info->xmit_count) || !skb_queue_empty(&info->xmit_queue)) {
1224 if (m->mdmreg[REG_DXMT] & BIT_DXMT) {
1225 isdn_tty_senddown(info);
1226 isdn_tty_tint(info);
1227 }
1228 isdn_timer_ctrl(ISDN_TIMER_MODEMXMIT, 1);
1229 }
1230 return total;
1231 }
1232
1233 static int
1234 isdn_tty_write_room(struct tty_struct *tty)
1235 {
1236 modem_info *info = (modem_info *) tty->driver_data;
1237 int ret;
1238
1239 if (isdn_tty_paranoia_check(info, tty->name, "isdn_tty_write_room"))
1240 return 0;
1241 if (!info->online)
1242 return info->xmit_size;
1243 ret = info->xmit_size - info->xmit_count;
1244 return (ret < 0) ? 0 : ret;
1245 }
1246
1247 static int
1248 isdn_tty_chars_in_buffer(struct tty_struct *tty)
1249 {
1250 modem_info *info = (modem_info *) tty->driver_data;
1251
1252 if (isdn_tty_paranoia_check(info, tty->name, "isdn_tty_chars_in_buffer"))
1253 return 0;
1254 if (!info->online)
1255 return 0;
1256 return (info->xmit_count);
1257 }
1258
1259 static void
1260 isdn_tty_flush_buffer(struct tty_struct *tty)
1261 {
1262 modem_info *info;
1263
1264 if (!tty) {
1265 return;
1266 }
1267 info = (modem_info *) tty->driver_data;
1268 if (isdn_tty_paranoia_check(info, tty->name, "isdn_tty_flush_buffer")) {
1269 return;
1270 }
1271 isdn_tty_cleanup_xmit(info);
1272 info->xmit_count = 0;
1273 tty_wakeup(tty);
1274 }
1275
1276 static void
1277 isdn_tty_flush_chars(struct tty_struct *tty)
1278 {
1279 modem_info *info = (modem_info *) tty->driver_data;
1280
1281 if (isdn_tty_paranoia_check(info, tty->name, "isdn_tty_flush_chars"))
1282 return;
1283 if ((info->xmit_count) || !skb_queue_empty(&info->xmit_queue))
1284 isdn_timer_ctrl(ISDN_TIMER_MODEMXMIT, 1);
1285 }
1286
1287 /*
1288 * ------------------------------------------------------------
1289 * isdn_tty_throttle()
1290 *
1291 * This routine is called by the upper-layer tty layer to signal that
1292 * incoming characters should be throttled.
1293 * ------------------------------------------------------------
1294 */
1295 static void
1296 isdn_tty_throttle(struct tty_struct *tty)
1297 {
1298 modem_info *info = (modem_info *) tty->driver_data;
1299
1300 if (isdn_tty_paranoia_check(info, tty->name, "isdn_tty_throttle"))
1301 return;
1302 if (I_IXOFF(tty))
1303 info->x_char = STOP_CHAR(tty);
1304 info->mcr &= ~UART_MCR_RTS;
1305 }
1306
1307 static void
1308 isdn_tty_unthrottle(struct tty_struct *tty)
1309 {
1310 modem_info *info = (modem_info *) tty->driver_data;
1311
1312 if (isdn_tty_paranoia_check(info, tty->name, "isdn_tty_unthrottle"))
1313 return;
1314 if (I_IXOFF(tty)) {
1315 if (info->x_char)
1316 info->x_char = 0;
1317 else
1318 info->x_char = START_CHAR(tty);
1319 }
1320 info->mcr |= UART_MCR_RTS;
1321 }
1322
1323 /*
1324 * ------------------------------------------------------------
1325 * isdn_tty_ioctl() and friends
1326 * ------------------------------------------------------------
1327 */
1328
1329 /*
1330 * isdn_tty_get_lsr_info - get line status register info
1331 *
1332 * Purpose: Let user call ioctl() to get info when the UART physically
1333 * is emptied. On bus types like RS485, the transmitter must
1334 * release the bus after transmitting. This must be done when
1335 * the transmit shift register is empty, not be done when the
1336 * transmit holding register is empty. This functionality
1337 * allows RS485 driver to be written in user space.
1338 */
1339 static int
1340 isdn_tty_get_lsr_info(modem_info *info, uint __user *value)
1341 {
1342 u_char status;
1343 uint result;
1344
1345 status = info->lsr;
1346 result = ((status & UART_LSR_TEMT) ? TIOCSER_TEMT : 0);
1347 return put_user(result, value);
1348 }
1349
1350
1351 static int
1352 isdn_tty_tiocmget(struct tty_struct *tty)
1353 {
1354 modem_info *info = (modem_info *) tty->driver_data;
1355 u_char control, status;
1356
1357 if (isdn_tty_paranoia_check(info, tty->name, __func__))
1358 return -ENODEV;
1359 if (tty->flags & (1 << TTY_IO_ERROR))
1360 return -EIO;
1361
1362 mutex_lock(&modem_info_mutex);
1363 #ifdef ISDN_DEBUG_MODEM_IOCTL
1364 printk(KERN_DEBUG "ttyI%d ioctl TIOCMGET\n", info->line);
1365 #endif
1366
1367 control = info->mcr;
1368 status = info->msr;
1369 mutex_unlock(&modem_info_mutex);
1370 return ((control & UART_MCR_RTS) ? TIOCM_RTS : 0)
1371 | ((control & UART_MCR_DTR) ? TIOCM_DTR : 0)
1372 | ((status & UART_MSR_DCD) ? TIOCM_CAR : 0)
1373 | ((status & UART_MSR_RI) ? TIOCM_RNG : 0)
1374 | ((status & UART_MSR_DSR) ? TIOCM_DSR : 0)
1375 | ((status & UART_MSR_CTS) ? TIOCM_CTS : 0);
1376 }
1377
1378 static int
1379 isdn_tty_tiocmset(struct tty_struct *tty,
1380 unsigned int set, unsigned int clear)
1381 {
1382 modem_info *info = (modem_info *) tty->driver_data;
1383
1384 if (isdn_tty_paranoia_check(info, tty->name, __func__))
1385 return -ENODEV;
1386 if (tty->flags & (1 << TTY_IO_ERROR))
1387 return -EIO;
1388
1389 #ifdef ISDN_DEBUG_MODEM_IOCTL
1390 printk(KERN_DEBUG "ttyI%d ioctl TIOCMxxx: %x %x\n", info->line, set, clear);
1391 #endif
1392
1393 mutex_lock(&modem_info_mutex);
1394 if (set & TIOCM_RTS)
1395 info->mcr |= UART_MCR_RTS;
1396 if (set & TIOCM_DTR) {
1397 info->mcr |= UART_MCR_DTR;
1398 isdn_tty_modem_ncarrier(info);
1399 }
1400
1401 if (clear & TIOCM_RTS)
1402 info->mcr &= ~UART_MCR_RTS;
1403 if (clear & TIOCM_DTR) {
1404 info->mcr &= ~UART_MCR_DTR;
1405 if (info->emu.mdmreg[REG_DTRHUP] & BIT_DTRHUP) {
1406 isdn_tty_modem_reset_regs(info, 0);
1407 #ifdef ISDN_DEBUG_MODEM_HUP
1408 printk(KERN_DEBUG "Mhup in TIOCMSET\n");
1409 #endif
1410 if (info->online)
1411 info->ncarrier = 1;
1412 isdn_tty_modem_hup(info, 1);
1413 }
1414 }
1415 mutex_unlock(&modem_info_mutex);
1416 return 0;
1417 }
1418
1419 static int
1420 isdn_tty_ioctl(struct tty_struct *tty, uint cmd, ulong arg)
1421 {
1422 modem_info *info = (modem_info *) tty->driver_data;
1423 int retval;
1424
1425 if (isdn_tty_paranoia_check(info, tty->name, "isdn_tty_ioctl"))
1426 return -ENODEV;
1427 if (tty->flags & (1 << TTY_IO_ERROR))
1428 return -EIO;
1429 switch (cmd) {
1430 case TCSBRK: /* SVID version: non-zero arg --> no break */
1431 #ifdef ISDN_DEBUG_MODEM_IOCTL
1432 printk(KERN_DEBUG "ttyI%d ioctl TCSBRK\n", info->line);
1433 #endif
1434 retval = tty_check_change(tty);
1435 if (retval)
1436 return retval;
1437 tty_wait_until_sent(tty, 0);
1438 return 0;
1439 case TCSBRKP: /* support for POSIX tcsendbreak() */
1440 #ifdef ISDN_DEBUG_MODEM_IOCTL
1441 printk(KERN_DEBUG "ttyI%d ioctl TCSBRKP\n", info->line);
1442 #endif
1443 retval = tty_check_change(tty);
1444 if (retval)
1445 return retval;
1446 tty_wait_until_sent(tty, 0);
1447 return 0;
1448 case TIOCSERGETLSR: /* Get line status register */
1449 #ifdef ISDN_DEBUG_MODEM_IOCTL
1450 printk(KERN_DEBUG "ttyI%d ioctl TIOCSERGETLSR\n", info->line);
1451 #endif
1452 return isdn_tty_get_lsr_info(info, (uint __user *) arg);
1453 default:
1454 #ifdef ISDN_DEBUG_MODEM_IOCTL
1455 printk(KERN_DEBUG "UNKNOWN ioctl 0x%08x on ttyi%d\n", cmd, info->line);
1456 #endif
1457 return -ENOIOCTLCMD;
1458 }
1459 return 0;
1460 }
1461
1462 static void
1463 isdn_tty_set_termios(struct tty_struct *tty, struct ktermios *old_termios)
1464 {
1465 modem_info *info = (modem_info *) tty->driver_data;
1466
1467 if (!old_termios)
1468 isdn_tty_change_speed(info);
1469 else {
1470 if (tty->termios.c_cflag == old_termios->c_cflag &&
1471 tty->termios.c_ispeed == old_termios->c_ispeed &&
1472 tty->termios.c_ospeed == old_termios->c_ospeed)
1473 return;
1474 isdn_tty_change_speed(info);
1475 }
1476 }
1477
1478 /*
1479 * ------------------------------------------------------------
1480 * isdn_tty_open() and friends
1481 * ------------------------------------------------------------
1482 */
1483
1484 static int isdn_tty_install(struct tty_driver *driver, struct tty_struct *tty)
1485 {
1486 modem_info *info = &dev->mdm.info[tty->index];
1487
1488 if (isdn_tty_paranoia_check(info, tty->name, __func__))
1489 return -ENODEV;
1490
1491 tty->driver_data = info;
1492
1493 return tty_port_install(&info->port, driver, tty);
1494 }
1495
1496 /*
1497 * This routine is called whenever a serial port is opened. It
1498 * enables interrupts for a serial port, linking in its async structure into
1499 * the IRQ chain. It also performs the serial-specific
1500 * initialization for the tty structure.
1501 */
1502 static int
1503 isdn_tty_open(struct tty_struct *tty, struct file *filp)
1504 {
1505 modem_info *info = tty->driver_data;
1506 struct tty_port *port = &info->port;
1507 int retval;
1508
1509 #ifdef ISDN_DEBUG_MODEM_OPEN
1510 printk(KERN_DEBUG "isdn_tty_open %s, count = %d\n", tty->name,
1511 port->count);
1512 #endif
1513 port->count++;
1514 port->tty = tty;
1515 /*
1516 * Start up serial port
1517 */
1518 retval = isdn_tty_startup(info);
1519 if (retval) {
1520 #ifdef ISDN_DEBUG_MODEM_OPEN
1521 printk(KERN_DEBUG "isdn_tty_open return after startup\n");
1522 #endif
1523 return retval;
1524 }
1525 retval = tty_port_block_til_ready(port, tty, filp);
1526 if (retval) {
1527 #ifdef ISDN_DEBUG_MODEM_OPEN
1528 printk(KERN_DEBUG "isdn_tty_open return after isdn_tty_block_til_ready \n");
1529 #endif
1530 return retval;
1531 }
1532 #ifdef ISDN_DEBUG_MODEM_OPEN
1533 printk(KERN_DEBUG "isdn_tty_open ttyi%d successful...\n", info->line);
1534 #endif
1535 dev->modempoll++;
1536 #ifdef ISDN_DEBUG_MODEM_OPEN
1537 printk(KERN_DEBUG "isdn_tty_open normal exit\n");
1538 #endif
1539 return 0;
1540 }
1541
1542 static void
1543 isdn_tty_close(struct tty_struct *tty, struct file *filp)
1544 {
1545 modem_info *info = (modem_info *) tty->driver_data;
1546 struct tty_port *port = &info->port;
1547 ulong timeout;
1548
1549 if (!info || isdn_tty_paranoia_check(info, tty->name, "isdn_tty_close"))
1550 return;
1551 if (tty_hung_up_p(filp)) {
1552 #ifdef ISDN_DEBUG_MODEM_OPEN
1553 printk(KERN_DEBUG "isdn_tty_close return after tty_hung_up_p\n");
1554 #endif
1555 return;
1556 }
1557 if ((tty->count == 1) && (port->count != 1)) {
1558 /*
1559 * Uh, oh. tty->count is 1, which means that the tty
1560 * structure will be freed. Info->count should always
1561 * be one in these conditions. If it's greater than
1562 * one, we've got real problems, since it means the
1563 * serial port won't be shutdown.
1564 */
1565 printk(KERN_ERR "isdn_tty_close: bad port count; tty->count is 1, "
1566 "info->count is %d\n", port->count);
1567 port->count = 1;
1568 }
1569 if (--port->count < 0) {
1570 printk(KERN_ERR "isdn_tty_close: bad port count for ttyi%d: %d\n",
1571 info->line, port->count);
1572 port->count = 0;
1573 }
1574 if (port->count) {
1575 #ifdef ISDN_DEBUG_MODEM_OPEN
1576 printk(KERN_DEBUG "isdn_tty_close after info->count != 0\n");
1577 #endif
1578 return;
1579 }
1580 port->flags |= ASYNC_CLOSING;
1581
1582 tty->closing = 1;
1583 /*
1584 * At this point we stop accepting input. To do this, we
1585 * disable the receive line status interrupts, and tell the
1586 * interrupt driver to stop checking the data ready bit in the
1587 * line status register.
1588 */
1589 if (port->flags & ASYNC_INITIALIZED) {
1590 tty_wait_until_sent_from_close(tty, 3000); /* 30 seconds timeout */
1591 /*
1592 * Before we drop DTR, make sure the UART transmitter
1593 * has completely drained; this is especially
1594 * important if there is a transmit FIFO!
1595 */
1596 timeout = jiffies + HZ;
1597 while (!(info->lsr & UART_LSR_TEMT)) {
1598 schedule_timeout_interruptible(20);
1599 if (time_after(jiffies, timeout))
1600 break;
1601 }
1602 }
1603 dev->modempoll--;
1604 isdn_tty_shutdown(info);
1605 isdn_tty_flush_buffer(tty);
1606 tty_ldisc_flush(tty);
1607 port->tty = NULL;
1608 info->ncarrier = 0;
1609
1610 tty_port_close_end(port, tty);
1611 #ifdef ISDN_DEBUG_MODEM_OPEN
1612 printk(KERN_DEBUG "isdn_tty_close normal exit\n");
1613 #endif
1614 }
1615
1616 /*
1617 * isdn_tty_hangup() --- called by tty_hangup() when a hangup is signaled.
1618 */
1619 static void
1620 isdn_tty_hangup(struct tty_struct *tty)
1621 {
1622 modem_info *info = (modem_info *) tty->driver_data;
1623 struct tty_port *port = &info->port;
1624
1625 if (isdn_tty_paranoia_check(info, tty->name, "isdn_tty_hangup"))
1626 return;
1627 isdn_tty_shutdown(info);
1628 port->count = 0;
1629 port->flags &= ~ASYNC_NORMAL_ACTIVE;
1630 port->tty = NULL;
1631 wake_up_interruptible(&port->open_wait);
1632 }
1633
1634 /* This routine initializes all emulator-data.
1635 */
1636 static void
1637 isdn_tty_reset_profile(atemu *m)
1638 {
1639 m->profile[0] = 0;
1640 m->profile[1] = 0;
1641 m->profile[2] = 43;
1642 m->profile[3] = 13;
1643 m->profile[4] = 10;
1644 m->profile[5] = 8;
1645 m->profile[6] = 3;
1646 m->profile[7] = 60;
1647 m->profile[8] = 2;
1648 m->profile[9] = 6;
1649 m->profile[10] = 7;
1650 m->profile[11] = 70;
1651 m->profile[12] = 0x45;
1652 m->profile[13] = 4;
1653 m->profile[14] = ISDN_PROTO_L2_X75I;
1654 m->profile[15] = ISDN_PROTO_L3_TRANS;
1655 m->profile[16] = ISDN_SERIAL_XMIT_SIZE / 16;
1656 m->profile[17] = ISDN_MODEM_WINSIZE;
1657 m->profile[18] = 4;
1658 m->profile[19] = 0;
1659 m->profile[20] = 0;
1660 m->profile[23] = 0;
1661 m->pmsn[0] = '\0';
1662 m->plmsn[0] = '\0';
1663 }
1664
1665 #ifdef CONFIG_ISDN_AUDIO
1666 static void
1667 isdn_tty_modem_reset_vpar(atemu *m)
1668 {
1669 m->vpar[0] = 2; /* Voice-device (2 = phone line) */
1670 m->vpar[1] = 0; /* Silence detection level (0 = none ) */
1671 m->vpar[2] = 70; /* Silence interval (7 sec. ) */
1672 m->vpar[3] = 2; /* Compression type (1 = ADPCM-2 ) */
1673 m->vpar[4] = 0; /* DTMF detection level (0 = softcode ) */
1674 m->vpar[5] = 8; /* DTMF interval (8 * 5 ms. ) */
1675 }
1676 #endif
1677
1678 #ifdef CONFIG_ISDN_TTY_FAX
1679 static void
1680 isdn_tty_modem_reset_faxpar(modem_info *info)
1681 {
1682 T30_s *f = info->fax;
1683
1684 f->code = 0;
1685 f->phase = ISDN_FAX_PHASE_IDLE;
1686 f->direction = 0;
1687 f->resolution = 1; /* fine */
1688 f->rate = 5; /* 14400 bit/s */
1689 f->width = 0;
1690 f->length = 0;
1691 f->compression = 0;
1692 f->ecm = 0;
1693 f->binary = 0;
1694 f->scantime = 0;
1695 memset(&f->id[0], 32, FAXIDLEN - 1);
1696 f->id[FAXIDLEN - 1] = 0;
1697 f->badlin = 0;
1698 f->badmul = 0;
1699 f->bor = 0;
1700 f->nbc = 0;
1701 f->cq = 0;
1702 f->cr = 0;
1703 f->ctcrty = 0;
1704 f->minsp = 0;
1705 f->phcto = 30;
1706 f->rel = 0;
1707 memset(&f->pollid[0], 32, FAXIDLEN - 1);
1708 f->pollid[FAXIDLEN - 1] = 0;
1709 }
1710 #endif
1711
1712 static void
1713 isdn_tty_modem_reset_regs(modem_info *info, int force)
1714 {
1715 atemu *m = &info->emu;
1716 if ((m->mdmreg[REG_DTRR] & BIT_DTRR) || force) {
1717 memcpy(m->mdmreg, m->profile, ISDN_MODEM_NUMREG);
1718 memcpy(m->msn, m->pmsn, ISDN_MSNLEN);
1719 memcpy(m->lmsn, m->plmsn, ISDN_LMSNLEN);
1720 info->xmit_size = m->mdmreg[REG_PSIZE] * 16;
1721 }
1722 #ifdef CONFIG_ISDN_AUDIO
1723 isdn_tty_modem_reset_vpar(m);
1724 #endif
1725 #ifdef CONFIG_ISDN_TTY_FAX
1726 isdn_tty_modem_reset_faxpar(info);
1727 #endif
1728 m->mdmcmdl = 0;
1729 }
1730
1731 static void
1732 modem_write_profile(atemu *m)
1733 {
1734 memcpy(m->profile, m->mdmreg, ISDN_MODEM_NUMREG);
1735 memcpy(m->pmsn, m->msn, ISDN_MSNLEN);
1736 memcpy(m->plmsn, m->lmsn, ISDN_LMSNLEN);
1737 if (dev->profd)
1738 send_sig(SIGIO, dev->profd, 1);
1739 }
1740
1741 static const struct tty_operations modem_ops = {
1742 .install = isdn_tty_install,
1743 .open = isdn_tty_open,
1744 .close = isdn_tty_close,
1745 .write = isdn_tty_write,
1746 .flush_chars = isdn_tty_flush_chars,
1747 .write_room = isdn_tty_write_room,
1748 .chars_in_buffer = isdn_tty_chars_in_buffer,
1749 .flush_buffer = isdn_tty_flush_buffer,
1750 .ioctl = isdn_tty_ioctl,
1751 .throttle = isdn_tty_throttle,
1752 .unthrottle = isdn_tty_unthrottle,
1753 .set_termios = isdn_tty_set_termios,
1754 .hangup = isdn_tty_hangup,
1755 .tiocmget = isdn_tty_tiocmget,
1756 .tiocmset = isdn_tty_tiocmset,
1757 };
1758
1759 static int isdn_tty_carrier_raised(struct tty_port *port)
1760 {
1761 modem_info *info = container_of(port, modem_info, port);
1762 return info->msr & UART_MSR_DCD;
1763 }
1764
1765 static const struct tty_port_operations isdn_tty_port_ops = {
1766 .carrier_raised = isdn_tty_carrier_raised,
1767 };
1768
1769 int
1770 isdn_tty_modem_init(void)
1771 {
1772 isdn_modem_t *m;
1773 int i, retval;
1774 modem_info *info;
1775
1776 m = &dev->mdm;
1777 m->tty_modem = alloc_tty_driver(ISDN_MAX_CHANNELS);
1778 if (!m->tty_modem)
1779 return -ENOMEM;
1780 m->tty_modem->name = "ttyI";
1781 m->tty_modem->major = ISDN_TTY_MAJOR;
1782 m->tty_modem->minor_start = 0;
1783 m->tty_modem->type = TTY_DRIVER_TYPE_SERIAL;
1784 m->tty_modem->subtype = SERIAL_TYPE_NORMAL;
1785 m->tty_modem->init_termios = tty_std_termios;
1786 m->tty_modem->init_termios.c_cflag = B9600 | CS8 | CREAD | HUPCL | CLOCAL;
1787 m->tty_modem->flags = TTY_DRIVER_REAL_RAW;
1788 m->tty_modem->driver_name = "isdn_tty";
1789 tty_set_operations(m->tty_modem, &modem_ops);
1790 retval = tty_register_driver(m->tty_modem);
1791 if (retval) {
1792 printk(KERN_WARNING "isdn_tty: Couldn't register modem-device\n");
1793 goto err;
1794 }
1795 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
1796 info = &m->info[i];
1797 #ifdef CONFIG_ISDN_TTY_FAX
1798 if (!(info->fax = kmalloc(sizeof(T30_s), GFP_KERNEL))) {
1799 printk(KERN_ERR "Could not allocate fax t30-buffer\n");
1800 retval = -ENOMEM;
1801 goto err_unregister;
1802 }
1803 #endif
1804 tty_port_init(&info->port);
1805 info->port.ops = &isdn_tty_port_ops;
1806 spin_lock_init(&info->readlock);
1807 sprintf(info->last_cause, "0000");
1808 sprintf(info->last_num, "none");
1809 info->last_dir = 0;
1810 info->last_lhup = 1;
1811 info->last_l2 = -1;
1812 info->last_si = 0;
1813 isdn_tty_reset_profile(&info->emu);
1814 isdn_tty_modem_reset_regs(info, 1);
1815 info->magic = ISDN_ASYNC_MAGIC;
1816 info->line = i;
1817 info->x_char = 0;
1818 info->isdn_driver = -1;
1819 info->isdn_channel = -1;
1820 info->drv_index = -1;
1821 info->xmit_size = ISDN_SERIAL_XMIT_SIZE;
1822 init_timer(&info->nc_timer);
1823 info->nc_timer.function = isdn_tty_modem_do_ncarrier;
1824 info->nc_timer.data = (unsigned long) info;
1825 skb_queue_head_init(&info->xmit_queue);
1826 #ifdef CONFIG_ISDN_AUDIO
1827 skb_queue_head_init(&info->dtmf_queue);
1828 #endif
1829 info->port.xmit_buf = kmalloc(ISDN_SERIAL_XMIT_MAX + 5,
1830 GFP_KERNEL);
1831 if (!info->port.xmit_buf) {
1832 printk(KERN_ERR "Could not allocate modem xmit-buffer\n");
1833 retval = -ENOMEM;
1834 goto err_unregister;
1835 }
1836 /* Make room for T.70 header */
1837 info->port.xmit_buf += 4;
1838 }
1839 return 0;
1840 err_unregister:
1841 for (i--; i >= 0; i--) {
1842 info = &m->info[i];
1843 #ifdef CONFIG_ISDN_TTY_FAX
1844 kfree(info->fax);
1845 #endif
1846 kfree(info->port.xmit_buf - 4);
1847 info->port.xmit_buf = NULL;
1848 tty_port_destroy(&info->port);
1849 }
1850 tty_unregister_driver(m->tty_modem);
1851 err:
1852 put_tty_driver(m->tty_modem);
1853 m->tty_modem = NULL;
1854 return retval;
1855 }
1856
1857 void
1858 isdn_tty_exit(void)
1859 {
1860 modem_info *info;
1861 int i;
1862
1863 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
1864 info = &dev->mdm.info[i];
1865 isdn_tty_cleanup_xmit(info);
1866 #ifdef CONFIG_ISDN_TTY_FAX
1867 kfree(info->fax);
1868 #endif
1869 kfree(info->port.xmit_buf - 4);
1870 info->port.xmit_buf = NULL;
1871 tty_port_destroy(&info->port);
1872 }
1873 tty_unregister_driver(dev->mdm.tty_modem);
1874 put_tty_driver(dev->mdm.tty_modem);
1875 dev->mdm.tty_modem = NULL;
1876 }
1877
1878
1879 /*
1880 * isdn_tty_match_icall(char *MSN, atemu *tty_emulator, int dev_idx)
1881 * match the MSN against the MSNs (glob patterns) defined for tty_emulator,
1882 * and return 0 for match, 1 for no match, 2 if MSN could match if longer.
1883 */
1884
1885 static int
1886 isdn_tty_match_icall(char *cid, atemu *emu, int di)
1887 {
1888 #ifdef ISDN_DEBUG_MODEM_ICALL
1889 printk(KERN_DEBUG "m_fi: msn=%s lmsn=%s mmsn=%s mreg[SI1]=%d mreg[SI2]=%d\n",
1890 emu->msn, emu->lmsn, isdn_map_eaz2msn(emu->msn, di),
1891 emu->mdmreg[REG_SI1], emu->mdmreg[REG_SI2]);
1892 #endif
1893 if (strlen(emu->lmsn)) {
1894 char *p = emu->lmsn;
1895 char *q;
1896 int tmp;
1897 int ret = 0;
1898
1899 while (1) {
1900 if ((q = strchr(p, ';')))
1901 *q = '\0';
1902 if ((tmp = isdn_msncmp(cid, isdn_map_eaz2msn(p, di))) > ret)
1903 ret = tmp;
1904 #ifdef ISDN_DEBUG_MODEM_ICALL
1905 printk(KERN_DEBUG "m_fi: lmsnX=%s mmsn=%s -> tmp=%d\n",
1906 p, isdn_map_eaz2msn(emu->msn, di), tmp);
1907 #endif
1908 if (q) {
1909 *q = ';';
1910 p = q;
1911 p++;
1912 }
1913 if (!tmp)
1914 return 0;
1915 if (!q)
1916 break;
1917 }
1918 return ret;
1919 } else {
1920 int tmp;
1921 tmp = isdn_msncmp(cid, isdn_map_eaz2msn(emu->msn, di));
1922 #ifdef ISDN_DEBUG_MODEM_ICALL
1923 printk(KERN_DEBUG "m_fi: mmsn=%s -> tmp=%d\n",
1924 isdn_map_eaz2msn(emu->msn, di), tmp);
1925 #endif
1926 return tmp;
1927 }
1928 }
1929
1930 /*
1931 * An incoming call-request has arrived.
1932 * Search the tty-devices for an appropriate device and bind
1933 * it to the ISDN-Channel.
1934 * Return:
1935 *
1936 * 0 = No matching device found.
1937 * 1 = A matching device found.
1938 * 3 = No match found, but eventually would match, if
1939 * CID is longer.
1940 */
1941 int
1942 isdn_tty_find_icall(int di, int ch, setup_parm *setup)
1943 {
1944 char *eaz;
1945 int i;
1946 int wret;
1947 int idx;
1948 int si1;
1949 int si2;
1950 char *nr;
1951 ulong flags;
1952
1953 if (!setup->phone[0]) {
1954 nr = "0";
1955 printk(KERN_INFO "isdn_tty: Incoming call without OAD, assuming '0'\n");
1956 } else
1957 nr = setup->phone;
1958 si1 = (int) setup->si1;
1959 si2 = (int) setup->si2;
1960 if (!setup->eazmsn[0]) {
1961 printk(KERN_WARNING "isdn_tty: Incoming call without CPN, assuming '0'\n");
1962 eaz = "0";
1963 } else
1964 eaz = setup->eazmsn;
1965 #ifdef ISDN_DEBUG_MODEM_ICALL
1966 printk(KERN_DEBUG "m_fi: eaz=%s si1=%d si2=%d\n", eaz, si1, si2);
1967 #endif
1968 wret = 0;
1969 spin_lock_irqsave(&dev->lock, flags);
1970 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
1971 modem_info *info = &dev->mdm.info[i];
1972
1973 if (info->port.count == 0)
1974 continue;
1975 if ((info->emu.mdmreg[REG_SI1] & si2bit[si1]) && /* SI1 is matching */
1976 (info->emu.mdmreg[REG_SI2] == si2)) { /* SI2 is matching */
1977 idx = isdn_dc2minor(di, ch);
1978 #ifdef ISDN_DEBUG_MODEM_ICALL
1979 printk(KERN_DEBUG "m_fi: match1 wret=%d\n", wret);
1980 printk(KERN_DEBUG "m_fi: idx=%d flags=%08lx drv=%d ch=%d usg=%d\n", idx,
1981 info->port.flags, info->isdn_driver,
1982 info->isdn_channel, dev->usage[idx]);
1983 #endif
1984 if (
1985 #ifndef FIX_FILE_TRANSFER
1986 (info->port.flags & ASYNC_NORMAL_ACTIVE) &&
1987 #endif
1988 (info->isdn_driver == -1) &&
1989 (info->isdn_channel == -1) &&
1990 (USG_NONE(dev->usage[idx]))) {
1991 int matchret;
1992
1993 if ((matchret = isdn_tty_match_icall(eaz, &info->emu, di)) > wret)
1994 wret = matchret;
1995 if (!matchret) { /* EAZ is matching */
1996 info->isdn_driver = di;
1997 info->isdn_channel = ch;
1998 info->drv_index = idx;
1999 dev->m_idx[idx] = info->line;
2000 dev->usage[idx] &= ISDN_USAGE_EXCLUSIVE;
2001 dev->usage[idx] |= isdn_calc_usage(si1, info->emu.mdmreg[REG_L2PROT]);
2002 strcpy(dev->num[idx], nr);
2003 strcpy(info->emu.cpn, eaz);
2004 info->emu.mdmreg[REG_SI1I] = si2bit[si1];
2005 info->emu.mdmreg[REG_PLAN] = setup->plan;
2006 info->emu.mdmreg[REG_SCREEN] = setup->screen;
2007 isdn_info_update();
2008 spin_unlock_irqrestore(&dev->lock, flags);
2009 printk(KERN_INFO "isdn_tty: call from %s, -> RING on ttyI%d\n", nr,
2010 info->line);
2011 info->msr |= UART_MSR_RI;
2012 isdn_tty_modem_result(RESULT_RING, info);
2013 isdn_timer_ctrl(ISDN_TIMER_MODEMRING, 1);
2014 return 1;
2015 }
2016 }
2017 }
2018 }
2019 spin_unlock_irqrestore(&dev->lock, flags);
2020 printk(KERN_INFO "isdn_tty: call from %s -> %s %s\n", nr, eaz,
2021 ((dev->drv[di]->flags & DRV_FLAG_REJBUS) && (wret != 2)) ? "rejected" : "ignored");
2022 return (wret == 2) ? 3 : 0;
2023 }
2024
2025 #define TTY_IS_ACTIVE(info) (info->port.flags & ASYNC_NORMAL_ACTIVE)
2026
2027 int
2028 isdn_tty_stat_callback(int i, isdn_ctrl *c)
2029 {
2030 int mi;
2031 modem_info *info;
2032 char *e;
2033
2034 if (i < 0)
2035 return 0;
2036 if ((mi = dev->m_idx[i]) >= 0) {
2037 info = &dev->mdm.info[mi];
2038 switch (c->command) {
2039 case ISDN_STAT_CINF:
2040 printk(KERN_DEBUG "CHARGEINFO on ttyI%d: %ld %s\n", info->line, c->arg, c->parm.num);
2041 info->emu.charge = (unsigned) simple_strtoul(c->parm.num, &e, 10);
2042 if (e == (char *)c->parm.num)
2043 info->emu.charge = 0;
2044
2045 break;
2046 case ISDN_STAT_BSENT:
2047 #ifdef ISDN_TTY_STAT_DEBUG
2048 printk(KERN_DEBUG "tty_STAT_BSENT ttyI%d\n", info->line);
2049 #endif
2050 if ((info->isdn_driver == c->driver) &&
2051 (info->isdn_channel == c->arg)) {
2052 info->msr |= UART_MSR_CTS;
2053 if (info->send_outstanding)
2054 if (!(--info->send_outstanding))
2055 info->lsr |= UART_LSR_TEMT;
2056 isdn_tty_tint(info);
2057 return 1;
2058 }
2059 break;
2060 case ISDN_STAT_CAUSE:
2061 #ifdef ISDN_TTY_STAT_DEBUG
2062 printk(KERN_DEBUG "tty_STAT_CAUSE ttyI%d\n", info->line);
2063 #endif
2064 /* Signal cause to tty-device */
2065 strncpy(info->last_cause, c->parm.num, 5);
2066 return 1;
2067 case ISDN_STAT_DISPLAY:
2068 #ifdef ISDN_TTY_STAT_DEBUG
2069 printk(KERN_DEBUG "tty_STAT_DISPLAY ttyI%d\n", info->line);
2070 #endif
2071 /* Signal display to tty-device */
2072 if ((info->emu.mdmreg[REG_DISPLAY] & BIT_DISPLAY) &&
2073 !(info->emu.mdmreg[REG_RESPNUM] & BIT_RESPNUM)) {
2074 isdn_tty_at_cout("\r\n", info);
2075 isdn_tty_at_cout("DISPLAY: ", info);
2076 isdn_tty_at_cout(c->parm.display, info);
2077 isdn_tty_at_cout("\r\n", info);
2078 }
2079 return 1;
2080 case ISDN_STAT_DCONN:
2081 #ifdef ISDN_TTY_STAT_DEBUG
2082 printk(KERN_DEBUG "tty_STAT_DCONN ttyI%d\n", info->line);
2083 #endif
2084 if (TTY_IS_ACTIVE(info)) {
2085 if (info->dialing == 1) {
2086 info->dialing = 2;
2087 return 1;
2088 }
2089 }
2090 break;
2091 case ISDN_STAT_DHUP:
2092 #ifdef ISDN_TTY_STAT_DEBUG
2093 printk(KERN_DEBUG "tty_STAT_DHUP ttyI%d\n", info->line);
2094 #endif
2095 if (TTY_IS_ACTIVE(info)) {
2096 if (info->dialing == 1)
2097 isdn_tty_modem_result(RESULT_BUSY, info);
2098 if (info->dialing > 1)
2099 isdn_tty_modem_result(RESULT_NO_CARRIER, info);
2100 info->dialing = 0;
2101 #ifdef ISDN_DEBUG_MODEM_HUP
2102 printk(KERN_DEBUG "Mhup in ISDN_STAT_DHUP\n");
2103 #endif
2104 isdn_tty_modem_hup(info, 0);
2105 return 1;
2106 }
2107 break;
2108 case ISDN_STAT_BCONN:
2109 #ifdef ISDN_TTY_STAT_DEBUG
2110 printk(KERN_DEBUG "tty_STAT_BCONN ttyI%d\n", info->line);
2111 #endif
2112 /* Wake up any processes waiting
2113 * for incoming call of this device when
2114 * DCD follow the state of incoming carrier
2115 */
2116 if (info->port.blocked_open &&
2117 (info->emu.mdmreg[REG_DCD] & BIT_DCD)) {
2118 wake_up_interruptible(&info->port.open_wait);
2119 }
2120
2121 /* Schedule CONNECT-Message to any tty
2122 * waiting for it and
2123 * set DCD-bit of its modem-status.
2124 */
2125 if (TTY_IS_ACTIVE(info) ||
2126 (info->port.blocked_open &&
2127 (info->emu.mdmreg[REG_DCD] & BIT_DCD))) {
2128 info->msr |= UART_MSR_DCD;
2129 info->emu.charge = 0;
2130 if (info->dialing & 0xf)
2131 info->last_dir = 1;
2132 else
2133 info->last_dir = 0;
2134 info->dialing = 0;
2135 info->rcvsched = 1;
2136 if (USG_MODEM(dev->usage[i])) {
2137 if (info->emu.mdmreg[REG_L2PROT] == ISDN_PROTO_L2_MODEM) {
2138 strcpy(info->emu.connmsg, c->parm.num);
2139 isdn_tty_modem_result(RESULT_CONNECT, info);
2140 } else
2141 isdn_tty_modem_result(RESULT_CONNECT64000, info);
2142 }
2143 if (USG_VOICE(dev->usage[i]))
2144 isdn_tty_modem_result(RESULT_VCON, info);
2145 return 1;
2146 }
2147 break;
2148 case ISDN_STAT_BHUP:
2149 #ifdef ISDN_TTY_STAT_DEBUG
2150 printk(KERN_DEBUG "tty_STAT_BHUP ttyI%d\n", info->line);
2151 #endif
2152 if (TTY_IS_ACTIVE(info)) {
2153 #ifdef ISDN_DEBUG_MODEM_HUP
2154 printk(KERN_DEBUG "Mhup in ISDN_STAT_BHUP\n");
2155 #endif
2156 isdn_tty_modem_hup(info, 0);
2157 return 1;
2158 }
2159 break;
2160 case ISDN_STAT_NODCH:
2161 #ifdef ISDN_TTY_STAT_DEBUG
2162 printk(KERN_DEBUG "tty_STAT_NODCH ttyI%d\n", info->line);
2163 #endif
2164 if (TTY_IS_ACTIVE(info)) {
2165 if (info->dialing) {
2166 info->dialing = 0;
2167 info->last_l2 = -1;
2168 info->last_si = 0;
2169 sprintf(info->last_cause, "0000");
2170 isdn_tty_modem_result(RESULT_NO_DIALTONE, info);
2171 }
2172 isdn_tty_modem_hup(info, 0);
2173 return 1;
2174 }
2175 break;
2176 case ISDN_STAT_UNLOAD:
2177 #ifdef ISDN_TTY_STAT_DEBUG
2178 printk(KERN_DEBUG "tty_STAT_UNLOAD ttyI%d\n", info->line);
2179 #endif
2180 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
2181 info = &dev->mdm.info[i];
2182 if (info->isdn_driver == c->driver) {
2183 if (info->online)
2184 isdn_tty_modem_hup(info, 1);
2185 }
2186 }
2187 return 1;
2188 #ifdef CONFIG_ISDN_TTY_FAX
2189 case ISDN_STAT_FAXIND:
2190 if (TTY_IS_ACTIVE(info)) {
2191 isdn_tty_fax_command(info, c);
2192 }
2193 break;
2194 #endif
2195 #ifdef CONFIG_ISDN_AUDIO
2196 case ISDN_STAT_AUDIO:
2197 if (TTY_IS_ACTIVE(info)) {
2198 switch (c->parm.num[0]) {
2199 case ISDN_AUDIO_DTMF:
2200 if (info->vonline) {
2201 isdn_audio_put_dle_code(info,
2202 c->parm.num[1]);
2203 }
2204 break;
2205 }
2206 }
2207 break;
2208 #endif
2209 }
2210 }
2211 return 0;
2212 }
2213
2214 /*********************************************************************
2215 Modem-Emulator-Routines
2216 *********************************************************************/
2217
2218 #define cmdchar(c) ((c >= ' ') && (c <= 0x7f))
2219
2220 /*
2221 * Put a message from the AT-emulator into receive-buffer of tty,
2222 * convert CR, LF, and BS to values in modem-registers 3, 4 and 5.
2223 */
2224 void
2225 isdn_tty_at_cout(char *msg, modem_info *info)
2226 {
2227 struct tty_port *port = &info->port;
2228 atemu *m = &info->emu;
2229 char *p;
2230 char c;
2231 u_long flags;
2232 struct sk_buff *skb = NULL;
2233 char *sp = NULL;
2234 int l;
2235
2236 if (!msg) {
2237 printk(KERN_WARNING "isdn_tty: Null-Message in isdn_tty_at_cout\n");
2238 return;
2239 }
2240
2241 l = strlen(msg);
2242
2243 spin_lock_irqsave(&info->readlock, flags);
2244 if (port->flags & ASYNC_CLOSING) {
2245 spin_unlock_irqrestore(&info->readlock, flags);
2246 return;
2247 }
2248
2249 /* use queue instead of direct, if online and */
2250 /* data is in queue or buffer is full */
2251 if (info->online && ((tty_buffer_request_room(port, l) < l) ||
2252 !skb_queue_empty(&dev->drv[info->isdn_driver]->rpqueue[info->isdn_channel]))) {
2253 skb = alloc_skb(l, GFP_ATOMIC);
2254 if (!skb) {
2255 spin_unlock_irqrestore(&info->readlock, flags);
2256 return;
2257 }
2258 sp = skb_put(skb, l);
2259 #ifdef CONFIG_ISDN_AUDIO
2260 ISDN_AUDIO_SKB_DLECOUNT(skb) = 0;
2261 ISDN_AUDIO_SKB_LOCK(skb) = 0;
2262 #endif
2263 }
2264
2265 for (p = msg; *p; p++) {
2266 switch (*p) {
2267 case '\r':
2268 c = m->mdmreg[REG_CR];
2269 break;
2270 case '\n':
2271 c = m->mdmreg[REG_LF];
2272 break;
2273 case '\b':
2274 c = m->mdmreg[REG_BS];
2275 break;
2276 default:
2277 c = *p;
2278 }
2279 if (skb) {
2280 *sp++ = c;
2281 } else {
2282 if (tty_insert_flip_char(port, c, TTY_NORMAL) == 0)
2283 break;
2284 }
2285 }
2286 if (skb) {
2287 __skb_queue_tail(&dev->drv[info->isdn_driver]->rpqueue[info->isdn_channel], skb);
2288 dev->drv[info->isdn_driver]->rcvcount[info->isdn_channel] += skb->len;
2289 spin_unlock_irqrestore(&info->readlock, flags);
2290 /* Schedule dequeuing */
2291 if (dev->modempoll && info->rcvsched)
2292 isdn_timer_ctrl(ISDN_TIMER_MODEMREAD, 1);
2293
2294 } else {
2295 spin_unlock_irqrestore(&info->readlock, flags);
2296 tty_flip_buffer_push(port);
2297 }
2298 }
2299
2300 /*
2301 * Perform ATH Hangup
2302 */
2303 static void
2304 isdn_tty_on_hook(modem_info *info)
2305 {
2306 if (info->isdn_channel >= 0) {
2307 #ifdef ISDN_DEBUG_MODEM_HUP
2308 printk(KERN_DEBUG "Mhup in isdn_tty_on_hook\n");
2309 #endif
2310 isdn_tty_modem_hup(info, 1);
2311 }
2312 }
2313
2314 static void
2315 isdn_tty_off_hook(void)
2316 {
2317 printk(KERN_DEBUG "isdn_tty_off_hook\n");
2318 }
2319
2320 #define PLUSWAIT1 (HZ / 2) /* 0.5 sec. */
2321 #define PLUSWAIT2 (HZ * 3 / 2) /* 1.5 sec */
2322
2323 /*
2324 * Check Buffer for Modem-escape-sequence, activate timer-callback to
2325 * isdn_tty_modem_escape() if sequence found.
2326 *
2327 * Parameters:
2328 * p pointer to databuffer
2329 * plus escape-character
2330 * count length of buffer
2331 * pluscount count of valid escape-characters so far
2332 * lastplus timestamp of last character
2333 */
2334 static void
2335 isdn_tty_check_esc(const u_char *p, u_char plus, int count, int *pluscount,
2336 u_long *lastplus)
2337 {
2338 if (plus > 127)
2339 return;
2340 if (count > 3) {
2341 p += count - 3;
2342 count = 3;
2343 *pluscount = 0;
2344 }
2345 while (count > 0) {
2346 if (*(p++) == plus) {
2347 if ((*pluscount)++) {
2348 /* Time since last '+' > 0.5 sec. ? */
2349 if (time_after(jiffies, *lastplus + PLUSWAIT1))
2350 *pluscount = 1;
2351 } else {
2352 /* Time since last non-'+' < 1.5 sec. ? */
2353 if (time_before(jiffies, *lastplus + PLUSWAIT2))
2354 *pluscount = 0;
2355 }
2356 if ((*pluscount == 3) && (count == 1))
2357 isdn_timer_ctrl(ISDN_TIMER_MODEMPLUS, 1);
2358 if (*pluscount > 3)
2359 *pluscount = 1;
2360 } else
2361 *pluscount = 0;
2362 *lastplus = jiffies;
2363 count--;
2364 }
2365 }
2366
2367 /*
2368 * Return result of AT-emulator to tty-receive-buffer, depending on
2369 * modem-register 12, bit 0 and 1.
2370 * For CONNECT-messages also switch to online-mode.
2371 * For RING-message handle auto-ATA if register 0 != 0
2372 */
2373
2374 static void
2375 isdn_tty_modem_result(int code, modem_info *info)
2376 {
2377 atemu *m = &info->emu;
2378 static char *msg[] =
2379 {"OK", "CONNECT", "RING", "NO CARRIER", "ERROR",
2380 "CONNECT 64000", "NO DIALTONE", "BUSY", "NO ANSWER",
2381 "RINGING", "NO MSN/EAZ", "VCON", "RUNG"};
2382 char s[ISDN_MSNLEN + 10];
2383
2384 switch (code) {
2385 case RESULT_RING:
2386 m->mdmreg[REG_RINGCNT]++;
2387 if (m->mdmreg[REG_RINGCNT] == m->mdmreg[REG_RINGATA])
2388 /* Automatically accept incoming call */
2389 isdn_tty_cmd_ATA(info);
2390 break;
2391 case RESULT_NO_CARRIER:
2392 #ifdef ISDN_DEBUG_MODEM_HUP
2393 printk(KERN_DEBUG "modem_result: NO CARRIER %d %d\n",
2394 (info->port.flags & ASYNC_CLOSING),
2395 (!info->port.tty));
2396 #endif
2397 m->mdmreg[REG_RINGCNT] = 0;
2398 del_timer(&info->nc_timer);
2399 info->ncarrier = 0;
2400 if ((info->port.flags & ASYNC_CLOSING) || (!info->port.tty))
2401 return;
2402
2403 #ifdef CONFIG_ISDN_AUDIO
2404 if (info->vonline & 1) {
2405 #ifdef ISDN_DEBUG_MODEM_VOICE
2406 printk(KERN_DEBUG "res3: send DLE-ETX on ttyI%d\n",
2407 info->line);
2408 #endif
2409 /* voice-recording, add DLE-ETX */
2410 isdn_tty_at_cout("\020\003", info);
2411 }
2412 if (info->vonline & 2) {
2413 #ifdef ISDN_DEBUG_MODEM_VOICE
2414 printk(KERN_DEBUG "res3: send DLE-DC4 on ttyI%d\n",
2415 info->line);
2416 #endif
2417 /* voice-playing, add DLE-DC4 */
2418 isdn_tty_at_cout("\020\024", info);
2419 }
2420 #endif
2421 break;
2422 case RESULT_CONNECT:
2423 case RESULT_CONNECT64000:
2424 sprintf(info->last_cause, "0000");
2425 if (!info->online)
2426 info->online = 2;
2427 break;
2428 case RESULT_VCON:
2429 #ifdef ISDN_DEBUG_MODEM_VOICE
2430 printk(KERN_DEBUG "res3: send VCON on ttyI%d\n",
2431 info->line);
2432 #endif
2433 sprintf(info->last_cause, "0000");
2434 if (!info->online)
2435 info->online = 1;
2436 break;
2437 } /* switch (code) */
2438
2439 if (m->mdmreg[REG_RESP] & BIT_RESP) {
2440 /* Show results */
2441 if (m->mdmreg[REG_RESPNUM] & BIT_RESPNUM) {
2442 /* Show numeric results only */
2443 sprintf(s, "\r\n%d\r\n", code);
2444 isdn_tty_at_cout(s, info);
2445 } else {
2446 if (code == RESULT_RING) {
2447 /* return if "show RUNG" and ringcounter>1 */
2448 if ((m->mdmreg[REG_RUNG] & BIT_RUNG) &&
2449 (m->mdmreg[REG_RINGCNT] > 1))
2450 return;
2451 /* print CID, _before_ _every_ ring */
2452 if (!(m->mdmreg[REG_CIDONCE] & BIT_CIDONCE)) {
2453 isdn_tty_at_cout("\r\nCALLER NUMBER: ", info);
2454 isdn_tty_at_cout(dev->num[info->drv_index], info);
2455 if (m->mdmreg[REG_CDN] & BIT_CDN) {
2456 isdn_tty_at_cout("\r\nCALLED NUMBER: ", info);
2457 isdn_tty_at_cout(info->emu.cpn, info);
2458 }
2459 }
2460 }
2461 isdn_tty_at_cout("\r\n", info);
2462 isdn_tty_at_cout(msg[code], info);
2463 switch (code) {
2464 case RESULT_CONNECT:
2465 switch (m->mdmreg[REG_L2PROT]) {
2466 case ISDN_PROTO_L2_MODEM:
2467 isdn_tty_at_cout(" ", info);
2468 isdn_tty_at_cout(m->connmsg, info);
2469 break;
2470 }
2471 break;
2472 case RESULT_RING:
2473 /* Append CPN, if enabled */
2474 if ((m->mdmreg[REG_CPN] & BIT_CPN)) {
2475 sprintf(s, "/%s", m->cpn);
2476 isdn_tty_at_cout(s, info);
2477 }
2478 /* Print CID only once, _after_ 1st RING */
2479 if ((m->mdmreg[REG_CIDONCE] & BIT_CIDONCE) &&
2480 (m->mdmreg[REG_RINGCNT] == 1)) {
2481 isdn_tty_at_cout("\r\n", info);
2482 isdn_tty_at_cout("CALLER NUMBER: ", info);
2483 isdn_tty_at_cout(dev->num[info->drv_index], info);
2484 if (m->mdmreg[REG_CDN] & BIT_CDN) {
2485 isdn_tty_at_cout("\r\nCALLED NUMBER: ", info);
2486 isdn_tty_at_cout(info->emu.cpn, info);
2487 }
2488 }
2489 break;
2490 case RESULT_NO_CARRIER:
2491 case RESULT_NO_DIALTONE:
2492 case RESULT_BUSY:
2493 case RESULT_NO_ANSWER:
2494 m->mdmreg[REG_RINGCNT] = 0;
2495 /* Append Cause-Message if enabled */
2496 if (m->mdmreg[REG_RESPXT] & BIT_RESPXT) {
2497 sprintf(s, "/%s", info->last_cause);
2498 isdn_tty_at_cout(s, info);
2499 }
2500 break;
2501 case RESULT_CONNECT64000:
2502 /* Append Protocol to CONNECT message */
2503 switch (m->mdmreg[REG_L2PROT]) {
2504 case ISDN_PROTO_L2_X75I:
2505 case ISDN_PROTO_L2_X75UI:
2506 case ISDN_PROTO_L2_X75BUI:
2507 isdn_tty_at_cout("/X.75", info);
2508 break;
2509 case ISDN_PROTO_L2_HDLC:
2510 isdn_tty_at_cout("/HDLC", info);
2511 break;
2512 case ISDN_PROTO_L2_V11096:
2513 isdn_tty_at_cout("/V110/9600", info);
2514 break;
2515 case ISDN_PROTO_L2_V11019:
2516 isdn_tty_at_cout("/V110/19200", info);
2517 break;
2518 case ISDN_PROTO_L2_V11038:
2519 isdn_tty_at_cout("/V110/38400", info);
2520 break;
2521 }
2522 if (m->mdmreg[REG_T70] & BIT_T70) {
2523 isdn_tty_at_cout("/T.70", info);
2524 if (m->mdmreg[REG_T70] & BIT_T70_EXT)
2525 isdn_tty_at_cout("+", info);
2526 }
2527 break;
2528 }
2529 isdn_tty_at_cout("\r\n", info);
2530 }
2531 }
2532 if (code == RESULT_NO_CARRIER) {
2533 if ((info->port.flags & ASYNC_CLOSING) || (!info->port.tty))
2534 return;
2535
2536 if (info->port.flags & ASYNC_CHECK_CD)
2537 tty_hangup(info->port.tty);
2538 }
2539 }
2540
2541
2542 /*
2543 * Display a modem-register-value.
2544 */
2545 static void
2546 isdn_tty_show_profile(int ridx, modem_info *info)
2547 {
2548 char v[6];
2549
2550 sprintf(v, "\r\n%d", info->emu.mdmreg[ridx]);
2551 isdn_tty_at_cout(v, info);
2552 }
2553
2554 /*
2555 * Get MSN-string from char-pointer, set pointer to end of number
2556 */
2557 static void
2558 isdn_tty_get_msnstr(char *n, char **p)
2559 {
2560 int limit = ISDN_MSNLEN - 1;
2561
2562 while (((*p[0] >= '0' && *p[0] <= '9') ||
2563 /* Why a comma ??? */
2564 (*p[0] == ',') || (*p[0] == ':')) &&
2565 (limit--))
2566 *n++ = *p[0]++;
2567 *n = '\0';
2568 }
2569
2570 /*
2571 * Get phone-number from modem-commandbuffer
2572 */
2573 static void
2574 isdn_tty_getdial(char *p, char *q, int cnt)
2575 {
2576 int first = 1;
2577 int limit = ISDN_MSNLEN - 1; /* MUST match the size of interface var to avoid
2578 buffer overflow */
2579
2580 while (strchr(" 0123456789,#.*WPTSR-", *p) && *p && --cnt > 0) {
2581 if ((*p >= '0' && *p <= '9') || ((*p == 'S') && first) ||
2582 ((*p == 'R') && first) ||
2583 (*p == '*') || (*p == '#')) {
2584 *q++ = *p;
2585 limit--;
2586 }
2587 if (!limit)
2588 break;
2589 p++;
2590 first = 0;
2591 }
2592 *q = 0;
2593 }
2594
2595 #define PARSE_ERROR { isdn_tty_modem_result(RESULT_ERROR, info); return; }
2596 #define PARSE_ERROR1 { isdn_tty_modem_result(RESULT_ERROR, info); return 1; }
2597
2598 static void
2599 isdn_tty_report(modem_info *info)
2600 {
2601 atemu *m = &info->emu;
2602 char s[80];
2603
2604 isdn_tty_at_cout("\r\nStatistics of last connection:\r\n\r\n", info);
2605 sprintf(s, " Remote Number: %s\r\n", info->last_num);
2606 isdn_tty_at_cout(s, info);
2607 sprintf(s, " Direction: %s\r\n", info->last_dir ? "outgoing" : "incoming");
2608 isdn_tty_at_cout(s, info);
2609 isdn_tty_at_cout(" Layer-2 Protocol: ", info);
2610 switch (info->last_l2) {
2611 case ISDN_PROTO_L2_X75I:
2612 isdn_tty_at_cout("X.75i", info);
2613 break;
2614 case ISDN_PROTO_L2_X75UI:
2615 isdn_tty_at_cout("X.75ui", info);
2616 break;
2617 case ISDN_PROTO_L2_X75BUI:
2618 isdn_tty_at_cout("X.75bui", info);
2619 break;
2620 case ISDN_PROTO_L2_HDLC:
2621 isdn_tty_at_cout("HDLC", info);
2622 break;
2623 case ISDN_PROTO_L2_V11096:
2624 isdn_tty_at_cout("V.110 9600 Baud", info);
2625 break;
2626 case ISDN_PROTO_L2_V11019:
2627 isdn_tty_at_cout("V.110 19200 Baud", info);
2628 break;
2629 case ISDN_PROTO_L2_V11038:
2630 isdn_tty_at_cout("V.110 38400 Baud", info);
2631 break;
2632 case ISDN_PROTO_L2_TRANS:
2633 isdn_tty_at_cout("transparent", info);
2634 break;
2635 case ISDN_PROTO_L2_MODEM:
2636 isdn_tty_at_cout("modem", info);
2637 break;
2638 case ISDN_PROTO_L2_FAX:
2639 isdn_tty_at_cout("fax", info);
2640 break;
2641 default:
2642 isdn_tty_at_cout("unknown", info);
2643 break;
2644 }
2645 if (m->mdmreg[REG_T70] & BIT_T70) {
2646 isdn_tty_at_cout("/T.70", info);
2647 if (m->mdmreg[REG_T70] & BIT_T70_EXT)
2648 isdn_tty_at_cout("+", info);
2649 }
2650 isdn_tty_at_cout("\r\n", info);
2651 isdn_tty_at_cout(" Service: ", info);
2652 switch (info->last_si) {
2653 case 1:
2654 isdn_tty_at_cout("audio\r\n", info);
2655 break;
2656 case 5:
2657 isdn_tty_at_cout("btx\r\n", info);
2658 break;
2659 case 7:
2660 isdn_tty_at_cout("data\r\n", info);
2661 break;
2662 default:
2663 sprintf(s, "%d\r\n", info->last_si);
2664 isdn_tty_at_cout(s, info);
2665 break;
2666 }
2667 sprintf(s, " Hangup location: %s\r\n", info->last_lhup ? "local" : "remote");
2668 isdn_tty_at_cout(s, info);
2669 sprintf(s, " Last cause: %s\r\n", info->last_cause);
2670 isdn_tty_at_cout(s, info);
2671 }
2672
2673 /*
2674 * Parse AT&.. commands.
2675 */
2676 static int
2677 isdn_tty_cmd_ATand(char **p, modem_info *info)
2678 {
2679 atemu *m = &info->emu;
2680 int i;
2681 char rb[100];
2682
2683 #define MAXRB (sizeof(rb) - 1)
2684
2685 switch (*p[0]) {
2686 case 'B':
2687 /* &B - Set Buffersize */
2688 p[0]++;
2689 i = isdn_getnum(p);
2690 if ((i < 0) || (i > ISDN_SERIAL_XMIT_MAX))
2691 PARSE_ERROR1;
2692 #ifdef CONFIG_ISDN_AUDIO
2693 if ((m->mdmreg[REG_SI1] & 1) && (i > VBUF))
2694 PARSE_ERROR1;
2695 #endif
2696 m->mdmreg[REG_PSIZE] = i / 16;
2697 info->xmit_size = m->mdmreg[REG_PSIZE] * 16;
2698 switch (m->mdmreg[REG_L2PROT]) {
2699 case ISDN_PROTO_L2_V11096:
2700 case ISDN_PROTO_L2_V11019:
2701 case ISDN_PROTO_L2_V11038:
2702 info->xmit_size /= 10;
2703 }
2704 break;
2705 case 'C':
2706 /* &C - DCD Status */
2707 p[0]++;
2708 switch (isdn_getnum(p)) {
2709 case 0:
2710 m->mdmreg[REG_DCD] &= ~BIT_DCD;
2711 break;
2712 case 1:
2713 m->mdmreg[REG_DCD] |= BIT_DCD;
2714 break;
2715 default:
2716 PARSE_ERROR1
2717 }
2718 break;
2719 case 'D':
2720 /* &D - Set DTR-Low-behavior */
2721 p[0]++;
2722 switch (isdn_getnum(p)) {
2723 case 0:
2724 m->mdmreg[REG_DTRHUP] &= ~BIT_DTRHUP;
2725 m->mdmreg[REG_DTRR] &= ~BIT_DTRR;
2726 break;
2727 case 2:
2728 m->mdmreg[REG_DTRHUP] |= BIT_DTRHUP;
2729 m->mdmreg[REG_DTRR] &= ~BIT_DTRR;
2730 break;
2731 case 3:
2732 m->mdmreg[REG_DTRHUP] |= BIT_DTRHUP;
2733 m->mdmreg[REG_DTRR] |= BIT_DTRR;
2734 break;
2735 default:
2736 PARSE_ERROR1
2737 }
2738 break;
2739 case 'E':
2740 /* &E -Set EAZ/MSN */
2741 p[0]++;
2742 isdn_tty_get_msnstr(m->msn, p);
2743 break;
2744 case 'F':
2745 /* &F -Set Factory-Defaults */
2746 p[0]++;
2747 if (info->msr & UART_MSR_DCD)
2748 PARSE_ERROR1;
2749 isdn_tty_reset_profile(m);
2750 isdn_tty_modem_reset_regs(info, 1);
2751 break;
2752 #ifdef DUMMY_HAYES_AT
2753 case 'K':
2754 /* only for be compilant with common scripts */
2755 /* &K Flowcontrol - no function */
2756 p[0]++;
2757 isdn_getnum(p);
2758 break;
2759 #endif
2760 case 'L':
2761 /* &L -Set Numbers to listen on */
2762 p[0]++;
2763 i = 0;
2764 while (*p[0] && (strchr("0123456789,-*[]?;", *p[0])) &&
2765 (i < ISDN_LMSNLEN - 1))
2766 m->lmsn[i++] = *p[0]++;
2767 m->lmsn[i] = '\0';
2768 break;
2769 case 'R':
2770 /* &R - Set V.110 bitrate adaption */
2771 p[0]++;
2772 i = isdn_getnum(p);
2773 switch (i) {
2774 case 0:
2775 /* Switch off V.110, back to X.75 */
2776 m->mdmreg[REG_L2PROT] = ISDN_PROTO_L2_X75I;
2777 m->mdmreg[REG_SI2] = 0;
2778 info->xmit_size = m->mdmreg[REG_PSIZE] * 16;
2779 break;
2780 case 9600:
2781 m->mdmreg[REG_L2PROT] = ISDN_PROTO_L2_V11096;
2782 m->mdmreg[REG_SI2] = 197;
2783 info->xmit_size = m->mdmreg[REG_PSIZE] * 16 / 10;
2784 break;
2785 case 19200:
2786 m->mdmreg[REG_L2PROT] = ISDN_PROTO_L2_V11019;
2787 m->mdmreg[REG_SI2] = 199;
2788 info->xmit_size = m->mdmreg[REG_PSIZE] * 16 / 10;
2789 break;
2790 case 38400:
2791 m->mdmreg[REG_L2PROT] = ISDN_PROTO_L2_V11038;
2792 m->mdmreg[REG_SI2] = 198; /* no existing standard for this */
2793 info->xmit_size = m->mdmreg[REG_PSIZE] * 16 / 10;
2794 break;
2795 default:
2796 PARSE_ERROR1;
2797 }
2798 /* Switch off T.70 */
2799 m->mdmreg[REG_T70] &= ~(BIT_T70 | BIT_T70_EXT);
2800 /* Set Service 7 */
2801 m->mdmreg[REG_SI1] |= 4;
2802 break;
2803 case 'S':
2804 /* &S - Set Windowsize */
2805 p[0]++;
2806 i = isdn_getnum(p);
2807 if ((i > 0) && (i < 9))
2808 m->mdmreg[REG_WSIZE] = i;
2809 else
2810 PARSE_ERROR1;
2811 break;
2812 case 'V':
2813 /* &V - Show registers */
2814 p[0]++;
2815 isdn_tty_at_cout("\r\n", info);
2816 for (i = 0; i < ISDN_MODEM_NUMREG; i++) {
2817 sprintf(rb, "S%02d=%03d%s", i,
2818 m->mdmreg[i], ((i + 1) % 10) ? " " : "\r\n");
2819 isdn_tty_at_cout(rb, info);
2820 }
2821 sprintf(rb, "\r\nEAZ/MSN: %.50s\r\n",
2822 strlen(m->msn) ? m->msn : "None");
2823 isdn_tty_at_cout(rb, info);
2824 if (strlen(m->lmsn)) {
2825 isdn_tty_at_cout("\r\nListen: ", info);
2826 isdn_tty_at_cout(m->lmsn, info);
2827 isdn_tty_at_cout("\r\n", info);
2828 }
2829 break;
2830 case 'W':
2831 /* &W - Write Profile */
2832 p[0]++;
2833 switch (*p[0]) {
2834 case '0':
2835 p[0]++;
2836 modem_write_profile(m);
2837 break;
2838 default:
2839 PARSE_ERROR1;
2840 }
2841 break;
2842 case 'X':
2843 /* &X - Switch to BTX-Mode and T.70 */
2844 p[0]++;
2845 switch (isdn_getnum(p)) {
2846 case 0:
2847 m->mdmreg[REG_T70] &= ~(BIT_T70 | BIT_T70_EXT);
2848 info->xmit_size = m->mdmreg[REG_PSIZE] * 16;
2849 break;
2850 case 1:
2851 m->mdmreg[REG_T70] |= BIT_T70;
2852 m->mdmreg[REG_T70] &= ~BIT_T70_EXT;
2853 m->mdmreg[REG_L2PROT] = ISDN_PROTO_L2_X75I;
2854 info->xmit_size = 112;
2855 m->mdmreg[REG_SI1] = 4;
2856 m->mdmreg[REG_SI2] = 0;
2857 break;
2858 case 2:
2859 m->mdmreg[REG_T70] |= (BIT_T70 | BIT_T70_EXT);
2860 m->mdmreg[REG_L2PROT] = ISDN_PROTO_L2_X75I;
2861 info->xmit_size = 112;
2862 m->mdmreg[REG_SI1] = 4;
2863 m->mdmreg[REG_SI2] = 0;
2864 break;
2865 default:
2866 PARSE_ERROR1;
2867 }
2868 break;
2869 default:
2870 PARSE_ERROR1;
2871 }
2872 return 0;
2873 }
2874
2875 static int
2876 isdn_tty_check_ats(int mreg, int mval, modem_info *info, atemu *m)
2877 {
2878 /* Some plausibility checks */
2879 switch (mreg) {
2880 case REG_L2PROT:
2881 if (mval > ISDN_PROTO_L2_MAX)
2882 return 1;
2883 break;
2884 case REG_PSIZE:
2885 if ((mval * 16) > ISDN_SERIAL_XMIT_MAX)
2886 return 1;
2887 #ifdef CONFIG_ISDN_AUDIO
2888 if ((m->mdmreg[REG_SI1] & 1) && (mval > VBUFX))
2889 return 1;
2890 #endif
2891 info->xmit_size = mval * 16;
2892 switch (m->mdmreg[REG_L2PROT]) {
2893 case ISDN_PROTO_L2_V11096:
2894 case ISDN_PROTO_L2_V11019:
2895 case ISDN_PROTO_L2_V11038:
2896 info->xmit_size /= 10;
2897 }
2898 break;
2899 case REG_SI1I:
2900 case REG_PLAN:
2901 case REG_SCREEN:
2902 /* readonly registers */
2903 return 1;
2904 }
2905 return 0;
2906 }
2907
2908 /*
2909 * Perform ATS command
2910 */
2911 static int
2912 isdn_tty_cmd_ATS(char **p, modem_info *info)
2913 {
2914 atemu *m = &info->emu;
2915 int bitpos;
2916 int mreg;
2917 int mval;
2918 int bval;
2919
2920 mreg = isdn_getnum(p);
2921 if (mreg < 0 || mreg >= ISDN_MODEM_NUMREG)
2922 PARSE_ERROR1;
2923 switch (*p[0]) {
2924 case '=':
2925 p[0]++;
2926 mval = isdn_getnum(p);
2927 if (mval < 0 || mval > 255)
2928 PARSE_ERROR1;
2929 if (isdn_tty_check_ats(mreg, mval, info, m))
2930 PARSE_ERROR1;
2931 m->mdmreg[mreg] = mval;
2932 break;
2933 case '.':
2934 /* Set/Clear a single bit */
2935 p[0]++;
2936 bitpos = isdn_getnum(p);
2937 if ((bitpos < 0) || (bitpos > 7))
2938 PARSE_ERROR1;
2939 switch (*p[0]) {
2940 case '=':
2941 p[0]++;
2942 bval = isdn_getnum(p);
2943 if (bval < 0 || bval > 1)
2944 PARSE_ERROR1;
2945 if (bval)
2946 mval = m->mdmreg[mreg] | (1 << bitpos);
2947 else
2948 mval = m->mdmreg[mreg] & ~(1 << bitpos);
2949 if (isdn_tty_check_ats(mreg, mval, info, m))
2950 PARSE_ERROR1;
2951 m->mdmreg[mreg] = mval;
2952 break;
2953 case '?':
2954 p[0]++;
2955 isdn_tty_at_cout("\r\n", info);
2956 isdn_tty_at_cout((m->mdmreg[mreg] & (1 << bitpos)) ? "1" : "0",
2957 info);
2958 break;
2959 default:
2960 PARSE_ERROR1;
2961 }
2962 break;
2963 case '?':
2964 p[0]++;
2965 isdn_tty_show_profile(mreg, info);
2966 break;
2967 default:
2968 PARSE_ERROR1;
2969 break;
2970 }
2971 return 0;
2972 }
2973
2974 /*
2975 * Perform ATA command
2976 */
2977 static void
2978 isdn_tty_cmd_ATA(modem_info *info)
2979 {
2980 atemu *m = &info->emu;
2981 isdn_ctrl cmd;
2982 int l2;
2983
2984 if (info->msr & UART_MSR_RI) {
2985 /* Accept incoming call */
2986 info->last_dir = 0;
2987 strcpy(info->last_num, dev->num[info->drv_index]);
2988 m->mdmreg[REG_RINGCNT] = 0;
2989 info->msr &= ~UART_MSR_RI;
2990 l2 = m->mdmreg[REG_L2PROT];
2991 #ifdef CONFIG_ISDN_AUDIO
2992 /* If more than one bit set in reg18, autoselect Layer2 */
2993 if ((m->mdmreg[REG_SI1] & m->mdmreg[REG_SI1I]) != m->mdmreg[REG_SI1]) {
2994 if (m->mdmreg[REG_SI1I] == 1) {
2995 if ((l2 != ISDN_PROTO_L2_MODEM) && (l2 != ISDN_PROTO_L2_FAX))
2996 l2 = ISDN_PROTO_L2_TRANS;
2997 } else
2998 l2 = ISDN_PROTO_L2_X75I;
2999 }
3000 #endif
3001 cmd.driver = info->isdn_driver;
3002 cmd.command = ISDN_CMD_SETL2;
3003 cmd.arg = info->isdn_channel + (l2 << 8);
3004 info->last_l2 = l2;
3005 isdn_command(&cmd);
3006 cmd.driver = info->isdn_driver;
3007 cmd.command = ISDN_CMD_SETL3;
3008 cmd.arg = info->isdn_channel + (m->mdmreg[REG_L3PROT] << 8);
3009 #ifdef CONFIG_ISDN_TTY_FAX
3010 if (l2 == ISDN_PROTO_L2_FAX) {
3011 cmd.parm.fax = info->fax;
3012 info->fax->direction = ISDN_TTY_FAX_CONN_IN;
3013 }
3014 #endif
3015 isdn_command(&cmd);
3016 cmd.driver = info->isdn_driver;
3017 cmd.arg = info->isdn_channel;
3018 cmd.command = ISDN_CMD_ACCEPTD;
3019 info->dialing = 16;
3020 info->emu.carrierwait = 0;
3021 isdn_command(&cmd);
3022 isdn_timer_ctrl(ISDN_TIMER_CARRIER, 1);
3023 } else
3024 isdn_tty_modem_result(RESULT_NO_ANSWER, info);
3025 }
3026
3027 #ifdef CONFIG_ISDN_AUDIO
3028 /*
3029 * Parse AT+F.. commands
3030 */
3031 static int
3032 isdn_tty_cmd_PLUSF(char **p, modem_info *info)
3033 {
3034 atemu *m = &info->emu;
3035 char rs[20];
3036
3037 if (!strncmp(p[0], "CLASS", 5)) {
3038 p[0] += 5;
3039 switch (*p[0]) {
3040 case '?':
3041 p[0]++;
3042 sprintf(rs, "\r\n%d",
3043 (m->mdmreg[REG_SI1] & 1) ? 8 : 0);
3044 #ifdef CONFIG_ISDN_TTY_FAX
3045 if (TTY_IS_FCLASS2(info))
3046 sprintf(rs, "\r\n2");
3047 else if (TTY_IS_FCLASS1(info))
3048 sprintf(rs, "\r\n1");
3049 #endif
3050 isdn_tty_at_cout(rs, info);
3051 break;
3052 case '=':
3053 p[0]++;
3054 switch (*p[0]) {
3055 case '0':
3056 p[0]++;
3057 m->mdmreg[REG_L2PROT] = ISDN_PROTO_L2_X75I;
3058 m->mdmreg[REG_L3PROT] = ISDN_PROTO_L3_TRANS;
3059 m->mdmreg[REG_SI1] = 4;
3060 info->xmit_size =
3061 m->mdmreg[REG_PSIZE] * 16;
3062 break;
3063 #ifdef CONFIG_ISDN_TTY_FAX
3064 case '1':
3065 p[0]++;
3066 if (!(dev->global_features &
3067 ISDN_FEATURE_L3_FCLASS1))
3068 PARSE_ERROR1;
3069 m->mdmreg[REG_SI1] = 1;
3070 m->mdmreg[REG_L2PROT] = ISDN_PROTO_L2_FAX;
3071 m->mdmreg[REG_L3PROT] = ISDN_PROTO_L3_FCLASS1;
3072 info->xmit_size =
3073 m->mdmreg[REG_PSIZE] * 16;
3074 break;
3075 case '2':
3076 p[0]++;
3077 if (!(dev->global_features &
3078 ISDN_FEATURE_L3_FCLASS2))
3079 PARSE_ERROR1;
3080 m->mdmreg[REG_SI1] = 1;
3081 m->mdmreg[REG_L2PROT] = ISDN_PROTO_L2_FAX;
3082 m->mdmreg[REG_L3PROT] = ISDN_PROTO_L3_FCLASS2;
3083 info->xmit_size =
3084 m->mdmreg[REG_PSIZE] * 16;
3085 break;
3086 #endif
3087 case '8':
3088 p[0]++;
3089 /* L2 will change on dialout with si=1 */
3090 m->mdmreg[REG_L2PROT] = ISDN_PROTO_L2_X75I;
3091 m->mdmreg[REG_L3PROT] = ISDN_PROTO_L3_TRANS;
3092 m->mdmreg[REG_SI1] = 5;
3093 info->xmit_size = VBUF;
3094 break;
3095 case '?':
3096 p[0]++;
3097 strcpy(rs, "\r\n0,");
3098 #ifdef CONFIG_ISDN_TTY_FAX
3099 if (dev->global_features &
3100 ISDN_FEATURE_L3_FCLASS1)
3101 strcat(rs, "1,");
3102 if (dev->global_features &
3103 ISDN_FEATURE_L3_FCLASS2)
3104 strcat(rs, "2,");
3105 #endif
3106 strcat(rs, "8");
3107 isdn_tty_at_cout(rs, info);
3108 break;
3109 default:
3110 PARSE_ERROR1;
3111 }
3112 break;
3113 default:
3114 PARSE_ERROR1;
3115 }
3116 return 0;
3117 }
3118 #ifdef CONFIG_ISDN_TTY_FAX
3119 return (isdn_tty_cmd_PLUSF_FAX(p, info));
3120 #else
3121 PARSE_ERROR1;
3122 #endif
3123 }
3124
3125 /*
3126 * Parse AT+V.. commands
3127 */
3128 static int
3129 isdn_tty_cmd_PLUSV(char **p, modem_info *info)
3130 {
3131 atemu *m = &info->emu;
3132 isdn_ctrl cmd;
3133 static char *vcmd[] =
3134 {"NH", "IP", "LS", "RX", "SD", "SM", "TX", "DD", NULL};
3135 int i;
3136 int par1;
3137 int par2;
3138 char rs[20];
3139
3140 i = 0;
3141 while (vcmd[i]) {
3142 if (!strncmp(vcmd[i], p[0], 2)) {
3143 p[0] += 2;
3144 break;
3145 }
3146 i++;
3147 }
3148 switch (i) {
3149 case 0:
3150 /* AT+VNH - Auto hangup feature */
3151 switch (*p[0]) {
3152 case '?':
3153 p[0]++;
3154 isdn_tty_at_cout("\r\n1", info);
3155 break;
3156 case '=':
3157 p[0]++;
3158 switch (*p[0]) {
3159 case '1':
3160 p[0]++;
3161 break;
3162 case '?':
3163 p[0]++;
3164 isdn_tty_at_cout("\r\n1", info);
3165 break;
3166 default:
3167 PARSE_ERROR1;
3168 }
3169 break;
3170 default:
3171 PARSE_ERROR1;
3172 }
3173 break;
3174 case 1:
3175 /* AT+VIP - Reset all voice parameters */
3176 isdn_tty_modem_reset_vpar(m);
3177 break;
3178 case 2:
3179 /* AT+VLS - Select device, accept incoming call */
3180 switch (*p[0]) {
3181 case '?':
3182 p[0]++;
3183 sprintf(rs, "\r\n%d", m->vpar[0]);
3184 isdn_tty_at_cout(rs, info);
3185 break;
3186 case '=':
3187 p[0]++;
3188 switch (*p[0]) {
3189 case '0':
3190 p[0]++;
3191 m->vpar[0] = 0;
3192 break;
3193 case '2':
3194 p[0]++;
3195 m->vpar[0] = 2;
3196 break;
3197 case '?':
3198 p[0]++;
3199 isdn_tty_at_cout("\r\n0,2", info);
3200 break;
3201 default:
3202 PARSE_ERROR1;
3203 }
3204 break;
3205 default:
3206 PARSE_ERROR1;
3207 }
3208 break;
3209 case 3:
3210 /* AT+VRX - Start recording */
3211 if (!m->vpar[0])
3212 PARSE_ERROR1;
3213 if (info->online != 1) {
3214 isdn_tty_modem_result(RESULT_NO_ANSWER, info);
3215 return 1;
3216 }
3217 info->dtmf_state = isdn_audio_dtmf_init(info->dtmf_state);
3218 if (!info->dtmf_state) {
3219 printk(KERN_WARNING "isdn_tty: Couldn't malloc dtmf state\n");
3220 PARSE_ERROR1;
3221 }
3222 info->silence_state = isdn_audio_silence_init(info->silence_state);
3223 if (!info->silence_state) {
3224 printk(KERN_WARNING "isdn_tty: Couldn't malloc silence state\n");
3225 PARSE_ERROR1;
3226 }
3227 if (m->vpar[3] < 5) {
3228 info->adpcmr = isdn_audio_adpcm_init(info->adpcmr, m->vpar[3]);
3229 if (!info->adpcmr) {
3230 printk(KERN_WARNING "isdn_tty: Couldn't malloc adpcm state\n");
3231 PARSE_ERROR1;
3232 }
3233 }
3234 #ifdef ISDN_DEBUG_AT
3235 printk(KERN_DEBUG "AT: +VRX\n");
3236 #endif
3237 info->vonline |= 1;
3238 isdn_tty_modem_result(RESULT_CONNECT, info);
3239 return 0;
3240 break;
3241 case 4:
3242 /* AT+VSD - Silence detection */
3243 switch (*p[0]) {
3244 case '?':
3245 p[0]++;
3246 sprintf(rs, "\r\n<%d>,<%d>",
3247 m->vpar[1],
3248 m->vpar[2]);
3249 isdn_tty_at_cout(rs, info);
3250 break;
3251 case '=':
3252 p[0]++;
3253 if ((*p[0] >= '0') && (*p[0] <= '9')) {
3254 par1 = isdn_getnum(p);
3255 if ((par1 < 0) || (par1 > 31))
3256 PARSE_ERROR1;
3257 if (*p[0] != ',')
3258 PARSE_ERROR1;
3259 p[0]++;
3260 par2 = isdn_getnum(p);
3261 if ((par2 < 0) || (par2 > 255))
3262 PARSE_ERROR1;
3263 m->vpar[1] = par1;
3264 m->vpar[2] = par2;
3265 break;
3266 } else
3267 if (*p[0] == '?') {
3268 p[0]++;
3269 isdn_tty_at_cout("\r\n<0-31>,<0-255>",
3270 info);
3271 break;
3272 } else
3273 PARSE_ERROR1;
3274 break;
3275 default:
3276 PARSE_ERROR1;
3277 }
3278 break;
3279 case 5:
3280 /* AT+VSM - Select compression */
3281 switch (*p[0]) {
3282 case '?':
3283 p[0]++;
3284 sprintf(rs, "\r\n<%d>,<%d><8000>",
3285 m->vpar[3],
3286 m->vpar[1]);
3287 isdn_tty_at_cout(rs, info);
3288 break;
3289 case '=':
3290 p[0]++;
3291 switch (*p[0]) {
3292 case '2':
3293 case '3':
3294 case '4':
3295 case '5':
3296 case '6':
3297 par1 = isdn_getnum(p);
3298 if ((par1 < 2) || (par1 > 6))
3299 PARSE_ERROR1;
3300 m->vpar[3] = par1;
3301 break;
3302 case '?':
3303 p[0]++;
3304 isdn_tty_at_cout("\r\n2;ADPCM;2;0;(8000)\r\n",
3305 info);
3306 isdn_tty_at_cout("3;ADPCM;3;0;(8000)\r\n",
3307 info);
3308 isdn_tty_at_cout("4;ADPCM;4;0;(8000)\r\n",
3309 info);
3310 isdn_tty_at_cout("5;ALAW;8;0;(8000)\r\n",
3311 info);
3312 isdn_tty_at_cout("6;ULAW;8;0;(8000)\r\n",
3313 info);
3314 break;
3315 default:
3316 PARSE_ERROR1;
3317 }
3318 break;
3319 default:
3320 PARSE_ERROR1;
3321 }
3322 break;
3323 case 6:
3324 /* AT+VTX - Start sending */
3325 if (!m->vpar[0])
3326 PARSE_ERROR1;
3327 if (info->online != 1) {
3328 isdn_tty_modem_result(RESULT_NO_ANSWER, info);
3329 return 1;
3330 }
3331 info->dtmf_state = isdn_audio_dtmf_init(info->dtmf_state);
3332 if (!info->dtmf_state) {
3333 printk(KERN_WARNING "isdn_tty: Couldn't malloc dtmf state\n");
3334 PARSE_ERROR1;
3335 }
3336 if (m->vpar[3] < 5) {
3337 info->adpcms = isdn_audio_adpcm_init(info->adpcms, m->vpar[3]);
3338 if (!info->adpcms) {
3339 printk(KERN_WARNING "isdn_tty: Couldn't malloc adpcm state\n");
3340 PARSE_ERROR1;
3341 }
3342 }
3343 #ifdef ISDN_DEBUG_AT
3344 printk(KERN_DEBUG "AT: +VTX\n");
3345 #endif
3346 m->lastDLE = 0;
3347 info->vonline |= 2;
3348 isdn_tty_modem_result(RESULT_CONNECT, info);
3349 return 0;
3350 break;
3351 case 7:
3352 /* AT+VDD - DTMF detection */
3353 switch (*p[0]) {
3354 case '?':
3355 p[0]++;
3356 sprintf(rs, "\r\n<%d>,<%d>",
3357 m->vpar[4],
3358 m->vpar[5]);
3359 isdn_tty_at_cout(rs, info);
3360 break;
3361 case '=':
3362 p[0]++;
3363 if ((*p[0] >= '0') && (*p[0] <= '9')) {
3364 if (info->online != 1)
3365 PARSE_ERROR1;
3366 par1 = isdn_getnum(p);
3367 if ((par1 < 0) || (par1 > 15))
3368 PARSE_ERROR1;
3369 if (*p[0] != ',')
3370 PARSE_ERROR1;
3371 p[0]++;
3372 par2 = isdn_getnum(p);
3373 if ((par2 < 0) || (par2 > 255))
3374 PARSE_ERROR1;
3375 m->vpar[4] = par1;
3376 m->vpar[5] = par2;
3377 cmd.driver = info->isdn_driver;
3378 cmd.command = ISDN_CMD_AUDIO;
3379 cmd.arg = info->isdn_channel + (ISDN_AUDIO_SETDD << 8);
3380 cmd.parm.num[0] = par1;
3381 cmd.parm.num[1] = par2;
3382 isdn_command(&cmd);
3383 break;
3384 } else
3385 if (*p[0] == '?') {
3386 p[0]++;
3387 isdn_tty_at_cout("\r\n<0-15>,<0-255>",
3388 info);
3389 break;
3390 } else
3391 PARSE_ERROR1;
3392 break;
3393 default:
3394 PARSE_ERROR1;
3395 }
3396 break;
3397 default:
3398 PARSE_ERROR1;
3399 }
3400 return 0;
3401 }
3402 #endif /* CONFIG_ISDN_AUDIO */
3403
3404 /*
3405 * Parse and perform an AT-command-line.
3406 */
3407 static void
3408 isdn_tty_parse_at(modem_info *info)
3409 {
3410 atemu *m = &info->emu;
3411 char *p;
3412 char ds[ISDN_MSNLEN];
3413
3414 #ifdef ISDN_DEBUG_AT
3415 printk(KERN_DEBUG "AT: '%s'\n", m->mdmcmd);
3416 #endif
3417 for (p = &m->mdmcmd[2]; *p;) {
3418 switch (*p) {
3419 case ' ':
3420 p++;
3421 break;
3422 case 'A':
3423 /* A - Accept incoming call */
3424 p++;
3425 isdn_tty_cmd_ATA(info);
3426 return;
3427 case 'D':
3428 /* D - Dial */
3429 if (info->msr & UART_MSR_DCD)
3430 PARSE_ERROR;
3431 if (info->msr & UART_MSR_RI) {
3432 isdn_tty_modem_result(RESULT_NO_CARRIER, info);
3433 return;
3434 }
3435 isdn_tty_getdial(++p, ds, sizeof ds);
3436 p += strlen(p);
3437 if (!strlen(m->msn))
3438 isdn_tty_modem_result(RESULT_NO_MSN_EAZ, info);
3439 else if (strlen(ds))
3440 isdn_tty_dial(ds, info, m);
3441 else
3442 PARSE_ERROR;
3443 return;
3444 case 'E':
3445 /* E - Turn Echo on/off */
3446 p++;
3447 switch (isdn_getnum(&p)) {
3448 case 0:
3449 m->mdmreg[REG_ECHO] &= ~BIT_ECHO;
3450 break;
3451 case 1:
3452 m->mdmreg[REG_ECHO] |= BIT_ECHO;
3453 break;
3454 default:
3455 PARSE_ERROR;
3456 }
3457 break;
3458 case 'H':
3459 /* H - On/Off-hook */
3460 p++;
3461 switch (*p) {
3462 case '0':
3463 p++;
3464 isdn_tty_on_hook(info);
3465 break;
3466 case '1':
3467 p++;
3468 isdn_tty_off_hook();
3469 break;
3470 default:
3471 isdn_tty_on_hook(info);
3472 break;
3473 }
3474 break;
3475 case 'I':
3476 /* I - Information */
3477 p++;
3478 isdn_tty_at_cout("\r\nLinux ISDN", info);
3479 switch (*p) {
3480 case '0':
3481 case '1':
3482 p++;
3483 break;
3484 case '2':
3485 p++;
3486 isdn_tty_report(info);
3487 break;
3488 case '3':
3489 p++;
3490 snprintf(ds, sizeof(ds), "\r\n%d", info->emu.charge);
3491 isdn_tty_at_cout(ds, info);
3492 break;
3493 default:;
3494 }
3495 break;
3496 #ifdef DUMMY_HAYES_AT
3497 case 'L':
3498 case 'M':
3499 /* only for be compilant with common scripts */
3500 /* no function */
3501 p++;
3502 isdn_getnum(&p);
3503 break;
3504 #endif
3505 case 'O':
3506 /* O - Go online */
3507 p++;
3508 if (info->msr & UART_MSR_DCD)
3509 /* if B-Channel is up */
3510 isdn_tty_modem_result((m->mdmreg[REG_L2PROT] == ISDN_PROTO_L2_MODEM) ? RESULT_CONNECT : RESULT_CONNECT64000, info);
3511 else
3512 isdn_tty_modem_result(RESULT_NO_CARRIER, info);
3513 return;
3514 case 'Q':
3515 /* Q - Turn Emulator messages on/off */
3516 p++;
3517 switch (isdn_getnum(&p)) {
3518 case 0:
3519 m->mdmreg[REG_RESP] |= BIT_RESP;
3520 break;
3521 case 1:
3522 m->mdmreg[REG_RESP] &= ~BIT_RESP;
3523 break;
3524 default:
3525 PARSE_ERROR;
3526 }
3527 break;
3528 case 'S':
3529 /* S - Set/Get Register */
3530 p++;
3531 if (isdn_tty_cmd_ATS(&p, info))
3532 return;
3533 break;
3534 case 'V':
3535 /* V - Numeric or ASCII Emulator-messages */
3536 p++;
3537 switch (isdn_getnum(&p)) {
3538 case 0:
3539 m->mdmreg[REG_RESP] |= BIT_RESPNUM;
3540 break;
3541 case 1:
3542 m->mdmreg[REG_RESP] &= ~BIT_RESPNUM;
3543 break;
3544 default:
3545 PARSE_ERROR;
3546 }
3547 break;
3548 case 'Z':
3549 /* Z - Load Registers from Profile */
3550 p++;
3551 if (info->msr & UART_MSR_DCD) {
3552 info->online = 0;
3553 isdn_tty_on_hook(info);
3554 }
3555 isdn_tty_modem_reset_regs(info, 1);
3556 break;
3557 case '+':
3558 p++;
3559 switch (*p) {
3560 #ifdef CONFIG_ISDN_AUDIO
3561 case 'F':
3562 p++;
3563 if (isdn_tty_cmd_PLUSF(&p, info))
3564 return;
3565 break;
3566 case 'V':
3567 if ((!(m->mdmreg[REG_SI1] & 1)) ||
3568 (m->mdmreg[REG_L2PROT] == ISDN_PROTO_L2_MODEM))
3569 PARSE_ERROR;
3570 p++;
3571 if (isdn_tty_cmd_PLUSV(&p, info))
3572 return;
3573 break;
3574 #endif /* CONFIG_ISDN_AUDIO */
3575 case 'S': /* SUSPEND */
3576 p++;
3577 isdn_tty_get_msnstr(ds, &p);
3578 isdn_tty_suspend(ds, info, m);
3579 break;
3580 case 'R': /* RESUME */
3581 p++;
3582 isdn_tty_get_msnstr(ds, &p);
3583 isdn_tty_resume(ds, info, m);
3584 break;
3585 case 'M': /* MESSAGE */
3586 p++;
3587 isdn_tty_send_msg(info, m, p);
3588 break;
3589 default:
3590 PARSE_ERROR;
3591 }
3592 break;
3593 case '&':
3594 p++;
3595 if (isdn_tty_cmd_ATand(&p, info))
3596 return;
3597 break;
3598 default:
3599 PARSE_ERROR;
3600 }
3601 }
3602 #ifdef CONFIG_ISDN_AUDIO
3603 if (!info->vonline)
3604 #endif
3605 isdn_tty_modem_result(RESULT_OK, info);
3606 }
3607
3608 /* Need own toupper() because standard-toupper is not available
3609 * within modules.
3610 */
3611 #define my_toupper(c) (((c >= 'a') && (c <= 'z')) ? (c & 0xdf) : c)
3612
3613 /*
3614 * Perform line-editing of AT-commands
3615 *
3616 * Parameters:
3617 * p inputbuffer
3618 * count length of buffer
3619 * channel index to line (minor-device)
3620 */
3621 static int
3622 isdn_tty_edit_at(const char *p, int count, modem_info *info)
3623 {
3624 atemu *m = &info->emu;
3625 int total = 0;
3626 u_char c;
3627 char eb[2];
3628 int cnt;
3629
3630 for (cnt = count; cnt > 0; p++, cnt--) {
3631 c = *p;
3632 total++;
3633 if (c == m->mdmreg[REG_CR] || c == m->mdmreg[REG_LF]) {
3634 /* Separator (CR or LF) */
3635 m->mdmcmd[m->mdmcmdl] = 0;
3636 if (m->mdmreg[REG_ECHO] & BIT_ECHO) {
3637 eb[0] = c;
3638 eb[1] = 0;
3639 isdn_tty_at_cout(eb, info);
3640 }
3641 if ((m->mdmcmdl >= 2) && (!(strncmp(m->mdmcmd, "AT", 2))))
3642 isdn_tty_parse_at(info);
3643 m->mdmcmdl = 0;
3644 continue;
3645 }
3646 if (c == m->mdmreg[REG_BS] && m->mdmreg[REG_BS] < 128) {
3647 /* Backspace-Function */
3648 if ((m->mdmcmdl > 2) || (!m->mdmcmdl)) {
3649 if (m->mdmcmdl)
3650 m->mdmcmdl--;
3651 if (m->mdmreg[REG_ECHO] & BIT_ECHO)
3652 isdn_tty_at_cout("\b", info);
3653 }
3654 continue;
3655 }
3656 if (cmdchar(c)) {
3657 if (m->mdmreg[REG_ECHO] & BIT_ECHO) {
3658 eb[0] = c;
3659 eb[1] = 0;
3660 isdn_tty_at_cout(eb, info);
3661 }
3662 if (m->mdmcmdl < 255) {
3663 c = my_toupper(c);
3664 switch (m->mdmcmdl) {
3665 case 1:
3666 if (c == 'T') {
3667 m->mdmcmd[m->mdmcmdl] = c;
3668 m->mdmcmd[++m->mdmcmdl] = 0;
3669 break;
3670 } else
3671 m->mdmcmdl = 0;
3672 /* Fall through, check for 'A' */
3673 case 0:
3674 if (c == 'A') {
3675 m->mdmcmd[m->mdmcmdl] = c;
3676 m->mdmcmd[++m->mdmcmdl] = 0;
3677 }
3678 break;
3679 default:
3680 m->mdmcmd[m->mdmcmdl] = c;
3681 m->mdmcmd[++m->mdmcmdl] = 0;
3682 }
3683 }
3684 }
3685 }
3686 return total;
3687 }
3688
3689 /*
3690 * Switch all modem-channels who are online and got a valid
3691 * escape-sequence 1.5 seconds ago, to command-mode.
3692 * This function is called every second via timer-interrupt from within
3693 * timer-dispatcher isdn_timer_function()
3694 */
3695 void
3696 isdn_tty_modem_escape(void)
3697 {
3698 int ton = 0;
3699 int i;
3700 int midx;
3701
3702 for (i = 0; i < ISDN_MAX_CHANNELS; i++)
3703 if (USG_MODEM(dev->usage[i]) && (midx = dev->m_idx[i]) >= 0) {
3704 modem_info *info = &dev->mdm.info[midx];
3705 if (info->online) {
3706 ton = 1;
3707 if ((info->emu.pluscount == 3) &&
3708 time_after(jiffies,
3709 info->emu.lastplus + PLUSWAIT2)) {
3710 info->emu.pluscount = 0;
3711 info->online = 0;
3712 isdn_tty_modem_result(RESULT_OK, info);
3713 }
3714 }
3715 }
3716 isdn_timer_ctrl(ISDN_TIMER_MODEMPLUS, ton);
3717 }
3718
3719 /*
3720 * Put a RING-message to all modem-channels who have the RI-bit set.
3721 * This function is called every second via timer-interrupt from within
3722 * timer-dispatcher isdn_timer_function()
3723 */
3724 void
3725 isdn_tty_modem_ring(void)
3726 {
3727 int ton = 0;
3728 int i;
3729
3730 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
3731 modem_info *info = &dev->mdm.info[i];
3732 if (info->msr & UART_MSR_RI) {
3733 ton = 1;
3734 isdn_tty_modem_result(RESULT_RING, info);
3735 }
3736 }
3737 isdn_timer_ctrl(ISDN_TIMER_MODEMRING, ton);
3738 }
3739
3740 /*
3741 * For all online tty's, try sending data to
3742 * the lower levels.
3743 */
3744 void
3745 isdn_tty_modem_xmit(void)
3746 {
3747 int ton = 1;
3748 int i;
3749
3750 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
3751 modem_info *info = &dev->mdm.info[i];
3752 if (info->online) {
3753 ton = 1;
3754 isdn_tty_senddown(info);
3755 isdn_tty_tint(info);
3756 }
3757 }
3758 isdn_timer_ctrl(ISDN_TIMER_MODEMXMIT, ton);
3759 }
3760
3761 /*
3762 * Check all channels if we have a 'no carrier' timeout.
3763 * Timeout value is set by Register S7.
3764 */
3765 void
3766 isdn_tty_carrier_timeout(void)
3767 {
3768 int ton = 0;
3769 int i;
3770
3771 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
3772 modem_info *info = &dev->mdm.info[i];
3773 if (!info->dialing)
3774 continue;
3775 if (info->emu.carrierwait++ > info->emu.mdmreg[REG_WAITC]) {
3776 info->dialing = 0;
3777 isdn_tty_modem_result(RESULT_NO_CARRIER, info);
3778 isdn_tty_modem_hup(info, 1);
3779 } else
3780 ton = 1;
3781 }
3782 isdn_timer_ctrl(ISDN_TIMER_CARRIER, ton);
3783 }
Linux with added FPC-III support