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