* Copyright (c) 1983,1988 Regents of the University of California.
* Redistribution and use in source and binary forms are permitted
* provided that this notice is preserved and that due credit is given
* to the University of California at Berkeley. The name of the University
* may not be used to endorse or promote products derived from this
* software without specific prior written permission. This software
* is provided ``as is'' without express or implied warranty.
static char sccsid
[] = "@(#)route.c 5.13 (Berkeley) 88/02/07";
extern char *routename(), *netname(), *ns_print(), *plural();
* Definitions for showing gateway flags.
routepr(hostaddr
, netaddr
, hashsizeaddr
)
off_t hostaddr
, netaddr
, hashsizeaddr
;
register struct rtentry
*rt
;
printf("rthost: symbol not in namelist\n");
printf("rtnet: symbol not in namelist\n");
printf("rthashsize: symbol not in namelist\n");
klseek(kmem
, hashsizeaddr
, 0);
read(kmem
, (char *)&hashsize
, sizeof (hashsize
));
routehash
= (struct mbuf
**)malloc( hashsize
*sizeof (struct mbuf
*) );
klseek(kmem
, hostaddr
, 0);
read(kmem
, (char *)routehash
, hashsize
*sizeof (struct mbuf
*));
printf("Routing tables\n");
printf("%-16.16s %-18.18s %-6.6s %6.6s%8.8s %s\n",
"Destination", "Gateway",
"Flags", "Refs", "Use", "Interface");
for (i
= 0; i
< hashsize
; i
++) {
klseek(kmem
, (off_t
)m
, 0);
read(kmem
, (char *)&mb
, sizeof (mb
));
rt
= mtod(&mb
, struct rtentry
*);
if ((unsigned)rt
< (unsigned)&mb
||
(unsigned)rt
>= (unsigned)(&mb
+ 1)) {
switch(rt
->rt_dst
.sa_family
) {
sin
= (struct sockaddr_in
*)&rt
->rt_dst
;
(sin
->sin_addr
.s_addr
== 0) ? "default" :
(rt
->rt_flags
& RTF_HOST
) ?
routename(sin
->sin_addr
) :
netname(sin
->sin_addr
, 0L));
sin
= (struct sockaddr_in
*)&rt
->rt_gateway
;
printf("%-18.18s ", routename(sin
->sin_addr
));
ns_print((struct sockaddr_ns
*)&rt
->rt_dst
));
ns_print((struct sockaddr_ns
*)&rt
->rt_gateway
));
u_short
*s
= (u_short
*)rt
->rt_dst
.sa_data
;
printf("(%d)%x %x %x %x %x %x %x ",
s
[0], s
[1], s
[2], s
[3], s
[4], s
[5], s
[6]);
s
= (u_short
*)rt
->rt_gateway
.sa_data
;
printf("(%d)%x %x %x %x %x %x %x ",
rt
->rt_gateway
.sa_family
,
s
[0], s
[1], s
[2], s
[3], s
[4], s
[5], s
[6]);
for (flags
= name
, p
= bits
; p
->b_mask
; p
++)
if (p
->b_mask
& rt
->rt_flags
)
printf("%-6.6s %6d %8d ", name
,
rt
->rt_refcnt
, rt
->rt_use
);
klseek(kmem
, (off_t
)rt
->rt_ifp
, 0);
read(kmem
, (char *)&ifnet
, sizeof (ifnet
));
klseek(kmem
, (off_t
)ifnet
.if_name
, 0);
printf(" %.15s%d\n", name
, ifnet
.if_unit
);
klseek(kmem
, netaddr
, 0);
read(kmem
, (char *)routehash
, hashsize
*sizeof (struct mbuf
*));
static char line
[MAXHOSTNAMELEN
+ 1];
static char domain
[MAXHOSTNAMELEN
+ 1];
if (gethostname(domain
, MAXHOSTNAMELEN
) == 0 &&
(cp
= index(domain
, '.')))
(void) strcpy(domain
, cp
+ 1);
hp
= gethostbyaddr((char *)&in
, sizeof (struct in_addr
),
if ((cp
= index(hp
->h_name
, '.')) &&
strncpy(line
, cp
, sizeof(line
) - 1);
#define C(x) ((x) & 0xff)
in
.s_addr
= ntohl(in
.s_addr
);
sprintf(line
, "%u.%u.%u.%u", C(in
.s_addr
>> 24),
C(in
.s_addr
>> 16), C(in
.s_addr
>> 8), C(in
.s_addr
));
* Return the name of the network whose address is given.
* The address is assumed to be that of a net or subnet, not a host.
static char line
[MAXHOSTNAMELEN
+ 1];
} else if (IN_CLASSB(i
)) {
* If there are more bits than the standard mask
* would suggest, subnets must be in use.
* Guess at the subnet mask, assuming reasonable
mask
= (long)mask
>> subnetshift
;
np
= getnetbyaddr(net
, AF_INET
);
strncpy(line
, cp
, sizeof(line
) - 1);
else if ((i
& 0xffffff) == 0)
sprintf(line
, "%u", C(i
>> 24));
else if ((i
& 0xffff) == 0)
sprintf(line
, "%u.%u", C(i
>> 24) , C(i
>> 16));
else if ((i
& 0xff) == 0)
sprintf(line
, "%u.%u.%u", C(i
>> 24), C(i
>> 16), C(i
>> 8));
sprintf(line
, "%u.%u.%u.%u", C(i
>> 24),
C(i
>> 16), C(i
>> 8), C(i
));
* Print routing statistics
printf("rtstat: symbol not in namelist\n");
read(kmem
, (char *)&rtstat
, sizeof (rtstat
));
printf("\t%u bad routing redirect%s\n",
rtstat
.rts_badredirect
, plural(rtstat
.rts_badredirect
));
printf("\t%u dynamically created route%s\n",
rtstat
.rts_dynamic
, plural(rtstat
.rts_dynamic
));
printf("\t%u new gateway%s due to redirects\n",
rtstat
.rts_newgateway
, plural(rtstat
.rts_newgateway
));
printf("\t%u destination%s found unreachable\n",
rtstat
.rts_unreach
, plural(rtstat
.rts_unreach
));
printf("\t%u use%s of a wildcard route\n",
rtstat
.rts_wildcard
, plural(rtstat
.rts_wildcard
));
short ns_nullh
[] = {0,0,0};
short ns_bh
[] = {-1,-1,-1};
union { union ns_net net_e
; u_long long_e
; } net
;
static char mybuf
[50], cport
[10], chost
[25];
register char *p
; register u_char
*q
;
port
= ntohs(work
.x_port
);
if (ns_nullhost(work
) && net
.long_e
== 0) {
sprintf(mybuf
, "*.%xH", port
);
if (bcmp(ns_bh
, work
.x_host
.c_host
, 6) == 0) {
} else if (bcmp(ns_nullh
, work
.x_host
.c_host
, 6) == 0) {
sprintf(chost
, "%02x%02x%02x%02x%02x%02xH",
q
[0], q
[1], q
[2], q
[3], q
[4], q
[5]);
for (p
= chost
; *p
== '0' && p
< chost
+ 12; p
++);
sprintf(cport
, ".%xH", htons(port
));
sprintf(mybuf
,"%xH.%s%s", ntohl(net
.long_e
), host
, cport
);
static union ns_net ns_zeronet
;
work
.sns_addr
.x_port
= 0;
work
.sns_addr
.x_net
= ns_zeronet
;
if (strncmp("0H.", p
, 3) == 0) p
+= 3;
for (; *p
; p
++) switch (*p
) {
case 'a': case 'b': case 'c': case 'd': case 'e': case 'f':