28 #define VARIANT_NATIVE 1 37 for (; gIter != NULL; gIter = gIter->next) {
83 while (g_hash_table_iter_next(&gIter, NULL, (
void **)&local_node)) {
101 for (; gIter != NULL; gIter = gIter->next) {
110 crm_debug(
"%s is active on %d nodes including %s: %s",
118 if (rsc->
parent != NULL) {
129 native_variant_data_t *native_data = NULL;
132 pe_rsc_trace(rsc,
"Processing resource %s...", rsc->id);
134 native_data = calloc(1,
sizeof(native_variant_data_t));
135 rsc->variant_opaque = native_data;
147 const char *stateful = g_hash_table_lookup(parent->
meta,
"stateful");
151 (
"Resource %s is of type %s and therefore cannot be used as a master/slave resource",
163 gboolean match = FALSE;
170 const char *rid =
ID(rsc->
xml);
172 if (rsc->
parent == NULL) {
183 if (strcmp(rsc->
id,
id) == 0) {
192 if (match && on_node) {
198 for (; gIter != NULL; gIter = gIter->next) {
218 for (; gIter != NULL; gIter = gIter->next) {
221 result = rsc->
fns->
find_rsc(child,
id, on_node, flags);
233 char *value_copy = NULL;
234 const char *value = NULL;
236 GHashTable *local_hash = NULL;
239 CRM_CHECK(name != NULL && strlen(name) != 0,
return NULL);
243 if (create || g_hash_table_size(rsc->
parameters) == 0) {
250 local_hash = g_hash_table_new_full(
crm_str_hash, g_str_equal,
258 value = g_hash_table_lookup(hash, name);
261 value = g_hash_table_lookup(rsc->
meta, name);
265 value_copy = strdup(value);
267 if (local_hash != NULL) {
268 g_hash_table_destroy(local_hash);
278 for (; gIter != NULL; gIter = gIter->next) {
295 struct print_data_s {
301 native_print_attr(gpointer key, gpointer value, gpointer user_data)
303 long options = ((
struct print_data_s *)user_data)->options;
304 void *print_data = ((
struct print_data_s *)user_data)->print_data;
306 status_print(
"Option: %s = %s\n", (
char *)key, (
char *)value);
312 const char *pending_state = NULL;
315 pending_state =
"Starting";
318 pending_state =
"Stopping";
321 pending_state =
"Migrating";
325 pending_state =
"Migrating";
328 pending_state =
"Promoting";
331 pending_state =
"Demoting";
334 return pending_state;
340 const char *pending_task = NULL;
347 pending_task =
"Monitoring";
377 native_displayable_state(
resource_t *rsc,
long options)
379 const char *rsc_state = NULL;
382 rsc_state = native_pending_state(rsc);
384 if (rsc_state == NULL) {
385 rsc_state =
role2text(native_displayable_role(rsc));
391 native_print_xml(
resource_t * rsc,
const char *pre_text,
long options,
void *print_data)
395 const char *rsc_state = native_displayable_state(rsc, options);
396 const char *target_role = NULL;
412 status_print(
"active=\"%s\" ", rsc->fns->active(rsc, TRUE) ?
"true" :
"false");
419 status_print(
"nodes_running_on=\"%d\" ", g_list_length(rsc->running_on));
422 const char *pending_task = native_pending_task(rsc);
433 status_print(
"priority=\"%f\" ", (
double)rsc->priority);
434 status_print(
"variant=\"%s\" ", crm_element_name(rsc->xml));
441 }
else if (g_list_length(rsc->running_on) > 0) {
445 for (; gIter != NULL; gIter = gIter->next) {
448 status_print(
"%s <node name=\"%s\" id=\"%s\" cached=\"%s\"/>\n", pre_text,
461 static inline const char *
471 const char *desc = NULL;
474 const char *target_role = NULL;
475 enum rsc_role_e role = native_displayable_role(rsc);
479 char buffer[LINE_MAX];
480 char flagBuffer[LINE_MAX];
488 crm_trace(
"skipping print of internal resource %s", rsc->id);
499 native_print_xml(rsc, pre_text, options, print_data);
503 if (rsc->running_on != NULL) {
504 node = rsc->running_on->data;
517 }
else if (rsc->variant ==
pe_native && g_list_length(rsc->running_on) == 0) {
520 }
else if (g_list_length(rsc->running_on) > 1) {
532 offset += snprintf(buffer + offset, LINE_MAX - offset,
"%s", pre_text);
534 offset += snprintf(buffer + offset, LINE_MAX - offset,
"%s",
rsc_printable_id(rsc));
535 offset += snprintf(buffer + offset, LINE_MAX - offset,
"\t(%s",
class);
538 offset += snprintf(buffer + offset, LINE_MAX - offset,
"::%s", prov);
540 offset += snprintf(buffer + offset, LINE_MAX - offset,
":%s):\t", kind);
542 offset += snprintf(buffer + offset, LINE_MAX - offset,
" ORPHANED ");
545 offset += snprintf(buffer + offset, LINE_MAX - offset,
"FAILED %s",
role2text(role));
547 offset += snprintf(buffer + offset, LINE_MAX - offset,
"FAILED");
549 const char *rsc_state = native_displayable_state(rsc, options);
551 offset += snprintf(buffer + offset, LINE_MAX - offset,
"%s", rsc_state);
555 offset += snprintf(buffer + offset, LINE_MAX - offset,
" %s", node->
details->
uname);
558 flagOffset += snprintf(flagBuffer + flagOffset, LINE_MAX - flagOffset,
559 "%sUNCLEAN", comma_if(flagOffset));
564 const char *pending_task = native_pending_task(rsc);
567 flagOffset += snprintf(flagBuffer + flagOffset, LINE_MAX - flagOffset,
568 "%s%s", comma_if(flagOffset), pending_task);
579 flagOffset += snprintf(flagBuffer + flagOffset, LINE_MAX - flagOffset,
580 "%sdisabled", comma_if(flagOffset));
581 rsc->cluster->disabled_resources++;
585 flagOffset += snprintf(flagBuffer + flagOffset, LINE_MAX - flagOffset,
586 "%starget-role:%s", comma_if(flagOffset), target_role);
587 rsc->cluster->disabled_resources++;
592 flagOffset += snprintf(flagBuffer + flagOffset, LINE_MAX - flagOffset,
593 "%sblocked", comma_if(flagOffset));
594 rsc->cluster->blocked_resources++;
597 flagOffset += snprintf(flagBuffer + flagOffset, LINE_MAX - flagOffset,
598 "%sunmanaged", comma_if(flagOffset));
602 flagOffset += snprintf(flagBuffer + flagOffset, LINE_MAX - flagOffset,
603 "%sfailure ignored", comma_if(flagOffset));
606 if ((options & pe_print_rsconly) || g_list_length(rsc->running_on) > 1) {
612 status_print(
"%s (%s)%s%s", buffer, flagBuffer, desc?
" ":
"", desc?desc:
"");
614 status_print(
"%s%s%s", buffer, desc?
" ":
"", desc?desc:
"");
618 if ((options & pe_print_rsconly) || g_list_length(rsc->running_on) > 1) {
627 if (options & pe_print_html) {
631 if ((options & pe_print_rsconly)) {
633 }
else if (g_list_length(rsc->running_on) > 1) {
637 if (options & pe_print_html) {
639 }
else if ((options & pe_print_printf)
640 || (options & pe_print_ncurses)) {
644 for (; gIter != NULL; gIter = gIter->next) {
649 if (options & pe_print_html) {
652 }
else if ((options & pe_print_printf)
653 || (options & pe_print_ncurses)) {
662 if (options & pe_print_html) {
668 if (options & pe_print_html) {
670 }
else if ((options & pe_print_printf)
671 || (options & pe_print_ncurses)) {
676 if (options & pe_print_html) {
680 }
else if ((options & pe_print_printf) || (options & pe_print_ncurses)) {
685 struct print_data_s pdata;
687 pdata.options = options;
688 pdata.print_data = print_data;
689 g_hash_table_foreach(rsc->parameters, native_print_attr, &pdata);
696 status_print(
"%s\t(%s%svariant=%s, priority=%f)", pre_text,
699 crm_element_name(rsc->xml), (
double)rsc->priority);
701 g_hash_table_iter_init(&iter, rsc->allowed_nodes);
702 while (g_hash_table_iter_next(&iter, NULL, (
void **)&node)) {
703 status_print(
"%s\t * %s %d", pre_text, node->details->uname, node->weight);
712 g_hash_table_iter_init(&iter, rsc->allowed_nodes);
713 while (g_hash_table_iter_next(&iter, NULL, (
void **)&node)) {
722 pe_rsc_trace(rsc,
"Freeing resource action list (not the data)");
747 for (; gIter != NULL; gIter = gIter->next) {
760 if (result && g_list_length(result) == 1) {
761 one = g_list_nth_data(result, 0);
767 for (; gIter != NULL; gIter = gIter->next) {
771 *list = g_list_append(*list, node);
781 get_rscs_brief(
GListPtr rsc_list, GHashTable * rsc_table, GHashTable * active_table)
785 for (; gIter != NULL; gIter = gIter->next) {
792 char buffer[LINE_MAX];
794 int *rsc_counter = NULL;
795 int *active_counter = NULL;
801 offset += snprintf(buffer + offset, LINE_MAX - offset,
"%s",
class);
804 offset += snprintf(buffer + offset, LINE_MAX - offset,
"::%s", prov);
806 offset += snprintf(buffer + offset, LINE_MAX - offset,
":%s", kind);
810 rsc_counter = g_hash_table_lookup(rsc_table, buffer);
811 if (rsc_counter == NULL) {
812 rsc_counter = calloc(1,
sizeof(
int));
814 g_hash_table_insert(rsc_table, strdup(buffer), rsc_counter);
822 for (; gIter2 != NULL; gIter2 = gIter2->next) {
824 GHashTable *node_table = NULL;
830 node_table = g_hash_table_lookup(active_table, node->
details->
uname);
831 if (node_table == NULL) {
832 node_table = g_hash_table_new_full(
crm_str_hash, g_str_equal, free, free);
833 g_hash_table_insert(active_table, strdup(node->
details->
uname), node_table);
836 active_counter = g_hash_table_lookup(node_table, buffer);
837 if (active_counter == NULL) {
838 active_counter = calloc(1,
sizeof(
int));
840 g_hash_table_insert(node_table, strdup(buffer), active_counter);
849 destroy_node_table(gpointer
data)
851 GHashTable *node_table =
data;
854 g_hash_table_destroy(node_table);
860 void *print_data, gboolean print_all)
862 GHashTable *rsc_table = g_hash_table_new_full(
crm_str_hash, g_str_equal, free, free);
863 GHashTable *active_table = g_hash_table_new_full(
crm_str_hash, g_str_equal,
864 free, destroy_node_table);
867 int *rsc_counter = NULL;
869 get_rscs_brief(rsc_list, rsc_table, active_table);
871 g_hash_table_iter_init(&hash_iter, rsc_table);
872 while (g_hash_table_iter_next(&hash_iter, (gpointer *)&type, (gpointer *)&rsc_counter)) {
874 char *node_name = NULL;
875 GHashTable *node_table = NULL;
876 int active_counter_all = 0;
878 g_hash_table_iter_init(&hash_iter2, active_table);
879 while (g_hash_table_iter_next(&hash_iter2, (gpointer *)&node_name, (gpointer *)&node_table)) {
880 int *active_counter = g_hash_table_lookup(node_table, type);
882 if (active_counter == NULL || *active_counter == 0) {
886 active_counter_all += *active_counter;
898 status_print(
"%s%d/%d\t(%s):\tActive %s\n", pre_text ? pre_text :
"",
899 active_counter ? *active_counter : 0,
900 rsc_counter ? *rsc_counter : 0, type,
901 active_counter && (*active_counter > 0) && node_name ? node_name :
"");
903 status_print(
"%s%d\t(%s):\tActive %s\n", pre_text ? pre_text :
"",
904 active_counter ? *active_counter : 0, type,
905 active_counter && (*active_counter > 0) && node_name ? node_name :
"");
908 if (options & pe_print_html) {
913 if (print_all && active_counter_all == 0) {
918 status_print(
"%s%d/%d\t(%s):\tActive\n", pre_text ? pre_text :
"",
920 rsc_counter ? *rsc_counter : 0, type);
922 if (options & pe_print_html) {
929 g_hash_table_destroy(rsc_table);
933 g_hash_table_destroy(active_table);
#define CRM_CHECK(expr, failure_action)
#define CRMD_ACTION_MIGRATED
void native_print(resource_t *rsc, const char *pre_text, long options, void *print_data)
char * native_parameter(resource_t *rsc, node_t *node, gboolean create, const char *name, pe_working_set_t *data_set)
resource_t * native_find_rsc(resource_t *rsc, const char *id, node_t *on_node, int flags)
enum rsc_role_e native_resource_state(const resource_t *rsc, gboolean current)
#define CRMD_ACTION_NOTIFY
#define pe_rsc_provisional
enum pe_obj_types variant
void common_free(resource_t *rsc)
gboolean native_unpack(resource_t *rsc, pe_working_set_t *data_set)
#define status_print(fmt, args...)
#define CRMD_ACTION_PROMOTE
void get_rsc_attributes(GHashTable *meta_hash, resource_t *rsc, node_t *node, pe_working_set_t *data_set)
void print_node(const char *pre_text, node_t *node, gboolean details)
#define CRM_LOG_ASSERT(expr)
resource_t * uber_parent(resource_t *rsc)
#define clear_bit(word, bit)
#define CRMD_ACTION_START
gboolean native_active(resource_t *rsc, gboolean all)
const char * role2text(enum rsc_role_e role)
void force_non_unique_clone(resource_t *rsc, const char *rid, pe_working_set_t *data_set)
struct node_shared_s * details
#define CRMD_ACTION_DEMOTE
#define set_bit(word, bit)
#define crm_debug(fmt, args...)
enum rsc_recovery_type recovery_type
void native_add_running(resource_t *rsc, node_t *node, pe_working_set_t *data_set)
resource_object_functions_t * fns
GHashTable * allowed_nodes
#define crm_trace(fmt, args...)
#define XML_AGENT_ATTR_PROVIDER
const char * crm_element_value(xmlNode *data, const char *name)
#define XML_RSC_ATTR_TARGET_ROLE
node_t *(* location)(resource_t *, GListPtr *, gboolean)
enum rsc_role_e text2role(const char *role)
void print_rscs_brief(GListPtr rsc_list, const char *pre_text, long options, void *print_data, gboolean print_all)
node_t * native_location(resource_t *rsc, GListPtr *list, gboolean current)
GHashTable * node_hash_from_list(GListPtr list)
resource_t *(* find_rsc)(resource_t *parent, const char *search, node_t *node, int flags)
void resource_location(resource_t *rsc, node_t *node, int score, const char *tag, pe_working_set_t *data_set)
enum rsc_role_e next_role
#define pe_rsc_failure_ignored
#define CRMD_ACTION_MIGRATE
#define XML_RSC_ATTR_INTERNAL_RSC
node_t * pe_find_node_id(GListPtr node_list, const char *id)
gboolean crm_is_true(const char *s)
#define pe_rsc_trace(rsc, fmt, args...)
#define safe_str_eq(a, b)
void g_hash_destroy_str(gpointer data)
void native_free(resource_t *rsc)
const char * rsc_printable_id(resource_t *rsc)
enum crm_ais_msg_types type
#define pe_rsc_info(rsc, fmt, args...)
#define XML_AGENT_ATTR_CLASS
#define CRMD_ACTION_STATUS