Linux Audio

Check our new training course

Loading...
v4.17
   1/*
   2 * Copyright (c) 2014, Ericsson AB
   3 * All rights reserved.
   4 *
   5 * Redistribution and use in source and binary forms, with or without
   6 * modification, are permitted provided that the following conditions are met:
   7 *
   8 * 1. Redistributions of source code must retain the above copyright
   9 *    notice, this list of conditions and the following disclaimer.
  10 * 2. Redistributions in binary form must reproduce the above copyright
  11 *    notice, this list of conditions and the following disclaimer in the
  12 *    documentation and/or other materials provided with the distribution.
  13 * 3. Neither the names of the copyright holders nor the names of its
  14 *    contributors may be used to endorse or promote products derived from
  15 *    this software without specific prior written permission.
  16 *
  17 * Alternatively, this software may be distributed under the terms of the
  18 * GNU General Public License ("GPL") version 2 as published by the Free
  19 * Software Foundation.
  20 *
  21 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
  22 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
  25 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  26 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  27 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  31 * POSSIBILITY OF SUCH DAMAGE.
  32 */
  33
  34#include "core.h"
  35#include "bearer.h"
  36#include "link.h"
  37#include "name_table.h"
  38#include "socket.h"
  39#include "node.h"
  40#include "net.h"
  41#include <net/genetlink.h>
  42#include <linux/tipc_config.h>
  43
  44/* The legacy API had an artificial message length limit called
  45 * ULTRA_STRING_MAX_LEN.
  46 */
  47#define ULTRA_STRING_MAX_LEN 32768
  48
  49#define TIPC_SKB_MAX TLV_SPACE(ULTRA_STRING_MAX_LEN)
  50
  51#define REPLY_TRUNCATED "<truncated>\n"
  52
  53struct tipc_nl_compat_msg {
  54	u16 cmd;
  55	int rep_type;
  56	int rep_size;
  57	int req_type;
 
  58	struct net *net;
  59	struct sk_buff *rep;
  60	struct tlv_desc *req;
  61	struct sock *dst_sk;
  62};
  63
  64struct tipc_nl_compat_cmd_dump {
  65	int (*header)(struct tipc_nl_compat_msg *);
  66	int (*dumpit)(struct sk_buff *, struct netlink_callback *);
  67	int (*format)(struct tipc_nl_compat_msg *msg, struct nlattr **attrs);
  68};
  69
  70struct tipc_nl_compat_cmd_doit {
  71	int (*doit)(struct sk_buff *skb, struct genl_info *info);
  72	int (*transcode)(struct tipc_nl_compat_cmd_doit *cmd,
  73			 struct sk_buff *skb, struct tipc_nl_compat_msg *msg);
  74};
  75
  76static int tipc_skb_tailroom(struct sk_buff *skb)
  77{
  78	int tailroom;
  79	int limit;
  80
  81	tailroom = skb_tailroom(skb);
  82	limit = TIPC_SKB_MAX - skb->len;
  83
  84	if (tailroom < limit)
  85		return tailroom;
  86
  87	return limit;
  88}
  89
 
 
 
 
 
  90static int tipc_add_tlv(struct sk_buff *skb, u16 type, void *data, u16 len)
  91{
  92	struct tlv_desc *tlv = (struct tlv_desc *)skb_tail_pointer(skb);
  93
  94	if (tipc_skb_tailroom(skb) < TLV_SPACE(len))
  95		return -EMSGSIZE;
  96
  97	skb_put(skb, TLV_SPACE(len));
  98	tlv->tlv_type = htons(type);
  99	tlv->tlv_len = htons(TLV_LENGTH(len));
 100	if (len && data)
 101		memcpy(TLV_DATA(tlv), data, len);
 102
 103	return 0;
 104}
 105
 106static void tipc_tlv_init(struct sk_buff *skb, u16 type)
 107{
 108	struct tlv_desc *tlv = (struct tlv_desc *)skb->data;
 109
 110	TLV_SET_LEN(tlv, 0);
 111	TLV_SET_TYPE(tlv, type);
 112	skb_put(skb, sizeof(struct tlv_desc));
 113}
 114
 115static int tipc_tlv_sprintf(struct sk_buff *skb, const char *fmt, ...)
 
 116{
 117	int n;
 118	u16 len;
 119	u32 rem;
 120	char *buf;
 121	struct tlv_desc *tlv;
 122	va_list args;
 123
 124	rem = tipc_skb_tailroom(skb);
 125
 126	tlv = (struct tlv_desc *)skb->data;
 127	len = TLV_GET_LEN(tlv);
 128	buf = TLV_DATA(tlv) + len;
 129
 130	va_start(args, fmt);
 131	n = vscnprintf(buf, rem, fmt, args);
 132	va_end(args);
 133
 134	TLV_SET_LEN(tlv, n + len);
 135	skb_put(skb, n);
 136
 137	return n;
 138}
 139
 140static struct sk_buff *tipc_tlv_alloc(int size)
 141{
 142	int hdr_len;
 143	struct sk_buff *buf;
 144
 145	size = TLV_SPACE(size);
 146	hdr_len = nlmsg_total_size(GENL_HDRLEN + TIPC_GENL_HDRLEN);
 147
 148	buf = alloc_skb(hdr_len + size, GFP_KERNEL);
 149	if (!buf)
 150		return NULL;
 151
 152	skb_reserve(buf, hdr_len);
 153
 154	return buf;
 155}
 156
 157static struct sk_buff *tipc_get_err_tlv(char *str)
 158{
 159	int str_len = strlen(str) + 1;
 160	struct sk_buff *buf;
 161
 162	buf = tipc_tlv_alloc(TLV_SPACE(str_len));
 163	if (buf)
 164		tipc_add_tlv(buf, TIPC_TLV_ERROR_STRING, str, str_len);
 165
 166	return buf;
 167}
 168
 
 
 
 
 
 169static int __tipc_nl_compat_dumpit(struct tipc_nl_compat_cmd_dump *cmd,
 170				   struct tipc_nl_compat_msg *msg,
 171				   struct sk_buff *arg)
 172{
 
 173	int len = 0;
 174	int err;
 175	struct sk_buff *buf;
 176	struct nlmsghdr *nlmsg;
 177	struct netlink_callback cb;
 
 178
 179	memset(&cb, 0, sizeof(cb));
 180	cb.nlh = (struct nlmsghdr *)arg->data;
 181	cb.skb = arg;
 
 182
 183	buf = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
 184	if (!buf)
 185		return -ENOMEM;
 186
 187	buf->sk = msg->dst_sk;
 
 
 
 
 
 
 
 
 
 
 
 
 
 188
 
 
 
 
 
 
 
 189	do {
 190		int rem;
 191
 192		len = (*cmd->dumpit)(buf, &cb);
 193
 194		nlmsg_for_each_msg(nlmsg, nlmsg_hdr(buf), len, rem) {
 195			struct nlattr **attrs;
 196
 197			err = tipc_nlmsg_parse(nlmsg, &attrs);
 
 
 198			if (err)
 199				goto err_out;
 200
 201			err = (*cmd->format)(msg, attrs);
 202			if (err)
 203				goto err_out;
 204
 205			if (tipc_skb_tailroom(msg->rep) <= 1) {
 206				err = -EMSGSIZE;
 207				goto err_out;
 208			}
 209		}
 210
 211		skb_reset_tail_pointer(buf);
 212		buf->len = 0;
 213
 214	} while (len);
 215
 216	err = 0;
 217
 218err_out:
 
 
 219	kfree_skb(buf);
 220
 221	if (err == -EMSGSIZE) {
 222		/* The legacy API only considered messages filling
 223		 * "ULTRA_STRING_MAX_LEN" to be truncated.
 224		 */
 225		if ((TIPC_SKB_MAX - msg->rep->len) <= 1) {
 226			char *tail = skb_tail_pointer(msg->rep);
 227
 228			if (*tail != '\0')
 229				sprintf(tail - sizeof(REPLY_TRUNCATED) - 1,
 230					REPLY_TRUNCATED);
 231		}
 232
 233		return 0;
 234	}
 235
 236	return err;
 237}
 238
 239static int tipc_nl_compat_dumpit(struct tipc_nl_compat_cmd_dump *cmd,
 240				 struct tipc_nl_compat_msg *msg)
 241{
 242	int err;
 243	struct sk_buff *arg;
 
 244
 245	if (msg->req_type && !TLV_CHECK_TYPE(msg->req, msg->req_type))
 
 246		return -EINVAL;
 247
 248	msg->rep = tipc_tlv_alloc(msg->rep_size);
 249	if (!msg->rep)
 250		return -ENOMEM;
 251
 252	if (msg->rep_type)
 253		tipc_tlv_init(msg->rep, msg->rep_type);
 254
 255	if (cmd->header)
 256		(*cmd->header)(msg);
 
 
 
 
 
 
 257
 258	arg = nlmsg_new(0, GFP_KERNEL);
 259	if (!arg) {
 260		kfree_skb(msg->rep);
 261		msg->rep = NULL;
 262		return -ENOMEM;
 263	}
 264
 
 
 
 
 
 
 
 
 
 265	err = __tipc_nl_compat_dumpit(cmd, msg, arg);
 266	if (err) {
 267		kfree_skb(msg->rep);
 268		msg->rep = NULL;
 269	}
 270	kfree_skb(arg);
 271
 272	return err;
 273}
 274
 275static int __tipc_nl_compat_doit(struct tipc_nl_compat_cmd_doit *cmd,
 276				 struct tipc_nl_compat_msg *msg)
 277{
 278	int err;
 279	struct sk_buff *doit_buf;
 280	struct sk_buff *trans_buf;
 281	struct nlattr **attrbuf;
 282	struct genl_info info;
 283
 284	trans_buf = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
 285	if (!trans_buf)
 286		return -ENOMEM;
 287
 288	attrbuf = kmalloc((tipc_genl_family.maxattr + 1) *
 289			sizeof(struct nlattr *), GFP_KERNEL);
 
 290	if (!attrbuf) {
 291		err = -ENOMEM;
 292		goto trans_out;
 293	}
 294
 295	doit_buf = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
 296	if (!doit_buf) {
 297		err = -ENOMEM;
 298		goto attrbuf_out;
 299	}
 300
 301	memset(&info, 0, sizeof(info));
 302	info.attrs = attrbuf;
 303
 304	rtnl_lock();
 305	err = (*cmd->transcode)(cmd, trans_buf, msg);
 306	if (err)
 307		goto doit_out;
 308
 309	err = nla_parse(attrbuf, tipc_genl_family.maxattr,
 310			(const struct nlattr *)trans_buf->data,
 311			trans_buf->len, NULL, NULL);
 312	if (err)
 313		goto doit_out;
 314
 315	doit_buf->sk = msg->dst_sk;
 316
 317	err = (*cmd->doit)(doit_buf, &info);
 318doit_out:
 319	rtnl_unlock();
 320
 321	kfree_skb(doit_buf);
 322attrbuf_out:
 323	kfree(attrbuf);
 324trans_out:
 325	kfree_skb(trans_buf);
 326
 327	return err;
 328}
 329
 330static int tipc_nl_compat_doit(struct tipc_nl_compat_cmd_doit *cmd,
 331			       struct tipc_nl_compat_msg *msg)
 332{
 333	int err;
 334
 335	if (msg->req_type && !TLV_CHECK_TYPE(msg->req, msg->req_type))
 
 336		return -EINVAL;
 337
 338	err = __tipc_nl_compat_doit(cmd, msg);
 339	if (err)
 340		return err;
 341
 342	/* The legacy API considered an empty message a success message */
 343	msg->rep = tipc_tlv_alloc(0);
 344	if (!msg->rep)
 345		return -ENOMEM;
 346
 347	return 0;
 348}
 349
 350static int tipc_nl_compat_bearer_dump(struct tipc_nl_compat_msg *msg,
 351				      struct nlattr **attrs)
 352{
 353	struct nlattr *bearer[TIPC_NLA_BEARER_MAX + 1];
 354	int err;
 355
 356	if (!attrs[TIPC_NLA_BEARER])
 357		return -EINVAL;
 358
 359	err = nla_parse_nested(bearer, TIPC_NLA_BEARER_MAX,
 360			       attrs[TIPC_NLA_BEARER], NULL, NULL);
 361	if (err)
 362		return err;
 363
 364	return tipc_add_tlv(msg->rep, TIPC_TLV_BEARER_NAME,
 365			    nla_data(bearer[TIPC_NLA_BEARER_NAME]),
 366			    nla_len(bearer[TIPC_NLA_BEARER_NAME]));
 367}
 368
 369static int tipc_nl_compat_bearer_enable(struct tipc_nl_compat_cmd_doit *cmd,
 370					struct sk_buff *skb,
 371					struct tipc_nl_compat_msg *msg)
 372{
 373	struct nlattr *prop;
 374	struct nlattr *bearer;
 375	struct tipc_bearer_config *b;
 
 376
 377	b = (struct tipc_bearer_config *)TLV_DATA(msg->req);
 378
 379	bearer = nla_nest_start(skb, TIPC_NLA_BEARER);
 380	if (!bearer)
 381		return -EMSGSIZE;
 382
 
 
 
 
 
 
 
 
 
 383	if (nla_put_string(skb, TIPC_NLA_BEARER_NAME, b->name))
 384		return -EMSGSIZE;
 385
 386	if (nla_put_u32(skb, TIPC_NLA_BEARER_DOMAIN, ntohl(b->disc_domain)))
 387		return -EMSGSIZE;
 388
 389	if (ntohl(b->priority) <= TIPC_MAX_LINK_PRI) {
 390		prop = nla_nest_start(skb, TIPC_NLA_BEARER_PROP);
 391		if (!prop)
 392			return -EMSGSIZE;
 393		if (nla_put_u32(skb, TIPC_NLA_PROP_PRIO, ntohl(b->priority)))
 394			return -EMSGSIZE;
 395		nla_nest_end(skb, prop);
 396	}
 397	nla_nest_end(skb, bearer);
 398
 399	return 0;
 400}
 401
 402static int tipc_nl_compat_bearer_disable(struct tipc_nl_compat_cmd_doit *cmd,
 403					 struct sk_buff *skb,
 404					 struct tipc_nl_compat_msg *msg)
 405{
 406	char *name;
 407	struct nlattr *bearer;
 
 408
 409	name = (char *)TLV_DATA(msg->req);
 410
 411	bearer = nla_nest_start(skb, TIPC_NLA_BEARER);
 412	if (!bearer)
 413		return -EMSGSIZE;
 414
 
 
 
 
 
 
 
 
 415	if (nla_put_string(skb, TIPC_NLA_BEARER_NAME, name))
 416		return -EMSGSIZE;
 417
 418	nla_nest_end(skb, bearer);
 419
 420	return 0;
 421}
 422
 423static inline u32 perc(u32 count, u32 total)
 424{
 425	return (count * 100 + (total / 2)) / total;
 426}
 427
 428static void __fill_bc_link_stat(struct tipc_nl_compat_msg *msg,
 429				struct nlattr *prop[], struct nlattr *stats[])
 430{
 431	tipc_tlv_sprintf(msg->rep, "  Window:%u packets\n",
 432			 nla_get_u32(prop[TIPC_NLA_PROP_WIN]));
 433
 434	tipc_tlv_sprintf(msg->rep,
 435			 "  RX packets:%u fragments:%u/%u bundles:%u/%u\n",
 436			 nla_get_u32(stats[TIPC_NLA_STATS_RX_INFO]),
 437			 nla_get_u32(stats[TIPC_NLA_STATS_RX_FRAGMENTS]),
 438			 nla_get_u32(stats[TIPC_NLA_STATS_RX_FRAGMENTED]),
 439			 nla_get_u32(stats[TIPC_NLA_STATS_RX_BUNDLES]),
 440			 nla_get_u32(stats[TIPC_NLA_STATS_RX_BUNDLED]));
 441
 442	tipc_tlv_sprintf(msg->rep,
 443			 "  TX packets:%u fragments:%u/%u bundles:%u/%u\n",
 444			 nla_get_u32(stats[TIPC_NLA_STATS_TX_INFO]),
 445			 nla_get_u32(stats[TIPC_NLA_STATS_TX_FRAGMENTS]),
 446			 nla_get_u32(stats[TIPC_NLA_STATS_TX_FRAGMENTED]),
 447			 nla_get_u32(stats[TIPC_NLA_STATS_TX_BUNDLES]),
 448			 nla_get_u32(stats[TIPC_NLA_STATS_TX_BUNDLED]));
 449
 450	tipc_tlv_sprintf(msg->rep, "  RX naks:%u defs:%u dups:%u\n",
 451			 nla_get_u32(stats[TIPC_NLA_STATS_RX_NACKS]),
 452			 nla_get_u32(stats[TIPC_NLA_STATS_RX_DEFERRED]),
 453			 nla_get_u32(stats[TIPC_NLA_STATS_DUPLICATES]));
 454
 455	tipc_tlv_sprintf(msg->rep, "  TX naks:%u acks:%u dups:%u\n",
 456			 nla_get_u32(stats[TIPC_NLA_STATS_TX_NACKS]),
 457			 nla_get_u32(stats[TIPC_NLA_STATS_TX_ACKS]),
 458			 nla_get_u32(stats[TIPC_NLA_STATS_RETRANSMITTED]));
 459
 460	tipc_tlv_sprintf(msg->rep,
 461			 "  Congestion link:%u  Send queue max:%u avg:%u",
 462			 nla_get_u32(stats[TIPC_NLA_STATS_LINK_CONGS]),
 463			 nla_get_u32(stats[TIPC_NLA_STATS_MAX_QUEUE]),
 464			 nla_get_u32(stats[TIPC_NLA_STATS_AVG_QUEUE]));
 465}
 466
 467static int tipc_nl_compat_link_stat_dump(struct tipc_nl_compat_msg *msg,
 468					 struct nlattr **attrs)
 469{
 470	char *name;
 471	struct nlattr *link[TIPC_NLA_LINK_MAX + 1];
 472	struct nlattr *prop[TIPC_NLA_PROP_MAX + 1];
 473	struct nlattr *stats[TIPC_NLA_STATS_MAX + 1];
 474	int err;
 
 475
 476	if (!attrs[TIPC_NLA_LINK])
 477		return -EINVAL;
 478
 479	err = nla_parse_nested(link, TIPC_NLA_LINK_MAX, attrs[TIPC_NLA_LINK],
 480			       NULL, NULL);
 481	if (err)
 482		return err;
 483
 484	if (!link[TIPC_NLA_LINK_PROP])
 485		return -EINVAL;
 486
 487	err = nla_parse_nested(prop, TIPC_NLA_PROP_MAX,
 488			       link[TIPC_NLA_LINK_PROP], NULL, NULL);
 
 489	if (err)
 490		return err;
 491
 492	if (!link[TIPC_NLA_LINK_STATS])
 493		return -EINVAL;
 494
 495	err = nla_parse_nested(stats, TIPC_NLA_STATS_MAX,
 496			       link[TIPC_NLA_LINK_STATS], NULL, NULL);
 
 497	if (err)
 498		return err;
 499
 500	name = (char *)TLV_DATA(msg->req);
 
 
 
 
 
 
 
 
 
 501	if (strcmp(name, nla_data(link[TIPC_NLA_LINK_NAME])) != 0)
 502		return 0;
 503
 504	tipc_tlv_sprintf(msg->rep, "\nLink <%s>\n",
 505			 nla_data(link[TIPC_NLA_LINK_NAME]));
 506
 507	if (link[TIPC_NLA_LINK_BROADCAST]) {
 508		__fill_bc_link_stat(msg, prop, stats);
 509		return 0;
 510	}
 511
 512	if (link[TIPC_NLA_LINK_ACTIVE])
 513		tipc_tlv_sprintf(msg->rep, "  ACTIVE");
 514	else if (link[TIPC_NLA_LINK_UP])
 515		tipc_tlv_sprintf(msg->rep, "  STANDBY");
 516	else
 517		tipc_tlv_sprintf(msg->rep, "  DEFUNCT");
 518
 519	tipc_tlv_sprintf(msg->rep, "  MTU:%u  Priority:%u",
 520			 nla_get_u32(link[TIPC_NLA_LINK_MTU]),
 521			 nla_get_u32(prop[TIPC_NLA_PROP_PRIO]));
 522
 523	tipc_tlv_sprintf(msg->rep, "  Tolerance:%u ms  Window:%u packets\n",
 524			 nla_get_u32(prop[TIPC_NLA_PROP_TOL]),
 525			 nla_get_u32(prop[TIPC_NLA_PROP_WIN]));
 526
 527	tipc_tlv_sprintf(msg->rep,
 528			 "  RX packets:%u fragments:%u/%u bundles:%u/%u\n",
 529			 nla_get_u32(link[TIPC_NLA_LINK_RX]) -
 530			 nla_get_u32(stats[TIPC_NLA_STATS_RX_INFO]),
 531			 nla_get_u32(stats[TIPC_NLA_STATS_RX_FRAGMENTS]),
 532			 nla_get_u32(stats[TIPC_NLA_STATS_RX_FRAGMENTED]),
 533			 nla_get_u32(stats[TIPC_NLA_STATS_RX_BUNDLES]),
 534			 nla_get_u32(stats[TIPC_NLA_STATS_RX_BUNDLED]));
 535
 536	tipc_tlv_sprintf(msg->rep,
 537			 "  TX packets:%u fragments:%u/%u bundles:%u/%u\n",
 538			 nla_get_u32(link[TIPC_NLA_LINK_TX]) -
 539			 nla_get_u32(stats[TIPC_NLA_STATS_TX_INFO]),
 540			 nla_get_u32(stats[TIPC_NLA_STATS_TX_FRAGMENTS]),
 541			 nla_get_u32(stats[TIPC_NLA_STATS_TX_FRAGMENTED]),
 542			 nla_get_u32(stats[TIPC_NLA_STATS_TX_BUNDLES]),
 543			 nla_get_u32(stats[TIPC_NLA_STATS_TX_BUNDLED]));
 544
 545	tipc_tlv_sprintf(msg->rep,
 546			 "  TX profile sample:%u packets  average:%u octets\n",
 547			 nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_CNT]),
 548			 nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_TOT]) /
 549			 nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT]));
 550
 551	tipc_tlv_sprintf(msg->rep,
 552			 "  0-64:%u%% -256:%u%% -1024:%u%% -4096:%u%% ",
 553			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P0]),
 554			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 555			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P1]),
 556			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 557			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P2]),
 558			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 559			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P3]),
 560			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])));
 561
 562	tipc_tlv_sprintf(msg->rep, "-16384:%u%% -32768:%u%% -66000:%u%%\n",
 563			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P4]),
 564			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 565			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P5]),
 566			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 567			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P6]),
 568			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])));
 569
 570	tipc_tlv_sprintf(msg->rep,
 571			 "  RX states:%u probes:%u naks:%u defs:%u dups:%u\n",
 572			 nla_get_u32(stats[TIPC_NLA_STATS_RX_STATES]),
 573			 nla_get_u32(stats[TIPC_NLA_STATS_RX_PROBES]),
 574			 nla_get_u32(stats[TIPC_NLA_STATS_RX_NACKS]),
 575			 nla_get_u32(stats[TIPC_NLA_STATS_RX_DEFERRED]),
 576			 nla_get_u32(stats[TIPC_NLA_STATS_DUPLICATES]));
 577
 578	tipc_tlv_sprintf(msg->rep,
 579			 "  TX states:%u probes:%u naks:%u acks:%u dups:%u\n",
 580			 nla_get_u32(stats[TIPC_NLA_STATS_TX_STATES]),
 581			 nla_get_u32(stats[TIPC_NLA_STATS_TX_PROBES]),
 582			 nla_get_u32(stats[TIPC_NLA_STATS_TX_NACKS]),
 583			 nla_get_u32(stats[TIPC_NLA_STATS_TX_ACKS]),
 584			 nla_get_u32(stats[TIPC_NLA_STATS_RETRANSMITTED]));
 585
 586	tipc_tlv_sprintf(msg->rep,
 587			 "  Congestion link:%u  Send queue max:%u avg:%u",
 588			 nla_get_u32(stats[TIPC_NLA_STATS_LINK_CONGS]),
 589			 nla_get_u32(stats[TIPC_NLA_STATS_MAX_QUEUE]),
 590			 nla_get_u32(stats[TIPC_NLA_STATS_AVG_QUEUE]));
 591
 592	return 0;
 593}
 594
 595static int tipc_nl_compat_link_dump(struct tipc_nl_compat_msg *msg,
 596				    struct nlattr **attrs)
 597{
 598	struct nlattr *link[TIPC_NLA_LINK_MAX + 1];
 599	struct tipc_link_info link_info;
 600	int err;
 601
 602	if (!attrs[TIPC_NLA_LINK])
 603		return -EINVAL;
 604
 605	err = nla_parse_nested(link, TIPC_NLA_LINK_MAX, attrs[TIPC_NLA_LINK],
 606			       NULL, NULL);
 607	if (err)
 608		return err;
 609
 610	link_info.dest = nla_get_flag(link[TIPC_NLA_LINK_DEST]);
 611	link_info.up = htonl(nla_get_flag(link[TIPC_NLA_LINK_UP]));
 612	nla_strlcpy(link_info.str, link[TIPC_NLA_LINK_NAME],
 613		    TIPC_MAX_LINK_NAME);
 614
 615	return tipc_add_tlv(msg->rep, TIPC_TLV_LINK_INFO,
 616			    &link_info, sizeof(link_info));
 617}
 618
 619static int __tipc_add_link_prop(struct sk_buff *skb,
 620				struct tipc_nl_compat_msg *msg,
 621				struct tipc_link_config *lc)
 622{
 623	switch (msg->cmd) {
 624	case TIPC_CMD_SET_LINK_PRI:
 625		return nla_put_u32(skb, TIPC_NLA_PROP_PRIO, ntohl(lc->value));
 626	case TIPC_CMD_SET_LINK_TOL:
 627		return nla_put_u32(skb, TIPC_NLA_PROP_TOL, ntohl(lc->value));
 628	case TIPC_CMD_SET_LINK_WINDOW:
 629		return nla_put_u32(skb, TIPC_NLA_PROP_WIN, ntohl(lc->value));
 630	}
 631
 632	return -EINVAL;
 633}
 634
 635static int tipc_nl_compat_media_set(struct sk_buff *skb,
 636				    struct tipc_nl_compat_msg *msg)
 637{
 638	struct nlattr *prop;
 639	struct nlattr *media;
 640	struct tipc_link_config *lc;
 641
 642	lc = (struct tipc_link_config *)TLV_DATA(msg->req);
 643
 644	media = nla_nest_start(skb, TIPC_NLA_MEDIA);
 645	if (!media)
 646		return -EMSGSIZE;
 647
 648	if (nla_put_string(skb, TIPC_NLA_MEDIA_NAME, lc->name))
 649		return -EMSGSIZE;
 650
 651	prop = nla_nest_start(skb, TIPC_NLA_MEDIA_PROP);
 652	if (!prop)
 653		return -EMSGSIZE;
 654
 655	__tipc_add_link_prop(skb, msg, lc);
 656	nla_nest_end(skb, prop);
 657	nla_nest_end(skb, media);
 658
 659	return 0;
 660}
 661
 662static int tipc_nl_compat_bearer_set(struct sk_buff *skb,
 663				     struct tipc_nl_compat_msg *msg)
 664{
 665	struct nlattr *prop;
 666	struct nlattr *bearer;
 667	struct tipc_link_config *lc;
 668
 669	lc = (struct tipc_link_config *)TLV_DATA(msg->req);
 670
 671	bearer = nla_nest_start(skb, TIPC_NLA_BEARER);
 672	if (!bearer)
 673		return -EMSGSIZE;
 674
 675	if (nla_put_string(skb, TIPC_NLA_BEARER_NAME, lc->name))
 676		return -EMSGSIZE;
 677
 678	prop = nla_nest_start(skb, TIPC_NLA_BEARER_PROP);
 679	if (!prop)
 680		return -EMSGSIZE;
 681
 682	__tipc_add_link_prop(skb, msg, lc);
 683	nla_nest_end(skb, prop);
 684	nla_nest_end(skb, bearer);
 685
 686	return 0;
 687}
 688
 689static int __tipc_nl_compat_link_set(struct sk_buff *skb,
 690				     struct tipc_nl_compat_msg *msg)
 691{
 692	struct nlattr *prop;
 693	struct nlattr *link;
 694	struct tipc_link_config *lc;
 695
 696	lc = (struct tipc_link_config *)TLV_DATA(msg->req);
 697
 698	link = nla_nest_start(skb, TIPC_NLA_LINK);
 699	if (!link)
 700		return -EMSGSIZE;
 701
 702	if (nla_put_string(skb, TIPC_NLA_LINK_NAME, lc->name))
 703		return -EMSGSIZE;
 704
 705	prop = nla_nest_start(skb, TIPC_NLA_LINK_PROP);
 706	if (!prop)
 707		return -EMSGSIZE;
 708
 709	__tipc_add_link_prop(skb, msg, lc);
 710	nla_nest_end(skb, prop);
 711	nla_nest_end(skb, link);
 712
 713	return 0;
 714}
 715
 716static int tipc_nl_compat_link_set(struct tipc_nl_compat_cmd_doit *cmd,
 717				   struct sk_buff *skb,
 718				   struct tipc_nl_compat_msg *msg)
 719{
 720	struct tipc_link_config *lc;
 721	struct tipc_bearer *bearer;
 722	struct tipc_media *media;
 
 723
 724	lc = (struct tipc_link_config *)TLV_DATA(msg->req);
 725
 
 
 
 
 
 
 
 
 
 726	media = tipc_media_find(lc->name);
 727	if (media) {
 728		cmd->doit = &__tipc_nl_media_set;
 729		return tipc_nl_compat_media_set(skb, msg);
 730	}
 731
 732	bearer = tipc_bearer_find(msg->net, lc->name);
 733	if (bearer) {
 734		cmd->doit = &__tipc_nl_bearer_set;
 735		return tipc_nl_compat_bearer_set(skb, msg);
 736	}
 737
 738	return __tipc_nl_compat_link_set(skb, msg);
 739}
 740
 741static int tipc_nl_compat_link_reset_stats(struct tipc_nl_compat_cmd_doit *cmd,
 742					   struct sk_buff *skb,
 743					   struct tipc_nl_compat_msg *msg)
 744{
 745	char *name;
 746	struct nlattr *link;
 
 747
 748	name = (char *)TLV_DATA(msg->req);
 749
 750	link = nla_nest_start(skb, TIPC_NLA_LINK);
 751	if (!link)
 752		return -EMSGSIZE;
 753
 
 
 
 
 
 
 
 
 754	if (nla_put_string(skb, TIPC_NLA_LINK_NAME, name))
 755		return -EMSGSIZE;
 756
 757	nla_nest_end(skb, link);
 758
 759	return 0;
 760}
 761
 762static int tipc_nl_compat_name_table_dump_header(struct tipc_nl_compat_msg *msg)
 763{
 764	int i;
 765	u32 depth;
 766	struct tipc_name_table_query *ntq;
 767	static const char * const header[] = {
 768		"Type       ",
 769		"Lower      Upper      ",
 770		"Port Identity              ",
 771		"Publication Scope"
 772	};
 773
 774	ntq = (struct tipc_name_table_query *)TLV_DATA(msg->req);
 
 
 775
 776	depth = ntohl(ntq->depth);
 777
 778	if (depth > 4)
 779		depth = 4;
 780	for (i = 0; i < depth; i++)
 781		tipc_tlv_sprintf(msg->rep, header[i]);
 782	tipc_tlv_sprintf(msg->rep, "\n");
 783
 784	return 0;
 785}
 786
 787static int tipc_nl_compat_name_table_dump(struct tipc_nl_compat_msg *msg,
 788					  struct nlattr **attrs)
 789{
 790	char port_str[27];
 791	struct tipc_name_table_query *ntq;
 792	struct nlattr *nt[TIPC_NLA_NAME_TABLE_MAX + 1];
 793	struct nlattr *publ[TIPC_NLA_PUBL_MAX + 1];
 794	u32 node, depth, type, lowbound, upbound;
 795	static const char * const scope_str[] = {"", " zone", " cluster",
 796						 " node"};
 797	int err;
 798
 799	if (!attrs[TIPC_NLA_NAME_TABLE])
 800		return -EINVAL;
 801
 802	err = nla_parse_nested(nt, TIPC_NLA_NAME_TABLE_MAX,
 803			       attrs[TIPC_NLA_NAME_TABLE], NULL, NULL);
 
 804	if (err)
 805		return err;
 806
 807	if (!nt[TIPC_NLA_NAME_TABLE_PUBL])
 808		return -EINVAL;
 809
 810	err = nla_parse_nested(publ, TIPC_NLA_PUBL_MAX,
 811			       nt[TIPC_NLA_NAME_TABLE_PUBL], NULL, NULL);
 
 812	if (err)
 813		return err;
 814
 815	ntq = (struct tipc_name_table_query *)TLV_DATA(msg->req);
 816
 817	depth = ntohl(ntq->depth);
 818	type = ntohl(ntq->type);
 819	lowbound = ntohl(ntq->lowbound);
 820	upbound = ntohl(ntq->upbound);
 821
 822	if (!(depth & TIPC_NTQ_ALLTYPES) &&
 823	    (type != nla_get_u32(publ[TIPC_NLA_PUBL_TYPE])))
 824		return 0;
 825	if (lowbound && (lowbound > nla_get_u32(publ[TIPC_NLA_PUBL_UPPER])))
 826		return 0;
 827	if (upbound && (upbound < nla_get_u32(publ[TIPC_NLA_PUBL_LOWER])))
 828		return 0;
 829
 830	tipc_tlv_sprintf(msg->rep, "%-10u ",
 831			 nla_get_u32(publ[TIPC_NLA_PUBL_TYPE]));
 832
 833	if (depth == 1)
 834		goto out;
 835
 836	tipc_tlv_sprintf(msg->rep, "%-10u %-10u ",
 837			 nla_get_u32(publ[TIPC_NLA_PUBL_LOWER]),
 838			 nla_get_u32(publ[TIPC_NLA_PUBL_UPPER]));
 839
 840	if (depth == 2)
 841		goto out;
 842
 843	node = nla_get_u32(publ[TIPC_NLA_PUBL_NODE]);
 844	sprintf(port_str, "<%u.%u.%u:%u>", tipc_zone(node), tipc_cluster(node),
 845		tipc_node(node), nla_get_u32(publ[TIPC_NLA_PUBL_REF]));
 846	tipc_tlv_sprintf(msg->rep, "%-26s ", port_str);
 847
 848	if (depth == 3)
 849		goto out;
 850
 851	tipc_tlv_sprintf(msg->rep, "%-10u %s",
 852			 nla_get_u32(publ[TIPC_NLA_PUBL_KEY]),
 853			 scope_str[nla_get_u32(publ[TIPC_NLA_PUBL_SCOPE])]);
 854out:
 855	tipc_tlv_sprintf(msg->rep, "\n");
 856
 857	return 0;
 858}
 859
 860static int __tipc_nl_compat_publ_dump(struct tipc_nl_compat_msg *msg,
 861				      struct nlattr **attrs)
 862{
 863	u32 type, lower, upper;
 864	struct nlattr *publ[TIPC_NLA_PUBL_MAX + 1];
 865	int err;
 866
 867	if (!attrs[TIPC_NLA_PUBL])
 868		return -EINVAL;
 869
 870	err = nla_parse_nested(publ, TIPC_NLA_PUBL_MAX, attrs[TIPC_NLA_PUBL],
 871			       NULL, NULL);
 872	if (err)
 873		return err;
 874
 875	type = nla_get_u32(publ[TIPC_NLA_PUBL_TYPE]);
 876	lower = nla_get_u32(publ[TIPC_NLA_PUBL_LOWER]);
 877	upper = nla_get_u32(publ[TIPC_NLA_PUBL_UPPER]);
 878
 879	if (lower == upper)
 880		tipc_tlv_sprintf(msg->rep, " {%u,%u}", type, lower);
 881	else
 882		tipc_tlv_sprintf(msg->rep, " {%u,%u,%u}", type, lower, upper);
 883
 884	return 0;
 885}
 886
 887static int tipc_nl_compat_publ_dump(struct tipc_nl_compat_msg *msg, u32 sock)
 888{
 889	int err;
 890	void *hdr;
 891	struct nlattr *nest;
 892	struct sk_buff *args;
 893	struct tipc_nl_compat_cmd_dump dump;
 894
 895	args = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
 896	if (!args)
 897		return -ENOMEM;
 898
 899	hdr = genlmsg_put(args, 0, 0, &tipc_genl_family, NLM_F_MULTI,
 900			  TIPC_NL_PUBL_GET);
 
 
 
 
 901
 902	nest = nla_nest_start(args, TIPC_NLA_SOCK);
 903	if (!nest) {
 904		kfree_skb(args);
 905		return -EMSGSIZE;
 906	}
 907
 908	if (nla_put_u32(args, TIPC_NLA_SOCK_REF, sock)) {
 909		kfree_skb(args);
 910		return -EMSGSIZE;
 911	}
 912
 913	nla_nest_end(args, nest);
 914	genlmsg_end(args, hdr);
 915
 916	dump.dumpit = tipc_nl_publ_dump;
 917	dump.format = __tipc_nl_compat_publ_dump;
 918
 919	err = __tipc_nl_compat_dumpit(&dump, msg, args);
 920
 921	kfree_skb(args);
 922
 923	return err;
 924}
 925
 926static int tipc_nl_compat_sk_dump(struct tipc_nl_compat_msg *msg,
 927				  struct nlattr **attrs)
 928{
 929	int err;
 930	u32 sock_ref;
 931	struct nlattr *sock[TIPC_NLA_SOCK_MAX + 1];
 932
 933	if (!attrs[TIPC_NLA_SOCK])
 934		return -EINVAL;
 935
 936	err = nla_parse_nested(sock, TIPC_NLA_SOCK_MAX, attrs[TIPC_NLA_SOCK],
 937			       NULL, NULL);
 938	if (err)
 939		return err;
 940
 941	sock_ref = nla_get_u32(sock[TIPC_NLA_SOCK_REF]);
 942	tipc_tlv_sprintf(msg->rep, "%u:", sock_ref);
 943
 944	if (sock[TIPC_NLA_SOCK_CON]) {
 945		u32 node;
 946		struct nlattr *con[TIPC_NLA_CON_MAX + 1];
 947
 948		nla_parse_nested(con, TIPC_NLA_CON_MAX,
 949				 sock[TIPC_NLA_SOCK_CON], NULL, NULL);
 
 
 
 
 950
 951		node = nla_get_u32(con[TIPC_NLA_CON_NODE]);
 952		tipc_tlv_sprintf(msg->rep, "  connected to <%u.%u.%u:%u>",
 953				 tipc_zone(node),
 954				 tipc_cluster(node),
 955				 tipc_node(node),
 956				 nla_get_u32(con[TIPC_NLA_CON_SOCK]));
 957
 958		if (con[TIPC_NLA_CON_FLAG])
 959			tipc_tlv_sprintf(msg->rep, " via {%u,%u}\n",
 960					 nla_get_u32(con[TIPC_NLA_CON_TYPE]),
 961					 nla_get_u32(con[TIPC_NLA_CON_INST]));
 962		else
 963			tipc_tlv_sprintf(msg->rep, "\n");
 964	} else if (sock[TIPC_NLA_SOCK_HAS_PUBL]) {
 965		tipc_tlv_sprintf(msg->rep, " bound to");
 966
 967		err = tipc_nl_compat_publ_dump(msg, sock_ref);
 968		if (err)
 969			return err;
 970	}
 971	tipc_tlv_sprintf(msg->rep, "\n");
 972
 973	return 0;
 974}
 975
 976static int tipc_nl_compat_media_dump(struct tipc_nl_compat_msg *msg,
 977				     struct nlattr **attrs)
 978{
 979	struct nlattr *media[TIPC_NLA_MEDIA_MAX + 1];
 980	int err;
 981
 982	if (!attrs[TIPC_NLA_MEDIA])
 983		return -EINVAL;
 984
 985	err = nla_parse_nested(media, TIPC_NLA_MEDIA_MAX,
 986			       attrs[TIPC_NLA_MEDIA], NULL, NULL);
 987	if (err)
 988		return err;
 989
 990	return tipc_add_tlv(msg->rep, TIPC_TLV_MEDIA_NAME,
 991			    nla_data(media[TIPC_NLA_MEDIA_NAME]),
 992			    nla_len(media[TIPC_NLA_MEDIA_NAME]));
 993}
 994
 995static int tipc_nl_compat_node_dump(struct tipc_nl_compat_msg *msg,
 996				    struct nlattr **attrs)
 997{
 998	struct tipc_node_info node_info;
 999	struct nlattr *node[TIPC_NLA_NODE_MAX + 1];
1000	int err;
1001
1002	if (!attrs[TIPC_NLA_NODE])
1003		return -EINVAL;
1004
1005	err = nla_parse_nested(node, TIPC_NLA_NODE_MAX, attrs[TIPC_NLA_NODE],
1006			       NULL, NULL);
1007	if (err)
1008		return err;
1009
1010	node_info.addr = htonl(nla_get_u32(node[TIPC_NLA_NODE_ADDR]));
1011	node_info.up = htonl(nla_get_flag(node[TIPC_NLA_NODE_UP]));
1012
1013	return tipc_add_tlv(msg->rep, TIPC_TLV_NODE_INFO, &node_info,
1014			    sizeof(node_info));
1015}
1016
1017static int tipc_nl_compat_net_set(struct tipc_nl_compat_cmd_doit *cmd,
1018				  struct sk_buff *skb,
1019				  struct tipc_nl_compat_msg *msg)
1020{
1021	u32 val;
1022	struct nlattr *net;
1023
1024	val = ntohl(*(__be32 *)TLV_DATA(msg->req));
1025
1026	net = nla_nest_start(skb, TIPC_NLA_NET);
1027	if (!net)
1028		return -EMSGSIZE;
1029
1030	if (msg->cmd == TIPC_CMD_SET_NODE_ADDR) {
1031		if (nla_put_u32(skb, TIPC_NLA_NET_ADDR, val))
1032			return -EMSGSIZE;
1033	} else if (msg->cmd == TIPC_CMD_SET_NETID) {
1034		if (nla_put_u32(skb, TIPC_NLA_NET_ID, val))
1035			return -EMSGSIZE;
1036	}
1037	nla_nest_end(skb, net);
1038
1039	return 0;
1040}
1041
1042static int tipc_nl_compat_net_dump(struct tipc_nl_compat_msg *msg,
1043				   struct nlattr **attrs)
1044{
1045	__be32 id;
1046	struct nlattr *net[TIPC_NLA_NET_MAX + 1];
1047	int err;
1048
1049	if (!attrs[TIPC_NLA_NET])
1050		return -EINVAL;
1051
1052	err = nla_parse_nested(net, TIPC_NLA_NET_MAX, attrs[TIPC_NLA_NET],
1053			       NULL, NULL);
1054	if (err)
1055		return err;
1056
1057	id = htonl(nla_get_u32(net[TIPC_NLA_NET_ID]));
1058
1059	return tipc_add_tlv(msg->rep, TIPC_TLV_UNSIGNED, &id, sizeof(id));
1060}
1061
1062static int tipc_cmd_show_stats_compat(struct tipc_nl_compat_msg *msg)
1063{
1064	msg->rep = tipc_tlv_alloc(ULTRA_STRING_MAX_LEN);
1065	if (!msg->rep)
1066		return -ENOMEM;
1067
1068	tipc_tlv_init(msg->rep, TIPC_TLV_ULTRA_STRING);
1069	tipc_tlv_sprintf(msg->rep, "TIPC version " TIPC_MOD_VER "\n");
1070
1071	return 0;
1072}
1073
1074static int tipc_nl_compat_handle(struct tipc_nl_compat_msg *msg)
1075{
1076	struct tipc_nl_compat_cmd_dump dump;
1077	struct tipc_nl_compat_cmd_doit doit;
1078
1079	memset(&dump, 0, sizeof(dump));
1080	memset(&doit, 0, sizeof(doit));
1081
1082	switch (msg->cmd) {
1083	case TIPC_CMD_NOOP:
1084		msg->rep = tipc_tlv_alloc(0);
1085		if (!msg->rep)
1086			return -ENOMEM;
1087		return 0;
1088	case TIPC_CMD_GET_BEARER_NAMES:
1089		msg->rep_size = MAX_BEARERS * TLV_SPACE(TIPC_MAX_BEARER_NAME);
1090		dump.dumpit = tipc_nl_bearer_dump;
1091		dump.format = tipc_nl_compat_bearer_dump;
1092		return tipc_nl_compat_dumpit(&dump, msg);
1093	case TIPC_CMD_ENABLE_BEARER:
1094		msg->req_type = TIPC_TLV_BEARER_CONFIG;
1095		doit.doit = __tipc_nl_bearer_enable;
1096		doit.transcode = tipc_nl_compat_bearer_enable;
1097		return tipc_nl_compat_doit(&doit, msg);
1098	case TIPC_CMD_DISABLE_BEARER:
1099		msg->req_type = TIPC_TLV_BEARER_NAME;
1100		doit.doit = __tipc_nl_bearer_disable;
1101		doit.transcode = tipc_nl_compat_bearer_disable;
1102		return tipc_nl_compat_doit(&doit, msg);
1103	case TIPC_CMD_SHOW_LINK_STATS:
1104		msg->req_type = TIPC_TLV_LINK_NAME;
1105		msg->rep_size = ULTRA_STRING_MAX_LEN;
1106		msg->rep_type = TIPC_TLV_ULTRA_STRING;
1107		dump.dumpit = tipc_nl_node_dump_link;
1108		dump.format = tipc_nl_compat_link_stat_dump;
1109		return tipc_nl_compat_dumpit(&dump, msg);
1110	case TIPC_CMD_GET_LINKS:
1111		msg->req_type = TIPC_TLV_NET_ADDR;
1112		msg->rep_size = ULTRA_STRING_MAX_LEN;
1113		dump.dumpit = tipc_nl_node_dump_link;
1114		dump.format = tipc_nl_compat_link_dump;
1115		return tipc_nl_compat_dumpit(&dump, msg);
1116	case TIPC_CMD_SET_LINK_TOL:
1117	case TIPC_CMD_SET_LINK_PRI:
1118	case TIPC_CMD_SET_LINK_WINDOW:
1119		msg->req_type =  TIPC_TLV_LINK_CONFIG;
1120		doit.doit = tipc_nl_node_set_link;
1121		doit.transcode = tipc_nl_compat_link_set;
1122		return tipc_nl_compat_doit(&doit, msg);
1123	case TIPC_CMD_RESET_LINK_STATS:
1124		msg->req_type = TIPC_TLV_LINK_NAME;
1125		doit.doit = tipc_nl_node_reset_link_stats;
1126		doit.transcode = tipc_nl_compat_link_reset_stats;
1127		return tipc_nl_compat_doit(&doit, msg);
1128	case TIPC_CMD_SHOW_NAME_TABLE:
1129		msg->req_type = TIPC_TLV_NAME_TBL_QUERY;
1130		msg->rep_size = ULTRA_STRING_MAX_LEN;
1131		msg->rep_type = TIPC_TLV_ULTRA_STRING;
1132		dump.header = tipc_nl_compat_name_table_dump_header;
1133		dump.dumpit = tipc_nl_name_table_dump;
1134		dump.format = tipc_nl_compat_name_table_dump;
1135		return tipc_nl_compat_dumpit(&dump, msg);
1136	case TIPC_CMD_SHOW_PORTS:
1137		msg->rep_size = ULTRA_STRING_MAX_LEN;
1138		msg->rep_type = TIPC_TLV_ULTRA_STRING;
1139		dump.dumpit = tipc_nl_sk_dump;
1140		dump.format = tipc_nl_compat_sk_dump;
1141		return tipc_nl_compat_dumpit(&dump, msg);
1142	case TIPC_CMD_GET_MEDIA_NAMES:
1143		msg->rep_size = MAX_MEDIA * TLV_SPACE(TIPC_MAX_MEDIA_NAME);
1144		dump.dumpit = tipc_nl_media_dump;
1145		dump.format = tipc_nl_compat_media_dump;
1146		return tipc_nl_compat_dumpit(&dump, msg);
1147	case TIPC_CMD_GET_NODES:
1148		msg->rep_size = ULTRA_STRING_MAX_LEN;
1149		dump.dumpit = tipc_nl_node_dump;
1150		dump.format = tipc_nl_compat_node_dump;
1151		return tipc_nl_compat_dumpit(&dump, msg);
1152	case TIPC_CMD_SET_NODE_ADDR:
1153		msg->req_type = TIPC_TLV_NET_ADDR;
1154		doit.doit = __tipc_nl_net_set;
1155		doit.transcode = tipc_nl_compat_net_set;
1156		return tipc_nl_compat_doit(&doit, msg);
1157	case TIPC_CMD_SET_NETID:
1158		msg->req_type = TIPC_TLV_UNSIGNED;
1159		doit.doit = __tipc_nl_net_set;
1160		doit.transcode = tipc_nl_compat_net_set;
1161		return tipc_nl_compat_doit(&doit, msg);
1162	case TIPC_CMD_GET_NETID:
1163		msg->rep_size = sizeof(u32);
1164		dump.dumpit = tipc_nl_net_dump;
1165		dump.format = tipc_nl_compat_net_dump;
1166		return tipc_nl_compat_dumpit(&dump, msg);
1167	case TIPC_CMD_SHOW_STATS:
1168		return tipc_cmd_show_stats_compat(msg);
1169	}
1170
1171	return -EOPNOTSUPP;
1172}
1173
1174static int tipc_nl_compat_recv(struct sk_buff *skb, struct genl_info *info)
1175{
1176	int err;
1177	int len;
1178	struct tipc_nl_compat_msg msg;
1179	struct nlmsghdr *req_nlh;
1180	struct nlmsghdr *rep_nlh;
1181	struct tipc_genlmsghdr *req_userhdr = info->userhdr;
1182
1183	memset(&msg, 0, sizeof(msg));
1184
1185	req_nlh = (struct nlmsghdr *)skb->data;
1186	msg.req = nlmsg_data(req_nlh) + GENL_HDRLEN + TIPC_GENL_HDRLEN;
1187	msg.cmd = req_userhdr->cmd;
1188	msg.net = genl_info_net(info);
1189	msg.dst_sk = skb->sk;
1190
1191	if ((msg.cmd & 0xC000) && (!netlink_net_capable(skb, CAP_NET_ADMIN))) {
1192		msg.rep = tipc_get_err_tlv(TIPC_CFG_NOT_NET_ADMIN);
1193		err = -EACCES;
1194		goto send;
1195	}
1196
1197	len = nlmsg_attrlen(req_nlh, GENL_HDRLEN + TIPC_GENL_HDRLEN);
1198	if (len && !TLV_OK(msg.req, len)) {
1199		msg.rep = tipc_get_err_tlv(TIPC_CFG_NOT_SUPPORTED);
1200		err = -EOPNOTSUPP;
1201		goto send;
1202	}
1203
1204	err = tipc_nl_compat_handle(&msg);
1205	if ((err == -EOPNOTSUPP) || (err == -EPERM))
1206		msg.rep = tipc_get_err_tlv(TIPC_CFG_NOT_SUPPORTED);
1207	else if (err == -EINVAL)
1208		msg.rep = tipc_get_err_tlv(TIPC_CFG_TLV_ERROR);
1209send:
1210	if (!msg.rep)
1211		return err;
1212
1213	len = nlmsg_total_size(GENL_HDRLEN + TIPC_GENL_HDRLEN);
1214	skb_push(msg.rep, len);
1215	rep_nlh = nlmsg_hdr(msg.rep);
1216	memcpy(rep_nlh, info->nlhdr, len);
1217	rep_nlh->nlmsg_len = msg.rep->len;
1218	genlmsg_unicast(msg.net, msg.rep, NETLINK_CB(skb).portid);
1219
1220	return err;
1221}
1222
1223static const struct genl_ops tipc_genl_compat_ops[] = {
1224	{
1225		.cmd		= TIPC_GENL_CMD,
 
1226		.doit		= tipc_nl_compat_recv,
1227	},
1228};
1229
1230static struct genl_family tipc_genl_compat_family __ro_after_init = {
1231	.name		= TIPC_GENL_NAME,
1232	.version	= TIPC_GENL_VERSION,
1233	.hdrsize	= TIPC_GENL_HDRLEN,
1234	.maxattr	= 0,
1235	.netnsok	= true,
1236	.module		= THIS_MODULE,
1237	.ops		= tipc_genl_compat_ops,
1238	.n_ops		= ARRAY_SIZE(tipc_genl_compat_ops),
 
1239};
1240
1241int __init tipc_netlink_compat_start(void)
1242{
1243	int res;
1244
1245	res = genl_register_family(&tipc_genl_compat_family);
1246	if (res) {
1247		pr_err("Failed to register legacy compat interface\n");
1248		return res;
1249	}
1250
1251	return 0;
1252}
1253
1254void tipc_netlink_compat_stop(void)
1255{
1256	genl_unregister_family(&tipc_genl_compat_family);
1257}
v6.2
   1/*
   2 * Copyright (c) 2014, Ericsson AB
   3 * All rights reserved.
   4 *
   5 * Redistribution and use in source and binary forms, with or without
   6 * modification, are permitted provided that the following conditions are met:
   7 *
   8 * 1. Redistributions of source code must retain the above copyright
   9 *    notice, this list of conditions and the following disclaimer.
  10 * 2. Redistributions in binary form must reproduce the above copyright
  11 *    notice, this list of conditions and the following disclaimer in the
  12 *    documentation and/or other materials provided with the distribution.
  13 * 3. Neither the names of the copyright holders nor the names of its
  14 *    contributors may be used to endorse or promote products derived from
  15 *    this software without specific prior written permission.
  16 *
  17 * Alternatively, this software may be distributed under the terms of the
  18 * GNU General Public License ("GPL") version 2 as published by the Free
  19 * Software Foundation.
  20 *
  21 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
  22 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
  25 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  26 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  27 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  31 * POSSIBILITY OF SUCH DAMAGE.
  32 */
  33
  34#include "core.h"
  35#include "bearer.h"
  36#include "link.h"
  37#include "name_table.h"
  38#include "socket.h"
  39#include "node.h"
  40#include "net.h"
  41#include <net/genetlink.h>
  42#include <linux/tipc_config.h>
  43
  44/* The legacy API had an artificial message length limit called
  45 * ULTRA_STRING_MAX_LEN.
  46 */
  47#define ULTRA_STRING_MAX_LEN 32768
  48
  49#define TIPC_SKB_MAX TLV_SPACE(ULTRA_STRING_MAX_LEN)
  50
  51#define REPLY_TRUNCATED "<truncated>\n"
  52
  53struct tipc_nl_compat_msg {
  54	u16 cmd;
  55	int rep_type;
  56	int rep_size;
  57	int req_type;
  58	int req_size;
  59	struct net *net;
  60	struct sk_buff *rep;
  61	struct tlv_desc *req;
  62	struct sock *dst_sk;
  63};
  64
  65struct tipc_nl_compat_cmd_dump {
  66	int (*header)(struct tipc_nl_compat_msg *);
  67	int (*dumpit)(struct sk_buff *, struct netlink_callback *);
  68	int (*format)(struct tipc_nl_compat_msg *msg, struct nlattr **attrs);
  69};
  70
  71struct tipc_nl_compat_cmd_doit {
  72	int (*doit)(struct sk_buff *skb, struct genl_info *info);
  73	int (*transcode)(struct tipc_nl_compat_cmd_doit *cmd,
  74			 struct sk_buff *skb, struct tipc_nl_compat_msg *msg);
  75};
  76
  77static int tipc_skb_tailroom(struct sk_buff *skb)
  78{
  79	int tailroom;
  80	int limit;
  81
  82	tailroom = skb_tailroom(skb);
  83	limit = TIPC_SKB_MAX - skb->len;
  84
  85	if (tailroom < limit)
  86		return tailroom;
  87
  88	return limit;
  89}
  90
  91static inline int TLV_GET_DATA_LEN(struct tlv_desc *tlv)
  92{
  93	return TLV_GET_LEN(tlv) - TLV_SPACE(0);
  94}
  95
  96static int tipc_add_tlv(struct sk_buff *skb, u16 type, void *data, u16 len)
  97{
  98	struct tlv_desc *tlv = (struct tlv_desc *)skb_tail_pointer(skb);
  99
 100	if (tipc_skb_tailroom(skb) < TLV_SPACE(len))
 101		return -EMSGSIZE;
 102
 103	skb_put(skb, TLV_SPACE(len));
 104	tlv->tlv_type = htons(type);
 105	tlv->tlv_len = htons(TLV_LENGTH(len));
 106	if (len && data)
 107		memcpy(TLV_DATA(tlv), data, len);
 108
 109	return 0;
 110}
 111
 112static void tipc_tlv_init(struct sk_buff *skb, u16 type)
 113{
 114	struct tlv_desc *tlv = (struct tlv_desc *)skb->data;
 115
 116	TLV_SET_LEN(tlv, 0);
 117	TLV_SET_TYPE(tlv, type);
 118	skb_put(skb, sizeof(struct tlv_desc));
 119}
 120
 121static __printf(2, 3) int tipc_tlv_sprintf(struct sk_buff *skb,
 122					   const char *fmt, ...)
 123{
 124	int n;
 125	u16 len;
 126	u32 rem;
 127	char *buf;
 128	struct tlv_desc *tlv;
 129	va_list args;
 130
 131	rem = tipc_skb_tailroom(skb);
 132
 133	tlv = (struct tlv_desc *)skb->data;
 134	len = TLV_GET_LEN(tlv);
 135	buf = TLV_DATA(tlv) + len;
 136
 137	va_start(args, fmt);
 138	n = vscnprintf(buf, rem, fmt, args);
 139	va_end(args);
 140
 141	TLV_SET_LEN(tlv, n + len);
 142	skb_put(skb, n);
 143
 144	return n;
 145}
 146
 147static struct sk_buff *tipc_tlv_alloc(int size)
 148{
 149	int hdr_len;
 150	struct sk_buff *buf;
 151
 152	size = TLV_SPACE(size);
 153	hdr_len = nlmsg_total_size(GENL_HDRLEN + TIPC_GENL_HDRLEN);
 154
 155	buf = alloc_skb(hdr_len + size, GFP_KERNEL);
 156	if (!buf)
 157		return NULL;
 158
 159	skb_reserve(buf, hdr_len);
 160
 161	return buf;
 162}
 163
 164static struct sk_buff *tipc_get_err_tlv(char *str)
 165{
 166	int str_len = strlen(str) + 1;
 167	struct sk_buff *buf;
 168
 169	buf = tipc_tlv_alloc(TLV_SPACE(str_len));
 170	if (buf)
 171		tipc_add_tlv(buf, TIPC_TLV_ERROR_STRING, str, str_len);
 172
 173	return buf;
 174}
 175
 176static inline bool string_is_valid(char *s, int len)
 177{
 178	return memchr(s, '\0', len) ? true : false;
 179}
 180
 181static int __tipc_nl_compat_dumpit(struct tipc_nl_compat_cmd_dump *cmd,
 182				   struct tipc_nl_compat_msg *msg,
 183				   struct sk_buff *arg)
 184{
 185	struct genl_dumpit_info info;
 186	int len = 0;
 187	int err;
 188	struct sk_buff *buf;
 189	struct nlmsghdr *nlmsg;
 190	struct netlink_callback cb;
 191	struct nlattr **attrbuf;
 192
 193	memset(&cb, 0, sizeof(cb));
 194	cb.nlh = (struct nlmsghdr *)arg->data;
 195	cb.skb = arg;
 196	cb.data = &info;
 197
 198	buf = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
 199	if (!buf)
 200		return -ENOMEM;
 201
 202	buf->sk = msg->dst_sk;
 203	if (__tipc_dump_start(&cb, msg->net)) {
 204		kfree_skb(buf);
 205		return -ENOMEM;
 206	}
 207
 208	attrbuf = kcalloc(tipc_genl_family.maxattr + 1,
 209			  sizeof(struct nlattr *), GFP_KERNEL);
 210	if (!attrbuf) {
 211		err = -ENOMEM;
 212		goto err_out;
 213	}
 214
 215	info.attrs = attrbuf;
 216
 217	if (nlmsg_len(cb.nlh) > 0) {
 218		err = nlmsg_parse_deprecated(cb.nlh, GENL_HDRLEN, attrbuf,
 219					     tipc_genl_family.maxattr,
 220					     tipc_genl_family.policy, NULL);
 221		if (err)
 222			goto err_out;
 223	}
 224	do {
 225		int rem;
 226
 227		len = (*cmd->dumpit)(buf, &cb);
 228
 229		nlmsg_for_each_msg(nlmsg, nlmsg_hdr(buf), len, rem) {
 230			err = nlmsg_parse_deprecated(nlmsg, GENL_HDRLEN,
 231						     attrbuf,
 232						     tipc_genl_family.maxattr,
 233						     tipc_genl_family.policy,
 234						     NULL);
 235			if (err)
 236				goto err_out;
 237
 238			err = (*cmd->format)(msg, attrbuf);
 239			if (err)
 240				goto err_out;
 241
 242			if (tipc_skb_tailroom(msg->rep) <= 1) {
 243				err = -EMSGSIZE;
 244				goto err_out;
 245			}
 246		}
 247
 248		skb_reset_tail_pointer(buf);
 249		buf->len = 0;
 250
 251	} while (len);
 252
 253	err = 0;
 254
 255err_out:
 256	kfree(attrbuf);
 257	tipc_dump_done(&cb);
 258	kfree_skb(buf);
 259
 260	if (err == -EMSGSIZE) {
 261		/* The legacy API only considered messages filling
 262		 * "ULTRA_STRING_MAX_LEN" to be truncated.
 263		 */
 264		if ((TIPC_SKB_MAX - msg->rep->len) <= 1) {
 265			char *tail = skb_tail_pointer(msg->rep);
 266
 267			if (*tail != '\0')
 268				sprintf(tail - sizeof(REPLY_TRUNCATED) - 1,
 269					REPLY_TRUNCATED);
 270		}
 271
 272		return 0;
 273	}
 274
 275	return err;
 276}
 277
 278static int tipc_nl_compat_dumpit(struct tipc_nl_compat_cmd_dump *cmd,
 279				 struct tipc_nl_compat_msg *msg)
 280{
 281	struct nlmsghdr *nlh;
 282	struct sk_buff *arg;
 283	int err;
 284
 285	if (msg->req_type && (!msg->req_size ||
 286			      !TLV_CHECK_TYPE(msg->req, msg->req_type)))
 287		return -EINVAL;
 288
 289	msg->rep = tipc_tlv_alloc(msg->rep_size);
 290	if (!msg->rep)
 291		return -ENOMEM;
 292
 293	if (msg->rep_type)
 294		tipc_tlv_init(msg->rep, msg->rep_type);
 295
 296	if (cmd->header) {
 297		err = (*cmd->header)(msg);
 298		if (err) {
 299			kfree_skb(msg->rep);
 300			msg->rep = NULL;
 301			return err;
 302		}
 303	}
 304
 305	arg = nlmsg_new(0, GFP_KERNEL);
 306	if (!arg) {
 307		kfree_skb(msg->rep);
 308		msg->rep = NULL;
 309		return -ENOMEM;
 310	}
 311
 312	nlh = nlmsg_put(arg, 0, 0, tipc_genl_family.id, 0, NLM_F_MULTI);
 313	if (!nlh) {
 314		kfree_skb(arg);
 315		kfree_skb(msg->rep);
 316		msg->rep = NULL;
 317		return -EMSGSIZE;
 318	}
 319	nlmsg_end(arg, nlh);
 320
 321	err = __tipc_nl_compat_dumpit(cmd, msg, arg);
 322	if (err) {
 323		kfree_skb(msg->rep);
 324		msg->rep = NULL;
 325	}
 326	kfree_skb(arg);
 327
 328	return err;
 329}
 330
 331static int __tipc_nl_compat_doit(struct tipc_nl_compat_cmd_doit *cmd,
 332				 struct tipc_nl_compat_msg *msg)
 333{
 334	int err;
 335	struct sk_buff *doit_buf;
 336	struct sk_buff *trans_buf;
 337	struct nlattr **attrbuf;
 338	struct genl_info info;
 339
 340	trans_buf = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
 341	if (!trans_buf)
 342		return -ENOMEM;
 343
 344	attrbuf = kmalloc_array(tipc_genl_family.maxattr + 1,
 345				sizeof(struct nlattr *),
 346				GFP_KERNEL);
 347	if (!attrbuf) {
 348		err = -ENOMEM;
 349		goto trans_out;
 350	}
 351
 352	doit_buf = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
 353	if (!doit_buf) {
 354		err = -ENOMEM;
 355		goto attrbuf_out;
 356	}
 357
 358	memset(&info, 0, sizeof(info));
 359	info.attrs = attrbuf;
 360
 361	rtnl_lock();
 362	err = (*cmd->transcode)(cmd, trans_buf, msg);
 363	if (err)
 364		goto doit_out;
 365
 366	err = nla_parse_deprecated(attrbuf, tipc_genl_family.maxattr,
 367				   (const struct nlattr *)trans_buf->data,
 368				   trans_buf->len, NULL, NULL);
 369	if (err)
 370		goto doit_out;
 371
 372	doit_buf->sk = msg->dst_sk;
 373
 374	err = (*cmd->doit)(doit_buf, &info);
 375doit_out:
 376	rtnl_unlock();
 377
 378	kfree_skb(doit_buf);
 379attrbuf_out:
 380	kfree(attrbuf);
 381trans_out:
 382	kfree_skb(trans_buf);
 383
 384	return err;
 385}
 386
 387static int tipc_nl_compat_doit(struct tipc_nl_compat_cmd_doit *cmd,
 388			       struct tipc_nl_compat_msg *msg)
 389{
 390	int err;
 391
 392	if (msg->req_type && (!msg->req_size ||
 393			      !TLV_CHECK_TYPE(msg->req, msg->req_type)))
 394		return -EINVAL;
 395
 396	err = __tipc_nl_compat_doit(cmd, msg);
 397	if (err)
 398		return err;
 399
 400	/* The legacy API considered an empty message a success message */
 401	msg->rep = tipc_tlv_alloc(0);
 402	if (!msg->rep)
 403		return -ENOMEM;
 404
 405	return 0;
 406}
 407
 408static int tipc_nl_compat_bearer_dump(struct tipc_nl_compat_msg *msg,
 409				      struct nlattr **attrs)
 410{
 411	struct nlattr *bearer[TIPC_NLA_BEARER_MAX + 1];
 412	int err;
 413
 414	if (!attrs[TIPC_NLA_BEARER])
 415		return -EINVAL;
 416
 417	err = nla_parse_nested_deprecated(bearer, TIPC_NLA_BEARER_MAX,
 418					  attrs[TIPC_NLA_BEARER], NULL, NULL);
 419	if (err)
 420		return err;
 421
 422	return tipc_add_tlv(msg->rep, TIPC_TLV_BEARER_NAME,
 423			    nla_data(bearer[TIPC_NLA_BEARER_NAME]),
 424			    nla_len(bearer[TIPC_NLA_BEARER_NAME]));
 425}
 426
 427static int tipc_nl_compat_bearer_enable(struct tipc_nl_compat_cmd_doit *cmd,
 428					struct sk_buff *skb,
 429					struct tipc_nl_compat_msg *msg)
 430{
 431	struct nlattr *prop;
 432	struct nlattr *bearer;
 433	struct tipc_bearer_config *b;
 434	int len;
 435
 436	b = (struct tipc_bearer_config *)TLV_DATA(msg->req);
 437
 438	bearer = nla_nest_start_noflag(skb, TIPC_NLA_BEARER);
 439	if (!bearer)
 440		return -EMSGSIZE;
 441
 442	len = TLV_GET_DATA_LEN(msg->req);
 443	len -= offsetof(struct tipc_bearer_config, name);
 444	if (len <= 0)
 445		return -EINVAL;
 446
 447	len = min_t(int, len, TIPC_MAX_BEARER_NAME);
 448	if (!string_is_valid(b->name, len))
 449		return -EINVAL;
 450
 451	if (nla_put_string(skb, TIPC_NLA_BEARER_NAME, b->name))
 452		return -EMSGSIZE;
 453
 454	if (nla_put_u32(skb, TIPC_NLA_BEARER_DOMAIN, ntohl(b->disc_domain)))
 455		return -EMSGSIZE;
 456
 457	if (ntohl(b->priority) <= TIPC_MAX_LINK_PRI) {
 458		prop = nla_nest_start_noflag(skb, TIPC_NLA_BEARER_PROP);
 459		if (!prop)
 460			return -EMSGSIZE;
 461		if (nla_put_u32(skb, TIPC_NLA_PROP_PRIO, ntohl(b->priority)))
 462			return -EMSGSIZE;
 463		nla_nest_end(skb, prop);
 464	}
 465	nla_nest_end(skb, bearer);
 466
 467	return 0;
 468}
 469
 470static int tipc_nl_compat_bearer_disable(struct tipc_nl_compat_cmd_doit *cmd,
 471					 struct sk_buff *skb,
 472					 struct tipc_nl_compat_msg *msg)
 473{
 474	char *name;
 475	struct nlattr *bearer;
 476	int len;
 477
 478	name = (char *)TLV_DATA(msg->req);
 479
 480	bearer = nla_nest_start_noflag(skb, TIPC_NLA_BEARER);
 481	if (!bearer)
 482		return -EMSGSIZE;
 483
 484	len = TLV_GET_DATA_LEN(msg->req);
 485	if (len <= 0)
 486		return -EINVAL;
 487
 488	len = min_t(int, len, TIPC_MAX_BEARER_NAME);
 489	if (!string_is_valid(name, len))
 490		return -EINVAL;
 491
 492	if (nla_put_string(skb, TIPC_NLA_BEARER_NAME, name))
 493		return -EMSGSIZE;
 494
 495	nla_nest_end(skb, bearer);
 496
 497	return 0;
 498}
 499
 500static inline u32 perc(u32 count, u32 total)
 501{
 502	return (count * 100 + (total / 2)) / total;
 503}
 504
 505static void __fill_bc_link_stat(struct tipc_nl_compat_msg *msg,
 506				struct nlattr *prop[], struct nlattr *stats[])
 507{
 508	tipc_tlv_sprintf(msg->rep, "  Window:%u packets\n",
 509			 nla_get_u32(prop[TIPC_NLA_PROP_WIN]));
 510
 511	tipc_tlv_sprintf(msg->rep,
 512			 "  RX packets:%u fragments:%u/%u bundles:%u/%u\n",
 513			 nla_get_u32(stats[TIPC_NLA_STATS_RX_INFO]),
 514			 nla_get_u32(stats[TIPC_NLA_STATS_RX_FRAGMENTS]),
 515			 nla_get_u32(stats[TIPC_NLA_STATS_RX_FRAGMENTED]),
 516			 nla_get_u32(stats[TIPC_NLA_STATS_RX_BUNDLES]),
 517			 nla_get_u32(stats[TIPC_NLA_STATS_RX_BUNDLED]));
 518
 519	tipc_tlv_sprintf(msg->rep,
 520			 "  TX packets:%u fragments:%u/%u bundles:%u/%u\n",
 521			 nla_get_u32(stats[TIPC_NLA_STATS_TX_INFO]),
 522			 nla_get_u32(stats[TIPC_NLA_STATS_TX_FRAGMENTS]),
 523			 nla_get_u32(stats[TIPC_NLA_STATS_TX_FRAGMENTED]),
 524			 nla_get_u32(stats[TIPC_NLA_STATS_TX_BUNDLES]),
 525			 nla_get_u32(stats[TIPC_NLA_STATS_TX_BUNDLED]));
 526
 527	tipc_tlv_sprintf(msg->rep, "  RX naks:%u defs:%u dups:%u\n",
 528			 nla_get_u32(stats[TIPC_NLA_STATS_RX_NACKS]),
 529			 nla_get_u32(stats[TIPC_NLA_STATS_RX_DEFERRED]),
 530			 nla_get_u32(stats[TIPC_NLA_STATS_DUPLICATES]));
 531
 532	tipc_tlv_sprintf(msg->rep, "  TX naks:%u acks:%u dups:%u\n",
 533			 nla_get_u32(stats[TIPC_NLA_STATS_TX_NACKS]),
 534			 nla_get_u32(stats[TIPC_NLA_STATS_TX_ACKS]),
 535			 nla_get_u32(stats[TIPC_NLA_STATS_RETRANSMITTED]));
 536
 537	tipc_tlv_sprintf(msg->rep,
 538			 "  Congestion link:%u  Send queue max:%u avg:%u",
 539			 nla_get_u32(stats[TIPC_NLA_STATS_LINK_CONGS]),
 540			 nla_get_u32(stats[TIPC_NLA_STATS_MAX_QUEUE]),
 541			 nla_get_u32(stats[TIPC_NLA_STATS_AVG_QUEUE]));
 542}
 543
 544static int tipc_nl_compat_link_stat_dump(struct tipc_nl_compat_msg *msg,
 545					 struct nlattr **attrs)
 546{
 547	char *name;
 548	struct nlattr *link[TIPC_NLA_LINK_MAX + 1];
 549	struct nlattr *prop[TIPC_NLA_PROP_MAX + 1];
 550	struct nlattr *stats[TIPC_NLA_STATS_MAX + 1];
 551	int err;
 552	int len;
 553
 554	if (!attrs[TIPC_NLA_LINK])
 555		return -EINVAL;
 556
 557	err = nla_parse_nested_deprecated(link, TIPC_NLA_LINK_MAX,
 558					  attrs[TIPC_NLA_LINK], NULL, NULL);
 559	if (err)
 560		return err;
 561
 562	if (!link[TIPC_NLA_LINK_PROP])
 563		return -EINVAL;
 564
 565	err = nla_parse_nested_deprecated(prop, TIPC_NLA_PROP_MAX,
 566					  link[TIPC_NLA_LINK_PROP], NULL,
 567					  NULL);
 568	if (err)
 569		return err;
 570
 571	if (!link[TIPC_NLA_LINK_STATS])
 572		return -EINVAL;
 573
 574	err = nla_parse_nested_deprecated(stats, TIPC_NLA_STATS_MAX,
 575					  link[TIPC_NLA_LINK_STATS], NULL,
 576					  NULL);
 577	if (err)
 578		return err;
 579
 580	name = (char *)TLV_DATA(msg->req);
 581
 582	len = TLV_GET_DATA_LEN(msg->req);
 583	if (len <= 0)
 584		return -EINVAL;
 585
 586	len = min_t(int, len, TIPC_MAX_LINK_NAME);
 587	if (!string_is_valid(name, len))
 588		return -EINVAL;
 589
 590	if (strcmp(name, nla_data(link[TIPC_NLA_LINK_NAME])) != 0)
 591		return 0;
 592
 593	tipc_tlv_sprintf(msg->rep, "\nLink <%s>\n",
 594			 (char *)nla_data(link[TIPC_NLA_LINK_NAME]));
 595
 596	if (link[TIPC_NLA_LINK_BROADCAST]) {
 597		__fill_bc_link_stat(msg, prop, stats);
 598		return 0;
 599	}
 600
 601	if (link[TIPC_NLA_LINK_ACTIVE])
 602		tipc_tlv_sprintf(msg->rep, "  ACTIVE");
 603	else if (link[TIPC_NLA_LINK_UP])
 604		tipc_tlv_sprintf(msg->rep, "  STANDBY");
 605	else
 606		tipc_tlv_sprintf(msg->rep, "  DEFUNCT");
 607
 608	tipc_tlv_sprintf(msg->rep, "  MTU:%u  Priority:%u",
 609			 nla_get_u32(link[TIPC_NLA_LINK_MTU]),
 610			 nla_get_u32(prop[TIPC_NLA_PROP_PRIO]));
 611
 612	tipc_tlv_sprintf(msg->rep, "  Tolerance:%u ms  Window:%u packets\n",
 613			 nla_get_u32(prop[TIPC_NLA_PROP_TOL]),
 614			 nla_get_u32(prop[TIPC_NLA_PROP_WIN]));
 615
 616	tipc_tlv_sprintf(msg->rep,
 617			 "  RX packets:%u fragments:%u/%u bundles:%u/%u\n",
 618			 nla_get_u32(link[TIPC_NLA_LINK_RX]) -
 619			 nla_get_u32(stats[TIPC_NLA_STATS_RX_INFO]),
 620			 nla_get_u32(stats[TIPC_NLA_STATS_RX_FRAGMENTS]),
 621			 nla_get_u32(stats[TIPC_NLA_STATS_RX_FRAGMENTED]),
 622			 nla_get_u32(stats[TIPC_NLA_STATS_RX_BUNDLES]),
 623			 nla_get_u32(stats[TIPC_NLA_STATS_RX_BUNDLED]));
 624
 625	tipc_tlv_sprintf(msg->rep,
 626			 "  TX packets:%u fragments:%u/%u bundles:%u/%u\n",
 627			 nla_get_u32(link[TIPC_NLA_LINK_TX]) -
 628			 nla_get_u32(stats[TIPC_NLA_STATS_TX_INFO]),
 629			 nla_get_u32(stats[TIPC_NLA_STATS_TX_FRAGMENTS]),
 630			 nla_get_u32(stats[TIPC_NLA_STATS_TX_FRAGMENTED]),
 631			 nla_get_u32(stats[TIPC_NLA_STATS_TX_BUNDLES]),
 632			 nla_get_u32(stats[TIPC_NLA_STATS_TX_BUNDLED]));
 633
 634	tipc_tlv_sprintf(msg->rep,
 635			 "  TX profile sample:%u packets  average:%u octets\n",
 636			 nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_CNT]),
 637			 nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_TOT]) /
 638			 nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT]));
 639
 640	tipc_tlv_sprintf(msg->rep,
 641			 "  0-64:%u%% -256:%u%% -1024:%u%% -4096:%u%% ",
 642			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P0]),
 643			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 644			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P1]),
 645			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 646			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P2]),
 647			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 648			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P3]),
 649			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])));
 650
 651	tipc_tlv_sprintf(msg->rep, "-16384:%u%% -32768:%u%% -66000:%u%%\n",
 652			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P4]),
 653			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 654			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P5]),
 655			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 656			 perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P6]),
 657			      nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])));
 658
 659	tipc_tlv_sprintf(msg->rep,
 660			 "  RX states:%u probes:%u naks:%u defs:%u dups:%u\n",
 661			 nla_get_u32(stats[TIPC_NLA_STATS_RX_STATES]),
 662			 nla_get_u32(stats[TIPC_NLA_STATS_RX_PROBES]),
 663			 nla_get_u32(stats[TIPC_NLA_STATS_RX_NACKS]),
 664			 nla_get_u32(stats[TIPC_NLA_STATS_RX_DEFERRED]),
 665			 nla_get_u32(stats[TIPC_NLA_STATS_DUPLICATES]));
 666
 667	tipc_tlv_sprintf(msg->rep,
 668			 "  TX states:%u probes:%u naks:%u acks:%u dups:%u\n",
 669			 nla_get_u32(stats[TIPC_NLA_STATS_TX_STATES]),
 670			 nla_get_u32(stats[TIPC_NLA_STATS_TX_PROBES]),
 671			 nla_get_u32(stats[TIPC_NLA_STATS_TX_NACKS]),
 672			 nla_get_u32(stats[TIPC_NLA_STATS_TX_ACKS]),
 673			 nla_get_u32(stats[TIPC_NLA_STATS_RETRANSMITTED]));
 674
 675	tipc_tlv_sprintf(msg->rep,
 676			 "  Congestion link:%u  Send queue max:%u avg:%u",
 677			 nla_get_u32(stats[TIPC_NLA_STATS_LINK_CONGS]),
 678			 nla_get_u32(stats[TIPC_NLA_STATS_MAX_QUEUE]),
 679			 nla_get_u32(stats[TIPC_NLA_STATS_AVG_QUEUE]));
 680
 681	return 0;
 682}
 683
 684static int tipc_nl_compat_link_dump(struct tipc_nl_compat_msg *msg,
 685				    struct nlattr **attrs)
 686{
 687	struct nlattr *link[TIPC_NLA_LINK_MAX + 1];
 688	struct tipc_link_info link_info;
 689	int err;
 690
 691	if (!attrs[TIPC_NLA_LINK])
 692		return -EINVAL;
 693
 694	err = nla_parse_nested_deprecated(link, TIPC_NLA_LINK_MAX,
 695					  attrs[TIPC_NLA_LINK], NULL, NULL);
 696	if (err)
 697		return err;
 698
 699	link_info.dest = htonl(nla_get_flag(link[TIPC_NLA_LINK_DEST]));
 700	link_info.up = htonl(nla_get_flag(link[TIPC_NLA_LINK_UP]));
 701	nla_strscpy(link_info.str, link[TIPC_NLA_LINK_NAME],
 702		    TIPC_MAX_LINK_NAME);
 703
 704	return tipc_add_tlv(msg->rep, TIPC_TLV_LINK_INFO,
 705			    &link_info, sizeof(link_info));
 706}
 707
 708static int __tipc_add_link_prop(struct sk_buff *skb,
 709				struct tipc_nl_compat_msg *msg,
 710				struct tipc_link_config *lc)
 711{
 712	switch (msg->cmd) {
 713	case TIPC_CMD_SET_LINK_PRI:
 714		return nla_put_u32(skb, TIPC_NLA_PROP_PRIO, ntohl(lc->value));
 715	case TIPC_CMD_SET_LINK_TOL:
 716		return nla_put_u32(skb, TIPC_NLA_PROP_TOL, ntohl(lc->value));
 717	case TIPC_CMD_SET_LINK_WINDOW:
 718		return nla_put_u32(skb, TIPC_NLA_PROP_WIN, ntohl(lc->value));
 719	}
 720
 721	return -EINVAL;
 722}
 723
 724static int tipc_nl_compat_media_set(struct sk_buff *skb,
 725				    struct tipc_nl_compat_msg *msg)
 726{
 727	struct nlattr *prop;
 728	struct nlattr *media;
 729	struct tipc_link_config *lc;
 730
 731	lc = (struct tipc_link_config *)TLV_DATA(msg->req);
 732
 733	media = nla_nest_start_noflag(skb, TIPC_NLA_MEDIA);
 734	if (!media)
 735		return -EMSGSIZE;
 736
 737	if (nla_put_string(skb, TIPC_NLA_MEDIA_NAME, lc->name))
 738		return -EMSGSIZE;
 739
 740	prop = nla_nest_start_noflag(skb, TIPC_NLA_MEDIA_PROP);
 741	if (!prop)
 742		return -EMSGSIZE;
 743
 744	__tipc_add_link_prop(skb, msg, lc);
 745	nla_nest_end(skb, prop);
 746	nla_nest_end(skb, media);
 747
 748	return 0;
 749}
 750
 751static int tipc_nl_compat_bearer_set(struct sk_buff *skb,
 752				     struct tipc_nl_compat_msg *msg)
 753{
 754	struct nlattr *prop;
 755	struct nlattr *bearer;
 756	struct tipc_link_config *lc;
 757
 758	lc = (struct tipc_link_config *)TLV_DATA(msg->req);
 759
 760	bearer = nla_nest_start_noflag(skb, TIPC_NLA_BEARER);
 761	if (!bearer)
 762		return -EMSGSIZE;
 763
 764	if (nla_put_string(skb, TIPC_NLA_BEARER_NAME, lc->name))
 765		return -EMSGSIZE;
 766
 767	prop = nla_nest_start_noflag(skb, TIPC_NLA_BEARER_PROP);
 768	if (!prop)
 769		return -EMSGSIZE;
 770
 771	__tipc_add_link_prop(skb, msg, lc);
 772	nla_nest_end(skb, prop);
 773	nla_nest_end(skb, bearer);
 774
 775	return 0;
 776}
 777
 778static int __tipc_nl_compat_link_set(struct sk_buff *skb,
 779				     struct tipc_nl_compat_msg *msg)
 780{
 781	struct nlattr *prop;
 782	struct nlattr *link;
 783	struct tipc_link_config *lc;
 784
 785	lc = (struct tipc_link_config *)TLV_DATA(msg->req);
 786
 787	link = nla_nest_start_noflag(skb, TIPC_NLA_LINK);
 788	if (!link)
 789		return -EMSGSIZE;
 790
 791	if (nla_put_string(skb, TIPC_NLA_LINK_NAME, lc->name))
 792		return -EMSGSIZE;
 793
 794	prop = nla_nest_start_noflag(skb, TIPC_NLA_LINK_PROP);
 795	if (!prop)
 796		return -EMSGSIZE;
 797
 798	__tipc_add_link_prop(skb, msg, lc);
 799	nla_nest_end(skb, prop);
 800	nla_nest_end(skb, link);
 801
 802	return 0;
 803}
 804
 805static int tipc_nl_compat_link_set(struct tipc_nl_compat_cmd_doit *cmd,
 806				   struct sk_buff *skb,
 807				   struct tipc_nl_compat_msg *msg)
 808{
 809	struct tipc_link_config *lc;
 810	struct tipc_bearer *bearer;
 811	struct tipc_media *media;
 812	int len;
 813
 814	lc = (struct tipc_link_config *)TLV_DATA(msg->req);
 815
 816	len = TLV_GET_DATA_LEN(msg->req);
 817	len -= offsetof(struct tipc_link_config, name);
 818	if (len <= 0)
 819		return -EINVAL;
 820
 821	len = min_t(int, len, TIPC_MAX_LINK_NAME);
 822	if (!string_is_valid(lc->name, len))
 823		return -EINVAL;
 824
 825	media = tipc_media_find(lc->name);
 826	if (media) {
 827		cmd->doit = &__tipc_nl_media_set;
 828		return tipc_nl_compat_media_set(skb, msg);
 829	}
 830
 831	bearer = tipc_bearer_find(msg->net, lc->name);
 832	if (bearer) {
 833		cmd->doit = &__tipc_nl_bearer_set;
 834		return tipc_nl_compat_bearer_set(skb, msg);
 835	}
 836
 837	return __tipc_nl_compat_link_set(skb, msg);
 838}
 839
 840static int tipc_nl_compat_link_reset_stats(struct tipc_nl_compat_cmd_doit *cmd,
 841					   struct sk_buff *skb,
 842					   struct tipc_nl_compat_msg *msg)
 843{
 844	char *name;
 845	struct nlattr *link;
 846	int len;
 847
 848	name = (char *)TLV_DATA(msg->req);
 849
 850	link = nla_nest_start_noflag(skb, TIPC_NLA_LINK);
 851	if (!link)
 852		return -EMSGSIZE;
 853
 854	len = TLV_GET_DATA_LEN(msg->req);
 855	if (len <= 0)
 856		return -EINVAL;
 857
 858	len = min_t(int, len, TIPC_MAX_LINK_NAME);
 859	if (!string_is_valid(name, len))
 860		return -EINVAL;
 861
 862	if (nla_put_string(skb, TIPC_NLA_LINK_NAME, name))
 863		return -EMSGSIZE;
 864
 865	nla_nest_end(skb, link);
 866
 867	return 0;
 868}
 869
 870static int tipc_nl_compat_name_table_dump_header(struct tipc_nl_compat_msg *msg)
 871{
 872	int i;
 873	u32 depth;
 874	struct tipc_name_table_query *ntq;
 875	static const char * const header[] = {
 876		"Type       ",
 877		"Lower      Upper      ",
 878		"Port Identity              ",
 879		"Publication Scope"
 880	};
 881
 882	ntq = (struct tipc_name_table_query *)TLV_DATA(msg->req);
 883	if (TLV_GET_DATA_LEN(msg->req) < (int)sizeof(struct tipc_name_table_query))
 884		return -EINVAL;
 885
 886	depth = ntohl(ntq->depth);
 887
 888	if (depth > 4)
 889		depth = 4;
 890	for (i = 0; i < depth; i++)
 891		tipc_tlv_sprintf(msg->rep, header[i]);
 892	tipc_tlv_sprintf(msg->rep, "\n");
 893
 894	return 0;
 895}
 896
 897static int tipc_nl_compat_name_table_dump(struct tipc_nl_compat_msg *msg,
 898					  struct nlattr **attrs)
 899{
 900	char port_str[27];
 901	struct tipc_name_table_query *ntq;
 902	struct nlattr *nt[TIPC_NLA_NAME_TABLE_MAX + 1];
 903	struct nlattr *publ[TIPC_NLA_PUBL_MAX + 1];
 904	u32 node, depth, type, lowbound, upbound;
 905	static const char * const scope_str[] = {"", " zone", " cluster",
 906						 " node"};
 907	int err;
 908
 909	if (!attrs[TIPC_NLA_NAME_TABLE])
 910		return -EINVAL;
 911
 912	err = nla_parse_nested_deprecated(nt, TIPC_NLA_NAME_TABLE_MAX,
 913					  attrs[TIPC_NLA_NAME_TABLE], NULL,
 914					  NULL);
 915	if (err)
 916		return err;
 917
 918	if (!nt[TIPC_NLA_NAME_TABLE_PUBL])
 919		return -EINVAL;
 920
 921	err = nla_parse_nested_deprecated(publ, TIPC_NLA_PUBL_MAX,
 922					  nt[TIPC_NLA_NAME_TABLE_PUBL], NULL,
 923					  NULL);
 924	if (err)
 925		return err;
 926
 927	ntq = (struct tipc_name_table_query *)TLV_DATA(msg->req);
 928
 929	depth = ntohl(ntq->depth);
 930	type = ntohl(ntq->type);
 931	lowbound = ntohl(ntq->lowbound);
 932	upbound = ntohl(ntq->upbound);
 933
 934	if (!(depth & TIPC_NTQ_ALLTYPES) &&
 935	    (type != nla_get_u32(publ[TIPC_NLA_PUBL_TYPE])))
 936		return 0;
 937	if (lowbound && (lowbound > nla_get_u32(publ[TIPC_NLA_PUBL_UPPER])))
 938		return 0;
 939	if (upbound && (upbound < nla_get_u32(publ[TIPC_NLA_PUBL_LOWER])))
 940		return 0;
 941
 942	tipc_tlv_sprintf(msg->rep, "%-10u ",
 943			 nla_get_u32(publ[TIPC_NLA_PUBL_TYPE]));
 944
 945	if (depth == 1)
 946		goto out;
 947
 948	tipc_tlv_sprintf(msg->rep, "%-10u %-10u ",
 949			 nla_get_u32(publ[TIPC_NLA_PUBL_LOWER]),
 950			 nla_get_u32(publ[TIPC_NLA_PUBL_UPPER]));
 951
 952	if (depth == 2)
 953		goto out;
 954
 955	node = nla_get_u32(publ[TIPC_NLA_PUBL_NODE]);
 956	sprintf(port_str, "<%u.%u.%u:%u>", tipc_zone(node), tipc_cluster(node),
 957		tipc_node(node), nla_get_u32(publ[TIPC_NLA_PUBL_REF]));
 958	tipc_tlv_sprintf(msg->rep, "%-26s ", port_str);
 959
 960	if (depth == 3)
 961		goto out;
 962
 963	tipc_tlv_sprintf(msg->rep, "%-10u %s",
 964			 nla_get_u32(publ[TIPC_NLA_PUBL_KEY]),
 965			 scope_str[nla_get_u32(publ[TIPC_NLA_PUBL_SCOPE])]);
 966out:
 967	tipc_tlv_sprintf(msg->rep, "\n");
 968
 969	return 0;
 970}
 971
 972static int __tipc_nl_compat_publ_dump(struct tipc_nl_compat_msg *msg,
 973				      struct nlattr **attrs)
 974{
 975	u32 type, lower, upper;
 976	struct nlattr *publ[TIPC_NLA_PUBL_MAX + 1];
 977	int err;
 978
 979	if (!attrs[TIPC_NLA_PUBL])
 980		return -EINVAL;
 981
 982	err = nla_parse_nested_deprecated(publ, TIPC_NLA_PUBL_MAX,
 983					  attrs[TIPC_NLA_PUBL], NULL, NULL);
 984	if (err)
 985		return err;
 986
 987	type = nla_get_u32(publ[TIPC_NLA_PUBL_TYPE]);
 988	lower = nla_get_u32(publ[TIPC_NLA_PUBL_LOWER]);
 989	upper = nla_get_u32(publ[TIPC_NLA_PUBL_UPPER]);
 990
 991	if (lower == upper)
 992		tipc_tlv_sprintf(msg->rep, " {%u,%u}", type, lower);
 993	else
 994		tipc_tlv_sprintf(msg->rep, " {%u,%u,%u}", type, lower, upper);
 995
 996	return 0;
 997}
 998
 999static int tipc_nl_compat_publ_dump(struct tipc_nl_compat_msg *msg, u32 sock)
1000{
1001	int err;
1002	void *hdr;
1003	struct nlattr *nest;
1004	struct sk_buff *args;
1005	struct tipc_nl_compat_cmd_dump dump;
1006
1007	args = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
1008	if (!args)
1009		return -ENOMEM;
1010
1011	hdr = genlmsg_put(args, 0, 0, &tipc_genl_family, NLM_F_MULTI,
1012			  TIPC_NL_PUBL_GET);
1013	if (!hdr) {
1014		kfree_skb(args);
1015		return -EMSGSIZE;
1016	}
1017
1018	nest = nla_nest_start_noflag(args, TIPC_NLA_SOCK);
1019	if (!nest) {
1020		kfree_skb(args);
1021		return -EMSGSIZE;
1022	}
1023
1024	if (nla_put_u32(args, TIPC_NLA_SOCK_REF, sock)) {
1025		kfree_skb(args);
1026		return -EMSGSIZE;
1027	}
1028
1029	nla_nest_end(args, nest);
1030	genlmsg_end(args, hdr);
1031
1032	dump.dumpit = tipc_nl_publ_dump;
1033	dump.format = __tipc_nl_compat_publ_dump;
1034
1035	err = __tipc_nl_compat_dumpit(&dump, msg, args);
1036
1037	kfree_skb(args);
1038
1039	return err;
1040}
1041
1042static int tipc_nl_compat_sk_dump(struct tipc_nl_compat_msg *msg,
1043				  struct nlattr **attrs)
1044{
1045	int err;
1046	u32 sock_ref;
1047	struct nlattr *sock[TIPC_NLA_SOCK_MAX + 1];
1048
1049	if (!attrs[TIPC_NLA_SOCK])
1050		return -EINVAL;
1051
1052	err = nla_parse_nested_deprecated(sock, TIPC_NLA_SOCK_MAX,
1053					  attrs[TIPC_NLA_SOCK], NULL, NULL);
1054	if (err)
1055		return err;
1056
1057	sock_ref = nla_get_u32(sock[TIPC_NLA_SOCK_REF]);
1058	tipc_tlv_sprintf(msg->rep, "%u:", sock_ref);
1059
1060	if (sock[TIPC_NLA_SOCK_CON]) {
1061		u32 node;
1062		struct nlattr *con[TIPC_NLA_CON_MAX + 1];
1063
1064		err = nla_parse_nested_deprecated(con, TIPC_NLA_CON_MAX,
1065						  sock[TIPC_NLA_SOCK_CON],
1066						  NULL, NULL);
1067
1068		if (err)
1069			return err;
1070
1071		node = nla_get_u32(con[TIPC_NLA_CON_NODE]);
1072		tipc_tlv_sprintf(msg->rep, "  connected to <%u.%u.%u:%u>",
1073				 tipc_zone(node),
1074				 tipc_cluster(node),
1075				 tipc_node(node),
1076				 nla_get_u32(con[TIPC_NLA_CON_SOCK]));
1077
1078		if (con[TIPC_NLA_CON_FLAG])
1079			tipc_tlv_sprintf(msg->rep, " via {%u,%u}\n",
1080					 nla_get_u32(con[TIPC_NLA_CON_TYPE]),
1081					 nla_get_u32(con[TIPC_NLA_CON_INST]));
1082		else
1083			tipc_tlv_sprintf(msg->rep, "\n");
1084	} else if (sock[TIPC_NLA_SOCK_HAS_PUBL]) {
1085		tipc_tlv_sprintf(msg->rep, " bound to");
1086
1087		err = tipc_nl_compat_publ_dump(msg, sock_ref);
1088		if (err)
1089			return err;
1090	}
1091	tipc_tlv_sprintf(msg->rep, "\n");
1092
1093	return 0;
1094}
1095
1096static int tipc_nl_compat_media_dump(struct tipc_nl_compat_msg *msg,
1097				     struct nlattr **attrs)
1098{
1099	struct nlattr *media[TIPC_NLA_MEDIA_MAX + 1];
1100	int err;
1101
1102	if (!attrs[TIPC_NLA_MEDIA])
1103		return -EINVAL;
1104
1105	err = nla_parse_nested_deprecated(media, TIPC_NLA_MEDIA_MAX,
1106					  attrs[TIPC_NLA_MEDIA], NULL, NULL);
1107	if (err)
1108		return err;
1109
1110	return tipc_add_tlv(msg->rep, TIPC_TLV_MEDIA_NAME,
1111			    nla_data(media[TIPC_NLA_MEDIA_NAME]),
1112			    nla_len(media[TIPC_NLA_MEDIA_NAME]));
1113}
1114
1115static int tipc_nl_compat_node_dump(struct tipc_nl_compat_msg *msg,
1116				    struct nlattr **attrs)
1117{
1118	struct tipc_node_info node_info;
1119	struct nlattr *node[TIPC_NLA_NODE_MAX + 1];
1120	int err;
1121
1122	if (!attrs[TIPC_NLA_NODE])
1123		return -EINVAL;
1124
1125	err = nla_parse_nested_deprecated(node, TIPC_NLA_NODE_MAX,
1126					  attrs[TIPC_NLA_NODE], NULL, NULL);
1127	if (err)
1128		return err;
1129
1130	node_info.addr = htonl(nla_get_u32(node[TIPC_NLA_NODE_ADDR]));
1131	node_info.up = htonl(nla_get_flag(node[TIPC_NLA_NODE_UP]));
1132
1133	return tipc_add_tlv(msg->rep, TIPC_TLV_NODE_INFO, &node_info,
1134			    sizeof(node_info));
1135}
1136
1137static int tipc_nl_compat_net_set(struct tipc_nl_compat_cmd_doit *cmd,
1138				  struct sk_buff *skb,
1139				  struct tipc_nl_compat_msg *msg)
1140{
1141	u32 val;
1142	struct nlattr *net;
1143
1144	val = ntohl(*(__be32 *)TLV_DATA(msg->req));
1145
1146	net = nla_nest_start_noflag(skb, TIPC_NLA_NET);
1147	if (!net)
1148		return -EMSGSIZE;
1149
1150	if (msg->cmd == TIPC_CMD_SET_NODE_ADDR) {
1151		if (nla_put_u32(skb, TIPC_NLA_NET_ADDR, val))
1152			return -EMSGSIZE;
1153	} else if (msg->cmd == TIPC_CMD_SET_NETID) {
1154		if (nla_put_u32(skb, TIPC_NLA_NET_ID, val))
1155			return -EMSGSIZE;
1156	}
1157	nla_nest_end(skb, net);
1158
1159	return 0;
1160}
1161
1162static int tipc_nl_compat_net_dump(struct tipc_nl_compat_msg *msg,
1163				   struct nlattr **attrs)
1164{
1165	__be32 id;
1166	struct nlattr *net[TIPC_NLA_NET_MAX + 1];
1167	int err;
1168
1169	if (!attrs[TIPC_NLA_NET])
1170		return -EINVAL;
1171
1172	err = nla_parse_nested_deprecated(net, TIPC_NLA_NET_MAX,
1173					  attrs[TIPC_NLA_NET], NULL, NULL);
1174	if (err)
1175		return err;
1176
1177	id = htonl(nla_get_u32(net[TIPC_NLA_NET_ID]));
1178
1179	return tipc_add_tlv(msg->rep, TIPC_TLV_UNSIGNED, &id, sizeof(id));
1180}
1181
1182static int tipc_cmd_show_stats_compat(struct tipc_nl_compat_msg *msg)
1183{
1184	msg->rep = tipc_tlv_alloc(ULTRA_STRING_MAX_LEN);
1185	if (!msg->rep)
1186		return -ENOMEM;
1187
1188	tipc_tlv_init(msg->rep, TIPC_TLV_ULTRA_STRING);
1189	tipc_tlv_sprintf(msg->rep, "TIPC version " TIPC_MOD_VER "\n");
1190
1191	return 0;
1192}
1193
1194static int tipc_nl_compat_handle(struct tipc_nl_compat_msg *msg)
1195{
1196	struct tipc_nl_compat_cmd_dump dump;
1197	struct tipc_nl_compat_cmd_doit doit;
1198
1199	memset(&dump, 0, sizeof(dump));
1200	memset(&doit, 0, sizeof(doit));
1201
1202	switch (msg->cmd) {
1203	case TIPC_CMD_NOOP:
1204		msg->rep = tipc_tlv_alloc(0);
1205		if (!msg->rep)
1206			return -ENOMEM;
1207		return 0;
1208	case TIPC_CMD_GET_BEARER_NAMES:
1209		msg->rep_size = MAX_BEARERS * TLV_SPACE(TIPC_MAX_BEARER_NAME);
1210		dump.dumpit = tipc_nl_bearer_dump;
1211		dump.format = tipc_nl_compat_bearer_dump;
1212		return tipc_nl_compat_dumpit(&dump, msg);
1213	case TIPC_CMD_ENABLE_BEARER:
1214		msg->req_type = TIPC_TLV_BEARER_CONFIG;
1215		doit.doit = __tipc_nl_bearer_enable;
1216		doit.transcode = tipc_nl_compat_bearer_enable;
1217		return tipc_nl_compat_doit(&doit, msg);
1218	case TIPC_CMD_DISABLE_BEARER:
1219		msg->req_type = TIPC_TLV_BEARER_NAME;
1220		doit.doit = __tipc_nl_bearer_disable;
1221		doit.transcode = tipc_nl_compat_bearer_disable;
1222		return tipc_nl_compat_doit(&doit, msg);
1223	case TIPC_CMD_SHOW_LINK_STATS:
1224		msg->req_type = TIPC_TLV_LINK_NAME;
1225		msg->rep_size = ULTRA_STRING_MAX_LEN;
1226		msg->rep_type = TIPC_TLV_ULTRA_STRING;
1227		dump.dumpit = tipc_nl_node_dump_link;
1228		dump.format = tipc_nl_compat_link_stat_dump;
1229		return tipc_nl_compat_dumpit(&dump, msg);
1230	case TIPC_CMD_GET_LINKS:
1231		msg->req_type = TIPC_TLV_NET_ADDR;
1232		msg->rep_size = ULTRA_STRING_MAX_LEN;
1233		dump.dumpit = tipc_nl_node_dump_link;
1234		dump.format = tipc_nl_compat_link_dump;
1235		return tipc_nl_compat_dumpit(&dump, msg);
1236	case TIPC_CMD_SET_LINK_TOL:
1237	case TIPC_CMD_SET_LINK_PRI:
1238	case TIPC_CMD_SET_LINK_WINDOW:
1239		msg->req_type =  TIPC_TLV_LINK_CONFIG;
1240		doit.doit = tipc_nl_node_set_link;
1241		doit.transcode = tipc_nl_compat_link_set;
1242		return tipc_nl_compat_doit(&doit, msg);
1243	case TIPC_CMD_RESET_LINK_STATS:
1244		msg->req_type = TIPC_TLV_LINK_NAME;
1245		doit.doit = tipc_nl_node_reset_link_stats;
1246		doit.transcode = tipc_nl_compat_link_reset_stats;
1247		return tipc_nl_compat_doit(&doit, msg);
1248	case TIPC_CMD_SHOW_NAME_TABLE:
1249		msg->req_type = TIPC_TLV_NAME_TBL_QUERY;
1250		msg->rep_size = ULTRA_STRING_MAX_LEN;
1251		msg->rep_type = TIPC_TLV_ULTRA_STRING;
1252		dump.header = tipc_nl_compat_name_table_dump_header;
1253		dump.dumpit = tipc_nl_name_table_dump;
1254		dump.format = tipc_nl_compat_name_table_dump;
1255		return tipc_nl_compat_dumpit(&dump, msg);
1256	case TIPC_CMD_SHOW_PORTS:
1257		msg->rep_size = ULTRA_STRING_MAX_LEN;
1258		msg->rep_type = TIPC_TLV_ULTRA_STRING;
1259		dump.dumpit = tipc_nl_sk_dump;
1260		dump.format = tipc_nl_compat_sk_dump;
1261		return tipc_nl_compat_dumpit(&dump, msg);
1262	case TIPC_CMD_GET_MEDIA_NAMES:
1263		msg->rep_size = MAX_MEDIA * TLV_SPACE(TIPC_MAX_MEDIA_NAME);
1264		dump.dumpit = tipc_nl_media_dump;
1265		dump.format = tipc_nl_compat_media_dump;
1266		return tipc_nl_compat_dumpit(&dump, msg);
1267	case TIPC_CMD_GET_NODES:
1268		msg->rep_size = ULTRA_STRING_MAX_LEN;
1269		dump.dumpit = tipc_nl_node_dump;
1270		dump.format = tipc_nl_compat_node_dump;
1271		return tipc_nl_compat_dumpit(&dump, msg);
1272	case TIPC_CMD_SET_NODE_ADDR:
1273		msg->req_type = TIPC_TLV_NET_ADDR;
1274		doit.doit = __tipc_nl_net_set;
1275		doit.transcode = tipc_nl_compat_net_set;
1276		return tipc_nl_compat_doit(&doit, msg);
1277	case TIPC_CMD_SET_NETID:
1278		msg->req_type = TIPC_TLV_UNSIGNED;
1279		doit.doit = __tipc_nl_net_set;
1280		doit.transcode = tipc_nl_compat_net_set;
1281		return tipc_nl_compat_doit(&doit, msg);
1282	case TIPC_CMD_GET_NETID:
1283		msg->rep_size = sizeof(u32);
1284		dump.dumpit = tipc_nl_net_dump;
1285		dump.format = tipc_nl_compat_net_dump;
1286		return tipc_nl_compat_dumpit(&dump, msg);
1287	case TIPC_CMD_SHOW_STATS:
1288		return tipc_cmd_show_stats_compat(msg);
1289	}
1290
1291	return -EOPNOTSUPP;
1292}
1293
1294static int tipc_nl_compat_recv(struct sk_buff *skb, struct genl_info *info)
1295{
1296	int err;
1297	int len;
1298	struct tipc_nl_compat_msg msg;
1299	struct nlmsghdr *req_nlh;
1300	struct nlmsghdr *rep_nlh;
1301	struct tipc_genlmsghdr *req_userhdr = info->userhdr;
1302
1303	memset(&msg, 0, sizeof(msg));
1304
1305	req_nlh = (struct nlmsghdr *)skb->data;
1306	msg.req = nlmsg_data(req_nlh) + GENL_HDRLEN + TIPC_GENL_HDRLEN;
1307	msg.cmd = req_userhdr->cmd;
1308	msg.net = genl_info_net(info);
1309	msg.dst_sk = skb->sk;
1310
1311	if ((msg.cmd & 0xC000) && (!netlink_net_capable(skb, CAP_NET_ADMIN))) {
1312		msg.rep = tipc_get_err_tlv(TIPC_CFG_NOT_NET_ADMIN);
1313		err = -EACCES;
1314		goto send;
1315	}
1316
1317	msg.req_size = nlmsg_attrlen(req_nlh, GENL_HDRLEN + TIPC_GENL_HDRLEN);
1318	if (msg.req_size && !TLV_OK(msg.req, msg.req_size)) {
1319		msg.rep = tipc_get_err_tlv(TIPC_CFG_NOT_SUPPORTED);
1320		err = -EOPNOTSUPP;
1321		goto send;
1322	}
1323
1324	err = tipc_nl_compat_handle(&msg);
1325	if ((err == -EOPNOTSUPP) || (err == -EPERM))
1326		msg.rep = tipc_get_err_tlv(TIPC_CFG_NOT_SUPPORTED);
1327	else if (err == -EINVAL)
1328		msg.rep = tipc_get_err_tlv(TIPC_CFG_TLV_ERROR);
1329send:
1330	if (!msg.rep)
1331		return err;
1332
1333	len = nlmsg_total_size(GENL_HDRLEN + TIPC_GENL_HDRLEN);
1334	skb_push(msg.rep, len);
1335	rep_nlh = nlmsg_hdr(msg.rep);
1336	memcpy(rep_nlh, info->nlhdr, len);
1337	rep_nlh->nlmsg_len = msg.rep->len;
1338	genlmsg_unicast(msg.net, msg.rep, NETLINK_CB(skb).portid);
1339
1340	return err;
1341}
1342
1343static const struct genl_small_ops tipc_genl_compat_ops[] = {
1344	{
1345		.cmd		= TIPC_GENL_CMD,
1346		.validate = GENL_DONT_VALIDATE_STRICT | GENL_DONT_VALIDATE_DUMP,
1347		.doit		= tipc_nl_compat_recv,
1348	},
1349};
1350
1351static struct genl_family tipc_genl_compat_family __ro_after_init = {
1352	.name		= TIPC_GENL_NAME,
1353	.version	= TIPC_GENL_VERSION,
1354	.hdrsize	= TIPC_GENL_HDRLEN,
1355	.maxattr	= 0,
1356	.netnsok	= true,
1357	.module		= THIS_MODULE,
1358	.small_ops	= tipc_genl_compat_ops,
1359	.n_small_ops	= ARRAY_SIZE(tipc_genl_compat_ops),
1360	.resv_start_op	= TIPC_GENL_CMD + 1,
1361};
1362
1363int __init tipc_netlink_compat_start(void)
1364{
1365	int res;
1366
1367	res = genl_register_family(&tipc_genl_compat_family);
1368	if (res) {
1369		pr_err("Failed to register legacy compat interface\n");
1370		return res;
1371	}
1372
1373	return 0;
1374}
1375
1376void tipc_netlink_compat_stop(void)
1377{
1378	genl_unregister_family(&tipc_genl_compat_family);
1379}