void
conf_print_rtm(FILE *output, struct rt_msghdr *rtm, char *delim, int af)
{
int i;
char *cp, flags[64];
struct sockaddr *dst = NULL, *gate = NULL, *mask = NULL;
struct sockaddr *sa;
struct sockaddr_in sin;
sin.sin_addr.s_addr = htonl(INADDR_BROADCAST);
cp = ((char *)rtm + rtm->rtm_hdrlen);
for (i = 1; i; i <<= 1)
if (i & rtm->rtm_addrs) {
sa = (struct sockaddr *)cp;
switch (i) {
case RTA_DST:
/* allow arp to get printed with af==AF_LINK */
if ((sa->sa_family == af) ||
(af == AF_LINK && sa->sa_family == AF_INET)) {
if (rtm->rtm_flags & RTF_REJECT)
snprintf(flags, sizeof(flags),
" reject");
else
flags[0] = '\0';
dst = sa;
}
break;
case RTA_GATEWAY:
if (sa->sa_family == af)
gate = sa;
break;
case RTA_NETMASK:
/* netmasks will not have a valid sa_family */
mask = sa;
break;
}
ADVANCE(cp, sa);
}
if (dst && gate && mask && (af == AF_INET || af == AF_INET6)) {
/*
* Suppress printing IPv4 route if it's the default
* route and dhcp (dhclient) is enabled.
*/
if (!(af == AF_INET && isdefaultroute(dst, mask)
&& dhclient_isenabled(routename(gate)))) {
fprintf(output, "%s%s ", delim, netname(dst, mask));
fprintf(output, "%s%s\n", routename(gate), flags);
}
} else if (dst && gate && (af == AF_LINK)) {
/* print arp */
fprintf(output, "%s%s ", delim, routename(dst));
fprintf(output, "%s\n", routename(gate));
}
}
void
conf_print_rtm(FILE *output, struct rt_msghdr *rtm, char *delim, int af)
{
int i;
char *cp;
struct sockaddr *dst = NULL, *gate = NULL, *mask = NULL;
struct sockaddr *sa;
cp = ((char *)rtm + rtm->rtm_hdrlen);
for (i = 1; i; i <<= 1)
if (i & rtm->rtm_addrs) {
sa = (struct sockaddr *)cp;
switch (i) {
case RTA_DST:
/* allow arp to get printed with af==AF_LINK */
if ((sa->sa_family == af) ||
(af == AF_LINK && sa->sa_family == AF_INET))
dst = sa;
break;
case RTA_GATEWAY:
if (sa->sa_family == af)
gate = sa;
break;
case RTA_NETMASK:
/* netmasks will not have a valid sa_family */
mask = sa;
break;
}
ADVANCE(cp, sa);
}
if (dst && mask && gate && (af == AF_INET || af == AF_INET6)) {
/*
* suppress printing IP route if it's the default
* v4 route and dhcp (dhclient) is enabled
*/
if (!(isdefaultroute4(dst) && dhclient_isenabled(routename(gate)))) {
fprintf(output, "%s%s ", delim, netname(dst, mask));
fprintf(output, "%s\n", routename(gate));
}
} else
if (dst && gate && (af == AF_LINK))
/* print arp */
fprintf(output, "%s%s %s\n", delim, routename(dst),
routename(gate));
}
static const char *
fmt_sockaddr(struct sockaddr *sa, struct sockaddr *mask, int flags)
{
static char workbuf[128];
const char *cp;
if (sa == NULL)
return ("null");
switch(sa->sa_family) {
case AF_INET:
{
struct sockaddr_in *sockin = (struct sockaddr_in *)sa;
if ((sockin->sin_addr.s_addr == INADDR_ANY) &&
mask &&
ntohl(((struct sockaddr_in *)mask)->sin_addr.s_addr)
==0L)
cp = "default" ;
else if (flags & RTF_HOST)
cp = routename(sockin->sin_addr.s_addr);
else if (mask)
cp = netname(sockin->sin_addr.s_addr,
ntohl(((struct sockaddr_in *)mask)
->sin_addr.s_addr));
else
cp = netname(sockin->sin_addr.s_addr, 0L);
break;
}
#ifdef INET6
case AF_INET6:
{
struct sockaddr_in6 *sa6 = (struct sockaddr_in6 *)sa;
in6_fillscopeid(sa6);
if (flags & RTF_HOST)
cp = routename6(sa6);
else if (mask)
cp = netname6(sa6,
&((struct sockaddr_in6 *)mask)->sin6_addr);
else {
cp = netname6(sa6, NULL);
}
break;
}
#endif /*INET6*/
case AF_IPX:
{
struct ipx_addr work = ((struct sockaddr_ipx *)sa)->sipx_addr;
if (ipx_nullnet(satoipx_addr(work)))
cp = "default";
else
cp = ipx_print(sa);
break;
}
case AF_APPLETALK:
{
if (!(flags & RTF_HOST) && mask)
cp = atalk_print2(sa,mask,9);
else
cp = atalk_print(sa,11);
break;
}
case AF_NETGRAPH:
{
strlcpy(workbuf, ((struct sockaddr_ng *)sa)->sg_data,
sizeof(workbuf));
cp = workbuf;
break;
}
case AF_LINK:
{
struct sockaddr_dl *sdl = (struct sockaddr_dl *)sa;
if (sdl->sdl_nlen == 0 && sdl->sdl_alen == 0 &&
sdl->sdl_slen == 0) {
(void) sprintf(workbuf, "link#%d", sdl->sdl_index);
cp = workbuf;
} else
switch (sdl->sdl_type) {
case IFT_ETHER:
case IFT_L2VLAN:
case IFT_BRIDGE:
if (sdl->sdl_alen == ETHER_ADDR_LEN) {
cp = ether_ntoa((struct ether_addr *)
(sdl->sdl_data + sdl->sdl_nlen));
break;
}
/* FALLTHROUGH */
default:
cp = link_ntoa(sdl);
break;
}
break;
}
default:
{
u_char *s = (u_char *)sa->sa_data, *slim;
char *cq, *cqlim;
cq = workbuf;
slim = sa->sa_len + (u_char *) sa;
cqlim = cq + sizeof(workbuf) - 6;
cq += sprintf(cq, "(%d)", sa->sa_family);
while (s < slim && cq < cqlim) {
cq += sprintf(cq, " %02x", *s++);
if (s < slim)
cq += sprintf(cq, "%02x", *s++);
}
cp = workbuf;
}
}
return (cp);
}
void
mroute6pr()
{
struct mf6c *mf6ctable[MF6CTBLSIZ], *mfcp;
struct mif6_sctl mif6table[MAXMIFS];
struct mf6c mfc;
struct rtdetq rte, *rtep;
struct mif6_sctl *mifp;
mifi_t mifi;
int i;
int banner_printed;
int saved_numeric_addr;
mifi_t maxmif = 0;
long int waitings;
size_t len;
if (live == 0)
return;
len = sizeof(mif6table);
if (sysctlbyname("net.inet6.ip6.mif6table", mif6table, &len, NULL, 0) <
0) {
xo_warn("sysctl: net.inet6.ip6.mif6table");
return;
}
saved_numeric_addr = numeric_addr;
numeric_addr = 1;
banner_printed = 0;
for (mifi = 0, mifp = mif6table; mifi < MAXMIFS; ++mifi, ++mifp) {
char ifname[IFNAMSIZ];
if (mifp->m6_ifp == 0)
continue;
maxmif = mifi;
if (!banner_printed) {
xo_open_list("multicast-interface");
xo_emit("\n{T:IPv6 Multicast Interface Table}\n"
"{T: Mif Rate PhyIF Pkts-In Pkts-Out}\n");
banner_printed = 1;
}
xo_open_instance("multicast-interface");
xo_emit(" {:mif/%2u} {:rate-limit/%4d}",
mifi, mifp->m6_rate_limit);
xo_emit(" {:ifname/%5s}", (mifp->m6_flags & MIFF_REGISTER) ?
"reg0" : if_indextoname(mifp->m6_ifp, ifname));
xo_emit(" {:received-packets/%9ju} {:sent-packets/%9ju}\n",
(uintmax_t)mifp->m6_pkt_in,
(uintmax_t)mifp->m6_pkt_out);
xo_close_instance("multicast-interface");
}
if (banner_printed)
xo_open_list("multicast-interface");
else
xo_emit("\n{T:IPv6 Multicast Interface Table is empty}\n");
len = sizeof(mf6ctable);
if (sysctlbyname("net.inet6.ip6.mf6ctable", mf6ctable, &len, NULL, 0) <
0) {
xo_warn("sysctl: net.inet6.ip6.mf6ctable");
return;
}
banner_printed = 0;
for (i = 0; i < MF6CTBLSIZ; ++i) {
mfcp = mf6ctable[i];
while(mfcp) {
kread((u_long)mfcp, (char *)&mfc, sizeof(mfc));
if (!banner_printed) {
xo_open_list("multicast-forwarding-cache");
xo_emit("\n"
"{T:IPv6 Multicast Forwarding Cache}\n");
xo_emit(" {T:%-*.*s} {T:%-*.*s} {T:%s}",
WID_ORG, WID_ORG, "Origin",
WID_GRP, WID_GRP, "Group",
" Packets Waits In-Mif Out-Mifs\n");
banner_printed = 1;
}
xo_open_instance("multicast-forwarding-cache");
xo_emit(" {:origin/%-*.*s}", WID_ORG, WID_ORG,
routename(sin6tosa(&mfc.mf6c_origin),
numeric_addr));
xo_emit(" {:group/%-*.*s}", WID_GRP, WID_GRP,
routename(sin6tosa(&mfc.mf6c_mcastgrp),
numeric_addr));
xo_emit(" {:total-packets/%9ju}",
(uintmax_t)mfc.mf6c_pkt_cnt);
for (waitings = 0, rtep = mfc.mf6c_stall; rtep; ) {
waitings++;
/* XXX KVM */
kread((u_long)rtep, (char *)&rte, sizeof(rte));
rtep = rte.next;
}
xo_emit(" {:waitings/%3ld}", waitings);
if (mfc.mf6c_parent == MF6C_INCOMPLETE_PARENT)
xo_emit(" --- ");
else
xo_emit(" {:parent/%3d} ", mfc.mf6c_parent);
xo_open_list("mif");
for (mifi = 0; mifi <= maxmif; mifi++) {
if (IF_ISSET(mifi, &mfc.mf6c_ifset))
xo_emit(" {l:%u}", mifi);
}
xo_close_list("mif");
xo_emit("\n");
mfcp = mfc.mf6c_next;
xo_close_instance("multicast-forwarding-cache");
}
}
if (banner_printed)
xo_close_list("multicast-forwarding-cache");
else
xo_emit("\n{T:IPv6 Multicast Forwarding Table is empty}\n");
xo_emit("\n");
numeric_addr = saved_numeric_addr;
}
/*
* Print a description of the network interfaces.
*/
void
intpro(int interval)
{
oid varname[MAX_OID_LEN], *instance, *ifentry;
size_t varname_len;
int ifnum, cfg_nnets;
oid curifip [4];
struct variable_list *var;
struct snmp_pdu *request, *response;
int status;
int ifindex, oldindex = 0;
struct _if_info {
int ifindex;
char name[128];
char ip[128], route[128];
char ioctets[20], ierrs[20], ooctets[20], oerrs[20], outqueue[20];
int operstatus;
u_long netmask;
struct in_addr ifip, ifroute;
} *if_table, *cur_if;
int max_name = 4, max_route = 7, max_ip = 7, max_ioctets = 7, max_ooctets = 7;
int i;
if (interval) {
sidewaysintpr((unsigned)interval);
return;
}
var = getvarbyname(Session, oid_cfg_nnets, sizeof(oid_cfg_nnets) / sizeof(oid));
if (var && var->val.integer) {
cfg_nnets = *var->val.integer;
snmp_free_var(var);
}
else {
fprintf (stderr, "No response when requesting number of interfaces.\n");
return;
}
DEBUGMSGTL (("netstat:if", "cfg_nnets = %d\n", cfg_nnets));
memset (curifip, 0, sizeof (curifip));
if_table = (struct _if_info *) calloc (cfg_nnets, sizeof (*if_table));
cur_if = if_table;
for (ifnum = 1; ifnum <= cfg_nnets; ifnum++) {
register char *cp;
request = snmp_pdu_create (SNMP_MSG_GETNEXT);
memmove (varname, oid_ipadentaddr, sizeof (oid_ipadentaddr));
varname_len = sizeof (oid_ipadentaddr) / sizeof (oid);
instance = varname + 9;
memmove (varname + 10, curifip, sizeof (curifip));
*instance = IPIFINDEX;
snmp_add_null_var (request, varname, varname_len);
*instance = IPADDR;
snmp_add_null_var (request, varname, varname_len);
*instance = IPNETMASK;
snmp_add_null_var (request, varname, varname_len);
status = snmp_synch_response (Session, request, &response);
if (status != STAT_SUCCESS || response->errstat != SNMP_ERR_NOERROR) {
fprintf (stderr, "SNMP request failed for interface %d, variable %ld out of %d interfaces (IP)\n", ifnum, response->errindex, cfg_nnets);
cfg_nnets = ifnum;
break;
}
for (var = response->variables; var; var = var->next_variable) {
if (snmp_get_do_debugging()) {
print_variable (var->name, var->name_length, var);
}
switch (var->name [9]) {
case IPIFINDEX:
ifindex = *var->val.integer;
for (cur_if = if_table; cur_if->ifindex != ifindex && cur_if->ifindex != 0; cur_if++);
cur_if->ifindex = ifindex;
break;
case IPADDR:
memmove (curifip, var->name+10, sizeof (curifip));
memmove (&cur_if->ifip, var->val.string, sizeof (u_long));
break;
case IPNETMASK:
memmove (&cur_if->netmask, var->val.string, sizeof (u_long));
}
}
cur_if->ifroute.s_addr = cur_if->ifip.s_addr & cur_if->netmask;
if (cur_if->ifroute.s_addr)
strcpy(cur_if->route, netname (cur_if->ifroute, cur_if->netmask));
else strcpy(cur_if->route, "none");
if ((i = strlen(cur_if->route)) > max_route) max_route = i;
if (cur_if->ifip.s_addr)
strcpy(cur_if->ip, routename (cur_if->ifip));
else strcpy(cur_if->ip, "none");
if ((i = strlen(cur_if->ip)) > max_ip) max_ip = i;
snmp_free_pdu (response);
memmove (varname, oid_ifname, sizeof(oid_ifname));
varname_len = sizeof(oid_ifname) / sizeof(oid);
ifentry = varname + 9;
instance = varname + 10;
request = snmp_pdu_create (SNMP_MSG_GETNEXT);
*instance = oldindex;
*ifentry = IFINDEX;
snmp_add_null_var (request, varname, varname_len);
*ifentry = IFNAME;
snmp_add_null_var (request, varname, varname_len);
*ifentry = IFOPERSTATUS;
snmp_add_null_var (request, varname, varname_len);
*ifentry = INOCTETS;
snmp_add_null_var (request, varname, varname_len);
*ifentry = OUTOCTETS;
snmp_add_null_var (request, varname, varname_len);
while ((status = snmp_synch_response (Session, request, &response)) == STAT_SUCCESS) {
if (response->errstat != SNMP_ERR_NOSUCHNAME)
break;
if ((request = snmp_fix_pdu(response, SNMP_MSG_GETNEXT)) == NULL)
break;
snmp_free_pdu(response);
}
if (status != STAT_SUCCESS || response->errstat != SNMP_ERR_NOERROR) {
fprintf (stderr, "SNMP request failed for interface %d, variable %ld out of %d interfaces (IF)\n", ifnum, response->errindex, cfg_nnets);
cfg_nnets = ifnum;
break;
}
for (var = response->variables; var; var = var->next_variable) {
if (snmp_get_do_debugging()) {
print_variable (var->name, var->name_length, var);
}
if (!var->val.integer) continue;
switch (var->name [9]) {
case IFINDEX:
ifindex = *var->val.integer;
for (cur_if = if_table; cur_if->ifindex != ifindex && cur_if->ifindex != 0; cur_if++);
cur_if->ifindex = ifindex;
break;
case INOCTETS:
sprintf(cur_if->ioctets, "%lu", *var->val.integer);
i = strlen(cur_if->ioctets);
if (i > max_ioctets) max_ioctets = i;
break;
case OUTOCTETS:
sprintf(cur_if->ooctets, "%lu", *var->val.integer);
i = strlen(cur_if->ooctets);
if (i > max_ooctets) max_ooctets = i;
break;
case IFNAME:
oldindex = var->name[10];
if (var->val_len >= sizeof(cur_if->name))
var->val_len = sizeof(cur_if->name) - 1;
memmove (cur_if->name, var->val.string, var->val_len);
cur_if->name [var->val_len] = 0;
if ((i = strlen(cur_if->name)+1) > max_name) max_name = i;
break;
case IFOPERSTATUS:
cur_if->operstatus = *var->val.integer; break;
}
}
snmp_free_pdu (response);
if (intrface != NULL && strcmp(cur_if->name, intrface) != 0) {
cur_if->name [0] = 0;
continue;
}
if (cur_if->operstatus != MIB_IFSTATUS_UP) {
cp = strchr(cur_if->name, '\0');
*cp++ = '*';
*cp = '\0';
}
}
printf("%*.*s %*.*s %*.*s %*.*s %*.*s ",
-max_name, max_name, "Name",
-max_route, max_route, "Network",
-max_ip, max_ip, "Address",
max_ioctets, max_ioctets, "Ioctets",
max_ooctets, max_ooctets, "Ooctets");
putchar('\n');
for (ifnum = 0, cur_if = if_table; ifnum < cfg_nnets; ifnum++, cur_if++) {
if (cur_if->name [0] == 0) continue;
printf("%*.*s ", -max_name, max_name, cur_if->name);
printf("%*.*s ", -max_route, max_route, cur_if->route);
printf("%*.*s ", -max_ip, max_ip, cur_if->ip);
printf("%*s %*s", max_ioctets, cur_if->ioctets,
max_ioctets, cur_if->ooctets);
putchar('\n');
}
free(if_table);
}
void
mroutepr(u_long mfcaddr, u_long vifaddr)
{
struct mfc *mfctable[MFCTBLSIZ];
struct vif viftable[MAXVIFS];
struct mfc mfc, *m;
struct vif *v;
vifi_t vifi;
int i;
int banner_printed;
int saved_numeric_addr;
vifi_t maxvif = 0;
if (mfcaddr == 0 || vifaddr == 0) {
printf("No IPv4 multicast routing compiled into this system.\n");
return;
}
saved_numeric_addr = numeric_addr;
numeric_addr = 1;
kread(vifaddr, (char *)&viftable, sizeof(viftable));
banner_printed = 0;
for (vifi = 0, v = viftable; vifi < MAXVIFS; ++vifi, ++v) {
if (v->v_lcl_addr.s_addr == 0)
continue;
maxvif = vifi;
if (!banner_printed) {
printf("\nVirtual Interface Table\n"
" Vif Thresh Rate Local-Address "
"Remote-Address Pkts-In Pkts-Out\n");
banner_printed = 1;
}
printf(" %2u %6u %4d %-15.15s",
/* opposite math of add_vif() */
vifi, v->v_threshold, v->v_rate_limit * 1000 / 1024,
routename(v->v_lcl_addr.s_addr));
printf(" %-15.15s", (v->v_flags & VIFF_TUNNEL) ?
routename(v->v_rmt_addr.s_addr) : "");
printf(" %9lu %9lu\n", v->v_pkt_in, v->v_pkt_out);
}
if (!banner_printed)
printf("\nVirtual Interface Table is empty\n");
kread(mfcaddr, (char *)&mfctable, sizeof(mfctable));
banner_printed = 0;
for (i = 0; i < MFCTBLSIZ; ++i) {
m = mfctable[i];
while(m) {
kread((u_long)m, (char *)&mfc, sizeof mfc);
if (!banner_printed) {
printf("\nIPv4 Multicast Forwarding Cache\n"
" Origin Group "
" Packets In-Vif Out-Vifs:Ttls\n");
banner_printed = 1;
}
printf(" %-15.15s", routename(mfc.mfc_origin.s_addr));
printf(" %-15.15s", routename(mfc.mfc_mcastgrp.s_addr));
printf(" %9lu", mfc.mfc_pkt_cnt);
printf(" %3d ", mfc.mfc_parent);
for (vifi = 0; vifi <= maxvif; vifi++) {
if (mfc.mfc_ttls[vifi] > 0)
printf(" %u:%u", vifi,
mfc.mfc_ttls[vifi]);
}
printf("\n");
m = mfc.mfc_next;
}
}
if (!banner_printed)
printf("\nMulticast Routing Table is empty\n");
printf("\n");
numeric_addr = saved_numeric_addr;
}
static const char *
fmt_sockaddr(struct sockaddr *sa, struct sockaddr *mask, int flags)
{
static char buf[128];
const char *cp;
if (sa == NULL)
return ("null");
switch(sa->sa_family) {
#ifdef INET6
case AF_INET6:
/*
* The sa6->sin6_scope_id must be filled here because
* this sockaddr is extracted from kmem(4) directly
* and has KAME-specific embedded scope id in
* sa6->sin6_addr.s6_addr[2].
*/
in6_fillscopeid(satosin6(sa));
/* FALLTHROUGH */
#endif /*INET6*/
case AF_INET:
if (flags & RTF_HOST)
cp = routename(sa, numeric_addr);
else if (mask)
cp = netname(sa, mask);
else
cp = netname(sa, NULL);
break;
case AF_NETGRAPH:
{
strlcpy(buf, ((struct sockaddr_ng *)sa)->sg_data,
sizeof(buf));
cp = buf;
break;
}
case AF_LINK:
{
#if 0
struct sockaddr_dl *sdl = (struct sockaddr_dl *)sa;
/* Interface route. */
if (sdl->sdl_nlen)
cp = sdl->sdl_data;
else
#endif
cp = routename(sa, 1);
break;
}
default:
{
u_char *s = (u_char *)sa->sa_data, *slim;
char *cq, *cqlim;
cq = buf;
slim = sa->sa_len + (u_char *) sa;
cqlim = cq + sizeof(buf) - sizeof(" ffff");
snprintf(cq, sizeof(buf), "(%d)", sa->sa_family);
cq += strlen(cq);
while (s < slim && cq < cqlim) {
snprintf(cq, sizeof(" ff"), " %02x", *s++);
cq += strlen(cq);
if (s < slim) {
snprintf(cq, sizeof("ff"), "%02x", *s++);
cq += strlen(cq);
}
}
cp = buf;
}
}
return (cp);
}
static const char *
fmt_sockaddr(struct sockaddr *sa, struct sockaddr *mask, int flags)
{
static char workbuf[128];
const char *cp;
switch(sa->sa_family) {
case AF_INET:
{
struct sockaddr_in *sockin = (struct sockaddr_in *)sa;
if ((sockin->sin_addr.s_addr == INADDR_ANY) &&
mask &&
ntohl(((struct sockaddr_in *)mask)->sin_addr.s_addr)
==0L)
cp = "default" ;
else if (flags & RTF_HOST)
cp = routename(sockin->sin_addr.s_addr);
else if (mask)
cp = netname(sockin->sin_addr.s_addr,
ntohl(((struct sockaddr_in *)mask)
->sin_addr.s_addr));
else
cp = netname(sockin->sin_addr.s_addr, 0L);
break;
}
#ifdef INET6
case AF_INET6:
{
struct sockaddr_in6 *sa6 = (struct sockaddr_in6 *)sa;
struct in6_addr *in6 = &sa6->sin6_addr;
/*
* XXX: This is a special workaround for KAME kernels.
* sin6_scope_id field of SA should be set in the future.
*/
if (IN6_IS_ADDR_LINKLOCAL(in6) ||
IN6_IS_ADDR_MC_LINKLOCAL(in6) ||
IN6_IS_ADDR_MC_NODELOCAL(in6)) {
/* XXX: override is ok? */
sa6->sin6_scope_id = (u_int32_t)ntohs(*(u_short *)&in6->s6_addr[2]);
*(u_short *)&in6->s6_addr[2] = 0;
}
if (flags & RTF_HOST)
cp = routename6(sa6);
else if (mask)
cp = netname6(sa6,
&((struct sockaddr_in6 *)mask)->sin6_addr);
else {
cp = netname6(sa6, NULL);
}
break;
}
#endif /*INET6*/
case AF_IPX:
{
struct ipx_addr work = ((struct sockaddr_ipx *)sa)->sipx_addr;
if (ipx_nullnet(satoipx_addr(work)))
cp = "default";
else
cp = ipx_print(sa);
break;
}
case AF_APPLETALK:
{
if (!(flags & RTF_HOST) && mask)
cp = atalk_print2(sa,mask,9);
else
cp = atalk_print(sa,11);
break;
}
case AF_NETGRAPH:
{
printf("%s", ((struct sockaddr_ng *)sa)->sg_data);
break;
}
case AF_LINK:
{
struct sockaddr_dl *sdl = (struct sockaddr_dl *)sa;
if (sdl->sdl_nlen == 0 && sdl->sdl_alen == 0 &&
sdl->sdl_slen == 0) {
(void) sprintf(workbuf, "link#%d", sdl->sdl_index);
cp = workbuf;
} else
switch (sdl->sdl_type) {
case IFT_ETHER:
case IFT_L2VLAN:
if (sdl->sdl_alen == ETHER_ADDR_LEN) {
cp = ether_ntoa((struct ether_addr *)
(sdl->sdl_data + sdl->sdl_nlen));
break;
}
/* FALLTHROUGH */
default:
cp = link_ntoa(sdl);
break;
}
break;
}
default:
{
u_char *s = (u_char *)sa->sa_data, *slim;
char *cq, *cqlim;
cq = workbuf;
slim = sa->sa_len + (u_char *) sa;
cqlim = cq + sizeof(workbuf) - 6;
cq += sprintf(cq, "(%d)", sa->sa_family);
while (s < slim && cq < cqlim) {
cq += sprintf(cq, " %02x", *s++);
if (s < slim)
cq += sprintf(cq, "%02x", *s++);
}
cp = workbuf;
}
}
return (cp);
}
static int
p_sockaddr(struct sockaddr *sa, int flags, int width)
{
char workbuf[128];
char *cp = workbuf;
const char *cplim;
int len = sizeof(workbuf);
int count;
switch(sa->sa_family) {
case AF_LINK:
{
struct sockaddr_dl *sdl = (struct sockaddr_dl *)sa;
if (sdl->sdl_nlen == 0 && sdl->sdl_alen == 0 &&
sdl->sdl_slen == 0) {
snprintf(workbuf, sizeof(workbuf),
"link#%d", sdl->sdl_index);
} else {
switch (sdl->sdl_type) {
case IFT_ETHER:
{
int i;
u_char *lla = (u_char *)sdl->sdl_data +
sdl->sdl_nlen;
cplim = "";
for (i = 0; i < sdl->sdl_alen; i++, lla++) {
snprintf(cp, len, "%s%x", cplim, *lla);
len -= strlen(cp);
cp += strlen(cp);
if (len <= 0)
break; /* overflow */
cplim = ":";
}
cp = workbuf;
break;
}
default:
cp = link_ntoa(sdl);
break;
}
}
break;
}
case AF_INET:
{
struct sockaddr_in *in = (struct sockaddr_in *)sa;
if (in->sin_addr.s_addr == 0) {
/* cp points to workbuf */
strncpy(cp, "default", len);
} else
cp = (flags & RTF_HOST) ? routename(sa) : netname(sa);
break;
}
#ifdef INET6
case AF_INET6:
{
struct sockaddr_in6 *in6 = (struct sockaddr_in6 *)sa;
if (IN6_IS_ADDR_UNSPECIFIED(&in6->sin6_addr)) {
/* cp points to workbuf */
strncpy(cp, "default", len);
} else {
cp = ((flags & RTF_HOST) ? routename(sa)
: netname(sa));
}
/* make sure numeric address is not truncated */
if (strchr(cp, ':') != NULL &&
(width < 0 || strlen(cp) > (size_t)width))
width = strlen(cp);
break;
}
#endif /* INET6 */
default:
{
u_char *s = (u_char *)sa->sa_data, *slim;
slim = sa->sa_len + (u_char *) sa;
cplim = cp + sizeof(workbuf) - 6;
snprintf(cp, len, "(%d)", sa->sa_family);
len -= strlen(cp);
cp += strlen(cp);
if (len <= 0) {
cp = workbuf;
break; /* overflow */
}
while (s < slim && cp < cplim) {
snprintf(cp, len, " %02x", *s++);
len -= strlen(cp);
cp += strlen(cp);
if (len <= 0)
break; /* overflow */
if (s < slim) {
snprintf(cp, len, "%02x", *s++);
len -= strlen(cp);
cp += strlen(cp);
if (len <= 0)
break; /* overflow */
}
}
cp = workbuf;
}
}
if (width < 0) {
count = printf("%s ", cp);
} else {
if (nflag || wflag)
count = printf("%-*s ", width, cp);
else
count = printf("%-*.*s ", width, width, cp);
}
return(count);
}
