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