1 /* 2 * Copyright (c) 1983 The Regents of the University of California. 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 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. 20 * 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 31 * SUCH DAMAGE. 32 */ 33 34 #ifndef lint 35 static char sccsid[] = "@(#)df.c 5.4 (Berkeley) 3/2/91"; 36 #endif /* not lint */ 37 38 /* 39 * Dial the DF02-AC or DF03-AC 40 */ 41 42 #include "tip.h" 43 44 static jmp_buf Sjbuf; 45 static void timeout(); 46 47 df02_dialer(num, acu) 48 char *num, *acu; 49 { 50 51 return (df_dialer(num, acu, 0)); 52 } 53 54 df03_dialer(num, acu) 55 char *num, *acu; 56 { 57 58 return (df_dialer(num, acu, 1)); 59 } 60 61 df_dialer(num, acu, df03) 62 char *num, *acu; 63 int df03; 64 { 65 register int f = FD; 66 struct sgttyb buf; 67 int speed = 0, rw = 2; 68 char c = '\0'; 69 70 ioctl(f, TIOCHPCL, 0); /* make sure it hangs up when done */ 71 if (setjmp(Sjbuf)) { 72 printf("connection timed out\r\n"); 73 df_disconnect(); 74 return (0); 75 } 76 if (boolean(value(VERBOSE))) 77 printf("\ndialing..."); 78 fflush(stdout); 79 #ifdef TIOCMSET 80 if (df03) { 81 int st = TIOCM_ST; /* secondary Transmit flag */ 82 83 ioctl(f, TIOCGETP, &buf); 84 if (buf.sg_ospeed != B1200) { /* must dial at 1200 baud */ 85 speed = buf.sg_ospeed; 86 buf.sg_ospeed = buf.sg_ispeed = B1200; 87 ioctl(f, TIOCSETP, &buf); 88 ioctl(f, TIOCMBIC, &st); /* clear ST for 300 baud */ 89 } else 90 ioctl(f, TIOCMBIS, &st); /* set ST for 1200 baud */ 91 } 92 #endif 93 signal(SIGALRM, timeout); 94 alarm(5 * strlen(num) + 10); 95 ioctl(f, TIOCFLUSH, &rw); 96 write(f, "\001", 1); 97 sleep(1); 98 write(f, "\002", 1); 99 write(f, num, strlen(num)); 100 read(f, &c, 1); 101 #ifdef TIOCMSET 102 if (df03 && speed) { 103 buf.sg_ispeed = buf.sg_ospeed = speed; 104 ioctl(f, TIOCSETP, &buf); 105 } 106 #endif 107 return (c == 'A'); 108 } 109 110 df_disconnect() 111 { 112 int rw = 2; 113 114 write(FD, "\001", 1); 115 sleep(1); 116 ioctl(FD, TIOCFLUSH, &rw); 117 } 118 119 120 df_abort() 121 { 122 123 df_disconnect(); 124 } 125 126 127 static void 128 timeout() 129 { 130 131 longjmp(Sjbuf, 1); 132 } 133