a7894ff77ae99051bb3bbc99dddf7065c7bf0072
[linux-3.10.git] / net / tipc / config.c
1 /*
2  * net/tipc/config.c: TIPC configuration management code
3  *
4  * Copyright (c) 2002-2006, Ericsson AB
5  * Copyright (c) 2004-2007, 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 "port.h"
39 #include "link.h"
40 #include "name_table.h"
41 #include "config.h"
42
43 static u32 config_port_ref;
44
45 static DEFINE_SPINLOCK(config_lock);
46
47 static const void *req_tlv_area;        /* request message TLV area */
48 static int req_tlv_space;               /* request message TLV area size */
49 static int rep_headroom;                /* reply message headroom to use */
50
51
52 struct sk_buff *tipc_cfg_reply_alloc(int payload_size)
53 {
54         struct sk_buff *buf;
55
56         buf = alloc_skb(rep_headroom + payload_size, GFP_ATOMIC);
57         if (buf)
58                 skb_reserve(buf, rep_headroom);
59         return buf;
60 }
61
62 int tipc_cfg_append_tlv(struct sk_buff *buf, int tlv_type,
63                         void *tlv_data, int tlv_data_size)
64 {
65         struct tlv_desc *tlv = (struct tlv_desc *)skb_tail_pointer(buf);
66         int new_tlv_space = TLV_SPACE(tlv_data_size);
67
68         if (skb_tailroom(buf) < new_tlv_space)
69                 return 0;
70         skb_put(buf, new_tlv_space);
71         tlv->tlv_type = htons(tlv_type);
72         tlv->tlv_len  = htons(TLV_LENGTH(tlv_data_size));
73         if (tlv_data_size && tlv_data)
74                 memcpy(TLV_DATA(tlv), tlv_data, tlv_data_size);
75         return 1;
76 }
77
78 static struct sk_buff *tipc_cfg_reply_unsigned_type(u16 tlv_type, u32 value)
79 {
80         struct sk_buff *buf;
81         __be32 value_net;
82
83         buf = tipc_cfg_reply_alloc(TLV_SPACE(sizeof(value)));
84         if (buf) {
85                 value_net = htonl(value);
86                 tipc_cfg_append_tlv(buf, tlv_type, &value_net,
87                                     sizeof(value_net));
88         }
89         return buf;
90 }
91
92 static struct sk_buff *tipc_cfg_reply_unsigned(u32 value)
93 {
94         return tipc_cfg_reply_unsigned_type(TIPC_TLV_UNSIGNED, value);
95 }
96
97 struct sk_buff *tipc_cfg_reply_string_type(u16 tlv_type, char *string)
98 {
99         struct sk_buff *buf;
100         int string_len = strlen(string) + 1;
101
102         buf = tipc_cfg_reply_alloc(TLV_SPACE(string_len));
103         if (buf)
104                 tipc_cfg_append_tlv(buf, tlv_type, string, string_len);
105         return buf;
106 }
107
108 #define MAX_STATS_INFO 2000
109
110 static struct sk_buff *tipc_show_stats(void)
111 {
112         struct sk_buff *buf;
113         struct tlv_desc *rep_tlv;
114         struct print_buf pb;
115         int str_len;
116         u32 value;
117
118         if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
119                 return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
120
121         value = ntohl(*(u32 *)TLV_DATA(req_tlv_area));
122         if (value != 0)
123                 return tipc_cfg_reply_error_string("unsupported argument");
124
125         buf = tipc_cfg_reply_alloc(TLV_SPACE(MAX_STATS_INFO));
126         if (buf == NULL)
127                 return NULL;
128
129         rep_tlv = (struct tlv_desc *)buf->data;
130         tipc_printbuf_init(&pb, (char *)TLV_DATA(rep_tlv), MAX_STATS_INFO);
131
132         tipc_printf(&pb, "TIPC version " TIPC_MOD_VER "\n");
133
134         /* Use additional tipc_printf()'s to return more info ... */
135
136         str_len = tipc_printbuf_validate(&pb);
137         skb_put(buf, TLV_SPACE(str_len));
138         TLV_SET(rep_tlv, TIPC_TLV_ULTRA_STRING, NULL, str_len);
139
140         return buf;
141 }
142
143 static struct sk_buff *cfg_enable_bearer(void)
144 {
145         struct tipc_bearer_config *args;
146
147         if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_BEARER_CONFIG))
148                 return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
149
150         args = (struct tipc_bearer_config *)TLV_DATA(req_tlv_area);
151         if (tipc_enable_bearer(args->name,
152                                ntohl(args->detect_scope),
153                                ntohl(args->priority)))
154                 return tipc_cfg_reply_error_string("unable to enable bearer");
155
156         return tipc_cfg_reply_none();
157 }
158
159 static struct sk_buff *cfg_disable_bearer(void)
160 {
161         if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_BEARER_NAME))
162                 return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
163
164         if (tipc_disable_bearer((char *)TLV_DATA(req_tlv_area)))
165                 return tipc_cfg_reply_error_string("unable to disable bearer");
166
167         return tipc_cfg_reply_none();
168 }
169
170 static struct sk_buff *cfg_set_own_addr(void)
171 {
172         u32 addr;
173
174         if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_NET_ADDR))
175                 return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
176
177         addr = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
178         if (addr == tipc_own_addr)
179                 return tipc_cfg_reply_none();
180         if (!tipc_addr_node_valid(addr))
181                 return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
182                                                    " (node address)");
183         if (tipc_mode == TIPC_NET_MODE)
184                 return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
185                                                    " (cannot change node address once assigned)");
186
187         /*
188          * Must release all spinlocks before calling start_net() because
189          * Linux version of TIPC calls eth_media_start() which calls
190          * register_netdevice_notifier() which may block!
191          *
192          * Temporarily releasing the lock should be harmless for non-Linux TIPC,
193          * but Linux version of eth_media_start() should really be reworked
194          * so that it can be called with spinlocks held.
195          */
196
197         spin_unlock_bh(&config_lock);
198         tipc_core_start_net(addr);
199         spin_lock_bh(&config_lock);
200         return tipc_cfg_reply_none();
201 }
202
203 static struct sk_buff *cfg_set_remote_mng(void)
204 {
205         u32 value;
206
207         if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
208                 return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
209
210         value = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
211         tipc_remote_management = (value != 0);
212         return tipc_cfg_reply_none();
213 }
214
215 static struct sk_buff *cfg_set_max_publications(void)
216 {
217         u32 value;
218
219         if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
220                 return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
221
222         value = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
223         if (value != delimit(value, 1, 65535))
224                 return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
225                                                    " (max publications must be 1-65535)");
226         tipc_max_publications = value;
227         return tipc_cfg_reply_none();
228 }
229
230 static struct sk_buff *cfg_set_max_subscriptions(void)
231 {
232         u32 value;
233
234         if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
235                 return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
236
237         value = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
238         if (value != delimit(value, 1, 65535))
239                 return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
240                                                    " (max subscriptions must be 1-65535");
241         tipc_max_subscriptions = value;
242         return tipc_cfg_reply_none();
243 }
244
245 static struct sk_buff *cfg_set_max_ports(void)
246 {
247         u32 value;
248
249         if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
250                 return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
251         value = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
252         if (value == tipc_max_ports)
253                 return tipc_cfg_reply_none();
254         if (value != delimit(value, 127, 65535))
255                 return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
256                                                    " (max ports must be 127-65535)");
257         if (tipc_mode != TIPC_NOT_RUNNING)
258                 return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
259                         " (cannot change max ports while TIPC is active)");
260         tipc_max_ports = value;
261         return tipc_cfg_reply_none();
262 }
263
264 static struct sk_buff *cfg_set_max_nodes(void)
265 {
266         u32 value;
267
268         if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
269                 return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
270         value = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
271         if (value == tipc_max_nodes)
272                 return tipc_cfg_reply_none();
273         if (value != delimit(value, 8, 2047))
274                 return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
275                                                    " (max nodes must be 8-2047)");
276         if (tipc_mode == TIPC_NET_MODE)
277                 return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
278                         " (cannot change max nodes once TIPC has joined a network)");
279         tipc_max_nodes = value;
280         return tipc_cfg_reply_none();
281 }
282
283 static struct sk_buff *cfg_set_netid(void)
284 {
285         u32 value;
286
287         if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
288                 return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
289         value = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
290         if (value == tipc_net_id)
291                 return tipc_cfg_reply_none();
292         if (value != delimit(value, 1, 9999))
293                 return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
294                                                    " (network id must be 1-9999)");
295         if (tipc_mode == TIPC_NET_MODE)
296                 return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
297                         " (cannot change network id once TIPC has joined a network)");
298         tipc_net_id = value;
299         return tipc_cfg_reply_none();
300 }
301
302 struct sk_buff *tipc_cfg_do_cmd(u32 orig_node, u16 cmd, const void *request_area,
303                                 int request_space, int reply_headroom)
304 {
305         struct sk_buff *rep_tlv_buf;
306
307         spin_lock_bh(&config_lock);
308
309         /* Save request and reply details in a well-known location */
310
311         req_tlv_area = request_area;
312         req_tlv_space = request_space;
313         rep_headroom = reply_headroom;
314
315         /* Check command authorization */
316
317         if (likely(orig_node == tipc_own_addr)) {
318                 /* command is permitted */
319         } else if (cmd >= 0x8000) {
320                 rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
321                                                           " (cannot be done remotely)");
322                 goto exit;
323         } else if (!tipc_remote_management) {
324                 rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NO_REMOTE);
325                 goto exit;
326         }
327         else if (cmd >= 0x4000) {
328                 u32 domain = 0;
329
330                 if ((tipc_nametbl_translate(TIPC_ZM_SRV, 0, &domain) == 0) ||
331                     (domain != orig_node)) {
332                         rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_ZONE_MSTR);
333                         goto exit;
334                 }
335         }
336
337         /* Call appropriate processing routine */
338
339         switch (cmd) {
340         case TIPC_CMD_NOOP:
341                 rep_tlv_buf = tipc_cfg_reply_none();
342                 break;
343         case TIPC_CMD_GET_NODES:
344                 rep_tlv_buf = tipc_node_get_nodes(req_tlv_area, req_tlv_space);
345                 break;
346         case TIPC_CMD_GET_LINKS:
347                 rep_tlv_buf = tipc_node_get_links(req_tlv_area, req_tlv_space);
348                 break;
349         case TIPC_CMD_SHOW_LINK_STATS:
350                 rep_tlv_buf = tipc_link_cmd_show_stats(req_tlv_area, req_tlv_space);
351                 break;
352         case TIPC_CMD_RESET_LINK_STATS:
353                 rep_tlv_buf = tipc_link_cmd_reset_stats(req_tlv_area, req_tlv_space);
354                 break;
355         case TIPC_CMD_SHOW_NAME_TABLE:
356                 rep_tlv_buf = tipc_nametbl_get(req_tlv_area, req_tlv_space);
357                 break;
358         case TIPC_CMD_GET_BEARER_NAMES:
359                 rep_tlv_buf = tipc_bearer_get_names();
360                 break;
361         case TIPC_CMD_GET_MEDIA_NAMES:
362                 rep_tlv_buf = tipc_media_get_names();
363                 break;
364         case TIPC_CMD_SHOW_PORTS:
365                 rep_tlv_buf = tipc_port_get_ports();
366                 break;
367         case TIPC_CMD_SET_LOG_SIZE:
368                 rep_tlv_buf = tipc_log_resize_cmd(req_tlv_area, req_tlv_space);
369                 break;
370         case TIPC_CMD_DUMP_LOG:
371                 rep_tlv_buf = tipc_log_dump();
372                 break;
373         case TIPC_CMD_SHOW_STATS:
374                 rep_tlv_buf = tipc_show_stats();
375                 break;
376         case TIPC_CMD_SET_LINK_TOL:
377         case TIPC_CMD_SET_LINK_PRI:
378         case TIPC_CMD_SET_LINK_WINDOW:
379                 rep_tlv_buf = tipc_link_cmd_config(req_tlv_area, req_tlv_space, cmd);
380                 break;
381         case TIPC_CMD_ENABLE_BEARER:
382                 rep_tlv_buf = cfg_enable_bearer();
383                 break;
384         case TIPC_CMD_DISABLE_BEARER:
385                 rep_tlv_buf = cfg_disable_bearer();
386                 break;
387         case TIPC_CMD_SET_NODE_ADDR:
388                 rep_tlv_buf = cfg_set_own_addr();
389                 break;
390         case TIPC_CMD_SET_REMOTE_MNG:
391                 rep_tlv_buf = cfg_set_remote_mng();
392                 break;
393         case TIPC_CMD_SET_MAX_PORTS:
394                 rep_tlv_buf = cfg_set_max_ports();
395                 break;
396         case TIPC_CMD_SET_MAX_PUBL:
397                 rep_tlv_buf = cfg_set_max_publications();
398                 break;
399         case TIPC_CMD_SET_MAX_SUBSCR:
400                 rep_tlv_buf = cfg_set_max_subscriptions();
401                 break;
402         case TIPC_CMD_SET_MAX_NODES:
403                 rep_tlv_buf = cfg_set_max_nodes();
404                 break;
405         case TIPC_CMD_SET_NETID:
406                 rep_tlv_buf = cfg_set_netid();
407                 break;
408         case TIPC_CMD_GET_REMOTE_MNG:
409                 rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_remote_management);
410                 break;
411         case TIPC_CMD_GET_MAX_PORTS:
412                 rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_max_ports);
413                 break;
414         case TIPC_CMD_GET_MAX_PUBL:
415                 rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_max_publications);
416                 break;
417         case TIPC_CMD_GET_MAX_SUBSCR:
418                 rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_max_subscriptions);
419                 break;
420         case TIPC_CMD_GET_MAX_NODES:
421                 rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_max_nodes);
422                 break;
423         case TIPC_CMD_GET_NETID:
424                 rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_net_id);
425                 break;
426         case TIPC_CMD_NOT_NET_ADMIN:
427                 rep_tlv_buf =
428                         tipc_cfg_reply_error_string(TIPC_CFG_NOT_NET_ADMIN);
429                 break;
430         case TIPC_CMD_SET_MAX_ZONES:
431         case TIPC_CMD_GET_MAX_ZONES:
432         case TIPC_CMD_SET_MAX_SLAVES:
433         case TIPC_CMD_GET_MAX_SLAVES:
434         case TIPC_CMD_SET_MAX_CLUSTERS:
435         case TIPC_CMD_GET_MAX_CLUSTERS:
436                 rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
437                                                           " (obsolete command)");
438                 break;
439         default:
440                 rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
441                                                           " (unknown command)");
442                 break;
443         }
444
445         /* Return reply buffer */
446 exit:
447         spin_unlock_bh(&config_lock);
448         return rep_tlv_buf;
449 }
450
451 static void cfg_named_msg_event(void *userdata,
452                                 u32 port_ref,
453                                 struct sk_buff **buf,
454                                 const unchar *msg,
455                                 u32 size,
456                                 u32 importance,
457                                 struct tipc_portid const *orig,
458                                 struct tipc_name_seq const *dest)
459 {
460         struct tipc_cfg_msg_hdr *req_hdr;
461         struct tipc_cfg_msg_hdr *rep_hdr;
462         struct sk_buff *rep_buf;
463
464         /* Validate configuration message header (ignore invalid message) */
465
466         req_hdr = (struct tipc_cfg_msg_hdr *)msg;
467         if ((size < sizeof(*req_hdr)) ||
468             (size != TCM_ALIGN(ntohl(req_hdr->tcm_len))) ||
469             (ntohs(req_hdr->tcm_flags) != TCM_F_REQUEST)) {
470                 warn("Invalid configuration message discarded\n");
471                 return;
472         }
473
474         /* Generate reply for request (if can't, return request) */
475
476         rep_buf = tipc_cfg_do_cmd(orig->node,
477                                   ntohs(req_hdr->tcm_type),
478                                   msg + sizeof(*req_hdr),
479                                   size - sizeof(*req_hdr),
480                                   BUF_HEADROOM + MAX_H_SIZE + sizeof(*rep_hdr));
481         if (rep_buf) {
482                 skb_push(rep_buf, sizeof(*rep_hdr));
483                 rep_hdr = (struct tipc_cfg_msg_hdr *)rep_buf->data;
484                 memcpy(rep_hdr, req_hdr, sizeof(*rep_hdr));
485                 rep_hdr->tcm_len = htonl(rep_buf->len);
486                 rep_hdr->tcm_flags &= htons(~TCM_F_REQUEST);
487         } else {
488                 rep_buf = *buf;
489                 *buf = NULL;
490         }
491
492         /* NEED TO ADD CODE TO HANDLE FAILED SEND (SUCH AS CONGESTION) */
493         tipc_send_buf2port(port_ref, orig, rep_buf, rep_buf->len);
494 }
495
496 int tipc_cfg_init(void)
497 {
498         struct tipc_name_seq seq;
499         int res;
500
501         res = tipc_createport(NULL, TIPC_CRITICAL_IMPORTANCE,
502                               NULL, NULL, NULL,
503                               NULL, cfg_named_msg_event, NULL,
504                               NULL, &config_port_ref);
505         if (res)
506                 goto failed;
507
508         seq.type = TIPC_CFG_SRV;
509         seq.lower = seq.upper = tipc_own_addr;
510         res = tipc_nametbl_publish_rsv(config_port_ref, TIPC_ZONE_SCOPE, &seq);
511         if (res)
512                 goto failed;
513
514         return 0;
515
516 failed:
517         err("Unable to create configuration service\n");
518         return res;
519 }
520
521 void tipc_cfg_stop(void)
522 {
523         if (config_port_ref) {
524                 tipc_deleteport(config_port_ref);
525                 config_port_ref = 0;
526         }
527 }