2 * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
3 * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
4 * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
5 * Copyright (c) 1996-2000 Wichert Akkerman <wichert@cistron.nl>
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. The name of the author may not be used to endorse or promote products
17 * derived from this software without specific prior written permission.
19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
36 #include <sys/socket.h>
39 #if defined(HAVE_SIN6_SCOPE_ID_LINUX)
40 #define in6_addr in6_addr_libc
41 #define ipv6_mreq ipv6_mreq_libc
42 #define sockaddr_in6 sockaddr_in6_libc
45 #include <netinet/in.h>
46 #ifdef HAVE_NETINET_TCP_H
47 #include <netinet/tcp.h>
49 #ifdef HAVE_NETINET_UDP_H
50 #include <netinet/udp.h>
52 #include <arpa/inet.h>
55 #include <asm/types.h>
56 #if defined(__GLIBC__) && (__GLIBC__ >= 2) && (__GLIBC__ + __GLIBC_MINOR__ >= 3)
57 # include <netipx/ipx.h>
59 # include <linux/ipx.h>
63 #if defined (__GLIBC__) && (((__GLIBC__ < 2) || (__GLIBC__ == 2 && __GLIBC_MINOR__ < 1)) || defined(HAVE_SIN6_SCOPE_ID_LINUX))
64 #if defined(HAVE_LINUX_IN6_H)
65 #if defined(HAVE_SIN6_SCOPE_ID_LINUX)
69 #define in6_addr in6_addr_kernel
70 #define ipv6_mreq ipv6_mreq_kernel
71 #define sockaddr_in6 sockaddr_in6_kernel
73 #include <linux/in6.h>
74 #if defined(HAVE_SIN6_SCOPE_ID_LINUX)
78 #define in6_addr in6_addr_libc
79 #define ipv6_mreq ipv6_mreq_libc
80 #define sockaddr_in6 sockaddr_in6_kernel
85 #if defined(HAVE_SYS_UIO_H)
89 #if defined(HAVE_LINUX_NETLINK_H)
90 #include <linux/netlink.h>
93 #if defined(HAVE_LINUX_IF_PACKET_H)
94 #include <linux/if_packet.h>
97 #if defined(HAVE_LINUX_ICMP_H)
98 #include <linux/icmp.h>
102 #define PF_UNSPEC AF_UNSPEC
106 #define HAVE_SENDMSG 1 /* HACK - *FIXME* */
110 /* Under Linux these are enums so we can't test for them with ifdef. */
111 #define IPPROTO_EGP IPPROTO_EGP
112 #define IPPROTO_PUP IPPROTO_PUP
113 #define IPPROTO_IDP IPPROTO_IDP
114 #define IPPROTO_IGMP IPPROTO_IGMP
115 #define IPPROTO_RAW IPPROTO_RAW
116 #define IPPROTO_MAX IPPROTO_MAX
119 static struct xlat domains[] = {
121 { PF_AAL5, "PF_AAL5" },
124 { PF_APPLETALK, "PF_APPLETALK" },
127 { PF_ASH, "PF_ASH" },
130 { PF_ATMPVC, "PF_ATMPVC" },
133 { PF_ATMSVC, "PF_ATMSVC" },
136 { PF_AX25, "PF_AX25" },
139 { PF_BLUETOOTH, "PF_BLUETOOTH" },
142 { PF_BRIDGE, "PF_BRIDGE" },
145 { PF_DECnet, "PF_DECnet" },
148 { PF_DECNET, "PF_DECNET" },
151 { PF_ECONET, "PF_ECONET" },
154 { PF_FILE, "PF_FILE" },
157 { PF_IMPLINK, "PF_IMPLINK" },
160 { PF_INET, "PF_INET" },
163 { PF_INET6, "PF_INET6" },
166 { PF_IPX, "PF_IPX" },
169 { PF_IRDA, "PF_IRDA" },
172 { PF_ISO, "PF_ISO" },
175 { PF_KEY, "PF_KEY" },
178 { PF_UNIX, "PF_UNIX" },
181 { PF_LOCAL, "PF_LOCAL" },
184 { PF_NETBEUI, "PF_NETBEUI" },
187 { PF_NETLINK, "PF_NETLINK" },
190 { PF_NETROM, "PF_NETROM" },
193 { PF_PACKET, "PF_PACKET" },
196 { PF_PPPOX, "PF_PPPOX" },
199 { PF_ROSE, "PF_ROSE" },
202 { PF_ROUTE, "PF_ROUTE" },
205 { PF_SECURITY, "PF_SECURITY" },
208 { PF_SNA, "PF_SNA" },
211 { PF_UNSPEC, "PF_UNSPEC" },
214 { PF_WANPIPE, "PF_WANPIPE" },
217 { PF_X25, "PF_X25" },
221 struct xlat addrfams[] = {
223 { AF_APPLETALK, "AF_APPLETALK" },
226 { AF_ASH, "AF_ASH" },
229 { AF_ATMPVC, "AF_ATMPVC" },
232 { AF_ATMSVC, "AF_ATMSVC" },
235 { AF_AX25, "AF_AX25" },
238 { AF_BLUETOOTH, "AF_BLUETOOTH" },
241 { AF_BRIDGE, "AF_BRIDGE" },
244 { AF_DECnet, "AF_DECnet" },
247 { AF_ECONET, "AF_ECONET" },
250 { AF_FILE, "AF_FILE" },
253 { AF_IMPLINK, "AF_IMPLINK" },
256 { AF_INET, "AF_INET" },
259 { AF_INET6, "AF_INET6" },
262 { AF_IPX, "AF_IPX" },
265 { AF_IRDA, "AF_IRDA" },
268 { AF_ISO, "AF_ISO" },
271 { AF_KEY, "AF_KEY" },
274 { AF_UNIX, "AF_UNIX" },
277 { AF_LOCAL, "AF_LOCAL" },
280 { AF_NETBEUI, "AF_NETBEUI" },
283 { AF_NETLINK, "AF_NETLINK" },
286 { AF_NETROM, "AF_NETROM" },
289 { AF_PACKET, "AF_PACKET" },
292 { AF_PPPOX, "AF_PPPOX" },
295 { AF_ROSE, "AF_ROSE" },
298 { AF_ROUTE, "AF_ROUTE" },
301 { AF_SECURITY, "AF_SECURITY" },
304 { AF_SNA, "AF_SNA" },
307 { AF_UNSPEC, "AF_UNSPEC" },
310 { AF_WANPIPE, "AF_WANPIPE" },
313 { AF_X25, "AF_X25" },
317 static struct xlat socktypes[] = {
318 { SOCK_STREAM, "SOCK_STREAM" },
319 { SOCK_DGRAM, "SOCK_DGRAM" },
321 { SOCK_RAW, "SOCK_RAW" },
323 #ifdef SOCK_SEQPACKET
324 { SOCK_SEQPACKET,"SOCK_SEQPACKET"},
327 { SOCK_RDM, "SOCK_RDM" },
330 { SOCK_PACKET, "SOCK_PACKET" },
334 static struct xlat socketlayers[] = {
336 { SOL_IP, "SOL_IP" },
338 #if defined(SOL_ICMP)
339 { SOL_ICMP, "SOL_ICMP" },
342 { SOL_TCP, "SOL_TCP" },
345 { SOL_UDP, "SOL_UDP" },
347 #if defined(SOL_IPV6)
348 { SOL_IPV6, "SOL_IPV6" },
350 #if defined(SOL_ICMPV6)
351 { SOL_ICMPV6, "SOL_ICMPV6" },
354 { SOL_RAW, "SOL_RAW" },
357 { SOL_IPX, "SOL_IPX" },
360 { SOL_IPX, "SOL_IPX" },
362 #if defined(SOL_AX25)
363 { SOL_AX25, "SOL_AX25" },
365 #if defined(SOL_ATALK)
366 { SOL_ATALK, "SOL_ATALK" },
368 #if defined(SOL_NETROM)
369 { SOL_NETROM, "SOL_NETROM" },
371 #if defined(SOL_ROSE)
372 { SOL_ROSE, "SOL_ROSE" },
374 #if defined(SOL_DECNET)
375 { SOL_DECNET, "SOL_DECNET" },
378 { SOL_X25, "SOL_X25" },
380 #if defined(SOL_PACKET)
381 { SOL_PACKET, "SOL_PACKET" },
384 { SOL_ATM, "SOL_ATM" },
387 { SOL_AAL, "SOL_AAL" },
389 #if defined(SOL_IRDA)
390 { SOL_IRDA, "SOL_IRDA" },
392 { SOL_SOCKET, "SOL_SOCKET" }, /* Never used! */
394 /*** WARNING: DANGER WILL ROBINSON: NOTE "socketlayers" array above
395 falls into "protocols" array below!!!! This is intended!!! ***/
396 static struct xlat protocols[] = {
397 { IPPROTO_IP, "IPPROTO_IP" },
398 { IPPROTO_ICMP, "IPPROTO_ICMP" },
399 { IPPROTO_TCP, "IPPROTO_TCP" },
400 { IPPROTO_UDP, "IPPROTO_UDP" },
402 { IPPROTO_GGP, "IPPROTO_GGP" },
405 { IPPROTO_EGP, "IPPROTO_EGP" },
408 { IPPROTO_PUP, "IPPROTO_PUP" },
411 { IPPROTO_IDP, "IPPROTO_IDP" },
414 { IPPROTO_IPV6, "IPPROTO_IPV6" },
416 #ifdef IPPROTO_ICMPV6
417 { IPPROTO_ICMPV6,"IPPROTO_ICMPV6"},
420 { IPPROTO_IGMP, "IPPROTO_IGMP" },
423 { IPPROTO_HELLO,"IPPROTO_HELLO" },
426 { IPPROTO_ND, "IPPROTO_ND" },
429 { IPPROTO_RAW, "IPPROTO_RAW" },
432 { IPPROTO_MAX, "IPPROTO_MAX" },
435 { IPPROTO_IPIP, "IPPROTO_IPIP" },
439 static struct xlat msg_flags[] = {
440 { MSG_OOB, "MSG_OOB" },
442 { MSG_DONTROUTE,"MSG_DONTROUTE" },
445 { MSG_PEEK, "MSG_PEEK" },
448 { MSG_CTRUNC, "MSG_CTRUNC" },
451 { MSG_PROXY, "MSG_PROXY" },
454 { MSG_EOR, "MSG_EOR" },
457 { MSG_WAITALL, "MSG_WAITALL" },
460 { MSG_TRUNC, "MSG_TRUNC" },
463 { MSG_CTRUNC, "MSG_CTRUNC" },
466 { MSG_ERRQUEUE, "MSG_ERRQUEUE" },
469 { MSG_DONTWAIT, "MSG_DONTWAIT" },
472 { MSG_CONFIRM, "MSG_CONFIRM" },
475 { MSG_PROBE, "MSG_PROBE" },
478 { MSG_FIN, "MSG_FIN" },
481 { MSG_SYN, "MSG_SYN" },
484 { MSG_RST, "MSG_RST" },
487 { MSG_NOSIGNAL, "MSG_NOSIGNAL" },
490 { MSG_MORE, "MSG_MORE" },
495 static struct xlat sockoptions[] = {
497 { SO_PEERCRED, "SO_PEERCRED" },
500 { SO_PASSCRED, "SO_PASSCRED" },
503 { SO_DEBUG, "SO_DEBUG" },
506 { SO_REUSEADDR, "SO_REUSEADDR" },
509 { SO_KEEPALIVE, "SO_KEEPALIVE" },
512 { SO_DONTROUTE, "SO_DONTROUTE" },
515 { SO_BROADCAST, "SO_BROADCAST" },
518 { SO_LINGER, "SO_LINGER" },
521 { SO_OOBINLINE, "SO_OOBINLINE" },
524 { SO_TYPE, "SO_TYPE" },
527 { SO_ERROR, "SO_ERROR" },
530 { SO_SNDBUF, "SO_SNDBUF" },
533 { SO_RCVBUF, "SO_RCVBUF" },
536 { SO_NO_CHECK, "SO_NO_CHECK" },
539 { SO_PRIORITY, "SO_PRIORITY" },
542 { SO_ACCEPTCONN,"SO_ACCEPTCONN" },
544 #ifdef SO_USELOOPBACK
545 { SO_USELOOPBACK,"SO_USELOOPBACK"},
548 { SO_SNDLOWAT, "SO_SNDLOWAT" },
551 { SO_RCVLOWAT, "SO_RCVLOWAT" },
554 { SO_SNDTIMEO, "SO_SNDTIMEO" },
557 { SO_RCVTIMEO, "SO_RCVTIMEO" },
560 { SO_BSDCOMPAT, "SO_BSDCOMPAT" },
563 { SO_REUSEPORT, "SO_REUSEPORT" },
566 { SO_ORDREL, "SO_ORDREL" },
569 { SO_IMASOCKET, "SO_IMASOCKET" },
572 { SO_MGMT, "SO_MGMT" },
575 { SO_LISTENING, "SO_LISTENING" },
578 { SO_RDWR, "SO_RDWR" },
581 { SO_SEMA, "SO_SEMA" },
583 #ifdef SO_PARALLELSVR
584 { SO_PARALLELSVR,"SO_PARALLELSVR"},
587 { SO_PROTOTYPE, "SO_PROTOTYPE" },
590 { SO_ALLRAW, "SO_ALLRAW" },
593 { SO_ICS, "SO_ICS" },
598 #if !defined (SOL_IP) && defined (IPPROTO_IP)
599 #define SOL_IP IPPROTO_IP
603 static struct xlat sockipoptions[] = {
605 { IP_TOS, "IP_TOS" },
608 { IP_TTL, "IP_TTL" },
611 { IP_HDRINCL, "IP_HDRINCL" },
614 { IP_OPTIONS, "IP_OPTIONS" },
616 #ifdef IP_ROUTER_ALERT
617 { IP_ROUTER_ALERT, "IP_ROUTER_ALERT" },
619 #ifdef IP_RECVOPTIONS
620 { IP_RECVOPTIONS, "IP_RECVOPTIONS" },
623 { IP_RECVOPTS, "IP_RECVOPTS" },
625 #ifdef IP_RECVRETOPTS
626 { IP_RECVRETOPTS, "IP_RECVRETOPTS" },
628 #ifdef IP_RECVDSTADDR
629 { IP_RECVDSTADDR, "IP_RECVDSTADDR" },
632 { IP_RETOPTS, "IP_RETOPTS" },
635 { IP_PKTINFO, "IP_PKTINFO" },
638 { IP_PKTOPTIONS, "IP_PKTOPTIONS" },
640 #ifdef IP_MTU_DISCOVER
641 { IP_MTU_DISCOVER, "IP_MTU_DISCOVER" },
644 { IP_RECVERR, "IP_RECVERR" },
647 { IP_RECVTTL, "IP_RECRECVTTL" },
650 { IP_RECVTOS, "IP_RECRECVTOS" },
653 { IP_MTU, "IP_MTU" },
655 #ifdef IP_MULTICAST_IF
656 { IP_MULTICAST_IF, "IP_MULTICAST_IF" },
658 #ifdef IP_MULTICAST_TTL
659 { IP_MULTICAST_TTL, "IP_MULTICAST_TTL" },
661 #ifdef IP_MULTICAST_LOOP
662 { IP_MULTICAST_LOOP, "IP_MULTICAST_LOOP" },
664 #ifdef IP_ADD_MEMBERSHIP
665 { IP_ADD_MEMBERSHIP, "IP_ADD_MEMBERSHIP" },
667 #ifdef IP_DROP_MEMBERSHIP
668 { IP_DROP_MEMBERSHIP, "IP_DROP_MEMBERSHIP" },
670 #ifdef IP_BROADCAST_IF
671 { IP_BROADCAST_IF, "IP_BROADCAST_IF" },
673 #ifdef IP_RECVIFINDEX
674 { IP_RECVIFINDEX, "IP_RECVIFINDEX" },
681 static struct xlat sockipxoptions[] = {
682 { IPX_TYPE, "IPX_TYPE" },
688 static struct xlat sockrawoptions[] = {
689 #if defined(ICMP_FILTER)
690 { ICMP_FILTER, "ICMP_FILTER" },
697 static struct xlat sockpacketoptions[] = {
698 { PACKET_ADD_MEMBERSHIP, "PACKET_ADD_MEMBERSHIP" },
699 { PACKET_DROP_MEMBERSHIP, "PACKET_DROP_MEMBERSHIP"},
700 #if defined(PACKET_RECV_OUTPUT)
701 { PACKET_RECV_OUTPUT, "PACKET_RECV_OUTPUT" },
703 #if defined(PACKET_RX_RING)
704 { PACKET_RX_RING, "PACKET_RX_RING" },
706 #if defined(PACKET_STATISTICS)
707 { PACKET_STATISTICS, "PACKET_STATISTICS" },
711 #endif /* SOL_PACKET */
713 #if !defined (SOL_TCP) && defined (IPPROTO_TCP)
714 #define SOL_TCP IPPROTO_TCP
718 static struct xlat socktcpoptions[] = {
719 { TCP_NODELAY, "TCP_NODELAY" },
720 { TCP_MAXSEG, "TCP_MAXSEG" },
721 #if defined(TCP_CORK)
722 { TCP_CORK, "TCP_CORK" },
724 #if defined(TCP_KEEPIDLE)
725 { TCP_KEEPIDLE, "TCP_KEEPIDLE" },
727 #if defined(TCP_KEEPINTVL)
728 { TCP_KEEPINTVL, "TCP_KEEPINTVL" },
730 #if defined(TCP_KEEPCNT)
731 { TCP_KEEPCNT, "TCP_KEEPCNT" },
733 #if defined(TCP_NKEEP)
734 { TCP_NKEEP, "TCP_NKEEP" },
736 #if defined(TCP_SYNCNT)
737 { TCP_SYNCNT, "TCP_SYNCNT" },
739 #if defined(TCP_LINGER2)
740 { TCP_LINGER2, "TCP_LINGER2" },
742 #if defined(TCP_DEFER_ACCEPT)
743 { TCP_DEFER_ACCEPT, "TCP_DEFER_ACCEPT" },
745 #if defined(TCP_WINDOW_CLAMP)
746 { TCP_WINDOW_CLAMP, "TCP_WINDOW_CLAMP" },
748 #if defined(TCP_INFO)
749 { TCP_INFO, "TCP_INFO" },
751 #if defined(TCP_QUICKACK)
752 { TCP_QUICKACK, "TCP_QUICKACK" },
759 static struct xlat icmpfilterflags[] = {
760 #if defined(ICMP_ECHOREPLY)
761 { (1<<ICMP_ECHOREPLY), "ICMP_ECHOREPLY" },
763 #if defined(ICMP_DEST_UNREACH)
764 { (1<<ICMP_DEST_UNREACH), "ICMP_DEST_UNREACH" },
766 #if defined(ICMP_SOURCE_QUENCH)
767 { (1<<ICMP_SOURCE_QUENCH), "ICMP_SOURCE_QUENCH" },
769 #if defined(ICMP_REDIRECT)
770 { (1<<ICMP_REDIRECT), "ICMP_REDIRECT" },
772 #if defined(ICMP_ECHO)
773 { (1<<ICMP_ECHO), "ICMP_ECHO" },
775 #if defined(ICMP_TIME_EXCEEDED)
776 { (1<<ICMP_TIME_EXCEEDED), "ICMP_TIME_EXCEEDED" },
778 #if defined(ICMP_PARAMETERPROB)
779 { (1<<ICMP_PARAMETERPROB), "ICMP_PARAMETERPROB" },
781 #if defined(ICMP_TIMESTAMP)
782 { (1<<ICMP_TIMESTAMP), "ICMP_TIMESTAMP" },
784 #if defined(ICMP_TIMESTAMPREPLY)
785 { (1<<ICMP_TIMESTAMPREPLY), "ICMP_TIMESTAMPREPLY" },
787 #if defined(ICMP_INFO_REQUEST)
788 { (1<<ICMP_INFO_REQUEST), "ICMP_INFO_REQUEST" },
790 #if defined(ICMP_INFO_REPLY)
791 { (1<<ICMP_INFO_REPLY), "ICMP_INFO_REPLY" },
793 #if defined(ICMP_ADDRESS)
794 { (1<<ICMP_ADDRESS), "ICMP_ADDRESS" },
796 #if defined(ICMP_ADDRESSREPLY)
797 { (1<<ICMP_ADDRESSREPLY), "ICMP_ADDRESSREPLY" },
803 #if defined(AF_PACKET) /* from e.g. linux/if_packet.h */
804 static struct xlat af_packet_types[] = {
805 #if defined(PACKET_HOST)
806 { PACKET_HOST, "PACKET_HOST" },
808 #if defined(PACKET_BROADCAST)
809 { PACKET_BROADCAST, "PACKET_BROADCAST" },
811 #if defined(PACKET_MULTICAST)
812 { PACKET_MULTICAST, "PACKET_MULTICAST" },
814 #if defined(PACKET_OTHERHOST)
815 { PACKET_OTHERHOST, "PACKET_OTHERHOST" },
817 #if defined(PACKET_OUTGOING)
818 { PACKET_OUTGOING, "PACKET_OUTGOING" },
820 #if defined(PACKET_LOOPBACK)
821 { PACKET_LOOPBACK, "PACKET_LOOPBACK" },
823 #if defined(PACKET_FASTROUTE)
824 { PACKET_FASTROUTE, "PACKET_FASTROUTE" },
828 #endif /* defined(AF_PACKET) */
832 printsock(tcp, addr, addrlen)
840 struct sockaddr_in sin;
841 struct sockaddr_un sau;
842 #ifdef HAVE_INET_NTOP
843 struct sockaddr_in6 sa6;
845 #if defined(LINUX) && defined(AF_IPX)
846 struct sockaddr_ipx sipx;
849 struct sockaddr_ll ll;
852 struct sockaddr_nl nl;
855 char string_addr[100];
862 tprintf("%#lx", addr);
865 if ((addrlen<2) || (addrlen>sizeof(addrbuf)))
866 addrlen=sizeof(addrbuf);
868 if (umoven(tcp, addr, addrlen, (char*)&addrbuf) < 0) {
873 tprintf("{sa_family=");
874 printxval(addrfams, addrbuf.sa.sa_family, "AF_???");
877 switch (addrbuf.sa.sa_family) {
881 } else if (addrbuf.sau.sun_path[0]) {
882 tprintf("path=\"%-.*s\"", addrlen-2, addrbuf.sau.sun_path);
884 tprintf("path=@%-.*s", addrlen-3, addrbuf.sau.sun_path+1);
888 tprintf("sin_port=htons(%u), sin_addr=inet_addr(\"%s\")",
889 ntohs(addrbuf.sin.sin_port), inet_ntoa(addrbuf.sin.sin_addr));
891 #ifdef HAVE_INET_NTOP
893 inet_ntop(AF_INET6, &addrbuf.sa6.sin6_addr, string_addr, sizeof(string_addr));
894 tprintf("sin6_port=htons(%u), inet_pton(AF_INET6, \"%s\", &sin6_addr), sin6_flowinfo=%u",
895 ntohs(addrbuf.sa6.sin6_port), string_addr,
896 addrbuf.sa6.sin6_flowinfo);
897 #ifdef HAVE_STRUCT_SOCKADDR_IN6_SIN6_SCOPE_ID
899 #if defined(HAVE_IF_INDEXTONAME) && defined(IN6_IS_ADDR_LINKLOCAL) && defined(IN6_IS_ADDR_MC_LINKLOCAL)
900 int numericscope = 0;
901 if (IN6_IS_ADDR_LINKLOCAL (&addrbuf.sa6.sin6_addr)
902 || IN6_IS_ADDR_MC_LINKLOCAL (&addrbuf.sa6.sin6_addr)) {
903 char scopebuf[IFNAMSIZ + 1];
905 if (if_indextoname (addrbuf.sa6.sin6_scope_id, scopebuf) == NULL)
908 tprintf(", sin6_scope_id=if_nametoindex(\"%s\")", scopebuf);
914 tprintf(", sin6_scope_id=%u", addrbuf.sa6.sin6_scope_id);
919 #if defined(AF_IPX) && defined(linux)
923 tprintf("sipx_port=htons(%u), ",
924 ntohs(addrbuf.sipx.sipx_port));
925 /* Yes, I know, this does not look too
926 * strace-ish, but otherwise the IPX
927 * addresses just look monstrous...
928 * Anyways, feel free if you don't like
931 tprintf("%08lx:", (unsigned long)ntohl(addrbuf.sipx.sipx_network));
932 for (i = 0; i<IPX_NODE_LEN; i++)
933 tprintf("%02x", addrbuf.sipx.sipx_node[i]);
934 tprintf("/[%02x]", addrbuf.sipx.sipx_type);
937 #endif /* AF_IPX && linux */
942 tprintf("proto=%#04x, if%d, pkttype=",
943 ntohs(addrbuf.ll.sll_protocol),
944 addrbuf.ll.sll_ifindex);
945 printxval(af_packet_types, addrbuf.ll.sll_pkttype, "?");
946 tprintf(", addr(%d)={%d, ",
947 addrbuf.ll.sll_halen,
948 addrbuf.ll.sll_hatype);
949 for (i=0; i<addrbuf.ll.sll_halen; i++)
950 tprintf("%02x", addrbuf.ll.sll_addr[i]);
954 #endif /* AF_APACKET */
957 tprintf("pid=%d, groups=%08x", addrbuf.nl.nl_pid, addrbuf.nl.nl_groups);
959 #endif /* AF_NETLINK */
960 /* AF_AX25 AF_APPLETALK AF_NETROM AF_BRIDGE AF_AAL5
961 AF_X25 AF_ROSE etc. still need to be done */
965 printstr(tcp, (long) &((struct sockaddr *) addr)->sa_data,
966 sizeof addrbuf.sa.sa_data);
975 printmsghdr(tcp, addr)
981 if (umove(tcp, addr, &msg) < 0) {
982 tprintf("%#lx", addr);
985 tprintf("{msg_name(%d)=", msg.msg_namelen);
986 printsock(tcp, (long)msg.msg_name, msg.msg_namelen);
988 tprintf(", msg_iov(%lu)=", (unsigned long)msg.msg_iovlen);
989 tprint_iov(tcp, msg.msg_iovlen, (long) msg.msg_iov);
991 #ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL
992 tprintf(", msg_controllen=%lu", (unsigned long)msg.msg_controllen);
993 if (msg.msg_controllen)
994 tprintf(", msg_control=%#lx, ", (unsigned long) msg.msg_control);
995 tprintf(", msg_flags=");
996 if (printflags(msg_flags, msg.msg_flags)==0)
998 #else /* !HAVE_STRUCT_MSGHDR_MSG_CONTROL */
999 tprintf("msg_accrights=%#lx, msg_accrightslen=%u",
1000 (unsigned long) msg.msg_accrights, msg.msg_accrightslen);
1001 #endif /* !HAVE_STRUCT_MSGHDR_MSG_CONTROL */
1005 #endif /* HAVE_SENDMSG */
1011 if (entering(tcp)) {
1012 printxval(domains, tcp->u_arg[0], "PF_???");
1014 printxval(socktypes, tcp->u_arg[1], "SOCK_???");
1016 switch (tcp->u_arg[0]) {
1021 printxval(protocols, tcp->u_arg[2], "IPPROTO_???");
1025 /* BTW: I don't believe this.. */
1027 printxval(domains, tcp->u_arg[2], "PF_???");
1032 tprintf("%lu", tcp->u_arg[2]);
1043 if (entering(tcp)) {
1044 /* not sure really what these args are... but this
1045 * is how truss prints it
1047 tprintf("%ld, %ld, %ld, ",
1048 tcp->u_arg[0], tcp->u_arg[1], tcp->u_arg[2]);
1049 printpath(tcp, tcp->u_arg[3]);
1050 tprintf(", %ld", tcp->u_arg[4]);
1056 sys_so_socketpair(tcp)
1059 if (entering(tcp)) {
1060 /* not sure what this arg is */
1061 tprintf("0x%lx", tcp->u_arg[0]);
1070 if (entering(tcp)) {
1071 tprintf("%ld, ", tcp->u_arg[0]);
1072 printsock(tcp, tcp->u_arg[1], tcp->u_arg[2]);
1073 tprintf(", %lu", tcp->u_arg[2]);
1082 return sys_bind(tcp);
1089 if (entering(tcp)) {
1090 tprintf("%ld, %lu", tcp->u_arg[0], tcp->u_arg[1]);
1099 if (entering(tcp)) {
1100 tprintf("%ld, ", tcp->u_arg[0]);
1101 } else if (!tcp->u_arg[2])
1102 tprintf("%#lx, NULL", tcp->u_arg[1]);
1104 if (tcp->u_arg[1] == 0 || syserror(tcp)) {
1105 tprintf("%#lx", tcp->u_arg[1]);
1107 printsock(tcp, tcp->u_arg[1], tcp->u_arg[2]);
1110 printnum(tcp, tcp->u_arg[2], "%lu");
1119 if (entering(tcp)) {
1120 tprintf("%ld, ", tcp->u_arg[0]);
1121 printstr(tcp, tcp->u_arg[1], tcp->u_arg[2]);
1122 tprintf(", %lu, ", tcp->u_arg[2]);
1124 if (printflags(msg_flags, tcp->u_arg[3]) == 0)
1134 if (entering(tcp)) {
1135 tprintf("%ld, ", tcp->u_arg[0]);
1136 printstr(tcp, tcp->u_arg[1], tcp->u_arg[2]);
1137 tprintf(", %lu, ", tcp->u_arg[2]);
1139 if (printflags(msg_flags, tcp->u_arg[3]) == 0)
1143 printsock(tcp, tcp->u_arg[4], tcp->u_arg[5]);
1145 tprintf(", %lu", tcp->u_arg[5]);
1156 if (entering(tcp)) {
1157 tprintf("%ld, ", tcp->u_arg[0]);
1158 printmsghdr(tcp, tcp->u_arg[1]);
1161 if (printflags(msg_flags, tcp->u_arg[2]) == 0)
1167 #endif /* HAVE_SENDMSG */
1173 if (entering(tcp)) {
1174 tprintf("%ld, ", tcp->u_arg[0]);
1177 tprintf("%#lx", tcp->u_arg[1]);
1179 printstr(tcp, tcp->u_arg[1], tcp->u_rval);
1181 tprintf(", %lu, ", tcp->u_arg[2]);
1182 if (printflags(msg_flags, tcp->u_arg[3]) == 0)
1194 if (entering(tcp)) {
1195 tprintf("%ld, ", tcp->u_arg[0]);
1197 if (syserror(tcp)) {
1198 tprintf("%#lx, %lu, %lu, %#lx, %#lx",
1199 tcp->u_arg[1], tcp->u_arg[2], tcp->u_arg[3],
1200 tcp->u_arg[4], tcp->u_arg[5]);
1204 printstr(tcp, tcp->u_arg[1], tcp->u_rval);
1206 tprintf(", %lu, ", tcp->u_arg[2]);
1208 if (printflags(msg_flags, tcp->u_arg[3]) == 0)
1210 /* from address, len */
1211 if (!tcp->u_arg[4] || !tcp->u_arg[5]) {
1212 if (tcp->u_arg[4] == 0)
1215 tprintf(", %#lx", tcp->u_arg[4]);
1216 if (tcp->u_arg[5] == 0)
1219 tprintf(", %#lx", tcp->u_arg[5]);
1222 if (umove(tcp, tcp->u_arg[5], &fromlen) < 0) {
1223 tprintf(", {...}, [?]");
1227 printsock(tcp, tcp->u_arg[4], tcp->u_arg[5]);
1229 tprintf(", [%u]", fromlen);
1240 if (entering(tcp)) {
1241 tprintf("%ld, ", tcp->u_arg[0]);
1243 if (syserror(tcp) || !verbose(tcp))
1244 tprintf("%#lx", tcp->u_arg[1]);
1246 printmsghdr(tcp, tcp->u_arg[1]);
1249 if (printflags(msg_flags, tcp->u_arg[2]) == 0)
1255 #endif /* HAVE_SENDMSG */
1261 if (entering(tcp)) {
1262 tprintf("%ld, %ld", tcp->u_arg[0], tcp->u_arg[1]);
1263 switch (tcp->u_arg[1]) {
1265 tprintf("%s", " /* receive */");
1268 tprintf("%s", " /* send */");
1271 tprintf("%s", " /* send and receive */");
1279 sys_getsockname(tcp)
1282 return sys_accept(tcp);
1286 sys_getpeername(tcp)
1289 return sys_accept(tcp);
1297 #if defined(LINUX) && !defined(SPARC) && !defined(SH) && !defined(IA64)
1301 if (syserror(tcp)) {
1302 tprintf("%#lx", tcp->u_arg[0]);
1305 if (umoven(tcp, tcp->u_arg[0], sizeof fds, (char *) fds) < 0)
1308 tprintf("[%u, %u]", fds[0], fds[1]);
1310 #elif defined(SPARC) || defined(SH) || defined(SVR4) || defined(FREEBSD) || defined(IA64)
1312 tprintf("[%lu, %lu]", tcp->u_rval, getrval2(tcp));
1325 if (entering(tcp)) {
1326 printxval(domains, tcp->u_arg[0], "PF_???");
1328 printxval(socktypes, tcp->u_arg[1], "SOCK_???");
1330 switch (tcp->u_arg[0]) {
1332 printxval(protocols, tcp->u_arg[2], "IPPROTO_???");
1336 /* BTW: I don't believe this.. */
1338 printxval(domains, tcp->u_arg[2], "PF_???");
1343 tprintf("%lu", tcp->u_arg[2]);
1347 if (syserror(tcp)) {
1348 tprintf(", %#lx", tcp->u_arg[3]);
1352 if (umoven(tcp, tcp->u_arg[3], sizeof fds, (char *) fds) < 0)
1355 tprintf(", [%u, %u]", fds[0], fds[1]);
1357 #if defined(SUNOS4) || defined(SVR4) || defined(FREEBSD)
1358 tprintf(", [%lu, %lu]", tcp->u_rval, getrval2(tcp));
1359 #endif /* SUNOS4 || SVR4 || FREEBSD */
1368 if (entering(tcp)) {
1369 tprintf("%ld, ", tcp->u_arg[0]);
1370 printxval(socketlayers, tcp->u_arg[1], "SOL_???");
1372 switch (tcp->u_arg[1]) {
1374 printxval(sockoptions, tcp->u_arg[2], "SO_???");
1378 printxval(sockipoptions, tcp->u_arg[2], "IP_???");
1383 printxval(sockipxoptions, tcp->u_arg[2], "IPX_???");
1388 printxval(sockpacketoptions, tcp->u_arg[2], "PACKET_???");
1393 printxval(socktcpoptions, tcp->u_arg[2], "TCP_???");
1397 /* SOL_AX25 SOL_ROSE SOL_ATALK SOL_NETROM SOL_UDP SOL_DECNET SOL_X25
1398 * etc. still need work */
1400 tprintf("%lu", tcp->u_arg[2]);
1405 if (syserror(tcp) || umove (tcp, tcp->u_arg[4], &len) < 0) {
1406 tprintf(", %#lx, %#lx",
1407 tcp->u_arg[3], tcp->u_arg[4]);
1411 switch (tcp->u_arg[1]) {
1413 switch (tcp->u_arg[2]) {
1416 if (len == sizeof (struct linger)) {
1417 struct linger linger;
1422 tprintf(", {onoff=%d, linger=%d}, "
1436 if (len == sizeof (int)) {
1437 printnum(tcp, tcp->u_arg[3], "%ld");
1440 printstr (tcp, tcp->u_arg[3], len);
1442 tprintf(", [%ld]", len);
1447 #if defined(ICMP_FILTER)
1448 static void printicmpfilter(tcp, addr)
1452 struct icmp_filter filter;
1458 if (syserror(tcp) || !verbose(tcp)) {
1459 tprintf("%#lx", addr);
1462 if (umove(tcp, addr, &filter) < 0) {
1468 if (printflags(icmpfilterflags, ~filter.data) == 0)
1472 #endif /* ICMP_FILTER */
1475 printsockopt (tcp, level, name, addr, len)
1482 printxval(socketlayers, level, "SOL_??");
1486 printxval(sockoptions, name, "SO_???");
1488 #if defined(SO_LINGER)
1490 if (len == sizeof (struct linger)) {
1491 struct linger linger;
1492 if (umove (tcp, addr, &linger) < 0)
1494 tprintf(", {onoff=%d, linger=%d}",
1505 printxval(sockipoptions, name, "IP_???");
1510 printxval(sockipxoptions, name, "IPX_???");
1515 printxval(sockpacketoptions, name, "PACKET_???");
1516 /* TODO: decode packate_mreq for PACKET_*_MEMBERSHIP */
1521 printxval(socktcpoptions, name, "TCP_???");
1526 printxval(sockrawoptions, name, "RAW_???");
1528 #if defined(ICMP_FILTER)
1531 printicmpfilter(tcp, addr);
1538 /* SOL_AX25 SOL_ATALK SOL_NETROM SOL_UDP SOL_DECNET SOL_X25
1539 * etc. still need work */
1542 tprintf("%u", name);
1545 /* default arg printing */
1549 if (len == sizeof (int)) {
1550 printnum(tcp, addr, "%ld");
1553 printstr (tcp, addr, len);
1559 #ifdef HAVE_STRUCT_OPTHDR
1562 print_sock_optmgmt (tcp, addr, len)
1570 while (len >= (int) sizeof hdr) {
1571 if (umove(tcp, addr, &hdr) < 0) break;
1575 else if (len > hdr.len + sizeof hdr) {
1581 printsockopt (tcp, hdr.level, hdr.name, addr, hdr.len);
1589 if (c++) tprintf (", ");
1590 printstr (tcp, addr, len);
1592 if (c > 1) tprintf ("]");
1601 if (entering(tcp)) {
1602 tprintf("%ld, ", tcp->u_arg[0]);
1603 printsockopt (tcp, tcp->u_arg[1], tcp->u_arg[2],
1604 tcp->u_arg[3], tcp->u_arg[4]);
1605 tprintf(", %lu", tcp->u_arg[4]);
1612 static struct xlat sock_version[] = {
1613 { __NETLIB_UW211_SVR4, "UW211_SVR4" },
1614 { __NETLIB_UW211_XPG4, "UW211_XPG4" },
1615 { __NETLIB_GEMINI_SVR4, "GEMINI_SVR4" },
1616 { __NETLIB_GEMINI_XPG4, "GEMINI_XPG4" },
1617 { __NETLIB_FP1_SVR4, "FP1_SVR4" },
1618 { __NETLIB_FP1_XPG4, "FP1_XPG4" },
1624 netlib_call(tcp, func)
1628 if (entering(tcp)) {
1630 printxval (sock_version, tcp->u_arg[0], "__NETLIB_???");
1633 for (i = 0; i < tcp->u_nargs; i++)
1634 tcp->u_arg[i] = tcp->u_arg[i + 1];
1646 return netlib_call (tcp, sys_socket);
1650 sys_xsocketpair(tcp)
1653 return netlib_call (tcp, sys_socketpair);
1660 return netlib_call (tcp, sys_bind);
1667 return netlib_call (tcp, sys_connect);
1674 return netlib_call (tcp, sys_listen);
1681 return netlib_call (tcp, sys_accept);
1688 return netlib_call (tcp, sys_sendmsg);
1695 return netlib_call (tcp, sys_recvmsg);
1699 sys_xgetsockaddr(tcp)
1702 if (entering(tcp)) {
1703 printxval (sock_version, tcp->u_arg[0], "__NETLIB_???");
1705 if (tcp->u_arg[1] == 0) {
1706 tprintf ("LOCALNAME, ");
1708 else if (tcp->u_arg[1] == 1) {
1709 tprintf ("REMOTENAME, ");
1712 tprintf ("%ld, ", tcp->u_arg [1]);
1714 tprintf ("%ld, ", tcp->u_arg [2]);
1717 if (tcp->u_arg[3] == 0 || syserror(tcp)) {
1718 tprintf("%#lx", tcp->u_arg[3]);
1720 printsock(tcp, tcp->u_arg[3], tcp->u_arg[4]);
1723 printnum(tcp, tcp->u_arg[4], "%lu");
1733 sys_xsetsockaddr(tcp)
1736 return netlib_call (tcp, sys_setsockaddr);
1742 sys_xgetsockopt(tcp)
1745 return netlib_call (tcp, sys_getsockopt);
1749 sys_xsetsockopt(tcp)
1752 return netlib_call (tcp, sys_setsockopt);
1759 return netlib_call (tcp, sys_shutdown);