xref: /netbsd/usr.bin/tip/aculib/dn11.c (revision 6550d01e)
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
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*/
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
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
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