if(action->runnable == FALSE) { print_action("\t", action, FALSE);
if(action->optional == FALSE && action->runnable == FALSE) { print_action("\t", action, TRUE);
main(int argc, char **argv){	xmlNodePtr cib_object = NULL;	int lpc = 0;	int argerr = 0;	int flag;  	cl_log_set_entity("ptest");	cl_log_enable_stderr(TRUE);	cl_log_set_facility(LOG_USER);	xmlInitParser(); 	while (1) {		int option_index = 0;		static struct option long_options[] = {			// Top-level Options			{"daemon", 0, 0, 0},      			{0, 0, 0, 0}		};    		flag = getopt_long(argc, argv, OPTARGS,				   long_options, &option_index);		if (flag == -1)			break;    		switch(flag) {			case 0:				printf("option %s", long_options[option_index].name);				if (optarg)					printf(" with arg %s", optarg);				printf("\n");    				break;      				/* a sample test for multiple instance				   if (digit_optind != 0 && digit_optind != this_option_optind)				   printf ("digits occur in two different argv-elements.\n");				   digit_optind = this_option_optind;				   printf ("option %c\n", c);				*/      			case 'V':				printf("option %d", flag);				break;			default:				printf("?? getopt returned character code 0%o ??\n", flag);				++argerr;				break;		}	}  	if (optind < argc) {		printf("non-option ARGV-elements: ");		while (optind < argc)			printf("%s ", argv[optind++]);		printf("\n");	}  	if (optind > argc) {		++argerr;	}  	if (argerr) {		cl_log(LOG_ERR, "%d errors in option parsing", argerr);	}  	cl_log(LOG_INFO, "=#=#=#=#= Getting XML =#=#=#=#=");  	cib_object = file2xml(stdin);  	cl_log(LOG_INFO, "=#=#=#=#= Stage 0 =#=#=#=#=");	stage0(cib_object);	cl_log(LOG_INFO, "========= Nodes =========");	slist_iter(node, node_t, node_list, lpc,		   print_node(NULL, node, TRUE));	cl_log(LOG_INFO, "========= Resources =========");	slist_iter(resource, resource_t, rsc_list, lpc,		   print_resource(NULL, resource, TRUE));    	cl_log(LOG_INFO, "========= Constraints =========");	slist_iter(constraint, rsc_to_node_t, node_cons_list, lpc,		   print_rsc_to_node(NULL, constraint, FALSE));	slist_iter(constraint, rsc_to_rsc_t, rsc_cons_list, lpc,		   print_rsc_to_rsc(NULL, constraint, FALSE));    	cl_log(LOG_INFO, "=#=#=#=#= Stage 1 =#=#=#=#=");	stage1(node_cons_list, node_list, rsc_list);	cl_log(LOG_INFO, "========= Nodes =========");	slist_iter(node, node_t, node_list, lpc,		   print_node(NULL, node, TRUE));	cl_log(LOG_INFO, "========= Resources =========");	slist_iter(resource, resource_t, rsc_list, lpc,		   print_resource(NULL, resource, TRUE));	cl_log(LOG_INFO, "=#=#=#=#= Stage 2 =#=#=#=#=");	pe_debug_on();	stage2(rsc_list, node_list, NULL);	pe_debug_off();	cl_log(LOG_INFO, "========= Nodes =========");	slist_iter(node, node_t, node_list, lpc,		   print_node(NULL, node, TRUE));	cl_log(LOG_INFO, "========= Resources =========");	slist_iter(resource, resource_t, rsc_list, lpc,		   print_resource(NULL, resource, TRUE));    	cl_log(LOG_INFO, "========= Colors =========");	slist_iter(color, color_t, colors, lpc,		   print_color(NULL, color, FALSE));  	cl_log(LOG_INFO, "=#=#=#=#= Stage 3 =#=#=#=#=");	stage3();	cl_log(LOG_INFO, "========= Colors =========");	slist_iter(color, color_t, colors, lpc,		   print_color(NULL, color, FALSE));	cl_log(LOG_INFO, "=#=#=#=#= Stage 4 =#=#=#=#=");	stage4(colors);	cl_log(LOG_INFO, "========= Colors =========");	slist_iter(color, color_t, colors, lpc,		   print_color(NULL, color, FALSE));	cl_log(LOG_INFO, "=#=#=#=#= Summary =#=#=#=#=");	summary(rsc_list);	cl_log(LOG_INFO, "========= Action List =========");	slist_iter(action, action_t, action_list, lpc,		   print_action(NULL, action, FALSE));		cl_log(LOG_INFO, "=#=#=#=#= Stage 5 =#=#=#=#=");	pe_debug_on();	stage5(rsc_list);	cl_log(LOG_INFO, "========= Action List =========");	slist_iter(action, action_t, action_list, lpc,		   print_action(NULL, action, FALSE));	cl_log(LOG_INFO, "=#=#=#=#= Stage 6 =#=#=#=#=");	stage6(rsc_list, action_list, action_cons_list);		cl_log(LOG_INFO, "=#=#=#=#= Summary =#=#=#=#=");	summary(rsc_list);	cl_log(LOG_INFO, "========= Action Sets =========");	cl_log(LOG_INFO, "\t========= Set %d (Un-runnable) =========", -1);	slist_iter(action, action_t, action_list, lpc,		   if(action->runnable == FALSE) {			   print_action("\t", action, FALSE);		   }		);	int lpc2;	slist_iter(action_set, GSList, action_set_list, lpc,		   cl_log(LOG_INFO, "\t========= Set %d =========", lpc);		   slist_iter(action, action_t, action_set, lpc2,			      print_action("\t", action, FALSE)));		cl_log(LOG_INFO, "========= Stonith List =========");	slist_iter(node, node_t, stonith_list, lpc,		   print_node(NULL, node, FALSE));  	cl_log(LOG_INFO, "========= Shutdown List =========");	slist_iter(node, node_t, shutdown_list, lpc,		   print_node(NULL, node, FALSE));	return 0;}