[linux-2.6-block.git] / net / smc / smc_diag.c

/*
 * Shared Memory Communications over RDMA (SMC-R) and RoCE
 *
 * Monitoring SMC transport protocol sockets
 *
 * Copyright IBM Corp. 2016
 *
 * Author(s):  Ursula Braun <ubraun@linux.vnet.ibm.com>
 */

#include <linux/kernel.h>
#include <linux/module.h>
#include <linux/types.h>
#include <linux/init.h>
#include <linux/sock_diag.h>
#include <linux/inet_diag.h>
#include <linux/smc_diag.h>
#include <net/netlink.h>
#include <net/smc.h>

#include "smc.h"
#include "smc_core.h"

static void smc_gid_be16_convert(__u8 *buf, u8 *gid_raw)
{
	sprintf(buf, "%04x:%04x:%04x:%04x:%04x:%04x:%04x:%04x",
		be16_to_cpu(((__be16 *)gid_raw)[0]),
		be16_to_cpu(((__be16 *)gid_raw)[1]),
		be16_to_cpu(((__be16 *)gid_raw)[2]),
		be16_to_cpu(((__be16 *)gid_raw)[3]),
		be16_to_cpu(((__be16 *)gid_raw)[4]),
		be16_to_cpu(((__be16 *)gid_raw)[5]),
		be16_to_cpu(((__be16 *)gid_raw)[6]),
		be16_to_cpu(((__be16 *)gid_raw)[7]));
}

static void smc_diag_msg_common_fill(struct smc_diag_msg *r, struct sock *sk)
{
	struct smc_sock *smc = smc_sk(sk);

	if (!smc->clcsock)
		return;
	r->id.idiag_sport = htons(smc->clcsock->sk->sk_num);
	r->id.idiag_dport = smc->clcsock->sk->sk_dport;
	r->id.idiag_if = smc->clcsock->sk->sk_bound_dev_if;
	sock_diag_save_cookie(sk, r->id.idiag_cookie);
	if (sk->sk_protocol == SMCPROTO_SMC) {
		r->diag_family = PF_INET;
		memset(&r->id.idiag_src, 0, sizeof(r->id.idiag_src));
		memset(&r->id.idiag_dst, 0, sizeof(r->id.idiag_dst));
		r->id.idiag_src[0] = smc->clcsock->sk->sk_rcv_saddr;
		r->id.idiag_dst[0] = smc->clcsock->sk->sk_daddr;
#if IS_ENABLED(CONFIG_IPV6)
	} else if (sk->sk_protocol == SMCPROTO_SMC6) {
		r->diag_family = PF_INET6;
		memcpy(&r->id.idiag_src, &smc->clcsock->sk->sk_v6_rcv_saddr,
		       sizeof(smc->clcsock->sk->sk_v6_rcv_saddr));
		memcpy(&r->id.idiag_dst, &smc->clcsock->sk->sk_v6_daddr,
		       sizeof(smc->clcsock->sk->sk_v6_daddr));
#endif
	}
}

static int smc_diag_msg_attrs_fill(struct sock *sk, struct sk_buff *skb,
				   struct smc_diag_msg *r,
				   struct user_namespace *user_ns)
{
	if (nla_put_u8(skb, SMC_DIAG_SHUTDOWN, sk->sk_shutdown))
		return 1;

	r->diag_uid = from_kuid_munged(user_ns, sock_i_uid(sk));
	r->diag_inode = sock_i_ino(sk);
	return 0;
}

static int __smc_diag_dump(struct sock *sk, struct sk_buff *skb,
			   struct netlink_callback *cb,
			   const struct smc_diag_req *req,
			   struct nlattr *bc)
{
	struct smc_sock *smc = smc_sk(sk);
	struct smc_diag_fallback fallback;
	struct user_namespace *user_ns;
	struct smc_diag_msg *r;
	struct nlmsghdr *nlh;

	nlh = nlmsg_put(skb, NETLINK_CB(cb->skb).portid, cb->nlh->nlmsg_seq,
			cb->nlh->nlmsg_type, sizeof(*r), NLM_F_MULTI);
	if (!nlh)
		return -EMSGSIZE;

	r = nlmsg_data(nlh);
	smc_diag_msg_common_fill(r, sk);
	r->diag_state = sk->sk_state;
	if (smc->use_fallback)
		r->diag_mode = SMC_DIAG_MODE_FALLBACK_TCP;
	else if (smc->conn.lgr && smc->conn.lgr->is_smcd)
		r->diag_mode = SMC_DIAG_MODE_SMCD;
	else
		r->diag_mode = SMC_DIAG_MODE_SMCR;
	user_ns = sk_user_ns(NETLINK_CB(cb->skb).sk);
	if (smc_diag_msg_attrs_fill(sk, skb, r, user_ns))
		goto errout;

	fallback.reason = smc->fallback_rsn;
	fallback.peer_diagnosis = smc->peer_diagnosis;
	if (nla_put(skb, SMC_DIAG_FALLBACK, sizeof(fallback), &fallback) < 0)
		goto errout;

	if ((req->diag_ext & (1 << (SMC_DIAG_CONNINFO - 1))) &&
	    smc->conn.alert_token_local) {
		struct smc_connection *conn = &smc->conn;
		struct smc_diag_conninfo cinfo = {
			.token = conn->alert_token_local,
			.sndbuf_size = conn->sndbuf_desc ?
				conn->sndbuf_desc->len : 0,
			.rmbe_size = conn->rmb_desc ? conn->rmb_desc->len : 0,
			.peer_rmbe_size = conn->peer_rmbe_size,

			.rx_prod.wrap = conn->local_rx_ctrl.prod.wrap,
			.rx_prod.count = conn->local_rx_ctrl.prod.count,
			.rx_cons.wrap = conn->local_rx_ctrl.cons.wrap,
			.rx_cons.count = conn->local_rx_ctrl.cons.count,

			.tx_prod.wrap = conn->local_tx_ctrl.prod.wrap,
			.tx_prod.count = conn->local_tx_ctrl.prod.count,
			.tx_cons.wrap = conn->local_tx_ctrl.cons.wrap,
			.tx_cons.count = conn->local_tx_ctrl.cons.count,

			.tx_prod_flags =
				*(u8 *)&conn->local_tx_ctrl.prod_flags,
			.tx_conn_state_flags =
				*(u8 *)&conn->local_tx_ctrl.conn_state_flags,
			.rx_prod_flags = *(u8 *)&conn->local_rx_ctrl.prod_flags,
			.rx_conn_state_flags =
				*(u8 *)&conn->local_rx_ctrl.conn_state_flags,

			.tx_prep.wrap = conn->tx_curs_prep.wrap,
			.tx_prep.count = conn->tx_curs_prep.count,
			.tx_sent.wrap = conn->tx_curs_sent.wrap,
			.tx_sent.count = conn->tx_curs_sent.count,
			.tx_fin.wrap = conn->tx_curs_fin.wrap,
			.tx_fin.count = conn->tx_curs_fin.count,
		};

		if (nla_put(skb, SMC_DIAG_CONNINFO, sizeof(cinfo), &cinfo) < 0)
			goto errout;
	}

	if (smc->conn.lgr && !smc->conn.lgr->is_smcd &&
	    (req->diag_ext & (1 << (SMC_DIAG_LGRINFO - 1))) &&
	    !list_empty(&smc->conn.lgr->list)) {
		struct smc_diag_lgrinfo linfo = {
			.role = smc->conn.lgr->role,
			.lnk[0].ibport = smc->conn.lgr->lnk[0].ibport,
			.lnk[0].link_id = smc->conn.lgr->lnk[0].link_id,
		};

		memcpy(linfo.lnk[0].ibname,
		       smc->conn.lgr->lnk[0].smcibdev->ibdev->name,
		       sizeof(smc->conn.lgr->lnk[0].smcibdev->ibdev->name));
		smc_gid_be16_convert(linfo.lnk[0].gid,
				     smc->conn.lgr->lnk[0].gid);
		smc_gid_be16_convert(linfo.lnk[0].peer_gid,
				     smc->conn.lgr->lnk[0].peer_gid);

		if (nla_put(skb, SMC_DIAG_LGRINFO, sizeof(linfo), &linfo) < 0)
			goto errout;
	}
	if (smc->conn.lgr && smc->conn.lgr->is_smcd &&
	    (req->diag_ext & (1 << (SMC_DIAG_DMBINFO - 1))) &&
	    !list_empty(&smc->conn.lgr->list)) {
		struct smc_connection *conn = &smc->conn;
		struct smcd_diag_dmbinfo dinfo = {
			.linkid = *((u32 *)conn->lgr->id),
			.peer_gid = conn->lgr->peer_gid,
			.my_gid = conn->lgr->smcd->local_gid,
			.token = conn->rmb_desc->token,
			.peer_token = conn->peer_token
		};

		if (nla_put(skb, SMC_DIAG_DMBINFO, sizeof(dinfo), &dinfo) < 0)
			goto errout;
	}

	nlmsg_end(skb, nlh);
	return 0;

errout:
	nlmsg_cancel(skb, nlh);
	return -EMSGSIZE;
}

static int smc_diag_dump_proto(struct proto *prot, struct sk_buff *skb,
			       struct netlink_callback *cb)
{
	struct net *net = sock_net(skb->sk);
	struct nlattr *bc = NULL;
	struct hlist_head *head;
	struct sock *sk;
	int rc = 0;

	read_lock(&prot->h.smc_hash->lock);
	head = &prot->h.smc_hash->ht;
	if (hlist_empty(head))
		goto out;

	sk_for_each(sk, head) {
		if (!net_eq(sock_net(sk), net))
			continue;
		rc = __smc_diag_dump(sk, skb, cb, nlmsg_data(cb->nlh), bc);
		if (rc)
			break;
	}

out:
	read_unlock(&prot->h.smc_hash->lock);
	return rc;
}

static int smc_diag_dump(struct sk_buff *skb, struct netlink_callback *cb)
{
	int rc = 0;

	rc = smc_diag_dump_proto(&smc_proto, skb, cb);
	if (!rc)
		rc = smc_diag_dump_proto(&smc_proto6, skb, cb);
	return rc;
}

static int smc_diag_handler_dump(struct sk_buff *skb, struct nlmsghdr *h)
{
	struct net *net = sock_net(skb->sk);

	if (h->nlmsg_type == SOCK_DIAG_BY_FAMILY &&
	    h->nlmsg_flags & NLM_F_DUMP) {
		{
			struct netlink_dump_control c = {
				.dump = smc_diag_dump,
				.min_dump_alloc = SKB_WITH_OVERHEAD(32768),
			};
			return netlink_dump_start(net->diag_nlsk, skb, h, &c);
		}
	}
	return 0;
}

static const struct sock_diag_handler smc_diag_handler = {
	.family = AF_SMC,
	.dump = smc_diag_handler_dump,
};

static int __init smc_diag_init(void)
{
	return sock_diag_register(&smc_diag_handler);
}

static void __exit smc_diag_exit(void)
{
	sock_diag_unregister(&smc_diag_handler);
}

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