int
run_graph(crm_graph_t * graph)
{
GListPtr lpc = NULL;
int stat_log_level = LOG_DEBUG;
int pass_result = transition_active;
const char *status = "In-progress";
if (graph_fns == NULL) {
set_default_graph_functions();
}
if (graph == NULL) {
return transition_complete;
}
graph->fired = 0;
graph->pending = 0;
graph->skipped = 0;
graph->completed = 0;
graph->incomplete = 0;
g_hash_table_remove_all(graph->migrating);
crm_trace("Entering graph %d callback", graph->id);
/* Pre-calculate the number of completed and in-flight operations */
for (lpc = graph->synapses; lpc != NULL; lpc = lpc->next) {
synapse_t *synapse = (synapse_t *) lpc->data;
if (synapse->confirmed) {
crm_trace("Synapse %d complete", synapse->id);
graph->completed++;
} else if (synapse->failed == FALSE && synapse->executed) {
crm_trace("Synapse %d: confirmation pending", synapse->id);
graph->pending++;
if (graph->migration_limit >= 0) {
count_migrating(graph, synapse);
}
}
}
/* Now check if there is work to do */
for (lpc = graph->synapses; lpc != NULL; lpc = lpc->next) {
synapse_t *synapse = (synapse_t *) lpc->data;
if (graph->batch_limit > 0 && graph->pending >= graph->batch_limit) {
crm_debug("Throttling output: batch limit (%d) reached", graph->batch_limit);
break;
} else if (graph->migration_limit >= 0 && migration_overrun(graph, synapse)) {
crm_debug("Throttling output: migration limit (%d) reached", graph->migration_limit);
break;
} else if (synapse->failed) {
graph->skipped++;
continue;
} else if (synapse->confirmed || synapse->executed) {
/* Already handled */
continue;
}
if (synapse->priority < graph->abort_priority) {
crm_trace("Skipping synapse %d: aborting", synapse->id);
graph->skipped++;
} else if (should_fire_synapse(synapse)) {
crm_trace("Synapse %d fired", synapse->id);
graph->fired++;
CRM_CHECK(fire_synapse(graph, synapse), stat_log_level = LOG_ERR;
graph->abort_priority = INFINITY;
graph->incomplete++;
graph->fired--);
if (synapse->confirmed == FALSE) {
graph->pending++;
if (graph->migration_limit >= 0) {
count_migrating(graph, synapse);
}
}
} else {
crm_trace("Synapse %d cannot fire", synapse->id);
graph->incomplete++;
}
}
int
run_graph(crm_graph_t * graph)
{
GListPtr lpc = NULL;
int stat_log_level = LOG_DEBUG;
int pass_result = transition_active;
const char *status = "In-progress";
if (graph_fns == NULL) {
set_default_graph_functions();
}
if (graph == NULL) {
return transition_complete;
}
graph->fired = 0;
graph->pending = 0;
graph->skipped = 0;
graph->completed = 0;
graph->incomplete = 0;
crm_trace("Entering graph %d callback", graph->id);
/* Pre-calculate the number of completed and in-flight operations */
for (lpc = graph->synapses; lpc != NULL; lpc = lpc->next) {
synapse_t *synapse = (synapse_t *) lpc->data;
if (synapse->confirmed) {
crm_trace("Synapse %d complete", synapse->id);
graph->completed++;
} else if (synapse->failed == FALSE && synapse->executed) {
crm_trace("Synapse %d: confirmation pending", synapse->id);
graph->pending++;
}
}
/* Now check if there is work to do */
for (lpc = graph->synapses; lpc != NULL; lpc = lpc->next) {
synapse_t *synapse = (synapse_t *) lpc->data;
if (graph->batch_limit > 0 && graph->pending >= graph->batch_limit) {
crm_debug("Throttling output: batch limit (%d) reached", graph->batch_limit);
break;
} else if (synapse->failed) {
graph->skipped++;
continue;
} else if (synapse->confirmed || synapse->executed) {
/* Already handled */
continue;
}
if (synapse->priority < graph->abort_priority) {
crm_trace("Skipping synapse %d: aborting", synapse->id);
graph->skipped++;
} else if (should_fire_synapse(graph, synapse)) {
crm_trace("Synapse %d fired", synapse->id);
graph->fired++;
if(fire_synapse(graph, synapse) == FALSE) {
crm_err("Synapse %d failed to fire", synapse->id);
stat_log_level = LOG_ERR;
graph->abort_priority = INFINITY;
graph->incomplete++;
graph->fired--;
}
if (synapse->confirmed == FALSE) {
graph->pending++;
}
} else {
crm_trace("Synapse %d cannot fire", synapse->id);
graph->incomplete++;
}
}
if (graph->pending == 0 && graph->fired == 0) {
graph->complete = TRUE;
stat_log_level = LOG_NOTICE;
pass_result = transition_complete;
status = "Complete";
if (graph->incomplete != 0 && graph->abort_priority <= 0) {
stat_log_level = LOG_WARNING;
pass_result = transition_terminated;
status = "Terminated";
} else if (graph->skipped != 0) {
status = "Stopped";
}
} else if (graph->fired == 0) {
pass_result = transition_pending;
}
do_crm_log(stat_log_level,
"Transition %d (Complete=%d, Pending=%d,"
" Fired=%d, Skipped=%d, Incomplete=%d, Source=%s): %s",
graph->id, graph->completed, graph->pending, graph->fired,
graph->skipped, graph->incomplete, graph->source, status);
return pass_result;
}
