stage4(colors);
stage4(resources);
do_calculations(xmlNodePtr cib_object){	int lpc, lpc2;		GListPtr resources = NULL;	GListPtr nodes = NULL;	GListPtr node_constraints = NULL;	GListPtr actions = NULL;	GListPtr action_constraints = NULL;	GListPtr stonith_list = NULL;	GListPtr shutdown_list = NULL;	GListPtr colors = NULL;	GListPtr action_sets = NULL;	xmlNodePtr graph = NULL;//	pe_debug_on();		crm_verbose("=#=#=#=#= Stage 0 =#=#=#=#=");		  	stage0(cib_object,	       &resources,	       &nodes,  &node_constraints,	       &actions,  &action_constraints,	       &stonith_list, &shutdown_list);	crm_verbose("=#=#=#=#= Stage 1 =#=#=#=#=");	stage1(node_constraints, nodes, resources);	crm_verbose("=#=#=#=#= Stage 2 =#=#=#=#=");	stage2(resources, nodes, &colors);	crm_verbose("========= Nodes =========");	crm_debug_action(		slist_iter(node, node_t, nodes, lpc,			   print_node(NULL, node, TRUE)			)		);			crm_verbose("========= Resources =========");	crm_debug_action(		slist_iter(resource, resource_t, resources, lpc,			   print_resource(NULL, resource, TRUE)			)		);    	crm_verbose("=#=#=#=#= Stage 3 =#=#=#=#=");	stage3(colors);	crm_verbose("=#=#=#=#= Stage 4 =#=#=#=#=");	stage4(colors);	crm_verbose("========= Colors =========");	crm_debug_action(		slist_iter(color, color_t, colors, lpc,		   print_color(NULL, color, FALSE)			)		);	crm_verbose("=#=#=#=#= Stage 5 =#=#=#=#=");	stage5(resources);	crm_verbose("=#=#=#=#= Stage 6 =#=#=#=#=");	stage6(&actions, &action_constraints, nodes);	crm_verbose("========= Action List =========");	crm_debug_action(		slist_iter(action, action_t, actions, lpc,			   print_action(NULL, action, TRUE)			)		);		crm_verbose("=#=#=#=#= Stage 7 =#=#=#=#=");	stage7(resources, actions, action_constraints, &action_sets);		crm_verbose("=#=#=#=#= Summary =#=#=#=#=");	summary(resources);	crm_verbose("========= Action Sets =========");	crm_verbose("\t========= Set %d (Un-runnable) =========", -1);	crm_debug_action(		slist_iter(action, action_t, actions, lpc,			   if(action->optional == FALSE			      && action->runnable == FALSE) {				   print_action("\t", action, TRUE);			   }			)		);	crm_debug_action(		slist_iter(action_set, GList, action_sets, lpc,			   crm_verbose("\t========= Set %d =========", lpc);			   slist_iter(action, action_t, action_set, lpc2,				      print_action("\t", action, TRUE);				   )			)		);		crm_verbose("========= Stonith List =========");	crm_debug_action(		slist_iter(node, node_t, stonith_list, lpc,			   print_node(NULL, node, FALSE);			)		);  	crm_verbose("========= Shutdown List =========");	crm_debug_action(		slist_iter(node, node_t, shutdown_list, lpc,			   print_node(NULL, node, FALSE);			)		);	crm_verbose("=#=#=#=#= Stage 8 =#=#=#=#=");	stage8(action_sets, &graph);	crm_verbose("=#=#=#=#= Cleanup =#=#=#=#=");	crm_verbose("deleting node cons");	while(node_constraints) {		pe_free_rsc_to_node((rsc_to_node_t*)node_constraints->data);		node_constraints = node_constraints->next;	}	g_list_free(node_constraints);	crm_verbose("deleting order cons");	pe_free_shallow(action_constraints);	crm_verbose("deleting action sets");	slist_iter(action_set, GList, action_sets, lpc,		   pe_free_shallow_adv(action_set, FALSE);		);	pe_free_shallow_adv(action_sets, FALSE);		crm_verbose("deleting actions");	pe_free_actions(actions);	crm_verbose("deleting resources");	pe_free_resources(resources); 		crm_verbose("deleting colors");	pe_free_colors(colors);	crm_verbose("deleting nodes");	pe_free_nodes(nodes);		g_list_free(shutdown_list);	g_list_free(stonith_list);	return graph;}