]> granicus.if.org Git - strace/blobdiff - net.c
mips n32: fix preadv/pwritev offset decoding
[strace] / net.c
diff --git a/net.c b/net.c
index 51a599762b3a1ca43b95c812e84079f6691db7cc..cb29faad6204de8e5a6f56f8e889b34376a5a9bc 100644 (file)
--- a/net.c
+++ b/net.c
  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
- *
- *     $Id$
  */
 
 #include "defs.h"
-
 #include <sys/stat.h>
 #include <sys/socket.h>
+#include <sys/uio.h>
 #include <sys/un.h>
-
-#if defined(HAVE_SIN6_SCOPE_ID_LINUX)
-#define in6_addr in6_addr_libc
-#define ipv6_mreq ipv6_mreq_libc
-#define sockaddr_in6 sockaddr_in6_libc
-#endif
-
 #include <netinet/in.h>
 #ifdef HAVE_NETINET_TCP_H
-#include <netinet/tcp.h>
+# include <netinet/tcp.h>
 #endif
 #ifdef HAVE_NETINET_UDP_H
-#include <netinet/udp.h>
+# include <netinet/udp.h>
 #endif
 #ifdef HAVE_NETINET_SCTP_H
-#include <netinet/sctp.h>
+# include <netinet/sctp.h>
 #endif
 #include <arpa/inet.h>
 #include <net/if.h>
-#if defined(LINUX)
 #include <asm/types.h>
-#if defined(__GLIBC__) && (__GLIBC__ >= 2) && (__GLIBC__ + __GLIBC_MINOR__ >= 3)
-#  include <netipx/ipx.h>
+#if defined(__GLIBC__)
+# include <netipx/ipx.h>
 #else
-#  include <linux/ipx.h>
-#endif
-#endif /* LINUX */
-
-#if defined (__GLIBC__) && (((__GLIBC__ < 2) || (__GLIBC__ == 2 && __GLIBC_MINOR__ < 1)) || defined(HAVE_SIN6_SCOPE_ID_LINUX))
-#if defined(HAVE_LINUX_IN6_H)
-#if defined(HAVE_SIN6_SCOPE_ID_LINUX)
-#undef in6_addr
-#undef ipv6_mreq
-#undef sockaddr_in6
-#define in6_addr in6_addr_kernel
-#define ipv6_mreq ipv6_mreq_kernel
-#define sockaddr_in6 sockaddr_in6_kernel
-#endif
-#include <linux/in6.h>
-#if defined(HAVE_SIN6_SCOPE_ID_LINUX)
-#undef in6_addr
-#undef ipv6_mreq
-#undef sockaddr_in6
-#define in6_addr in6_addr_libc
-#define ipv6_mreq ipv6_mreq_libc
-#define sockaddr_in6 sockaddr_in6_kernel
-#endif
-#endif
-#endif
-
-#if defined(HAVE_SYS_UIO_H)
-#include <sys/uio.h>
+# include <linux/ipx.h>
 #endif
 
 #if defined(HAVE_LINUX_NETLINK_H)
-#include <linux/netlink.h>
+# include <linux/netlink.h>
 #endif
-
 #if defined(HAVE_LINUX_IF_PACKET_H)
-#include <linux/if_packet.h>
+# include <linux/if_packet.h>
 #endif
-
 #if defined(HAVE_LINUX_ICMP_H)
-#include <linux/icmp.h>
+# include <linux/icmp.h>
 #endif
-
-#ifndef PF_UNSPEC
-#define PF_UNSPEC AF_UNSPEC
-#endif
-
-#if UNIXWARE >= 7
-#define HAVE_SENDMSG           1               /* HACK - *FIXME* */
+#ifdef HAVE_BLUETOOTH_BLUETOOTH_H
+# include <bluetooth/bluetooth.h>
+# include <bluetooth/hci.h>
+# include <bluetooth/l2cap.h>
+# include <bluetooth/rfcomm.h>
+# include <bluetooth/sco.h>
 #endif
-
-#ifdef LINUX
-/* Under Linux these are enums so we can't test for them with ifdef. */
-#define IPPROTO_EGP IPPROTO_EGP
-#define IPPROTO_PUP IPPROTO_PUP
-#define IPPROTO_IDP IPPROTO_IDP
-#define IPPROTO_IGMP IPPROTO_IGMP
-#define IPPROTO_RAW IPPROTO_RAW
-#define IPPROTO_MAX IPPROTO_MAX
+#ifndef PF_UNSPEC
+# define PF_UNSPEC AF_UNSPEC
 #endif
 
-static const struct xlat domains[] = {
-#ifdef PF_AAL5
-       { PF_AAL5,      "PF_AAL5"       },
-#endif
-#ifdef PF_APPLETALK
-       { PF_APPLETALK, "PF_APPLETALK"  },
-#endif
-#ifdef PF_ASH
-       { PF_ASH,       "PF_ASH"        },
-#endif
-#ifdef PF_ATMPVC
-       { PF_ATMPVC,    "PF_ATMPVC"     },
-#endif
-#ifdef PF_ATMSVC
-       { PF_ATMSVC,    "PF_ATMSVC"     },
-#endif
-#ifdef PF_AX25
-       { PF_AX25,      "PF_AX25"       },
-#endif
-#ifdef PF_BLUETOOTH
-       { PF_BLUETOOTH, "PF_BLUETOOTH"  },
-#endif
-#ifdef PF_BRIDGE
-       { PF_BRIDGE,    "PF_BRIDGE"     },
-#endif
-#ifdef PF_DECnet
-       { PF_DECnet,    "PF_DECnet"     },
-#endif
-#ifdef PF_DECNET
-       { PF_DECNET,    "PF_DECNET"     },
-#endif
-#ifdef PF_ECONET
-       { PF_ECONET,    "PF_ECONET"     },
-#endif
-#ifdef PF_FILE
-       { PF_FILE,      "PF_FILE"       },
-#endif
-#ifdef PF_IMPLINK
-       { PF_IMPLINK,   "PF_IMPLINK"    },
-#endif
-#ifdef PF_INET
-       { PF_INET,      "PF_INET"       },
-#endif
-#ifdef PF_INET6
-       { PF_INET6,     "PF_INET6"      },
-#endif
-#ifdef PF_IPX
-       { PF_IPX,       "PF_IPX"        },
-#endif
-#ifdef PF_IRDA
-       { PF_IRDA,      "PF_IRDA"       },
-#endif
-#ifdef PF_ISO
-       { PF_ISO,       "PF_ISO"        },
-#endif
-#ifdef PF_KEY
-       { PF_KEY,       "PF_KEY"        },
-#endif
-#ifdef PF_UNIX
-       { PF_UNIX,      "PF_UNIX"       },
-#endif
-#ifdef PF_LOCAL
-       { PF_LOCAL,     "PF_LOCAL"      },
-#endif
-#ifdef PF_NETBEUI
-       { PF_NETBEUI,   "PF_NETBEUI"    },
-#endif
-#ifdef PF_NETLINK
-       { PF_NETLINK,   "PF_NETLINK"    },
-#endif
-#ifdef PF_NETROM
-       { PF_NETROM,    "PF_NETROM"     },
-#endif
-#ifdef PF_PACKET
-       { PF_PACKET,    "PF_PACKET"     },
-#endif
-#ifdef PF_PPPOX
-       { PF_PPPOX,     "PF_PPPOX"      },
-#endif
-#ifdef PF_ROSE
-       { PF_ROSE,      "PF_ROSE"       },
-#endif
-#ifdef PF_ROUTE
-       { PF_ROUTE,     "PF_ROUTE"      },
-#endif
-#ifdef PF_SECURITY
-       { PF_SECURITY,  "PF_SECURITY"   },
-#endif
-#ifdef PF_SNA
-       { PF_SNA,       "PF_SNA"        },
-#endif
-#ifdef PF_UNSPEC
-       { PF_UNSPEC,    "PF_UNSPEC"     },
-#endif
-#ifdef PF_WANPIPE
-       { PF_WANPIPE,   "PF_WANPIPE"    },
-#endif
-#ifdef PF_X25
-       { PF_X25,       "PF_X25"        },
-#endif
-       { 0,            NULL            },
-};
-const struct xlat addrfams[] = {
-#ifdef AF_APPLETALK
-       { AF_APPLETALK, "AF_APPLETALK"  },
-#endif
-#ifdef AF_ASH
-       { AF_ASH,       "AF_ASH"        },
-#endif
-#ifdef AF_ATMPVC
-       { AF_ATMPVC,    "AF_ATMPVC"     },
-#endif
-#ifdef AF_ATMSVC
-       { AF_ATMSVC,    "AF_ATMSVC"     },
-#endif
-#ifdef AF_AX25
-       { AF_AX25,      "AF_AX25"       },
-#endif
-#ifdef AF_BLUETOOTH
-       { AF_BLUETOOTH, "AF_BLUETOOTH"  },
-#endif
-#ifdef AF_BRIDGE
-       { AF_BRIDGE,    "AF_BRIDGE"     },
-#endif
-#ifdef AF_DECnet
-       { AF_DECnet,    "AF_DECnet"     },
-#endif
-#ifdef AF_ECONET
-       { AF_ECONET,    "AF_ECONET"     },
-#endif
-#ifdef AF_FILE
-       { AF_FILE,      "AF_FILE"       },
-#endif
-#ifdef AF_IMPLINK
-       { AF_IMPLINK,   "AF_IMPLINK"    },
-#endif
-#ifdef AF_INET
-       { AF_INET,      "AF_INET"       },
-#endif
-#ifdef AF_INET6
-       { AF_INET6,     "AF_INET6"      },
-#endif
-#ifdef AF_IPX
-       { AF_IPX,       "AF_IPX"        },
-#endif
-#ifdef AF_IRDA
-       { AF_IRDA,      "AF_IRDA"       },
-#endif
-#ifdef AF_ISO
-       { AF_ISO,       "AF_ISO"        },
-#endif
-#ifdef AF_KEY
-       { AF_KEY,       "AF_KEY"        },
-#endif
-#ifdef AF_UNIX
-       { AF_UNIX,      "AF_UNIX"       },
-#endif
-#ifdef AF_LOCAL
-       { AF_LOCAL,     "AF_LOCAL"      },
-#endif
-#ifdef AF_NETBEUI
-       { AF_NETBEUI,   "AF_NETBEUI"    },
-#endif
-#ifdef AF_NETLINK
-       { AF_NETLINK,   "AF_NETLINK"    },
-#endif
-#ifdef AF_NETROM
-       { AF_NETROM,    "AF_NETROM"     },
-#endif
-#ifdef AF_PACKET
-       { AF_PACKET,    "AF_PACKET"     },
-#endif
-#ifdef AF_PPPOX
-       { AF_PPPOX,     "AF_PPPOX"      },
-#endif
-#ifdef AF_ROSE
-       { AF_ROSE,      "AF_ROSE"       },
-#endif
-#ifdef AF_ROUTE
-       { AF_ROUTE,     "AF_ROUTE"      },
-#endif
-#ifdef AF_SECURITY
-       { AF_SECURITY,  "AF_SECURITY"   },
-#endif
-#ifdef AF_SNA
-       { AF_SNA,       "AF_SNA"        },
-#endif
-#ifdef AF_UNSPEC
-       { AF_UNSPEC,    "AF_UNSPEC"     },
-#endif
-#ifdef AF_WANPIPE
-       { AF_WANPIPE,   "AF_WANPIPE"    },
-#endif
-#ifdef AF_X25
-       { AF_X25,       "AF_X25"        },
-#endif
-       { 0,            NULL            },
-};
-static const struct xlat socktypes[] = {
-       { SOCK_STREAM,  "SOCK_STREAM"   },
-       { SOCK_DGRAM,   "SOCK_DGRAM"    },
-#ifdef SOCK_RAW
-       { SOCK_RAW,     "SOCK_RAW"      },
-#endif
-#ifdef SOCK_RDM
-       { SOCK_RDM,     "SOCK_RDM"      },
-#endif
-#ifdef SOCK_SEQPACKET
-       { SOCK_SEQPACKET,"SOCK_SEQPACKET"},
-#endif
-#ifdef SOCK_DCCP
-       { SOCK_DCCP,    "SOCK_DCCP"     },
-#endif
-#ifdef SOCK_PACKET
-       { SOCK_PACKET,  "SOCK_PACKET"   },
-#endif
-       { 0,            NULL            },
-};
-static const struct xlat sock_type_flags[] = {
-#ifdef SOCK_CLOEXEC
-       { SOCK_CLOEXEC, "SOCK_CLOEXEC"  },
-#endif
-#ifdef SOCK_NONBLOCK
-       { SOCK_NONBLOCK,"SOCK_NONBLOCK" },
-#endif
-       { 0,            NULL            },
-};
+#include "xlat/domains.h"
+#include "xlat/addrfams.h"
+#include "xlat/socktypes.h"
+#include "xlat/sock_type_flags.h"
 #ifndef SOCK_TYPE_MASK
 # define SOCK_TYPE_MASK 0xf
 #endif
-static const struct xlat socketlayers[] = {
-#if defined(SOL_IP)
-       { SOL_IP,       "SOL_IP"        },
-#endif
-#if defined(SOL_ICMP)
-       { SOL_ICMP,     "SOL_ICMP"      },
-#endif
-#if defined(SOL_TCP)
-       { SOL_TCP,      "SOL_TCP"       },
-#endif
-#if defined(SOL_UDP)
-       { SOL_UDP,      "SOL_UDP"       },
-#endif
-#if defined(SOL_IPV6)
-       { SOL_IPV6,     "SOL_IPV6"      },
-#endif
-#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_AX25)
-       { SOL_AX25,     "SOL_AX25"      },
-#endif
-#if defined(SOL_ATALK)
-       { SOL_ATALK,    "SOL_ATALK"     },
-#endif
-#if defined(SOL_NETROM)
-       { SOL_NETROM,   "SOL_NETROM"    },
-#endif
-#if defined(SOL_ROSE)
-       { SOL_ROSE,     "SOL_ROSE"      },
-#endif
-#if defined(SOL_DECNET)
-       { SOL_DECNET,   "SOL_DECNET"    },
-#endif
-#if defined(SOL_X25)
-       { SOL_X25,      "SOL_X25"       },
-#endif
-#if defined(SOL_PACKET)
-       { SOL_PACKET,   "SOL_PACKET"    },
-#endif
-#if defined(SOL_ATM)
-       { SOL_ATM,      "SOL_ATM"       },
-#endif
-#if defined(SOL_AAL)
-       { SOL_AAL,      "SOL_AAL"       },
-#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!!! ***/
-static const struct xlat protocols[] = {
-       { IPPROTO_IP,   "IPPROTO_IP"    },
-       { 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
-#ifdef IPPROTO_PUP
-       { IPPROTO_PUP,  "IPPROTO_PUP"   },
-#endif
-#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" },
-#endif
-#ifdef IPPROTO_NONE
-       { IPPROTO_NONE, "IPPROTO_NONE"  },
-#endif
-#ifdef IPPROTO_DSTOPTS
-       { IPPROTO_DSTOPTS, "IPPROTO_DSTOPTS" },
-#endif
-#ifdef 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
-       { 0,            NULL            },
-};
-static const struct xlat msg_flags[] = {
-       { MSG_OOB,              "MSG_OOB"               },
-#ifdef MSG_DONTROUTE
-       { MSG_DONTROUTE,        "MSG_DONTROUTE"         },
-#endif
-#ifdef MSG_PEEK
-       { MSG_PEEK,             "MSG_PEEK"              },
-#endif
-#ifdef MSG_CTRUNC
-       { MSG_CTRUNC,           "MSG_CTRUNC"            },
-#endif
-#ifdef MSG_PROXY
-       { MSG_PROXY,            "MSG_PROXY"             },
-#endif
-#ifdef MSG_EOR
-       { MSG_EOR,              "MSG_EOR"               },
-#endif
-#ifdef MSG_WAITALL
-       { MSG_WAITALL,          "MSG_WAITALL"           },
-#endif
-#ifdef MSG_TRUNC
-       { MSG_TRUNC,            "MSG_TRUNC"             },
-#endif
-#ifdef MSG_CTRUNC
-       { MSG_CTRUNC,           "MSG_CTRUNC"            },
-#endif
-#ifdef MSG_ERRQUEUE
-       { MSG_ERRQUEUE,         "MSG_ERRQUEUE"          },
-#endif
-#ifdef MSG_DONTWAIT
-       { MSG_DONTWAIT,         "MSG_DONTWAIT"          },
-#endif
-#ifdef MSG_CONFIRM
-       { MSG_CONFIRM,          "MSG_CONFIRM"           },
-#endif
-#ifdef MSG_PROBE
-       { MSG_PROBE,            "MSG_PROBE"             },
-#endif
-#ifdef MSG_FIN
-       { MSG_FIN,              "MSG_FIN"               },
-#endif
-#ifdef MSG_SYN
-       { MSG_SYN,              "MSG_SYN"               },
-#endif
-#ifdef MSG_RST
-       { MSG_RST,              "MSG_RST"               },
-#endif
-#ifdef MSG_NOSIGNAL
-       { MSG_NOSIGNAL,         "MSG_NOSIGNAL"          },
-#endif
-#ifdef MSG_MORE
-       { MSG_MORE,             "MSG_MORE"              },
-#endif
-#ifdef MSG_CMSG_CLOEXEC
-       { MSG_CMSG_CLOEXEC,     "MSG_CMSG_CLOEXEC"      },
-#endif
-       { 0,                    NULL                    },
-};
-
-static const struct xlat sockoptions[] = {
-#ifdef SO_ACCEPTCONN
-       { SO_ACCEPTCONN,        "SO_ACCEPTCONN" },
-#endif
-#ifdef SO_ALLRAW
-       { SO_ALLRAW,    "SO_ALLRAW"     },
-#endif
-#ifdef SO_ATTACH_FILTER
-       { SO_ATTACH_FILTER,     "SO_ATTACH_FILTER"      },
-#endif
-#ifdef SO_BINDTODEVICE
-       { SO_BINDTODEVICE,      "SO_BINDTODEVICE"       },
-#endif
-#ifdef SO_BROADCAST
-       { SO_BROADCAST, "SO_BROADCAST"  },
-#endif
-#ifdef SO_BSDCOMPAT
-       { SO_BSDCOMPAT, "SO_BSDCOMPAT"  },
-#endif
-#ifdef SO_DEBUG
-       { SO_DEBUG,     "SO_DEBUG"      },
-#endif
-#ifdef SO_DETACH_FILTER
-       { SO_DETACH_FILTER,     "SO_DETACH_FILTER"      },
-#endif
-#ifdef SO_DONTROUTE
-       { SO_DONTROUTE, "SO_DONTROUTE"  },
-#endif
-#ifdef SO_ERROR
-       { SO_ERROR,     "SO_ERROR"      },
-#endif
-#ifdef SO_ICS
-       { SO_ICS,       "SO_ICS"        },
-#endif
-#ifdef SO_IMASOCKET
-       { SO_IMASOCKET, "SO_IMASOCKET"  },
-#endif
-#ifdef SO_KEEPALIVE
-       { SO_KEEPALIVE, "SO_KEEPALIVE"  },
-#endif
-#ifdef SO_LINGER
-       { SO_LINGER,    "SO_LINGER"     },
-#endif
-#ifdef SO_LISTENING
-       { SO_LISTENING, "SO_LISTENING"  },
-#endif
-#ifdef SO_MGMT
-       { SO_MGMT,      "SO_MGMT"       },
-#endif
-#ifdef SO_NO_CHECK
-       { SO_NO_CHECK,  "SO_NO_CHECK"   },
-#endif
-#ifdef SO_OOBINLINE
-       { SO_OOBINLINE, "SO_OOBINLINE"  },
-#endif
-#ifdef SO_ORDREL
-       { SO_ORDREL,    "SO_ORDREL"     },
-#endif
-#ifdef SO_PARALLELSVR
-       { SO_PARALLELSVR,       "SO_PARALLELSVR"        },
-#endif
-#ifdef SO_PASSCRED
-       { SO_PASSCRED,  "SO_PASSCRED"   },
-#endif
-#ifdef SO_PEERCRED
-       { SO_PEERCRED,  "SO_PEERCRED"   },
-#endif
-#ifdef SO_PEERNAME
-       { SO_PEERNAME,  "SO_PEERNAME"   },
-#endif
-#ifdef SO_PEERSEC
-       { SO_PEERSEC,   "SO_PEERSEC"    },
-#endif
-#ifdef SO_PRIORITY
-       { SO_PRIORITY,  "SO_PRIORITY"   },
-#endif
-#ifdef SO_PROTOTYPE
-       { SO_PROTOTYPE, "SO_PROTOTYPE"  },
-#endif
-#ifdef SO_RCVBUF
-       { SO_RCVBUF,    "SO_RCVBUF"     },
-#endif
-#ifdef SO_RCVLOWAT
-       { SO_RCVLOWAT,  "SO_RCVLOWAT"   },
-#endif
-#ifdef SO_RCVTIMEO
-       { SO_RCVTIMEO,  "SO_RCVTIMEO"   },
-#endif
-#ifdef SO_RDWR
-       { SO_RDWR,      "SO_RDWR"       },
-#endif
-#ifdef SO_REUSEADDR
-       { SO_REUSEADDR, "SO_REUSEADDR"  },
-#endif
-#ifdef SO_REUSEPORT
-       { SO_REUSEPORT, "SO_REUSEPORT"  },
-#endif
-#ifdef SO_SECURITY_AUTHENTICATION
-       { SO_SECURITY_AUTHENTICATION,"SO_SECURITY_AUTHENTICATION"},
-#endif
-#ifdef SO_SECURITY_ENCRYPTION_NETWORK
-       { SO_SECURITY_ENCRYPTION_NETWORK,"SO_SECURITY_ENCRYPTION_NETWORK"},
-#endif
-#ifdef SO_SECURITY_ENCRYPTION_TRANSPORT
-       { SO_SECURITY_ENCRYPTION_TRANSPORT,"SO_SECURITY_ENCRYPTION_TRANSPORT"},
-#endif
-#ifdef SO_SEMA
-       { SO_SEMA,      "SO_SEMA"       },
-#endif
-#ifdef SO_SNDBUF
-       { SO_SNDBUF,    "SO_SNDBUF"     },
-#endif
-#ifdef SO_SNDLOWAT
-       { SO_SNDLOWAT,  "SO_SNDLOWAT"   },
-#endif
-#ifdef SO_SNDTIMEO
-       { SO_SNDTIMEO,  "SO_SNDTIMEO"   },
-#endif
-#ifdef SO_TIMESTAMP
-       { SO_TIMESTAMP, "SO_TIMESTAMP"  },
-#endif
-#ifdef SO_TYPE
-       { SO_TYPE,      "SO_TYPE"       },
-#endif
-#ifdef SO_USELOOPBACK
-       { SO_USELOOPBACK,       "SO_USELOOPBACK"        },
-#endif
-       { 0,            NULL            },
-};
-
-#if !defined (SOL_IP) && defined (IPPROTO_IP)
-#define SOL_IP IPPROTO_IP
-#endif
-
-#ifdef SOL_IP
-static const struct xlat sockipoptions[] = {
-#ifdef IP_TOS
-       { IP_TOS,               "IP_TOS"                },
-#endif
-#ifdef IP_TTL
-       { IP_TTL,               "IP_TTL"                },
-#endif
-#ifdef IP_HDRINCL
-       { IP_HDRINCL,           "IP_HDRINCL"            },
-#endif
-#ifdef IP_OPTIONS
-       { IP_OPTIONS,           "IP_OPTIONS"            },
-#endif
-#ifdef IP_ROUTER_ALERT
-       { IP_ROUTER_ALERT,      "IP_ROUTER_ALERT"       },
-#endif
-#ifdef IP_RECVOPTIONS
-       { IP_RECVOPTIONS,       "IP_RECVOPTIONS"        },
-#endif
-#ifdef IP_RECVOPTS
-       { IP_RECVOPTS,          "IP_RECVOPTS"           },
-#endif
-#ifdef IP_RECVRETOPTS
-       { IP_RECVRETOPTS,       "IP_RECVRETOPTS"        },
-#endif
-#ifdef IP_RECVDSTADDR
-       { IP_RECVDSTADDR,       "IP_RECVDSTADDR"        },
-#endif
-#ifdef IP_RETOPTS
-       { IP_RETOPTS,           "IP_RETOPTS"            },
-#endif
-#ifdef IP_PKTINFO
-       { IP_PKTINFO,           "IP_PKTINFO"            },
-#endif
-#ifdef IP_PKTOPTIONS
-       { IP_PKTOPTIONS,        "IP_PKTOPTIONS"         },
-#endif
-#ifdef IP_MTU_DISCOVER
-       { IP_MTU_DISCOVER,      "IP_MTU_DISCOVER"       },
-#endif
-#ifdef IP_RECVERR
-       { IP_RECVERR,           "IP_RECVERR"            },
-#endif
-#ifdef IP_RECVTTL
-       { IP_RECVTTL,           "IP_RECVTTL"            },
-#endif
-#ifdef IP_RECVTOS
-       { IP_RECVTOS,           "IP_RECVTOS"            },
-#endif
-#ifdef IP_MTU
-       { IP_MTU,               "IP_MTU"                },
-#endif
-#ifdef IP_MULTICAST_IF
-       { IP_MULTICAST_IF,      "IP_MULTICAST_IF"       },
-#endif
-#ifdef IP_MULTICAST_TTL
-       { IP_MULTICAST_TTL,     "IP_MULTICAST_TTL"      },
-#endif
-#ifdef IP_MULTICAST_LOOP
-       { IP_MULTICAST_LOOP,    "IP_MULTICAST_LOOP"     },
-#endif
-#ifdef IP_ADD_MEMBERSHIP
-       { IP_ADD_MEMBERSHIP,    "IP_ADD_MEMBERSHIP"     },
-#endif
-#ifdef IP_DROP_MEMBERSHIP
-       { IP_DROP_MEMBERSHIP,   "IP_DROP_MEMBERSHIP"    },
-#endif
-#ifdef IP_BROADCAST_IF
-       { IP_BROADCAST_IF,      "IP_BROADCAST_IF"       },
-#endif
-#ifdef IP_RECVIFINDEX
-       { IP_RECVIFINDEX,       "IP_RECVIFINDEX"        },
-#endif
-#ifdef IP_MSFILTER
-       { IP_MSFILTER,          "IP_MSFILTER"           },
-#endif
-#ifdef MCAST_MSFILTER
-       { MCAST_MSFILTER,       "MCAST_MSFILTER"        },
-#endif
-#ifdef IP_FREEBIND
-       { IP_FREEBIND,          "IP_FREEBIND"           },
-#endif
-       { 0,                    NULL                    },
-};
-#endif /* SOL_IP */
-
-#ifdef SOL_IPV6
-static const struct xlat sockipv6options[] = {
-#ifdef IPV6_ADDRFORM
-       { IPV6_ADDRFORM,        "IPV6_ADDRFORM"         },
-#endif
-#ifdef MCAST_FILTER
-       { MCAST_FILTER,         "MCAST_FILTER"          },
-#endif
-#ifdef IPV6_PKTOPTIONS
-       { IPV6_PKTOPTIONS,      "IPV6_PKTOPTIONS"       },
-#endif
-#ifdef IPV6_MTU
-       { IPV6_MTU,             "IPV6_MTU"              },
-#endif
-#ifdef IPV6_V6ONLY
-       { IPV6_V6ONLY,          "IPV6_V6ONLY"           },
-#endif
-#ifdef IPV6_PKTINFO
-       { IPV6_PKTINFO,         "IPV6_PKTINFO"          },
-#endif
-#ifdef IPV6_HOPLIMIT
-       { IPV6_HOPLIMIT,        "IPV6_HOPLIMIT"         },
-#endif
-#ifdef IPV6_RTHDR
-       { IPV6_RTHDR,           "IPV6_RTHDR"            },
-#endif
-#ifdef IPV6_HOPOPTS
-       { IPV6_HOPOPTS,         "IPV6_HOPOPTS"          },
-#endif
-#ifdef IPV6_DSTOPTS
-       { IPV6_DSTOPTS,         "IPV6_DSTOPTS"          },
-#endif
-#ifdef IPV6_FLOWINFO
-       { IPV6_FLOWINFO,        "IPV6_FLOWINFO"         },
-#endif
-#ifdef IPV6_UNICAST_HOPS
-       { IPV6_UNICAST_HOPS,    "IPV6_UNICAST_HOPS"     },
-#endif
-#ifdef IPV6_MULTICAST_HOPS
-       { IPV6_MULTICAST_HOPS,  "IPV6_MULTICAST_HOPS"   },
-#endif
-#ifdef IPV6_MULTICAST_LOOP
-       { IPV6_MULTICAST_LOOP,  "IPV6_MULTICAST_LOOP"   },
-#endif
-#ifdef IPV6_MULTICAST_IF
-       { IPV6_MULTICAST_IF,    "IPV6_MULTICAST_IF"     },
-#endif
-#ifdef IPV6_MTU_DISCOVER
-       { IPV6_MTU_DISCOVER,    "IPV6_MTU_DISCOVER"     },
-#endif
-#ifdef IPV6_RECVERR
-       { IPV6_RECVERR,         "IPV6_RECVERR"          },
-#endif
-#ifdef IPV6_FLOWINFO_SEND
-       { IPV6_FLOWINFO_SEND,   "IPV6_FLOWINFO_SEND"    },
-#endif
-#ifdef IPV6_ADD_MEMBERSHIP
-       { IPV6_ADD_MEMBERSHIP,  "IPV6_ADD_MEMBERSHIP"   },
-#endif
-#ifdef IPV6_DROP_MEMBERSHIP
-       { IPV6_DROP_MEMBERSHIP, "IPV6_DROP_MEMBERSHIP"  },
-#endif
-#ifdef IPV6_ROUTER_ALERT
-       { IPV6_ROUTER_ALERT,    "IPV6_ROUTER_ALERT"     },
-#endif
-       { 0,                    NULL                    },
-};
-#endif /* SOL_IPV6 */
-
-#ifdef SOL_IPX
-static const struct xlat sockipxoptions[] = {
-       { IPX_TYPE,     "IPX_TYPE"      },
-       { 0,            NULL            },
-};
-#endif /* SOL_IPX */
-
-#ifdef SOL_RAW
-static const struct xlat sockrawoptions[] = {
-#if defined(ICMP_FILTER)
-       { ICMP_FILTER,          "ICMP_FILTER"   },
-#endif
-       { 0,                    NULL            },
-};
-#endif /* SOL_RAW */
-
-#ifdef SOL_PACKET
-static const struct xlat sockpacketoptions[] = {
-#ifdef PACKET_ADD_MEMBERSHIP
-       { PACKET_ADD_MEMBERSHIP,        "PACKET_ADD_MEMBERSHIP" },
-#endif
-#ifdef PACKET_DROP_MEMBERSHIP
-       { PACKET_DROP_MEMBERSHIP,       "PACKET_DROP_MEMBERSHIP"},
-#endif
-#if defined(PACKET_RECV_OUTPUT)
-       { PACKET_RECV_OUTPUT,           "PACKET_RECV_OUTPUT"    },
-#endif
-#if defined(PACKET_RX_RING)
-       { PACKET_RX_RING,               "PACKET_RX_RING"        },
-#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"        },
+#ifndef SOL_IP
+# define SOL_IP 0
 #endif
-#if defined(SCTP_AUTH_CHUNK)
-       { SCTP_AUTH_CHUNK,              "SCTP_AUTH_CHUNK"       },
+#ifndef SOL_TCP
+# define SOL_TCP 6
 #endif
-#if defined(SCTP_HMAC_IDENT)
-       { SCTP_HMAC_IDENT,              "SCTP_HMAC_IDENT"       },
+#ifndef SOL_UDP
+# define SOL_UDP 17
 #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
+#ifndef SOL_IPV6
+# define SOL_IPV6 41
 #endif
-
-#ifdef SOL_TCP
-static const struct xlat socktcpoptions[] = {
-       { TCP_NODELAY,          "TCP_NODELAY"   },
-       { TCP_MAXSEG,           "TCP_MAXSEG"    },
-#if defined(TCP_CORK)
-       { TCP_CORK,             "TCP_CORK"      },
+#ifndef SOL_ICMPV6
+# define SOL_ICMPV6 58
 #endif
-#if defined(TCP_KEEPIDLE)
-       { TCP_KEEPIDLE,         "TCP_KEEPIDLE" },
+#ifndef SOL_SCTP
+# define SOL_SCTP 132
 #endif
-#if defined(TCP_KEEPINTVL)
-       { TCP_KEEPINTVL,        "TCP_KEEPINTVL" },
+#ifndef SOL_UDPLITE
+# define SOL_UDPLITE 136
 #endif
-#if defined(TCP_KEEPCNT)
-       { TCP_KEEPCNT,          "TCP_KEEPCNT" },
+#ifndef SOL_RAW
+# define SOL_RAW 255
 #endif
-#if defined(TCP_NKEEP)
-       { TCP_NKEEP,            "TCP_NKEEP"     },
+#ifndef SOL_IPX
+# define SOL_IPX 256
 #endif
-#if defined(TCP_SYNCNT)
-       { TCP_SYNCNT,           "TCP_SYNCNT" },
+#ifndef SOL_AX25
+# define SOL_AX25 257
 #endif
-#if defined(TCP_LINGER2)
-       { TCP_LINGER2,          "TCP_LINGER2" },
+#ifndef SOL_ATALK
+# define SOL_ATALK 258
 #endif
-#if defined(TCP_DEFER_ACCEPT)
-       { TCP_DEFER_ACCEPT,     "TCP_DEFER_ACCEPT" },
+#ifndef SOL_NETROM
+# define SOL_NETROM 259
 #endif
-#if defined(TCP_WINDOW_CLAMP)
-       { TCP_WINDOW_CLAMP,     "TCP_WINDOW_CLAMP" },
+#ifndef SOL_ROSE
+# define SOL_ROSE 260
 #endif
-#if defined(TCP_INFO)
-       { TCP_INFO,             "TCP_INFO" },
+#ifndef SOL_DECNET
+# define SOL_DECNET 261
 #endif
-#if defined(TCP_QUICKACK)
-       { TCP_QUICKACK,         "TCP_QUICKACK" },
+#ifndef SOL_X25
+# define SOL_X25 262
 #endif
-       { 0,                    NULL            },
-};
-#endif /* SOL_TCP */
-
-#ifdef SOL_RAW
-static const struct xlat icmpfilterflags[] = {
-#if defined(ICMP_ECHOREPLY)
-       { (1<<ICMP_ECHOREPLY),          "ICMP_ECHOREPLY"        },
+#ifndef SOL_PACKET
+# define SOL_PACKET 263
 #endif
-#if defined(ICMP_DEST_UNREACH)
-       { (1<<ICMP_DEST_UNREACH),       "ICMP_DEST_UNREACH"     },
+#ifndef SOL_ATM
+# define SOL_ATM 264
 #endif
-#if defined(ICMP_SOURCE_QUENCH)
-       { (1<<ICMP_SOURCE_QUENCH),      "ICMP_SOURCE_QUENCH"    },
+#ifndef SOL_AAL
+# define SOL_AAL 265
 #endif
-#if defined(ICMP_REDIRECT)
-       { (1<<ICMP_REDIRECT),           "ICMP_REDIRECT"         },
+#ifndef SOL_IRDA
+# define SOL_IRDA 266
 #endif
-#if defined(ICMP_ECHO)
-       { (1<<ICMP_ECHO),               "ICMP_ECHO"             },
+#ifndef SOL_NETBEUI
+# define SOL_NETBEUI 267
 #endif
-#if defined(ICMP_TIME_EXCEEDED)
-       { (1<<ICMP_TIME_EXCEEDED),      "ICMP_TIME_EXCEEDED"    },
+#ifndef SOL_LLC
+# define SOL_LLC 268
 #endif
-#if defined(ICMP_PARAMETERPROB)
-       { (1<<ICMP_PARAMETERPROB),      "ICMP_PARAMETERPROB"    },
+#ifndef SOL_DCCP
+# define SOL_DCCP 269
 #endif
-#if defined(ICMP_TIMESTAMP)
-       { (1<<ICMP_TIMESTAMP),          "ICMP_TIMESTAMP"        },
+#ifndef SOL_NETLINK
+# define SOL_NETLINK 270
 #endif
-#if defined(ICMP_TIMESTAMPREPLY)
-       { (1<<ICMP_TIMESTAMPREPLY),     "ICMP_TIMESTAMPREPLY"   },
+#ifndef SOL_TIPC
+# define SOL_TIPC 271
 #endif
-#if defined(ICMP_INFO_REQUEST)
-       { (1<<ICMP_INFO_REQUEST),       "ICMP_INFO_REQUEST"     },
+#ifndef SOL_RXRPC
+# define SOL_RXRPC 272
 #endif
-#if defined(ICMP_INFO_REPLY)
-       { (1<<ICMP_INFO_REPLY),         "ICMP_INFO_REPLY"       },
+#ifndef SOL_PPPOL2TP
+# define SOL_PPPOL2TP 273
 #endif
-#if defined(ICMP_ADDRESS)
-       { (1<<ICMP_ADDRESS),            "ICMP_ADDRESS"          },
+#ifndef SOL_BLUETOOTH
+# define SOL_BLUETOOTH 274
 #endif
-#if defined(ICMP_ADDRESSREPLY)
-       { (1<<ICMP_ADDRESSREPLY),       "ICMP_ADDRESSREPLY"     },
+#ifndef SOL_PNPIPE
+# define SOL_PNPIPE 275
 #endif
-       { 0,                            NULL                    },
-};
-#endif /* SOL_RAW */
-
-#if defined(AF_PACKET) /* from e.g. linux/if_packet.h */
-static const struct xlat af_packet_types[] = {
-#if defined(PACKET_HOST)
-       { PACKET_HOST,                  "PACKET_HOST"           },
+#ifndef SOL_RDS
+# define SOL_RDS 276
 #endif
-#if defined(PACKET_BROADCAST)
-       { PACKET_BROADCAST,             "PACKET_BROADCAST"      },
+#ifndef SOL_IUCV
+# define SOL_IUCV 277
 #endif
-#if defined(PACKET_MULTICAST)
-       { PACKET_MULTICAST,             "PACKET_MULTICAST"      },
+#ifndef SOL_CAIF
+# define SOL_CAIF 278
 #endif
-#if defined(PACKET_OTHERHOST)
-       { PACKET_OTHERHOST,             "PACKET_OTHERHOST"      },
+#ifndef SOL_ALG
+# define SOL_ALG 279
 #endif
-#if defined(PACKET_OUTGOING)
-       { PACKET_OUTGOING,              "PACKET_OUTGOING"       },
+#ifndef SOL_NFC
+# define SOL_NFC 280
 #endif
-#if defined(PACKET_LOOPBACK)
-       { PACKET_LOOPBACK,              "PACKET_LOOPBACK"       },
+#include "xlat/socketlayers.h"
+
+#include "xlat/inet_protocols.h"
+
+#ifdef PF_NETLINK
+# if !defined NETLINK_SOCK_DIAG && defined NETLINK_INET_DIAG
+#  define NETLINK_SOCK_DIAG NETLINK_INET_DIAG
+# endif
+# include "xlat/netlink_protocols.h"
 #endif
-#if defined(PACKET_FASTROUTE)
-       { PACKET_FASTROUTE,             "PACKET_FASTROUTE"      },
+
+#if defined(HAVE_BLUETOOTH_BLUETOOTH_H)
+# include "xlat/bt_protocols.h"
 #endif
-       { 0,                            NULL                    },
-};
-#endif /* defined(AF_PACKET) */
 
+#include "xlat/msg_flags.h"
+
+#if defined(AF_PACKET) /* from e.g. linux/if_packet.h */
+# include "xlat/af_packet_types.h"
+#endif
 
 void
 printsock(struct tcb *tcp, long addr, int addrlen)
@@ -1207,7 +211,7 @@ printsock(struct tcb *tcp, long addr, int addrlen)
 #ifdef HAVE_INET_NTOP
                struct sockaddr_in6 sa6;
 #endif
-#if defined(LINUX) && defined(AF_IPX)
+#if defined(AF_IPX)
                struct sockaddr_ipx sipx;
 #endif
 #ifdef AF_PACKET
@@ -1215,12 +219,18 @@ printsock(struct tcb *tcp, long addr, int addrlen)
 #endif
 #ifdef AF_NETLINK
                struct sockaddr_nl nl;
+#endif
+#ifdef HAVE_BLUETOOTH_BLUETOOTH_H
+               struct sockaddr_hci hci;
+               struct sockaddr_l2 l2;
+               struct sockaddr_rc rc;
+               struct sockaddr_sco sco;
 #endif
        } addrbuf;
        char string_addr[100];
 
        if (addr == 0) {
-               tprintf("NULL");
+               tprints("NULL");
                return;
        }
        if (!verbose(tcp)) {
@@ -1228,30 +238,34 @@ printsock(struct tcb *tcp, long addr, int addrlen)
                return;
        }
 
-       if (addrlen < 2 || addrlen > sizeof(addrbuf))
+       if (addrlen < 2 || addrlen > (int) sizeof(addrbuf))
                addrlen = sizeof(addrbuf);
 
        memset(&addrbuf, 0, sizeof(addrbuf));
        if (umoven(tcp, addr, addrlen, addrbuf.pad) < 0) {
-               tprintf("{...}");
+               tprints("{...}");
                return;
        }
        addrbuf.pad[sizeof(addrbuf.pad) - 1] = '\0';
 
-       tprintf("{sa_family=");
+       tprints("{sa_family=");
        printxval(addrfams, addrbuf.sa.sa_family, "AF_???");
-       tprintf(", ");
+       tprints(", ");
 
        switch (addrbuf.sa.sa_family) {
        case AF_UNIX:
                if (addrlen == 2) {
-                       tprintf("NULL");
+                       tprints("NULL");
                } else if (addrbuf.sau.sun_path[0]) {
-                       tprintf("path=");
-                       printpathn(tcp, addr + 2, strlen(addrbuf.sau.sun_path));
+                       tprints("sun_path=");
+                       print_quoted_string(addrbuf.sau.sun_path,
+                                           sizeof(addrbuf.sau.sun_path) + 1,
+                                           QUOTE_0_TERMINATED);
                } else {
-                       tprintf("path=@");
-                       printpathn(tcp, addr + 3, strlen(addrbuf.sau.sun_path + 1));
+                       tprints("sun_path=@");
+                       print_quoted_string(addrbuf.sau.sun_path + 1,
+                                           sizeof(addrbuf.sau.sun_path),
+                                           QUOTE_0_TERMINATED);
                }
                break;
        case AF_INET:
@@ -1274,8 +288,13 @@ printsock(struct tcb *tcp, long addr, int addrlen)
 
                                if (if_indextoname(addrbuf.sa6.sin6_scope_id, scopebuf) == NULL)
                                        numericscope++;
-                               else
-                                       tprintf(", sin6_scope_id=if_nametoindex(\"%s\")", scopebuf);
+                               else {
+                                       tprints(", sin6_scope_id=if_nametoindex(");
+                                       print_quoted_string(scopebuf,
+                                                           sizeof(scopebuf),
+                                                           QUOTE_0_TERMINATED);
+                                       tprints(")");
+                               }
                        } else
                                numericscope++;
 
@@ -1286,7 +305,7 @@ printsock(struct tcb *tcp, long addr, int addrlen)
 #endif
                break;
 #endif
-#if defined(AF_IPX) && defined(linux)
+#if defined(AF_IPX)
        case AF_IPX:
                {
                        int i;
@@ -1304,7 +323,7 @@ printsock(struct tcb *tcp, long addr, int addrlen)
                        tprintf("/[%02x]", addrbuf.sipx.sipx_type);
                }
                break;
-#endif /* AF_IPX && linux */
+#endif /* AF_IPX */
 #ifdef AF_PACKET
        case AF_PACKET:
                {
@@ -1312,7 +331,7 @@ printsock(struct tcb *tcp, long addr, int addrlen)
                        tprintf("proto=%#04x, if%d, pkttype=",
                                        ntohs(addrbuf.ll.sll_protocol),
                                        addrbuf.ll.sll_ifindex);
-                       printxval(af_packet_types, addrbuf.ll.sll_pkttype, "?");
+                       printxval(af_packet_types, addrbuf.ll.sll_pkttype, "PACKET_???");
                        tprintf(", addr(%d)={%d, ",
                                        addrbuf.ll.sll_halen,
                                        addrbuf.ll.sll_hatype);
@@ -1321,141 +340,374 @@ printsock(struct tcb *tcp, long addr, int addrlen)
                }
                break;
 
-#endif /* AF_APACKET */
+#endif /* AF_PACKET */
 #ifdef AF_NETLINK
        case AF_NETLINK:
                tprintf("pid=%d, groups=%08x", addrbuf.nl.nl_pid, addrbuf.nl.nl_groups);
                break;
 #endif /* AF_NETLINK */
+#if defined(AF_BLUETOOTH) && defined(HAVE_BLUETOOTH_BLUETOOTH_H)
+       case AF_BLUETOOTH:
+               tprintf("{sco_bdaddr=%02X:%02X:%02X:%02X:%02X:%02X} or "
+                       "{rc_bdaddr=%02X:%02X:%02X:%02X:%02X:%02X, rc_channel=%d} or "
+                       "{l2_psm=htobs(%d), l2_bdaddr=%02X:%02X:%02X:%02X:%02X:%02X, l2_cid=htobs(%d)} or "
+                       "{hci_dev=htobs(%d)}",
+                       addrbuf.sco.sco_bdaddr.b[0], addrbuf.sco.sco_bdaddr.b[1],
+                       addrbuf.sco.sco_bdaddr.b[2], addrbuf.sco.sco_bdaddr.b[3],
+                       addrbuf.sco.sco_bdaddr.b[4], addrbuf.sco.sco_bdaddr.b[5],
+                       addrbuf.rc.rc_bdaddr.b[0], addrbuf.rc.rc_bdaddr.b[1],
+                       addrbuf.rc.rc_bdaddr.b[2], addrbuf.rc.rc_bdaddr.b[3],
+                       addrbuf.rc.rc_bdaddr.b[4], addrbuf.rc.rc_bdaddr.b[5],
+                       addrbuf.rc.rc_channel,
+                       btohs(addrbuf.l2.l2_psm), addrbuf.l2.l2_bdaddr.b[0],
+                       addrbuf.l2.l2_bdaddr.b[1], addrbuf.l2.l2_bdaddr.b[2],
+                       addrbuf.l2.l2_bdaddr.b[3], addrbuf.l2.l2_bdaddr.b[4],
+                       addrbuf.l2.l2_bdaddr.b[5], btohs(addrbuf.l2.l2_cid),
+                       btohs(addrbuf.hci.hci_dev));
+               break;
+#endif /* AF_BLUETOOTH && HAVE_BLUETOOTH_BLUETOOTH_H */
        /* AF_AX25 AF_APPLETALK AF_NETROM AF_BRIDGE AF_AAL5
        AF_X25 AF_ROSE etc. still need to be done */
 
        default:
-               tprintf("sa_data=");
-               printstr(tcp, (long) &((struct sockaddr *) addr)->sa_data,
-                       sizeof addrbuf.sa.sa_data);
+               tprints("sa_data=");
+               print_quoted_string(addrbuf.sa.sa_data,
+                                   sizeof(addrbuf.sa.sa_data), 0);
                break;
        }
-       tprintf("}");
+       tprints("}");
 }
 
 #if HAVE_SENDMSG
-static const struct xlat scmvals[] = {
-#ifdef SCM_RIGHTS
-       { SCM_RIGHTS,           "SCM_RIGHTS"            },
+# ifndef SCM_SECURITY
+#  define SCM_SECURITY 0x03
+# endif
+# include "xlat/scmvals.h"
+
+#if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
+struct cmsghdr32 {
+       uint32_t cmsg_len;
+       int cmsg_level;
+       int cmsg_type;
+};
 #endif
-#ifdef SCM_CREDENTIALS
-       { SCM_CREDENTIALS,      "SCM_CREDENTIALS"       },
+
+typedef union {
+       char *ptr;
+       struct cmsghdr *cmsg;
+#if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
+       struct cmsghdr32 *cmsg32;
 #endif
-       { 0,                    NULL                    }
-};
+} union_cmsghdr;
 
-static void
-printcmsghdr(struct tcb *tcp, unsigned long addr, unsigned long len)
+static bool
+print_scm_rights(struct tcb *tcp, size_t cmsg_size, char *ptr, size_t cmsg_len)
 {
-       struct cmsghdr *cmsg = len < sizeof(struct cmsghdr) ?
-                              NULL : malloc(len);
-       if (cmsg == NULL || umoven(tcp, addr, len, (char *) cmsg) < 0) {
-               tprintf(", msg_control=%#lx", addr);
-               free(cmsg);
-               return;
+       if (cmsg_size + sizeof(int) > cmsg_len)
+               return false;
+
+       int *fds = (int *) (ptr + cmsg_size);
+       bool seen = false;
+
+       tprints(", [");
+       while ((char *) fds < (ptr + cmsg_len)) {
+               if (seen)
+                       tprints(", ");
+               else
+                       seen = true;
+               printfd(tcp, *fds++);
        }
+       tprints("]}");
+       return true;
+}
+
+static bool
+print_scm_creds(struct tcb *tcp, size_t cmsg_size, char *ptr, size_t cmsg_len)
+{
+       if (cmsg_size + sizeof(struct ucred) > cmsg_len)
+               return false;
+
+       const struct ucred *uc = (void *) (ptr + cmsg_size);
+
+       tprintf(", {pid=%u, uid=%u, gid=%u}}",
+               (unsigned) uc->pid, (unsigned) uc->uid, (unsigned) uc->gid);
+       return true;
+}
 
-       tprintf(", {cmsg_len=%u, cmsg_level=", (unsigned) cmsg->cmsg_len);
-       printxval(socketlayers, cmsg->cmsg_level, "SOL_???");
-       tprintf(", cmsg_type=");
+static bool
+print_scm_security(struct tcb *tcp, size_t cmsg_size, char *ptr, size_t cmsg_len)
+{
+       if (cmsg_size + sizeof(char) > cmsg_len)
+               return false;
+
+       const char *label = (const char *) (ptr + cmsg_size);
+       const size_t label_len = cmsg_len - cmsg_size;
 
-       if (cmsg->cmsg_level == SOL_SOCKET) {
-               unsigned long cmsg_len;
+       tprints(", ");
+       print_quoted_string(label, label_len, 0);
+       tprints("}");
+
+       return true;
+}
 
-               printxval(scmvals, cmsg->cmsg_type, "SCM_???");
-               cmsg_len = (len < cmsg->cmsg_len) ? len : cmsg->cmsg_len;
+static void
+printcmsghdr(struct tcb *tcp, unsigned long addr, size_t len)
+{
+       const size_t cmsg_size =
+#if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
+               (current_wordsize < sizeof(long)) ? sizeof(struct cmsghdr32) :
+#endif
+                       sizeof(struct cmsghdr);
 
-               if (cmsg->cmsg_type == SCM_RIGHTS
-                   && CMSG_LEN(sizeof(int)) <= cmsg_len) {
-                       int *fds = (int *) CMSG_DATA(cmsg);
-                       int first = 1;
+       char *buf = len < cmsg_size ? NULL : malloc(len);
+       if (!buf || umoven(tcp, addr, len, buf) < 0) {
+               tprintf(", msg_control=%#lx", addr);
+               free(buf);
+               return;
+       }
 
-                       tprintf(", {");
-                       while ((char *) fds < ((char *) cmsg + cmsg_len)) {
-                               if (!first)
-                                       tprintf(", ");
-                               tprintf("%d", *fds++);
-                               first = 0;
+       union_cmsghdr u = { .ptr = buf };
+
+       tprints(", [");
+       while (len >= cmsg_size) {
+               size_t cmsg_len =
+#if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
+                       (current_wordsize < sizeof(long)) ? u.cmsg32->cmsg_len :
+#endif
+                               u.cmsg->cmsg_len;
+               int cmsg_level =
+#if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
+                       (current_wordsize < sizeof(long)) ? u.cmsg32->cmsg_level :
+#endif
+                               u.cmsg->cmsg_level;
+               int cmsg_type =
+#if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
+                       (current_wordsize < sizeof(long)) ? u.cmsg32->cmsg_type :
+#endif
+                               u.cmsg->cmsg_type;
+
+               if (u.ptr != buf)
+                       tprints(", ");
+               tprintf("{cmsg_len=%lu, cmsg_level=", (unsigned long) cmsg_len);
+               printxval(socketlayers, cmsg_level, "SOL_???");
+               tprints(", cmsg_type=");
+
+               if (cmsg_len > len)
+                       cmsg_len = len;
+
+               if (cmsg_level == SOL_SOCKET) {
+                       printxval(scmvals, cmsg_type, "SCM_???");
+                       switch (cmsg_type) {
+                       case SCM_RIGHTS:
+                               if (print_scm_rights(tcp, cmsg_size, u.ptr, cmsg_len))
+                                       goto next_cmsg;
+                               break;
+                       case SCM_CREDENTIALS:
+                               if (print_scm_creds(tcp, cmsg_size, u.ptr, cmsg_len))
+                                       goto next_cmsg;
+                               break;
+                       case SCM_SECURITY:
+                               if (print_scm_security(tcp, cmsg_size, u.ptr, cmsg_len))
+                                       goto next_cmsg;
+                               break;
                        }
-                       tprintf("}}");
-                       free(cmsg);
-                       return;
+               } else {
+                       tprintf("%u", cmsg_type);
                }
-               if (cmsg->cmsg_type == SCM_CREDENTIALS
-                   && CMSG_LEN(sizeof(struct ucred)) <= cmsg_len) {
-                       struct ucred *uc = (struct ucred *) CMSG_DATA(cmsg);
-
-                       tprintf("{pid=%ld, uid=%ld, gid=%ld}}",
-                               (long)uc->pid, (long)uc->uid, (long)uc->gid);
-                       free(cmsg);
-                       return;
+               tprints(", ...}");
+next_cmsg:
+               if (cmsg_len < cmsg_size) {
+                       len -= cmsg_size;
+                       break;
+               }
+               cmsg_len = (cmsg_len + current_wordsize - 1) &
+                       (size_t) ~(current_wordsize - 1);
+               if (cmsg_len >= len) {
+                       len = 0;
+                       break;
                }
+               u.ptr += cmsg_len;
+               len -= cmsg_len;
        }
-       free(cmsg);
-       tprintf(", ...}");
+       if (len)
+               tprints(", ...");
+       tprints("]");
+       free(buf);
 }
 
 static void
-do_msghdr(struct tcb *tcp, struct msghdr *msg)
+do_msghdr(struct tcb *tcp, struct msghdr *msg, unsigned long data_size)
 {
        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, 1);
+       tprint_iov_upto(tcp, (unsigned long)msg->msg_iovlen,
+                  (unsigned long)msg->msg_iov, 1, data_size);
 
 #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_flags=");
+       tprints(", msg_flags=");
        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);
 #endif /* !HAVE_STRUCT_MSGHDR_MSG_CONTROL */
-       tprintf("}");
+       tprints("}");
+}
+
+struct msghdr32 {
+       uint32_t /* void* */    msg_name;
+       uint32_t /* socklen_t */msg_namelen;
+       uint32_t /* iovec* */   msg_iov;
+       uint32_t /* size_t */   msg_iovlen;
+       uint32_t /* void* */    msg_control;
+       uint32_t /* size_t */   msg_controllen;
+       uint32_t /* int */      msg_flags;
+};
+struct mmsghdr32 {
+       struct msghdr32         msg_hdr;
+       uint32_t /* unsigned */ msg_len;
+};
+
+#ifndef HAVE_STRUCT_MMSGHDR
+struct mmsghdr {
+       struct msghdr msg_hdr;
+       unsigned msg_len;
+};
+#endif
+
+#if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
+static void
+copy_from_msghdr32(struct msghdr *to_msg, struct msghdr32 *from_msg32)
+{
+       to_msg->msg_name       = (void*)(long)from_msg32->msg_name;
+       to_msg->msg_namelen    =              from_msg32->msg_namelen;
+       to_msg->msg_iov        = (void*)(long)from_msg32->msg_iov;
+       to_msg->msg_iovlen     =              from_msg32->msg_iovlen;
+       to_msg->msg_control    = (void*)(long)from_msg32->msg_control;
+       to_msg->msg_controllen =              from_msg32->msg_controllen;
+       to_msg->msg_flags      =              from_msg32->msg_flags;
+}
+#endif
+
+static bool
+extractmsghdr(struct tcb *tcp, long addr, struct msghdr *msg)
+{
+#if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
+       if (current_wordsize == 4) {
+               struct msghdr32 msg32;
+
+               if (umove(tcp, addr, &msg32) < 0)
+                       return false;
+               copy_from_msghdr32(msg, &msg32);
+       } else
+#endif
+       if (umove(tcp, addr, msg) < 0)
+               return false;
+       return true;
+}
+
+static bool
+extractmmsghdr(struct tcb *tcp, long addr, unsigned int idx, struct mmsghdr *mmsg)
+{
+#if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
+       if (current_wordsize == 4) {
+               struct mmsghdr32 mmsg32;
+
+               addr += sizeof(struct mmsghdr32) * idx;
+               if (umove(tcp, addr, &mmsg32) < 0)
+                       return false;
+
+               copy_from_msghdr32(&mmsg->msg_hdr, &mmsg32.msg_hdr);
+               mmsg->msg_len = mmsg32.msg_len;
+       } else
+#endif
+       {
+               addr += sizeof(*mmsg) * idx;
+               if (umove(tcp, addr, mmsg) < 0)
+                       return false;
+       }
+       return true;
 }
 
 static void
-printmsghdr(struct tcb *tcp, long addr)
+printmsghdr(struct tcb *tcp, long addr, unsigned long data_size)
 {
        struct msghdr msg;
 
-       if (umove(tcp, addr, &msg) < 0) {
+       if (verbose(tcp) && extractmsghdr(tcp, addr, &msg))
+               do_msghdr(tcp, &msg, data_size);
+       else
                tprintf("%#lx", addr);
-               return;
-       }
-       do_msghdr(tcp, &msg);
 }
 
-#ifdef LINUX
+void
+dumpiov_in_msghdr(struct tcb *tcp, long addr)
+{
+       struct msghdr msg;
+
+       if (extractmsghdr(tcp, addr, &msg))
+               dumpiov(tcp, msg.msg_iovlen, (long)msg.msg_iov);
+}
+
 static void
-printmmsghdr(struct tcb *tcp, long addr)
+printmmsghdr(struct tcb *tcp, long addr, unsigned int idx, unsigned long msg_len)
 {
-       struct mmsghdr {
-               struct msghdr msg_hdr;
-               unsigned msg_len;
-       } mmsg;
+       struct mmsghdr mmsg;
 
-       if (umove(tcp, addr, &mmsg) < 0) {
+       if (extractmmsghdr(tcp, addr, idx, &mmsg)) {
+               tprints("{");
+               do_msghdr(tcp, &mmsg.msg_hdr, msg_len ? msg_len : mmsg.msg_len);
+               tprintf(", %u}", mmsg.msg_len);
+       }
+       else
                tprintf("%#lx", addr);
-               return;
+}
+
+static void
+decode_mmsg(struct tcb *tcp, unsigned long msg_len)
+{
+       /* mmsgvec */
+       if (syserror(tcp)) {
+               tprintf("%#lx", tcp->u_arg[1]);
+       } else {
+               unsigned int len = tcp->u_rval;
+               unsigned int i;
+
+               tprints("{");
+               for (i = 0; i < len; ++i) {
+                       if (i)
+                               tprints(", ");
+                       printmmsghdr(tcp, tcp->u_arg[1], i, msg_len);
+               }
+               tprints("}");
        }
-       tprintf("{");
-       do_msghdr(tcp, &mmsg.msg_hdr);
-       tprintf(", %u}", mmsg.msg_len);
+       /* vlen */
+       tprintf(", %u, ", (unsigned int) tcp->u_arg[2]);
+       /* flags */
+       printflags(msg_flags, tcp->u_arg[3], "MSG_???");
 }
-#endif
 
+void
+dumpiov_in_mmsghdr(struct tcb *tcp, long addr)
+{
+       unsigned int len = tcp->u_rval;
+       unsigned int i;
+       struct mmsghdr mmsg;
+
+       for (i = 0; i < len; ++i) {
+               if (extractmmsghdr(tcp, addr, i, &mmsg)) {
+                       tprintf(" = %lu buffers in vector %u\n",
+                               (unsigned long)mmsg.msg_hdr.msg_iovlen, i);
+                       dumpiov(tcp, mmsg.msg_hdr.msg_iovlen,
+                               (long)mmsg.msg_hdr.msg_iov);
+               }
+       }
+}
 #endif /* HAVE_SENDMSG */
 
 /*
@@ -1463,7 +715,7 @@ printmmsghdr(struct tcb *tcp, long addr)
  * other bits are socket type flags.
  */
 static void
-tprint_sock_type(struct tcb *tcp, int flags)
+tprint_sock_type(int flags)
 {
        const char *str = xlookup(socktypes, flags & SOCK_TYPE_MASK);
 
@@ -1472,7 +724,7 @@ tprint_sock_type(struct tcb *tcp, int flags)
                flags &= ~SOCK_TYPE_MASK;
                if (!flags)
                        return;
-               tprintf("|");
+               tprints("|");
        }
        printflags(sock_type_flags, flags, "SOCK_???");
 }
@@ -1482,24 +734,34 @@ sys_socket(struct tcb *tcp)
 {
        if (entering(tcp)) {
                printxval(domains, tcp->u_arg[0], "PF_???");
-               tprintf(", ");
-               tprint_sock_type(tcp, tcp->u_arg[1]);
-               tprintf(", ");
+               tprints(", ");
+               tprint_sock_type(tcp->u_arg[1]);
+               tprints(", ");
                switch (tcp->u_arg[0]) {
                case PF_INET:
 #ifdef PF_INET6
                case PF_INET6:
 #endif
-                       printxval(protocols, tcp->u_arg[2], "IPPROTO_???");
+                       printxval(inet_protocols, tcp->u_arg[2], "IPPROTO_???");
                        break;
 #ifdef PF_IPX
                case PF_IPX:
                        /* BTW: I don't believe this.. */
-                       tprintf("[");
+                       tprints("[");
                        printxval(domains, tcp->u_arg[2], "PF_???");
-                       tprintf("]");
+                       tprints("]");
                        break;
 #endif /* PF_IPX */
+#ifdef PF_NETLINK
+               case PF_NETLINK:
+                       printxval(netlink_protocols, tcp->u_arg[2], "NETLINK_???");
+                       break;
+#endif
+#if defined(PF_BLUETOOTH) && defined(HAVE_BLUETOOTH_BLUETOOTH_H)
+               case PF_BLUETOOTH:
+                       printxval(bt_protocols, tcp->u_arg[2], "BTPROTO_???");
+                       break;
+#endif
                default:
                        tprintf("%lu", tcp->u_arg[2]);
                        break;
@@ -1508,38 +770,12 @@ sys_socket(struct tcb *tcp)
        return 0;
 }
 
-#ifdef SVR4
-int
-sys_so_socket(struct tcb *tcp)
-{
-       if (entering(tcp)) {
-               /* not sure really what these args are... but this
-                * is how truss prints it
-                */
-               tprintf("%ld, %ld, %ld, ",
-                 tcp->u_arg[0], tcp->u_arg[1], tcp->u_arg[2]);
-               printpath(tcp, tcp->u_arg[3]);
-               tprintf(", %ld", tcp->u_arg[4]);
-       }
-       return 0;
-}
-
-int
-sys_so_socketpair(struct tcb *tcp)
-{
-       if (entering(tcp)) {
-               /* not sure what this arg is */
-               tprintf("0x%lx", tcp->u_arg[0]);
-       }
-       return 0;
-}
-#endif /* SVR4 */
-
 int
 sys_bind(struct tcb *tcp)
 {
        if (entering(tcp)) {
-               tprintf("%ld, ", tcp->u_arg[0]);
+               printfd(tcp, tcp->u_arg[0]);
+               tprints(", ");
                printsock(tcp, tcp->u_arg[1], tcp->u_arg[2]);
                tprintf(", %lu", tcp->u_arg[2]);
        }
@@ -1556,16 +792,19 @@ int
 sys_listen(struct tcb *tcp)
 {
        if (entering(tcp)) {
-               tprintf("%ld, %lu", tcp->u_arg[0], tcp->u_arg[1]);
+               printfd(tcp, tcp->u_arg[0]);
+               tprints(", ");
+               tprintf("%lu", tcp->u_arg[1]);
        }
        return 0;
 }
 
 static int
-do_accept(struct tcb *tcp, int flags_arg)
+do_sockname(struct tcb *tcp, int flags_arg)
 {
        if (entering(tcp)) {
-               tprintf("%ld, ", tcp->u_arg[0]);
+               printfd(tcp, tcp->u_arg[0]);
+               tprints(", ");
                return 0;
        }
        if (!tcp->u_arg[2])
@@ -1578,11 +817,11 @@ do_accept(struct tcb *tcp, int flags_arg)
                } else {
                        printsock(tcp, tcp->u_arg[1], len);
                }
-               tprintf(", ");
+               tprints(", ");
                printnum_int(tcp, tcp->u_arg[2], "%u");
        }
        if (flags_arg >= 0) {
-               tprintf(", ");
+               tprints(", ");
                printflags(sock_type_flags, tcp->u_arg[flags_arg],
                           "SOCK_???");
        }
@@ -1592,22 +831,23 @@ do_accept(struct tcb *tcp, int flags_arg)
 int
 sys_accept(struct tcb *tcp)
 {
-       return do_accept(tcp, -1);
+       do_sockname(tcp, -1);
+       return RVAL_FD;
 }
 
-#ifdef LINUX
 int
 sys_accept4(struct tcb *tcp)
 {
-       return do_accept(tcp, 3);
+       do_sockname(tcp, 3);
+       return RVAL_FD;
 }
-#endif
 
 int
 sys_send(struct tcb *tcp)
 {
        if (entering(tcp)) {
-               tprintf("%ld, ", tcp->u_arg[0]);
+               printfd(tcp, tcp->u_arg[0]);
+               tprints(", ");
                printstr(tcp, tcp->u_arg[1], tcp->u_arg[2]);
                tprintf(", %lu, ", tcp->u_arg[2]);
                /* flags */
@@ -1620,13 +860,14 @@ int
 sys_sendto(struct tcb *tcp)
 {
        if (entering(tcp)) {
-               tprintf("%ld, ", tcp->u_arg[0]);
+               printfd(tcp, tcp->u_arg[0]);
+               tprints(", ");
                printstr(tcp, tcp->u_arg[1], tcp->u_arg[2]);
                tprintf(", %lu, ", tcp->u_arg[2]);
                /* flags */
                printflags(msg_flags, tcp->u_arg[3], "MSG_???");
                /* to address */
-               tprintf(", ");
+               tprints(", ");
                printsock(tcp, tcp->u_arg[4], tcp->u_arg[5]);
                /* to length */
                tprintf(", %lu", tcp->u_arg[5]);
@@ -1640,22 +881,43 @@ int
 sys_sendmsg(struct tcb *tcp)
 {
        if (entering(tcp)) {
-               tprintf("%ld, ", tcp->u_arg[0]);
-               printmsghdr(tcp, tcp->u_arg[1]);
+               printfd(tcp, tcp->u_arg[0]);
+               tprints(", ");
+               printmsghdr(tcp, tcp->u_arg[1], (unsigned long) -1L);
                /* flags */
-               tprintf(", ");
+               tprints(", ");
                printflags(msg_flags, tcp->u_arg[2], "MSG_???");
        }
        return 0;
 }
 
+int
+sys_sendmmsg(struct tcb *tcp)
+{
+       if (entering(tcp)) {
+               /* sockfd */
+               printfd(tcp, tcp->u_arg[0]);
+               tprints(", ");
+               if (!verbose(tcp)) {
+                       tprintf("%#lx, %u, ",
+                               tcp->u_arg[1], (unsigned int) tcp->u_arg[2]);
+                       printflags(msg_flags, tcp->u_arg[3], "MSG_???");
+               }
+       } else {
+               if (verbose(tcp))
+                       decode_mmsg(tcp, (unsigned long) -1L);
+       }
+       return 0;
+}
+
 #endif /* HAVE_SENDMSG */
 
 int
 sys_recv(struct tcb *tcp)
 {
        if (entering(tcp)) {
-               tprintf("%ld, ", tcp->u_arg[0]);
+               printfd(tcp, tcp->u_arg[0]);
+               tprints(", ");
        } else {
                if (syserror(tcp))
                        tprintf("%#lx", tcp->u_arg[1]);
@@ -1674,7 +936,8 @@ sys_recvfrom(struct tcb *tcp)
        int fromlen;
 
        if (entering(tcp)) {
-               tprintf("%ld, ", tcp->u_arg[0]);
+               printfd(tcp, tcp->u_arg[0]);
+               tprints(", ");
        } else {
                if (syserror(tcp)) {
                        tprintf("%#lx, %lu, %lu, %#lx, %#lx",
@@ -1691,20 +954,20 @@ sys_recvfrom(struct tcb *tcp)
                /* from address, len */
                if (!tcp->u_arg[4] || !tcp->u_arg[5]) {
                        if (tcp->u_arg[4] == 0)
-                               tprintf(", NULL");
+                               tprints(", NULL");
                        else
                                tprintf(", %#lx", tcp->u_arg[4]);
                        if (tcp->u_arg[5] == 0)
-                               tprintf(", NULL");
+                               tprints(", NULL");
                        else
                                tprintf(", %#lx", tcp->u_arg[5]);
                        return 0;
                }
                if (umove(tcp, tcp->u_arg[5], &fromlen) < 0) {
-                       tprintf(", {...}, [?]");
+                       tprints(", {...}, [?]");
                        return 0;
                }
-               tprintf(", ");
+               tprints(", ");
                printsock(tcp, tcp->u_arg[4], tcp->u_arg[5]);
                /* from length */
                tprintf(", [%u]", fromlen);
@@ -1718,46 +981,45 @@ int
 sys_recvmsg(struct tcb *tcp)
 {
        if (entering(tcp)) {
-               tprintf("%ld, ", tcp->u_arg[0]);
+               printfd(tcp, tcp->u_arg[0]);
+               tprints(", ");
        } else {
-               if (syserror(tcp) || !verbose(tcp))
+               if (syserror(tcp))
                        tprintf("%#lx", tcp->u_arg[1]);
                else
-                       printmsghdr(tcp, tcp->u_arg[1]);
+                       printmsghdr(tcp, tcp->u_arg[1], tcp->u_rval);
                /* flags */
-               tprintf(", ");
+               tprints(", ");
                printflags(msg_flags, tcp->u_arg[2], "MSG_???");
        }
        return 0;
 }
 
-#ifdef LINUX
 int
 sys_recvmmsg(struct tcb *tcp)
 {
-       static char str[128];
-       if (entering(tcp)) {
+       /* +5 chars are for "left " prefix */
+       static char str[5 + TIMESPEC_TEXT_BUFSIZE];
 
-               tprintf("%ld, ", tcp->u_arg[0]);
+       if (entering(tcp)) {
+               printfd(tcp, tcp->u_arg[0]);
+               tprints(", ");
                if (verbose(tcp)) {
                        sprint_timespec(str, tcp, tcp->u_arg[4]);
+                       /* Abusing tcp->auxstr as temp storage.
+                        * Will be used and freed on syscall exit.
+                        */
                        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(", ");
+                       tprints(", ");
                        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_???");
+                       decode_mmsg(tcp, 0);
                        /* timeout on entrance */
                        tprintf(", %s", tcp->auxstr ? tcp->auxstr : "{...}");
                        free((void *) tcp->auxstr);
@@ -1772,571 +1034,472 @@ sys_recvmmsg(struct tcb *tcp)
                if (!verbose(tcp))
                        return 0;
                /* timeout on exit */
-               strcpy(str, "left ");
-               sprint_timespec(str + strlen(str), tcp, tcp->u_arg[4]);
+               sprint_timespec(stpcpy(str, "left "), 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            }
-};
+#include "xlat/shutdown_modes.h"
 
 int
 sys_shutdown(struct tcb *tcp)
 {
        if (entering(tcp)) {
-               tprintf("%ld, ", tcp->u_arg[0]);
+               printfd(tcp, tcp->u_arg[0]);
+               tprints(", ");
                printxval(shutdown_modes, tcp->u_arg[1], "SHUT_???");
        }
        return 0;
 }
 
-int
-sys_getsockname(struct tcb *tcp)
-{
-       return sys_accept(tcp);
-}
-
-int
-sys_getpeername(struct tcb *tcp)
-{
-       return sys_accept(tcp);
-}
-
-static int
-do_pipe(struct tcb *tcp, int flags_arg)
-{
-       if (exiting(tcp)) {
-               if (syserror(tcp)) {
-                       tprintf("%#lx", tcp->u_arg[0]);
-               } else {
-#if defined(LINUX) && !defined(SPARC) && !defined(SPARC64) && !defined(SH) && !defined(IA64)
-                       int fds[2];
-
-                       if (umoven(tcp, tcp->u_arg[0], sizeof fds, (char *) fds) < 0)
-                               tprintf("[...]");
-                       else
-                               tprintf("[%u, %u]", fds[0], fds[1]);
-#elif defined(SPARC) || defined(SPARC64) || defined(SH) || defined(SVR4) || defined(FREEBSD) || defined(IA64)
-                       tprintf("[%lu, %lu]", tcp->u_rval, getrval2(tcp));
-#else
-                       tprintf("%#lx", tcp->u_arg[0]);
-#endif
-               }
-               if (flags_arg >= 0) {
-                       tprintf(", ");
-                       printflags(open_mode_flags, tcp->u_arg[flags_arg], "O_???");
-               }
-       }
-       return 0;
-}
-
-int
-sys_pipe(struct tcb *tcp)
-{
-       return do_pipe(tcp, -1);
-}
-
-#ifdef LINUX
-int
-sys_pipe2(struct tcb *tcp)
-{
-       return do_pipe(tcp, 1);
-}
-#endif
-
-int
-sys_socketpair(struct tcb *tcp)
-{
-#ifdef LINUX
-       int fds[2];
-#endif
-
-       if (entering(tcp)) {
-               printxval(domains, tcp->u_arg[0], "PF_???");
-               tprintf(", ");
-               tprint_sock_type(tcp, tcp->u_arg[1]);
-               tprintf(", ");
-               switch (tcp->u_arg[0]) {
-               case PF_INET:
-                       printxval(protocols, tcp->u_arg[2], "IPPROTO_???");
-                       break;
-#ifdef PF_IPX
-               case PF_IPX:
-                       /* BTW: I don't believe this.. */
-                       tprintf("[");
-                       printxval(domains, tcp->u_arg[2], "PF_???");
-                       tprintf("]");
-                       break;
-#endif /* PF_IPX */
-               default:
-                       tprintf("%lu", tcp->u_arg[2]);
-                       break;
-               }
-       } else {
-               if (syserror(tcp)) {
-                       tprintf(", %#lx", tcp->u_arg[3]);
-                       return 0;
-               }
-#ifdef LINUX
-               if (umoven(tcp, tcp->u_arg[3], sizeof fds, (char *) fds) < 0)
-                       tprintf(", [...]");
-               else
-                       tprintf(", [%u, %u]", fds[0], fds[1]);
-#endif /* LINUX */
-#if defined(SUNOS4) || defined(SVR4) || defined(FREEBSD)
-               tprintf(", [%lu, %lu]", tcp->u_rval, getrval2(tcp));
-#endif /* SUNOS4 || SVR4 || FREEBSD */
-       }
-       return 0;
-}
-
-int
-sys_getsockopt(struct tcb *tcp)
-{
-       if (entering(tcp)) {
-               tprintf("%ld, ", tcp->u_arg[0]);
-               printxval(socketlayers, tcp->u_arg[1], "SOL_???");
-               tprintf(", ");
-               switch (tcp->u_arg[1]) {
-               case SOL_SOCKET:
-                       printxval(sockoptions, tcp->u_arg[2], "SO_???");
-                       break;
-#ifdef SOL_IP
-               case SOL_IP:
-                       printxval(sockipoptions, tcp->u_arg[2], "IP_???");
-                       break;
-#endif
-#ifdef SOL_IPV6
-               case SOL_IPV6:
-                       printxval(sockipv6options, tcp->u_arg[2], "IPV6_???");
-                       break;
-#endif
-#ifdef SOL_IPX
-               case SOL_IPX:
-                       printxval(sockipxoptions, tcp->u_arg[2], "IPX_???");
-                       break;
-#endif
-#ifdef SOL_PACKET
-               case SOL_PACKET:
-                       printxval(sockpacketoptions, tcp->u_arg[2], "PACKET_???");
-                       break;
-#endif
-#ifdef SOL_TCP
-               case SOL_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 */
-               default:
-                       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",
-                               tcp->u_arg[3], tcp->u_arg[4]);
-                       return 0;
-               }
-
-               switch (tcp->u_arg[1]) {
-               case SOL_SOCKET:
-                       switch (tcp->u_arg[2]) {
-#ifdef SO_LINGER
-                       case SO_LINGER:
-                               if (len == sizeof(struct linger)) {
-                                       struct linger linger;
-                                       if (umove(tcp,
-                                                  tcp->u_arg[3],
-                                                  &linger) < 0)
-                                               break;
-                                       tprintf("{onoff=%d, linger=%d}, "
-                                               "[%d]",
-                                               linger.l_onoff,
-                                               linger.l_linger,
-                                               len);
-                                       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;
-               }
+int
+sys_getsockname(struct tcb *tcp)
+{
+       return do_sockname(tcp, -1);
+}
 
-               if (len == sizeof(int)) {
-                       printnum_int(tcp, tcp->u_arg[3], "%d");
+static int
+do_pipe(struct tcb *tcp, int flags_arg)
+{
+       if (exiting(tcp)) {
+               if (syserror(tcp)) {
+                       tprintf("%#lx", tcp->u_arg[0]);
+               } else {
+#if !defined(SPARC) && !defined(SPARC64) && !defined(SH) && !defined(IA64)
+                       int fds[2];
+
+                       if (umoven(tcp, tcp->u_arg[0], sizeof fds, (char *) fds) < 0)
+                               tprints("[...]");
+                       else
+                               tprintf("[%u, %u]", fds[0], fds[1]);
+#elif defined(SPARC) || defined(SPARC64) || defined(SH) || defined(IA64)
+                       tprintf("[%lu, %lu]", tcp->u_rval, getrval2(tcp));
+#else
+                       tprintf("%#lx", tcp->u_arg[0]);
+#endif
                }
-               else {
-                       printstr(tcp, tcp->u_arg[3], len);
+               if (flags_arg >= 0) {
+                       tprints(", ");
+                       printflags(open_mode_flags, tcp->u_arg[flags_arg], "O_???");
                }
-               tprintf(", [%d]", len);
        }
        return 0;
 }
 
-#if defined(ICMP_FILTER)
-static void printicmpfilter(struct tcb *tcp, long addr)
+int
+sys_pipe(struct tcb *tcp)
 {
-       struct icmp_filter      filter;
+       return do_pipe(tcp, -1);
+}
 
-       if (!addr) {
-               tprintf("NULL");
-               return;
-       }
-       if (syserror(tcp) || !verbose(tcp)) {
-               tprintf("%#lx", addr);
-               return;
-       }
-       if (umove(tcp, addr, &filter) < 0) {
-               tprintf("{...}");
-               return;
-       }
+int
+sys_pipe2(struct tcb *tcp)
+{
+       return do_pipe(tcp, 1);
+}
 
-       tprintf("~(");
-       printflags(icmpfilterflags, ~filter.data, "ICMP_???");
-       tprintf(")");
+int
+sys_socketpair(struct tcb *tcp)
+{
+       int fds[2];
+
+       if (entering(tcp)) {
+               printxval(domains, tcp->u_arg[0], "PF_???");
+               tprints(", ");
+               tprint_sock_type(tcp->u_arg[1]);
+               tprintf(", %lu", tcp->u_arg[2]);
+       } else {
+               if (syserror(tcp)) {
+                       tprintf(", %#lx", tcp->u_arg[3]);
+                       return 0;
+               }
+               if (umoven(tcp, tcp->u_arg[3], sizeof fds, (char *) fds) < 0)
+                       tprints(", [...]");
+               else
+                       tprintf(", [%u, %u]", fds[0], fds[1]);
+       }
+       return 0;
 }
-#endif /* ICMP_FILTER */
 
-static int
-printsockopt(struct tcb *tcp, int level, int name, long addr, int len)
+#include "xlat/sockoptions.h"
+#include "xlat/sockipoptions.h"
+#include "xlat/sockipv6options.h"
+#include "xlat/sockipxoptions.h"
+#include "xlat/sockrawoptions.h"
+#include "xlat/sockpacketoptions.h"
+#include "xlat/socksctpoptions.h"
+#include "xlat/socktcpoptions.h"
+
+static void
+print_sockopt_fd_level_name(struct tcb *tcp, int fd, int level, int name)
 {
+       printfd(tcp, fd);
+       tprints(", ");
        printxval(socketlayers, level, "SOL_??");
-       tprintf(", ");
+       tprints(", ");
+
        switch (level) {
-           case SOL_SOCKET:
+       case SOL_SOCKET:
                printxval(sockoptions, name, "SO_???");
-               switch (name) {
-#if defined(SO_LINGER)
-                   case SO_LINGER:
-                       if (len == sizeof(struct linger)) {
-                               struct linger linger;
-                               if (umove(tcp, addr, &linger) < 0)
-                                       break;
-                               tprintf(", {onoff=%d, linger=%d}",
-                                       linger.l_onoff,
-                                       linger.l_linger);
-                               return 0;
-                       }
-                       break;
-#endif
-               }
                break;
-#ifdef SOL_IP
-           case SOL_IP:
+       case SOL_IP:
                printxval(sockipoptions, name, "IP_???");
                break;
-#endif
-#ifdef SOL_IPV6
-           case SOL_IPV6:
+       case SOL_IPV6:
                printxval(sockipv6options, name, "IPV6_???");
                break;
-#endif
-#ifdef SOL_IPX
-           case SOL_IPX:
+       case SOL_IPX:
                printxval(sockipxoptions, name, "IPX_???");
                break;
-#endif
-#ifdef SOL_PACKET
-           case SOL_PACKET:
+       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
-           case SOL_TCP:
+       case SOL_TCP:
                printxval(socktcpoptions, name, "TCP_???");
                break;
-#endif
-#ifdef SOL_SCTP
-          case SOL_SCTP:
+       case SOL_SCTP:
                printxval(socksctpoptions, name, "SCTP_???");
                break;
-#endif
-#ifdef SOL_RAW
-           case SOL_RAW:
+       case SOL_RAW:
                printxval(sockrawoptions, name, "RAW_???");
-               switch (name) {
-#if defined(ICMP_FILTER)
-                   case ICMP_FILTER:
-                       tprintf(", ");
-                       printicmpfilter(tcp, addr);
-                       return 0;
-#endif
-               }
                break;
-#endif
 
-               /* SOL_AX25 SOL_ATALK SOL_NETROM SOL_UDP SOL_DECNET SOL_X25
-                * etc. still need work  */
+               /* Other SOL_* protocol levels still need work. */
 
-           default:
+       default:
                tprintf("%u", name);
        }
 
-       /* default arg printing */
+       tprints(", ");
+}
 
-       tprintf(", ");
+#ifdef SO_LINGER
+static void
+print_linger(struct tcb *tcp, long addr, int len)
+{
+       struct linger linger;
 
-       if (len == sizeof(int)) {
-               printnum_int(tcp, addr, "%d");
+       if (len != sizeof(linger) ||
+           umove(tcp, addr, &linger) < 0) {
+               tprintf("%#lx", addr);
+               return;
        }
-       else {
-               printstr(tcp, addr, len);
+
+       tprintf("{onoff=%d, linger=%d}",
+               linger.l_onoff,
+               linger.l_linger);
+}
+#endif /* SO_LINGER */
+
+#ifdef SO_PEERCRED
+static void
+print_ucred(struct tcb *tcp, long addr, int len)
+{
+       struct ucred uc;
+
+       if (len != sizeof(uc) ||
+           umove(tcp, addr, &uc) < 0) {
+               tprintf("%#lx", addr);
+       } else {
+               tprintf("{pid=%u, uid=%u, gid=%u}",
+                       (unsigned) uc.pid,
+                       (unsigned) uc.uid,
+                       (unsigned) uc.gid);
        }
-       return 0;
 }
+#endif /* SO_PEERCRED */
 
+#ifdef PACKET_STATISTICS
+static void
+print_tpacket_stats(struct tcb *tcp, long addr, int len)
+{
+       struct tpacket_stats stats;
 
-#ifdef HAVE_STRUCT_OPTHDR
+       if (len != sizeof(stats) ||
+           umove(tcp, addr, &stats) < 0) {
+               tprintf("%#lx", addr);
+       } else {
+               tprintf("{packets=%u, drops=%u}",
+                       stats.tp_packets,
+                       stats.tp_drops);
+       }
+}
+#endif /* PACKET_STATISTICS */
 
-void
-print_sock_optmgmt(struct tcb *tcp, long addr, int len)
+#ifdef ICMP_FILTER
+# include "xlat/icmpfilterflags.h"
+
+static void
+print_icmp_filter(struct tcb *tcp, long addr, int len)
 {
-       int c = 0;
-       struct opthdr hdr;
+       struct icmp_filter      filter;
+
+       if (len != sizeof(filter) ||
+           umove(tcp, addr, &filter) < 0) {
+               tprintf("%#lx", addr);
+               return;
+       }
+
+       tprints("~(");
+       printflags(icmpfilterflags, ~filter.data, "ICMP_???");
+       tprints(")");
+}
+#endif /* ICMP_FILTER */
 
-       while (len >= (int) sizeof hdr) {
-               if (umove(tcp, addr, &hdr) < 0) break;
-               if (c++) {
-                       tprintf(", ");
+static void
+print_getsockopt(struct tcb *tcp, int level, int name, long addr, int len)
+{
+       if (addr && verbose(tcp))
+       switch (level) {
+       case SOL_SOCKET:
+               switch (name) {
+#ifdef SO_LINGER
+               case SO_LINGER:
+                       print_linger(tcp, addr, len);
+                       goto done;
+#endif
+#ifdef SO_PEERCRED
+               case SO_PEERCRED:
+                       print_ucred(tcp, addr, len);
+                       goto done;
+#endif
                }
-               else if (len > hdr.len + sizeof hdr) {
-                       tprintf("[");
+               break;
+
+       case SOL_PACKET:
+               switch (name) {
+#ifdef PACKET_STATISTICS
+               case PACKET_STATISTICS:
+                       print_tpacket_stats(tcp, addr, len);
+                       goto done;
+#endif
                }
-               tprintf("{");
-               addr += sizeof hdr;
-               len -= sizeof hdr;
-               printsockopt(tcp, hdr.level, hdr.name, addr, hdr.len);
-               if (hdr.len > 0) {
-                       addr += hdr.len;
-                       len -= hdr.len;
+               break;
+
+       case SOL_RAW:
+               switch (name) {
+#ifdef ICMP_FILTER
+               case ICMP_FILTER:
+                       print_icmp_filter(tcp, addr, len);
+                       goto done;
+#endif
                }
-               tprintf("}");
+               break;
        }
-       if (len > 0) {
-               if (c++) tprintf(", ");
-               printstr(tcp, addr, len);
+
+       /* default arg printing */
+
+       if (verbose(tcp)) {
+               if (len == sizeof(int)) {
+                       printnum_int(tcp, addr, "%d");
+               } else {
+                       printstr(tcp, addr, len);
+               }
+       } else {
+               tprintf("%#lx", addr);
        }
-       if (c > 1) tprintf("]");
+done:
+       tprintf(", [%d]", len);
 }
 
-#endif
-
 int
-sys_setsockopt(struct tcb *tcp)
+sys_getsockopt(struct tcb *tcp)
 {
        if (entering(tcp)) {
-               tprintf("%ld, ", tcp->u_arg[0]);
-               printsockopt(tcp, tcp->u_arg[1], tcp->u_arg[2],
-                             tcp->u_arg[3], tcp->u_arg[4]);
-               tprintf(", %lu", tcp->u_arg[4]);
+               print_sockopt_fd_level_name(tcp, tcp->u_arg[0],
+                                           tcp->u_arg[1], tcp->u_arg[2]);
+       } else {
+               int len;
+
+               if (syserror(tcp) || umove(tcp, tcp->u_arg[4], &len) < 0) {
+                       tprintf("%#lx, %#lx",
+                               tcp->u_arg[3], tcp->u_arg[4]);
+               } else {
+                       print_getsockopt(tcp, tcp->u_arg[1], tcp->u_arg[2],
+                                        tcp->u_arg[3], len);
+               }
        }
        return 0;
 }
 
-#if UNIXWARE >= 7
+#ifdef MCAST_JOIN_GROUP
+static void
+print_group_req(struct tcb *tcp, long addr, int len)
+{
+       struct group_req greq;
 
-static const struct xlat sock_version[] = {
-       { __NETLIB_UW211_SVR4,  "UW211_SVR4" },
-       { __NETLIB_UW211_XPG4,  "UW211_XPG4" },
-       { __NETLIB_GEMINI_SVR4, "GEMINI_SVR4" },
-       { __NETLIB_GEMINI_XPG4, "GEMINI_XPG4" },
-       { __NETLIB_FP1_SVR4,    "FP1_SVR4" },
-       { __NETLIB_FP1_XPG4,    "FP1_XPG4" },
-       { 0,                    NULL },
-};
+       if (len != sizeof(greq) ||
+           umove(tcp, addr, &greq) < 0) {
+               tprintf("%#lx", addr);
+               return;
+       }
 
+       union {
+               struct sockaddr *sa;
+               struct sockaddr_in *sin;
+#ifdef HAVE_INET_NTOP
+               struct sockaddr_in6 *sin6;
+#endif
+       } a = { .sa = (struct sockaddr *) &greq.gr_group };
+#ifdef HAVE_INET_NTOP
+       char str[INET6_ADDRSTRLEN];
+#endif
 
-int
-netlib_call(struct tcb *tcp, int (*func)())
-{
-       if (entering(tcp)) {
-               int i;
-               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);
-       }
+       tprintf("{gr_interface=%u, gr_group={sa_family=", greq.gr_interface);
+       printxval(addrfams, a.sa->sa_family, "AF_???");
 
-       return func(tcp);
-}
+       switch (a.sa->sa_family) {
+       case AF_INET:
+               tprintf(", sin_port=htons(%u), sin_addr=inet_addr(\"%s\")}}",
+                       ntohs(a.sin->sin_port),
+                       inet_ntoa(a.sin->sin_addr));
+               return;
+#ifdef HAVE_INET_NTOP
+       case AF_INET6:
+               if (!inet_ntop(AF_INET6, &a.sin6->sin6_addr, str, sizeof(str)))
+                       break;
+               tprintf(", sin6_port=htons(%u)"
+                       ", inet_pton(AF_INET6, \"%s\", &sin6_addr)}}",
+                       ntohs(a.sin6->sin6_port), str);
+               return;
+#endif /* HAVE_INET_NTOP */
+       }
 
-int
-sys_xsocket(struct tcb *tcp)
-{
-       return netlib_call(tcp, sys_socket);
-}
+       tprints(", sa_data=");
+       print_quoted_string(a.sa->sa_data, sizeof(a.sa->sa_data), 0);
+       tprintf("}}");
 
-int
-sys_xsocketpair(struct tcb *tcp)
-{
-       return netlib_call(tcp, sys_socketpair);
 }
+#endif /* MCAST_JOIN_GROUP */
 
-int
-sys_xbind(struct tcb *tcp)
+#ifdef PACKET_RX_RING
+static void
+print_tpacket_req(struct tcb *tcp, long addr, int len)
 {
-       return netlib_call(tcp, sys_bind);
-}
+       struct tpacket_req req;
 
-int
-sys_xconnect(struct tcb *tcp)
-{
-       return netlib_call(tcp, sys_connect);
+       if (len != sizeof(req) ||
+           umove(tcp, addr, &req) < 0) {
+               tprintf("%#lx", addr);
+       } else {
+               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);
+       }
 }
+#endif /* PACKET_RX_RING */
 
-int
-sys_xlisten(struct tcb *tcp)
-{
-       return netlib_call(tcp, sys_listen);
-}
+#ifdef PACKET_ADD_MEMBERSHIP
+# include "xlat/packet_mreq_type.h"
 
-int
-sys_xaccept(struct tcb *tcp)
+static void
+print_packet_mreq(struct tcb *tcp, long addr, int len)
 {
-       return netlib_call(tcp, sys_accept);
-}
+       struct packet_mreq mreq;
 
-int
-sys_xsendmsg(struct tcb *tcp)
-{
-       return netlib_call(tcp, sys_sendmsg);
+       if (len != sizeof(mreq) ||
+           umove(tcp, addr, &mreq) < 0) {
+               tprintf("%#lx", addr);
+       } else {
+               unsigned int i;
+
+               tprintf("{mr_ifindex=%u, mr_type=", mreq.mr_ifindex);
+               printxval(packet_mreq_type, mreq.mr_type, "PACKET_MR_???");
+               tprintf(", mr_alen=%u, mr_address=", mreq.mr_alen);
+               if (mreq.mr_alen > ARRAY_SIZE(mreq.mr_address))
+                       mreq.mr_alen = ARRAY_SIZE(mreq.mr_address);
+               for (i = 0; i < mreq.mr_alen; ++i)
+                       tprintf("%02x", mreq.mr_address[i]);
+               tprints("}");
+       }
 }
+#endif /* PACKET_ADD_MEMBERSHIP */
 
-int
-sys_xrecvmsg(struct tcb *tcp)
+static void
+print_setsockopt(struct tcb *tcp, int level, int name, long addr, int len)
 {
-       return netlib_call(tcp, sys_recvmsg);
-}
+       if (addr && verbose(tcp))
+       switch (level) {
+       case SOL_SOCKET:
+               switch (name) {
+#ifdef SO_LINGER
+               case SO_LINGER:
+                       print_linger(tcp, addr, len);
+                       goto done;
+#endif
+               }
+               break;
 
-int
-sys_xgetsockaddr(struct tcb *tcp)
-{
-       if (entering(tcp)) {
-               printxval(sock_version, tcp->u_arg[0], "__NETLIB_???");
-               tprintf(", ");
-               if (tcp->u_arg[1] == 0) {
-                       tprintf("LOCALNAME, ");
+       case SOL_IP:
+               switch (name) {
+#ifdef MCAST_JOIN_GROUP
+               case MCAST_JOIN_GROUP:
+               case MCAST_LEAVE_GROUP:
+                       print_group_req(tcp, addr, len);
+                       goto done;
+#endif /* MCAST_JOIN_GROUP */
                }
-               else if (tcp->u_arg[1] == 1) {
-                       tprintf("REMOTENAME, ");
+               break;
+
+       case SOL_PACKET:
+               switch (name) {
+#ifdef PACKET_RX_RING
+               case PACKET_RX_RING:
+# ifdef PACKET_TX_RING
+               case PACKET_TX_RING:
+# endif
+                       print_tpacket_req(tcp, addr, len);
+                       goto done;
+#endif /* PACKET_RX_RING */
+#ifdef PACKET_ADD_MEMBERSHIP
+               case PACKET_ADD_MEMBERSHIP:
+               case PACKET_DROP_MEMBERSHIP:
+                       print_packet_mreq(tcp, addr, len);
+                       goto done;
+#endif /* PACKET_ADD_MEMBERSHIP */
                }
-               else {
-                       tprintf("%ld, ", tcp->u_arg[1]);
+               break;
+
+       case SOL_RAW:
+               switch (name) {
+#ifdef ICMP_FILTER
+               case ICMP_FILTER:
+                       print_icmp_filter(tcp, addr, len);
+                       goto done;
+#endif
                }
-               tprintf("%ld, ", tcp->u_arg[2]);
+               break;
        }
-       else {
-               if (tcp->u_arg[3] == 0 || syserror(tcp)) {
-                       tprintf("%#lx", tcp->u_arg[3]);
+
+       /* default arg printing */
+
+       if (verbose(tcp)) {
+               if (len == sizeof(int)) {
+                       printnum_int(tcp, addr, "%d");
                } else {
-                       printsock(tcp, tcp->u_arg[3], tcp->u_arg[4]);
+                       printstr(tcp, addr, len);
                }
-               tprintf(", ");
-               printnum(tcp, tcp->u_arg[4], "%lu");
+       } else {
+               tprintf("%#lx", addr);
        }
-
-       return 0;
-
-}
-
-int
-sys_xgetsockopt(struct tcb *tcp)
-{
-       return netlib_call(tcp, sys_getsockopt);
-}
-
-int
-sys_xsetsockopt(struct tcb *tcp)
-{
-       return netlib_call(tcp, sys_setsockopt);
+done:
+       tprintf(", %d", len);
 }
 
 int
-sys_xshutdown(struct tcb *tcp)
+sys_setsockopt(struct tcb *tcp)
 {
-       return netlib_call(tcp, sys_shutdown);
+       if (entering(tcp)) {
+               print_sockopt_fd_level_name(tcp, tcp->u_arg[0],
+                                           tcp->u_arg[1], tcp->u_arg[2]);
+               print_setsockopt(tcp, tcp->u_arg[1], tcp->u_arg[2],
+                                tcp->u_arg[3], tcp->u_arg[4]);
+       }
+       return 0;
 }
-
-#endif /* UNIXWARE */