bearer.c 25.2 KB
Newer Older
Per Liden's avatar
Per Liden committed
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
Per Liden's avatar
Per Liden committed
6
7
 * All rights reserved.
 *
Per Liden's avatar
Per Liden committed
8
 * Redistribution and use in source and binary forms, with or without
Per Liden's avatar
Per Liden committed
9
10
 * modification, are permitted provided that the following conditions are met:
 *
Per Liden's avatar
Per Liden committed
11
12
13
14
15
16
17
18
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. Neither the names of the copyright holders nor the names of its
 *    contributors may be used to endorse or promote products derived from
 *    this software without specific prior written permission.
Per Liden's avatar
Per Liden committed
19
 *
Per Liden's avatar
Per Liden committed
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 * Alternatively, this software may be distributed under the terms of the
 * GNU General Public License ("GPL") version 2 as published by the Free
 * Software Foundation.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
Per Liden's avatar
Per Liden committed
34
35
36
37
38
39
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include "core.h"
#include "config.h"
#include "bearer.h"
40
#include "link.h"
Per Liden's avatar
Per Liden committed
41
42
#include "discover.h"

43
#define MAX_ADDR_STR 60
Per Liden's avatar
Per Liden committed
44

45
static struct tipc_media * const media_info_array[] = {
46
47
48
49
50
51
	&eth_media_info,
#ifdef CONFIG_TIPC_MEDIA_IB
	&ib_media_info,
#endif
	NULL
};
Per Liden's avatar
Per Liden committed
52

53
54
55
56
57
58
59
60
61
62
63
static const struct nla_policy
tipc_nl_bearer_policy[TIPC_NLA_BEARER_MAX + 1]	= {
	[TIPC_NLA_BEARER_UNSPEC]		= { .type = NLA_UNSPEC },
	[TIPC_NLA_BEARER_NAME] = {
		.type = NLA_STRING,
		.len = TIPC_MAX_BEARER_NAME
	},
	[TIPC_NLA_BEARER_PROP]			= { .type = NLA_NESTED },
	[TIPC_NLA_BEARER_DOMAIN]		= { .type = NLA_U32 }
};

64
65
66
67
68
69
static const struct nla_policy tipc_nl_media_policy[TIPC_NLA_MEDIA_MAX + 1] = {
	[TIPC_NLA_MEDIA_UNSPEC]		= { .type = NLA_UNSPEC },
	[TIPC_NLA_MEDIA_NAME]		= { .type = NLA_STRING },
	[TIPC_NLA_MEDIA_PROP]		= { .type = NLA_NESTED }
};

70
struct tipc_bearer __rcu *bearer_list[MAX_BEARERS + 1];
Per Liden's avatar
Per Liden committed
71

72
static void bearer_disable(struct tipc_bearer *b_ptr, bool shutting_down);
73

Per Liden's avatar
Per Liden committed
74
/**
75
 * tipc_media_find - locates specified media object by name
Per Liden's avatar
Per Liden committed
76
 */
77
struct tipc_media *tipc_media_find(const char *name)
Per Liden's avatar
Per Liden committed
78
79
80
{
	u32 i;

81
82
	for (i = 0; media_info_array[i] != NULL; i++) {
		if (!strcmp(media_info_array[i]->name, name))
83
			break;
Per Liden's avatar
Per Liden committed
84
	}
85
	return media_info_array[i];
Per Liden's avatar
Per Liden committed
86
87
}

88
89
90
/**
 * media_find_id - locates specified media object by type identifier
 */
91
static struct tipc_media *media_find_id(u8 type)
92
93
94
{
	u32 i;

95
96
	for (i = 0; media_info_array[i] != NULL; i++) {
		if (media_info_array[i]->type_id == type)
97
			break;
98
	}
99
	return media_info_array[i];
Per Liden's avatar
Per Liden committed
100
101
102
}

/**
103
 * tipc_media_addr_printf - record media address in print buffer
Per Liden's avatar
Per Liden committed
104
 */
105
void tipc_media_addr_printf(char *buf, int len, struct tipc_media_addr *a)
Per Liden's avatar
Per Liden committed
106
{
107
	char addr_str[MAX_ADDR_STR];
108
	struct tipc_media *m_ptr;
109
	int ret;
Per Liden's avatar
Per Liden committed
110

111
	m_ptr = media_find_id(a->media_id);
Per Liden's avatar
Per Liden committed
112

113
	if (m_ptr && !m_ptr->addr2str(a, addr_str, sizeof(addr_str)))
114
		ret = tipc_snprintf(buf, len, "%s(%s)", m_ptr->name, addr_str);
115
116
	else {
		u32 i;
Per Liden's avatar
Per Liden committed
117

118
		ret = tipc_snprintf(buf, len, "UNKNOWN(%u)", a->media_id);
119
		for (i = 0; i < sizeof(a->value); i++)
120
121
			ret += tipc_snprintf(buf - ret, len + ret,
					    "-%02x", a->value[i]);
Per Liden's avatar
Per Liden committed
122
123
124
125
	}
}

/**
126
 * tipc_media_get_names - record names of registered media in buffer
Per Liden's avatar
Per Liden committed
127
 */
128
struct sk_buff *tipc_media_get_names(void)
Per Liden's avatar
Per Liden committed
129
130
131
132
{
	struct sk_buff *buf;
	int i;

133
	buf = tipc_cfg_reply_alloc(MAX_MEDIA * TLV_SPACE(TIPC_MAX_MEDIA_NAME));
Per Liden's avatar
Per Liden committed
134
135
136
	if (!buf)
		return NULL;

137
	for (i = 0; media_info_array[i] != NULL; i++) {
138
		tipc_cfg_append_tlv(buf, TIPC_TLV_MEDIA_NAME,
139
140
				    media_info_array[i]->name,
				    strlen(media_info_array[i]->name) + 1);
Per Liden's avatar
Per Liden committed
141
142
143
144
145
146
	}
	return buf;
}

/**
 * bearer_name_validate - validate & (optionally) deconstruct bearer name
147
148
 * @name: ptr to bearer name string
 * @name_parts: ptr to area for bearer name components (or NULL if not needed)
149
 *
Per Liden's avatar
Per Liden committed
150
151
 * Returns 1 if bearer name is valid, otherwise 0.
 */
152
static int bearer_name_validate(const char *name,
153
				struct tipc_bearer_names *name_parts)
Per Liden's avatar
Per Liden committed
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
{
	char name_copy[TIPC_MAX_BEARER_NAME];
	char *media_name;
	char *if_name;
	u32 media_len;
	u32 if_len;

	/* copy bearer name & ensure length is OK */
	name_copy[TIPC_MAX_BEARER_NAME - 1] = 0;
	/* need above in case non-Posix strncpy() doesn't pad with nulls */
	strncpy(name_copy, name, TIPC_MAX_BEARER_NAME);
	if (name_copy[TIPC_MAX_BEARER_NAME - 1] != 0)
		return 0;

	/* ensure all component parts of bearer name are present */
	media_name = name_copy;
170
171
	if_name = strchr(media_name, ':');
	if (if_name == NULL)
Per Liden's avatar
Per Liden committed
172
173
174
175
176
177
		return 0;
	*(if_name++) = 0;
	media_len = if_name - media_name;
	if_len = strlen(if_name) + 1;

	/* validate component parts of bearer name */
178
	if ((media_len <= 1) || (media_len > TIPC_MAX_MEDIA_NAME) ||
179
	    (if_len <= 1) || (if_len > TIPC_MAX_IF_NAME))
Per Liden's avatar
Per Liden committed
180
181
182
183
184
185
186
187
188
189
190
		return 0;

	/* return bearer name components, if necessary */
	if (name_parts) {
		strcpy(name_parts->media_name, media_name);
		strcpy(name_parts->if_name, if_name);
	}
	return 1;
}

/**
191
 * tipc_bearer_find - locates bearer object with matching bearer name
Per Liden's avatar
Per Liden committed
192
 */
193
struct tipc_bearer *tipc_bearer_find(const char *name)
Per Liden's avatar
Per Liden committed
194
{
195
	struct tipc_bearer *b_ptr;
Per Liden's avatar
Per Liden committed
196
197
	u32 i;

198
	for (i = 0; i < MAX_BEARERS; i++) {
199
		b_ptr = rtnl_dereference(bearer_list[i]);
200
		if (b_ptr && (!strcmp(b_ptr->name, name)))
Per Liden's avatar
Per Liden committed
201
202
			return b_ptr;
	}
203
	return NULL;
Per Liden's avatar
Per Liden committed
204
205
206
}

/**
207
 * tipc_bearer_get_names - record names of bearers in buffer
Per Liden's avatar
Per Liden committed
208
 */
209
struct sk_buff *tipc_bearer_get_names(void)
Per Liden's avatar
Per Liden committed
210
211
{
	struct sk_buff *buf;
212
	struct tipc_bearer *b;
Per Liden's avatar
Per Liden committed
213
214
	int i, j;

215
	buf = tipc_cfg_reply_alloc(MAX_BEARERS * TLV_SPACE(TIPC_MAX_BEARER_NAME));
Per Liden's avatar
Per Liden committed
216
217
218
	if (!buf)
		return NULL;

219
	for (i = 0; media_info_array[i] != NULL; i++) {
Per Liden's avatar
Per Liden committed
220
		for (j = 0; j < MAX_BEARERS; j++) {
221
			b = rtnl_dereference(bearer_list[j]);
222
223
			if (!b)
				continue;
224
			if (b->media == media_info_array[i]) {
225
				tipc_cfg_append_tlv(buf, TIPC_TLV_BEARER_NAME,
226
227
						    b->name,
						    strlen(b->name) + 1);
Per Liden's avatar
Per Liden committed
228
229
230
231
232
233
			}
		}
	}
	return buf;
}

234
void tipc_bearer_add_dest(u32 bearer_id, u32 dest)
Per Liden's avatar
Per Liden committed
235
{
236
237
238
239
240
	struct tipc_bearer *b_ptr;

	rcu_read_lock();
	b_ptr = rcu_dereference_rtnl(bearer_list[bearer_id]);
	if (b_ptr) {
241
		tipc_bcbearer_sort(&b_ptr->nodes, dest, true);
242
243
244
		tipc_disc_add_dest(b_ptr->link_req);
	}
	rcu_read_unlock();
Per Liden's avatar
Per Liden committed
245
246
}

247
void tipc_bearer_remove_dest(u32 bearer_id, u32 dest)
Per Liden's avatar
Per Liden committed
248
{
249
250
251
252
253
	struct tipc_bearer *b_ptr;

	rcu_read_lock();
	b_ptr = rcu_dereference_rtnl(bearer_list[bearer_id]);
	if (b_ptr) {
254
		tipc_bcbearer_sort(&b_ptr->nodes, dest, false);
255
256
257
		tipc_disc_remove_dest(b_ptr->link_req);
	}
	rcu_read_unlock();
Per Liden's avatar
Per Liden committed
258
259
260
261
}

/**
 * tipc_enable_bearer - enable bearer with the given name
262
 */
263
264
int tipc_enable_bearer(struct net *net, const char *name, u32 disc_domain,
		       u32 priority)
Per Liden's avatar
Per Liden committed
265
{
266
	struct tipc_bearer *b_ptr;
267
	struct tipc_media *m_ptr;
268
	struct tipc_bearer_names b_names;
Per Liden's avatar
Per Liden committed
269
270
271
272
273
274
	char addr_string[16];
	u32 bearer_id;
	u32 with_this_prio;
	u32 i;
	int res = -EINVAL;

275
	if (!tipc_own_addr) {
276
277
		pr_warn("Bearer <%s> rejected, not supported in standalone mode\n",
			name);
Per Liden's avatar
Per Liden committed
278
		return -ENOPROTOOPT;
279
	}
280
	if (!bearer_name_validate(name, &b_names)) {
281
		pr_warn("Bearer <%s> rejected, illegal name\n", name);
282
		return -EINVAL;
283
	}
284
285
286
287
288
	if (tipc_addr_domain_valid(disc_domain) &&
	    (disc_domain != tipc_own_addr)) {
		if (tipc_in_scope(disc_domain, tipc_own_addr)) {
			disc_domain = tipc_own_addr & TIPC_CLUSTER_MASK;
			res = 0;   /* accept any node in own cluster */
289
		} else if (in_own_cluster_exact(disc_domain))
290
291
292
			res = 0;   /* accept specified node in own cluster */
	}
	if (res) {
293
294
		pr_warn("Bearer <%s> rejected, illegal discovery domain\n",
			name);
295
296
		return -EINVAL;
	}
297
	if ((priority > TIPC_MAX_LINK_PRI) &&
298
	    (priority != TIPC_MEDIA_LINK_PRI)) {
299
		pr_warn("Bearer <%s> rejected, illegal priority\n", name);
Per Liden's avatar
Per Liden committed
300
		return -EINVAL;
301
	}
Per Liden's avatar
Per Liden committed
302

303
	m_ptr = tipc_media_find(b_names.media_name);
Per Liden's avatar
Per Liden committed
304
	if (!m_ptr) {
305
306
		pr_warn("Bearer <%s> rejected, media <%s> not registered\n",
			name, b_names.media_name);
Ying Xue's avatar
Ying Xue committed
307
		return -EINVAL;
Per Liden's avatar
Per Liden committed
308
	}
309
310

	if (priority == TIPC_MEDIA_LINK_PRI)
Per Liden's avatar
Per Liden committed
311
312
313
314
315
316
		priority = m_ptr->priority;

restart:
	bearer_id = MAX_BEARERS;
	with_this_prio = 1;
	for (i = MAX_BEARERS; i-- != 0; ) {
317
		b_ptr = rtnl_dereference(bearer_list[i]);
318
		if (!b_ptr) {
Per Liden's avatar
Per Liden committed
319
320
321
			bearer_id = i;
			continue;
		}
322
		if (!strcmp(name, b_ptr->name)) {
323
324
			pr_warn("Bearer <%s> rejected, already enabled\n",
				name);
Ying Xue's avatar
Ying Xue committed
325
			return -EINVAL;
Per Liden's avatar
Per Liden committed
326
		}
327
		if ((b_ptr->priority == priority) &&
Per Liden's avatar
Per Liden committed
328
329
		    (++with_this_prio > 2)) {
			if (priority-- == 0) {
330
331
				pr_warn("Bearer <%s> rejected, duplicate priority\n",
					name);
Ying Xue's avatar
Ying Xue committed
332
				return -EINVAL;
Per Liden's avatar
Per Liden committed
333
			}
334
335
			pr_warn("Bearer <%s> priority adjustment required %u->%u\n",
				name, priority + 1, priority);
Per Liden's avatar
Per Liden committed
336
337
338
339
			goto restart;
		}
	}
	if (bearer_id >= MAX_BEARERS) {
340
341
		pr_warn("Bearer <%s> rejected, bearer limit reached (%u)\n",
			name, MAX_BEARERS);
Ying Xue's avatar
Ying Xue committed
342
		return -EINVAL;
Per Liden's avatar
Per Liden committed
343
344
	}

345
	b_ptr = kzalloc(sizeof(*b_ptr), GFP_ATOMIC);
Ying Xue's avatar
Ying Xue committed
346
347
348
	if (!b_ptr)
		return -ENOMEM;

349
	strcpy(b_ptr->name, name);
350
	b_ptr->media = m_ptr;
351
	res = m_ptr->enable_media(b_ptr);
Per Liden's avatar
Per Liden committed
352
	if (res) {
353
354
		pr_warn("Bearer <%s> rejected, enable failure (%d)\n",
			name, -res);
Ying Xue's avatar
Ying Xue committed
355
		return -EINVAL;
Per Liden's avatar
Per Liden committed
356
357
358
	}

	b_ptr->identity = bearer_id;
359
360
	b_ptr->tolerance = m_ptr->tolerance;
	b_ptr->window = m_ptr->window;
361
	b_ptr->domain = disc_domain;
Per Liden's avatar
Per Liden committed
362
363
	b_ptr->net_plane = bearer_id + 'A';
	b_ptr->priority = priority;
364

365
	res = tipc_disc_create(net, b_ptr, &b_ptr->bcast_addr);
366
	if (res) {
367
		bearer_disable(b_ptr, false);
368
369
		pr_warn("Bearer <%s> rejected, discovery object creation failed\n",
			name);
Ying Xue's avatar
Ying Xue committed
370
		return -EINVAL;
371
	}
372

373
	rcu_assign_pointer(bearer_list[bearer_id], b_ptr);
374

375
376
377
	pr_info("Enabled bearer <%s>, discovery domain %s, priority %u\n",
		name,
		tipc_addr_string_fill(addr_string, disc_domain), priority);
Per Liden's avatar
Per Liden committed
378
379
380
381
	return res;
}

/**
382
 * tipc_reset_bearer - Reset all links established over this bearer
Per Liden's avatar
Per Liden committed
383
 */
384
static int tipc_reset_bearer(struct net *net, struct tipc_bearer *b_ptr)
Per Liden's avatar
Per Liden committed
385
{
386
	pr_info("Resetting bearer <%s>\n", b_ptr->name);
387
	tipc_link_reset_list(b_ptr->identity);
388
	tipc_disc_reset(net, b_ptr);
389
	return 0;
Per Liden's avatar
Per Liden committed
390
391
392
}

/**
393
 * bearer_disable
394
 *
Ying Xue's avatar
Ying Xue committed
395
 * Note: This routine assumes caller holds RTNL lock.
Per Liden's avatar
Per Liden committed
396
 */
397
static void bearer_disable(struct tipc_bearer *b_ptr, bool shutting_down)
Per Liden's avatar
Per Liden committed
398
{
399
400
	u32 i;

401
	pr_info("Disabling bearer <%s>\n", b_ptr->name);
402
	b_ptr->media->disable_media(b_ptr);
403

404
405
406
	tipc_link_delete_list(b_ptr->identity, shutting_down);
	if (b_ptr->link_req)
		tipc_disc_delete(b_ptr->link_req);
407
408

	for (i = 0; i < MAX_BEARERS; i++) {
409
410
		if (b_ptr == rtnl_dereference(bearer_list[i])) {
			RCU_INIT_POINTER(bearer_list[i], NULL);
411
412
413
			break;
		}
	}
414
	kfree_rcu(b_ptr, rcu);
Per Liden's avatar
Per Liden committed
415
416
417
418
}

int tipc_disable_bearer(const char *name)
{
419
	struct tipc_bearer *b_ptr;
Per Liden's avatar
Per Liden committed
420
421
	int res;

422
	b_ptr = tipc_bearer_find(name);
423
	if (b_ptr == NULL) {
424
		pr_warn("Attempt to disable unknown bearer <%s>\n", name);
425
		res = -EINVAL;
426
	} else {
427
		bearer_disable(b_ptr, false);
428
429
		res = 0;
	}
Per Liden's avatar
Per Liden committed
430
431
432
	return res;
}

433
434
435
436
437
438
439
440
441
442
int tipc_enable_l2_media(struct tipc_bearer *b)
{
	struct net_device *dev;
	char *driver_name = strchr((const char *)b->name, ':') + 1;

	/* Find device with specified name */
	dev = dev_get_by_name(&init_net, driver_name);
	if (!dev)
		return -ENODEV;

443
	/* Associate TIPC bearer with L2 bearer */
444
	rcu_assign_pointer(b->media_ptr, dev);
445
	memset(&b->bcast_addr, 0, sizeof(b->bcast_addr));
446
447
448
449
	memcpy(b->bcast_addr.value, dev->broadcast, b->media->hwaddr_len);
	b->bcast_addr.media_id = b->media->type_id;
	b->bcast_addr.broadcast = 1;
	b->mtu = dev->mtu;
450
	b->media->raw2addr(b, &b->addr, (char *)dev->dev_addr);
451
452
453
454
	rcu_assign_pointer(dev->tipc_ptr, b);
	return 0;
}

455
/* tipc_disable_l2_media - detach TIPC bearer from an L2 interface
456
 *
457
 * Mark L2 bearer as inactive so that incoming buffers are thrown away,
458
459
460
461
462
 * then get worker thread to complete bearer cleanup.  (Can't do cleanup
 * here because cleanup code needs to sleep and caller holds spinlocks.)
 */
void tipc_disable_l2_media(struct tipc_bearer *b)
{
463
464
465
466
	struct net_device *dev;

	dev = (struct net_device *)rtnl_dereference(b->media_ptr);
	RCU_INIT_POINTER(b->media_ptr, NULL);
467
	RCU_INIT_POINTER(dev->tipc_ptr, NULL);
468
	synchronize_net();
469
470
471
472
	dev_put(dev);
}

/**
473
 * tipc_l2_send_msg - send a TIPC packet out over an L2 interface
474
 * @buf: the packet to be sent
stephen hemminger's avatar
stephen hemminger committed
475
 * @b_ptr: the bearer through which the packet is to be sent
476
477
478
479
480
481
 * @dest: peer destination address
 */
int tipc_l2_send_msg(struct sk_buff *buf, struct tipc_bearer *b,
		     struct tipc_media_addr *dest)
{
	struct sk_buff *clone;
482
	struct net_device *dev;
483
	int delta;
484
485
486
487

	dev = (struct net_device *)rcu_dereference_rtnl(b->media_ptr);
	if (!dev)
		return 0;
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514

	clone = skb_clone(buf, GFP_ATOMIC);
	if (!clone)
		return 0;

	delta = dev->hard_header_len - skb_headroom(buf);
	if ((delta > 0) &&
	    pskb_expand_head(clone, SKB_DATA_ALIGN(delta), 0, GFP_ATOMIC)) {
		kfree_skb(clone);
		return 0;
	}

	skb_reset_network_header(clone);
	clone->dev = dev;
	clone->protocol = htons(ETH_P_TIPC);
	dev_hard_header(clone, dev, ETH_P_TIPC, dest->value,
			dev->dev_addr, clone->len);
	dev_queue_xmit(clone);
	return 0;
}

/* tipc_bearer_send- sends buffer to destination over bearer
 *
 * IMPORTANT:
 * The media send routine must not alter the buffer being passed in
 * as it may be needed for later retransmission!
 */
515
void tipc_bearer_send(u32 bearer_id, struct sk_buff *buf,
516
517
		      struct tipc_media_addr *dest)
{
518
519
520
521
522
523
524
	struct tipc_bearer *b_ptr;

	rcu_read_lock();
	b_ptr = rcu_dereference_rtnl(bearer_list[bearer_id]);
	if (likely(b_ptr))
		b_ptr->media->send_msg(buf, b_ptr, dest);
	rcu_read_unlock();
525
526
}

527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
/**
 * tipc_l2_rcv_msg - handle incoming TIPC message from an interface
 * @buf: the received packet
 * @dev: the net device that the packet was received on
 * @pt: the packet_type structure which was used to register this handler
 * @orig_dev: the original receive net device in case the device is a bond
 *
 * Accept only packets explicitly sent to this node, or broadcast packets;
 * ignores packets sent using interface multicast, and traffic sent to other
 * nodes (which can happen if interface is running in promiscuous mode).
 */
static int tipc_l2_rcv_msg(struct sk_buff *buf, struct net_device *dev,
			   struct packet_type *pt, struct net_device *orig_dev)
{
	struct tipc_bearer *b_ptr;

	rcu_read_lock();
544
	b_ptr = rcu_dereference_rtnl(dev->tipc_ptr);
545
546
547
	if (likely(b_ptr)) {
		if (likely(buf->pkt_type <= PACKET_BROADCAST)) {
			buf->next = NULL;
548
			tipc_rcv(dev_net(dev), buf, b_ptr);
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
			rcu_read_unlock();
			return NET_RX_SUCCESS;
		}
	}
	rcu_read_unlock();

	kfree_skb(buf);
	return NET_RX_DROP;
}

/**
 * tipc_l2_device_event - handle device events from network device
 * @nb: the context of the notification
 * @evt: the type of event
 * @ptr: the net device that the event was on
 *
 * This function is called by the Ethernet driver in case of link
 * change event.
 */
static int tipc_l2_device_event(struct notifier_block *nb, unsigned long evt,
				void *ptr)
{
	struct net_device *dev = netdev_notifier_info_to_dev(ptr);
572
573
	struct net *net = dev_net(dev);
	struct tipc_bearer *b_ptr;
574

575
576
	b_ptr = rtnl_dereference(dev->tipc_ptr);
	if (!b_ptr)
577
578
579
580
581
582
583
584
585
586
		return NOTIFY_DONE;

	b_ptr->mtu = dev->mtu;

	switch (evt) {
	case NETDEV_CHANGE:
		if (netif_carrier_ok(dev))
			break;
	case NETDEV_DOWN:
	case NETDEV_CHANGEMTU:
587
		tipc_reset_bearer(net, b_ptr);
588
		break;
589
	case NETDEV_CHANGEADDR:
590
		b_ptr->media->raw2addr(b_ptr, &b_ptr->addr,
591
				       (char *)dev->dev_addr);
592
		tipc_reset_bearer(net, b_ptr);
593
594
595
		break;
	case NETDEV_UNREGISTER:
	case NETDEV_CHANGENAME:
596
		bearer_disable(b_ptr, false);
597
598
599
600
601
602
		break;
	}
	return NOTIFY_OK;
}

static struct packet_type tipc_packet_type __read_mostly = {
603
	.type = htons(ETH_P_TIPC),
604
605
606
607
608
609
610
611
612
613
	.func = tipc_l2_rcv_msg,
};

static struct notifier_block notifier = {
	.notifier_call  = tipc_l2_device_event,
	.priority	= 0,
};

int tipc_bearer_setup(void)
{
614
615
616
617
618
	int err;

	err = register_netdevice_notifier(&notifier);
	if (err)
		return err;
619
	dev_add_pack(&tipc_packet_type);
620
	return 0;
621
622
623
624
625
626
627
}

void tipc_bearer_cleanup(void)
{
	unregister_netdevice_notifier(&notifier);
	dev_remove_pack(&tipc_packet_type);
}
Per Liden's avatar
Per Liden committed
628

629
void tipc_bearer_stop(void)
Per Liden's avatar
Per Liden committed
630
{
631
	struct tipc_bearer *b_ptr;
Per Liden's avatar
Per Liden committed
632
633
634
	u32 i;

	for (i = 0; i < MAX_BEARERS; i++) {
635
		b_ptr = rtnl_dereference(bearer_list[i]);
636
		if (b_ptr) {
637
638
639
			bearer_disable(b_ptr, true);
			bearer_list[i] = NULL;
		}
Per Liden's avatar
Per Liden committed
640
641
	}
}
642

643
/* Caller should hold rtnl_lock to protect the bearer */
644
645
static int __tipc_nl_add_bearer(struct tipc_nl_msg *msg,
				struct tipc_bearer *bearer)
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
{
	void *hdr;
	struct nlattr *attrs;
	struct nlattr *prop;

	hdr = genlmsg_put(msg->skb, msg->portid, msg->seq, &tipc_genl_v2_family,
			  NLM_F_MULTI, TIPC_NL_BEARER_GET);
	if (!hdr)
		return -EMSGSIZE;

	attrs = nla_nest_start(msg->skb, TIPC_NLA_BEARER);
	if (!attrs)
		goto msg_full;

	if (nla_put_string(msg->skb, TIPC_NLA_BEARER_NAME, bearer->name))
		goto attr_msg_full;

	prop = nla_nest_start(msg->skb, TIPC_NLA_BEARER_PROP);
	if (!prop)
		goto prop_msg_full;
	if (nla_put_u32(msg->skb, TIPC_NLA_PROP_PRIO, bearer->priority))
		goto prop_msg_full;
	if (nla_put_u32(msg->skb, TIPC_NLA_PROP_TOL, bearer->tolerance))
		goto prop_msg_full;
	if (nla_put_u32(msg->skb, TIPC_NLA_PROP_WIN, bearer->window))
		goto prop_msg_full;

	nla_nest_end(msg->skb, prop);
	nla_nest_end(msg->skb, attrs);
	genlmsg_end(msg->skb, hdr);

	return 0;

prop_msg_full:
	nla_nest_cancel(msg->skb, prop);
attr_msg_full:
	nla_nest_cancel(msg->skb, attrs);
msg_full:
	genlmsg_cancel(msg->skb, hdr);

	return -EMSGSIZE;
}

int tipc_nl_bearer_dump(struct sk_buff *skb, struct netlink_callback *cb)
{
	int err;
	int i = cb->args[0];
	struct tipc_bearer *bearer;
	struct tipc_nl_msg msg;

	if (i == MAX_BEARERS)
		return 0;

	msg.skb = skb;
	msg.portid = NETLINK_CB(cb->skb).portid;
	msg.seq = cb->nlh->nlmsg_seq;

	rtnl_lock();
	for (i = 0; i < MAX_BEARERS; i++) {
		bearer = rtnl_dereference(bearer_list[i]);
		if (!bearer)
			continue;

		err = __tipc_nl_add_bearer(&msg, bearer);
		if (err)
			break;
	}
	rtnl_unlock();

	cb->args[0] = i;
	return skb->len;
}

int tipc_nl_bearer_get(struct sk_buff *skb, struct genl_info *info)
{
	int err;
	char *name;
	struct sk_buff *rep;
	struct tipc_bearer *bearer;
	struct tipc_nl_msg msg;
	struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];

	if (!info->attrs[TIPC_NLA_BEARER])
		return -EINVAL;

	err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
			       info->attrs[TIPC_NLA_BEARER],
			       tipc_nl_bearer_policy);
	if (err)
		return err;

	if (!attrs[TIPC_NLA_BEARER_NAME])
		return -EINVAL;
	name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);

	rep = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
	if (!rep)
		return -ENOMEM;

	msg.skb = rep;
	msg.portid = info->snd_portid;
	msg.seq = info->snd_seq;

	rtnl_lock();
	bearer = tipc_bearer_find(name);
	if (!bearer) {
		err = -EINVAL;
		goto err_out;
	}

	err = __tipc_nl_add_bearer(&msg, bearer);
	if (err)
		goto err_out;
	rtnl_unlock();

	return genlmsg_reply(rep, info);
err_out:
	rtnl_unlock();
	nlmsg_free(rep);

	return err;
}

769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
int tipc_nl_bearer_disable(struct sk_buff *skb, struct genl_info *info)
{
	int err;
	char *name;
	struct tipc_bearer *bearer;
	struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];

	if (!info->attrs[TIPC_NLA_BEARER])
		return -EINVAL;

	err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
			       info->attrs[TIPC_NLA_BEARER],
			       tipc_nl_bearer_policy);
	if (err)
		return err;

	if (!attrs[TIPC_NLA_BEARER_NAME])
		return -EINVAL;

	name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);

	rtnl_lock();
	bearer = tipc_bearer_find(name);
	if (!bearer) {
		rtnl_unlock();
		return -EINVAL;
	}

	bearer_disable(bearer, false);
	rtnl_unlock();

	return 0;
}

int tipc_nl_bearer_enable(struct sk_buff *skb, struct genl_info *info)
{
805
	struct net *net = genl_info_net(info);
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
	int err;
	char *bearer;
	struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
	u32 domain;
	u32 prio;

	prio = TIPC_MEDIA_LINK_PRI;
	domain = tipc_own_addr & TIPC_CLUSTER_MASK;

	if (!info->attrs[TIPC_NLA_BEARER])
		return -EINVAL;

	err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
			       info->attrs[TIPC_NLA_BEARER],
			       tipc_nl_bearer_policy);
	if (err)
		return err;

	if (!attrs[TIPC_NLA_BEARER_NAME])
		return -EINVAL;

	bearer = nla_data(attrs[TIPC_NLA_BEARER_NAME]);

	if (attrs[TIPC_NLA_BEARER_DOMAIN])
		domain = nla_get_u32(attrs[TIPC_NLA_BEARER_DOMAIN]);

	if (attrs[TIPC_NLA_BEARER_PROP]) {
		struct nlattr *props[TIPC_NLA_PROP_MAX + 1];

		err = tipc_nl_parse_link_prop(attrs[TIPC_NLA_BEARER_PROP],
					      props);
		if (err)
			return err;

		if (props[TIPC_NLA_PROP_PRIO])
			prio = nla_get_u32(props[TIPC_NLA_PROP_PRIO]);
	}

	rtnl_lock();
845
	err = tipc_enable_bearer(net, bearer, domain, prio);
846
847
848
849
850
851
852
853
	if (err) {
		rtnl_unlock();
		return err;
	}
	rtnl_unlock();

	return 0;
}
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902

int tipc_nl_bearer_set(struct sk_buff *skb, struct genl_info *info)
{
	int err;
	char *name;
	struct tipc_bearer *b;
	struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];

	if (!info->attrs[TIPC_NLA_BEARER])
		return -EINVAL;

	err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
			       info->attrs[TIPC_NLA_BEARER],
			       tipc_nl_bearer_policy);
	if (err)
		return err;

	if (!attrs[TIPC_NLA_BEARER_NAME])
		return -EINVAL;
	name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);

	rtnl_lock();
	b = tipc_bearer_find(name);
	if (!b) {
		rtnl_unlock();
		return -EINVAL;
	}

	if (attrs[TIPC_NLA_BEARER_PROP]) {
		struct nlattr *props[TIPC_NLA_PROP_MAX + 1];

		err = tipc_nl_parse_link_prop(attrs[TIPC_NLA_BEARER_PROP],
					      props);
		if (err) {
			rtnl_unlock();
			return err;
		}

		if (props[TIPC_NLA_PROP_TOL])
			b->tolerance = nla_get_u32(props[TIPC_NLA_PROP_TOL]);
		if (props[TIPC_NLA_PROP_PRIO])
			b->priority = nla_get_u32(props[TIPC_NLA_PROP_PRIO]);
		if (props[TIPC_NLA_PROP_WIN])
			b->window = nla_get_u32(props[TIPC_NLA_PROP_WIN]);
	}
	rtnl_unlock();

	return 0;
}
903

904
905
static int __tipc_nl_add_media(struct tipc_nl_msg *msg,
			       struct tipc_media *media)
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
{
	void *hdr;
	struct nlattr *attrs;
	struct nlattr *prop;

	hdr = genlmsg_put(msg->skb, msg->portid, msg->seq, &tipc_genl_v2_family,
			  NLM_F_MULTI, TIPC_NL_MEDIA_GET);
	if (!hdr)
		return -EMSGSIZE;

	attrs = nla_nest_start(msg->skb, TIPC_NLA_MEDIA);
	if (!attrs)
		goto msg_full;

	if (nla_put_string(msg->skb, TIPC_NLA_MEDIA_NAME, media->name))
		goto attr_msg_full;

	prop = nla_nest_start(msg->skb, TIPC_NLA_MEDIA_PROP);
	if (!prop)
		goto prop_msg_full;
	if (nla_put_u32(msg->skb, TIPC_NLA_PROP_PRIO, media->priority))
		goto prop_msg_full;
	if (nla_put_u32(msg->skb, TIPC_NLA_PROP_TOL, media->tolerance))
		goto prop_msg_full;
	if (nla_put_u32(msg->skb, TIPC_NLA_PROP_WIN, media->window))
		goto prop_msg_full;

	nla_nest_end(msg->skb, prop);
	nla_nest_end(msg->skb, attrs);
	genlmsg_end(msg->skb, hdr);

	return 0;

prop_msg_full:
	nla_nest_cancel(msg->skb, prop);
attr_msg_full:
	nla_nest_cancel(msg->skb, attrs);
msg_full:
	genlmsg_cancel(msg->skb, hdr);

	return -EMSGSIZE;
}

int tipc_nl_media_dump(struct sk_buff *skb, struct netlink_callback *cb)
{
	int err;
	int i = cb->args[0];
	struct tipc_nl_msg msg;

	if (i == MAX_MEDIA)
		return 0;

	msg.skb = skb;
	msg.portid = NETLINK_CB(cb->skb).portid;
	msg.seq = cb->nlh->nlmsg_seq;

	rtnl_lock();
	for (; media_info_array[i] != NULL; i++) {
		err = __tipc_nl_add_media(&msg, media_info_array[i]);
		if (err)
			break;
	}
	rtnl_unlock();

	cb->args[0] = i;
	return skb->len;
}

int tipc_nl_media_get(struct sk_buff *skb, struct genl_info *info)
{
	int err;
	char *name;
	struct tipc_nl_msg msg;
	struct tipc_media *media;
	struct sk_buff *rep;
	struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];

	if (!info->attrs[TIPC_NLA_MEDIA])
		return -EINVAL;

	err = nla_parse_nested(attrs, TIPC_NLA_MEDIA_MAX,
			       info->attrs[TIPC_NLA_MEDIA],
			       tipc_nl_media_policy);
	if (err)
		return err;

	if (!attrs[TIPC_NLA_MEDIA_NAME])
		return -EINVAL;
	name = nla_data(attrs[TIPC_NLA_MEDIA_NAME]);

	rep = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
	if (!rep)
		return -ENOMEM;

	msg.skb = rep;
	msg.portid = info->snd_portid;
	msg.seq = info->snd_seq;

	rtnl_lock();
	media = tipc_media_find(name);
	if (!media) {
		err = -EINVAL;
		goto err_out;
	}

	err = __tipc_nl_add_media(&msg, media);
	if (err)
		goto err_out;
	rtnl_unlock();

	return genlmsg_reply(rep, info);
err_out:
	rtnl_unlock();
	nlmsg_free(rep);

	return err;
}
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
1066
1067
1068
1069

int tipc_nl_media_set(struct sk_buff *skb, struct genl_info *info)
{
	int err;
	char *name;
	struct tipc_media *m;
	struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];

	if (!info->attrs[TIPC_NLA_MEDIA])
		return -EINVAL;

	err = nla_parse_nested(attrs, TIPC_NLA_MEDIA_MAX,
			       info->attrs[TIPC_NLA_MEDIA],
			       tipc_nl_media_policy);

	if (!attrs[TIPC_NLA_MEDIA_NAME])
		return -EINVAL;
	name = nla_data(attrs[TIPC_NLA_MEDIA_NAME]);

	rtnl_lock();
	m = tipc_media_find(name);
	if (!m) {
		rtnl_unlock();
		return -EINVAL;
	}

	if (attrs[TIPC_NLA_MEDIA_PROP]) {
		struct nlattr *props[TIPC_NLA_PROP_MAX + 1];

		err = tipc_nl_parse_link_prop(attrs[TIPC_NLA_MEDIA_PROP],
					      props);
		if (err) {
			rtnl_unlock();
			return err;
		}

		if (props[TIPC_NLA_PROP_TOL])
			m->tolerance = nla_get_u32(props[TIPC_NLA_PROP_TOL]);
		if (props[TIPC_NLA_PROP_PRIO])
			m->priority = nla_get_u32(props[TIPC_NLA_PROP_PRIO]);
		if (props[TIPC_NLA_PROP_WIN])
			m->window = nla_get_u32(props[TIPC_NLA_PROP_WIN]);
	}
	rtnl_unlock();

	return 0;
}