crm_verbose("=#=#=#=#= Stage 0 =#=#=#=#=");
crm_trace("unpack");
do_calculations(crm_data_t * cib_object){	GListPtr resources = NULL;	GListPtr nodes = NULL;	GListPtr placement_constraints = NULL;	GListPtr actions = NULL;	GListPtr ordering_constraints = NULL;	GListPtr stonith_list = NULL;	GListPtr shutdown_list = NULL;	GListPtr colors = NULL;	GListPtr action_sets = NULL;	crm_data_t * graph = NULL;/*	pe_debug_on(); */		crm_verbose("=#=#=#=#= Stage 0 =#=#=#=#=");		  	stage0(cib_object,	       &resources,	       &nodes,  &placement_constraints,	       &actions,  &ordering_constraints,	       &stonith_list, &shutdown_list);	crm_verbose("=#=#=#=#= Stage 1 =#=#=#=#=");	stage1(placement_constraints, nodes, resources);		crm_verbose("=#=#=#=#= Stage 2 =#=#=#=#=");	stage2(resources, nodes, &colors);		crm_verbose("=#=#=#=#= Stage 3 =#=#=#=#=");	stage3(colors);		crm_verbose("=#=#=#=#= Stage 4 =#=#=#=#=");	stage4(colors);		crm_verbose("=#=#=#=#= Stage 5 =#=#=#=#=");	stage5(resources, &ordering_constraints);			crm_verbose("=#=#=#=#= Stage 6 =#=#=#=#=");	stage6(&actions, &ordering_constraints, nodes, resources);		crm_verbose("=#=#=#=#= Stage 7 =#=#=#=#=");	stage7(resources, actions, ordering_constraints);		crm_verbose("\t========= Set %d (Un-runnable) =========", -1);	crm_devel_action(		slist_iter(action, action_t, actions, lpc,			   if(action->optional == FALSE			      && action->runnable == FALSE) {				   print_action("\t", action, TRUE);			   }			)		);		crm_verbose("========= Stonith List =========");	crm_devel_action(		slist_iter(node, node_t, stonith_list, lpc,			   print_node(NULL, node, FALSE);			)		);		crm_verbose("========= Shutdown List =========");	crm_devel_action(		slist_iter(node, node_t, shutdown_list, lpc,			   print_node(NULL, node, FALSE);			)		);		crm_verbose("=#=#=#=#= Stage 8 =#=#=#=#=");	stage8(resources, actions, &graph);		crm_verbose("=#=#=#=#= Cleanup =#=#=#=#=");	while(placement_constraints) {		pe_free_rsc_to_node((rsc_to_node_t*)placement_constraints->data);		placement_constraints = placement_constraints->next;	}	if(placement_constraints != NULL) {		g_list_free(placement_constraints);	}	pe_free_shallow(ordering_constraints);	slist_iter(action_set, GList, action_sets, lpc,		   pe_free_shallow_adv(action_set, FALSE);		);	pe_free_shallow_adv(action_sets, FALSE);/* 	pe_free_actions(actions); */	pe_free_resources(resources); 	pe_free_colors(colors);	pe_free_nodes(nodes);	if(shutdown_list != NULL) {		g_list_free(shutdown_list);	}	if(stonith_list != NULL) {		g_list_free(stonith_list);	}		return graph;}