No OneTemporary
Actions

Size

31 KB

Referenced Files

None

Subscribers

None

View Options

	diff --git a/crmd/remote_lrmd_ra.c b/crmd/remote_lrmd_ra.c
	index 4f940135f7..ce54e507a8 100644
	--- a/crmd/remote_lrmd_ra.c
	+++ b/crmd/remote_lrmd_ra.c
	@@ -1,1020 +1,1027 @@
	/*
	* Copyright (C) 2013 David Vossel <davidvossel@gmail.com>
	*
	* This program is free software; you can redistribute it and/or
	* modify it under the terms of the GNU General Public
	* License as published by the Free Software Foundation; either
	* version 2 of the License, or (at your option) any later version.
	*
	* This software is distributed in the hope that it will be useful,
	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	* General Public License for more details.
	*
	* You should have received a copy of the GNU General Public
	* License along with this library; if not, write to the Free Software
	* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
	*/

	#include <crm_internal.h>
	#include <crm/crm.h>
	#include <crm/msg_xml.h>

	#include <crmd.h>
	#include <crmd_fsa.h>
	#include <crmd_messages.h>
	#include <crmd_callbacks.h>
	#include <crmd_lrm.h>
	#include <crm/lrmd.h>
	#include <crm/services.h>

	#define REMOTE_LRMD_RA "remote"

	/* The max start timeout before cmd retry */
	#define MAX_START_TIMEOUT_MS 10000

	typedef struct remote_ra_cmd_s {
	/! the local node the cmd is issued from /
	char *owner;
	/! the remote node the cmd is executed on /
	char *rsc_id;
	/! the action to execute /
	char *action;
	/! some string the client wants us to give it back /
	char *userdata;
	/! start delay in ms /
	int start_delay;
	/! timer id used for start delay. /
	int delay_id;
	/! timeout in ms for cmd /
	int timeout;
	int remaining_timeout;
	/! recurring interval in ms /
	int interval;
	/! interval timer id /
	int interval_id;
	int reported_success;
	int monitor_timeout_id;
	int takeover_timeout_id;
	/! action parameters /
	lrmd_key_value_t *params;
	/! executed rc /
	int rc;
	int op_status;
	int call_id;
	time_t start_time;
	gboolean cancel;
	} remote_ra_cmd_t;

	enum remote_migration_status {
	expect_takeover = 1,
	takeover_complete,
	};

	typedef struct remote_ra_data_s {
	crm_trigger_t *work;
	remote_ra_cmd_t *cur_cmd;
	GList *cmds;
	GList *recurring_cmds;

	enum remote_migration_status migrate_status;

	gboolean active;
	} remote_ra_data_t;

	static int handle_remote_ra_start(lrm_state_t * lrm_state, remote_ra_cmd_t * cmd, int timeout_ms);
	static void handle_remote_ra_stop(lrm_state_t * lrm_state, remote_ra_cmd_t * cmd);
	static GList fail_all_monitor_cmds(GList list);

	static void
	free_cmd(gpointer user_data)
	{
	remote_ra_cmd_t *cmd = user_data;

	if (!cmd) {
	return;
	}
	if (cmd->delay_id) {
	g_source_remove(cmd->delay_id);
	}
	if (cmd->interval_id) {
	g_source_remove(cmd->interval_id);
	}
	if (cmd->monitor_timeout_id) {
	g_source_remove(cmd->monitor_timeout_id);
	}
	if (cmd->takeover_timeout_id) {
	g_source_remove(cmd->takeover_timeout_id);
	}
	free(cmd->owner);
	free(cmd->rsc_id);
	free(cmd->action);
	free(cmd->userdata);
	lrmd_key_value_freeall(cmd->params);
	free(cmd);
	}

	static int
	generate_callid(void)
	{
	static int remote_ra_callid = 0;

	remote_ra_callid++;
	if (remote_ra_callid <= 0) {
	remote_ra_callid = 1;
	}

	return remote_ra_callid;
	}

	static gboolean
	recurring_helper(gpointer data)
	{
	remote_ra_cmd_t *cmd = data;
	lrm_state_t *connection_rsc = NULL;

	cmd->interval_id = 0;
	connection_rsc = lrm_state_find(cmd->rsc_id);
	if (connection_rsc && connection_rsc->remote_ra_data) {
	remote_ra_data_t *ra_data = connection_rsc->remote_ra_data;

	ra_data->recurring_cmds = g_list_remove(ra_data->recurring_cmds, cmd);

	ra_data->cmds = g_list_append(ra_data->cmds, cmd);
	mainloop_set_trigger(ra_data->work);
	}
	return FALSE;
	}

	static gboolean
	start_delay_helper(gpointer data)
	{
	remote_ra_cmd_t *cmd = data;
	lrm_state_t *connection_rsc = NULL;

	cmd->delay_id = 0;
	connection_rsc = lrm_state_find(cmd->rsc_id);
	if (connection_rsc && connection_rsc->remote_ra_data) {
	remote_ra_data_t *ra_data = connection_rsc->remote_ra_data;

	mainloop_set_trigger(ra_data->work);
	}
	return FALSE;
	}

	/*!
	* \internal
	* \brief Handle cluster communication related to pacemaker_remote node joining
	*
	* \param[in] node_name Name of newly integrated pacemaker_remote node
	*/
	static void
	remote_node_up(const char *node_name)
	{
	int call_opt, call_id = 0;
	xmlNode update, state;
	crm_node_t *node;

	CRM_CHECK(node_name != NULL, return);
	crm_info("Announcing pacemaker_remote node %s", node_name);

	/* Clear node's operation history and transient attributes */
	call_opt = crmd_cib_smart_opt();
	erase_status_tag(node_name, XML_CIB_TAG_LRM, call_opt);
	erase_status_tag(node_name, XML_TAG_TRANSIENT_NODEATTRS, call_opt);

	/* Clear node's probed attribute */
	update_attrd(node_name, CRM_OP_PROBED, NULL, NULL, TRUE);

	/* Ensure node is in the remote peer cache with member status */
	node = crm_remote_peer_get(node_name);
	CRM_CHECK(node != NULL, return);
	crm_update_peer_state(__FUNCTION__, node, CRM_NODE_MEMBER, 0);

	/* pacemaker_remote nodes don't participate in the membership layer,
	* so cluster nodes don't automatically get notified when they come and go.
	* We send a cluster message to the DC, and update the CIB node state entry,
	* so the DC will get it sooner (via message) or later (via CIB refresh),
	* and any other interested parties can query the CIB.
	*/
	send_remote_state_message(node_name, TRUE);

	update = create_xml_node(NULL, XML_CIB_TAG_STATUS);
	state = do_update_node_cib(node, node_update_cluster, update, __FUNCTION__);

	/* Clear the XML_NODE_IS_FENCED flag in the node state. If the node ever
	* needs to be fenced, this flag will allow various actions to determine
	* whether the fencing has happened yet.
	*/
	crm_xml_add(state, XML_NODE_IS_FENCED, "0");

	/* TODO: If the remote connection drops, and this (async) CIB update either
	* failed or has not yet completed, later actions could mistakenly think the
	* node has already been fenced (if the XML_NODE_IS_FENCED attribute was
	* previously set, because it won't have been cleared). This could prevent
	* actual fencing or allow recurring monitor failures to be cleared too
	* soon. Ideally, we wouldn't rely on the CIB for the fenced status.
	*/
	fsa_cib_update(XML_CIB_TAG_STATUS, update, call_opt, call_id, NULL);
	if (call_id < 0) {
	crm_perror(LOG_WARNING, "%s CIB node state setup", node_name);
	}
	free_xml(update);
	}

	/*!
	* \internal
	* \brief Handle cluster communication related to pacemaker_remote node leaving
	*
	* \param[in] node_name Name of lost node
	*/
	static void
	remote_node_down(const char *node_name)
	{
	xmlNode *update;
	int call_id = 0;
	int call_opt = crmd_cib_smart_opt();
	crm_node_t *node;

	/* Clear all node attributes */
	update_attrd_remote_node_removed(node_name, NULL);

	/* Ensure node is in the remote peer cache with lost state */
	node = crm_remote_peer_get(node_name);
	CRM_CHECK(node != NULL, return);
	crm_update_peer_state(__FUNCTION__, node, CRM_NODE_LOST, 0);

	/* Notify DC */
	send_remote_state_message(node_name, FALSE);

	/* Update CIB node state */
	update = create_xml_node(NULL, XML_CIB_TAG_STATUS);
	do_update_node_cib(node, node_update_cluster, update, __FUNCTION__);
	fsa_cib_update(XML_CIB_TAG_STATUS, update, call_opt, call_id, NULL);
	if (call_id < 0) {
	crm_perror(LOG_ERR, "%s CIB node state update", node_name);
	}
	free_xml(update);
	}

	/*!
	* \internal
	* \brief Handle effects of a remote RA command on node state
	*
	* \param[in] cmd Completed remote RA command
	*/
	static void
	check_remote_node_state(remote_ra_cmd_t *cmd)
	{
	/* Only successful actions can change node state */
	if (cmd->rc != PCMK_OCF_OK) {
	return;
	}

	if (safe_str_eq(cmd->action, "start")) {
	remote_node_up(cmd->rsc_id);

	+ } else if (safe_str_eq(cmd->action, "migrate_from")) {
	+ /* Ensure node is in this host's remote peer cache */
	+ crm_node_t *node = crm_remote_peer_get(cmd->rsc_id);
	+
	+ CRM_CHECK(node != NULL, return);
	+ crm_update_peer_state(__FUNCTION__, node, CRM_NODE_MEMBER, 0);
	+
	} else if (safe_str_eq(cmd->action, "stop")) {
	lrm_state_t *lrm_state = lrm_state_find(cmd->rsc_id);
	remote_ra_data_t *ra_data = lrm_state? lrm_state->remote_ra_data : NULL;

	if (ra_data) {
	if (ra_data->migrate_status != takeover_complete) {
	/* Stop means down if we didn't successfully migrate elsewhere */
	remote_node_down(cmd->rsc_id);
	} else if (AM_I_DC == FALSE) {
	/* Only the connection host and DC track node state,
	* so if the connection migrated elsewhere and we aren't DC,
	* un-cache the node, so we don't have stale info
	*/
	crm_remote_peer_cache_remove(cmd->rsc_id);
	}
	}
	}
	}

	static void
	report_remote_ra_result(remote_ra_cmd_t * cmd)
	{
	lrmd_event_data_t op = { 0, };

	check_remote_node_state(cmd);

	op.type = lrmd_event_exec_complete;
	op.rsc_id = cmd->rsc_id;
	op.op_type = cmd->action;
	op.user_data = cmd->userdata;
	op.timeout = cmd->timeout;
	op.interval = cmd->interval;
	op.rc = cmd->rc;
	op.op_status = cmd->op_status;
	op.t_run = cmd->start_time;
	op.t_rcchange = cmd->start_time;
	if (cmd->reported_success && cmd->rc != PCMK_OCF_OK) {
	op.t_rcchange = time(NULL);
	/* This edge case will likely never ever occur, but if it does the
	* result is that a failure will not be processed correctly. This is only
	* remotely possible because we are able to detect a connection resource's tcp
	* connection has failed at any moment after start has completed. The actual
	* recurring operation is just a connectivity ping.
	*
	* basically, we are not guaranteed that the first successful monitor op and
	* a subsequent failed monitor op will not occur in the same timestamp. We have to
	* make it look like the operations occurred at separate times though. */
	if (op.t_rcchange == op.t_run) {
	op.t_rcchange++;
	}
	}

	if (cmd->params) {
	lrmd_key_value_t *tmp;

	op.params = g_hash_table_new_full(crm_str_hash,
	g_str_equal, g_hash_destroy_str, g_hash_destroy_str);
	for (tmp = cmd->params; tmp; tmp = tmp->next) {
	g_hash_table_insert(op.params, strdup(tmp->key), strdup(tmp->value));
	}

	}
	op.call_id = cmd->call_id;
	op.remote_nodename = cmd->owner;

	lrm_op_callback(&op);

	if (op.params) {
	g_hash_table_destroy(op.params);
	}
	}

	static void
	update_remaining_timeout(remote_ra_cmd_t * cmd)
	{
	cmd->remaining_timeout = ((cmd->timeout / 1000) - (time(NULL) - cmd->start_time)) * 1000;
	}

	static gboolean
	retry_start_cmd_cb(gpointer data)
	{
	lrm_state_t *lrm_state = data;
	remote_ra_data_t *ra_data = lrm_state->remote_ra_data;
	remote_ra_cmd_t *cmd = NULL;
	int rc = -1;

	if (!ra_data \|\| !ra_data->cur_cmd) {
	return FALSE;
	}
	cmd = ra_data->cur_cmd;
	if (safe_str_neq(cmd->action, "start") && safe_str_neq(cmd->action, "migrate_from")) {
	return FALSE;
	}
	update_remaining_timeout(cmd);

	if (cmd->remaining_timeout > 0) {
	rc = handle_remote_ra_start(lrm_state, cmd, cmd->remaining_timeout);
	}

	if (rc != 0) {
	cmd->rc = PCMK_OCF_UNKNOWN_ERROR;
	cmd->op_status = PCMK_LRM_OP_ERROR;
	report_remote_ra_result(cmd);

	if (ra_data->cmds) {
	mainloop_set_trigger(ra_data->work);
	}
	ra_data->cur_cmd = NULL;
	free_cmd(cmd);
	} else {
	/* wait for connection event */
	}

	return FALSE;
	}


	static gboolean
	connection_takeover_timeout_cb(gpointer data)
	{
	lrm_state_t *lrm_state = NULL;
	remote_ra_cmd_t *cmd = data;

	crm_info("takeover event timed out for node %s", cmd->rsc_id);
	cmd->takeover_timeout_id = 0;

	lrm_state = lrm_state_find(cmd->rsc_id);

	handle_remote_ra_stop(lrm_state, cmd);
	free_cmd(cmd);

	return FALSE;
	}

	static gboolean
	monitor_timeout_cb(gpointer data)
	{
	lrm_state_t *lrm_state = NULL;
	remote_ra_cmd_t *cmd = data;

	lrm_state = lrm_state_find(cmd->rsc_id);

	crm_info("Poke async response timed out for node %s (%p)", cmd->rsc_id, lrm_state);
	cmd->monitor_timeout_id = 0;
	cmd->op_status = PCMK_LRM_OP_TIMEOUT;
	cmd->rc = PCMK_OCF_UNKNOWN_ERROR;

	if (lrm_state && lrm_state->remote_ra_data) {
	remote_ra_data_t *ra_data = lrm_state->remote_ra_data;

	if (ra_data->cur_cmd == cmd) {
	ra_data->cur_cmd = NULL;
	}
	if (ra_data->cmds) {
	mainloop_set_trigger(ra_data->work);
	}
	}

	report_remote_ra_result(cmd);
	free_cmd(cmd);

	if(lrm_state) {
	lrm_state_disconnect(lrm_state);
	}
	return FALSE;
	}

	void
	remote_lrm_op_callback(lrmd_event_data_t * op)
	{
	gboolean cmd_handled = FALSE;
	lrm_state_t *lrm_state = NULL;
	remote_ra_data_t *ra_data = NULL;
	remote_ra_cmd_t *cmd = NULL;

	crm_debug("remote connection event - event_type:%s node:%s action:%s rc:%s op_status:%s",
	lrmd_event_type2str(op->type),
	op->remote_nodename,
	op->op_type ? op->op_type : "none",
	services_ocf_exitcode_str(op->rc), services_lrm_status_str(op->op_status));

	lrm_state = lrm_state_find(op->remote_nodename);
	if (!lrm_state \|\| !lrm_state->remote_ra_data) {
	crm_debug("lrm_state info not found for remote lrmd connection event");
	return;
	}
	ra_data = lrm_state->remote_ra_data;

	/* Another client has connected to the remote daemon,
	* determine if this is expected. */
	if (op->type == lrmd_event_new_client) {
	/* great, we new this was coming */
	if (ra_data->migrate_status == expect_takeover) {
	ra_data->migrate_status = takeover_complete;
	} else {
	crm_err("Unexpected pacemaker_remote client takeover. Disconnecting");
	lrm_state_disconnect(lrm_state);
	}
	return;
	}

	/* filter all EXEC events up */
	if (op->type == lrmd_event_exec_complete) {
	if (ra_data->migrate_status == takeover_complete) {
	crm_debug("ignoring event, this connection is taken over by another node");
	} else {
	lrm_op_callback(op);
	}
	return;
	}

	if ((op->type == lrmd_event_disconnect) &&
	(ra_data->cur_cmd == NULL) &&
	(ra_data->active == TRUE)) {

	crm_err("Unexpected disconnect on remote-node %s", lrm_state->node_name);
	ra_data->recurring_cmds = fail_all_monitor_cmds(ra_data->recurring_cmds);
	ra_data->cmds = fail_all_monitor_cmds(ra_data->cmds);
	return;
	}

	if (!ra_data->cur_cmd) {
	crm_debug("no event to match");
	return;
	}

	cmd = ra_data->cur_cmd;

	/* Start actions and migrate from actions complete after connection
	* comes back to us. */
	if (op->type == lrmd_event_connect && (safe_str_eq(cmd->action, "start") \|\|
	safe_str_eq(cmd->action, "migrate_from"))) {

	if (op->connection_rc < 0) {
	update_remaining_timeout(cmd);
	/* There isn't much of a reason to reschedule if the timeout is too small */
	if (cmd->remaining_timeout > 3000) {
	crm_trace("rescheduling start, remaining timeout %d", cmd->remaining_timeout);
	g_timeout_add(1000, retry_start_cmd_cb, lrm_state);
	return;
	} else {
	crm_trace("can't reschedule start, remaining timeout too small %d",
	cmd->remaining_timeout);
	}
	cmd->op_status = PCMK_LRM_OP_TIMEOUT;
	cmd->rc = PCMK_OCF_UNKNOWN_ERROR;

	} else {
	lrm_state_reset_tables(lrm_state);
	cmd->rc = PCMK_OCF_OK;
	cmd->op_status = PCMK_LRM_OP_DONE;
	ra_data->active = TRUE;
	}

	crm_debug("remote lrmd connect event matched %s action. ", cmd->action);
	report_remote_ra_result(cmd);
	cmd_handled = TRUE;

	} else if (op->type == lrmd_event_poke && safe_str_eq(cmd->action, "monitor")) {

	if (cmd->monitor_timeout_id) {
	g_source_remove(cmd->monitor_timeout_id);
	cmd->monitor_timeout_id = 0;
	}

	/* Only report success the first time, after that only worry about failures.
	* For this function, if we get the poke pack, it is always a success. Pokes
	* only fail if the send fails, or the response times out. */
	if (!cmd->reported_success) {
	cmd->rc = PCMK_OCF_OK;
	cmd->op_status = PCMK_LRM_OP_DONE;
	report_remote_ra_result(cmd);
	cmd->reported_success = 1;
	}

	crm_debug("remote lrmd poke event matched %s action. ", cmd->action);

	/* success, keep rescheduling if interval is present. */
	if (cmd->interval && (cmd->cancel == FALSE)) {
	ra_data->recurring_cmds = g_list_append(ra_data->recurring_cmds, cmd);
	cmd->interval_id = g_timeout_add(cmd->interval, recurring_helper, cmd);
	cmd = NULL; /* prevent free */
	}
	cmd_handled = TRUE;

	} else if (op->type == lrmd_event_disconnect && safe_str_eq(cmd->action, "monitor")) {
	if (ra_data->active == TRUE && (cmd->cancel == FALSE)) {
	cmd->rc = PCMK_OCF_UNKNOWN_ERROR;
	cmd->op_status = PCMK_LRM_OP_ERROR;
	report_remote_ra_result(cmd);
	crm_err("remote-node %s unexpectedly disconneced during monitor operation", lrm_state->node_name);
	}
	cmd_handled = TRUE;

	} else if (op->type == lrmd_event_new_client && safe_str_eq(cmd->action, "stop")) {

	handle_remote_ra_stop(lrm_state, cmd);
	cmd_handled = TRUE;

	} else {
	crm_debug("Event did not match %s action", ra_data->cur_cmd->action);
	}

	if (cmd_handled) {
	ra_data->cur_cmd = NULL;
	if (ra_data->cmds) {
	mainloop_set_trigger(ra_data->work);
	}
	free_cmd(cmd);
	}
	}

	static void
	handle_remote_ra_stop(lrm_state_t * lrm_state, remote_ra_cmd_t * cmd)
	{
	remote_ra_data_t *ra_data = NULL;

	CRM_ASSERT(lrm_state);
	ra_data = lrm_state->remote_ra_data;

	if (ra_data->migrate_status != takeover_complete) {
	/* delete pending ops when ever the remote connection is intentionally stopped */
	g_hash_table_remove_all(lrm_state->pending_ops);
	} else {
	/* we no longer hold the history if this connection has been migrated */
	lrm_state_reset_tables(lrm_state);
	}

	ra_data->active = FALSE;
	lrm_state_disconnect(lrm_state);
	cmd->rc = PCMK_OCF_OK;
	cmd->op_status = PCMK_LRM_OP_DONE;

	if (ra_data->cmds) {
	g_list_free_full(ra_data->cmds, free_cmd);
	}
	if (ra_data->recurring_cmds) {
	g_list_free_full(ra_data->recurring_cmds, free_cmd);
	}
	ra_data->cmds = NULL;
	ra_data->recurring_cmds = NULL;
	ra_data->cur_cmd = NULL;

	report_remote_ra_result(cmd);
	}

	static int
	handle_remote_ra_start(lrm_state_t * lrm_state, remote_ra_cmd_t * cmd, int timeout_ms)
	{
	const char *server = NULL;
	lrmd_key_value_t *tmp = NULL;
	int port = 0;
	int timeout_used = timeout_ms > MAX_START_TIMEOUT_MS ? MAX_START_TIMEOUT_MS : timeout_ms;

	for (tmp = cmd->params; tmp; tmp = tmp->next) {
	if (safe_str_eq(tmp->key, "addr") \|\| safe_str_eq(tmp->key, "server")) {
	server = tmp->value;
	}
	if (safe_str_eq(tmp->key, "port")) {
	port = atoi(tmp->value);
	}
	}

	return lrm_state_remote_connect_async(lrm_state, server, port, timeout_used);
	}

	static gboolean
	handle_remote_ra_exec(gpointer user_data)
	{
	int rc = 0;
	lrm_state_t *lrm_state = user_data;
	remote_ra_data_t *ra_data = lrm_state->remote_ra_data;
	remote_ra_cmd_t *cmd;
	GList *first = NULL;

	if (ra_data->cur_cmd) {
	/* still waiting on previous cmd */
	return TRUE;
	}

	while (ra_data->cmds) {
	first = ra_data->cmds;
	cmd = first->data;
	if (cmd->delay_id) {
	/* still waiting for start delay timer to trip */
	return TRUE;
	}

	ra_data->cmds = g_list_remove_link(ra_data->cmds, first);
	g_list_free_1(first);

	if (!strcmp(cmd->action, "start") \|\| !strcmp(cmd->action, "migrate_from")) {
	ra_data->migrate_status = 0;
	rc = handle_remote_ra_start(lrm_state, cmd, cmd->timeout);
	if (rc == 0) {
	/* take care of this later when we get async connection result */
	crm_debug("began remote lrmd connect, waiting for connect event.");
	ra_data->cur_cmd = cmd;
	return TRUE;
	} else {
	crm_debug("connect failed, not expecting to match any connection event later");
	cmd->rc = PCMK_OCF_UNKNOWN_ERROR;
	cmd->op_status = PCMK_LRM_OP_ERROR;
	}
	report_remote_ra_result(cmd);

	} else if (!strcmp(cmd->action, "monitor")) {

	if (lrm_state_is_connected(lrm_state) == TRUE) {
	rc = lrm_state_poke_connection(lrm_state);
	if (rc < 0) {
	cmd->rc = PCMK_OCF_UNKNOWN_ERROR;
	cmd->op_status = PCMK_LRM_OP_ERROR;
	}
	} else {
	rc = -1;
	cmd->op_status = PCMK_LRM_OP_DONE;
	cmd->rc = PCMK_OCF_NOT_RUNNING;
	}

	if (rc == 0) {
	crm_debug("poked remote lrmd at node %s, waiting for async response.", cmd->rsc_id);
	ra_data->cur_cmd = cmd;
	cmd->monitor_timeout_id = g_timeout_add(cmd->timeout, monitor_timeout_cb, cmd);
	return TRUE;
	}
	report_remote_ra_result(cmd);

	} else if (!strcmp(cmd->action, "stop")) {

	if (ra_data->migrate_status == expect_takeover) {
	/* briefly wait on stop for the takeover event to occur. If the
	* takeover event does not occur during the wait period, that's fine.
	* It just means that the remote-node's lrm_status section is going to get
	* cleared which will require all the resources running in the remote-node
	* to be explicitly re-detected via probe actions. If the takeover does occur
	* successfully, then we can leave the status section intact. */
	cmd->takeover_timeout_id = g_timeout_add((cmd->timeout/2), connection_takeover_timeout_cb, cmd);
	ra_data->cur_cmd = cmd;
	return TRUE;
	}

	handle_remote_ra_stop(lrm_state, cmd);

	} else if (!strcmp(cmd->action, "migrate_to")) {
	ra_data->migrate_status = expect_takeover;
	cmd->rc = PCMK_OCF_OK;
	cmd->op_status = PCMK_LRM_OP_DONE;
	report_remote_ra_result(cmd);
	} else if (!strcmp(cmd->action, "reload")) {
	/* reloads are a no-op right now, add logic here when they become important */
	cmd->rc = PCMK_OCF_OK;
	cmd->op_status = PCMK_LRM_OP_DONE;
	report_remote_ra_result(cmd);
	}

	free_cmd(cmd);
	}

	return TRUE;
	}

	static void
	remote_ra_data_init(lrm_state_t * lrm_state)
	{
	remote_ra_data_t *ra_data = NULL;

	if (lrm_state->remote_ra_data) {
	return;
	}

	ra_data = calloc(1, sizeof(remote_ra_data_t));
	ra_data->work = mainloop_add_trigger(G_PRIORITY_HIGH, handle_remote_ra_exec, lrm_state);
	lrm_state->remote_ra_data = ra_data;
	}

	void
	remote_ra_cleanup(lrm_state_t * lrm_state)
	{
	remote_ra_data_t *ra_data = lrm_state->remote_ra_data;

	if (!ra_data) {
	return;
	}

	if (ra_data->cmds) {
	g_list_free_full(ra_data->cmds, free_cmd);
	}

	if (ra_data->recurring_cmds) {
	g_list_free_full(ra_data->recurring_cmds, free_cmd);
	}
	mainloop_destroy_trigger(ra_data->work);
	free(ra_data);
	lrm_state->remote_ra_data = NULL;
	}

	gboolean
	is_remote_lrmd_ra(const char agent, const char provider, const char *id)
	{
	if (agent && provider && !strcmp(agent, REMOTE_LRMD_RA) && !strcmp(provider, "pacemaker")) {
	return TRUE;
	}
	if (id && lrm_state_find(id) && safe_str_neq(id, fsa_our_uname)) {
	return TRUE;
	}

	return FALSE;
	}

	lrmd_rsc_info_t *
	remote_ra_get_rsc_info(lrm_state_t * lrm_state, const char *rsc_id)
	{
	lrmd_rsc_info_t *info = NULL;

	if ((lrm_state_find(rsc_id))) {
	info = calloc(1, sizeof(lrmd_rsc_info_t));

	info->id = strdup(rsc_id);
	info->type = strdup(REMOTE_LRMD_RA);
	info->class = strdup("ocf");
	info->provider = strdup("pacemaker");
	}

	return info;
	}

	static gboolean
	is_remote_ra_supported_action(const char *action)
	{
	if (!action) {
	return FALSE;
	} else if (strcmp(action, "start") &&
	strcmp(action, "stop") &&
	strcmp(action, "reload") &&
	strcmp(action, "migrate_to") &&
	strcmp(action, "migrate_from") && strcmp(action, "monitor")) {
	return FALSE;
	}

	return TRUE;
	}

	static GList *
	fail_all_monitor_cmds(GList * list)
	{
	GList *rm_list = NULL;
	remote_ra_cmd_t *cmd = NULL;
	GListPtr gIter = NULL;

	for (gIter = list; gIter != NULL; gIter = gIter->next) {
	cmd = gIter->data;
	if (cmd->interval > 0 && safe_str_eq(cmd->action, "monitor")) {
	rm_list = g_list_append(rm_list, cmd);
	}
	}

	for (gIter = rm_list; gIter != NULL; gIter = gIter->next) {
	cmd = gIter->data;

	cmd->rc = PCMK_OCF_UNKNOWN_ERROR;
	cmd->op_status = PCMK_LRM_OP_ERROR;
	crm_trace("Pre-emptively failing %s %s (interval=%d, %s)", cmd->action, cmd->rsc_id, cmd->interval, cmd->userdata);
	report_remote_ra_result(cmd);

	list = g_list_remove(list, cmd);
	free_cmd(cmd);
	}

	/* frees only the list data, not the cmds */
	g_list_free(rm_list);
	return list;
	}

	static GList *
	remove_cmd(GList * list, const char *action, int interval)
	{
	remote_ra_cmd_t *cmd = NULL;
	GListPtr gIter = NULL;

	for (gIter = list; gIter != NULL; gIter = gIter->next) {
	cmd = gIter->data;
	if (cmd->interval == interval && safe_str_eq(cmd->action, action)) {
	break;
	}
	cmd = NULL;
	}
	if (cmd) {
	list = g_list_remove(list, cmd);
	free_cmd(cmd);
	}
	return list;
	}

	int
	remote_ra_cancel(lrm_state_t * lrm_state, const char rsc_id, const char action, int interval)
	{
	lrm_state_t *connection_rsc = NULL;
	remote_ra_data_t *ra_data = NULL;

	connection_rsc = lrm_state_find(rsc_id);
	if (!connection_rsc \|\| !connection_rsc->remote_ra_data) {
	return -EINVAL;
	}

	ra_data = connection_rsc->remote_ra_data;
	ra_data->cmds = remove_cmd(ra_data->cmds, action, interval);
	ra_data->recurring_cmds = remove_cmd(ra_data->recurring_cmds, action, interval);
	if (ra_data->cur_cmd &&
	(ra_data->cur_cmd->interval == interval) &&
	(safe_str_eq(ra_data->cur_cmd->action, action))) {

	ra_data->cur_cmd->cancel = TRUE;
	}

	return 0;
	}

	static remote_ra_cmd_t *
	handle_dup_monitor(remote_ra_data_t ra_data, int interval, const char userdata)
	{
	GList *gIter = NULL;
	remote_ra_cmd_t *cmd = NULL;

	/* there are 3 places a potential duplicate monitor operation
	* could exist.
	* 1. recurring_cmds list. where the op is waiting for its next interval
	* 2. cmds list, where the op is queued to get executed immediately
	* 3. cur_cmd, which means the monitor op is in flight right now.
	*/
	if (interval == 0) {
	return NULL;
	}

	if (ra_data->cur_cmd &&
	ra_data->cur_cmd->cancel == FALSE &&
	ra_data->cur_cmd->interval == interval &&
	safe_str_eq(ra_data->cur_cmd->action, "monitor")) {

	cmd = ra_data->cur_cmd;
	goto handle_dup;
	}

	for (gIter = ra_data->recurring_cmds; gIter != NULL; gIter = gIter->next) {
	cmd = gIter->data;
	if (cmd->interval == interval && safe_str_eq(cmd->action, "monitor")) {
	goto handle_dup;
	}
	}

	for (gIter = ra_data->cmds; gIter != NULL; gIter = gIter->next) {
	cmd = gIter->data;
	if (cmd->interval == interval && safe_str_eq(cmd->action, "monitor")) {
	goto handle_dup;
	}
	}

	return NULL;

	handle_dup:

	crm_trace("merging duplicate monitor cmd %s_monitor_%d", cmd->rsc_id, interval);

	/* update the userdata */
	if (userdata) {
	free(cmd->userdata);
	cmd->userdata = strdup(userdata);
	}

	/* if we've already reported success, generate a new call id */
	if (cmd->reported_success) {
	cmd->start_time = time(NULL);
	cmd->call_id = generate_callid();
	cmd->reported_success = 0;
	}

	/* if we have an interval_id set, that means we are in the process of
	* waiting for this cmd's next interval. instead of waiting, cancel
	* the timer and execute the action immediately */
	if (cmd->interval_id) {
	g_source_remove(cmd->interval_id);
	cmd->interval_id = 0;
	recurring_helper(cmd);
	}

	return cmd;
	}

	int
	remote_ra_exec(lrm_state_t * lrm_state, const char rsc_id, const char action, const char userdata, int interval, / ms */
	int timeout, /* ms */
	int start_delay, /* ms */
	lrmd_key_value_t * params)
	{
	int rc = 0;
	lrm_state_t *connection_rsc = NULL;
	remote_ra_cmd_t *cmd = NULL;
	remote_ra_data_t *ra_data = NULL;

	if (is_remote_ra_supported_action(action) == FALSE) {
	rc = -EINVAL;
	goto exec_done;
	}

	connection_rsc = lrm_state_find(rsc_id);
	if (!connection_rsc) {
	rc = -EINVAL;
	goto exec_done;
	}

	remote_ra_data_init(connection_rsc);
	ra_data = connection_rsc->remote_ra_data;

	cmd = handle_dup_monitor(ra_data, interval, userdata);
	if (cmd) {
	return cmd->call_id;
	}

	cmd = calloc(1, sizeof(remote_ra_cmd_t));
	cmd->owner = strdup(lrm_state->node_name);
	cmd->rsc_id = strdup(rsc_id);
	cmd->action = strdup(action);
	cmd->userdata = strdup(userdata);
	cmd->interval = interval;
	cmd->timeout = timeout;
	cmd->start_delay = start_delay;
	cmd->params = params;
	cmd->start_time = time(NULL);

	cmd->call_id = generate_callid();

	if (cmd->start_delay) {
	cmd->delay_id = g_timeout_add(cmd->start_delay, start_delay_helper, cmd);
	}

	ra_data->cmds = g_list_append(ra_data->cmds, cmd);
	mainloop_set_trigger(ra_data->work);

	return cmd->call_id;
	exec_done:

	lrmd_key_value_freeall(params);
	return rc;
	}

File Metadata

Mime Type: text/x-diff
Expires: Tue, Jul 8, 6:00 PM (1 d, 2 h)
Storage Engine: blob
Storage Format: Raw Data
Storage Handle: 2002429
Default Alt Text: (31 KB)

No OneTemporaryActions

View Options

File Metadata

Event Timeline

No OneTemporary
Actions