[deliverable/linux.git] / net / tipc / config.c

/*
 * net/tipc/config.c: TIPC configuration management code
 *
 * Copyright (c) 2002-2006, Ericsson AB
 * Copyright (c) 2004-2007, 2010-2011, Wind River Systems
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. Neither the names of the copyright holders nor the names of its
 *    contributors may be used to endorse or promote products derived from
 *    this software without specific prior written permission.
 *
 * Alternatively, this software may be distributed under the terms of the
 * GNU General Public License ("GPL") version 2 as published by the Free
 * Software Foundation.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include "core.h"
#include "port.h"
#include "name_table.h"
#include "config.h"

static u32 config_port_ref;

static DEFINE_SPINLOCK(config_lock);

static const void *req_tlv_area;	/* request message TLV area */
static int req_tlv_space;		/* request message TLV area size */
static int rep_headroom;		/* reply message headroom to use */


struct sk_buff *tipc_cfg_reply_alloc(int payload_size)
{
	struct sk_buff *buf;

	buf = alloc_skb(rep_headroom + payload_size, GFP_ATOMIC);
	if (buf)
		skb_reserve(buf, rep_headroom);
	return buf;
}

int tipc_cfg_append_tlv(struct sk_buff *buf, int tlv_type,
			void *tlv_data, int tlv_data_size)
{
	struct tlv_desc *tlv = (struct tlv_desc *)skb_tail_pointer(buf);
	int new_tlv_space = TLV_SPACE(tlv_data_size);

	if (skb_tailroom(buf) < new_tlv_space)
		return 0;
	skb_put(buf, new_tlv_space);
	tlv->tlv_type = htons(tlv_type);
	tlv->tlv_len  = htons(TLV_LENGTH(tlv_data_size));
	if (tlv_data_size && tlv_data)
		memcpy(TLV_DATA(tlv), tlv_data, tlv_data_size);
	return 1;
}

static struct sk_buff *tipc_cfg_reply_unsigned_type(u16 tlv_type, u32 value)
{
	struct sk_buff *buf;
	__be32 value_net;

	buf = tipc_cfg_reply_alloc(TLV_SPACE(sizeof(value)));
	if (buf) {
		value_net = htonl(value);
		tipc_cfg_append_tlv(buf, tlv_type, &value_net,
				    sizeof(value_net));
	}
	return buf;
}

static struct sk_buff *tipc_cfg_reply_unsigned(u32 value)
{
	return tipc_cfg_reply_unsigned_type(TIPC_TLV_UNSIGNED, value);
}

struct sk_buff *tipc_cfg_reply_string_type(u16 tlv_type, char *string)
{
	struct sk_buff *buf;
	int string_len = strlen(string) + 1;

	buf = tipc_cfg_reply_alloc(TLV_SPACE(string_len));
	if (buf)
		tipc_cfg_append_tlv(buf, tlv_type, string, string_len);
	return buf;
}

#define MAX_STATS_INFO 2000

static struct sk_buff *tipc_show_stats(void)
{
	struct sk_buff *buf;
	struct tlv_desc *rep_tlv;
	struct print_buf pb;
	int str_len;
	u32 value;

	if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
		return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);

	value = ntohl(*(u32 *)TLV_DATA(req_tlv_area));
	if (value != 0)
		return tipc_cfg_reply_error_string("unsupported argument");

	buf = tipc_cfg_reply_alloc(TLV_SPACE(MAX_STATS_INFO));
	if (buf == NULL)
		return NULL;

	rep_tlv = (struct tlv_desc *)buf->data;
	tipc_printbuf_init(&pb, (char *)TLV_DATA(rep_tlv), MAX_STATS_INFO);

	tipc_printf(&pb, "TIPC version " TIPC_MOD_VER "\n");

	/* Use additional tipc_printf()'s to return more info ... */

	str_len = tipc_printbuf_validate(&pb);
	skb_put(buf, TLV_SPACE(str_len));
	TLV_SET(rep_tlv, TIPC_TLV_ULTRA_STRING, NULL, str_len);

	return buf;
}

static struct sk_buff *cfg_enable_bearer(void)
{
	struct tipc_bearer_config *args;

	if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_BEARER_CONFIG))
		return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);

	args = (struct tipc_bearer_config *)TLV_DATA(req_tlv_area);
	if (tipc_enable_bearer(args->name,
			       ntohl(args->disc_domain),
			       ntohl(args->priority)))
		return tipc_cfg_reply_error_string("unable to enable bearer");

	return tipc_cfg_reply_none();
}

static struct sk_buff *cfg_disable_bearer(void)
{
	if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_BEARER_NAME))
		return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);

	if (tipc_disable_bearer((char *)TLV_DATA(req_tlv_area)))
		return tipc_cfg_reply_error_string("unable to disable bearer");

	return tipc_cfg_reply_none();
}

static struct sk_buff *cfg_set_own_addr(void)
{
	u32 addr;

	if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_NET_ADDR))
		return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);

	addr = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
	if (addr == tipc_own_addr)
		return tipc_cfg_reply_none();
	if (!tipc_addr_node_valid(addr))
		return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
						   " (node address)");
	if (tipc_mode == TIPC_NET_MODE)
		return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
						   " (cannot change node address once assigned)");

	/*
	 * Must release all spinlocks before calling start_net() because
	 * Linux version of TIPC calls eth_media_start() which calls
	 * register_netdevice_notifier() which may block!
	 *
	 * Temporarily releasing the lock should be harmless for non-Linux TIPC,
	 * but Linux version of eth_media_start() should really be reworked
	 * so that it can be called with spinlocks held.
	 */

	spin_unlock_bh(&config_lock);
	tipc_core_start_net(addr);
	spin_lock_bh(&config_lock);
	return tipc_cfg_reply_none();
}

static struct sk_buff *cfg_set_remote_mng(void)
{
	u32 value;

	if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
		return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);

	value = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
	tipc_remote_management = (value != 0);
	return tipc_cfg_reply_none();
}

static struct sk_buff *cfg_set_max_publications(void)
{
	u32 value;

	if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
		return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);

	value = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
	if (value != delimit(value, 1, 65535))
		return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
						   " (max publications must be 1-65535)");
	tipc_max_publications = value;
	return tipc_cfg_reply_none();
}

static struct sk_buff *cfg_set_max_subscriptions(void)
{
	u32 value;

	if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
		return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);

	value = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
	if (value != delimit(value, 1, 65535))
		return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
						   " (max subscriptions must be 1-65535");
	tipc_max_subscriptions = value;
	return tipc_cfg_reply_none();
}

static struct sk_buff *cfg_set_max_ports(void)
{
	u32 value;

	if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
		return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
	value = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
	if (value == tipc_max_ports)
		return tipc_cfg_reply_none();
	if (value != delimit(value, 127, 65535))
		return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
						   " (max ports must be 127-65535)");
	if (tipc_mode != TIPC_NOT_RUNNING)
		return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
			" (cannot change max ports while TIPC is active)");
	tipc_max_ports = value;
	return tipc_cfg_reply_none();
}

static struct sk_buff *cfg_set_netid(void)
{
	u32 value;

	if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
		return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
	value = ntohl(*(__be32 *)TLV_DATA(req_tlv_area));
	if (value == tipc_net_id)
		return tipc_cfg_reply_none();
	if (value != delimit(value, 1, 9999))
		return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
						   " (network id must be 1-9999)");
	if (tipc_mode == TIPC_NET_MODE)
		return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
			" (cannot change network id once TIPC has joined a network)");
	tipc_net_id = value;
	return tipc_cfg_reply_none();
}

struct sk_buff *tipc_cfg_do_cmd(u32 orig_node, u16 cmd, const void *request_area,
				int request_space, int reply_headroom)
{
	struct sk_buff *rep_tlv_buf;

	spin_lock_bh(&config_lock);

	/* Save request and reply details in a well-known location */

	req_tlv_area = request_area;
	req_tlv_space = request_space;
	rep_headroom = reply_headroom;

	/* Check command authorization */

	if (likely(orig_node == tipc_own_addr)) {
		/* command is permitted */
	} else if (cmd >= 0x8000) {
		rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
							  " (cannot be done remotely)");
		goto exit;
	} else if (!tipc_remote_management) {
		rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NO_REMOTE);
		goto exit;
	} else if (cmd >= 0x4000) {
		u32 domain = 0;

		if ((tipc_nametbl_translate(TIPC_ZM_SRV, 0, &domain) == 0) ||
		    (domain != orig_node)) {
			rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_ZONE_MSTR);
			goto exit;
		}
	}

	/* Call appropriate processing routine */

	switch (cmd) {
	case TIPC_CMD_NOOP:
		rep_tlv_buf = tipc_cfg_reply_none();
		break;
	case TIPC_CMD_GET_NODES:
		rep_tlv_buf = tipc_node_get_nodes(req_tlv_area, req_tlv_space);
		break;
	case TIPC_CMD_GET_LINKS:
		rep_tlv_buf = tipc_node_get_links(req_tlv_area, req_tlv_space);
		break;
	case TIPC_CMD_SHOW_LINK_STATS:
		rep_tlv_buf = tipc_link_cmd_show_stats(req_tlv_area, req_tlv_space);
		break;
	case TIPC_CMD_RESET_LINK_STATS:
		rep_tlv_buf = tipc_link_cmd_reset_stats(req_tlv_area, req_tlv_space);
		break;
	case TIPC_CMD_SHOW_NAME_TABLE:
		rep_tlv_buf = tipc_nametbl_get(req_tlv_area, req_tlv_space);
		break;
	case TIPC_CMD_GET_BEARER_NAMES:
		rep_tlv_buf = tipc_bearer_get_names();
		break;
	case TIPC_CMD_GET_MEDIA_NAMES:
		rep_tlv_buf = tipc_media_get_names();
		break;
	case TIPC_CMD_SHOW_PORTS:
		rep_tlv_buf = tipc_port_get_ports();
		break;
	case TIPC_CMD_SET_LOG_SIZE:
		rep_tlv_buf = tipc_log_resize_cmd(req_tlv_area, req_tlv_space);
		break;
	case TIPC_CMD_DUMP_LOG:
		rep_tlv_buf = tipc_log_dump();
		break;
	case TIPC_CMD_SHOW_STATS:
		rep_tlv_buf = tipc_show_stats();
		break;
	case TIPC_CMD_SET_LINK_TOL:
	case TIPC_CMD_SET_LINK_PRI:
	case TIPC_CMD_SET_LINK_WINDOW:
		rep_tlv_buf = tipc_link_cmd_config(req_tlv_area, req_tlv_space, cmd);
		break;
	case TIPC_CMD_ENABLE_BEARER:
		rep_tlv_buf = cfg_enable_bearer();
		break;
	case TIPC_CMD_DISABLE_BEARER:
		rep_tlv_buf = cfg_disable_bearer();
		break;
	case TIPC_CMD_SET_NODE_ADDR:
		rep_tlv_buf = cfg_set_own_addr();
		break;
	case TIPC_CMD_SET_REMOTE_MNG:
		rep_tlv_buf = cfg_set_remote_mng();
		break;
	case TIPC_CMD_SET_MAX_PORTS:
		rep_tlv_buf = cfg_set_max_ports();
		break;
	case TIPC_CMD_SET_MAX_PUBL:
		rep_tlv_buf = cfg_set_max_publications();
		break;
	case TIPC_CMD_SET_MAX_SUBSCR:
		rep_tlv_buf = cfg_set_max_subscriptions();
		break;
	case TIPC_CMD_SET_NETID:
		rep_tlv_buf = cfg_set_netid();
		break;
	case TIPC_CMD_GET_REMOTE_MNG:
		rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_remote_management);
		break;
	case TIPC_CMD_GET_MAX_PORTS:
		rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_max_ports);
		break;
	case TIPC_CMD_GET_MAX_PUBL:
		rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_max_publications);
		break;
	case TIPC_CMD_GET_MAX_SUBSCR:
		rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_max_subscriptions);
		break;
	case TIPC_CMD_GET_NETID:
		rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_net_id);
		break;
	case TIPC_CMD_NOT_NET_ADMIN:
		rep_tlv_buf =
			tipc_cfg_reply_error_string(TIPC_CFG_NOT_NET_ADMIN);
		break;
	case TIPC_CMD_SET_MAX_ZONES:
	case TIPC_CMD_GET_MAX_ZONES:
	case TIPC_CMD_SET_MAX_SLAVES:
	case TIPC_CMD_GET_MAX_SLAVES:
	case TIPC_CMD_SET_MAX_CLUSTERS:
	case TIPC_CMD_GET_MAX_CLUSTERS:
	case TIPC_CMD_SET_MAX_NODES:
	case TIPC_CMD_GET_MAX_NODES:
		rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
							  " (obsolete command)");
		break;
	default:
		rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
							  " (unknown command)");
		break;
	}

	/* Return reply buffer */
exit:
	spin_unlock_bh(&config_lock);
	return rep_tlv_buf;
}

static void cfg_named_msg_event(void *userdata,
				u32 port_ref,
				struct sk_buff **buf,
				const unchar *msg,
				u32 size,
				u32 importance,
				struct tipc_portid const *orig,
				struct tipc_name_seq const *dest)
{
	struct tipc_cfg_msg_hdr *req_hdr;
	struct tipc_cfg_msg_hdr *rep_hdr;
	struct sk_buff *rep_buf;

	/* Validate configuration message header (ignore invalid message) */

	req_hdr = (struct tipc_cfg_msg_hdr *)msg;
	if ((size < sizeof(*req_hdr)) ||
	    (size != TCM_ALIGN(ntohl(req_hdr->tcm_len))) ||
	    (ntohs(req_hdr->tcm_flags) != TCM_F_REQUEST)) {
		warn("Invalid configuration message discarded\n");
		return;
	}

	/* Generate reply for request (if can't, return request) */

	rep_buf = tipc_cfg_do_cmd(orig->node,
				  ntohs(req_hdr->tcm_type),
				  msg + sizeof(*req_hdr),
				  size - sizeof(*req_hdr),
				  BUF_HEADROOM + MAX_H_SIZE + sizeof(*rep_hdr));
	if (rep_buf) {
		skb_push(rep_buf, sizeof(*rep_hdr));
		rep_hdr = (struct tipc_cfg_msg_hdr *)rep_buf->data;
		memcpy(rep_hdr, req_hdr, sizeof(*rep_hdr));
		rep_hdr->tcm_len = htonl(rep_buf->len);
		rep_hdr->tcm_flags &= htons(~TCM_F_REQUEST);
	} else {
		rep_buf = *buf;
		*buf = NULL;
	}

	/* NEED TO ADD CODE TO HANDLE FAILED SEND (SUCH AS CONGESTION) */
	tipc_send_buf2port(port_ref, orig, rep_buf, rep_buf->len);
}

int tipc_cfg_init(void)
{
	struct tipc_name_seq seq;
	int res;

	res = tipc_createport(NULL, TIPC_CRITICAL_IMPORTANCE,
			      NULL, NULL, NULL,
			      NULL, cfg_named_msg_event, NULL,
			      NULL, &config_port_ref);
	if (res)
		goto failed;

	seq.type = TIPC_CFG_SRV;
	seq.lower = seq.upper = tipc_own_addr;
	res = tipc_nametbl_publish_rsv(config_port_ref, TIPC_ZONE_SCOPE, &seq);
	if (res)
		goto failed;

	return 0;

failed:
	err("Unable to create configuration service\n");
	return res;
}

void tipc_cfg_stop(void)
{
	if (config_port_ref) {
		tipc_deleteport(config_port_ref);
		config_port_ref = 0;
	}
}
Commit	Line	Data
b97bf3fd PL	1	/*
b97bf3fd PL	2	* net/tipc/config.c: TIPC configuration management code
c4307285	3	*
593a5f22	4	* Copyright (c) 2002-2006, Ericsson AB
f831c963	5	* Copyright (c) 2004-2007, 2010-2011, Wind River Systems
b97bf3fd PL	6	* All rights reserved.
b97bf3fd PL	7	*
9ea1fd3c	8	* Redistribution and use in source and binary forms, with or without
b97bf3fd PL	9	* modification, are permitted provided that the following conditions are met:
b97bf3fd PL	10	*
9ea1fd3c PL	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.
b97bf3fd	19	*
9ea1fd3c PL	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
b97bf3fd PL	34	* POSSIBILITY OF SUCH DAMAGE.
	35	*/
	36
	37	#include "core.h"
b97bf3fd	38	#include "port.h"
b97bf3fd	39	#include "name_table.h"
b97bf3fd	40	#include "config.h"
b97bf3fd	41
7a488fd3	42	static u32 config_port_ref;
b97bf3fd	43
34af946a	44	static DEFINE_SPINLOCK(config_lock);
b97bf3fd PL	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
4323add6	51	struct sk_buff *tipc_cfg_reply_alloc(int payload_size)
b97bf3fd PL	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
c4307285	61	int tipc_cfg_append_tlv(struct sk_buff *buf, int tlv_type,
4323add6	62	void *tlv_data, int tlv_data_size)
b97bf3fd	63	{
27a884dc	64	struct tlv_desc tlv = (struct tlv_desc )skb_tail_pointer(buf);
b97bf3fd PL	65	int new_tlv_space = TLV_SPACE(tlv_data_size);
b97bf3fd PL	66
b29f1428	67	if (skb_tailroom(buf) < new_tlv_space)
b97bf3fd	68	return 0;
b97bf3fd PL	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
31e3c3f6	77	static struct sk_buff *tipc_cfg_reply_unsigned_type(u16 tlv_type, u32 value)
b97bf3fd PL	78	{
b97bf3fd PL	79	struct sk_buff *buf;
3e6c8cd5	80	__be32 value_net;
b97bf3fd	81
4323add6	82	buf = tipc_cfg_reply_alloc(TLV_SPACE(sizeof(value)));
b97bf3fd PL	83	if (buf) {
b97bf3fd PL	84	value_net = htonl(value);
c4307285	85	tipc_cfg_append_tlv(buf, tlv_type, &value_net,
4323add6	86	sizeof(value_net));
b97bf3fd PL	87	}
	88	return buf;
	89	}
	90
31e3c3f6	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
4323add6	96	struct sk_buff tipc_cfg_reply_string_type(u16 tlv_type, char string)
b97bf3fd PL	97	{
	98	struct sk_buff *buf;
	99	int string_len = strlen(string) + 1;
	100
4323add6	101	buf = tipc_cfg_reply_alloc(TLV_SPACE(string_len));
b97bf3fd	102	if (buf)
4323add6	103	tipc_cfg_append_tlv(buf, tlv_type, string, string_len);
b97bf3fd PL	104	return buf;
	105	}
	106
107e7be6 AS	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
b97bf3fd PL	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))
4323add6	147	return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
b97bf3fd PL	148
	149	args = (struct tipc_bearer_config *)TLV_DATA(req_tlv_area);
	150	if (tipc_enable_bearer(args->name,
50d3e639	151	ntohl(args->disc_domain),
b97bf3fd	152	ntohl(args->priority)))
4323add6	153	return tipc_cfg_reply_error_string("unable to enable bearer");
b97bf3fd	154
4323add6	155	return tipc_cfg_reply_none();
b97bf3fd PL	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))
4323add6	161	return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
b97bf3fd PL	162
b97bf3fd PL	163	if (tipc_disable_bearer((char *)TLV_DATA(req_tlv_area)))
4323add6	164	return tipc_cfg_reply_error_string("unable to disable bearer");
b97bf3fd	165
4323add6	166	return tipc_cfg_reply_none();
b97bf3fd PL	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))
4323add6	174	return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
b97bf3fd	175
3e6c8cd5	176	addr = ntohl((__be32 )TLV_DATA(req_tlv_area));
b97bf3fd	177	if (addr == tipc_own_addr)
4323add6 PL	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)");
e100ae92	182	if (tipc_mode == TIPC_NET_MODE)
4323add6 PL	183	return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
4323add6 PL	184	" (cannot change node address once assigned)");
e100ae92	185
c4307285	186	/*
e100ae92 AS	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	*/
b97bf3fd PL	195
b97bf3fd PL	196	spin_unlock_bh(&config_lock);
03194379	197	tipc_core_start_net(addr);
b97bf3fd	198	spin_lock_bh(&config_lock);
4323add6	199	return tipc_cfg_reply_none();
b97bf3fd PL	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))
4323add6	207	return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
b97bf3fd	208
3e6c8cd5	209	value = ntohl((__be32 )TLV_DATA(req_tlv_area));
b97bf3fd	210	tipc_remote_management = (value != 0);
4323add6	211	return tipc_cfg_reply_none();
b97bf3fd PL	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))
4323add6	219	return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
b97bf3fd	220
3e6c8cd5	221	value = ntohl((__be32 )TLV_DATA(req_tlv_area));
b97bf3fd	222	if (value != delimit(value, 1, 65535))
4323add6 PL	223	return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
4323add6 PL	224	" (max publications must be 1-65535)");
b97bf3fd	225	tipc_max_publications = value;
4323add6	226	return tipc_cfg_reply_none();
b97bf3fd PL	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))
4323add6	234	return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
b97bf3fd	235
3e6c8cd5	236	value = ntohl((__be32 )TLV_DATA(req_tlv_area));
b97bf3fd	237	if (value != delimit(value, 1, 65535))
4323add6 PL	238	return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
4323add6 PL	239	" (max subscriptions must be 1-65535");
b97bf3fd	240	tipc_max_subscriptions = value;
4323add6	241	return tipc_cfg_reply_none();
b97bf3fd PL	242	}
	243
	244	static struct sk_buff *cfg_set_max_ports(void)
	245	{
b97bf3fd PL	246	u32 value;
	247
	248	if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
4323add6	249	return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
3e6c8cd5	250	value = ntohl((__be32 )TLV_DATA(req_tlv_area));
e100ae92 AS	251	if (value == tipc_max_ports)
e100ae92 AS	252	return tipc_cfg_reply_none();
b97bf3fd	253	if (value != delimit(value, 127, 65535))
4323add6 PL	254	return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
4323add6 PL	255	" (max ports must be 127-65535)");
e100ae92	256	if (tipc_mode != TIPC_NOT_RUNNING)
4323add6	257	return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
e100ae92	258	" (cannot change max ports while TIPC is active)");
b97bf3fd	259	tipc_max_ports = value;
4323add6	260	return tipc_cfg_reply_none();
b97bf3fd PL	261	}
b97bf3fd PL	262
b97bf3fd PL	263	static struct sk_buff *cfg_set_netid(void)
	264	{
	265	u32 value;
	266
	267	if (!TLV_CHECK(req_tlv_area, req_tlv_space, TIPC_TLV_UNSIGNED))
4323add6	268	return tipc_cfg_reply_error_string(TIPC_CFG_TLV_ERROR);
3e6c8cd5	269	value = ntohl((__be32 )TLV_DATA(req_tlv_area));
e100ae92 AS	270	if (value == tipc_net_id)
e100ae92 AS	271	return tipc_cfg_reply_none();
b97bf3fd	272	if (value != delimit(value, 1, 9999))
4323add6 PL	273	return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
4323add6 PL	274	" (network id must be 1-9999)");
e100ae92	275	if (tipc_mode == TIPC_NET_MODE)
4323add6	276	return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
e100ae92 AS	277	" (cannot change network id once TIPC has joined a network)");
	278	tipc_net_id = value;
	279	return tipc_cfg_reply_none();
b97bf3fd PL	280	}
b97bf3fd PL	281
4323add6 PL	282	struct sk_buff tipc_cfg_do_cmd(u32 orig_node, u16 cmd, const void request_area,
4323add6 PL	283	int request_space, int reply_headroom)
b97bf3fd PL	284	{
	285	struct sk_buff *rep_tlv_buf;
	286
	287	spin_lock_bh(&config_lock);
	288
	289	/* Save request and reply details in a well-known location */
	290
	291	req_tlv_area = request_area;
	292	req_tlv_space = request_space;
	293	rep_headroom = reply_headroom;
	294
	295	/* Check command authorization */
	296
	297	if (likely(orig_node == tipc_own_addr)) {
	298	/* command is permitted */
	299	} else if (cmd >= 0x8000) {
4323add6 PL	300	rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
4323add6 PL	301	" (cannot be done remotely)");
b97bf3fd PL	302	goto exit;
b97bf3fd PL	303	} else if (!tipc_remote_management) {
4323add6	304	rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NO_REMOTE);
b97bf3fd	305	goto exit;
0e65967e	306	} else if (cmd >= 0x4000) {
b97bf3fd PL	307	u32 domain = 0;
b97bf3fd PL	308
4323add6	309	if ((tipc_nametbl_translate(TIPC_ZM_SRV, 0, &domain) == 0) \|\|
b97bf3fd	310	(domain != orig_node)) {
4323add6	311	rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_ZONE_MSTR);
b97bf3fd PL	312	goto exit;
	313	}
	314	}
	315
	316	/* Call appropriate processing routine */
	317
	318	switch (cmd) {
	319	case TIPC_CMD_NOOP:
4323add6	320	rep_tlv_buf = tipc_cfg_reply_none();
b97bf3fd PL	321	break;
b97bf3fd PL	322	case TIPC_CMD_GET_NODES:
4323add6	323	rep_tlv_buf = tipc_node_get_nodes(req_tlv_area, req_tlv_space);
b97bf3fd PL	324	break;
b97bf3fd PL	325	case TIPC_CMD_GET_LINKS:
4323add6	326	rep_tlv_buf = tipc_node_get_links(req_tlv_area, req_tlv_space);
b97bf3fd PL	327	break;
b97bf3fd PL	328	case TIPC_CMD_SHOW_LINK_STATS:
4323add6	329	rep_tlv_buf = tipc_link_cmd_show_stats(req_tlv_area, req_tlv_space);
b97bf3fd PL	330	break;
b97bf3fd PL	331	case TIPC_CMD_RESET_LINK_STATS:
4323add6	332	rep_tlv_buf = tipc_link_cmd_reset_stats(req_tlv_area, req_tlv_space);
b97bf3fd PL	333	break;
b97bf3fd PL	334	case TIPC_CMD_SHOW_NAME_TABLE:
4323add6	335	rep_tlv_buf = tipc_nametbl_get(req_tlv_area, req_tlv_space);
b97bf3fd PL	336	break;
b97bf3fd PL	337	case TIPC_CMD_GET_BEARER_NAMES:
4323add6	338	rep_tlv_buf = tipc_bearer_get_names();
b97bf3fd PL	339	break;
b97bf3fd PL	340	case TIPC_CMD_GET_MEDIA_NAMES:
4323add6	341	rep_tlv_buf = tipc_media_get_names();
b97bf3fd PL	342	break;
b97bf3fd PL	343	case TIPC_CMD_SHOW_PORTS:
4323add6	344	rep_tlv_buf = tipc_port_get_ports();
b97bf3fd	345	break;
b97bf3fd	346	case TIPC_CMD_SET_LOG_SIZE:
025adbe8	347	rep_tlv_buf = tipc_log_resize_cmd(req_tlv_area, req_tlv_space);
b97bf3fd PL	348	break;
b97bf3fd PL	349	case TIPC_CMD_DUMP_LOG:
4323add6	350	rep_tlv_buf = tipc_log_dump();
b97bf3fd	351	break;
107e7be6 AS	352	case TIPC_CMD_SHOW_STATS:
	353	rep_tlv_buf = tipc_show_stats();
	354	break;
b97bf3fd PL	355	case TIPC_CMD_SET_LINK_TOL:
	356	case TIPC_CMD_SET_LINK_PRI:
	357	case TIPC_CMD_SET_LINK_WINDOW:
4323add6	358	rep_tlv_buf = tipc_link_cmd_config(req_tlv_area, req_tlv_space, cmd);
b97bf3fd PL	359	break;
	360	case TIPC_CMD_ENABLE_BEARER:
	361	rep_tlv_buf = cfg_enable_bearer();
	362	break;
	363	case TIPC_CMD_DISABLE_BEARER:
	364	rep_tlv_buf = cfg_disable_bearer();
	365	break;
	366	case TIPC_CMD_SET_NODE_ADDR:
	367	rep_tlv_buf = cfg_set_own_addr();
	368	break;
	369	case TIPC_CMD_SET_REMOTE_MNG:
	370	rep_tlv_buf = cfg_set_remote_mng();
	371	break;
	372	case TIPC_CMD_SET_MAX_PORTS:
	373	rep_tlv_buf = cfg_set_max_ports();
	374	break;
	375	case TIPC_CMD_SET_MAX_PUBL:
	376	rep_tlv_buf = cfg_set_max_publications();
	377	break;
	378	case TIPC_CMD_SET_MAX_SUBSCR:
	379	rep_tlv_buf = cfg_set_max_subscriptions();
	380	break;
b97bf3fd PL	381	case TIPC_CMD_SET_NETID:
	382	rep_tlv_buf = cfg_set_netid();
	383	break;
	384	case TIPC_CMD_GET_REMOTE_MNG:
4323add6	385	rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_remote_management);
b97bf3fd PL	386	break;
b97bf3fd PL	387	case TIPC_CMD_GET_MAX_PORTS:
4323add6	388	rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_max_ports);
b97bf3fd PL	389	break;
b97bf3fd PL	390	case TIPC_CMD_GET_MAX_PUBL:
4323add6	391	rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_max_publications);
b97bf3fd PL	392	break;
b97bf3fd PL	393	case TIPC_CMD_GET_MAX_SUBSCR:
4323add6	394	rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_max_subscriptions);
b97bf3fd	395	break;
b97bf3fd	396	case TIPC_CMD_GET_NETID:
4323add6	397	rep_tlv_buf = tipc_cfg_reply_unsigned(tipc_net_id);
b97bf3fd	398	break;
59f0c452 AS	399	case TIPC_CMD_NOT_NET_ADMIN:
	400	rep_tlv_buf =
	401	tipc_cfg_reply_error_string(TIPC_CFG_NOT_NET_ADMIN);
	402	break;
51f98a8d AS	403	case TIPC_CMD_SET_MAX_ZONES:
51f98a8d AS	404	case TIPC_CMD_GET_MAX_ZONES:
08c80e9a AS	405	case TIPC_CMD_SET_MAX_SLAVES:
08c80e9a AS	406	case TIPC_CMD_GET_MAX_SLAVES:
8f92df6a AS	407	case TIPC_CMD_SET_MAX_CLUSTERS:
8f92df6a AS	408	case TIPC_CMD_GET_MAX_CLUSTERS:
f831c963 AS	409	case TIPC_CMD_SET_MAX_NODES:
f831c963 AS	410	case TIPC_CMD_GET_MAX_NODES:
51f98a8d AS	411	rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
	412	" (obsolete command)");
	413	break;
b97bf3fd	414	default:
53cfd1e1 AS	415	rep_tlv_buf = tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
53cfd1e1 AS	416	" (unknown command)");
b97bf3fd PL	417	break;
	418	}
	419
	420	/* Return reply buffer */
	421	exit:
	422	spin_unlock_bh(&config_lock);
	423	return rep_tlv_buf;
	424	}
	425
	426	static void cfg_named_msg_event(void *userdata,
	427	u32 port_ref,
	428	struct sk_buff **buf,
	429	const unchar *msg,
	430	u32 size,
c4307285	431	u32 importance,
b97bf3fd PL	432	struct tipc_portid const *orig,
	433	struct tipc_name_seq const *dest)
	434	{
	435	struct tipc_cfg_msg_hdr *req_hdr;
	436	struct tipc_cfg_msg_hdr *rep_hdr;
	437	struct sk_buff *rep_buf;
	438
	439	/* Validate configuration message header (ignore invalid message) */
	440
	441	req_hdr = (struct tipc_cfg_msg_hdr *)msg;
	442	if ((size < sizeof(*req_hdr)) \|\|
	443	(size != TCM_ALIGN(ntohl(req_hdr->tcm_len))) \|\|
	444	(ntohs(req_hdr->tcm_flags) != TCM_F_REQUEST)) {
a10bd924	445	warn("Invalid configuration message discarded\n");
b97bf3fd PL	446	return;
	447	}
	448
	449	/* Generate reply for request (if can't, return request) */
	450
4323add6	451	rep_buf = tipc_cfg_do_cmd(orig->node,
c4307285	452	ntohs(req_hdr->tcm_type),
4323add6 PL	453	msg + sizeof(*req_hdr),
	454	size - sizeof(*req_hdr),
	455	BUF_HEADROOM + MAX_H_SIZE + sizeof(*rep_hdr));
b97bf3fd PL	456	if (rep_buf) {
	457	skb_push(rep_buf, sizeof(*rep_hdr));
	458	rep_hdr = (struct tipc_cfg_msg_hdr *)rep_buf->data;
	459	memcpy(rep_hdr, req_hdr, sizeof(*rep_hdr));
	460	rep_hdr->tcm_len = htonl(rep_buf->len);
	461	rep_hdr->tcm_flags &= htons(~TCM_F_REQUEST);
	462	} else {
	463	rep_buf = *buf;
	464	*buf = NULL;
	465	}
	466
	467	/* NEED TO ADD CODE TO HANDLE FAILED SEND (SUCH AS CONGESTION) */
	468	tipc_send_buf2port(port_ref, orig, rep_buf, rep_buf->len);
	469	}
	470
4323add6	471	int tipc_cfg_init(void)
b97bf3fd PL	472	{
	473	struct tipc_name_seq seq;
	474	int res;
	475
b0c1e928	476	res = tipc_createport(NULL, TIPC_CRITICAL_IMPORTANCE,
b97bf3fd PL	477	NULL, NULL, NULL,
b97bf3fd PL	478	NULL, cfg_named_msg_event, NULL,
7a488fd3	479	NULL, &config_port_ref);
b97bf3fd PL	480	if (res)
	481	goto failed;
	482
	483	seq.type = TIPC_CFG_SRV;
	484	seq.lower = seq.upper = tipc_own_addr;
7a488fd3	485	res = tipc_nametbl_publish_rsv(config_port_ref, TIPC_ZONE_SCOPE, &seq);
b97bf3fd PL	486	if (res)
	487	goto failed;
	488
	489	return 0;
	490
	491	failed:
	492	err("Unable to create configuration service\n");
b97bf3fd PL	493	return res;
	494	}
	495
4323add6	496	void tipc_cfg_stop(void)
b97bf3fd	497	{
7a488fd3 AS	498	if (config_port_ref) {
	499	tipc_deleteport(config_port_ref);
	500	config_port_ref = 0;
b97bf3fd PL	501	}
b97bf3fd PL	502	}