| 1 | /* |
| 2 | * net/tipc/config.c: TIPC configuration management code |
| 3 | * |
| 4 | * Copyright (c) 2002-2006, Ericsson AB |
| 5 | * Copyright (c) 2004-2007, 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 "core.h" |
| 38 | #include "socket.h" |
| 39 | #include "name_table.h" |
| 40 | #include "config.h" |
| 41 | #include "server.h" |
| 42 | |
| 43 | #define REPLY_TRUNCATED "<truncated>\n" |
| 44 | |
| 45 | static const void *req_tlv_area; /* request message TLV area */ |
| 46 | static int req_tlv_space; /* request message TLV area size */ |
| 47 | static int rep_headroom; /* reply message headroom to use */ |
| 48 | |
| 49 | struct sk_buff *tipc_cfg_reply_alloc(int payload_size) |
| 50 | { |
| 51 | struct sk_buff *buf; |
| 52 | |
| 53 | buf = alloc_skb(rep_headroom + payload_size, GFP_ATOMIC); |
| 54 | if (buf) |
| 55 | skb_reserve(buf, rep_headroom); |
| 56 | return buf; |
| 57 | } |
| 58 | |
| 59 | int tipc_cfg_append_tlv(struct sk_buff *buf, int tlv_type, |
| 60 | void *tlv_data, int tlv_data_size) |
| 61 | { |
| 62 | struct tlv_desc *tlv = (struct tlv_desc *)skb_tail_pointer(buf); |
| 63 | int new_tlv_space = TLV_SPACE(tlv_data_size); |
| 64 | |
| 65 | if (skb_tailroom(buf) < new_tlv_space) |
| 66 | return 0; |
| 67 | skb_put(buf, new_tlv_space); |
| 68 | tlv->tlv_type = htons(tlv_type); |
| 69 | tlv->tlv_len = htons(TLV_LENGTH(tlv_data_size)); |
| 70 | if (tlv_data_size && tlv_data) |
| 71 | memcpy(TLV_DATA(tlv), tlv_data, tlv_data_size); |
| 72 | return 1; |
| 73 | } |
| 74 | |
| 75 | static struct sk_buff *tipc_cfg_reply_unsigned_type(u16 tlv_type, u32 value) |
| 76 | { |
| 77 | struct sk_buff *buf; |
| 78 | __be32 value_net; |
| 79 | |
| 80 | buf = tipc_cfg_reply_alloc(TLV_SPACE(sizeof(value))); |
| 81 | if (buf) { |
| 82 | value_net = htonl(value); |
| 83 | tipc_cfg_append_tlv(buf, tlv_type, &value_net, |
| 84 | sizeof(value_net)); |
| 85 | } |
| 86 | return buf; |
| 87 | } |
| 88 | |
| 89 | static struct sk_buff *tipc_cfg_reply_unsigned(u32 value) |
| 90 | { |
| 91 | return tipc_cfg_reply_unsigned_type(TIPC_TLV_UNSIGNED, value); |
| 92 | } |
| 93 | |
| 94 | struct sk_buff *tipc_cfg_reply_string_type(u16 tlv_type, char *string) |
| 95 | { |
| 96 | struct sk_buff *buf; |
| 97 | int string_len = strlen(string) + 1; |
| 98 | |
| 99 | buf = tipc_cfg_reply_alloc(TLV_SPACE(string_len)); |
| 100 | if (buf) |
| 101 | tipc_cfg_append_tlv(buf, tlv_type, string, string_len); |
| 102 | return buf; |
| 103 | } |
| 104 | |
| 105 | static struct sk_buff *tipc_show_stats(void) |
| 106 | { |
| 107 | struct sk_buff *buf; |
| 108 | struct tlv_desc *rep_tlv; |
| 109 | char *pb; |
| 110 | int pb_len; |
| 111 | int str_len; |
| 112 | u32 value; |
| 113 | |
| 114 | if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED)) |
| 115 | return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR); |
| 116 | |
| 117 | value = ntohl(*(u32 *)TLV_DATA(req_tlv_area)); |
| 118 | if (value != 0) |
| 119 | return tipc_cfg_reply_error_string("unsupported argument"); |
| 120 | |
| 121 | buf = tipc_cfg_reply_alloc(TLV_SPACE(ULTRA_STRING_MAX_LEN)); |
| 122 | if (buf == NULL) |
| 123 | return NULL; |
| 124 | |
| 125 | rep_tlv = (struct tlv_desc *)buf->data; |
| 126 | pb = TLV_DATA(rep_tlv); |
| 127 | pb_len = ULTRA_STRING_MAX_LEN; |
| 128 | |
| 129 | str_len = tipc_snprintf(pb, pb_len, "TIPC version " TIPC_MOD_VER "\n"); |
| 130 | str_len += 1; /* for "\0" */ |
| 131 | skb_put(buf, TLV_SPACE(str_len)); |
| 132 | TLV_SET(rep_tlv, TIPC_TLV_ULTRA_STRING, NULL, str_len); |
| 133 | |
| 134 | return buf; |
| 135 | } |
| 136 | |
| 137 | static struct sk_buff *cfg_enable_bearer(struct net *net) |
| 138 | { |
| 139 | struct tipc_bearer_config *args; |
| 140 | |
| 141 | if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_BEARER_CONFIG)) |
| 142 | return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR); |
| 143 | |
| 144 | args = (struct tipc_bearer_config *)TLV_DATA(req_tlv_area); |
| 145 | if (tipc_enable_bearer(net, args->name, |
| 146 | ntohl(args->disc_domain), |
| 147 | ntohl(args->priority))) |
| 148 | return tipc_cfg_reply_error_string("unable to enable bearer"); |
| 149 | |
| 150 | return tipc_cfg_reply_none(); |
| 151 | } |
| 152 | |
| 153 | static struct sk_buff *cfg_disable_bearer(struct net *net) |
| 154 | { |
| 155 | if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_BEARER_NAME)) |
| 156 | return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR); |
| 157 | |
| 158 | if (tipc_disable_bearer(net, (char *)TLV_DATA(req_tlv_area))) |
| 159 | return tipc_cfg_reply_error_string("unable to disable bearer"); |
| 160 | |
| 161 | return tipc_cfg_reply_none(); |
| 162 | } |
| 163 | |
| 164 | static struct sk_buff *cfg_set_own_addr(struct net *net) |
| 165 | { |
| 166 | u32 addr; |
| 167 | |
| 168 | if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_NET_ADDR)) |
| 169 | return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR); |
| 170 | |
| 171 | addr = ntohl(*(__be32 *)TLV_DATA(req_tlv_area)); |
| 172 | if (addr == tipc_own_addr) |
| 173 | return tipc_cfg_reply_none(); |
| 174 | if (!tipc_addr_node_valid(addr)) |
| 175 | return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE |
| 176 | " (node address)"); |
| 177 | if (tipc_own_addr) |
| 178 | return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED |
| 179 | " (cannot change node address once assigned)"); |
| 180 | if (!tipc_net_start(net, addr)) |
| 181 | return tipc_cfg_reply_none(); |
| 182 | |
| 183 | return tipc_cfg_reply_error_string("cannot change to network mode"); |
| 184 | } |
| 185 | |
| 186 | static struct sk_buff *cfg_set_netid(struct net *net) |
| 187 | { |
| 188 | struct tipc_net *tn = net_generic(net, tipc_net_id); |
| 189 | u32 value; |
| 190 | |
| 191 | if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED)) |
| 192 | return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR); |
| 193 | value = ntohl(*(__be32 *)TLV_DATA(req_tlv_area)); |
| 194 | if (value == tn->net_id) |
| 195 | return tipc_cfg_reply_none(); |
| 196 | if (value < 1 || value > 9999) |
| 197 | return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE |
| 198 | " (network id must be 1-9999)"); |
| 199 | if (tipc_own_addr) |
| 200 | return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED |
| 201 | " (cannot change network id once TIPC has joined a network)"); |
| 202 | tn->net_id = value; |
| 203 | return tipc_cfg_reply_none(); |
| 204 | } |
| 205 | |
| 206 | struct sk_buff *tipc_cfg_do_cmd(struct net *net, u32 orig_node, u16 cmd, |
| 207 | const void *request_area, int request_space, |
| 208 | int reply_headroom) |
| 209 | { |
| 210 | struct sk_buff *rep_tlv_buf; |
| 211 | struct tipc_net *tn = net_generic(net, tipc_net_id); |
| 212 | |
| 213 | rtnl_lock(); |
| 214 | |
| 215 | /* Save request and reply details in a well-known location */ |
| 216 | req_tlv_area = request_area; |
| 217 | req_tlv_space = request_space; |
| 218 | rep_headroom = reply_headroom; |
| 219 | |
| 220 | /* Check command authorization */ |
| 221 | if (likely(in_own_node(orig_node))) { |
| 222 | /* command is permitted */ |
| 223 | } else { |
| 224 | rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED |
| 225 | " (cannot be done remotely)"); |
| 226 | goto exit; |
| 227 | } |
| 228 | |
| 229 | /* Call appropriate processing routine */ |
| 230 | switch (cmd) { |
| 231 | case TIPC_CMD_NOOP: |
| 232 | rep_tlv_buf = tipc_cfg_reply_none(); |
| 233 | break; |
| 234 | case TIPC_CMD_GET_NODES: |
| 235 | rep_tlv_buf = tipc_node_get_nodes(net, req_tlv_area, |
| 236 | req_tlv_space); |
| 237 | break; |
| 238 | case TIPC_CMD_GET_LINKS: |
| 239 | rep_tlv_buf = tipc_node_get_links(net, req_tlv_area, |
| 240 | req_tlv_space); |
| 241 | break; |
| 242 | case TIPC_CMD_SHOW_LINK_STATS: |
| 243 | rep_tlv_buf = tipc_link_cmd_show_stats(net, req_tlv_area, |
| 244 | req_tlv_space); |
| 245 | break; |
| 246 | case TIPC_CMD_RESET_LINK_STATS: |
| 247 | rep_tlv_buf = tipc_link_cmd_reset_stats(net, req_tlv_area, |
| 248 | req_tlv_space); |
| 249 | break; |
| 250 | case TIPC_CMD_SHOW_NAME_TABLE: |
| 251 | rep_tlv_buf = tipc_nametbl_get(net, req_tlv_area, |
| 252 | req_tlv_space); |
| 253 | break; |
| 254 | case TIPC_CMD_GET_BEARER_NAMES: |
| 255 | rep_tlv_buf = tipc_bearer_get_names(net); |
| 256 | break; |
| 257 | case TIPC_CMD_GET_MEDIA_NAMES: |
| 258 | rep_tlv_buf = tipc_media_get_names(); |
| 259 | break; |
| 260 | case TIPC_CMD_SHOW_PORTS: |
| 261 | rep_tlv_buf = tipc_sk_socks_show(net); |
| 262 | break; |
| 263 | case TIPC_CMD_SHOW_STATS: |
| 264 | rep_tlv_buf = tipc_show_stats(); |
| 265 | break; |
| 266 | case TIPC_CMD_SET_LINK_TOL: |
| 267 | case TIPC_CMD_SET_LINK_PRI: |
| 268 | case TIPC_CMD_SET_LINK_WINDOW: |
| 269 | rep_tlv_buf = tipc_link_cmd_config(net, req_tlv_area, |
| 270 | req_tlv_space, cmd); |
| 271 | break; |
| 272 | case TIPC_CMD_ENABLE_BEARER: |
| 273 | rep_tlv_buf = cfg_enable_bearer(net); |
| 274 | break; |
| 275 | case TIPC_CMD_DISABLE_BEARER: |
| 276 | rep_tlv_buf = cfg_disable_bearer(net); |
| 277 | break; |
| 278 | case TIPC_CMD_SET_NODE_ADDR: |
| 279 | rep_tlv_buf = cfg_set_own_addr(net); |
| 280 | break; |
| 281 | case TIPC_CMD_SET_NETID: |
| 282 | rep_tlv_buf = cfg_set_netid(net); |
| 283 | break; |
| 284 | case TIPC_CMD_GET_NETID: |
| 285 | rep_tlv_buf = tipc_cfg_reply_unsigned(tn->net_id); |
| 286 | break; |
| 287 | case TIPC_CMD_NOT_NET_ADMIN: |
| 288 | rep_tlv_buf = |
| 289 | tipc_cfg_reply_error_string(TIPC_CFG_NOT_NET_ADMIN); |
| 290 | break; |
| 291 | case TIPC_CMD_SET_MAX_ZONES: |
| 292 | case TIPC_CMD_GET_MAX_ZONES: |
| 293 | case TIPC_CMD_SET_MAX_SLAVES: |
| 294 | case TIPC_CMD_GET_MAX_SLAVES: |
| 295 | case TIPC_CMD_SET_MAX_CLUSTERS: |
| 296 | case TIPC_CMD_GET_MAX_CLUSTERS: |
| 297 | case TIPC_CMD_SET_MAX_NODES: |
| 298 | case TIPC_CMD_GET_MAX_NODES: |
| 299 | case TIPC_CMD_SET_MAX_SUBSCR: |
| 300 | case TIPC_CMD_GET_MAX_SUBSCR: |
| 301 | case TIPC_CMD_SET_MAX_PUBL: |
| 302 | case TIPC_CMD_GET_MAX_PUBL: |
| 303 | case TIPC_CMD_SET_LOG_SIZE: |
| 304 | case TIPC_CMD_SET_REMOTE_MNG: |
| 305 | case TIPC_CMD_GET_REMOTE_MNG: |
| 306 | case TIPC_CMD_DUMP_LOG: |
| 307 | case TIPC_CMD_SET_MAX_PORTS: |
| 308 | case TIPC_CMD_GET_MAX_PORTS: |
| 309 | rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED |
| 310 | " (obsolete command)"); |
| 311 | break; |
| 312 | default: |
| 313 | rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED |
| 314 | " (unknown command)"); |
| 315 | break; |
| 316 | } |
| 317 | |
| 318 | WARN_ON(rep_tlv_buf->len > TLV_SPACE(ULTRA_STRING_MAX_LEN)); |
| 319 | |
| 320 | /* Append an error message if we cannot return all requested data */ |
| 321 | if (rep_tlv_buf->len == TLV_SPACE(ULTRA_STRING_MAX_LEN)) { |
| 322 | if (*(rep_tlv_buf->data + ULTRA_STRING_MAX_LEN) != '\0') |
| 323 | sprintf(rep_tlv_buf->data + rep_tlv_buf->len - |
| 324 | sizeof(REPLY_TRUNCATED) - 1, REPLY_TRUNCATED); |
| 325 | } |
| 326 | |
| 327 | /* Return reply buffer */ |
| 328 | exit: |
| 329 | rtnl_unlock(); |
| 330 | return rep_tlv_buf; |
| 331 | } |