xref: /openbmc/linux/net/tipc/net.c (revision f8bcb061)
1 /*
2  * net/tipc/net.c: TIPC network routing code
3  *
4  * Copyright (c) 1995-2006, 2014, Ericsson AB
5  * Copyright (c) 2005, 2010-2011, 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 "core.h"
38 #include "net.h"
39 #include "name_distr.h"
40 #include "subscr.h"
41 #include "socket.h"
42 #include "node.h"
43 #include "bcast.h"
44 #include "netlink.h"
45 #include "monitor.h"
46 
47 /*
48  * The TIPC locking policy is designed to ensure a very fine locking
49  * granularity, permitting complete parallel access to individual
50  * port and node/link instances. The code consists of four major
51  * locking domains, each protected with their own disjunct set of locks.
52  *
53  * 1: The bearer level.
54  *    RTNL lock is used to serialize the process of configuring bearer
55  *    on update side, and RCU lock is applied on read side to make
56  *    bearer instance valid on both paths of message transmission and
57  *    reception.
58  *
59  * 2: The node and link level.
60  *    All node instances are saved into two tipc_node_list and node_htable
61  *    lists. The two lists are protected by node_list_lock on write side,
62  *    and they are guarded with RCU lock on read side. Especially node
63  *    instance is destroyed only when TIPC module is removed, and we can
64  *    confirm that there has no any user who is accessing the node at the
65  *    moment. Therefore, Except for iterating the two lists within RCU
66  *    protection, it's no needed to hold RCU that we access node instance
67  *    in other places.
68  *
69  *    In addition, all members in node structure including link instances
70  *    are protected by node spin lock.
71  *
72  * 3: The transport level of the protocol.
73  *    This consists of the structures port, (and its user level
74  *    representations, such as user_port and tipc_sock), reference and
75  *    tipc_user (port.c, reg.c, socket.c).
76  *
77  *    This layer has four different locks:
78  *     - The tipc_port spin_lock. This is protecting each port instance
79  *       from parallel data access and removal. Since we can not place
80  *       this lock in the port itself, it has been placed in the
81  *       corresponding reference table entry, which has the same life
82  *       cycle as the module. This entry is difficult to access from
83  *       outside the TIPC core, however, so a pointer to the lock has
84  *       been added in the port instance, -to be used for unlocking
85  *       only.
86  *     - A read/write lock to protect the reference table itself (teg.c).
87  *       (Nobody is using read-only access to this, so it can just as
88  *       well be changed to a spin_lock)
89  *     - A spin lock to protect the registry of kernel/driver users (reg.c)
90  *     - A global spin_lock (tipc_port_lock), which only task is to ensure
91  *       consistency where more than one port is involved in an operation,
92  *       i.e., when a port is part of a linked list of ports.
93  *       There are two such lists; 'port_list', which is used for management,
94  *       and 'wait_list', which is used to queue ports during congestion.
95  *
96  *  4: The name table (name_table.c, name_distr.c, subscription.c)
97  *     - There is one big read/write-lock (tipc_nametbl_lock) protecting the
98  *       overall name table structure. Nothing must be added/removed to
99  *       this structure without holding write access to it.
100  *     - There is one local spin_lock per sub_sequence, which can be seen
101  *       as a sub-domain to the tipc_nametbl_lock domain. It is used only
102  *       for translation operations, and is needed because a translation
103  *       steps the root of the 'publication' linked list between each lookup.
104  *       This is always used within the scope of a tipc_nametbl_lock(read).
105  *     - A local spin_lock protecting the queue of subscriber events.
106 */
107 
108 static void tipc_net_finalize(struct net *net, u32 addr);
109 
110 int tipc_net_init(struct net *net, u8 *node_id, u32 addr)
111 {
112 	if (tipc_own_id(net)) {
113 		pr_info("Cannot configure node identity twice\n");
114 		return -1;
115 	}
116 	pr_info("Started in network mode\n");
117 
118 	if (node_id)
119 		tipc_set_node_id(net, node_id);
120 	if (addr)
121 		tipc_net_finalize(net, addr);
122 	return 0;
123 }
124 
125 static void tipc_net_finalize(struct net *net, u32 addr)
126 {
127 	struct tipc_net *tn = tipc_net(net);
128 	struct tipc_socket_addr sk = {0, addr};
129 	struct tipc_uaddr ua;
130 
131 	tipc_uaddr(&ua, TIPC_SERVICE_RANGE, TIPC_CLUSTER_SCOPE,
132 		   TIPC_NODE_STATE, addr, addr);
133 
134 	if (cmpxchg(&tn->node_addr, 0, addr))
135 		return;
136 	tipc_set_node_addr(net, addr);
137 	tipc_named_reinit(net);
138 	tipc_sk_reinit(net);
139 	tipc_mon_reinit_self(net);
140 	tipc_nametbl_publish(net, &ua, &sk, addr);
141 }
142 
143 void tipc_net_finalize_work(struct work_struct *work)
144 {
145 	struct tipc_net_work *fwork;
146 
147 	fwork = container_of(work, struct tipc_net_work, work);
148 	tipc_net_finalize(fwork->net, fwork->addr);
149 }
150 
151 void tipc_sched_net_finalize(struct net *net, u32 addr)
152 {
153 	struct tipc_net *tn = tipc_net(net);
154 
155 	tn->final_work.net = net;
156 	tn->final_work.addr = addr;
157 	schedule_work(&tn->final_work.work);
158 }
159 
160 void tipc_net_stop(struct net *net)
161 {
162 	if (!tipc_own_id(net))
163 		return;
164 
165 	rtnl_lock();
166 	tipc_bearer_stop(net);
167 	tipc_node_stop(net);
168 	rtnl_unlock();
169 
170 	pr_info("Left network mode\n");
171 }
172 
173 static int __tipc_nl_add_net(struct net *net, struct tipc_nl_msg *msg)
174 {
175 	struct tipc_net *tn = net_generic(net, tipc_net_id);
176 	u64 *w0 = (u64 *)&tn->node_id[0];
177 	u64 *w1 = (u64 *)&tn->node_id[8];
178 	struct nlattr *attrs;
179 	void *hdr;
180 
181 	hdr = genlmsg_put(msg->skb, msg->portid, msg->seq, &tipc_genl_family,
182 			  NLM_F_MULTI, TIPC_NL_NET_GET);
183 	if (!hdr)
184 		return -EMSGSIZE;
185 
186 	attrs = nla_nest_start_noflag(msg->skb, TIPC_NLA_NET);
187 	if (!attrs)
188 		goto msg_full;
189 
190 	if (nla_put_u32(msg->skb, TIPC_NLA_NET_ID, tn->net_id))
191 		goto attr_msg_full;
192 	if (nla_put_u64_64bit(msg->skb, TIPC_NLA_NET_NODEID, *w0, 0))
193 		goto attr_msg_full;
194 	if (nla_put_u64_64bit(msg->skb, TIPC_NLA_NET_NODEID_W1, *w1, 0))
195 		goto attr_msg_full;
196 	nla_nest_end(msg->skb, attrs);
197 	genlmsg_end(msg->skb, hdr);
198 
199 	return 0;
200 
201 attr_msg_full:
202 	nla_nest_cancel(msg->skb, attrs);
203 msg_full:
204 	genlmsg_cancel(msg->skb, hdr);
205 
206 	return -EMSGSIZE;
207 }
208 
209 int tipc_nl_net_dump(struct sk_buff *skb, struct netlink_callback *cb)
210 {
211 	struct net *net = sock_net(skb->sk);
212 	int err;
213 	int done = cb->args[0];
214 	struct tipc_nl_msg msg;
215 
216 	if (done)
217 		return 0;
218 
219 	msg.skb = skb;
220 	msg.portid = NETLINK_CB(cb->skb).portid;
221 	msg.seq = cb->nlh->nlmsg_seq;
222 
223 	err = __tipc_nl_add_net(net, &msg);
224 	if (err)
225 		goto out;
226 
227 	done = 1;
228 out:
229 	cb->args[0] = done;
230 
231 	return skb->len;
232 }
233 
234 int __tipc_nl_net_set(struct sk_buff *skb, struct genl_info *info)
235 {
236 	struct nlattr *attrs[TIPC_NLA_NET_MAX + 1];
237 	struct net *net = sock_net(skb->sk);
238 	struct tipc_net *tn = tipc_net(net);
239 	int err;
240 
241 	if (!info->attrs[TIPC_NLA_NET])
242 		return -EINVAL;
243 
244 	err = nla_parse_nested_deprecated(attrs, TIPC_NLA_NET_MAX,
245 					  info->attrs[TIPC_NLA_NET],
246 					  tipc_nl_net_policy, info->extack);
247 
248 	if (err)
249 		return err;
250 
251 	/* Can't change net id once TIPC has joined a network */
252 	if (tipc_own_addr(net))
253 		return -EPERM;
254 
255 	if (attrs[TIPC_NLA_NET_ID]) {
256 		u32 val;
257 
258 		val = nla_get_u32(attrs[TIPC_NLA_NET_ID]);
259 		if (val < 1 || val > 9999)
260 			return -EINVAL;
261 
262 		tn->net_id = val;
263 	}
264 
265 	if (attrs[TIPC_NLA_NET_ADDR]) {
266 		u32 addr;
267 
268 		addr = nla_get_u32(attrs[TIPC_NLA_NET_ADDR]);
269 		if (!addr)
270 			return -EINVAL;
271 		tn->legacy_addr_format = true;
272 		tipc_net_init(net, NULL, addr);
273 	}
274 
275 	if (attrs[TIPC_NLA_NET_NODEID]) {
276 		u8 node_id[NODE_ID_LEN];
277 		u64 *w0 = (u64 *)&node_id[0];
278 		u64 *w1 = (u64 *)&node_id[8];
279 
280 		if (!attrs[TIPC_NLA_NET_NODEID_W1])
281 			return -EINVAL;
282 		*w0 = nla_get_u64(attrs[TIPC_NLA_NET_NODEID]);
283 		*w1 = nla_get_u64(attrs[TIPC_NLA_NET_NODEID_W1]);
284 		tipc_net_init(net, node_id, 0);
285 	}
286 	return 0;
287 }
288 
289 int tipc_nl_net_set(struct sk_buff *skb, struct genl_info *info)
290 {
291 	int err;
292 
293 	rtnl_lock();
294 	err = __tipc_nl_net_set(skb, info);
295 	rtnl_unlock();
296 
297 	return err;
298 }
299 
300 static int __tipc_nl_addr_legacy_get(struct net *net, struct tipc_nl_msg *msg)
301 {
302 	struct tipc_net *tn = tipc_net(net);
303 	struct nlattr *attrs;
304 	void *hdr;
305 
306 	hdr = genlmsg_put(msg->skb, msg->portid, msg->seq, &tipc_genl_family,
307 			  0, TIPC_NL_ADDR_LEGACY_GET);
308 	if (!hdr)
309 		return -EMSGSIZE;
310 
311 	attrs = nla_nest_start(msg->skb, TIPC_NLA_NET);
312 	if (!attrs)
313 		goto msg_full;
314 
315 	if (tn->legacy_addr_format)
316 		if (nla_put_flag(msg->skb, TIPC_NLA_NET_ADDR_LEGACY))
317 			goto attr_msg_full;
318 
319 	nla_nest_end(msg->skb, attrs);
320 	genlmsg_end(msg->skb, hdr);
321 
322 	return 0;
323 
324 attr_msg_full:
325 	nla_nest_cancel(msg->skb, attrs);
326 msg_full:
327 	genlmsg_cancel(msg->skb, hdr);
328 
329 	return -EMSGSIZE;
330 }
331 
332 int tipc_nl_net_addr_legacy_get(struct sk_buff *skb, struct genl_info *info)
333 {
334 	struct net *net = sock_net(skb->sk);
335 	struct tipc_nl_msg msg;
336 	struct sk_buff *rep;
337 	int err;
338 
339 	rep = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
340 	if (!rep)
341 		return -ENOMEM;
342 
343 	msg.skb = rep;
344 	msg.portid = info->snd_portid;
345 	msg.seq = info->snd_seq;
346 
347 	err = __tipc_nl_addr_legacy_get(net, &msg);
348 	if (err) {
349 		nlmsg_free(msg.skb);
350 		return err;
351 	}
352 
353 	return genlmsg_reply(msg.skb, info);
354 }
355