#ifdef HAVE_NETINET_UDP_H
#include <netinet/udp.h>
#endif
+#ifdef HAVE_NETINET_SCTP_H
+#include <netinet/sctp.h>
+#endif
#include <arpa/inet.h>
#include <net/if.h>
#if defined(LINUX)
#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_RDM
- { SOCK_RDM, "SOCK_RDM" },
+#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 },
+};
+#ifndef SOCK_TYPE_MASK
+# define SOCK_TYPE_MASK 0xf
+#endif
static const struct xlat socketlayers[] = {
#if defined(SOL_IP)
{ SOL_IP, "SOL_IP" },
#if defined(SOL_ICMPV6)
{ SOL_ICMPV6, "SOL_ICMPV6" },
#endif
+#if defined(SOL_SCTP)
+ { SOL_SCTP, "SOL_SCTP" },
+#endif
+#if defined(SOL_UDPLITE)
+ { SOL_UDPLITE, "SOL_UDPLITE" },
+#endif
#if defined(SOL_RAW)
{ SOL_RAW, "SOL_RAW" },
#endif
#if defined(SOL_IPX)
{ SOL_IPX, "SOL_IPX" },
#endif
-#if defined(SOL_IPX)
- { SOL_IPX, "SOL_IPX" },
-#endif
#if defined(SOL_AX25)
{ SOL_AX25, "SOL_AX25" },
#endif
#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!!! ***/
{ 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_IDP
{ IPPROTO_IDP, "IPPROTO_IDP" },
#endif
+#ifdef IPPROTO_TP
+ { IPPROTO_TP, "IPPROTO_TP" },
+#endif
+#ifdef IPPROTO_DCCP
+ { IPPROTO_DCCP, "IPPROTO_DCCP" },
+#endif
#ifdef IPPROTO_IPV6
{ IPPROTO_IPV6, "IPPROTO_IPV6" },
#endif
+#ifdef IPPROTO_ROUTING
+ { IPPROTO_ROUTING, "IPPROTO_ROUTING" },
+#endif
+#ifdef IPPROTO_FRAGMENT
+ { IPPROTO_FRAGMENT, "IPPROTO_FRAGMENT" },
+#endif
+#ifdef IPPROTO_RSVP
+ { IPPROTO_RSVP, "IPPROTO_RSVP" },
+#endif
+#ifdef IPPROTO_GRE
+ { IPPROTO_GRE, "IPPROTO_GRE" },
+#endif
+#ifdef IPPROTO_ESP
+ { IPPROTO_ESP, "IPPROTO_ESP" },
+#endif
+#ifdef IPPROTO_AH
+ { IPPROTO_AH, "IPPROTO_AH" },
+#endif
#ifdef IPPROTO_ICMPV6
- { IPPROTO_ICMPV6,"IPPROTO_ICMPV6"},
+ { IPPROTO_ICMPV6, "IPPROTO_ICMPV6" },
#endif
-#ifdef IPPROTO_IGMP
- { IPPROTO_IGMP, "IPPROTO_IGMP" },
+#ifdef IPPROTO_NONE
+ { IPPROTO_NONE, "IPPROTO_NONE" },
+#endif
+#ifdef IPPROTO_DSTOPTS
+ { IPPROTO_DSTOPTS, "IPPROTO_DSTOPTS" },
#endif
#ifdef IPPROTO_HELLO
- { IPPROTO_HELLO,"IPPROTO_HELLO" },
+ { IPPROTO_HELLO, "IPPROTO_HELLO" },
#endif
#ifdef IPPROTO_ND
{ IPPROTO_ND, "IPPROTO_ND" },
#endif
+#ifdef IPPROTO_MTP
+ { IPPROTO_MTP, "IPPROTO_MTP" },
+#endif
+#ifdef IPPROTO_ENCAP
+ { IPPROTO_ENCAP, "IPPROTO_ENCAP" },
+#endif
+#ifdef IPPROTO_PIM
+ { IPPROTO_PIM, "IPPROTO_PIM" },
+#endif
+#ifdef IPPROTO_COMP
+ { IPPROTO_COMP, "IPPROTO_COMP" },
+#endif
+#ifdef IPPROTO_SCTP
+ { IPPROTO_SCTP, "IPPROTO_SCTP" },
+#endif
+#ifdef IPPROTO_UDPLITE
+ { IPPROTO_UDPLITE, "IPPROTO_UDPLITE" },
+#endif
#ifdef IPPROTO_RAW
{ IPPROTO_RAW, "IPPROTO_RAW" },
#endif
#ifdef IPPROTO_MAX
{ IPPROTO_MAX, "IPPROTO_MAX" },
-#endif
-#ifdef IPPROTO_IPIP
- { IPPROTO_IPIP, "IPPROTO_IPIP" },
#endif
{ 0, NULL },
};
#ifdef SOL_IPX
static const struct xlat sockipxoptions[] = {
- { IPX_TYPE, "IPX_TYPE" },
- { 0, NULL },
+ { IPX_TYPE, "IPX_TYPE" },
+ { 0, NULL },
};
#endif /* SOL_IPX */
#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
#endif
#if defined(PACKET_STATISTICS)
{ PACKET_STATISTICS, "PACKET_STATISTICS" },
+#endif
+#if defined(PACKET_COPY_THRESH)
+ { PACKET_COPY_THRESH, "PACKET_COPY_THRESH" },
+#endif
+#if defined(PACKET_AUXDATA)
+ { PACKET_AUXDATA, "PACKET_AUXDATA" },
+#endif
+#if defined(PACKET_ORIGDEV)
+ { PACKET_ORIGDEV, "PACKET_ORIGDEV" },
+#endif
+#if defined(PACKET_VERSION)
+ { PACKET_VERSION, "PACKET_VERSION" },
+#endif
+#if defined(PACKET_HDRLEN)
+ { PACKET_HDRLEN, "PACKET_HDRLEN" },
+#endif
+#if defined(PACKET_RESERVE)
+ { PACKET_RESERVE, "PACKET_RESERVE" },
+#endif
+#if defined(PACKET_TX_RING)
+ { PACKET_TX_RING, "PACKET_TX_RING" },
+#endif
+#if defined(PACKET_LOSS)
+ { PACKET_LOSS, "PACKET_LOSS" },
#endif
{ 0, NULL },
};
#endif /* SOL_PACKET */
+#ifdef SOL_SCTP
+static const struct xlat socksctpoptions[] = {
+#if defined(SCTP_RTOINFO)
+ { SCTP_RTOINFO, "SCTP_RTOINFO" },
+#endif
+#if defined(SCTP_ASSOCINFO)
+ { SCTP_ASSOCINFO, "SCTP_ASSOCINFO"},
+#endif
+#if defined(SCTP_INITMSG)
+ { SCTP_INITMSG, "SCTP_INITMSG" },
+#endif
+#if defined(SCTP_NODELAY)
+ { SCTP_NODELAY, "SCTP_NODELAY" },
+#endif
+#if defined(SCTP_AUTOCLOSE)
+ { SCTP_AUTOCLOSE, "SCTP_AUTOCLOSE"},
+#endif
+#if defined(SCTP_SET_PEER_PRIMARY_ADDR)
+ { SCTP_SET_PEER_PRIMARY_ADDR, "SCTP_SET_PEER_PRIMARY_ADDR"},
+#endif
+#if defined(SCTP_PRIMARY_ADDR)
+ { SCTP_PRIMARY_ADDR, "SCTP_PRIMARY_ADDR" },
+#endif
+#if defined(SCTP_ADAPTATION_LAYER)
+ { SCTP_ADAPTATION_LAYER, "SCTP_ADAPTATION_LAYER" },
+#endif
+#if defined(SCTP_DISABLE_FRAGMENTS)
+ { SCTP_DISABLE_FRAGMENTS, "SCTP_DISABLE_FRAGMENTS"},
+#endif
+#if defined(SCTP_PEER_ADDR_PARAMS)
+ { SCTP_PEER_ADDR_PARAMS, "SCTP_PEER_ADDR_PARAMS" },
+#endif
+#if defined(SCTP_DEFAULT_SEND_PARAM)
+ { SCTP_DEFAULT_SEND_PARAM, "SCTP_DEFAULT_SEND_PARAM"},
+#endif
+#if defined(SCTP_EVENTS)
+ { SCTP_EVENTS, "SCTP_EVENTS" },
+#endif
+#if defined(SCTP_I_WANT_MAPPED_V4_ADDR)
+ { SCTP_I_WANT_MAPPED_V4_ADDR, "SCTP_I_WANT_MAPPED_V4_ADDR"},
+#endif
+#if defined(SCTP_MAXSEG)
+ { SCTP_MAXSEG, "SCTP_MAXSEG" },
+#endif
+#if defined(SCTP_STATUS)
+ { SCTP_STATUS, "SCTP_STATUS" },
+#endif
+#if defined(SCTP_GET_PEER_ADDR_INFO)
+ { SCTP_GET_PEER_ADDR_INFO, "SCTP_GET_PEER_ADDR_INFO"},
+#endif
+#if defined(SCTP_DELAYED_ACK)
+ { SCTP_DELAYED_ACK, "SCTP_DELAYED_ACK" },
+#endif
+#if defined(SCTP_CONTEXT)
+ { SCTP_CONTEXT, "SCTP_CONTEXT" },
+#endif
+#if defined(SCTP_FRAGMENT_INTERLEAVE)
+ { SCTP_FRAGMENT_INTERLEAVE, "SCTP_FRAGMENT_INTERLEAVE"},
+#endif
+#if defined(SCTP_PARTIAL_DELIVERY_POINT)
+ { SCTP_PARTIAL_DELIVERY_POINT, "SCTP_PARTIAL_DELIVERY_POINT"},
+#endif
+#if defined(SCTP_MAX_BURST)
+ { SCTP_MAX_BURST, "SCTP_MAX_BURST" },
+#endif
+#if defined(SCTP_AUTH_CHUNK)
+ { SCTP_AUTH_CHUNK, "SCTP_AUTH_CHUNK" },
+#endif
+#if defined(SCTP_HMAC_IDENT)
+ { SCTP_HMAC_IDENT, "SCTP_HMAC_IDENT" },
+#endif
+#if defined(SCTP_AUTH_KEY)
+ { SCTP_AUTH_KEY, "SCTP_AUTH_KEY" },
+#endif
+#if defined(SCTP_AUTH_ACTIVE_KEY)
+ { SCTP_AUTH_ACTIVE_KEY, "SCTP_AUTH_ACTIVE_KEY" },
+#endif
+#if defined(SCTP_AUTH_DELETE_KEY)
+ { SCTP_AUTH_DELETE_KEY, "SCTP_AUTH_DELETE_KEY" },
+#endif
+#if defined(SCTP_PEER_AUTH_CHUNKS)
+ { SCTP_PEER_AUTH_CHUNKS, "SCTP_PEER_AUTH_CHUNKS" },
+#endif
+#if defined(SCTP_LOCAL_AUTH_CHUNKS)
+ { SCTP_LOCAL_AUTH_CHUNKS, "SCTP_LOCAL_AUTH_CHUNKS"},
+#endif
+#if defined(SCTP_GET_ASSOC_NUMBER)
+ { SCTP_GET_ASSOC_NUMBER, "SCTP_GET_ASSOC_NUMBER" },
+#endif
+
+ /* linux specific things */
+#if defined(SCTP_SOCKOPT_BINDX_ADD)
+ { SCTP_SOCKOPT_BINDX_ADD, "SCTP_SOCKOPT_BINDX_ADD" },
+#endif
+#if defined(SCTP_SOCKOPT_BINDX_REM)
+ { SCTP_SOCKOPT_BINDX_REM, "SCTP_SOCKOPT_BINDX_REM" },
+#endif
+#if defined(SCTP_SOCKOPT_PEELOFF)
+ { SCTP_SOCKOPT_PEELOFF, "SCTP_SOCKOPT_PEELOFF" },
+#endif
+#if defined(SCTP_GET_PEER_ADDRS_NUM_OLD)
+ { SCTP_GET_PEER_ADDRS_NUM_OLD, "SCTP_GET_PEER_ADDRS_NUM_OLD" },
+#endif
+#if defined(SCTP_GET_PEER_ADDRS_OLD)
+ { SCTP_GET_PEER_ADDRS_OLD, "SCTP_GET_PEER_ADDRS_OLD" },
+#endif
+#if defined(SCTP_GET_LOCAL_ADDRS_NUM_OLD)
+ { SCTP_GET_LOCAL_ADDRS_NUM_OLD, "SCTP_GET_LOCAL_ADDRS_NUM_OLD" },
+#endif
+#if defined(SCTP_GET_LOCAL_ADDRS_OLD)
+ { SCTP_GET_LOCAL_ADDRS_OLD, "SCTP_GET_LOCAL_ADDRS_OLD" },
+#endif
+#if defined(SCTP_SOCKOPT_CONNECTX_OLD)
+ { SCTP_SOCKOPT_CONNECTX_OLD, "SCTP_SOCKOPT_CONNECTX_OLD" },
+#endif
+#if defined(SCTP_GET_PEER_ADDRS)
+ { SCTP_GET_PEER_ADDRS, "SCTP_GET_PEER_ADDRS" },
+#endif
+#if defined(SCTP_GET_LOCAL_ADDRS)
+ { SCTP_GET_LOCAL_ADDRS, "SCTP_GET_LOCAL_ADDRS" },
+#endif
+
+ { 0, NULL },
+};
+#endif
+
#if !defined (SOL_TCP) && defined (IPPROTO_TCP)
#define SOL_TCP IPPROTO_TCP
#endif
void
-printsock(tcp, addr, addrlen)
-struct tcb *tcp;
-long addr;
-int addrlen;
+printsock(struct tcb *tcp, long addr, int addrlen)
{
union {
char pad[128];
tprintf("%#lx", addr);
return;
}
- if ((addrlen<2) || (addrlen>sizeof(addrbuf)))
- addrlen=sizeof(addrbuf);
- if (umoven(tcp, addr, addrlen, (char*)&addrbuf) < 0) {
+ if (addrlen < 2 || addrlen > sizeof(addrbuf))
+ addrlen = sizeof(addrbuf);
+
+ memset(&addrbuf, 0, sizeof(addrbuf));
+ if (umoven(tcp, addr, addrlen, addrbuf.pad) < 0) {
tprintf("{...}");
return;
}
+ addrbuf.pad[sizeof(addrbuf.pad) - 1] = '\0';
tprintf("{sa_family=");
printxval(addrfams, addrbuf.sa.sa_family, "AF_???");
switch (addrbuf.sa.sa_family) {
case AF_UNIX:
- if (addrlen==2) {
- tprintf("<nil>");
+ if (addrlen == 2) {
+ tprintf("NULL");
} else if (addrbuf.sau.sun_path[0]) {
- tprintf("path=\"%-.*s\"", addrlen-2, addrbuf.sau.sun_path);
+ tprintf("path=");
+ printpathn(tcp, addr + 2, strlen(addrbuf.sau.sun_path));
} else {
- tprintf("path=@%-.*s", addrlen-3, addrbuf.sau.sun_path+1);
+ tprintf("path=@");
+ printpathn(tcp, addr + 3, strlen(addrbuf.sau.sun_path + 1));
}
break;
case AF_INET:
#ifdef HAVE_STRUCT_SOCKADDR_IN6_SIN6_SCOPE_ID
{
#if defined(HAVE_IF_INDEXTONAME) && defined(IN6_IS_ADDR_LINKLOCAL) && defined(IN6_IS_ADDR_MC_LINKLOCAL)
- int numericscope = 0;
- if (IN6_IS_ADDR_LINKLOCAL (&addrbuf.sa6.sin6_addr)
- || IN6_IS_ADDR_MC_LINKLOCAL (&addrbuf.sa6.sin6_addr)) {
- char scopebuf[IFNAMSIZ + 1];
+ int numericscope = 0;
+ if (IN6_IS_ADDR_LINKLOCAL(&addrbuf.sa6.sin6_addr)
+ || IN6_IS_ADDR_MC_LINKLOCAL(&addrbuf.sa6.sin6_addr)) {
+ char scopebuf[IFNAMSIZ + 1];
- if (if_indextoname (addrbuf.sa6.sin6_scope_id, scopebuf) == NULL)
- numericscope++;
- else
- tprintf(", sin6_scope_id=if_nametoindex(\"%s\")", scopebuf);
- } else
- numericscope++;
+ if (if_indextoname(addrbuf.sa6.sin6_scope_id, scopebuf) == NULL)
+ numericscope++;
+ else
+ tprintf(", sin6_scope_id=if_nametoindex(\"%s\")", scopebuf);
+ } else
+ numericscope++;
- if (numericscope)
+ if (numericscope)
#endif
- tprintf(", sin6_scope_id=%u", addrbuf.sa6.sin6_scope_id);
+ tprintf(", sin6_scope_id=%u", addrbuf.sa6.sin6_scope_id);
}
#endif
- break;
+ break;
#endif
#if defined(AF_IPX) && defined(linux)
case AF_IPX:
* this way.. :)
*/
tprintf("%08lx:", (unsigned long)ntohl(addrbuf.sipx.sipx_network));
- for (i = 0; i<IPX_NODE_LEN; i++)
+ for (i = 0; i < IPX_NODE_LEN; i++)
tprintf("%02x", addrbuf.sipx.sipx_node[i]);
tprintf("/[%02x]", addrbuf.sipx.sipx_type);
}
tprintf(", addr(%d)={%d, ",
addrbuf.ll.sll_halen,
addrbuf.ll.sll_hatype);
- for (i=0; i<addrbuf.ll.sll_halen; i++)
+ for (i = 0; i < addrbuf.ll.sll_halen; i++)
tprintf("%02x", addrbuf.ll.sll_addr[i]);
}
break;
};
static void
-printcmsghdr(tcp, addr, len)
-struct tcb *tcp;
-unsigned long addr;
-unsigned long len;
+printcmsghdr(struct tcb *tcp, unsigned long addr, unsigned long len)
{
struct cmsghdr *cmsg = len < sizeof(struct cmsghdr) ?
NULL : malloc(len);
return;
}
- tprintf(", {cmsg_len=%zu, cmsg_level=", cmsg->cmsg_len);
+ tprintf(", {cmsg_len=%u, cmsg_level=", (unsigned) cmsg->cmsg_len);
printxval(socketlayers, cmsg->cmsg_level, "SOL_???");
tprintf(", cmsg_type=");
if (cmsg->cmsg_type == SCM_RIGHTS
&& CMSG_LEN(sizeof(int)) <= cmsg_len) {
- int *fds = (int *) CMSG_DATA (cmsg);
+ int *fds = (int *) CMSG_DATA(cmsg);
int first = 1;
tprintf(", {");
}
if (cmsg->cmsg_type == SCM_CREDENTIALS
&& CMSG_LEN(sizeof(struct ucred)) <= cmsg_len) {
- struct ucred *uc = (struct ucred *) CMSG_DATA (cmsg);
+ struct ucred *uc = (struct ucred *) CMSG_DATA(cmsg);
tprintf("{pid=%ld, uid=%ld, gid=%ld}}",
(long)uc->pid, (long)uc->uid, (long)uc->gid);
}
static void
-printmsghdr(tcp, addr)
-struct tcb *tcp;
-long addr;
+do_msghdr(struct tcb *tcp, struct msghdr *msg)
{
- struct msghdr msg;
-
- if (umove(tcp, addr, &msg) < 0) {
- tprintf("%#lx", addr);
- return;
- }
- tprintf("{msg_name(%d)=", msg.msg_namelen);
- printsock(tcp, (long)msg.msg_name, msg.msg_namelen);
+ tprintf("{msg_name(%d)=", msg->msg_namelen);
+ printsock(tcp, (long)msg->msg_name, msg->msg_namelen);
- tprintf(", msg_iov(%lu)=", (unsigned long)msg.msg_iovlen);
- tprint_iov(tcp, (unsigned long)msg.msg_iovlen,
- (unsigned long)msg.msg_iov);
+ tprintf(", msg_iov(%lu)=", (unsigned long)msg->msg_iovlen);
+ tprint_iov(tcp, (unsigned long)msg->msg_iovlen,
+ (unsigned long)msg->msg_iov, 1);
#ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL
- tprintf(", msg_controllen=%lu", (unsigned long)msg.msg_controllen);
- if (msg.msg_controllen)
- printcmsghdr(tcp, (unsigned long) msg.msg_control,
- msg.msg_controllen);
+ tprintf(", msg_controllen=%lu", (unsigned long)msg->msg_controllen);
+ if (msg->msg_controllen)
+ printcmsghdr(tcp, (unsigned long) msg->msg_control,
+ msg->msg_controllen);
tprintf(", msg_flags=");
- printflags(msg_flags, msg.msg_flags, "MSG_???");
+ printflags(msg_flags, msg->msg_flags, "MSG_???");
#else /* !HAVE_STRUCT_MSGHDR_MSG_CONTROL */
tprintf("msg_accrights=%#lx, msg_accrightslen=%u",
- (unsigned long) msg.msg_accrights, msg.msg_accrightslen);
+ (unsigned long) msg->msg_accrights, msg->msg_accrightslen);
#endif /* !HAVE_STRUCT_MSGHDR_MSG_CONTROL */
tprintf("}");
}
+static void
+printmsghdr(struct tcb *tcp, long addr)
+{
+ struct msghdr msg;
+
+ if (umove(tcp, addr, &msg) < 0) {
+ tprintf("%#lx", addr);
+ return;
+ }
+ do_msghdr(tcp, &msg);
+}
+
+#ifdef LINUX
+static void
+printmmsghdr(struct tcb *tcp, long addr)
+{
+ struct mmsghdr {
+ struct msghdr msg_hdr;
+ unsigned msg_len;
+ } mmsg;
+
+ if (umove(tcp, addr, &mmsg) < 0) {
+ tprintf("%#lx", addr);
+ return;
+ }
+ tprintf("{");
+ do_msghdr(tcp, &mmsg.msg_hdr);
+ tprintf(", %u}", mmsg.msg_len);
+}
+#endif
+
#endif /* HAVE_SENDMSG */
+/*
+ * low bits of the socket type define real socket type,
+ * other bits are socket type flags.
+ */
+static void
+tprint_sock_type(struct tcb *tcp, int flags)
+{
+ const char *str = xlookup(socktypes, flags & SOCK_TYPE_MASK);
+
+ if (str)
+ {
+ tprintf("%s", str);
+ flags &= ~SOCK_TYPE_MASK;
+ if (!flags)
+ return;
+ tprintf("|");
+ }
+ printflags(sock_type_flags, flags, "SOCK_???");
+}
+
int
-sys_socket(tcp)
-struct tcb *tcp;
+sys_socket(struct tcb *tcp)
{
if (entering(tcp)) {
printxval(domains, tcp->u_arg[0], "PF_???");
tprintf(", ");
- printxval(socktypes, tcp->u_arg[1], "SOCK_???");
+ tprint_sock_type(tcp, tcp->u_arg[1]);
tprintf(", ");
switch (tcp->u_arg[0]) {
case PF_INET:
#ifdef SVR4
int
-sys_so_socket(tcp)
-struct tcb *tcp;
+sys_so_socket(struct tcb *tcp)
{
if (entering(tcp)) {
/* not sure really what these args are... but this
}
int
-sys_so_socketpair(tcp)
-struct tcb *tcp;
+sys_so_socketpair(struct tcb *tcp)
{
if (entering(tcp)) {
- /* not sure what this arg is */
+ /* not sure what this arg is */
tprintf("0x%lx", tcp->u_arg[0]);
}
return 0;
#endif /* SVR4 */
int
-sys_bind(tcp)
-struct tcb *tcp;
+sys_bind(struct tcb *tcp)
{
if (entering(tcp)) {
tprintf("%ld, ", tcp->u_arg[0]);
}
int
-sys_connect(tcp)
-struct tcb *tcp;
+sys_connect(struct tcb *tcp)
{
return sys_bind(tcp);
}
int
-sys_listen(tcp)
-struct tcb *tcp;
+sys_listen(struct tcb *tcp)
{
if (entering(tcp)) {
tprintf("%ld, %lu", tcp->u_arg[0], tcp->u_arg[1]);
return 0;
}
-int
-sys_accept(tcp)
-struct tcb *tcp;
+static int
+do_accept(struct tcb *tcp, int flags_arg)
{
if (entering(tcp)) {
tprintf("%ld, ", tcp->u_arg[0]);
- } else if (!tcp->u_arg[2])
+ return 0;
+ }
+ if (!tcp->u_arg[2])
tprintf("%#lx, NULL", tcp->u_arg[1]);
else {
- if (tcp->u_arg[1] == 0 || syserror(tcp)) {
+ int len;
+ if (tcp->u_arg[1] == 0 || syserror(tcp)
+ || umove(tcp, tcp->u_arg[2], &len) < 0) {
tprintf("%#lx", tcp->u_arg[1]);
} else {
- printsock(tcp, tcp->u_arg[1], tcp->u_arg[2]);
+ printsock(tcp, tcp->u_arg[1], len);
}
tprintf(", ");
- printnum(tcp, tcp->u_arg[2], "%lu");
+ printnum_int(tcp, tcp->u_arg[2], "%u");
+ }
+ if (flags_arg >= 0) {
+ tprintf(", ");
+ printflags(sock_type_flags, tcp->u_arg[flags_arg],
+ "SOCK_???");
}
return 0;
}
int
-sys_send(tcp)
-struct tcb *tcp;
+sys_accept(struct tcb *tcp)
+{
+ return do_accept(tcp, -1);
+}
+
+#ifdef LINUX
+int
+sys_accept4(struct tcb *tcp)
+{
+ return do_accept(tcp, 3);
+}
+#endif
+
+int
+sys_send(struct tcb *tcp)
{
if (entering(tcp)) {
tprintf("%ld, ", tcp->u_arg[0]);
}
int
-sys_sendto(tcp)
-struct tcb *tcp;
+sys_sendto(struct tcb *tcp)
{
if (entering(tcp)) {
tprintf("%ld, ", tcp->u_arg[0]);
#ifdef HAVE_SENDMSG
int
-sys_sendmsg(tcp)
-struct tcb *tcp;
+sys_sendmsg(struct tcb *tcp)
{
if (entering(tcp)) {
tprintf("%ld, ", tcp->u_arg[0]);
#endif /* HAVE_SENDMSG */
int
-sys_recv(tcp)
-struct tcb *tcp;
+sys_recv(struct tcb *tcp)
{
if (entering(tcp)) {
tprintf("%ld, ", tcp->u_arg[0]);
}
int
-sys_recvfrom(tcp)
-struct tcb *tcp;
+sys_recvfrom(struct tcb *tcp)
{
int fromlen;
#ifdef HAVE_SENDMSG
int
-sys_recvmsg(tcp)
-struct tcb *tcp;
+sys_recvmsg(struct tcb *tcp)
{
if (entering(tcp)) {
tprintf("%ld, ", tcp->u_arg[0]);
return 0;
}
+#ifdef LINUX
+int
+sys_recvmmsg(struct tcb *tcp)
+{
+ static char str[128];
+ if (entering(tcp)) {
+
+ tprintf("%ld, ", tcp->u_arg[0]);
+ if (verbose(tcp)) {
+ sprint_timespec(str, tcp, tcp->u_arg[4]);
+ tcp->auxstr = strdup(str);
+ } else {
+ tprintf("%#lx, %ld, ", tcp->u_arg[1], tcp->u_arg[2]);
+ printflags(msg_flags, tcp->u_arg[3], "MSG_???");
+ tprintf(", ");
+ print_timespec(tcp, tcp->u_arg[4]);
+ }
+ return 0;
+ } else {
+ if (verbose(tcp)) {
+ if (syserror(tcp))
+ tprintf("%#lx", tcp->u_arg[1]);
+ else
+ printmmsghdr(tcp, tcp->u_arg[1]);
+ tprintf(", %ld, ", tcp->u_arg[2]);
+ /* flags */
+ printflags(msg_flags, tcp->u_arg[3], "MSG_???");
+ /* timeout on entrance */
+ tprintf(", %s", tcp->auxstr ? tcp->auxstr : "{...}");
+ free((void *) tcp->auxstr);
+ tcp->auxstr = NULL;
+ }
+ if (syserror(tcp))
+ return 0;
+ if (tcp->u_rval == 0) {
+ tcp->auxstr = "Timeout";
+ return RVAL_STR;
+ }
+ if (!verbose(tcp))
+ return 0;
+ /* timeout on exit */
+ strcpy(str, "left ");
+ sprint_timespec(str + strlen(str), tcp, tcp->u_arg[4]);
+ tcp->auxstr = str;
+ return RVAL_STR;
+ }
+}
+#endif
+
#endif /* HAVE_SENDMSG */
+static const struct xlat shutdown_modes[] = {
+ { 0, "SHUT_RD" },
+ { 1, "SHUT_WR" },
+ { 2, "SHUT_RDWR" },
+ { 0, NULL }
+};
+
int
-sys_shutdown(tcp)
-struct tcb *tcp;
+sys_shutdown(struct tcb *tcp)
{
if (entering(tcp)) {
- tprintf("%ld, %ld", tcp->u_arg[0], tcp->u_arg[1]);
- switch (tcp->u_arg[1]) {
- case 0:
- tprintf("%s", " /* receive */");
- break;
- case 1:
- tprintf("%s", " /* send */");
- break;
- case 2:
- tprintf("%s", " /* send and receive */");
- break;
- }
+ tprintf("%ld, ", tcp->u_arg[0]);
+ printxval(shutdown_modes, tcp->u_arg[1], "SHUT_???");
}
return 0;
}
int
-sys_getsockname(tcp)
-struct tcb *tcp;
+sys_getsockname(struct tcb *tcp)
{
return sys_accept(tcp);
}
int
-sys_getpeername(tcp)
-struct tcb *tcp;
+sys_getpeername(struct tcb *tcp)
{
return sys_accept(tcp);
}
-int
-sys_pipe(tcp)
-struct tcb *tcp;
+static int
+do_pipe(struct tcb *tcp, int flags_arg)
{
-
-#if defined(LINUX) && !defined(SPARC) && !defined(SPARC64) && !defined(SH) && !defined(IA64)
- int fds[2];
-
if (exiting(tcp)) {
if (syserror(tcp)) {
tprintf("%#lx", tcp->u_arg[0]);
- return 0;
- }
- if (umoven(tcp, tcp->u_arg[0], sizeof fds, (char *) fds) < 0)
- tprintf("[...]");
- else
- tprintf("[%u, %u]", fds[0], fds[1]);
- }
+ } 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)
- if (exiting(tcp))
- tprintf("[%lu, %lu]", tcp->u_rval, getrval2(tcp));
+ 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_socketpair(tcp)
-struct tcb *tcp;
+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];
if (entering(tcp)) {
printxval(domains, tcp->u_arg[0], "PF_???");
tprintf(", ");
- printxval(socktypes, tcp->u_arg[1], "SOCK_???");
+ tprint_sock_type(tcp, tcp->u_arg[1]);
tprintf(", ");
switch (tcp->u_arg[0]) {
case PF_INET:
}
int
-sys_getsockopt(tcp)
-struct tcb *tcp;
+sys_getsockopt(struct tcb *tcp)
{
if (entering(tcp)) {
tprintf("%ld, ", tcp->u_arg[0]);
printxval(socketlayers, tcp->u_arg[1], "SOL_???");
- tprintf (", ");
+ tprintf(", ");
switch (tcp->u_arg[1]) {
case SOL_SOCKET:
printxval(sockoptions, tcp->u_arg[2], "SO_???");
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 */
tprintf("%lu", tcp->u_arg[2]);
break;
}
+ tprintf(", ");
} else {
int len;
- if (syserror(tcp) || umove (tcp, tcp->u_arg[4], &len) < 0) {
- tprintf(", %#lx, %#lx",
+ if (syserror(tcp) || umove(tcp, tcp->u_arg[4], &len) < 0) {
+ tprintf("%#lx, %#lx",
tcp->u_arg[3], tcp->u_arg[4]);
return 0;
}
switch (tcp->u_arg[2]) {
#ifdef SO_LINGER
case SO_LINGER:
- if (len == sizeof (struct linger)) {
+ if (len == sizeof(struct linger)) {
struct linger linger;
- if (umove (tcp,
+ if (umove(tcp,
tcp->u_arg[3],
&linger) < 0)
break;
- tprintf(", {onoff=%d, linger=%d}, "
+ tprintf("{onoff=%d, linger=%d}, "
"[%d]",
linger.l_onoff,
linger.l_linger,
return 0;
}
break;
+#endif
+#ifdef SO_PEERCRED
+ case SO_PEERCRED:
+ if (len == sizeof(struct ucred)) {
+ struct ucred uc;
+ if (umove(tcp,
+ tcp->u_arg[3],
+ &uc) < 0)
+ break;
+ tprintf("{pid=%ld, uid=%ld, gid=%ld}, "
+ "[%d]",
+ (long)uc.pid,
+ (long)uc.uid,
+ (long)uc.gid,
+ len);
+ return 0;
+ }
+ break;
+#endif
+ }
+ break;
+ case SOL_PACKET:
+ switch (tcp->u_arg[2]) {
+#ifdef PACKET_STATISTICS
+ case PACKET_STATISTICS:
+ if (len == sizeof(struct tpacket_stats)) {
+ struct tpacket_stats stats;
+ if (umove(tcp,
+ tcp->u_arg[3],
+ &stats) < 0)
+ break;
+ tprintf("{packets=%u, drops=%u}, "
+ "[%d]",
+ stats.tp_packets,
+ stats.tp_drops,
+ len);
+ return 0;
+ }
+ break;
#endif
}
break;
}
- tprintf (", ");
- if (len == sizeof (int)) {
- printnum(tcp, tcp->u_arg[3], "%ld");
+ if (len == sizeof(int)) {
+ printnum_int(tcp, tcp->u_arg[3], "%d");
}
else {
- printstr (tcp, tcp->u_arg[3], len);
+ printstr(tcp, tcp->u_arg[3], len);
}
tprintf(", [%d]", len);
}
}
#if defined(ICMP_FILTER)
-static void printicmpfilter(tcp, addr)
-struct tcb *tcp;
-long addr;
+static void printicmpfilter(struct tcb *tcp, long addr)
{
struct icmp_filter filter;
#endif /* ICMP_FILTER */
static int
-printsockopt (tcp, level, name, addr, len)
-struct tcb *tcp;
-int level;
-int name;
-long addr;
-int len;
+printsockopt(struct tcb *tcp, int level, int name, long addr, int len)
{
printxval(socketlayers, level, "SOL_??");
- tprintf (", ");
+ tprintf(", ");
switch (level) {
case SOL_SOCKET:
printxval(sockoptions, name, "SO_???");
switch (name) {
#if defined(SO_LINGER)
case SO_LINGER:
- if (len == sizeof (struct linger)) {
+ if (len == sizeof(struct linger)) {
struct linger linger;
- if (umove (tcp, addr, &linger) < 0)
+ if (umove(tcp, addr, &linger) < 0)
break;
tprintf(", {onoff=%d, linger=%d}",
linger.l_onoff,
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
printxval(socktcpoptions, name, "TCP_???");
break;
#endif
+#ifdef SOL_SCTP
+ case SOL_SCTP:
+ printxval(socksctpoptions, name, "SCTP_???");
+ break;
+#endif
#ifdef SOL_RAW
case SOL_RAW:
printxval(sockrawoptions, name, "RAW_???");
/* default arg printing */
- tprintf (", ");
+ tprintf(", ");
- if (len == sizeof (int)) {
- printnum_int (tcp, addr, "%d");
+ if (len == sizeof(int)) {
+ printnum_int(tcp, addr, "%d");
}
else {
- printstr (tcp, addr, len);
+ printstr(tcp, addr, len);
}
return 0;
}
#ifdef HAVE_STRUCT_OPTHDR
void
-print_sock_optmgmt (tcp, addr, len)
-struct tcb *tcp;
-long addr;
-int len;
+print_sock_optmgmt(struct tcb *tcp, long addr, int len)
{
int c = 0;
struct opthdr hdr;
while (len >= (int) sizeof hdr) {
if (umove(tcp, addr, &hdr) < 0) break;
if (c++) {
- tprintf (", ");
+ tprintf(", ");
}
else if (len > hdr.len + sizeof hdr) {
- tprintf ("[");
+ tprintf("[");
}
- tprintf ("{");
+ tprintf("{");
addr += sizeof hdr;
len -= sizeof hdr;
- printsockopt (tcp, hdr.level, hdr.name, addr, hdr.len);
+ printsockopt(tcp, hdr.level, hdr.name, addr, hdr.len);
if (hdr.len > 0) {
addr += hdr.len;
len -= hdr.len;
}
- tprintf ("}");
+ tprintf("}");
}
if (len > 0) {
- if (c++) tprintf (", ");
- printstr (tcp, addr, len);
+ if (c++) tprintf(", ");
+ printstr(tcp, addr, len);
}
- if (c > 1) tprintf ("]");
+ if (c > 1) tprintf("]");
}
#endif
int
-sys_setsockopt(tcp)
-struct tcb *tcp;
+sys_setsockopt(struct tcb *tcp)
{
if (entering(tcp)) {
tprintf("%ld, ", tcp->u_arg[0]);
- printsockopt (tcp, tcp->u_arg[1], tcp->u_arg[2],
+ printsockopt(tcp, tcp->u_arg[1], tcp->u_arg[2],
tcp->u_arg[3], tcp->u_arg[4]);
tprintf(", %lu", tcp->u_arg[4]);
}
{ __NETLIB_GEMINI_XPG4, "GEMINI_XPG4" },
{ __NETLIB_FP1_SVR4, "FP1_SVR4" },
{ __NETLIB_FP1_XPG4, "FP1_XPG4" },
- { 0, NULL },
+ { 0, NULL },
};
int
-netlib_call(tcp, func)
-struct tcb *tcp;
-int (*func) ();
+netlib_call(struct tcb *tcp, int (*func)())
{
if (entering(tcp)) {
int i;
- printxval (sock_version, tcp->u_arg[0], "__NETLIB_???");
+ printxval(sock_version, tcp->u_arg[0], "__NETLIB_???");
tprintf(", ");
--tcp->u_nargs;
for (i = 0; i < tcp->u_nargs; i++)
tcp->u_arg[i] = tcp->u_arg[i + 1];
- return func (tcp);
-
+ return func(tcp);
}
- return func (tcp);
+ return func(tcp);
}
int
-sys_xsocket(tcp)
-struct tcb *tcp;
+sys_xsocket(struct tcb *tcp)
{
- return netlib_call (tcp, sys_socket);
+ return netlib_call(tcp, sys_socket);
}
int
-sys_xsocketpair(tcp)
-struct tcb *tcp;
+sys_xsocketpair(struct tcb *tcp)
{
- return netlib_call (tcp, sys_socketpair);
+ return netlib_call(tcp, sys_socketpair);
}
int
-sys_xbind(tcp)
-struct tcb *tcp;
+sys_xbind(struct tcb *tcp)
{
- return netlib_call (tcp, sys_bind);
+ return netlib_call(tcp, sys_bind);
}
int
-sys_xconnect(tcp)
-struct tcb *tcp;
+sys_xconnect(struct tcb *tcp)
{
- return netlib_call (tcp, sys_connect);
+ return netlib_call(tcp, sys_connect);
}
int
-sys_xlisten(tcp)
-struct tcb *tcp;
+sys_xlisten(struct tcb *tcp)
{
- return netlib_call (tcp, sys_listen);
+ return netlib_call(tcp, sys_listen);
}
int
-sys_xaccept(tcp)
-struct tcb *tcp;
+sys_xaccept(struct tcb *tcp)
{
- return netlib_call (tcp, sys_accept);
+ return netlib_call(tcp, sys_accept);
}
int
-sys_xsendmsg(tcp)
-struct tcb *tcp;
+sys_xsendmsg(struct tcb *tcp)
{
- return netlib_call (tcp, sys_sendmsg);
+ return netlib_call(tcp, sys_sendmsg);
}
int
-sys_xrecvmsg(tcp)
-struct tcb *tcp;
+sys_xrecvmsg(struct tcb *tcp)
{
- return netlib_call (tcp, sys_recvmsg);
+ return netlib_call(tcp, sys_recvmsg);
}
int
-sys_xgetsockaddr(tcp)
-struct tcb *tcp;
+sys_xgetsockaddr(struct tcb *tcp)
{
if (entering(tcp)) {
- printxval (sock_version, tcp->u_arg[0], "__NETLIB_???");
+ printxval(sock_version, tcp->u_arg[0], "__NETLIB_???");
tprintf(", ");
if (tcp->u_arg[1] == 0) {
- tprintf ("LOCALNAME, ");
+ tprintf("LOCALNAME, ");
}
else if (tcp->u_arg[1] == 1) {
- tprintf ("REMOTENAME, ");
+ tprintf("REMOTENAME, ");
}
else {
- tprintf ("%ld, ", tcp->u_arg [1]);
+ tprintf("%ld, ", tcp->u_arg[1]);
}
- tprintf ("%ld, ", tcp->u_arg [2]);
+ tprintf("%ld, ", tcp->u_arg[2]);
}
else {
if (tcp->u_arg[3] == 0 || syserror(tcp)) {
}
-#if 0
-
-int
-sys_xsetsockaddr(tcp)
-struct tcb *tcp;
-{
- return netlib_call (tcp, sys_setsockaddr);
-}
-
-#endif
-
int
-sys_xgetsockopt(tcp)
-struct tcb *tcp;
+sys_xgetsockopt(struct tcb *tcp)
{
- return netlib_call (tcp, sys_getsockopt);
+ return netlib_call(tcp, sys_getsockopt);
}
int
-sys_xsetsockopt(tcp)
-struct tcb *tcp;
+sys_xsetsockopt(struct tcb *tcp)
{
- return netlib_call (tcp, sys_setsockopt);
+ return netlib_call(tcp, sys_setsockopt);
}
int
-sys_xshutdown(tcp)
-struct tcb *tcp;
+sys_xshutdown(struct tcb *tcp)
{
- return netlib_call (tcp, sys_shutdown);
+ return netlib_call(tcp, sys_shutdown);
}
-#endif
+#endif /* UNIXWARE */