No OneTemporary
Actions

Size

46 KB

Referenced Files

None

Subscribers

None

View Options

	diff --git a/include/crm/msg_xml.h b/include/crm/msg_xml.h
	index be8895e77e..cecbc4afd4 100644
	--- a/include/crm/msg_xml.h
	+++ b/include/crm/msg_xml.h
	@@ -1,326 +1,327 @@
	/*
	* Copyright 2004-2024 the Pacemaker project contributors
	*
	* The version control history for this file may have further details.
	*
	* This source code is licensed under the GNU Lesser General Public License
	* version 2.1 or later (LGPLv2.1+) WITHOUT ANY WARRANTY.
	*/

	#ifndef PCMK__CRM_MSG_XML__H
	# define PCMK__CRM_MSG_XML__H

	# include <crm/common/xml.h>

	#if !defined(PCMK_ALLOW_DEPRECATED) \|\| (PCMK_ALLOW_DEPRECATED == 1)
	#include <crm/msg_xml_compat.h>
	#endif

	#ifdef __cplusplus
	extern "C" {
	#endif

	/* This file defines constants for various XML syntax (mainly element and
	* attribute names).
	*
	* For consistency, new constants should start with "PCMK_", followed by:
	* * "XE" for XML element names
	* * "XA" for XML attribute names
	* * "OPT" for cluster option (property) names
	* * "META" for meta-attribute names
	* * "VALUE" for enumerated values for various options
	*
	* Old names that don't follow this policy should eventually be deprecated and
	* replaced with names that do.
	*
	* Symbols should be public if the user may specify them somewhere (especially
	* the CIB) or if they're part of a well-defined structure that a user may need
	* to parse. They should be internal if they're used only internally to
	* Pacemaker (such as daemon IPC/CPG message XML).
	*
	* Constants belong in the following locations:
	* * Public "XE" and "XA": msg_xml.h
	* * Internal "XE" and "XA": crm_internal.h
	* * Public "OPT", "META", and "VALUE": options.h
	* * Internal "OPT", "META", and "VALUE": options_internal.h
	*
	* For meta-attributes that can be specified as either XML attributes or nvpair
	* names, use "META" unless using both "XA" and "META" constants adds clarity.
	* An example is operation attributes, which can be specified either as
	* attributes of the PCMK_XE_OP element or as nvpairs in a meta-attribute set
	* beneath the PCMK_XE_OP element.
	*/

	/*
	* XML elements
	*/

	#define PCMK_XE_ACL_GROUP "acl_group"
	#define PCMK_XE_ACL_PERMISSION "acl_permission"
	#define PCMK_XE_ACL_ROLE "acl_role"
	#define PCMK_XE_ACL_TARGET "acl_target"
	#define PCMK_XE_ACLS "acls"
	#define PCMK_XE_ACTION "action"
	#define PCMK_XE_ACTIONS "actions"
	+#define PCMK_XE_AGENT_STATUS "agent-status"
	#define PCMK_XE_ALERT "alert"
	#define PCMK_XE_ALERTS "alerts"
	#define PCMK_XE_ATTRIBUTE "attribute"
	#define PCMK_XE_BUNDLE "bundle"
	#define PCMK_XE_CHANGE "change"
	#define PCMK_XE_CHANGE_ATTR "change-attr"
	#define PCMK_XE_CHANGE_LIST "change-list"
	#define PCMK_XE_CHANGE_RESULT "change-result"
	#define PCMK_XE_CIB "cib"
	#define PCMK_XE_CLONE "clone"
	#define PCMK_XE_CLUSTER_PROPERTY_SET "cluster_property_set"
	#define PCMK_XE_COMMAND "command"
	#define PCMK_XE_CONFIGURATION "configuration"
	#define PCMK_XE_CONSTRAINTS "constraints"
	#define PCMK_XE_CONTENT "content"
	#define PCMK_XE_CRM_CONFIG "crm_config"
	#define PCMK_XE_DATE_EXPRESSION "date_expression"
	#define PCMK_XE_DATE_SPEC "date_spec"
	#define PCMK_XE_DIFF "diff"
	#define PCMK_XE_DURATION "duration"
	#define PCMK_XE_EXPRESSION "expression"
	#define PCMK_XE_FEATURE "feature"
	#define PCMK_XE_FEATURES "features"
	#define PCMK_XE_FENCE_EVENT "fence_event"
	#define PCMK_XE_FENCE_HISTORY "fence_history"
	#define PCMK_XE_FENCING_LEVEL "fencing-level"
	#define PCMK_XE_FENCING_TOPOLOGY "fencing-topology"
	#define PCMK_XE_GROUP "group"
	#define PCMK_XE_INSTANCE_ATTRIBUTES "instance_attributes"
	#define PCMK_XE_LAST_FENCED "last-fenced"
	#define PCMK_XE_LONGDESC "longdesc"
	#define PCMK_XE_META_ATTRIBUTES "meta_attributes"
	#define PCMK_XE_NETWORK "network"
	#define PCMK_XE_NODE "node"
	#define PCMK_XE_NODES "nodes"
	#define PCMK_XE_NVPAIR "nvpair"
	#define PCMK_XE_OBJ_REF "obj_ref"
	#define PCMK_XE_OP "op"
	#define PCMK_XE_OP_DEFAULTS "op_defaults"
	#define PCMK_XE_OPERATION "operation"
	#define PCMK_XE_OP_EXPRESSION "op_expression"
	#define PCMK_XE_OPTION "option"
	#define PCMK_XE_OUTPUT "output"
	#define PCMK_XE_PACEMAKERD "pacemakerd"
	#define PCMK_XE_PARAMETER "parameter"
	#define PCMK_XE_PARAMETERS "parameters"
	#define PCMK_XE_PORT_MAPPING "port-mapping"
	#define PCMK_XE_POSITION "position"
	#define PCMK_XE_PRIMITIVE "primitive"
	#define PCMK_XE_RECIPIENT "recipient"
	#define PCMK_XE_REPLICA "replica"
	#define PCMK_XE_RESOURCE "resource"
	#define PCMK_XE_RESOURCE_AGENT "resource-agent"
	#define PCMK_XE_RESOURCE_REF "resource_ref"
	#define PCMK_XE_RESOURCE_SET "resource_set"
	#define PCMK_XE_RESOURCES "resources"
	#define PCMK_XE_ROLE "role"
	#define PCMK_XE_RSC_ACTION "rsc_action"
	#define PCMK_XE_RSC_COLOCATION "rsc_colocation"
	#define PCMK_XE_RSC_DEFAULTS "rsc_defaults"
	#define PCMK_XE_RSC_EXPRESSION "rsc_expression"
	#define PCMK_XE_RSC_LOCATION "rsc_location"
	#define PCMK_XE_RSC_ORDER "rsc_order"
	#define PCMK_XE_RSC_TICKET "rsc_ticket"
	#define PCMK_XE_RULE "rule"
	#define PCMK_XE_SELECT "select"
	#define PCMK_XE_SELECT_ATTRIBUTES "select_attributes"
	#define PCMK_XE_SELECT_FENCING "select_fencing"
	#define PCMK_XE_SELECT_NODES "select_nodes"
	#define PCMK_XE_SELECT_RESOURCES "select_resources"
	#define PCMK_XE_SHORTDESC "shortdesc"
	#define PCMK_XE_SOURCE "source"
	#define PCMK_XE_STATUS "status"
	#define PCMK_XE_STORAGE "storage"
	#define PCMK_XE_STORAGE_MAPPING "storage-mapping"
	#define PCMK_XE_TAG "tag"
	#define PCMK_XE_TAGS "tags"
	#define PCMK_XE_TARGET "target"
	#define PCMK_XE_TEMPLATE "template"
	#define PCMK_XE_TICKET "ticket"
	#define PCMK_XE_TICKETS "tickets"
	#define PCMK_XE_UTILIZATION "utilization"
	#define PCMK_XE_VERSION "version"


	/*
	* XML attributes
	*/

	#define PCMK_XA_ACTION "action"
	#define PCMK_XA_ACTIVE "active"
	#define PCMK_XA_ADD_HOST "add-host"
	#define PCMK_XA_ADMIN_EPOCH "admin_epoch"
	#define PCMK_XA_ATTRIBUTE "attribute"
	#define PCMK_XA_AUTHOR "author"
	#define PCMK_XA_BLOCKED "blocked"
	#define PCMK_XA_BOOLEAN_OP "boolean-op"
	#define PCMK_XA_BUILD "build"
	#define PCMK_XA_CIB_LAST_WRITTEN "cib-last-written"
	#define PCMK_XA_CLASS "class"
	#define PCMK_XA_CLIENT "client"
	#define PCMK_XA_CODE "code"
	#define PCMK_XA_COMPLETED "completed"
	#define PCMK_XA_CONTROL_PORT "control-port"
	#define PCMK_XA_CRM_DEBUG_ORIGIN "crm-debug-origin"
	#define PCMK_XA_CRM_FEATURE_SET "crm_feature_set"
	#define PCMK_XA_CRM_TIMESTAMP "crm-timestamp"
	#define PCMK_XA_DAYS "days"
	#define PCMK_XA_DC_UUID "dc-uuid"
	#define PCMK_XA_DEFAULT "default"
	#define PCMK_XA_DELEGATE "delegate"
	#define PCMK_XA_DESCRIPTION "description"
	#define PCMK_XA_DEST "dest"
	#define PCMK_XA_DEVICES "devices"
	#define PCMK_XA_DISABLED "disabled"
	#define PCMK_XA_DURATION "duration"
	#define PCMK_XA_END "end"
	#define PCMK_XA_EPOCH "epoch"
	#define PCMK_XA_EXEC_TIME "exec-time"
	#define PCMK_XA_EXECUTION_DATE "execution-date"
	#define PCMK_XA_EXIT_REASON "exit-reason"
	#define PCMK_XA_EXPECTED_UP "expected_up"
	#define PCMK_XA_EXTENDED_STATUS "extended-status"
	#define PCMK_XA_FAILED "failed"
	#define PCMK_XA_FAILURE_IGNORED "failure_ignored"
	#define PCMK_XA_FEATURE_SET "feature_set"
	#define PCMK_XA_FEATURES "features"
	#define PCMK_XA_FIRST "first"
	#define PCMK_XA_FIRST_ACTION "first-action"
	#define PCMK_XA_FORMAT "format"
	#define PCMK_XA_HAVE_QUORUM "have-quorum"
	#define PCMK_XA_HEALTH "health"
	#define PCMK_XA_HOST "host"
	#define PCMK_XA_HOST_INTERFACE "host-interface"
	#define PCMK_XA_HOST_NETMASK "host-netmask"
	#define PCMK_XA_HOURS "hours"
	#define PCMK_XA_ID "id"
	#define PCMK_XA_ID_AS_RESOURCE "id_as_resource"
	#define PCMK_XA_ID_REF "id-ref"
	#define PCMK_XA_IMAGE "image"
	#define PCMK_XA_INDEX "index"
	#define PCMK_XA_INFLUENCE "influence"
	#define PCMK_XA_INTERNAL_PORT "internal-port"
	#define PCMK_XA_IP_RANGE_START "ip-range-start"
	#define PCMK_XA_IS_DC "is_dc"
	#define PCMK_XA_KIND "kind"
	#define PCMK_XA_LANG "lang"
	#define PCMK_XA_LAST_GRANTED "last-granted"
	#define PCMK_XA_LAST_RC_CHANGE "last-rc-change"
	#define PCMK_XA_LOCKED_TO "locked_to"
	#define PCMK_XA_LOSS_POLICY "loss-policy"
	#define PCMK_XA_MAINTENANCE "maintenance"
	#define PCMK_XA_MANAGED "managed"
	#define PCMK_XA_MESSAGE "message"
	#define PCMK_XA_MINUTES "minutes"
	#define PCMK_XA_MIXED_VERSION "mixed_version"
	#define PCMK_XA_MONTHDAYS "monthdays"
	#define PCMK_XA_MONTHS "months"
	#define PCMK_XA_MULTI_STATE "multi_state"
	#define PCMK_XA_NAME "name"
	#define PCMK_XA_NETWORK "network"
	#define PCMK_XA_NEXT_ROLE "next-role"
	#define PCMK_XA_NO_QUORUM_PANIC "no-quorum-panic"
	#define PCMK_XA_NODE "node"
	#define PCMK_XA_NODE_ATTRIBUTE "node-attribute"
	#define PCMK_XA_NODES_RUNNING_ON "nodes_running_on"
	#define PCMK_XA_NUM_UPDATES "num_updates"
	#define PCMK_XA_NUMBER "number"
	#define PCMK_XA_OBJECT_TYPE "object-type"
	#define PCMK_XA_ONLINE "online"
	#define PCMK_XA_OP "op"
	#define PCMK_XA_OPERATION "operation"
	#define PCMK_XA_OPTIONS "options"
	#define PCMK_XA_ORIGIN "origin"
	#define PCMK_XA_ORPHANED "orphaned"
	#define PCMK_XA_PATH "path"
	#define PCMK_XA_PENDING "pending"
	#define PCMK_XA_PORT "port"
	#define PCMK_XA_PRESENT "present"
	#define PCMK_XA_PROGRAM "program"
	#define PCMK_XA_PROMOTED_MAX "promoted-max"
	#define PCMK_XA_PROMOTED_ONLY "promoted-only"
	#define PCMK_XA_PROVIDER "provider"
	#define PCMK_XA_QUEUE_TIME "queue-time"
	#define PCMK_XA_RANGE "range"
	#define PCMK_XA_REASON "reason"
	#define PCMK_XA_REFERENCE "reference"
	#define PCMK_XA_RELOADABLE "reloadable"
	#define PCMK_XA_REMOTE_CLEAR_PORT "remote-clear-port"
	#define PCMK_XA_REMOTE_TLS_PORT "remote-tls-port"
	#define PCMK_XA_REPLICAS "replicas"
	#define PCMK_XA_REPLICAS_PER_HOST "replicas-per-host"
	#define PCMK_XA_REQUEST "request"
	#define PCMK_XA_REQUIRE_ALL "require-all"
	#define PCMK_XA_RESOURCE "resource"
	#define PCMK_XA_RESOURCE_AGENT "resource_agent"
	#define PCMK_XA_RESOURCE_DISCOVERY "resource-discovery"
	#define PCMK_XA_RESOURCES_RUNNING "resources_running"
	#define PCMK_XA_RESULT "result"
	#define PCMK_XA_ROLE "role"
	#define PCMK_XA_RSC "rsc"
	#define PCMK_XA_RSC_PATTERN "rsc-pattern"
	#define PCMK_XA_RSC_ROLE "rsc-role"
	#define PCMK_XA_RUN_COMMAND "run-command"
	#define PCMK_XA_RUNNING "running"
	#define PCMK_XA_SCOPE "scope"
	#define PCMK_XA_SCORE "score"
	#define PCMK_XA_SCORE_ATTRIBUTE "score-attribute"
	#define PCMK_XA_SEQUENTIAL "sequential"
	#define PCMK_XA_SECONDS "seconds"
	#define PCMK_XA_SHUTDOWN "shutdown"
	#define PCMK_XA_SOURCE "source"
	#define PCMK_XA_SOURCE_DIR "source-dir"
	#define PCMK_XA_SOURCE_DIR_ROOT "source-dir-root"
	#define PCMK_XA_STANDBY "standby"
	#define PCMK_XA_STANDBY_ONFAIL "standby_onfail"
	#define PCMK_XA_START "start"
	#define PCMK_XA_STATUS "status"
	#define PCMK_XA_SYMMETRICAL "symmetrical"
	#define PCMK_XA_TARGET "target"
	#define PCMK_XA_TARGET_ATTRIBUTE "target-attribute"
	#define PCMK_XA_TARGET_DIR "target-dir"
	#define PCMK_XA_TARGET_PATTERN "target-pattern"
	#define PCMK_XA_TARGET_ROLE "target_role"
	#define PCMK_XA_TARGET_VALUE "target-value"
	#define PCMK_XA_TEMPLATE "template"
	#define PCMK_XA_TICKET "ticket"
	#define PCMK_XA_TIME "time"
	#define PCMK_XA_THEN "then"
	#define PCMK_XA_THEN_ACTION "then-action"
	#define PCMK_XA_TYPE "type"
	#define PCMK_XA_UNAME "uname"
	#define PCMK_XA_UNCLEAN "unclean"
	#define PCMK_XA_UNIQUE "unique"
	#define PCMK_XA_UPDATE_CLIENT "update-client"
	#define PCMK_XA_UPDATE_ORIGIN "update-origin"
	#define PCMK_XA_UPDATE_USER "update-user"
	#define PCMK_XA_USER "user"
	#define PCMK_XA_VALIDATE_WITH "validate-with"
	#define PCMK_XA_VALUE "value"
	#define PCMK_XA_VALUE_SOURCE "value-source"
	#define PCMK_XA_VERSION "version"
	#define PCMK_XA_WEEKDAYS "weekdays"
	#define PCMK_XA_WEEKS "weeks"
	#define PCMK_XA_WEEKYEARS "weekyears"
	#define PCMK_XA_WEIGHT "weight"
	#define PCMK_XA_WHEN "when"
	#define PCMK_XA_WITH_QUORUM "with_quorum"
	#define PCMK_XA_WITH_RSC "with-rsc"
	#define PCMK_XA_WITH_RSC_ROLE "with-rsc-role"
	#define PCMK_XA_XPATH "xpath"
	#define PCMK_XA_YEARDAYS "yeardays"
	#define PCMK_XA_YEARS "years"


	# define ID(x) crm_element_value(x, PCMK_XA_ID)

	#ifdef __cplusplus
	}
	#endif

	#endif
	diff --git a/tools/crm_resource_print.c b/tools/crm_resource_print.c
	index ed82652de3..cdff3e9d4c 100644
	--- a/tools/crm_resource_print.c
	+++ b/tools/crm_resource_print.c
	@@ -1,831 +1,831 @@
	/*
	* Copyright 2004-2024 the Pacemaker project contributors
	*
	* The version control history for this file may have further details.
	*
	* This source code is licensed under the GNU General Public License version 2
	* or later (GPLv2+) WITHOUT ANY WARRANTY.
	*/

	#include <crm_internal.h>

	#include <stdint.h>

	#include <crm_resource.h>
	#include <crm/common/lists_internal.h>
	#include <crm/common/output.h>
	#include <crm/common/results.h>

	#define cons_string(x) x?x:"NA"
	static int
	print_constraint(xmlNode xml_obj, void userdata)
	{
	pcmk_scheduler_t scheduler = (pcmk_scheduler_t ) userdata;
	pcmk__output_t *out = scheduler->priv;
	xmlNode *lifetime = NULL;
	const char *id = crm_element_value(xml_obj, PCMK_XA_ID);

	if (id == NULL) {
	return pcmk_rc_ok;
	}

	// @COMPAT lifetime is deprecated
	lifetime = first_named_child(xml_obj, "lifetime");
	if (pe_evaluate_rules(lifetime, NULL, scheduler->now, NULL) == FALSE) {
	return pcmk_rc_ok;
	}

	if (!pcmk__xe_is(xml_obj, PCMK_XE_RSC_COLOCATION)) {
	return pcmk_rc_ok;
	}

	out->info(out, "Constraint %s %s %s %s %s %s %s",
	xml_obj->name,
	cons_string(crm_element_value(xml_obj, PCMK_XA_ID)),
	cons_string(crm_element_value(xml_obj, PCMK_XA_RSC)),
	cons_string(crm_element_value(xml_obj, PCMK_XA_WITH_RSC)),
	cons_string(crm_element_value(xml_obj, PCMK_XA_SCORE)),
	cons_string(crm_element_value(xml_obj, PCMK_XA_RSC_ROLE)),
	cons_string(crm_element_value(xml_obj, PCMK_XA_WITH_RSC_ROLE)));

	return pcmk_rc_ok;
	}

	void
	cli_resource_print_cts_constraints(pcmk_scheduler_t *scheduler)
	{
	pcmk__xe_foreach_child(pcmk_find_cib_element(scheduler->input,
	PCMK_XE_CONSTRAINTS),
	NULL, print_constraint, scheduler);
	}

	void
	cli_resource_print_cts(pcmk_resource_t rsc, pcmk__output_t out)
	{
	const char *host = NULL;
	bool needs_quorum = TRUE;
	const char *rtype = crm_element_value(rsc->xml, PCMK_XA_TYPE);
	const char *rprov = crm_element_value(rsc->xml, PCMK_XA_PROVIDER);
	const char *rclass = crm_element_value(rsc->xml, PCMK_XA_CLASS);
	pcmk_node_t *node = pcmk__current_node(rsc);

	if (pcmk__str_eq(rclass, PCMK_RESOURCE_CLASS_STONITH, pcmk__str_casei)) {
	needs_quorum = FALSE;
	} else {
	// @TODO check requires in resource meta-data and rsc_defaults
	}

	if (node != NULL) {
	host = node->details->uname;
	}

	out->info(out, "Resource: %s %s %s %s %s %s %s %s %d %lld %#.16llx",
	rsc->xml->name, rsc->id,
	rsc->clone_name ? rsc->clone_name : rsc->id, rsc->parent ? rsc->parent->id : "NA",
	rprov ? rprov : "NA", rclass, rtype, host ? host : "NA", needs_quorum, rsc->flags,
	rsc->flags);

	g_list_foreach(rsc->children, (GFunc) cli_resource_print_cts, out);
	}

	// \return Standard Pacemaker return code
	int
	cli_resource_print_operations(const char rsc_id, const char host_uname,
	bool active, pcmk_scheduler_t *scheduler)
	{
	pcmk__output_t *out = scheduler->priv;
	int rc = pcmk_rc_no_output;
	GList *ops = find_operations(rsc_id, host_uname, active, scheduler);

	if (!ops) {
	return rc;
	}

	out->begin_list(out, NULL, NULL, "Resource Operations");
	rc = pcmk_rc_ok;

	for (GList *lpc = ops; lpc != NULL; lpc = lpc->next) {
	xmlNode xml_op = (xmlNode ) lpc->data;
	out->message(out, "node-and-op", scheduler, xml_op);
	}

	out->end_list(out);
	return rc;
	}

	// \return Standard Pacemaker return code
	int
	cli_resource_print(pcmk_resource_t rsc, pcmk_scheduler_t scheduler,
	bool expanded)
	{
	pcmk__output_t *out = scheduler->priv;
	uint32_t show_opts = pcmk_show_pending;
	GList *all = NULL;

	all = g_list_prepend(all, (gpointer) "*");

	out->begin_list(out, NULL, NULL, "Resource Config");
	out->message(out, crm_map_element_name(rsc->xml), show_opts, rsc, all, all);
	out->message(out, "resource-config", rsc, !expanded);
	out->end_list(out);

	g_list_free(all);
	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("attribute-list", "pcmk_resource_t ", "const char ",
	"const char *")
	static int
	attribute_list_default(pcmk__output_t *out, va_list args) {
	pcmk_resource_t rsc = va_arg(args, pcmk_resource_t );
	const char attr = va_arg(args, char );
	const char value = va_arg(args, const char );

	if (value != NULL) {
	out->begin_list(out, NULL, NULL, "Attributes");
	out->list_item(out, attr, "%s", value);
	out->end_list(out);
	return pcmk_rc_ok;
	} else {
	out->err(out, "Attribute '%s' not found for '%s'", attr, rsc->id);
	}
	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("agent-status", "int", "const char ", "const char ", "const char *",
	"const char ", "const char ", "crm_exit_t", "const char *")
	static int
	agent_status_default(pcmk__output_t *out, va_list args) {
	int status = va_arg(args, int);
	const char action = va_arg(args, const char );
	const char name = va_arg(args, const char );
	const char class = va_arg(args, const char );
	const char provider = va_arg(args, const char );
	const char type = va_arg(args, const char );
	crm_exit_t rc = va_arg(args, crm_exit_t);
	const char exit_reason = va_arg(args, const char );

	if (status == PCMK_EXEC_DONE) {
	/* Operation <action> [for <resource>] (<class>[:<provider>]:<agent>)
	* returned <exit-code> (<exit-description>[: <exit-reason>])
	*/
	out->info(out, "Operation %s%s%s (%s%s%s:%s) returned %d (%s%s%s)",
	action,
	((name == NULL)? "" : " for "), ((name == NULL)? "" : name),
	class,
	((provider == NULL)? "" : ":"),
	((provider == NULL)? "" : provider),
	type, (int) rc, services_ocf_exitcode_str((int) rc),
	((exit_reason == NULL)? "" : ": "),
	((exit_reason == NULL)? "" : exit_reason));
	} else {
	/* Operation <action> [for <resource>] (<class>[:<provider>]:<agent>)
	* could not be executed (<execution-status>[: <exit-reason>])
	*/
	out->err(out,
	"Operation %s%s%s (%s%s%s:%s) could not be executed (%s%s%s)",
	action,
	((name == NULL)? "" : " for "), ((name == NULL)? "" : name),
	class,
	((provider == NULL)? "" : ":"),
	((provider == NULL)? "" : provider),
	type, pcmk_exec_status_str(status),
	((exit_reason == NULL)? "" : ": "),
	((exit_reason == NULL)? "" : exit_reason));
	}

	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("agent-status", "int", "const char ", "const char ", "const char *",
	"const char ", "const char ", "crm_exit_t", "const char *")
	static int
	agent_status_xml(pcmk__output_t *out, va_list args) {
	int status = va_arg(args, int);
	const char action G_GNUC_UNUSED = va_arg(args, const char );
	const char name G_GNUC_UNUSED = va_arg(args, const char );
	const char class G_GNUC_UNUSED = va_arg(args, const char );
	const char provider G_GNUC_UNUSED = va_arg(args, const char );
	const char type G_GNUC_UNUSED = va_arg(args, const char );
	crm_exit_t rc = va_arg(args, crm_exit_t);
	const char exit_reason = va_arg(args, const char );

	char *exit_s = pcmk__itoa(rc);
	const char *message = services_ocf_exitcode_str((int) rc);
	char *status_str = pcmk__itoa(status);

	- pcmk__output_create_xml_node(out, "agent-status",
	+ pcmk__output_create_xml_node(out, PCMK_XE_AGENT_STATUS,
	PCMK_XA_CODE, exit_s,
	PCMK_XA_MESSAGE, message,
	"execution_code", status_str,
	"execution_message", pcmk_exec_status_str(status),
	PCMK_XA_REASON, exit_reason,
	NULL);

	free(exit_s);
	free(status_str);

	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("attribute-list", "pcmk_resource_t ", "const char ",
	"const char *")
	static int
	attribute_list_text(pcmk__output_t *out, va_list args) {
	pcmk_resource_t rsc = va_arg(args, pcmk_resource_t );
	const char attr = va_arg(args, char );
	const char value = va_arg(args, const char );

	if (value != NULL) {
	pcmk__formatted_printf(out, "%s\n", value);
	return pcmk_rc_ok;
	} else {
	out->err(out, "Attribute '%s' not found for '%s'", attr, rsc->id);
	}
	return pcmk_rc_ok;
	}
	PCMK__OUTPUT_ARGS("override", "const char ", "const char ", "const char *")
	static int
	override_default(pcmk__output_t *out, va_list args) {
	const char rsc_name = va_arg(args, const char );
	const char name = va_arg(args, const char );
	const char value = va_arg(args, const char );

	if (rsc_name == NULL) {
	out->list_item(out, NULL, "Overriding the cluster configuration with '%s' = '%s'",
	name, value);
	} else {
	out->list_item(out, NULL, "Overriding the cluster configuration for '%s' with '%s' = '%s'",
	rsc_name, name, value);
	}

	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("override", "const char ", "const char ", "const char *")
	static int
	override_xml(pcmk__output_t *out, va_list args) {
	const char rsc_name = va_arg(args, const char );
	const char name = va_arg(args, const char );
	const char value = va_arg(args, const char );

	xmlNodePtr node = pcmk__output_create_xml_node(out, "override",
	PCMK_XA_NAME, name,
	PCMK_XA_VALUE, value,
	NULL);

	if (rsc_name != NULL) {
	crm_xml_add(node, PCMK_XA_RSC, rsc_name);
	}

	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("property-list", "pcmk_resource_t ", "const char ")
	static int
	property_list_default(pcmk__output_t *out, va_list args) {
	pcmk_resource_t rsc = va_arg(args, pcmk_resource_t );
	const char attr = va_arg(args, char );

	const char *value = crm_element_value(rsc->xml, attr);

	if (value != NULL) {
	out->begin_list(out, NULL, NULL, "Properties");
	out->list_item(out, attr, "%s", value);
	out->end_list(out);
	}

	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("property-list", "pcmk_resource_t ", "const char ")
	static int
	property_list_text(pcmk__output_t *out, va_list args) {
	pcmk_resource_t rsc = va_arg(args, pcmk_resource_t );
	const char attr = va_arg(args, const char );

	const char *value = crm_element_value(rsc->xml, attr);

	if (value != NULL) {
	pcmk__formatted_printf(out, "%s\n", value);
	}

	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("resource-agent-action", "int", "const char ", "const char ",
	"const char ", "const char ", "const char ", "GHashTable ",
	"crm_exit_t", "int", "const char ", "const char ", "const char *")
	static int
	resource_agent_action_default(pcmk__output_t *out, va_list args) {
	int verbose = va_arg(args, int);

	const char class = va_arg(args, const char );
	const char provider = va_arg(args, const char );
	const char type = va_arg(args, const char );
	const char rsc_name = va_arg(args, const char );
	const char action = va_arg(args, const char );
	GHashTable overrides = va_arg(args, GHashTable );
	crm_exit_t rc = va_arg(args, crm_exit_t);
	int status = va_arg(args, int);
	const char exit_reason = va_arg(args, const char );
	const char stdout_data = va_arg(args, const char );
	const char stderr_data = va_arg(args, const char );

	if (overrides) {
	GHashTableIter iter;
	const char *name = NULL;
	const char *value = NULL;

	out->begin_list(out, NULL, NULL, "overrides");

	g_hash_table_iter_init(&iter, overrides);
	while (g_hash_table_iter_next(&iter, (gpointer ) &name, (gpointer ) &value)) {
	out->message(out, "override", rsc_name, name, value);
	}

	out->end_list(out);
	}

	out->message(out, "agent-status", status, action, rsc_name, class, provider,
	type, rc, exit_reason);

	/* hide output for validate-all if not in verbose */
	if ((verbose == 0)
	&& pcmk__str_eq(action, PCMK_ACTION_VALIDATE_ALL, pcmk__str_casei)) {
	return pcmk_rc_ok;
	}

	if (stdout_data \|\| stderr_data) {
	xmlNodePtr doc = NULL;

	if (stdout_data != NULL) {
	doc = string2xml(stdout_data);
	}
	if (doc != NULL) {
	out->output_xml(out, PCMK_XE_COMMAND, stdout_data);
	xmlFreeNode(doc);
	} else {
	out->subprocess_output(out, rc, stdout_data, stderr_data);
	}
	}

	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("resource-agent-action", "int", "const char ", "const char ",
	"const char ", "const char ", "const char ", "GHashTable ",
	"crm_exit_t", "int", "const char ", "const char ", "const char *")
	static int
	resource_agent_action_xml(pcmk__output_t *out, va_list args) {
	int verbose G_GNUC_UNUSED = va_arg(args, int);

	const char class = va_arg(args, const char );
	const char provider = va_arg(args, const char );
	const char type = va_arg(args, const char );
	const char rsc_name = va_arg(args, const char );
	const char action = va_arg(args, const char );
	GHashTable overrides = va_arg(args, GHashTable );
	crm_exit_t rc = va_arg(args, crm_exit_t);
	int status = va_arg(args, int);
	const char exit_reason = va_arg(args, const char );
	const char stdout_data = va_arg(args, const char );
	const char stderr_data = va_arg(args, const char );

	xmlNodePtr node = pcmk__output_xml_create_parent(out, "resource-agent-action",
	PCMK_XA_ACTION, action,
	PCMK_XA_CLASS, class,
	PCMK_XA_TYPE, type,
	NULL);

	if (rsc_name) {
	crm_xml_add(node, PCMK_XA_RSC, rsc_name);
	}

	crm_xml_add(node, PCMK_XA_PROVIDER, provider);

	if (overrides) {
	GHashTableIter iter;
	const char *name = NULL;
	const char *value = NULL;

	out->begin_list(out, NULL, NULL, "overrides");

	g_hash_table_iter_init(&iter, overrides);
	while (g_hash_table_iter_next(&iter, (gpointer ) &name, (gpointer ) &value)) {
	out->message(out, "override", rsc_name, name, value);
	}

	out->end_list(out);
	}

	out->message(out, "agent-status", status, action, rsc_name, class, provider,
	type, rc, exit_reason);

	if (stdout_data \|\| stderr_data) {
	xmlNodePtr doc = NULL;

	if (stdout_data != NULL) {
	doc = string2xml(stdout_data);
	}
	if (doc != NULL) {
	out->output_xml(out, PCMK_XE_COMMAND, stdout_data);
	xmlFreeNode(doc);
	} else {
	out->subprocess_output(out, rc, stdout_data, stderr_data);
	}
	}

	pcmk__output_xml_pop_parent(out);
	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("resource-check-list", "resource_checks_t *")
	static int
	resource_check_list_default(pcmk__output_t *out, va_list args) {
	resource_checks_t checks = va_arg(args, resource_checks_t );

	const pcmk_resource_t *parent = pe__const_top_resource(checks->rsc, false);

	if (checks->flags == 0) {
	return pcmk_rc_no_output;
	}

	out->begin_list(out, NULL, NULL, "Resource Checks");

	if (pcmk_is_set(checks->flags, rsc_remain_stopped)) {
	out->list_item(out, "check", "Configuration specifies '%s' should remain stopped",
	parent->id);
	}

	if (pcmk_is_set(checks->flags, rsc_unpromotable)) {
	out->list_item(out, "check", "Configuration specifies '%s' should not be promoted",
	parent->id);
	}

	if (pcmk_is_set(checks->flags, rsc_unmanaged)) {
	out->list_item(out, "check", "Configuration prevents cluster from stopping or starting unmanaged '%s'",
	parent->id);
	}

	if (pcmk_is_set(checks->flags, rsc_locked)) {
	out->list_item(out, "check", "'%s' is locked to node %s due to shutdown",
	parent->id, checks->lock_node);
	}

	if (pcmk_is_set(checks->flags, rsc_node_health)) {
	out->list_item(out, "check",
	"'%s' cannot run on unhealthy nodes due to "
	PCMK_OPT_NODE_HEALTH_STRATEGY "='%s'",
	parent->id,
	pcmk__cluster_option(checks->rsc->cluster->config_hash,
	PCMK_OPT_NODE_HEALTH_STRATEGY));
	}

	out->end_list(out);
	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("resource-check-list", "resource_checks_t *")
	static int
	resource_check_list_xml(pcmk__output_t *out, va_list args) {
	resource_checks_t checks = va_arg(args, resource_checks_t );

	const pcmk_resource_t *parent = pe__const_top_resource(checks->rsc, false);

	xmlNodePtr node = pcmk__output_create_xml_node(out, "check",
	PCMK_XA_ID, parent->id,
	NULL);

	if (pcmk_is_set(checks->flags, rsc_remain_stopped)) {
	pcmk__xe_set_bool_attr(node, "remain_stopped", true);
	}

	if (pcmk_is_set(checks->flags, rsc_unpromotable)) {
	pcmk__xe_set_bool_attr(node, "promotable", false);
	}

	if (pcmk_is_set(checks->flags, rsc_unmanaged)) {
	pcmk__xe_set_bool_attr(node, "unmanaged", true);
	}

	if (pcmk_is_set(checks->flags, rsc_locked)) {
	crm_xml_add(node, "locked-to", checks->lock_node);
	}

	if (pcmk_is_set(checks->flags, rsc_node_health)) {
	pcmk__xe_set_bool_attr(node, "unhealthy", true);
	}

	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("resource-search-list", "GList ", "const char ")
	static int
	resource_search_list_default(pcmk__output_t *out, va_list args)
	{
	GList nodes = va_arg(args, GList );
	const char requested_name = va_arg(args, const char );

	bool printed = false;
	int rc = pcmk_rc_no_output;

	if (!out->is_quiet(out) && nodes == NULL) {
	out->err(out, "resource %s is NOT running", requested_name);
	return rc;
	}

	for (GList *lpc = nodes; lpc != NULL; lpc = lpc->next) {
	node_info_t ni = (node_info_t ) lpc->data;

	if (!printed) {
	out->begin_list(out, NULL, NULL, "Nodes");
	printed = true;
	rc = pcmk_rc_ok;
	}

	if (out->is_quiet(out)) {
	out->list_item(out, "node", "%s", ni->node_name);
	} else {
	const char *role_text = "";

	if (ni->promoted) {
	#ifdef PCMK__COMPAT_2_0
	role_text = " " PCMK__ROLE_PROMOTED_LEGACY;
	#else
	role_text = " " PCMK__ROLE_PROMOTED;
	#endif
	}
	out->list_item(out, "node", "resource %s is running on: %s%s",
	requested_name, ni->node_name, role_text);
	}
	}

	if (printed) {
	out->end_list(out);
	}

	return rc;
	}

	PCMK__OUTPUT_ARGS("resource-search-list", "GList ", "const char ")
	static int
	resource_search_list_xml(pcmk__output_t *out, va_list args)
	{
	GList nodes = va_arg(args, GList );
	const char requested_name = va_arg(args, const char );

	pcmk__output_xml_create_parent(out, PCMK_XE_NODES,
	PCMK_XA_RESOURCE, requested_name,
	NULL);

	for (GList *lpc = nodes; lpc != NULL; lpc = lpc->next) {
	node_info_t ni = (node_info_t ) lpc->data;
	xmlNodePtr sub_node = pcmk__output_create_xml_text_node(out,
	PCMK_XE_NODE,
	ni->node_name);

	if (ni->promoted) {
	crm_xml_add(sub_node, "state", "promoted");
	}
	}

	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("resource-reasons-list", "GList ", "pcmk_resource_t ",
	"pcmk_node_t *")
	static int
	resource_reasons_list_default(pcmk__output_t *out, va_list args)
	{
	GList resources = va_arg(args, GList );
	pcmk_resource_t rsc = va_arg(args, pcmk_resource_t );
	pcmk_node_t node = va_arg(args, pcmk_node_t );

	const char *host_uname = (node == NULL)? NULL : node->details->uname;

	out->begin_list(out, NULL, NULL, "Resource Reasons");

	if ((rsc == NULL) && (host_uname == NULL)) {
	GList *lpc = NULL;
	GList *hosts = NULL;

	for (lpc = resources; lpc != NULL; lpc = lpc->next) {
	pcmk_resource_t rsc = (pcmk_resource_t ) lpc->data;
	rsc->fns->location(rsc, &hosts, TRUE);

	if (hosts == NULL) {
	out->list_item(out, "reason", "Resource %s is not running", rsc->id);
	} else {
	out->list_item(out, "reason", "Resource %s is running", rsc->id);
	}

	cli_resource_check(out, rsc, NULL);
	g_list_free(hosts);
	hosts = NULL;
	}

	} else if ((rsc != NULL) && (host_uname != NULL)) {
	if (resource_is_running_on(rsc, host_uname)) {
	out->list_item(out, "reason", "Resource %s is running on host %s",
	rsc->id, host_uname);
	} else {
	out->list_item(out, "reason", "Resource %s is not running on host %s",
	rsc->id, host_uname);
	}

	cli_resource_check(out, rsc, node);

	} else if ((rsc == NULL) && (host_uname != NULL)) {
	const char* host_uname = node->details->uname;
	GList *allResources = node->details->allocated_rsc;
	GList *activeResources = node->details->running_rsc;
	GList *unactiveResources = pcmk__subtract_lists(allResources, activeResources, (GCompareFunc) strcmp);
	GList *lpc = NULL;

	for (lpc = activeResources; lpc != NULL; lpc = lpc->next) {
	pcmk_resource_t rsc = (pcmk_resource_t ) lpc->data;
	out->list_item(out, "reason", "Resource %s is running on host %s",
	rsc->id, host_uname);
	cli_resource_check(out, rsc, node);
	}

	for(lpc = unactiveResources; lpc != NULL; lpc = lpc->next) {
	pcmk_resource_t rsc = (pcmk_resource_t ) lpc->data;
	out->list_item(out, "reason", "Resource %s is assigned to host %s but not running",
	rsc->id, host_uname);
	cli_resource_check(out, rsc, node);
	}

	g_list_free(allResources);
	g_list_free(activeResources);
	g_list_free(unactiveResources);

	} else if ((rsc != NULL) && (host_uname == NULL)) {
	GList *hosts = NULL;

	rsc->fns->location(rsc, &hosts, TRUE);
	out->list_item(out, "reason", "Resource %s is %srunning",
	rsc->id, (hosts? "" : "not "));
	cli_resource_check(out, rsc, NULL);
	g_list_free(hosts);
	}

	out->end_list(out);
	return pcmk_rc_ok;
	}

	PCMK__OUTPUT_ARGS("resource-reasons-list", "GList ", "pcmk_resource_t ",
	"pcmk_node_t *")
	static int
	resource_reasons_list_xml(pcmk__output_t *out, va_list args)
	{
	GList resources = va_arg(args, GList );
	pcmk_resource_t rsc = va_arg(args, pcmk_resource_t );
	pcmk_node_t node = va_arg(args, pcmk_node_t );

	const char *host_uname = (node == NULL)? NULL : node->details->uname;

	xmlNodePtr xml_node = pcmk__output_xml_create_parent(out, "reason", NULL);

	if ((rsc == NULL) && (host_uname == NULL)) {
	GList *lpc = NULL;
	GList *hosts = NULL;

	pcmk__output_xml_create_parent(out, PCMK_XE_RESOURCES, NULL);

	for (lpc = resources; lpc != NULL; lpc = lpc->next) {
	pcmk_resource_t rsc = (pcmk_resource_t ) lpc->data;
	const char *running = NULL;

	rsc->fns->location(rsc, &hosts, TRUE);
	running = pcmk__btoa(hosts != NULL);

	pcmk__output_xml_create_parent(out, PCMK_XE_RESOURCE,
	PCMK_XA_ID, rsc->id,
	PCMK_XA_RUNNING, running,
	NULL);

	cli_resource_check(out, rsc, NULL);
	pcmk__output_xml_pop_parent(out);
	g_list_free(hosts);
	hosts = NULL;
	}

	pcmk__output_xml_pop_parent(out);

	} else if ((rsc != NULL) && (host_uname != NULL)) {
	if (resource_is_running_on(rsc, host_uname)) {
	crm_xml_add(xml_node, "running_on", host_uname);
	}

	cli_resource_check(out, rsc, node);

	} else if ((rsc == NULL) && (host_uname != NULL)) {
	const char* host_uname = node->details->uname;
	GList *allResources = node->details->allocated_rsc;
	GList *activeResources = node->details->running_rsc;
	GList *unactiveResources = pcmk__subtract_lists(allResources, activeResources, (GCompareFunc) strcmp);
	GList *lpc = NULL;

	pcmk__output_xml_create_parent(out, PCMK_XE_RESOURCES, NULL);

	for (lpc = activeResources; lpc != NULL; lpc = lpc->next) {
	pcmk_resource_t rsc = (pcmk_resource_t ) lpc->data;

	pcmk__output_xml_create_parent(out, PCMK_XE_RESOURCE,
	PCMK_XA_ID, rsc->id,
	PCMK_XA_RUNNING, PCMK_VALUE_TRUE,
	PCMK_XA_HOST, host_uname,
	NULL);

	cli_resource_check(out, rsc, node);
	pcmk__output_xml_pop_parent(out);
	}

	for(lpc = unactiveResources; lpc != NULL; lpc = lpc->next) {
	pcmk_resource_t rsc = (pcmk_resource_t ) lpc->data;

	pcmk__output_xml_create_parent(out, PCMK_XE_RESOURCE,
	PCMK_XA_ID, rsc->id,
	PCMK_XA_RUNNING, PCMK_VALUE_FALSE,
	PCMK_XA_HOST, host_uname,
	NULL);

	cli_resource_check(out, rsc, node);
	pcmk__output_xml_pop_parent(out);
	}

	pcmk__output_xml_pop_parent(out);
	g_list_free(allResources);
	g_list_free(activeResources);
	g_list_free(unactiveResources);

	} else if ((rsc != NULL) && (host_uname == NULL)) {
	GList *hosts = NULL;

	rsc->fns->location(rsc, &hosts, TRUE);
	crm_xml_add(xml_node, PCMK_XA_RUNNING, pcmk__btoa(hosts != NULL));
	cli_resource_check(out, rsc, NULL);
	g_list_free(hosts);
	}

	return pcmk_rc_ok;
	}

	static void
	add_resource_name(pcmk_resource_t rsc, pcmk__output_t out)
	{
	if (rsc->children == NULL) {
	/* Sometimes PCMK_XE_RESOURCE might act as a PCMK_XA_NAME instead of an
	* XML element name, depending on whether the command line causes
	* --xml-simple-list to be forced.
	*/
	out->list_item(out, PCMK_XE_RESOURCE, "%s", rsc->id);
	} else {
	g_list_foreach(rsc->children, (GFunc) add_resource_name, out);
	}
	}

	PCMK__OUTPUT_ARGS("resource-names-list", "GList *")
	static int
	resource_names(pcmk__output_t *out, va_list args) {
	GList resources = va_arg(args, GList );

	if (resources == NULL) {
	out->err(out, "NO resources configured\n");
	return pcmk_rc_no_output;
	}

	out->begin_list(out, NULL, NULL, "Resource Names");
	g_list_foreach(resources, (GFunc) add_resource_name, out);
	out->end_list(out);
	return pcmk_rc_ok;
	}

	static pcmk__message_entry_t fmt_functions[] = {
	{ "agent-status", "default", agent_status_default },
	{ "agent-status", "xml", agent_status_xml },
	{ "attribute-list", "default", attribute_list_default },
	{ "attribute-list", "text", attribute_list_text },
	{ "override", "default", override_default },
	{ "override", "xml", override_xml },
	{ "property-list", "default", property_list_default },
	{ "property-list", "text", property_list_text },
	{ "resource-agent-action", "default", resource_agent_action_default },
	{ "resource-agent-action", "xml", resource_agent_action_xml },
	{ "resource-check-list", "default", resource_check_list_default },
	{ "resource-check-list", "xml", resource_check_list_xml },
	{ "resource-search-list", "default", resource_search_list_default },
	{ "resource-search-list", "xml", resource_search_list_xml },
	{ "resource-reasons-list", "default", resource_reasons_list_default },
	{ "resource-reasons-list", "xml", resource_reasons_list_xml },
	{ "resource-names-list", "default", resource_names },

	{ NULL, NULL, NULL }
	};

	void
	crm_resource_register_messages(pcmk__output_t *out) {
	pcmk__register_messages(out, fmt_functions);
	}

File Metadata

Mime Type: text/x-diff
Expires: Thu, Oct 16, 12:16 AM (1 d, 15 h)
Storage Engine: blob
Storage Format: Raw Data
Storage Handle: 2530765
Default Alt Text: (46 KB)

No OneTemporaryActions

View Options

File Metadata

Event Timeline

No OneTemporary
Actions