1 /*        $NetBSD: dn11.c,v 1.10 2006/12/14 17:09:43 christos Exp $   */
2 
3 /*
4  * Copyright (c) 1983, 1993
5  *        The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of the University nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  */
31 
32 #include <sys/cdefs.h>
33 #ifndef lint
34 #if 0
35 static char sccsid[] = "@(#)dn11.c      8.1 (Berkeley) 6/6/93";
36 #endif
37 __RCSID("$NetBSD: dn11.c,v 1.10 2006/12/14 17:09:43 christos Exp $");
38 #endif /* not lint */
39 
40 /*
41  * Routines for dialing up on DN-11
42  */
43 #include "tip.h"
44 
45 static jmp_buf jmpbuf;
46 static int child = -1, dn;
47 
48 static    void      alarmtr(int);
49 
50 int
dn_dialer(char * num,char * acu)51 dn_dialer(char *num, char *acu)
52 {
53           int lt, nw;
54           int timelim;
55           struct termios cntrl;
56 
57           if (boolean(value(VERBOSE)))
58                     (void)printf("\nstarting call...");
59           if ((dn = open(acu, O_WRONLY)) < 0) {
60                     if (errno == EBUSY)
61                               (void)printf("line busy...");
62                     else
63                               (void)printf("acu open error...");
64                     return (0);
65           }
66           if (setjmp(jmpbuf)) {
67                     (void)kill(child, SIGKILL);
68                     (void)close(dn);
69                     return (0);
70           }
71           (void)signal(SIGALRM, alarmtr);
72           timelim = 5 * strlen(num);
73           (void)alarm((unsigned)(timelim < 30 ? 30 : timelim));
74           if ((child = fork()) == 0) {
75                     /*
76                      * ignore this stuff for aborts
77                      */
78                     (void)signal(SIGALRM, SIG_IGN);
79                     (void)signal(SIGINT, SIG_IGN);
80                     (void)signal(SIGQUIT, SIG_IGN);
81                     (void)sleep(2);
82                     nw = write(dn, num, (size_t)(lt = strlen(num)));
83                     exit(nw != lt);
84           }
85           /*
86            * open line - will return on carrier
87            */
88           if ((FD = open(DV, O_RDWR)) < 0) {
89                     if (errno == EIO)
90                               (void)printf("lost carrier...");
91                     else
92                               (void)printf("dialup line open failed...");
93                     (void)alarm(0);
94                     (void)kill(child, SIGKILL);
95                     (void)close(dn);
96                     return (0);
97           }
98           (void)alarm(0);
99           (void)tcgetattr(dn, &cntrl);
100           cntrl.c_cflag |= HUPCL;
101           (void)tcsetattr(dn, TCSANOW, &cntrl);
102           (void)signal(SIGALRM, SIG_DFL);
103           while ((nw = wait(&lt)) != child && nw != -1)
104                     ;
105           (void)fflush(stdout);
106           (void)close(dn);
107           if (lt != 0) {
108                     (void)close(FD);
109                     return (0);
110           }
111           return (1);
112 }
113 
114 static void
115 /*ARGSUSED*/
alarmtr(int dummy __unused)116 alarmtr(int dummy __unused)
117 {
118 
119           (void)alarm(0);
120           longjmp(jmpbuf, 1);
121 }
122 
123 /*
124  * Insurance, for some reason we don't seem to be
125  *  hanging up...
126  */
127 void
dn_disconnect(void)128 dn_disconnect(void)
129 {
130 
131           (void)sleep(2);
132           if (FD > 0)
133                     (void)ioctl(FD, TIOCCDTR, 0);
134           (void)close(FD);
135 }
136 
137 void
dn_abort(void)138 dn_abort(void)
139 {
140 
141           (void)sleep(2);
142           if (child > 0)
143                     (void)kill(child, SIGKILL);
144           if (dn > 0)
145                     (void)close(dn);
146           if (FD > 0)
147                     (void)ioctl(FD, TIOCCDTR, 0);
148           (void)close(FD);
149 }
150