[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-2012, 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"

#define REPLY_TRUNCATED "<truncated>\n"

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;
}

static struct sk_buff *tipc_show_stats(void)
{
	struct sk_buff *buf;
	struct tlv_desc *rep_tlv;
	char *pb;
	int pb_len;
	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(ULTRA_STRING_MAX_LEN));
	if (buf == NULL)
		return NULL;

	rep_tlv = (struct tlv_desc *)buf->data;
	pb = TLV_DATA(rep_tlv);
	pb_len = ULTRA_STRING_MAX_LEN;

	str_len = tipc_snprintf(pb, pb_len, "TIPC version " TIPC_MOD_VER "\n");
	str_len += 1;	/* for "\0" */
	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_own_addr)
		return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
						   " (cannot change node address once assigned)");

	/*
	 * Must temporarily release configuration spinlock while switching into
	 * networking mode as it calls tipc_eth_media_start(), which may sleep.
	 * Releasing the lock is harmless as other locally-issued configuration
	 * commands won't occur until this one completes, and remotely-issued
	 * configuration commands can't be received until a local configuration
	 * command to enable the first bearer is received and processed.
	 */
	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 < 1 || value > 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_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 < 127 || value > 65535)
		return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
						   " (max ports must be 127-65535)");
	return tipc_cfg_reply_error_string(TIPC_CFG_NOT_SUPPORTED
		" (cannot change max ports while TIPC is active)");
}

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 < 1 || value > 9999)
		return tipc_cfg_reply_error_string(TIPC_CFG_INVALID_VALUE
						   " (network id must be 1-9999)");
	if (tipc_own_addr)
		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(in_own_node(orig_node))) {
		/* 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_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_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_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:
	case TIPC_CMD_SET_MAX_SUBSCR:
	case TIPC_CMD_GET_MAX_SUBSCR:
	case TIPC_CMD_SET_LOG_SIZE:
	case TIPC_CMD_DUMP_LOG:
		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;
	}

	WARN_ON(rep_tlv_buf->len > TLV_SPACE(ULTRA_STRING_MAX_LEN));

	/* Append an error message if we cannot return all requested data */
	if (rep_tlv_buf->len == TLV_SPACE(ULTRA_STRING_MAX_LEN)) {
		if (*(rep_tlv_buf->data + ULTRA_STRING_MAX_LEN) != '\0')
			sprintf(rep_tlv_buf->data + rep_tlv_buf->len -
				sizeof(REPLY_TRUNCATED) - 1, REPLY_TRUNCATED);
	}

	/* 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)) {
		pr_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_publish(config_port_ref, TIPC_ZONE_SCOPE, &seq);
	if (res)
		goto failed;

	return 0;

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

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

	seq.type = TIPC_CFG_SRV;
	seq.lower = seq.upper = 0;
	tipc_withdraw(config_port_ref, TIPC_ZONE_SCOPE, &seq);

	seq.lower = seq.upper = tipc_own_addr;
	res = tipc_publish(config_port_ref, TIPC_ZONE_SCOPE, &seq);
	if (res)
		pr_err("Unable to reinitialize configuration service\n");
}

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