2 * Copyright (c) 1983, 1988, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 static char sccsid[] = "From: @(#)route.c 8.6 (Berkeley) 4/28/95";
40 #include <sys/cdefs.h>
41 __FBSDID("$FreeBSD$");
43 #include <sys/param.h>
44 #include <sys/protosw.h>
45 #include <sys/socket.h>
46 #include <sys/socketvar.h>
49 #include <net/ethernet.h>
51 #include <net/if_var.h>
52 #include <net/if_dl.h>
53 #include <net/if_types.h>
54 #include <net/radix.h>
55 #include <net/route.h>
57 #include <netinet/in.h>
58 #include <netipx/ipx.h>
59 #include <netatalk/at.h>
60 #include <netgraph/ng_socket.h>
62 #include <sys/sysctl.h>
64 #include <arpa/inet.h>
76 #define kget(p, d) (kread((u_long)(p), (char *)&(d), sizeof (d)))
79 * Definitions for showing gateway flags.
90 { RTF_MODIFIED, 'M' },
91 { RTF_DONE, 'd' }, /* Completed -- for routing messages only */
92 { RTF_XRESOLVE, 'X' },
96 { RTF_PRCLONING,'c' },
98 { RTF_BLACKHOLE,'B' },
99 { RTF_BROADCAST,'b' },
104 { RTF_WASCLONED,'W' },
107 { RTF_CLONING, 'C' },
113 long dummy; /* Helps align structure. */
114 struct sockaddr u_sa;
121 struct rtentry rtentry;
122 struct radix_node rnode;
123 struct radix_mask rmask;
124 struct radix_node_head **rt_tables;
128 struct timespec uptime;
130 static struct sockaddr *kgetsa(struct sockaddr *);
131 static void size_cols(int ef, struct radix_node *rn);
132 static void size_cols_tree(struct radix_node *rn);
133 static void size_cols_rtentry(struct rtentry *rt);
134 static void p_tree(struct radix_node *);
135 static void p_rtnode(void);
136 static void ntreestuff(void);
137 static void np_rtentry(struct rt_msghdr *);
138 static void p_sockaddr(struct sockaddr *, struct sockaddr *, int, int);
139 static const char *fmt_sockaddr(struct sockaddr *sa, struct sockaddr *mask,
141 static void p_flags(int, const char *);
142 static const char *fmt_flags(int f);
143 static void p_rtentry(struct rtentry *);
144 static void domask(char *, in_addr_t, u_long);
147 * Print routing tables.
150 routepr(u_long rtree)
152 struct radix_node_head **rnhp, *rnh, head;
154 int fam, fibnum, numfibs;
156 intsize = sizeof(int);
157 if (sysctlbyname("net.my_fibnum", &fibnum, &intsize, NULL, 0) == -1)
159 if (sysctlbyname("net.fibs", &numfibs, &intsize, NULL, 0) == -1)
161 rt_tables = calloc(numfibs * (AF_MAX+1),
162 sizeof(struct radix_node_head *));
163 if (rt_tables == NULL)
164 err(EX_OSERR, "memory allocation failed");
166 * Since kernel & userland use different timebase
167 * (time_uptime vs time_second) and we are reading kernel memory
168 * directly we should do rt_rmx.rmx_expire --> expire_time conversion.
170 if (clock_gettime(CLOCK_UPTIME, &uptime) < 0)
171 err(EX_OSERR, "clock_gettime() failed");
173 printf("Routing tables\n");
175 if (Aflag == 0 && NewTree)
179 printf("rt_tables: symbol not in namelist\n");
183 if (kread((u_long)(rtree), (char *)(rt_tables), (numfibs *
184 (AF_MAX+1) * sizeof(struct radix_node_head *))) != 0)
186 for (fam = 0; fam <= AF_MAX; fam++) {
197 rnhp = (struct radix_node_head **)*rt_tables;
198 /* Calculate the in-kernel address. */
199 rnhp += tmpfib * (AF_MAX+1) + fam;
200 /* Read the in kernel rhn pointer. */
201 if (kget(rnhp, rnh) != 0)
205 /* Read the rnh data. */
206 if (kget(rnh, head) != 0)
208 if (fam == AF_UNSPEC) {
209 if (Aflag && af == 0) {
210 printf("Netmasks:\n");
211 p_tree(head.rnh_treetop);
213 } else if (af == AF_UNSPEC || af == fam) {
214 size_cols(fam, head.rnh_treetop);
218 p_tree(head.rnh_treetop);
225 * Print address family header before a section of the routing table.
238 afname = "Internet6";
248 afname = "AppleTalk";
261 printf("\n%s:\n", afname);
263 printf("\nProtocol Family %d:\n", af1);
266 /* column widths; each followed by one space */
268 #define WID_DST_DEFAULT(af) 18 /* width of destination column */
269 #define WID_GW_DEFAULT(af) 18 /* width of gateway column */
270 #define WID_IF_DEFAULT(af) (Wflag ? 8 : 6) /* width of netif column */
272 #define WID_DST_DEFAULT(af) \
273 ((af) == AF_INET6 ? (numeric_addr ? 33: 18) : 18)
274 #define WID_GW_DEFAULT(af) \
275 ((af) == AF_INET6 ? (numeric_addr ? 29 : 18) : 18)
276 #define WID_IF_DEFAULT(af) ((af) == AF_INET6 ? 8 : (Wflag ? 8 : 6))
281 static int wid_flags;
286 static int wid_expire;
289 size_cols(int ef __unused, struct radix_node *rn)
291 wid_dst = WID_DST_DEFAULT(ef);
292 wid_gw = WID_GW_DEFAULT(ef);
297 wid_if = WID_IF_DEFAULT(ef);
305 size_cols_tree(struct radix_node *rn)
308 if (kget(rn, rnode) != 0)
310 if (!(rnode.rn_flags & RNF_ACTIVE))
312 if (rnode.rn_bit < 0) {
313 if ((rnode.rn_flags & RNF_ROOT) == 0) {
314 if (kget(rn, rtentry) != 0)
316 size_cols_rtentry(&rtentry);
318 if ((rn = rnode.rn_dupedkey))
322 size_cols_tree(rnode.rn_left);
328 size_cols_rtentry(struct rtentry *rt)
330 static struct ifnet ifnet, *lastif;
331 static char buffer[100];
337 bzero(&addr, sizeof(addr));
338 if ((sa = kgetsa(rt_key(rt))))
339 bcopy(sa, &addr, sa->sa_len);
340 bzero(&mask, sizeof(mask));
341 if (rt_mask(rt) && (sa = kgetsa(rt_mask(rt))))
342 bcopy(sa, &mask, sa->sa_len);
343 bp = fmt_sockaddr(&addr.u_sa, &mask.u_sa, rt->rt_flags);
345 wid_dst = MAX(len, wid_dst);
347 bp = fmt_sockaddr(kgetsa(rt->rt_gateway), NULL, RTF_HOST);
349 wid_gw = MAX(len, wid_gw);
351 bp = fmt_flags(rt->rt_flags);
353 wid_flags = MAX(len, wid_flags);
355 if (addr.u_sa.sa_family == AF_INET || Wflag) {
356 len = snprintf(buffer, sizeof(buffer), "%d", rt->rt_refcnt);
357 wid_refs = MAX(len, wid_refs);
358 len = snprintf(buffer, sizeof(buffer), "%lu", rt->rt_use);
359 wid_use = MAX(len, wid_use);
360 if (Wflag && rt->rt_rmx.rmx_mtu != 0) {
361 len = snprintf(buffer, sizeof(buffer),
362 "%lu", rt->rt_rmx.rmx_mtu);
363 wid_mtu = MAX(len, wid_mtu);
367 if (rt->rt_ifp != lastif) {
368 if (kget(rt->rt_ifp, ifnet) == 0)
369 len = strlen(ifnet.if_xname);
373 wid_if = MAX(len, wid_if);
375 if (rt->rt_rmx.rmx_expire) {
379 rt->rt_rmx.rmx_expire - uptime.tv_sec) > 0) {
380 len = snprintf(buffer, sizeof(buffer), "%d",
382 wid_expire = MAX(len, wid_expire);
390 * Print header for routing table columns.
397 printf("%-8.8s ","Address");
398 if (af1 == AF_INET || Wflag) {
400 printf("%-*.*s %-*.*s %-*.*s %*.*s %*.*s %*.*s %*.*s %*s\n",
401 wid_dst, wid_dst, "Destination",
402 wid_gw, wid_gw, "Gateway",
403 wid_flags, wid_flags, "Flags",
404 wid_refs, wid_refs, "Refs",
405 wid_use, wid_use, "Use",
406 wid_mtu, wid_mtu, "Mtu",
407 wid_if, wid_if, "Netif",
408 wid_expire, "Expire");
410 printf("%-*.*s %-*.*s %-*.*s %*.*s %*.*s %*.*s %*s\n",
411 wid_dst, wid_dst, "Destination",
412 wid_gw, wid_gw, "Gateway",
413 wid_flags, wid_flags, "Flags",
414 wid_refs, wid_refs, "Refs",
415 wid_use, wid_use, "Use",
416 wid_if, wid_if, "Netif",
417 wid_expire, "Expire");
420 printf("%-*.*s %-*.*s %-*.*s %*.*s %*s\n",
421 wid_dst, wid_dst, "Destination",
422 wid_gw, wid_gw, "Gateway",
423 wid_flags, wid_flags, "Flags",
424 wid_if, wid_if, "Netif",
425 wid_expire, "Expire");
429 static struct sockaddr *
430 kgetsa(struct sockaddr *dst)
433 if (kget(dst, pt_u.u_sa) != 0)
435 if (pt_u.u_sa.sa_len > sizeof (pt_u.u_sa))
436 kread((u_long)dst, (char *)pt_u.u_data, pt_u.u_sa.sa_len);
441 p_tree(struct radix_node *rn)
445 if (kget(rn, rnode) != 0)
447 if (!(rnode.rn_flags & RNF_ACTIVE))
449 if (rnode.rn_bit < 0) {
451 printf("%-8.8lx ", (u_long)rn);
452 if (rnode.rn_flags & RNF_ROOT) {
454 printf("(root node)%s",
455 rnode.rn_dupedkey ? " =>\n" : "\n");
456 } else if (do_rtent) {
457 if (kget(rn, rtentry) == 0) {
463 p_sockaddr(kgetsa((struct sockaddr *)rnode.rn_key),
467 if ((rn = rnode.rn_dupedkey))
470 if (Aflag && do_rtent) {
471 printf("%-8.8lx ", (u_long)rn);
475 p_tree(rnode.rn_left);
485 struct radix_mask *rm = rnode.rn_mklist;
487 if (rnode.rn_bit < 0) {
490 p_sockaddr(kgetsa((struct sockaddr *)rnode.rn_mask),
495 sprintf(nbuf, "(%d)", rnode.rn_bit);
496 printf("%6.6s %8.8lx : %8.8lx", nbuf, (u_long)rnode.rn_left, (u_long)rnode.rn_right);
499 if (kget(rm, rmask) != 0)
501 sprintf(nbuf, " %d refs, ", rmask.rm_refs);
502 printf(" mk = %8.8lx {(%d),%s",
503 (u_long)rm, -1 - rmask.rm_bit, rmask.rm_refs ? nbuf : " ");
504 if (rmask.rm_flags & RNF_NORMAL) {
505 struct radix_node rnode_aux;
506 printf(" <normal>, ");
507 if (kget(rmask.rm_leaf, rnode_aux) == 0)
508 p_sockaddr(kgetsa((struct sockaddr *)rnode_aux.rn_mask),
511 p_sockaddr(NULL, NULL, 0, -1);
513 p_sockaddr(kgetsa((struct sockaddr *)rmask.rm_mask),
516 if ((rm = rmask.rm_mklist))
527 char *buf, *next, *lim;
528 struct rt_msghdr *rtm;
534 mib[4] = NET_RT_DUMP;
536 if (sysctl(mib, 6, NULL, &needed, NULL, 0) < 0) {
537 err(1, "sysctl: net.route.0.0.dump estimate");
540 if ((buf = malloc(needed)) == 0) {
541 errx(2, "malloc(%lu)", (unsigned long)needed);
543 if (sysctl(mib, 6, buf, &needed, NULL, 0) < 0) {
544 err(1, "sysctl: net.route.0.0.dump");
547 for (next = buf; next < lim; next += rtm->rtm_msglen) {
548 rtm = (struct rt_msghdr *)next;
554 np_rtentry(struct rt_msghdr *rtm)
556 struct sockaddr *sa = (struct sockaddr *)(rtm + 1);
558 static int masks_done, banner_printed;
561 int af1 = 0, interesting = RTF_UP | RTF_GATEWAY | RTF_HOST;
564 /* for the moment, netmasks are skipped over */
565 if (!banner_printed) {
566 printf("Netmasks:\n");
569 if (masks_done == 0) {
570 if (rtm->rtm_addrs != RTA_DST ) {
581 if (rtm->rtm_addrs == RTA_DST)
582 p_sockaddr(sa, NULL, 0, 36);
584 p_sockaddr(sa, NULL, rtm->rtm_flags, 16);
585 sa = (struct sockaddr *)(SA_SIZE(sa) + (char *)sa);
586 p_sockaddr(sa, NULL, 0, 18);
588 p_flags(rtm->rtm_flags & interesting, "%-6.6s ");
593 p_sockaddr(struct sockaddr *sa, struct sockaddr *mask, int flags, int width)
597 cp = fmt_sockaddr(sa, mask, flags);
603 printf("%-*s ", width, cp);
605 printf("%-*.*s ", width, width, cp);
610 fmt_sockaddr(struct sockaddr *sa, struct sockaddr *mask, int flags)
612 static char workbuf[128];
618 switch(sa->sa_family) {
621 struct sockaddr_in *sockin = (struct sockaddr_in *)sa;
623 if ((sockin->sin_addr.s_addr == INADDR_ANY) &&
625 ntohl(((struct sockaddr_in *)mask)->sin_addr.s_addr)
628 else if (flags & RTF_HOST)
629 cp = routename(sockin->sin_addr.s_addr);
631 cp = netname(sockin->sin_addr.s_addr,
632 ntohl(((struct sockaddr_in *)mask)
635 cp = netname(sockin->sin_addr.s_addr, 0L);
642 struct sockaddr_in6 *sa6 = (struct sockaddr_in6 *)sa;
644 in6_fillscopeid(sa6);
646 if (flags & RTF_HOST)
647 cp = routename6(sa6);
650 &((struct sockaddr_in6 *)mask)->sin6_addr);
652 cp = netname6(sa6, NULL);
660 struct ipx_addr work = ((struct sockaddr_ipx *)sa)->sipx_addr;
661 if (ipx_nullnet(satoipx_addr(work)))
669 if (!(flags & RTF_HOST) && mask)
670 cp = atalk_print2(sa,mask,9);
672 cp = atalk_print(sa,11);
677 strlcpy(workbuf, ((struct sockaddr_ng *)sa)->sg_data,
685 struct sockaddr_dl *sdl = (struct sockaddr_dl *)sa;
687 if (sdl->sdl_nlen == 0 && sdl->sdl_alen == 0 &&
688 sdl->sdl_slen == 0) {
689 (void) sprintf(workbuf, "link#%d", sdl->sdl_index);
692 switch (sdl->sdl_type) {
697 if (sdl->sdl_alen == ETHER_ADDR_LEN) {
698 cp = ether_ntoa((struct ether_addr *)
699 (sdl->sdl_data + sdl->sdl_nlen));
712 u_char *s = (u_char *)sa->sa_data, *slim;
716 slim = sa->sa_len + (u_char *) sa;
717 cqlim = cq + sizeof(workbuf) - 6;
718 cq += sprintf(cq, "(%d)", sa->sa_family);
719 while (s < slim && cq < cqlim) {
720 cq += sprintf(cq, " %02x", *s++);
722 cq += sprintf(cq, "%02x", *s++);
732 p_flags(int f, const char *format)
734 printf(format, fmt_flags(f));
740 static char name[33];
742 struct bits *p = bits;
744 for (flags = name; p->b_mask; p++)
752 p_rtentry(struct rtentry *rt)
754 static struct ifnet ifnet, *lastif;
755 static char buffer[128];
756 static char prettyname[128];
760 bzero(&addr, sizeof(addr));
761 if ((sa = kgetsa(rt_key(rt))))
762 bcopy(sa, &addr, sa->sa_len);
763 bzero(&mask, sizeof(mask));
764 if (rt_mask(rt) && (sa = kgetsa(rt_mask(rt))))
765 bcopy(sa, &mask, sa->sa_len);
766 p_sockaddr(&addr.u_sa, &mask.u_sa, rt->rt_flags, wid_dst);
767 p_sockaddr(kgetsa(rt->rt_gateway), NULL, RTF_HOST, wid_gw);
768 snprintf(buffer, sizeof(buffer), "%%-%d.%ds ", wid_flags, wid_flags);
769 p_flags(rt->rt_flags, buffer);
770 if (addr.u_sa.sa_family == AF_INET || Wflag) {
771 printf("%*d %*lu ", wid_refs, rt->rt_refcnt,
772 wid_use, rt->rt_use);
774 if (rt->rt_rmx.rmx_mtu != 0)
775 printf("%*lu ", wid_mtu, rt->rt_rmx.rmx_mtu);
777 printf("%*s ", wid_mtu, "");
781 if (rt->rt_ifp != lastif) {
782 if (kget(rt->rt_ifp, ifnet) == 0)
783 strlcpy(prettyname, ifnet.if_xname,
786 strlcpy(prettyname, "---", sizeof(prettyname));
789 printf("%*.*s", wid_if, wid_if, prettyname);
790 if (rt->rt_rmx.rmx_expire) {
794 rt->rt_rmx.rmx_expire - uptime.tv_sec) > 0)
795 printf(" %*d", wid_expire, (int)expire_time);
797 if (rt->rt_nodes[0].rn_dupedkey)
804 routename(in_addr_t in)
807 static char line[MAXHOSTNAMELEN];
812 hp = gethostbyaddr(&in, sizeof (struct in_addr), AF_INET);
815 trimdomain(cp, strlen(cp));
819 strlcpy(line, cp, sizeof(line));
821 #define C(x) ((x) & 0xff)
823 sprintf(line, "%u.%u.%u.%u",
824 C(in >> 24), C(in >> 16), C(in >> 8), C(in));
829 #define NSHIFT(m) ( \
830 (m) == IN_CLASSA_NET ? IN_CLASSA_NSHIFT : \
831 (m) == IN_CLASSB_NET ? IN_CLASSB_NSHIFT : \
832 (m) == IN_CLASSC_NET ? IN_CLASSC_NSHIFT : \
836 domask(char *dst, in_addr_t addr __unused, u_long mask)
840 if (mask == 0 || (!numeric_addr && NSHIFT(mask) != 0)) {
845 for (b = 0; b < 32; b++)
846 if (mask & (1 << b)) {
850 for (bb = b+1; bb < 32; bb++)
851 if (!(mask & (1 << bb))) {
852 i = -1; /* noncontig */
858 sprintf(dst, "&0x%lx", mask);
860 sprintf(dst, "/%d", 32-i);
864 * Return the name of the network whose address is given.
865 * The address is assumed to be that of a net or subnet, not a host.
868 netname(in_addr_t in, u_long mask)
871 static char line[MAXHOSTNAMELEN];
872 struct netent *np = 0;
876 if (!numeric_addr && i) {
877 np = getnetbyaddr(i >> NSHIFT(mask), AF_INET);
880 trimdomain(cp, strlen(cp));
884 strlcpy(line, cp, sizeof(line));
886 inet_ntop(AF_INET, &in, line, sizeof(line) - 1);
888 domask(line + strlen(line), i, mask);
896 in6_fillscopeid(struct sockaddr_in6 *sa6)
898 #if defined(__KAME__)
900 * XXX: This is a special workaround for KAME kernels.
901 * sin6_scope_id field of SA should be set in the future.
903 if (IN6_IS_ADDR_LINKLOCAL(&sa6->sin6_addr) ||
904 IN6_IS_ADDR_MC_NODELOCAL(&sa6->sin6_addr) ||
905 IN6_IS_ADDR_MC_LINKLOCAL(&sa6->sin6_addr)) {
906 /* XXX: override is ok? */
908 ntohs(*(u_int16_t *)&sa6->sin6_addr.s6_addr[2]);
909 sa6->sin6_addr.s6_addr[2] = sa6->sin6_addr.s6_addr[3] = 0;
915 netname6(struct sockaddr_in6 *sa6, struct in6_addr *mask)
917 static char line[MAXHOSTNAMELEN];
918 u_char *p = (u_char *)mask;
920 int masklen, illegal = 0, flag = 0;
923 for (masklen = 0, lim = p + 16; p < lim; p++) {
957 fprintf(stderr, "illegal prefixlen\n");
962 if (masklen == 0 && IN6_IS_ADDR_UNSPECIFIED(&sa6->sin6_addr))
966 flag |= NI_NUMERICHOST;
967 getnameinfo((struct sockaddr *)sa6, sa6->sin6_len, line, sizeof(line),
971 sprintf(&line[strlen(line)], "/%d", masklen);
977 routename6(struct sockaddr_in6 *sa6)
979 static char line[MAXHOSTNAMELEN];
981 /* use local variable for safety */
982 struct sockaddr_in6 sa6_local;
984 sa6_local.sin6_family = AF_INET6;
985 sa6_local.sin6_len = sizeof(sa6_local);
986 sa6_local.sin6_addr = sa6->sin6_addr;
987 sa6_local.sin6_scope_id = sa6->sin6_scope_id;
990 flag |= NI_NUMERICHOST;
992 getnameinfo((struct sockaddr *)&sa6_local, sa6_local.sin6_len,
993 line, sizeof(line), NULL, 0, flag);
1000 * Print routing statistics
1003 rt_stats(u_long rtsaddr, u_long rttaddr)
1005 struct rtstat rtstat;
1009 printf("rtstat: symbol not in namelist\n");
1013 printf("rttrash: symbol not in namelist\n");
1016 kread(rtsaddr, (char *)&rtstat, sizeof (rtstat));
1017 kread(rttaddr, (char *)&rttrash, sizeof (rttrash));
1018 printf("routing:\n");
1020 #define p(f, m) if (rtstat.f || sflag <= 1) \
1021 printf(m, rtstat.f, plural(rtstat.f))
1023 p(rts_badredirect, "\t%hu bad routing redirect%s\n");
1024 p(rts_dynamic, "\t%hu dynamically created route%s\n");
1025 p(rts_newgateway, "\t%hu new gateway%s due to redirects\n");
1026 p(rts_unreach, "\t%hu destination%s found unreachable\n");
1027 p(rts_wildcard, "\t%hu use%s of a wildcard route\n");
1030 if (rttrash || sflag <= 1)
1031 printf("\t%u route%s not in table but not freed\n",
1032 rttrash, plural(rttrash));
1036 ipx_print(struct sockaddr *sa)
1039 struct servent *sp = 0;
1040 const char *net = "", *host = "";
1043 struct ipx_addr work = ((struct sockaddr_ipx *)sa)->sipx_addr;
1044 static char mybuf[50];
1045 char cport[10], chost[15], cnet[15];
1047 port = ntohs(work.x_port);
1049 if (ipx_nullnet(work) && ipx_nullhost(work)) {
1053 sprintf(mybuf, "*.%s", sp->s_name);
1055 sprintf(mybuf, "*.%x", port);
1057 sprintf(mybuf, "*.*");
1062 if (ipx_wildnet(work))
1064 else if (ipx_nullnet(work))
1067 q = work.x_net.c_net;
1068 sprintf(cnet, "%02x%02x%02x%02x",
1069 q[0], q[1], q[2], q[3]);
1070 for (p = cnet; *p == '0' && p < cnet + 8; p++)
1075 if (ipx_wildhost(work))
1077 else if (ipx_nullhost(work))
1080 q = work.x_host.c_host;
1081 sprintf(chost, "%02x%02x%02x%02x%02x%02x",
1082 q[0], q[1], q[2], q[3], q[4], q[5]);
1083 for (p = chost; *p == '0' && p < chost + 12; p++)
1089 if (strcmp(host, "*") == 0)
1092 snprintf(cport, sizeof(cport),
1093 "%s%s", *host ? "." : "", sp->s_name);
1095 snprintf(cport, sizeof(cport),
1096 "%s%x", *host ? "." : "", port);
1100 snprintf(mybuf, sizeof(mybuf), "%s.%s%s", net, host, cport);
1105 ipx_phost(struct sockaddr *sa)
1107 struct sockaddr_ipx *sipx = (struct sockaddr_ipx *)sa;
1108 struct sockaddr_ipx work;
1109 static union ipx_net ipx_zeronet;
1114 in = work.sipx_addr;
1116 work.sipx_addr.x_port = 0;
1117 work.sipx_addr.x_net = ipx_zeronet;
1118 p = ipx_print((struct sockaddr *)&work);
1119 if (strncmp("*.", p, 2) == 0) p += 2;