net/smc/smc_diag.c

   1 // SPDX-License-Identifier: GPL-2.0-only
   2 /*
   3  * Shared Memory Communications over RDMA (SMC-R) and RoCE
   4  *
   5  * Monitoring SMC transport protocol sockets
   6  *
   7  * Copyright IBM Corp. 2016
   8  *
   9  * Author(s):  Ursula Braun <ubraun@linux.vnet.ibm.com>
  10  */
  11
  12 #include <linux/kernel.h>
  13 #include <linux/module.h>
  14 #include <linux/types.h>
  15 #include <linux/init.h>
  16 #include <linux/sock_diag.h>
  17 #include <linux/inet_diag.h>
  18 #include <linux/smc_diag.h>
  19 #include <net/netlink.h>
  20 #include <net/smc.h>
  21
  22 #include "smc.h"
  23 #include "smc_core.h"
  24
  25 static void smc_gid_be16_convert(__u8 *buf, u8 *gid_raw)
  26 {
  27         sprintf(buf, "%04x:%04x:%04x:%04x:%04x:%04x:%04x:%04x",
  28                 be16_to_cpu(((__be16 *)gid_raw)[0]),
  29                 be16_to_cpu(((__be16 *)gid_raw)[1]),
  30                 be16_to_cpu(((__be16 *)gid_raw)[2]),
  31                 be16_to_cpu(((__be16 *)gid_raw)[3]),
  32                 be16_to_cpu(((__be16 *)gid_raw)[4]),
  33                 be16_to_cpu(((__be16 *)gid_raw)[5]),
  34                 be16_to_cpu(((__be16 *)gid_raw)[6]),
  35                 be16_to_cpu(((__be16 *)gid_raw)[7]));
  36 }
  37
  38 static void smc_diag_msg_common_fill(struct smc_diag_msg *r, struct sock *sk)
  39 {
  40         struct smc_sock *smc = smc_sk(sk);
  41
  42         memset(r, 0, sizeof(*r));
  43         r->diag_family = sk->sk_family;
  44         sock_diag_save_cookie(sk, r->id.idiag_cookie);
  45         if (!smc->clcsock)
  46                 return;
  47         r->id.idiag_sport = htons(smc->clcsock->sk->sk_num);
  48         r->id.idiag_dport = smc->clcsock->sk->sk_dport;
  49         r->id.idiag_if = smc->clcsock->sk->sk_bound_dev_if;
  50         if (sk->sk_protocol == SMCPROTO_SMC) {
  51                 r->id.idiag_src[0] = smc->clcsock->sk->sk_rcv_saddr;
  52                 r->id.idiag_dst[0] = smc->clcsock->sk->sk_daddr;
  53 #if IS_ENABLED(CONFIG_IPV6)
  54         } else if (sk->sk_protocol == SMCPROTO_SMC6) {
  55                 memcpy(&r->id.idiag_src, &smc->clcsock->sk->sk_v6_rcv_saddr,
  56                        sizeof(smc->clcsock->sk->sk_v6_rcv_saddr));
  57                 memcpy(&r->id.idiag_dst, &smc->clcsock->sk->sk_v6_daddr,
  58                        sizeof(smc->clcsock->sk->sk_v6_daddr));
  59 #endif
  60         }
  61 }
  62
  63 static int smc_diag_msg_attrs_fill(struct sock *sk, struct sk_buff *skb,
  64                                    struct smc_diag_msg *r,
  65                                    struct user_namespace *user_ns)
  66 {
  67         if (nla_put_u8(skb, SMC_DIAG_SHUTDOWN, sk->sk_shutdown))
  68                 return 1;
  69
  70         r->diag_uid = from_kuid_munged(user_ns, sock_i_uid(sk));
  71         r->diag_inode = sock_i_ino(sk);
  72         return 0;
  73 }
  74
  75 static int __smc_diag_dump(struct sock *sk, struct sk_buff *skb,
  76                            struct netlink_callback *cb,
  77                            const struct smc_diag_req *req,
  78                            struct nlattr *bc)
  79 {
  80         struct smc_sock *smc = smc_sk(sk);
  81         struct smc_diag_fallback fallback;
  82         struct user_namespace *user_ns;
  83         struct smc_diag_msg *r;
  84         struct nlmsghdr *nlh;
  85
  86         nlh = nlmsg_put(skb, NETLINK_CB(cb->skb).portid, cb->nlh->nlmsg_seq,
  87                         cb->nlh->nlmsg_type, sizeof(*r), NLM_F_MULTI);
  88         if (!nlh)
  89                 return -EMSGSIZE;
  90
  91         r = nlmsg_data(nlh);
  92         smc_diag_msg_common_fill(r, sk);
  93         r->diag_state = sk->sk_state;
  94         if (smc->use_fallback)
  95                 r->diag_mode = SMC_DIAG_MODE_FALLBACK_TCP;
  96         else if (smc->conn.lgr && smc->conn.lgr->is_smcd)
  97                 r->diag_mode = SMC_DIAG_MODE_SMCD;
  98         else
  99                 r->diag_mode = SMC_DIAG_MODE_SMCR;
 100         user_ns = sk_user_ns(NETLINK_CB(cb->skb).sk);
 101         if (smc_diag_msg_attrs_fill(sk, skb, r, user_ns))
 102                 goto errout;
 103
 104         fallback.reason = smc->fallback_rsn;
 105         fallback.peer_diagnosis = smc->peer_diagnosis;
 106         if (nla_put(skb, SMC_DIAG_FALLBACK, sizeof(fallback), &fallback) < 0)
 107                 goto errout;
 108
 109         if ((req->diag_ext & (1 << (SMC_DIAG_CONNINFO - 1))) &&
 110             smc->conn.alert_token_local) {
 111                 struct smc_connection *conn = &smc->conn;
 112                 struct smc_diag_conninfo cinfo = {
 113                         .token = conn->alert_token_local,
 114                         .sndbuf_size = conn->sndbuf_desc ?
 115                                 conn->sndbuf_desc->len : 0,
 116                         .rmbe_size = conn->rmb_desc ? conn->rmb_desc->len : 0,
 117                         .peer_rmbe_size = conn->peer_rmbe_size,
 118
 119                         .rx_prod.wrap = conn->local_rx_ctrl.prod.wrap,
 120                         .rx_prod.count = conn->local_rx_ctrl.prod.count,
 121                         .rx_cons.wrap = conn->local_rx_ctrl.cons.wrap,
 122                         .rx_cons.count = conn->local_rx_ctrl.cons.count,
 123
 124                         .tx_prod.wrap = conn->local_tx_ctrl.prod.wrap,
 125                         .tx_prod.count = conn->local_tx_ctrl.prod.count,
 126                         .tx_cons.wrap = conn->local_tx_ctrl.cons.wrap,
 127                         .tx_cons.count = conn->local_tx_ctrl.cons.count,
 128
 129                         .tx_prod_flags =
 130                                 *(u8 *)&conn->local_tx_ctrl.prod_flags,
 131                         .tx_conn_state_flags =
 132                                 *(u8 *)&conn->local_tx_ctrl.conn_state_flags,
 133                         .rx_prod_flags = *(u8 *)&conn->local_rx_ctrl.prod_flags,
 134                         .rx_conn_state_flags =
 135                                 *(u8 *)&conn->local_rx_ctrl.conn_state_flags,
 136
 137                         .tx_prep.wrap = conn->tx_curs_prep.wrap,
 138                         .tx_prep.count = conn->tx_curs_prep.count,
 139                         .tx_sent.wrap = conn->tx_curs_sent.wrap,
 140                         .tx_sent.count = conn->tx_curs_sent.count,
 141                         .tx_fin.wrap = conn->tx_curs_fin.wrap,
 142                         .tx_fin.count = conn->tx_curs_fin.count,
 143                 };
 144
 145                 if (nla_put(skb, SMC_DIAG_CONNINFO, sizeof(cinfo), &cinfo) < 0)
 146                         goto errout;
 147         }
 148
 149         if (smc->conn.lgr && !smc->conn.lgr->is_smcd &&
 150             (req->diag_ext & (1 << (SMC_DIAG_LGRINFO - 1))) &&
 151             !list_empty(&smc->conn.lgr->list)) {
 152                 struct smc_diag_lgrinfo linfo = {
 153                         .role = smc->conn.lgr->role,
 154                         .lnk[0].ibport = smc->conn.lgr->lnk[0].ibport,
 155                         .lnk[0].link_id = smc->conn.lgr->lnk[0].link_id,
 156                 };
 157
 158                 memcpy(linfo.lnk[0].ibname,
 159                        smc->conn.lgr->lnk[0].smcibdev->ibdev->name,
 160                        sizeof(smc->conn.lgr->lnk[0].smcibdev->ibdev->name));
 161                 smc_gid_be16_convert(linfo.lnk[0].gid,
 162                                      smc->conn.lgr->lnk[0].gid);
 163                 smc_gid_be16_convert(linfo.lnk[0].peer_gid,
 164                                      smc->conn.lgr->lnk[0].peer_gid);
 165
 166                 if (nla_put(skb, SMC_DIAG_LGRINFO, sizeof(linfo), &linfo) < 0)
 167                         goto errout;
 168         }
 169         if (smc->conn.lgr && smc->conn.lgr->is_smcd &&
 170             (req->diag_ext & (1 << (SMC_DIAG_DMBINFO - 1))) &&
 171             !list_empty(&smc->conn.lgr->list)) {
 172                 struct smc_connection *conn = &smc->conn;
 173                 struct smcd_diag_dmbinfo dinfo = {
 174                         .linkid = *((u32 *)conn->lgr->id),
 175                         .peer_gid = conn->lgr->peer_gid,
 176                         .my_gid = conn->lgr->smcd->local_gid,
 177                         .token = conn->rmb_desc->token,
 178                         .peer_token = conn->peer_token
 179                 };
 180
 181                 if (nla_put(skb, SMC_DIAG_DMBINFO, sizeof(dinfo), &dinfo) < 0)
 182                         goto errout;
 183         }
 184
 185         nlmsg_end(skb, nlh);
 186         return 0;
 187
 188 errout:
 189         nlmsg_cancel(skb, nlh);
 190         return -EMSGSIZE;
 191 }
 192
 193 static int smc_diag_dump_proto(struct proto *prot, struct sk_buff *skb,
 194                                struct netlink_callback *cb)
 195 {
 196         struct net *net = sock_net(skb->sk);
 197         struct nlattr *bc = NULL;
 198         struct hlist_head *head;
 199         struct sock *sk;
 200         int rc = 0;
 201
 202         read_lock(&prot->h.smc_hash->lock);
 203         head = &prot->h.smc_hash->ht;
 204         if (hlist_empty(head))
 205                 goto out;
 206
 207         sk_for_each(sk, head) {
 208                 if (!net_eq(sock_net(sk), net))
 209                         continue;
 210                 rc = __smc_diag_dump(sk, skb, cb, nlmsg_data(cb->nlh), bc);
 211                 if (rc)
 212                         break;
 213         }
 214
 215 out:
 216         read_unlock(&prot->h.smc_hash->lock);
 217         return rc;
 218 }
 219
 220 static int smc_diag_dump(struct sk_buff *skb, struct netlink_callback *cb)
 221 {
 222         int rc = 0;
 223
 224         rc = smc_diag_dump_proto(&smc_proto, skb, cb);
 225         if (!rc)
 226                 rc = smc_diag_dump_proto(&smc_proto6, skb, cb);
 227         return rc;
 228 }
 229
 230 static int smc_diag_handler_dump(struct sk_buff *skb, struct nlmsghdr *h)
 231 {
 232         struct net *net = sock_net(skb->sk);
 233
 234         if (h->nlmsg_type == SOCK_DIAG_BY_FAMILY &&
 235             h->nlmsg_flags & NLM_F_DUMP) {
 236                 {
 237                         struct netlink_dump_control c = {
 238                                 .dump = smc_diag_dump,
 239                                 .min_dump_alloc = SKB_WITH_OVERHEAD(32768),
 240                         };
 241                         return netlink_dump_start(net->diag_nlsk, skb, h, &c);
 242                 }
 243         }
 244         return 0;
 245 }
 246
 247 static const struct sock_diag_handler smc_diag_handler = {
 248         .family = AF_SMC,
 249         .dump = smc_diag_handler_dump,
 250 };
 251
 252 static int __init smc_diag_init(void)
 253 {
 254         return sock_diag_register(&smc_diag_handler);
 255 }
 256
 257 static void __exit smc_diag_exit(void)
 258 {
 259         sock_diag_unregister(&smc_diag_handler);
 260 }
 261
 262 module_init(smc_diag_init);
 263 module_exit(smc_diag_exit);
 264 MODULE_LICENSE("GPL");
 265 MODULE_ALIAS_NET_PF_PROTO_TYPE(PF_NETLINK, NETLINK_SOCK_DIAG, 43 /* AF_SMC */);