net/tipc/net.c

   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 }