]> granicus.if.org Git - strace/blobdiff - socketutils.c
io: change size types from unsigned long to kernel_ureg_t
[strace] / socketutils.c
index 6fbb8cfef5a317f93dffc3bc1ec3e8d46b3db168..d50ef831fa1b998524c2a986ead8f10233900a23 100644 (file)
 #include <linux/sock_diag.h>
 #include <linux/inet_diag.h>
 #include <linux/unix_diag.h>
+#include <linux/netlink_diag.h>
 #include <linux/rtnetlink.h>
-
-#if !defined NETLINK_SOCK_DIAG && defined NETLINK_INET_DIAG
-# define NETLINK_SOCK_DIAG NETLINK_INET_DIAG
-#endif
+#include "xlat/netlink_protocols.h"
 
 #include <sys/un.h>
 #ifndef UNIX_PATH_MAX
 # define UNIX_PATH_MAX sizeof(((struct sockaddr_un *) 0)->sun_path)
 #endif
 
+typedef struct {
+       unsigned long inode;
+       char *details;
+} cache_entry;
+
+#define CACHE_SIZE 1024U
+static cache_entry cache[CACHE_SIZE];
+#define CACHE_MASK (CACHE_SIZE - 1)
+
+static int
+cache_and_print_inode_details(const unsigned long inode, char *const details)
+{
+       cache_entry *e = &cache[inode & CACHE_MASK];
+       free(e->details);
+       e->inode = inode;
+       e->details = details;
+
+       tprints(details);
+       return 1;
+}
+
+bool
+print_sockaddr_by_inode_cached(const unsigned long inode)
+{
+       const cache_entry *const e = &cache[inode & CACHE_MASK];
+       if (e && inode == e->inode) {
+               tprints(e->details);
+               return true;
+       }
+       return false;
+}
+
 static bool
-inet_send_query(const int fd, const int family, const int proto)
+send_query(const int fd, void *req, size_t req_size)
 {
        struct sockaddr_nl nladdr = {
                .nl_family = AF_NETLINK
        };
-       struct {
-               struct nlmsghdr nlh;
-               struct inet_diag_req_v2 idr;
-       } req = {
-               .nlh = {
-                       .nlmsg_len = sizeof(req),
-                       .nlmsg_type = SOCK_DIAG_BY_FAMILY,
-                       .nlmsg_flags = NLM_F_DUMP | NLM_F_REQUEST
-               },
-               .idr = {
-                       .sdiag_family = family,
-                       .sdiag_protocol = proto,
-                       .idiag_states = -1
-               }
-       };
        struct iovec iov = {
-               .iov_base = &req,
-               .iov_len = sizeof(req)
+               .iov_base = req,
+               .iov_len = req_size
        };
-       struct msghdr msg = {
-               .msg_name = (void *) &nladdr,
+       const struct msghdr msg = {
+               .msg_name = &nladdr,
                .msg_namelen = sizeof(nladdr),
                .msg_iov = &iov,
                .msg_iovlen = 1
@@ -87,11 +102,32 @@ inet_send_query(const int fd, const int family, const int proto)
        }
 }
 
+static bool
+inet_send_query(const int fd, const int family, const int proto)
+{
+       struct {
+               const struct nlmsghdr nlh;
+               const struct inet_diag_req_v2 idr;
+       } req = {
+               .nlh = {
+                       .nlmsg_len = sizeof(req),
+                       .nlmsg_type = SOCK_DIAG_BY_FAMILY,
+                       .nlmsg_flags = NLM_F_DUMP | NLM_F_REQUEST
+               },
+               .idr = {
+                       .sdiag_family = family,
+                       .sdiag_protocol = proto,
+                       .idiag_states = -1
+               }
+       };
+       return send_query(fd, &req, sizeof(req));
+}
+
 static int
-inet_parse_response(const char *proto_name, const void *data,
+inet_parse_response(const char *const proto_name, const void *const data,
                    const int data_len, const unsigned long inode)
 {
-       const struct inet_diag_msg *diag_msg = data;
+       const struct inet_diag_msg *const diag_msg = data;
        static const char zero_addr[sizeof(struct in6_addr)];
        socklen_t addr_size, text_size;
 
@@ -114,6 +150,7 @@ inet_parse_response(const char *proto_name, const void *data,
        }
 
        char src_buf[text_size];
+       char *details;
 
        if (!inet_ntop(diag_msg->idiag_family, diag_msg->id.idiag_src,
                       src_buf, text_size))
@@ -127,16 +164,17 @@ inet_parse_response(const char *proto_name, const void *data,
                               dst_buf, text_size))
                        return -1;
 
-               tprintf("%s:[%s:%u->%s:%u]",
-                       proto_name,
-                       src_buf, ntohs(diag_msg->id.idiag_sport),
-                       dst_buf, ntohs(diag_msg->id.idiag_dport));
+               if (asprintf(&details, "%s:[%s:%u->%s:%u]", proto_name,
+                            src_buf, ntohs(diag_msg->id.idiag_sport),
+                            dst_buf, ntohs(diag_msg->id.idiag_dport)) < 0)
+                       return false;
        } else {
-               tprintf("%s:[%s:%u]", proto_name, src_buf,
-                       ntohs(diag_msg->id.idiag_sport));
+               if (asprintf(&details, "%s:[%s:%u]", proto_name, src_buf,
+                            ntohs(diag_msg->id.idiag_sport)) < 0)
+                       return false;
        }
 
-       return 1;
+       return cache_and_print_inode_details(inode, details);
 }
 
 static bool
@@ -145,40 +183,43 @@ receive_responses(const int fd, const unsigned long inode,
                  int (* parser) (const char *, const void *,
                                  int, unsigned long))
 {
-       static long buf[8192 / sizeof(long)];
+       static union {
+               struct nlmsghdr hdr;
+               long buf[8192 / sizeof(long)];
+       } hdr_buf;
+
        struct sockaddr_nl nladdr = {
                .nl_family = AF_NETLINK
        };
        struct iovec iov = {
-               .iov_base = buf,
-               .iov_len = sizeof(buf)
+               .iov_base = hdr_buf.buf,
+               .iov_len = sizeof(hdr_buf.buf)
        };
        int flags = 0;
 
        for (;;) {
-               ssize_t ret;
                struct msghdr msg = {
-                       .msg_name = (void *) &nladdr,
+                       .msg_name = &nladdr,
                        .msg_namelen = sizeof(nladdr),
                        .msg_iov = &iov,
                        .msg_iovlen = 1
                };
 
-               ret = recvmsg(fd, &msg, flags);
+               ssize_t ret = recvmsg(fd, &msg, flags);
                if (ret < 0) {
                        if (errno == EINTR)
                                continue;
                        return false;
                }
 
-               struct nlmsghdr *h = (struct nlmsghdr *) buf;
+               const struct nlmsghdr *h = &hdr_buf.hdr;
                if (!NLMSG_OK(h, ret))
                        return false;
                for (; NLMSG_OK(h, ret); h = NLMSG_NEXT(h, ret)) {
                        if (h->nlmsg_type != SOCK_DIAG_BY_FAMILY)
                                return false;
-                       int rc = parser(proto_name, NLMSG_DATA(h),
-                                       h->nlmsg_len, inode);
+                       const int rc = parser(proto_name, NLMSG_DATA(h),
+                                             h->nlmsg_len, inode);
                        if (rc > 0)
                                return true;
                        if (rc < 0)
@@ -199,12 +240,9 @@ inet_print(const int fd, const int family, const int protocol,
 static bool
 unix_send_query(const int fd, const unsigned long inode)
 {
-       struct sockaddr_nl nladdr = {
-               .nl_family = AF_NETLINK
-       };
        struct {
-               struct nlmsghdr nlh;
-               struct unix_diag_req udr;
+               const struct nlmsghdr nlh;
+               const struct unix_diag_req udr;
        } req = {
                .nlh = {
                        .nlmsg_len = sizeof(req),
@@ -218,25 +256,7 @@ unix_send_query(const int fd, const unsigned long inode)
                        .udiag_show = UDIAG_SHOW_NAME | UDIAG_SHOW_PEER
                }
        };
-       struct iovec iov = {
-               .iov_base = &req,
-               .iov_len = sizeof(req)
-       };
-       struct msghdr msg = {
-               .msg_name = (void *) &nladdr,
-               .msg_namelen = sizeof(nladdr),
-               .msg_iov = &iov,
-               .msg_iovlen = 1
-       };
-
-       for (;;) {
-               if (sendmsg(fd, &msg, 0) < 0) {
-                       if (errno == EINTR)
-                               continue;
-                       return false;
-               }
-               return true;
-       }
+       return send_query(fd, &req, sizeof(req));
 }
 
 static int
@@ -281,80 +301,192 @@ unix_parse_response(const char *proto_name, const void *data,
         * print obtained information in the following format:
         * "UNIX:[" SELF_INODE [ "->" PEER_INODE ][ "," SOCKET_FILE ] "]"
         */
-       if (peer || path_len) {
-               tprintf("%s:[%lu", proto_name, inode);
-               if (peer)
-                       tprintf("->%u", peer);
-               if (path_len) {
-                       if (path[0] == '\0') {
-                               tprints(",@");
-                               print_quoted_string(path + 1, path_len,
-                                                   QUOTE_0_TERMINATED);
-                       } else {
-                               tprints(",");
-                               print_quoted_string(path, path_len + 1,
-                                                   QUOTE_0_TERMINATED);
-                       }
+       if (!peer && !path_len)
+               return -1;
+
+       char peer_str[3 + sizeof(peer) * 3];
+       if (peer)
+               snprintf(peer_str, sizeof(peer_str), "->%u", peer);
+       else
+               peer_str[0] = '\0';
+
+       const char *path_str;
+       if (path_len) {
+               char *outstr = alloca(4 * path_len + 4);
+
+               outstr[0] = ',';
+               if (path[0] == '\0') {
+                       outstr[1] = '@';
+                       string_quote(path + 1, outstr + 2,
+                                    path_len - 1, QUOTE_0_TERMINATED);
+               } else {
+                       string_quote(path, outstr + 1,
+                                    path_len, QUOTE_0_TERMINATED);
                }
-               tprints("]");
-               return 1;
+               path_str = outstr;
+       } else {
+               path_str = "";
        }
-       else
+
+       char *details;
+       if (asprintf(&details, "%s:[%lu%s%s]", proto_name, inode,
+                    peer_str, path_str) < 0)
                return -1;
+
+       return cache_and_print_inode_details(inode, details);
+}
+
+static bool
+netlink_send_query(const int fd, const unsigned long inode)
+{
+       struct {
+               const struct nlmsghdr nlh;
+               const struct netlink_diag_req ndr;
+       } req = {
+               .nlh = {
+                       .nlmsg_len = sizeof(req),
+                       .nlmsg_type = SOCK_DIAG_BY_FAMILY,
+                       .nlmsg_flags = NLM_F_DUMP | NLM_F_REQUEST
+               },
+               .ndr = {
+                       .sdiag_family = AF_NETLINK,
+                       .sdiag_protocol = NDIAG_PROTO_ALL,
+                       .ndiag_show = NDIAG_SHOW_MEMINFO
+               }
+       };
+       return send_query(fd, &req, sizeof(req));
+}
+
+static int
+netlink_parse_response(const char *proto_name, const void *data,
+                   const int data_len, const unsigned long inode)
+{
+       const struct netlink_diag_msg *const diag_msg = data;
+       const char *netlink_proto;
+       char *details;
+
+       if (data_len < (int) NLMSG_LENGTH(sizeof(*diag_msg)))
+               return -1;
+       if (diag_msg->ndiag_ino != inode)
+               return 0;
+
+       if (diag_msg->ndiag_family != AF_NETLINK)
+               return -1;
+
+       netlink_proto = xlookup(netlink_protocols,
+                               diag_msg->ndiag_protocol);
+
+       if (netlink_proto) {
+               static const char netlink_prefix[] = "NETLINK_";
+               const size_t netlink_prefix_len =
+                       sizeof(netlink_prefix) -1;
+               if (strncmp(netlink_proto, netlink_prefix,
+                           netlink_prefix_len) == 0)
+                       netlink_proto += netlink_prefix_len;
+               if (asprintf(&details, "%s:[%s:%u]", proto_name,
+                            netlink_proto, diag_msg->ndiag_portid) < 0)
+                       return -1;
+       } else {
+               if (asprintf(&details, "%s:[%u]", proto_name,
+                            (unsigned) diag_msg->ndiag_protocol) < 0)
+                       return -1;
+       }
+
+       return cache_and_print_inode_details(inode, details);
 }
 
 static bool
-unix_print(int fd, const unsigned long inode)
+unix_print(const int fd, const unsigned long inode)
 {
        return unix_send_query(fd, inode)
                && receive_responses(fd, inode, "UNIX", unix_parse_response);
 }
 
+static bool
+tcp_v4_print(const int fd, const unsigned long inode)
+{
+       return inet_print(fd, AF_INET, IPPROTO_TCP, inode, "TCP");
+}
+
+static bool
+udp_v4_print(const int fd, const unsigned long inode)
+{
+       return inet_print(fd, AF_INET, IPPROTO_UDP, inode, "UDP");
+}
+
+static bool
+tcp_v6_print(const int fd, const unsigned long inode)
+{
+       return inet_print(fd, AF_INET6, IPPROTO_TCP, inode, "TCPv6");
+}
+
+static bool
+udp_v6_print(const int fd, const unsigned long inode)
+{
+       return inet_print(fd, AF_INET6, IPPROTO_UDP, inode, "UDPv6");
+}
+
+static bool
+netlink_print(const int fd, const unsigned long inode)
+{
+       return netlink_send_query(fd, inode)
+               && receive_responses(fd, inode, "NETLINK",
+                                    netlink_parse_response);
+}
+
+static const struct {
+       const char *const name;
+       bool (*const print)(int, unsigned long);
+} protocols[] = {
+       [SOCK_PROTO_UNIX] = { "UNIX", unix_print },
+       [SOCK_PROTO_TCP] = { "TCP", tcp_v4_print },
+       [SOCK_PROTO_UDP] = { "UDP", udp_v4_print },
+       [SOCK_PROTO_TCPv6] = { "TCPv6", tcp_v6_print },
+       [SOCK_PROTO_UDPv6] = { "UDPv6", udp_v6_print },
+       [SOCK_PROTO_NETLINK] = { "NETLINK", netlink_print }
+};
+
+enum sock_proto
+get_proto_by_name(const char *const name)
+{
+       unsigned int i;
+       for (i = (unsigned int) SOCK_PROTO_UNKNOWN + 1;
+            i < ARRAY_SIZE(protocols); ++i) {
+               if (protocols[i].name && !strcmp(name, protocols[i].name))
+                       return (enum sock_proto) i;
+       }
+       return SOCK_PROTO_UNKNOWN;
+}
+
 /* Given an inode number of a socket, print out the details
  * of the ip address and port. */
+
 bool
-print_sockaddr_by_inode(const unsigned long inode, const char *proto_name)
+print_sockaddr_by_inode(const unsigned long inode, const enum sock_proto proto)
 {
-       int fd;
-       bool r = false;
+       if ((unsigned int) proto >= ARRAY_SIZE(protocols) ||
+           (proto != SOCK_PROTO_UNKNOWN && !protocols[proto].print))
+               return false;
 
-       fd = socket(AF_NETLINK, SOCK_RAW, NETLINK_SOCK_DIAG);
+       const int fd = socket(AF_NETLINK, SOCK_RAW, NETLINK_SOCK_DIAG);
        if (fd < 0)
                return false;
+       bool r = false;
 
-       if (proto_name) {
-               if (strcmp(proto_name, "TCP") == 0)
-                       r = inet_print(fd, AF_INET, IPPROTO_TCP, inode, "TCP");
-               else if (strcmp(proto_name, "UDP") == 0)
-                       r = inet_print(fd, AF_INET, IPPROTO_UDP, inode, "UDP");
-               else if (strcmp(proto_name, "TCPv6") == 0)
-                       r = inet_print(fd, AF_INET6, IPPROTO_TCP, inode, "TCPv6");
-               else if (strcmp(proto_name, "UDPv6") == 0)
-                       r = inet_print(fd, AF_INET6, IPPROTO_UDP, inode, "UDPv6");
-               else if (strcmp(proto_name, "UNIX") == 0)
-                       r = unix_print(fd, inode);
-
+       if (proto != SOCK_PROTO_UNKNOWN) {
+               r = protocols[proto].print(fd, inode);
                if (!r) {
-                       tprintf("%s:[%lu]", proto_name, inode);
+                       tprintf("%s:[%lu]", protocols[proto].name, inode);
                        r = true;
                }
        } else {
-               const struct {
-                       const int family;
-                       const int protocol;
-                       const char *name;
-               } protocols[] = {
-                       { AF_INET, IPPROTO_TCP, "TCP" },
-                       { AF_INET, IPPROTO_UDP, "UDP" },
-                       { AF_INET6, IPPROTO_TCP, "TCPv6" },
-                       { AF_INET6, IPPROTO_UDP, "UDPv6" }
-               };
-               size_t i;
-
-               for (i = 0; i < ARRAY_SIZE(protocols); ++i) {
-                       if ((r = inet_print(fd, protocols[i].family,
-                                           protocols[i].protocol, inode,
-                                           protocols[i].name)))
+               unsigned int i;
+               for (i = (unsigned int) SOCK_PROTO_UNKNOWN + 1;
+                    i < ARRAY_SIZE(protocols); ++i) {
+                       if (!protocols[i].print)
+                               continue;
+                       r = protocols[i].print(fd, inode);
+                       if (r)
                                break;
                }
        }