xref: /netbsd-src/usr.bin/tip/hunt.c (revision 1f2744e6e4915c9da2a3f980279398c4cf7d5e6d)
1 /*	$NetBSD: hunt.c,v 1.4 1994/12/24 17:56:27 cgd 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. All advertising materials mentioning features or use of this software
16  *    must display the following acknowledgement:
17  *	This product includes software developed by the University of
18  *	California, Berkeley and its contributors.
19  * 4. Neither the name of the University nor the names of its contributors
20  *    may be used to endorse or promote products derived from this software
21  *    without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  */
35 
36 #ifndef lint
37 #if 0
38 static char sccsid[] = "@(#)hunt.c	8.1 (Berkeley) 6/6/93";
39 #endif
40 static char rcsid[] = "$NetBSD: hunt.c,v 1.4 1994/12/24 17:56:27 cgd Exp $";
41 #endif /* not lint */
42 
43 #include "tip.h"
44 
45 extern char *getremote();
46 extern char *rindex();
47 
48 static	jmp_buf deadline;
49 static	int deadfl;
50 
51 void
52 dead()
53 {
54 	deadfl = 1;
55 	longjmp(deadline, 1);
56 }
57 
58 long
59 hunt(name)
60 	char *name;
61 {
62 	register char *cp;
63 	sig_t f;
64 
65 	f = signal(SIGALRM, dead);
66 	while (cp = getremote(name)) {
67 		deadfl = 0;
68 		uucplock = rindex(cp, '/')+1;
69 		if (uu_lock(uucplock) < 0)
70 			continue;
71 		/*
72 		 * Straight through call units, such as the BIZCOMP,
73 		 * VADIC and the DF, must indicate they're hardwired in
74 		 *  order to get an open file descriptor placed in FD.
75 		 * Otherwise, as for a DN-11, the open will have to
76 		 *  be done in the "open" routine.
77 		 */
78 		if (!HW)
79 			break;
80 		if (setjmp(deadline) == 0) {
81 			alarm(10);
82 			FD = open(cp, O_RDWR);
83 		}
84 		alarm(0);
85 		if (FD < 0) {
86 			perror(cp);
87 			deadfl = 1;
88 		}
89 		if (!deadfl) {
90 			ioctl(FD, TIOCEXCL, 0);
91 			ioctl(FD, TIOCHPCL, 0);
92 			signal(SIGALRM, SIG_DFL);
93 			return ((long)cp);
94 		}
95 		(void)uu_unlock(uucplock);
96 	}
97 	signal(SIGALRM, f);
98 	return (deadfl ? -1 : (long)cp);
99 }
100