1/*
2 * net/tipc/bearer.c: TIPC bearer code
3 *
4 * Copyright (c) 1996-2006, 2013-2014, Ericsson AB
5 * Copyright (c) 2004-2006, 2010-2013, Wind River Systems
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions are met:
10 *
11 * 1. Redistributions of source code must retain the above copyright
12 *    notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 *    notice, this list of conditions and the following disclaimer in the
15 *    documentation and/or other materials provided with the distribution.
16 * 3. Neither the names of the copyright holders nor the names of its
17 *    contributors may be used to endorse or promote products derived from
18 *    this software without specific prior written permission.
19 *
20 * Alternatively, this software may be distributed under the terms of the
21 * GNU General Public License ("GPL") version 2 as published by the Free
22 * Software Foundation.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
25 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
28 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
29 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
30 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
31 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
32 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
33 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
34 * POSSIBILITY OF SUCH DAMAGE.
35 */
36
37#include <net/sock.h>
38#include "core.h"
39#include "bearer.h"
40#include "link.h"
41#include "discover.h"
42#include "bcast.h"
43
44#define MAX_ADDR_STR 60
45
46static struct tipc_media * const media_info_array[] = {
47	&eth_media_info,
48#ifdef CONFIG_TIPC_MEDIA_IB
49	&ib_media_info,
50#endif
51#ifdef CONFIG_TIPC_MEDIA_UDP
52	&udp_media_info,
53#endif
54	NULL
55};
56
57static const struct nla_policy
58tipc_nl_bearer_policy[TIPC_NLA_BEARER_MAX + 1]	= {
59	[TIPC_NLA_BEARER_UNSPEC]		= { .type = NLA_UNSPEC },
60	[TIPC_NLA_BEARER_NAME] = {
61		.type = NLA_STRING,
62		.len = TIPC_MAX_BEARER_NAME
63	},
64	[TIPC_NLA_BEARER_PROP]			= { .type = NLA_NESTED },
65	[TIPC_NLA_BEARER_DOMAIN]		= { .type = NLA_U32 }
66};
67
68static const struct nla_policy tipc_nl_media_policy[TIPC_NLA_MEDIA_MAX + 1] = {
69	[TIPC_NLA_MEDIA_UNSPEC]		= { .type = NLA_UNSPEC },
70	[TIPC_NLA_MEDIA_NAME]		= { .type = NLA_STRING },
71	[TIPC_NLA_MEDIA_PROP]		= { .type = NLA_NESTED }
72};
73
74static void bearer_disable(struct net *net, struct tipc_bearer *b_ptr);
75
76/**
77 * tipc_media_find - locates specified media object by name
78 */
79struct tipc_media *tipc_media_find(const char *name)
80{
81	u32 i;
82
83	for (i = 0; media_info_array[i] != NULL; i++) {
84		if (!strcmp(media_info_array[i]->name, name))
85			break;
86	}
87	return media_info_array[i];
88}
89
90/**
91 * media_find_id - locates specified media object by type identifier
92 */
93static struct tipc_media *media_find_id(u8 type)
94{
95	u32 i;
96
97	for (i = 0; media_info_array[i] != NULL; i++) {
98		if (media_info_array[i]->type_id == type)
99			break;
100	}
101	return media_info_array[i];
102}
103
104/**
105 * tipc_media_addr_printf - record media address in print buffer
106 */
107void tipc_media_addr_printf(char *buf, int len, struct tipc_media_addr *a)
108{
109	char addr_str[MAX_ADDR_STR];
110	struct tipc_media *m_ptr;
111	int ret;
112
113	m_ptr = media_find_id(a->media_id);
114
115	if (m_ptr && !m_ptr->addr2str(a, addr_str, sizeof(addr_str)))
116		ret = scnprintf(buf, len, "%s(%s)", m_ptr->name, addr_str);
117	else {
118		u32 i;
119
120		ret = scnprintf(buf, len, "UNKNOWN(%u)", a->media_id);
121		for (i = 0; i < sizeof(a->value); i++)
122			ret += scnprintf(buf - ret, len + ret,
123					    "-%02x", a->value[i]);
124	}
125}
126
127/**
128 * bearer_name_validate - validate & (optionally) deconstruct bearer name
129 * @name: ptr to bearer name string
130 * @name_parts: ptr to area for bearer name components (or NULL if not needed)
131 *
132 * Returns 1 if bearer name is valid, otherwise 0.
133 */
134static int bearer_name_validate(const char *name,
135				struct tipc_bearer_names *name_parts)
136{
137	char name_copy[TIPC_MAX_BEARER_NAME];
138	char *media_name;
139	char *if_name;
140	u32 media_len;
141	u32 if_len;
142
143	/* copy bearer name & ensure length is OK */
144	name_copy[TIPC_MAX_BEARER_NAME - 1] = 0;
145	/* need above in case non-Posix strncpy() doesn't pad with nulls */
146	strncpy(name_copy, name, TIPC_MAX_BEARER_NAME);
147	if (name_copy[TIPC_MAX_BEARER_NAME - 1] != 0)
148		return 0;
149
150	/* ensure all component parts of bearer name are present */
151	media_name = name_copy;
152	if_name = strchr(media_name, ':');
153	if (if_name == NULL)
154		return 0;
155	*(if_name++) = 0;
156	media_len = if_name - media_name;
157	if_len = strlen(if_name) + 1;
158
159	/* validate component parts of bearer name */
160	if ((media_len <= 1) || (media_len > TIPC_MAX_MEDIA_NAME) ||
161	    (if_len <= 1) || (if_len > TIPC_MAX_IF_NAME))
162		return 0;
163
164	/* return bearer name components, if necessary */
165	if (name_parts) {
166		strcpy(name_parts->media_name, media_name);
167		strcpy(name_parts->if_name, if_name);
168	}
169	return 1;
170}
171
172/**
173 * tipc_bearer_find - locates bearer object with matching bearer name
174 */
175struct tipc_bearer *tipc_bearer_find(struct net *net, const char *name)
176{
177	struct tipc_net *tn = net_generic(net, tipc_net_id);
178	struct tipc_bearer *b_ptr;
179	u32 i;
180
181	for (i = 0; i < MAX_BEARERS; i++) {
182		b_ptr = rtnl_dereference(tn->bearer_list[i]);
183		if (b_ptr && (!strcmp(b_ptr->name, name)))
184			return b_ptr;
185	}
186	return NULL;
187}
188
189void tipc_bearer_add_dest(struct net *net, u32 bearer_id, u32 dest)
190{
191	struct tipc_net *tn = net_generic(net, tipc_net_id);
192	struct tipc_bearer *b_ptr;
193
194	rcu_read_lock();
195	b_ptr = rcu_dereference_rtnl(tn->bearer_list[bearer_id]);
196	if (b_ptr)
197		tipc_disc_add_dest(b_ptr->link_req);
198	rcu_read_unlock();
199}
200
201void tipc_bearer_remove_dest(struct net *net, u32 bearer_id, u32 dest)
202{
203	struct tipc_net *tn = net_generic(net, tipc_net_id);
204	struct tipc_bearer *b_ptr;
205
206	rcu_read_lock();
207	b_ptr = rcu_dereference_rtnl(tn->bearer_list[bearer_id]);
208	if (b_ptr)
209		tipc_disc_remove_dest(b_ptr->link_req);
210	rcu_read_unlock();
211}
212
213/**
214 * tipc_enable_bearer - enable bearer with the given name
215 */
216static int tipc_enable_bearer(struct net *net, const char *name,
217			      u32 disc_domain, u32 priority,
218			      struct nlattr *attr[])
219{
220	struct tipc_net *tn = net_generic(net, tipc_net_id);
221	struct tipc_bearer *b_ptr;
222	struct tipc_media *m_ptr;
223	struct tipc_bearer_names b_names;
224	char addr_string[16];
225	u32 bearer_id;
226	u32 with_this_prio;
227	u32 i;
228	int res = -EINVAL;
229
230	if (!tn->own_addr) {
231		pr_warn("Bearer <%s> rejected, not supported in standalone mode\n",
232			name);
233		return -ENOPROTOOPT;
234	}
235	if (!bearer_name_validate(name, &b_names)) {
236		pr_warn("Bearer <%s> rejected, illegal name\n", name);
237		return -EINVAL;
238	}
239	if (tipc_addr_domain_valid(disc_domain) &&
240	    (disc_domain != tn->own_addr)) {
241		if (tipc_in_scope(disc_domain, tn->own_addr)) {
242			disc_domain = tn->own_addr & TIPC_CLUSTER_MASK;
243			res = 0;   /* accept any node in own cluster */
244		} else if (in_own_cluster_exact(net, disc_domain))
245			res = 0;   /* accept specified node in own cluster */
246	}
247	if (res) {
248		pr_warn("Bearer <%s> rejected, illegal discovery domain\n",
249			name);
250		return -EINVAL;
251	}
252	if ((priority > TIPC_MAX_LINK_PRI) &&
253	    (priority != TIPC_MEDIA_LINK_PRI)) {
254		pr_warn("Bearer <%s> rejected, illegal priority\n", name);
255		return -EINVAL;
256	}
257
258	m_ptr = tipc_media_find(b_names.media_name);
259	if (!m_ptr) {
260		pr_warn("Bearer <%s> rejected, media <%s> not registered\n",
261			name, b_names.media_name);
262		return -EINVAL;
263	}
264
265	if (priority == TIPC_MEDIA_LINK_PRI)
266		priority = m_ptr->priority;
267
268restart:
269	bearer_id = MAX_BEARERS;
270	with_this_prio = 1;
271	for (i = MAX_BEARERS; i-- != 0; ) {
272		b_ptr = rtnl_dereference(tn->bearer_list[i]);
273		if (!b_ptr) {
274			bearer_id = i;
275			continue;
276		}
277		if (!strcmp(name, b_ptr->name)) {
278			pr_warn("Bearer <%s> rejected, already enabled\n",
279				name);
280			return -EINVAL;
281		}
282		if ((b_ptr->priority == priority) &&
283		    (++with_this_prio > 2)) {
284			if (priority-- == 0) {
285				pr_warn("Bearer <%s> rejected, duplicate priority\n",
286					name);
287				return -EINVAL;
288			}
289			pr_warn("Bearer <%s> priority adjustment required %u->%u\n",
290				name, priority + 1, priority);
291			goto restart;
292		}
293	}
294	if (bearer_id >= MAX_BEARERS) {
295		pr_warn("Bearer <%s> rejected, bearer limit reached (%u)\n",
296			name, MAX_BEARERS);
297		return -EINVAL;
298	}
299
300	b_ptr = kzalloc(sizeof(*b_ptr), GFP_ATOMIC);
301	if (!b_ptr)
302		return -ENOMEM;
303
304	strcpy(b_ptr->name, name);
305	b_ptr->media = m_ptr;
306	res = m_ptr->enable_media(net, b_ptr, attr);
307	if (res) {
308		pr_warn("Bearer <%s> rejected, enable failure (%d)\n",
309			name, -res);
310		return -EINVAL;
311	}
312
313	b_ptr->identity = bearer_id;
314	b_ptr->tolerance = m_ptr->tolerance;
315	b_ptr->window = m_ptr->window;
316	b_ptr->domain = disc_domain;
317	b_ptr->net_plane = bearer_id + 'A';
318	b_ptr->priority = priority;
319
320	res = tipc_disc_create(net, b_ptr, &b_ptr->bcast_addr);
321	if (res) {
322		bearer_disable(net, b_ptr);
323		pr_warn("Bearer <%s> rejected, discovery object creation failed\n",
324			name);
325		return -EINVAL;
326	}
327
328	rcu_assign_pointer(tn->bearer_list[bearer_id], b_ptr);
329
330	pr_info("Enabled bearer <%s>, discovery domain %s, priority %u\n",
331		name,
332		tipc_addr_string_fill(addr_string, disc_domain), priority);
333	return res;
334}
335
336/**
337 * tipc_reset_bearer - Reset all links established over this bearer
338 */
339static int tipc_reset_bearer(struct net *net, struct tipc_bearer *b_ptr)
340{
341	pr_info("Resetting bearer <%s>\n", b_ptr->name);
342	tipc_node_delete_links(net, b_ptr->identity);
343	tipc_disc_reset(net, b_ptr);
344	return 0;
345}
346
347/**
348 * bearer_disable
349 *
350 * Note: This routine assumes caller holds RTNL lock.
351 */
352static void bearer_disable(struct net *net, struct tipc_bearer *b_ptr)
353{
354	struct tipc_net *tn = net_generic(net, tipc_net_id);
355	u32 i;
356
357	pr_info("Disabling bearer <%s>\n", b_ptr->name);
358	b_ptr->media->disable_media(b_ptr);
359
360	tipc_node_delete_links(net, b_ptr->identity);
361	RCU_INIT_POINTER(b_ptr->media_ptr, NULL);
362	if (b_ptr->link_req)
363		tipc_disc_delete(b_ptr->link_req);
364
365	for (i = 0; i < MAX_BEARERS; i++) {
366		if (b_ptr == rtnl_dereference(tn->bearer_list[i])) {
367			RCU_INIT_POINTER(tn->bearer_list[i], NULL);
368			break;
369		}
370	}
371	kfree_rcu(b_ptr, rcu);
372}
373
374int tipc_enable_l2_media(struct net *net, struct tipc_bearer *b,
375			 struct nlattr *attr[])
376{
377	struct net_device *dev;
378	char *driver_name = strchr((const char *)b->name, ':') + 1;
379
380	/* Find device with specified name */
381	dev = dev_get_by_name(net, driver_name);
382	if (!dev)
383		return -ENODEV;
384
385	/* Associate TIPC bearer with L2 bearer */
386	rcu_assign_pointer(b->media_ptr, dev);
387	memset(&b->bcast_addr, 0, sizeof(b->bcast_addr));
388	memcpy(b->bcast_addr.value, dev->broadcast, b->media->hwaddr_len);
389	b->bcast_addr.media_id = b->media->type_id;
390	b->bcast_addr.broadcast = 1;
391	b->mtu = dev->mtu;
392	b->media->raw2addr(b, &b->addr, (char *)dev->dev_addr);
393	rcu_assign_pointer(dev->tipc_ptr, b);
394	return 0;
395}
396
397/* tipc_disable_l2_media - detach TIPC bearer from an L2 interface
398 *
399 * Mark L2 bearer as inactive so that incoming buffers are thrown away
400 */
401void tipc_disable_l2_media(struct tipc_bearer *b)
402{
403	struct net_device *dev;
404
405	dev = (struct net_device *)rtnl_dereference(b->media_ptr);
406	RCU_INIT_POINTER(dev->tipc_ptr, NULL);
407	synchronize_net();
408	dev_put(dev);
409}
410
411/**
412 * tipc_l2_send_msg - send a TIPC packet out over an L2 interface
413 * @buf: the packet to be sent
414 * @b_ptr: the bearer through which the packet is to be sent
415 * @dest: peer destination address
416 */
417int tipc_l2_send_msg(struct net *net, struct sk_buff *skb,
418		     struct tipc_bearer *b, struct tipc_media_addr *dest)
419{
420	struct net_device *dev;
421	int delta;
422
423	dev = (struct net_device *)rcu_dereference_rtnl(b->media_ptr);
424	if (!dev)
425		return 0;
426
427	delta = dev->hard_header_len - skb_headroom(skb);
428	if ((delta > 0) &&
429	    pskb_expand_head(skb, SKB_DATA_ALIGN(delta), 0, GFP_ATOMIC)) {
430		kfree_skb(skb);
431		return 0;
432	}
433
434	skb_reset_network_header(skb);
435	skb->dev = dev;
436	skb->protocol = htons(ETH_P_TIPC);
437	dev_hard_header(skb, dev, ETH_P_TIPC, dest->value,
438			dev->dev_addr, skb->len);
439	dev_queue_xmit(skb);
440	return 0;
441}
442
443int tipc_bearer_mtu(struct net *net, u32 bearer_id)
444{
445	int mtu = 0;
446	struct tipc_bearer *b;
447
448	rcu_read_lock();
449	b = rcu_dereference_rtnl(tipc_net(net)->bearer_list[bearer_id]);
450	if (b)
451		mtu = b->mtu;
452	rcu_read_unlock();
453	return mtu;
454}
455
456/* tipc_bearer_xmit_skb - sends buffer to destination over bearer
457 */
458void tipc_bearer_xmit_skb(struct net *net, u32 bearer_id,
459			  struct sk_buff *skb,
460			  struct tipc_media_addr *dest)
461{
462	struct tipc_net *tn = tipc_net(net);
463	struct tipc_bearer *b;
464
465	rcu_read_lock();
466	b = rcu_dereference_rtnl(tn->bearer_list[bearer_id]);
467	if (likely(b))
468		b->media->send_msg(net, skb, b, dest);
469	rcu_read_unlock();
470}
471
472/* tipc_bearer_xmit() -send buffer to destination over bearer
473 */
474void tipc_bearer_xmit(struct net *net, u32 bearer_id,
475		      struct sk_buff_head *xmitq,
476		      struct tipc_media_addr *dst)
477{
478	struct tipc_net *tn = net_generic(net, tipc_net_id);
479	struct tipc_bearer *b;
480	struct sk_buff *skb, *tmp;
481
482	if (skb_queue_empty(xmitq))
483		return;
484
485	rcu_read_lock();
486	b = rcu_dereference_rtnl(tn->bearer_list[bearer_id]);
487	if (likely(b)) {
488		skb_queue_walk_safe(xmitq, skb, tmp) {
489			__skb_dequeue(xmitq);
490			b->media->send_msg(net, skb, b, dst);
491		}
492	}
493	rcu_read_unlock();
494}
495
496/* tipc_bearer_bc_xmit() - broadcast buffers to all destinations
497 */
498void tipc_bearer_bc_xmit(struct net *net, u32 bearer_id,
499			 struct sk_buff_head *xmitq)
500{
501	struct tipc_net *tn = tipc_net(net);
502	int net_id = tn->net_id;
503	struct tipc_bearer *b;
504	struct sk_buff *skb, *tmp;
505	struct tipc_msg *hdr;
506
507	rcu_read_lock();
508	b = rcu_dereference_rtnl(tn->bearer_list[bearer_id]);
509	if (likely(b)) {
510		skb_queue_walk_safe(xmitq, skb, tmp) {
511			hdr = buf_msg(skb);
512			msg_set_non_seq(hdr, 1);
513			msg_set_mc_netid(hdr, net_id);
514			__skb_dequeue(xmitq);
515			b->media->send_msg(net, skb, b, &b->bcast_addr);
516		}
517	}
518	rcu_read_unlock();
519}
520
521/**
522 * tipc_l2_rcv_msg - handle incoming TIPC message from an interface
523 * @buf: the received packet
524 * @dev: the net device that the packet was received on
525 * @pt: the packet_type structure which was used to register this handler
526 * @orig_dev: the original receive net device in case the device is a bond
527 *
528 * Accept only packets explicitly sent to this node, or broadcast packets;
529 * ignores packets sent using interface multicast, and traffic sent to other
530 * nodes (which can happen if interface is running in promiscuous mode).
531 */
532static int tipc_l2_rcv_msg(struct sk_buff *buf, struct net_device *dev,
533			   struct packet_type *pt, struct net_device *orig_dev)
534{
535	struct tipc_bearer *b_ptr;
536
537	rcu_read_lock();
538	b_ptr = rcu_dereference_rtnl(dev->tipc_ptr);
539	if (likely(b_ptr)) {
540		if (likely(buf->pkt_type <= PACKET_BROADCAST)) {
541			buf->next = NULL;
542			tipc_rcv(dev_net(dev), buf, b_ptr);
543			rcu_read_unlock();
544			return NET_RX_SUCCESS;
545		}
546	}
547	rcu_read_unlock();
548
549	kfree_skb(buf);
550	return NET_RX_DROP;
551}
552
553/**
554 * tipc_l2_device_event - handle device events from network device
555 * @nb: the context of the notification
556 * @evt: the type of event
557 * @ptr: the net device that the event was on
558 *
559 * This function is called by the Ethernet driver in case of link
560 * change event.
561 */
562static int tipc_l2_device_event(struct notifier_block *nb, unsigned long evt,
563				void *ptr)
564{
565	struct net_device *dev = netdev_notifier_info_to_dev(ptr);
566	struct net *net = dev_net(dev);
567	struct tipc_bearer *b_ptr;
568
569	b_ptr = rtnl_dereference(dev->tipc_ptr);
570	if (!b_ptr)
571		return NOTIFY_DONE;
572
573	b_ptr->mtu = dev->mtu;
574
575	switch (evt) {
576	case NETDEV_CHANGE:
577		if (netif_carrier_ok(dev))
578			break;
579	case NETDEV_GOING_DOWN:
580	case NETDEV_CHANGEMTU:
581		tipc_reset_bearer(net, b_ptr);
582		break;
583	case NETDEV_CHANGEADDR:
584		b_ptr->media->raw2addr(b_ptr, &b_ptr->addr,
585				       (char *)dev->dev_addr);
586		tipc_reset_bearer(net, b_ptr);
587		break;
588	case NETDEV_UNREGISTER:
589	case NETDEV_CHANGENAME:
590		bearer_disable(dev_net(dev), b_ptr);
591		break;
592	}
593	return NOTIFY_OK;
594}
595
596static struct packet_type tipc_packet_type __read_mostly = {
597	.type = htons(ETH_P_TIPC),
598	.func = tipc_l2_rcv_msg,
599};
600
601static struct notifier_block notifier = {
602	.notifier_call  = tipc_l2_device_event,
603	.priority	= 0,
604};
605
606int tipc_bearer_setup(void)
607{
608	int err;
609
610	err = register_netdevice_notifier(&notifier);
611	if (err)
612		return err;
613	dev_add_pack(&tipc_packet_type);
614	return 0;
615}
616
617void tipc_bearer_cleanup(void)
618{
619	unregister_netdevice_notifier(&notifier);
620	dev_remove_pack(&tipc_packet_type);
621}
622
623void tipc_bearer_stop(struct net *net)
624{
625	struct tipc_net *tn = net_generic(net, tipc_net_id);
626	struct tipc_bearer *b_ptr;
627	u32 i;
628
629	for (i = 0; i < MAX_BEARERS; i++) {
630		b_ptr = rtnl_dereference(tn->bearer_list[i]);
631		if (b_ptr) {
632			bearer_disable(net, b_ptr);
633			tn->bearer_list[i] = NULL;
634		}
635	}
636}
637
638/* Caller should hold rtnl_lock to protect the bearer */
639static int __tipc_nl_add_bearer(struct tipc_nl_msg *msg,
640				struct tipc_bearer *bearer, int nlflags)
641{
642	void *hdr;
643	struct nlattr *attrs;
644	struct nlattr *prop;
645
646	hdr = genlmsg_put(msg->skb, msg->portid, msg->seq, &tipc_genl_family,
647			  nlflags, TIPC_NL_BEARER_GET);
648	if (!hdr)
649		return -EMSGSIZE;
650
651	attrs = nla_nest_start(msg->skb, TIPC_NLA_BEARER);
652	if (!attrs)
653		goto msg_full;
654
655	if (nla_put_string(msg->skb, TIPC_NLA_BEARER_NAME, bearer->name))
656		goto attr_msg_full;
657
658	prop = nla_nest_start(msg->skb, TIPC_NLA_BEARER_PROP);
659	if (!prop)
660		goto prop_msg_full;
661	if (nla_put_u32(msg->skb, TIPC_NLA_PROP_PRIO, bearer->priority))
662		goto prop_msg_full;
663	if (nla_put_u32(msg->skb, TIPC_NLA_PROP_TOL, bearer->tolerance))
664		goto prop_msg_full;
665	if (nla_put_u32(msg->skb, TIPC_NLA_PROP_WIN, bearer->window))
666		goto prop_msg_full;
667
668	nla_nest_end(msg->skb, prop);
669	nla_nest_end(msg->skb, attrs);
670	genlmsg_end(msg->skb, hdr);
671
672	return 0;
673
674prop_msg_full:
675	nla_nest_cancel(msg->skb, prop);
676attr_msg_full:
677	nla_nest_cancel(msg->skb, attrs);
678msg_full:
679	genlmsg_cancel(msg->skb, hdr);
680
681	return -EMSGSIZE;
682}
683
684int tipc_nl_bearer_dump(struct sk_buff *skb, struct netlink_callback *cb)
685{
686	int err;
687	int i = cb->args[0];
688	struct tipc_bearer *bearer;
689	struct tipc_nl_msg msg;
690	struct net *net = sock_net(skb->sk);
691	struct tipc_net *tn = net_generic(net, tipc_net_id);
692
693	if (i == MAX_BEARERS)
694		return 0;
695
696	msg.skb = skb;
697	msg.portid = NETLINK_CB(cb->skb).portid;
698	msg.seq = cb->nlh->nlmsg_seq;
699
700	rtnl_lock();
701	for (i = 0; i < MAX_BEARERS; i++) {
702		bearer = rtnl_dereference(tn->bearer_list[i]);
703		if (!bearer)
704			continue;
705
706		err = __tipc_nl_add_bearer(&msg, bearer, NLM_F_MULTI);
707		if (err)
708			break;
709	}
710	rtnl_unlock();
711
712	cb->args[0] = i;
713	return skb->len;
714}
715
716int tipc_nl_bearer_get(struct sk_buff *skb, struct genl_info *info)
717{
718	int err;
719	char *name;
720	struct sk_buff *rep;
721	struct tipc_bearer *bearer;
722	struct tipc_nl_msg msg;
723	struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
724	struct net *net = genl_info_net(info);
725
726	if (!info->attrs[TIPC_NLA_BEARER])
727		return -EINVAL;
728
729	err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
730			       info->attrs[TIPC_NLA_BEARER],
731			       tipc_nl_bearer_policy);
732	if (err)
733		return err;
734
735	if (!attrs[TIPC_NLA_BEARER_NAME])
736		return -EINVAL;
737	name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
738
739	rep = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
740	if (!rep)
741		return -ENOMEM;
742
743	msg.skb = rep;
744	msg.portid = info->snd_portid;
745	msg.seq = info->snd_seq;
746
747	rtnl_lock();
748	bearer = tipc_bearer_find(net, name);
749	if (!bearer) {
750		err = -EINVAL;
751		goto err_out;
752	}
753
754	err = __tipc_nl_add_bearer(&msg, bearer, 0);
755	if (err)
756		goto err_out;
757	rtnl_unlock();
758
759	return genlmsg_reply(rep, info);
760err_out:
761	rtnl_unlock();
762	nlmsg_free(rep);
763
764	return err;
765}
766
767int tipc_nl_bearer_disable(struct sk_buff *skb, struct genl_info *info)
768{
769	int err;
770	char *name;
771	struct tipc_bearer *bearer;
772	struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
773	struct net *net = sock_net(skb->sk);
774
775	if (!info->attrs[TIPC_NLA_BEARER])
776		return -EINVAL;
777
778	err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
779			       info->attrs[TIPC_NLA_BEARER],
780			       tipc_nl_bearer_policy);
781	if (err)
782		return err;
783
784	if (!attrs[TIPC_NLA_BEARER_NAME])
785		return -EINVAL;
786
787	name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
788
789	rtnl_lock();
790	bearer = tipc_bearer_find(net, name);
791	if (!bearer) {
792		rtnl_unlock();
793		return -EINVAL;
794	}
795
796	bearer_disable(net, bearer);
797	rtnl_unlock();
798
799	return 0;
800}
801
802int tipc_nl_bearer_enable(struct sk_buff *skb, struct genl_info *info)
803{
804	int err;
805	char *bearer;
806	struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
807	struct net *net = sock_net(skb->sk);
808	struct tipc_net *tn = net_generic(net, tipc_net_id);
809	u32 domain;
810	u32 prio;
811
812	prio = TIPC_MEDIA_LINK_PRI;
813	domain = tn->own_addr & TIPC_CLUSTER_MASK;
814
815	if (!info->attrs[TIPC_NLA_BEARER])
816		return -EINVAL;
817
818	err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
819			       info->attrs[TIPC_NLA_BEARER],
820			       tipc_nl_bearer_policy);
821	if (err)
822		return err;
823
824	if (!attrs[TIPC_NLA_BEARER_NAME])
825		return -EINVAL;
826
827	bearer = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
828
829	if (attrs[TIPC_NLA_BEARER_DOMAIN])
830		domain = nla_get_u32(attrs[TIPC_NLA_BEARER_DOMAIN]);
831
832	if (attrs[TIPC_NLA_BEARER_PROP]) {
833		struct nlattr *props[TIPC_NLA_PROP_MAX + 1];
834
835		err = tipc_nl_parse_link_prop(attrs[TIPC_NLA_BEARER_PROP],
836					      props);
837		if (err)
838			return err;
839
840		if (props[TIPC_NLA_PROP_PRIO])
841			prio = nla_get_u32(props[TIPC_NLA_PROP_PRIO]);
842	}
843
844	rtnl_lock();
845	err = tipc_enable_bearer(net, bearer, domain, prio, attrs);
846	if (err) {
847		rtnl_unlock();
848		return err;
849	}
850	rtnl_unlock();
851
852	return 0;
853}
854
855int tipc_nl_bearer_set(struct sk_buff *skb, struct genl_info *info)
856{
857	int err;
858	char *name;
859	struct tipc_bearer *b;
860	struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
861	struct net *net = sock_net(skb->sk);
862
863	if (!info->attrs[TIPC_NLA_BEARER])
864		return -EINVAL;
865
866	err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
867			       info->attrs[TIPC_NLA_BEARER],
868			       tipc_nl_bearer_policy);
869	if (err)
870		return err;
871
872	if (!attrs[TIPC_NLA_BEARER_NAME])
873		return -EINVAL;
874	name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
875
876	rtnl_lock();
877	b = tipc_bearer_find(net, name);
878	if (!b) {
879		rtnl_unlock();
880		return -EINVAL;
881	}
882
883	if (attrs[TIPC_NLA_BEARER_PROP]) {
884		struct nlattr *props[TIPC_NLA_PROP_MAX + 1];
885
886		err = tipc_nl_parse_link_prop(attrs[TIPC_NLA_BEARER_PROP],
887					      props);
888		if (err) {
889			rtnl_unlock();
890			return err;
891		}
892
893		if (props[TIPC_NLA_PROP_TOL])
894			b->tolerance = nla_get_u32(props[TIPC_NLA_PROP_TOL]);
895		if (props[TIPC_NLA_PROP_PRIO])
896			b->priority = nla_get_u32(props[TIPC_NLA_PROP_PRIO]);
897		if (props[TIPC_NLA_PROP_WIN])
898			b->window = nla_get_u32(props[TIPC_NLA_PROP_WIN]);
899	}
900	rtnl_unlock();
901
902	return 0;
903}
904
905static int __tipc_nl_add_media(struct tipc_nl_msg *msg,
906			       struct tipc_media *media, int nlflags)
907{
908	void *hdr;
909	struct nlattr *attrs;
910	struct nlattr *prop;
911
912	hdr = genlmsg_put(msg->skb, msg->portid, msg->seq, &tipc_genl_family,
913			  nlflags, TIPC_NL_MEDIA_GET);
914	if (!hdr)
915		return -EMSGSIZE;
916
917	attrs = nla_nest_start(msg->skb, TIPC_NLA_MEDIA);
918	if (!attrs)
919		goto msg_full;
920
921	if (nla_put_string(msg->skb, TIPC_NLA_MEDIA_NAME, media->name))
922		goto attr_msg_full;
923
924	prop = nla_nest_start(msg->skb, TIPC_NLA_MEDIA_PROP);
925	if (!prop)
926		goto prop_msg_full;
927	if (nla_put_u32(msg->skb, TIPC_NLA_PROP_PRIO, media->priority))
928		goto prop_msg_full;
929	if (nla_put_u32(msg->skb, TIPC_NLA_PROP_TOL, media->tolerance))
930		goto prop_msg_full;
931	if (nla_put_u32(msg->skb, TIPC_NLA_PROP_WIN, media->window))
932		goto prop_msg_full;
933
934	nla_nest_end(msg->skb, prop);
935	nla_nest_end(msg->skb, attrs);
936	genlmsg_end(msg->skb, hdr);
937
938	return 0;
939
940prop_msg_full:
941	nla_nest_cancel(msg->skb, prop);
942attr_msg_full:
943	nla_nest_cancel(msg->skb, attrs);
944msg_full:
945	genlmsg_cancel(msg->skb, hdr);
946
947	return -EMSGSIZE;
948}
949
950int tipc_nl_media_dump(struct sk_buff *skb, struct netlink_callback *cb)
951{
952	int err;
953	int i = cb->args[0];
954	struct tipc_nl_msg msg;
955
956	if (i == MAX_MEDIA)
957		return 0;
958
959	msg.skb = skb;
960	msg.portid = NETLINK_CB(cb->skb).portid;
961	msg.seq = cb->nlh->nlmsg_seq;
962
963	rtnl_lock();
964	for (; media_info_array[i] != NULL; i++) {
965		err = __tipc_nl_add_media(&msg, media_info_array[i],
966					  NLM_F_MULTI);
967		if (err)
968			break;
969	}
970	rtnl_unlock();
971
972	cb->args[0] = i;
973	return skb->len;
974}
975
976int tipc_nl_media_get(struct sk_buff *skb, struct genl_info *info)
977{
978	int err;
979	char *name;
980	struct tipc_nl_msg msg;
981	struct tipc_media *media;
982	struct sk_buff *rep;
983	struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
984
985	if (!info->attrs[TIPC_NLA_MEDIA])
986		return -EINVAL;
987
988	err = nla_parse_nested(attrs, TIPC_NLA_MEDIA_MAX,
989			       info->attrs[TIPC_NLA_MEDIA],
990			       tipc_nl_media_policy);
991	if (err)
992		return err;
993
994	if (!attrs[TIPC_NLA_MEDIA_NAME])
995		return -EINVAL;
996	name = nla_data(attrs[TIPC_NLA_MEDIA_NAME]);
997
998	rep = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
999	if (!rep)
1000		return -ENOMEM;
1001
1002	msg.skb = rep;
1003	msg.portid = info->snd_portid;
1004	msg.seq = info->snd_seq;
1005
1006	rtnl_lock();
1007	media = tipc_media_find(name);
1008	if (!media) {
1009		err = -EINVAL;
1010		goto err_out;
1011	}
1012
1013	err = __tipc_nl_add_media(&msg, media, 0);
1014	if (err)
1015		goto err_out;
1016	rtnl_unlock();
1017
1018	return genlmsg_reply(rep, info);
1019err_out:
1020	rtnl_unlock();
1021	nlmsg_free(rep);
1022
1023	return err;
1024}
1025
1026int tipc_nl_media_set(struct sk_buff *skb, struct genl_info *info)
1027{
1028	int err;
1029	char *name;
1030	struct tipc_media *m;
1031	struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
1032
1033	if (!info->attrs[TIPC_NLA_MEDIA])
1034		return -EINVAL;
1035
1036	err = nla_parse_nested(attrs, TIPC_NLA_MEDIA_MAX,
1037			       info->attrs[TIPC_NLA_MEDIA],
1038			       tipc_nl_media_policy);
1039
1040	if (!attrs[TIPC_NLA_MEDIA_NAME])
1041		return -EINVAL;
1042	name = nla_data(attrs[TIPC_NLA_MEDIA_NAME]);
1043
1044	rtnl_lock();
1045	m = tipc_media_find(name);
1046	if (!m) {
1047		rtnl_unlock();
1048		return -EINVAL;
1049	}
1050
1051	if (attrs[TIPC_NLA_MEDIA_PROP]) {
1052		struct nlattr *props[TIPC_NLA_PROP_MAX + 1];
1053
1054		err = tipc_nl_parse_link_prop(attrs[TIPC_NLA_MEDIA_PROP],
1055					      props);
1056		if (err) {
1057			rtnl_unlock();
1058			return err;
1059		}
1060
1061		if (props[TIPC_NLA_PROP_TOL])
1062			m->tolerance = nla_get_u32(props[TIPC_NLA_PROP_TOL]);
1063		if (props[TIPC_NLA_PROP_PRIO])
1064			m->priority = nla_get_u32(props[TIPC_NLA_PROP_PRIO]);
1065		if (props[TIPC_NLA_PROP_WIN])
1066			m->window = nla_get_u32(props[TIPC_NLA_PROP_WIN]);
1067	}
1068	rtnl_unlock();
1069
1070	return 0;
1071}
1072