1 /* $OpenBSD: df.c,v 1.9 2006/03/17 19:17:13 moritz Exp $ */
2 /* $NetBSD: df.c,v 1.4 1995/10/29 00:49:51 pk Exp $ */
3
4 /*
5 * Copyright (c) 1983, 1993
6 * The Regents of the University of California. All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of the University nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 */
32
33 #include <sys/cdefs.h>
34 __FBSDID("$FreeBSD$");
35
36 #ifndef lint
37 #if 0
38 static char sccsid[] = "@(#)df.c 8.1 (Berkeley) 6/6/93";
39 static const char rcsid[] = "$OpenBSD: df.c,v 1.9 2006/03/17 19:17:13 moritz Exp $";
40 #endif
41 #endif /* not lint */
42
43 /*
44 * Dial the DF02-AC or DF03-AC
45 */
46
47 #include "tip.h"
48
49 static jmp_buf Sjbuf;
50
51 static int df_dialer(char *, char *, int);
52 static void alrm_timeout(int);
53
54 int
df02_dialer(char * num,char * acu)55 df02_dialer(char *num, char *acu)
56 {
57 return (df_dialer(num, acu, 0));
58 }
59
60 int
df03_dialer(char * num,char * acu)61 df03_dialer(char *num, char *acu)
62 {
63 return (df_dialer(num, acu, 1));
64 }
65
66 static int
df_dialer(char * num,char * acu,int df03)67 df_dialer(char *num, char *acu, int df03)
68 {
69 int f = FD;
70 struct termios cntrl;
71 int speed = 0;
72 char c = '\0';
73
74 tcgetattr(f, &cntrl);
75 cntrl.c_cflag |= HUPCL;
76 tcsetattr(f, TCSANOW, &cntrl);
77 if (setjmp(Sjbuf)) {
78 printf("connection timed out\r\n");
79 df_disconnect();
80 return (0);
81 }
82 if (boolean(value(VERBOSE)))
83 printf("\ndialing...");
84 fflush(stdout);
85 #ifdef TIOCMSET
86 if (df03) {
87 int st = TIOCM_ST; /* secondary Transmit flag */
88
89 tcgetattr(f, &cntrl);
90 speed = cfgetospeed(&cntrl);
91 if (speed != B1200) { /* must dial at 1200 baud */
92 cfsetospeed(&cntrl, B1200);
93 cfsetispeed(&cntrl, B1200);
94 tcsetattr(f, TCSAFLUSH, &cntrl);
95 ioctl(f, TIOCMBIC, &st); /* clear ST for 300 baud */
96 } else
97 ioctl(f, TIOCMBIS, &st); /* set ST for 1200 baud */
98 }
99 #endif
100 signal(SIGALRM, alrm_timeout);
101 alarm(5 * strlen(num) + 10);
102 tcflush(f, TCIOFLUSH);
103 write(f, "\001", 1);
104 sleep(1);
105 write(f, "\002", 1);
106 write(f, num, strlen(num));
107 read(f, &c, 1);
108 #ifdef TIOCMSET
109 if (df03 && speed != B1200) {
110 cfsetospeed(&cntrl, speed);
111 cfsetispeed(&cntrl, speed);
112 tcsetattr(f, TCSAFLUSH, &cntrl);
113 }
114 #endif
115 return (c == 'A');
116 }
117
118 void
df_disconnect(void)119 df_disconnect(void)
120 {
121 write(FD, "\001", 1);
122 sleep(1);
123 tcflush(FD, TCIOFLUSH);
124 }
125
126 void
df_abort(void)127 df_abort(void)
128 {
129 df_disconnect();
130 }
131
132 /*ARGSUSED*/
133 static void
alrm_timeout(int signo)134 alrm_timeout(int signo)
135 {
136 longjmp(Sjbuf, 1);
137 }
138