]> granicus.if.org Git - strace/blobdiff - net.c
Fix "format not a string literal" warning caused by tprintf(str)
[strace] / net.c
diff --git a/net.c b/net.c
index b5cf81c5392a39d9b1f94fbaec3fd8a39ee73668..51a599762b3a1ca43b95c812e84079f6691db7cc 100644 (file)
--- a/net.c
+++ b/net.c
@@ -49,6 +49,9 @@
 #ifdef HAVE_NETINET_UDP_H
 #include <netinet/udp.h>
 #endif
+#ifdef HAVE_NETINET_SCTP_H
+#include <netinet/sctp.h>
+#endif
 #include <arpa/inet.h>
 #include <net/if.h>
 #if defined(LINUX)
@@ -334,7 +337,7 @@ static const struct xlat socktypes[] = {
 #endif
        { 0,            NULL            },
 };
-const struct xlat sock_type_flags[] = {
+static const struct xlat sock_type_flags[] = {
 #ifdef SOCK_CLOEXEC
        { SOCK_CLOEXEC, "SOCK_CLOEXEC"  },
 #endif
@@ -365,15 +368,18 @@ static const struct xlat socketlayers[] = {
 #if defined(SOL_ICMPV6)
        { SOL_ICMPV6,   "SOL_ICMPV6"    },
 #endif
+#if defined(SOL_SCTP)
+       { SOL_SCTP,     "SOL_SCTP"      },
+#endif
+#if defined(SOL_UDPLITE)
+       { SOL_UDPLITE,  "SOL_UDPLITE"   },
+#endif
 #if defined(SOL_RAW)
        { SOL_RAW,      "SOL_RAW"       },
 #endif
 #if defined(SOL_IPX)
        { SOL_IPX,      "SOL_IPX"       },
 #endif
-#if defined(SOL_IPX)
-       { SOL_IPX,      "SOL_IPX"       },
-#endif
 #if defined(SOL_AX25)
        { SOL_AX25,     "SOL_AX25"      },
 #endif
@@ -403,8 +409,45 @@ static const struct xlat socketlayers[] = {
 #endif
 #if defined(SOL_IRDA)
        { SOL_IRDA,     "SOL_IRDA"      },
+#endif
+#if defined(SOL_NETBEUI)
+       { SOL_NETBEUI,  "SOL_NETBEUI"   },
+#endif
+#if defined(SOL_LLC)
+       { SOL_LLC,      "SOL_LLC"       },
+#endif
+#if defined(SOL_DCCP)
+       { SOL_DCCP,     "SOL_DCCP"      },
+#endif
+#if defined(SOL_NETLINK)
+       { SOL_NETLINK,  "SOL_NETLINK"   },
+#endif
+#if defined(SOL_TIPC)
+       { SOL_TIPC,     "SOL_TIPC"      },
+#endif
+#if defined(SOL_RXRPC)
+       { SOL_RXRPC,    "SOL_RXRPC"     },
+#endif
+#if defined(SOL_PPPOL2TP)
+       { SOL_PPPOL2TP, "SOL_PPPOL2TP"  },
+#endif
+#if defined(SOL_BLUETOOTH)
+       { SOL_BLUETOOTH,"SOL_BLUETOOTH" },
+#endif
+#if defined(SOL_PNPIPE)
+       { SOL_PNPIPE,   "SOL_PNPIPE"    },
+#endif
+#if defined(SOL_RDS)
+       { SOL_RDS,      "SOL_RDS"       },
+#endif
+#if defined(SOL_IUVC)
+       { SOL_IUCV,     "SOL_IUCV"      },
+#endif
+#if defined(SOL_CAIF)
+       { SOL_CAIF,     "SOL_CAIF"      },
 #endif
        { SOL_SOCKET,   "SOL_SOCKET"    },      /* Never used! */
+       /* The SOL_* array should remain not NULL-terminated. */
 };
 /*** WARNING: DANGER WILL ROBINSON: NOTE "socketlayers" array above
      falls into "protocols" array below!!!!   This is intended!!! ***/
@@ -413,9 +456,15 @@ static const struct xlat protocols[] = {
        { IPPROTO_ICMP, "IPPROTO_ICMP"  },
        { IPPROTO_TCP,  "IPPROTO_TCP"   },
        { IPPROTO_UDP,  "IPPROTO_UDP"   },
+#ifdef IPPROTO_IGMP
+       { IPPROTO_IGMP, "IPPROTO_IGMP"  },
+#endif
 #ifdef IPPROTO_GGP
        { IPPROTO_GGP,  "IPPROTO_GGP"   },
 #endif
+#ifdef IPPROTO_IPIP
+       { IPPROTO_IPIP, "IPPROTO_IPIP"  },
+#endif
 #ifdef IPPROTO_EGP
        { IPPROTO_EGP,  "IPPROTO_EGP"   },
 #endif
@@ -425,29 +474,71 @@ static const struct xlat protocols[] = {
 #ifdef IPPROTO_IDP
        { IPPROTO_IDP,  "IPPROTO_IDP"   },
 #endif
+#ifdef IPPROTO_TP
+       { IPPROTO_TP,   "IPPROTO_TP"    },
+#endif
+#ifdef IPPROTO_DCCP
+       { IPPROTO_DCCP, "IPPROTO_DCCP"  },
+#endif
 #ifdef IPPROTO_IPV6
        { IPPROTO_IPV6, "IPPROTO_IPV6"  },
 #endif
+#ifdef IPPROTO_ROUTING
+       { IPPROTO_ROUTING, "IPPROTO_ROUTING" },
+#endif
+#ifdef IPPROTO_FRAGMENT
+       { IPPROTO_FRAGMENT, "IPPROTO_FRAGMENT" },
+#endif
+#ifdef IPPROTO_RSVP
+       { IPPROTO_RSVP, "IPPROTO_RSVP"  },
+#endif
+#ifdef IPPROTO_GRE
+       { IPPROTO_GRE,  "IPPROTO_GRE"   },
+#endif
+#ifdef IPPROTO_ESP
+       { IPPROTO_ESP,  "IPPROTO_ESP"   },
+#endif
+#ifdef IPPROTO_AH
+       { IPPROTO_AH,   "IPPROTO_AH"    },
+#endif
 #ifdef IPPROTO_ICMPV6
-       { IPPROTO_ICMPV6,"IPPROTO_ICMPV6"},
+       { IPPROTO_ICMPV6, "IPPROTO_ICMPV6" },
 #endif
-#ifdef IPPROTO_IGMP
-       { IPPROTO_IGMP, "IPPROTO_IGMP"  },
+#ifdef IPPROTO_NONE
+       { IPPROTO_NONE, "IPPROTO_NONE"  },
+#endif
+#ifdef IPPROTO_DSTOPTS
+       { IPPROTO_DSTOPTS, "IPPROTO_DSTOPTS" },
 #endif
 #ifdef IPPROTO_HELLO
-       { IPPROTO_HELLO,"IPPROTO_HELLO" },
+       { IPPROTO_HELLO, "IPPROTO_HELLO" },
 #endif
 #ifdef IPPROTO_ND
        { IPPROTO_ND,   "IPPROTO_ND"    },
 #endif
+#ifdef IPPROTO_MTP
+       { IPPROTO_MTP,  "IPPROTO_MTP"   },
+#endif
+#ifdef IPPROTO_ENCAP
+       { IPPROTO_ENCAP, "IPPROTO_ENCAP" },
+#endif
+#ifdef IPPROTO_PIM
+       { IPPROTO_PIM,  "IPPROTO_PIM"   },
+#endif
+#ifdef IPPROTO_COMP
+       { IPPROTO_COMP, "IPPROTO_COMP"  },
+#endif
+#ifdef IPPROTO_SCTP
+       { IPPROTO_SCTP, "IPPROTO_SCTP"  },
+#endif
+#ifdef IPPROTO_UDPLITE
+       { IPPROTO_UDPLITE, "IPPROTO_UDPLITE" },
+#endif
 #ifdef IPPROTO_RAW
        { IPPROTO_RAW,  "IPPROTO_RAW"   },
 #endif
 #ifdef IPPROTO_MAX
        { IPPROTO_MAX,  "IPPROTO_MAX"   },
-#endif
-#ifdef IPPROTO_IPIP
-       { IPPROTO_IPIP, "IPPROTO_IPIP"  },
 #endif
        { 0,            NULL            },
 };
@@ -802,8 +893,8 @@ static const struct xlat sockipv6options[] = {
 
 #ifdef SOL_IPX
 static const struct xlat sockipxoptions[] = {
-       { IPX_TYPE,     "IPX_TYPE"      },
-       { 0,            NULL            },
+       { IPX_TYPE,     "IPX_TYPE"      },
+       { 0,            NULL            },
 };
 #endif /* SOL_IPX */
 
@@ -832,11 +923,161 @@ static const struct xlat sockpacketoptions[] = {
 #endif
 #if defined(PACKET_STATISTICS)
        { PACKET_STATISTICS,            "PACKET_STATISTICS"     },
+#endif
+#if defined(PACKET_COPY_THRESH)
+       { PACKET_COPY_THRESH,           "PACKET_COPY_THRESH"    },
+#endif
+#if defined(PACKET_AUXDATA)
+       { PACKET_AUXDATA,               "PACKET_AUXDATA"        },
+#endif
+#if defined(PACKET_ORIGDEV)
+       { PACKET_ORIGDEV,               "PACKET_ORIGDEV"        },
+#endif
+#if defined(PACKET_VERSION)
+       { PACKET_VERSION,               "PACKET_VERSION"        },
+#endif
+#if defined(PACKET_HDRLEN)
+       { PACKET_HDRLEN,                "PACKET_HDRLEN" },
+#endif
+#if defined(PACKET_RESERVE)
+       { PACKET_RESERVE,               "PACKET_RESERVE"        },
+#endif
+#if defined(PACKET_TX_RING)
+       { PACKET_TX_RING,               "PACKET_TX_RING"        },
+#endif
+#if defined(PACKET_LOSS)
+       { PACKET_LOSS,                  "PACKET_LOSS"   },
 #endif
        { 0,                            NULL                    },
 };
 #endif /* SOL_PACKET */
 
+#ifdef SOL_SCTP
+static const struct xlat socksctpoptions[] = {
+#if defined(SCTP_RTOINFO)
+       { SCTP_RTOINFO,                 "SCTP_RTOINFO"  },
+#endif
+#if defined(SCTP_ASSOCINFO)
+       { SCTP_ASSOCINFO,               "SCTP_ASSOCINFO"},
+#endif
+#if defined(SCTP_INITMSG)
+       { SCTP_INITMSG,                 "SCTP_INITMSG"  },
+#endif
+#if defined(SCTP_NODELAY)
+       { SCTP_NODELAY,                 "SCTP_NODELAY"  },
+#endif
+#if defined(SCTP_AUTOCLOSE)
+       { SCTP_AUTOCLOSE,               "SCTP_AUTOCLOSE"},
+#endif
+#if defined(SCTP_SET_PEER_PRIMARY_ADDR)
+       { SCTP_SET_PEER_PRIMARY_ADDR,   "SCTP_SET_PEER_PRIMARY_ADDR"},
+#endif
+#if defined(SCTP_PRIMARY_ADDR)
+       { SCTP_PRIMARY_ADDR,            "SCTP_PRIMARY_ADDR"     },
+#endif
+#if defined(SCTP_ADAPTATION_LAYER)
+       { SCTP_ADAPTATION_LAYER,        "SCTP_ADAPTATION_LAYER" },
+#endif
+#if defined(SCTP_DISABLE_FRAGMENTS)
+       { SCTP_DISABLE_FRAGMENTS,       "SCTP_DISABLE_FRAGMENTS"},
+#endif
+#if defined(SCTP_PEER_ADDR_PARAMS)
+       { SCTP_PEER_ADDR_PARAMS,        "SCTP_PEER_ADDR_PARAMS" },
+#endif
+#if defined(SCTP_DEFAULT_SEND_PARAM)
+       { SCTP_DEFAULT_SEND_PARAM,      "SCTP_DEFAULT_SEND_PARAM"},
+#endif
+#if defined(SCTP_EVENTS)
+       { SCTP_EVENTS,                  "SCTP_EVENTS"           },
+#endif
+#if defined(SCTP_I_WANT_MAPPED_V4_ADDR)
+       { SCTP_I_WANT_MAPPED_V4_ADDR,   "SCTP_I_WANT_MAPPED_V4_ADDR"},
+#endif
+#if defined(SCTP_MAXSEG)
+       { SCTP_MAXSEG,                  "SCTP_MAXSEG"           },
+#endif
+#if defined(SCTP_STATUS)
+       { SCTP_STATUS,                  "SCTP_STATUS"           },
+#endif
+#if defined(SCTP_GET_PEER_ADDR_INFO)
+       { SCTP_GET_PEER_ADDR_INFO,      "SCTP_GET_PEER_ADDR_INFO"},
+#endif
+#if defined(SCTP_DELAYED_ACK)
+       { SCTP_DELAYED_ACK,             "SCTP_DELAYED_ACK"      },
+#endif
+#if defined(SCTP_CONTEXT)
+       { SCTP_CONTEXT,                 "SCTP_CONTEXT"          },
+#endif
+#if defined(SCTP_FRAGMENT_INTERLEAVE)
+       { SCTP_FRAGMENT_INTERLEAVE,     "SCTP_FRAGMENT_INTERLEAVE"},
+#endif
+#if defined(SCTP_PARTIAL_DELIVERY_POINT)
+       { SCTP_PARTIAL_DELIVERY_POINT,  "SCTP_PARTIAL_DELIVERY_POINT"},
+#endif
+#if defined(SCTP_MAX_BURST)
+       { SCTP_MAX_BURST,               "SCTP_MAX_BURST"        },
+#endif
+#if defined(SCTP_AUTH_CHUNK)
+       { SCTP_AUTH_CHUNK,              "SCTP_AUTH_CHUNK"       },
+#endif
+#if defined(SCTP_HMAC_IDENT)
+       { SCTP_HMAC_IDENT,              "SCTP_HMAC_IDENT"       },
+#endif
+#if defined(SCTP_AUTH_KEY)
+       { SCTP_AUTH_KEY,                "SCTP_AUTH_KEY"         },
+#endif
+#if defined(SCTP_AUTH_ACTIVE_KEY)
+       { SCTP_AUTH_ACTIVE_KEY,         "SCTP_AUTH_ACTIVE_KEY"  },
+#endif
+#if defined(SCTP_AUTH_DELETE_KEY)
+       { SCTP_AUTH_DELETE_KEY,         "SCTP_AUTH_DELETE_KEY"  },
+#endif
+#if defined(SCTP_PEER_AUTH_CHUNKS)
+       { SCTP_PEER_AUTH_CHUNKS,        "SCTP_PEER_AUTH_CHUNKS" },
+#endif
+#if defined(SCTP_LOCAL_AUTH_CHUNKS)
+       { SCTP_LOCAL_AUTH_CHUNKS,       "SCTP_LOCAL_AUTH_CHUNKS"},
+#endif
+#if defined(SCTP_GET_ASSOC_NUMBER)
+       { SCTP_GET_ASSOC_NUMBER,        "SCTP_GET_ASSOC_NUMBER" },
+#endif
+
+       /* linux specific things */
+#if defined(SCTP_SOCKOPT_BINDX_ADD)
+       { SCTP_SOCKOPT_BINDX_ADD,       "SCTP_SOCKOPT_BINDX_ADD"        },
+#endif
+#if defined(SCTP_SOCKOPT_BINDX_REM)
+       { SCTP_SOCKOPT_BINDX_REM,       "SCTP_SOCKOPT_BINDX_REM"        },
+#endif
+#if defined(SCTP_SOCKOPT_PEELOFF)
+       { SCTP_SOCKOPT_PEELOFF,         "SCTP_SOCKOPT_PEELOFF"          },
+#endif
+#if defined(SCTP_GET_PEER_ADDRS_NUM_OLD)
+       { SCTP_GET_PEER_ADDRS_NUM_OLD,  "SCTP_GET_PEER_ADDRS_NUM_OLD"   },
+#endif
+#if defined(SCTP_GET_PEER_ADDRS_OLD)
+       { SCTP_GET_PEER_ADDRS_OLD,      "SCTP_GET_PEER_ADDRS_OLD"       },
+#endif
+#if defined(SCTP_GET_LOCAL_ADDRS_NUM_OLD)
+       { SCTP_GET_LOCAL_ADDRS_NUM_OLD, "SCTP_GET_LOCAL_ADDRS_NUM_OLD"  },
+#endif
+#if defined(SCTP_GET_LOCAL_ADDRS_OLD)
+       { SCTP_GET_LOCAL_ADDRS_OLD,     "SCTP_GET_LOCAL_ADDRS_OLD"      },
+#endif
+#if defined(SCTP_SOCKOPT_CONNECTX_OLD)
+       { SCTP_SOCKOPT_CONNECTX_OLD,    "SCTP_SOCKOPT_CONNECTX_OLD"     },
+#endif
+#if defined(SCTP_GET_PEER_ADDRS)
+       { SCTP_GET_PEER_ADDRS,          "SCTP_GET_PEER_ADDRS"           },
+#endif
+#if defined(SCTP_GET_LOCAL_ADDRS)
+       { SCTP_GET_LOCAL_ADDRS,         "SCTP_GET_LOCAL_ADDRS"          },
+#endif
+
+       { 0,    NULL    },
+};
+#endif
+
 #if  !defined (SOL_TCP) && defined (IPPROTO_TCP)
 #define SOL_TCP IPPROTO_TCP
 #endif
@@ -1026,24 +1267,24 @@ printsock(struct tcb *tcp, long addr, int addrlen)
 #ifdef HAVE_STRUCT_SOCKADDR_IN6_SIN6_SCOPE_ID
                {
 #if defined(HAVE_IF_INDEXTONAME) && defined(IN6_IS_ADDR_LINKLOCAL) && defined(IN6_IS_ADDR_MC_LINKLOCAL)
-                   int numericscope = 0;
-                   if (IN6_IS_ADDR_LINKLOCAL (&addrbuf.sa6.sin6_addr)
-                           || IN6_IS_ADDR_MC_LINKLOCAL (&addrbuf.sa6.sin6_addr)) {
-                       char scopebuf[IFNAMSIZ + 1];
+                       int numericscope = 0;
+                       if (IN6_IS_ADDR_LINKLOCAL(&addrbuf.sa6.sin6_addr)
+                           || IN6_IS_ADDR_MC_LINKLOCAL(&addrbuf.sa6.sin6_addr)) {
+                               char scopebuf[IFNAMSIZ + 1];
 
-                       if (if_indextoname (addrbuf.sa6.sin6_scope_id, scopebuf) == NULL)
-                           numericscope++;
-                       else
-                           tprintf(", sin6_scope_id=if_nametoindex(\"%s\")", scopebuf);
-                   } else
-                       numericscope++;
+                               if (if_indextoname(addrbuf.sa6.sin6_scope_id, scopebuf) == NULL)
+                                       numericscope++;
+                               else
+                                       tprintf(", sin6_scope_id=if_nametoindex(\"%s\")", scopebuf);
+                       } else
+                               numericscope++;
 
-                   if (numericscope)
+                       if (numericscope)
 #endif
-                       tprintf(", sin6_scope_id=%u", addrbuf.sa6.sin6_scope_id);
+                               tprintf(", sin6_scope_id=%u", addrbuf.sa6.sin6_scope_id);
                }
 #endif
-                   break;
+               break;
 #endif
 #if defined(AF_IPX) && defined(linux)
        case AF_IPX:
@@ -1058,7 +1299,7 @@ printsock(struct tcb *tcp, long addr, int addrlen)
                         * this way.. :)
                         */
                        tprintf("%08lx:", (unsigned long)ntohl(addrbuf.sipx.sipx_network));
-                       for (i = 0; i<IPX_NODE_LEN; i++)
+                       for (i = 0; i < IPX_NODE_LEN; i++)
                                tprintf("%02x", addrbuf.sipx.sipx_node[i]);
                        tprintf("/[%02x]", addrbuf.sipx.sipx_type);
                }
@@ -1075,7 +1316,7 @@ printsock(struct tcb *tcp, long addr, int addrlen)
                        tprintf(", addr(%d)={%d, ",
                                        addrbuf.ll.sll_halen,
                                        addrbuf.ll.sll_hatype);
-                       for (i=0; i<addrbuf.ll.sll_halen; i++)
+                       for (i = 0; i < addrbuf.ll.sll_halen; i++)
                                tprintf("%02x", addrbuf.ll.sll_addr[i]);
                }
                break;
@@ -1110,10 +1351,7 @@ static const struct xlat scmvals[] = {
 };
 
 static void
-printcmsghdr(tcp, addr, len)
-struct tcb *tcp;
-unsigned long addr;
-unsigned long len;
+printcmsghdr(struct tcb *tcp, unsigned long addr, unsigned long len)
 {
        struct cmsghdr *cmsg = len < sizeof(struct cmsghdr) ?
                               NULL : malloc(len);
@@ -1123,7 +1361,7 @@ unsigned long len;
                return;
        }
 
-       tprintf(", {cmsg_len=%zu, cmsg_level=", cmsg->cmsg_len);
+       tprintf(", {cmsg_len=%u, cmsg_level=", (unsigned) cmsg->cmsg_len);
        printxval(socketlayers, cmsg->cmsg_level, "SOL_???");
        tprintf(", cmsg_type=");
 
@@ -1135,7 +1373,7 @@ unsigned long len;
 
                if (cmsg->cmsg_type == SCM_RIGHTS
                    && CMSG_LEN(sizeof(int)) <= cmsg_len) {
-                       int *fds = (int *) CMSG_DATA (cmsg);
+                       int *fds = (int *) CMSG_DATA(cmsg);
                        int first = 1;
 
                        tprintf(", {");
@@ -1151,7 +1389,7 @@ unsigned long len;
                }
                if (cmsg->cmsg_type == SCM_CREDENTIALS
                    && CMSG_LEN(sizeof(struct ucred)) <= cmsg_len) {
-                       struct ucred *uc = (struct ucred *) CMSG_DATA (cmsg);
+                       struct ucred *uc = (struct ucred *) CMSG_DATA(cmsg);
 
                        tprintf("{pid=%ld, uid=%ld, gid=%ld}}",
                                (long)uc->pid, (long)uc->uid, (long)uc->gid);
@@ -1164,37 +1402,60 @@ unsigned long len;
 }
 
 static void
-printmsghdr(tcp, addr)
-struct tcb *tcp;
-long addr;
+do_msghdr(struct tcb *tcp, struct msghdr *msg)
 {
-       struct msghdr msg;
+       tprintf("{msg_name(%d)=", msg->msg_namelen);
+       printsock(tcp, (long)msg->msg_name, msg->msg_namelen);
 
-       if (umove(tcp, addr, &msg) < 0) {
-               tprintf("%#lx", addr);
-               return;
-       }
-       tprintf("{msg_name(%d)=", msg.msg_namelen);
-       printsock(tcp, (long)msg.msg_name, msg.msg_namelen);
-
-       tprintf(", msg_iov(%lu)=", (unsigned long)msg.msg_iovlen);
-       tprint_iov(tcp, (unsigned long)msg.msg_iovlen,
-                  (unsigned long)msg.msg_iov);
+       tprintf(", msg_iov(%lu)=", (unsigned long)msg->msg_iovlen);
+       tprint_iov(tcp, (unsigned long)msg->msg_iovlen,
+                  (unsigned long)msg->msg_iov, 1);
 
 #ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL
-       tprintf(", msg_controllen=%lu", (unsigned long)msg.msg_controllen);
-       if (msg.msg_controllen)
-               printcmsghdr(tcp, (unsigned long) msg.msg_control,
-                            msg.msg_controllen);
+       tprintf(", msg_controllen=%lu", (unsigned long)msg->msg_controllen);
+       if (msg->msg_controllen)
+               printcmsghdr(tcp, (unsigned long) msg->msg_control,
+                            msg->msg_controllen);
        tprintf(", msg_flags=");
-       printflags(msg_flags, msg.msg_flags, "MSG_???");
+       printflags(msg_flags, msg->msg_flags, "MSG_???");
 #else /* !HAVE_STRUCT_MSGHDR_MSG_CONTROL */
        tprintf("msg_accrights=%#lx, msg_accrightslen=%u",
-               (unsigned long) msg.msg_accrights, msg.msg_accrightslen);
+               (unsigned long) msg->msg_accrights, msg->msg_accrightslen);
 #endif /* !HAVE_STRUCT_MSGHDR_MSG_CONTROL */
        tprintf("}");
 }
 
+static void
+printmsghdr(struct tcb *tcp, long addr)
+{
+       struct msghdr msg;
+
+       if (umove(tcp, addr, &msg) < 0) {
+               tprintf("%#lx", addr);
+               return;
+       }
+       do_msghdr(tcp, &msg);
+}
+
+#ifdef LINUX
+static void
+printmmsghdr(struct tcb *tcp, long addr)
+{
+       struct mmsghdr {
+               struct msghdr msg_hdr;
+               unsigned msg_len;
+       } mmsg;
+
+       if (umove(tcp, addr, &mmsg) < 0) {
+               tprintf("%#lx", addr);
+               return;
+       }
+       tprintf("{");
+       do_msghdr(tcp, &mmsg.msg_hdr);
+       tprintf(", %u}", mmsg.msg_len);
+}
+#endif
+
 #endif /* HAVE_SENDMSG */
 
 /*
@@ -1206,9 +1467,8 @@ tprint_sock_type(struct tcb *tcp, int flags)
 {
        const char *str = xlookup(socktypes, flags & SOCK_TYPE_MASK);
 
-       if (str)
-       {
-               tprintf("%s", str);
+       if (str) {
+               tprints(str);
                flags &= ~SOCK_TYPE_MASK;
                if (!flags)
                        return;
@@ -1250,8 +1510,7 @@ sys_socket(struct tcb *tcp)
 
 #ifdef SVR4
 int
-sys_so_socket(tcp)
-struct tcb *tcp;
+sys_so_socket(struct tcb *tcp)
 {
        if (entering(tcp)) {
                /* not sure really what these args are... but this
@@ -1266,11 +1525,10 @@ struct tcb *tcp;
 }
 
 int
-sys_so_socketpair(tcp)
-struct tcb *tcp;
+sys_so_socketpair(struct tcb *tcp)
 {
        if (entering(tcp)) {
-               /* not sure what this arg is */
+               /* not sure what this arg is */
                tprintf("0x%lx", tcp->u_arg[0]);
        }
        return 0;
@@ -1278,8 +1536,7 @@ struct tcb *tcp;
 #endif /* SVR4 */
 
 int
-sys_bind(tcp)
-struct tcb *tcp;
+sys_bind(struct tcb *tcp)
 {
        if (entering(tcp)) {
                tprintf("%ld, ", tcp->u_arg[0]);
@@ -1290,15 +1547,13 @@ struct tcb *tcp;
 }
 
 int
-sys_connect(tcp)
-struct tcb *tcp;
+sys_connect(struct tcb *tcp)
 {
        return sys_bind(tcp);
 }
 
 int
-sys_listen(tcp)
-struct tcb *tcp;
+sys_listen(struct tcb *tcp)
 {
        if (entering(tcp)) {
                tprintf("%ld, %lu", tcp->u_arg[0], tcp->u_arg[1]);
@@ -1306,18 +1561,19 @@ struct tcb *tcp;
        return 0;
 }
 
-int
-sys_accept(tcp)
-struct tcb *tcp;
+static int
+do_accept(struct tcb *tcp, int flags_arg)
 {
        if (entering(tcp)) {
                tprintf("%ld, ", tcp->u_arg[0]);
-       } else if (!tcp->u_arg[2])
+               return 0;
+       }
+       if (!tcp->u_arg[2])
                tprintf("%#lx, NULL", tcp->u_arg[1]);
        else {
                int len;
                if (tcp->u_arg[1] == 0 || syserror(tcp)
-                   || umove (tcp, tcp->u_arg[2], &len) < 0) {
+                   || umove(tcp, tcp->u_arg[2], &len) < 0) {
                        tprintf("%#lx", tcp->u_arg[1]);
                } else {
                        printsock(tcp, tcp->u_arg[1], len);
@@ -1325,12 +1581,30 @@ struct tcb *tcp;
                tprintf(", ");
                printnum_int(tcp, tcp->u_arg[2], "%u");
        }
+       if (flags_arg >= 0) {
+               tprintf(", ");
+               printflags(sock_type_flags, tcp->u_arg[flags_arg],
+                          "SOCK_???");
+       }
        return 0;
 }
 
 int
-sys_send(tcp)
-struct tcb *tcp;
+sys_accept(struct tcb *tcp)
+{
+       return do_accept(tcp, -1);
+}
+
+#ifdef LINUX
+int
+sys_accept4(struct tcb *tcp)
+{
+       return do_accept(tcp, 3);
+}
+#endif
+
+int
+sys_send(struct tcb *tcp)
 {
        if (entering(tcp)) {
                tprintf("%ld, ", tcp->u_arg[0]);
@@ -1343,8 +1617,7 @@ struct tcb *tcp;
 }
 
 int
-sys_sendto(tcp)
-struct tcb *tcp;
+sys_sendto(struct tcb *tcp)
 {
        if (entering(tcp)) {
                tprintf("%ld, ", tcp->u_arg[0]);
@@ -1364,8 +1637,7 @@ struct tcb *tcp;
 #ifdef HAVE_SENDMSG
 
 int
-sys_sendmsg(tcp)
-struct tcb *tcp;
+sys_sendmsg(struct tcb *tcp)
 {
        if (entering(tcp)) {
                tprintf("%ld, ", tcp->u_arg[0]);
@@ -1380,8 +1652,7 @@ struct tcb *tcp;
 #endif /* HAVE_SENDMSG */
 
 int
-sys_recv(tcp)
-struct tcb *tcp;
+sys_recv(struct tcb *tcp)
 {
        if (entering(tcp)) {
                tprintf("%ld, ", tcp->u_arg[0]);
@@ -1398,8 +1669,7 @@ struct tcb *tcp;
 }
 
 int
-sys_recvfrom(tcp)
-struct tcb *tcp;
+sys_recvfrom(struct tcb *tcp)
 {
        int fromlen;
 
@@ -1445,8 +1715,7 @@ struct tcb *tcp;
 #ifdef HAVE_SENDMSG
 
 int
-sys_recvmsg(tcp)
-struct tcb *tcp;
+sys_recvmsg(struct tcb *tcp)
 {
        if (entering(tcp)) {
                tprintf("%ld, ", tcp->u_arg[0]);
@@ -1462,39 +1731,82 @@ struct tcb *tcp;
        return 0;
 }
 
+#ifdef LINUX
+int
+sys_recvmmsg(struct tcb *tcp)
+{
+       static char str[128];
+       if (entering(tcp)) {
+
+               tprintf("%ld, ", tcp->u_arg[0]);
+               if (verbose(tcp)) {
+                       sprint_timespec(str, tcp, tcp->u_arg[4]);
+                       tcp->auxstr = strdup(str);
+               } else {
+                       tprintf("%#lx, %ld, ", tcp->u_arg[1], tcp->u_arg[2]);
+                       printflags(msg_flags, tcp->u_arg[3], "MSG_???");
+                       tprintf(", ");
+                       print_timespec(tcp, tcp->u_arg[4]);
+               }
+               return 0;
+       } else {
+               if (verbose(tcp)) {
+                       if (syserror(tcp))
+                               tprintf("%#lx", tcp->u_arg[1]);
+                       else
+                               printmmsghdr(tcp, tcp->u_arg[1]);
+                       tprintf(", %ld, ", tcp->u_arg[2]);
+                       /* flags */
+                       printflags(msg_flags, tcp->u_arg[3], "MSG_???");
+                       /* timeout on entrance */
+                       tprintf(", %s", tcp->auxstr ? tcp->auxstr : "{...}");
+                       free((void *) tcp->auxstr);
+                       tcp->auxstr = NULL;
+               }
+               if (syserror(tcp))
+                       return 0;
+               if (tcp->u_rval == 0) {
+                       tcp->auxstr = "Timeout";
+                       return RVAL_STR;
+               }
+               if (!verbose(tcp))
+                       return 0;
+               /* timeout on exit */
+               strcpy(str, "left ");
+               sprint_timespec(str + strlen(str), tcp, tcp->u_arg[4]);
+               tcp->auxstr = str;
+               return RVAL_STR;
+       }
+}
+#endif
+
 #endif /* HAVE_SENDMSG */
 
+static const struct xlat shutdown_modes[] = {
+       { 0,    "SHUT_RD"       },
+       { 1,    "SHUT_WR"       },
+       { 2,    "SHUT_RDWR"     },
+       { 0,    NULL            }
+};
+
 int
-sys_shutdown(tcp)
-struct tcb *tcp;
+sys_shutdown(struct tcb *tcp)
 {
        if (entering(tcp)) {
-               tprintf("%ld, %ld", tcp->u_arg[0], tcp->u_arg[1]);
-               switch (tcp->u_arg[1]) {
-               case 0:
-                       tprintf("%s", " /* receive */");
-                       break;
-               case 1:
-                       tprintf("%s", " /* send */");
-                       break;
-               case 2:
-                       tprintf("%s", " /* send and receive */");
-                       break;
-               }
+               tprintf("%ld, ", tcp->u_arg[0]);
+               printxval(shutdown_modes, tcp->u_arg[1], "SHUT_???");
        }
        return 0;
 }
 
 int
-sys_getsockname(tcp)
-struct tcb *tcp;
+sys_getsockname(struct tcb *tcp)
 {
        return sys_accept(tcp);
 }
 
 int
-sys_getpeername(tcp)
-struct tcb *tcp;
+sys_getpeername(struct tcb *tcp)
 {
        return sys_accept(tcp);
 }
@@ -1588,13 +1900,12 @@ sys_socketpair(struct tcb *tcp)
 }
 
 int
-sys_getsockopt(tcp)
-struct tcb *tcp;
+sys_getsockopt(struct tcb *tcp)
 {
        if (entering(tcp)) {
                tprintf("%ld, ", tcp->u_arg[0]);
                printxval(socketlayers, tcp->u_arg[1], "SOL_???");
-               tprintf (", ");
+               tprintf(", ");
                switch (tcp->u_arg[1]) {
                case SOL_SOCKET:
                        printxval(sockoptions, tcp->u_arg[2], "SO_???");
@@ -1624,6 +1935,11 @@ struct tcb *tcp;
                        printxval(socktcpoptions, tcp->u_arg[2], "TCP_???");
                        break;
 #endif
+#ifdef SOL_SCTP
+               case SOL_SCTP:
+                       printxval(socksctpoptions, tcp->u_arg[2], "SCTP_???");
+                       break;
+#endif
 
                /* SOL_AX25 SOL_ROSE SOL_ATALK SOL_NETROM SOL_UDP SOL_DECNET SOL_X25
                 * etc. still need work */
@@ -1631,10 +1947,11 @@ struct tcb *tcp;
                        tprintf("%lu", tcp->u_arg[2]);
                        break;
                }
+               tprintf(", ");
        } else {
                int len;
-               if (syserror(tcp) || umove (tcp, tcp->u_arg[4], &len) < 0) {
-                       tprintf("%#lx, %#lx",
+               if (syserror(tcp) || umove(tcp, tcp->u_arg[4], &len) < 0) {
+                       tprintf("%#lx, %#lx",
                                tcp->u_arg[3], tcp->u_arg[4]);
                        return 0;
                }
@@ -1644,13 +1961,13 @@ struct tcb *tcp;
                        switch (tcp->u_arg[2]) {
 #ifdef SO_LINGER
                        case SO_LINGER:
-                               if (len == sizeof (struct linger)) {
+                               if (len == sizeof(struct linger)) {
                                        struct linger linger;
-                                       if (umove (tcp,
+                                       if (umove(tcp,
                                                   tcp->u_arg[3],
                                                   &linger) < 0)
                                                break;
-                                       tprintf("{onoff=%d, linger=%d}, "
+                                       tprintf("{onoff=%d, linger=%d}, "
                                                "[%d]",
                                                linger.l_onoff,
                                                linger.l_linger,
@@ -1658,17 +1975,55 @@ struct tcb *tcp;
                                        return 0;
                                }
                                break;
+#endif
+#ifdef SO_PEERCRED
+                       case SO_PEERCRED:
+                               if (len == sizeof(struct ucred)) {
+                                       struct ucred uc;
+                                       if (umove(tcp,
+                                                  tcp->u_arg[3],
+                                                  &uc) < 0)
+                                               break;
+                                       tprintf("{pid=%ld, uid=%ld, gid=%ld}, "
+                                               "[%d]",
+                                               (long)uc.pid,
+                                               (long)uc.uid,
+                                               (long)uc.gid,
+                                               len);
+                                       return 0;
+                               }
+                               break;
+#endif
+                       }
+                       break;
+               case SOL_PACKET:
+                       switch (tcp->u_arg[2]) {
+#ifdef PACKET_STATISTICS
+                       case PACKET_STATISTICS:
+                               if (len == sizeof(struct tpacket_stats)) {
+                                       struct tpacket_stats stats;
+                                       if (umove(tcp,
+                                                  tcp->u_arg[3],
+                                                  &stats) < 0)
+                                               break;
+                                       tprintf("{packets=%u, drops=%u}, "
+                                               "[%d]",
+                                               stats.tp_packets,
+                                               stats.tp_drops,
+                                               len);
+                                       return 0;
+                               }
+                               break;
 #endif
                        }
                        break;
                }
 
-               tprintf (", ");
-               if (len == sizeof (int)) {
-                       printnum(tcp, tcp->u_arg[3], "%ld");
+               if (len == sizeof(int)) {
+                       printnum_int(tcp, tcp->u_arg[3], "%d");
                }
                else {
-                       printstr (tcp, tcp->u_arg[3], len);
+                       printstr(tcp, tcp->u_arg[3], len);
                }
                tprintf(", [%d]", len);
        }
@@ -1676,9 +2031,7 @@ struct tcb *tcp;
 }
 
 #if defined(ICMP_FILTER)
-static void printicmpfilter(tcp, addr)
-struct tcb *tcp;
-long addr;
+static void printicmpfilter(struct tcb *tcp, long addr)
 {
        struct icmp_filter      filter;
 
@@ -1702,24 +2055,19 @@ long addr;
 #endif /* ICMP_FILTER */
 
 static int
-printsockopt (tcp, level, name, addr, len)
-struct tcb *tcp;
-int level;
-int name;
-long addr;
-int len;
+printsockopt(struct tcb *tcp, int level, int name, long addr, int len)
 {
        printxval(socketlayers, level, "SOL_??");
-       tprintf (", ");
+       tprintf(", ");
        switch (level) {
            case SOL_SOCKET:
                printxval(sockoptions, name, "SO_???");
                switch (name) {
 #if defined(SO_LINGER)
                    case SO_LINGER:
-                       if (len == sizeof (struct linger)) {
+                       if (len == sizeof(struct linger)) {
                                struct linger linger;
-                               if (umove (tcp, addr, &linger) < 0)
+                               if (umove(tcp, addr, &linger) < 0)
                                        break;
                                tprintf(", {onoff=%d, linger=%d}",
                                        linger.l_onoff,
@@ -1749,6 +2097,28 @@ int len;
            case SOL_PACKET:
                printxval(sockpacketoptions, name, "PACKET_???");
                /* TODO: decode packate_mreq for PACKET_*_MEMBERSHIP */
+               switch (name) {
+#ifdef PACKET_RX_RING
+                   case PACKET_RX_RING:
+#endif
+#ifdef PACKET_TX_RING
+                   case PACKET_TX_RING:
+#endif
+#if defined(PACKET_RX_RING) || defined(PACKET_TX_RING)
+                       if (len == sizeof(struct tpacket_req)) {
+                               struct tpacket_req req;
+                               if (umove(tcp, addr, &req) < 0)
+                                       break;
+                               tprintf(", {block_size=%u, block_nr=%u, frame_size=%u, frame_nr=%u}",
+                                       req.tp_block_size,
+                                       req.tp_block_nr,
+                                       req.tp_frame_size,
+                                       req.tp_frame_nr);
+                               return 0;
+                       }
+                       break;
+#endif /* PACKET_RX_RING || PACKET_TX_RING */
+               }
                break;
 #endif
 #ifdef SOL_TCP
@@ -1756,6 +2126,11 @@ int len;
                printxval(socktcpoptions, name, "TCP_???");
                break;
 #endif
+#ifdef SOL_SCTP
+          case SOL_SCTP:
+               printxval(socksctpoptions, name, "SCTP_???");
+               break;
+#endif
 #ifdef SOL_RAW
            case SOL_RAW:
                printxval(sockrawoptions, name, "RAW_???");
@@ -1779,13 +2154,13 @@ int len;
 
        /* default arg printing */
 
-       tprintf (", ");
+       tprintf(", ");
 
-       if (len == sizeof (int)) {
-               printnum_int (tcp, addr, "%d");
+       if (len == sizeof(int)) {
+               printnum_int(tcp, addr, "%d");
        }
        else {
-               printstr (tcp, addr, len);
+               printstr(tcp, addr, len);
        }
        return 0;
 }
@@ -1794,10 +2169,7 @@ int len;
 #ifdef HAVE_STRUCT_OPTHDR
 
 void
-print_sock_optmgmt (tcp, addr, len)
-struct tcb *tcp;
-long addr;
-int len;
+print_sock_optmgmt(struct tcb *tcp, long addr, int len)
 {
        int c = 0;
        struct opthdr hdr;
@@ -1805,37 +2177,36 @@ int len;
        while (len >= (int) sizeof hdr) {
                if (umove(tcp, addr, &hdr) < 0) break;
                if (c++) {
-                       tprintf (", ");
+                       tprintf(", ");
                }
                else if (len > hdr.len + sizeof hdr) {
-                       tprintf ("[");
+                       tprintf("[");
                }
-               tprintf ("{");
+               tprintf("{");
                addr += sizeof hdr;
                len -= sizeof hdr;
-               printsockopt (tcp, hdr.level, hdr.name, addr, hdr.len);
+               printsockopt(tcp, hdr.level, hdr.name, addr, hdr.len);
                if (hdr.len > 0) {
                        addr += hdr.len;
                        len -= hdr.len;
                }
-               tprintf ("}");
+               tprintf("}");
        }
        if (len > 0) {
-               if (c++) tprintf (", ");
-               printstr (tcp, addr, len);
+               if (c++) tprintf(", ");
+               printstr(tcp, addr, len);
        }
-       if (c > 1) tprintf ("]");
+       if (c > 1) tprintf("]");
 }
 
 #endif
 
 int
-sys_setsockopt(tcp)
-struct tcb *tcp;
+sys_setsockopt(struct tcb *tcp)
 {
        if (entering(tcp)) {
                tprintf("%ld, ", tcp->u_arg[0]);
-               printsockopt (tcp, tcp->u_arg[1], tcp->u_arg[2],
+               printsockopt(tcp, tcp->u_arg[1], tcp->u_arg[2],
                              tcp->u_arg[3], tcp->u_arg[4]);
                tprintf(", %lu", tcp->u_arg[4]);
        }
@@ -1851,102 +2222,90 @@ static const struct xlat sock_version[] = {
        { __NETLIB_GEMINI_XPG4, "GEMINI_XPG4" },
        { __NETLIB_FP1_SVR4,    "FP1_SVR4" },
        { __NETLIB_FP1_XPG4,    "FP1_XPG4" },
-       { 0,            NULL            },
+       { 0,                    NULL },
 };
 
 
 int
-netlib_call(tcp, func)
-struct tcb *tcp;
-int (*func) ();
+netlib_call(struct tcb *tcp, int (*func)())
 {
        if (entering(tcp)) {
                int i;
-               printxval (sock_version, tcp->u_arg[0], "__NETLIB_???");
+               printxval(sock_version, tcp->u_arg[0], "__NETLIB_???");
                tprintf(", ");
                --tcp->u_nargs;
                for (i = 0; i < tcp->u_nargs; i++)
                        tcp->u_arg[i] = tcp->u_arg[i + 1];
-               return func (tcp);
-
+               return func(tcp);
        }
 
-       return func (tcp);
+       return func(tcp);
 }
 
 int
-sys_xsocket(tcp)
-struct tcb *tcp;
+sys_xsocket(struct tcb *tcp)
 {
-       return netlib_call (tcp, sys_socket);
+       return netlib_call(tcp, sys_socket);
 }
 
 int
-sys_xsocketpair(tcp)
-struct tcb *tcp;
+sys_xsocketpair(struct tcb *tcp)
 {
-       return netlib_call (tcp, sys_socketpair);
+       return netlib_call(tcp, sys_socketpair);
 }
 
 int
-sys_xbind(tcp)
-struct tcb *tcp;
+sys_xbind(struct tcb *tcp)
 {
-       return netlib_call (tcp, sys_bind);
+       return netlib_call(tcp, sys_bind);
 }
 
 int
-sys_xconnect(tcp)
-struct tcb *tcp;
+sys_xconnect(struct tcb *tcp)
 {
-       return netlib_call (tcp, sys_connect);
+       return netlib_call(tcp, sys_connect);
 }
 
 int
-sys_xlisten(tcp)
-struct tcb *tcp;
+sys_xlisten(struct tcb *tcp)
 {
-       return netlib_call (tcp, sys_listen);
+       return netlib_call(tcp, sys_listen);
 }
 
 int
-sys_xaccept(tcp)
-struct tcb *tcp;
+sys_xaccept(struct tcb *tcp)
 {
-       return netlib_call (tcp, sys_accept);
+       return netlib_call(tcp, sys_accept);
 }
 
 int
-sys_xsendmsg(tcp)
-struct tcb *tcp;
+sys_xsendmsg(struct tcb *tcp)
 {
-       return netlib_call (tcp, sys_sendmsg);
+       return netlib_call(tcp, sys_sendmsg);
 }
 
 int
-sys_xrecvmsg(tcp)
-struct tcb *tcp;
+sys_xrecvmsg(struct tcb *tcp)
 {
-       return netlib_call (tcp, sys_recvmsg);
+       return netlib_call(tcp, sys_recvmsg);
 }
 
 int
-sys_xgetsockaddr(tcp)
-struct tcb *tcp;
+sys_xgetsockaddr(struct tcb *tcp)
 {
        if (entering(tcp)) {
-               printxval (sock_version, tcp->u_arg[0], "__NETLIB_???");
+               printxval(sock_version, tcp->u_arg[0], "__NETLIB_???");
                tprintf(", ");
                if (tcp->u_arg[1] == 0) {
-                       tprintf ("LOCALNAME, ");
+                       tprintf("LOCALNAME, ");
                }
                else if (tcp->u_arg[1] == 1) {
-                       tprintf ("REMOTENAME, ");
+                       tprintf("REMOTENAME, ");
                }
                else {
-                       tprintf ("%ld, ", tcp->u_arg [1]);
+                       tprintf("%ld, ", tcp->u_arg[1]);
                }
-               tprintf ("%ld, ", tcp->u_arg [2]);
+               tprintf("%ld, ", tcp->u_arg[2]);
        }
        else {
                if (tcp->u_arg[3] == 0 || syserror(tcp)) {
@@ -1962,36 +2321,22 @@ struct tcb *tcp;
 
 }
 
-#if 0
-
 int
-sys_xsetsockaddr(tcp)
-struct tcb *tcp;
+sys_xgetsockopt(struct tcb *tcp)
 {
-       return netlib_call (tcp, sys_setsockaddr);
-}
-
-#endif
-
-int
-sys_xgetsockopt(tcp)
-struct tcb *tcp;
-{
-       return netlib_call (tcp, sys_getsockopt);
+       return netlib_call(tcp, sys_getsockopt);
 }
 
 int
-sys_xsetsockopt(tcp)
-struct tcb *tcp;
+sys_xsetsockopt(struct tcb *tcp)
 {
-       return netlib_call (tcp, sys_setsockopt);
+       return netlib_call(tcp, sys_setsockopt);
 }
 
 int
-sys_xshutdown(tcp)
-struct tcb *tcp;
+sys_xshutdown(struct tcb *tcp)
 {
-       return netlib_call (tcp, sys_shutdown);
+       return netlib_call(tcp, sys_shutdown);
 }
 
-#endif
+#endif /* UNIXWARE */