xref: /netbsd-src/usr.bin/netstat/if.c (revision da5f4674a3fc214be3572d358b66af40ab9401e7)
1 /*	$NetBSD: if.c,v 1.56 2003/08/19 12:52:13 itojun Exp $	*/
2 
3 /*
4  * Copyright (c) 1983, 1988, 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[] = "from: @(#)if.c	8.2 (Berkeley) 2/21/94";
36 #else
37 __RCSID("$NetBSD: if.c,v 1.56 2003/08/19 12:52:13 itojun Exp $");
38 #endif
39 #endif /* not lint */
40 
41 #include <sys/types.h>
42 #include <sys/protosw.h>
43 #include <sys/socket.h>
44 
45 #include <net/if.h>
46 #include <net/if_dl.h>
47 #include <net/if_types.h>
48 #include <netinet/in.h>
49 #include <netinet/in_var.h>
50 #include <netns/ns.h>
51 #include <netns/ns_if.h>
52 #include <netiso/iso.h>
53 #include <netiso/iso_var.h>
54 #include <arpa/inet.h>
55 
56 #include <signal.h>
57 #include <stdio.h>
58 #include <stdlib.h>
59 #include <string.h>
60 #include <unistd.h>
61 #include <netdb.h>
62 
63 #include "netstat.h"
64 
65 #define	YES	1
66 #define	NO	0
67 
68 static void sidewaysintpr __P((u_int, u_long));
69 static void catchalarm __P((int));
70 
71 /*
72  * Print a description of the network interfaces.
73  * NOTE: ifnetaddr is the location of the kernel global "ifnet",
74  * which is a TAILQ_HEAD.
75  */
76 void
77 intpr(interval, ifnetaddr, pfunc)
78 	int interval;
79 	u_long ifnetaddr;
80 	void (*pfunc)(char *);
81 {
82 	struct ifnet ifnet;
83 	union {
84 		struct ifaddr ifa;
85 		struct in_ifaddr in;
86 #ifdef INET6
87 		struct in6_ifaddr in6;
88 #endif /* INET6 */
89 		struct ns_ifaddr ns;
90 		struct iso_ifaddr iso;
91 	} ifaddr;
92 	u_long ifaddraddr;
93 	struct sockaddr *sa;
94 	struct ifnet_head ifhead;	/* TAILQ_HEAD */
95 	char name[IFNAMSIZ + 1];	/* + 1 for `*' */
96 	char hbuf[NI_MAXHOST];		/* for getnameinfo() */
97 #ifdef INET6
98 #ifdef NI_WITHSCOPEID
99 	const int niflag = NI_NUMERICHOST | NI_WITHSCOPEID;
100 #else
101 	const int niflag = NI_NUMERICHOST;
102 #endif
103 #endif
104 
105 	if (ifnetaddr == 0) {
106 		printf("ifnet: symbol not defined\n");
107 		return;
108 	}
109 	if (interval) {
110 		sidewaysintpr((unsigned)interval, ifnetaddr);
111 		return;
112 	}
113 
114 	/*
115 	 * Find the pointer to the first ifnet structure.  Replace
116 	 * the pointer to the TAILQ_HEAD with the actual pointer
117 	 * to the first list element.
118 	 */
119 	if (kread(ifnetaddr, (char *)&ifhead, sizeof ifhead))
120 		return;
121 	ifnetaddr = (u_long)ifhead.tqh_first;
122 
123 	if (!sflag & !pflag) {
124 		if (bflag) {
125 			printf("%-5.5s %-5.5s %-13.13s %-17.17s "
126 			       "%10.10s %10.10s",
127 			       "Name", "Mtu", "Network", "Address",
128 			       "Ibytes", "Obytes");
129 		} else {
130 			printf("%-5.5s %-5.5s %-13.13s %-17.17s "
131 			       "%8.8s %5.5s %8.8s %5.5s %5.5s",
132 			       "Name", "Mtu", "Network", "Address", "Ipkts", "Ierrs",
133 			       "Opkts", "Oerrs", "Colls");
134 		}
135 		if (tflag)
136 			printf(" %4.4s", "Time");
137 		if (dflag)
138 			printf(" %5.5s", "Drops");
139 		putchar('\n');
140 	}
141 	ifaddraddr = 0;
142 	while (ifnetaddr || ifaddraddr) {
143 		struct sockaddr_in *sin;
144 #ifdef INET6
145 		struct sockaddr_in6 *sin6;
146 #endif /* INET6 */
147 		char *cp;
148 		int n, m;
149 
150 		if (ifaddraddr == 0) {
151 			if (kread(ifnetaddr, (char *)&ifnet, sizeof ifnet))
152 				return;
153 			memmove(name, ifnet.if_xname, IFNAMSIZ);
154 			name[IFNAMSIZ - 1] = '\0';	/* sanity */
155 			ifnetaddr = (u_long)ifnet.if_list.tqe_next;
156 			if (interface != 0 && strcmp(name, interface) != 0)
157 				continue;
158 			cp = strchr(name, '\0');
159 
160 			if (pfunc) {
161 				(*pfunc)(name);
162 				continue;
163 			}
164 
165 			if ((ifnet.if_flags & IFF_UP) == 0)
166 				*cp++ = '*';
167 			*cp = '\0';
168 			ifaddraddr = (u_long)ifnet.if_addrlist.tqh_first;
169 		}
170 		if (vflag)
171 			n = strlen(name) < 5 ? 5 : strlen(name);
172 		else
173 			n = 5;
174 		printf("%-*.*s %-5llu ", n, n, name,
175 		    (unsigned long long)ifnet.if_mtu);
176 		if (ifaddraddr == 0) {
177 			printf("%-13.13s ", "none");
178 			printf("%-17.17s ", "none");
179 		} else {
180 			char hexsep = '.';		/* for hexprint */
181 			static const char hexfmt[] = "%02x%c";	/* for hexprint */
182 			if (kread(ifaddraddr, (char *)&ifaddr, sizeof ifaddr)) {
183 				ifaddraddr = 0;
184 				continue;
185 			}
186 #define CP(x) ((char *)(x))
187 			cp = (CP(ifaddr.ifa.ifa_addr) - CP(ifaddraddr)) +
188 			    CP(&ifaddr);
189 			sa = (struct sockaddr *)cp;
190 			switch (sa->sa_family) {
191 			case AF_UNSPEC:
192 				printf("%-13.13s ", "none");
193 				printf("%-17.17s ", "none");
194 				break;
195 			case AF_INET:
196 				sin = (struct sockaddr_in *)sa;
197 #ifdef notdef
198 				/*
199 				 * can't use inet_makeaddr because kernel
200 				 * keeps nets unshifted.
201 				 */
202 				in = inet_makeaddr(ifaddr.in.ia_subnet,
203 					INADDR_ANY);
204 				cp = netname(in.s_addr,
205 					ifaddr.in.ia_subnetmask);
206 #else
207 				cp = netname(ifaddr.in.ia_subnet,
208 					ifaddr.in.ia_subnetmask);
209 #endif
210 				if (vflag)
211 					n = strlen(cp) < 13 ? 13 : strlen(cp);
212 				else
213 					n = 13;
214 				printf("%-*.*s ", n, n, cp);
215 				cp = routename(sin->sin_addr.s_addr);
216 				if (vflag)
217 					n = strlen(cp) < 17 ? 17 : strlen(cp);
218 				else
219 					n = 17;
220 				printf("%-*.*s ", n, n, cp);
221 				if (aflag) {
222 					u_long multiaddr;
223 					struct in_multi inm;
224 
225 					multiaddr = (u_long)
226 					    ifaddr.in.ia_multiaddrs.lh_first;
227 					while (multiaddr != 0) {
228 						kread(multiaddr, (char *)&inm,
229 						   sizeof inm);
230 						printf("\n%25s %-17.17s ", "",
231 						   routename(
232 						      inm.inm_addr.s_addr));
233 						multiaddr =
234 						   (u_long)inm.inm_list.le_next;
235 					}
236 				}
237 				break;
238 #ifdef INET6
239 			case AF_INET6:
240 				sin6 = (struct sockaddr_in6 *)sa;
241 #ifdef __KAME__
242 				if (IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr)) {
243 					sin6->sin6_scope_id =
244 						ntohs(*(u_int16_t *)
245 						  &sin6->sin6_addr.s6_addr[2]);
246 					/* too little width */
247 					if (!vflag)
248 						sin6->sin6_scope_id = 0;
249 					sin6->sin6_addr.s6_addr[2] = 0;
250 					sin6->sin6_addr.s6_addr[3] = 0;
251 				}
252 #endif
253 				cp = netname6(&ifaddr.in6.ia_addr,
254 					&ifaddr.in6.ia_prefixmask.sin6_addr);
255 				if (vflag)
256 					n = strlen(cp) < 13 ? 13 : strlen(cp);
257 				else
258 					n = 13;
259 				printf("%-*.*s ", n, n, cp);
260 				if (getnameinfo((struct sockaddr *)sin6,
261 						sin6->sin6_len,
262 						hbuf, sizeof(hbuf), NULL, 0,
263 						niflag) != 0) {
264 					cp = "?";
265 				} else
266 					cp = hbuf;
267 				if (vflag)
268 					n = strlen(cp) < 17 ? 17 : strlen(cp);
269 				else
270 					n = 17;
271 				printf("%-*.*s ", n, n, cp);
272 				if (aflag) {
273 					u_long multiaddr;
274 					struct in6_multi inm;
275 					struct sockaddr_in6 sin6;
276 
277 					multiaddr = (u_long)
278 					    ifaddr.in6.ia6_multiaddrs.lh_first;
279 					while (multiaddr != 0) {
280 						kread(multiaddr, (char *)&inm,
281 						   sizeof inm);
282 						memset(&sin6, 0, sizeof(sin6));
283 						sin6.sin6_len = sizeof(struct sockaddr_in6);
284 						sin6.sin6_family = AF_INET6;
285 						sin6.sin6_addr = inm.in6m_addr;
286 #ifdef __KAME__
287 						if (IN6_IS_ADDR_MC_LINKLOCAL(&sin6.sin6_addr)) {
288 							sin6.sin6_scope_id =
289 							    ntohs(*(u_int16_t *)
290 								&sin6.sin6_addr.s6_addr[2]);
291 							sin6.sin6_addr.s6_addr[2] = 0;
292 							sin6.sin6_addr.s6_addr[3] = 0;
293 						}
294 #endif
295 						if (getnameinfo((struct sockaddr *)&sin6,
296 						    sin6.sin6_len, hbuf,
297 						    sizeof(hbuf), NULL, 0,
298 						    niflag) != 0) {
299 							strlcpy(hbuf, "??",
300 							    sizeof(hbuf));
301 						}
302 						cp = hbuf;
303 						if (vflag)
304 						    n = strlen(cp) < 17
305 							? 17 : strlen(cp);
306 						else
307 						    n = 17;
308 						printf("\n%25s %-*.*s ", "",
309 						    n, n, cp);
310 						multiaddr =
311 						   (u_long)inm.in6m_entry.le_next;
312 					}
313 				}
314 				break;
315 #endif /*INET6*/
316 #ifndef SMALL
317 			case AF_APPLETALK:
318 				printf("atalk:%-7.7s ",
319 				       atalk_print(sa,0x10));
320 				printf("%-17.17s ", atalk_print(sa,0x0b));
321 				break;
322 			case AF_NS:
323 				{
324 				struct sockaddr_ns *sns =
325 					(struct sockaddr_ns *)sa;
326 				u_long net;
327 				char netnum[10];
328 
329 				*(union ns_net *)&net = sns->sns_addr.x_net;
330 				(void)snprintf(netnum, sizeof(netnum), "%xH",
331 				    (u_int32_t)ntohl(net));
332 				upHex(netnum);
333 				printf("ns:%-10s ", netnum);
334 				printf("%-17.17s ",
335 				    ns_phost((struct sockaddr *)sns));
336 				}
337 				break;
338 #endif
339 			case AF_LINK:
340 				printf("%-13.13s ", "<Link>");
341 				if (getnameinfo(sa, sa->sa_len,
342 				    hbuf, sizeof(hbuf), NULL, 0,
343 				    NI_NUMERICHOST) != 0) {
344 					cp = "?";
345 				} else
346 					cp = hbuf;
347 				if (vflag)
348 					n = strlen(cp) < 17 ? 17 : strlen(cp);
349 				else
350 					n = 17;
351 				printf("%-*.*s ", n, n, cp);
352 				break;
353 
354 			default:
355 				m = printf("(%d)", sa->sa_family);
356 				for (cp = sa->sa_len + (char *)sa;
357 					--cp > sa->sa_data && (*cp == 0);) {}
358 				n = cp - sa->sa_data + 1;
359 				cp = sa->sa_data;
360 				while (--n >= 0)
361 					m += printf(hexfmt, *cp++ & 0xff,
362 						    n > 0 ? hexsep : ' ');
363 				m = 32 - m;
364 				while (m-- > 0)
365 					putchar(' ');
366 				break;
367 			}
368 			ifaddraddr = (u_long)ifaddr.ifa.ifa_list.tqe_next;
369 		}
370 		if (bflag) {
371 			printf("%10llu %10llu",
372 				(unsigned long long)ifnet.if_ibytes,
373 				(unsigned long long)ifnet.if_obytes);
374 		} else {
375 			printf("%8llu %5llu %8llu %5llu %5llu",
376 				(unsigned long long)ifnet.if_ipackets,
377 				(unsigned long long)ifnet.if_ierrors,
378 				(unsigned long long)ifnet.if_opackets,
379 				(unsigned long long)ifnet.if_oerrors,
380 				(unsigned long long)ifnet.if_collisions);
381 		}
382 		if (tflag)
383 			printf(" %4d", ifnet.if_timer);
384 		if (dflag)
385 			printf(" %5d", ifnet.if_snd.ifq_drops);
386 		putchar('\n');
387 	}
388 }
389 
390 #define	MAXIF	100
391 struct	iftot {
392 	char ift_name[IFNAMSIZ];	/* interface name */
393 	u_quad_t ift_ip;		/* input packets */
394 	u_quad_t ift_ib;		/* input bytes */
395 	u_quad_t ift_ie;		/* input errors */
396 	u_quad_t ift_op;		/* output packets */
397 	u_quad_t ift_ob;		/* output bytes */
398 	u_quad_t ift_oe;		/* output errors */
399 	u_quad_t ift_co;		/* collisions */
400 	int ift_dr;			/* drops */
401 } iftot[MAXIF];
402 
403 u_char	signalled;			/* set if alarm goes off "early" */
404 
405 /*
406  * Print a running summary of interface statistics.
407  * Repeat display every interval seconds, showing statistics
408  * collected over that interval.  Assumes that interval is non-zero.
409  * First line printed at top of screen is always cumulative.
410  */
411 static void
412 sidewaysintpr(interval, off)
413 	unsigned interval;
414 	u_long off;
415 {
416 	struct ifnet ifnet;
417 	u_long firstifnet;
418 	struct iftot *ip, *total;
419 	int line;
420 	struct iftot *lastif, *sum, *interesting;
421 	struct ifnet_head ifhead;	/* TAILQ_HEAD */
422 	int oldmask;
423 
424 	/*
425 	 * Find the pointer to the first ifnet structure.  Replace
426 	 * the pointer to the TAILQ_HEAD with the actual pointer
427 	 * to the first list element.
428 	 */
429 	if (kread(off, (char *)&ifhead, sizeof ifhead))
430 		return;
431 	firstifnet = (u_long)ifhead.tqh_first;
432 
433 	lastif = iftot;
434 	sum = iftot + MAXIF - 1;
435 	total = sum - 1;
436 	interesting = (interface == NULL) ? iftot : NULL;
437 	for (off = firstifnet, ip = iftot; off;) {
438 		if (kread(off, (char *)&ifnet, sizeof ifnet))
439 			break;
440 		memset(ip->ift_name, 0, sizeof(ip->ift_name));
441 		snprintf(ip->ift_name, IFNAMSIZ, "%s", ifnet.if_xname);
442 		if (interface && strcmp(ifnet.if_xname, interface) == 0)
443 			interesting = ip;
444 		ip++;
445 		if (ip >= iftot + MAXIF - 2)
446 			break;
447 		off = (u_long)ifnet.if_list.tqe_next;
448 	}
449 	if (interesting == NULL) {
450 		fprintf(stderr, "%s: %s: unknown interface\n",
451 		    getprogname(), interface);
452 		exit(1);
453 	}
454 	lastif = ip;
455 
456 	(void)signal(SIGALRM, catchalarm);
457 	signalled = NO;
458 	(void)alarm(interval);
459 banner:
460 	if (bflag)
461 		printf("%7.7s in %8.8s %6.6s out %5.5s",
462 		    interesting->ift_name, " ",
463 		    interesting->ift_name, " ");
464 	else
465 		printf("%5.5s in %5.5s%5.5s out %5.5s %5.5s",
466 		    interesting->ift_name, " ",
467 		    interesting->ift_name, " ", " ");
468 	if (dflag)
469 		printf(" %5.5s", " ");
470 	if (lastif - iftot > 0) {
471 		if (bflag)
472 			printf("  %7.7s in %8.8s %6.6s out %5.5s",
473 			    "total", " ", "total", " ");
474 		else
475 			printf("  %5.5s in %5.5s%5.5s out %5.5s %5.5s",
476 			    "total", " ", "total", " ", " ");
477 		if (dflag)
478 			printf(" %5.5s", " ");
479 	}
480 	for (ip = iftot; ip < iftot + MAXIF; ip++) {
481 		ip->ift_ip = 0;
482 		ip->ift_ib = 0;
483 		ip->ift_ie = 0;
484 		ip->ift_op = 0;
485 		ip->ift_ob = 0;
486 		ip->ift_oe = 0;
487 		ip->ift_co = 0;
488 		ip->ift_dr = 0;
489 	}
490 	putchar('\n');
491 	if (bflag)
492 		printf("%10.10s %8.8s %10.10s %5.5s",
493 		    "bytes", " ", "bytes", " ");
494 	else
495 		printf("%8.8s %5.5s %8.8s %5.5s %5.5s",
496 		    "packets", "errs", "packets", "errs", "colls");
497 	if (dflag)
498 		printf(" %5.5s", "drops");
499 	if (lastif - iftot > 0) {
500 		if (bflag)
501 			printf("  %10.10s %8.8s %10.10s %5.5s",
502 			    "bytes", " ", "bytes", " ");
503 		else
504 			printf("  %8.8s %5.5s %8.8s %5.5s %5.5s",
505 			    "packets", "errs", "packets", "errs", "colls");
506 		if (dflag)
507 			printf(" %5.5s", "drops");
508 	}
509 	putchar('\n');
510 	fflush(stdout);
511 	line = 0;
512 loop:
513 	sum->ift_ip = 0;
514 	sum->ift_ib = 0;
515 	sum->ift_ie = 0;
516 	sum->ift_op = 0;
517 	sum->ift_ob = 0;
518 	sum->ift_oe = 0;
519 	sum->ift_co = 0;
520 	sum->ift_dr = 0;
521 	for (off = firstifnet, ip = iftot; off && ip < lastif; ip++) {
522 		if (kread(off, (char *)&ifnet, sizeof ifnet)) {
523 			off = 0;
524 			continue;
525 		}
526 		if (ip == interesting) {
527 			if (bflag) {
528 				printf("%10llu %8.8s %10llu %5.5s",
529 				    (unsigned long long)(ifnet.if_ibytes -
530 					ip->ift_ib), " ",
531 				    (unsigned long long)(ifnet.if_obytes -
532 					ip->ift_ob), " ");
533 			} else {
534 				printf("%8llu %5llu %8llu %5llu %5llu",
535 				    (unsigned long long)
536 					(ifnet.if_ipackets - ip->ift_ip),
537 				    (unsigned long long)
538 					(ifnet.if_ierrors - ip->ift_ie),
539 				    (unsigned long long)
540 					(ifnet.if_opackets - ip->ift_op),
541 				    (unsigned long long)
542 					(ifnet.if_oerrors - ip->ift_oe),
543 				    (unsigned long long)
544 					(ifnet.if_collisions - ip->ift_co));
545 			}
546 			if (dflag)
547 				printf(" %5llu",
548 				    (unsigned long long)
549 					(ifnet.if_snd.ifq_drops - ip->ift_dr));
550 		}
551 		ip->ift_ip = ifnet.if_ipackets;
552 		ip->ift_ib = ifnet.if_ibytes;
553 		ip->ift_ie = ifnet.if_ierrors;
554 		ip->ift_op = ifnet.if_opackets;
555 		ip->ift_ob = ifnet.if_obytes;
556 		ip->ift_oe = ifnet.if_oerrors;
557 		ip->ift_co = ifnet.if_collisions;
558 		ip->ift_dr = ifnet.if_snd.ifq_drops;
559 		sum->ift_ip += ip->ift_ip;
560 		sum->ift_ib += ip->ift_ib;
561 		sum->ift_ie += ip->ift_ie;
562 		sum->ift_op += ip->ift_op;
563 		sum->ift_ob += ip->ift_ob;
564 		sum->ift_oe += ip->ift_oe;
565 		sum->ift_co += ip->ift_co;
566 		sum->ift_dr += ip->ift_dr;
567 		off = (u_long)ifnet.if_list.tqe_next;
568 	}
569 	if (lastif - iftot > 0) {
570 		if (bflag) {
571 			printf("  %10llu %8.8s %10llu %5.5s",
572 			    (unsigned long long)
573 				(sum->ift_ib - total->ift_ib), " ",
574 			    (unsigned long long)
575 				(sum->ift_ob - total->ift_ob), " ");
576 		} else {
577 			printf("  %8llu %5llu %8llu %5llu %5llu",
578 			    (unsigned long long)
579 				(sum->ift_ip - total->ift_ip),
580 			    (unsigned long long)
581 				(sum->ift_ie - total->ift_ie),
582 			    (unsigned long long)
583 				(sum->ift_op - total->ift_op),
584 			    (unsigned long long)
585 				(sum->ift_oe - total->ift_oe),
586 			    (unsigned long long)
587 				(sum->ift_co - total->ift_co));
588 		}
589 		if (dflag)
590 			printf(" %5llu",
591 			    (unsigned long long)(sum->ift_dr - total->ift_dr));
592 	}
593 	*total = *sum;
594 	putchar('\n');
595 	fflush(stdout);
596 	line++;
597 	oldmask = sigblock(sigmask(SIGALRM));
598 	if (! signalled) {
599 		sigpause(0);
600 	}
601 	sigsetmask(oldmask);
602 	signalled = NO;
603 	(void)alarm(interval);
604 	if (line == 21)
605 		goto banner;
606 	goto loop;
607 	/*NOTREACHED*/
608 }
609 
610 /*
611  * Called if an interval expires before sidewaysintpr has completed a loop.
612  * Sets a flag to not wait for the alarm.
613  */
614 static void
615 catchalarm(signo)
616 	int signo;
617 {
618 
619 	signalled = YES;
620 }
621