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