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