2 * Copyright (c) 1983, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * @(#)v3451.c 8.1 (Berkeley) 6/6/93
34 * $DragonFly: src/usr.bin/tip/libacu/v3451.c,v 1.3 2005/05/07 23:20:43 corecode Exp $
38 * Routines for calling up on a Vadic 3451 Modem
43 static int expect(char *);
44 static void vawrite(char *, int);
45 static int notin(char *, char *);
46 static void alarmtr(void);
47 static int prefix(char *, char *);
51 v3451_dialer(num
, acu
)
57 int slow
= number(value(BAUDRATE
)) < 1200, rw
= 2;
66 vawrite("I\r", 1 + slow
);
67 vawrite("I\r", 1 + slow
);
68 vawrite("I\r", 1 + slow
);
69 vawrite("\005\r", 2 + slow
);
70 if (!expect("READY")) {
71 printf("can't synchronize with vadic 3451\n");
73 logent(value(HOST
), num
, "vadic", "can't synch up");
79 vawrite("D\r", 2 + slow
);
80 if (!expect("NUMBER?")) {
81 printf("Vadic will not accept dial command\n");
83 logent(value(HOST
), num
, "vadic", "will not accept dial");
89 vawrite(phone
, 1 + slow
);
91 printf("Vadic will not accept phone number\n");
93 logent(value(HOST
), num
, "vadic", "will not accept number");
97 func
= signal(SIGINT
,SIG_IGN
);
99 * You cannot interrupt the Vadic when its dialing;
100 * even dropping DTR does not work (definitely a
101 * brain damaged design).
103 vawrite("\r", 1 + slow
);
104 vawrite("\r", 1 + slow
);
105 if (!expect("DIALING:")) {
106 printf("Vadic failed to dial\n");
108 logent(value(HOST
), num
, "vadic", "failed to dial");
112 if (boolean(value(VERBOSE
)))
113 printf("\ndialing...");
114 ok
= expect("ON LINE");
115 signal(SIGINT
, func
);
117 printf("call failed\n");
119 logent(value(HOST
), num
, "vadic", "call failed");
123 ioctl(FD
, TIOCFLUSH
, &rw
);
145 for (; *cp
; sleep(delay
), cp
++)
154 register char *rp
= buf
;
155 int timeout
= 30, online
= 0;
157 if (strcmp(cp
, "\"\"") == 0)
161 * If we are waiting for the Vadic to complete
162 * dialing and get a connection, allow more time
163 * Unfortunately, the Vadic times out 24 seconds after
164 * the last digit is dialed
166 online
= strcmp(cp
, "ON LINE") == 0;
168 timeout
= number(value(DIALTIMEOUT
));
169 signal(SIGALRM
, alarmtr
);
173 while (notin(cp
, buf
) && rp
< buf
+ sizeof (buf
) - 1) {
174 if (online
&& notin("FAILED CALL", buf
) == 0)
176 if (read(FD
, rp
, 1) < 0) {
206 register char *s1
, *s2
;
210 while ((c
= *s1
++) == *s2
++)