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